+/* $Header$
+ */
+
+#include <stdio.h>
+#include <moira.h>
+#include <moira_site.h>
+#include <sys/types.h>
+#include <netdb.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <Xm/Xm.h>
+#include "mmoira.h"
+
+
+/******* temporary ********/
+char *atot(s) char *s; { return s; }
+
+
+
+int DisplayCallback(argc, info, form)
+int argc;
+char **info;
+EntryForm *form;
+{
+ char buf[1024], name[128];
+ char *MOD_FORMAT = "Modified by %s at %s with %s\n";
+ int i;
+
+ switch (form->menu->operation) {
+ case MM_SHOW_USER:
+ sprintf(name, "%s, %s %s", info[U_LAST], info[U_FIRST], info[U_MIDDLE]);
+ sprintf(buf, "Login name: %-20s Full name: %s\n", info[U_NAME], name);
+ add_to_display(buf);
+ sprintf(buf, "User id: %-23s Login shell %-10s Class: %s\n",
+ info[U_UID], info[U_SHELL], info[U_CLASS]);
+ add_to_display(buf);
+ sprintf(buf, "Account is: %-20s Encrypted MIT ID number: %s\n",
+ user_states[atoi(info[U_STATE])], info[U_MITID]);
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT,
+ info[U_MODBY], info[U_MODTIME],info[U_MODWITH]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_FINGER:
+ sprintf(buf, "Nickname: %-29s Department: %s\n", info[F_NICKNAME],
+ info[F_MIT_DEPT]);
+ add_to_display(buf);
+ sprintf(buf, "finger %s =>\n", info[F_NAME]);
+ add_to_display(buf);
+ sprintf(buf, "Login name: %-27s In real life: %s\n", info[F_NAME],
+ info[F_FULLNAME]);
+ add_to_display(buf);
+ sprintf(buf, "Home: %-33s Home phone: %s\n", info[F_HOME_ADDR],
+ info[F_HOME_PHONE]);
+ add_to_display(buf);
+ sprintf(buf, "Office: %-31s Office phone: %s\n", info[F_OFFICE_ADDR],
+ info[F_OFFICE_PHONE]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_POBOX:
+ sprintf(buf, "Address: %-10s Box: %-35s Type: %s\n", info[PO_NAME],
+ info[PO_BOX], info[PO_TYPE]);
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT, info[4], info[3], info[5]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_KRBMAP:
+ sprintf(buf, "User: %-9s Principal: %s\n",
+ info[KMAP_USER], info[KMAP_PRINCIPAL]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_FILSYS:
+ case MM_SHOW_FSGROUP:
+ if (!strcmp(info[FS_TYPE], "FSGROUP")) {
+ int stat;
+/* struct qelem *elem = NULL; */
+
+ sprintf(buf,"%20s Filesystem Group: %s\n", " ", info[FS_NAME]);
+ add_to_display(buf);
+
+ sprintf(buf,"Comments: %s\n",info[FS_COMMENTS]);
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT, info[FS_MODBY], info[FS_MODTIME],
+ info[FS_MODWITH]);
+ add_to_display(buf);
+ add_to_display("Containing the filesystems (in order):");
+/*
+ if ((stat = do_moira_query("get_fsgroup_members", 1, &info[FS_NAME],
+ StoreInfo, (char *)&elem)) != 0) {
+ if (stat == MR_NO_MATCH)
+ add_to_display(" [no members]");
+ else
+ com_err(program_name, stat, NULL);
+ } else {
+ fsgCount = 1;
+ Loop(QueueTop(elem), (void *) PrintFSGMembers);
+ FreeQueue(elem);
+ }
+*/
+ } else {
+ sprintf(buf,"%20s Filesystem: %s\n", " ", info[FS_NAME]);
+ add_to_display(buf);
+ sprintf(buf,"Type: %-40s Machine: %-15s\n",
+ info[FS_TYPE], info[FS_MACHINE]);
+ add_to_display(buf);
+ sprintf(buf,"Default Access: %-2s Packname: %-17s Mountpoint %s \n",
+ info[FS_ACCESS], info[FS_PACK], info[FS_M_POINT]);
+ add_to_display(buf);
+ sprintf(buf,"Comments: %s\n",info[FS_COMMENTS]);
+ add_to_display(buf);
+ sprintf(buf, "User Ownership: %-30s Group Ownership: %s\n",
+ info[FS_OWNER], info[FS_OWNERS]);
+ add_to_display(buf);
+ sprintf(buf, "Auto Create: %-34s Locker Type: %s\n",
+ atoi(info[FS_CREATE]) ? "ON" : "OFF",
+ info[FS_L_TYPE]);
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT, info[FS_MODBY], info[FS_MODTIME],
+ info[FS_MODWITH]);
+ add_to_display(buf);
+ }
+ break;
+ case MM_SHOW_NFS:
+ sprintf(buf,"Machine: %-20s Directory: %-15s Device: %s\n",
+ info[NFS_NAME], info[NFS_DIR], info[NFS_DEVICE]);
+ add_to_display(buf);
+
+ sprintf(buf, "Status: %s\n",
+ format_filesys_type(atoi(info[NFS_STATUS])));
+ add_to_display(buf);
+ sprintf(buf, "Quota Allocated: %-17s Size: %s\n",
+ info[NFS_ALLOC], info[NFS_SIZE]);
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT, info[NFS_MODBY], info[NFS_MODTIME],
+ info[NFS_MODWITH]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_QUOTA:
+ if (!strcmp(info[Q_TYPE], "ANY"))
+ sprintf(buf, "Filesystem: %s\n", info[Q_FILESYS]);
+ else
+ sprintf(buf, "Filesystem: %-45s %s %s\n", info[Q_FILESYS],
+ info[Q_TYPE], info[Q_NAME]);
+ add_to_display(buf);
+ sprintf(buf, "Machine: %-20s Directory: %-15s\n",
+ info[Q_MACHINE], info[Q_DIRECTORY]);
+ add_to_display(buf);
+ sprintf(buf, "Quota: %s\n", info[Q_QUOTA]);
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT, info[Q_MODBY], info[Q_MODTIME], info[Q_MODWITH]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_LIST:
+ (void) sprintf(buf, "%20sList: %s\n", "", info[L_NAME]);
+ add_to_display(buf);
+ (void) sprintf(buf, "Description: %s\n", info[L_DESC]);
+ add_to_display(buf);
+ if ( atoi(info[L_MAILLIST]))
+ add_to_display("This list is a mailing list.\n");
+ else
+ add_to_display("This list is NOT a mailing list.\n");
+ if (atoi(info[L_GROUP])) {
+ (void) sprintf(buf,"This list is a Group and its ID number is %s\n",
+ info[L_GID]);
+ add_to_display(buf);
+ } else
+ add_to_display("This list is NOT a Group.\n");
+ if (strcmp(info[L_ACE_TYPE],"NONE") == 0)
+ add_to_display("This list has no Administrator, how strange?!\n");
+ else {
+ sprintf(buf, "The Administrator of this list is the %s: %s\n",
+ info[L_ACE_TYPE], info[L_ACE_NAME]);
+ add_to_display(buf);
+ }
+ (void) sprintf(buf, "This list is: %s, %s, and %s\n",
+ atoi(info[L_ACTIVE]) ? "active" : "inactive",
+ atoi(info[L_PUBLIC]) ? "public" : "private",
+ atoi(info[L_HIDDEN]) ? "hidden" : "visible");
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT, info[L_MODBY], info[L_MODTIME], info[L_MODWITH]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_MACH:
+ sprintf(buf, "Machine: %-30s Type: %s\n", info[M_NAME], info[M_TYPE]);
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT, info[M_MODBY], info[M_MODTIME], info[M_MODWITH]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_CLUSTER:
+ sprintf(buf, "Cluster: %s\n", info[C_NAME]);
+ add_to_display(buf);
+ sprintf(buf, "Description: %s\n", info[C_DESCRIPT]);
+ add_to_display(buf);
+ sprintf(buf, "Location: %s\n", info[C_LOCATION]);
+ add_to_display(buf);
+ sprintf(buf, MOD_FORMAT, info[C_MODBY], info[C_MODTIME], info[C_MODWITH]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_CLDATA:
+ sprintf(buf, "Cluster: %-20s Label: %-15s Data: %s\n",
+ info[CD_NAME], info[CD_LABEL], info[CD_DATA]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_MEMBERS:
+ if (argc == 2)
+ sprintf(buf, "%-9s %s\n", info[0], info[1]);
+ else
+ sprintf(buf, "%s\n", info[0]);
+ add_to_display(buf);
+ break;
+ case MM_STATS:
+ sprintf(buf, "Table: %-20s Modified: %s\n", info[0], info[5]);
+ add_to_display(buf);
+ sprintf(buf, " %-8D appends, %-8d updates, %-8d deletes\n",
+ info[2], info[3], info[4]);
+ add_to_display(buf);
+ break;
+ case MM_CLIENTS:
+ {
+ unsigned long host_address;
+ struct hostent *host_entry;
+
+ host_address = inet_addr(info[1]);
+ if (host_address != NULL) {
+ host_entry = gethostbyaddr((char *)&host_address, 4, AF_INET);
+ if (host_entry != NULL) {
+ free(info[1]);
+ info[1] = strsave(host_entry->h_name);
+ }
+ }
+ }
+ sprintf(buf, "Principal %s on %s (%s)\n", info[0], info[1], info[2]);
+ add_to_display(buf);
+ sprintf(buf, " Connected at %s, client %s\n", info[3], info[4]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_VALUE:
+ sprintf(buf, "Variable: %-20s Value: %s\n", stringval(form, 0),
+ info[0]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_ALIAS:
+ sprintf(buf, "Alias: %-20s Type: %-8s Value: %s\n",
+ info[0], info[1], info[2]);
+ add_to_display(buf);
+ break;
+ case MM_SHOW_HOST:
+ sprintf(buf, "%s:%s mod by %s on %s with %s\n", info[SH_MACHINE],
+ info[SH_SERVICE], info[SH_MODBY], info[SH_MODTIME],
+ info[SH_MODWITH]);
+ Put_message(buf);
+ if (atoi(info[SH_HOSTERROR]))
+ sprintf(name, "Error %d: %s", atoi(info[SH_HOSTERROR]),
+ info[SH_ERRMSG]);
+ else
+ strcpy(name, "No error");
+ sprintf(buf, " %s/%s/%s/%s/%s\n",
+ atoi(info[SH_ENABLE]) ? "Enabled" : "Disabled",
+ atoi(info[SH_SUCCESS]) ? "Success" : "Failure",
+ atoi(info[SH_INPROGRESS]) ? "InProgress" : "Idle",
+ atoi(info[SH_OVERRIDE]) ? "Override" : "Normal", name);
+ Put_message(buf);
+ Put_message(" Last Try Last Success Value1 Value2 Value3\n");
+ strcpy(name, atot(info[SH_LASTTRY]));
+ sprintf(buf, " %-20s %-20s %-9d %-9d %s\n", name,
+ atot(info[SH_LASTSUCCESS]), atoi(info[SH_VALUE1]),
+ atoi(info[SH_VALUE2]), info[SH_VALUE3]);
+ Put_message(buf);
+ break;
+ case MM_SHOW_DQUOTA:
+ sprintf(buf, "The default quota is %s Kbytes.\n", info[0]);
+ Put_message(buf);
+ break;
+ case MM_SHOW_DCM:
+ if (argc == 2)
+ sprintf(buf, "%s:%s\n", info[0], info[1]);
+ else
+ sprintf(buf, "%s\n", info[0]);
+ Put_message(buf);
+ break;
+ default:
+ for (i = 0; i < argc; i++) {
+ if (i != 0) add_to_display(", ");
+ add_to_display(info[i]);
+ }
+ add_to_display("\n");
+ }
+ return(MR_CONT);
+}
+
+
+/* Called with moira data that is to be modified. */
+
+int ModifyCallback(argc, argv, form)
+int argc;
+char **argv;
+EntryForm *form;
+{
+ EntryForm *f;
+ char *fn;
+ int count, i, offset;
+
+ count = -1;
+ offset = 0;
+ switch (form->menu->operation) {
+ case MM_MOD_USER:
+ fn = "mod_user";
+ count = U_MODTIME;
+ break;
+ case MM_MOD_FINGER:
+ fn = "mod_finger";
+ count = F_MODTIME - 1;
+ offset = 1;
+ break;
+ case MM_REGISTER:
+ if (form->extrastuff)
+ form->extrastuff = NULL;
+ else
+ form->extrastuff = strsave(argv[U_UID]);
+ return;
+ break;
+ case MM_MOD_LIST:
+ fn = "mod_list";
+ count = L_MODTIME;
+ break;
+ case MM_MOD_FILSYS:
+ fn = "mod_filsys";
+ count = FS_MODTIME;
+ break;
+ }
+
+ if (count > 0) {
+ f = GetAndClearForm(fn);
+ if (f == NULL) {
+ display_error("Unknown form in ModifyCallback!\n");
+ return;
+ }
+ f->extrastuff = form->extrastuff;
+ f->menu = form->menu;
+ for (i = 0; i < count; i++)
+ if (f->inputlines[i]->type == FT_BOOLEAN)
+ f->inputlines[i]->returnvalue.boolean =
+ strcmp(argv[i + offset], "0") ? 1 : 0;
+ else
+ StoreField(f, i, argv[i + offset]);
+ } else {
+ display_error("Unknown function in ModifyCallback!\n");
+ return;
+ }
+}
+
+
+
+/* callback when form is complete to process the data */
+
+MoiraFormComplete(dummy1, form)
+int dummy1;
+EntryForm *form;
+{
+ char *qy, *argv[32], buf[256];
+ int (*retfunc)(), argc, i;
+ EntryForm *f;
+
+ retfunc = DisplayCallback;
+ argc = -1;
+
+ for (i = 0; form->inputlines[i]; i++)
+ if (form->inputlines[i]->type == FT_BOOLEAN)
+ argv[i] = boolval(form, i) ? "1" : "0";
+ else
+ argv[i] = stringval(form, i);
+
+ switch (form->menu->operation) {
+ case MM_SHOW_USER:
+ if (*stringval(form, 0)) {
+ qy = "get_user_by_login";
+ argv[0] = stringval(form, 0);
+ argc = 1;
+ } else if (*stringval(form, 3)) {
+ qy = "get_user_by_uid";
+ argv[0] = stringval(form, 3);
+ argc = 1;
+ } else if (*stringval(form, 4)) {
+ qy = "get_user_by_class";
+ argv[0] = stringval(form, 4);
+ argc = 1;
+ } else if (*stringval(form, 1) == 0 &&
+ *stringval(form, 2) == 0) {
+ DisplayError("Must fill in at least one blank.");
+ return;
+ } else {
+ if (*stringval(form, 1) == 0)
+ StoreField(form, 1, "*");
+ if (*stringval(form, 2) == 0)
+ StoreField(form, 2, "*");
+ qy = "get_user_by_name";
+ argv[0] = stringval(form, 1);
+ argv[1] = stringval(form, 2);
+ argc = 2;
+ }
+ break;
+ case MM_ADD_USER:
+ qy = "add_user";
+ argv[U_STATE][1] = 0;
+ if (argv[U_MITID][0] == '"')
+ strcpy(argv[U_MITID], stringval(form, U_MITID) + 1,
+ strlen(stringval(form, U_MITID) - 2));
+ else
+ EncryptID(argv[U_MITID], argv[U_MITID], argv[U_FIRST], argv[U_LAST]);
+ argc = U_MODTIME;
+ break;
+ case MM_REGISTER:
+ if (*stringval(form, 2)) {
+ argv[0] = stringval(form, 2);
+ } else {
+ argv[0] = stringval(form, 0);
+ argv[1] = stringval(form, 1);
+ form->extrastuff = NULL;
+ i = MoiraQuery("get_user_by_name", 2, argv,
+ ModifyCallback, (char *)form);
+ if (i) {
+ com_err(program_name, i, "looking up user by name");
+ return;
+ }
+ if (form->extrastuff == NULL) {
+ display_error("Ambiguous user specification");
+ return;
+ }
+ argv[0] = (char *)form->extrastuff;
+ }
+ qy = "register_user";
+ argv[1] = stringval(form, 3);
+ argv[2] = "1";
+ argc = 3;
+ break;
+ case MM_MOD_USER:
+ if (!strcmp(form->formname, "mod_user")) {
+ qy = "update_user";
+ for (i = 0; i < U_MODTIME; i++)
+ argv[i + 1] = stringval(form, i);
+ argv[0] = form->extrastuff;
+ argv[U_STATE + 1][1] = 0;
+ if (argv[U_MITID + 1][0] == '"') {
+ strcpy(argv[U_MITID + 1], stringval(form, U_MITID) + 1);
+ stringval(form, U_MITID)[strlen(stringval(form, U_MITID))-1] = 0;
+ } else
+ EncryptID(argv[U_MITID + 1], argv[U_MITID + 1],
+ argv[U_FIRST + 1], argv[U_LAST + 1]);
+ argc = U_MODTIME + 1;
+ break;
+ }
+ qy = "get_user_by_login";
+ argv[0] = stringval(form, 0);
+ argc = 1;
+ form->extrastuff = (caddr_t) "mod_user";
+ retfunc = ModifyCallback;
+ break;
+ case MM_DEACTIVATE:
+ qy = "update_user_status";
+ argv[0] = stringval(form, 0);
+ argv[1] = "3";
+ argc = 2;
+ break;
+ case MM_EXPUNGE:
+ display_error("Expunge is not yet implemented");
+ return;
+ break;
+ case MM_SHOW_FINGER:
+ qy = "get_finger_by_login";
+ argc = 1;
+ break;
+ case MM_MOD_FINGER:
+ if (!strcmp(form->formname, "mod_finger")) {
+ qy = "update_finger_by_login";
+ for (i = 0; i < F_MODTIME - 1; i++)
+ argv[i + 1] = stringval(form, i);
+ argv[0] = form->extrastuff;
+ argc = F_MODTIME;
+ break;
+ }
+ qy = "get_finger_by_login";
+ argc = 1;
+ form->extrastuff = (caddr_t) "mod_finger";
+ retfunc = ModifyCallback;
+ break;
+ case MM_SHOW_KRBMAP:
+ qy = "get_krbmap";
+ if (!*stringval(form, 0))
+ argv[0] = "*";
+ if (!*stringval(form, 1))
+ argv[1] = "*";
+ argc = 2;
+ break;
+ case MM_ADD_KRBMAP:
+ qy = "add_krbmap";
+ argc = 2;
+ break;
+ case MM_DEL_KRBMAP:
+ qy = "delete_krbmap";
+ argc = 2;
+ break;
+ case MM_SHOW_POBOX:
+ qy = "get_pobox";
+ argc = 1;
+ break;
+ case MM_SET_POBOX:
+ qy = "set_pobox";
+ if (!strcmp(argv[1], "POP"))
+ argv[2] = stringval(form, 3);
+ argc = 3;
+ break;
+ case MM_RESET_POBOX:
+ qy = "set_pobox_pop";
+ argc = 1;
+ break;
+ case MM_DEL_POBOX:
+ qy = "set_pobox";
+ argv[0] = stringval(form, 0);
+ argv[1] = "NONE";
+ argv[2] = "";
+ argc = 3;
+ break;
+ case MM_SHOW_LIST:
+ qy = "get_list_info";
+ argc = 1;
+ break;
+ case MM_SHOW_ACE_USE:
+ qy = "get_ace_use";
+ if (boolval(form, 2)) {
+ sprintf(buf, "R%s", stringval(form, 0));
+ argv[0] = buf;
+ }
+ argc = 2;
+ break;
+ case MM_ADD_LIST:
+ qy = "add_list";
+ argc = L_MODTIME;
+ break;
+ case MM_MOD_LIST:
+ if (!strcmp(form->formname, "mod_list")) {
+ qy = "update_list";
+ for (i = 0; i < L_MODTIME; i++)
+ argv[i + 1] = stringval(form, i);
+ argv[0] = form->extrastuff;
+ argc = L_MODTIME + 1;
+ break;
+ }
+ qy = "get_list_info";
+ argc = 1;
+ form->extrastuff = (caddr_t) "mod_list";
+ retfunc = ModifyCallback;
+ break;
+ case MM_DEL_LIST:
+ qy = "delete_list";
+ argc = 1;
+ break;
+ case MM_SHOW_MEMBERS:
+ if (*stringval(form, 0)) {
+ qy = "get_members_of_list";
+ argc = 1;
+ } else {
+ qy = "get_lists_of_member";
+ argv[0] = stringval(form, 1);
+ if (boolval(form, 3)) {
+ sprintf(buf, "R%s", stringval(form, 1));
+ argv[0] = buf;
+ }
+ argv[1] = stringval(form, 2);
+ argc = 2;
+ }
+ break;
+ case MM_ADD_MEMBER:
+ qy = "add_member_to_list";
+ argc = 3;
+ break;
+ case MM_DEL_MEMBER:
+ qy = "delete_member_from_list";
+ argc = 3;
+ break;
+ case MM_DEL_ALL_MEMBER:
+ display_error("Not yet implemented.");
+ return;
+ break;
+ case MM_SHOW_FILSYS:
+ if (*stringval(form, 0)) {
+ qy = "get_filesys_by_label";
+ argv[0] = stringval(form, 0);
+ argc = 1;
+ } else if (*stringval(form, 1)) {
+ argv[0] = canonicalize_hostname(stringval(form, 1));
+ if (*stringval(form, 2)) {
+ qy = "get_filesys_by_nfsphys";
+ argv[1] = stringval(form, 2);
+ argc = 2;
+ } else {
+ qy = "get_filesys_by_machine";
+ argc = 1;
+ }
+ } else if (*stringval(form, 3)) {
+ qy = "get_filesys_by_group";
+ argv[0] = stringval(form, 3);
+ argc = 1;
+ }
+ break;
+ case MM_ADD_FILSYS:
+ qy = "add_filesys";
+ argv[FS_MACHINE] = canonicalize_hostname(stringval(form, FS_MACHINE));
+ if (!strcmp(stringval(form, FS_TYPE), "AFS") ||
+ !strcmp(stringval(form, FS_TYPE), "FSGROUP"))
+ argv[FS_MACHINE] = "\\[NONE\\]";
+ argc = FS_MODTIME;
+ break;
+ case MM_MOD_FILSYS:
+ if (!strcmp(form->formname, "mod_filsys")) {
+ qy = "update_filsys";
+ for (i = 0; i < FS_MODTIME; i++)
+ argv[i + 1] = stringval(form, i);
+ argv[0] = form->extrastuff;
+ argc = FS_MODTIME + 1;
+ break;
+ }
+ qy = "get_filesys_by_label";
+ argv[0] = stringval(form, 0);
+ argc = 1;
+ form->extrastuff = (caddr_t) "mod_filsys";
+ retfunc = ModifyCallback;
+ break;
+ }
+
+ if (argc == -1) {
+ display_error("Unknown function in form callback.\n");
+ return;
+ }
+ i = MoiraQuery(qy, argc, argv, retfunc, (char *)form);
+ if (i) {
+ com_err(program_name, i, "executing database query");
+ return;
+ }
+
+ f = NULL;
+ if (form->extrastuff && (f = GetForm((char *)(form->extrastuff)))) {
+ f->extrastuff = (caddr_t) strsave(stringval(form, 0));
+ f->menu = form->menu;
+ }
+
+ switch (form->menu->operation) {
+ case MM_MOD_USER:
+ if (f) {
+ qy = strsave(stringval(f, U_MITID));
+ sprintf(stringval(f, U_MITID), "\"%s\"", qy);
+ free(qy);
+ f->inputlines[U_STATE]->keywords = user_states;
+ StoreField(f, U_STATE, user_states[atoi(stringval(f, U_STATE))]);
+ GetKeywords(f, U_CLASS, "class");
+ } else
+ add_to_display("Done.\n");
+ break;
+ case MM_MOD_FINGER:
+ if (!f)
+ add_to_display("Done.\n");
+ break;
+ case MM_MOD_LIST:
+ if (f)
+ GetKeywords(f, L_ACE_TYPE, "ace_type");
+ else
+ add_to_display("Done.\n");
+ break;
+ case MM_MOD_FILSYS:
+ if (f) {
+ GetKeywords(f, FS_TYPE, "filesys");
+ sprintf(buf, "fs_access_%s", stringval(f, FS_TYPE));
+ GetKeywords(f, FS_ACCESS, buf);
+ GetKeywords(f, FS_L_TYPE, "lockertype");
+ if (!strcmp(stringval(f, FS_MACHINE), "[NONE]"))
+ StoreField(f, FS_MACHINE, "\\[NONE\\]");
+ } else
+ add_to_display("Done.\n");
+ break;
+ case MM_ADD_HOST:
+ case MM_DEL_HOST:
+ case MM_CLEAR_HOST:
+ case MM_RESET_HOST:
+ case MM_ADD_SERVICE:
+ case MM_DEL_SERVICE:
+ case MM_CLEAR_SERVICE:
+ case MM_RESET_SERVICE:
+ case MM_ENABLE_DCM:
+ case MM_TRIGGER_DCM:
+ case MM_ADD_ZEPHYR:
+ case MM_DEL_ZEPHYR:
+ case MM_ADD_PCAP:
+ case MM_DEL_PCAP:
+ case MM_ADD_CLDATA:
+ case MM_DEL_CLDATA:
+ case MM_ADD_MCMAP:
+ case MM_DEL_MCMAP:
+ case MM_ADD_CLUSTER:
+ case MM_DEL_CLUSTER:
+ case MM_ADD_MACH:
+ case MM_DEL_MACH:
+ case MM_ADD_MEMBER:
+ case MM_DEL_MEMBER:
+ case MM_DEL_ALL_MEMBER:
+ case MM_ADD_LIST:
+ case MM_DEL_LIST:
+ case MM_ADD_QUOTA:
+ case MM_DEL_QUOTA:
+ case MM_SET_DQUOTA:
+ case MM_ADD_NFS:
+ case MM_DEL_NFS:
+ case MM_ADD_FS_ALIAS:
+ case MM_DEL_FS_ALIAS:
+ case MM_ADD_FSGROUP:
+ case MM_MOV_FSGROUP:
+ case MM_DEL_FSGROUP:
+ case MM_ADD_FILSYS:
+ case MM_DEL_FILSYS:
+ case MM_ADD_KRBMAP:
+ case MM_DEL_KRBMAP:
+ case MM_SET_POBOX:
+ case MM_DEL_POBOX:
+ case MM_ADD_USER:
+ case MM_REGISTER:
+ case MM_DEACTIVATE:
+ case MM_EXPUNGE:
+ add_to_display("Done.\n");
+ }
+
+ if (f)
+ DisplayForm(f);
+}
+
+
+MoiraMenuComplete(m)
+MenuItem *m;
+{
+ char *qy, *argv[32];
+ int (*retfunc)(), argc, i;
+ EntryForm dummy;
+
+ retfunc = DisplayCallback;
+ argc = -1;
+ dummy.menu = m;
+
+ switch (m->operation) {
+ case MM_SHOW_MAILLIST:
+ qy = "qualified_get_lists";
+ argv[0] = argv[1] = argv[3] = "TRUE";
+ argv[2] = "FALSE";
+ argv[4] = "DONTCARE";
+ argc = 5;
+ break;
+ case MM_SHOW_DQUOTA:
+ qy = "get_value";
+ argv[0] = "def_quota";
+ argc = 1;
+ break;
+ case MM_SHOW_DCM:
+ Put_message("Services and Hosts with failed updates:");
+ argv[0] = argv[2] = "DONTCARE";
+ argv[1] = "TRUE";
+ i = MoiraQuery("qualified_get_server", 3, argv, retfunc, NULL);
+ if (i && i != MR_NO_MATCH)
+ com_err(program_name, i, "executing database query");
+ qy = "qualified_get_server_host";
+ argv[0] = "*";
+ argv[1] = argv[2] = argv[3] = argv[5] = "DONTCARE";
+ argv[4] = "TRUE";
+ argc = 6;
+ break;
+ case MM_STATS:
+ qy = "get_all_table_stats";
+ argc = 0;
+ break;
+ case MM_CLIENTS:
+ qy = "_list_users";
+ argc = 0;
+ break;
+ }
+ if (argc == -1) {
+ display_error("Unknown function in menu callback.\n");
+ return;
+ }
+ i = MoiraQuery(qy, argc, argv, retfunc, (char *)&dummy);
+ if (i)
+ com_err(program_name, i, "executing database query");
+}
+
+
+/******* temporary ********/
+DisplayError(msg) char *msg; { fprintf(stderr, "%s\n", msg); }
+Put_message(msg) char *msg; { fputs( msg, stderr); }
+add_to_display(msg) char *msg; { fputs(msg, stderr); }