/***********************************************************************
* *
* This software is part of the BSD package *
*Copyright (c) 1978-2010 The Regents of the University of California an*
* *
* 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 *
* materials provided with the distribution. *
* *
* 3. Neither the name of The Regents of the University of California*
* names of its contributors may be used to endorse or *
* promote products derived from this software without *
* specific prior written permission. *
* *
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND *
* CONTRIBUTORS "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 COPYRIGHT OWNER OR CONTRIBUTORS *
* 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. *
* *
* 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 *
* distribution. *
* 3. Neither the name of the University nor the names of its *
* contributors may be used to endorse or promote products derived *
* from this software without specific prior written permission. *
* *
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS "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 REGENTS *
* OR CONTRIBUTORS 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. *
* *
* Kurt Shoens (UCB) *
* gsf *
* *
***********************************************************************/
#pragma prototyped
/*
* Mail -- a mail program
*
* Still more user commands.
*/
#include "mailx.h"
/*
* Expand the shell escape by expanding unescaped !'s into the
* last issued command where possible.
*/
static int
{
register char* s;
register char* t;
register char* e;
int changed = 0;
s = str;
t = buf;
e = t + sizeof(buf) - 1;
while (*s) {
note(0, "Command buffer overflow");
return -1;
}
changed++;
s++;
continue;
}
if (*s == '\\' && s[1] == '!') {
if (t >= e)
goto overf;
*t++ = '!';
s += 2;
changed++;
}
if (t >= e)
goto overf;
*t++ = *s++;
}
*t = 0;
if (changed)
return 0;
}
/*
* Process a shell escape by saving signals, ignoring signals,
* and running sh -c
*/
int
{
return 1;
if (*cmd)
else
note(0, "!");
return 0;
}
/*
* Stay within the lines.
*/
static void
margin(FILE* fp, const char* name, register const char* s, int indent, int sep, int tab, const struct var* vp)
{
register const char** ap;
register int c;
register int n;
register int q;
if (sep) {
for (c = 0; c < sep; c++) {
n++;
}
}
else {
}
*ap++ = T(s);
*ap++ = " ";
if (*s) {
*ap++ = T("The default value is");
*ap++ = " \"";
*ap++ = s;
*ap++ = "\".";
}
*ap++ = T("The default value is computed at runtime.");
else
*ap++ = T("On by default.");
}
*ap = 0;
q = 0;
while (s = *ap++)
while (c = *s++) {
if (!isspace(c))
putchar(c);
for (c = 0; c < sep; c++) {
n++;
}
}
else if (c == '\t') {
if (tab) {
while (n < tab) {
n++;
}
}
else do {
} while (++n % 4);
}
else {
if (c == q)
q = 0;
else if (c == '"')
q = c;
n++;
}
}
}
/*
* List command help.
*/
static void
{
}
/*
* List escape command help.
*/
static void
{
buf[2] = 0;
}
/*
* List variable help.
*/
static void
{
char* help;
{
}
else
}
/*
* Print out a nice help message.
*/
int
{
register char* s;
register char* a;
register char* t;
register char* l;
char* r;
int all;
int cat;
s = *argv++;
a = s ? *argv : (char*)0;
l = "commands";
t = T(l);
r = "--------";
cat = 0;
}
if (all || s) {
l = "variables";
t = T(l);
r = "---------";
if (all && !(cp = 0)|| (cp = (const struct cmd*)strpsearch(state.cmdtab, state.cmdnum, sizeof(struct cmd), s, NiL)) || (streq(s, l) || streq(s, t)) && ++cat) {
}
else if (vp = (const struct var*)strsearch(state.vartab, state.varnum, sizeof(struct var), stracmp, a, NiL))
else
note(0, "\"%s\": unknown variable", a);
}
else
}
if (!cp) {
if (*++s)
a = s;
}
l = "escape";
t = T(l);
r = "---------------";
if (!a) {
}
else if (ep = (const struct esc*)strsearch(state.esctab, state.escnum, sizeof(struct esc), stracmp, a, NiL))
else
note(0, "\"%s\": unknown escape command", a);
}
else if (!cat)
note(0, "\"%s\": unknown command", s);
}
}
return 0;
}
/*
* Change user's working directory.
*/
int
{
char* cp;
char* tp;
int show = 0;
if (!*arglist)
else
return 1;
note(0, "No previous working directory");
return 1;
}
show = 1;
}
#if _PACKAGE_ast
if (state.var.cdpath && (cp[0] != '.' || cp[1] != 0 && cp[1] != '/' && (cp[1] != '.' || cp[2] != 0 && cp[2] != '/')) && pathaccess(state.var.cdpath, cp, NiL, 0, state.path.path, sizeof(state.path.path))) {
show = 1;
}
else
#endif
show = -1;
return 1;
}
}
if (show)
return 0;
}
/*
* Print the full path of the current working directory.
*/
int
pwd(void)
{
return 0;
}
/*
* Create a new folder directory.
*/
int
{
char* cp;
return 1;
if (*cp == '@')
imap_mkdir(cp);
return 1;
}
return 0;
}
/*
* Rename a folder or folder directory.
*/
int
{
char* f;
char* t;
return 1;
if (*f == '@')
imap_rename(f, t);
else if (rename(f, t)) {
return 1;
}
return 0;
}
/*
* Remove an empty folder directory.
*/
int
{
char* cp;
return 1;
if (*cp == '@')
imap_rmdir(cp);
return 1;
}
return 0;
}
/*
* Modify the subject we are replying to to begin with Re: if
* it does not already.
*/
static char*
{
char* newsubj;
if (!subj)
return 0;
#if _PACKAGE_ast
#else
#endif
return subj;
return newsubj;
}
/*
* Low level for the reply variants.
*/
static int
{
char* cp;
char* rp;
if (all) {
note(0, "Sorry, can't reply to multiple messages at once");
return 1;
}
}
else {
}
return 0;
}
}
return 0;
}
int
{
}
int
{
}
int
{
}
int
{
}
int
{
}
int
{
}
int
{
}
int
{
}
/*
* Print the size of each message.
*/
int
{
}
return 0;
}
/*
* Quit quickly. If we are sourcing, just pop the input level
* by returning an error.
*/
int
cmdexit(int e)
{
imap_exit(e);
exit(e);
}
return 1;
}
/*
* Set or display a variable value. Syntax is similar to that
* of csh.
*/
int
{
register char* cp;
register char* np;
register char* ep;
int all = 0;
int errs = 0;
for (;;) {
if (*cp == '=') {
*cp++ = 0;
break;
}
if (!*cp++) {
ep = 0;
break;
}
}
if (!*np) {
note(0, "Non-null variable name required");
errs++;
}
else
if (ep)
*ep = '=';
}
return errs;
}
/*
* Unset a bunch of variable values.
*/
int
{
register char* s;
register int errs = 0;
else while (s = *argv++)
return errs;
}
/*
* List an alias.
*/
static int
{
putchar('\n');
return 0;
}
/*
* Low level for alias/alternates.
*/
static int
{
register char* s;
register char* t;
register char* v;
char* name;
else if (!*argv) {
else
}
/*
* sendmail alias file parse
*/
for (; isspace(*s); s++);
if (*s != '#') {
for (t = s; *t && *t != ':' && !isspace(*t); t++);
if (*t) {
*t++ = 0;
while (*t == ':' || isspace(*t))
t++;
do {
for (v = t; *v && *v != ',' && !isspace(*v); v++);
if (*v) {
*v++ = 0;
while (*v == ',' || isspace(*v))
v++;
}
} while (*(t = v));
}
}
}
}
}
}
else {
/*
* Insert names from the command list into the alias group.
*/
}
}
return 0;
}
/*
* Case sensitive alias.
*/
int
{
}
/*
* Unset a bunch of aliases.
*/
int
{
register char* s;
while (s = *argv++)
note(0, "\"%s\": unknown alias", s);
return 0;
}
/*
* List an alternate.
*/
static int
{
return 0;
}
/*
* Set the list of alternate names.
*/
int
{
register char* s;
if (!*argv)
else {
av[2] = 0;
while (s = *argv++) {
av[0] = s;
}
}
return 0;
}
/*
* The do nothing command for comments.
*/
/*ARGSUSED*/
int
null(int e)
{
return 0;
}
/*
* Change to another folder. With no argument, print information about
* the current folder.
*/
int
{
if (!argv[0]) {
folderinfo(0);
return 0;
}
return 1;
announce();
return 0;
}
/*
* Expand file names like echo
*/
int
{
register char* s;
register int sep;
sep = 0;
while (s = *argv++) {
if (s = expand(s, 0)) {
if (sep++)
putchar(' ');
printf("%s", s);
}
}
putchar('\n');
return 0;
}
/*
* Conditional commands. These allow one to parameterize one's
* .mailrc and do some things if sending, others if receiving.
*/
int
{
register char* s;
register char* t;
register char* x;
int n;
return 1;
}
s = argv[0];
if (n = streq(s, "!")) {
s = x;
x = t;
t = 0;
}
else if (n = *s == '!')
s++;
if (*s && (!*(s + 1) || *(s + 1) == '?') && !x && *(x = s + 2)) {
switch (*s) {
case 'd':
if (!x || t)
goto bad;
goto ok;
case 'f':
if (!x || t)
goto bad;
goto ok;
case 'r':
case 'R':
if (x)
goto bad;
return 0;
case 's':
case 'S':
if (x)
goto bad;
return 0;
}
}
if (!x)
n ^= varget(s) != 0;
else if (!t || n)
goto bad;
else {
if (n = *x == '!')
x++;
switch (*x) {
case '=':
if (*++x == '=')
x++;
n ^= streq(s, t);
break;
default:
n = -1;
break;
}
if (n < 0 || *x) {
return 1;
}
}
ok:
return 0;
bad:
if (x) {
if (t)
}
return 1;
}
/*
* Implement 'else'. This is pretty simple -- we just
* flip over the conditional flag.
*/
int
cmdelse(void)
{
return 1;
}
return 0;
}
/*
* End of if statement. Just set cond back to anything.
*/
int
cmdendif(void)
{
return 1;
}
return 0;
}