GNU bug report logs - #28752
openvpn-client-service error

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 28752 in the body.
You can then email your comments to 28752 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: john herrlin <jherrlin <at> gmail.com>
To: bug-guix <at> gnu.org
Cc: julien <at> lepiller.eu
Subject: openvpn-client-service error
Date: Sun, 8 Oct 2017 22:03:52 +0200

[Message part 1 (text/plain, inline)]

Hey,

I am facing a problem with (openvpn-client-service) when trying to
reconfigure the system.
Its GuixSD on a x86-64, the system config is attached.

Backtrace:
In srfi/srfi-1.scm:
   592:29 19 (map1 (#<<service> type: #<service-type nscd 22f74b0…> …))
   592:29 18 (map1 (#<<service> type: #<service-type guix 22f73c0…> …))
   592:29 17 (map1 (#<<service> type: #<service-type urandom-seed…> …))
   592:29 16 (map1 (#<<service> type: #<service-type syslog 22f74…> …))
   592:29 15 (map1 (#<<service> type: #<service-type static-netwo…> …))
   592:29 14 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29 13 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29 12 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29 11 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29 10 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29  9 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
   592:29  8 (map1 (#<<service> type: #<service-type console-font…> …))
   592:17  7 (map1 (#<<service> type: #<service-type openvpn-clie…> …))
In gnu/services/vpn.scm:
   409:24  6 (_ #<<openvpn-client-configuration> openvpn: #<package …>)
    379:9  5 (openvpn-config-file client #<<openvpn-client-configura…>)
In ice-9/ports.scm:
    549:4  4 (call-with-output-string _)
    473:4  3 (with-output-to-port _ _)
In ice-9/boot-9.scm:
   268:13  2 (for-each #<procedure 2636d40 at gnu/services/configur…> …)
In gnu/services/vpn.scm:
   112:19  1 (serialize-tls-auth client #f)
In unknown file:
           0 (string-append #f " " "1")

ERROR: In procedure string-append:
ERROR: In procedure string-append: Wrong type (expecting string): #f

[Message part 2 (text/html, inline)]

[.system.scm (text/x-scheme, attachment)]

Message #8 received at 28752 <at> debbugs.gnu.org (full text, mbox):

From: julien lepiller <julien <at> lepiller.eu>
To: john herrlin <jherrlin <at> gmail.com>
Cc: 28752 <at> debbugs.gnu.org
Subject: Re: openvpn-client-service error
Date: Mon, 09 Oct 2017 13:41:33 +0200

[Message part 1 (text/plain, inline)]

Le 2017-10-08 22:03, john herrlin a écrit :
> Hey,
> 
> I am facing a problem with (openvpn-client-service) when trying to
> reconfigure the system.
> Its GuixSD on a x86-64, the system config is attached.
> 
> Backtrace:
> In srfi/srfi-1.scm:
>    592:29 19 (map1 (#<<service> type: #<service-type nscd 22f74b0…> …))
>    592:29 18 (map1 (#<<service> type: #<service-type guix 22f73c0…> …))
>    592:29 17 (map1 (#<<service> type: #<service-type urandom-seed…> …))
>    592:29 16 (map1 (#<<service> type: #<service-type syslog 22f74…> …))
>    592:29 15 (map1 (#<<service> type: #<service-type static-netwo…> …))
>    592:29 14 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>    592:29 13 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>    592:29 12 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>    592:29 11 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>    592:29 10 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>    592:29  9 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>    592:29  8 (map1 (#<<service> type: #<service-type console-font…> …))
>    592:17  7 (map1 (#<<service> type: #<service-type openvpn-clie…> …))
> In gnu/services/vpn.scm:
>    409:24  6 (_ #<<openvpn-client-configuration> openvpn: #<package …>)
>     379:9  5 (openvpn-config-file client #<<openvpn-client-configura…>)
> In ice-9/ports.scm:
>     549:4  4 (call-with-output-string _)
>     473:4  3 (with-output-to-port _ _)
> In ice-9/boot-9.scm:
>    268:13  2 (for-each #<procedure 2636d40 at gnu/services/configur…> 
> …)
> In gnu/services/vpn.scm:
>    112:19  1 (serialize-tls-auth client #f)
> In unknown file:
>            0 (string-append #f " " "1")
> 
> ERROR: In procedure string-append:
> ERROR: In procedure string-append: Wrong type (expecting string): #f

Although I won't be able to check it before tomorrow evening, here is a 
patch that should solve your issue. Are you able to test it and tell me 
whether it works?

Thank you for reporting this!

[0001-services-vpn-Fix-bug-with-default-tls-auth-configura.patch (text/x-diff, attachment)]

Message #11 received at 28752 <at> debbugs.gnu.org (full text, mbox):

From: john herrlin <jherrlin <at> gmail.com>
To: julien lepiller <julien <at> lepiller.eu>
Cc: 28752 <at> debbugs.gnu.org
Subject: Re: openvpn-client-service error
Date: Mon, 9 Oct 2017 18:22:24 +0200

[Message part 1 (text/plain, inline)]

With some help from the wonderful people in #guix, IRC I managed to get
this far.

```
git am <patch>
guix environment guix
./bootstrap && ./configure --sysconfdir=/etc --localstatedir=/var
make
guix system vm config.scm    # failed on grub/efi
guix system build config.scm  # succeeded
```

I dont know how to proceed further.

2017-10-09 13:41 GMT+02:00 julien lepiller <julien <at> lepiller.eu>:

> Le 2017-10-08 22:03, john herrlin a écrit :
>
>> Hey,
>>
>> I am facing a problem with (openvpn-client-service) when trying to
>> reconfigure the system.
>> Its GuixSD on a x86-64, the system config is attached.
>>
>> Backtrace:
>> In srfi/srfi-1.scm:
>>    592:29 19 (map1 (#<<service> type: #<service-type nscd 22f74b0…> …))
>>    592:29 18 (map1 (#<<service> type: #<service-type guix 22f73c0…> …))
>>    592:29 17 (map1 (#<<service> type: #<service-type urandom-seed…> …))
>>    592:29 16 (map1 (#<<service> type: #<service-type syslog 22f74…> …))
>>    592:29 15 (map1 (#<<service> type: #<service-type static-netwo…> …))
>>    592:29 14 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>>    592:29 13 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>>    592:29 12 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>>    592:29 11 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>>    592:29 10 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>>    592:29  9 (map1 (#<<service> type: #<service-type mingetty 22f…> …))
>>    592:29  8 (map1 (#<<service> type: #<service-type console-font…> …))
>>    592:17  7 (map1 (#<<service> type: #<service-type openvpn-clie…> …))
>> In gnu/services/vpn.scm:
>>    409:24  6 (_ #<<openvpn-client-configuration> openvpn: #<package …>)
>>     379:9  5 (openvpn-config-file client #<<openvpn-client-configura…>)
>> In ice-9/ports.scm:
>>     549:4  4 (call-with-output-string _)
>>     473:4  3 (with-output-to-port _ _)
>> In ice-9/boot-9.scm:
>>    268:13  2 (for-each #<procedure 2636d40 at gnu/services/configur…> …)
>> In gnu/services/vpn.scm:
>>    112:19  1 (serialize-tls-auth client #f)
>> In unknown file:
>>            0 (string-append #f " " "1")
>>
>> ERROR: In procedure string-append:
>> ERROR: In procedure string-append: Wrong type (expecting string): #f
>>
>
> Although I won't be able to check it before tomorrow evening, here is a
> patch that should solve your issue. Are you able to test it and tell me
> whether it works?
>
> Thank you for reporting this!




-- 
MVH
John Herrlin

[Message part 2 (text/html, inline)]

Message #14 received at 28752 <at> debbugs.gnu.org (full text, mbox):

From: julien lepiller <julien <at> lepiller.eu>
To: john herrlin <jherrlin <at> gmail.com>
Cc: 28752 <at> debbugs.gnu.org
Subject: Re: openvpn-client-service error
Date: Tue, 10 Oct 2017 14:06:39 +0200

Le 2017-10-09 18:22, john herrlin a écrit :
> With some help from the wonderful people in #guix, IRC I managed to get
> this far.
> 
> ```
> git am <patch>
> guix environment guix
> ./bootstrap && ./configure --sysconfdir=/etc --localstatedir=/var
> make
> guix system vm config.scm    # failed on grub/efi
> guix system build config.scm  # succeeded
> ```
> 
> I dont know how to proceed further.
> 

So you could build your configuration, but it's not appropriate for a 
vm. I could test my patch using a variant of 
gnu/system/examples/vm-image.tmpl. It builds the system and starts it, 
but since there is no configured server, the vpn service cannot start. I 
will push the patch this evening.

Message #19 received at 28752-done <at> debbugs.gnu.org (full text, mbox):

From: ludo <at> gnu.org (Ludovic Courtès)
To: julien lepiller <julien <at> lepiller.eu>
Cc: john herrlin <jherrlin <at> gmail.com>, 28752-done <at> debbugs.gnu.org
Subject: Re: bug#28752: openvpn-client-service error
Date: Wed, 11 Oct 2017 15:29:01 +0200

julien lepiller <julien <at> lepiller.eu> skribis:

> From 179727553c91987a1154860f952d4d83383a48d5 Mon Sep 17 00:00:00 2001
> From: Julien Lepiller <julien <at> lepiller.eu>
> Date: Mon, 9 Oct 2017 12:09:11 +0200
> Subject: [PATCH] services: vpn: Fix bug with default tls-auth configuration.
>
> * gnu/services/vpn.scm (serialize-tls-auth): Fix serialization error when
> tls-auth is disabled.

Julien committed this as 4b8b4418e609b5e0bfb6efbc11ac28deaa437e80 and it
does seem to fix this bug, so I’m closing it now.

John, let us know if anything’s wrong!

Thanks,
Ludo’.

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.