[bug-serveez] core dump

[Bosnjak Zoran RDVV]

Hello,
this was my very first attempt on defining a server. I have tryed to run it
unfinished. I guess it's beginners luck to get the seg.fault on the first
try. Anyway I am sending you the bug report and the sample program. I hope
it will help you.

best regards,
Zoran Bosnjak

- sample file sink-server.scm
; sink tcp server
; 1.3.2002 1.test - Zoran Bosnjak (address@hidden)
;
; pogoltne vse pakete, ki jih dobi
; uporabno za merjenje hitrosti prenosa na klientu

(define (sink-info-server server)
    "This is sink server")

(define (sink-handle-request sock request len)
    (begin (srv:sock:print sock "bye!") -1))

(define (sink-connect-socket server sock)
    (display "connect socket") (newline)
    (svz:sock:boundary sock "\n")
    (svt:sock:handle-request sock sink-handle-request)
    (srv:sock:print "just got in!")
    -1)

; port configuration
(define-port! 'sink-tcp-port '(
    (proto . tcp) 
    (port . 3001)))

; server conf.
(define-servertype! '(
    (prefix         .   "sink")
    (description    .   "sink tcp server")
    (detect-proto   .   1)
    (global-init    .   0)
    (init           .   0)
    (finalize       .   0)
    (global-finalize .  0)
    (connect-socket .   sink-connect-socket)
    (info-server    .   sink-info-server)
    ))

-- end of sample file

address@hidden zac]$ gdb serveez core
GNU gdb 5.0rh-5 Red Hat Linux 7.1
Copyright 2001 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or distribute copies of it under certain
conditions.
Type "show copying" to see the conditions.
There is absolutely no warranty for GDB.  Type "show warranty" for details.
This GDB was configured as "i386-redhat-linux"...
(no debugging symbols found)...
Core was generated by `serveez'.
Program terminated with signal 11, Segmentation fault.
Reading symbols from /usr/lib/libguile.so.6...(no debugging symbols
found)...
done.
Loaded symbols for /usr/lib/libguile.so.6
Reading symbols from /lib/i686/libm.so.6...done.
Loaded symbols for /lib/i686/libm.so.6
Reading symbols from /usr/local/lib/libserveez-0.1.3.so...done.
Loaded symbols for /usr/local/lib/libserveez-0.1.3.so
Reading symbols from /usr/lib/libz.so.1...done.
Loaded symbols for /usr/lib/libz.so.1
Reading symbols from /usr/lib/libbz2.so.1...done.
Loaded symbols for /usr/lib/libbz2.so.1
Reading symbols from /lib/libdl.so.2...done.
Loaded symbols for /lib/libdl.so.2
Reading symbols from /lib/i686/libc.so.6...done.
Loaded symbols for /lib/i686/libc.so.6
Reading symbols from /lib/ld-linux.so.2...done.
Loaded symbols for /lib/ld-linux.so.2
#0  0x08050c44 in svz_sendfile () at eval.c:41
41      eval.c: No such file or directory.
        in eval.c

(gdb) where
#0  0x08050c44 in svz_sendfile () at eval.c:41
#1  0x00000020 in __strtol_internal (nptr=0x8092e68 "\b", endptr=0x806cc68,
    base=1, group=9588) at eval.c:38
#2  0x080534b7 in svz_sendfile () at eval.c:41
#3  0x40046471 in scm_ceval () at eval.c:41
#4  0x40047e12 in scm_eval_3 () at eval.c:41
#5  0x40047ed9 in scm_eval_x () at eval.c:41
#6  0x4005b9e9 in load () at eval.c:41
#7  0x4003fb67 in scm_internal_dynamic_wind () at eval.c:41
#8  0x4005baf4 in scm_primitive_load () at eval.c:41
#9  0x40085d96 in scm_internal_catch () at eval.c:41
#10 0x0804fd84 in svz_sendfile () at eval.c:41
#11 0x0804c9a9 in svz_sendfile () at eval.c:41
#12 0x0804cc43 in svz_sendfile () at eval.c:41
#13 0x40059379 in invoke_main_func () at eval.c:41
#14 0x40085f0f in scm_internal_lazy_catch () at eval.c:41
#15 0x4005931d in scm_boot_guile_1 () at eval.c:41
#16 0x4005908c in scm_boot_guile () at eval.c:41
#17 0x0804cc28 in svz_sendfile () at eval.c:41
#18 0x40172177 in __libc_start_main (main=0x804caec <svz_sendfile+636>,
        argc=1, ubp_av=0xbffffaf4, init=0x804b868 <_init>, fini=0x806b810
<_fini>,
            rtld_fini=0x4000e184 <_dl_fini>, stack_end=0xbffffaec)
    at ../sysdeps/generic/libc-start.c:129

-- dir listing ---
skupno 548
-rw-rw-r--    1 bosnjak  bosnjak      2658 mar  1 14:53 bug
-rw-------    1 bosnjak  bosnjak    978944 mar  1 14:50 core
-rw-r--r--    1 bosnjak  bosnjak      4083 feb 27 16:31 echo-server.scm
lrwxrwxrwx    1 bosnjak  bosnjak        15 feb 28 14:45 serveez.cfg ->
sink-server.scm
-rw-r--r--    1 bosnjak  bosnjak      3566 feb 27 16:32 serveez.scm
-rw-rw-r--    1 bosnjak  bosnjak       971 mar  1 14:50 sink-server.scm

-- cmd
$ serveez

-- uname -a
Linux nanos 2.4.16 #2 SMP pet jan 18 12:37:45 CET 2002 i686 unknown

-- /etc/redhat-release
Red Hat Linux release 7.1 (Seawolf)

-- /proc/cpuinfo
processor       : 0
vendor_id       : GenuineIntel
cpu family      : 6
model           : 8
model name      : Pentium III (Coppermine)
stepping        : 10
cpu MHz         : 930.341
cache size      : 256 KB
fdiv_bug        : no
hlt_bug         : no
f00f_bug        : no
coma_bug        : no
fpu             : yes
fpu_exception   : yes
cpuid level     : 2
wp              : yes
flags           : fpu vme de pse tsc msr pae mce cx8 apic sep mtrr pge mca
cmov pat pse36 mmx fxsr sse
bogomips        : 1854.66

-- guile --version
Guile 1.3.4
Copyright (c) 1995, 1996, 1997 Free Software Foundation
Guile may be distributed under the terms of the GNU General Public Licence;
certain other uses are permitted as well.  For details, see the file
`COPYING', which is included in the Guile distribution.
There is no warranty, to the extent permitted by law.

-- serveez --version
serveez 0.1.3