/* $OpenBSD: systrace-translate.c,v 1.11 2002/09/30 03:45:39 itojun Exp $ */ /* * Copyright 2002 Niels Provos * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by Niels Provos. * 4. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ #include #include #include #include #include #include #include #include #include #include #include #include #include "../../sys/compat/linux/linux_types.h" #include "../../sys/compat/linux/linux_fcntl.h" #include "intercept.h" #include "systrace.h" #define FL(w,c) do { \ if (flags & (w)) \ *p++ = (c); \ } while (0) static int print_oflags(char *, size_t, struct intercept_translate *); static int linux_print_oflags(char *, size_t, struct intercept_translate *); static int print_modeflags(char *, size_t, struct intercept_translate *); static int print_number(char *, size_t, struct intercept_translate *); static int print_uname(char *, size_t, struct intercept_translate *); static int print_uname(char *, size_t, struct intercept_translate *); static int get_argv(struct intercept_translate *, int, pid_t, void *); static int print_argv(char *, size_t, struct intercept_translate *); static int print_oflags(char *buf, size_t buflen, struct intercept_translate *tl) { char str[32], *p; int flags = (intptr_t)tl->trans_addr; int isread = 0; p = str; switch (flags & O_ACCMODE) { case O_RDONLY: strcpy(p, "ro"); isread = 1; break; case O_WRONLY: strcpy(p, "wo"); break; case O_RDWR: strcpy(p, "rw"); break; default: strcpy(p, "--"); break; } /* XXX - Open handling of alias */ if (isread) systrace_switch_alias("native", "open", "native", "fsread"); else systrace_switch_alias("native", "open", "native", "fswrite"); p += 2; FL(O_NONBLOCK, 'n'); FL(O_APPEND, 'a'); FL(O_CREAT, 'c'); FL(O_TRUNC, 't'); *p = '\0'; strlcpy(buf, str, buflen); return (0); } static int linux_print_oflags(char *buf, size_t buflen, struct intercept_translate *tl) { char str[32], *p; int flags = (intptr_t)tl->trans_addr; int isread = 0; p = str; switch (flags & LINUX_O_ACCMODE) { case LINUX_O_RDONLY: strcpy(p, "ro"); isread = 1; break; case LINUX_O_WRONLY: strcpy(p, "wo"); break; case LINUX_O_RDWR: strcpy(p, "rw"); break; default: strcpy(p, "--"); break; } /* XXX - Open handling of alias */ if (isread) systrace_switch_alias("linux", "open", "linux", "fsread"); else systrace_switch_alias("linux", "open", "linux", "fswrite"); p += 2; FL(LINUX_O_APPEND, 'a'); FL(LINUX_O_CREAT, 'c'); FL(LINUX_O_TRUNC, 't'); *p = '\0'; strlcpy(buf, str, buflen); return (0); } static int print_modeflags(char *buf, size_t buflen, struct intercept_translate *tl) { int mode = (intptr_t)tl->trans_addr; mode &= 00007777; snprintf(buf, buflen, "%o", mode); return (0); } static int print_number(char *buf, size_t buflen, struct intercept_translate *tl) { int number = (intptr_t)tl->trans_addr; snprintf(buf, buflen, "%d", number); return (0); } static int print_uname(char *buf, size_t buflen, struct intercept_translate *tl) { struct passwd *pw; uid_t uid = (intptr_t)tl->trans_addr; pw = getpwuid(uid); snprintf(buf, buflen, "%s", pw != NULL ? pw->pw_name : ""); return (0); } static int get_argv(struct intercept_translate *trans, int fd, pid_t pid, void *addr) { char *arg; char buf[_POSIX2_LINE_MAX], *p; int i, off = 0, len; extern struct intercept_system intercept; i = 0; buf[0] = '\0'; while (1) { if (intercept.io(fd, pid, INTERCEPT_READ, (char *)addr + off, (void *)&arg, sizeof(char *)) == -1) { warn("%s: ioctl", __func__); return (-1); } if (arg == NULL) break; p = intercept_get_string(fd, pid, arg); if (p == NULL) return (-1); if (i > 0) strlcat(buf, " ", sizeof(buf)); strlcat(buf, p, sizeof(buf)); off += sizeof(char *); i++; } len = strlen(buf) + 1; trans->trans_data = malloc(len); if (trans->trans_data == NULL) return (-1); /* XXX - No argument replacement */ trans->trans_size = 0; memcpy(trans->trans_data, buf, len); return (0); } static int print_argv(char *buf, size_t buflen, struct intercept_translate *tl) { snprintf(buf, buflen, "%s", (char *)tl->trans_data); return (0); } struct intercept_translate trargv = { "argv", get_argv, print_argv, }; struct intercept_translate oflags = { "oflags", NULL, print_oflags, }; struct intercept_translate linux_oflags = { "oflags", NULL, linux_print_oflags, }; struct intercept_translate modeflags = { "mode", NULL, print_modeflags, }; struct intercept_translate uidt = { "uid", NULL, print_number, }; struct intercept_translate uname = { "uname", NULL, print_uname, }; struct intercept_translate gidt = { "gid", NULL, print_number, }; struct intercept_translate fdt = { "fd", NULL, print_number, };