1 1.12 christos /* $NetBSD: init.c,v 1.12 2021/09/11 20:55:03 christos Exp $ */ 2 1.6 cgd 3 1.1 cgd /*- 4 1.5 mycroft * Copyright (c) 1980, 1991, 1993 5 1.5 mycroft * The Regents of the University of California. All rights reserved. 6 1.1 cgd * 7 1.1 cgd * Redistribution and use in source and binary forms, with or without 8 1.1 cgd * modification, are permitted provided that the following conditions 9 1.1 cgd * are met: 10 1.1 cgd * 1. Redistributions of source code must retain the above copyright 11 1.1 cgd * notice, this list of conditions and the following disclaimer. 12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright 13 1.1 cgd * notice, this list of conditions and the following disclaimer in the 14 1.1 cgd * documentation and/or other materials provided with the distribution. 15 1.10 agc * 3. Neither the name of the University nor the names of its contributors 16 1.1 cgd * may be used to endorse or promote products derived from this software 17 1.1 cgd * without specific prior written permission. 18 1.1 cgd * 19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 1.1 cgd * SUCH DAMAGE. 30 1.1 cgd */ 31 1.1 cgd 32 1.7 christos #include <sys/cdefs.h> 33 1.1 cgd #ifndef lint 34 1.6 cgd #if 0 35 1.6 cgd static char sccsid[] = "@(#)init.c 8.1 (Berkeley) 5/31/93"; 36 1.6 cgd #else 37 1.12 christos __RCSID("$NetBSD: init.c,v 1.12 2021/09/11 20:55:03 christos Exp $"); 38 1.6 cgd #endif 39 1.1 cgd #endif /* not lint */ 40 1.1 cgd 41 1.9 wiz #include <stdarg.h> 42 1.1 cgd 43 1.1 cgd #include "csh.h" 44 1.1 cgd #include "extern.h" 45 1.1 cgd 46 1.1 cgd #define INF 1000 47 1.1 cgd 48 1.1 cgd struct biltins bfunc[] = 49 1.1 cgd { 50 1.5 mycroft { "@", dolet, 0, INF }, 51 1.5 mycroft { "alias", doalias, 0, INF }, 52 1.5 mycroft { "bg", dobg, 0, INF }, 53 1.5 mycroft { "break", dobreak, 0, 0 }, 54 1.5 mycroft { "breaksw", doswbrk, 0, 0 }, 55 1.5 mycroft { "case", dozip, 0, 1 }, 56 1.5 mycroft { "cd", dochngd, 0, INF }, 57 1.5 mycroft { "chdir", dochngd, 0, INF }, 58 1.5 mycroft { "continue", docontin, 0, 0 }, 59 1.5 mycroft { "default", dozip, 0, 0 }, 60 1.5 mycroft { "dirs", dodirs, 0, INF }, 61 1.5 mycroft { "echo", doecho, 0, INF }, 62 1.5 mycroft { "else", doelse, 0, INF }, 63 1.5 mycroft { "end", doend, 0, 0 }, 64 1.5 mycroft { "endif", dozip, 0, 0 }, 65 1.5 mycroft { "endsw", dozip, 0, 0 }, 66 1.5 mycroft { "eval", doeval, 0, INF }, 67 1.5 mycroft { "exec", execash, 1, INF }, 68 1.5 mycroft { "exit", doexit, 0, INF }, 69 1.5 mycroft { "fg", dofg, 0, INF }, 70 1.5 mycroft { "foreach", doforeach, 3, INF }, 71 1.5 mycroft { "glob", doglob, 0, INF }, 72 1.5 mycroft { "goto", dogoto, 1, 1 }, 73 1.5 mycroft { "hashstat", hashstat, 0, 0 }, 74 1.5 mycroft { "history", dohist, 0, 2 }, 75 1.5 mycroft { "if", doif, 1, INF }, 76 1.12 christos { "jobs", dojobs, 0, 2 }, 77 1.5 mycroft { "kill", dokill, 1, INF }, 78 1.5 mycroft { "limit", dolimit, 0, 3 }, 79 1.5 mycroft { "linedit", doecho, 0, INF }, 80 1.5 mycroft { "login", dologin, 0, 1 }, 81 1.5 mycroft { "logout", dologout, 0, 0 }, 82 1.5 mycroft { "nice", donice, 0, INF }, 83 1.5 mycroft { "nohup", donohup, 0, INF }, 84 1.5 mycroft { "notify", donotify, 0, INF }, 85 1.5 mycroft { "onintr", doonintr, 0, 2 }, 86 1.5 mycroft { "popd", dopopd, 0, INF }, 87 1.5 mycroft { "printf", doprintf, 1, INF }, 88 1.5 mycroft { "pushd", dopushd, 0, INF }, 89 1.5 mycroft { "rehash", dohash, 0, 0 }, 90 1.5 mycroft { "repeat", dorepeat, 2, INF }, 91 1.5 mycroft { "set", doset, 0, INF }, 92 1.5 mycroft { "setenv", dosetenv, 0, 2 }, 93 1.5 mycroft { "shift", shift, 0, 1 }, 94 1.5 mycroft { "source", dosource, 1, 2 }, 95 1.5 mycroft { "stop", dostop, 1, INF }, 96 1.5 mycroft { "suspend", dosuspend, 0, 0 }, 97 1.5 mycroft { "switch", doswitch, 1, INF }, 98 1.5 mycroft { "time", dotime, 0, INF }, 99 1.5 mycroft { "umask", doumask, 0, 1 }, 100 1.5 mycroft { "unalias", unalias, 1, INF }, 101 1.5 mycroft { "unhash", dounhash, 0, 0 }, 102 1.5 mycroft { "unlimit", dounlimit, 0, INF }, 103 1.5 mycroft { "unset", unset, 1, INF }, 104 1.5 mycroft { "unsetenv", dounsetenv, 1, INF }, 105 1.5 mycroft { "wait", dowait, 0, 0 }, 106 1.5 mycroft { "which", dowhich, 1, INF }, 107 1.5 mycroft { "while", dowhile, 1, INF } 108 1.1 cgd }; 109 1.8 wiz int nbfunc = sizeof(bfunc) / sizeof(*bfunc); 110 1.1 cgd 111 1.1 cgd struct srch srchn[] = 112 1.1 cgd { 113 1.5 mycroft { "@", T_LET }, 114 1.5 mycroft { "break", T_BREAK }, 115 1.5 mycroft { "breaksw", T_BRKSW }, 116 1.5 mycroft { "case", T_CASE }, 117 1.5 mycroft { "default", T_DEFAULT }, 118 1.5 mycroft { "else", T_ELSE }, 119 1.5 mycroft { "end", T_END }, 120 1.5 mycroft { "endif", T_ENDIF }, 121 1.5 mycroft { "endsw", T_ENDSW }, 122 1.5 mycroft { "exit", T_EXIT }, 123 1.5 mycroft { "foreach", T_FOREACH }, 124 1.5 mycroft { "goto", T_GOTO }, 125 1.5 mycroft { "if", T_IF }, 126 1.5 mycroft { "label", T_LABEL }, 127 1.5 mycroft { "set", T_SET }, 128 1.5 mycroft { "switch", T_SWITCH }, 129 1.5 mycroft { "while", T_WHILE } 130 1.1 cgd }; 131 1.8 wiz int nsrchn = sizeof(srchn) / sizeof(*srchn); 132