Merge branch 'sverker/valgrind-fixing'

* sverker/valgrind-fixing:
  erts: valgrind suppressions for prebuilt terms in os_info_init
  Fix dlopen-leak of drivers with incorrect version
  erts: Add valgrind suppression files
  erts: Remove valgrind limit for erts_alloc_permanent_cache_aligned
  erts: Fix write-after-free bug in inet driver
  ETS: Fix faulty size calculation SIZEOF_EXTSEG
  ETS: Fix valgrind PossiblyLost in ETS hash tables

7 files changed, 634 insertions, 43 deletions

diff --git a/erts/emulator/beam/erl_alloc.c b/erts/emulator/beam/erl_alloc.c
index 33d6cf5f2f..140a84d5fc 100644
--- a/erts/emulator/beam/erl_alloc.c
+++ b/erts/emulator/beam/erl_alloc.c
@@ -2758,16 +2758,18 @@ erts_allocator_options(void *proc)
 
 void *erts_alloc_permanent_cache_aligned(ErtsAlcType_t type, Uint size)
 {
-    UWord v = (UWord) erts_alloc(type, size + (ERTS_CACHE_LINE_SIZE-1));
+    UWord v = (UWord) erts_alloc(type, size + (ERTS_CACHE_LINE_SIZE-1)
+#ifdef VALGRIND
+				  + sizeof(UWord)
+#endif
+				 );
 
 #ifdef VALGRIND
-    {   /* Avoid Leak_PossiblyLost */
-	static UWord vg_root_set[10];
-	static unsigned ix = 0;
-	if (ix >= sizeof(vg_root_set) / sizeof(*vg_root_set)) {
-	    erl_exit(ERTS_ABORT_EXIT, "Too many erts_alloc_permanent_cache_aligned's\n");
-	}
-	vg_root_set[ix++] = v;  /* not thread safe */
+    {   /* Link them to avoid Leak_PossiblyLost */
+	static UWord* first_in_list = NULL;
+        *(UWord**)v = first_in_list;
+	first_in_list = (UWord*) v;
+	v += sizeof(UWord);
     }
 #endif
 
diff --git a/erts/emulator/beam/erl_bif_ddll.c b/erts/emulator/beam/erl_bif_ddll.c
index a9fd28c66b..b2d5722e9b 100644
--- a/erts/emulator/beam/erl_bif_ddll.c
+++ b/erts/emulator/beam/erl_bif_ddll.c
@@ -1569,14 +1569,14 @@ static int do_load_driver_entry(DE_Handle *dh, char *path, char *name)
     
     if ((res = erts_sys_ddll_load_driver_init(dh->handle, 
 					      &init_handle)) != ERL_DE_NO_ERROR) {
-	erts_sys_ddll_close(dh->handle);
-	return ERL_DE_LOAD_ERROR_NO_INIT;
+	res = ERL_DE_LOAD_ERROR_NO_INIT;
+	goto error;
     }
     
     dp = erts_sys_ddll_call_init(init_handle);
     if (dp == NULL) {
-	erts_sys_ddll_close(dh->handle);
-	return ERL_DE_LOAD_ERROR_FAILED_INIT;
+	res = ERL_DE_LOAD_ERROR_FAILED_INIT;
+	goto error;
     }
 
     switch (dp->extended_marker) {
@@ -1594,24 +1594,27 @@ static int do_load_driver_entry(DE_Handle *dh, char *path, char *name)
 	    || dp->handle2 != NULL
 	    || dp->process_exit != NULL) {
 	    /* Old driver; needs to be recompiled... */
-	    return ERL_DE_LOAD_ERROR_INCORRECT_VERSION;
+	    res = ERL_DE_LOAD_ERROR_INCORRECT_VERSION;
+	    goto error;
 	}
 	break;
     case ERL_DRV_EXTENDED_MARKER:
 	if (ERL_DRV_EXTENDED_MAJOR_VERSION != dp->major_version
 	    || ERL_DRV_EXTENDED_MINOR_VERSION < dp->minor_version) {
 	    /* Incompatible driver version */
-	    return ERL_DE_LOAD_ERROR_INCORRECT_VERSION;
+	    res = ERL_DE_LOAD_ERROR_INCORRECT_VERSION;
+	    goto error;
 	}
 	break;
     default:
 	/* Old driver; needs to be recompiled... */
-	return ERL_DE_LOAD_ERROR_INCORRECT_VERSION;
+	res = ERL_DE_LOAD_ERROR_INCORRECT_VERSION;
+	goto error;
     }
 
     if (strcmp(name, dp->driver_name) != 0) {
-	erts_sys_ddll_close(dh->handle);
-	return ERL_DE_LOAD_ERROR_BAD_NAME;
+	res = ERL_DE_LOAD_ERROR_BAD_NAME;
+	goto error;
     }
     erts_smp_atomic_init_nob(&(dh->refc), (erts_aint_t) 0);
     dh->port_count = 0;
@@ -1626,11 +1629,14 @@ static int do_load_driver_entry(DE_Handle *dh, char *path, char *name)
 	 */
 	erts_free(ERTS_ALC_T_DDLL_HANDLE, dh->full_path);
 	dh->full_path = NULL;
-	erts_sys_ddll_close(dh->handle);
-	return ERL_DE_LOAD_ERROR_FAILED_INIT;
+	res = ERL_DE_LOAD_ERROR_FAILED_INIT;
+	goto error;
     }
