timed.tproj/timedc.tproj/timedc.c

   1 /*
   2  * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. Please obtain a copy of the License at
  10  * http://www.opensource.apple.com/apsl/ and read it before using this
  11  * file.
  12  *
  13  * The Original Code and all software distributed under the License are
  14  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  15  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  16  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  18  * Please see the License for the specific language governing rights and
  19  * limitations under the License.
  20  *
  21  * @APPLE_LICENSE_HEADER_END@
  22  */
  23 /*-
  24  * Copyright (c) 1985, 1993
  25  *      The Regents of the University of California.  All rights reserved.
  26  *
  27  * Redistribution and use in source and binary forms, with or without
  28  * modification, are permitted provided that the following conditions
  29  * are met:
  30  * 1. Redistributions of source code must retain the above copyright
  31  *    notice, this list of conditions and the following disclaimer.
  32  * 2. Redistributions in binary form must reproduce the above copyright
  33  *    notice, this list of conditions and the following disclaimer in the
  34  *    documentation and/or other materials provided with the distribution.
  35  * 3. All advertising materials mentioning features or use of this software
  36  *    must display the following acknowledgement:
  37  *      This product includes software developed by the University of
  38  *      California, Berkeley and its contributors.
  39  * 4. Neither the name of the University nor the names of its contributors
  40  *    may be used to endorse or promote products derived from this software
  41  *    without specific prior written permission.
  42  *
  43  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  44  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  45  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  46  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  47  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  48  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  49  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  50  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  51  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  52  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  53  * SUCH DAMAGE.
  54  */
  55
  56 #ifndef lint
  57 static char copyright[] =
  58 "@(#) Copyright (c) 1985, 1993\n\
  59         The Regents of the University of California.  All rights reserved.\n";
  60 #endif /* not lint */
  61
  62 #ifndef lint
  63 static char sccsid[] = "@(#)timedc.c    8.1 (Berkeley) 6/6/93";
  64 #endif /* not lint */
  65
  66 #ifdef sgi
  67 #ident "$Revision: 1.1.1.1 $"
  68 #endif
  69
  70 #include "timedc.h"
  71 #include <strings.h>
  72 #include <signal.h>
  73 #include <ctype.h>
  74 #include <setjmp.h>
  75 #include <unistd.h>
  76 #include <stdlib.h>
  77 #include <syslog.h>
  78
  79 int trace = 0;
  80 FILE *fd = 0;
  81 int     margc;
  82 int     fromatty;
  83 char    *margv[20];
  84 char    cmdline[200];
  85 jmp_buf toplevel;
  86 static struct cmd *getcmd __P((char *));
  87
  88 int
  89 main(argc, argv)
  90         int argc;
  91         char *argv[];
  92 {
  93         register struct cmd *c;
  94
  95         openlog("timedc", LOG_ODELAY, LOG_AUTH);
  96
  97         /*
  98          * security dictates!
  99          */
 100         if (priv_resources() < 0) {
 101                 fprintf(stderr, "Could not get privileged resources\n");
 102                 exit(1);
 103         }
 104         (void) setuid(getuid());
 105
 106         if (--argc > 0) {
 107                 c = getcmd(*++argv);
 108                 if (c == (struct cmd *)-1) {
 109                         printf("?Ambiguous command\n");
 110                         exit(1);
 111                 }
 112                 if (c == 0) {
 113                         printf("?Invalid command\n");
 114                         exit(1);
 115                 }
 116                 if (c->c_priv && getuid()) {
 117                         printf("?Privileged command\n");
 118                         exit(1);
 119                 }
 120                 (*c->c_handler)(argc, argv);
 121                 exit(0);
 122         }
 123
 124         fromatty = isatty(fileno(stdin));
 125         if (setjmp(toplevel))
 126                 putchar('\n');
 127         (void) signal(SIGINT, intr);
 128         for (;;) {
 129                 if (fromatty) {
 130                         printf("timedc> ");
 131                         (void) fflush(stdout);
 132                 }
 133                 if (fgets(cmdline, sizeof(cmdline), stdin) == 0)
 134                         quit();
 135                 if (cmdline[0] == 0)
 136                         break;
 137                 makeargv();
 138                 if (margv[0] == 0)
 139                         continue;
 140                 c = getcmd(margv[0]);
 141                 if (c == (struct cmd *)-1) {
 142                         printf("?Ambiguous command\n");
 143                         continue;
 144                 }
 145                 if (c == 0) {
 146                         printf("?Invalid command\n");
 147                         continue;
 148                 }
 149                 if (c->c_priv && getuid()) {
 150                         printf("?Privileged command\n");
 151                         continue;
 152                 }
 153                 (*c->c_handler)(margc, margv);
 154         }
 155         return 0;
 156 }
 157
 158 void
 159 intr(signo)
 160         int signo;
 161 {
 162         if (!fromatty)
 163                 exit(0);
 164         longjmp(toplevel, 1);
 165 }
 166
 167
 168 static struct cmd *
 169 getcmd(name)
 170         char *name;
 171 {
 172         register char *p, *q;
 173         register struct cmd *c, *found;
 174         register int nmatches, longest;
 175         extern int NCMDS;
 176
 177         longest = 0;
 178         nmatches = 0;
 179         found = 0;
 180         for (c = cmdtab; c < &cmdtab[NCMDS]; c++) {
 181                 p = c->c_name;
 182                 for (q = name; *q == *p++; q++)
 183                         if (*q == 0)            /* exact match? */
 184                                 return(c);
 185                 if (!*q) {                      /* the name was a prefix */
 186                         if (q - name > longest) {
 187                                 longest = q - name;
 188                                 nmatches = 1;
 189                                 found = c;
 190                         } else if (q - name == longest)
 191                                 nmatches++;
 192                 }
 193         }
 194         if (nmatches > 1)
 195                 return((struct cmd *)-1);
 196         return(found);
 197 }
 198
 199 /*
 200  * Slice a string up into argc/argv.
 201  */
 202 void
 203 makeargv()
 204 {
 205         register char *cp;
 206         register char **argp = margv;
 207
 208         margc = 0;
 209         for (cp = cmdline; *cp;) {
 210                 while (isspace(*cp))
 211                         cp++;
 212                 if (*cp == '\0')
 213                         break;
 214                 *argp++ = cp;
 215                 margc += 1;
 216                 while (*cp != '\0' && !isspace(*cp))
 217                         cp++;
 218                 if (*cp == '\0')
 219                         break;
 220                 *cp++ = '\0';
 221         }
 222         *argp++ = 0;
 223 }
 224
 225 #define HELPINDENT (sizeof ("directory"))
 226
 227 /*
 228  * Help command.
 229  */
 230 void
 231 help(argc, argv)
 232         int argc;
 233         char *argv[];
 234 {
 235         register struct cmd *c;
 236
 237         if (argc == 1) {
 238                 register int i, j, w;
 239                 int columns, width = 0, lines;
 240                 extern int NCMDS;
 241
 242                 printf("Commands may be abbreviated.  Commands are:\n\n");
 243                 for (c = cmdtab; c < &cmdtab[NCMDS]; c++) {
 244                         int len = strlen(c->c_name);
 245
 246                         if (len > width)
 247                                 width = len;
 248                 }
 249                 width = (width + 8) &~ 7;
 250                 columns = 80 / width;
 251                 if (columns == 0)
 252                         columns = 1;
 253                 lines = (NCMDS + columns - 1) / columns;
 254                 for (i = 0; i < lines; i++) {
 255                         for (j = 0; j < columns; j++) {
 256                                 c = cmdtab + j * lines + i;
 257                                 printf("%s", c->c_name);
 258                                 if (c + lines >= &cmdtab[NCMDS]) {
 259                                         printf("\n");
 260                                         break;
 261                                 }
 262                                 w = strlen(c->c_name);
 263                                 while (w < width) {
 264                                         w = (w + 8) &~ 7;
 265                                         putchar('\t');
 266                                 }
 267                         }
 268                 }
 269                 return;
 270         }
 271         while (--argc > 0) {
 272                 register char *arg;
 273                 arg = *++argv;
 274                 c = getcmd(arg);
 275                 if (c == (struct cmd *)-1)
 276                         printf("?Ambiguous help command %s\n", arg);
 277                 else if (c == (struct cmd *)0)
 278                         printf("?Invalid help command %s\n", arg);
 279                 else
 280                         printf("%-*s\t%s\n", (int)HELPINDENT,
 281                                 c->c_name, c->c_help);
 282         }
 283 }