should free token_str if not used
[unix-history] / usr / src / usr.bin / window / wwlabel.c
index f8e0c33..ebbc00b 100644 (file)
@@ -1,21 +1,59 @@
 #ifndef lint
 #ifndef lint
-static char *sccsid = "@(#)wwlabel.c   2.1 83/07/30";
+static char *sccsid = "@(#)wwlabel.c   3.10 83/12/02";
 #endif
 
 #include "ww.h"
 
 #endif
 
 #include "ww.h"
 
-wwlabel(w, where, l, mode)
-register struct ww *w;
-register char *l;
+/*
+ * Label window w on f,
+ * at 1 line above w and 'where' columns from it's left edge.
+ * Gross, but it works.
+ */
+wwlabel(w, f, where, l, mode)
+struct ww *w;
+struct ww *f;
+char *l;
 {
 {
-       register i;
-       register char *p;
-       char ulc, top, urc, left, right, llc, bottom, lrc;
+       int row;
+       register j;
+       int jj;
+       register char *win;
+       register union ww_char *buf;
+       register union ww_char *ns;
+       register char *fmap;
+       register char *smap;
+       char touched;
+       char *p;
 
 
-       if (w->ww_i.nrow == w->ww_w.nrow)       /* not framed */
-               return -1;
-       Wauxcursor(w->ww_win, 0, where);
-       for (i = w->ww_o.ncol - where - 1; i > 0 && *l; l++)
-               for (p = unctrl(*l); *p; p++, i--)
-                       Waputc(*p, mode, w->ww_win);
+       if (f->ww_fmap == 0)
+               return;
+
+       row = w->ww_w.t - 1;
+       if (row < f->ww_i.t || row >= f->ww_i.b)
+               return;
+       win = f->ww_win[row];
+       buf = f->ww_buf[row];
+       fmap = f->ww_fmap[row];
+       ns = wwns[row];
+       smap = wwsmap[row];
+       touched = wwtouched[row];
+       mode <<= WWC_MSHIFT;
+
+       jj = MIN(w->ww_i.r, f->ww_i.r);
+       j = w->ww_i.l + where;
+       while (j < jj && *l)
+               for (p = unctrl(*l++); j < jj && *p; j++, p++) {
+                       /* can't label if not already framed */
+                       if (win[j] & WWM_GLS)
+                               continue;
+                       if (smap[j] != f->ww_index)
+                               buf[j].c_w = mode | *p;
+                       else {
+                               ns[j].c_w = (buf[j].c_w = mode | *p)
+                                               ^ win[j] << WWC_MSHIFT;
+                               touched |= WWU_TOUCHED;
+                       }
+                       fmap[j] |= WWF_LABEL;
+               }
+       wwtouched[row] = touched;
 }
 }