-#ifndef lint
+#if (!defined(lint) && !defined(SABER))
static char rcsid_module_c[] = "$Header$";
#endif lint
-/* This is the file cluseter.c for allmaint, the SMS client that allows
- * a user to maintaint most important parts of the SMS database.
+/* This is the file cluster.c for the SMS Client, which allows a nieve
+ * user to quickly and easily maintain most parts of the SMS database.
* It Contains:
*
* Created: 4/22/88
* By: Chris D. Peterson
- * Based upon: Clusermaint.c by marcus: 87/07/22
*
* $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
* see the file mit-copyright.h
#include <menu.h>
#include "mit-copyright.h"
-#include "allmaint.h"
-#include "allmaint_funcs.h"
+#include "defs.h"
+#include "f_defs.h"
#include "globals.h"
#include "infodefs.h"
* Returns: info - the array.
*/
-char **
+static char **
SetMachineDefaults(info, name)
char ** info, *name;
{
* Returns: info - the array.
*/
-char **
+static char **
SetClusterDefaults(info, name)
char ** info, *name;
{
return(info);
}
-/* Function Name: SetClusterDataDefaults
- * Description: Sets cluster data defaults.
- * Arguments: info - an array to put the defaults into.
- * name - name of the Cluster.
- * Returns: info - the array.
- */
-
-char **
-SetClusterDataDefaults(info, name)
-char ** info, *name;
-{
- info[CD_NAME] = Strsave(name);
- info[CD_LABEL] = Strsave(CD_DEFAULT_LABEL);
- info[CD_DATA] = Strsave(CD_DEFAULT_DATA);
-/*info[CD_MODBY] = info[CD_MODTIME] = info[CD_MODWITH] = info[CD_END] = NULL;*/
- info[CD_END] = NULL;
- return(info);
-}
-
/* -------------------- General Functions -------------------- */
/* Function Name: PrintMachInfo
* Description: This function Prints out the Machine info in
* a coherent form.
* Arguments: info - array of information about a machine.
- * Returns: none.
+ * Returns: The name of the Machine
*/
-void
+static char *
PrintMachInfo(info)
char ** info;
{
Put_message("");
sprintf(buf, "Machine: %-30s Type: %s", info[M_NAME], info[M_TYPE]);
Put_message(buf);
- sprintf(buf, "Last Modified at %s, by %s with %s",info[M_MODTIME],
- info[M_MODBY], info[M_MODWITH]);
+ sprintf(buf, MOD_FORMAT, info[M_MODBY], info[M_MODTIME], info[M_MODWITH]);
Put_message(buf);
+ return(info[M_NAME]);
}
/* Function Name: PrintClusterInfo
* Description: This function Prints out the cluster info
* in a coherent form.
* Arguments: info - array of information about a cluster.
- * Returns: none.
+ * Returns: The name of the cluster.
*/
-void
+static char *
PrintClusterInfo(info)
char ** info;
{
Put_message(buf);
sprintf(buf, "Location: %s", info[C_LOCATION]);
Put_message(buf);
- sprintf(buf, "Last Modified at %s, by %s with %s",info[C_MODTIME],
- info[C_MODBY], info[C_MODWITH]);
+ sprintf(buf, MOD_FORMAT, info[C_MODBY], info[C_MODTIME], info[C_MODWITH]);
Put_message(buf);
+ return(info[C_NAME]);
}
/* Function Name: PrintClusterData
* Description: Prints the Data on a cluster
* Arguments: info a pointer to the data array.
- * Returns: none
+ * Returns: The name of the cluster.
*/
-void
+static char *
PrintClusterData(info)
char ** info;
{
sprintf(buf, "Cluster: %-20s Label: %-15s Data: %s",
info[CD_NAME], info[CD_LABEL], info[CD_DATA]);
Put_message(buf);
+ return(info[CD_NAME]);
}
/* Function Name: PrintMCMap
* Returns: none
*/
-void
+static char *
PrintMCMap(info)
char ** info;
{
sprintf(buf, "Cluster: %-30s Machine: %-20s",
info[MAP_CLUSTER], info[MAP_MACHINE]);
Put_message(buf);
+ return(""); /* Used by QueryLoop(). */
}
/* Function Name: GetMCInfo.
switch (type) {
case MACHINE:
if ( (stat = sms_query("get_machine", 1, &name1,
- StoreInfo, &elem)) != 0) {
+ StoreInfo, (char *)&elem)) != 0) {
com_err(program_name, stat, " in get_machine.");
return(NULL);
}
break;
case CLUSTER:
if ( (stat = sms_query("get_cluster", 1, &name1,
- StoreInfo, &elem)) != 0) {
+ StoreInfo, (char *)&elem)) != 0) {
com_err(program_name, stat, " in get_cluster.");
return(NULL);
}
args[MAP_MACHINE] = name1;
args[MAP_CLUSTER] = name2;
if ( (stat = sms_query("get_machine_to_cluster_map", 2, args,
- StoreInfo, &elem)) != 0) {
+ StoreInfo, (char *)&elem)) != 0) {
com_err(program_name, stat, " in get_machine_to_cluster_map.");
return(NULL);
}
args[CD_NAME] = name1;
args[CD_LABEL] = name2;
if ( (stat = sms_query("get_cluster_data", 2, args,
- StoreInfo, &elem)) != 0) {
+ StoreInfo, (char *)&elem)) != 0) {
com_err(program_name, stat, " in get_cluster_data.");
return(NULL);
}
int argc;
char **argv;
{
- struct qelem *elem, *top;
-
- top = elem = GetMCInfo(MACHINE, CanonicalizeHostname(argv[1]),
- (char *) NULL);
-
- while (elem != NULL) {
- char **info = (char **) elem->q_data;
- PrintMachInfo(info);
- elem = elem->q_forw;
- }
+ struct qelem *top;
+ top = GetMCInfo(MACHINE, CanonicalizeHostname(argv[1]), (char *) NULL);
+ Loop(top, ( (void *) PrintMachInfo) );
FreeQueue(top);
return(DM_NORMAL);
}
{
char **args, *info[MAX_ARGS_SIZE], *name;
int stat;
+
+ if (!ValidName(argv[1])) /* Checks for wildcards. */
+ return(DM_NORMAL);
/*
* Check to see if this machine already exists.
*/
return(DM_NORMAL);
}
+/* Function Name: RealUpdateMachine
+ * Description: Performs the actual update of the machine data.
+ * Arguments: info - the information on the machine to update.
+ * junk - an UNUSED Boolean.
+ * Returns: none.
+ */
+
+/* ARGSUSED */
+static void
+RealUpdateMachine(info, junk)
+char ** info;
+Bool junk;
+{
+ register int stat;
+ char ** args = AskMCDInfo(info, MACHINE, TRUE);
+ if ( (stat = sms_query("update_machine", CountArgs(args),
+ args, Scream, NULL)) != 0)
+ com_err(program_name, stat, " in UpdateMachine.");
+ else
+ Put_message("Machine sucessfully updated.");
+}
+
/* Function Name: UpdateMachine
* Description: This function adds a new machine to the database.
* Arguments: argc, argv - the name of the machine in argv[1].
int argc;
char **argv;
{
- struct qelem *elem, *top;
- int stat;
- char **args, **info, temp_buf[BUFSIZ];
- Bool one_machine, update_it;
-
- elem = top = GetMCInfo( MACHINE, CanonicalizeHostname(argv[1]),
- (char *) NULL);
+ struct qelem *top = GetMCInfo( MACHINE, CanonicalizeHostname(argv[1]),
+ (char *) NULL);
+ QueryLoop(top, NullPrint, RealUpdateMachine, "Update the machine");
- one_machine = (QueueCount(top) == 1);
- while (elem != NULL) {
- info = (char **) elem->q_data;
- if (one_machine)
- update_it = TRUE;
- else {
- sprintf(temp_buf, "Update %s (y/n/q) ? ", info[M_NAME]);
- switch(YesNoQuitQuestion(temp_buf, FALSE)) {
- case TRUE:
- update_it = TRUE;
- break;
- case FALSE:
- update_it = FALSE;
- break;
- default:
- Put_message("Aborting...");
- FreeQueue(top);
- return(DM_NORMAL);
- }
- }
- if (update_it) {
- args = AskMCDInfo(info, MACHINE, TRUE);
- if ( (stat = sms_query("update_machine", CountArgs(args),
- args, Scream, NULL)) != 0)
- com_err(program_name, stat, " in UpdateMachine.");
- }
- elem = elem->q_forw;
- }
FreeQueue(top);
return(DM_NORMAL);
}
char *args[10], temp_buf[BUFSIZ], *ptr;
struct qelem *top, *elem = NULL;
- ret_value = SUB_NORMAL;
+ ret_value = SUB_NORMAL; /* initialize ret_value. */
args[0] = name;
args[1] = "*";
stat = sms_query("get_machine_to_cluster_map", 2, args,
- StoreInfo, &elem);
+ StoreInfo, (char *)&elem);
if (stat && stat != SMS_NO_MATCH) {
com_err(program_name, stat, " in get_machine_to_cluster_map.");
return(DM_NORMAL);
}
- if (stat == 0) {
+ if (stat == SMS_SUCCESS) {
elem = top = QueueTop(elem);
if (ask_user) {
sprintf(temp_buf, "%s is assigned to the following clusters.",
name);
Put_message(temp_buf);
- while (elem != NULL) {
- char **info = (char **) elem->q_data;
- Print(1, &info[MAP_CLUSTER], (char *) NULL);
- elem = elem->q_forw;
- }
+ Loop(top, (void *) PrintMCMap);
ptr = "Remove this machine from ** ALL ** these clusters?";
-
if (YesNoQuestion(ptr, FALSE) == TRUE) /* may return -1. */
delete_it = TRUE;
else {
delete_it = TRUE;
if (delete_it) {
- elem = top;
- while (elem != 0) {
+ while (elem != NULL) {
char **info = (char **) elem->q_data;
if ( (stat = sms_query( "delete_machine_from_cluster",
2, info, Scream, NULL)) != 0) {
return(ret_value);
}
+/* Function Name: RealDeleteMachine
+ * Description: Actually Deletes the Machine.
+ * Arguments: info - nescessary information stored as an array of char *'s
+ * one_machine - a boolean, true if there is only one item in
+ * the query.
+ * Returns: none.
+ */
+
+static void
+RealDeleteMachine(info, one_machine)
+char ** info;
+Bool one_machine;
+{
+ register int stat;
+ char temp_buf[BUFSIZ];
+
+ sprintf(temp_buf, "Are you sure you want to delete the machine %s (y/n)? ",
+ info[M_NAME]);
+ if(!one_machine || Confirm(temp_buf)) {
+ if (CheckAndRemoveFromCluster(info[M_NAME], TRUE) != SUB_ERROR) {
+ if ( (stat = sms_query("delete_machine", 1,
+ &info[M_NAME], Scream, NULL)) != 0) {
+ com_err(program_name, stat, " in DeleteMachine.");
+ sprintf(temp_buf, "%s ** NOT ** deleted.",
+ info[M_NAME]);
+ Put_message(temp_buf);
+ }
+ else {
+ sprintf(temp_buf, "%s successfully Deleted.", info[M_NAME]);
+ Put_message(temp_buf);
+ }
+ }
+ }
+}
+
/* Function Name: DeleteMachine
* Description: This function removes a machine from the data base.
* Arguments: argc, argv - the machines name int argv[1].
int argc;
char **argv;
{
- int stat;
- Bool one_machine, delete_it = FALSE;
- char *name, temp_buf[BUFSIZ];
- struct qelem *top, *elem = NULL;
-
- name = CanonicalizeHostname(argv[1]);
- top = elem = GetMCInfo(MACHINE, name, (char *) NULL);
+ struct qelem *top;
- one_machine = (QueueCount(top) == 1);
- while (elem != NULL) {
- char **info = (char **) elem->q_data;
- if (one_machine) {
- if(Confirm("Are you sure that you want to delete this machine?"))
- delete_it = TRUE;
- }
- else {
- sprintf(temp_buf, "Delete the machine %s (y/n/q)? ", info[M_NAME]);
- switch (YesNoQuitQuestion(temp_buf, FALSE)) {
- case TRUE:
- delete_it = TRUE;
- break;
- case FALSE:
- delete_it = FALSE;
- sprintf(temp_buf, "%s not Deleted.", info[M_NAME]);
- Put_message(temp_buf);
- break;
- default: /* quit. */
- Put_message("Aborting...");
- FreeQueue(top);
- return(DM_NORMAL);
- }
- }
- if (delete_it) {
- if (CheckAndRemoveFromCluster(info[M_NAME], TRUE) != SUB_ERROR) {
- if ( (stat = sms_query("delete_machine", 1,
- &info[M_NAME], Scream, NULL)) != 0) {
- com_err(program_name, stat, " in DeleteMachine.");
- sprintf(temp_buf, "%s ** NOT ** deleted.",
- info[M_NAME]);
- Put_message(temp_buf);
- }
- else {
- sprintf(temp_buf, "%s sucesfully Deleted.", info[M_NAME]);
- Put_message(temp_buf);
- }
- }
- }
- elem = elem->q_forw;
- }
+ top = GetMCInfo(MACHINE, CanonicalizeHostname(argv[1]), (char *) NULL);
+ QueryLoop(top, PrintMachInfo, RealDeleteMachine, "Delete the machine");
FreeQueue(top);
return(DM_NORMAL);
}
one_machine = (QueueCount(mtop) == 1);
one_cluster = (QueueCount(ctop) == 1);
+ /* No good way to use QueryLoop() here, sigh */
+
while (melem != NULL) {
char ** minfo = (char **) melem->q_data;
while (celem != NULL) {
return(DM_NORMAL);
}
+/* Function Name: RealRemoveMachineFromCluster
+ * Description: This function actually removes the machine from its
+ * cluster.
+ * Arguments: info - all information nescessary to perform the removal.
+ * one_map - True if there is only one case, and we should
+ * confirm.
+ * Returns: none.
+ */
+
+static void
+RealRemoveMachineFromCluster(info, one_map)
+char ** info;
+Bool one_map;
+{
+ char temp_buf[BUFSIZ];
+ register int stat;
+
+ sprintf(temp_buf, "Remove %s from the cluster %s",
+ info[MAP_MACHINE], info[MAP_MACHINE]);
+ if (!one_map || Confirm(temp_buf)) {
+ if ( (stat = sms_query("delete_machine_from_cluster", 2,
+ info, Scream, NULL)) != 0 )
+ com_err(program_name, stat, " in delete_machine_from_cluster");
+ else {
+ sprintf(temp_buf, "%s has been removed from the cluster %s.",
+ info[MAP_MACHINE], info[MAP_CLUSTER]);
+ Put_message(temp_buf);
+ }
+ }
+ else
+ Put_message("Machine not removed.");
+}
+
/* Function Name: RemoveMachineFromCluster
* Description: Removes this machine form a specific cluster.
* Arguments: argc, argv - Name of machine in argv[1].
int argc;
char ** argv;
{
- int stat;
- Bool remove_machine, one_item;
- struct qelem *top, *elem = NULL;
+ struct qelem *elem = NULL;
char buf[BUFSIZ], * args[10];
+ register int stat;
args[MAP_MACHINE] = CanonicalizeHostname(argv[1]);
args[MAP_CLUSTER] = argv[2];
args[MAP_END] = NULL;
stat = sms_query("get_machine_to_cluster_map", CountArgs(args), args,
- StoreInfo, &elem);
+ StoreInfo, (char *)&elem);
if (stat == SMS_NO_MATCH) {
sprintf(buf, "The machine %s is not is the cluster %s.",
args[MAP_MACHINE], args[MAP_CLUSTER]);
Put_message(buf);
return(DM_NORMAL);
}
- if (stat)
+ if (stat != SMS_SUCCESS)
com_err(program_name, stat, " in delete_machine_from_cluster");
- top = elem = QueueTop(elem);
- one_item = (QueueCount(top) == 1);
- while (elem != NULL) {
- char **info = (char **) elem->q_data;
- if (one_item)
- remove_machine = TRUE;
- else {
- sprintf(buf, "Remove %s from the cluster %s? (y/n/q)",
- info[MAP_MACHINE], info[MAP_CLUSTER]);
- switch (YesNoQuitQuestion(buf, FALSE)) {
- case TRUE:
- remove_machine = TRUE;
- break;
- case FALSE:
- remove_machine = FALSE;
- break;
- default:
- Put_message("Aborting");
- FreeQueue(top);
- return(DM_NORMAL);
- }
- }
- if (remove_machine)
- if ( (stat = sms_query("delete_machine_from_cluster", 2,
- info, Scream, NULL)) != 0 )
- com_err(program_name, stat,
- " in delete_machine_from_cluster");
- else {
- sprintf(buf, "%s has been removed from the cluster %s.",
- info[MAP_MACHINE], info[MAP_CLUSTER]);
- Put_message(buf);
- }
- elem = elem->q_forw;
- }
- FreeQueue(top);
+ elem = QueueTop(elem);
+ QueryLoop(elem, PrintMCMap, RealRemoveMachineFromCluster,
+ "Remove this machine from this cluster");
+
+ FreeQueue(elem);
return(DM_NORMAL);
}
int argc;
char ** argv;
{
- char **info;
- struct qelem *elem, *top;
+ struct qelem *top;
- top = elem = GetMCInfo( CLUSTER, CanonicalizeHostname(argv[1]),
- (char *) NULL);
- while (elem != NULL) {
- info = (char **) elem->q_data;
- PrintClusterInfo(info);
- elem = elem->q_forw;
- }
+ top = GetMCInfo(CLUSTER, CanonicalizeHostname(argv[1]), (char *) NULL);
+ Loop(top, (void *) PrintClusterInfo);
FreeQueue(top);
return(DM_NORMAL);
}
int argc;
char ** argv;
{
- char **args, *info[MAX_ARGS_SIZE], *name;
+ char **args, *info[MAX_ARGS_SIZE], *name = argv[1];
int stat;
/*
- * Check to see if this machine already exists.
+ * Check to see if this cluster already exists.
*/
- name = argv[1];
+ if (!ValidName(name))
+ return(DM_NORMAL);
- if ( (stat = sms_query("get_cluster", 1, &name, NullFunc, NULL)) == 0) {
+ if ( (stat = sms_query("get_cluster", 1, &name,
+ NullFunc, NULL)) == SMS_SUCCESS) {
Put_message("This cluster already exists.");
return(DM_NORMAL);
}
com_err(program_name, stat, " in AddCluster.");
return(DM_NORMAL);
}
-
args = AskMCDInfo(SetClusterDefaults(info, name), CLUSTER, FALSE);
-
/*
* Actually create the new Cluster.
*/
-
if ( (stat = sms_query("add_cluster", CountArgs(args),
args, Scream, NULL)) != 0)
com_err(program_name, stat, " in AddCluster.");
return(DM_NORMAL);
}
+/* Function Name: RealUpdateCluster
+ * Description: This function actually performs the cluster update.
+ * Arguments: info - all information nesc. for updating the cluster.
+ * junk - an UNUSED boolean.
+ * Returns: none.
+ */
+
+/* ARGSUSED */
+static void
+RealUpdateCluster(info, junk)
+char ** info;
+Bool junk;
+{
+ register int stat;
+ char ** args = AskMCDInfo(info, CLUSTER, TRUE);
+ if ( (stat = sms_query("update_cluster", CountArgs(args),
+ args, Scream, NULL)) != 0)
+ com_err(program_name, stat, " in UpdateCluster.");
+ else
+ Put_message("Cluster successfully updated.");
+}
+
/* Function Name: UpdateCluster
* Description: This Function Updates a cluster
* Arguments: name of the cluster in argv[1].
int argc;
char ** argv;
{
- struct qelem *elem, *top;
- char **args, **info, temp_buf[BUFSIZ];
- int stat;
- Bool one_cluster, update_it;
-
- elem = top = GetMCInfo( CLUSTER, argv[1], (char *) NULL );
+ struct qelem *top;
+ top = GetMCInfo( CLUSTER, argv[1], (char *) NULL );
+ QueryLoop(top, NullPrint, RealUpdateCluster, "Update the cluster");
- one_cluster = (QueueCount(top) == 1);
- while (elem != NULL) {
- info = (char **) elem->q_data;
- if (one_cluster)
- update_it = TRUE;
- else {
- sprintf(temp_buf, "Update Cluster %s (y/n/q) ? ", info[C_NAME]);
- switch(YesNoQuitQuestion(temp_buf, FALSE)) {
- case TRUE:
- update_it = TRUE;
- break;
- case FALSE:
- update_it = FALSE;
- break;
- default:
- Put_message("Aborting...");
- FreeQueue(top);
- return(DM_NORMAL);
- }
- }
- if (update_it) {
- args = AskMCDInfo(info, CLUSTER, TRUE);
- if ( (stat = sms_query("update_cluster", CountArgs(args),
- args, Scream, NULL)) != 0)
- com_err(program_name, stat, " in UpdateCluster.");
- }
- elem = elem->q_forw;
- }
FreeQueue(top);
return(DM_NORMAL);
}
args[MAP_MACHINE] = "*";
args[MAP_CLUSTER] = name;
stat = sms_query("get_machine_to_cluster_map", 2, args,
- StoreInfo, &elem);
+ StoreInfo, (char *)&elem);
if (stat && stat != SMS_NO_MATCH) {
com_err(program_name, stat, " in get_machine_to_cluster_map.");
return(DM_NORMAL);
return(ret_value);
}
+/* Function Name: RealDeleteCluster
+ * Description: Actually performs the cluster deletion.
+ * Arguments: info - all information about this cluster.
+ * one_cluster - If true then there was only one cluster in
+ * the queue, and we should confirm.
+ * Returns: none.
+ */
+
+static void
+RealDeleteCluster(info, one_cluster)
+char ** info;
+Bool one_cluster;
+{
+ register int stat;
+ char temp_buf[BUFSIZ];
+
+ sprintf(temp_buf,
+ "Are you sure the you want to delete the cluster %s (y/n) ?",
+ info[C_NAME]);
+ if (!one_cluster || Confirm(temp_buf)) {
+ if (CheckAndRemoveMachines(info[C_NAME], TRUE) != SUB_ERROR) {
+ if ( (stat = sms_query("delete_cluster", 1,
+ &info[C_NAME], Scream, NULL)) != 0) {
+ com_err(program_name, stat, " in delete_cluster.");
+ sprintf(temp_buf, "Cluster %s ** NOT ** deleted.",
+ info[C_NAME]);
+ Put_message(temp_buf);
+ }
+ else {
+ sprintf(temp_buf, "cluster %s sucesfully deleted.",
+ info[C_NAME]);
+ Put_message(temp_buf);
+ }
+ }
+ }
+}
/* Function Name: DeleteCluster
* Description: This function removes a cluster from the database.
int argc;
char ** argv;
{
- char temp_buf[BUFSIZ];
- int stat;
- Bool one_cluster, delete_it = FALSE;
- struct qelem *elem, *top;
+ struct qelem *top;
- top = elem = GetMCInfo( CLUSTER, argv[1], (char *) NULL );
+ top = GetMCInfo( CLUSTER, argv[1], (char *) NULL );
+ QueryLoop(top, PrintClusterInfo, RealDeleteCluster, "Delete the cluster");
- one_cluster = (QueueCount(top) == 1);
- while (elem != NULL) {
- char **info = (char **) elem->q_data;
- if (one_cluster) {
- if(Confirm("Are you sure that you want to delete this cluster?"))
- delete_it = TRUE;
- }
- else {
- PrintClusterInfo(info);
- sprintf(temp_buf, "Delete the cluster %s (y/n/q)? ", info[C_NAME]);
- switch (YesNoQuitQuestion(temp_buf, FALSE)) {
- case TRUE:
- delete_it = TRUE;
- break;
- case FALSE:
- delete_it = FALSE;
- sprintf(temp_buf, "%s not Deleted.", info[C_NAME]);
- Put_message(temp_buf);
- break;
- default: /* quit. */
- Put_message("Aborting...");
- FreeQueue(top);
- return(DM_NORMAL);
- }
- }
- if (delete_it) {
- if (CheckAndRemoveMachines(info[C_NAME], TRUE) != SUB_ERROR) {
- if ( (stat = sms_query("delete_cluster", 1,
- &info[C_NAME], Scream, NULL)) != 0) {
- com_err(program_name, stat, " in DeleteCluster.");
- sprintf(temp_buf, "Cluster %s ** NOT ** deleted.",
- info[C_NAME]);
- Put_message(temp_buf);
- }
- else {
- sprintf(temp_buf, "cluster %s sucesfully Deleted.",
- info[C_NAME]);
- Put_message(temp_buf);
- }
- }
- }
- elem = elem->q_forw;
- }
FreeQueue(top);
return(DM_NORMAL);
}
-
+
/* ----------- Cluster Data Menu -------------- */
/* Function Name: ShowClusterData
}
+/* Function Name: RealRemoveClusterData
+ * Description: actually removes the cluster data.
+ * Arguments: info - all info necessary to remove the cluster, in an array
+ * of strings.
+ * one_item - if true then the queue has only one elem and we
+ * should confirm.
+ * Returns: none.
+ */
+
+static void
+RealRemoveClusterData(info, one_item)
+char ** info;
+Bool one_item;
+{
+ register int stat;
+ char * temp_ptr;
+
+ Put_message(" ");
+ temp_ptr = "Are you sure that you want to remove this cluster (y/n) ?";
+ if (!one_item) PrintClusterData(info);
+ if (!one_item || Confirm(temp_ptr)) {
+ if( (stat = sms_query("delete_cluster_data", 3, info,
+ Scream, (char *) NULL)) != 0) {
+ com_err(program_name, stat, " in DeleteClusterData.");
+ Put_message("Data not removed.");
+ }
+ else
+ Put_message("Removal sucessful.");
+ }
+}
+
/* Function Name: RemoveClusterData
* Description: This function removes data on a given cluster.
* Arguments: argv, argc: argv[1] - the name of the cluster.
int argc;
char ** argv;
{
- Bool one_piece_of_data, remove_it;
- int stat;
- struct qelem *elem, *top;
+ struct qelem *top;
- top = elem = GetMCInfo(DATA, argv[1], argv[2]);
+ top = GetMCInfo(DATA, argv[1], argv[2]);
+ QueryLoop(top, PrintClusterData, RealRemoveClusterData,
+ "Remove this cluster data");
- one_piece_of_data = (QueueCount(elem) == 1);
- while (elem != NULL) {
- char **info = (char **) elem->q_data;
- if (one_piece_of_data) {
- if(Confirm("Do you really want to remove this data?"))
- remove_it = TRUE;
- else
- Put_message("Operation aborted.\n");
- }
- else {
- PrintClusterData(info);
- switch (YesNoQuitQuestion
- ("Remove this piece of cluster data (y/n/q) ? ", FALSE)) {
- case TRUE:
- remove_it = TRUE;
- break;
- case FALSE:
- remove_it = FALSE;
- break;
- default:
- Put_message("Aborting");
- FreeQueue(top);
- return(DM_NORMAL);
- }
- }
- if (remove_it) {
- if( (stat = sms_query("delete_cluster_data", 3, info,
- Scream, (char *) NULL)) != 0) {
- com_err(program_name, stat, " in DeleteClusterData.");
- Put_message("Data not removed.");
- }
- else
- Put_message("Removal sucessful.");
- }
- elem = elem->q_forw;
- }
FreeQueue(top);
return(DM_NORMAL);
}
-/* Perhaps an interactive delete cluster data would be nice. */
-
/* Function Name: MachineToClusterMap
* Description: This Retrieves the mapping between machine and cluster
* Arguments: argc, argv - argv[1] -> machine name or wildcard.
return(DM_NORMAL);
}
-/* Function Name: MachinesInCluster
- * Description: Shows all machines in a give cluster.
- * Arguments: argv, argc - name of cluster in argv[1].
- * Returns: DM_NORMAL;
- */
-
-/* ARGSUSED */
-int
-MachinesInCluster(argc, argv)
-int argc;
-char **argv;
-{
- char *info[10];
- info[0] = argv[0];
- info[2] = argv[1];
- info[1] = "*";
- return(MachineToClusterMap(3, info));
-}
-
/*
* Local Variables:
* mode: c
andersk / moira.git / blobdiff