-
     return ERL_DE_NO_ERROR;
+
+error:
+    erts_sys_ddll_close(dh->handle);
+    return res;
 }
 
 static int do_unload_driver_entry(DE_Handle *dh, Eterm *save_name)
diff --git a/erts/emulator/beam/erl_db_hash.c b/erts/emulator/beam/erl_db_hash.c
index e3380a57b2..038a667b06 100644
--- a/erts/emulator/beam/erl_db_hash.c
+++ b/erts/emulator/beam/erl_db_hash.c
@@ -312,15 +312,24 @@ struct ext_segment {
     struct segment* segtab[1];     /* The segment table */
 };
 #define SIZEOF_EXTSEG(NSEGS) \
-    (sizeof(struct ext_segment) - sizeof(struct segment*) + sizeof(struct segment*)*(NSEGS))
+    (offsetof(struct ext_segment,segtab) + sizeof(struct segment*)*(NSEGS))
 
-#ifdef DEBUG
-#  include <stddef.h> /* offsetof */
+#if defined(DEBUG) || defined(VALGRIND)
 #  define EXTSEG(SEGTAB_PTR) \
     ((struct ext_segment*) (((char*)(SEGTAB_PTR)) - offsetof(struct ext_segment,segtab)))
 #endif
 
 
+static ERTS_INLINE void SET_SEGTAB(DbTableHash* tb,
+				   struct segment** segtab)
+{
+    erts_smp_atomic_set_wb(&tb->segtab, (erts_aint_t) segtab);
+#ifdef VALGRIND
+    tb->top_ptr_to_segment_with_active_segtab = EXTSEG(segtab);
+#endif
+}
+
+
 /* How the table segments relate to each other:
 
     ext_segment:                      ext_segment:              "plain" segment
@@ -649,7 +658,8 @@ int db_create_hash(Process *p, DbTable *tbl)
     erts_smp_atomic_init_nob(&tb->szm, SEGSZ_MASK);
     erts_smp_atomic_init_nob(&tb->nactive, SEGSZ);
     erts_smp_atomic_init_nob(&tb->fixdel, (erts_aint_t)NULL);
-    erts_smp_atomic_init_nob(&tb->segtab, (erts_aint_t) alloc_ext_seg(tb,0,NULL)->segtab);
+    erts_smp_atomic_init_nob(&tb->segtab, (erts_aint_t)NULL);
+    SET_SEGTAB(tb, alloc_ext_seg(tb,0,NULL)->segtab);
     tb->nsegs = NSEG_1;
     tb->nslots = SEGSZ;
 
@@ -2357,7 +2367,7 @@ static int alloc_seg(DbTableHash *tb)
 	    struct ext_segment* eseg;
 	    eseg = (struct ext_segment*) SEGTAB(tb)[seg_ix-1];
 	    MY_ASSERT(eseg!=NULL && eseg->s.is_ext_segment);
-	    erts_smp_atomic_set_wb(&tb->segtab, (erts_aint_t) eseg->segtab);
+	    SET_SEGTAB(tb, eseg->segtab);	    
 	    tb->nsegs = eseg->nsegs;
 	}
 	ASSERT(seg_ix < tb->nsegs);
@@ -2429,7 +2439,7 @@ static int free_seg(DbTableHash *tb, int free_records)
 	    MY_ASSERT(newtop->s.is_ext_segment);
 	    if (newtop->prev_segtab != NULL) {
 		/* Time to use a smaller segtab */
