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>
15 #include <moira_site.h>
17 #include <afs/param.h>
18 #include <afs/cellconfig.h>
19 #include <afs/venus.h>
20 #include <afs/ptclient.h>
21 #include <afs/pterror.h>
23 #define file_exists(file) (access((file), F_OK) == 0)
26 char *cellname = "ATHENA.MIT.EDU";
32 int beforec, afterc, i;
33 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];
49 sprintf(buf, "%s (", table);
50 for (i = 0; i < beforec; i++) {
53 strcat(buf, before[i]);
56 for (i = 0; i < afterc; i++) {
59 strcat(buf, after[i]);
62 write(1,buf,strlen(buf));
65 initialize_sms_error_table();
66 initialize_krb_error_table();
68 if (!strcmp(table, "users")) {
69 do_user(before, beforec, after, afterc);
70 } else if (!strcmp(table, "list")) {
71 do_list(before, beforec, after, afterc);
72 } else if (!strcmp(table, "members")) {
73 do_member(before, beforec, after, afterc);
74 } else if (!strcmp(table, "filesys")) {
75 do_filesys(before, beforec, after, afterc);
76 } else if (!strcmp(table, "quota")) {
77 do_quota(before, beforec, after, afterc);
86 int success = 0, tries = 0;
88 while (success == 0 && tries < 1) {
91 com_err(whoami, 0, "Executing command: %s", cmd);
96 critical_alert("incremental", "failed command: %s", cmd);
100 do_user(before, beforec, after, afterc)
106 int astate, bstate, auid, buid, code;
108 auid = buid = astate = bstate = 0;
109 if (afterc > U_STATE) astate = atoi(after[U_STATE]);
110 if (beforec > U_STATE) bstate = atoi(before[U_STATE]);
111 if (afterc > U_UID) auid = atoi(after[U_UID]);
112 if (beforec > U_UID) buid = atoi(before[U_UID]);
114 /* We consider "half-registered" users to be active */
115 if (astate == 2) astate = 1;
116 if (bstate == 2) bstate = 1;
118 if (astate != 1 && bstate != 1) /* inactive user */
121 if (astate == bstate && auid == buid &&
122 !strcmp(before[U_NAME], after[U_NAME]))
123 /* No AFS related attributes have changed */
126 code=pr_Initialize(1, AFSCONF_CLIENTNAME, 0);
128 critical_alert("incremental", "Couldn't initialize libprot: %s",
129 error_message(code));
133 if (astate == bstate) {
134 /* Only a modify has to be done */
135 code = pr_ChangeEntry(before[U_NAME], after[U_NAME], auid, "");
137 critical_alert("incremental",
138 "Couldn't change user %s (id %d) to %s (id %d): %s",
139 before[U_NAME], buid, after[U_NAME], auid,
140 error_message(code));
145 code = pr_DeleteByID(buid);
146 if (code && code != PRNOENT) {
147 critical_alert("incremental",
148 "Couldn't delete user %s (id %d): %s",
149 before[U_NAME], buid, error_message(code));
154 code = pr_CreateUser(after[U_NAME], &auid);
156 critical_alert("incremental",
157 "Couldn't create user %s (id %d): %s",
158 after[U_NAME], auid, error_message(code));
166 do_list(before, beforec, after, afterc)
175 char g1[PR_MAXNAMELEN], g2[PR_MAXNAMELEN];
179 if (beforec > L_GID && atoi(before[L_ACTIVE]) && atoi(before[L_GROUP]))
180 bgid = atoi(before[L_GID]);
181 if (afterc > L_GID && atoi(after[L_ACTIVE]) && atoi(after[L_GROUP]))
182 agid = atoi(after[L_GID]);
184 if (agid == 0 && bgid == 0) /* Not active groups */
186 if (agid == bgid && !strcmp(after[L_NAME], before[L_NAME]))
187 return; /* No change */
189 code=pr_Initialize(1, AFSCONF_CLIENTNAME, 0);
191 critical_alert("incremental", "Couldn't initialize libprot: %s",
192 error_message(code));
197 /* Only a modify is required */
198 strcpy(g1, "system:");
199 strcpy(g2, "system:");
200 strcat(g1, before[L_NAME]);
201 strcat(g2, after[L_NAME]);
202 code = pr_ChangeEntry(g1, g2, -agid, "");
204 critical_alert("incremental",
205 "Couldn't change group %s (id %d) to %s (id %d): %s",
206 before[L_NAME], -bgid, after[L_NAME], -agid,
207 error_message(code));
212 code = pr_DeleteByID(-bgid);
213 if (code && code != PRNOENT) {
214 critical_alert("incremental",
215 "Couldn't delete group %s (id %d): %s",
216 before[L_NAME], -bgid, error_message(code));
221 strcpy(g1, "system:");
222 strcat(g1, after[L_NAME]);
223 strcpy(g2, "system:administrators");
225 code = pr_CreateGroup(g1, g2, &id);
227 critical_alert("incremental",
228 "Couldn't create group %s (id %d): %s",
229 after[L_NAME], id, error_message(code));
233 /* We need to make sure the group is properly populated */
234 if (beforec < L_ACTIVE || atoi(before[L_ACTIVE]) == 0) return;
236 gethostname(hostname, sizeof(hostname));
237 code = mr_connect(hostname);
238 if (!code) code = mr_auth("afs.incr");
240 critical_alert("incremental",
241 "Error contacting Moira server to resolve %s: %s",
242 after[L_NAME], error_message(code));
246 av[1] = after[L_NAME];
247 get_members(2, av, after[L_NAME]);
255 do_member(before, beforec, after, afterc)
264 if ((beforec < 4 || !atoi(before[LM_END])) &&
265 (afterc < 4 || !atoi(after[LM_END])))
268 code=pr_Initialize(1, AFSCONF_CLIENTNAME, 0);
270 critical_alert("incremental", "Couldn't initialize libprot: %s",
271 error_message(code));
276 edit_group(1, after[LM_LIST], after[LM_TYPE], after[LM_MEMBER]);
278 edit_group(0, after[LM_LIST], after[LM_TYPE], after[LM_MEMBER]);
282 get_members(ac, av, group)
289 if (strcmp(av[0], "LIST")) {
290 sleep(1); /* give the ptserver room */
291 edit_group(1, group, av[0], av[1]);
293 code = mr_query("get_members_of_list", 1, &av[1], get_members, group);
295 critical_alert("incremental",
296 "Couldn't retrieve full membership of %s: %s",
297 group, error_message(code));
303 edit_group(op, group, type, member)
310 char buf[PR_MAXNAMELEN];
313 extern long pr_AddToGroup(), pr_RemoveUserFromGroup();
315 fn = op ? pr_AddToGroup : pr_RemoveUserFromGroup;
317 /* The following KERBEROS code allows for the use of entities
320 if (!strcmp(type, "KERBEROS")) {
321 p = index(member, '@');
322 if (p && !strcasecmp(p+1, cellname))
324 } else if (strcmp(type, "USER"))
325 return; /* invalid type */
327 strcpy(buf, "system:");
329 code = (*fn)(member, buf);
331 if (op==0 && code == PRNOENT) return;
332 if (op==1 && code == PRIDEXIST) return;
333 if (strcmp(type, "KERBEROS") || code != PRNOENT) {
334 critical_alert("incremental",
335 "Couldn't %s %s %s %s: %s",
336 op ? "add" : "remove", member,
337 op ? "to" : "from", buf,
338 error_message(code));
345 do_filesys(before, beforec, after, afterc)
353 if (beforec < FS_CREATE) {
354 if (afterc < FS_CREATE || atoi(after[FS_CREATE])==0 ||
355 strcmp(after[FS_TYPE], "AFS"))
358 /* new locker creation */
359 sprintf(cmd, "%s/perl -I%s %s/afs_create.pl %s %s %s %s %s %s",
360 BIN_DIR, BIN_DIR, BIN_DIR,
361 after[FS_NAME], after[FS_L_TYPE], after[FS_MACHINE],
362 after[FS_PACK], after[FS_OWNER], after[FS_OWNERS]);
367 /* What do we do? When do we use FS_CREATE?
369 * TYPE change: AFS->ERR, ERR->AFS: rename/unmount/remount
370 * LOCKERTYPE change: rename/remount
371 * PACK change: remount
372 * LABEL change: rename/remount
373 * Deletion: rename/unmount
378 do_quota(before, beforec, after, afterc)
386 if (afterc < Q_DIRECTORY || strcmp("ANY", after[Q_TYPE]) ||
387 strncmp("/afs/", after[Q_DIRECTORY], 5))
390 sprintf(cmd, "%s/perl -I%s %s/afs_quota.pl %s %s",
391 BIN_DIR, BIN_DIR, BIN_DIR,
392 after[Q_DIRECTORY], after[Q_QUOTA]);