cmd_misc.c

   1 /*@ S-nail - a mail user agent derived from Berkeley Mail.
   2  *@ Miscellaneous user commands, like `echo', `pwd', etc.
   3  *
   4  * Copyright (c) 2000-2004 Gunnar Ritter, Freiburg i. Br., Germany.
   5  * Copyright (c) 2012 - 2017 Steffen (Daode) Nurpmeso <steffen@sdaoden.eu>.
   6  */
   7 /*
   8  * Copyright (c) 1980, 1993
   9  *      The Regents of the University of California.  All rights reserved.
  10  *
  11  * Redistribution and use in source and binary forms, with or without
  12  * modification, are permitted provided that the following conditions
  13  * are met:
  14  * 1. Redistributions of source code must retain the above copyright
  15  *    notice, this list of conditions and the following disclaimer.
  16  * 2. Redistributions in binary form must reproduce the above copyright
  17  *    notice, this list of conditions and the following disclaimer in the
  18  *    documentation and/or other materials provided with the distribution.
  19  * 3. Neither the name of the University nor the names of its contributors
  20  *    may be used to endorse or promote products derived from this software
  21  *    without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  33  * SUCH DAMAGE.
  34  */
  35 #undef n_FILE
  36 #define n_FILE cmd_misc
  37
  38 #ifndef HAVE_AMALGAMATION
  39 # include "nail.h"
  40 #endif
  41
  42 /* Expand the shell escape by expanding unescaped !'s into the last issued
  43  * command where possible */
  44 static char const *a_cmisc_bangexp(char const *cp);
  45
  46 /* c_n?echo(), c_n?echoerr() */
  47 static int a_cmisc_echo(void *vp, FILE *fp, bool_t donl);
  48
  49 static char const *
  50 a_cmisc_bangexp(char const *cp){
  51    static struct str last_bang;
  52
  53    struct n_string xbang, *bang;
  54    char c;
  55    bool_t changed;
  56    NYD_ENTER;
  57
  58    if(!ok_blook(bang))
  59       goto jleave;
  60
  61    changed = FAL0;
  62
  63    for(bang = n_string_creat(&xbang); (c = *cp++) != '\0';){
  64       if(c == '!'){
  65          if(last_bang.l > 0)
  66             bang = n_string_push_buf(bang, last_bang.s, last_bang.l);
  67          changed = TRU1;
  68       }else{
  69          if(c == '\\' && *cp == '!'){
  70             ++cp;
  71             c = '!';
  72             changed = TRU1;
  73          }
  74          bang = n_string_push_c(bang, c);
  75       }
  76    }
  77
  78    if(last_bang.s != NULL)
  79       free(last_bang.s);
  80    last_bang.s = n_string_cp(bang);
  81    last_bang.l = bang->s_len;
  82    bang = n_string_drop_ownership(bang);
  83    n_string_gut(bang);
  84
  85    cp = last_bang.s;
  86    if(changed)
  87       fprintf(n_stdout, "!%s\n", cp);
  88 jleave:
  89    NYD_LEAVE;
  90    return cp;
  91 }
  92
  93 static int
  94 a_cmisc_echo(void *vp, FILE *fp, bool_t donl){
  95    char const **argv, **ap, *cp;
  96    NYD2_ENTER;
  97
  98    for(ap = argv = vp; *ap != NULL; ++ap){
  99       if(ap != argv)
 100          putc(' ', fp);
 101       if((cp = fexpand(*ap, FEXP_NSHORTCUT | FEXP_NVAR)) == NULL)
 102          cp = *ap;
 103       fputs(cp, fp);
 104    }
 105    if(donl)
 106       putc('\n', fp);
 107    fflush(fp);
 108    NYD2_LEAVE;
 109    return 0;
 110 }
 111
 112 FL int
 113 c_shell(void *v)
 114 {
 115    sigset_t mask;
 116    char const *cp;
 117    NYD_ENTER;
 118
 119    cp = a_cmisc_bangexp(v);
 120
 121    sigemptyset(&mask);
 122    run_command(ok_vlook(SHELL), &mask, COMMAND_FD_PASS, COMMAND_FD_PASS, "-c",
 123       cp, NULL, NULL);
 124    fprintf(n_stdout, "!\n");
 125    NYD_LEAVE;
 126    return 0;
 127 }
 128
 129 FL int
 130 c_dosh(void *v)
 131 {
 132    NYD_ENTER;
 133    n_UNUSED(v);
 134
 135    run_command(ok_vlook(SHELL), 0, COMMAND_FD_PASS, COMMAND_FD_PASS, NULL,
 136       NULL, NULL, NULL);
 137    putc('\n', n_stdout);
 138    NYD_LEAVE;
 139    return 0;
 140 }
 141
 142 FL int
 143 c_cwd(void *v)
 144 {
 145    char buf[PATH_MAX]; /* TODO getcwd(3) may return a larger value */
 146    NYD_ENTER;
 147
 148    if (getcwd(buf, sizeof buf) != NULL) {
 149       fputs(buf, n_stdout);
 150       putc('\n', n_stdout);
 151       v = (void*)0x1;
 152    } else {
 153       n_perr(_("getcwd"), 0);
 154       v = NULL;
 155    }
 156    NYD_LEAVE;
 157    return (v == NULL);
 158 }
 159
 160 FL int
 161 c_chdir(void *v)
 162 {
 163    char **arglist = v;
 164    char const *cp;
 165    NYD_ENTER;
 166
 167    if (*arglist == NULL)
 168       cp = ok_vlook(HOME);
 169    else if ((cp = fexpand(*arglist, FEXP_LOCAL | FEXP_NOPROTO)) == NULL)
 170       goto jleave;
 171    if (chdir(cp) == -1) {
 172       n_perr(cp, 0);
 173       cp = NULL;
 174    }
 175 jleave:
 176    NYD_LEAVE;
 177    return (cp == NULL);
 178 }
 179
 180 FL int
 181 c_echo(void *v){
 182    int rv;
 183    NYD_ENTER;
 184
 185    rv = a_cmisc_echo(v, n_stdout, TRU1);
 186    NYD_LEAVE;
 187    return rv;
 188 }
 189
 190 FL int
 191 c_echoerr(void *v){
 192    int rv;
 193    NYD_ENTER;
 194
 195    rv = a_cmisc_echo(v, n_stderr, TRU1);
 196    NYD_LEAVE;
 197    return rv;
 198 }
 199
 200 FL int
 201 c_echon(void *v){
 202    int rv;
 203    NYD_ENTER;
 204
 205    rv = a_cmisc_echo(v, n_stdout, FAL0);
 206    NYD_LEAVE;
 207    return rv;
 208 }
 209
 210 FL int
 211 c_echoerrn(void *v){
 212    int rv;
 213    NYD_ENTER;
 214
 215    rv = a_cmisc_echo(v, n_stderr, FAL0);
 216    NYD_LEAVE;
 217    return rv;
 218 }
 219
 220 /* s-it-mode */