07/08: tests: Skip 'guix-register' when the socket name length is exceeded.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit bd98ad1fbcc572a292bb98b2c667dcb48bf7cc49
Author: Ludovic Courtès <address@hidden>
Date:   Mon Feb 2 12:30:49 2015 +0100

    tests: Skip 'guix-register' when the socket name length is exceeded.
    
    * tests/guix-register.sh: Before running 'guix-daemon', check whether
      the socket name length exceeds the system limitation.
---
 tests/guix-register.sh |   10 +++++++++-
 1 files changed, 9 insertions(+), 1 deletions(-)

diff --git a/tests/guix-register.sh b/tests/guix-register.sh
index e99f5c6..7084ac6 100644
--- a/tests/guix-register.sh
+++ b/tests/guix-register.sh
@@ -1,5 +1,5 @@
 # GNU Guix --- Functional package management for GNU
-# Copyright © 2013, 2014 Ludovic Courtès <address@hidden>
+# Copyright © 2013, 2014, 2015 Ludovic Courtès <address@hidden>
 #
 # This file is part of GNU Guix.
 #
@@ -111,6 +111,14 @@ do
     export NIX_IGNORE_SYMLINK_STORE NIX_STORE_DIR NIX_STATE_DIR        \
        NIX_LOG_DIR NIX_DB_DIR
 
+    # Check whether we overflow the limitation on local socket name lengths.
+    if [ `echo "$NIX_STATE_DIR/daemon-socket/socket" | wc -c` -ge 108 ]
+    then
+       # Mark the test as skipped even though we already did some work so
+       # that the remainder is not silently skipped.
+       exit 77
+    fi
+
     guix-daemon --disable-chroot &
     subdaemon_pid=$!
     exit_hook="kill $subdaemon_pid"