]> andersk Git - moira.git/blobdiff - clients/moira/attach.c
Change `SMS' to `Moira' where possible.
[moira.git] / clients / moira / attach.c
index 0947fd06307869cc6528010d6770f9f4a780fe21..5b9b10c25170435353725f837f3a0679f2f2de8c 100644 (file)
@@ -1,57 +1,85 @@
-#ifndef lint
+#if (!defined(lint) && !defined(SABER))
   static char rcsid_module_c[] = "$Header$";
-#endif lint
+#endif
 
-/*     This is the file attach.c for allmaint, the SMS client that allows
- *      a user to maintaint most important parts of the SMS database.
- *     It Contains: Functions for maintaining data used by Hesiod 
- *                   to map courses/projects/users to their file systems, 
- *                   and maintain filesys info. 
- *     
+/*     This is the file attach.c for the Moira Client, which allows users
+ *      to quickly and easily maintain most parts of the Moira database.
+ *     It Contains: Functions for maintaining data used by Hesiod
+ *                   to map courses/projects/users to their file systems,
+ *                   and maintain filesys info.
+ *
  *     Created:        5/4/88
  *     By:             Chris D. Peterson
- *      Based Upon:     attach.c 87/07/24 marcus
  *
  *      $Source$
  *      $Author$
  *      $Header$
  *     
- *     Copyright 1987, 1988 by the Massachusetts Institute of Technology.
+ *     Copyright 1988 by the Massachusetts Institute of Technology.
  *
- *     For further information on copyright and distribution 
+ *     For further information on copyright and distribution
  *     see the file mit-copyright.h
  */
 
-#include "mit-copyright.h"
-#include "allmaint.h"
-#include "globals.h"
-#include "infodefs.h"
-
 #include <stdio.h>
-#include <strings.h>
-#include <sms.h>
+#include <string.h>
+#include <moira.h>
+#include <moira_site.h>
 #include <menu.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <ctype.h>
+
+#include "mit-copyright.h"
+#include "defs.h"
+#include "f_defs.h"
+#include "globals.h"
 
 #define FS_ALIAS_TYPE "FILESYS"
 
-#define FS_NAME         0
-#define FS_TYPE         1
-#define FS_MACHINE      2
-#define FS_PACK         3
-#define FS_M_POINT      4
-#define FS_ACCESS       5
-#define FS_COMMENTS     6
-#define FS_OWNER        7
-#define FS_OWNERS       8
-#define FS_CREATE       9
-#define FS_L_TYPE       10
-#define FS_MODTIME      11
-#define FS_MODBY        12
-#define FS_MODWITH      13
-
-#define FS_LABEL        14
-/* FS_MACHINE already defined, this is okay, as there is no overlap. */
-#define FS_GROUP        15
+#define LABEL        0
+#define MACHINE      1
+#define GROUP        2
+#define ALIAS        3
+
+#define NO_MACHINE      ("[NONE]")
+
+#define DEFAULT_TYPE     ("AFS")
+#define DEFAULT_MACHINE  DEFAULT_NONE
+#define DEFAULT_PACK     DEFAULT_NONE
+#define DEFAULT_ACCESS   ("w")
+#define DEFAULT_COMMENTS DEFAULT_COMMENT
+#define DEFAULT_OWNER    (user)
+#define DEFAULT_OWNERS   (user)
+#define DEFAULT_CREATE   DEFAULT_YES
+#define DEFAULT_L_TYPE   ("PROJECT")
+#define DEFAULT_CELL    ("athena.mit.edu")
+
+/*     Function Name: SetDefaults
+ *     Description: sets the default values for filesystem additions.
+ *     Arguments: info - an array of char pointers to recieve defaults.
+ *     Returns: char ** (this array, now filled).
+ */
+
+static char **SetDefaults(char **info, char *name)
+{
+  char buf[BUFSIZ];
+
+  info[FS_NAME] =     Strsave(name);
+  info[FS_TYPE] =     Strsave(DEFAULT_TYPE);
+  info[FS_MACHINE] =  Strsave(DEFAULT_MACHINE);
+  info[FS_PACK] =     Strsave(DEFAULT_PACK);
+  sprintf(buf, "/mit/%s", name);
+  info[FS_M_POINT] =  Strsave(buf);
+  info[FS_ACCESS] =   Strsave(DEFAULT_ACCESS);
+  info[FS_COMMENTS] = Strsave(DEFAULT_COMMENTS);
+  info[FS_OWNER] =    Strsave(DEFAULT_OWNER);
+  info[FS_OWNERS] =   Strsave(DEFAULT_OWNERS);
+  info[FS_CREATE] =   Strsave(DEFAULT_CREATE);
+  info[FS_L_TYPE] =   Strsave(DEFAULT_L_TYPE);
+  info[FS_MODTIME] = info[FS_MODBY] = info[FS_MODWITH] = info[FS_END] = NULL;
+  return info;
+}
 
 /*     Function Name: GetFSInfo
  *     Description: Stores the info in a queue.
  *     Returns: a pointer to the first element in the queue.
  */
 
