/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2005 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
/*
* efdaemon - Emebbed Fcode Interpreter daemon.
*
* Opens /dev/fcode, detaches from tty and reads a request. Upon successful
* return, invokes the Fcode interpreter via the shell script:
* /usr/lib/efcode/efcode.sh Waits for completion of the interpreter.
*/
#include <stdio.h>
#include <fcntl.h>
#include <unistd.h>
#include <stdlib.h>
#include <strings.h>
#include <syslog.h>
#include <errno.h>
#include <sys/wait.h>
#include <sys/fcode.h>
char efcode_sh_file[] = "/usr/lib/efcode/efcode.sh";
char dev_fcode_file[] = "/dev/fcode";
int debug = 0;
int
main(int argc, char **argv)
{
extern char *optarg;
extern int optind, opterr, optopt;
int c, fd, nbytes, status;
char tc;
pid_t pid, tpid;
long nerr = 0;
int error;
openlog("efdaemon", LOG_PID|LOG_CONS, LOG_DAEMON);
while ((c = getopt(argc, argv, "d")) != EOF) {
switch (c) {
case 'd':
debug++;
break;
case '?':
syslog(LOG_ERR, "Usage: efdaemon [ -d ]\n");
exit(1);
}
}
/*
* Ensure we can open /dev/fcode
*/
if ((fd = open(dev_fcode_file, O_RDONLY)) < 0) {
/*
* Only output message if debug is on. On most systems,
* /dev/fcode will not exist, so this message would pollute the
* console.
*/
if (debug)
syslog(LOG_ERR, "Can't open %s: %s\n", dev_fcode_file,
strerror(errno));
exit(1);
}
close(fd);
/*
* Ensure that /usr/lib/efcode/efcode.sh exists and is executable.
*/
if (access(efcode_sh_file, X_OK | R_OK)) {
syslog(LOG_ERR, "%s: %s\n", efcode_sh_file, strerror(errno));
exit(1);
}
/*
* Fork a child then parent exits so we're a child of initd.
*/
if ((pid = fork()) < 0) {
syslog(LOG_ERR, "Fork failed: %s\n", strerror(errno));
exit(1);
}
if (pid)
exit(0);
/*
* detach from tty here.
*/
setpgrp();
close(0);
close(1);
close(2);
(void) open("/dev/null", O_RDWR);
(void) dup(0);
(void) dup(0);
for (;;) {
while ((fd = open(dev_fcode_file, O_RDONLY)) < 0) {
nerr++;
if (nerr == 1)
syslog(LOG_ERR, "Can't open %s: %s\n",
dev_fcode_file, strerror(errno));
sleep(1);
}
if (nerr > 1) {
syslog(LOG_ERR, "Open on %s failed %d times\n",
dev_fcode_file, nerr);
}
nerr = 0;
nbytes = read(fd, &tc, sizeof (tc));
if (nbytes < 0) {
syslog(LOG_ERR, "Read of %s: %s\n", dev_fcode_file,
strerror(errno));
close(fd);
continue;
}
if (debug)
syslog(LOG_DEBUG, "Got request\n");
while ((pid = fork()) < 0) {
nerr++;
if (nerr == 1)
syslog(LOG_ERR, "Fork failed: %s\n",
strerror(errno));
sleep(1);
}
if ((nerr > 1) && pid) {
syslog(LOG_ERR, "Fork failed %d times\n", nerr);
}
nerr = 0;
if (pid) {
tpid = wait(&status);
if (tpid < 0)
syslog(LOG_ERR, "Wait error: %s\n",
strerror(errno));
else if (pid != tpid)
syslog(LOG_ERR, "Wait error, expect pid: %d"
" got %d, status: %x\n", pid, tpid, status);
else if (status) {
syslog(LOG_ERR, "Wait pid: %d status: %x\n",
pid, status);
if (WIFEXITED(status) &&
(WEXITSTATUS(status) == 1)) {
error = FC_FCODE_ABORT;
} else {
error = FC_EXEC_FAILED;
}
if (ioctl(fd, FC_SET_FCODE_ERROR, &error) < 0) {
syslog(LOG_ERR,
"ioctl(FC_SET_FCODE_ERROR)"
" failed\n");
}
} else if (debug)
syslog(LOG_DEBUG, "Wait: pid: %d\n", pid);
close(fd);
continue;
}
if (debug)
syslog(LOG_DEBUG, "Child: %d processing request\n",
getpid());
fcntl(fd, F_DUP2FD, 0);
while (execl("/bin/sh", "sh", efcode_sh_file, NULL)) {
nerr++;
if (nerr == 1)
syslog(LOG_ERR, "execl(/bin/sh) failed: %s\n",
strerror(errno));
sleep(1);
}
}
return (0);
}