Macintosh-Tools/Retro68
1
0
Fork 0
mirror of https://github.com/autc04/Retro68.git synced 2024-11-27 14:50:23 +00:00
Code Issues Projects Releases Wiki Activity
aaf905ce07
Retro68/gcc/libmudflap/mf-hooks2.c
Wolfgang Thaller aaf905ce07 add gcc 4.70
2012-03-28 01:13:14 +02:00

2199 lines
54 KiB
C
Raw Blame History

/* Mudflap: narrow-pointer bounds-checking by tree rewriting.
Copyright (C) 2002, 2003, 2004, 2009, 2011 Free Software Foundation, Inc.
Contributed by Frank Ch. Eigler <fche@redhat.com>
and Graydon Hoare <graydon@redhat.com>
This file is part of GCC.
GCC is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 3, or (at your option) any later
version.
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
Under Section 7 of GPL version 3, you are granted additional
permissions described in the GCC Runtime Library Exception, version
3.1, as published by the Free Software Foundation.
You should have received a copy of the GNU General Public License and
a copy of the GCC Runtime Library Exception along with this program;
see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
<http://www.gnu.org/licenses/>. */
#include "config.h"
#ifndef HAVE_SOCKLEN_T
#define socklen_t int
#endif
/* These attempt to coax various unix flavours to declare all our
needed tidbits in the system headers. */
#if !defined(__FreeBSD__) && !defined(__APPLE__)
#define _POSIX_SOURCE
#endif /* Some BSDs break <sys/socket.h> if this is defined. */
#define _GNU_SOURCE
#define _XOPEN_SOURCE
#define _BSD_TYPES
#define __EXTENSIONS__
#define _ALL_SOURCE
#define _LARGE_FILE_API
#define _LARGEFILE64_SOURCE
#define _XOPEN_SOURCE_EXTENDED 1
#include <string.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/stat.h>
#include <sys/time.h>
#include <sys/types.h>
#include <unistd.h>
#include <assert.h>
#include <errno.h>
#include <limits.h>
#include <time.h>
#include <ctype.h>
#ifdef HAVE_DLFCN_H
#include <dlfcn.h>
#endif
#ifdef HAVE_DIRENT_H
#include <dirent.h>
#endif
#ifdef HAVE_SYS_SOCKET_H
#include <sys/socket.h>
#endif
#ifdef HAVE_NETDB_H
#include <netdb.h>
#endif
#ifdef HAVE_SYS_WAIT_H
#include <sys/wait.h>
#endif
#ifdef HAVE_SYS_IPC_H
#include <sys/ipc.h>
#endif
#ifdef HAVE_SYS_SEM_H
#include <sys/sem.h>
#endif
#ifdef HAVE_SYS_SHM_H
#include <sys/shm.h>
#endif
#ifdef HAVE_PWD_H
#include <pwd.h>
#endif
#ifdef HAVE_GRP_H
#include <grp.h>
#endif
#ifdef HAVE_MNTENT_H
#include <mntent.h>
#endif
#ifdef HAVE_SYS_MNTTAB_H
#include <sys/mnttab.h>
#endif
#ifdef HAVE_SYS_SOCKET_H
#include <sys/socket.h>
#endif
#ifdef HAVE_NETINET_IN_H
#include <netinet/in.h>
#endif
#ifdef HAVE_ARPA_INET_H
#include <arpa/inet.h>
#endif
#include "mf-runtime.h"
#include "mf-impl.h"
#ifdef _MUDFLAP
#error "Do not compile this file with -fmudflap!"
#endif
/* A bunch of independent stdlib/unistd hook functions, all
intercepted by mf-runtime.h macros. */
#ifndef HAVE_STRNLEN
static inline size_t (strnlen) (const char* str, size_t n)
{
const char *s;
for (s = str; n && *s; ++s, --n)
;
return (s - str);
}
#endif
/* str*,mem*,b* */
WRAPPER2(void *, memcpy, void *dest, const void *src, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(src, n, __MF_CHECK_READ, "memcpy source");
MF_VALIDATE_EXTENT(dest, n, __MF_CHECK_WRITE, "memcpy dest");
return memcpy (dest, src, n);
}
WRAPPER2(void *, memmove, void *dest, const void *src, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(src, n, __MF_CHECK_READ, "memmove src");
MF_VALIDATE_EXTENT(dest, n, __MF_CHECK_WRITE, "memmove dest");
return memmove (dest, src, n);
}
WRAPPER2(void *, memset, void *s, int c, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, n, __MF_CHECK_WRITE, "memset dest");
return memset (s, c, n);
}
WRAPPER2(int, memcmp, const void *s1, const void *s2, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s1, n, __MF_CHECK_READ, "memcmp 1st arg");
MF_VALIDATE_EXTENT(s2, n, __MF_CHECK_READ, "memcmp 2nd arg");
return memcmp (s1, s2, n);
}
WRAPPER2(void *, memchr, const void *s, int c, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, n, __MF_CHECK_READ, "memchr region");
return memchr (s, c, n);
}
#ifdef HAVE_MEMRCHR
WRAPPER2(void *, memrchr, const void *s, int c, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, n, __MF_CHECK_READ, "memrchr region");
return memrchr (s, c, n);
}
#endif
WRAPPER2(char *, strcpy, char *dest, const char *src)
{
/* nb: just because strlen(src) == n doesn't mean (src + n) or (src + n +
1) are valid pointers. the allocated object might have size < n.
check anyways. */
size_t n = strlen (src);
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(src, CLAMPADD(n, 1), __MF_CHECK_READ, "strcpy src");
MF_VALIDATE_EXTENT(dest, CLAMPADD(n, 1), __MF_CHECK_WRITE, "strcpy dest");
return strcpy (dest, src);
}
#ifdef HAVE_STRNCPY
WRAPPER2(char *, strncpy, char *dest, const char *src, size_t n)
{
size_t len = strnlen (src, n);
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(src, len, __MF_CHECK_READ, "strncpy src");
MF_VALIDATE_EXTENT(dest, len, __MF_CHECK_WRITE, "strncpy dest"); /* nb: strNcpy */
return strncpy (dest, src, n);
}
#endif
WRAPPER2(char *, strcat, char *dest, const char *src)
{
size_t dest_sz;
size_t src_sz;
TRACE ("%s\n", __PRETTY_FUNCTION__);
dest_sz = strlen (dest);
src_sz = strlen (src);
MF_VALIDATE_EXTENT(src, CLAMPADD(src_sz, 1), __MF_CHECK_READ, "strcat src");
MF_VALIDATE_EXTENT(dest, CLAMPADD(dest_sz, CLAMPADD(src_sz, 1)),
__MF_CHECK_WRITE, "strcat dest");
return strcat (dest, src);
}
WRAPPER2(char *, strncat, char *dest, const char *src, size_t n)
{
/* nb: validating the extents (s,n) might be a mistake for two reasons.
(1) the string s might be shorter than n chars, and n is just a
poor choice by the programmer. this is not a "true" error in the
sense that the call to strncat would still be ok.
(2) we could try to compensate for case (1) by calling strlen(s) and
using that as a bound for the extent to verify, but strlen might fall off
the end of a non-terminated string, leading to a false positive.
so we will call strnlen(s,n) and use that as a bound.
if strnlen returns a length beyond the end of the registered extent
associated with s, there is an error: the programmer's estimate for n is
too large _AND_ the string s is unterminated, in which case they'd be
about to touch memory they don't own while calling strncat.
this same logic applies to further uses of strnlen later down in this
file. */
size_t src_sz;
size_t dest_sz;
TRACE ("%s\n", __PRETTY_FUNCTION__);
src_sz = strnlen (src, n);
dest_sz = strnlen (dest, n);
MF_VALIDATE_EXTENT(src, src_sz, __MF_CHECK_READ, "strncat src");
MF_VALIDATE_EXTENT(dest, (CLAMPADD(dest_sz, CLAMPADD(src_sz, 1))),
__MF_CHECK_WRITE, "strncat dest");
return strncat (dest, src, n);
}
WRAPPER2(int, strcmp, const char *s1, const char *s2)
{
size_t s1_sz;
size_t s2_sz;
TRACE ("%s\n", __PRETTY_FUNCTION__);
s1_sz = strlen (s1);
s2_sz = strlen (s2);
MF_VALIDATE_EXTENT(s1, CLAMPADD(s1_sz, 1), __MF_CHECK_READ, "strcmp 1st arg");
MF_VALIDATE_EXTENT(s2, CLAMPADD(s2_sz, 1), __MF_CHECK_WRITE, "strcmp 2nd arg");
return strcmp (s1, s2);
}
WRAPPER2(int, strcasecmp, const char *s1, const char *s2)
{
size_t s1_sz;
size_t s2_sz;
TRACE ("%s\n", __PRETTY_FUNCTION__);
s1_sz = strlen (s1);
s2_sz = strlen (s2);
MF_VALIDATE_EXTENT(s1, CLAMPADD(s1_sz, 1), __MF_CHECK_READ, "strcasecmp 1st arg");
MF_VALIDATE_EXTENT(s2, CLAMPADD(s2_sz, 1), __MF_CHECK_READ, "strcasecmp 2nd arg");
return strcasecmp (s1, s2);
}
WRAPPER2(int, strncmp, const char *s1, const char *s2, size_t n)
{
size_t s1_sz;
size_t s2_sz;
TRACE ("%s\n", __PRETTY_FUNCTION__);
s1_sz = strnlen (s1, n);
s2_sz = strnlen (s2, n);
MF_VALIDATE_EXTENT(s1, s1_sz, __MF_CHECK_READ, "strncmp 1st arg");
MF_VALIDATE_EXTENT(s2, s2_sz, __MF_CHECK_READ, "strncmp 2nd arg");
return strncmp (s1, s2, n);
}
WRAPPER2(int, strncasecmp, const char *s1, const char *s2, size_t n)
{
size_t s1_sz;
size_t s2_sz;
TRACE ("%s\n", __PRETTY_FUNCTION__);
s1_sz = strnlen (s1, n);
s2_sz = strnlen (s2, n);
MF_VALIDATE_EXTENT(s1, s1_sz, __MF_CHECK_READ, "strncasecmp 1st arg");
MF_VALIDATE_EXTENT(s2, s2_sz, __MF_CHECK_READ, "strncasecmp 2nd arg");
return strncasecmp (s1, s2, n);
}
WRAPPER2(char *, strdup, const char *s)
{
DECLARE(void *, malloc, size_t sz);
char *result;
size_t n = strlen (s);
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, CLAMPADD(n,1), __MF_CHECK_READ, "strdup region");
result = (char *)CALL_REAL(malloc,
CLAMPADD(CLAMPADD(n,1),
CLAMPADD(__mf_opts.crumple_zone,
__mf_opts.crumple_zone)));
if (UNLIKELY(! result)) return result;
result += __mf_opts.crumple_zone;
memcpy (result, s, n);
result[n] = '\0';
__mf_register (result, CLAMPADD(n,1), __MF_TYPE_HEAP_I, "strdup region");
return result;
}
WRAPPER2(char *, strndup, const char *s, size_t n)
{
DECLARE(void *, malloc, size_t sz);
char *result;
size_t sz = strnlen (s, n);
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, sz, __MF_CHECK_READ, "strndup region"); /* nb: strNdup */
/* note: strndup still adds a \0, even with the N limit! */
result = (char *)CALL_REAL(malloc,
CLAMPADD(CLAMPADD(n,1),
CLAMPADD(__mf_opts.crumple_zone,
__mf_opts.crumple_zone)));
if (UNLIKELY(! result)) return result;
result += __mf_opts.crumple_zone;
memcpy (result, s, n);
result[n] = '\0';
__mf_register (result, CLAMPADD(n,1), __MF_TYPE_HEAP_I, "strndup region");
return result;
}
WRAPPER2(char *, strchr, const char *s, int c)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (s);
MF_VALIDATE_EXTENT(s, CLAMPADD(n,1), __MF_CHECK_READ, "strchr region");
return strchr (s, c);
}
WRAPPER2(char *, strrchr, const char *s, int c)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (s);
MF_VALIDATE_EXTENT(s, CLAMPADD(n,1), __MF_CHECK_READ, "strrchr region");
return strrchr (s, c);
}
WRAPPER2(char *, strstr, const char *haystack, const char *needle)
{
size_t haystack_sz;
size_t needle_sz;
TRACE ("%s\n", __PRETTY_FUNCTION__);
haystack_sz = strlen (haystack);
needle_sz = strlen (needle);
MF_VALIDATE_EXTENT(haystack, CLAMPADD(haystack_sz, 1), __MF_CHECK_READ, "strstr haystack");
MF_VALIDATE_EXTENT(needle, CLAMPADD(needle_sz, 1), __MF_CHECK_READ, "strstr needle");
return strstr (haystack, needle);
}
#ifdef HAVE_MEMMEM
WRAPPER2(void *, memmem,
const void *haystack, size_t haystacklen,
const void *needle, size_t needlelen)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(haystack, haystacklen, __MF_CHECK_READ, "memmem haystack");
MF_VALIDATE_EXTENT(needle, needlelen, __MF_CHECK_READ, "memmem needle");
return memmem (haystack, haystacklen, needle, needlelen);
}
#endif
WRAPPER2(size_t, strlen, const char *s)
{
size_t result = strlen (s);
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, CLAMPADD(result, 1), __MF_CHECK_READ, "strlen region");
return result;
}
WRAPPER2(size_t, strnlen, const char *s, size_t n)
{
size_t result = strnlen (s, n);
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, result, __MF_CHECK_READ, "strnlen region");
return result;
}
WRAPPER2(void, bzero, void *s, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, n, __MF_CHECK_WRITE, "bzero region");
bzero (s, n);
}
#undef bcopy
WRAPPER2(void, bcopy, const void *src, void *dest, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(src, n, __MF_CHECK_READ, "bcopy src");
MF_VALIDATE_EXTENT(dest, n, __MF_CHECK_WRITE, "bcopy dest");
bcopy (src, dest, n);
}
#undef bcmp
WRAPPER2(int, bcmp, const void *s1, const void *s2, size_t n)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s1, n, __MF_CHECK_READ, "bcmp 1st arg");
MF_VALIDATE_EXTENT(s2, n, __MF_CHECK_READ, "bcmp 2nd arg");
return bcmp (s1, s2, n);
}
WRAPPER2(char *, index, const char *s, int c)
{
size_t n = strlen (s);
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, CLAMPADD(n, 1), __MF_CHECK_READ, "index region");
return index (s, c);
}
WRAPPER2(char *, rindex, const char *s, int c)
{
size_t n = strlen (s);
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(s, CLAMPADD(n, 1), __MF_CHECK_READ, "rindex region");
return rindex (s, c);
}
/* XXX: stpcpy, memccpy */
/* XXX: *printf,*scanf */
/* XXX: setjmp, longjmp */
WRAPPER2(char *, asctime, struct tm *tm)
{
static char *reg_result = NULL;
char *result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(tm, sizeof (struct tm), __MF_CHECK_READ, "asctime tm");
result = asctime (tm);
if (reg_result == NULL)
{
__mf_register (result, strlen (result)+1, __MF_TYPE_STATIC, "asctime string");
reg_result = result;
}
return result;
}
WRAPPER2(char *, ctime, const time_t *timep)
{
static char *reg_result = NULL;
char *result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(timep, sizeof (time_t), __MF_CHECK_READ, "ctime time");
result = ctime (timep);
if (reg_result == NULL)
{
/* XXX: what if asctime and ctime return the same static ptr? */
__mf_register (result, strlen (result)+1, __MF_TYPE_STATIC, "ctime string");
reg_result = result;
}
return result;
}
WRAPPER2(struct tm*, localtime, const time_t *timep)
{
static struct tm *reg_result = NULL;
struct tm *result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(timep, sizeof (time_t), __MF_CHECK_READ, "localtime time");
result = localtime (timep);
if (reg_result == NULL)
{
__mf_register (result, sizeof (struct tm), __MF_TYPE_STATIC, "localtime tm");
reg_result = result;
}
return result;
}
WRAPPER2(struct tm*, gmtime, const time_t *timep)
{
static struct tm *reg_result = NULL;
struct tm *result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT(timep, sizeof (time_t), __MF_CHECK_READ, "gmtime time");
result = gmtime (timep);
if (reg_result == NULL)
{
__mf_register (result, sizeof (struct tm), __MF_TYPE_STATIC, "gmtime tm");
reg_result = result;
}
return result;
}
/* EL start */
/* The following indicate if the result of the corresponding function
* should be explicitly un/registered by the wrapper
*/
#ifdef __FreeBSD__
#define MF_REGISTER_fopen __MF_TYPE_STATIC
#else
#undef MF_REGISTER_fopen
#endif
#define MF_RESULT_SIZE_fopen (sizeof (FILE))
#undef MF_REGISTER_opendir
#define MF_RESULT_SIZE_opendir 0 /* (sizeof (DIR)) */
#undef MF_REGISTER_readdir
#define MF_REGISTER_gethostbyname __MF_TYPE_STATIC
#undef MF_REGISTER_gethostbyname_items
#undef MF_REGISTER_dlopen
#undef MF_REGISTER_dlerror
#undef MF_REGISTER_dlsym
#define MF_REGISTER_shmat __MF_TYPE_GUESS
#include <time.h>
WRAPPER2(time_t, time, time_t *timep)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
if (NULL != timep)
MF_VALIDATE_EXTENT (timep, sizeof (*timep), __MF_CHECK_WRITE,
"time timep");
return time (timep);
}
WRAPPER2(char *, strerror, int errnum)
{
char *p;
static char * last_strerror = NULL;
TRACE ("%s\n", __PRETTY_FUNCTION__);
p = strerror (errnum);
if (last_strerror != NULL)
__mf_unregister (last_strerror, 0, __MF_TYPE_STATIC);
if (NULL != p)
__mf_register (p, strlen (p) + 1, __MF_TYPE_STATIC, "strerror result");
last_strerror = p;
return p;
}
/* An auxiliary data structure for tracking the hand-made stdio
buffers we generate during the fopen/fopen64 hooks. In a civilized
language, this would be a simple dynamically sized FILE*->char*
lookup table, but this is C and we get to do it by hand. */
struct mf_filebuffer
{
FILE *file;
char *buffer;
struct mf_filebuffer *next;
};
static struct mf_filebuffer *mf_filebuffers = NULL;
static void
mkbuffer (FILE *f)
{
/* Reset any buffer automatically provided by libc, since this may
have been done via mechanisms that libmudflap couldn't
intercept. */
int rc;
size_t bufsize = BUFSIZ;
int bufmode;
char *buffer = malloc (bufsize);
struct mf_filebuffer *b = malloc (sizeof (struct mf_filebuffer));
assert ((buffer != NULL) && (b != NULL));
/* Link it into list. */
b->file = f;
b->buffer = buffer;
b->next = mf_filebuffers;
mf_filebuffers = b;
/* Determine how the file is supposed to be buffered at the moment. */
bufmode = fileno (f) == 2 ? _IONBF : (isatty (fileno (f)) ? _IOLBF : _IOFBF);
rc = setvbuf (f, buffer, bufmode, bufsize);
assert (rc == 0);
}
static void
unmkbuffer (FILE *f)
{
struct mf_filebuffer *b = mf_filebuffers;
struct mf_filebuffer **pb = & mf_filebuffers;
while (b != NULL)
{
if (b->file == f)
{
*pb = b->next;
free (b->buffer);
free (b);
return;
}
pb = & b->next;
b = b->next;
}
}
WRAPPER2(FILE *, fopen, const char *path, const char *mode)
{
size_t n;
FILE *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "fopen path");
n = strlen (mode);
MF_VALIDATE_EXTENT (mode, CLAMPADD(n, 1), __MF_CHECK_READ, "fopen mode");
p = fopen (path, mode);
if (NULL != p) {
#ifdef MF_REGISTER_fopen
__mf_register (p, sizeof (*p), MF_REGISTER_fopen, "fopen result");
#endif
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_WRITE, "fopen result");
mkbuffer (p);
}
return p;
}
WRAPPER2(int, setvbuf, FILE *stream, char *buf, int mode, size_t size)
{
int rc = 0;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE, "setvbuf stream");
unmkbuffer (stream);
if (buf != NULL)
MF_VALIDATE_EXTENT (buf, size, __MF_CHECK_WRITE, "setvbuf buffer");
/* Override the user only if it's an auto-allocated buffer request. Otherwise
assume that the supplied buffer is already known to libmudflap. */
if ((buf == NULL) && ((mode == _IOFBF) || (mode == _IOLBF)))
mkbuffer (stream);
else
rc = setvbuf (stream, buf, mode, size);
return rc;
}
#ifdef HAVE_SETBUF
WRAPPER2(int, setbuf, FILE* stream, char *buf)
{
return __mfwrap_setvbuf (stream, buf, buf ? _IOFBF : _IONBF, BUFSIZ);
}
#endif
#ifdef HAVE_SETBUFFER
WRAPPER2(int, setbuffer, FILE* stream, char *buf, size_t sz)
{
return __mfwrap_setvbuf (stream, buf, buf ? _IOFBF : _IONBF, sz);
}
#endif
#ifdef HAVE_SETLINEBUF
WRAPPER2(int, setlinebuf, FILE* stream)
{
return __mfwrap_setvbuf(stream, NULL, _IOLBF, 0);
}
#endif
WRAPPER2(FILE *, fdopen, int fd, const char *mode)
{
size_t n;
FILE *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (mode);
MF_VALIDATE_EXTENT (mode, CLAMPADD(n, 1), __MF_CHECK_READ, "fdopen mode");
p = fdopen (fd, mode);
if (NULL != p) {
#ifdef MF_REGISTER_fopen
__mf_register (p, sizeof (*p), MF_REGISTER_fopen, "fdopen result");
#endif
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_WRITE, "fdopen result");
mkbuffer (p);
}
return p;
}
WRAPPER2(FILE *, freopen, const char *path, const char *mode, FILE *s)
{
size_t n;
FILE *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "freopen path");
MF_VALIDATE_EXTENT (s, (sizeof (*s)), __MF_CHECK_WRITE, "freopen stream");
unmkbuffer (s);
n = strlen (mode);
MF_VALIDATE_EXTENT (mode, CLAMPADD(n, 1), __MF_CHECK_READ, "freopen mode");
p = freopen (path, mode, s);
if (NULL != p) {
#ifdef MF_REGISTER_fopen
__mf_register (p, sizeof (*p), MF_REGISTER_fopen, "freopen result");
#endif
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_WRITE, "freopen result");
mkbuffer (p);
}
return p;
}
#ifdef HAVE_FOPEN64
WRAPPER2(FILE *, fopen64, const char *path, const char *mode)
{
size_t n;
FILE *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "fopen64 path");
n = strlen (mode);
MF_VALIDATE_EXTENT (mode, CLAMPADD(n, 1), __MF_CHECK_READ, "fopen64 mode");
p = fopen64 (path, mode);
if (NULL != p) {
#ifdef MF_REGISTER_fopen
__mf_register (p, sizeof (*p), MF_REGISTER_fopen, "fopen64 result");
#endif
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_WRITE, "fopen64 result");
mkbuffer (p);
}
return p;
}
#endif
#ifdef HAVE_FREOPEN64
WRAPPER2(FILE *, freopen64, const char *path, const char *mode, FILE *s)
{
size_t n;
FILE *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "freopen64 path");
MF_VALIDATE_EXTENT (s, (sizeof (*s)), __MF_CHECK_WRITE, "freopen64 stream");
unmkbuffer (s);
n = strlen (mode);
MF_VALIDATE_EXTENT (mode, CLAMPADD(n, 1), __MF_CHECK_READ, "freopen64 mode");
p = freopen (path, mode, s);
if (NULL != p) {
#ifdef MF_REGISTER_fopen
__mf_register (p, sizeof (*p), MF_REGISTER_fopen, "freopen64 result");
#endif
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_WRITE, "freopen64 result");
mkbuffer (p);
}
return p;
}
#endif
WRAPPER2(int, fclose, FILE *stream)
{
int resp;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fclose stream");
resp = fclose (stream);
#ifdef MF_REGISTER_fopen
__mf_unregister (stream, sizeof (*stream), MF_REGISTER_fopen);
#endif
unmkbuffer (stream);
return resp;
}
WRAPPER2(size_t, fread, void *ptr, size_t size, size_t nmemb, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fread stream");
MF_VALIDATE_EXTENT (ptr, size * nmemb, __MF_CHECK_WRITE, "fread buffer");
return fread (ptr, size, nmemb, stream);
}
WRAPPER2(size_t, fwrite, const void *ptr, size_t size, size_t nmemb,
FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fwrite stream");
MF_VALIDATE_EXTENT (ptr, size * nmemb, __MF_CHECK_READ, "fwrite buffer");
return fwrite (ptr, size, nmemb, stream);
}
WRAPPER2(int, fgetc, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fgetc stream");
return fgetc (stream);
}
WRAPPER2(char *, fgets, char *s, int size, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fgets stream");
MF_VALIDATE_EXTENT (s, size, __MF_CHECK_WRITE, "fgets buffer");
return fgets (s, size, stream);
}
WRAPPER2(int, getc, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"getc stream");
return getc (stream);
}
WRAPPER2(char *, gets, char *s)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (s, 1, __MF_CHECK_WRITE, "gets buffer");
/* Avoid link-time warning... */
s = fgets (s, INT_MAX, stdin);
if (NULL != s) { /* better late than never */
size_t n = strlen (s);
MF_VALIDATE_EXTENT (s, CLAMPADD(n, 1), __MF_CHECK_WRITE, "gets buffer");
}
return s;
}
WRAPPER2(int, ungetc, int c, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"ungetc stream");
return ungetc (c, stream);
}
WRAPPER2(int, fputc, int c, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fputc stream");
return fputc (c, stream);
}
WRAPPER2(int, fputs, const char *s, FILE *stream)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (s);
MF_VALIDATE_EXTENT (s, CLAMPADD(n, 1), __MF_CHECK_READ, "fputs buffer");
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fputs stream");
return fputs (s, stream);
}
WRAPPER2(int, putc, int c, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"putc stream");
return putc (c, stream);
}
WRAPPER2(int, puts, const char *s)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (s);
MF_VALIDATE_EXTENT (s, CLAMPADD(n, 1), __MF_CHECK_READ, "puts buffer");
return puts (s);
}
WRAPPER2(void, clearerr, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"clearerr stream");
clearerr (stream);
}
WRAPPER2(int, feof, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"feof stream");
return feof (stream);
}
WRAPPER2(int, ferror, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"ferror stream");
return ferror (stream);
}
WRAPPER2(int, fileno, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fileno stream");
return fileno (stream);
}
WRAPPER2(int, printf, const char *format, ...)
{
size_t n;
va_list ap;
int result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (format);
MF_VALIDATE_EXTENT (format, CLAMPADD(n, 1), __MF_CHECK_READ,
"printf format");
va_start (ap, format);
result = vprintf (format, ap);
va_end (ap);
return result;
}
WRAPPER2(int, fprintf, FILE *stream, const char *format, ...)
{
size_t n;
va_list ap;
int result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fprintf stream");
n = strlen (format);
MF_VALIDATE_EXTENT (format, CLAMPADD(n, 1), __MF_CHECK_READ,
"fprintf format");
va_start (ap, format);
result = vfprintf (stream, format, ap);
va_end (ap);
return result;
}
WRAPPER2(int, sprintf, char *str, const char *format, ...)
{
size_t n;
va_list ap;
int result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (str, 1, __MF_CHECK_WRITE, "sprintf str");
n = strlen (format);
MF_VALIDATE_EXTENT (format, CLAMPADD(n, 1), __MF_CHECK_READ,
"sprintf format");
va_start (ap, format);
result = vsprintf (str, format, ap);
va_end (ap);
n = strlen (str);
MF_VALIDATE_EXTENT (str, CLAMPADD(n, 1), __MF_CHECK_WRITE, "sprintf str");
return result;
}
WRAPPER2(int, snprintf, char *str, size_t size, const char *format, ...)
{
size_t n;
va_list ap;
int result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (str, size, __MF_CHECK_WRITE, "snprintf str");
n = strlen (format);
MF_VALIDATE_EXTENT (format, CLAMPADD(n, 1), __MF_CHECK_READ,
"snprintf format");
va_start (ap, format);
result = vsnprintf (str, size, format, ap);
va_end (ap);
return result;
}
WRAPPER2(int, vprintf, const char *format, va_list ap)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (format);
MF_VALIDATE_EXTENT (format, CLAMPADD(n, 1), __MF_CHECK_READ,
"vprintf format");
return vprintf (format, ap);
}
WRAPPER2(int, vfprintf, FILE *stream, const char *format, va_list ap)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"vfprintf stream");
n = strlen (format);
MF_VALIDATE_EXTENT (format, CLAMPADD(n, 1), __MF_CHECK_READ,
"vfprintf format");
return vfprintf (stream, format, ap);
}
WRAPPER2(int, vsprintf, char *str, const char *format, va_list ap)
{
size_t n;
int result;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (str, 1, __MF_CHECK_WRITE, "vsprintf str");
n = strlen (format);
MF_VALIDATE_EXTENT (format, CLAMPADD(n, 1), __MF_CHECK_READ,
"vsprintf format");
result = vsprintf (str, format, ap);
n = strlen (str);
MF_VALIDATE_EXTENT (str, CLAMPADD(n, 1), __MF_CHECK_WRITE, "vsprintf str");
return result;
}
WRAPPER2(int, vsnprintf, char *str, size_t size, const char *format,
va_list ap)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (str, size, __MF_CHECK_WRITE, "vsnprintf str");
n = strlen (format);
MF_VALIDATE_EXTENT (format, CLAMPADD(n, 1), __MF_CHECK_READ,
"vsnprintf format");
return vsnprintf (str, size, format, ap);
}
WRAPPER2(int , access, const char *path, int mode)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "access path");
return access (path, mode);
}
WRAPPER2(int , remove, const char *path)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "remove path");
return remove (path);
}
WRAPPER2(int, fflush, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
if (stream != NULL)
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fflush stream");
return fflush (stream);
}
WRAPPER2(int, fseek, FILE *stream, long offset, int whence)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fseek stream");
return fseek (stream, offset, whence);
}
#ifdef HAVE_FSEEKO64
WRAPPER2(int, fseeko64, FILE *stream, off64_t offset, int whence)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fseeko64 stream");
return fseeko64 (stream, offset, whence);
}
#endif
WRAPPER2(long, ftell, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"ftell stream");
return ftell (stream);
}
#ifdef HAVE_FTELLO64
WRAPPER2(off64_t, ftello64, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"ftello64 stream");
return ftello64 (stream);
}
#endif
WRAPPER2(void, rewind, FILE *stream)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"rewind stream");
rewind (stream);
}
WRAPPER2(int, fgetpos, FILE *stream, fpos_t *pos)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fgetpos stream");
MF_VALIDATE_EXTENT (pos, sizeof (*pos), __MF_CHECK_WRITE, "fgetpos pos");
return fgetpos (stream, pos);
}
WRAPPER2(int, fsetpos, FILE *stream, fpos_t *pos)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"fsetpos stream");
MF_VALIDATE_EXTENT (pos, sizeof (*pos), __MF_CHECK_READ, "fsetpos pos");
return fsetpos (stream, pos);
}
WRAPPER2(int , stat, const char *path, struct stat *buf)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "stat path");
MF_VALIDATE_EXTENT (buf, sizeof (*buf), __MF_CHECK_READ, "stat buf");
return stat (path, buf);
}
#ifdef HAVE_STAT64
WRAPPER2(int , stat64, const char *path, struct stat64 *buf)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "stat64 path");
MF_VALIDATE_EXTENT (buf, sizeof (*buf), __MF_CHECK_READ, "stat64 buf");
return stat64 (path, buf);
}
#endif
WRAPPER2(int , fstat, int filedes, struct stat *buf)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (buf, sizeof (*buf), __MF_CHECK_READ, "fstat buf");
return fstat (filedes, buf);
}
WRAPPER2(int , lstat, const char *path, struct stat *buf)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "lstat path");
MF_VALIDATE_EXTENT (buf, sizeof (*buf), __MF_CHECK_READ, "lstat buf");
return lstat (path, buf);
}
WRAPPER2(int , mkfifo, const char *path, mode_t mode)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "mkfifo path");
return mkfifo (path, mode);
}
#ifdef HAVE_DIRENT_H
WRAPPER2(DIR *, opendir, const char *path)
{
DIR *p;
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "opendir path");
p = opendir (path);
if (NULL != p) {
#ifdef MF_REGISTER_opendir
__mf_register (p, MF_RESULT_SIZE_opendir, MF_REGISTER_opendir,
"opendir result");
#endif
MF_VALIDATE_EXTENT (p, MF_RESULT_SIZE_opendir, __MF_CHECK_WRITE,
"opendir result");
}
return p;
}
WRAPPER2(int, closedir, DIR *dir)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (dir, 0, __MF_CHECK_WRITE, "closedir dir");
#ifdef MF_REGISTER_opendir
__mf_unregister (dir, MF_RESULT_SIZE_opendir, MF_REGISTER_opendir);
#endif
return closedir (dir);
}
WRAPPER2(struct dirent *, readdir, DIR *dir)
{
struct dirent *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (dir, 0, __MF_CHECK_READ, "readdir dir");
p = readdir (dir);
if (NULL != p) {
#ifdef MF_REGISTER_readdir
__mf_register (p, sizeof (*p), MF_REGISTER_readdir, "readdir result");
#endif
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_WRITE, "readdir result");
}
return p;
}
#endif
#ifdef HAVE_SYS_SOCKET_H
WRAPPER2(int, recv, int s, void *buf, size_t len, int flags)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (buf, len, __MF_CHECK_WRITE, "recv buf");
return recv (s, buf, len, flags);
}
WRAPPER2(int, recvfrom, int s, void *buf, size_t len, int flags,
struct sockaddr *from, socklen_t *fromlen)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (buf, len, __MF_CHECK_WRITE, "recvfrom buf");
MF_VALIDATE_EXTENT (from, (size_t)*fromlen, __MF_CHECK_WRITE,
"recvfrom from");
return recvfrom (s, buf, len, flags, from, fromlen);
}
WRAPPER2(int, recvmsg, int s, struct msghdr *msg, int flags)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (msg, sizeof (*msg), __MF_CHECK_WRITE, "recvmsg msg");
return recvmsg (s, msg, flags);
}
WRAPPER2(int, send, int s, const void *msg, size_t len, int flags)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (msg, len, __MF_CHECK_READ, "send msg");
return send (s, msg, len, flags);
}
WRAPPER2(int, sendto, int s, const void *msg, size_t len, int flags,
const struct sockaddr *to, socklen_t tolen)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (msg, len, __MF_CHECK_READ, "sendto msg");
MF_VALIDATE_EXTENT (to, (size_t)tolen, __MF_CHECK_WRITE, "sendto to");
return sendto (s, msg, len, flags, to, tolen);
}
WRAPPER2(int, sendmsg, int s, const void *msg, int flags)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (msg, sizeof (*msg), __MF_CHECK_READ, "sendmsg msg");
return sendmsg (s, msg, flags);
}
WRAPPER2(int, setsockopt, int s, int level, int optname, const void *optval,
socklen_t optlen)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (optval, (size_t)optlen, __MF_CHECK_READ,
"setsockopt optval");
return setsockopt (s, level, optname, optval, optlen);
}
WRAPPER2(int, getsockopt, int s, int level, int optname, void *optval,
socklen_t *optlen)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (optval, (size_t)*optlen, __MF_CHECK_WRITE,
"getsockopt optval");
return getsockopt (s, level, optname, optval, optlen);
}
WRAPPER2(int, accept, int s, struct sockaddr *addr, socklen_t *addrlen)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
if (addr != NULL)
MF_VALIDATE_EXTENT (addr, (size_t)*addrlen, __MF_CHECK_WRITE, "accept addr");
return accept (s, addr, addrlen);
}
WRAPPER2(int, bind, int sockfd, struct sockaddr *addr, socklen_t addrlen)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (addr, (size_t)addrlen, __MF_CHECK_WRITE, "bind addr");
return bind (sockfd, addr, addrlen);
}
WRAPPER2(int, connect, int sockfd, const struct sockaddr *addr,
socklen_t addrlen)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (addr, (size_t)addrlen, __MF_CHECK_READ,
"connect addr");
return connect (sockfd, addr, addrlen);
}
#endif /* HAVE_SYS_SOCKET_H */
WRAPPER2(int, gethostname, char *name, size_t len)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (name, len, __MF_CHECK_WRITE, "gethostname name");
return gethostname (name, len);
}
#ifdef HAVE_SETHOSTNAME
WRAPPER2(int, sethostname, const char *name, size_t len)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (name, len, __MF_CHECK_READ, "sethostname name");
return sethostname (name, len);
}
#endif
#ifdef HAVE_NETDB_H
WRAPPER2(struct hostent *, gethostbyname, const char *name)
{
struct hostent *p;
char **ss;
char *s;
size_t n;
int nreg;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (name);
MF_VALIDATE_EXTENT (name, CLAMPADD(n, 1), __MF_CHECK_READ,
"gethostbyname name");
p = gethostbyname (name);
if (NULL != p) {
#ifdef MF_REGISTER_gethostbyname
__mf_register (p, sizeof (*p), MF_REGISTER_gethostbyname,
"gethostbyname result");
#endif
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_WRITE,
"gethostbyname result");
if (NULL != (s = p->h_name)) {
n = strlen (s);
n = CLAMPADD(n, 1);
#ifdef MF_REGISTER_gethostbyname_items
__mf_register (s, n, MF_REGISTER_gethostbyname_items,
"gethostbyname result->h_name");
#endif
MF_VALIDATE_EXTENT (s, n, __MF_CHECK_WRITE,
"gethostbyname result->h_name");
}
if (NULL != (ss = p->h_aliases)) {
for (nreg = 1;; ++nreg) {
s = *ss++;
if (NULL == s)
break;
n = strlen (s);
n = CLAMPADD(n, 1);
#ifdef MF_REGISTER_gethostbyname_items
__mf_register (s, n, MF_REGISTER_gethostbyname_items,
"gethostbyname result->h_aliases[]");
#endif
MF_VALIDATE_EXTENT (s, n, __MF_CHECK_WRITE,
"gethostbyname result->h_aliases[]");
}
nreg *= sizeof (*p->h_aliases);
#ifdef MF_REGISTER_gethostbyname_items
__mf_register (p->h_aliases, nreg, MF_REGISTER_gethostbyname_items,
"gethostbyname result->h_aliases");
#endif
MF_VALIDATE_EXTENT (p->h_aliases, nreg, __MF_CHECK_WRITE,
"gethostbyname result->h_aliases");
}
if (NULL != (ss = p->h_addr_list)) {
for (nreg = 1;; ++nreg) {
s = *ss++;
if (NULL == s)
break;
#ifdef MF_REGISTER_gethostbyname_items
__mf_register (s, p->h_length, MF_REGISTER_gethostbyname_items,
"gethostbyname result->h_addr_list[]");
#endif
MF_VALIDATE_EXTENT (s, p->h_length, __MF_CHECK_WRITE,
"gethostbyname result->h_addr_list[]");
}
nreg *= sizeof (*p->h_addr_list);
#ifdef MF_REGISTER_gethostbyname_items
__mf_register (p->h_addr_list, nreg, MF_REGISTER_gethostbyname_items,
"gethostbyname result->h_addr_list");
#endif
MF_VALIDATE_EXTENT (p->h_addr_list, nreg, __MF_CHECK_WRITE,
"gethostbyname result->h_addr_list");
}
}
return p;
}
#endif /* HAVE_NETDB_H */
#ifdef HAVE_SYS_WAIT_H
WRAPPER2(pid_t, wait, int *status)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
if (NULL != status)
MF_VALIDATE_EXTENT (status, sizeof (*status), __MF_CHECK_WRITE,
"wait status");
return wait (status);
}
WRAPPER2(pid_t, waitpid, pid_t pid, int *status, int options)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
if (NULL != status)
MF_VALIDATE_EXTENT (status, sizeof (*status), __MF_CHECK_WRITE,
"waitpid status");
return waitpid (pid, status, options);
}
#endif /* HAVE_SYS_WAIT_H */
WRAPPER2(FILE *, popen, const char *command, const char *mode)
{
size_t n;
FILE *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (command);
MF_VALIDATE_EXTENT (command, CLAMPADD(n, 1), __MF_CHECK_READ, "popen path");
n = strlen (mode);
MF_VALIDATE_EXTENT (mode, CLAMPADD(n, 1), __MF_CHECK_READ, "popen mode");
p = popen (command, mode);
if (NULL != p) {
#ifdef MF_REGISTER_fopen
__mf_register (p, sizeof (*p), MF_REGISTER_fopen, "popen result");
#endif
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_WRITE, "popen result");
}
return p;
}
WRAPPER2(int, pclose, FILE *stream)
{
int resp;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (stream, sizeof (*stream), __MF_CHECK_WRITE,
"pclose stream");
resp = pclose (stream);
#ifdef MF_REGISTER_fopen
__mf_unregister (stream, sizeof (*stream), MF_REGISTER_fopen);
#endif
return resp;
}
WRAPPER2(int, execve, const char *path, char *const argv [],
char *const envp[])
{
size_t n;
char *const *p;
const char *s;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "execve path");
for (p = argv;;) {
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_READ, "execve *argv");
s = *p++;
if (NULL == s)
break;
n = strlen (s);
MF_VALIDATE_EXTENT (s, CLAMPADD(n, 1), __MF_CHECK_READ, "execve **argv");
}
for (p = envp;;) {
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_READ, "execve *envp");
s = *p++;
if (NULL == s)
break;
n = strlen (s);
MF_VALIDATE_EXTENT (s, CLAMPADD(n, 1), __MF_CHECK_READ, "execve **envp");
}
return execve (path, argv, envp);
}
WRAPPER2(int, execv, const char *path, char *const argv [])
{
size_t n;
char *const *p;
const char *s;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "execv path");
for (p = argv;;) {
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_READ, "execv *argv");
s = *p++;
if (NULL == s)
break;
n = strlen (s);
MF_VALIDATE_EXTENT (s, CLAMPADD(n, 1), __MF_CHECK_READ, "execv **argv");
}
return execv (path, argv);
}
WRAPPER2(int, execvp, const char *path, char *const argv [])
{
size_t n;
char *const *p;
const char *s;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "execvp path");
for (p = argv;;) {
MF_VALIDATE_EXTENT (p, sizeof (*p), __MF_CHECK_READ, "execvp *argv");
s = *p++;
if (NULL == s)
break;
n = strlen (s);
MF_VALIDATE_EXTENT (s, CLAMPADD(n, 1), __MF_CHECK_READ, "execvp **argv");
}
return execvp (path, argv);
}
WRAPPER2(int, system, const char *string)
{
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (string);
MF_VALIDATE_EXTENT (string, CLAMPADD(n, 1), __MF_CHECK_READ,
"system string");
return system (string);
}
WRAPPER2(void *, dlopen, const char *path, int flags)
{
void *p;
size_t n;
TRACE ("%s\n", __PRETTY_FUNCTION__);
n = strlen (path);
MF_VALIDATE_EXTENT (path, CLAMPADD(n, 1), __MF_CHECK_READ, "dlopen path");
p = dlopen (path, flags);
if (NULL != p) {
#ifdef MF_REGISTER_dlopen
__mf_register (p, 0, MF_REGISTER_dlopen, "dlopen result");
#endif
MF_VALIDATE_EXTENT (p, 0, __MF_CHECK_WRITE, "dlopen result");
}
return p;
}
WRAPPER2(int, dlclose, void *handle)
{
int resp;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (handle, 0, __MF_CHECK_READ, "dlclose handle");
resp = dlclose (handle);
#ifdef MF_REGISTER_dlopen
__mf_unregister (handle, 0, MF_REGISTER_dlopen);
#endif
return resp;
}
WRAPPER2(char *, dlerror)
{
char *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
p = dlerror ();
if (NULL != p) {
size_t n;
n = strlen (p);
n = CLAMPADD(n, 1);
#ifdef MF_REGISTER_dlerror
__mf_register (p, n, MF_REGISTER_dlerror, "dlerror result");
#endif
MF_VALIDATE_EXTENT (p, n, __MF_CHECK_WRITE, "dlerror result");
}
return p;
}
WRAPPER2(void *, dlsym, void *handle, char *symbol)
{
size_t n;
void *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (handle, 0, __MF_CHECK_READ, "dlsym handle");
n = strlen (symbol);
MF_VALIDATE_EXTENT (symbol, CLAMPADD(n, 1), __MF_CHECK_READ, "dlsym symbol");
p = dlsym (handle, symbol);
if (NULL != p) {
#ifdef MF_REGISTER_dlsym
__mf_register (p, 0, MF_REGISTER_dlsym, "dlsym result");
#endif
MF_VALIDATE_EXTENT (p, 0, __MF_CHECK_WRITE, "dlsym result");
}
return p;
}
#if defined (HAVE_SYS_IPC_H) && defined (HAVE_SYS_SEM_H) && defined (HAVE_SYS_SHM_H)
WRAPPER2(int, semop, int semid, struct sembuf *sops, unsigned nsops)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
MF_VALIDATE_EXTENT (sops, sizeof (*sops) * nsops, __MF_CHECK_READ,
"semop sops");
return semop (semid, sops, nsops);
}
#ifndef HAVE_UNION_SEMUN
union semun {
int val; /* value for SETVAL */
struct semid_ds *buf; /* buffer for IPC_STAT, IPC_SET */
unsigned short int *array; /* array for GETALL, SETALL */
struct seminfo *__buf; /* buffer for IPC_INFO */
};
#endif
WRAPPER2(int, semctl, int semid, int semnum, int cmd, union semun arg)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
switch (cmd) {
case IPC_STAT:
MF_VALIDATE_EXTENT (arg.buf, sizeof (*arg.buf), __MF_CHECK_WRITE,
"semctl buf");
break;
case IPC_SET:
MF_VALIDATE_EXTENT (arg.buf, sizeof (*arg.buf), __MF_CHECK_READ,
"semctl buf");
break;
case GETALL:
MF_VALIDATE_EXTENT (arg.array, sizeof (*arg.array), __MF_CHECK_WRITE,
"semctl array");
case SETALL:
MF_VALIDATE_EXTENT (arg.array, sizeof (*arg.array), __MF_CHECK_READ,
"semctl array");
break;
#ifdef IPC_INFO
/* FreeBSD 5.1 And Cygwin headers include IPC_INFO but not the __buf field. */
#if !defined(__FreeBSD__) && !defined(__CYGWIN__)
case IPC_INFO:
MF_VALIDATE_EXTENT (arg.__buf, sizeof (*arg.__buf), __MF_CHECK_WRITE,
"semctl __buf");
break;
#endif
#endif
default:
break;
}
return semctl (semid, semnum, cmd, arg);
}
WRAPPER2(int, shmctl, int shmid, int cmd, struct shmid_ds *buf)
{
TRACE ("%s\n", __PRETTY_FUNCTION__);
switch (cmd) {
case IPC_STAT:
MF_VALIDATE_EXTENT (buf, sizeof (*buf), __MF_CHECK_WRITE,
"shmctl buf");
break;
case IPC_SET:
MF_VALIDATE_EXTENT (buf, sizeof (*buf), __MF_CHECK_READ,
"shmctl buf");
break;
default:
break;
}
return shmctl (shmid, cmd, buf);
}
WRAPPER2(void *, shmat, int shmid, const void *shmaddr, int shmflg)
{
void *p;
TRACE ("%s\n", __PRETTY_FUNCTION__);
p = shmat (shmid, shmaddr, shmflg);
#ifdef MF_REGISTER_shmat
if (NULL != p) {
struct shmid_ds buf;
__mf_register (p, shmctl (shmid, IPC_STAT, &buf) ? 0 : buf.shm_segsz,
MF_REGISTER_shmat, "shmat result");
}
#endif
return p;
}
WRAPPER2(int, shmdt, const void *shmaddr)
{
int resp;
TRACE ("%s\n", __PRETTY_FUNCTION__);
resp = shmdt (shmaddr);
#ifdef MF_REGISTER_shmat
__mf_unregister ((void *)shmaddr, 0, MF_REGISTER_shmat);
#endif
return resp;
}
#endif /* HAVE_SYS_IPC/SEM/SHM_H */
/* ctype stuff. This is host-specific by necessity, as the arrays
that is used by most is*()/to*() macros are implementation-defined. */
/* GLIBC 2.3 */
#ifdef HAVE___CTYPE_B_LOC
WRAPPER2(unsigned short **, __ctype_b_loc, void)
{
static unsigned short * last_buf = (void *) 0;
static unsigned short ** last_ptr = (void *) 0;
unsigned short ** ptr = (unsigned short **) __ctype_b_loc ();
unsigned short * buf = * ptr;
if (ptr != last_ptr)
{
/* XXX: unregister last_ptr? */
last_ptr = ptr;
__mf_register (last_ptr, sizeof(last_ptr), __MF_TYPE_STATIC, "ctype_b_loc **");
}
if (buf != last_buf)
{
last_buf = buf;
__mf_register ((void *) (last_buf - 128), 384 * sizeof(unsigned short), __MF_TYPE_STATIC,
"ctype_b_loc []");
}
return ptr;
}
#endif
#ifdef HAVE___CTYPE_TOUPPER_LOC
WRAPPER2(int **, __ctype_toupper_loc, void)
{
static int * last_buf = (void *) 0;
static int ** last_ptr = (void *) 0;
int ** ptr = (int **) __ctype_toupper_loc ();
int * buf = * ptr;
if (ptr != last_ptr)
{
/* XXX: unregister last_ptr? */
last_ptr = ptr;
__mf_register (last_ptr, sizeof(last_ptr), __MF_TYPE_STATIC, "ctype_toupper_loc **");
}
if (buf != last_buf)
{
last_buf = buf;
__mf_register ((void *) (last_buf - 128), 384 * sizeof(int), __MF_TYPE_STATIC,
"ctype_toupper_loc []");
}
return ptr;
}
#endif
#ifdef HAVE___CTYPE_TOLOWER_LOC
WRAPPER2(int **, __ctype_tolower_loc, void)
{
static int * last_buf = (void *) 0;
static int ** last_ptr = (void *) 0;
int ** ptr = (int **) __ctype_tolower_loc ();
int * buf = * ptr;
if (ptr != last_ptr)
{
/* XXX: unregister last_ptr? */
last_ptr = ptr;
__mf_register (last_ptr, sizeof(last_ptr), __MF_TYPE_STATIC, "ctype_tolower_loc **");
}
if (buf != last_buf)
{
last_buf = buf;
__mf_register ((void *) (last_buf - 128), 384 * sizeof(int), __MF_TYPE_STATIC,
"ctype_tolower_loc []");
}
return ptr;
}
#endif
/* passwd/group related functions. These register every (static) pointer value returned,
and rely on libmudflap's quiet toleration of duplicate static registrations. */
#ifdef HAVE_GETLOGIN
WRAPPER2(char *, getlogin, void)
{
char *buf = getlogin ();
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getlogin() return");
return buf;
}
#endif
#ifdef HAVE_CUSERID
WRAPPER2(char *, cuserid, char * buf)
{
if (buf != NULL)
{
MF_VALIDATE_EXTENT(buf, L_cuserid, __MF_CHECK_WRITE,
"cuserid destination");
return cuserid (buf);
}
buf = cuserid (NULL);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getcuserid() return");
return buf;
}
#endif
#ifdef HAVE_GETPWNAM
WRAPPER2(struct passwd *, getpwnam, const char *name)
{
struct passwd *buf;
MF_VALIDATE_EXTENT(name, strlen(name)+1, __MF_CHECK_READ,
"getpwnam name");
buf = getpwnam (name);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getpw*() return");
return buf;
}
#endif
#ifdef HAVE_GETPWUID
WRAPPER2(struct passwd *, getpwuid, uid_t uid)
{
struct passwd *buf;
buf = getpwuid (uid);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getpw*() return");
return buf;
}
#endif
#ifdef HAVE_GETGRNAM
WRAPPER2(struct group *, getgrnam, const char *name)
{
struct group *buf;
MF_VALIDATE_EXTENT(name, strlen(name)+1, __MF_CHECK_READ,
"getgrnam name");
buf = getgrnam (name);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getgr*() return");
return buf;
}
#endif
#ifdef HAVE_GETGRGID
WRAPPER2(struct group *, getgrgid, uid_t uid)
{
struct group *buf;
buf = getgrgid (uid);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getgr*() return");
return buf;
}
#endif
#ifdef HAVE_GETSERVENT
WRAPPER2(struct servent *, getservent, void)
{
struct servent *buf;
buf = getservent ();
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getserv*() return");
return buf;
}
#endif
#ifdef HAVE_GETSERVBYNAME
WRAPPER2(struct servent *, getservbyname, const char *name, const char *proto)
{
struct servent *buf;
MF_VALIDATE_EXTENT(name, strlen(name)+1, __MF_CHECK_READ,
"getservbyname name");
MF_VALIDATE_EXTENT(proto, strlen(proto)+1, __MF_CHECK_READ,
"getservbyname proto");
buf = getservbyname (name, proto);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getserv*() return");
return buf;
}
#endif
#ifdef HAVE_GETSERVBYPORT
WRAPPER2(struct servent *, getservbyport, int port, const char *proto)
{
struct servent *buf;
MF_VALIDATE_EXTENT(proto, strlen(proto)+1, __MF_CHECK_READ,
"getservbyport proto");
buf = getservbyport (port, proto);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getserv*() return");
return buf;
}
#endif
#ifdef HAVE_GAI_STRERROR
WRAPPER2(const char *, gai_strerror, int errcode)
{
const char *buf;
buf = gai_strerror (errcode);
if (buf != NULL)
__mf_register ((void *) buf, strlen(buf)+1, __MF_TYPE_STATIC,
"gai_strerror() return");
return buf;
}
#endif
#ifdef HAVE_GETMNTENT
#ifdef HAVE_MNTENT_H
WRAPPER2(struct mntent *, getmntent, FILE *filep)
{
struct mntent *m;
static struct mntent *last = NULL;
MF_VALIDATE_EXTENT (filep, sizeof (*filep), __MF_CHECK_WRITE,
"getmntent stream");
#define UR(field) __mf_unregister(last->field, strlen (last->field)+1, __MF_TYPE_STATIC)
if (last)
{
UR (mnt_fsname);
UR (mnt_dir);
UR (mnt_type);
UR (mnt_opts);
__mf_unregister (last, sizeof (*last), __MF_TYPE_STATIC);
}
#undef UR
m = getmntent (filep);
last = m;
#define R(field) __mf_register(last->field, strlen (last->field)+1, __MF_TYPE_STATIC, "mntent " #field)
if (m)
{
R (mnt_fsname);
R (mnt_dir);
R (mnt_type);
R (mnt_opts);
__mf_register (last, sizeof (*last), __MF_TYPE_STATIC, "getmntent result");
}
#undef R
return m;
}
#elif defined HAVE_SYS_MNTTAB_H
WRAPPER2(int, getmntent, FILE *filep, struct mnttab *mp)
{
static struct mnttab *last = NULL;
int res;
MF_VALIDATE_EXTENT (filep, sizeof (*filep), __MF_CHECK_WRITE,
"getmntent stream");
#define UR(field) __mf_unregister(last->field, strlen (last->field)+1, __MF_TYPE_STATIC)
if (last)
{
UR (mnt_special);
UR (mnt_mountp);
UR (mnt_fstype);
UR (mnt_mntopts);
UR (mnt_time);
__mf_unregister (last, sizeof (*last), __MF_TYPE_STATIC);
}
#undef UR
res = getmntent (filep, mp);
last = mp;
#define R(field) __mf_register(last->field, strlen (last->field)+1, __MF_TYPE_STATIC, "mntent " #field)
if (mp)
{
R (mnt_special);
R (mnt_mountp);
R (mnt_fstype);
R (mnt_mntopts);
R (mnt_time);
__mf_register (last, sizeof (*last), __MF_TYPE_STATIC, "getmntent result");
}
#undef R
return res;
}
#endif
#endif
#ifdef HAVE_INET_NTOA
WRAPPER2(char *, inet_ntoa, struct in_addr in)
{
static char *last_buf = NULL;
char *buf;
if (last_buf)
__mf_unregister (last_buf, strlen (last_buf)+1, __MF_TYPE_STATIC);
buf = inet_ntoa (in);
last_buf = buf;
if (buf)
__mf_register (last_buf, strlen (last_buf)+1, __MF_TYPE_STATIC, "inet_ntoa result");
return buf;
}
#endif
#ifdef HAVE_GETPROTOENT
WRAPPER2(struct protoent *, getprotoent, void)
{
struct protoent *buf;
buf = getprotoent ();
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC, "getproto*() return");
return buf;
}
#endif
#ifdef HAVE_GETPROTOBYNAME
WRAPPER2(struct protoent *, getprotobyname, const char *name)
{
struct protoent *buf;
MF_VALIDATE_EXTENT(name, strlen(name)+1, __MF_CHECK_READ,
"getprotobyname name");
buf = getprotobyname (name);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getproto*() return");
return buf;
}
#endif
#ifdef HAVE_GETPROTOBYNUMBER
WRAPPER2(struct protoent *, getprotobynumber, int port)
{
struct protoent *buf;
buf = getprotobynumber (port);
if (buf != NULL)
__mf_register (buf, sizeof(*buf), __MF_TYPE_STATIC,
"getproto*() return");
return buf;
}
#endif
Reference in New Issue View Git Blame Copy Permalink