File: shell.c

package info (click to toggle)
diald 0.99.4-7.1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 1,100 kB
  • ctags: 935
  • sloc: ansic: 7,109; tcl: 977; sh: 880; perl: 306; makefile: 109
file content (156 lines) | stat: -rw-r--r-- 3,345 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
/*
 * shell.c - Call external programs via the shell.
 *
 * Copyright (c) 1999 Mike Jagdis.
 * All rights reserved. Please see the file LICENSE which should be
 * distributed with this software for terms of use.
 */

#include "diald.h"


int
run_shell(int mode, const char *name, const char *buf, int d)
{
    int d2, p[2];
    pid_t pid;
    FILE *fd;

    block_signals();
    if (debug&DEBUG_VERBOSE)
	mon_syslog(LOG_DEBUG,"running '%s'",buf);

    if (pipe(p))
	p[0] = p[1] = -1;

    pid = fork();

    if (pid < 0) {
	unblock_signals();
        mon_syslog(LOG_ERR, "failed to fork and run '%s': %m",buf);
	return -1;
    }

    if (pid == 0) {
	if (d >= 0) {
	    /* Run in a new process group and foreground ourselves
	     * on the tty (SIGTTOU is ignored).
	     * N.B. If we are in dev mode we have /dev/null and
	     * not a serial line...
	     */
	    setpgrp();
	    if (tcsetpgrp(d, getpid()) < 0 && errno != ENOTTY)
		mon_syslog(LOG_ERR, "dial: failed to set pgrp: %m");
	} else {
	    setsid();    /* No controlling tty. */
	    umask (S_IRWXG|S_IRWXO);
	    chdir ("/"); /* no current directory. */
	}

        /* change the signal actions back to the defaults, then unblock them. */
        default_sigacts();
	unblock_signals();

#if 0
	proxy_close();
#endif
	/* make sure the stdin, stdout and stderr get directed to /dev/null */
	if (p[0] >= 0) close(p[0]);
	d2 = open("/dev/null", O_RDWR);
        if (d >= 0) {
            dup2((p[1] >= 0 ? p[1] : d2), 2);
	    close(d2);
	    if (d != 0) {
	    	dup2(d, 0);
		close(d);
	    } else {
		fcntl(d, F_SETFD, 0);
	    }
	    dup2(0, 1);
        } else {
	    if (d2 != 0) {
	    	dup2(d2, 0);
		close(d2);
	    }
	    dup2((p[1] >= 0 ? p[1] : 0), 1);
            dup2((p[1] >= 0 ? p[1] : 0), 2);
	}

	/* set the current device (compat) */
	if (current_dev)
	    setenv("MODEM", current_dev, 1);

	/* set the current command FIFO (if any) */
	if (fifoname)
	    setenv("FIFO", fifoname, 1);

	if (current_dev)
	    setenv("DIALD_DEVICE", current_dev, 1);
	if (link_name)
	    setenv("DIALD_LINK", link_name, 1);

        execl("/bin/sh", "sh", "-c", buf, (char *)0);
        mon_syslog(LOG_ERR, "could not exec /bin/sh: %m");
        _exit(127);
        /* NOTREACHED */
    }

    if (p[1] >= 0) close(p[1]);

    if (mode & SHELL_WAIT) {
	running_pid = pid;

	if (p[0] >= 0 && (fd = fdopen(p[0], "r"))) {
	    char buf[1024];

	    while (fgets(buf, sizeof(buf)-1, fd)) {
		buf[sizeof(buf)-1] = '\0';
		mon_syslog(LOG_INFO, "%s: %s", name, buf);
	    }

	    fclose(fd);
	}

	unblock_signals();

	while (running_pid)
	    pause();
	return running_status;
    }

    if (p[0] >= 0) {
	PIPE *ctrl_p;

	if ((ctrl_p = malloc(sizeof(PIPE)))) {
	    pipe_init((char *)name, 0, p[0], ctrl_p, 0);
	    FD_SET(p[0], &ctrl_fds);
	} else
	    close(p[0]);
    }

    unblock_signals();
    return pid;
}


void
run_state_script(char *name, char *script, int background)
{
    char buf[1024];

    snprintf(buf, sizeof(buf)-1, "%s '%s' '%s' '%s' '%s'",
	script,
	snoop_dev,
	netmask ? netmask : "255.255.255.255",
	local_ip,
	remote_ip);
    buf[sizeof(buf)-1] = '\0';

    if (debug&DEBUG_VERBOSE)
	mon_syslog(LOG_INFO,"running %s script '%s'", name, buf);

    if (background)
	running_pid = run_shell(SHELL_NOWAIT, name, buf, -1);
    else
	run_shell(SHELL_WAIT, name, buf, -1);
}