|
0
|
1 /* m_seqnew.c - manage sequences */
|
|
|
2 #ifndef lint
|
|
|
3 static char ident[] = "@(#)$Id$";
|
|
|
4 #endif /* lint */
|
|
|
5
|
|
|
6 #include "../h/mh.h"
|
|
|
7 #include <ctype.h>
|
|
|
8 #include <stdio.h>
|
|
|
9
|
|
|
10 static int m_seqok();
|
|
|
11
|
|
|
12 int m_seqnew (mp, cp, public)
|
|
|
13 register struct msgs *mp;
|
|
|
14 register char *cp;
|
|
|
15 register int public;
|
|
|
16 {
|
|
|
17 int bits;
|
|
|
18 register int i,
|
|
|
19 j;
|
|
|
20
|
|
|
21 if (!m_seqok (cp))
|
|
|
22 return 0;
|
|
|
23
|
|
|
24 if (public == -1) /* XXX */
|
|
|
25 public = mp -> msgflags & READONLY ? 0 : 1;
|
|
|
26
|
|
|
27 bits = FFATTRSLOT;
|
|
|
28 for (i = 0; mp -> msgattrs[i]; i++)
|
|
|
29 if (strcmp (mp -> msgattrs[i], cp) == 0) {
|
|
|
30 for (j = mp -> lowmsg; j <= mp -> hghmsg; j++)
|
|
|
31 mp -> msgstats[j] &= ~(1 << (bits + i));
|
|
|
32 if (public)
|
|
|
33 mp -> attrstats &= ~(1 << (bits + i));
|
|
|
34 else
|
|
|
35 mp -> attrstats |= 1 << (bits + i);
|
|
|
36 mp -> msgflags |= SEQMOD;
|
|
|
37
|
|
|
38 return 1;
|
|
|
39 }
|
|
|
40
|
|
|
41 if (i >= NATTRS) {
|
|
|
42 advise (NULLCP, "only %d sequences allowed (no room for %s)!",
|
|
|
43 NATTRS, cp);
|
|
|
44 return 0;
|
|
|
45 }
|
|
|
46
|
|
|
47 mp -> msgattrs[i] = getcpy (cp);
|
|
|
48 for (j = mp -> lowmsg; j <= mp -> hghmsg; j++)
|
|
|
49 mp -> msgstats[j] &= ~(1 << (bits + i));
|
|
|
50 if (public)
|
|
|
51 mp -> attrstats &= ~(1 << (bits + i));
|
|
|
52 else
|
|
|
53 mp -> attrstats |= 1 << (bits + i);
|
|
|
54 mp -> msgflags |= SEQMOD;
|
|
|
55
|
|
|
56 mp -> msgattrs[++i] = NULL;
|
|
|
57
|
|
|
58 return 1;
|
|
|
59 }
|
|
|
60
|
|
|
61 /* */
|
|
|
62
|
|
|
63 int m_seqadd (mp, cp, j, public)
|
|
|
64 register struct msgs *mp;
|
|
|
65 register char *cp;
|
|
|
66 register int j,
|
|
|
67 public;
|
|
|
68 {
|
|
|
69 int bits;
|
|
|
70 register int i,
|
|
|
71 k;
|
|
|
72
|
|
|
73 if (!m_seqok (cp))
|
|
|
74 return 0;
|
|
|
75
|
|
|
76 /* keep mp->curmsg & msgattrs["cur"] in sync - see m_seq() */
|
|
|
77 if (strcmp (current,cp) == 0)
|
|
|
78 mp->curmsg = j;
|
|
|
79
|
|
|
80 if (public == -1) /* XXX */
|
|
|
81 public = mp -> msgflags & READONLY ? 0 : 1;
|
|
|
82
|
|
|
83 bits = FFATTRSLOT;
|
|
|
84 for (i = 0; mp -> msgattrs[i]; i++)
|
|
|
85 if (strcmp (mp -> msgattrs[i], cp) == 0) {
|
|
|
86 mp -> msgstats[j] |= 1 << (bits + i);
|
|
|
87 if (public)
|
|
|
88 mp -> attrstats &= ~(1 << (bits + i));
|
|
|
89 else
|
|
|
90 mp -> attrstats |= 1 << (bits + i);
|
|
|
91 mp -> msgflags |= SEQMOD;
|
|
|
92
|
|
|
93 return 1;
|
|
|
94 }
|
|
|
95
|
|
|
96 if (i >= NATTRS) {
|
|
|
97 advise (NULLCP, "only %d sequences allowed (no room for %s)!",
|
|
|
98 NATTRS, cp);
|
|
|
99 return 0;
|
|
|
100 }
|
|
|
101
|
|
|
102 mp -> msgattrs[i] = getcpy (cp);
|
|
|
103 for (k = mp -> lowmsg; k <= mp -> hghmsg; k++)
|
|
|
104 mp -> msgstats[k] &= ~(1 << (bits + i));
|
|
|
105 mp -> msgstats[j] |= 1 << (bits + i);
|
|
|
106 if (public)
|
|
|
107 mp -> attrstats &= ~(1 << (bits + i));
|
|
|
108 else
|
|
|
109 mp -> attrstats |= 1 << (bits + i);
|
|
|
110 mp -> msgflags |= SEQMOD;
|
|
|
111
|
|
|
112 mp -> msgattrs[++i] = NULL;
|
|
|
113
|
|
|
114 return 1;
|
|
|
115 }
|
|
|
116
|
|
|
117 /* */
|
|
|
118
|
|
|
119 int m_seqdel (mp, cp, j)
|
|
|
120 register struct msgs *mp;
|
|
|
121 register char *cp;
|
|
|
122 register int j;
|
|
|
123 {
|
|
|
124 int bits;
|
|
|
125 register int i;
|
|
|
126
|
|
|
127 if (!m_seqok (cp))
|
|
|
128 return 0;
|
|
|
129
|
|
|
130 bits = FFATTRSLOT;
|
|
|
131 for (i = 0; mp -> msgattrs[i]; i++)
|
|
|
132 if (strcmp (mp -> msgattrs[i], cp) == 0) {
|
|
|
133 mp -> msgstats[j] &= ~(1 << (bits + i));
|
|
|
134 mp -> msgflags |= SEQMOD;
|
|
|
135
|
|
|
136 return 1;
|
|
|
137 }
|
|
|
138
|
|
|
139 advise (NULLCP, "no such sequence as %s", cp);
|
|
|
140 return 0;
|
|
|
141 }
|
|
|
142
|
|
|
143 /* */
|
|
|
144
|
|
|
145 static int m_seqok (cp)
|
|
|
146 register char *cp;
|
|
|
147 {
|
|
|
148 register char *pp;
|
|
|
149
|
|
|
150 if (cp == NULL || *cp == 0) {
|
|
|
151 advise (NULLCP, "empty sequence name");
|
|
|
152 return 0;
|
|
|
153 }
|
|
|
154
|
|
|
155 if (strcmp (cp, "new") == 0
|
|
|
156 #ifdef notdef
|
|
|
157 || strcmp (cp, "cur") == 0
|
|
|
158 #endif /* notdef */
|
|
|
159 || strcmp (cp, "all") == 0
|
|
|
160 || strcmp (cp, "first") == 0
|
|
|
161 || strcmp (cp, "last") == 0
|
|
|
162 || strcmp (cp, "prev") == 0
|
|
|
163 || strcmp (cp, "next") == 0) {
|
|
|
164 advise (NULLCP, "illegal sequence name: %s", cp);
|
|
|
165 return 0;
|
|
|
166 }
|
|
|
167
|
|
|
168 if (!isalpha (*cp)) {
|
|
|
169 advise (NULLCP, "illegal sequence name: %s", cp);
|
|
|
170 return 0;
|
|
|
171 }
|
|
|
172 for (pp = cp + 1; *pp; pp++)
|
|
|
173 if (!isalnum (*pp)) {
|
|
|
174 advise (NULLCP, "illegal sequence name: %s", cp);
|
|
|
175 return 0;
|
|
|
176 }
|
|
|
177 if (pp > cp + NAMESZ) {
|
|
|
178 advise (NULLCP, "illegal sequence name: %s", cp);
|
|
|
179 return 0;
|
|
|
180 }
|
|
|
181
|
|
|
182 return 1;
|
|
|
183 }
|
