1 /*
2 * Copyright (c) 1983, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Edward Wang at The University of California, Berkeley.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 */
36
37 #ifndef lint
38 static char sccsid[] = "@(#)cmd1.c 8.1 (Berkeley) 6/6/93";
39 static char rcsid[] =
40 "@(#)$FreeBSD: head/usr.bin/window/cmd1.c 76736 2001-05-17 09:38:49Z obrien $";
41 #endif /* not lint */
42
43 #include "defs.h"
44 #include "char.h"
45
c_window()46 c_window()
47 {
48 int col, row, xcol, xrow;
49 int id;
50
51 if ((id = findid()) < 0)
52 return;
53 if (!terse)
54 wwputs("New window (upper left corner): ", cmdwin);
55 col = 0;
56 row = 1;
57 wwadd(boxwin, framewin->ww_back);
58 for (;;) {
59 wwbox(boxwin, row - 1, col - 1, 3, 3);
60 wwsetcursor(row, col);
61 while (wwpeekc() < 0)
62 wwiomux();
63 switch (getpos(&row, &col, row > 1, 0,
64 wwnrow - 1, wwncol - 1)) {
65 case 3:
66 wwunbox(boxwin);
67 wwdelete(boxwin);
68 return;
69 case 2:
70 wwunbox(boxwin);
71 break;
72 case 1:
73 wwunbox(boxwin);
74 case 0:
75 continue;
76 }
77 break;
78 }
79 if (!terse)
80 wwputs("\nNew window (lower right corner): ", cmdwin);
81 xcol = col;
82 xrow = row;
83 for (;;) {
84 wwbox(boxwin, row - 1, col - 1,
85 xrow - row + 3, xcol - col + 3);
86 wwsetcursor(xrow, xcol);
87 while (wwpeekc() < 0)
88 wwiomux();
89 switch (getpos(&xrow, &xcol, row, col, wwnrow - 1, wwncol - 1))
90 {
91 case 3:
92 wwunbox(boxwin);
93 wwdelete(boxwin);
94 return;
95 case 2:
96 wwunbox(boxwin);
97 break;
98 case 1:
99 wwunbox(boxwin);
100 case 0:
101 continue;
102 }
103 break;
104 }
105 wwdelete(boxwin);
106 if (!terse)
107 wwputc('\n', cmdwin);
108 wwcurtowin(cmdwin);
109 (void) openwin(id, row, col, xrow-row+1, xcol-col+1, default_nline,
110 (char *) 0, 1, 1, default_shellfile, default_shell);
111 }
112
getpos(row,col,minrow,mincol,maxrow,maxcol)113 getpos(row, col, minrow, mincol, maxrow, maxcol)
114 register int *row, *col;
115 int minrow, mincol;
116 int maxrow, maxcol;
117 {
118 static int scount;
119 int count;
120 int c;
121 int oldrow = *row, oldcol = *col;
122
123 while ((c = wwgetc()) >= 0) {
124 switch (c) {
125 case '0': case '1': case '2': case '3': case '4':
126 case '5': case '6': case '7': case '8': case '9':
127 scount = scount * 10 + c - '0';
128 continue;
129 }
130 count = scount ? scount : 1;
131 scount = 0;
132 switch (c) {
133 case 'h':
134 if ((*col -= count) < mincol)
135 *col = mincol;
136 break;
137 case 'H':
138 *col = mincol;
139 break;
140 case 'l':
141 if ((*col += count) > maxcol)
142 *col = maxcol;
143 break;
144 case 'L':
145 *col = maxcol;
146 break;
147 case 'j':
148 if ((*row += count) > maxrow)
149 *row = maxrow;
150 break;
151 case 'J':
152 *row = maxrow;
153 break;
154 case 'k':
155 if ((*row -= count) < minrow)
156 *row = minrow;
157 break;
158 case 'K':
159 *row = minrow;
160 break;
161 case ctrl('['):
162 if (!terse)
163 wwputs("\nCancelled. ", cmdwin);
164 return 3;
165 case '\r':
166 return 2;
167 default:
168 if (!terse)
169 wwputs("\nType [hjklHJKL] to move, return to enter position, escape to cancel.", cmdwin);
170 wwbell();
171 }
172 }
173 return oldrow != *row || oldcol != *col;
174 }
175