]>
Commit | Line | Data |
---|---|---|
cca09928 | 1 | #if (!defined(lint) && !defined(SABER)) |
2 | static char rcsid_module_c[] = "$Header$"; | |
3 | #endif lint | |
4 | ||
5 | /* This is the file main.c for the Moira Client, which allows a nieve | |
6 | * user to quickly and easily maintain most parts of the Moira database. | |
7 | * It Contains: The main driver for the Moira Client. | |
8 | * | |
9 | * Created: 4/12/88 | |
10 | * By: Chris D. Peterson | |
11 | * | |
12 | * $Source$ | |
13 | * $Author$ | |
14 | * $Header$ | |
15 | * | |
16 | * Copyright 1988 by the Massachusetts Institute of Technology. | |
17 | * | |
18 | * For further information on copyright and distribution | |
19 | * see the file mit-copyright.h | |
20 | */ | |
21 | ||
22 | #include <pwd.h> | |
23 | #include <signal.h> | |
24 | #include <stdio.h> | |
25 | #include <strings.h> | |
26 | #include <sys/types.h> | |
27 | #include <moira.h> | |
28 | #include <menu.h> | |
29 | #include <krb.h> | |
30 | ||
31 | ||
32 | #include "mit-copyright.h" | |
33 | #include "defs.h" | |
34 | #include "f_defs.h" | |
35 | #include "globals.h" | |
36 | ||
37 | char * whoami; /* used by menu.c ugh!!! */ | |
38 | char * moira_server; | |
facd6784 | 39 | int interrupt = 0; |
cca09928 | 40 | int NewListHelp(); |
41 | ||
42 | /* | |
43 | * List Information Menu | |
44 | */ | |
45 | ||
46 | Menu list_info_menu = { | |
47 | NULLFUNC, | |
48 | NULLFUNC, | |
49 | "List Information Menu", | |
ebce84fa | 50 | 3, |
cca09928 | 51 | { |
52 | SIMPLEFUNC("member", "Show all lists to which a given member belongs", | |
53 | ListByMember), | |
54 | SIMPLEFUNC("admin", | |
55 | "Show all items which a given member can administer", | |
56 | ListByAdministrator), | |
57 | SIMPLEFUNC("public", "Show all public mailing lists", | |
58 | ListAllPublicMailLists), | |
cca09928 | 59 | } |
60 | }; | |
61 | ||
62 | /* | |
63 | * List Member Menu | |
64 | */ | |
65 | ||
66 | Menu list_member_menu = { | |
67 | ListmaintMemberMenuEntry, | |
68 | ListmaintMemberMenuExit, | |
69 | NULL, | |
70 | 4, | |
71 | { | |
72 | SIMPLEFUNC("add", "Add a member to this list", AddMember), | |
73 | SIMPLEFUNC("remove", "Remove a member from this list", DeleteMember), | |
74 | SIMPLEFUNC("show", "Show the members of this list", ListAllMembers), | |
75 | SIMPLEFUNC("verbose", "Toggle Verbosity of Delete", ToggleVerboseMode) | |
76 | } | |
77 | }; | |
78 | ||
79 | /* | |
80 | * List Menu | |
81 | */ | |
82 | ||
83 | Menu list_menu = { | |
84 | NULLFUNC, | |
85 | NULLFUNC, | |
86 | "List Menu", | |
87 | 6, | |
88 | { | |
89 | { ShowListInfo, NULLMENU, 2, { | |
90 | {"show", "Display information about a list"}, | |
91 | {"list name", "Name of list: "} | |
92 | } }, | |
93 | { UpdateList, NULLMENU, 2, { | |
94 | {"update", "Update characteristics of a list"}, | |
95 | {"list name", "Name of list: "} | |
96 | } }, | |
97 | SIMPLEFUNC("query_remove", | |
98 | "Interactively remove a member from all lists", | |
99 | InterRemoveItemFromLists), | |
100 | { NULLFUNC, &list_member_menu, 2, { | |
101 | {"members", "Member Menu - Change/Show Members of a List."}, | |
102 | {"list name", "Name of list: "} | |
103 | } }, | |
104 | SUBMENU("lists", "Find Mailing Lists Menu", | |
105 | &list_info_menu), | |
106 | SIMPLEFUNC("help", "Print Help", NewListHelp) | |
107 | } | |
108 | }; | |
109 | ||
110 | /* | |
111 | * Post Office Box Menu | |
112 | */ | |
113 | ||
114 | Menu pobox_menu = { | |
115 | NULLFUNC, | |
116 | NULLFUNC, | |
117 | "Mail Forwarding Menu", | |
118 | 3, | |
119 | { | |
120 | {GetUserPOBox, NULLMENU, 2, { | |
121 | {"show", "Show a user's post office box"}, | |
122 | {"user name", "user name: "} | |
123 | } }, | |
124 | {SetUserPOBox, NULLMENU, 2, { | |
125 | {"set", "Set a user's post office box (mail forwarding)"}, | |
126 | {"user name", "user name: "} | |
127 | } }, | |
128 | {RemoveUserPOBox, NULLMENU, 2, { | |
129 | {"remove", "Remove a user's post office box"}, | |
130 | {"user name", "user name: "} | |
131 | } }, | |
132 | } | |
133 | }; | |
134 | ||
135 | /* | |
136 | * Miscellaneous Menu | |
137 | */ | |
138 | ||
139 | Menu misc_menu = { | |
140 | NULLFUNC, | |
141 | NULLFUNC, | |
142 | "Miscellaneous Menu", | |
143 | 2, | |
144 | { | |
145 | SIMPLEFUNC("statistics", "Show database statistics", TableStats), | |
146 | SIMPLEFUNC("clients", "Show active Moira clients", ShowClients), | |
147 | } | |
148 | }; | |
149 | ||
150 | ||
151 | Menu namespace_menu = { | |
152 | NULLFUNC, | |
153 | NULLFUNC, | |
154 | "Campus Namespace Database Manipulation", | |
155 | 4, | |
156 | { | |
157 | SUBMENU("mail","Mail Forwarding", &pobox_menu), | |
158 | SUBMENU("list","Mailing Lists", &list_menu), | |
159 | {ShowUserByLogin, NULLMENU, 2, { | |
160 | {"account", "Show user account information"}, | |
161 | {"login name", "Desired login name: "} | |
162 | } }, | |
163 | SUBMENU("misc", "Miscellaneous", &misc_menu) | |
164 | } | |
165 | }; | |
166 | ||
167 | ||
168 | #ifndef DEBUG | |
facd6784 | 169 | static void SignalHandler(), CatchInterrupt(); |
cca09928 | 170 | #endif DEBUG |
171 | ||
172 | static void ErrorExit(), Usage(); | |
173 | char *getlogin(); | |
174 | uid_t getuid(); | |
175 | struct passwd *getpwuid(); | |
176 | ||
177 | Bool use_menu = TRUE; /* whether or not we are using a menu. */ | |
178 | ||
179 | /* Function Name: main | |
180 | * Description: The main driver for the Moira Client. | |
181 | * Arguments: argc, argv - standard command line args. | |
182 | * Returns: doesn't return. | |
183 | */ | |
184 | ||
185 | void | |
186 | main(argc, argv) | |
187 | int argc; | |
188 | char ** argv; | |
189 | { | |
190 | int status; | |
191 | Menu *menu; | |
192 | char *motd, **arg; | |
193 | char pname[ANAME_SZ]; | |
194 | ||
195 | if ((program_name = rindex(argv[0], '/')) == NULL) | |
196 | program_name = argv[0]; | |
197 | else | |
198 | program_name++; | |
199 | program_name = Strsave(program_name); | |
200 | whoami = Strsave(program_name); /* used by menu.c, ugh !!! */ | |
201 | ||
202 | verbose = TRUE; | |
203 | arg = argv; | |
204 | moira_server = NULL; | |
205 | ||
206 | while (++arg - argv < argc) { | |
207 | if (**arg == '-') { | |
208 | if (!strcmp(*arg, "-nomenu")) | |
209 | use_menu = FALSE; | |
210 | else if (!strcmp(*arg, "-db")) | |
211 | if (arg - argv < argc - 1) { | |
212 | ++arg; | |
213 | moira_server = *arg; | |
214 | } else | |
215 | Usage(argv); | |
216 | else | |
217 | Usage(argv); | |
218 | } | |
219 | } | |
220 | ||
221 | if ( status = mr_connect(moira_server) ) | |
222 | ErrorExit("\nConnection to Moira server failed", status); | |
223 | ||
224 | /* do this now since calling mr_connect initialized the krb error table | |
225 | * for us. | |
226 | */ | |
227 | if ((status = tf_init(TKT_FILE, R_TKT_FIL)) || | |
228 | (status = tf_get_pname(pname))) { | |
229 | com_err(whoami, status, "cannot find your ticket file"); | |
230 | exit(1); | |
231 | } | |
232 | tf_close(); | |
233 | user = Strsave(pname); | |
234 | ||
235 | if ( status = mr_motd(&motd) ) | |
236 | ErrorExit("\nUnable to check server status", status); | |
237 | if (motd) { | |
238 | fprintf(stderr, "The Moira server is currently unavailable:\n%s\n", motd); | |
239 | mr_disconnect(); | |
240 | exit(1); | |
241 | } | |
242 | ||
243 | if ( status = mr_auth(program_name) ) { | |
244 | if (status == MR_USER_AUTH) { | |
245 | char buf[BUFSIZ]; | |
246 | com_err(program_name, status, "\nPress [RETURN] to continue"); | |
247 | gets(buf); | |
248 | } else | |
249 | ErrorExit("\nAuthorization failed -- please run kinit", status); | |
250 | } | |
251 | ||
252 | /* | |
253 | * These signals should not be set until just before we fire up the menu | |
254 | * system. | |
255 | */ | |
256 | ||
257 | #ifndef DEBUG | |
258 | (void) signal(SIGHUP, SignalHandler); | |
cca09928 | 259 | (void) signal(SIGQUIT, SignalHandler); |
facd6784 | 260 | if (use_menu) |
261 | (void) signal(SIGINT, SignalHandler); | |
262 | else | |
263 | (void) signal(SIGINT, CatchInterrupt); | |
cca09928 | 264 | #endif DEBUG |
265 | ||
266 | menu = &namespace_menu; | |
267 | ||
268 | if (use_menu) { /* Start menus that execute program */ | |
269 | Start_paging(); | |
270 | Start_menu(menu); | |
271 | Stop_paging(); | |
272 | } | |
273 | else /* Start program without menus. */ | |
274 | Start_no_menu(menu); | |
275 | ||
276 | mr_disconnect(); | |
277 | exit(0); | |
278 | } | |
279 | ||
280 | /* Function Name: ErrorExit | |
281 | * Description: This function does the error handling and exits. | |
282 | * Arguments: buf - the error message to print. | |
283 | * status - the error code. | |
284 | * Returns: doesn't return. | |
285 | */ | |
286 | ||
287 | static void | |
288 | ErrorExit(buf,status) | |
289 | int status; | |
290 | char * buf; | |
291 | { | |
292 | com_err(program_name, status, buf); | |
293 | mr_disconnect(); | |
294 | exit(1); | |
295 | } | |
296 | ||
297 | /* Function Name: usage | |
298 | * Description: Prints usage info and then exits. | |
299 | * Arguments: none | |
300 | * Returns: doesn't return. | |
301 | */ | |
302 | ||
303 | static void | |
304 | Usage() | |
305 | { | |
306 | fprintf(stderr, "Usage: %s [-nomenu]\n", program_name); | |
307 | exit(1); | |
308 | } | |
309 | ||
310 | #ifndef DEBUG | |
311 | /* Function Name: SignalHandler | |
312 | * Description: This function cleans up from a signal interrupt. | |
313 | * Arguments: none. | |
314 | * Returns: doesn't | |
315 | */ | |
316 | ||
317 | static void | |
318 | SignalHandler() | |
319 | { | |
320 | Put_message("Signal caught - exiting"); | |
321 | if (use_menu) | |
322 | Cleanup_menu(); | |
323 | mr_disconnect(); | |
324 | exit(1); | |
325 | } | |
facd6784 | 326 | |
327 | ||
328 | static void | |
329 | CatchInterrupt() | |
330 | { | |
331 | Put_message("Interrupt! Press RETURN to continue"); | |
332 | interrupt = 1; | |
333 | } | |
cca09928 | 334 | #endif DEBUG |
335 | ||
336 | ||
337 | /* Dummy routine to be able to link against the rest of the moira client */ | |
338 | ||
339 | DeleteUser() | |
340 | { | |
341 | return(DM_QUIT); | |
342 | }; | |
343 | ||
344 | ||
345 | int | |
346 | NewListHelp() | |
347 | { | |
348 | static char * message[] = { | |
349 | "A list can be a mailing list, an Athena group list, or both. Each", | |
350 | "list has an owner and members. The owner of a list may be the list", | |
351 | "itself, another list, or a user. The members of a list can be users", | |
352 | "(login names), other lists, or foreign address strings. You can use", | |
353 | "certain keys to do the following:", | |
354 | " Refresh the screen - Type ctrl-L.", | |
355 | " Escape from a function - Type ctrl-C.", | |
356 | NULL, | |
357 | }; | |
358 | ||
359 | return(PrintHelp(message)); | |
360 | } |