list from maillists and groups tables in addition to the members table.
Added routines validate_label and validate_label_2 used in validating
filesys labels for get_filesys and delete_filesys respectively.
* Copyright (C) 1987 by the Massachusetts Institute of Technology
*
* $Log$
* Copyright (C) 1987 by the Massachusetts Institute of Technology
*
* $Log$
- * Revision 1.13 1987-09-01 16:24:01 wesommer
- * A list should be considered modified if its acl changes.
+ * Revision 1.14 1987-09-04 17:50:03 mike
+ * Renamed delete_list_members to followup_delete_list. New routine removes
+ * list from maillists and groups tables in addition to the members table.
+ * Added routines validate_label and validate_label_2 used in validating
+ * filesys labels for get_filesys and delete_filesys respectively.
+ *
+Revision 1.13 87/09/01 16:24:01 wesommer
+A list should be considered modified if its acl changes.
+
Revision 1.12 87/08/29 00:05:54 mike
Fixed bug in check_nfs.
Added code to upcasify machine names in validate_id.
Revision 1.12 87/08/29 00:05:54 mike
Fixed bug in check_nfs.
Added code to upcasify machine names in validate_id.
- ** delete_list_members - called after the delete_list query to clean up
- ** members table.
+ ** followup_delete_list - called after the delete_list query to clean up
+ ** members table; also deletes list from maillist
+ ** and groups tables.
**
** Inputs: argv[0] - list_id
**
**
** Inputs: argv[0] - list_id
**
-delete_list_members(q, argv)
+followup_delete_list(q, argv)
struct query *q;
register char *argv[];
##{
struct query *q;
register char *argv[];
##{
sq_destroy(sq);
## repeat delete m where m.#list_id = @list_id
sq_destroy(sq);
## repeat delete m where m.#list_id = @list_id
+## repeat delete maillists where maillists.#list_id = @list_id
+## repeat delete groups where groups.#list_id = @list_id
return ((rowcount == 1) ? SMS_EXISTS : vo->error);
##}
return ((rowcount == 1) ? SMS_EXISTS : vo->error);
##}
+/* Special validation routine for get_filesys */
+validate_label(q, argv)
+ struct query *q;
+ char *argv[];
+{
+ register char *label;
+ register char *c;
+
+ label = argv[0];
+ c = (char *)index(label, '*');
+ if (c == label) return(SMS_NOT_UNIQUE);
+ return(SMS_SUCCESS);
+}
+
+/* Special validation routine for delete_filesys */
+validate_label_2(q, argv)
+ struct query *q;
+ char *argv[];
+{
+ if (index(argv[0], '*') != 0) return(SMS_NOT_UNIQUE);
+ return(SMS_SUCCESS);
+}
+
validate_date(argv, vo)
char *argv[];
struct valobj *vo;
validate_date(argv, vo)
char *argv[];
struct valobj *vo;