sys/dev/vt/vt_buf.c

   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 + vb->vb_scr_size.tp_row >= vb->vb_history_size) {
 138                 vb->vb_flags |= VBF_HISTORY_FULL;
 139                 vb->vb_curroffset %= vb->vb_history_size;
 140         }
 141         if ((vb->vb_flags & VBF_SCROLL) == 0) {
 142                 vb->vb_roffset = vb->vb_curroffset;
 143         }
 144
 145 #ifndef SC_NO_CUTPASTE
 146         sz = vb->vb_history_size;
 147         cur = vb->vb_roffset + vb->vb_scr_size.tp_row + sz - 1;
 148         if (vtbuf_in_this_range(cur, vb->vb_mark_start.tp_row, cur + offset, sz) ||
 149             vtbuf_in_this_range(cur, vb->vb_mark_end.tp_row, cur + offset, sz)) {
 150                 /* clear screen selection */
 151                 vb->vb_mark_start.tp_row = vb->vb_mark_end.tp_row;
 152                 vb->vb_mark_start.tp_col = vb->vb_mark_end.tp_col;
 153         }
 154 #endif
 155 }
 156
 157 void
 158 vthistory_getpos(const struct vt_buf *vb, unsigned int *offset)
 159 {
 160
 161         *offset = vb->vb_roffset;
 162 }
 163
 164 #ifndef SC_NO_CUTPASTE  /* Only mouse support use it now. */
 165 /* Translate history row to current view row number. */
 166 static int
 167 vtbuf_htw(const struct vt_buf *vb, int row)
 168 {
 169
 170         /*
 171          * total 1000 rows.
 172          * History offset       roffset winrow
 173          *      205             200     ((205 - 200 + 1000) % 1000) = 5
 174          *      90              990     ((90 - 990 + 1000) % 1000) = 100
 175          */
 176         return ((row - vb->vb_roffset + vb->vb_history_size) %
 177             vb->vb_history_size);
 178 }
 179
 180 /* Translate current view row number to history row. */
 181 static int
 182 vtbuf_wth(const struct vt_buf *vb, int row)
 183 {
 184
 185         return ((vb->vb_roffset + row) % vb->vb_history_size);
 186 }
 187
 188 /*
 189  * Test if an index in a circular buffer is within a range.
 190  *
 191  * begin - start index
 192  * end - end index
 193  * test - test index
 194  * sz - size of circular buffer when it turns over
 195  */
 196 static int
 197 vtbuf_in_this_range(int begin, int test, int end, int sz)
 198 {
 199
 200         begin %= sz;
 201         end %= sz;
 202
 203         /* check for inversion */
 204         if (begin > end)
 205                 return (test >= begin || test < end);
 206         else
 207                 return (test >= begin && test < end);
 208 }
 209 #endif
 210
 211 int
 212 vtbuf_iscursor(const struct vt_buf *vb, int row, int col)
 213 {
 214 #ifndef SC_NO_CUTPASTE
 215         int sc, sr, sz, ec, er, tmp;
 216 #endif
 217
 218         if ((vb->vb_flags & (VBF_CURSOR|VBF_SCROLL)) == VBF_CURSOR &&
 219             (vb->vb_cursor.tp_row == row) && (vb->vb_cursor.tp_col == col))
 220                 return (1);
 221
 222 #ifndef SC_NO_CUTPASTE
 223         /* Mark cut/paste region. */
 224         if (vb->vb_mark_start.tp_col == vb->vb_mark_end.tp_col &&
 225             vb->vb_mark_start.tp_row == vb->vb_mark_end.tp_row)
 226                 return (0);
 227
 228         sc = vb->vb_mark_start.tp_col;
 229         sr = vb->vb_mark_start.tp_row;
 230         ec = vb->vb_mark_end.tp_col;
 231         er = vb->vb_mark_end.tp_row;
 232
 233         /*
 234          * Information about if the selection was made bottom-top or
 235          * top-bottom is lost due to modulo arithmetics and needs to
 236          * be recovered:
 237          */
 238         sz = vb->vb_history_size;
 239         tmp = (sz + er - sr) % sz;
 240         row = vtbuf_wth(vb, row);
 241
 242         /* Swap start and end if start > end */
 243         if ((2 * tmp) > sz || (tmp == 0 && sc > ec)) {
 244                 tmp = sc; sc = ec; ec = tmp;
 245                 tmp = sr; sr = er; er = tmp;
 246         }
 247
 248         if (vtbuf_in_this_range(POS_INDEX(sc, sr), POS_INDEX(col, row),
 249             POS_INDEX(ec, er), POS_INDEX(0, sz)))
 250                 return (1);
 251 #endif
 252
 253         return (0);
 254 }
 255
 256 void
 257 vtbuf_lock(struct vt_buf *vb)
 258 {
 259
 260         VTBUF_LOCK(vb);
 261 }
 262
 263 void
 264 vtbuf_unlock(struct vt_buf *vb)
 265 {
 266
 267         VTBUF_UNLOCK(vb);
 268 }
 269
 270 void
 271 vtbuf_dirty(struct vt_buf *vb, const term_rect_t *area)
 272 {
 273
 274         if (vb->vb_dirtyrect.tr_begin.tp_row > area->tr_begin.tp_row)
 275                 vb->vb_dirtyrect.tr_begin.tp_row = area->tr_begin.tp_row;
 276         if (vb->vb_dirtyrect.tr_begin.tp_col > area->tr_begin.tp_col)
 277                 vb->vb_dirtyrect.tr_begin.tp_col = area->tr_begin.tp_col;
 278         if (vb->vb_dirtyrect.tr_end.tp_row < area->tr_end.tp_row)
 279                 vb->vb_dirtyrect.tr_end.tp_row = area->tr_end.tp_row;
 280         if (vb->vb_dirtyrect.tr_end.tp_col < area->tr_end.tp_col)
 281                 vb->vb_dirtyrect.tr_end.tp_col = area->tr_end.tp_col;
 282 }
 283
 284 static inline void
 285 vtbuf_dirty_cell(struct vt_buf *vb, const term_pos_t *p)
 286 {
 287         term_rect_t area;
 288
 289         area.tr_begin = *p;
 290         area.tr_end.tp_row = p->tp_row + 1;
 291         area.tr_end.tp_col = p->tp_col + 1;
 292         vtbuf_dirty(vb, &area);
 293 }
 294
 295 static void
 296 vtbuf_make_undirty(struct vt_buf *vb)
 297 {
 298
 299         vb->vb_dirtyrect.tr_begin = vb->vb_scr_size;
 300         vb->vb_dirtyrect.tr_end.tp_row = vb->vb_dirtyrect.tr_end.tp_col = 0;
 301 }
 302
 303 void
 304 vtbuf_undirty(struct vt_buf *vb, term_rect_t *r)
 305 {
 306
 307         *r = vb->vb_dirtyrect;
 308         vtbuf_make_undirty(vb);
 309 }
 310
 311 void
 312 vtbuf_copy(struct vt_buf *vb, const term_rect_t *r, const term_pos_t *p2)
 313 {
 314         const term_pos_t *p1 = &r->tr_begin;
 315         term_rect_t area;
 316         unsigned int rows, cols;
 317         int pr, rdiff;
 318
 319         KASSERT(r->tr_begin.tp_row < vb->vb_scr_size.tp_row,
 320             ("vtbuf_copy begin.tp_row %d must be less than screen width %d",
 321                 r->tr_begin.tp_row, vb->vb_scr_size.tp_row));
 322         KASSERT(r->tr_begin.tp_col < vb->vb_scr_size.tp_col,
 323             ("vtbuf_copy begin.tp_col %d must be less than screen height %d",
 324                 r->tr_begin.tp_col, vb->vb_scr_size.tp_col));
 325
 326         KASSERT(r->tr_end.tp_row <= vb->vb_scr_size.tp_row,
 327             ("vtbuf_copy end.tp_row %d must be less than screen width %d",
 328                 r->tr_end.tp_row, vb->vb_scr_size.tp_row));
 329         KASSERT(r->tr_end.tp_col <= vb->vb_scr_size.tp_col,
 330             ("vtbuf_copy end.tp_col %d must be less than screen height %d",
 331                 r->tr_end.tp_col, vb->vb_scr_size.tp_col));
 332
 333         KASSERT(p2->tp_row < vb->vb_scr_size.tp_row,
 334             ("vtbuf_copy tp_row %d must be less than screen width %d",
 335                 p2->tp_row, vb->vb_scr_size.tp_row));
 336         KASSERT(p2->tp_col < vb->vb_scr_size.tp_col,
 337             ("vtbuf_copy tp_col %d must be less than screen height %d",
 338                 p2->tp_col, vb->vb_scr_size.tp_col));
 339
 340         rows = r->tr_end.tp_row - r->tr_begin.tp_row;
 341         rdiff = r->tr_begin.tp_row - p2->tp_row;
 342         cols = r->tr_end.tp_col - r->tr_begin.tp_col;
 343         if (r->tr_begin.tp_row > p2->tp_row && r->tr_begin.tp_col == 0 &&
 344             r->tr_end.tp_col == vb->vb_scr_size.tp_col && /* Full row. */
 345             (rows + rdiff) == vb->vb_scr_size.tp_row && /* Whole screen. */
 346             rdiff > 0) { /* Only forward direction. Do not eat history. */
 347                 vthistory_addlines(vb, rdiff);
 348         } else if (p2->tp_row < p1->tp_row) {
 349                 /* Handle overlapping copies of line segments. */
 350                 /* Move data up. */
 351                 for (pr = 0; pr < rows; pr++)
 352                         memmove(
 353                             &VTBUF_FIELD(vb, p2->tp_row + pr, p2->tp_col),
 354                             &VTBUF_FIELD(vb, p1->tp_row + pr, p1->tp_col),
 355                             cols * sizeof(term_char_t));
 356         } else {
 357                 /* Move data down. */
 358                 for (pr = rows - 1; pr >= 0; pr--)
 359                         memmove(
 360                             &VTBUF_FIELD(vb, p2->tp_row + pr, p2->tp_col),
 361                             &VTBUF_FIELD(vb, p1->tp_row + pr, p1->tp_col),
 362                             cols * sizeof(term_char_t));
 363         }
 364
 365         area.tr_begin = *p2;
 366         area.tr_end.tp_row = MIN(p2->tp_row + rows, vb->vb_scr_size.tp_row);
 367         area.tr_end.tp_col = MIN(p2->tp_col + cols, vb->vb_scr_size.tp_col);
 368         vtbuf_dirty(vb, &area);
 369 }
 370
 371 static void
 372 vtbuf_do_fill(struct vt_buf *vb, const term_rect_t *r, term_char_t c)
 373 {
 374         unsigned int pr, pc;
 375         term_char_t *row;
 376
 377         for (pr = r->tr_begin.tp_row; pr < r->tr_end.tp_row; pr++) {
 378                 row = vb->vb_rows[(vb->vb_curroffset + pr) %
 379                     VTBUF_MAX_HEIGHT(vb)];
 380                 for (pc = r->tr_begin.tp_col; pc < r->tr_end.tp_col; pc++) {
 381                         row[pc] = c;
 382                 }
 383         }
 384 }
 385
 386 void
 387 vtbuf_fill(struct vt_buf *vb, const term_rect_t *r, term_char_t c)
 388 {
 389
 390         KASSERT(r->tr_begin.tp_row < vb->vb_scr_size.tp_row,
 391             ("vtbuf_fill begin.tp_row %d must be < screen height %d",
 392                 r->tr_begin.tp_row, vb->vb_scr_size.tp_row));
 393         KASSERT(r->tr_begin.tp_col < vb->vb_scr_size.tp_col,
 394             ("vtbuf_fill begin.tp_col %d must be < screen width %d",
 395                 r->tr_begin.tp_col, vb->vb_scr_size.tp_col));
 396
 397         KASSERT(r->tr_end.tp_row <= vb->vb_scr_size.tp_row,
 398             ("vtbuf_fill end.tp_row %d must be <= screen height %d",
 399                 r->tr_end.tp_row, vb->vb_scr_size.tp_row));
 400         KASSERT(r->tr_end.tp_col <= vb->vb_scr_size.tp_col,
 401             ("vtbuf_fill end.tp_col %d must be <= screen width %d",
 402                 r->tr_end.tp_col, vb->vb_scr_size.tp_col));
 403
 404         vtbuf_do_fill(vb, r, c);
 405         vtbuf_dirty(vb, r);
 406 }
 407
 408 static void
 409 vtbuf_init_rows(struct vt_buf *vb)
 410 {
 411         int r;
 412
 413         vb->vb_history_size = MAX(vb->vb_history_size, vb->vb_scr_size.tp_row);
 414
 415         for (r = 0; r < vb->vb_history_size; r++)
 416                 vb->vb_rows[r] = &vb->vb_buffer[r * vb->vb_scr_size.tp_col];
 417 }
 418
 419 static void
 420 vtbuf_do_clearhistory(struct vt_buf *vb)
 421 {
 422         term_rect_t rect;
 423         const teken_attr_t *a;
 424         term_char_t ch;
 425
 426         a = teken_get_curattr(&vb->vb_terminal->tm_emulator);
 427         ch = TCOLOR_FG(a->ta_fgcolor) | TCOLOR_BG(a->ta_bgcolor);
 428
 429         rect.tr_begin.tp_row = rect.tr_begin.tp_col = 0;
 430         rect.tr_end.tp_col = vb->vb_scr_size.tp_col;
 431         rect.tr_end.tp_row = vb->vb_history_size;
 432
 433         vtbuf_do_fill(vb, &rect, VTBUF_SPACE_CHAR(ch));
 434 }
 435
 436 void
 437 vtbuf_init_early(struct vt_buf *vb)
 438 {
 439         vb->vb_flags |= VBF_CURSOR;
 440         vb->vb_roffset = 0;
 441         vb->vb_curroffset = 0;
 442         vb->vb_mark_start.tp_row = 0;
 443         vb->vb_mark_start.tp_col = 0;
 444         vb->vb_mark_end.tp_row = 0;
 445         vb->vb_mark_end.tp_col = 0;
 446
 447         vtbuf_init_rows(vb);
 448         vtbuf_do_clearhistory(vb);
 449         vtbuf_make_undirty(vb);
 450         if ((vb->vb_flags & VBF_MTX_INIT) == 0) {
 451                 mtx_init(&vb->vb_lock, "vtbuf", NULL, MTX_SPIN);
 452                 vb->vb_flags |= VBF_MTX_INIT;
 453         }
 454 }
 455
 456 void
 457 vtbuf_init(struct vt_buf *vb, const term_pos_t *p)
 458 {
 459         int sz;
 460
 461         vb->vb_scr_size = *p;
 462         vb->vb_history_size = VBF_DEFAULT_HISTORY_SIZE;
 463
 464         if ((vb->vb_flags & VBF_STATIC) == 0) {
 465                 sz = vb->vb_history_size * p->tp_col * sizeof(term_char_t);
 466                 vb->vb_buffer = malloc(sz, M_VTBUF, M_WAITOK | M_ZERO);
 467
 468                 sz = vb->vb_history_size * sizeof(term_char_t *);
 469                 vb->vb_rows = malloc(sz, M_VTBUF, M_WAITOK | M_ZERO);
 470         }
 471
 472         vtbuf_init_early(vb);
 473 }
 474
 475 void
 476 vtbuf_clearhistory(struct vt_buf *vb)
 477 {
 478         VTBUF_LOCK(vb);
 479         vtbuf_do_clearhistory(vb);
 480         VTBUF_UNLOCK(vb);
 481 }
 482
 483 void
 484 vtbuf_sethistory_size(struct vt_buf *vb, unsigned int size)
 485 {
 486         term_pos_t p;
 487
 488         /* With same size */
 489         p.tp_row = vb->vb_scr_size.tp_row;
 490         p.tp_col = vb->vb_scr_size.tp_col;
 491         vtbuf_grow(vb, &p, size);
 492 }
 493
 494 void
 495 vtbuf_grow(struct vt_buf *vb, const term_pos_t *p, unsigned int history_size)
 496 {
 497         term_char_t *old, *new, **rows, **oldrows, **copyrows, *row, *oldrow;
 498         unsigned int w, h, c, r, old_history_size;
 499         size_t bufsize, rowssize;
 500         int history_full;
 501         const teken_attr_t *a;
 502         term_char_t ch;
 503
 504         a = teken_get_curattr(&vb->vb_terminal->tm_emulator);
 505         ch = TCOLOR_FG(a->ta_fgcolor) | TCOLOR_BG(a->ta_bgcolor);
 506
 507         history_size = MAX(history_size, p->tp_row);
 508
 509         /* Allocate new buffer. */
 510         bufsize = history_size * p->tp_col * sizeof(term_char_t);
 511         new = malloc(bufsize, M_VTBUF, M_WAITOK | M_ZERO);
 512         rowssize = history_size * sizeof(term_pos_t *);
 513         rows = malloc(rowssize, M_VTBUF, M_WAITOK | M_ZERO);
 514
 515         /* Toggle it. */
 516         VTBUF_LOCK(vb);
 517         old = vb->vb_flags & VBF_STATIC ? NULL : vb->vb_buffer;
 518         oldrows = vb->vb_flags & VBF_STATIC ? NULL : vb->vb_rows;
 519         copyrows = vb->vb_rows;
 520
 521         w = vb->vb_scr_size.tp_col;
 522         h = vb->vb_scr_size.tp_row;
 523         old_history_size = vb->vb_history_size;
 524         history_full = vb->vb_flags & VBF_HISTORY_FULL ||
 525             vb->vb_curroffset + h >= history_size;
 526
 527         vb->vb_history_size = history_size;
 528         vb->vb_buffer = new;
 529         vb->vb_rows = rows;
 530         vb->vb_flags &= ~VBF_STATIC;
 531         vb->vb_scr_size = *p;
 532         vtbuf_init_rows(vb);
 533
 534         /*
 535          * Copy rows to the new buffer. The first row in the history
 536          * is back to index 0, ie. the new buffer doesn't cycle.
 537          */
 538         if (history_size > old_history_size) {
 539                 for (r = 0; r < old_history_size; r ++) {
 540                         row = rows[r];
 541
 542                         /* Compute the corresponding row in the old buffer. */
 543                         if (history_full)
 544                                 /*
 545                                  * The buffer is full, the "top" row is
 546                                  * the one just after the viewable area
 547                                  * (curroffset + viewable height) in the
 548                                  * cycling buffer. The corresponding row
 549                                  * is computed from this top row.
 550                                  */
 551                                 oldrow = copyrows[
 552                                     (vb->vb_curroffset + h + r) %
 553                                     old_history_size];
 554                         else
 555                                 /*
 556                                  * The buffer is not full, therefore,
 557                                  * we didn't cycle already. The
 558                                  * corresponding rows are the same in
 559                                  * both buffers.
 560                                  */
 561                                 oldrow = copyrows[r];
 562
 563                         memmove(row, oldrow,
 564                             MIN(p->tp_col, w) * sizeof(term_char_t));
 565
 566                         /*
 567                          * XXX VTBUF_SPACE_CHAR(TERMINAL_NORM_ATTR) will
 568                          * extended lines of kernel text using the wrong
 569                          * background color.
 570                          */
 571                         for (c = MIN(p->tp_col, w); c < p->tp_col; c++) {
 572                                 row[c] = VTBUF_SPACE_CHAR(ch);
 573                         }
 574                 }
 575
 576                 /* Fill remaining rows. */
 577                 for (r = old_history_size; r < history_size; r++) {
 578                         row = rows[r];
 579                         for (c = MIN(p->tp_col, w); c < p->tp_col; c++) {
 580                                 row[c] = VTBUF_SPACE_CHAR(ch);
 581                         }
 582                 }
 583
 584                 vb->vb_flags &= ~VBF_HISTORY_FULL;
 585
 586                 /*
 587                  * If the screen is already filled (there are non-visible lines
 588                  * above the current viewable area), adjust curroffset to the
 589                  * new viewable area.
 590                  *
 591                  * If the old buffer was full, set curroffset to the
 592                  * <h>th most recent line of history in the new, non-cycled
 593                  * buffer. Otherwise, it didn't cycle, so the old curroffset
 594                  * is the same in the new buffer.
 595                  */
 596                 if (history_full)
 597                         vb->vb_curroffset = old_history_size - h;
 598         } else {
 599                 /*
 600                  * (old_history_size - history_size) lines of history are
 601                  * dropped.
 602                  */
 603                 for (r = 0; r < history_size; r ++) {
 604                         row = rows[r];
 605
 606                         /*
 607                          * Compute the corresponding row in the old buffer.
 608                          *
 609                          * See the equivalent if{} block above for an
 610                          * explanation.
 611                          */
 612                         if (history_full)
 613                                 oldrow = copyrows[
 614                                     (vb->vb_curroffset + h + r +
 615                                      (old_history_size - history_size)) %
 616                                     old_history_size];
 617                         else
 618                                 oldrow = copyrows[r];
 619
 620                         memmove(row, oldrow,
 621                             MIN(p->tp_col, w) * sizeof(term_char_t));
 622
 623                         /*
 624                          * XXX VTBUF_SPACE_CHAR(TERMINAL_NORM_ATTR) will
 625                          * extended lines of kernel text using the wrong
 626                          * background color.
 627                          */
 628                         for (c = MIN(p->tp_col, w); c < p->tp_col; c++) {
 629                                 row[c] = VTBUF_SPACE_CHAR(ch);
 630                         }
 631                 }
 632
 633                 if (history_full) {
 634                         vb->vb_curroffset = history_size - h;
 635                         vb->vb_flags |= VBF_HISTORY_FULL;
 636                 }
 637         }
 638
 639         vb->vb_roffset = vb->vb_curroffset;
 640
 641         /* Adjust cursor position. */
 642         if (vb->vb_cursor.tp_col > p->tp_col - 1)
 643                 /*
 644                  * Move cursor to the last column, in case its previous
 645                  * position is outside of the new screen area.
 646                  */
 647                 vb->vb_cursor.tp_col = p->tp_col - 1;
 648
 649         if (vb->vb_curroffset > 0 || vb->vb_cursor.tp_row > p->tp_row - 1)
 650                 /* Move cursor to the last line on the screen. */
 651                 vb->vb_cursor.tp_row = p->tp_row - 1;
 652
 653         VTBUF_UNLOCK(vb);
 654
 655         /* Deallocate old buffer. */
 656         free(old, M_VTBUF);
 657         free(oldrows, M_VTBUF);
 658 }
 659
 660 void
 661 vtbuf_putchar(struct vt_buf *vb, const term_pos_t *p, term_char_t c)
 662 {
 663         term_char_t *row;
 664
 665         KASSERT(p->tp_row < vb->vb_scr_size.tp_row,
 666             ("vtbuf_putchar tp_row %d must be less than screen width %d",
 667                 p->tp_row, vb->vb_scr_size.tp_row));
 668         KASSERT(p->tp_col < vb->vb_scr_size.tp_col,
 669             ("vtbuf_putchar tp_col %d must be less than screen height %d",
 670                 p->tp_col, vb->vb_scr_size.tp_col));
 671
 672         row = vb->vb_rows[(vb->vb_curroffset + p->tp_row) %
 673             VTBUF_MAX_HEIGHT(vb)];
 674         if (row[p->tp_col] != c) {
 675                 row[p->tp_col] = c;
 676                 vtbuf_dirty_cell(vb, p);
 677         }
 678 }
 679
 680 void
 681 vtbuf_cursor_position(struct vt_buf *vb, const term_pos_t *p)
 682 {
 683         if (vb->vb_flags & VBF_CURSOR) {
 684                 vtbuf_dirty_cell(vb, &vb->vb_cursor);
 685                 vb->vb_cursor = *p;
 686                 vtbuf_dirty_cell(vb, &vb->vb_cursor);
 687         } else {
 688                 vb->vb_cursor = *p;
 689         }
 690 }
 691
 692 #ifndef SC_NO_CUTPASTE
 693 static void
 694 vtbuf_flush_mark(struct vt_buf *vb)
 695 {
 696         term_rect_t area;
 697         int s, e;
 698
 699         /* Notify renderer to update marked region. */
 700         if ((vb->vb_mark_start.tp_col != vb->vb_mark_end.tp_col) ||
 701             (vb->vb_mark_start.tp_row != vb->vb_mark_end.tp_row)) {
 702
 703                 s = vtbuf_htw(vb, vb->vb_mark_start.tp_row);
 704                 e = vtbuf_htw(vb, vb->vb_mark_end.tp_row);
 705
 706                 area.tr_begin.tp_col = 0;
 707                 area.tr_begin.tp_row = MIN(s, e);
 708
 709                 area.tr_end.tp_col = vb->vb_scr_size.tp_col;
 710                 area.tr_end.tp_row = MAX(s, e) + 1;
 711
 712                 VTBUF_LOCK(vb);
 713                 vtbuf_dirty(vb, &area);
 714                 VTBUF_UNLOCK(vb);
 715         }
 716 }
 717
 718 int
 719 vtbuf_get_marked_len(struct vt_buf *vb)
 720 {
 721         int ei, si, sz;
 722         term_pos_t s, e;
 723
 724         /* Swap according to window coordinates. */
 725         if (POS_INDEX(vtbuf_htw(vb, vb->vb_mark_start.tp_row),
 726             vb->vb_mark_start.tp_col) >
 727             POS_INDEX(vtbuf_htw(vb, vb->vb_mark_end.tp_row),
 728             vb->vb_mark_end.tp_col)) {
 729                 POS_COPY(e, vb->vb_mark_start);
 730                 POS_COPY(s, vb->vb_mark_end);
 731         } else {
 732                 POS_COPY(s, vb->vb_mark_start);
 733                 POS_COPY(e, vb->vb_mark_end);
 734         }
 735
 736         si = s.tp_row * vb->vb_scr_size.tp_col + s.tp_col;
 737         ei = e.tp_row * vb->vb_scr_size.tp_col + e.tp_col;
 738
 739         /* Number symbols and number of rows to inject \n */
 740         sz = ei - si + ((e.tp_row - s.tp_row) * 2);
 741
 742         return (sz * sizeof(term_char_t));
 743 }
 744
 745 void
 746 vtbuf_extract_marked(struct vt_buf *vb, term_char_t *buf, int sz)
 747 {
 748         int i, r, c, cs, ce;
 749         term_pos_t s, e;
 750
 751         /* Swap according to window coordinates. */
 752         if (POS_INDEX(vtbuf_htw(vb, vb->vb_mark_start.tp_row),
 753             vb->vb_mark_start.tp_col) >
 754             POS_INDEX(vtbuf_htw(vb, vb->vb_mark_end.tp_row),
 755             vb->vb_mark_end.tp_col)) {
 756                 POS_COPY(e, vb->vb_mark_start);
 757                 POS_COPY(s, vb->vb_mark_end);
 758         } else {
 759                 POS_COPY(s, vb->vb_mark_start);
 760                 POS_COPY(e, vb->vb_mark_end);
 761         }
 762
 763         i = 0;
 764         for (r = s.tp_row; r <= e.tp_row; r ++) {
 765                 cs = (r == s.tp_row)?s.tp_col:0;
 766                 ce = (r == e.tp_row)?e.tp_col:vb->vb_scr_size.tp_col;
 767                 for (c = cs; c < ce; c ++) {
 768                         buf[i++] = vb->vb_rows[r][c];
 769                 }
 770                 /* Add new line for all rows, but not for last one. */
 771                 if (r != e.tp_row) {
 772                         buf[i++] = '\r';
 773                         buf[i++] = '\n';
 774                 }
 775         }
 776 }
 777
 778 int
 779 vtbuf_set_mark(struct vt_buf *vb, int type, int col, int row)
 780 {
 781         term_char_t *r;
 782         int i;
 783
 784         switch (type) {
 785         case VTB_MARK_END:      /* B1 UP */
 786                 if (vb->vb_mark_last != VTB_MARK_MOVE)
 787                         return (0);
 788                 /* FALLTHROUGH */
 789         case VTB_MARK_MOVE:
 790         case VTB_MARK_EXTEND:
 791                 vtbuf_flush_mark(vb); /* Clean old mark. */
 792                 vb->vb_mark_end.tp_col = col;
 793                 vb->vb_mark_end.tp_row = vtbuf_wth(vb, row);
 794                 break;
 795         case VTB_MARK_START:
 796                 vtbuf_flush_mark(vb); /* Clean old mark. */
 797                 vb->vb_mark_start.tp_col = col;
 798                 vb->vb_mark_start.tp_row = vtbuf_wth(vb, row);
 799                 /* Start again, so clear end point. */
 800                 vb->vb_mark_end.tp_col = col;
 801                 vb->vb_mark_end.tp_row = vtbuf_wth(vb, row);
 802                 break;
 803         case VTB_MARK_WORD:
 804                 vtbuf_flush_mark(vb); /* Clean old mark. */
 805                 vb->vb_mark_start.tp_row = vb->vb_mark_end.tp_row =
 806                     vtbuf_wth(vb, row);
 807                 r = vb->vb_rows[vb->vb_mark_start.tp_row];
 808                 for (i = col; i >= 0; i --) {
 809                         if (TCHAR_CHARACTER(r[i]) == ' ') {
 810                                 vb->vb_mark_start.tp_col = i + 1;
 811                                 break;
 812                         }
 813                 }
 814                 for (i = col; i < vb->vb_scr_size.tp_col; i ++) {
 815                         if (TCHAR_CHARACTER(r[i]) == ' ') {
 816                                 vb->vb_mark_end.tp_col = i;
 817                                 break;
 818                         }
 819                 }
 820                 if (vb->vb_mark_start.tp_col > vb->vb_mark_end.tp_col)
 821                         vb->vb_mark_start.tp_col = vb->vb_mark_end.tp_col;
 822                 break;
 823         case VTB_MARK_ROW:
 824                 vtbuf_flush_mark(vb); /* Clean old mark. */
 825                 vb->vb_mark_start.tp_col = 0;
 826                 vb->vb_mark_end.tp_col = vb->vb_scr_size.tp_col;
 827                 vb->vb_mark_start.tp_row = vb->vb_mark_end.tp_row =
 828                     vtbuf_wth(vb, row);
 829                 break;
 830         case VTB_MARK_NONE:
 831                 vb->vb_mark_last = type;
 832                 /* FALLTHROUGH */
 833         default:
 834                 /* panic? */
 835                 return (0);
 836         }
 837
 838         vb->vb_mark_last = type;
 839         /* Draw new marked region. */
 840         vtbuf_flush_mark(vb);
 841         return (1);
 842 }
 843 #endif
 844
 845 void
 846 vtbuf_cursor_visibility(struct vt_buf *vb, int yes)
 847 {
 848         int oflags, nflags;
 849
 850         oflags = vb->vb_flags;
 851         if (yes)
 852                 vb->vb_flags |= VBF_CURSOR;
 853         else
 854                 vb->vb_flags &= ~VBF_CURSOR;
 855         nflags = vb->vb_flags;
 856
 857         if (oflags != nflags)
 858                 vtbuf_dirty_cell(vb, &vb->vb_cursor);
 859 }
 860
 861 void
 862 vtbuf_scroll_mode(struct vt_buf *vb, int yes)
 863 {
 864         int oflags, nflags;
 865
 866         VTBUF_LOCK(vb);
 867         oflags = vb->vb_flags;
 868         if (yes)
 869                 vb->vb_flags |= VBF_SCROLL;
 870         else
 871                 vb->vb_flags &= ~VBF_SCROLL;
 872         nflags = vb->vb_flags;
 873
 874         if (oflags != nflags)
 875                 vtbuf_dirty_cell(vb, &vb->vb_cursor);
 876         VTBUF_UNLOCK(vb);
 877 }