fix contrib notice (Edward Wang)

[unix-history] / usr / src / usr.bin / window / lcmd.c

/*
* Copyright (c) 1983 Regents of the University of California.
* All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* Edward Wang at The University of California, Berkeley.
*
* %sccs.include.redist.c%
*/

#ifndef lint
static char sccsid[] = "@(#)lcmd.c      3.34 (Berkeley) %G%";
#endif /* not lint */

#include "defs.h"
#include "value.h"
#include "lcmd.h"

int l_alias();
int l_close();
int l_cursormodes();
int l_debug();
int l_def_nline();
int l_def_shell();
int l_def_smooth();
int l_echo();
int l_escape();
int l_foreground();
int l_iostat();
int l_label();
int l_list();
int l_select();
int l_smooth();
int l_source();
int l_terse();
int l_time();
int l_unalias();
int l_unset();
int l_variable();
int l_window();
int l_write();

extern struct lcmd_arg arg_alias[];
extern struct lcmd_arg arg_cursormodes[];
extern struct lcmd_arg arg_debug[];
extern struct lcmd_arg arg_echo[];
extern struct lcmd_arg arg_escape[];
extern struct lcmd_arg arg_foreground[];
extern struct lcmd_arg arg_label[];
extern struct lcmd_arg arg_def_nline[];
extern struct lcmd_arg arg_def_shell[];
extern struct lcmd_arg arg_def_smooth[];
extern struct lcmd_arg arg_close[];
extern struct lcmd_arg arg_select[];
extern struct lcmd_arg arg_smooth[];
extern struct lcmd_arg arg_source[];
extern struct lcmd_arg arg_terse[];
extern struct lcmd_arg arg_time[];
extern struct lcmd_arg arg_unalias[];
extern struct lcmd_arg arg_unset[];
extern struct lcmd_arg arg_window[];
extern struct lcmd_arg arg_write[];
struct lcmd_arg arg_null[1] = { { 0 } };

struct lcmd_tab lcmd_tab[] = {
       "alias",                1,      l_alias,        arg_alias,
       "close",                2,      l_close,        arg_close,
       "cursormodes",          2,      l_cursormodes,  arg_cursormodes,
       "debug",                1,      l_debug,        arg_debug,
       "default_nlines",       9,      l_def_nline,    arg_def_nline,
       "default_shell",        10,     l_def_shell,    arg_def_shell,
       "default_smooth",       10,     l_def_smooth,   arg_def_smooth,
       "echo",                 2,      l_echo,         arg_echo,
       "escape",               2,      l_escape,       arg_escape,
       "foreground",           1,      l_foreground,   arg_foreground,
       "iostat",               1,      l_iostat,       arg_null,
       "label",                2,      l_label,        arg_label,
       "list",                 2,      l_list,         arg_null,
       "nlines",               1,      l_def_nline,    arg_def_nline,
       "select",               2,      l_select,       arg_select,
       "shell",                2,      l_def_shell,    arg_def_shell,
       "smooth",               2,      l_smooth,       arg_smooth,
       "source",               2,      l_source,       arg_source,
       "terse",                2,      l_terse,        arg_terse,
       "time",                 2,      l_time,         arg_time,
       "unalias",              3,      l_unalias,      arg_unalias,
       "unset",                3,      l_unset,        arg_unset,
       "variable",             1,      l_variable,     arg_null,
       "window",               2,      l_window,       arg_window,
       "write",                2,      l_write,        arg_write,
       0
};

struct lcmd_tab *
lcmd_lookup(name)
char *name;
{
       register struct lcmd_tab *p;

       for (p = lcmd_tab; p->lc_name != 0; p++)
               if (str_match(name, p->lc_name, p->lc_minlen))
                       return p;
       return 0;
}

dosource(filename)
char *filename;
{
       if (cx_beginfile(filename) < 0)
               return -1;
       p_start();
       err_end();
       cx_end();
       return 0;
}

dolongcmd(buffer, arg, narg)
char *buffer;
struct value *arg;
int narg;
{
       if (cx_beginbuf(buffer, arg, narg) < 0)
               return -1;
       p_start();
       err_end();
       cx_end();
       return 0;
}