Return to alias.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / bin / vi

Annotation of coherent/g/usr/bin/vi/alias.c, revision 1.1.1.1

1.1       root        1: /* alias.c */
                      2: 
                      3: /* Author:
                      4:  *             Peter Reinig
                      5:  *             Universitaet Kaiserslautern
                      6:  *             Postfach 3049
                      7:  *             7650 Kaiserslautern
                      8:  *             W. Germany
                      9:  *             [email protected]
                     10:  */
                     11: 
                     12: /* This tiny program executes elvis with the flags that are appropriate
                     13:  * for a given command name.  This program is used only on systems that
                     14:  * don't allow UNIX-style file links.
                     15:  *
                     16:  * The benefit of this program is: instead of having 5 copies of elvis
                     17:  * on your disk, you only need one copy of elvis and 4 copies of this
                     18:  * little program.
                     19:  */
                     20: 
                     21: #include <stdio.h>
                     22: #include "config.h"
                     23: 
                     24: #if OSK
                     25: #define ELVIS  "/dd/usr/cmds/elvis"
                     26: #else
                     27: #define ELVIS  "elvis"
                     28: #endif
                     29: 
                     30: extern char **environ;
                     31: extern int errno;
                     32: 
                     33: main(argc, argv)
                     34:        int     argc;
                     35:        char    *argv[];
                     36: {
                     37:        int     pid, i, j;
                     38:        int     letter;
                     39:        char    **argblk;
                     40: #if OSK
                     41:        extern int chainc();
                     42: #endif
                     43: 
                     44:        /* allocate enough space for a copy of the argument list, plus a
                     45:         * terminating NULL, plus maybe an added flag.
                     46:         */
                     47:        argblk = (char **) malloc((argc + 2) * sizeof(char *));
                     48:        if (!argblk)
                     49:        {
                     50: #if OSK
                     51:                _errmsg(errno, "Can't get enough memory\n");
                     52: #else
                     53:                perror(argv[0]);
                     54: #endif
                     55:                exit(2);
                     56:        }
                     57: 
                     58:        /* find the last letter in the invocation name of this program */
                     59:        i = strlen(argv[0]);
                     60: #if MSDOS || TOS
                     61:        /* we almost certainly must bypass ".EXE" or ".TTP" from argv[0] */
                     62:        if (i > 4 && argv[0][i - 4] == '.')
                     63:                i -= 4;
                     64: #endif
                     65:        letter = argv[0][i - 1];
                     66: 
                     67:        /* copy argv to argblk, possibly inserting a flag such as "-R" */
                     68:        argblk[0] = ELVIS;
                     69:        i = j = 1;
                     70:        switch (letter)
                     71:        {
                     72:          case 'w':                     /* "view" */
                     73:          case 'W':
                     74:                argblk[i++] = "-R";
                     75:                break;
                     76: #if !OSK
                     77:          case 'x':                     /* "ex" */
                     78:          case 'X':
                     79:                argblk[i++] = "-e";
                     80:                break;
                     81: #endif
                     82:          case 't':                     /* "input" */
                     83:          case 'T':
                     84:                argblk[i++] = "-i";
                     85:                break;
                     86:        }
                     87:        while (j < argc)
                     88:        {
                     89:                argblk[i++] = argv[j++];
                     90:        }
                     91:        argblk[i] = (char *)0;
                     92: 
                     93:        /* execute the real ELVIS program */
                     94: #if OSK
                     95:        pid = os9exec(chainc, argblk[0], argblk, environ, 0, 0, 3);
                     96:        fprintf(stderr, "%s: cannot execute\n", argblk[0]);
                     97: #else
                     98:        (void)execvp(argblk[0], argblk);
                     99:        perror(ELVIS);
                    100: #endif
                    101: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.