-struct qelem *
-GetFSInfo(type, name)
-int type;
-char *name;
+static struct qelem *GetFSInfo(int type, char *name)
 {
-    int stat;
-    struct qelem * elem = NULL;
-    char * args[2];
-
-    switch (type) {
-    case FS_LABEL:
-       if ( (stat = sms_query("get_filesys_by_label", 1, &name,
-                              StoreInfo, &elem)) != 0) {
-           com_err(whoami, stat, NULL);
-           return(NULL);
+  int stat;
+  struct qelem *elem = NULL;
+  char *args[5];
+
+  switch (type)
+    {
+    case LABEL:
+      if ((stat = do_mr_query("get_filesys_by_label", 1, &name,
+                             StoreInfo, (char *)&elem)))
+       {
+         com_err(program_name, stat, " in GetFSInfo");
+         return NULL;
        }
-       break;
-    case FS_MACHINE:
-       if ( (stat = sms_query("get_filesys_by_label", 1, &name,
-                              StoreInfo, &elem)) != 0) {
-           com_err(whoami, stat, NULL);
-           return(NULL);
+      break;
+    case MACHINE:
+      if ((stat = do_mr_query("get_filesys_by_machine", 1, &name,
+                             StoreInfo, (char *)&elem)))
+       {
+         com_err(program_name, stat, " in GetFSInfo");
+         return NULL;
        }
-       break;
-    case FS_GROUP:
-       if ( (stat = sms_query("get_filesys_by_label", 1, &name,
-                              StoreInfo, &elem)) != 0) {
-           com_err(whoami, stat, NULL);
-           return(NULL);
+      break;
+    case GROUP:
+      if ((stat = do_mr_query("get_filesys_by_group", 1, &name,
+                             StoreInfo, (char *)&elem)))
+       {
+         com_err(program_name, stat, " in GetFSInfo");
+         return NULL;
        }
-       break;
-    case FS_ALIAS:
-       args[0] = name;
-       args[1] = FS_ALIAS_TYPE;
-       if ( (stat = sms_query("get_alias", 2, args, StoreInfo, &elem)) != 0) {
-           com_err(whoami, stat, " in get_alias.");
-           return(NULL);
+      break;
+    case ALIAS:
+      args[ALIAS_NAME] = name;
+      args[ALIAS_TYPE] = FS_ALIAS_TYPE;
+      args[ALIAS_TRANS] = "*";
+      if ((stat = do_mr_query("get_alias", 3, args, StoreInfo,
+                             (char *) &elem)))
+       {
+         com_err(program_name, stat, " in get_alias.");
+         return NULL;
        }
     }
 
-    return(QueueTop(elem));
+  return QueueTop(elem);
 }
 
+/*     Function Name: PrintFSAlias
+ *     Description: Prints a filesystem alias
+ *     Arguments: info - an array contains the strings of info.
+ *     Returns: the name of the filesys - used be QueryLoop().
+ */
+
+static char *PrintFSAlias(char **info)
+{
+  char buf[BUFSIZ];
+
+  sprintf(buf, "Alias: %-25s Filesystem: %s", info[ALIAS_NAME],
+         info[ALIAS_TRANS]);
+  Put_message(buf);
+  return info[ALIAS_NAME];
+}
+
+static int fsgCount = 1;
+
+static char *PrintFSGMembers(char **info)
+{
+  char print_buf[BUFSIZ];
+
+  sprintf(print_buf, "  %d. Filesystem: %-32s (sort key: %s)",
+         fsgCount++, info[0], info[1]);
+  Put_message(print_buf);
+  return info[0];
+}
+
+
 /*     Function Name: PrintFSInfo
  *     Description: Prints the filesystem information.
  *     Arguments: info - a pointer to the filesystem information.
  *     Returns: none.
  */
 
-PrintFSInfo(info);
-char ** info;
+static char *PrintFSInfo(char **info)
 {
-    char print_buf[BUFSIZ];
-    sprintf(print_buf,"Information about filesystem: %s", info[FS_NAME]);
-    Put_message(print_buf);
-    sprintf(print_buf,"Type: %s\t\tMachine: %s\t\tPackname: %s",info[FS_TYPE],
-           info[FS_MACHINE], info[FS_PACK]);
-    Put_message(print_buf);
-    sprintf(print_buf,"Mountpoint %s\t\t Default Access: %s",info[FS_M_POINT],
-           info[FS_ACCESS]);
-    Put_message(print_buf);
-    sprintf(print_buf,"Comments; %s",info[FS_COMMENTS]);
-    Put_message(print_buf);
-    sprintf(print_buf, "User Ownership: %s,\t\tGroup Ownership:\t\t%s",
-           info[FS_OWNER], info[FS_OWNERS]);
-    Put_message(print_buf);
-    sprintf(print_buf, "Auto Create %s\t\tLocker Type: %s",info[FS_CREATE], 
-           info[FS_L_TYPE]);
-    Put_message(print_buf);
-    sprintf(print_buf, "Last Modified at %s, by %s with %s",info[FS_MODTIME],
-           info[FS_MODBY], info[FS_MODWITH]);
-    Put_message(print_buf);
+  char print_buf[BUFSIZ];
+
+  FORMFEED;
+
+  if (!strcmp(info[FS_TYPE], "FSGROUP") || !strcmp(info[FS_TYPE], "MUL"))
+    {
+      int stat;
+      struct qelem *elem = NULL;
+
+      if (!strcmp(info[FS_TYPE], "MUL"))
+       sprintf(print_buf, "%20s Multiple Filesystem: %s", " ", info[FS_NAME]);
+      else
+       sprintf(print_buf, "%20s Filesystem Group: %s", " ", info[FS_NAME]);
+      Put_message(print_buf);
+
+      sprintf(print_buf, "Comments: %s", info[FS_COMMENTS]);
+      Put_message(print_buf);
+      sprintf(print_buf, MOD_FORMAT, info[FS_MODBY], info[FS_MODTIME],
+             info[FS_MODWITH]);
+      Put_message(print_buf);
+      Put_message("Containing the filesystems (in order):");
+      if ((stat = do_mr_query("get_fsgroup_members", 1, &info[FS_NAME],
+                             StoreInfo, (char *)&elem)))
+       {
+         if (stat == MR_NO_MATCH)
+           Put_message("    [no members]");
+         else
+           com_err(program_name, stat, " in PrintFSInfo");
+       }
+      else
+       {
+         fsgCount = 1;
+         Loop(QueueTop(elem), PrintFSGMembers);
+         FreeQueue(elem);
+       }
+    }
+  else
+    {
+      sprintf(print_buf, "%20s Filesystem: %s", " ", info[FS_NAME]);
+      Put_message(print_buf);
+      sprintf(print_buf, "Type: %-40s Machine: %-15s",
+             info[FS_TYPE], info[FS_MACHINE]);
+      Put_message(print_buf);
+      sprintf(print_buf, "Default Access: %-2s Packname: %-17s Mountpoint %s ",
+             info[FS_ACCESS], info[FS_PACK], info[FS_M_POINT]);
+      Put_message(print_buf);
+      sprintf(print_buf, "Comments: %s", info[FS_COMMENTS]);
+      Put_message(print_buf);
+      sprintf(print_buf, "User Ownership: %-30s Group Ownership: %s",
+             info[FS_OWNER], info[FS_OWNERS]);
+      Put_message(print_buf);
+      sprintf(print_buf, "Update Fileserver: %-27s Locker Type: %s",
+             atoi(info[FS_CREATE]) ? "ON" : "OFF", info[FS_L_TYPE]);
+      Put_message(print_buf);
+      sprintf(print_buf, MOD_FORMAT, info[FS_MODBY], info[FS_MODTIME],
+             info[FS_MODWITH]);
+      Put_message(print_buf);
+    }
+  return info[FS_NAME];
 }
 
-/*     Function Name: PrintAllFSInfo
- *     Description: Prints all infomation about a filesystem, stored in
- *                   a queue.
- *     Arguments: elem - a pointer to the first elem in the queue.
- *     Returns: none.
- */
 
-void
-PrintAllFSInfo(elem)
-struct qelem * elem;
+char *canonicalize_cell(char *c)
 {
-/* 
- * Not nescessary, but makes it clear that we are not changing this value.
- */
-    struct qelem * local = elem;       
-                               
-    while(local != NULL) {
-       char ** info = (char **) local->q_date;
-       PrintFSInfo(info);
-       local = local->next;
-    }
+  struct stat stbuf;
+  char path[512];
+  int count;
+
+  sprintf(path, "/afs/%s", c);
+  if (lstat(path, &stbuf) || !stbuf.st_mode & S_IFLNK)
+    return c;
+  count = readlink(path, path, sizeof(path));
+  if (count < 1)
+    return c;
+  path[count] = 0;
+  free(c);
+  return strsave(path);
+}
+
+
+int GetAliasValue(int argc, char **argv, char **retval)
+{
+  *retval = strsave(argv[2]);
+  return MR_CONT;
 }
 
 /*     Function Name: AskFSInfo.
- *     Description: This function askes the user for information about a 
+ *     Description: This function askes the user for information about a
  *                   machine and saves it into a structure.
  *     Arguments: info - a pointer the the structure to put the
  *                             info into.
@@ -166,46 +267,181 @@ struct qelem * elem;
  *     Returns: none.
  */
 
-void
-AskFSInfo(info, flags);
-char ** info;
-Bool name;
+static char **AskFSInfo(char **info, Bool name)
 {
-    char * temp_buf, *newname;
-    char *ret_args[100];
-    int counter;
-
-    sprintf(temp_buf,"\nChanging Attributes of user %s.\n",info[NAME]);
-    Put_message(temp_buf);
+  char temp_buf[BUFSIZ], *newname, access_type[32];
+  int fsgroup = 0, newdefaults = 0;
+
+  Put_message("");
+  sprintf(temp_buf, "Changing Attributes of filesystem %s.", info[FS_NAME]);
+  Put_message(temp_buf);
+  Put_message("");
+
+  if (name)
+    {
+      newname = Strsave(info[FS_NAME]);
+      if (GetValueFromUser("The new name for this filesystem",
+                          &newname) == SUB_ERROR)
+       return NULL;
+    }
 
-    if (name) {
-       newname = Strsave(info[FS_NAME]);
-       GetValueFromUser("The new login name for this filesystem.",
-                        &newname);
+  strcpy(temp_buf, info[FS_TYPE]);
+  if (GetTypeFromUser("Filesystem's Type", "filesys", &info[FS_TYPE]) ==
+      SUB_ERROR)
+    return NULL;
+  if (!strcasecmp(info[FS_TYPE], "FSGROUP") ||
+      !strcasecmp(info[FS_TYPE], "MUL"))
+    fsgroup++;
+  if (strcasecmp(info[FS_TYPE], temp_buf))
+    newdefaults++;
+  if (fsgroup)
+    {
+      free(info[FS_MACHINE]);
+      info[FS_MACHINE] = Strsave(NO_MACHINE);
+    }
+  else
+    {
+      if (!strcasecmp(info[FS_TYPE], "AFS"))
+       {
+         if (!name || newdefaults)
+           {
+             free(info[FS_MACHINE]);
+             info[FS_MACHINE] = strsave(DEFAULT_CELL);
+           }
+         if (GetValueFromUser("Filesystem's Cell", &info[FS_MACHINE]) ==
+               SUB_ERROR)
+           return NULL;
+         info[FS_MACHINE] = canonicalize_cell(info[FS_MACHINE]);
+       }
+      else
+       {
+         if (GetValueFromUser("Filesystem's Machine", &info[FS_MACHINE]) ==
+             SUB_ERROR)
+           return NULL;
+         info[FS_MACHINE] = canonicalize_hostname(info[FS_MACHINE]);
+       }
+    }
+  if (!fsgroup)
+    {
+      if (!strcasecmp(info[FS_TYPE], "AFS"))
+       {
+         char *path, *args[3], *p;
+         int status, depth;
+         if (GetTypeFromUser("Filesystem's lockertype", "lockertype",
+                             &info[FS_L_TYPE]) == SUB_ERROR)
+           return NULL;
+         if (!name || newdefaults)
+           {
+             free(info[FS_PACK]);
+             lowercase(info[FS_MACHINE]);
+             sprintf(temp_buf, "%s:%s", info[FS_MACHINE], info[FS_L_TYPE]);
+             args[0] = temp_buf;
+             args[1] = "AFSPATH";
+             args[2] = "*";
+             path = "???";
+             status = do_mr_query("get_alias", 3, args, GetAliasValue, &path);
+             if (status == MR_SUCCESS)
+               {
+                 p = strchr(path, ':');
+                 if (p)
+                   {
+                     *p = '\0';
+                     depth = atoi(++p);
+                   }
+                 else
+                   depth = 0;
+                 sprintf(temp_buf, "/afs/%s/%s", info[FS_MACHINE], path);
+                 if (depth >= 0)
+                   {
+                     for (p = info[FS_NAME];
+                          *p && (p - info[FS_NAME]) < depth; p++)
+                       {
+                         if (islower(*p))
+                           {
+                             strcat(temp_buf, "/x");
+                             temp_buf[strlen(temp_buf) - 1] = *p;
+                           }
+                         else
+                           {
+                             sprintf(temp_buf, "/afs/%s/%s/other",
+                                     info[FS_MACHINE], path);
+                             break;
+                           }
+                       }
+                   }
+                 else if (depth == -1)
+                   {
+                     if (isdigit(info[FS_NAME][0]))
+                       {
+                         strcat(temp_buf, "/");
+                         depth = strlen(temp_buf);
+                         for (p = info[FS_NAME]; *p && isdigit(*p); p++)
+                           {
+                             temp_buf[depth++] = *p;
+                             temp_buf[depth] = 0;
+                           }
+                       }
+                     else
+                       strcat(temp_buf, "/other");
+                   }
+                 else
+                   {
+                       /* no default */
+                   }
+                 strcat(temp_buf, "/");
+                 strcat(temp_buf, info[FS_NAME]);
+                 free(path);
+               }
+             else
+               {
+                 sprintf(temp_buf, "/afs/%s/%s/%s", info[FS_MACHINE],
+                         lowercase(info[FS_L_TYPE]), info[FS_NAME]);
+               }
+             info[FS_PACK] = strsave(temp_buf);
+           }
+       }
+      if (GetValueFromUser("Filesystem's Pack Name", &info[FS_PACK]) ==
+         SUB_ERROR)
+       return NULL;
+      if (GetValueFromUser("Filesystem's Mount Point", &info[FS_M_POINT]) ==
+         SUB_ERROR)
+       return NULL;
+      sprintf(access_type, "fs_access_%s", info[FS_TYPE]);
+      if (GetTypeFromUser("Filesystem's Default Access", access_type,
+                         &info[FS_ACCESS]) == SUB_ERROR)
+       return NULL;
+    }
+  if (GetValueFromUser("Comments about this Filesystem", &info[FS_COMMENTS])
+      == SUB_ERROR)
+    return NULL;
+  if (GetValueFromUser("Filesystem's owner (user)", &info[FS_OWNER]) ==
+      SUB_ERROR)
+    return NULL;
+  if (GetValueFromUser("Filesystem's owners (group)", &info[FS_OWNERS]) ==
+      SUB_ERROR)
+    return NULL;
+  if (!fsgroup)
+    if (GetYesNoValueFromUser("Propagate changes to fileserver",
+                             &info[FS_CREATE]) == SUB_ERROR)
+      return NULL;
+  if (strcasecmp(info[FS_TYPE], "AFS"))
+    {
+      if (GetTypeFromUser("Filesystem's lockertype", "lockertype",
+                         &info[FS_L_TYPE]) == SUB_ERROR)
+       return NULL;
     }
 
-    GetValueFromUser("Filesystem's Type:", &info[FS_TYPE]);
-    GetValueFromUser("Filesystem's Machine:", &info[FS_MACHINE]);
-    GetValueFromUser("Filesystem's Pack Name:", &info[FS_PACK]);
-    GetValueFromUser("Filesystem's Mount Point:", &info[FS_M_POINT]);
-    GetValueFromUser("Filesystem's Default Access:", &info[FS_ACCESS]);
-    GetValueFromUser("Commants about this Filesystem:", &info[FS_COMMENTS]);
-    GetValueFromUser("Filesystem's owner (user):", &info[FS_OWNER]);
-    GetValueFromUser("Filesystem's owners (group):", &info[FS_OWNERS]);
-    GetValueFromUser("Automatically create this filsystem (0/1):",
-                    &info[FS_COMMENTS]);
-    GetValueFromUser("Filesystem's lockertype:", &info[FS_L_TYPE]);
-
-    FreeAndClear(&info[FS_MODTIME], TRUE);
-    FreeAndClear(&info[FS_MODBY], TRUE);
-    FreeAndClear(&info[FS_MODWITH], TRUE);
-
-    if (name)                  /* slide the newname into the #2 slot. */
-       SlipInNewName(info, newname);
-
-    return(info);
+  FreeAndClear(&info[FS_MODTIME], TRUE);
+  FreeAndClear(&info[FS_MODBY], TRUE);
+  FreeAndClear(&info[FS_MODWITH], TRUE);
+
+  if (name)                    /* slide the newname into the #2 slot. */
+    SlipInNewName(info, newname);
+
+  return info;
 }
 
+
 /* --------------- Filesystem Menu ------------- */
 
 /*     Function Name: GetFS
@@ -214,18 +450,62 @@ Bool name;
  *     Returns: DM_NORMAL.
  */
 
-/* ARGSUSED */
-int
-GetFS(argc, argv)
-int argc;
-char **argv;
+int GetFS(int argc, char **argv)
+{
+  struct qelem *top;
+
+  top = GetFSInfo(LABEL, argv[1]); /* get info. */
+  Loop(top, PrintFSInfo);
+  FreeQueue(top);              /* clean the queue. */
+  return DM_NORMAL;
+}
+
+/*     Function Name: GetFSM
+ *     Description: Get Filesystem information by machine.
+ *     Arguments: argc, argv - name of server in argv[1].
+ *     Returns: DM_NORMAL.
+ */
+
+int GetFSM(int argc, char **argv)
 {
-    struct qelem *elem;
+  struct qelem *top;
 
-    elem = GetFSInfo();        /* get info. */
-    PrintAllFSInfo(elem);      /* print it all. */
-    FreeQueue(elem);           /* clean the queue. */
-    return (DM_NORMAL);
+  argv[1] = canonicalize_hostname(strsave(argv[1]));
+  top = GetFSInfo(MACHINE, argv[1]); /* get info. */
+  Loop(top, PrintFSInfo);
+  FreeQueue(top);              /* clean the queue. */
+  return DM_NORMAL;
+}
+
+/*     Function Name: RealDeleteFS
+ *     Description: Does the real deletion work.
+ *     Arguments: info - array of char *'s containing all useful info.
+ *                 one_item - a Boolean that is true if only one item
+ *                              in queue that dumped us here.
+ *     Returns: none.
+ */
+
+void RealDeleteFS(char **info, Bool one_item)
+{
+  int stat;
+  char temp_buf[BUFSIZ];
+
+  /*
+   * Deletions are performed if the user hits 'y' on a list of multiple
+   * filesystem, or if the user confirms on a unique alias.
+   */
+  sprintf(temp_buf, "Are you sure that you want to delete filesystem %s",
+         info[FS_NAME]);
+  if (!one_item || Confirm(temp_buf))
+    {
+      if ((stat = do_mr_query("delete_filesys", 1,
+                             &info[FS_NAME], Scream, NULL)))
+       com_err(program_name, stat, " filesystem not deleted.");
+      else
+       Put_message("Filesystem deleted.");
+    }
+  else
+    Put_message("Filesystem not deleted.");
 }
 
 /*     Function Name: DeleteFS
@@ -234,69 +514,57 @@ char **argv;
  *     Returns: none.
  */
 
-/* ARGSUSED */
-int
-DeleteFS(argc, argv)
-int argc;
-char **argv;
+int DeleteFS(int argc, char **argv)
 {
-    int stat, answer, delete, number;
-    struct qelem *elem, *temp_elem;
-    
-    if ( (temp_elem = elem = GetFSInfo(FS_LABEL, argv[1],
-                            (char *) NULL) ) == NULL ) /* get info. */
-       return(DM_NORMAL);
-/* 
- * 1) If there is no (zero) match then we exit immediately.
- * 2) If there is exactly 1 element then we ask for confirmation only if in
- *    verbose mode, via the Confirm function.  
- * 3) If there is more than 1 filesystem to be deleted then we ask
- *    about each one, and delete on yes only, and about if the user hits
- *    quit.
+  struct qelem *elem = GetFSInfo(LABEL, argv[1]);
+  QueryLoop(elem, PrintFSInfo, RealDeleteFS, "Delete the Filesystem");
+
+  FreeQueue(elem);
+  return DM_NORMAL;
+}
+
+/*     Function Name: RealChangeFS
+ *     Description: performs the actual change to the filesys.
+ *     Arguments: info - the information
+ *                 junk - an unused boolean.
+ *     Returns: none.
  */
-    number = QueueCount(elem);
-    while (temp_elem != NULL) {
-       char **info = (char **) temp_elem->q_data;
-       
-       if (number != 1) {
-           PrintFSInfo(info);
-       
-           answer = YesNoQuitQuestion("\nDelete this filesys?", FALSE); 
-           switch(answer) {
-           case TRUE:
-               delete = TRUE;
-               break;
-           case FALSE:
-               delete = FALSE;
-               break;
-           default:            /* Quit. */
-               Put_message("Aborting Delete Operation.");
-               FreeQueue(elem);
-               return(DM_NORMAL);
+
+static void RealChangeFS(char **info, Bool junk)
+{
+  int stat;
+  char **args;
+  extern Menu nfsphys_menu;
+
+  args = AskFSInfo(info, TRUE);
+  if (!args)
+    {
+      Put_message("Aborted.");
+      return;
+    }
+  stat = do_mr_query("update_filesys", CountArgs(args), args, NullFunc, NULL);
+  switch (stat)
+    {
+    case MR_NFS:
+      Put_message("That NFS filesystem is not exported.");
+      if (YesNoQuestion("Fix this now (Y/N)", TRUE) == TRUE)
+       {
+         Do_menu(&nfsphys_menu, 0, NULL);
+         if (YesNoQuestion("Retry filesystem update now (Y/N)", TRUE) == TRUE)
+           {
+             if ((stat = do_mr_query("update_filesys", CountArgs(args), args,
+                                     NullFunc, NULL)))
+               com_err(program_name, stat, " filesystem not updated");
+             else
+               Put_message("filesystem sucessfully updated.");
            }
        }
-       else
-           delete = 
-            Confirm("Are you sure that you want to delete this filsystem.")) 
-/* 
- * Deletetions are  performed if the user hits 'y' on a list of multiple 
- * filesystem, or if the user confirms on a unique alias.
- */
-       if (delete) {
-           if ( (status = sms_query("delete_filesys", 1,
-                                    &name, NullFunc, NULL)) != 0)
-               com_err(whoami, stat, " filesystem not deleted.");
-           else
-               Put_message("Filesystem deleted.");
-       }
-       else 
-           Put_message("Filesystem not deleted.");
-       temp_elem = temp_elem->next;
+      break;
+    case MR_SUCCESS:
+      break;
+    default:
+      com_err(program_name, stat, " in UpdateFS");
     }
-
-    FreeQueue(elem);           /* free all members of the queue. */
-    return (DM_NORMAL);
 }
 
 /*     Function Name: ChangeFS
@@ -305,101 +573,350 @@ char **argv;
  *     Returns: DM_NORMAL.
  */
 
-/* ARGSUSED */
-int
-ChangeFS(argc, argv)
-char **argv;
-int argc;
+int ChangeFS(int argc, char **argv)
 {
-    FS_info *info;
-    struct qelem * elem, temp_elem;
-    int update, stat, answer;
-    
-    elem = temp_elem = GetFSInfo(FS_LABEL, argv[1], (char *) NULL);
-
-/* 
- * This uses the same basic method as the deletion routine above.
+  struct qelem *elem = GetFSInfo(LABEL, argv[1]);
+  QueryLoop(elem, NullPrint, RealChangeFS, "Update the Filesystem");
+
+  FreeQueue(elem);
+  return DM_NORMAL;
+}
+
+/*     Function Name: AddFS
+ *     Description: change the information in a filesys record.
+ *     Arguments: arc, argv - name of filsys in argv[1].
+ *     Returns: DM_NORMAL.
  */
 
-    number = QueueCount(elem);
-    while (temp_elem != NULL) {
-       char ** info = (char **) temp_elem->q_data;
-       if (number != 1) {
-           sprintf(buf, "%s %s %s (y/n/q)? ", "Would you like to change the",
-                   "information about the filesystem:", 
-                   info[FS_NAME]);
-           info = (char **) temp_elem->q_data;
-           answer = YesNoQuitQuestion(buf, FALSE);
-           switch(answer) {
-           case TRUE:
-               update = TRUE
-               break;
-           case FALSE:
-               upadate = FALSE;
-               break;
-           default:
-               Put_message("Aborting Operation.");
-               FreeQueue(elem);
-               return(DM_NORMAL);
+int AddFS(int argc, char **argv)
+{
+  char *info[MAX_ARGS_SIZE], **args, buf[BUFSIZ];
+  int stat;
+  extern Menu nfsphys_menu;
+
+  if (!ValidName(argv[1]))
+    return DM_NORMAL;
+
+  if (!(stat = do_mr_query("get_filesys_by_label", 1, argv + 1,
+                             NullFunc, NULL)))
+    {
+      Put_message ("A Filesystem by that name already exists.");
+      return DM_NORMAL;
+    }
+  else if (stat != MR_NO_MATCH)
+    {
+      com_err(program_name, stat, " in AddFS");
+      return DM_NORMAL;
+    }
+
+  if (!(args = AskFSInfo(SetDefaults(info, argv[1]), FALSE)))
+    {
+      Put_message("Aborted.");
+      return DM_NORMAL;
+    }
+
+  stat = do_mr_query("add_filesys", CountArgs(args), args, NullFunc, NULL);
+  switch (stat)
+    {
+    case MR_NFS:
+      Put_message("That NFS filesystem is not exported.");
+      if (YesNoQuestion("Fix this now (Y/N)", TRUE) == TRUE)
+       {
+         Do_menu(&nfsphys_menu, 0, NULL);
+         if (YesNoQuestion("Retry filesystem creation now (Y/N)", TRUE)
+             == TRUE) {
+           if ((stat = do_mr_query("add_filesys", CountArgs(args), args,
+                                   NullFunc, NULL)))
+             com_err(program_name, stat, " in AddFS");
+           else
+             Put_message("Created.");
+         }
+       }
+      break;
+    case MR_SUCCESS:
+      break;
+    default:
+      com_err(program_name, stat, " in AddFS");
+    }
+
+  if (stat == MR_SUCCESS && !strcasecmp(info[FS_L_TYPE], "HOMEDIR"))
+    {
+      static char *val[] = {"def_quota", NULL};
+      static char *def_quota = NULL;
+      char *argv[Q_QUOTA + 1];
+      struct qelem *top = NULL;
+
+      if (!def_quota)
+       {
+         stat = do_mr_query("get_value", CountArgs(val), val,
+                            StoreInfo, (char *) &top);
+         if (stat != MR_SUCCESS)
+           com_err(program_name, stat, " getting default quota");
+         else
+           {
+             top = QueueTop(top);
+             def_quota = Strsave(((char **)top->q_data)[0]);
+             FreeQueue(top);
            }
        }
-       else
-           update = TRUE;
-
-       if (update) {
-           char * args;
-           args = AskFSInfo(info, TRUE);
-           if ( (stat = sms_query("update_filesys", num_args, 
-                                  args, NullFunc, NULL)) != 0)
-               com_err(whoami, stat, " in filesystem not updated");
-           else
-               Put_message("filesystem sucessfully updated.");
+      if (def_quota)
+       {
+         sprintf(buf, "Give user %s a quota of %s on filesys %s (Y/N)",
+                 info[FS_NAME], def_quota, info[FS_NAME]);
+         if (YesNoQuestion(buf, 1) == TRUE)
+           {
+             argv[Q_NAME] = argv[Q_FILESYS] = info[FS_NAME];
+             if (!strcmp(info[FS_TYPE], "NFS"))
+               argv[Q_TYPE] = "USER";
+             else
+               argv[Q_TYPE] = "ANY";
+             argv[Q_QUOTA] = def_quota;
+             if ((stat = do_mr_query("add_quota", Q_QUOTA + 1, argv, Scream,
+                                     NULL)))
+               com_err(program_name, stat, " while adding quota");
+           }
+       }
+    }
+  else if (stat == MR_SUCCESS)
+    {
+      if (YesNoQuestion("Assign a quota on this filesystem (Y/N)", 1) == TRUE)
+       {
+         parsed_argc = 1;
+         parsed_argv[0] = info[FS_NAME];
+         AddQuota();
        }
-       temp_elem = temp_elem->q_forw;
     }
-    FreeQueue(elem);
-    return (DM_NORMAL);
+
+  FreeInfo(info);
+  return DM_NORMAL;
 }
 
-/*     Function Name: AddFS
- *     Description: change the information in a filesys record.
- *     Arguments: arc, argv - name of filsys in argv[1].
+/*     Function Name: SortAfter
+ *     Description: choose a sortkey to cause an item to be added after
+ *             the count element in the queue
+ *     Arguments: queue of filesys names & sortkeys, queue count pointer
+ *     Returns: sort key to use.
+ */
+
+char *SortAfter(struct qelem *elem, int count)
+{
+  char *prev, *next, prevnext, *key, keybuf[9];
+
+  /* first find the two keys we need to insert between */
+  prev = "A";
+  for (; count > 0; count--)
+    {
+      prev = ((char **)elem->q_data)[1];
+      if (elem->q_forw)
+       elem = elem->q_forw;
+      else
+       break;
+    }
+  if (count > 0)
+    next = "Z";
+  else
+    next = ((char **)elem->q_data)[1];
+
+  /* now copy the matching characters */
+  for (key = keybuf; *prev && *prev == *next; next++)
+    *key++ = *prev++;
+
+  /* and set the last character */
+  if (*prev == 0)
+    *prev = prevnext = 'A';
+  else
+    prevnext = prev[1];
+  if (prevnext == 0)
+    prevnext = 'A';
+  if (*next == 0)
+    *next = 'Z';
+  if (*next - *prev > 1)
+    *key++ = (*next + *prev) / 2;
+  else
+    {
+      *key++ = *prev;
+      *key++ = (prevnext + 'Z') / 2;
+    }
+  *key = 0;
+  return Strsave(keybuf);
+}
+
+/*     Function Name: AddFSToGroup
+ *     Description: add a filesystem to an FS group
+ *     Arguments: arc, argv - name of group in argv[1], filesys in argv[2].
  *     Returns: DM_NORMAL.
  */
 
-/* ARGSUSED */
-int
-AddFS(argc, argv)
-char **argv;
-int argc;
+int AddFSToGroup(int argc, char **argv)
 {
-    char *info[MAX_ARGS_SIZE], **args;
-    int stat, count;
-
-    if ( !ValidName(argv[1]) )
-       return(DM_NORMAL);
-
-    if ( (stat = sms_query("get_filesys_by_label", 1, argv + 1,
-                          NullFunc, NULL)) == 0) {
-       Put_message ("A Filesystem by that name already exists.");
-       return(DM_NORMAL);
-    } else if (status != SMS_NOMATCH) {
-       com_err(whoami, stat, " in AddFS");
-       return(DM_NORMAL);
-    } 
-
-    while (count = 0; count < 100; count++)
-       info[count] = NULL;
-    args = AskFSInfo(info, FALSE );
-    
-    if (stat = sms_query("add_filesys", CountArgs(args), args, 
-                        NullFunc, NULL) != 0)
-       com_err(whoami, stat, " in AddFS");
-
-    FreeInfo(info);
-    return (DM_NORMAL);
+  int stat, count;
+  struct qelem *elem = NULL;
+  char buf[BUFSIZ], *args[5], *bufp;
+
+  if ((stat = do_mr_query("get_fsgroup_members", 1, argv + 1, StoreInfo,
+                         (char *)&elem)))
+    {
+      if (stat != MR_NO_MATCH)
+       com_err(program_name, stat, " in AddFSToGroup");
+    }
+  if (elem == NULL)
+    {
+      args[0] = argv[1];
+      args[1] = argv[2];
+      args[2] = "M";
+      stat = do_mr_query("add_filesys_to_fsgroup", 3, args, Scream, NULL);
+      if (stat)
+       com_err(program_name, stat, " in AddFSToGroup");
+      return DM_NORMAL;
+    }
+  elem = QueueTop(elem);
+  fsgCount = 1;
+  Loop(elem, PrintFSGMembers);
+  sprintf(buf, "%d", QueueCount(elem));
+  bufp = Strsave(buf);
+  if (GetValueFromUser("Enter number of filesystem it should follow "
+                      "(0 to make it first):", &bufp) == SUB_ERROR)
+    return DM_NORMAL;
+  count = atoi(bufp);
+  free(bufp);
+  args[2] = SortAfter(elem, count);
+
+  FreeQueue(QueueTop(elem));
+  args[0] = argv[1];
+  args[1] = argv[2];
+  stat = do_mr_query("add_filesys_to_fsgroup", 3, args, Scream, NULL);
+  if (stat == MR_EXISTS)
+    {
+      Put_message("That filesystem is already a member of the group.");
+      Put_message("Use the order command if you want to change the "
+                 "sorting order.");
+    }
+  else if (stat)
+    com_err(program_name, stat, " in AddFSToGroup");
+  return DM_NORMAL;
 }
 
+
+/*     Function Name: RemoveFSFromGroup
+ *     Description: delete a filesystem from an FS group
+ *     Arguments: arc, argv - name of group in argv[1].
+ *     Returns: DM_NORMAL.
+ */
+
+int RemoveFSFromGroup(int argc, char **argv)
+{
+  int stat;
+  char buf[BUFSIZ];
+
+  sprintf(buf, "Delete filesystem %s from FS group %s", argv[2], argv[1]);
+  if (!Confirm(buf))
+    return DM_NORMAL;
+  if ((stat = do_mr_query("remove_filesys_from_fsgroup", 2, argv + 1,
+                         Scream, NULL)))
+    com_err(program_name, stat, ", not removed.");
+  return DM_NORMAL;
+}
+
+/*     Function Name: ChangeFSGroupOrder
+ *     Description: change the sortkey on a filesys in an FSgroup
+ *     Arguments: arc, argv - name of group in argv[1].
+ *     Returns: DM_NORMAL.
+ */
+
+int ChangeFSGroupOrder(int argc, char **argv)
+{
+  int stat, src, dst, i;
+  struct qelem *elem = NULL, *top, *tmpelem;
+  char buf[BUFSIZ], *bufp, *args[3];
+
+  if ((stat = do_mr_query("get_fsgroup_members", 1, argv + 1, StoreInfo,
+                         (char *)&elem)))
+    {
+      if (stat == MR_NO_MATCH)
+       {
+         sprintf(buf,
+                 "Ether %s is not a filesystem group or it has no members",
+                 argv[1]);
+         Put_message(buf);
+       }
+      else
+       com_err(program_name, stat, " in ChangeFSGroupOrder");
+      return DM_NORMAL;
+    }
+  top = QueueTop(elem);
+  fsgCount = 1;
+  Loop(top, PrintFSGMembers);
+  while (1)
+    {
+      bufp = Strsave("1");
+      if (GetValueFromUser("Enter number of the filesystem to move:",
+                          &bufp) == SUB_ERROR)
+       return DM_NORMAL;
+      src = atoi(bufp);
+      free(bufp);
+      if (src < 0)
+       {
+         Put_message("You must enter a positive number (or 0 to abort).");
+         continue;
+       }
+      else if (src == 0)
+       {
+         Put_message("Aborted.");
+         return DM_NORMAL;
+       }
+      for (elem = top, i = src; i-- > 1 && elem->q_forw; elem = elem->q_forw)
+       ;
+      if (i > 0)
+       {
+         Put_message("You entered a number that is too high");
+         continue;
+       }
+      break;
+    }
+  while (1)
+    {
+      bufp = Strsave("0");
+      if (GetValueFromUser("Enter number of filesystem it should follow "
+                          "(0 to make it first):", &bufp) == SUB_ERROR)
+       return DM_NORMAL;
+      dst = atoi(bufp);
+      free(bufp);
+      if (src == dst || src == dst + 1)
+       {
+         Put_message("That has no effect on the sorting order!");
+         return DM_NORMAL;
+       }
+      if (dst < 0)
+       {
+         Put_message("You must enter a non-negative number.");
+         continue;
+       }
+      for (tmpelem = top, i = dst; i-- > 1 && tmpelem->q_forw;
+          tmpelem = tmpelem->q_forw)
+       ;
+      if (i > 0)
+       {
+         Put_message("You entered a number that is too high");
+         continue;
+       }
+      break;
+    }
+  args[2] = SortAfter(top, dst);
+  args[0] = argv[1];
+  args[1] = ((char **)elem->q_data)[0];
+  if ((stat = do_mr_query("remove_filesys_from_fsgroup", 2, args,
+                         Scream, NULL)))
+    {
+      com_err(program_name, stat, " in ChangeFSGroupOrder");
+      return DM_NORMAL;
+    }
+  if ((stat = do_mr_query("add_filesys_to_fsgroup", 3, args,
+                            Scream, NULL)))
+    com_err(program_name, stat, " in ChangeFSGroupOrder");
+  return DM_NORMAL;
+}
+
+
 /* -------------- Top Level Menu ---------------- */
 
 /*     Function Name: GetFSAlias
@@ -410,169 +927,126 @@ int argc;
  *             this will work correctly.
  */
 
-/* ARGSUSED */
-int
-GetFSAlias(argc, argv)
-int argc;
-char **argv;
+int GetFSAlias(int argc, char **argv)
 {
-    register int stat = 0;
-    char **info, buf[BUFSIZ];
-    struct qelem *top, *elem;
-
-    top = elem = GetFSInfo(FS_ALIAS, argv[1]);
-
-    while (elem != NULL) {
-       info = (char **) elem->q_data;
-       sprintf(buf,"Alias: %s\tFilesystem: %s",info[NAME], info[ALIAS_TRANS]);
-       putmessage(buf);
-       elem = elem->q_forw;
-    }
+  struct qelem *top;
 
-    FreeQueue(top);
-    return(DM_NORMAL);
+  top = GetFSInfo(ALIAS, argv[1]);
+  Put_message(" ");            /* blank line. */
+  Loop(top, (void *) PrintFSAlias);
+  FreeQueue(top);
+  return DM_NORMAL;
 }
 
 /*     Function Name: CreateFSAlias
- *     Description: Create an alias name for a filsystem
+ *     Description: Create an alias name for a filesystem
  *     Arguments: argc, argv - name of alias in argv[1].
  *     Returns: DM_NORMAL.
  *      NOTES:  This requires (name, type, transl)  I get {name, translation}
- *              from the user.  I provide type, which is well-known. 
+ *              from the user.  I provide type, which is well-known.
  */
 
-/* ARGSUSED */
-int
-CreateFSAlias(argc, argv)
-int argc;
-char **argv;
+int CreateFSAlias(int argc, char **argv)
 {
-    register int stat = 0;
-    struct qelem *elem, *top;
-    char *args[3], buf[BUFSIZ], **info;
-    int num_args;
+  int stat;
+  struct qelem *elem, *top;
+  char *args[MAX_ARGS_SIZE], buf[BUFSIZ], **info;
+
+  elem = NULL;
+
+  if (!ValidName(argv[1]))
+    return DM_NORMAL;
+
+  args[ALIAS_NAME] = Strsave(argv[1]);
+  args[ALIAS_TYPE] = Strsave(FS_ALIAS_TYPE);
+  args[ALIAS_TRANS] = Strsave("*");
+
+  /*
+   * Check to see if this alias already exists in the database, if so then
+   * print out values, free memory used and then exit.
+   */
+
+  if (!(stat = do_mr_query("get_alias", 3, args, StoreInfo,
+                          (char *)&elem)))
+    {
+      top = elem = QueueTop(elem);
+      while (elem)
+       {
+         info = (char **) elem->q_data;
+         sprintf(buf, "The alias: %s currently describes the filesystem %s",
+                 info[ALIAS_NAME], info[ALIAS_TRANS]);
+         Put_message(buf);
+         elem = elem->q_forw;
+       }
+      FreeQueue(top);
+      return DM_NORMAL;
+    }
+  else if (stat != MR_NO_MATCH)
+    {
+      com_err(program_name, stat, " in CreateFSAlias.");
+      return DM_NORMAL;
+    }
 
-    elem = NULL;
+  args[ALIAS_TRANS] = Strsave("");
+  args[ALIAS_END] = NULL;
+  if (GetValueFromUser("Which filesystem will this alias point to?",
+                      &args[ALIAS_TRANS]) == SUB_ERROR)
+    return DM_NORMAL;
 
-    if (!ValidName(argv[1]))
-       return(DM_NORMAL);
+  if ((stat = do_mr_query("add_alias", 3, args, NullFunc, NULL)))
+    com_err(program_name, stat, " in CreateFSAlias.");
 
-    args[0] = argv[1];
-    args[1] = FS_ALIAS_TYPE;
+  FreeInfo(args);
+  return DM_NORMAL;
+}
 
-/*
- * Check to see if this alias already exists in the database, if so then
- * print out values, free memory used and then exit.
+/*     Function Name: RealDeleteFSAlias
+ *     Description: Does the real deletion work.
+ *     Arguments: info - array of char *'s containing all useful info.
+ *                 one_item - a Boolean that is true if only one item
+ *                              in queue that dumped us here.
+ *     Returns: none.
  */
 
-    if ( (stat = sms_query("get_alias", 2, args, StoreInfo, &elem)) == 0) {
-       top = elem;
-       while (elem != NULL) {
-           info = (char **) elem->q_data;          
-           sprintf(buf,"The alias: %s\tcurrently describes the filesystem %s",
-                   info[NAME], info[ALIAS_TRANS]);
-           Put_message(buf);
-           elem = elem->q_forw;
-       }
-       FreeQueue(top);
-       return(DM_NORMAL);
-    }
-    else if ( stat != SMS_NO_MATCH) {
-       com_err(whoami, stat, " in CreateFSAlias.");
-        return(DM_NORMAL);
+void RealDeleteFSAlias(char **info, Bool one_item)
+{
+  int stat;
+  char temp_buf[BUFSIZ];
+
+  /*
+   * Deletions are  performed if the user hits 'y' on a list of multiple
+   * filesystem, or if the user confirms on a unique alias.
+   */
+  sprintf(temp_buf,
+         "Are you sure that you want to delete the filesystem alias %s",
+         info[ALIAS_NAME]);
+  if (!one_item || Confirm(temp_buf))
+    {
+      if ((stat = do_mr_query("delete_alias", CountArgs(info),
+                             info, Scream, NULL)))
+       com_err(program_name, stat, " filesystem alias not deleted.");
+      else
+       Put_message("Filesystem alias deleted.");
     }
-
-    args[ALIAS_TRANS] = NULL;  /* set to zero */
-    GetValueFromUser("Which filesystem will this alias point to?",
-                    args[ALIAS_TRANS]);
-
-    if ( (stat = sms_query("add_alias", 3, args, NullFunc, NULL)) != 0)
-       com_err(whoami, stat, " in CreateFSAlias.");
-
-    free(args[ALIAS_TRANS]);
-    return (DM_NORMAL);
+  else
+    Put_message("Filesystem alias not deleted.");
 }
 
 /*     Function Name: DeleteFSAlias
- *     Description: Delete an alias name for a filsystem
+ *     Description: Delete an alias name for a filesystem
  *     Arguments: argc, argv - name of alias in argv[1].
  *     Returns: DM_NORMAL.
  *      NOTES:  This requires (name, type, transl)  I get {name, translation}
- *              from the user.  I provide type, which is well-known. 
+ *              from the user.  I provide type, which is well-known.
  */
 
-/* ARGSUSED */
-int
-DeleteFSAlias(argc, argv)
-int argc;
-char **argv;
+int DeleteFSAlias(int argc, char **argv)
 {
-    register int stat;
-    char *args[3], buf[BUFSIZ], **info;
-    int num_args, delete;
-    struct qelem *elem, *top;
-
-    if (!ValidName(argv[1]))
-       return(DM_NORMAL);
-
-    top = elem = GetFSInfo(FS_ALIAS, argv[1]);
-
-/* 
- * 1) If there are no (zero) match in elements then we exit immediately.
- * 2) If there is exactly 1 element then we ask for confirmation only if in
- *    verbose mode, via the Confirm function.  
- * 3) If there is more than 1 filesystem alias to be deleted then we ask
- *    about each one, and delete on yes only, and about if the user hits
- *    quit.
- */
-    number = QueueCount(top);
-    while (elem != NULL) {
-       char **info = (char **) elem->q_data;
-
-       if (number != 1) {
-           sprintf(buf, "%s %s for the filesystem %s.",
-                   "Confirm that you want to delete\n the alias",
-                   info[NAME], info[ALIAS_TRANS]);
-           Put_message(buf);
-           
-           answer = YesNoQuitQuestion("\nDelete this filesystem alias?", 
-                                      FALSE); 
-           switch(answer) {
-           case TRUE:
-               delete = TRUE;
-               break;
-           case FALSE:
-               delete = FALSE;
-               break;
-           default:            /* Quit. */
-               Put_message("Aborting Delete Operation.");
-               FreeQueue(top);
-               return(DM_NORMAL);
-           }
-       }
-       else {
-           sprintf(buf, "Are you sure that you want to delete %s",
-                   "this filesystem alias?");
-           delete = Confirm(buf);
-       }
-/* 
- * Deletetions are  performed if the user hits 'y' on a list of multiple 
- * filesystem aliases, or if the user confirms on a unique alias.
- */
-       if (delete) {
-           if ( (status = sms_query("delete_filesys", 1,
-                                    &name, NullFunc, NULL)) != 0)
-               com_err(whoami, stat, " filesystem alias not deleted.");
-           else
-               Put_message("Filesystem alias deleted.");
-       }
-       else 
-           Put_message("Filesystem alias not deleted.");
-       elem = elem->q_forw;
-    }
-
-    FreeQueue(Top);
-    return (DM_NORMAL);
+  struct qelem *elem = GetFSInfo(ALIAS, argv[1]);
+  QueryLoop(elem, PrintFSAlias, RealDeleteFSAlias,
+           "Delete the Filesystem Alias");
+  FreeQueue(elem);
+  return DM_NORMAL;
 }
 
 /*     Function Name: AttachHelp
@@ -581,33 +1055,45 @@ char **argv;
  *     Returns: DM_NORMAL.
  */
 
-int
-AttachHelp()
+int AttachHelp(void)
 {
-    static char *message[] = {
-       "These are the options:\n",
-       "get - get information about a filesystem.",
-       "add - add a new filesystem to the data base.",
-       "update - update the information in the database on a filesystem.",
-       "delete - delete a filesystem from the database.\n",
-       "check - check information about association of a name and a filesys.",
-       "alias - associate a name with a filsystem.",
-       "unalias - disassociate a name with a filesystem.",
-       "\twhere a name is: user, group, or project\n",
-       "verbose - toggle the request for delete confirmation\n",
-       NULL,
-    };
-
-    return(PrintHelp(message));
+  static char *message[] = {
+    "These are the options:",
+    "",
+    "get - get information about a filesystem.",
+    "add - add a new filesystem to the data base.",
+    "update - update the information in the database on a filesystem.",
+    "delete - delete a filesystem from the database.",
+    "check - check information about association of a name and a filesys.",
+    "alias - associate a name with a filesystem.",
+    "unalias - disassociate a name with a filesystem.",
+    "verbose - toggle the request for delete confirmation.",
+    NULL,
+  };
+
+  return PrintHelp(message);
 }
 
-/* 
- * Local Variables:
- * mode: c
- * c-indent-level: 4
- * c-continued-statement-offset: 4
- * c-brace-offset: -4
- * c-argdecl-indent: 4
- * c-label-offset: -4
- * End:
+/*     Function Name: FSGroupHelp
+ *     Description: Print help info on fsgroups.
+ *     Arguments: none
+ *     Returns: DM_NORMAL.
  */
+
+int FSGroupHelp(void)
+{
+  static char *message[] = {
+    "A filesystem group is a named sorted list of filesystems.",
+    "",
+    "To create, modify, or delete a group itself, use the menu above",
+    "  this one, and manipulate a filesystem of type FSGROUP.",
+    "Options here are:",
+    "  get - get info about a group and show its members",
+    "  add - add a new member to a group.",
+    "  remove - remove a member from a group.",
+    "  order - change the sorting order of a group.",
+    NULL
+  };
+
+  return PrintHelp(message);
+}
This page took 0.098055 seconds and 4 git commands to generate.