diff options
| author | Bartosz Nitka <niteria@gmail.com> | 2017-09-13 08:28:00 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-09-13 10:40:02 -0400 |
| commit | e62391a75c8dc304f902e732fc63eefb21930aca (patch) | |
| tree | 6800ce6725117eae34d1514b7cf7fbf475cf1186 /rts/RtsFlags.c | |
| parent | 91262e75dd1d80f8f28a3922934ec7e59290e28c (diff) | |
| download | haskell-e62391a75c8dc304f902e732fc63eefb21930aca.tar.gz | |
[RTS] Harden against buffer overflow
This sprintf is safe thanks to the guarantees on the format strings that
we pass to it. Well, almost. The GR_FILENAME_FMT_GUM format would not
have satisfied them if it was still used.
If someone makes a mistake that's a potential privilege escalation,
so I think it's reasonable to switch to snprintf to protect against
that remote possibility.
Test Plan: it builds, CI
Reviewers: simonmar, bgamari, austin, erikd
Reviewed By: bgamari
Subscribers: rwbarton, thomie
Differential Revision: https://phabricator.haskell.org/D3944
Diffstat (limited to 'rts/RtsFlags.c')
| -rw-r--r-- | rts/RtsFlags.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c index 06d59f0550..ec21ef1050 100644 --- a/rts/RtsFlags.c +++ b/rts/RtsFlags.c @@ -1636,7 +1636,8 @@ openStatsFile (char *filename, // filename, or NULL } /* default <program>.<ext> */ char stats_filename[STATS_FILENAME_MAXLEN]; - sprintf(stats_filename, filename_fmt, prog_name); + snprintf(stats_filename, STATS_FILENAME_MAXLEN, filename_fmt, + prog_name); f = fopen(stats_filename,"w"); } if (f == NULL) { |