home *** CD-ROM | disk | FTP | other *** search
/ Il CD di internet / CD.iso / SOURCE / N / TCPIP / NETKIT-B.05 / NETKIT-B / NetKit-B-0.05 / lpr / lpc / lpc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-12-17  |  5.7 KB  |  264 lines
  1. /*
  2.  * Copyright (c) 1983 Regents of the University of California.
  3.  * All rights reserved.
  4.  *
  5.  * Redistribution and use in source and binary forms, with or without
  6.  * modification, are permitted provided that the following conditions
  7.  * are met:
  8.  * 1. Redistributions of source code must retain the above copyright
  9.  *    notice, this list of conditions and the following disclaimer.
  10.  * 2. Redistributions in binary form must reproduce the above copyright
  11.  *    notice, this list of conditions and the following disclaimer in the
  12.  *    documentation and/or other materials provided with the distribution.
  13.  * 3. All advertising materials mentioning features or use of this software
  14.  *    must display the following acknowledgement:
  15.  *    This product includes software developed by the University of
  16.  *    California, Berkeley and its contributors.
  17.  * 4. Neither the name of the University nor the names of its contributors
  18.  *    may be used to endorse or promote products derived from this software
  19.  *    without specific prior written permission.
  20.  *
  21.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31.  * SUCH DAMAGE.
  32.  */
  33.  
  34. #ifndef lint
  35. char copyright[] =
  36. "@(#) Copyright (c) 1983 Regents of the University of California.\n\
  37.  All rights reserved.\n";
  38. #endif /* not lint */
  39.  
  40. #ifndef lint
  41. /*static char sccsid[] = "from: @(#)lpc.c    5.11 (Berkeley) 3/2/91";*/
  42. static char rcsid[] = "$Id: lpc.c,v 1.2 1993/08/01 17:58:57 mycroft Exp $";
  43. #endif /* not lint */
  44.  
  45. /*
  46.  * lpc -- line printer control program
  47.  */
  48. #include <stdio.h>
  49. #include <signal.h>
  50. #include <ctype.h>
  51. #include <setjmp.h>
  52. #include <syslog.h>
  53.  
  54. #include "lpc.h"
  55.  
  56. int    fromatty;
  57.  
  58. char    cmdline[200];
  59. int    margc;
  60. char    *margv[20];
  61. int    top;
  62. void    intr();
  63. struct    cmd *getcmd();
  64.  
  65. jmp_buf    toplevel;
  66.  
  67. main(argc, argv)
  68.     char *argv[];
  69. {
  70.     register struct cmd *c;
  71.     extern char *name;
  72.  
  73.     name = argv[0];
  74.     openlog("lpd", 0, LOG_LPR);
  75.  
  76.     if (--argc > 0) {
  77.         c = getcmd(*++argv);
  78.         if (c == (struct cmd *)-1) {
  79.             printf("?Ambiguous command\n");
  80.             exit(1);
  81.         }
  82.         if (c == 0) {
  83.             printf("?Invalid command\n");
  84.             exit(1);
  85.         }
  86.         if (c->c_priv && getuid()) {
  87.             printf("?Privileged command\n");
  88.             exit(1);
  89.         }
  90.         (*c->c_handler)(argc, argv);
  91.         exit(0);
  92.     }
  93.     fromatty = isatty(fileno(stdin));
  94.     top = setjmp(toplevel) == 0;
  95.     if (top)
  96.         signal(SIGINT, intr);
  97.     for (;;) {
  98.         cmdscanner(top);
  99.         top = 1;
  100.     }
  101. }
  102.  
  103. void
  104. intr()
  105. {
  106.     if (!fromatty)
  107.         exit(0);
  108.     longjmp(toplevel, 1);
  109. }
  110.  
  111. /*
  112.  * Command parser.
  113.  */
  114. cmdscanner(top)
  115.     int top;
  116. {
  117.     register struct cmd *c;
  118.  
  119.     if (!top)
  120.         putchar('\n');
  121.     for (;;) {
  122.         if (fromatty) {
  123.             printf("lpc> ");
  124.             fflush(stdout);
  125.         }
  126.         if (fgets(cmdline, sizeof(cmdline), stdin) == 0)
  127.             quit();
  128.         if (cmdline[0] == 0 || cmdline[0] == '\n')
  129.             break;
  130.         makeargv();
  131.         c = getcmd(margv[0]);
  132.         if (c == (struct cmd *)-1) {
  133.             printf("?Ambiguous command\n");
  134.             continue;
  135.         }
  136.         if (c == 0) {
  137.             printf("?Invalid command\n");
  138.             continue;
  139.         }
  140.         if (c->c_priv && getuid()) {
  141.             printf("?Privileged command\n");
  142.             continue;
  143.         }
  144.         (*c->c_handler)(margc, margv);
  145.     }
  146.     longjmp(toplevel, 0);
  147. }
  148.  
  149. extern struct cmd cmdtab[];
  150.  
  151. struct cmd *
  152. getcmd(name)
  153.     register char *name;
  154. {
  155.     register char *p, *q;
  156.     register struct cmd *c, *found;
  157.     register int nmatches, longest;
  158.  
  159.     longest = 0;
  160.     nmatches = 0;
  161.     found = 0;
  162.     for (c = cmdtab; p = c->c_name; c++) {
  163.         for (q = name; *q == *p++; q++)
  164.             if (*q == 0)        /* exact match? */
  165.                 return(c);
  166.         if (!*q) {            /* the name was a prefix */
  167.             if (q - name > longest) {
  168.                 longest = q - name;
  169.                 nmatches = 1;
  170.                 found = c;
  171.             } else if (q - name == longest)
  172.                 nmatches++;
  173.         }
  174.     }
  175.     if (nmatches > 1)
  176.         return((struct cmd *)-1);
  177.     return(found);
  178. }
  179.  
  180. /*
  181.  * Slice a string up into argc/argv.
  182.  */
  183. makeargv()
  184. {
  185.     register char *cp;
  186.     register char **argp = margv;
  187.  
  188.     margc = 0;
  189.     for (cp = cmdline; *cp;) {
  190.         while (isspace(*cp))
  191.             cp++;
  192.         if (*cp == '\0')
  193.             break;
  194.         *argp++ = cp;
  195.         margc += 1;
  196.         while (*cp != '\0' && !isspace(*cp))
  197.             cp++;
  198.         if (*cp == '\0')
  199.             break;
  200.         *cp++ = '\0';
  201.     }
  202.     *argp++ = 0;
  203. }
  204.  
  205. #define HELPINDENT (sizeof ("directory"))
  206.  
  207. /*
  208.  * Help command.
  209.  */
  210. help(argc, argv)
  211.     int argc;
  212.     char *argv[];
  213. {
  214.     register struct cmd *c;
  215.  
  216.     if (argc == 1) {
  217.         register int i, j, w;
  218.         int columns, width = 0, lines;
  219.         extern int NCMDS;
  220.  
  221.         printf("Commands may be abbreviated.  Commands are:\n\n");
  222.         for (c = cmdtab; c->c_name; c++) {
  223.             int len = strlen(c->c_name);
  224.  
  225.             if (len > width)
  226.                 width = len;
  227.         }
  228.         width = (width + 8) &~ 7;
  229.         columns = 80 / width;
  230.         if (columns == 0)
  231.             columns = 1;
  232.         lines = (NCMDS + columns - 1) / columns;
  233.         for (i = 0; i < lines; i++) {
  234.             for (j = 0; j < columns; j++) {
  235.                 c = cmdtab + j * lines + i;
  236.                 if (c->c_name)
  237.                     printf("%s", c->c_name);
  238.                 if (c + lines >= &cmdtab[NCMDS]) {
  239.                     printf("\n");
  240.                     break;
  241.                 }
  242.                 w = strlen(c->c_name);
  243.                 while (w < width) {
  244.                     w = (w + 8) &~ 7;
  245.                     putchar('\t');
  246.                 }
  247.             }
  248.         }
  249.         return;
  250.     }
  251.     while (--argc > 0) {
  252.         register char *arg;
  253.         arg = *++argv;
  254.         c = getcmd(arg);
  255.         if (c == (struct cmd *)-1)
  256.             printf("?Ambiguous help command %s\n", arg);
  257.         else if (c == (struct cmd *)0)
  258.             printf("?Invalid help command %s\n", arg);
  259.         else
  260.             printf("%-*s\t%s\n", HELPINDENT,
  261.                 c->c_name, c->c_help);
  262.     }
  263. }
  264.