ssize_t write (int fd, const void *buf, size_t n)
{
#if __DEBUG__
printf("function %s called\n", __func__);
#endif
if (!is_simptcp_descriptor(fd)) {
return libc_write(fd, buf, n);
}
/* Here comes the code for the xxxx related to simtcp */
return send(fd, buf, n, 0);
}
ssize_t write(int fd, const void *buf, size_t count)
{
static ssize_t (*libc_write)(int fd, const void *buf, size_t count);
ssize_t rc;
hook(write);
if (autocork_needed(fd))
set_pending_frames(fd, count);
rc = libc_write(fd, buf, count);
check_qlen(fd);
return rc;
}
ssize_t write(int fd, const void *buf, size_t count)
{
if (fd != STDOUT_FILENO || !filter_write)
return libc_write(fd, buf, count);
return filter_write(current_write_filter, buf, count);
}
/*
* Helper functions for stack unwinding (backtracing) and
* creating log-files. It writes unwond stack frames in a
* per-thread private log-file, named "__progname.pid.tid".
*/
void _backtrace()
{
int rval;
char **bt;
int nframes;
char line[LINE_LEN];
void *frames[MAX_FRAMES];
static ssize_t (*libc_perror)(const char *s);
if (libc_perror == NULL) {
*(void **)(&libc_perror) = dlsym(RTLD_NEXT, "perror");
if (libc_perror == NULL) {
fprintf(stderr, "_backtrace: Error while loading perror\n");
return;
}
}
static size_t (*libc_strlen)(const char *s);
if (libc_strlen == NULL) {
*(void **)(&libc_strlen) = dlsym(RTLD_NEXT, "strlen");
if (libc_strlen == NULL) {
fprintf(stderr, "_backtrace: Error while loading strlen\n");
return;
}
}
static int (*libc_sprintf)(char *str, const char *format, ...);
if (libc_sprintf == NULL) {
*(void **)(&libc_sprintf) = dlsym(RTLD_NEXT, "sprintf");
if (libc_sprintf == NULL){
fprintf(stderr, "_backtrace: Error while loading sprintf\n");
return;
}
}
static int (*libc_open)(const char *pathname, int flags, mode_t mode);
if (libc_open == NULL) {
*(void **)(&libc_open) = dlsym(RTLD_NEXT, "open");
if (libc_open == NULL){
fprintf(stderr, "_backtrace: Error while loading open\n");
return;
}
}
static ssize_t (*libc_write)(int fd, const void *buf, size_t count);
if (libc_write == NULL) {
*(void **)(&libc_write) = dlsym(RTLD_NEXT, "write");
if (libc_write == NULL) {
fprintf(stderr, "_backtrace: Error while loading write\n");
return;
}
}
/* Open file once per thread*/
if (thread_fd < 0) {
(libc_sprintf)(filename, "%s.%ld.%ld.log", "__progname",
(long) getpid(), (long) syscall(SYS_gettid));
thread_fd = (libc_open)(filename, MODE);
if (thread_fd < 0) {
fprintf(stderr, "_backtrace: Error while opening: <%s>\n", filename);
(libc_perror)("open");
return;
}
}
/* stack unwinding */
nframes = backtrace(frames, MAX_FRAMES);
(libc_sprintf)(line, " T:BT:START:%d:\n", (int) nframes - 1);
rval = libc_write(thread_fd, line, strlen(line));
if (rval != (libc_strlen)(line)) {
fprintf(stderr, "_backtrace: Error writing <%s>\n", filename);
(libc_perror)("write");
return;
}
backtrace_symbols_fd(frames, nframes, thread_fd);
}
