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 * @(#)cmd7.c 8.1 (Berkeley) 6/6/93 37 * $FreeBSD: src/usr.bin/window/cmd7.c,v 1.2.6.2 2001/05/17 09:45:00 obrien Exp $ 38 * $DragonFly: src/usr.bin/window/cmd7.c,v 1.2 2003/06/17 04:29:33 dillon Exp $ 39 */ 40 41 #include <stdlib.h> 42 #include "defs.h" 43 #include "mystring.h" 44 45 /* 46 * Window size. 47 */ 48 49 c_size(w) 50 register struct ww *w; 51 { 52 int col, row; 53 54 if (!terse) 55 wwputs("New window size (lower right corner): ", cmdwin); 56 col = MIN(w->ww_w.r, wwncol) - 1; 57 row = MIN(w->ww_w.b, wwnrow) - 1; 58 wwadd(boxwin, framewin->ww_back); 59 for (;;) { 60 wwbox(boxwin, w->ww_w.t - 1, w->ww_w.l - 1, 61 row - w->ww_w.t + 3, col - w->ww_w.l + 3); 62 wwsetcursor(row, col); 63 while (wwpeekc() < 0) 64 wwiomux(); 65 switch (getpos(&row, &col, w->ww_w.t, w->ww_w.l, 66 wwnrow - 1, wwncol - 1)) { 67 case 3: 68 wwunbox(boxwin); 69 wwdelete(boxwin); 70 return; 71 case 2: 72 wwunbox(boxwin); 73 break; 74 case 1: 75 wwunbox(boxwin); 76 case 0: 77 continue; 78 } 79 break; 80 } 81 wwdelete(boxwin); 82 if (!terse) 83 wwputc('\n', cmdwin); 84 wwcurtowin(cmdwin); 85 sizewin(w, row - w->ww_w.t + 1, col - w->ww_w.l + 1); 86 } 87 88 /* 89 * Yank and put 90 */ 91 92 struct yb { 93 char *line; 94 int length; 95 struct yb *link; 96 }; 97 struct yb *yb_head, *yb_tail; 98 99 c_yank() 100 { 101 struct ww *w = selwin; 102 int col1, row1; 103 int col2, row2; 104 int r, c; 105 106 if (!terse) 107 wwputs("Yank starting position: ", cmdwin); 108 wwcursor(w, 0); 109 row1 = w->ww_cur.r; 110 col1 = w->ww_cur.c; 111 for (;;) { 112 wwsetcursor(row1, col1); 113 while (wwpeekc() < 0) 114 wwiomux(); 115 switch (getpos(&row1, &col1, w->ww_i.t, w->ww_i.l, 116 w->ww_i.b - 1, w->ww_i.r - 1)) { 117 case 3: 118 goto out; 119 case 2: 120 break; 121 case 1: 122 case 0: 123 continue; 124 } 125 break; 126 } 127 if (!terse) 128 wwputs("\nYank ending position: ", cmdwin); 129 row2 = row1; 130 col2 = col1; 131 for (;;) { 132 wwsetcursor(row2, col2); 133 while (wwpeekc() < 0) 134 wwiomux(); 135 r = row2; 136 c = col2; 137 switch (getpos(&row2, &col2, w->ww_i.t, w->ww_i.l, 138 w->ww_i.b - 1, w->ww_i.r - 1)) { 139 case 3: 140 yank_highlight(row1, col1, r, c); 141 goto out; 142 case 2: 143 break; 144 case 1: 145 yank_highlight(row1, col1, r, c); 146 yank_highlight(row1, col1, row2, col2); 147 case 0: 148 continue; 149 } 150 break; 151 } 152 if (row2 < row1 || row2 == row1 && col2 < col1) { 153 r = row1; 154 c = col1; 155 row1 = row2; 156 col1 = col2; 157 row2 = r; 158 col2 = c; 159 } 160 unyank(); 161 c = col1; 162 for (r = row1; r < row2; r++) { 163 yank_line(r, c, w->ww_b.r); 164 c = w->ww_b.l; 165 } 166 yank_line(r, c, col2); 167 yank_highlight(row1, col1, row2, col2); 168 if (!terse) 169 wwputc('\n', cmdwin); 170 out: 171 wwcursor(w, 1); 172 } 173 174 yank_highlight(row1, col1, row2, col2) 175 { 176 struct ww *w = selwin; 177 int r, c; 178 179 if ((wwavailmodes & WWM_REV) == 0) 180 return; 181 if (row2 < row1 || row2 == row1 && col2 < col1) { 182 r = row1; 183 c = col1; 184 row1 = row2; 185 col1 = col2; 186 row2 = r; 187 col2 = c; 188 } 189 c = col1; 190 for (r = row1; r < row2; r++) { 191 yank_highlight_line(r, c, w->ww_b.r); 192 c = w->ww_b.l; 193 } 194 yank_highlight_line(r, c, col2); 195 } 196 197 yank_highlight_line(r, c, cend) 198 { 199 struct ww *w = selwin; 200 char *win; 201 202 if (r < w->ww_i.t || r >= w->ww_i.b) 203 return; 204 if (c < w->ww_i.l) 205 c = w->ww_i.l; 206 if (cend >= w->ww_i.r) 207 cend = w->ww_i.r; 208 for (win = w->ww_win[r] + c; c < cend; c++, win++) { 209 *win ^= WWM_REV; 210 if (wwsmap[r][c] == w->ww_index) { 211 if (*win == 0) 212 w->ww_nvis[r]++; 213 else if (*win == WWM_REV) 214 w->ww_nvis[r]--; 215 wwns[r][c].c_m ^= WWM_REV; 216 wwtouched[r] |= WWU_TOUCHED; 217 } 218 } 219 } 220 221 unyank() 222 { 223 struct yb *yp, *yq; 224 225 for (yp = yb_head; yp; yp = yq) { 226 yq = yp->link; 227 str_free(yp->line); 228 free((char *) yp); 229 } 230 yb_head = yb_tail = 0; 231 } 232 233 yank_line(r, c, cend) 234 { 235 struct yb *yp; 236 int nl = 0; 237 int n; 238 union ww_char *bp; 239 char *cp; 240 241 if (c == cend) 242 return; 243 if ((yp = (struct yb *) malloc(sizeof *yp)) == 0) 244 return; 245 yp->link = 0; 246 nl = cend == selwin->ww_b.r; 247 bp = selwin->ww_buf[r]; 248 for (cend--; cend >= c; cend--) 249 if (bp[cend].c_c != ' ') 250 break; 251 yp->length = n = cend - c + 1; 252 if (nl) 253 yp->length++; 254 yp->line = str_alloc(yp->length + 1); 255 for (bp += c, cp = yp->line; --n >= 0;) 256 *cp++ = bp++->c_c; 257 if (nl) 258 *cp++ = '\n'; 259 *cp = 0; 260 if (yb_head) 261 yb_tail = yb_tail->link = yp; 262 else 263 yb_head = yb_tail = yp; 264 } 265 266 c_put() 267 { 268 struct yb *yp; 269 270 for (yp = yb_head; yp; yp = yp->link) 271 (void) write(selwin->ww_pty, yp->line, yp->length); 272 } 273