1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2009, 2013 The FreeBSD Foundation 5 * All rights reserved. 6 * 7 * This software was developed by Ed Schouten under sponsorship from the 8 * FreeBSD Foundation. 9 * 10 * Portions of this software were developed by Oleksandr Rybalko 11 * under sponsorship from the FreeBSD Foundation. 12 * 13 * Redistribution and use in source and binary forms, with or without 14 * modification, are permitted provided that the following conditions 15 * are met: 16 * 1. Redistributions of source code must retain the above copyright 17 * notice, this list of conditions and the following disclaimer. 18 * 2. Redistributions in binary form must reproduce the above copyright 19 * notice, this list of conditions and the following disclaimer in the 20 * documentation and/or other materials provided with the distribution. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 * SUCH DAMAGE. 33 */ 34 35 #include <sys/cdefs.h> 36 __FBSDID("$FreeBSD$"); 37 38 #include <sys/param.h> 39 #include <sys/kernel.h> 40 #include <sys/lock.h> 41 #include <sys/malloc.h> 42 #include <sys/mutex.h> 43 #include <sys/reboot.h> 44 #include <sys/systm.h> 45 46 #include <dev/vt/vt.h> 47 48 static MALLOC_DEFINE(M_VTBUF, "vtbuf", "vt buffer"); 49 50 #define VTBUF_LOCK(vb) mtx_lock_spin(&(vb)->vb_lock) 51 #define VTBUF_UNLOCK(vb) mtx_unlock_spin(&(vb)->vb_lock) 52 53 #define POS_INDEX(c, r) (((r) << 12) + (c)) 54 #define POS_COPY(d, s) do { \ 55 (d).tp_col = (s).tp_col; \ 56 (d).tp_row = (s).tp_row; \ 57 } while (0) 58 59 #ifndef SC_NO_CUTPASTE 60 static int vtbuf_htw(const struct vt_buf *vb, int row); 61 static int vtbuf_wth(const struct vt_buf *vb, int row); 62 static int vtbuf_in_this_range(int begin, int test, int end, int sz); 63 #endif 64 65 /* 66 * line4 67 * line5 <--- curroffset (terminal output to that line) 68 * line0 69 * line1 <--- roffset (history display from that point) 70 * line2 71 * line3 72 */ 73 int 74 vthistory_seek(struct vt_buf *vb, int offset, int whence) 75 { 76 int diff, top, bottom, roffset; 77 78 /* No scrolling if not enabled. */ 79 if ((vb->vb_flags & VBF_SCROLL) == 0) { 80 if (vb->vb_roffset != vb->vb_curroffset) { 81 vb->vb_roffset = vb->vb_curroffset; 82 return (0xffff); 83 } 84 return (0); /* No changes */ 85 } 86 87 /* "top" may be a negative integer. */ 88 bottom = vb->vb_curroffset; 89 top = (vb->vb_flags & VBF_HISTORY_FULL) ? 90 bottom + vb->vb_scr_size.tp_row - vb->vb_history_size : 91 0; 92 93 roffset = 0; /* Make gcc happy. */ 94 switch (whence) { 95 case VHS_SET: 96 if (offset < 0) 97 offset = 0; 98 roffset = top + offset; 99 break; 100 case VHS_CUR: 101 /* 102 * Operate on copy of offset value, since it temporary 103 * can be bigger than amount of rows in buffer. 104 */ 105 roffset = vb->vb_roffset; 106 if (roffset >= bottom + vb->vb_scr_size.tp_row) 107 roffset -= vb->vb_history_size; 108 109 roffset += offset; 110 roffset = MAX(roffset, top); 111 roffset = MIN(roffset, bottom); 112 113 if (roffset < 0) 114 roffset = vb->vb_history_size + roffset; 115 116 break; 117 case VHS_END: 118 /* Go to current offset. */ 119 roffset = vb->vb_curroffset; 120 break; 121 } 122 123 diff = vb->vb_roffset != roffset; 124 vb->vb_roffset = roffset; 125 126 return (diff); 127 } 128 129 void 130 vthistory_addlines(struct vt_buf *vb, int offset) 131 { 132 #ifndef SC_NO_CUTPASTE 133 int cur, sz; 134 #endif 135 136 vb->vb_curroffset += offset; 137 if (vb->vb_curroffset < 0) 138 vb->vb_curroffset = 0; 139 if (vb->vb_curroffset + vb->vb_scr_size.tp_row >= vb->vb_history_size) 140 vb->vb_flags |= VBF_HISTORY_FULL; 141 vb->vb_curroffset %= vb->vb_history_size; 142 if ((vb->vb_flags & VBF_SCROLL) == 0) { 143 vb->vb_roffset = vb->vb_curroffset; 144 } 145 146 #ifndef SC_NO_CUTPASTE 147 sz = vb->vb_history_size; 148 cur = vb->vb_roffset + vb->vb_scr_size.tp_row + sz - 1; 149 if (vtbuf_in_this_range(cur, vb->vb_mark_start.tp_row, cur + offset, sz) || 150 vtbuf_in_this_range(cur, vb->vb_mark_end.tp_row, cur + offset, sz)) { 151 /* clear screen selection */ 152 vb->vb_mark_start.tp_row = vb->vb_mark_end.tp_row; 153 vb->vb_mark_start.tp_col = vb->vb_mark_end.tp_col; 154 } 155 #endif 156 } 157 158 void 159 vthistory_getpos(const struct vt_buf *vb, unsigned int *offset) 160 { 161 162 *offset = vb->vb_roffset; 163 } 164 165 #ifndef SC_NO_CUTPASTE /* Only mouse support use it now. */ 166 /* Translate history row to current view row number. */ 167 static int 168 vtbuf_htw(const struct vt_buf *vb, int row) 169 { 170 171 /* 172 * total 1000 rows. 173 * History offset roffset winrow 174 * 205 200 ((205 - 200 + 1000) % 1000) = 5 175 * 90 990 ((90 - 990 + 1000) % 1000) = 100 176 */ 177 return ((row - vb->vb_roffset + vb->vb_history_size) % 178 vb->vb_history_size); 179 } 180 181 /* Translate current view row number to history row. */ 182 static int 183 vtbuf_wth(const struct vt_buf *vb, int row) 184 { 185 186 return ((vb->vb_roffset + row) % vb->vb_history_size); 187 } 188 189 /* 190 * Test if an index in a circular buffer is within a range. 191 * 192 * begin - start index 193 * end - end index 194 * test - test index 195 * sz - size of circular buffer when it turns over 196 */ 197 static int 198 vtbuf_in_this_range(int begin, int test, int end, int sz) 199 { 200 201 begin %= sz; 202 end %= sz; 203 204 /* check for inversion */ 205 if (begin > end) 206 return (test >= begin || test < end); 207 else 208 return (test >= begin && test < end); 209 } 210 #endif 211 212 int 213 vtbuf_iscursor(const struct vt_buf *vb, int row, int col) 214 { 215 #ifndef SC_NO_CUTPASTE 216 int sc, sr, sz, ec, er, tmp; 217 #endif 218 219 if ((vb->vb_flags & (VBF_CURSOR|VBF_SCROLL)) == VBF_CURSOR && 220 (vb->vb_cursor.tp_row == row) && (vb->vb_cursor.tp_col == col)) 221 return (1); 222 223 #ifndef SC_NO_CUTPASTE 224 /* Mark cut/paste region. */ 225 if (vb->vb_mark_start.tp_col == vb->vb_mark_end.tp_col && 226 vb->vb_mark_start.tp_row == vb->vb_mark_end.tp_row) 227 return (0); 228 229 sc = vb->vb_mark_start.tp_col; 230 sr = vb->vb_mark_start.tp_row; 231 ec = vb->vb_mark_end.tp_col; 232 er = vb->vb_mark_end.tp_row; 233 234 /* 235 * Information about if the selection was made bottom-top or 236 * top-bottom is lost due to modulo arithmetics and needs to 237 * be recovered: 238 */ 239 sz = vb->vb_history_size; 240 tmp = (sz + er - sr) % sz; 241 row = vtbuf_wth(vb, row); 242 243 /* Swap start and end if start > end */ 244 if ((2 * tmp) > sz || (tmp == 0 && sc > ec)) { 245 tmp = sc; sc = ec; ec = tmp; 246 tmp = sr; sr = er; er = tmp; 247 } 248 249 if (vtbuf_in_this_range(POS_INDEX(sc, sr), POS_INDEX(col, row), 250 POS_INDEX(ec, er), POS_INDEX(0, sz))) 251 return (1); 252 #endif 253 254 return (0); 255 } 256 257 static inline void 258 vtbuf_dirty_locked(struct vt_buf *vb, const term_rect_t *area) 259 { 260 261 if (vb->vb_dirtyrect.tr_begin.tp_row > area->tr_begin.tp_row) 262 vb->vb_dirtyrect.tr_begin.tp_row = area->tr_begin.tp_row; 263 if (vb->vb_dirtyrect.tr_begin.tp_col > area->tr_begin.tp_col) 264 vb->vb_dirtyrect.tr_begin.tp_col = area->tr_begin.tp_col; 265 if (vb->vb_dirtyrect.tr_end.tp_row < area->tr_end.tp_row) 266 vb->vb_dirtyrect.tr_end.tp_row = area->tr_end.tp_row; 267 if (vb->vb_dirtyrect.tr_end.tp_col < area->tr_end.tp_col) 268 vb->vb_dirtyrect.tr_end.tp_col = area->tr_end.tp_col; 269 } 270 271 void 272 vtbuf_dirty(struct vt_buf *vb, const term_rect_t *area) 273 { 274 275 VTBUF_LOCK(vb); 276 vtbuf_dirty_locked(vb, area); 277 VTBUF_UNLOCK(vb); 278 } 279 280 static inline void 281 vtbuf_dirty_cell_locked(struct vt_buf *vb, const term_pos_t *p) 282 { 283 term_rect_t area; 284 285 area.tr_begin = *p; 286 area.tr_end.tp_row = p->tp_row + 1; 287 area.tr_end.tp_col = p->tp_col + 1; 288 vtbuf_dirty_locked(vb, &area); 289 } 290 291 static void 292 vtbuf_make_undirty(struct vt_buf *vb) 293 { 294 295 vb->vb_dirtyrect.tr_begin = vb->vb_scr_size; 296 vb->vb_dirtyrect.tr_end.tp_row = vb->vb_dirtyrect.tr_end.tp_col = 0; 297 } 298 299 void 300 vtbuf_undirty(struct vt_buf *vb, term_rect_t *r) 301 { 302 303 VTBUF_LOCK(vb); 304 *r = vb->vb_dirtyrect; 305 vtbuf_make_undirty(vb); 306 VTBUF_UNLOCK(vb); 307 } 308 309 void 310 vtbuf_copy(struct vt_buf *vb, const term_rect_t *r, const term_pos_t *p2) 311 { 312 const term_pos_t *p1 = &r->tr_begin; 313 term_rect_t area; 314 unsigned int rows, cols; 315 int pr, rdiff; 316 317 KASSERT(r->tr_begin.tp_row < vb->vb_scr_size.tp_row, 318 ("vtbuf_copy begin.tp_row %d must be less than screen width %d", 319 r->tr_begin.tp_row, vb->vb_scr_size.tp_row)); 320 KASSERT(r->tr_begin.tp_col < vb->vb_scr_size.tp_col, 321 ("vtbuf_copy begin.tp_col %d must be less than screen height %d", 322 r->tr_begin.tp_col, vb->vb_scr_size.tp_col)); 323 324 KASSERT(r->tr_end.tp_row <= vb->vb_scr_size.tp_row, 325 ("vtbuf_copy end.tp_row %d must be less than screen width %d", 326 r->tr_end.tp_row, vb->vb_scr_size.tp_row)); 327 KASSERT(r->tr_end.tp_col <= vb->vb_scr_size.tp_col, 328 ("vtbuf_copy end.tp_col %d must be less than screen height %d", 329 r->tr_end.tp_col, vb->vb_scr_size.tp_col)); 330 331 KASSERT(p2->tp_row < vb->vb_scr_size.tp_row, 332 ("vtbuf_copy tp_row %d must be less than screen width %d", 333 p2->tp_row, vb->vb_scr_size.tp_row)); 334 KASSERT(p2->tp_col < vb->vb_scr_size.tp_col, 335 ("vtbuf_copy tp_col %d must be less than screen height %d", 336 p2->tp_col, vb->vb_scr_size.tp_col)); 337 338 rows = r->tr_end.tp_row - r->tr_begin.tp_row; 339 rdiff = r->tr_begin.tp_row - p2->tp_row; 340 cols = r->tr_end.tp_col - r->tr_begin.tp_col; 341 if (r->tr_begin.tp_row > p2->tp_row && r->tr_begin.tp_col == 0 && 342 r->tr_end.tp_col == vb->vb_scr_size.tp_col && /* Full row. */ 343 (rows + rdiff) == vb->vb_scr_size.tp_row && /* Whole screen. */ 344 rdiff > 0) { /* Only forward direction. Do not eat history. */ 345 vthistory_addlines(vb, rdiff); 346 } else if (p2->tp_row < p1->tp_row) { 347 /* Handle overlapping copies of line segments. */ 348 /* Move data up. */ 349 for (pr = 0; pr < rows; pr++) 350 memmove( 351 &VTBUF_FIELD(vb, p2->tp_row + pr, p2->tp_col), 352 &VTBUF_FIELD(vb, p1->tp_row + pr, p1->tp_col), 353 cols * sizeof(term_char_t)); 354 } else { 355 /* Move data down. */ 356 for (pr = rows - 1; pr >= 0; pr--) 357 memmove( 358 &VTBUF_FIELD(vb, p2->tp_row + pr, p2->tp_col), 359 &VTBUF_FIELD(vb, p1->tp_row + pr, p1->tp_col), 360 cols * sizeof(term_char_t)); 361 } 362 363 area.tr_begin = *p2; 364 area.tr_end.tp_row = MIN(p2->tp_row + rows, vb->vb_scr_size.tp_row); 365 area.tr_end.tp_col = MIN(p2->tp_col + cols, vb->vb_scr_size.tp_col); 366 vtbuf_dirty(vb, &area); 367 } 368 369 static void 370 vtbuf_fill(struct vt_buf *vb, const term_rect_t *r, term_char_t c) 371 { 372 unsigned int pr, pc; 373 term_char_t *row; 374 375 for (pr = r->tr_begin.tp_row; pr < r->tr_end.tp_row; pr++) { 376 row = vb->vb_rows[(vb->vb_curroffset + pr) % 377 VTBUF_MAX_HEIGHT(vb)]; 378 for (pc = r->tr_begin.tp_col; pc < r->tr_end.tp_col; pc++) { 379 row[pc] = c; 380 } 381 } 382 } 383 384 void 385 vtbuf_fill_locked(struct vt_buf *vb, const term_rect_t *r, term_char_t c) 386 { 387 KASSERT(r->tr_begin.tp_row < vb->vb_scr_size.tp_row, 388 ("vtbuf_fill_locked begin.tp_row %d must be < screen height %d", 389 r->tr_begin.tp_row, vb->vb_scr_size.tp_row)); 390 KASSERT(r->tr_begin.tp_col < vb->vb_scr_size.tp_col, 391 ("vtbuf_fill_locked begin.tp_col %d must be < screen width %d", 392 r->tr_begin.tp_col, vb->vb_scr_size.tp_col)); 393 394 KASSERT(r->tr_end.tp_row <= vb->vb_scr_size.tp_row, 395 ("vtbuf_fill_locked end.tp_row %d must be <= screen height %d", 396 r->tr_end.tp_row, vb->vb_scr_size.tp_row)); 397 KASSERT(r->tr_end.tp_col <= vb->vb_scr_size.tp_col, 398 ("vtbuf_fill_locked end.tp_col %d must be <= screen width %d", 399 r->tr_end.tp_col, vb->vb_scr_size.tp_col)); 400 401 VTBUF_LOCK(vb); 402 vtbuf_fill(vb, r, c); 403 vtbuf_dirty_locked(vb, r); 404 VTBUF_UNLOCK(vb); 405 } 406 407 static void 408 vtbuf_init_rows(struct vt_buf *vb) 409 { 410 int r; 411 412 vb->vb_history_size = MAX(vb->vb_history_size, vb->vb_scr_size.tp_row); 413 414 for (r = 0; r < vb->vb_history_size; r++) 415 vb->vb_rows[r] = &vb->vb_buffer[r * vb->vb_scr_size.tp_col]; 416 } 417 418 void 419 vtbuf_init_early(struct vt_buf *vb) 420 { 421 term_rect_t rect; 422 423 vb->vb_flags |= VBF_CURSOR; 424 vb->vb_roffset = 0; 425 vb->vb_curroffset = 0; 426 vb->vb_mark_start.tp_row = 0; 427 vb->vb_mark_start.tp_col = 0; 428 vb->vb_mark_end.tp_row = 0; 429 vb->vb_mark_end.tp_col = 0; 430 431 vtbuf_init_rows(vb); 432 rect.tr_begin.tp_row = rect.tr_begin.tp_col = 0; 433 rect.tr_end.tp_col = vb->vb_scr_size.tp_col; 434 rect.tr_end.tp_row = vb->vb_history_size; 435 vtbuf_fill(vb, &rect, VTBUF_SPACE_CHAR(TERMINAL_NORM_ATTR)); 436 vtbuf_make_undirty(vb); 437 if ((vb->vb_flags & VBF_MTX_INIT) == 0) { 438 mtx_init(&vb->vb_lock, "vtbuf", NULL, MTX_SPIN); 439 vb->vb_flags |= VBF_MTX_INIT; 440 } 441 } 442 443 void 444 vtbuf_init(struct vt_buf *vb, const term_pos_t *p) 445 { 446 int sz; 447 448 vb->vb_scr_size = *p; 449 vb->vb_history_size = VBF_DEFAULT_HISTORY_SIZE; 450 451 if ((vb->vb_flags & VBF_STATIC) == 0) { 452 sz = vb->vb_history_size * p->tp_col * sizeof(term_char_t); 453 vb->vb_buffer = malloc(sz, M_VTBUF, M_WAITOK | M_ZERO); 454 455 sz = vb->vb_history_size * sizeof(term_char_t *); 456 vb->vb_rows = malloc(sz, M_VTBUF, M_WAITOK | M_ZERO); 457 } 458 459 vtbuf_init_early(vb); 460 } 461 462 void 463 vtbuf_sethistory_size(struct vt_buf *vb, int size) 464 { 465 term_pos_t p; 466 467 /* With same size */ 468 p.tp_row = vb->vb_scr_size.tp_row; 469 p.tp_col = vb->vb_scr_size.tp_col; 470 vtbuf_grow(vb, &p, size); 471 } 472 473 void 474 vtbuf_grow(struct vt_buf *vb, const term_pos_t *p, unsigned int history_size) 475 { 476 term_char_t *old, *new, **rows, **oldrows, **copyrows, *row, *oldrow; 477 int bufsize, rowssize, w, h, c, r, history_was_full; 478 unsigned int old_history_size; 479 term_rect_t rect; 480 481 history_size = MAX(history_size, p->tp_row); 482 483 /* Allocate new buffer. */ 484 bufsize = history_size * p->tp_col * sizeof(term_char_t); 485 new = malloc(bufsize, M_VTBUF, M_WAITOK | M_ZERO); 486 rowssize = history_size * sizeof(term_pos_t *); 487 rows = malloc(rowssize, M_VTBUF, M_WAITOK | M_ZERO); 488 489 /* Toggle it. */ 490 VTBUF_LOCK(vb); 491 old = vb->vb_flags & VBF_STATIC ? NULL : vb->vb_buffer; 492 oldrows = vb->vb_flags & VBF_STATIC ? NULL : vb->vb_rows; 493 copyrows = vb->vb_rows; 494 495 w = vb->vb_scr_size.tp_col; 496 h = vb->vb_scr_size.tp_row; 497 old_history_size = vb->vb_history_size; 498 history_was_full = vb->vb_flags & VBF_HISTORY_FULL; 499 500 vb->vb_history_size = history_size; 501 vb->vb_buffer = new; 502 vb->vb_rows = rows; 503 vb->vb_flags &= ~VBF_STATIC; 504 vb->vb_scr_size = *p; 505 vtbuf_init_rows(vb); 506 507 /* Copy history and fill extra space if needed. */ 508 if (history_size > old_history_size) { 509 /* 510 * Copy rows to the new buffer. The first row in the history 511 * is back to index 0, ie. the new buffer doesn't cycle. 512 * 513 * The rest of the new buffer is initialized with blank 514 * content. 515 */ 516 for (r = 0; r < old_history_size; r ++) { 517 row = rows[r]; 518 519 /* Compute the corresponding row in the old buffer. */ 520 if (history_was_full) 521 /* 522 * The buffer is full, the "top" row is 523 * the one just after the viewable area 524 * (curroffset + viewable height) in the 525 * cycling buffer. The corresponding row 526 * is computed from this top row. 527 */ 528 oldrow = copyrows[ 529 (vb->vb_curroffset + h + r) % 530 old_history_size]; 531 else 532 /* 533 * The buffer is not full, therefore, 534 * we didn't cycle already. The 535 * corresponding rows are the same in 536 * both buffers. 537 */ 538 oldrow = copyrows[r]; 539 540 memmove(row, oldrow, 541 MIN(p->tp_col, w) * sizeof(term_char_t)); 542 543 /* 544 * XXX VTBUF_SPACE_CHAR(TERMINAL_NORM_ATTR) will 545 * extended lines of kernel text using the wrong 546 * background color. 547 */ 548 for (c = MIN(p->tp_col, w); c < p->tp_col; c++) { 549 row[c] = VTBUF_SPACE_CHAR(TERMINAL_NORM_ATTR); 550 } 551 } 552 553 /* Fill remaining rows. */ 554 rect.tr_begin.tp_col = 0; 555 rect.tr_begin.tp_row = old_history_size; 556 rect.tr_end.tp_col = p->tp_col; 557 rect.tr_end.tp_row = p->tp_row; 558 vtbuf_fill(vb, &rect, VTBUF_SPACE_CHAR(TERMINAL_NORM_ATTR)); 559 560 vb->vb_flags &= ~VBF_HISTORY_FULL; 561 } else { 562 /* 563 * Copy rows to the new buffer. The first row in the history 564 * is back to index 0, ie. the new buffer doesn't cycle. 565 * 566 * (old_history_size - history_size) lines of history are 567 * dropped. 568 */ 569 for (r = 0; r < history_size; r ++) { 570 row = rows[r]; 571 572 /* 573 * Compute the corresponding row in the old buffer. 574 * 575 * See the equivalent if{} block above for an 576 * explanation. 577 */ 578 if (history_was_full) 579 oldrow = copyrows[ 580 (vb->vb_curroffset + h + r + 581 (old_history_size - history_size)) % 582 old_history_size]; 583 else 584 oldrow = copyrows[ 585 (r + (old_history_size - history_size)) % 586 old_history_size]; 587 588 memmove(row, oldrow, 589 MIN(p->tp_col, w) * sizeof(term_char_t)); 590 591 /* 592 * XXX VTBUF_SPACE_CHAR(TERMINAL_NORM_ATTR) will 593 * extended lines of kernel text using the wrong 594 * background color. 595 */ 596 for (c = MIN(p->tp_col, w); c < p->tp_col; c++) { 597 row[c] = VTBUF_SPACE_CHAR(TERMINAL_NORM_ATTR); 598 } 599 } 600 601 if (!history_was_full && 602 (vb->vb_curroffset + h) >= history_size) 603 vb->vb_flags |= VBF_HISTORY_FULL; 604 } 605 606 /* 607 * If the screen is already filled (there are non-visible lines 608 * above the current viewable area), adjust curroffset to the 609 * new viewable area. 610 */ 611 if (!history_was_full && vb->vb_curroffset > 0) { 612 vb->vb_curroffset = vb->vb_curroffset + h - p->tp_row; 613 if (vb->vb_curroffset < 0) 614 vb->vb_curroffset += vb->vb_history_size; 615 vb->vb_curroffset %= vb->vb_history_size; 616 vb->vb_roffset = vb->vb_curroffset; 617 } 618 619 /* Adjust cursor position. */ 620 if (vb->vb_cursor.tp_col > p->tp_col - 1) 621 /* 622 * Move cursor to the last column, in case its previous 623 * position is outside of the new screen area. 624 */ 625 vb->vb_cursor.tp_col = p->tp_col - 1; 626 627 if (vb->vb_curroffset > 0 || vb->vb_cursor.tp_row > p->tp_row - 1) 628 /* Move cursor to the last line on the screen. */ 629 vb->vb_cursor.tp_row = p->tp_row - 1; 630 631 vtbuf_make_undirty(vb); 632 VTBUF_UNLOCK(vb); 633 634 /* Deallocate old buffer. */ 635 free(old, M_VTBUF); 636 free(oldrows, M_VTBUF); 637 } 638 639 void 640 vtbuf_putchar(struct vt_buf *vb, const term_pos_t *p, term_char_t c) 641 { 642 term_char_t *row; 643 644 KASSERT(p->tp_row < vb->vb_scr_size.tp_row, 645 ("vtbuf_putchar tp_row %d must be less than screen width %d", 646 p->tp_row, vb->vb_scr_size.tp_row)); 647 KASSERT(p->tp_col < vb->vb_scr_size.tp_col, 648 ("vtbuf_putchar tp_col %d must be less than screen height %d", 649 p->tp_col, vb->vb_scr_size.tp_col)); 650 651 row = vb->vb_rows[(vb->vb_curroffset + p->tp_row) % 652 VTBUF_MAX_HEIGHT(vb)]; 653 if (row[p->tp_col] != c) { 654 VTBUF_LOCK(vb); 655 row[p->tp_col] = c; 656 vtbuf_dirty_cell_locked(vb, p); 657 VTBUF_UNLOCK(vb); 658 } 659 } 660 661 void 662 vtbuf_cursor_position(struct vt_buf *vb, const term_pos_t *p) 663 { 664 665 if (vb->vb_flags & VBF_CURSOR) { 666 VTBUF_LOCK(vb); 667 vtbuf_dirty_cell_locked(vb, &vb->vb_cursor); 668 vb->vb_cursor = *p; 669 vtbuf_dirty_cell_locked(vb, &vb->vb_cursor); 670 VTBUF_UNLOCK(vb); 671 } else { 672 vb->vb_cursor = *p; 673 } 674 } 675 676 #ifndef SC_NO_CUTPASTE 677 static void 678 vtbuf_flush_mark(struct vt_buf *vb) 679 { 680 term_rect_t area; 681 int s, e; 682 683 /* Notify renderer to update marked region. */ 684 if ((vb->vb_mark_start.tp_col != vb->vb_mark_end.tp_col) || 685 (vb->vb_mark_start.tp_row != vb->vb_mark_end.tp_row)) { 686 687 s = vtbuf_htw(vb, vb->vb_mark_start.tp_row); 688 e = vtbuf_htw(vb, vb->vb_mark_end.tp_row); 689 690 area.tr_begin.tp_col = 0; 691 area.tr_begin.tp_row = MIN(s, e); 692 693 area.tr_end.tp_col = vb->vb_scr_size.tp_col; 694 area.tr_end.tp_row = MAX(s, e) + 1; 695 696 vtbuf_dirty(vb, &area); 697 } 698 } 699 700 int 701 vtbuf_get_marked_len(struct vt_buf *vb) 702 { 703 int ei, si, sz; 704 term_pos_t s, e; 705 706 /* Swap according to window coordinates. */ 707 if (POS_INDEX(vtbuf_htw(vb, vb->vb_mark_start.tp_row), 708 vb->vb_mark_start.tp_col) > 709 POS_INDEX(vtbuf_htw(vb, vb->vb_mark_end.tp_row), 710 vb->vb_mark_end.tp_col)) { 711 POS_COPY(e, vb->vb_mark_start); 712 POS_COPY(s, vb->vb_mark_end); 713 } else { 714 POS_COPY(s, vb->vb_mark_start); 715 POS_COPY(e, vb->vb_mark_end); 716 } 717 718 si = s.tp_row * vb->vb_scr_size.tp_col + s.tp_col; 719 ei = e.tp_row * vb->vb_scr_size.tp_col + e.tp_col; 720 721 /* Number symbols and number of rows to inject \n */ 722 sz = ei - si + ((e.tp_row - s.tp_row) * 2); 723 724 return (sz * sizeof(term_char_t)); 725 } 726 727 void 728 vtbuf_extract_marked(struct vt_buf *vb, term_char_t *buf, int sz) 729 { 730 int i, r, c, cs, ce; 731 term_pos_t s, e; 732 733 /* Swap according to window coordinates. */ 734 if (POS_INDEX(vtbuf_htw(vb, vb->vb_mark_start.tp_row), 735 vb->vb_mark_start.tp_col) > 736 POS_INDEX(vtbuf_htw(vb, vb->vb_mark_end.tp_row), 737 vb->vb_mark_end.tp_col)) { 738 POS_COPY(e, vb->vb_mark_start); 739 POS_COPY(s, vb->vb_mark_end); 740 } else { 741 POS_COPY(s, vb->vb_mark_start); 742 POS_COPY(e, vb->vb_mark_end); 743 } 744 745 i = 0; 746 for (r = s.tp_row; r <= e.tp_row; r ++) { 747 cs = (r == s.tp_row)?s.tp_col:0; 748 ce = (r == e.tp_row)?e.tp_col:vb->vb_scr_size.tp_col; 749 for (c = cs; c < ce; c ++) { 750 buf[i++] = vb->vb_rows[r][c]; 751 } 752 /* Add new line for all rows, but not for last one. */ 753 if (r != e.tp_row) { 754 buf[i++] = '\r'; 755 buf[i++] = '\n'; 756 } 757 } 758 } 759 760 int 761 vtbuf_set_mark(struct vt_buf *vb, int type, int col, int row) 762 { 763 term_char_t *r; 764 int i; 765 766 switch (type) { 767 case VTB_MARK_END: /* B1 UP */ 768 if (vb->vb_mark_last != VTB_MARK_MOVE) 769 return (0); 770 /* FALLTHROUGH */ 771 case VTB_MARK_MOVE: 772 case VTB_MARK_EXTEND: 773 vtbuf_flush_mark(vb); /* Clean old mark. */ 774 vb->vb_mark_end.tp_col = col; 775 vb->vb_mark_end.tp_row = vtbuf_wth(vb, row); 776 break; 777 case VTB_MARK_START: 778 vtbuf_flush_mark(vb); /* Clean old mark. */ 779 vb->vb_mark_start.tp_col = col; 780 vb->vb_mark_start.tp_row = vtbuf_wth(vb, row); 781 /* Start again, so clear end point. */ 782 vb->vb_mark_end.tp_col = col; 783 vb->vb_mark_end.tp_row = vtbuf_wth(vb, row); 784 break; 785 case VTB_MARK_WORD: 786 vtbuf_flush_mark(vb); /* Clean old mark. */ 787 vb->vb_mark_start.tp_row = vb->vb_mark_end.tp_row = 788 vtbuf_wth(vb, row); 789 r = vb->vb_rows[vb->vb_mark_start.tp_row]; 790 for (i = col; i >= 0; i --) { 791 if (TCHAR_CHARACTER(r[i]) == ' ') { 792 vb->vb_mark_start.tp_col = i + 1; 793 break; 794 } 795 } 796 for (i = col; i < vb->vb_scr_size.tp_col; i ++) { 797 if (TCHAR_CHARACTER(r[i]) == ' ') { 798 vb->vb_mark_end.tp_col = i; 799 break; 800 } 801 } 802 if (vb->vb_mark_start.tp_col > vb->vb_mark_end.tp_col) 803 vb->vb_mark_start.tp_col = vb->vb_mark_end.tp_col; 804 break; 805 case VTB_MARK_ROW: 806 vtbuf_flush_mark(vb); /* Clean old mark. */ 807 vb->vb_mark_start.tp_col = 0; 808 vb->vb_mark_end.tp_col = vb->vb_scr_size.tp_col; 809 vb->vb_mark_start.tp_row = vb->vb_mark_end.tp_row = 810 vtbuf_wth(vb, row); 811 break; 812 case VTB_MARK_NONE: 813 vb->vb_mark_last = type; 814 /* FALLTHROUGH */ 815 default: 816 /* panic? */ 817 return (0); 818 } 819 820 vb->vb_mark_last = type; 821 /* Draw new marked region. */ 822 vtbuf_flush_mark(vb); 823 return (1); 824 } 825 #endif 826 827 void 828 vtbuf_cursor_visibility(struct vt_buf *vb, int yes) 829 { 830 int oflags, nflags; 831 832 VTBUF_LOCK(vb); 833 oflags = vb->vb_flags; 834 if (yes) 835 vb->vb_flags |= VBF_CURSOR; 836 else 837 vb->vb_flags &= ~VBF_CURSOR; 838 nflags = vb->vb_flags; 839 840 if (oflags != nflags) 841 vtbuf_dirty_cell_locked(vb, &vb->vb_cursor); 842 VTBUF_UNLOCK(vb); 843 } 844 845 void 846 vtbuf_scroll_mode(struct vt_buf *vb, int yes) 847 { 848 int oflags, nflags; 849 850 VTBUF_LOCK(vb); 851 oflags = vb->vb_flags; 852 if (yes) 853 vb->vb_flags |= VBF_SCROLL; 854 else 855 vb->vb_flags &= ~VBF_SCROLL; 856 nflags = vb->vb_flags; 857 858 if (oflags != nflags) 859 vtbuf_dirty_cell_locked(vb, &vb->vb_cursor); 860 VTBUF_UNLOCK(vb); 861 } 862 863