-		erts_smp_atomic_set_wb(&tb->segtab, (erts_aint_t)newtop->prev_segtab);
+		SET_SEGTAB(tb, newtop->prev_segtab);
 		tb->nsegs = seg_ix;
 		ASSERT(tb->nsegs == EXTSEG(SEGTAB(tb))->nsegs);
 	    }
@@ -2446,7 +2456,7 @@ static int free_seg(DbTableHash *tb, int free_records)
     if (seg_ix > 0) {
 	if (seg_ix < tb->nsegs) SEGTAB(tb)[seg_ix] = NULL;
     } else {
-	erts_smp_atomic_set_wb(&tb->segtab, (erts_aint_t)NULL);
+	SET_SEGTAB(tb, NULL);
     }
 #endif
     tb->nslots -= SEGSZ;
diff --git a/erts/emulator/beam/erl_db_hash.h b/erts/emulator/beam/erl_db_hash.h
index e0285fa5ed..23ac493118 100644
--- a/erts/emulator/beam/erl_db_hash.h
+++ b/erts/emulator/beam/erl_db_hash.h
@@ -58,6 +58,9 @@ typedef struct db_table_hash {
 #ifdef ERTS_SMP
     DbTableHashFineLocks* locks;
 #endif
+#ifdef VALGRIND
+    struct ext_segment* top_ptr_to_segment_with_active_segtab;
+#endif
 } DbTableHash;
 
 
