summaryrefslogtreecommitdiff
path: root/libguile
diff options
context:
space:
mode:
authorMichael Gran <spk121@yahoo.com>2020-12-30 15:16:02 -0800
committerMichael Gran <spk121@yahoo.com>2021-01-21 19:35:15 -0800
commit75b0db1a286f936a90683973efc2315a07c03b21 (patch)
treee32dc7eb885345533047bd0e5661de5ccaa0563b /libguile
parent91d4d311846b640efdd5705eb0c36217e373c01a (diff)
downloadguile-75b0db1a286f936a90683973efc2315a07c03b21.tar.gz
getsockopt may return garbage for parameters < sizeof(int)
Uninitialized variable. * libguile/socket.c (scm_getsockopt): zeroize arguments before use
Diffstat (limited to 'libguile')
-rw-r--r--libguile/socket.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/socket.c b/libguile/socket.c
index 64354f1f1..8af6f57bf 100644
--- a/libguile/socket.c
+++ b/libguile/socket.c
@@ -1,4 +1,4 @@
-/* Copyright 1996-1998,2000-2007,2009,2011-2015,2018
+/* Copyright 1996-1998,2000-2007,2009,2011-2015,2018,2021
Free Software Foundation, Inc.
This file is part of Guile.
@@ -493,6 +493,7 @@ SCM_DEFINE (scm_getsockopt, "getsockopt", 3, 0, 0,
int ilevel;
int ioptname;
+ memset (&optval, 0, optlen);
sock = SCM_COERCE_OUTPORT (sock);
SCM_VALIDATE_OPFPORT (1, sock);
ilevel = scm_to_int (level);