![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to showstring.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / ncurses / screen|
Return to showstring.c CVS log | Up to [Research Unix] / researchv10no / ncurses / screen |
1.1 ! root 1: /* @(#) showstring.c: 1.1 10/15/83 (1.20 3/6/83) */ ! 2: ! 3: #include "curses.ext" ! 4: ! 5: /* ! 6: * Dump the string running from first to last out to the terminal. ! 7: * Take into account attributes, and attempt to take advantage of ! 8: * large pieces of white space and text that's already there. ! 9: * oldline is the old text of the line. ! 10: * ! 11: * Variable naming convention: *x means "extension", e.g. a rubber band ! 12: * that briefly looks ahead; *c means a character version of an otherwise ! 13: * chtype pointer; old means what was on the screen before this call; ! 14: * left means the char 1 space to the left. ! 15: */ ! 16: _showstring(sline, scol, first, last, oldlp) ! 17: int sline, scol; ! 18: chtype *first, *last; ! 19: struct line *oldlp; ! 20: { ! 21: register int hl = 0; /* nontrivial line, highlighted or with holes */ ! 22: int prevhl=SP->virt_gr, thishl; /* highlight state tty is in */ ! 23: register chtype *p, *px; /* current char being considered */ ! 24: register chtype *oldp, *oldpx; /* stuff under p and px */ ! 25: register char *pc, *pcx; /* like p, px but in char buffer */ ! 26: chtype *tailoldp; /* last valid oldp */ ! 27: int oldlen; /* length of old line */ ! 28: int lcol, lrow; /* position on screen */ ! 29: int oldc; /* char at oldp */ ! 30: int leftoldc, leftnewc; /* old & new chars to left of p */ ! 31: int diff_cookies; /* magic cookies changed */ ! 32: int diff_attrs; /* highlights changed */ ! 33: chtype *oldline; ! 34: #ifdef NONSTANDARD ! 35: static ! 36: #endif NONSTANDARD ! 37: char firstc[256], *lastc; /* char copy of input first, last */ ! 38: ! 39: #ifdef DEBUG ! 40: if(outf) fprintf(outf, "_showstring((%d,%d) %d:'", sline, scol, last-first+1); ! 41: if(outf) ! 42: for (p=first; p<=last; p++) { ! 43: thishl = *p & A_ATTRIBUTES; ! 44: if (thishl) ! 45: putc('\'', outf); ! 46: putc(*p & A_CHARTEXT, outf); ! 47: } ! 48: if(outf) fprintf(outf, "').\n"); ! 49: #endif ! 50: if (last-first > columns) { ! 51: _pos(lines-1, 0); ! 52: #ifndef NONSTANDARD ! 53: fprintf(stderr, "Bad call to _showstring, first %x, last %x,\ ! 54: diff %d\pcx\n", first, last, last-first); ! 55: #endif ! 56: abort(); ! 57: } ! 58: if (oldlp) { ! 59: oldline = oldlp->body; ! 60: oldp = oldline+scol; ! 61: } ! 62: else ! 63: oldp = 0; ! 64: for (p=first,lastc=firstc; p<=last; ) { ! 65: if (*p & A_ATTRIBUTES) ! 66: hl++; /* attributes on the line */ ! 67: if (oldp && (*oldp++ & A_ATTRIBUTES)) ! 68: hl++; /* attributes on old line */ ! 69: if (*p==' ' && (px=p+1,*px++==' ') && *px++==' ' && *px==' ') ! 70: hl++; /* a run of at least 4 blanks */ ! 71: *lastc++ = *p & A_CHARTEXT; ! 72: p++; /* On a separate line due to C optimizer bug */ ! 73: #ifdef FULLDEBUG ! 74: if(outf) fprintf(outf, "p %x '%c' %o, lastc %x %o, oldp %x %o, hl %d\n", p, p[-1], p[-1], lastc, lastc[-1], oldp, oldp ? oldp[-1] : 0, hl); ! 75: #endif ! 76: } ! 77: lastc--; ! 78: ! 79: lcol = scol; lrow = sline; ! 80: if (oldlp) { ! 81: oldline = oldlp->body; ! 82: oldlen = oldlp->length; ! 83: /* Check for runs of stuff that's already there. */ ! 84: for (p=first,oldp=oldline+lcol; p<=last; p++,oldp++) { ! 85: if (*p==*oldp && (px=p+1,oldpx=oldp+1,*px++==*oldpx++) ! 86: && *px++==*oldpx++ && *px==*oldpx) ! 87: hl++; /* a run of at least 4 matches */ ! 88: #ifdef FULLDEBUG ! 89: if(outf) fprintf(outf, "p %x '%c%c%c%c', oldp %x '%c%c%c%c', hl %d\n", ! 90: p, p[0], p[1], p[2], p[3], ! 91: oldp, oldp[0], oldp[1], oldp[2], oldp[3], ! 92: hl); ! 93: #endif ! 94: } ! 95: } else { ! 96: oldline = NULL; ! 97: oldlen = 0; ! 98: } ! 99: ! 100: if (!hl) { ! 101: /* Simple, common case. Do it fast. */ ! 102: _pos(lrow, lcol); ! 103: _hlmode(0); ! 104: _writechars(firstc, lastc); ! 105: return; ! 106: } ! 107: ! 108: #ifdef DEBUG ! 109: if(outf) fprintf(outf, "oldlp %x, oldline %x, oldlen %d 0x%x\n", oldlp, oldline, oldlen, oldlen); ! 110: if(outf) fprintf(outf, "old body('"); ! 111: if (oldlp) ! 112: for (p=oldline; p<=oldline+oldlen; p++) ! 113: if(outf) fprintf(outf, "%c", *p); ! 114: if(outf) fprintf(outf, "').\n"); ! 115: #endif ! 116: oldc = first[-1]; ! 117: tailoldp = oldline + oldlen; ! 118: for (p=first, oldp=oldline+lcol, pc=firstc; pc<=lastc; p++,oldp++,pc++) { ! 119: thishl = *p & A_ATTRIBUTES; ! 120: #ifdef DEBUG ! 121: if(outf) fprintf(outf, "prevhl %o, thishl %o\n", prevhl, thishl); ! 122: #endif ! 123: leftoldc = oldc & A_ATTRIBUTES; ! 124: leftnewc = p[-1] & A_ATTRIBUTES; ! 125: diff_cookies = magic_cookie_glitch>=0 && (leftoldc != leftnewc); ! 126: diff_attrs = ceol_standout_glitch>=0 && (((*p)&A_ATTRIBUTES) != leftnewc); ! 127: if (oldp >= tailoldp) ! 128: oldc = ' '; ! 129: else ! 130: oldc = *oldp; ! 131: #ifdef DEBUG ! 132: if(outf) fprintf(outf, "p %x *p %o, pc %x *pc %o, oldp %x, *oldp %o, lcol %d, lrow %d, oldc %o\n", p, *p, pc, *pc, oldp, *oldp, lcol, lrow, oldc); ! 133: #endif ! 134: if (*p != oldc || SP->virt_irm == 1 || diff_cookies || diff_attrs || ! 135: insert_null_glitch && oldp >= oldline+oldlen) { ! 136: register int n; ! 137: ! 138: _pos(lrow, lcol); ! 139: ! 140: /* ! 141: * HP 2645/2626: output new for each char. ! 142: * This forces it to be right no matter what ! 143: * was there before. ! 144: */ ! 145: if (ceol_standout_glitch && thishl == 0 && oldc&A_ATTRIBUTES) { ! 146: #ifdef FULLDEBUG ! 147: if(outf) fprintf(outf, ! 148: "ceol %d, thishl %d, prevhl %d\n", ! 149: ceol_standout_glitch, thishl, prevhl); ! 150: #endif ! 151: _forcehl(); ! 152: } ! 153: ! 154: /* Force highlighting to be right */ ! 155: _hlmode(thishl); ! 156: if (thishl != prevhl) { ! 157: if (magic_cookie_glitch >= 0) { ! 158: _sethl(); ! 159: p += magic_cookie_glitch; ! 160: oldp += magic_cookie_glitch; ! 161: pc += magic_cookie_glitch; ! 162: lcol += magic_cookie_glitch; ! 163: } ! 164: } ! 165: ! 166: /* ! 167: * Gather chunks of chars together, to be more ! 168: * efficient, and to allow repeats to be detected. ! 169: * Not done for blanks on cookie terminals because ! 170: * the last one might be a cookie. ! 171: */ ! 172: if (magic_cookie_glitch<0 || *pc != ' ') { ! 173: for (px=p+1,oldpx=oldp+1; ! 174: px<=last && *p==*px; ! 175: px++,oldpx++) { ! 176: if(!(repeat_char && oldpx<tailoldp && *p==*oldpx)) ! 177: break; ! 178: } ! 179: px--; oldpx--; ! 180: n = px - p; ! 181: pcx = pc + n; ! 182: } else { ! 183: n = 0; ! 184: pcx = pc; ! 185: } ! 186: _writechars(pc, pcx); ! 187: lcol += n; pc += n; p += n; oldp += n; ! 188: prevhl = thishl; ! 189: } ! 190: lcol++; ! 191: } ! 192: if (magic_cookie_glitch >= 0 && prevhl) { ! 193: /* Have to turn off highlighting at end of line */ ! 194: _hlmode(0); ! 195: _sethl(); ! 196: } ! 197: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.