moving windows

[unix-history] / usr / src / usr.bin / window / wwlabel.c

#ifndef lint
static	char *sccsid = "@(#)wwlabel.c	3.6 83/08/26";
#endif

#include "ww.h"

/*
 * 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;
{
	int i;
	register j;
	register char *p;
	register char *win;
	register union ww_char *buf;
	register union ww_char *ns;
	register char *fmap;
	char *touched;

	if (f->ww_fmap == 0)
		return;

	i = w->ww_w.t - 1 - f->ww_w.t;
	if (i < 0)
		return;
	j = w->ww_w.l + where - f->ww_w.l;
	if (j < 0)
		j = 0;
	win = &f->ww_win[i][j];
	buf = &f->ww_buf[f->ww_scroll + i][j];
	fmap = &f->ww_fmap[i][j];

	i += f->ww_w.t;
	j += f->ww_w.l;
	ns = &wwns[i][j];
	touched = &wwtouched[i];

	j = MIN(w->ww_w.r, f->ww_w.r) - j;
	for (; j > 0 && *l;)
		for (p = unctrl(*l++); j > 0 && *p; j--) {
			/* can't label if not already framed */
			if (*win & WWM_GLS) {
				p++;
				buf++;
				ns++;
				win++;
				fmap++;
			} else if (*win & WWM_COV) {
				buf++->c_w = mode << WWC_MSHIFT | *p++;
				*fmap++ |= WWF_LABEL;
				ns++;
				win++;
			} else {
				*touched = 1;
				ns++->c_w = (buf++->c_w
					= mode << WWC_MSHIFT | *p++)
						^ *win++ << WWC_MSHIFT;
				*fmap++ |= WWF_LABEL;
			}
		}
}