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 * @(#)cmd1.c 8.1 (Berkeley) 6/6/93 37 * $FreeBSD: src/usr.bin/window/cmd1.c,v 1.2.14.1 2001/05/17 09:45:00 obrien Exp $ 38 * $DragonFly: src/usr.bin/window/cmd1.c,v 1.3 2005/04/15 17:55:29 drhodus Exp $ 39 */ 40 41 #include "defs.h" 42 #include "char.h" 43 44 c_window() 45 { 46 int col, row, xcol, xrow; 47 int id; 48 49 if ((id = findid()) < 0) 50 return; 51 if (!terse) 52 wwputs("New window (upper left corner): ", cmdwin); 53 col = 0; 54 row = 1; 55 wwadd(boxwin, framewin->ww_back); 56 for (;;) { 57 wwbox(boxwin, row - 1, col - 1, 3, 3); 58 wwsetcursor(row, col); 59 while (wwpeekc() < 0) 60 wwiomux(); 61 switch (getpos(&row, &col, row > 1, 0, 62 wwnrow - 1, wwncol - 1)) { 63 case 3: 64 wwunbox(boxwin); 65 wwdelete(boxwin); 66 return; 67 case 2: 68 wwunbox(boxwin); 69 break; 70 case 1: 71 wwunbox(boxwin); 72 case 0: 73 continue; 74 } 75 break; 76 } 77 if (!terse) 78 wwputs("\nNew window (lower right corner): ", cmdwin); 79 xcol = col; 80 xrow = row; 81 for (;;) { 82 wwbox(boxwin, row - 1, col - 1, 83 xrow - row + 3, xcol - col + 3); 84 wwsetcursor(xrow, xcol); 85 while (wwpeekc() < 0) 86 wwiomux(); 87 switch (getpos(&xrow, &xcol, row, col, wwnrow - 1, wwncol - 1)) 88 { 89 case 3: 90 wwunbox(boxwin); 91 wwdelete(boxwin); 92 return; 93 case 2: 94 wwunbox(boxwin); 95 break; 96 case 1: 97 wwunbox(boxwin); 98 case 0: 99 continue; 100 } 101 break; 102 } 103 wwdelete(boxwin); 104 if (!terse) 105 wwputc('\n', cmdwin); 106 wwcurtowin(cmdwin); 107 (void) openwin(id, row, col, xrow-row+1, xcol-col+1, default_nline, 108 (char *) 0, 1, 1, default_shellfile, default_shell); 109 } 110 111 getpos(row, col, minrow, mincol, maxrow, maxcol) 112 int *row, *col; 113 int minrow, mincol; 114 int maxrow, maxcol; 115 { 116 static int scount; 117 int count; 118 int c; 119 int oldrow = *row, oldcol = *col; 120 121 while ((c = wwgetc()) >= 0) { 122 switch (c) { 123 case '0': case '1': case '2': case '3': case '4': 124 case '5': case '6': case '7': case '8': case '9': 125 scount = scount * 10 + c - '0'; 126 continue; 127 } 128 count = scount ? scount : 1; 129 scount = 0; 130 switch (c) { 131 case 'h': 132 if ((*col -= count) < mincol) 133 *col = mincol; 134 break; 135 case 'H': 136 *col = mincol; 137 break; 138 case 'l': 139 if ((*col += count) > maxcol) 140 *col = maxcol; 141 break; 142 case 'L': 143 *col = maxcol; 144 break; 145 case 'j': 146 if ((*row += count) > maxrow) 147 *row = maxrow; 148 break; 149 case 'J': 150 *row = maxrow; 151 break; 152 case 'k': 153 if ((*row -= count) < minrow) 154 *row = minrow; 155 break; 156 case 'K': 157 *row = minrow; 158 break; 159 case ctrl('['): 160 if (!terse) 161 wwputs("\nCancelled. ", cmdwin); 162 return 3; 163 case '\r': 164 return 2; 165 default: 166 if (!terse) 167 wwputs("\nType [hjklHJKL] to move, return to enter position, escape to cancel.", cmdwin); 168 wwbell(); 169 } 170 } 171 return oldrow != *row || oldcol != *col; 172 } 173