/*
* ----- static int checkInodesFile(struct FsInfo *fp)
*
* Use the ls command to check the existence of .inodes in the target
* filesystem.
*
* Returns:
*
*
* -1 : Out of memory error in creating command string
* 0 : Success
* non-zero: Failure of the ls command
*/
static int
checkInodesFile(struct FsInfo *fp)
{
int l, rc;
char cmd[MAXPATHLEN+64];
scds_syslog_debug(DBG_LVL_HIGH, "checkInodesFile - Begin");
l = snprintf(cmd, sizeof (cmd), "/bin/ls -l %s/.inodes", fp->fi_mntpt);
if (l >= sizeof (cmd)) {
scds_syslog(LOG_ERR, "%s: mount pathname too long", fp->fi_fs);
scds_syslog_debug(DBG_LVL_HIGH,
"checkInodesFile - End/Err");
return (1);
}
/* Suppress ls command output */
closefds();
rc = run_system(LOG_ERR, cmd);
scds_syslog_debug(DBG_LVL_HIGH, "checkInodesFile - End");
return (rc);
}
/* Function for opening subprocesses. Returns 0 on success and -1 on failure.
On failure, errmsg_out shall contain a '\0'-terminated error message. */
static int dopopen(const char *const *args, /* program arguments with NULL sentinel */
const char *executable, /* actual executable */
struct fdinfo fdinfo[3], /* info for stdin/stdout/stderr */
int close_fds, /* 1 to close all fds */
int binary, /* 1 to use binary files */
const char *cwd, /* working directory for program */
struct proc *proc, /* populated on success! */
FILE *pipe_ends_out[3], /* pipe ends are put here */
char errmsg_out[], /* written to on failure */
size_t errmsg_len /* length of errmsg_out (EXCLUDING sentinel) */
)
#if defined(OS_POSIX)
{
int fds[3];
int i;
struct fdinfo *fdi;
int piperw[2];
int errpipe[2]; /* pipe for returning error status */
int flags;
int en; /* saved errno */
int count;
pid_t pid;
errmsg_out[errmsg_len] = '\0';
for (i=0; i<3; ++i)
pipe_ends_out[i] = NULL;
/* Manage stdin/stdout/stderr */
for (i=0; i<3; ++i){
fdi = &fdinfo[i];
switch (fdi->mode){
case FDMODE_INHERIT:
inherit:
fds[i] = dup(i);
if (fds[i] == -1){
fd_failure:
strncpy(errmsg_out, strerror(errno), errmsg_len + 1);
closefds(fds, i);
closefiles(pipe_ends_out, i);
return -1;
}
break;
case FDMODE_FILENAME:
if (i == STDIN_FILENO){
if ((fds[i] = open(fdi->info.filename, O_RDONLY)) == -1) goto fd_failure;
} else {
if ((fds[i] = creat(fdi->info.filename, 0666)) == -1) goto fd_failure;
}
break;
case FDMODE_FILEDES:
if ((fds[i] = dup(fdi->info.filedes)) == -1) goto fd_failure;
break;
case FDMODE_FILEOBJ:
if ((fds[i] = dup(fileno(fdi->info.fileobj))) == -1) goto fd_failure;
break;
case FDMODE_PIPE:
if (pipe(piperw) == -1) goto fd_failure;
if (i == STDIN_FILENO){
fds[i] = piperw[0]; /* give read end to process */
if ((pipe_ends_out[i] = fdopen(piperw[1], "w")) == NULL) goto fd_failure;
} else {
fds[i] = piperw[1]; /* give write end to process */
if ((pipe_ends_out[i] = fdopen(piperw[0], "r")) == NULL) goto fd_failure;
}
break;
case FDMODE_STDOUT:
if (i == STDERR_FILENO){
if ((fds[STDERR_FILENO] = dup(fds[STDOUT_FILENO])) == -1) goto fd_failure;
} else goto inherit;
break;
}
}
/* Find executable name */
if (!executable){
/* use first arg */
executable = args[0];
}
assert(executable != NULL);
/* Create a pipe for returning error status */
if (pipe(errpipe) == -1){
strncpy(errmsg_out, strerror(errno), errmsg_len + 1);
closefds(fds, 3);
closefiles(pipe_ends_out, 3);
return -1;
}
/* Make write end close on exec */
flags = fcntl(errpipe[1], F_GETFD);
if (flags == -1){
pipe_failure:
strncpy(errmsg_out, strerror(errno), errmsg_len + 1);
closefds(errpipe, 2);
closefds(fds, 3);
closefiles(pipe_ends_out, 3);
return -1;
}
if (fcntl(errpipe[1], F_SETFD, flags | FD_CLOEXEC) == -1) goto pipe_failure;
/* Do the fork/exec (TODO: use vfork somehow?) */
pid = fork();
if (pid == -1) goto pipe_failure;
else if (pid == 0){
/* child */
close(errpipe[0]);
/* dup file descriptors */
for (i=0; i<3; ++i){
if (dup2(fds[i], i) == -1) goto child_failure;
}
/* close other fds */
if (close_fds){
for (i=3; i<sysconf(_SC_OPEN_MAX); ++i){
if (i != errpipe[1])
close(i);
}
}
/* change directory */
if (cwd && chdir(cwd)) goto child_failure;
/* exec! Farewell, subprocess.c! */
execvp(executable, (char *const*) args); /* XXX: const cast */
/* Oh dear, we're still here. */
child_failure:
en = errno;
write(errpipe[1], &en, sizeof en);
_exit(1);
}
/* parent */
/* close unneeded fds */
closefds(fds, 3);
close(errpipe[1]);
/* read errno from child */
while ((count = read(errpipe[0], &en, sizeof en)) == -1)
if (errno != EAGAIN && errno != EINTR) break;
if (count > 0){
/* exec failed */
close(errpipe[0]);
strncpy(errmsg_out, strerror(en), errmsg_len + 1);
return -1;
}
close(errpipe[0]);
/* Child is now running */
proc->done = 0;
proc->pid = pid;
return 0;
}
int
main (int argc, char **argv)
{
int msgp = 0, distsw = 0, vecp;
int isdf = 0, mime = 0;
int msgnum, status;
char *cp, *dfolder = NULL, *maildir = NULL;
char buf[BUFSIZ], **ap, **argp, **arguments, *program;
char *msgs[MAXARGS], **vec;
struct msgs *mp;
struct stat st;
if (nmh_init(argv[0], 1)) { return 1; }
arguments = getarguments (invo_name, argc, argv, 1);
argp = arguments;
vec = argsplit(postproc, &program, &vecp);
vec[vecp++] = "-library";
vec[vecp++] = getcpy (m_maildir (""));
if ((cp = context_find ("fileproc"))) {
vec[vecp++] = "-fileproc";
vec[vecp++] = cp;
}
if ((cp = context_find ("mhlproc"))) {
vec[vecp++] = "-mhlproc";
vec[vecp++] = cp;
}
if ((cp = context_find ("credentials"))) {
/* post doesn't read context so need to pass credentials. */
vec[vecp++] = "-credentials";
vec[vecp++] = cp;
}
while ((cp = *argp++)) {
if (*cp == '-') {
switch (smatch (++cp, switches)) {
case AMBIGSW:
ambigsw (cp, switches);
done (1);
case UNKWNSW:
adios (NULL, "-%s unknown\n", cp);
case HELPSW:
snprintf (buf, sizeof(buf), "%s [file] [switches]", invo_name);
print_help (buf, switches, 1);
done (0);
case VERSIONSW:
print_version(invo_name);
done (0);
case DRAFTSW:
msgs[msgp++] = draft;
continue;
case DFOLDSW:
if (dfolder)
adios (NULL, "only one draft folder at a time!");
if (!(cp = *argp++) || *cp == '-')
adios (NULL, "missing argument to %s", argp[-2]);
dfolder = path (*cp == '+' || *cp == '@' ? cp + 1 : cp,
*cp != '@' ? TFOLDER : TSUBCWF);
continue;
case DMSGSW:
if (!(cp = *argp++) || *cp == '-')
adios (NULL, "missing argument to %s", argp[-2]);
msgs[msgp++] = cp;
continue;
case NDFLDSW:
dfolder = NULL;
isdf = NOTOK;
continue;
case PUSHSW:
pushsw++;
continue;
case NPUSHSW:
pushsw = 0;
continue;
case SPLITSW:
if (!(cp = *argp++) || sscanf (cp, "%d", &splitsw) != 1)
adios (NULL, "missing argument to %s", argp[-2]);
continue;
case UNIQSW:
unique++;
continue;
case NUNIQSW:
unique = 0;
continue;
case FORWSW:
forwsw++;
continue;
case NFORWSW:
forwsw = 0;
continue;
case VERBSW:
verbsw++;
vec[vecp++] = --cp;
continue;
case NVERBSW:
verbsw = 0;
vec[vecp++] = --cp;
continue;
case MIMESW:
mime++;
vec[vecp++] = --cp;
continue;
case NMIMESW:
mime = 0;
vec[vecp++] = --cp;
continue;
case DEBUGSW:
debugsw++; /* fall */
case NFILTSW:
case FRMTSW:
case NFRMTSW:
case BITSTUFFSW:
case NBITSTUFFSW:
case MSGDSW:
case NMSGDSW:
case WATCSW:
case NWATCSW:
case SNOOPSW:
case SASLSW:
case NOSASLSW:
case TLSSW:
case INITTLSSW:
case NTLSSW:
vec[vecp++] = --cp;
continue;
case ALIASW:
case FILTSW:
case WIDTHSW:
case CLIESW:
case SERVSW:
case SASLMECHSW:
case SASLMXSSFSW:
case USERSW:
case PORTSW:
case MTSSW:
case MESSAGEIDSW:
vec[vecp++] = --cp;
if (!(cp = *argp++) || *cp == '-')
adios (NULL, "missing argument to %s", argp[-2]);
vec[vecp++] = cp;
continue;
case ATTACHSW:
advise(NULL, "The -attach switch is deprecated");
continue;
case NOATTACHSW:
advise(NULL, "The -noattach switch is deprecated");
continue;
case ATTACHFORMATSW:
advise(NULL, "The -attachformat switch is deprecated");
continue;
}
} else {
msgs[msgp++] = cp;
}
}
/*
* check for "Aliasfile:" profile entry
*/
if ((cp = context_find ("Aliasfile"))) {
char *dp = NULL;
for (ap = brkstring(dp = getcpy(cp), " ", "\n"); ap && *ap; ap++) {
vec[vecp++] = "-alias";
vec[vecp++] = *ap;
}
}
if (dfolder == NULL) {
if (msgp == 0) {
msgs[msgp++] = getcpy (m_draft (NULL, NULL, 1, &isdf));
if (stat (msgs[0], &st) == NOTOK)
adios (msgs[0], "unable to stat draft file");
cp = concat ("Use \"", msgs[0], "\"? ", NULL);
for (status = LISTDSW; status != YESW;) {
if (!(argp = getans (cp, anyl)))
done (1);
switch (status = smatch (*argp, anyl)) {
case NOSW:
done (0);
case YESW:
break;
case LISTDSW:
showfile (++argp, msgs[0]);
break;
default:
advise (NULL, "say what?");
break;
}
}
} else {
for (msgnum = 0; msgnum < msgp; msgnum++)
msgs[msgnum] = getcpy (m_maildir (msgs[msgnum]));
}
} else {
if (!context_find ("path"))
free (path ("./", TFOLDER));
if (!msgp)
msgs[msgp++] = "cur";
maildir = m_maildir (dfolder);
if (chdir (maildir) == NOTOK)
adios (maildir, "unable to change directory to");
/* read folder and create message structure */
if (!(mp = folder_read (dfolder, 1)))
adios (NULL, "unable to read folder %s", dfolder);
/* check for empty folder */
if (mp->nummsg == 0)
adios (NULL, "no messages in %s", dfolder);
/* parse all the message ranges/sequences and set SELECTED */
for (msgnum = 0; msgnum < msgp; msgnum++)
if (!m_convert (mp, msgs[msgnum]))
done (1);
seq_setprev (mp); /* set the previous-sequence */
for (msgp = 0, msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) {
if (is_selected (mp, msgnum)) {
msgs[msgp++] = getcpy (m_name (msgnum));
unset_exists (mp, msgnum);
}
}
mp->msgflags |= SEQMOD;
seq_save (mp);
}
#ifdef WHATNOW
go_to_it:
#endif /* WHATNOW */
if ((cp = getenv ("SIGNATURE")) == NULL || *cp == 0)
if ((cp = context_find ("signature")) && *cp)
m_putenv ("SIGNATURE", cp);
for (msgnum = 0; msgnum < msgp; msgnum++)
if (stat (msgs[msgnum], &st) == NOTOK)
adios (msgs[msgnum], "unable to stat draft file");
if ((annotext = getenv ("mhannotate")) == NULL || *annotext == 0)
annotext = NULL;
if (annotext && ((cp = getenv ("mhinplace")) != NULL && *cp != 0))
inplace = atoi (cp);
if ((altmsg = getenv ("mhaltmsg")) == NULL || *altmsg == 0)
altmsg = NULL; /* used by dist interface - see below */
if ((cp = getenv ("mhdist"))
&& *cp
&& (distsw = atoi (cp))
&& altmsg) {
vec[vecp++] = "-dist";
if ((cp = m_mktemp2(altmsg, invo_name, NULL, NULL)) == NULL) {
adios(NULL, "unable to create temporary file in %s",
get_temp_dir());
}
distfile = getcpy (cp);
(void) m_unlink(distfile);
if (link (altmsg, distfile) == NOTOK) {
/* Cygwin with FAT32 filesystem produces EPERM. */
if (errno != EXDEV && errno != EPERM
#ifdef EISREMOTE
&& errno != EISREMOTE
#endif /* EISREMOTE */
)
adios (distfile, "unable to link %s to", altmsg);
free (distfile);
if ((cp = m_mktemp2(NULL, invo_name, NULL, NULL)) == NULL) {
adios(NULL, "unable to create temporary file in %s",
get_temp_dir());
}
distfile = getcpy (cp);
{
int in, out;
struct stat st;
if ((in = open (altmsg, O_RDONLY)) == NOTOK)
adios (altmsg, "unable to open");
fstat(in, &st);
if ((out = creat (distfile, (int) st.st_mode & 0777)) == NOTOK)
adios (distfile, "unable to write");
cpydata (in, out, altmsg, distfile);
close (in);
close (out);
}
}
} else {
distfile = NULL;
}
if (altmsg == NULL || stat (altmsg, &st) == NOTOK) {
st.st_mtime = 0;
st.st_dev = 0;
st.st_ino = 0;
}
if (pushsw)
push ();
status = 0;
closefds (3);
for (msgnum = 0; msgnum < msgp; msgnum++) {
switch (sendsbr (vec, vecp, program, msgs[msgnum], &st, 1)) {
case DONE:
done (++status);
case NOTOK:
status++; /* fall */
case OK:
break;
}
}
context_save (); /* save the context file */
done (status);
return 1;
}
int
main (int argc, char **argv)
{
pid_t child_id = OK;
int i, status, isdf = 0;
int distsw = 0, vecp = 0;
char *cp, *dfolder = NULL, *dmsg = NULL;
char *msg = NULL, **ap, **argp, backup[BUFSIZ];
char buf[BUFSIZ], **arguments, *vec[MAXARGS];
if (nmh_init(argv[0], 1)) { return 1; }
arguments = getarguments (invo_name, argc, argv, 1);
argp = arguments;
vec[vecp++] = invo_name;
vec[vecp++] = "-whom";
vec[vecp++] = "-library";
vec[vecp++] = getcpy (m_maildir (""));
/* Don't need to feed fileproc or mhlproc to post because
it doesn't use them when used for whom. */
while ((cp = *argp++)) {
if (*cp == '-') {
switch (smatch (++cp, switches)) {
case AMBIGSW:
ambigsw (cp, switches);
done (1);
case UNKWNSW:
adios (NULL, "-%s unknown", cp);
case HELPSW:
snprintf (buf, sizeof(buf), "%s [switches] [file]", invo_name);
print_help (buf, switches, 1);
done (0);
case VERSIONSW:
print_version(invo_name);
done (0);
case CHKSW:
case NOCHKSW:
case SNOOPSW:
case SASLSW:
case TLSSW:
case INITTLSSW:
case NTLSSW:
vec[vecp++] = --cp;
continue;
case DRAFTSW:
msg = draft;
continue;
case DFOLDSW:
if (dfolder)
adios (NULL, "only one draft folder at a time!");
if (!(cp = *argp++) || *cp == '-')
adios (NULL, "missing argument to %s", argp[-2]);
dfolder = path (*cp == '+' || *cp == '@' ? cp + 1 : cp,
*cp != '@' ? TFOLDER : TSUBCWF);
continue;
case DMSGSW:
if (dmsg)
adios (NULL, "only one draft message at a time!");
if (!(dmsg = *argp++) || *dmsg == '-')
adios (NULL, "missing argument to %s", argp[-2]);
continue;
case NDFLDSW:
dfolder = NULL;
isdf = NOTOK;
continue;
case ALIASW:
case CLIESW:
case SERVSW:
case USERSW:
case PORTSW:
case SASLMECHSW:
case MTSSW:
vec[vecp++] = --cp;
if (!(cp = *argp++) || *cp == '-')
adios (NULL, "missing argument to %s", argp[-2]);
vec[vecp++] = cp;
continue;
}
}
if (msg)
adios (NULL, "only one draft at a time!");
else
vec[vecp++] = msg = cp;
}
/* allow Aliasfile: profile entry */
if ((cp = context_find ("Aliasfile"))) {
char *dp = NULL;
for (ap = brkstring(dp = getcpy(cp), " ", "\n"); ap && *ap; ap++) {
vec[vecp++] = "-alias";
vec[vecp++] = *ap;
}
}
if (msg == NULL) {
cp = getcpy (m_draft (dfolder, dmsg, 1, &isdf));
msg = vec[vecp++] = cp;
}
if ((cp = getenv ("mhdist"))
&& *cp
&& (distsw = atoi (cp))
&& (cp = getenv ("mhaltmsg"))
&& *cp) {
if (distout (msg, cp, backup) == NOTOK)
done (1);
vec[vecp++] = "-dist";
distsw++;
}
vec[vecp] = NULL;
closefds (3);
if (distsw) {
for (i = 0; (child_id = fork()) == NOTOK && i < 5; i++)
sleep (5);
}
switch (distsw ? child_id : OK) {
case NOTOK:
advise (NULL, "unable to fork, so checking directly...");
case OK:
execvp (postproc, vec);
fprintf (stderr, "unable to exec ");
perror (postproc);
_exit (-1);
default:
SIGNAL (SIGHUP, SIG_IGN);
SIGNAL (SIGINT, SIG_IGN);
SIGNAL (SIGQUIT, SIG_IGN);
SIGNAL (SIGTERM, SIG_IGN);
status = pidwait(child_id, OK);
(void) m_unlink (msg);
if (rename (backup, msg) == NOTOK)
adios (msg, "unable to rename %s to", backup);
done (status);
}
return 0; /* dead code to satisfy the compiler */
}
