Changeset 5014 in project for unix-sockets


Ignore:
Timestamp:
07/12/07 01:54:49 (13 years ago)
Author:
felix winkelmann
Message:

new fp release (tagged)

Location:
unix-sockets
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • unix-sockets/unix-sockets.html

    r1270 r5014  
    4848<h3>Version:</h3>
    4949<ul>
     50<li>1.3
     51Applied bugfix by Shawn Wagner
    5052<li>1.2
    5153Added include for sys/time.h, which is needed on some systems [Thanks to Kon Lovett]
  • unix-sockets/unix-sockets.meta

    r2189 r5014  
    55 (category net)
    66 (needs easyffi)
     7 (platform unix)
    78 (license "BSD")
    8  (author
    9    "<a href=\"mailto:felix@call-with-current-continuation.org\">felix</a>"))
     9 (author "felix winkelmann") )
  • unix-sockets/unix-sockets.scm

    r852 r5014  
    6262{
    6363  int sock;
    64   size_t size;
     64  socklen_t size;
    6565     
    6666  /* Create the socket. */
     
    8787{
    8888  int sock;
     89  socklen_t size;
    8990     
    9091  /* Create the socket. */
     
    9697  strncpy(socket_name.sun_path, filename, sizeof(socket_name.sun_path));
    9798  socket_name.sun_path[sizeof (socket_name.sun_path) - 1] = '\0';
     99  size = SUN_LEN(&socket_name);
    98100
    99101  /* Connect to the server. */
    100   if (connect(sock, (struct sockaddr *) &socket_name, strlen(socket_name.sun_path) + sizeof(socket_name.sun_family)) < 0)
     102  if (connect(sock, (struct sockaddr *) &socket_name, size) < 0)
    101103    return -1;
    102104
     
    108110accept_connection(int sock, char *filename)
    109111{
    110   int s2, size;
    111 
    112   size = sizeof(socket_name);
     112  int s2;
     113  socklen_t size;
     114
    113115  socket_name.sun_family = AF_LOCAL;
    114116  strncpy(socket_name.sun_path, filename, sizeof(socket_name.sun_path));
    115117  socket_name.sun_path[sizeof (socket_name.sun_path) - 1] = '\0';
     118  size = SUN_LEN(&socket_name);
    116119  s2 = accept(sock, (struct sockaddr *)&socket_name, &size);
    117120
  • unix-sockets/unix-sockets.setup

    r1706 r5014  
    44(compile -s -O2 -d1 ,@(if easyffi? '(-extend easyffi) '()) unix-sockets.scm)
    55(install-extension 'unix-sockets '("unix-sockets.so" "unix-sockets.html")
    6                    '((version 1.2) (documentation "unix-sockets.html")))
     6                   '((version 1.3) (documentation "unix-sockets.html")))
Note: See TracChangeset for help on using the changeset viewer.