contrib sb-bsd-sockets fails to build on Windows

Bug #1386761 reported by il71
6
This bug affects 1 person
Affects Status Importance Assigned to Milestone
SBCL
Fix Released
Undecided
Unassigned

Bug Description

Since IPv6 support in 1.2.5, it does not build on Windows (x86_64 at least):

Doing 27 pending tests of 27 tests total.
 SB-BSD-SOCKETS:MAKE-INET-ADDRESS SB-BSD-SOCKETS-TEST::MAKE-INET-ADDRESS2
Test SB-BSD-SOCKETS-TEST::MAKE-INET6-ADDRESS.1 failed
Form: (EQUALP
       (SB-BSD-SOCKETS:MAKE-INET6-ADDRESS
        "ffff:ffff:ffff:ffff:ffff:ffff:ffff:ffff")
       #(255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255))
Expected value: T
Actual value: #<UNDEFINED-FUNCTION MAKE-INET6-ADDRESS {1004B452C3}>.
 SB-BSD-SOCKETS-TEST::GET-PROTOCOL-BY-NAME/TCP
 SB-BSD-SOCKETS-TEST::GET-PROTOCOL-BY-NAME/UDP
 SB-BSD-SOCKETS-TEST::GET-PROTOCOL-BY-NAME/ERROR
 SB-BSD-SOCKETS-TEST::MAKE-INET-SOCKET.SMOKE
 SB-BSD-SOCKETS-TEST::MAKE-INET-SOCKET.KEYWORD
 SB-BSD-SOCKETS-TEST::MAKE-INET-SOCKET-WRONG
 SB-BSD-SOCKETS-TEST::MAKE-INET-SOCKET-KEYWORD-WRONG
Test SB-BSD-SOCKETS-TEST::MAKE-INET6-SOCKET.SMOKE failed
Form: (LET ((SB-BSD-SOCKETS-TEST::S
             (MAKE-INSTANCE 'SB-BSD-SOCKETS:INET6-SOCKET :TYPE :STREAM
                            :PROTOCOL
                            (SB-BSD-SOCKETS:GET-PROTOCOL-BY-NAME "tcp"))))
        (AND
         (> (SB-BSD-SOCKETS:SOCKET-FILE-DESCRIPTOR SB-BSD-SOCKETS-TEST::S) 1)
         T))
Expected value: T
Actual value: #<SIMPLE-ERROR "There is no class named ~
                     ~/sb-impl::print-symbol-with-prefix/." {1005009AF3}>.
Test SB-BSD-SOCKETS-TEST::MAKE-INET6-SOCKET.KEYWORD failed
Form: (LET ((SB-BSD-SOCKETS-TEST::S
             (MAKE-INSTANCE 'SB-BSD-SOCKETS:INET6-SOCKET :TYPE :STREAM
                            :PROTOCOL :TCP)))
        (AND
         (> (SB-BSD-SOCKETS:SOCKET-FILE-DESCRIPTOR SB-BSD-SOCKETS-TEST::S) 1)
         T))
Expected value: T
Actual value: #<SIMPLE-ERROR "There is no class named ~
                     ~/sb-impl::print-symbol-with-prefix/." {1005038313}>.
 SB-BSD-SOCKETS-TEST::NON-BLOCK-SOCKET SB-BSD-SOCKETS-TEST::INET-SOCKET-BIND
Test SB-BSD-SOCKETS-TEST::INET6-SOCKET-BIND failed
Form: (LET* ((SB-BSD-SOCKETS-TEST::TCP
              (SB-BSD-SOCKETS:GET-PROTOCOL-BY-NAME "tcp"))
             (SB-BSD-SOCKETS-TEST::ADDRESS
              (SB-BSD-SOCKETS:MAKE-INET6-ADDRESS "::1"))
             (SB-BSD-SOCKETS-TEST::S1
              (MAKE-INSTANCE 'SB-BSD-SOCKETS:INET6-SOCKET :TYPE :STREAM
                             :PROTOCOL SB-BSD-SOCKETS-TEST::TCP))
             (SB-BSD-SOCKETS-TEST::S2
              (MAKE-INSTANCE 'SB-BSD-SOCKETS:INET6-SOCKET :TYPE :STREAM
                             :PROTOCOL SB-BSD-SOCKETS-TEST::TCP)))
        (UNWIND-PROTECT
            (PROGN
             (SB-BSD-SOCKETS:SOCKET-BIND SB-BSD-SOCKETS-TEST::S1
                                         SB-BSD-SOCKETS-TEST::ADDRESS 0)
             (HANDLER-CASE
              (LET ((SB-BSD-SOCKETS-TEST::PORT
                     (NTH-VALUE 1
                                (SB-BSD-SOCKETS:SOCKET-NAME
                                 SB-BSD-SOCKETS-TEST::S1))))
                (SB-BSD-SOCKETS:SOCKET-BIND SB-BSD-SOCKETS-TEST::S2
                                            SB-BSD-SOCKETS-TEST::ADDRESS
                                            SB-BSD-SOCKETS-TEST::PORT)
                NIL)
              (SB-BSD-SOCKETS:ADDRESS-IN-USE-ERROR NIL T)))
          (SB-BSD-SOCKETS:SOCKET-CLOSE SB-BSD-SOCKETS-TEST::S1)
          (SB-BSD-SOCKETS:SOCKET-CLOSE SB-BSD-SOCKETS-TEST::S2)))
Expected value: T
Actual value: #<UNDEFINED-FUNCTION MAKE-INET6-ADDRESS {10052EF7B3}>.
 SB-BSD-SOCKETS-TEST::SIMPLE-SOCKOPT-TEST
 SB-BSD-SOCKETS-TEST::SOCKET-OPEN-P-TRUE.1
 SB-BSD-SOCKETS-TEST::SOCKET-OPEN-P-FALSE SB-BSD-SOCKETS-TEST::INTERRUPT-IO
 SB-BSD-SOCKETS-TEST::SHUTDOWN.SERVER.CHARACTER.OUTPUT
 SB-BSD-SOCKETS-TEST::SHUTDOWN.SERVER.UB8.OUTPUT
 SB-BSD-SOCKETS-TEST::SHUTDOWN.CLIENT.CHARACTER.OUTPUT
 SB-BSD-SOCKETS-TEST::SHUTDOWN.CLIENT.UB8.OUTPUT
 SB-BSD-SOCKETS-TEST::SHUTDOWN.SERVER.CHARACTER.IO
 SB-BSD-SOCKETS-TEST::SHUTDOWN.SERVER.UB8.IO
 SB-BSD-SOCKETS-TEST::SHUTDOWN.CLIENT.CHARACTER.IO
 SB-BSD-SOCKETS-TEST::SHUTDOWN.CLIENT.UB8.IO
4 out of 27 total tests failed: SB-BSD-SOCKETS-TEST::MAKE-INET6-ADDRESS.1,
   SB-BSD-SOCKETS-TEST::MAKE-INET6-SOCKET.SMOKE,
   SB-BSD-SOCKETS-TEST::MAKE-INET6-SOCKET.KEYWORD,
   SB-BSD-SOCKETS-TEST::INET6-SOCKET-BIND.
WARNING: ignoring expected failures in test-op
Unhandled SIMPLE-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING
                                    {100306FA53}>:
  test-op failed with unexpected failures

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {100306FA53}>
0: ((LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX))
1: (SB-IMPL::CALL-WITH-SANE-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX) {10063F5F4B}>)
2: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX) {10063F5F1B}>)
3: (PRINT-BACKTRACE :STREAM #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDERR* {1000155853}> :START 0 :FROM :INTERRUPTED-FRAME :COUNT NIL :PRINT-THREAD T :PRINT-FRAME-SOURCE NIL :METHOD-FRAME-STYLE NIL)
4: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<SIMPLE-ERROR "test-op failed with unexpected failures" {10063F3D63}> #<unavailable argument>)
5: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<SIMPLE-ERROR "test-op failed with unexpected failures" {10063F3D63}>)
6: (INVOKE-DEBUGGER #<SIMPLE-ERROR "test-op failed with unexpected failures" {10063F3D63}>)
7: (ERROR "test-op failed with unexpected failures")
8: ((:METHOD ASDF/ACTION:PERFORM (ASDF/LISP-ACTION:TEST-OP (EQL #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets/tests">))) #<unavailable argument> #<unavailable argument>) [fast-method]
9: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unavailable argument> #<unavailable argument> #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets/tests">)
10: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets/tests">) [fast-method]
11: ((:METHOD ASDF/PLAN:PERFORM-PLAN (LIST)) ((#1=#<ASDF/LISP-ACTION:PREPARE-OP > . #2=#<ASDF/SYSTEM:SYSTEM #3="sb-rt">) (#1# . #4=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #3# "rt">) (#5=#<ASDF/LISP-ACTION:LOAD-OP > . #4#) (#6=#<ASDF/LISP-ACTION:COMPILE-OP > . #2#) (#5# . #2#) (#6# . #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets">) (#1# . #7=#<ASDF/SYSTEM:SYSTEM #8="sb-bsd-sockets/tests">) (#1# . #9=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #8# "tests">) (#6# . #9#) (#5# . #9#) (#6# . #7#) (#5# . #7#) ...) :FORCE NIL) [fast-method]
12: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
13: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) ((#1=#<ASDF/LISP-ACTION:PREPARE-OP > . #2=#<ASDF/SYSTEM:SYSTEM #3="sb-rt">) (#1# . #4=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #3# "rt">) (#5=#<ASDF/LISP-ACTION:LOAD-OP > . #4#) (#6=#<ASDF/LISP-ACTION:COMPILE-OP > . #2#) (#5# . #2#) (#6# . #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets">) (#1# . #7=#<ASDF/SYSTEM:SYSTEM #8="sb-bsd-sockets/tests">) (#1# . #9=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #8# "tests">) (#6# . #9#) (#5# . #9#) (#6# . #7#) (#5# . #7#) ...)) [fast-method]
14: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
15: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {100435EB23}>) [fast-method]
16: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets/tests">) [fast-method]
17: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets/tests">)
18: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
19: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets/tests">) [fast-method]
20: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:TEST-OP ASDF/USER::SB-BSD-SOCKETS/TESTS)
21: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:TEST-OP ASDF/USER::SB-BSD-SOCKETS/TESTS) [fast-method]
23: (ASDF/OPERATE:TEST-SYSTEM ASDF/USER::SB-BSD-SOCKETS/TESTS)
24: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unavailable argument> #<unavailable argument> #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets">)
25: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets">) [fast-method]
26: ((:METHOD ASDF/PLAN:PERFORM-PLAN (LIST)) ((#1=#<ASDF/LISP-ACTION:PREPARE-OP > . #<ASDF/SYSTEM:SYSTEM #2="sb-bsd-sockets">) (#1# . #3=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "defpackage">) (#4=#<ASDF/LISP-ACTION:LOAD-OP > . #3#) (#1# . #5=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "win32-lib">) (#4# . #5#) (#1# . #6=#<ASDF/INTERFACE::SB-GROVEL-CONSTANTS-FILE #2# "win32-constants">) (#4# . #6#) (#1# . #7=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "util">) (#4# . #7#) (#1# . #8=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "protocol">) (#4# . #8#) (#1# . #<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "win32-sockets">) ...) :FORCE NIL) [fast-method]
27: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
28: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) ((#1=#<ASDF/LISP-ACTION:PREPARE-OP > . #<ASDF/SYSTEM:SYSTEM #2="sb-bsd-sockets">) (#1# . #3=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "defpackage">) (#4=#<ASDF/LISP-ACTION:LOAD-OP > . #3#) (#1# . #5=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "win32-lib">) (#4# . #5#) (#1# . #6=#<ASDF/INTERFACE::SB-GROVEL-CONSTANTS-FILE #2# "win32-constants">) (#4# . #6#) (#1# . #7=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "util">) (#4# . #7#) (#1# . #8=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "protocol">) (#4# . #8#) (#1# . #<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "win32-sockets">) ...)) [fast-method]
29: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
30: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1003CF83C3}>) [fast-method]
31: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets">) [fast-method]
32: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets">)
33: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
34: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:TEST-OP > #<ASDF/SYSTEM:SYSTEM "sb-bsd-sockets">) [fast-method]
35: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:TEST-OP "sb-bsd-sockets")
36: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
37: (ASDF/CACHE:CALL-WITH-ASDF-CACHE #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1006345D0B}> :OVERRIDE NIL :KEY NIL)
38: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:TEST-OP "sb-bsd-sockets") [fast-method]
39: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:TEST-OP "sb-bsd-sockets") [fast-method]
40: (ASDF/OPERATE:TEST-SYSTEM "sb-bsd-sockets")
41: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ASDF/INTERFACE::TEST-ASDF-CONTRIB "sb-bsd-sockets") #<NULL-LEXENV>)
42: (EVAL (ASDF/INTERFACE::TEST-ASDF-CONTRIB "sb-bsd-sockets"))
43: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:LOAD . "../asdf-stub.lisp") (:EVAL . "(asdf::test-asdf-contrib \"sb-bsd-sockets\")")))
44: (SB-IMPL::TOPLEVEL-INIT)
45: ((FLET #:WITHOUT-INTERRUPTS-BODY-87 :IN SAVE-LISP-AND-DIE))
46: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))
47: ("foreign function: #x42E1CC")

unhandled condition in --disable-debugger mode, quitting
;
; compilation unit aborted
; caught 4 fatal ERROR conditions
make: *** [test] Error 1

Jan Moringen (scymtym)
Changed in sbcl:
status: New → In Progress
assignee: nobody → Jan Moringen (scymtym)
Jan Moringen (scymtym)
tags: added: sb-bsd-sockets
Revision history for this message
Stas Boukarev (stassats) wrote :

Disabled the tests and added a new ticket, Bug #1388619

Changed in sbcl:
status: In Progress → Fix Committed
assignee: Jan Moringen (scymtym) → nobody
Stas Boukarev (stassats)
Changed in sbcl:
status: Fix Committed → Fix Released
To post a comment you must log in.
This report contains Public information  
Everyone can see this information.

Other bug subscribers

Remote bug watches

Bug watches keep track of this bug in other bug trackers.