]> andersk Git - moira.git/blobdiff - clients/blanche/blanche.c
many new options for list creation and changing info
[moira.git] / clients / blanche / blanche.c
index afb0f454288c5ea668a42302e3346edea4f4574b..0d0a69062f5a3c0d877c948e64fefc107652710f 100644 (file)
@@ -1,6 +1,6 @@
 /* $Header$
  *
- * Command line oriented SMS List tool.
+ * Command line oriented Moira List tool.
  *
  * by Mark Rosenstein, September 1988.
  *
    Do we need to improve the support for queue operations? */
 
 #include <mit-copyright.h>
+#include <errno.h>
 #include <stdio.h>
+#include <stdlib.h>
 #include <ctype.h>
-#include <sms.h>
-#include <sms_app.h>
+#include <string.h>
+#include <moira.h>
+#include <moira_site.h>
 
 #ifndef LINT
-static char smslist_rcsid[] = "$Header$";
+static char blanche_rcsid[] = "$Header$";
 #endif
 
 
@@ -35,23 +38,29 @@ struct member {
 #define M_USER         1
 #define M_LIST         2
 #define M_STRING       3
+#define M_KERBEROS     4
 
 /* argument parsing macro */
 #define argis(a,b) ((strcmp(*arg+1, a) == 0) || (strcmp(*arg+1, b) == 0))
 
 /* flags from command line */
-int infoflg, verbose, syncflg, memberflg, recursflg, debugflg;
+int infoflg, verbose, syncflg, memberflg, recursflg, noauth;
+int showusers, showstrings, showkerberos, showlists;
+int createflag, setinfo, active, public, hidden, maillist, grouplist;
+struct member *owner;
+char *desc, *newname;
 
 /* various member lists */
 struct save_queue *addlist, *dellist, *memberlist, *synclist;
 
 char *listname, *whoami;
 
-extern char *index();
+#ifndef POSIX
 extern int errno;
+#endif
 
 int show_list_info(), show_list_count(), get_list_members(), scream();
-int show_list_members();
+int show_list_members(), membercmp(), save_list_info();
 struct member *parse_member();
 
 
@@ -60,34 +69,55 @@ main(argc, argv)
 int argc;
 char **argv;
 {
-    int status;
+    int status, success;
     char **arg = argv;
-    char *membervec[3];
+    char *membervec[3], *motd;
     struct member *memberstruct;
+    char *server = NULL, *p;
 
     /* clear all flags & lists */
-    infoflg = verbose = syncflg = memberflg = debugflg = recursflg = 0;
-    listname = NULL;
+    infoflg = verbose = syncflg = memberflg = recursflg = 0;
+    noauth = showusers = showstrings = showkerberos = showlists = 0;
+    createflag = setinfo = 0;
+    active = public = hidden = maillist = grouplist = -1;
+    listname = newname = desc = NULL;
+    owner = NULL;
     addlist = sq_create();
     dellist = sq_create();
     memberlist = sq_create();
     synclist = sq_create();
     whoami = argv[0];
 
+    success = 1;
+
     /* parse args, building addlist, dellist, & synclist */
     while (++arg - argv < argc) {
        if  (**arg == '-')
        {
            if (argis("m", "members"))
                memberflg++;
-           else if (argis("D", "debug"))
-               debugflg++;
-           else if (argis("i","information"))
+           else if (argis("u", "users"))
+               showusers++;
+           else if (argis("s", "strings"))
+               showstrings++;
+           else if (argis("l", "lists"))
+               showlists++;
+           else if (argis("k", "kerberos"))
+               showkerberos++;
+           else if (argis("i","info"))
              infoflg++;
+           else if (argis("n","noauth"))
+             noauth++;
            else if (argis("v","verbose"))
              verbose++;
            else if (argis("r","recursive"))
              recursflg++;
+           else if (argis("S","server") || argis("db","database"))
+               if (arg - argv < argc - 1) {
+                   ++arg;
+                   server = *arg;
+               } else
+                   usage(argv);
            else if (argis("a","add"))
                if (arg - argv < argc - 1) {
                    ++arg;
@@ -95,6 +125,12 @@ char **argv;
                        sq_save_data(addlist, memberstruct);
                } else
                    usage(argv);
+           else if (argis("al","addlist"))
+               if (arg - argv < argc - 1) {
+                   ++arg;
+                   get_members_from_file(*arg, addlist);
+               } else
+                 usage(argv);
            else if (argis("d","delete"))
                if (arg - argv < argc - 1) {
                    ++arg;
@@ -102,30 +138,73 @@ char **argv;
                        sq_save_data(dellist, memberstruct);
                } else
                    usage(argv);
+           else if (argis("dl","deletelist"))
+               if (arg - argv < argc - 1) {
+                   ++arg;
+                   get_members_from_file(*arg, dellist);
+               } else
+                 usage(argv);
            else if (argis("f","file"))
                if (arg - argv < argc - 1) {
-                   FILE *in;
-                   char buf[BUFSIZ];
-
                    syncflg++;
                    ++arg;
-                   if (!strcmp(*arg, "-"))
-                     in = stdin;
-                   else {
-                       in = fopen(*arg, "r");
-                       if (!in) {
-                           com_err(whoami, errno, 
-                                   " while opening %s for input", *arg);
-                           exit(2);
-                       }
-                   }
-                   while (fgets(buf, BUFSIZ, in))
-                     if (memberstruct = parse_member(buf))
-                       sq_save_data(synclist, memberstruct);
-                   if (!feof(in))
-                     com_err(whoami, errno, " while reading from %s", *arg);
+                   get_members_from_file(*arg, synclist);
                } else
                  usage(argv);
+           else if (argis("C", "create"))
+               createflag++;
+           else if (argis("P", "public")) {
+               setinfo++;
+               public = 1;
+           } else if (argis("NP", "private")) {
+               setinfo++;
+               public = 0;
+           } else if (argis("A", "active")) {
+               setinfo++;
+               active = 1;
+           } else if (argis("I", "inactive")) {
+               setinfo++;
+               active = 0;
+           } else if (argis("V", "visible")) {
+               setinfo++;
+               hidden = 0;
+           } else if (argis("H", "hidden")) {
+               setinfo++;
+               hidden = 1;
+           } else if (argis("M", "mail")) {
+               setinfo++;
+               maillist = 1;
+           } else if (argis("NM", "notmail")) {
+               setinfo++;
+               maillist = 0;
+           } else if (argis("G", "group")) {
+               setinfo++;
+               grouplist = 1;
+           } else if (argis("NG", "notgroup")) {
+               setinfo++;
+               grouplist = 0;
+           } else if (argis("D", "desc"))
+               if (arg - argv < argc - 1) {
+                   setinfo++;
+                   ++arg;
+                   desc = *arg;
+               } else
+                 usage(argv);
+           else if (argis("O", "owner"))
+               if (arg - argv < argc - 1) {
+                   setinfo++;
+                   ++arg;
+                   owner = parse_member(*arg);
+               } else
+                 usage(argv);
+           else if (argis("R", "rename"))
+               if (arg - argv < argc - 1) {
+                   setinfo++;
+                   ++arg;
+                   newname = *arg;
+               } else
+                 usage(argv);
+               
            else
                usage(argv);
        }
@@ -138,30 +217,140 @@ char **argv;
       usage(argv);
 
     /* if no other options specified, turn on list members flag */
-    if (!(infoflg || syncflg ||
+    if (!(infoflg || syncflg || createflag || setinfo ||
          addlist->q_next != addlist || dellist->q_next != dellist))
       memberflg++;
 
-    /* fire up SMS */
-    if (status = sms_connect(SMS_SERVER)) {
-       com_err(whoami, status, " unable to connect to SMS");
+    /* If none of {users,strings,lists,kerberos} specified, turn them all on */
+    if (!(showusers || showstrings || showlists || showkerberos))
+      showusers = showstrings = showlists = showkerberos = 1;
+
+    /* fire up Moira */
+    if (status = mr_connect(server)) {
+       com_err(whoami, status, "unable to connect to the Moira server");
        exit(2);
     }
-    if (status = sms_auth("blanche")) {
-       com_err(whoami, status, " unable to authenticate to SMS");
+    if ( status = mr_motd(&motd) ) {
+        com_err(whoami, status, "unable to check server status");
        exit(2);
     }
+    if (motd) {
+       fprintf(stderr, "The Moira server is currently unavailable:\n%s\n", motd);
+       mr_disconnect();
+       exit(2);
+    }
+
+    if (!noauth && (status = mr_auth("blanche"))) {
+       if (status == MR_USER_AUTH)
+         com_err(whoami, status, "");
+       else {
+           com_err(whoami, status, "unable to authenticate to Moira");
+           com_err(whoami, 0,
+                   " Try the -noauth flag if you don't need authentication");
+           exit(2);
+       }
+    }
+
+    /* create if needed */
+    if (createflag) {
+       char *argv[10];
+
+       argv[0] = listname;
+       argv[1] = (active == 0) ? "0" : "1";
+       argv[2] = (public == 1) ? "1" : "0";
+       argv[3] = (hidden == 1) ? "1" : "0";
+       argv[4] = (maillist == 0) ? "0" : "1";
+       argv[5] = (grouplist == 1) ? "1" : "0";
+       argv[6] = UNIQUE_GID;
+       argv[9] = desc ? desc : "none";
+
+       if (owner) {
+           argv[8] = owner->name;
+           switch (owner->type) {
+               case M_ANY:
+               case M_USER:
+                   argv[7] = "USER";
+                   status = mr_query("add_list", 10, argv, scream, NULL);
+                   if (owner->type != M_ANY || status != MR_USER)
+                       break;
+
+               case M_LIST:
+                   argv[7] = "LIST";
+                   status = mr_query("add_list", 10, argv, scream, NULL);
+                   break;
+
+               case M_KERBEROS:
+                   argv[7] = "KERBEROS";
+                   status = mr_query("add_list", 10, argv, scream, NULL);
+                   break;
+           }
+       } else {
+           argv[7] = "USER";
+           argv[8] = getenv("USER");
+
+           status = mr_query("add_list", 10, argv, scream, NULL);
+       }
+       
+       if (status) {
+           com_err(whoami, status, "while creating list.");
+           exit(1);
+       }
+    } else if (setinfo) {
+       char *argv[11];
+
+       status = mr_query("get_list_info", 1, &listname,
+                         save_list_info, (char *)argv);
+       if (status) {
+           com_err(whoami, status, "while getting list information");
+           exit(1);
+       }
+
+       argv[0] = listname;
+       if (newname) argv[1] = newname;
+       if (active != -1) argv[2] = active ? "1" : "0";
+       if (public != -1) argv[3] = public ? "1" : "0";
+       if (hidden != -1) argv[4] = hidden ? "1" : "0";
+       if (maillist != -1) argv[5] = maillist ? "1" : "0";
+       if (grouplist != -1) argv[6] = grouplist ? "1" : "0";
+       if (desc) argv[10] = desc;
+
+       if (owner) {
+           argv[9] = owner->name;
+           switch (owner->type) {
+               case M_ANY:
+               case M_USER:
+                   argv[8] = "USER";
+                   status = mr_query("update_list", 11, argv, scream, NULL);
+                   if (owner->type != M_ANY || status != MR_USER)
+                       break;
+
+               case M_LIST:
+                   argv[8] = "LIST";
+                   status = mr_query("update_list", 11, argv, scream, NULL);
+                   break;
+
+               case M_KERBEROS:
+                   argv[8] = "KERBEROS";
+                   status = mr_query("update_list", 11, argv, scream, NULL);
+                   break;
+           }
+       } else status = mr_query("update_list", 11, argv, scream, NULL);
+
+       if (status)
+           com_err(whoami, status, "while updating list.");
+       else if (newname) listname = newname;
+    }
 
     /* display list info if requested to */
     if (infoflg) {
-       status = sms_query("get_list_info", 1, &listname, show_list_info,NULL);
+       status = mr_query("get_list_info", 1, &listname, show_list_info,NULL);
        if (status)
-         com_err(whoami, status, " while getting list information");
+         com_err(whoami, status, "while getting list information");
        if (verbose && !memberflg) {
-           status = sms_query("count_members_of_list", 1, &listname,
+           status = mr_query("count_members_of_list", 1, &listname,
                               show_list_count, NULL);
            if (status)
-             com_err(whoami, status, " while getting list count");
+             com_err(whoami, status, "while getting list count");
        }
     }
 
@@ -174,10 +363,12 @@ char **argv;
      * lastly, reset memberlist so we can use it again later
      */
     if (syncflg) {
-       status = sms_query("get_members_of_list", 1, &listname,
+       status = mr_query("get_members_of_list", 1, &listname,
                           get_list_members, (char *)memberlist);
-       if (status)
-         com_err(whoami, status, " getting members of list %s", listname);
+       if (status) {
+           com_err(whoami, status, "getting members of list %s", listname);
+           exit (2);
+       }
        while (sq_get_data(synclist, &memberstruct)) {
            struct save_queue *q;
            int removed = 0;
@@ -201,9 +392,44 @@ char **argv;
 
     /* Process the add list */
     while (sq_get_data(addlist, &memberstruct)) {
+       /* canonicalize string if necessary */
+       if (memberstruct->type == M_STRING &&
+           (p = strchr(memberstruct->name, '@'))) {
+           char *host = canonicalize_hostname(strsave(++p));
+           static char **mailhubs = NULL;
+           char *argv[4];
+           int i, collect();
+
+           if (!mailhubs) {
+               argv[0] = "mailhub";
+               argv[1] = "TYPE";
+               argv[2] = "*";
+               mailhubs = (char **)malloc(sizeof(char *));
+               mailhubs[0] = NULL;
+               status = mr_query("get_alias", 3, argv, collect,
+                                  (char *)&mailhubs);
+               if (status != MR_SUCCESS && status != MR_NO_MATCH) {
+                   com_err(whoami, status,
+                           " while reading list of MAILHUB servers");
+                   mailhubs[0] = NULL;
+               }
+           }
+           for (i = 0; p = mailhubs[i]; i++) {
+               if (!strcasecmp(p, host)) {
+                   host = strsave(memberstruct->name);
+                   *(strchr(memberstruct->name, '@')) = 0;
+                   memberstruct->type = M_ANY;
+                   fprintf(stderr, "Warning: \"STRING:%s\" converted to \"%s\" because it is a local name.\n",
+                           host, memberstruct->name);
+                   break;
+               }
+           }
+           free(host);
+       }
+       /* now continue adding member */
        membervec[0] = listname;
        membervec[2] = memberstruct->name;
-       if (verbose && syncflg) {
+       if (verbose) {
            printf("Adding member ");
            show_list_member(memberstruct);
        }
@@ -211,32 +437,68 @@ char **argv;
        case M_ANY:
        case M_USER:
            membervec[1] = "USER";
-           status = sms_query("add_member_to_list", 3, membervec, scream, NULL);
-           if (status == SMS_SUCCESS)
+           status = mr_query("add_member_to_list", 3, membervec, scream, NULL);
+           if (status == MR_SUCCESS)
              break;
-           else if (status != SMS_USER || memberstruct->type != M_ANY) {
-               com_err(whoami, status, " while adding member %s to %s",
+           else if (status != MR_USER || memberstruct->type != M_ANY) {
+               com_err(whoami, status, "while adding member %s to %s",
                        memberstruct->name, listname);
+               success = 0;
                break;
            }
        case M_LIST:
            membervec[1] = "LIST";
-           status = sms_query("add_member_to_list", 3, membervec,
+           status = mr_query("add_member_to_list", 3, membervec,
                               scream, NULL);
-           if (status == SMS_SUCCESS)
-             break;
-           else if (status != SMS_LIST || memberstruct->type != M_ANY) {
-               com_err(whoami, status, " while adding member %s to %s",
+           if (status == MR_SUCCESS) {
+               if (!strcmp(membervec[0], getenv("USER"))) {
+                   fprintf(stderr, "\nWARNING: \"LIST:%s\" was just added to list \"%s\".\n",
+                           membervec[2], membervec[0]);
+                   fprintf(stderr, "If you meant to add yourself to the list \"%s\", type:\n", membervec[2]);
+                   fprintf(stderr, "\tblanche %s -d %s\t(to undo this)\n",
+                           membervec[0], membervec[2]);
+                   fprintf(stderr, "\tblanche %s -a %s\t(to add yourself to that list)\n",
+                           membervec[2], membervec[0]);
+               }
+               break;
+           } else if (status != MR_LIST || memberstruct->type != M_ANY) {
+               com_err(whoami, status, "while adding member %s to %s",
                        memberstruct->name, listname);
+               success = 0;
                break;
            }
        case M_STRING:
+           if (memberstruct->type == M_ANY &&
+               !strchr(memberstruct->name, '@') &&
+               !strchr(memberstruct->name, '!') &&
+               !strchr(memberstruct->name, '%')) {
+               /* if user is trying to add something which isn't a
+                  remote string, or a list, or a user, and didn't
+                  explicitly specify `STRING:', it's probably a typo */
+               com_err(whoami, MR_NO_MATCH, "while adding member %s to %s",
+                       memberstruct->name, listname);
+               success = 0;
+               break;
+           }
+                           
            membervec[1] = "STRING";
-           status = sms_query("add_member_to_list", 3, membervec,
+           status = mr_query("add_member_to_list", 3, membervec,
+                              scream, NULL);
+           if (status != MR_SUCCESS) {
+             com_err(whoami, status, "while adding member %s to %s",
+                     memberstruct->name, listname);
+             success = 0;
+           }
+           break;
+       case M_KERBEROS:
+           membervec[1] = "KERBEROS";
+           status = mr_query("add_member_to_list", 3, membervec,
                               scream, NULL);
-           if (status != SMS_SUCCESS)
-             com_err(whoami, status, " while adding member %s to %s",
+           if (status != MR_SUCCESS) {
+             com_err(whoami, status, "while adding member %s to %s",
                      memberstruct->name, listname);
+             success = 0;
+           }
        }
     }
 
@@ -244,7 +506,7 @@ char **argv;
     while (sq_get_data(dellist, &memberstruct)) {
        membervec[0] = listname;
        membervec[2] = memberstruct->name;
-       if (verbose && syncflg) {
+       if (verbose) {
            printf("Deleting member ");
            show_list_member(memberstruct);
        }
@@ -252,38 +514,73 @@ char **argv;
        case M_ANY:
        case M_USER:
            membervec[1] = "USER";
-           status = sms_query("delete_member_from_list", 3, membervec,
+           status = mr_query("delete_member_from_list", 3, membervec,
                               scream, NULL);
-           if (status == SMS_SUCCESS)
+           if (status == MR_SUCCESS)
              break;
-           else if ((status != SMS_USER && status != SMS_NO_MATCH) ||
+           else if ((status != MR_USER && status != MR_NO_MATCH) ||
                     memberstruct->type != M_ANY) {
-               com_err(whoami, status, " while deleteing member %s from %s",
+               com_err(whoami, status, "while deleting member %s from %s",
                        memberstruct->name, listname);
+               success = 0;
                break;
            }
        case M_LIST:
            membervec[1] = "LIST";
-           status = sms_query("delete_member_from_list", 3, membervec,
+           status = mr_query("delete_member_from_list", 3, membervec,
                               scream, NULL);
-           if (status == SMS_SUCCESS)
+           if (status == MR_SUCCESS)
              break;
-           else if ((status != SMS_LIST && status != SMS_NO_MATCH) ||
+           else if ((status != MR_LIST && status != MR_NO_MATCH) ||
                     memberstruct->type != M_ANY) {
-               com_err(whoami, status, " while deleteing member %s from %s",
+               if (status == MR_PERM && memberstruct->type == M_ANY &&
+                   !strcmp(membervec[2], getenv("USER")))  {
+                   /* M_ANY means we've fallen through from the user
+                    * case. The user is trying to remove himself from
+                    * a list, but we got MR_USER or MR_NO_MATCH above,
+                    * meaning he's not really on it, and we got MR_PERM
+                    * when trying to remove LIST:$USER because he's not
+                    * on the acl. That error is useless, so return
+                    * MR_NO_MATCH instead. However, this will generate the
+                    * wrong error if the user was trying to remove the list
+                    * with his username from a list he doesn't administrate
+                    * without explicitly specifying "list:".
+                    */
+                 status = MR_NO_MATCH;
+               }
+               com_err(whoami, status, "while deleting member %s from %s",
                        memberstruct->name, listname);
+               success = 0;
                break;
            }
        case M_STRING:
            membervec[1] = "STRING";
-           status = sms_query("delete_member_from_list", 3, membervec,
+           status = mr_query("delete_member_from_list", 3, membervec,
                               scream, NULL);
-           if (status == SMS_STRING && memberstruct->type == M_ANY)
-             com_err(whoami, 0, "Unable to find member %s to delete from %s",
+           if (status == MR_STRING && memberstruct->type == M_ANY) {
+             com_err(whoami, 0, " Unable to find member %s to delete from %s",
                      memberstruct->name, listname);
-           else if (status != SMS_SUCCESS)
-             com_err(whoami, status, " while deleteing member %s from %s",
+             success = 0;
+             if (!strcmp(membervec[0], getenv("USER"))) {
+               fprintf(stderr, "(If you were trying to remove yourself from the list \"%s\",\n", membervec[2]);
+               fprintf(stderr, "the correct command is \"blanche %s -d %s\".)\n",
+                       membervec[2], membervec[0]);
+             }
+           } else if (status != MR_SUCCESS) {
+             com_err(whoami, status, "while deleting member %s from %s",
                      memberstruct->name, listname);
+             success = 0;
+           }
+           break;
+       case M_KERBEROS:
+           membervec[1] = "KERBEROS";
+           status = mr_query("delete_member_from_list", 3, membervec,
+                              scream, NULL);
+           if (status != MR_SUCCESS) {
+             com_err(whoami, status, "while deleting member %s from %s",
+                     memberstruct->name, listname);
+             success = 0;
+           }
        }
     }
 
@@ -292,10 +589,10 @@ char **argv;
        if (recursflg)
          recursive_display_list_members();
        else {
-           status = sms_query("get_members_of_list", 1, &listname,
+           status = mr_query("get_members_of_list", 1, &listname,
                               get_list_members, (char *)memberlist);
            if (status)
-             com_err(whoami, status, " while getting members of list %s",
+             com_err(whoami, status, "while getting members of list %s",
                      listname);
            while (sq_get_data(memberlist, &memberstruct))
              show_list_member(memberstruct);
@@ -303,23 +600,45 @@ char **argv;
     }
 
     /* We're done! */
-    sms_disconnect();
-    exit(0);
+    mr_disconnect();
+    exit(success?0:1);
 }
 
 usage(argv)
 char **argv;
 {
-    fprintf(stderr, "Usage: %s [options] listname [options]\n",argv[0]);
+    fprintf(stderr, "Usage: %s listname [options]\n",argv[0]);
     fprintf(stderr, "Options are\n");
-    fprintf(stderr, "   -v | -verbose\n");
-    fprintf(stderr, "   -m | -members\n");
-    fprintf(stderr, "   -i | -info\n");
-    fprintf(stderr, "   -r | -recursive\n");
-    fprintf(stderr, "   -a | -add member\n");
-    fprintf(stderr, "   -d | -delete member\n");
-    fprintf(stderr, "   -f | -file filename\n");
-    fprintf(stderr, "   -D | -debug\n");
+    fprintf(stderr, "  %-39s%-39s\n", "-v  | -verbose",
+           "-C  | -create");
+    fprintf(stderr, "  %-39s%-39s\n", "-m  | -members",
+           "-R  | -rename newname");
+    fprintf(stderr, "  %-39s%-39s\n", "-u  | -users",
+           "-P  | -public");
+    fprintf(stderr, "  %-39s%-39s\n", "-l  | -lists",
+           "-NP | -private");
+    fprintf(stderr, "  %-39s%-39s\n", "-s  | -strings",
+           "-A  | -active");
+    fprintf(stderr, "  %-39s%-39s\n", "-k  | -kerberos",
+           "-I  | -inactive");
+    fprintf(stderr, "  %-39s%-39s\n", "-i  | -info",
+           "-V  | -visible");
+    fprintf(stderr, "  %-39s%-39s\n", "-r  | -recursive",
+           "-H  | -hidden");
+    fprintf(stderr, "  %-39s%-39s\n", "-a  | -add member",
+           "-M  | -mail");
+    fprintf(stderr, "  %-39s%-39s\n", "-d  | -delete member",
+           "-NM | -notmail");
+    fprintf(stderr, "  %-39s%-39s\n", "-al | -addlist filename",
+           "-G  | -group");
+    fprintf(stderr, "  %-39s%-39s\n", "-dl | -deletelist filename",
+           "-NG | -notgroup");
+    fprintf(stderr, "  %-39s%-39s\n", "-f  | -file filename",
+           "-D  | -desc description");
+    fprintf(stderr, "  %-39s%-39s\n", "-n  | -noauth",
+           "-O  | -owner owner");
+    fprintf(stderr, "  %-39s%-39s\n", "-db | -database host[:port]",
+           "");
     exit(1);
 }
 
@@ -329,28 +648,43 @@ char **argv;
 show_list_member(memberstruct)
 struct member *memberstruct;
 {
-    if (verbose) {
-       char *s;
-       switch (memberstruct->type) {
-       case M_USER:
-           s = "USER";
-           break;
-       case M_LIST:
-           s = "LIST";
-           break;
-       case M_STRING:
-           s = "STRING";
-           break;
-       case M_ANY:
-           printf("%s\n", memberstruct->name);
-           return;
-       }
-       printf("%s:%s\n", s, memberstruct->name);
-    } else {
+    char *s = "";
+
+    switch (memberstruct->type) {
+    case M_USER:
+       if (!showusers)
+         return;
+       s = "USER";
+       break;
+    case M_LIST:
+       if (!showlists)
+         return;
+       s = "LIST";
+       break;
+    case M_STRING:
+       if (!showstrings)
+         return;
+       s = "STRING";
+       break;
+    case M_KERBEROS:
+       if (!showkerberos)
+         return;
+       s = "KERBEROS";
+       break;
+    case M_ANY:
+       printf("%s\n", memberstruct->name);
+       return;
+    }
+
+    if (verbose)
+      printf("%s:%s\n", s, memberstruct->name);
+    else {
        if (memberstruct->type == M_LIST)
          printf("LIST:%s\n", memberstruct->name);
+       else if (memberstruct->type == M_KERBEROS)
+         printf("KERBEROS:%s\n", memberstruct->name);
        else if (memberstruct->type == M_STRING &&
-                !index(memberstruct->name, '@'))
+                !strchr(memberstruct->name, '@'))
          printf("STRING:%s\n", memberstruct->name);
        else
          printf("%s\n", memberstruct->name);
@@ -380,10 +714,24 @@ int hint;
       printf("\n");
     printf("Owner: %s %s\n", argv[7], argv[8]);
     printf("Last modified by %s with %s on %s\n", argv[11], argv[12], argv[10]);
-    return(SMS_CONT);
+    return(MR_CONT);
 }
 
 
+/* Copy retrieved information about a list into a new argv */
+
+save_list_info(argc, argv, hint)
+int argc;
+char **argv;
+int hint;
+{
+    char **nargv = (char **)hint;
+    
+    for(argc = 0; argc < 10; argc++)
+       nargv[argc+1] = strdup(argv[argc]);
+    return MR_CONT;
+}
+
 /* Show the retrieve list member count */
 
 show_list_count(argc, argv, hint)
@@ -413,12 +761,10 @@ recursive_display_list_members()
     while (sq_get_data(lists, &m)) {
        sq_destroy(memberlist);
        memberlist = sq_create();
-       if (debugflg)
-         fprintf(stderr, "Fetching members of %s\n", m->name);
-       status = sms_query("get_members_of_list", 1, &(m->name),
+       status = mr_query("get_members_of_list", 1, &(m->name),
                           get_list_members, (char *)memberlist);
        if (status)
-         com_err(whoami, status, " while getting members of list %s", m->name);
+         com_err(whoami, status, "while getting members of list %s", m->name);
        while (sq_get_data(memberlist, &m1)) {
            if (m1->type == M_LIST)
              unique_add_member(lists, m1);
@@ -430,7 +776,7 @@ recursive_display_list_members()
     data = (struct member *) malloc(count * sizeof(struct member));
     count = 0;
     while (sq_get_data(members, &m))
-      bcopy(m, &data[count++], sizeof(struct member));
+      memcpy(&data[count++], m, sizeof(struct member));
     qsort(data, count, sizeof(struct member), membercmp);
     for (count = 0; count < savecount; count++) {
        show_list_member(&data[count]);
@@ -474,10 +820,13 @@ struct save_queue *q;
     case 'S':
        m->type = M_STRING;
        break;
+    case 'K':
+       m->type = M_KERBEROS;
+       break;
     }
     m->name = strsave(argv[1]);
     sq_save_data(q, m);
-    return(SMS_CONT);
+    return(MR_CONT);
 }
 
 
@@ -490,30 +839,79 @@ scream()
 }
 
 
+/* Open file, parse members from file, and put them on the specified queue */
+get_members_from_file(filename, queue)
+char *filename;
+struct save_queue *queue;
+{
+    FILE *in;
+    char buf[BUFSIZ];
+    struct member *memberstruct;
+
+    if (!strcmp(filename, "-"))
+      in = stdin;
+    else {
+       in = fopen(filename, "r");
+       if (!in) {
+           com_err(whoami, errno, "while opening %s for input", filename);
+           exit(2);
+       }
+    }
+
+    while (fgets(buf, BUFSIZ, in))
+      if (memberstruct = parse_member(buf))
+       sq_save_data(queue, memberstruct);
+    if (!feof(in)) {
+      com_err(whoami, errno, "while reading from %s", filename);
+      exit(2);
+    }
+}
+
+
+/* Collect the possible expansions of the alias MAILHUB */
+
+int collect(argc, argv, list)
+int argc;
+char **argv;
+char ***list;
+{
+    int i;
+
+    for (i = 0; (*list)[i]; i++);
+    *list = (char **)realloc(*list, (i + 2) * sizeof(char *));
+    (*list)[i] = strsave(argv[2]);
+    (*list)[i+1] = NULL;
+    return(MR_CONT);
+}
+
+
 /* Parse a line of input, fetching a member.  NULL is returned if a member
- * is not found.  Only the first token on the line is parsed.  ';' is a
- * comment character.
+ * is not found.  ';' is a comment character.
  */
 
 struct member *parse_member(s)
 register char *s;
 {
     register struct member *m;
-    char *p;
+    char *p, *lastchar;
 
     while (*s && isspace(*s))
       s++;
-    p = s;
-    while (*p && isprint(*p) && !isspace(*p) && *p != ';')
-      p++;
-    *p = 0;
+    lastchar = p = s;
+    while (*p && *p != '\n' && *p != ';')
+      if (isprint(*p) && !isspace(*p))
+       lastchar = p++;
+      else
+       p++;
+    lastchar++;
+    *lastchar = 0;
     if (p == s || strlen(s) == 0)
       return(NULL);
 
     if ((m = (struct member *) malloc(sizeof(struct member))) == NULL)
       return(NULL);
 
-    if (p = index(s, ':')) {
+    if (p = strchr(s, ':')) {
        *p = 0;
        m->name = ++p;
        if (!strcasecmp("user", s))
@@ -522,19 +920,18 @@ register char *s;
          m->type = M_LIST;
        else if (!strcasecmp("string", s))
          m->type = M_STRING;
+       else if (!strcasecmp("kerberos", s))
+         m->type = M_KERBEROS;
        else {
-           m->type = M_STRING;
+           m->type = M_ANY;
            *(--p) = ':';
            m->name = s;
        }
        m->name = strsave(m->name);
-       return(m);
+    } else {
+       m->name = strsave(s);
+       m->type = M_ANY;
     }
-    m->name = strsave(s);
-    if (index(s, '@') || index(s, '!') || index(s, '%'))
-      m->type = M_STRING;
-    else
-      m->type = M_ANY;
     return(m);
 }
 
This page took 0.133048 seconds and 4 git commands to generate.