1/* $FreeBSD: head/contrib/libreadline/display.c 75409 2001-04-11 03:15:56Z ache $ */ |
2/* display.c -- readline redisplay facility. */ 3 4/* Copyright (C) 1987, 1989, 1992 Free Software Foundation, Inc. 5 6 This file is part of the GNU Readline Library, a library for 7 reading lines of text with interactive input and history editing. 8 9 The GNU Readline Library is free software; you can redistribute it --- 45 unchanged lines hidden (view full) --- 55#include "rlprivate.h" 56#include "xmalloc.h" 57 58#if !defined (strchr) && !defined (__STDC__) 59extern char *strchr (), *strrchr (); 60#endif /* !strchr && !__STDC__ */ 61 62#if defined (HACK_TERMCAP_MOTION) |
63extern char *_rl_term_forward_char; |
64#endif 65 66static void update_line __P((char *, char *, int, int, int, int)); 67static void space_to_eol __P((int)); 68static void delete_chars __P((int)); 69static void insert_some_chars __P((char *, int)); 70static void cr __P((void)); 71 --- 27 unchanged lines hidden (view full) --- 99 just drew into be the one which reflects the current contents of the 100 screen, and place the cursor where it belongs. 101 102 Commands that want to can fix the display themselves, and then let 103 this function know that the display has been fixed by setting the 104 RL_DISPLAY_FIXED variable. This is good for efficiency. */ 105 106/* Application-specific redisplay function. */ |
107rl_voidfunc_t *rl_redisplay_function = rl_redisplay; |
108 109/* Global variables declared here. */ 110/* What YOU turn on when you have handled all redisplay yourself. */ 111int rl_display_fixed = 0; 112 113int _rl_suppress_redisplay = 0; 114 115/* The stuff that gets printed out before the actual text of the line. --- 22 unchanged lines hidden (view full) --- 138static char msg_buf[128]; 139 140/* Non-zero forces the redisplay even if we thought it was unnecessary. */ 141static int forced_display; 142 143/* Default and initial buffer size. Can grow. */ 144static int line_size = 1024; 145 |
146/* Variables to keep track of the expanded prompt string, which may 147 include invisible characters. */ 148 |
149static char *local_prompt, *local_prompt_prefix; |
150static int prompt_visible_length, prompt_prefix_length; |
151 152/* The number of invisible characters in the line currently being 153 displayed on the screen. */ 154static int visible_wrap_offset; 155 |
156/* The number of invisible characters in the prompt string. Static so it 157 can be shared between rl_redisplay and update_line */ |
158static int wrap_offset; 159 |
160/* The index of the last invisible character in the prompt string. */ 161static int prompt_last_invisible; |
162 163/* The length (buffer offset) of the first line of the last (possibly 164 multi-line) buffer displayed on the screen. */ 165static int visible_first_line_len; 166 |
167/* Number of invisible characters on the first physical line of the prompt. 168 Only valid when the number of physical characters in the prompt exceeds 169 (or is equal to) _rl_screenwidth. */ 170static int prompt_invis_chars_first_line; 171 172static int prompt_last_screen_line; 173 |
174/* Expand the prompt string S and return the number of visible 175 characters in *LP, if LP is not null. This is currently more-or-less 176 a placeholder for expansion. LIP, if non-null is a place to store the |
177 index of the last invisible character in the returned string. NIFLP, 178 if non-zero, is a place to store the number of invisible characters in 179 the first prompt line. */ |
180 181/* Current implementation: 182 \001 (^A) start non-visible characters 183 \002 (^B) end non-visible characters 184 all characters except \001 and \002 (following a \001) are copied to 185 the returned string; all characters except those between \001 and 186 \002 are assumed to be `visible'. */ 187 188static char * |
189expand_prompt (pmt, lp, lip, niflp) |
190 char *pmt; |
191 int *lp, *lip, *niflp; |
192{ 193 char *r, *ret, *p; |
194 int l, rl, last, ignoring, ninvis, invfl; |
195 196 /* Short-circuit if we can. */ 197 if (strchr (pmt, RL_PROMPT_START_IGNORE) == 0) 198 { 199 r = savestring (pmt); 200 if (lp) 201 *lp = strlen (r); 202 return r; 203 } 204 205 l = strlen (pmt); 206 r = ret = xmalloc (l + 1); |
207 208 invfl = 0; /* invisible chars in first line of prompt */ 209 210 for (rl = ignoring = last = ninvis = 0, p = pmt; p && *p; p++) |
211 { 212 /* This code strips the invisible character string markers 213 RL_PROMPT_START_IGNORE and RL_PROMPT_END_IGNORE */ 214 if (*p == RL_PROMPT_START_IGNORE) 215 { 216 ignoring++; 217 continue; 218 } 219 else if (ignoring && *p == RL_PROMPT_END_IGNORE) 220 { 221 ignoring = 0; 222 last = r - ret - 1; 223 continue; 224 } 225 else 226 { 227 *r++ = *p; 228 if (!ignoring) 229 rl++; |
230 else 231 ninvis++; 232 if (rl == _rl_screenwidth) 233 invfl = ninvis; |
234 } 235 } 236 |
237 if (rl < _rl_screenwidth) 238 invfl = ninvis; 239 |
240 *r = '\0'; 241 if (lp) 242 *lp = rl; 243 if (lip) 244 *lip = last; |
245 if (niflp) 246 *niflp = invfl; |
247 return ret; 248} 249 250/* Just strip out RL_PROMPT_START_IGNORE and RL_PROMPT_END_IGNORE from 251 PMT and return the rest of PMT. */ 252char * 253_rl_strip_prompt (pmt) 254 char *pmt; 255{ 256 char *ret; 257 |
258 ret = expand_prompt (pmt, (int *)NULL, (int *)NULL, (int *)NULL); |
259 return ret; 260} 261 262/* 263 * Expand the prompt string into the various display components, if 264 * necessary. 265 * 266 * local_prompt = expanded last line of string in rl_display_prompt 267 * (portion after the final newline) 268 * local_prompt_prefix = portion before last newline of rl_display_prompt, 269 * expanded via expand_prompt |
270 * prompt_visible_length = number of visible characters in local_prompt 271 * prompt_prefix_length = number of visible characters in local_prompt_prefix |
272 * 273 * This function is called once per call to readline(). It may also be 274 * called arbitrarily to expand the primary prompt. 275 * 276 * The return value is the number of visible characters on the last line 277 * of the (possibly multi-line) prompt. 278 */ 279int 280rl_expand_prompt (prompt) 281 char *prompt; 282{ 283 char *p, *t; 284 int c; 285 286 /* Clear out any saved values. */ |
287 FREE (local_prompt); 288 FREE (local_prompt_prefix); 289 |
290 local_prompt = local_prompt_prefix = (char *)0; |
291 prompt_last_invisible = prompt_visible_length = 0; |
292 293 if (prompt == 0 || *prompt == 0) 294 return (0); 295 296 p = strrchr (prompt, '\n'); 297 if (!p) 298 { |
299 /* The prompt is only one logical line, though it might wrap. */ 300 local_prompt = expand_prompt (prompt, &prompt_visible_length, 301 &prompt_last_invisible, 302 &prompt_invis_chars_first_line); |
303 local_prompt_prefix = (char *)0; |
304 return (prompt_visible_length); |
305 } 306 else 307 { 308 /* The prompt spans multiple lines. */ 309 t = ++p; |
310 local_prompt = expand_prompt (p, &prompt_visible_length, 311 &prompt_last_invisible, 312 &prompt_invis_chars_first_line); |
313 c = *t; *t = '\0'; 314 /* The portion of the prompt string up to and including the 315 final newline is now null-terminated. */ |
316 local_prompt_prefix = expand_prompt (prompt, &prompt_prefix_length, 317 (int *)NULL, 318 &prompt_invis_chars_first_line); |
319 *t = c; |
320 return (prompt_prefix_length); |
321 } 322} 323 324/* Initialize the VISIBLE_LINE and INVISIBLE_LINE arrays, and their associated 325 arrays of line break markers. MINSIZE is the minimum size of VISIBLE_LINE 326 and INVISIBLE_LINE; if it is greater than LINE_SIZE, LINE_SIZE is 327 increased. If the lines have already been allocated, this ensures that 328 they can hold at least MINSIZE characters. */ --- 95 unchanged lines hidden (view full) --- 424 line_size = (temp + 1024) - (temp % 1024); 425 visible_line = xrealloc (visible_line, line_size); 426 line = invisible_line = xrealloc (invisible_line, line_size); 427 } 428 strncpy (line + out, local_prompt, local_len); 429 out += local_len; 430 } 431 line[out] = '\0'; |
432 wrap_offset = local_len - prompt_visible_length; |
433 } 434 else 435 { 436 int pmtlen; 437 prompt_this_line = strrchr (rl_display_prompt, '\n'); 438 if (!prompt_this_line) 439 prompt_this_line = rl_display_prompt; 440 else --- 16 unchanged lines hidden (view full) --- 457 { 458 line_size = (temp + 1024) - (temp % 1024); 459 visible_line = xrealloc (visible_line, line_size); 460 line = invisible_line = xrealloc (invisible_line, line_size); 461 } 462 strncpy (line + out, prompt_this_line, pmtlen); 463 out += pmtlen; 464 line[out] = '\0'; |
465 wrap_offset = prompt_invis_chars_first_line = 0; |
466 } 467 468#define CHECK_INV_LBREAKS() \ 469 do { \ 470 if (newlines >= (inv_lbsize - 2)) \ 471 { \ 472 inv_lbsize *= 2; \ 473 inv_lbreaks = (int *)xrealloc (inv_lbreaks, inv_lbsize * sizeof (int)); \ 474 } \ 475 } while (0) 476 477#define CHECK_LPOS() \ 478 do { \ 479 lpos++; \ |
480 if (lpos >= _rl_screenwidth) \ |
481 { \ 482 if (newlines >= (inv_lbsize - 2)) \ 483 { \ 484 inv_lbsize *= 2; \ 485 inv_lbreaks = (int *)xrealloc (inv_lbreaks, inv_lbsize * sizeof (int)); \ 486 } \ 487 inv_lbreaks[++newlines] = out; \ 488 lpos = 0; \ 489 } \ 490 } while (0) 491 492 /* inv_lbreaks[i] is where line i starts in the buffer. */ 493 inv_lbreaks[newlines = 0] = 0; 494 lpos = out - wrap_offset; 495 |
496 /* prompt_invis_chars_first_line is the number of invisible characters in 497 the first physical line of the prompt. 498 wrap_offset - prompt_invis_chars_first_line is the number of invis 499 chars on the second line. */ 500 501 /* what if lpos is already >= _rl_screenwidth before we start drawing the |
502 contents of the command line? */ |
503 while (lpos >= _rl_screenwidth) |
504 { |
505 /* fix from Darin Johnson <darin@acuson.com> for prompt string with 506 invisible characters that is longer than the screen width. The 507 prompt_invis_chars_first_line variable could be made into an array 508 saying how many invisible characters there are per line, but that's 509 probably too much work for the benefit gained. How many people have 510 prompts that exceed two physical lines? */ 511 temp = ((newlines + 1) * _rl_screenwidth) + 512 ((newlines == 0) ? prompt_invis_chars_first_line : 0) + 513 ((newlines == 1) ? wrap_offset : 0); |
514 515 inv_lbreaks[++newlines] = temp; |
516 lpos -= _rl_screenwidth; |
517 } 518 |
519 prompt_last_screen_line = newlines; 520 521 /* Draw the rest of the line (after the prompt) into invisible_line, keeping 522 track of where the cursor is (c_pos), the number of the line containing 523 the cursor (lb_linenum), the last line number (lb_botlin and inv_botlin). 524 It maintains an array of line breaks for display (inv_lbreaks). 525 This handles expanding tabs for display and displaying meta characters. */ |
526 lb_linenum = 0; 527 for (in = 0; in < rl_end; in++) 528 { 529 c = (unsigned char)rl_line_buffer[in]; 530 531 if (out + 8 >= line_size) /* XXX - 8 for \t */ 532 { 533 line_size *= 2; --- 9 unchanged lines hidden (view full) --- 543 } 544 545 if (META_CHAR (c)) 546 { 547 if (_rl_output_meta_chars == 0) 548 { 549 sprintf (line + out, "\\%o", c); 550 |
551 if (lpos + 4 >= _rl_screenwidth) |
552 { |
553 temp = _rl_screenwidth - lpos; |
554 CHECK_INV_LBREAKS (); 555 inv_lbreaks[++newlines] = out + temp; 556 lpos = 4 - temp; 557 } 558 else 559 lpos += 4; 560 561 out += 4; 562 } 563 else 564 { 565 line[out++] = c; 566 CHECK_LPOS(); 567 } 568 } 569#if defined (DISPLAY_TABS) 570 else if (c == '\t') 571 { |
572 register int newout; |
573 574#if 0 575 newout = (out | (int)7) + 1; 576#else 577 newout = out + 8 - lpos % 8; 578#endif 579 temp = newout - out; |
580 if (lpos + temp >= _rl_screenwidth) |
581 { 582 register int temp2; |
583 temp2 = _rl_screenwidth - lpos; |
584 CHECK_INV_LBREAKS (); 585 inv_lbreaks[++newlines] = out + temp2; 586 lpos = temp - temp2; 587 while (out < newout) 588 line[out++] = ' '; 589 } 590 else 591 { 592 while (out < newout) 593 line[out++] = ' '; 594 lpos += temp; 595 } 596 } 597#endif |
598 else if (c == '\n' && _rl_horizontal_scroll_mode == 0 && _rl_term_up && *_rl_term_up) |
599 { 600 line[out++] = '\0'; /* XXX - sentinel */ 601 CHECK_INV_LBREAKS (); 602 inv_lbreaks[++newlines] = out; 603 lpos = 0; 604 } 605 else if (CTRL_CHAR (c) || c == RUBOUT) 606 { --- 15 unchanged lines hidden (view full) --- 622 lb_linenum = newlines; 623 } 624 625 inv_botlin = lb_botlin = newlines; 626 CHECK_INV_LBREAKS (); 627 inv_lbreaks[newlines+1] = out; 628 cursor_linenum = lb_linenum; 629 |
630 /* C_POS == position in buffer where cursor should be placed. 631 CURSOR_LINENUM == line number where the cursor should be placed. */ |
632 633 /* PWP: now is when things get a bit hairy. The visible and invisible 634 line buffers are really multiple lines, which would wrap every 635 (screenwidth - 1) characters. Go through each in turn, finding 636 the changed region and updating it. The line order is top to bottom. */ 637 638 /* If we can move the cursor up and down, then use multiple lines, 639 otherwise, let long lines display in a single terminal line, and 640 horizontally scroll it. */ 641 |
642 if (_rl_horizontal_scroll_mode == 0 && _rl_term_up && *_rl_term_up) |
643 { 644 int nleft, pos, changed_screen_line; 645 646 if (!rl_display_fixed || forced_display) 647 { 648 forced_display = 0; 649 650 /* If we have more than a screenful of material to display, then 651 only display a screenful. We should display the last screen, 652 not the first. */ |
653 if (out >= _rl_screenchars) 654 out = _rl_screenchars - 1; |
655 656 /* The first line is at character position 0 in the buffer. The 657 second and subsequent lines start at inv_lbreaks[N], offset by 658 OFFSET (which has already been calculated above). */ 659 660#define W_OFFSET(line, offset) ((line) == 0 ? offset : 0) 661#define VIS_LLEN(l) ((l) > _rl_vis_botlin ? 0 : (vis_lbreaks[l+1] - vis_lbreaks[l])) 662#define INV_LLEN(l) (inv_lbreaks[l+1] - inv_lbreaks[l]) --- 13 unchanged lines hidden (view full) --- 676 implies that we completely overwrite the old visible line) 677 and the new line is shorter than the old. Make sure we are 678 at the end of the new line before clearing. */ 679 if (linenum == 0 && 680 inv_botlin == 0 && _rl_last_c_pos == out && 681 (wrap_offset > visible_wrap_offset) && 682 (_rl_last_c_pos < visible_first_line_len)) 683 { |
684 nleft = _rl_screenwidth + wrap_offset - _rl_last_c_pos; |
685 if (nleft) 686 _rl_clear_to_eol (nleft); 687 } 688 689 /* Since the new first line is now visible, save its length. */ 690 if (linenum == 0) 691 visible_first_line_len = (inv_botlin > 0) ? inv_lbreaks[1] : out - wrap_offset; 692 } --- 4 unchanged lines hidden (view full) --- 697 { 698 char *tt; 699 for (; linenum <= _rl_vis_botlin; linenum++) 700 { 701 tt = VIS_CHARS (linenum); 702 _rl_move_vert (linenum); 703 _rl_move_cursor_relative (0, tt); 704 _rl_clear_to_eol |
705 ((linenum == _rl_vis_botlin) ? strlen (tt) : _rl_screenwidth); |
706 } 707 } 708 _rl_vis_botlin = inv_botlin; 709 710 /* CHANGED_SCREEN_LINE is set to 1 if we have moved to a 711 different screen line during this redisplay. */ 712 changed_screen_line = _rl_last_v_pos != cursor_linenum; 713 if (changed_screen_line) 714 { 715 _rl_move_vert (cursor_linenum); |
716 /* If we moved up to the line with the prompt using _rl_term_up, |
717 the physical cursor position on the screen stays the same, 718 but the buffer position needs to be adjusted to account 719 for invisible characters. */ 720 if (cursor_linenum == 0 && wrap_offset) 721 _rl_last_c_pos += wrap_offset; 722 } 723 724 /* We have to reprint the prompt if it contains invisible 725 characters, since it's not generally OK to just reprint 726 the characters from the current cursor position. But we 727 only need to reprint it if the cursor is before the last 728 invisible character in the prompt string. */ |
729 nleft = prompt_visible_length + wrap_offset; |
730 if (cursor_linenum == 0 && wrap_offset > 0 && _rl_last_c_pos > 0 && |
731 _rl_last_c_pos <= prompt_last_invisible && local_prompt) |
732 { 733#if defined (__MSDOS__) 734 putc ('\r', rl_outstream); 735#else |
736 if (_rl_term_cr) 737 tputs (_rl_term_cr, 1, _rl_output_character_function); |
738#endif 739 _rl_output_some_chars (local_prompt, nleft); 740 _rl_last_c_pos = nleft; 741 } 742 743 /* Where on that line? And where does that line start 744 in the buffer? */ 745 pos = inv_lbreaks[cursor_linenum]; --- 22 unchanged lines hidden (view full) --- 768 /* Always at top line. */ 769 _rl_last_v_pos = 0; 770 771 /* Compute where in the buffer the displayed line should start. This 772 will be LMARGIN. */ 773 774 /* The number of characters that will be displayed before the cursor. */ 775 ndisp = c_pos - wrap_offset; |
776 nleft = prompt_visible_length + wrap_offset; |
777 /* Where the new cursor position will be on the screen. This can be 778 longer than SCREENWIDTH; if it is, lmargin will be adjusted. */ 779 phys_c_pos = c_pos - (last_lmargin ? last_lmargin : wrap_offset); |
780 t = _rl_screenwidth / 3; |
781 782 /* If the number of characters had already exceeded the screenwidth, 783 last_lmargin will be > 0. */ 784 785 /* If the number of characters to be displayed is more than the screen 786 width, compute the starting offset so that the cursor is about 787 two-thirds of the way across the screen. */ |
788 if (phys_c_pos > _rl_screenwidth - 2) |
789 { 790 lmargin = c_pos - (2 * t); 791 if (lmargin < 0) 792 lmargin = 0; 793 /* If the left margin would be in the middle of a prompt with 794 invisible characters, don't display the prompt at all. */ 795 if (wrap_offset && lmargin > 0 && lmargin < nleft) 796 lmargin = nleft; 797 } |
798 else if (ndisp < _rl_screenwidth - 2) /* XXX - was -1 */ |
799 lmargin = 0; 800 else if (phys_c_pos < 1) 801 { 802 /* If we are moving back towards the beginning of the line and 803 the last margin is no longer correct, compute a new one. */ 804 lmargin = ((c_pos - 1) / t) * t; /* XXX */ 805 if (wrap_offset && lmargin > 0 && lmargin < nleft) 806 lmargin = nleft; --- 5 unchanged lines hidden (view full) --- 812 in the display line, indicate this with a special character. */ 813 if (lmargin > 0) 814 line[lmargin] = '<'; 815 816 /* If SCREENWIDTH characters starting at LMARGIN do not encompass 817 the whole line, indicate that with a special character at the 818 right edge of the screen. If LMARGIN is 0, we need to take the 819 wrap offset into account. */ |
820 t = lmargin + M_OFFSET (lmargin, wrap_offset) + _rl_screenwidth; |
821 if (t < out) 822 line[t - 1] = '>'; 823 824 if (!rl_display_fixed || forced_display || lmargin != last_lmargin) 825 { 826 forced_display = 0; 827 update_line (&visible_line[last_lmargin], 828 &invisible_line[lmargin], 829 0, |
830 _rl_screenwidth + visible_wrap_offset, 831 _rl_screenwidth + (lmargin ? 0 : wrap_offset), |
832 0); 833 834 /* If the visible new line is shorter than the old, but the number 835 of invisible characters is greater, and we are at the end of 836 the new line, we need to clear to eol. */ 837 t = _rl_last_c_pos - M_OFFSET (lmargin, wrap_offset); 838 if ((M_OFFSET (lmargin, wrap_offset) > visible_wrap_offset) && 839 (_rl_last_c_pos == out) && 840 t < visible_first_line_len) 841 { |
842 nleft = _rl_screenwidth - t; |
843 _rl_clear_to_eol (nleft); 844 } 845 visible_first_line_len = out - lmargin - M_OFFSET (lmargin, wrap_offset); |
846 if (visible_first_line_len > _rl_screenwidth) 847 visible_first_line_len = _rl_screenwidth; |
848 849 _rl_move_cursor_relative (c_pos - lmargin, &invisible_line[lmargin]); 850 last_lmargin = lmargin; 851 } 852 } 853 fflush (rl_outstream); 854 855 /* Swap visible and non-visible lines. */ 856 { |
857 char *vtemp = visible_line; |
858 int *itemp = vis_lbreaks, ntemp = vis_lbsize; 859 860 visible_line = invisible_line; |
861 invisible_line = vtemp; |
862 863 vis_lbreaks = inv_lbreaks; 864 inv_lbreaks = itemp; 865 866 vis_lbsize = inv_lbsize; 867 inv_lbsize = ntemp; 868 869 rl_display_fixed = 0; --- 33 unchanged lines hidden (view full) --- 903 int current_invis_chars; 904 905 /* If we're at the right edge of a terminal that supports xn, we're 906 ready to wrap around, so do so. This fixes problems with knowing 907 the exact cursor position and cut-and-paste with certain terminal 908 emulators. In this calculation, TEMP is the physical screen 909 position of the cursor. */ 910 temp = _rl_last_c_pos - W_OFFSET(_rl_last_v_pos, visible_wrap_offset); |
911 if (temp == _rl_screenwidth && _rl_term_autowrap && !_rl_horizontal_scroll_mode |
912 && _rl_last_v_pos == current_line - 1) 913 { 914 if (new[0]) 915 putc (new[0], rl_outstream); 916 else 917 putc (' ', rl_outstream); 918 _rl_last_c_pos = 1; /* XXX */ 919 _rl_last_v_pos++; --- 60 unchanged lines hidden (view full) --- 980 This is not an efficiency hack -- there is a problem with redrawing 981 portions of the prompt string if they contain terminal escape 982 sequences (like drawing the `unbold' sequence without a corresponding 983 `bold') that manifests itself on certain terminals. */ 984 985 lendiff = local_prompt ? strlen (local_prompt) : 0; 986 od = ofd - old; /* index of first difference in visible line */ 987 if (current_line == 0 && !_rl_horizontal_scroll_mode && |
988 _rl_term_cr && lendiff > prompt_visible_length && _rl_last_c_pos > 0 && 989 od >= lendiff && _rl_last_c_pos <= prompt_last_invisible) |
990 { 991#if defined (__MSDOS__) 992 putc ('\r', rl_outstream); 993#else |
994 tputs (_rl_term_cr, 1, _rl_output_character_function); |
995#endif 996 _rl_output_some_chars (local_prompt, lendiff); 997 _rl_last_c_pos = lendiff; 998 } 999 1000 _rl_move_cursor_relative (od, old); 1001 1002 /* if (len (new) > len (old)) */ --- 11 unchanged lines hidden (view full) --- 1014 if (lendiff > 0) 1015 { 1016 /* Non-zero if we're increasing the number of lines. */ 1017 int gl = current_line >= _rl_vis_botlin && inv_botlin > _rl_vis_botlin; 1018 /* Sometimes it is cheaper to print the characters rather than 1019 use the terminal's capabilities. If we're growing the number 1020 of lines, make sure we actually cause the new line to wrap 1021 around on auto-wrapping terminals. */ |
1022 if (_rl_terminal_can_insert && ((2 * temp) >= lendiff || _rl_term_IC) && (!_rl_term_autowrap || !gl)) |
1023 { |
1024 /* If lendiff > prompt_visible_length and _rl_last_c_pos == 0 and |
1025 _rl_horizontal_scroll_mode == 1, inserting the characters with |
1026 _rl_term_IC or _rl_term_ic will screw up the screen because of the |
1027 invisible characters. We need to just draw them. */ 1028 if (*ols && (!_rl_horizontal_scroll_mode || _rl_last_c_pos > 0 || |
1029 lendiff <= prompt_visible_length || !current_invis_chars)) |
1030 { 1031 insert_some_chars (nfd, lendiff); 1032 _rl_last_c_pos += lendiff; 1033 } 1034 else if (*ols == 0) 1035 { 1036 /* At the end of a line the characters do not have to 1037 be "inserted". They can just be placed on the screen. */ --- 24 unchanged lines hidden (view full) --- 1062 /* cannot insert chars, write to EOL */ 1063 _rl_output_some_chars (nfd, temp); 1064 _rl_last_c_pos += temp; 1065 } 1066 } 1067 else /* Delete characters from line. */ 1068 { 1069 /* If possible and inexpensive to use terminal deletion, then do so. */ |
1070 if (_rl_term_dc && (2 * temp) >= -lendiff) |
1071 { 1072 /* If all we're doing is erasing the invisible characters in the 1073 prompt string, don't bother. It screws up the assumptions 1074 about what's on the screen. */ 1075 if (_rl_horizontal_scroll_mode && _rl_last_c_pos == 0 && 1076 -lendiff == visible_wrap_offset) 1077 lendiff = 0; 1078 --- 68 unchanged lines hidden (view full) --- 1147 prompt_last_line = rl_prompt; 1148 1149 l = strlen (prompt_last_line); 1150 _rl_last_c_pos = l; 1151 1152 /* Dissect prompt_last_line into screen lines. Note that here we have 1153 to use the real screenwidth. Readline's notion of screenwidth might be 1154 one less, see terminal.c. */ |
1155 real_screenwidth = _rl_screenwidth + (_rl_term_autowrap ? 0 : 1); |
1156 _rl_last_v_pos = l / real_screenwidth; 1157 /* If the prompt length is a multiple of real_screenwidth, we don't know 1158 whether the cursor is at the end of the last line, or already at the 1159 beginning of the next line. Output a newline just to be safe. */ 1160 if (l > 0 && (l % real_screenwidth) == 0) 1161 _rl_output_some_chars ("\n", 1); 1162 last_lmargin = 0; 1163 --- 28 unchanged lines hidden (view full) --- 1192} 1193 1194/* Move the cursor from _rl_last_c_pos to NEW, which are buffer indices. 1195 DATA is the contents of the screen line of interest; i.e., where 1196 the movement is being done. */ 1197void 1198_rl_move_cursor_relative (new, data) 1199 int new; |
1200 const char *data; |
1201{ 1202 register int i; 1203 1204 /* If we don't have to do anything, then return. */ 1205 if (_rl_last_c_pos == new) return; 1206 1207 /* It may be faster to output a CR, and then move forwards instead 1208 of moving backwards. */ 1209 /* i == current physical cursor position. */ 1210 i = _rl_last_c_pos - W_OFFSET(_rl_last_v_pos, visible_wrap_offset); 1211 if (new == 0 || CR_FASTER (new, _rl_last_c_pos) || |
1212 (_rl_term_autowrap && i == _rl_screenwidth)) |
1213 { 1214#if defined (__MSDOS__) 1215 putc ('\r', rl_outstream); 1216#else |
1217 tputs (_rl_term_cr, 1, _rl_output_character_function); |
1218#endif /* !__MSDOS__ */ 1219 _rl_last_c_pos = 0; 1220 } 1221 1222 if (_rl_last_c_pos < new) 1223 { 1224 /* Move the cursor forward. We do it by printing the command 1225 to move the cursor forward if there is one, else print that 1226 portion of the output buffer again. Which is cheaper? */ 1227 1228 /* The above comment is left here for posterity. It is faster 1229 to print one character (non-control) than to print a control 1230 sequence telling the terminal to move forward one character. 1231 That kind of control is for people who don't know what the 1232 data is underneath the cursor. */ 1233#if defined (HACK_TERMCAP_MOTION) |
1234 if (_rl_term_forward_char) |
1235 for (i = _rl_last_c_pos; i < new; i++) |
1236 tputs (_rl_term_forward_char, 1, _rl_output_character_function); |
1237 else 1238 for (i = _rl_last_c_pos; i < new; i++) 1239 putc (data[i], rl_outstream); 1240#else 1241 for (i = _rl_last_c_pos; i < new; i++) 1242 putc (data[i], rl_outstream); 1243#endif /* HACK_TERMCAP_MOTION */ 1244 } --- 4 unchanged lines hidden (view full) --- 1249 1250/* PWP: move the cursor up or down. */ 1251void 1252_rl_move_vert (to) 1253 int to; 1254{ 1255 register int delta, i; 1256 |
1257 if (_rl_last_v_pos == to || to > _rl_screenheight) |
1258 return; 1259 1260 if ((delta = to - _rl_last_v_pos) > 0) 1261 { 1262 for (i = 0; i < delta; i++) 1263 putc ('\n', rl_outstream); 1264#if defined (__MSDOS__) 1265 putc ('\r', rl_outstream); 1266#else |
1267 tputs (_rl_term_cr, 1, _rl_output_character_function); |
1268#endif 1269 _rl_last_c_pos = 0; 1270 } 1271 else 1272 { /* delta < 0 */ |
1273 if (_rl_term_up && *_rl_term_up) |
1274 for (i = 0; i < -delta; i++) |
1275 tputs (_rl_term_up, 1, _rl_output_character_function); |
1276 } 1277 1278 _rl_last_v_pos = to; /* Now TO is here */ 1279} 1280 1281/* Physically print C on rl_outstream. This is for functions which know 1282 how to optimize the display. Return the number of characters output. */ 1283int --- 117 unchanged lines hidden (view full) --- 1401static int saved_last_invisible; 1402static int saved_visible_length; 1403 1404void 1405rl_save_prompt () 1406{ 1407 saved_local_prompt = local_prompt; 1408 saved_local_prefix = local_prompt_prefix; |
1409 saved_last_invisible = prompt_last_invisible; 1410 saved_visible_length = prompt_visible_length; |
1411 1412 local_prompt = local_prompt_prefix = (char *)0; |
1413 prompt_last_invisible = prompt_visible_length = 0; |
1414} 1415 1416void 1417rl_restore_prompt () 1418{ |
1419 FREE (local_prompt); 1420 FREE (local_prompt_prefix); |
1421 1422 local_prompt = saved_local_prompt; 1423 local_prompt_prefix = saved_local_prefix; |
1424 prompt_last_invisible = saved_last_invisible; 1425 prompt_visible_length = saved_visible_length; |
1426} 1427 1428char * 1429_rl_make_prompt_for_search (pchar) 1430 int pchar; 1431{ 1432 int len; 1433 char *pmt; --- 13 unchanged lines hidden (view full) --- 1447 { 1448 len = *saved_local_prompt ? strlen (saved_local_prompt) : 0; 1449 pmt = xmalloc (len + 2); 1450 if (len) 1451 strcpy (pmt, saved_local_prompt); 1452 pmt[len] = pchar; 1453 pmt[len+1] = '\0'; 1454 local_prompt = savestring (pmt); |
1455 prompt_last_invisible = saved_last_invisible; 1456 prompt_visible_length = saved_visible_length + 1; |
1457 } 1458 return pmt; 1459} 1460 1461/* Quick redisplay hack when erasing characters at the end of the line. */ 1462void 1463_rl_erase_at_end_of_line (l) 1464 int l; --- 10 unchanged lines hidden (view full) --- 1475} 1476 1477/* Clear to the end of the line. COUNT is the minimum 1478 number of character spaces to clear, */ 1479void 1480_rl_clear_to_eol (count) 1481 int count; 1482{ |
1483 if (_rl_term_clreol) 1484 tputs (_rl_term_clreol, 1, _rl_output_character_function); |
1485 else if (count) 1486 space_to_eol (count); 1487} 1488 1489/* Clear to the end of the line using spaces. COUNT is the minimum 1490 number of character spaces to clear, */ 1491static void 1492space_to_eol (count) --- 5 unchanged lines hidden (view full) --- 1498 putc (' ', rl_outstream); 1499 1500 _rl_last_c_pos += count; 1501} 1502 1503void 1504_rl_clear_screen () 1505{ |
1506 if (_rl_term_clrpag) 1507 tputs (_rl_term_clrpag, 1, _rl_output_character_function); |
1508 else |
1509 rl_crlf (); |
1510} 1511 1512/* Insert COUNT characters from STRING to the output stream. */ 1513static void 1514insert_some_chars (string, count) 1515 char *string; 1516 int count; 1517{ 1518 /* If IC is defined, then we do not have to "enter" insert mode. */ |
1519 if (_rl_term_IC) |
1520 { 1521 char *buffer; |
1522 buffer = tgoto (_rl_term_IC, 0, count); |
1523 tputs (buffer, 1, _rl_output_character_function); 1524 _rl_output_some_chars (string, count); 1525 } 1526 else 1527 { 1528 register int i; 1529 1530 /* If we have to turn on insert-mode, then do so. */ |
1531 if (_rl_term_im && *_rl_term_im) 1532 tputs (_rl_term_im, 1, _rl_output_character_function); |
1533 1534 /* If there is a special command for inserting characters, then 1535 use that first to open up the space. */ |
1536 if (_rl_term_ic && *_rl_term_ic) |
1537 { 1538 for (i = count; i--; ) |
1539 tputs (_rl_term_ic, 1, _rl_output_character_function); |
1540 } 1541 1542 /* Print the text. */ 1543 _rl_output_some_chars (string, count); 1544 1545 /* If there is a string to turn off insert mode, we had best use 1546 it now. */ |
1547 if (_rl_term_ei && *_rl_term_ei) 1548 tputs (_rl_term_ei, 1, _rl_output_character_function); |
1549 } 1550} 1551 1552/* Delete COUNT characters from the display line. */ 1553static void 1554delete_chars (count) 1555 int count; 1556{ |
1557 if (count > _rl_screenwidth) /* XXX */ |
1558 return; 1559 |
1560 if (_rl_term_DC && *_rl_term_DC) |
1561 { 1562 char *buffer; |
1563 buffer = tgoto (_rl_term_DC, count, count); |
1564 tputs (buffer, count, _rl_output_character_function); 1565 } 1566 else 1567 { |
1568 if (_rl_term_dc && *_rl_term_dc) |
1569 while (count--) |
1570 tputs (_rl_term_dc, 1, _rl_output_character_function); |
1571 } 1572} 1573 1574void 1575_rl_update_final () 1576{ 1577 int full_lines; 1578 1579 full_lines = 0; 1580 /* If the cursor is the only thing on an otherwise-blank last line, 1581 compensate so we don't print an extra CRLF. */ 1582 if (_rl_vis_botlin && _rl_last_c_pos == 0 && 1583 visible_line[vis_lbreaks[_rl_vis_botlin]] == 0) 1584 { 1585 _rl_vis_botlin--; 1586 full_lines = 1; 1587 } 1588 _rl_move_vert (_rl_vis_botlin); 1589 /* If we've wrapped lines, remove the final xterm line-wrap flag. */ |
1590 if (full_lines && _rl_term_autowrap && (VIS_LLEN(_rl_vis_botlin) == _rl_screenwidth)) |
1591 { 1592 char *last_line; 1593#if 0 1594 last_line = &visible_line[inv_lbreaks[_rl_vis_botlin]]; 1595#else 1596 last_line = &visible_line[vis_lbreaks[_rl_vis_botlin]]; 1597#endif |
1598 _rl_move_cursor_relative (_rl_screenwidth - 1, last_line); |
1599 _rl_clear_to_eol (0); |
1600 putc (last_line[_rl_screenwidth - 1], rl_outstream); |
1601 } 1602 _rl_vis_botlin = 0; |
1603 rl_crlf (); |
1604 fflush (rl_outstream); 1605 rl_display_fixed++; 1606} 1607 1608/* Move to the start of the current line. */ 1609static void 1610cr () 1611{ |
1612 if (_rl_term_cr) |
1613 { 1614#if defined (__MSDOS__) 1615 putc ('\r', rl_outstream); 1616#else |
1617 tputs (_rl_term_cr, 1, _rl_output_character_function); |
1618#endif 1619 _rl_last_c_pos = 0; 1620 } 1621} 1622 1623/* Redraw the last line of a multi-line prompt that may possibly contain 1624 terminal escape sequences. Called with the cursor at column 0 of the 1625 line to draw the prompt on. */ 1626static void 1627redraw_prompt (t) 1628 char *t; 1629{ 1630 char *oldp, *oldl, *oldlprefix; |
1631 int oldlen, oldlast, oldplen, oldninvis; |
1632 1633 /* Geez, I should make this a struct. */ 1634 oldp = rl_display_prompt; 1635 oldl = local_prompt; 1636 oldlprefix = local_prompt_prefix; |
1637 oldlen = prompt_visible_length; 1638 oldplen = prompt_prefix_length; 1639 oldlast = prompt_last_invisible; 1640 oldninvis = prompt_invis_chars_first_line; |
1641 1642 rl_display_prompt = t; |
1643 local_prompt = expand_prompt (t, &prompt_visible_length, 1644 &prompt_last_invisible, 1645 &prompt_invis_chars_first_line); |
1646 local_prompt_prefix = (char *)NULL; 1647 rl_forced_update_display (); 1648 1649 rl_display_prompt = oldp; 1650 local_prompt = oldl; 1651 local_prompt_prefix = oldlprefix; |
1652 prompt_visible_length = oldlen; 1653 prompt_prefix_length = oldplen; 1654 prompt_last_invisible = oldlast; 1655 prompt_invis_chars_first_line = oldninvis; |
1656} 1657 1658/* Redisplay the current line after a SIGWINCH is received. */ 1659void 1660_rl_redisplay_after_sigwinch () 1661{ 1662 char *t; 1663 1664 /* Clear the current line and put the cursor at column 0. Make sure 1665 the right thing happens if we have wrapped to a new screen line. */ |
1666 if (_rl_term_cr) |
1667 { 1668#if defined (__MSDOS__) 1669 putc ('\r', rl_outstream); 1670#else |
1671 tputs (_rl_term_cr, 1, _rl_output_character_function); |
1672#endif 1673 _rl_last_c_pos = 0; 1674#if defined (__MSDOS__) |
1675 space_to_eol (_rl_screenwidth); |
1676 putc ('\r', rl_outstream); 1677#else |
1678 if (_rl_term_clreol) 1679 tputs (_rl_term_clreol, 1, _rl_output_character_function); |
1680 else 1681 { |
1682 space_to_eol (_rl_screenwidth); 1683 tputs (_rl_term_cr, 1, _rl_output_character_function); |
1684 } 1685#endif 1686 if (_rl_last_v_pos > 0) 1687 _rl_move_vert (0); 1688 } 1689 else |
1690 rl_crlf (); |
1691 1692 /* Redraw only the last line of a multi-line prompt. */ 1693 t = strrchr (rl_display_prompt, '\n'); 1694 if (t) 1695 redraw_prompt (++t); 1696 else 1697 rl_forced_update_display (); 1698} --- 24 unchanged lines hidden (view full) --- 1723int 1724_rl_current_display_line () 1725{ 1726 int ret, nleft; 1727 1728 /* Find out whether or not there might be invisible characters in the 1729 editing buffer. */ 1730 if (rl_display_prompt == rl_prompt) |
1731 nleft = _rl_last_c_pos - _rl_screenwidth - rl_visible_prompt_length; |
1732 else |
1733 nleft = _rl_last_c_pos - _rl_screenwidth; |
1734 1735 if (nleft > 0) |
1736 ret = 1 + nleft / _rl_screenwidth; |
1737 else 1738 ret = 0; 1739 1740 return ret; 1741} |