3 * Do AFS incremental updates
5 * Copyright (C) 1989,1992 by the Massachusetts Institute of Technology
6 * for copying and distribution information, please see the file
10 #include <sys/types.h>
16 #include <moira_site.h>
18 #include <afs/param.h>
19 #include <afs/cellconfig.h>
20 #include <afs/venus.h>
21 #include <afs/ptclient.h>
22 #include <afs/pterror.h>
24 #define STOP_FILE "/moira/afs/noafs"
26 #define file_exists(file) (access((file), F_OK) == 0)
34 int beforec, afterc, i;
35 char *table, **before, **after;
38 for (i = getdtablesize() - 1; i > 2; i--)
42 beforec = atoi(argv[2]);
44 afterc = atoi(argv[3]);
45 after = &argv[4 + beforec];
50 for (i = 0; i < beforec; i++) {
53 strcat(buf, before[i]);
56 for (i = 0; i < afterc; i++) {
59 strcat(buf, after[i]);
66 initialize_sms_error_table();
67 initialize_krb_error_table();
69 for (i=0; file_exists(STOP_FILE); i++) {
71 critical_alert("incremental",
72 "AFS incremental failed (%s exists): %s",
79 if (!strcmp(table, "users")) {
80 do_user(before, beforec, after, afterc);
81 } else if (!strcmp(table, "list")) {
82 do_list(before, beforec, after, afterc);
83 } else if (!strcmp(table, "members")) {
84 do_member(before, beforec, after, afterc);
85 } else if (!strcmp(table, "filesys")) {
86 do_filesys(before, beforec, after, afterc);
87 } else if (!strcmp(table, "quota")) {
88 do_quota(before, beforec, after, afterc);
97 int success = 0, tries = 0;
99 while (success == 0 && tries < 1) {
102 com_err(whoami, 0, "Executing command: %s", cmd);
103 if (system(cmd) == 0)
107 critical_alert("incremental", "failed command: %s", cmd);
111 add_user_lists(ac, av, user)
117 sleep(1); /* give the ptserver room */
118 edit_group(1, av[0], "USER", user);
123 do_user(before, beforec, after, afterc)
129 int astate, bstate, auid, buid, code;
133 auid = buid = astate = bstate = 0;
134 if (afterc > U_STATE) astate = atoi(after[U_STATE]);
135 if (beforec > U_STATE) bstate = atoi(before[U_STATE]);
136 if (afterc > U_UID) auid = atoi(after[U_UID]);
137 if (beforec > U_UID) buid = atoi(before[U_UID]);
139 /* We consider "half-registered" users to be active */
140 if (astate == 2) astate = 1;
141 if (bstate == 2) bstate = 1;
143 if (astate != 1 && bstate != 1) /* inactive user */
146 if (astate == bstate && auid == buid &&
147 !strcmp(before[U_NAME], after[U_NAME]))
148 /* No AFS related attributes have changed */
151 code=pr_Initialize(1, AFSCONF_CLIENTNAME, 0);
153 critical_alert("incremental", "Couldn't initialize libprot: %s",
154 error_message(code));
158 if (astate == bstate) {
159 /* Only a modify has to be done */
160 code = pr_ChangeEntry(before[U_NAME], after[U_NAME],
161 (auid==buid) ? 0 : auid, "");
163 critical_alert("incremental",
164 "Couldn't change user %s (id %d) to %s (id %d): %s",
165 before[U_NAME], buid, after[U_NAME], auid,
166 error_message(code));
171 code = pr_DeleteByID(buid);
172 if (code && code != PRNOENT) {
173 critical_alert("incremental",
174 "Couldn't delete user %s (id %d): %s",
175 before[U_NAME], buid, error_message(code));
180 code = pr_CreateUser(after[U_NAME], &auid);
182 critical_alert("incremental",
183 "Couldn't create user %s (id %d): %s",
184 after[U_NAME], auid, error_message(code));
187 /* Reactivating a user; get his group list */
188 gethostname(hostname, sizeof(hostname));
189 code = mr_connect(hostname);
190 if (!code) code = mr_auth("afs.incr");
192 critical_alert("incremental",
193 "Error contacting Moira server to retrieve grouplist of user %s: %s",
194 after[U_NAME], error_message(code));
198 av[1] = after[U_NAME];
199 code = mr_query("get_lists_of_member", 2, av,
200 add_user_lists, after[U_NAME]);
202 critical_alert("incremental",
203 "Couldn't retrieve membership of user %s: %s",
204 after[U_NAME], error_message(code));
213 do_list(before, beforec, after, afterc)
219 register int agid, bgid;
223 char g1[PR_MAXNAMELEN], g2[PR_MAXNAMELEN];
227 if (beforec > L_GID && atoi(before[L_ACTIVE]) && atoi(before[L_GROUP])) {
228 bgid = atoi(before[L_GID]);
229 bhide = atoi(before[L_HIDDEN]);
231 if (afterc > L_GID && atoi(after[L_ACTIVE]) && atoi(after[L_GROUP])) {
232 agid = atoi(after[L_GID]);
233 ahide = atoi(after[L_HIDDEN]);
236 if (agid == 0 && bgid == 0) /* Not active groups */
239 code=pr_Initialize(1, AFSCONF_CLIENTNAME, 0);
241 critical_alert("incremental", "Couldn't initialize libprot: %s",
242 error_message(code));
247 if (strcmp(after[L_NAME], before[L_NAME])) {
248 /* Only a modify is required */
249 strcpy(g1, "system:");
250 strcpy(g2, "system:");
251 strcat(g1, before[L_NAME]);
252 strcat(g2, after[L_NAME]);
253 code = pr_ChangeEntry(g1, g2, -agid, "");
255 critical_alert("incremental",
256 "Couldn't change group %s (id %d) to %s (id %d): %s",
257 before[L_NAME], -bgid, after[L_NAME], -agid,
258 error_message(code));
261 if (ahide != bhide) {
262 code = pr_SetFieldsEntry
263 (-agid, PR_SF_ALLBITS,
264 (ahide ? PRP_STATUS_ANY : PRP_GROUP_DEFAULT) >> PRIVATE_SHIFT,
265 0 /*ngroups*/, 0 /*nusers*/);
267 critical_alert("incremental",
268 "Couldn't set flags of group %s: %s",
269 after[L_NAME], error_message(code));
275 code = pr_DeleteByID(-bgid);
276 if (code && code != PRNOENT) {
277 critical_alert("incremental",
278 "Couldn't delete group %s (id %d): %s",
279 before[L_NAME], -bgid, error_message(code));
284 strcpy(g1, "system:");
285 strcat(g1, after[L_NAME]);
286 strcpy(g2, "system:administrators");
288 code = pr_CreateGroup(g1, g2, &id);
290 critical_alert("incremental",
291 "Couldn't create group %s (id %d): %s",
292 after[L_NAME], id, error_message(code));
296 code = pr_SetFieldsEntry
297 (-agid, PR_SF_ALLBITS,
298 (ahide ? PRP_STATUS_ANY : PRP_GROUP_DEFAULT) >> PRIVATE_SHIFT,
299 0 /*ngroups*/, 0 /*nusers*/);
301 critical_alert("incremental",
302 "Couldn't set flags of group %s: %s",
303 after[L_NAME], error_message(code));
307 /* We need to make sure the group is properly populated */
308 if (beforec < L_ACTIVE || atoi(before[L_ACTIVE]) == 0) return;
310 gethostname(hostname, sizeof(hostname));
311 code = mr_connect(hostname);
312 if (!code) code = mr_auth("afs.incr");
314 critical_alert("incremental",
315 "Error contacting Moira server to resolve %s: %s",
316 after[L_NAME], error_message(code));
320 av[1] = after[L_NAME];
321 get_members(2, av, after[L_NAME]);
329 do_member(before, beforec, after, afterc)
338 if ((beforec < 4 || !atoi(before[LM_END])) &&
339 (afterc < 4 || !atoi(after[LM_END])))
342 code=pr_Initialize(1, AFSCONF_CLIENTNAME, 0);
344 critical_alert("incremental", "Couldn't initialize libprot: %s",
345 error_message(code));
350 edit_group(1, after[LM_LIST], after[LM_TYPE], after[LM_MEMBER]);
352 edit_group(0, before[LM_LIST], before[LM_TYPE], before[LM_MEMBER]);
356 get_members(ac, av, group)
363 if (strcmp(av[0], "LIST")) {
364 sleep(1); /* give the ptserver room */
365 edit_group(1, group, av[0], av[1]);
367 code = mr_query("get_end_members_of_list", 1, &av[1],
370 critical_alert("incremental",
371 "Couldn't retrieve full membership of %s: %s",
372 group, error_message(code));
378 edit_group(op, group, type, member)
385 char buf[PR_MAXNAMELEN];
388 static char local_realm[REALM_SZ+1] = "";
389 extern long pr_AddToGroup(), pr_RemoveUserFromGroup();
391 fn = op ? pr_AddToGroup : pr_RemoveUserFromGroup;
393 /* The following KERBEROS code allows for the use of entities
397 krb_get_lrealm(local_realm, 1);
398 if (!strcmp(type, "KERBEROS")) {
399 p = index(member, '@');
400 if (p && !strcasecmp(p+1, local_realm))
402 } else if (strcmp(type, "USER"))
403 return; /* invalid type */
405 strcpy(buf, "system:");
407 code = (*fn)(member, buf);
409 if (op==0 && code == PRNOENT) return;
410 if (op==1 && code == PRIDEXIST) return;
411 if (strcmp(type, "KERBEROS") || code != PRNOENT) {
412 critical_alert("incremental",
413 "Couldn't %s %s %s %s: %s",
414 op ? "add" : "remove", member,
415 op ? "to" : "from", buf,
416 error_message(code));
423 do_filesys(before, beforec, after, afterc)
431 if (beforec < FS_CREATE) {
432 if (afterc < FS_CREATE || atoi(after[FS_CREATE])==0 ||
433 strcmp(after[FS_TYPE], "AFS"))
436 /* new locker creation */
437 sprintf(cmd, "%s/perl -I%s %s/afs_create.pl %s %s %s %s %s %s",
438 BIN_DIR, BIN_DIR, BIN_DIR,
439 after[FS_NAME], after[FS_L_TYPE], after[FS_MACHINE],
440 after[FS_PACK], after[FS_OWNER], after[FS_OWNERS]);
445 /* What do we do? When do we use FS_CREATE?
447 * TYPE change: AFS->ERR, ERR->AFS: rename/unmount/remount
448 * LOCKERTYPE change: rename/remount
449 * PACK change: remount
450 * LABEL change: rename/remount
451 * Deletion: rename/unmount
453 if (afterc < FS_CREATE) {
454 if (!strcmp(before[FS_TYPE], "AFS"))
455 critical_alert("incremental",
456 "Could not delete AFS filesystem %s: Operation not supported\n",
461 if (!strcmp(after[FS_TYPE], "AFS")) {
462 if (strcmp(before[FS_TYPE], "AFS")) {
463 critical_alert("incremental",
464 "Cannot convert %s to an AFS filesystem: Operation not supported\n",
467 critical_alert("incremental",
468 "Cannot change attributes of AFS filesystem %s: Operation not supported\n",
476 do_quota(before, beforec, after, afterc)
484 if (afterc < Q_DIRECTORY || strcmp("ANY", after[Q_TYPE]) ||
485 strncmp("/afs/", after[Q_DIRECTORY], 5))
488 sprintf(cmd, "%s/perl -I%s %s/afs_quota.pl %s %s",
489 BIN_DIR, BIN_DIR, BIN_DIR,
490 after[Q_DIRECTORY], after[Q_QUOTA]);