diff --git a/erts/emulator/drivers/common/inet_drv.c b/erts/emulator/drivers/common/inet_drv.c
index 426917bd2c..c803e6b51e 100644
--- a/erts/emulator/drivers/common/inet_drv.c
+++ b/erts/emulator/drivers/common/inet_drv.c
@@ -8497,32 +8497,29 @@ static int tcp_deliver(tcp_descriptor* desc, int len)
     }
 
     while (len > 0) {
-	int code = 0;
+	int code;
 
 	inet_input_count(INETP(desc), len);
 
 	/* deliver binary? */
 	if (len*4 >= desc->i_buf->orig_size*3) { /* >=75% */
+	    code = tcp_reply_binary_data(desc, desc->i_buf,
+					 (desc->i_ptr_start -
+					  desc->i_buf->orig_bytes),
+					 len);
+	    if (code < 0)
+		return code;
+
 	    /* something after? */
 	    if (desc->i_ptr_start + len == desc->i_ptr) { /* no */
-		code = tcp_reply_binary_data(desc, desc->i_buf,
-					     (desc->i_ptr_start -
-					      desc->i_buf->orig_bytes),
-					     len);
 		tcp_clear_input(desc);
 	    }
 	    else { /* move trail to beginning of a new buffer */
-		ErlDrvBinary* bin;
+		ErlDrvBinary* bin = alloc_buffer(desc->i_bufsz);
 		char* ptr_end = desc->i_ptr_start + len;
 		int sz = desc->i_ptr - ptr_end;
 
-		bin = alloc_buffer(desc->i_bufsz);
 		memcpy(bin->orig_bytes, ptr_end, sz);
-
-		code = tcp_reply_binary_data(desc, desc->i_buf,
-					     (desc->i_ptr_start-
-					      desc->i_buf->orig_bytes),
-					     len);
 		free_buffer(desc->i_buf);
 		desc->i_buf = bin;
 		desc->i_ptr_start = desc->i_buf->orig_bytes;
@@ -8534,17 +8531,15 @@ static int tcp_deliver(tcp_descriptor* desc, int len)
 	    code = tcp_reply_data(desc, desc->i_ptr_start, len);
 	    /* XXX The buffer gets thrown away on error  (code < 0)    */
 	    /* Windows needs workaround for this in tcp_inet_event...  */
+	    if (code < 0)
+		return code;
 	    desc->i_ptr_start += len;
 	    if (desc->i_ptr_start == desc->i_ptr)
 		tcp_clear_input(desc);
 	    else
 		desc->i_remain = 0;
-
 	}
 
-	if (code < 0)
-	    return code;
-
 	count++;
 	len = 0;
 
diff --git a/erts/emulator/valgrind/suppress.patched.3.6.0 b/erts/emulator/valgrind/suppress.patched.3.6.0
new file mode 100644
index 0000000000..2647949672
--- /dev/null
+++ b/erts/emulator/valgrind/suppress.patched.3.6.0
@@ -0,0 +1,307 @@
+# Valgrind suppression file updated to support the patched
+# Valgrind used in daily builds on ahmed.
+
+{
+   libc internal error
+   Memcheck:Addr8
+   obj:/lib64/ld-2.3.5.so
+}
+{
+   libc internal error
+   Memcheck:Addr8
+   fun:_dl_start
+}
+{
+   libc internal error
+   Memcheck:Addr8
+   fun:__libc_start_main
+   obj:*
+}
+{
+   libc internal error
+   Memcheck:Addr4
+   fun:__sigjmp_save
+   fun:__libc_start_main
+   obj:*
+}
+{
+   libc internal error
+   Memcheck:Addr8
+   fun:__sigsetjmp
+   fun:__libc_start_main
+   obj:*
+}
+{
+   Intentional error in testcase
+   Memcheck:Param
+   pipe(filedes)
+   fun:pipe
+   fun:chkio_drv_timeout
+}
+{
+   Intentional error in testcase
+   Memcheck:Param
+   pipe(filedes)
+   fun:pipe
+   fun:io_ready_exit_drv_control
+   fun:erts_port_control
+   fun:port_control_3
+   fun:process_main
+}
+{
+   Leak in libc putenv
+   Memcheck:Leak
+   fun:malloc
+   fun:realloc
+   fun:__add_to_environ
+   fun:putenv
+   fun:erts_sys_putenv
+   fun:os_putenv_2
+   fun:process_main
+}
+{
+Leak in libc putenv
+Memcheck:Leak
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:erts_sys_putenv
+fun:os_putenv_2
+fun:process_main
+}
+{
+   erronous warning
+   Memcheck:Leak
+   fun:malloc
+   fun:erts_sys_alloc
+   ...
+   fun:fix_core_alloc
+   fun:erts_init_fix_alloc
+   fun:erts_alloc_init
+   fun:early_init
+   fun:erl_start
+}
+{
+   pthread internal error
+   Memcheck:Param
+   futex(utime)
+   fun:__lll_mutex_unlock_wake
+}
+{
+   libc internal error
+   Memcheck:Param
+   socketcall.sendto(msg)
+   ...
+   fun:getifaddrs
+}
+{
+inet_drv; pointer inside allocated block
+Memcheck:Leak
+PossiblyLost
+fun:realloc
+fun:erts_sys_realloc
+...
+fun:erts_realloc_fnf
+fun:erts_bin_realloc_fnf
+fun:driver_realloc_binary
+}
+{
+inet_drv; pointer inside allocated block
+Memcheck:Leak
+PossiblyLost
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc_fnf
+fun:erts_bin_drv_alloc_fnf
+fun:driver_alloc_binary
+}
+{
+pthread leak or erroneous valgrind warning
+Memcheck:Leak
+fun:calloc
+fun:allocate_dtv
+fun:_dl_allocate_tls
+fun:pthread_create@@GLIBC_2.2.5
+}
+{
+pthread leak or erroneous valgrind warning
+Memcheck:Leak
+fun:calloc
+fun:_dl_allocate_tls
+fun:pthread_create@@GLIBC_2.2.5
+}
+{
+zlib; ok according to zlib developers
+Memcheck:Cond
+fun:longest_match
+fun:deflate_slow
+fun:deflate
+}
+{
+zlib; ok according to zlib developers
+Memcheck:Cond
+fun:longest_match
+fun:deflate_fast
+fun:deflate
+}
+{
+zlib; ok accordnig to zlib (this one popped up with valgrind-3.6.0)
+Memcheck:Cond
+fun:deflate_slow
+fun:deflate
+fun:zlib_deflate
+fun:zlib_ctl
+}
+{
+No leak; pointer into block
+Memcheck:Leak
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:erts_init_scheduling
+fun:erl_init
+fun:erl_start
+fun:main
+}
+{
+No leak; pointer into block
+Memcheck:Leak
+PossiblyLost
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:init_db
+fun:erl_init
+fun:erl_start
+fun:main
+}
+{
+No leak; sometimes pointer into block
+Memcheck:Leak
+PossiblyLost
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc_fnf
+fun:driver_alloc
+fun:get_bufstk
+fun:alloc_buffer
+}
+{
+   Crypto internal...
+Memcheck:Cond
+obj:*/crypto.valgrind.*
+}
+{
+   Crypto internal...
+Memcheck:Cond
+obj:*/libcrypto.*
+}
+{
+   Crypto internal...
+Memcheck:Cond
+obj:*/openssl.*
+}
+{
+   Crypto internal...
+Memcheck:Cond
+obj:*/ssleay.*
+}
+{
+   Crypto internal...
+Memcheck:Value8
+obj:*/crypto.valgrind.*
+}
+{
+   Crypto internal...
+Memcheck:Value8
+obj:*/libcrypto.*
+}
+{
+   Crypto internal...
+Memcheck:Value8
+obj:*/openssl.*
+}
+{
+   Crypto internal...
+Memcheck:Value8
+obj:*/ssleay.*
+}
+{
+   Crypto internal...
+   Memcheck:Cond
+   fun:memset
+   fun:BN_lshift
+   fun:BN_div
+   fun:BN_MONT_CTX_set
+   fun:BN_is_prime_fasttest_ex
+   fun:BN_generate_prime_ex
+   fun:DH_generate_parameters_ex
+   fun:DH_generate_parameters
+   fun:dh_generate_parameters_nif
+   fun:process_main
+   fun:sched_thread_func
+   fun:thr_wrapper
+}
+{
+   Crypto internal...
+   Memcheck:Cond
+   fun:memset
+   fun:BN_lshift
+   fun:BN_div
+   fun:BN_nnmod
+   fun:BN_mod_inverse
+   fun:BN_MONT_CTX_set
+   fun:BN_is_prime_fasttest_ex
+   fun:BN_generate_prime_ex
+   fun:DH_generate_parameters_ex
+   fun:DH_generate_parameters
+   fun:dh_generate_parameters_nif
+   fun:process_main
+}
+{
+   Crypto internal...
+   Memcheck:Value8
+   fun:BN_mod_exp_mont_consttime
+   fun:generate_key
+   fun:dh_generate_key_nif
+   fun:process_main
+   fun:sched_thread_func
+   fun:thr_wrapper
+   fun:start_thread
+   fun:clone
+}
+
+{
+erts_bits_init_state; Why is this needed?
+Memcheck:Leak
+PossiblyLost
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:erts_bits_init_state
+fun:erts_init_scheduling
+fun:erl_init
+fun:erl_start
+fun:main
+}
+
+{
+Prebuilt constant terms in os_info_init
+Memcheck:Leak
+PossiblyLost
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:os_info_init
+fun:erts_bif_info_init
+fun:erl_init
+fun:erl_start
+fun:main
+}
diff --git a/erts/emulator/valgrind/suppress.standard b/erts/emulator/valgrind/suppress.standard
new file mode 100644
index 0000000000..d759038c97
--- /dev/null
+++ b/erts/emulator/valgrind/suppress.standard
@@ -0,0 +1,268 @@
+{
+   libc internal error
+   Memcheck:Addr8
+   obj:/lib64/ld-2.3.5.so
+}
+{
+   libc internal error
+   Memcheck:Addr8
+   fun:_dl_start
+}
+{
+   libc internal error
+   Memcheck:Addr8
+   fun:__libc_start_main
+   obj:*
+}
+{
+   libc internal error
+   Memcheck:Addr4
+   fun:__sigjmp_save
+   fun:__libc_start_main
+   obj:*
+}
+{
+   libc internal error
+   Memcheck:Addr8
+   fun:__sigsetjmp
+   fun:__libc_start_main
+   obj:*
+}
+{
+   Intentional error in testcase
+   Memcheck:Param
+   pipe(filedes)
+   fun:pipe
+   fun:chkio_drv_timeout
+}
+{
+   Intentional error in testcase
+   Memcheck:Param
+   pipe(filedes)
+   fun:pipe
+   fun:io_ready_exit_drv_control
+   fun:erts_port_control
+   fun:port_control_3
+   fun:process_main
+}
+{
+   Leak in libc putenv
+   Memcheck:Leak
+   fun:malloc
+   fun:realloc
+   fun:__add_to_environ
+   fun:putenv
+   fun:erts_sys_putenv
+   fun:os_putenv_2
+   fun:process_main
+}
+{
+Leak in libc putenv
+Memcheck:Leak
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:erts_sys_putenv
+fun:os_putenv_2
+fun:process_main
+}
+{
+   erronous warning
+   Memcheck:Leak
+   fun:malloc
+   fun:erts_sys_alloc
+   fun:fix_core_alloc
+   fun:erts_init_fix_alloc
+   fun:erts_alloc_init
+   fun:early_init
+   fun:erl_start
+}
+{
+   pthread internal error
+   Memcheck:Param
+   futex(utime)
+   fun:__lll_mutex_unlock_wake
+}
+{
+   libc internal error
+   Memcheck:Param
+   socketcall.sendto(msg)
+   ...
+   fun:getifaddrs
+}
+{
+inet_drv; pointer inside allocated block
+Memcheck:Leak
+fun:realloc
+fun:erts_sys_realloc
+...
+fun:erts_realloc_fnf
+fun:erts_bin_realloc_fnf
+fun:driver_realloc_binary
+}
+{
+inet_drv; pointer inside allocated block
+Memcheck:Leak
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc_fnf
+fun:erts_bin_drv_alloc_fnf
+fun:driver_alloc_binary
+}
+{
+pthread leak or erroneous valgrind warning
+Memcheck:Leak
+fun:calloc
+fun:allocate_dtv
+fun:_dl_allocate_tls
+fun:pthread_create@@GLIBC_2.2.5
+}
+{
+zlib; ok according to zlib developers
+Memcheck:Cond
+fun:longest_match
+fun:deflate_slow
+fun:deflate
+}
+{
+zlib; ok according to zlib developers
+Memcheck:Cond
+fun:longest_match
+fun:deflate_fast
+fun:deflate
+}
+{
+No leak; pointer into block
+Memcheck:Leak
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:erts_init_scheduling
+fun:erl_init
+fun:erl_start
+fun:main
+}
+{
+No leak; pointer into block
+Memcheck:Leak
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:init_db
+fun:erl_init
+fun:erl_start
+fun:main
+}
+{
+No leak; sometimes pointer into block
+Memcheck:Leak
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc_fnf
+fun:driver_alloc
+fun:get_bufstk
+fun:alloc_buffer
+}
+{
+   Crypto internal...
+Memcheck:Cond
+obj:*/crypto.valgrind.*
+}
+{
+   Crypto internal...
+Memcheck:Cond
+obj:*/libcrypto.*
+}
+{
+   Crypto internal...
+Memcheck:Cond
+obj:*/openssl.*
+}
+{
+   Crypto internal...
+Memcheck:Cond
+obj:*/ssleay.*
+}
+{
+   Crypto internal...
+Memcheck:Value8
+obj:*/crypto.valgrind.*
+}
+{
+   Crypto internal...
+Memcheck:Value8
+obj:*/libcrypto.*
+}
+{
+   Crypto internal...
+Memcheck:Value8
+obj:*/openssl.*
+}
+{
+   Crypto internal...
+Memcheck:Value8
+obj:*/ssleay.*
+}
+{
+   Crypto internal...
+   Memcheck:Cond
+   fun:memset
+   fun:BN_lshift
+   fun:BN_div
+   fun:BN_MONT_CTX_set
+   fun:BN_is_prime_fasttest_ex
+   fun:BN_generate_prime_ex
+   fun:DH_generate_parameters_ex
+   fun:DH_generate_parameters
+   fun:dh_generate_parameters_nif
+   fun:process_main
+   fun:sched_thread_func
+   fun:thr_wrapper
+}
+{
+   Crypto internal...
+   Memcheck:Cond
+   fun:memset
+   fun:BN_lshift
+   fun:BN_div
+   fun:BN_nnmod
+   fun:BN_mod_inverse
+   fun:BN_MONT_CTX_set
+   fun:BN_is_prime_fasttest_ex
+   fun:BN_generate_prime_ex
+   fun:DH_generate_parameters_ex
+   fun:DH_generate_parameters
+   fun:dh_generate_parameters_nif
+   fun:process_main
+}
+{
+   Crypto internal...
+   Memcheck:Value8
+   fun:BN_mod_exp_mont_consttime
+   fun:generate_key
+   fun:dh_generate_key_nif
+   fun:process_main
+   fun:sched_thread_func
+   fun:thr_wrapper
+   fun:start_thread
+   fun:clone
+}
+
+{
+Prebuilt constant terms in os_info_init (PossiblyLost)
+Memcheck:Leak
+fun:malloc
+fun:erts_sys_alloc
+...
+fun:erts_alloc
+fun:os_info_init
+fun:erts_bif_info_init
+fun:erl_init
+fun:erl_start
+fun:main
+}