155 lines
5.5 KiB
C
155 lines
5.5 KiB
C
|
/*
|
||
|
* Copyright (c) 1983, 1993
|
||
|
* The 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.
|
||
|
*
|
||
|
* Redistribution and use in source and binary forms, with or without
|
||
|
* modification, are permitted provided that the following conditions
|
||
|
* are met:
|
||
|
* 1. Redistributions of source code must retain the above copyright
|
||
|
* notice, this list of conditions and the following disclaimer.
|
||
|
* 2. Redistributions in binary form must reproduce the above copyright
|
||
|
* notice, this list of conditions and the following disclaimer in the
|
||
|
* documentation and/or other materials provided with the distribution.
|
||
|
* 3. All advertising materials mentioning features or use of this software
|
||
|
* must display the following acknowledgement:
|
||
|
* This product includes software developed by the University of
|
||
|
* California, Berkeley and its contributors.
|
||
|
* 4. Neither the name of the University nor the names of its contributors
|
||
|
* may be used to endorse or promote products derived from this software
|
||
|
* without specific prior written permission.
|
||
|
*
|
||
|
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
||
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
||
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
||
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||
|
* SUCH DAMAGE.
|
||
|
*/
|
||
|
|
||
|
#ifndef lint
|
||
|
static char sccsid[] = "@(#)cmd2.c 8.1 (Berkeley) 6/6/93";
|
||
|
#endif /* not lint */
|
||
|
|
||
|
#include "defs.h"
|
||
|
|
||
|
char *help_shortcmd[] = {
|
||
|
"# Select window # and return to conversation mode",
|
||
|
"%# Select window # but stay in command mode",
|
||
|
"escape Return to conversation mode without changing window",
|
||
|
"^^ Return to conversation mode and change to previous window",
|
||
|
"c# Close window #",
|
||
|
"w Open a new window",
|
||
|
"m# Move window #",
|
||
|
"M# Move window # to its previous position",
|
||
|
"s# Change the size of window #",
|
||
|
"S# Change window # to its previous size",
|
||
|
"^Y Scroll up one line",
|
||
|
"^E Scroll down one line",
|
||
|
"^U Scroll up half a window",
|
||
|
"^D Scroll down half a window",
|
||
|
"^B Scroll up a full window",
|
||
|
"^F Scroll down a full window",
|
||
|
"h Move cursor left",
|
||
|
"j Move cursor down",
|
||
|
"k Move cursor up",
|
||
|
"l Move cursor right",
|
||
|
"y Yank",
|
||
|
"p Put",
|
||
|
"^S Stop output in current window",
|
||
|
"^Q Restart output in current window",
|
||
|
"^L Redraw screen",
|
||
|
"^Z Suspend",
|
||
|
"q Quit",
|
||
|
": Enter a long command",
|
||
|
0
|
||
|
};
|
||
|
char *help_longcmd[] = {
|
||
|
":alias name string ... Make `name' an alias for `string ...'",
|
||
|
":alias Show all aliases",
|
||
|
":close # ... Close windows",
|
||
|
":close all Close all windows",
|
||
|
":cursor modes Set the cursor modes",
|
||
|
":echo # string ... Print `string ...' in window #",
|
||
|
":escape c Set escape character to `c'",
|
||
|
":foreground # flag Make # a foreground window, if `flag' is true",
|
||
|
":label # string Set label of window # to `string'",
|
||
|
":list List all open windows",
|
||
|
":default_nline lines Set default window buffer size to `lines'",
|
||
|
":default_shell string ...",
|
||
|
" Set default shell to `string ...'",
|
||
|
":default_smooth flag Set default smooth scroll flag",
|
||
|
":select # Select window #",
|
||
|
":smooth # flag Set window # to smooth scroll mode",
|
||
|
":source filename Execute commands in `filename'",
|
||
|
":terse flag Set terse mode",
|
||
|
":unalias name Undefine `name' as an alias",
|
||
|
":unset variable Deallocate `variable'",
|
||
|
":variable List all variables",
|
||
|
":window [row col nrow ncol nline label pty frame mapnl keepopen smooth shell]",
|
||
|
" Open a window at `row', `col' of size `nrow', `ncol',",
|
||
|
" with `nline' lines in the buffer, and `label'",
|
||
|
":write # string ... Write `string ...' to window # as input",
|
||
|
0
|
||
|
};
|
||
|
|
||
|
c_help()
|
||
|
{
|
||
|
register struct ww *w;
|
||
|
|
||
|
if ((w = openiwin(wwnrow - 3, "Help")) == 0) {
|
||
|
error("Can't open help window: %s.", wwerror());
|
||
|
return;
|
||
|
}
|
||
|
wwprintf(w, "The escape character is %c.\n", escapec);
|
||
|
wwprintf(w, "(# represents one of the digits from 1 to 9.)\n\n");
|
||
|
if (help_print(w, "Short commands", help_shortcmd) >= 0)
|
||
|
(void) help_print(w, "Long commands", help_longcmd);
|
||
|
closeiwin(w);
|
||
|
}
|
||
|
|
||
|
help_print(w, name, list)
|
||
|
register struct ww *w;
|
||
|
char *name;
|
||
|
register char **list;
|
||
|
{
|
||
|
wwprintf(w, "%s:\n\n", name);
|
||
|
while (*list)
|
||
|
switch (more(w, 0)) {
|
||
|
case 0:
|
||
|
wwputs(*list++, w);
|
||
|
wwputc('\n', w);
|
||
|
break;
|
||
|
case 1:
|
||
|
wwprintf(w, "%s: (continued)\n\n", name);
|
||
|
break;
|
||
|
case 2:
|
||
|
return -1;
|
||
|
}
|
||
|
return more(w, 1) == 2 ? -1 : 0;
|
||
|
}
|
||
|
|
||
|
c_quit()
|
||
|
{
|
||
|
char oldterse = terse;
|
||
|
|
||
|
setterse(0);
|
||
|
wwputs("Really quit [yn]? ", cmdwin);
|
||
|
wwcurtowin(cmdwin);
|
||
|
while (wwpeekc() < 0)
|
||
|
wwiomux();
|
||
|
if (wwgetc() == 'y') {
|
||
|
wwputs("Yes", cmdwin);
|
||
|
quit++;
|
||
|
} else
|
||
|
wwputc('\n', cmdwin);
|
||
|
setterse(!quit && oldterse);
|
||
|
}
|