diff options
| author | Matthias Andree <mandree@FreeBSD.org> | 2016-05-24 21:26:12 +0000 |
|---|---|---|
| committer | Matthias Andree <mandree@FreeBSD.org> | 2016-05-24 21:26:12 +0000 |
| commit | a59f1e5a96e7443958f3f56de0dacaacf86ba5f8 (patch) | |
| tree | f3ad09d7bc5dd43aa924f6c914aa16922966ca5f /databases/db5/files/patch-lang_tcl_tcl__seq.c | |
| parent | Disable SSLv2, to fix new/from-ports OpenSSL builds. (diff) | |
Fix strncat() misuse, and enable TCL option.
PR: 209730
Submitted by: gahr@
Diffstat (limited to 'databases/db5/files/patch-lang_tcl_tcl__seq.c')
| -rw-r--r-- | databases/db5/files/patch-lang_tcl_tcl__seq.c | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/databases/db5/files/patch-lang_tcl_tcl__seq.c b/databases/db5/files/patch-lang_tcl_tcl__seq.c new file mode 100644 index 000000000000..14bb378b718a --- /dev/null +++ b/databases/db5/files/patch-lang_tcl_tcl__seq.c @@ -0,0 +1,16 @@ +--- lang/tcl/tcl_seq.c.orig 2016-05-24 08:18:03 UTC ++++ lang/tcl/tcl_seq.c +@@ -555,9 +555,10 @@ tcl_SeqGetFlags(interp, objc, objv, seq) + for (i = 0; seq_flags[i].flag != 0; i++) + if (LF_ISSET(seq_flags[i].flag)) { + if (strlen(buf) > 0) +- (void)strncat(buf, " ", sizeof(buf)); +- (void)strncat( +- buf, seq_flags[i].arg, sizeof(buf)); ++ (void)strncat(buf, " ", ++ sizeof(buf) - (strlen(buf) + 1)); ++ (void)strncat(buf, seq_flags[i].arg, ++ sizeof(buf) - (strlen(buf) + 1)); + } + + res = NewStringObj(buf, strlen(buf)); |
