Commit | Line | Data |
---|---|---|
60de5df9 | 1 | /* |
46e9ea25 KB |
2 | * Copyright (c) 1983 Regents of the University of California. |
3 | * All rights reserved. | |
4 | * | |
3dd3a9e5 KB |
5 | * This code is derived from software contributed to Berkeley by |
6 | * Edward Wang at The University of California, Berkeley. | |
7 | * | |
87f529ec | 8 | * %sccs.include.redist.c% |
60de5df9 EW |
9 | */ |
10 | ||
46e9ea25 | 11 | #ifndef lint |
3dd3a9e5 | 12 | static char sccsid[] = "@(#)wwopen.c 3.29 (Berkeley) %G%"; |
46e9ea25 KB |
13 | #endif /* not lint */ |
14 | ||
138b737c | 15 | #include "ww.h" |
7ecf4dca EW |
16 | #include <sys/types.h> |
17 | #include <sys/socket.h> | |
138b737c | 18 | |
138b737c | 19 | struct ww * |
bb05dfb5 | 20 | wwopen(flags, nrow, ncol, row, col, nline) |
138b737c | 21 | { |
a8a39d2c | 22 | register struct ww *w; |
bb05dfb5 EW |
23 | register i, j; |
24 | char m; | |
25 | short nvis; | |
138b737c | 26 | |
03f0d462 | 27 | w = (struct ww *)calloc(sizeof (struct ww), 1); |
03e75950 EW |
28 | if (w == 0) { |
29 | wwerrno = WWE_NOMEM; | |
03f0d462 | 30 | goto bad; |
03e75950 | 31 | } |
eec72f58 | 32 | w->ww_pty = -1; |
7ecf4dca | 33 | w->ww_socket = -1; |
03f0d462 | 34 | |
bb05dfb5 EW |
35 | for (i = 0; i < NWW && wwindex[i] != 0; i++) |
36 | ; | |
03e75950 EW |
37 | if (i >= NWW) { |
38 | wwerrno = WWE_TOOMANY; | |
138b737c | 39 | goto bad; |
03e75950 | 40 | } |
bb05dfb5 | 41 | w->ww_index = i; |
bb05dfb5 | 42 | |
f2a77fe1 EW |
43 | if (nline < nrow) |
44 | nline = nrow; | |
45 | ||
19f9784c EW |
46 | w->ww_w.t = row; |
47 | w->ww_w.b = row + nrow; | |
48 | w->ww_w.l = col; | |
49 | w->ww_w.r = col + ncol; | |
50 | w->ww_w.nr = nrow; | |
51 | w->ww_w.nc = ncol; | |
f2a77fe1 EW |
52 | |
53 | w->ww_b.t = row; | |
54 | w->ww_b.b = row + nline; | |
55 | w->ww_b.l = col; | |
56 | w->ww_b.r = col + ncol; | |
57 | w->ww_b.nr = nline; | |
58 | w->ww_b.nc = ncol; | |
59 | ||
19f9784c EW |
60 | w->ww_i.t = MAX(w->ww_w.t, 0); |
61 | w->ww_i.b = MIN(w->ww_w.b, wwnrow); | |
62 | w->ww_i.l = MAX(w->ww_w.l, 0); | |
63 | w->ww_i.r = MIN(w->ww_w.r, wwncol); | |
64 | w->ww_i.nr = w->ww_i.b - w->ww_i.t; | |
65 | w->ww_i.nc = w->ww_i.r - w->ww_i.l; | |
66 | ||
f2a77fe1 EW |
67 | w->ww_cur.r = w->ww_w.t; |
68 | w->ww_cur.c = w->ww_w.l; | |
bb05dfb5 | 69 | |
03f0d462 | 70 | if (flags & WWO_PTY) { |
03f0d462 EW |
71 | if (wwgetpty(w) < 0) |
72 | goto bad; | |
7ecf4dca EW |
73 | w->ww_ispty = 1; |
74 | } else if (flags & WWO_SOCKET) { | |
75 | int d[2]; | |
76 | if (socketpair(AF_UNIX, SOCK_STREAM, PF_UNSPEC, d) < 0) { | |
77 | wwerrno = WWE_SYS; | |
8fa6d94c | 78 | goto bad; |
7ecf4dca EW |
79 | } |
80 | w->ww_pty = d[0]; | |
81 | w->ww_socket = d[1]; | |
82 | } | |
83 | if (flags & (WWO_PTY|WWO_SOCKET)) { | |
84 | if ((w->ww_ob = malloc(512)) == 0) { | |
85 | wwerrno = WWE_NOMEM; | |
86 | goto bad; | |
87 | } | |
8fa6d94c | 88 | w->ww_obe = w->ww_ob + 512; |
7ecf4dca | 89 | w->ww_obp = w->ww_obq = w->ww_ob; |
03f0d462 EW |
90 | } |
91 | ||
f2a77fe1 EW |
92 | w->ww_win = wwalloc(w->ww_w.t, w->ww_w.l, |
93 | w->ww_w.nr, w->ww_w.nc, sizeof (char)); | |
bb05dfb5 EW |
94 | if (w->ww_win == 0) |
95 | goto bad; | |
96 | m = 0; | |
97 | if (flags & WWO_GLASS) | |
98 | m |= WWM_GLS; | |
99 | if (flags & WWO_REVERSE) | |
f4f5703a EW |
100 | if (wwavailmodes & WWM_REV) |
101 | m |= WWM_REV; | |
102 | else | |
103 | flags &= ~WWO_REVERSE; | |
f2a77fe1 EW |
104 | for (i = w->ww_w.t; i < w->ww_w.b; i++) |
105 | for (j = w->ww_w.l; j < w->ww_w.r; j++) | |
bb05dfb5 | 106 | w->ww_win[i][j] = m; |
2357b64e EW |
107 | |
108 | if (flags & WWO_FRAME) { | |
f2a77fe1 EW |
109 | w->ww_fmap = wwalloc(w->ww_w.t, w->ww_w.l, |
110 | w->ww_w.nr, w->ww_w.nc, sizeof (char)); | |
2357b64e | 111 | if (w->ww_fmap == 0) |
b27a9cfb | 112 | goto bad; |
f2a77fe1 EW |
113 | for (i = w->ww_w.t; i < w->ww_w.b; i++) |
114 | for (j = w->ww_w.l; j < w->ww_w.r; j++) | |
2357b64e EW |
115 | w->ww_fmap[i][j] = 0; |
116 | } | |
b27a9cfb | 117 | |
bb05dfb5 | 118 | w->ww_buf = (union ww_char **) |
f2a77fe1 EW |
119 | wwalloc(w->ww_b.t, w->ww_b.l, |
120 | w->ww_b.nr, w->ww_b.nc, sizeof (union ww_char)); | |
bb05dfb5 EW |
121 | if (w->ww_buf == 0) |
122 | goto bad; | |
f2a77fe1 EW |
123 | for (i = w->ww_b.t; i < w->ww_b.b; i++) |
124 | for (j = w->ww_b.l; j < w->ww_b.r; j++) | |
bb05dfb5 EW |
125 | w->ww_buf[i][j].c_w = ' '; |
126 | ||
127 | w->ww_nvis = (short *)malloc((unsigned) w->ww_w.nr * sizeof (short)); | |
03e75950 EW |
128 | if (w->ww_nvis == 0) { |
129 | wwerrno = WWE_NOMEM; | |
138b737c | 130 | goto bad; |
03e75950 | 131 | } |
f2a77fe1 | 132 | w->ww_nvis -= w->ww_w.t; |
bb05dfb5 | 133 | nvis = m ? 0 : w->ww_w.nc; |
f2a77fe1 | 134 | for (i = w->ww_w.t; i < w->ww_w.b; i++) |
bb05dfb5 EW |
135 | w->ww_nvis[i] = nvis; |
136 | ||
137 | w->ww_state = WWS_INITIAL; | |
b27a9cfb | 138 | w->ww_oflags = flags; |
03f0d462 | 139 | return wwindex[w->ww_index] = w; |
138b737c | 140 | bad: |
4711df8b | 141 | if (w != 0) { |
bb05dfb5 | 142 | if (w->ww_win != 0) |
f2a77fe1 | 143 | wwfree(w->ww_win, w->ww_w.t); |
07f640ea | 144 | if (w->ww_fmap != 0) |
f2a77fe1 | 145 | wwfree(w->ww_fmap, w->ww_w.t); |
bb05dfb5 | 146 | if (w->ww_buf != 0) |
f2a77fe1 | 147 | wwfree((char **)w->ww_buf, w->ww_b.t); |
bb05dfb5 | 148 | if (w->ww_nvis != 0) |
f2a77fe1 | 149 | free((char *)(w->ww_nvis + w->ww_w.t)); |
8fa6d94c EW |
150 | if (w->ww_ob != 0) |
151 | free(w->ww_ob); | |
7ecf4dca EW |
152 | if (w->ww_pty >= 0) |
153 | (void) close(w->ww_pty); | |
154 | if (w->ww_socket >= 0) | |
155 | (void) close(w->ww_socket); | |
489d8a09 | 156 | free((char *)w); |
4711df8b | 157 | } |
138b737c EW |
158 | return 0; |
159 | } |