]> git.saurik.com Git - apple/shell_cmds.git/blob - window/wwlabel.c
shell_cmds-34.tar.gz
[apple/shell_cmds.git] / window / wwlabel.c
1 /* $NetBSD: wwlabel.c,v 1.5 1997/11/21 08:37:32 lukem Exp $ */
2
3 /*
4 * Copyright (c) 1983, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * This code is derived from software contributed to Berkeley by
8 * Edward Wang at The University of California, Berkeley.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the University of
21 * California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 */
38
39 #include <sys/cdefs.h>
40 #ifndef lint
41 #if 0
42 static char sccsid[] = "@(#)wwlabel.c 8.1 (Berkeley) 6/6/93";
43 #else
44 __RCSID("$NetBSD: wwlabel.c,v 1.5 1997/11/21 08:37:32 lukem Exp $");
45 #endif
46 #endif /* not lint */
47
48 #include "ww.h"
49 #include "char.h"
50
51 /*
52 * Label window w on f,
53 * at 1 line above w and 'where' columns from it's left edge.
54 * Gross, but it works.
55 */
56 void
57 wwlabel(w, f, where, l, mode)
58 struct ww *w;
59 struct ww *f;
60 int where;
61 char *l;
62 int mode;
63 {
64 int row;
65 int j;
66 int jj;
67 char *win;
68 union ww_char *buf;
69 union ww_char *ns;
70 char *fmap;
71 unsigned char *smap;
72 char touched;
73 char *p;
74
75 if (f->ww_fmap == 0)
76 return;
77
78 row = w->ww_w.t - 1;
79 if (row < f->ww_i.t || row >= f->ww_i.b)
80 return;
81 win = f->ww_win[row];
82 buf = f->ww_buf[row];
83 fmap = f->ww_fmap[row];
84 ns = wwns[row];
85 smap = wwsmap[row];
86 touched = wwtouched[row];
87 mode <<= WWC_MSHIFT;
88
89 jj = MIN(w->ww_i.r, f->ww_i.r);
90 j = w->ww_i.l + where;
91 while (j < jj && *l)
92 for (p = unctrl(*l++); j < jj && *p; j++, p++) {
93 /* can't label if not already framed */
94 if (win[j] & WWM_GLS)
95 continue;
96 if (smap[j] != f->ww_index)
97 buf[j].c_w = mode | *p;
98 else {
99 ns[j].c_w = (buf[j].c_w = mode | *p)
100 ^ win[j] << WWC_MSHIFT;
101 touched |= WWU_TOUCHED;
102 }
103 fmap[j] |= WWF_LABEL;
104 }
105 wwtouched[row] = touched;
106 }