/* -*-c-*-
- *
- * $Id: exec.c,v 1.1 1999/07/26 23:33:32 mdw Exp $
*
* Source and target for executable programs
*
* (c) 1999 Straylight/Edgeware
*/
-/*----- Licensing notice --------------------------------------------------*
+/*----- Licensing notice --------------------------------------------------*
*
- * This file is part of the `fw' port forwarder.
+ * This file is part of the `fwd' port forwarder.
*
- * `fw' is free software; you can redistribute it and/or modify
+ * `fwd' 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 2 of the License, or
* (at your option) any later version.
- *
- * `fw' is distributed in the hope that it will be useful,
+ *
+ * `fwd' 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.
- *
+ *
* You should have received a copy of the GNU General Public License
- * along with `fw'; if not, write to the Free Software Foundation,
+ * along with `fwd'; if not, write to the Free Software Foundation,
* Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
-/*----- Revision history --------------------------------------------------*
- *
- * $Log: exec.c,v $
- * Revision 1.1 1999/07/26 23:33:32 mdw
- * New sources and targets.
- *
- */
-
-/*----- Header files ------------------------------------------------------*/
-
-#include "config.h"
-
-#define _GNU_SOURCE
-
-#include <ctype.h>
-#include <errno.h>
-#include <signal.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <unistd.h>
-#include <fcntl.h>
-#include <sys/wait.h>
-
-#ifdef HAVE_SETRLIMIT
-# include <sys/resource.h>
-#endif
-
-#ifndef DECL_ENVIRON
- extern char **environ;
-#endif
-
-#include <pwd.h>
-#include <grp.h>
-
-#include <syslog.h>
-
-#include <mLib/alloc.h>
-#include <mLib/dstr.h>
-#include <mLib/env.h>
-#include <mLib/fdflags.h>
-#include <mLib/report.h>
-#include <mLib/sel.h>
-#include <mLib/selbuf.h>
-#include <mLib/sig.h>
-#include <mLib/sub.h>
-#include <mLib/sym.h>
-
-#include "conf.h"
-#include "endpt.h"
-#include "exec.h"
-#include "fattr.h"
-#include "fw.h"
-#include "reffd.h"
-#include "scan.h"
-#include "source.h"
-#include "target.h"
+#include "fwd.h"
/*----- Data structures ---------------------------------------------------*/
#ifdef HAVE_SETRLIMIT
typedef struct xlimit {
-#define R(r, n) struct rlimit n;
-#include "rlimits.h"
+#define XLIMIT_ENTRY(name, constant) struct rlimit name;
+ RLIMITS(XLIMIT_ENTRY)
+#undef XLIMIT_ENTRY
} xlimit;
#endif
endpt e;
struct xept *next, *prev;
pid_t kid;
- const char *desc;
+ endpt *f;
+ char *desc;
int st;
xargs *xa;
xopts *xo;
} rlimit_ent;
static rlimit_ent rlimits[] = {
-#define R(r, n) { #n, #r, r, offsetof(xlimit, n) },
-#include "rlimits.h"
+#define TABLE_ENTRY(name, constant) \
+ { #name, #constant, constant, offsetof(xlimit, name) },
+ RLIMITS(TABLE_ENTRY)
+#undef TABLE_ENTRY
{ 0, 0, 0, 0 }
};
break;
case w_soft:
if (v > rl->rlim_max)
- error(sc, "soft limit %l exceeds hard limit %l for %s",
- v, rl->rlim_max, chosen->rname);
+ error(sc, "soft limit %lu exceeds hard limit %lu for %s",
+ (unsigned long)v, (unsigned long)rl->rlim_max,
+ chosen->rname);
rl->rlim_cur = v;
break;
case w_hard:
while (xe) {
xenv *xxe = xe;
xe = xe->next;
- free(xxe->name);
+ xfree(xxe->name);
if (xxe->value)
- free(xxe->value);
+ xfree(xxe->value);
DESTROY(xxe);
}
}
{
xa->ref--;
if (!xa->ref)
- free(xa);
+ xfree(xa);
xo->ref--;
if (!xo->ref) {
/* --- @attach@ --- */
-static void xept_error(char */*p*/, void */*v*/);
+static void xept_error(char */*p*/, size_t /*len*/, void */*v*/);
static void xept_attach(endpt *e, reffd *in, reffd *out)
{
/* --- Make a pipe for standard error --- */
if (pipe(fd)) {
- fw_log(-1, "[%s] couldn't create pipe: %s", xe->desc, strerror(errno));
+ fw_log(NOW, "[%s] couldn't create pipe: %s", xe->desc, strerror(errno));
return;
}
fdflags(fd[0], O_NONBLOCK, O_NONBLOCK, FD_CLOEXEC, FD_CLOEXEC);
/* --- Fork a child, and handle an error if there was one --- */
if ((kid = fork()) == -1) {
- fw_log(-1, "[%s] couldn't fork: %s", xe->desc, strerror(errno));
+ fw_log(NOW, "[%s] couldn't fork: %s", xe->desc, strerror(errno));
close(fd[0]);
close(fd[1]);
return;
if (kid == 0) {
xopts *xo = xe->xo;
+ mdup_fd md[3];
/* --- Fiddle with the file descriptors --- *
*
*/
close(fd[0]);
- if (dup2(in->fd, STDIN_FILENO) < 0 ||
- dup2(out->fd, STDOUT_FILENO) < 0 ||
- dup2(fd[1], STDERR_FILENO) < 0) {
+ md[0].cur = in->fd; md[0].want = STDIN_FILENO;
+ md[1].cur = out->fd; md[1].want = STDOUT_FILENO;
+ md[2].cur = fd[1]; md[2].want = STDERR_FILENO;
+ if (mdup(md, 3)) {
moan("couldn't manipulate file descriptors: %s", strerror(errno));
_exit(1);
}
- if (in->fd > 2)
- close(in->fd);
- if (out->fd > 2)
- close(out->fd);
-
fdflags(STDIN_FILENO, O_NONBLOCK, 0, FD_CLOEXEC, 0);
fdflags(STDOUT_FILENO, O_NONBLOCK, 0, FD_CLOEXEC, 0);
fdflags(STDERR_FILENO, O_NONBLOCK, 0, FD_CLOEXEC, 0);
/* --- Set group id --- */
- if (xo->gid != -1) {
+ if (xo->gid != (gid_t)-1) {
if (setgid(xo->gid)) {
moan("couldn't set gid %i: %s", xo->gid, strerror(errno));
_exit(1);
/* --- Set uid --- */
- if (xo->uid != -1) {
+ if (xo->uid != (uid_t)-1) {
if (setuid(xo->uid)) {
moan("couldn't set uid %i: %s", xo->uid, strerror(errno));
_exit(1);
xept_list->prev = xe;
xept_list = xe;
if (!(xe->xo->f & XF_NOLOG))
- fw_log(-1, "[%s] started with pid %i", xe->desc, kid);
+ fw_log(NOW, "[%s] started with pid %i", xe->desc, kid);
fw_inc();
return;
}
+/* --- @xept_file@ --- */
+
+static void xept_file(endpt *e, endpt *f)
+{
+ xept *xe = (xept *)e;
+ xe->f = f;
+}
+
/* --- @xept_close@ --- */
static void xept_close(endpt *e)
{
xept *xe = (xept *)e;
if (xe->kid == -1) {
+ if (xe->f)
+ xe->f->ops->close(xe->f);
x_tidy(xe->xa, xe->xo);
DESTROY(xe);
fw_dec();
/* Nothin' doin' */;
else if (WIFEXITED(xe->st)) {
if (WEXITSTATUS(xe->st) == 0)
- fw_log(-1, "[%s] pid %i exited successfully", xe->desc, xe->kid);
+ fw_log(NOW, "[%s] pid %i exited successfully", xe->desc, xe->kid);
else {
- fw_log(-1, "[%s] pid %i failed: status %i",
+ fw_log(NOW, "[%s] pid %i failed: status %i",
xe->desc, xe->kid, WEXITSTATUS(xe->st));
}
} else if (WIFSIGNALED(xe->st)) {
sprintf(buf, "signal %i", WTERMSIG(xe->st));
s = buf;
#endif
- fw_log(-1, "[%s] pid %i failed: %s", xe->desc, xe->kid, s);
+ fw_log(NOW, "[%s] pid %i failed: %s", xe->desc, xe->kid, s);
} else
- fw_log(-1, "[%s] pid %i failed: unrecognized status", xe->desc, xe->kid);
+ fw_log(NOW, "[%s] pid %i failed: unrecognized status",
+ xe->desc, xe->kid);
/* --- Free up the parent-side resources --- */
else
xept_list = xe->next;
+ xfree(xe->desc);
+ if (xe->f)
+ xe->f->ops->close(xe->f);
x_tidy(xe->xa, xe->xo);
fw_dec();
DESTROY(xe);
/* --- @xept_error@ --- *
*
* Arguments: @char *p@ = pointer to string read from stderr
+ * @size_t len@ = length of the string
* @void *v@ = pointer to by endpoint
*
* Returns: ---
* Use: Handles error reports from a child process.
*/
-static void xept_error(char *p, void *v)
+static void xept_error(char *p, size_t len, void *v)
{
xept *xe = v;
if (p)
- fw_log(-1, "[%s] pid %i: %s", xe->desc, xe->kid, p);
+ fw_log(NOW, "[%s] pid %i: %s", xe->desc, xe->kid, p);
else {
- selbuf_disable(&xe->err);
close(xe->err.reader.fd);
+ selbuf_destroy(&xe->err);
xe->e.f |= XEF_CLOSE;
if (xe->e.f & XEF_EXIT)
xept_destroy(xe);
/* --- Endpoint operations --- */
-static endpt_ops xept_ops = { xept_attach, 0, xept_close };
+static endpt_ops xept_ops = { xept_attach, xept_file, 0, xept_close };
/*----- General operations on sources and targets -------------------------*/
void exec_init(void)
{
+#ifdef HAVE_SETRLIMIT
rlimit_get(&exec_opts.xl);
+#endif
sig_add(&xept_sig, SIGCHLD, xept_chld, 0);
sym_create(&env);
env_import(&env, environ);
token(sc);
if (sc->t == '=')
token(sc);
- conf_name(sc, '/', &d);
+ conf_fname(sc, &d);
xo->dir = xstrdup(d.buf);
dstr_destroy(&d);
CONF_ACCEPT;
/* --- Set a chroot prison --- */
if (strcmp(sc->d.buf, "root") == 0 ||
- strcmp(sc->d.buf, "chroot") == 0) {
+ strcmp(sc->d.buf, "chroot") == 0) {
dstr d = DSTR_INIT;
token(sc);
if (sc->t == '=')
token(sc);
- conf_name(sc, '/', &d);
+ conf_fname(sc, &d);
xo->root = xstrdup(d.buf);
dstr_destroy(&d);
CONF_ACCEPT;
/* --- Now try resource limit settings --- */
+#ifdef HAVE_SETRLIMIT
if (rlimit_option(&xo->xl, sc))
CONF_ACCEPT;
+#endif
/* --- And then environment settings --- */
char *p, *q;
char **v;
- /* --- Strip off the leading `[' --- */
+ /* --- Strip off the leading `[' --- *
+ *
+ * Allow various handy filename characters to be entered without quoting.
+ */
+ conf_undelim(sc, "=:/.", "=:/.");
token(sc);
/* --- Read a sequence of arguments --- */
token(sc);
argc++;
}
+ conf_undelim(sc, 0, 0);
/* --- Expect the closing `]' --- */
xe->xa = x->xa; xe->xa->ref++;
xe->xo = x->xo; xe->xo->ref++;
xe->kid = -1;
- xe->desc = desc;
+ xe->f = 0;
+ xe->desc = xstrdup(desc);
return (&xe->e);
}
ee->ops->close(ee);
goto tidy;
}
- endpt_join(e, ee);
+ endpt_join(e, ee, xs->s.desc);
/* --- Dispose of source and target --- */
static void xsource_destroy(source *s)
{
xsource *xs = (xsource *)s;
+ xfree(xs->s.desc);
exec_destroy(&xs->x);
DESTROY(xs);
}
static void xtarget_destroy(target *t)
{
xtarget *xt = (xtarget *)t;
+ xfree(xt->t.desc);
exec_destroy(&xt->x);
DESTROY(xt);
}
target_ops xtarget_ops = {
"exec",
- xtarget_option, xtarget_read, xtarget_create, xtarget_destroy
+ xtarget_option, xtarget_read, 0, xtarget_create, xtarget_destroy
};
/*----- That's all, folks -------------------------------------------------*/