]>
Commit | Line | Data |
---|---|---|
1 | /* $Id$ | |
2 | * | |
3 | * Zephyr ACL routines for the Moira client | |
4 | * | |
5 | * Copyright (C) 1990-1998 by the Massachusetts Institute of Technology. | |
6 | * For copying and distribution information, please see the file | |
7 | * <mit-copyright.h>. | |
8 | */ | |
9 | ||
10 | #include <mit-copyright.h> | |
11 | #include <moira.h> | |
12 | #include <moira_site.h> | |
13 | #include "defs.h" | |
14 | #include "f_defs.h" | |
15 | #include "globals.h" | |
16 | ||
17 | #include <stdio.h> | |
18 | #include <stdlib.h> | |
19 | #include <string.h> | |
20 | ||
21 | RCSID("$Header$"); | |
22 | ||
23 | void RealDeleteZephyr(char **info, Bool one_item); | |
24 | ||
25 | /* Set the default values for zephyr additions. */ | |
26 | ||
27 | static char **SetDefaults(char **info, char *name) | |
28 | { | |
29 | info[ZA_CLASS] = strdup(name); | |
30 | info[ZA_XMT_TYPE] = strdup("NONE"); | |
31 | info[ZA_SUB_TYPE] = strdup("NONE"); | |
32 | info[ZA_IWS_TYPE] = strdup("NONE"); | |
33 | info[ZA_IUI_TYPE] = strdup("NONE"); | |
34 | info[ZA_XMT_ID] = strdup(""); | |
35 | info[ZA_SUB_ID] = strdup(""); | |
36 | info[ZA_IWS_ID] = strdup(""); | |
37 | info[ZA_IUI_ID] = strdup(""); | |
38 | info[ZA_MODTIME] = info[ZA_MODBY] = info[ZA_MODWITH] = NULL; | |
39 | info[ZA_END] = NULL; | |
40 | return info; | |
41 | } | |
42 | ||
43 | ||
44 | /* Get info from database */ | |
45 | ||
46 | static struct mqelem *GetZephyrInfo(char *name) | |
47 | { | |
48 | int stat; | |
49 | struct mqelem *elem = NULL; | |
50 | ||
51 | if ((stat = do_mr_query("get_zephyr_class", 1, &name, StoreInfo, &elem))) | |
52 | { | |
53 | com_err(program_name, stat, " in GetZephyrInfo"); | |
54 | return NULL; | |
55 | } | |
56 | return QueueTop(elem); | |
57 | } | |
58 | ||
59 | ||
60 | /* Print zephyr acl info */ | |
61 | ||
62 | static char *PrintZephyrInfo(char **info) | |
63 | { | |
64 | char buf[BUFSIZ]; | |
65 | ||
66 | if (!info) | |
67 | { | |
68 | Put_message("PrintZephyrInfo called with null info!"); | |
69 | return NULL; | |
70 | } | |
71 | sprintf(buf, " Zephyr class: %s", info[ZA_CLASS]); | |
72 | Put_message(buf); | |
73 | sprintf(buf, "Transmit ACL: %s %s", info[ZA_XMT_TYPE], | |
74 | strcasecmp(info[ZA_XMT_TYPE], "NONE") ? info[ZA_XMT_ID] : ""); | |
75 | Put_message(buf); | |
76 | sprintf(buf, "Subscription ACL: %s %s", info[ZA_SUB_TYPE], | |
77 | strcasecmp(info[ZA_SUB_TYPE], "NONE") ? info[ZA_SUB_ID] : ""); | |
78 | Put_message(buf); | |
79 | sprintf(buf, "Instance Wildcard ACL: %s %s", info[ZA_IWS_TYPE], | |
80 | strcasecmp(info[ZA_IWS_TYPE], "NONE") ? info[ZA_IWS_ID] : ""); | |
81 | Put_message(buf); | |
82 | sprintf(buf, "Instance Indentity ACL: %s %s", info[ZA_IUI_TYPE], | |
83 | strcasecmp(info[ZA_IUI_TYPE], "NONE") ? info[ZA_IUI_ID] : ""); | |
84 | Put_message(buf); | |
85 | sprintf(buf, MOD_FORMAT, info[ZA_MODBY], info[ZA_MODTIME], info[ZA_MODWITH]); | |
86 | Put_message(buf); | |
87 | ||
88 | return info[ZA_CLASS]; | |
89 | } | |
90 | ||
91 | ||
92 | /* Get info from user. Expects info to already be filled in with defaults */ | |
93 | ||
94 | static char **AskZephyrInfo(char **info, Bool rename) | |
95 | { | |
96 | char buf[BUFSIZ], *newname; | |
97 | ||
98 | Put_message(""); | |
99 | sprintf(buf, "Zephyr class restrictions for %s.", info[ZA_CLASS]); | |
100 | Put_message(buf); | |
101 | Put_message(""); | |
102 | ||
103 | if (rename) | |
104 | { | |
105 | while (1) | |
106 | { | |
107 | newname = strdup(info[ZA_CLASS]); | |
108 | if (GetValueFromUser("The new name for this class", &newname) == | |
109 | SUB_ERROR) | |
110 | return NULL; | |
111 | if (ValidName(newname)) | |
112 | break; | |
113 | } | |
114 | } | |
115 | ||
116 | if (GetTypeFromUser("What kind of transmit restriction", "zace_type", | |
117 | &info[ZA_XMT_TYPE]) == SUB_ERROR) | |
118 | return NULL; | |
119 | if (strcasecmp(info[ZA_XMT_TYPE], "NONE") && | |
120 | strcasecmp(info[ZA_XMT_TYPE], "ALL")) | |
121 | { | |
122 | sprintf(buf, "Which %s: ", info[ZA_XMT_TYPE]); | |
123 | if (GetValueFromUser(buf, &info[ZA_XMT_ID]) == SUB_ERROR) | |
124 | return NULL; | |
125 | } | |
126 | if (GetTypeFromUser("What kind of subscription restriction", "zace_type", | |
127 | &info[ZA_SUB_TYPE]) == SUB_ERROR) | |
128 | return NULL; | |
129 | if (strcasecmp(info[ZA_SUB_TYPE], "NONE") && | |
130 | strcasecmp(info[ZA_SUB_TYPE], "ALL")) | |
131 | { | |
132 | sprintf(buf, "Which %s: ", info[ZA_SUB_TYPE]); | |
133 | if (GetValueFromUser(buf, &info[ZA_SUB_ID]) == SUB_ERROR) | |
134 | return NULL; | |
135 | } | |
136 | if (GetTypeFromUser("What kind of wildcard instance restriction", | |
137 | "zace_type", &info[ZA_IWS_TYPE]) == SUB_ERROR) | |
138 | return NULL; | |
139 | if (strcasecmp(info[ZA_IWS_TYPE], "NONE") && | |
140 | strcasecmp(info[ZA_IWS_TYPE], "ALL")) | |
141 | { | |
142 | sprintf(buf, "Which %s: ", info[ZA_IWS_TYPE]); | |
143 | if (GetValueFromUser(buf, &info[ZA_IWS_ID]) == SUB_ERROR) | |
144 | return NULL; | |
145 | } | |
146 | if (GetTypeFromUser("What kind of instance identity restriction", | |
147 | "zace_type", &info[ZA_IUI_TYPE]) == SUB_ERROR) | |
148 | return NULL; | |
149 | if (strcasecmp(info[ZA_IUI_TYPE], "NONE") && | |
150 | strcasecmp(info[ZA_IUI_TYPE], "ALL")) | |
151 | { | |
152 | sprintf(buf, "Which %s: ", info[ZA_IUI_TYPE]); | |
153 | if (GetValueFromUser(buf, &info[ZA_IUI_ID]) == SUB_ERROR) | |
154 | return NULL; | |
155 | } | |
156 | FreeAndClear(&info[ZA_MODTIME], TRUE); | |
157 | FreeAndClear(&info[ZA_MODBY], TRUE); | |
158 | FreeAndClear(&info[ZA_MODWITH], TRUE); | |
159 | ||
160 | if (rename) | |
161 | SlipInNewName(info, newname); | |
162 | return info; | |
163 | } | |
164 | ||
165 | ||
166 | /* Menu entry for get zephyr */ | |
167 | int GetZephyr(int argc, char **argv) | |
168 | { | |
169 | struct mqelem *top; | |
170 | ||
171 | top = GetZephyrInfo(argv[1]); | |
172 | Loop(top, (void (*)(char **)) PrintZephyrInfo); | |
173 | FreeQueue(top); | |
174 | return DM_NORMAL; | |
175 | } | |
176 | ||
177 | ||
178 | /* Does the real work of a deletion */ | |
179 | ||
180 | void RealDeleteZephyr(char **info, Bool one_item) | |
181 | { | |
182 | int stat; | |
183 | ||
184 | if ((stat = do_mr_query("delete_zephyr_class", 1, &info[ZA_CLASS], | |
185 | NULL, NULL))) | |
186 | com_err(program_name, stat, " zephyr class restriction not deleted."); | |
187 | else | |
188 | Put_message("Zephyr class restriction deleted."); | |
189 | } | |
190 | ||
191 | ||
192 | /* Delete a zephyr class given it's name */ | |
193 | ||
194 | int DeleteZephyr(int argc, char **argv) | |
195 | { | |
196 | struct mqelem *elem = GetZephyrInfo(argv[1]); | |
197 | QueryLoop(elem, PrintZephyrInfo, RealDeleteZephyr, | |
198 | "Delete Zephyr class restriction for class "); | |
199 | FreeQueue(elem); | |
200 | return DM_NORMAL; | |
201 | } | |
202 | ||
203 | ||
204 | /* Add a new zephyr class */ | |
205 | ||
206 | int AddZephyr(int argc, char **argv) | |
207 | { | |
208 | char *info[MAX_ARGS_SIZE], **args; | |
209 | int stat; | |
210 | ||
211 | if (!ValidName(argv[1])) | |
212 | return DM_NORMAL; | |
213 | ||
214 | if (!(stat = do_mr_query("get_zephyr_class", 1, argv + 1, NULL, NULL))) | |
215 | { | |
216 | Put_message ("A Zephyr class by that name already exists."); | |
217 | return DM_NORMAL; | |
218 | } | |
219 | else if (stat != MR_NO_MATCH) | |
220 | { | |
221 | com_err(program_name, stat, " in AddZehpyr"); | |
222 | return DM_NORMAL; | |
223 | } | |
224 | ||
225 | args = AskZephyrInfo(SetDefaults(info, argv[1]), FALSE); | |
226 | if (!args) | |
227 | { | |
228 | Put_message("Aborted."); | |
229 | return DM_NORMAL; | |
230 | } | |
231 | ||
232 | if ((stat = do_mr_query("add_zephyr_class", CountArgs(args), args, | |
233 | NULL, NULL))) | |
234 | com_err(program_name, stat, " in AddZephyr"); | |
235 | ||
236 | FreeInfo(info); | |
237 | return DM_NORMAL; | |
238 | } | |
239 | ||
240 | ||
241 | /* Does the work of an update */ | |
242 | ||
243 | static void RealUpdateZephyr(char **info, Bool junk) | |
244 | { | |
245 | int stat; | |
246 | char **args; | |
247 | ||
248 | if (!(args = AskZephyrInfo(info, TRUE))) | |
249 | { | |
250 | Put_message("Aborted."); | |
251 | return; | |
252 | } | |
253 | if ((stat = do_mr_query("update_zephyr_class", CountArgs(args), args, | |
254 | NULL, NULL))) | |
255 | { | |
256 | com_err(program_name, stat, " in UpdateZephyr."); | |
257 | Put_message("Zephyr class ** NOT ** Updated."); | |
258 | } | |
259 | else | |
260 | Put_message("Zephyr class successfully updated."); | |
261 | } | |
262 | ||
263 | ||
264 | /* Change zephyr info */ | |
265 | ||
266 | int ChngZephyr(int argc, char **argv) | |
267 | { | |
268 | struct mqelem *top; | |
269 | ||
270 | top = GetZephyrInfo(argv[1]); | |
271 | QueryLoop(top, NullPrint, RealUpdateZephyr, "Update class"); | |
272 | ||
273 | FreeQueue(top); | |
274 | return DM_NORMAL; | |
275 | } |