mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-12 23:00:22 +02:00
Code Activity

zero newly allocated sockaddrs

Browse source 
* libguile/socket.c (scm_to_sockaddr, scm_fill_sockaddr): Zero the
  sockaddrs, so we do not pass uninitialized memory to the kernel.
This commit is contained in:
Noah Lavine 2011-02-12 21:05:34 -05:00 • committed by Andy Wingo
parent 5a79300f85
commit 333a81ccba
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/socket.c
View file

@ -796,6 +796,7 @@ scm_fill_sockaddr (int fam, SCM address, SCM *args, int which_arg,
port = scm_to_int (SCM_CAR (*args)); port = scm_to_int (SCM_CAR (*args));
*args = SCM_CDR (*args); *args = SCM_CDR (*args);
soka = (struct sockaddr_in *) scm_malloc (sizeof (struct sockaddr_in)); soka = (struct sockaddr_in *) scm_malloc (sizeof (struct sockaddr_in));
memset (soka, '\0', sizeof (struct sockaddr_in));
#ifdef HAVE_STRUCT_SOCKADDR_SIN_LEN #ifdef HAVE_STRUCT_SOCKADDR_SIN_LEN
soka->sin_len = sizeof (struct sockaddr_in); soka->sin_len = sizeof (struct sockaddr_in);
@ -1131,6 +1132,8 @@ scm_to_sockaddr (SCM address, size_t *address_size)
{ {
struct sockaddr_in c_inet; struct sockaddr_in c_inet;
memset (&c_inet, '\0', sizeof (struct sockaddr_in));
c_inet.sin_addr.s_addr = c_inet.sin_addr.s_addr =
htonl (scm_to_ulong (SCM_SIMPLE_VECTOR_REF (address, 1))); htonl (scm_to_ulong (SCM_SIMPLE_VECTOR_REF (address, 1)));
c_inet.sin_port = c_inet.sin_port =