+/*
+ * Administrative Get Email Addresses
+ */
+void cmd_agea(char *cmdbuf)
+{
+ struct ctdluser usbuf;
+ char requested_user[128];
+ int i, num_e;
+ char e[512];
+
+ if (CtdlAccessCheck(ac_aide)) {
+ return;
+ }
+
+ extract_token(requested_user, cmdbuf, 0, '|', sizeof requested_user);
+ if (CtdlGetUser(&usbuf, requested_user) != 0) {
+ cprintf("%d No such user.\n", ERROR + NO_SUCH_USER);
+ return;
+ }
+ cprintf("%d internet email addresses for %s\n", LISTING_FOLLOWS, usbuf.fullname);
+ num_e = num_tokens(usbuf.emailaddrs, '|');
+ for (i=0; i<num_e; ++i) {
+ extract_token(e, usbuf.emailaddrs, i, '|', sizeof e);
+ cprintf("%s\n", e);
+ }
+ cprintf("000\n");
+}
+
+
+/*
+ * Administrative Set Email Addresses
+ */
+void cmd_asea(char *cmdbuf)
+{
+ struct ctdluser usbuf;
+ char requested_user[128];
+ char buf[SIZ];
+ char whodat[64];
+ char new_emailaddrs[512] = { 0 } ;
+
+ if (CtdlAccessCheck(ac_aide)) return;
+
+ extract_token(requested_user, cmdbuf, 0, '|', sizeof requested_user);
+ if (CtdlGetUser(&usbuf, requested_user) != 0) {
+ cprintf("%d No such user.\n", ERROR + NO_SUCH_USER);
+ return;
+ }
+
+ cprintf("%d Ok\n", SEND_LISTING);
+ while (client_getln(buf, sizeof buf) >= 0 && strcmp(buf, "000")) {
+ if ( // addresses must be:
+ (!IsEmptyStr(buf)) // non-empty
+ && ((strlen(new_emailaddrs) + strlen(buf) + 2) < sizeof(new_emailaddrs)) // fit in the remaining buffer
+ && (IsDirectory(buf, 0)) // in one of our own domains
+ && ( // not belong to someone else
+ (CtdlDirectoryLookup(whodat, buf, sizeof whodat) != 0)
+ || (!strcasecmp(whodat, requested_user))
+ )
+ ) {
+ if (!IsEmptyStr(new_emailaddrs)) {
+ strcat(new_emailaddrs, "|");
+ }
+ strcat(new_emailaddrs, buf);
+ }
+ }
+
+
+ CtdlSetEmailAddressesForUser(requested_user, new_emailaddrs);
+}
+
+