[moira.git] / clients / moira / pobox.c

#if (!defined(lint) && !defined(SABER))
  static char rcsid_module_c[] = "$Header$";
#endif lint

/*	This is the file pobox.c for the MOIRA Client, which allows a nieve
 *      user to quickly and easily maintain most parts of the MOIRA database.
 *	It Contains: Functions for handling the poboxes.
 *	
 *	Created: 	7/10/88
 *	By:		Chris D. Peterson
 *
 *      $Source$
 *      $Author$
 *      $Header$
 *	
 *  	Copyright 1988 by the Massachusetts Institute of Technology.
 *
 *	For further information on copyright and distribution 
 *	see the file mit-copyright.h
 */

#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include <moira.h>
#include <moira_site.h>
#include <menu.h>

#include "mit-copyright.h"
#include "defs.h"
#include "f_defs.h"
#include "globals.h"

#define FOREIGN_BOX ("SMTP")
#define LOCAL_BOX ("POP")

/*	Function Name: PrintPOBox
 *	Description: Yet another specialized print function.
 *	Arguments: info - all info about this PO_box.
 *	Returns: MR_CONT
 */

static void
PrintPOBox(info)
char ** info;
{
    char buf[BUFSIZ];
    
    sprintf(buf, "Address: %-10s Box: %-35s Type: %s", info[PO_NAME],
	    info[PO_BOX], info[PO_TYPE]);
    Put_message(buf);
    sprintf(buf, MOD_FORMAT, info[4], info[3], info[5]);
    Put_message(buf);
}

/*	Function Name: RealPrintPOMachines
 *	Description: Actually does the printing for PrintPOMachines.
 *	Arguments: info, - name of machines in info[1].
 *	Returns: none.
 */

static void
RealPrintPOMachines(info)
char ** info;
{
    Print(1, info + 1, (char *) NULL);
}

/*	Function Name: PrintPOMachines
 *	Description: Prints all current post offices.
 *	Arguments: none.
 *	Returns: SUB_ERROR if the machines could not be printed.
 */

static int
PrintPOMachines()
{
    register int status;
    static char * args[] = {"pop", NULL};
    struct qelem * top = NULL;
    
    if ( (status = do_mr_query("get_server_locations", CountArgs(args), args,
				StoreInfo, (char *)&top)) != MR_SUCCESS) {
	com_err(program_name, status, " in get_server_locations.");
	return(SUB_ERROR);
    }
    
    top = QueueTop(top);
    Loop(top, RealPrintPOMachines);
    FreeQueue(top);
    return(SUB_NORMAL);
}

/*	Function Name: GetUserPOBox
 *	Description: prints the users POBox information.
 *	Arguments: argc, argv - name of the user in argv[1].
 *	Returns: DM_NORMAL.
 */

/* ARGSUSED */
int
GetUserPOBox(argc, argv)
int argc;
char ** argv;
{
    register int status;
    struct qelem * top = NULL;
    char buf[BUFSIZ];

    if (!ValidName(argv[1]))
	return(DM_NORMAL);
    
    switch (status = do_mr_query("get_pobox", 1, argv + 1, StoreInfo, 
				  (char *)&top)) {
    case MR_NO_MATCH:
	Put_message("This user has no P.O. Box.");
	break;
    case MR_SUCCESS:
	sprintf(buf,"Current pobox for user %s: \n", argv[1]);
	Put_message("");
	top = QueueTop(top);
	Loop(top, PrintPOBox);	/* should only return 1 box. */
	FreeQueue(top);
	break;
    default:
	com_err(program_name, status, " in get_pobox.");
    }
    return(DM_NORMAL);
}

/*	Function Name: GetNewLocalPOBox
 *	Description: get the machine for a new local pop Box for the user.
 *	Arguments: local_user - name of the local user.
 *	Returns: machine - name of the machine for then new pop box, or NULL.
 */

static char *
GetNewLocalPOBox(local_user)
char * local_user;
{
    char temp_buf[BUFSIZ];

    sprintf(temp_buf,"%s %s", "Pick one of the following",
	    "machines for this user's Post Office.");
    Put_message(temp_buf);
    Put_message("");
    if (PrintPOMachines() == SUB_NORMAL) {
	Put_message("");
	if (!Prompt_input("Which Machine? ", temp_buf, BUFSIZ))
	  return((char *) SUB_ERROR);
	return(canonicalize_hostname(strsave(temp_buf)));
    }
    Put_message("Could not get machines to choose from, quitting.");
    return((char *) SUB_ERROR);
}

/*	Function Name: SetUserPOBox
 *	Description: Addes or Chnages the P.O. Box for a user.
 *	Arguments: argc, argv - the login name of the user in argv[1].
 *	Returns: DM_NORMAL.
 */

int
SetUserPOBox(argc, argv)
int argc;
char **argv;
{
    register int status;
    char *type, temp_buf[BUFSIZ], *local_user, *args[10], box[BUFSIZ];
    char *temp_box;
    struct qelem * top = NULL;
    local_user = argv[1];

    if (!ValidName(local_user))
	return(DM_NORMAL);
    
    /* Print the current PO Box info */
    switch (status = do_mr_query("get_pobox", 1, argv + 1, StoreInfo, 
				  (char *)&top)) {
    case MR_SUCCESS:
	sprintf(temp_buf,"Current pobox for user %s: \n", local_user);
	Put_message("");
	top = QueueTop(top);
	Loop(top, PrintPOBox);	/* should only return 1 box. */
	FreeQueue(top);
	break;
    case MR_NO_MATCH:
	Put_message("This user has no P.O. Box.");
	break;
    default:
	com_err(program_name, status, " in get_pobox.");
	return(DM_NORMAL); 
    }

    sprintf(temp_buf, "Assign %s a local PO Box (y/n)", local_user);
    switch (YesNoQuestion(temp_buf, TRUE)) {
    case TRUE:
	type = LOCAL_BOX;
	switch (YesNoQuestion("Use Previous Local Box (y/n)", TRUE)) {
	case TRUE:
	    switch (status = do_mr_query("set_pobox_pop", 1, 
					  &local_user, Scream, NULL)) {
	    case MR_SUCCESS:
		return(DM_NORMAL);
	    case MR_MACHINE:
		sprintf(temp_buf, "%s did not have a previous local PO Box.",
			local_user);
		Put_message(temp_buf);
		if ( (temp_box = GetNewLocalPOBox(local_user)) !=
		    	(char *) SUB_ERROR) {
		    strcpy(box, temp_box);
		    free(temp_box);
		}
		else
		    return(DM_NORMAL);
		break;
	    default:
		com_err(program_name, status, " in set_pobox_pop.");
		return(DM_NORMAL);
	    }
	    break;
	case FALSE:
	    if ( (temp_box = GetNewLocalPOBox(local_user)) !=
			(char *) SUB_ERROR) {
		strcpy(box, temp_box);
		free(temp_box);
	    }
	    else
		return(DM_NORMAL);
	    break;
	default:
	    return(DM_NORMAL);
	}
	break;
    case FALSE:
	type = FOREIGN_BOX;
	sprintf(temp_buf, "Set up a foreign PO Box for %s (y/n)", local_user);
	switch( YesNoQuestion(temp_buf, TRUE)) {
	case TRUE:
	    if (!Prompt_input("Foreign PO Box for this user? ", box, BUFSIZ))
		return(DM_NORMAL);
	    break;
	case FALSE:
	default:
	    return(DM_NORMAL);	/* ^C hit. */
	}
	break;
    default:			/* ^C hit. */
	Put_message("Aborted.");
	return(DM_NORMAL);
    }

    args[PO_NAME] = local_user;
    args[PO_TYPE] = type;
    args[PO_BOX] = box;
    args[PO_END] = NULL;
    if ( (status = do_mr_query("set_pobox", CountArgs(args), args, 
				Scream, NULL)) != MR_SUCCESS )
	com_err(program_name, status, " in ChangeUserPOBox");
    else
	Put_message("PO Box assigned.");

    return (DM_NORMAL);
}

/*	Function Name: RemoveUserPOBox
 *	Description: Removes this users POBox.
 *	Arguments: argc, argv - name of user in argv[1].
 *	Returns: DM_NORMAL.
 */

/*ARGSUSED */
int
RemoveUserPOBox(argc, argv)
int argc;
char ** argv;
{
    register int status;
    char temp_buf[BUFSIZ];
   
    if (!ValidName(argv[1]))
	return(DM_NORMAL);

    sprintf(temp_buf,
	    "Are you sure that you want to remove %s's PO Box (y/n)", argv[1]);
    
    if (Confirm(temp_buf)) {
	if ( (status = do_mr_query("delete_pobox", 1, argv + 1,
				    Scream, NULL)) != MR_SUCCESS)
	    com_err(program_name, status, " in delete_pobox.");
	else
	    Put_message("PO Box removed.");
    }
    return(DM_NORMAL);
}
Commit	Line	Data
73c83e3d	1	#if (!defined(lint) && !defined(SABER))
	2	static char rcsid_module_c[] = "$Header$";
	3	#endif lint
	4
8defc06b	5	/* This is the file pobox.c for the MOIRA Client, which allows a nieve
8defc06b	6	* user to quickly and easily maintain most parts of the MOIRA database.
0a2c64cb	7	* It Contains: Functions for handling the poboxes.
73c83e3d	8	*
0a2c64cb	9	* Created: 7/10/88
0a2c64cb	10	* By: Chris D. Peterson
73c83e3d	11	*
	12	* $Source$
	13	* $Author$
	14	* $Header$
	15	*
0a2c64cb	16	* Copyright 1988 by the Massachusetts Institute of Technology.
73c83e3d	17	*
	18	* For further information on copyright and distribution
	19	* see the file mit-copyright.h
	20	*/
	21
73c83e3d	22	#include <stdio.h>
24419c79	23	#include <string.h>
73c83e3d	24	#include <ctype.h>
8defc06b	25	#include <moira.h>
8defc06b	26	#include <moira_site.h>
73c83e3d	27	#include <menu.h>
	28
	29	#include "mit-copyright.h"
0a2c64cb	30	#include "defs.h"
0a2c64cb	31	#include "f_defs.h"
73c83e3d	32	#include "globals.h"
73c83e3d	33
	34	#define FOREIGN_BOX ("SMTP")
	35	#define LOCAL_BOX ("POP")
	36
	37	/* Function Name: PrintPOBox
	38	* Description: Yet another specialized print function.
	39	* Arguments: info - all info about this PO_box.
8defc06b	40	* Returns: MR_CONT
73c83e3d	41	*/
	42
	43	static void
	44	PrintPOBox(info)
	45	char ** info;
	46	{
	47	char buf[BUFSIZ];
	48
	49	sprintf(buf, "Address: %-10s Box: %-35s Type: %s", info[PO_NAME],
	50	info[PO_BOX], info[PO_TYPE]);
	51	Put_message(buf);
25ee8d50	52	sprintf(buf, MOD_FORMAT, info[4], info[3], info[5]);
25ee8d50	53	Put_message(buf);
73c83e3d	54	}
	55
	56	/* Function Name: RealPrintPOMachines
	57	* Description: Actually does the printing for PrintPOMachines.
	58	* Arguments: info, - name of machines in info[1].
	59	* Returns: none.
	60	*/
	61
	62	static void
	63	RealPrintPOMachines(info)
	64	char ** info;
	65	{
	66	Print(1, info + 1, (char *) NULL);
	67	}
	68
	69	/* Function Name: PrintPOMachines
	70	* Description: Prints all current post offices.
	71	* Arguments: none.
0a2c64cb	72	* Returns: SUB_ERROR if the machines could not be printed.
73c83e3d	73	*/
73c83e3d	74
0a2c64cb	75	static int
73c83e3d	76	PrintPOMachines()
	77	{
	78	register int status;
	79	static char * args[] = {"pop", NULL};
	80	struct qelem * top = NULL;
	81
8defc06b	82	if ( (status = do_mr_query("get_server_locations", CountArgs(args), args,
8defc06b	83	StoreInfo, (char *)&top)) != MR_SUCCESS) {
0a2c64cb	84	com_err(program_name, status, " in get_server_locations.");
	85	return(SUB_ERROR);
	86	}
73c83e3d	87
	88	top = QueueTop(top);
	89	Loop(top, RealPrintPOMachines);
	90	FreeQueue(top);
0a2c64cb	91	return(SUB_NORMAL);
73c83e3d	92	}
	93
	94	/* Function Name: GetUserPOBox
	95	* Description: prints the users POBox information.
	96	* Arguments: argc, argv - name of the user in argv[1].
	97	* Returns: DM_NORMAL.
	98	*/
	99
	100	/* ARGSUSED */
	101	int
	102	GetUserPOBox(argc, argv)
	103	int argc;
	104	char ** argv;
	105	{
	106	register int status;
	107	struct qelem * top = NULL;
	108	char buf[BUFSIZ];
	109
	110	if (!ValidName(argv[1]))
	111	return(DM_NORMAL);
	112
8defc06b	113	switch (status = do_mr_query("get_pobox", 1, argv + 1, StoreInfo,
14f99d7d	114	(char *)&top)) {
8defc06b	115	case MR_NO_MATCH:
73c83e3d	116	Put_message("This user has no P.O. Box.");
73c83e3d	117	break;
8defc06b	118	case MR_SUCCESS:
73c83e3d	119	sprintf(buf,"Current pobox for user %s: \n", argv[1]);
	120	Put_message("");
	121	top = QueueTop(top);
	122	Loop(top, PrintPOBox); /* should only return 1 box. */
	123	FreeQueue(top);
	124	break;
	125	default:
54a99f03	126	com_err(program_name, status, " in get_pobox.");
73c83e3d	127	}
	128	return(DM_NORMAL);
	129	}
	130
	131	/* Function Name: GetNewLocalPOBox
	132	* Description: get the machine for a new local pop Box for the user.
	133	* Arguments: local_user - name of the local user.
0a2c64cb	134	* Returns: machine - name of the machine for then new pop box, or NULL.
73c83e3d	135	*/
	136
	137	static char *
	138	GetNewLocalPOBox(local_user)
	139	char * local_user;
	140	{
	141	char temp_buf[BUFSIZ];
	142
73c83e3d	143	sprintf(temp_buf,"%s %s", "Pick one of the following",
	144	"machines for this user's Post Office.");
	145	Put_message(temp_buf);
73c83e3d	146	Put_message("");
0a2c64cb	147	if (PrintPOMachines() == SUB_NORMAL) {
0a2c64cb	148	Put_message("");
57bfac11	149	if (!Prompt_input("Which Machine? ", temp_buf, BUFSIZ))
57bfac11	150	return((char *) SUB_ERROR);
2aaf43e0	151	return(canonicalize_hostname(strsave(temp_buf)));
0a2c64cb	152	}
0a2c64cb	153	Put_message("Could not get machines to choose from, quitting.");
6f368c99	154	return((char *) SUB_ERROR);
73c83e3d	155	}
	156
	157	/* Function Name: SetUserPOBox
	158	* Description: Addes or Chnages the P.O. Box for a user.
	159	* Arguments: argc, argv - the login name of the user in argv[1].
	160	* Returns: DM_NORMAL.
	161	*/
	162
	163	int
	164	SetUserPOBox(argc, argv)
	165	int argc;
	166	char **argv;
	167	{
	168	register int status;
	169	char type, temp_buf[BUFSIZ], local_user, *args[10], box[BUFSIZ];
0a2c64cb	170	char *temp_box;
2f25313c	171	struct qelem * top = NULL;
73c83e3d	172	local_user = argv[1];
	173
	174	if (!ValidName(local_user))
	175	return(DM_NORMAL);
	176
2f25313c	177	/* Print the current PO Box info */
	178	switch (status = do_mr_query("get_pobox", 1, argv + 1, StoreInfo,
	179	(char *)&top)) {
	180	case MR_SUCCESS:
	181	sprintf(temp_buf,"Current pobox for user %s: \n", local_user);
	182	Put_message("");
	183	top = QueueTop(top);
	184	Loop(top, PrintPOBox); /* should only return 1 box. */
	185	FreeQueue(top);
	186	break;
	187	case MR_NO_MATCH:
	188	Put_message("This user has no P.O. Box.");
	189	break;
	190	default:
	191	com_err(program_name, status, " in get_pobox.");
	192	return(DM_NORMAL);
	193	}
	194
73c83e3d	195	sprintf(temp_buf, "Assign %s a local PO Box (y/n)", local_user);
	196	switch (YesNoQuestion(temp_buf, TRUE)) {
	197	case TRUE:
	198	type = LOCAL_BOX;
	199	switch (YesNoQuestion("Use Previous Local Box (y/n)", TRUE)) {
	200	case TRUE:
8defc06b	201	switch (status = do_mr_query("set_pobox_pop", 1,
14f99d7d	202	&local_user, Scream, NULL)) {
8defc06b	203	case MR_SUCCESS:
73c83e3d	204	return(DM_NORMAL);
8defc06b	205	case MR_MACHINE:
54a99f03	206	sprintf(temp_buf, "%s did not have a previous local PO Box.",
	207	local_user);
	208	Put_message(temp_buf);
6f368c99	209	if ( (temp_box = GetNewLocalPOBox(local_user)) !=
6f368c99	210	(char *) SUB_ERROR) {
0a2c64cb	211	strcpy(box, temp_box);
	212	free(temp_box);
	213	}
	214	else
	215	return(DM_NORMAL);
73c83e3d	216	break;
73c83e3d	217	default:
2f25313c	218	com_err(program_name, status, " in set_pobox_pop.");
73c83e3d	219	return(DM_NORMAL);
73c83e3d	220	}
6f368c99	221	break;
73c83e3d	222	case FALSE:
6f368c99	223	if ( (temp_box = GetNewLocalPOBox(local_user)) !=
	224	(char *) SUB_ERROR) {
	225	strcpy(box, temp_box);
	226	free(temp_box);
	227	}
	228	else
	229	return(DM_NORMAL);
73c83e3d	230	break;
	231	default:
	232	return(DM_NORMAL);
	233	}
	234	break;
	235	case FALSE:
	236	type = FOREIGN_BOX;
	237	sprintf(temp_buf, "Set up a foreign PO Box for %s (y/n)", local_user);
	238	switch( YesNoQuestion(temp_buf, TRUE)) {
	239	case TRUE:
	240	if (!Prompt_input("Foreign PO Box for this user? ", box, BUFSIZ))
	241	return(DM_NORMAL);
	242	break;
	243	case FALSE:
	244	default:
	245	return(DM_NORMAL); /* ^C hit. */
	246	}
25ee8d50	247	break;
73c83e3d	248	default: /* ^C hit. */
57bfac11	249	Put_message("Aborted.");
57bfac11	250	return(DM_NORMAL);
73c83e3d	251	}
6f368c99	252
	253	args[PO_NAME] = local_user;
	254	args[PO_TYPE] = type;
	255	args[PO_BOX] = box;
	256	args[PO_END] = NULL;
8defc06b	257	if ( (status = do_mr_query("set_pobox", CountArgs(args), args,
8defc06b	258	Scream, NULL)) != MR_SUCCESS )
6f368c99	259	com_err(program_name, status, " in ChangeUserPOBox");
	260	else
	261	Put_message("PO Box assigned.");
	262
73c83e3d	263	return (DM_NORMAL);
	264	}
	265
	266	/* Function Name: RemoveUserPOBox
	267	* Description: Removes this users POBox.
	268	* Arguments: argc, argv - name of user in argv[1].
	269	* Returns: DM_NORMAL.
	270	*/
	271
	272	/ARGSUSED /
	273	int
	274	RemoveUserPOBox(argc, argv)
	275	int argc;
	276	char ** argv;
	277	{
	278	register int status;
	279	char temp_buf[BUFSIZ];
	280
	281	if (!ValidName(argv[1]))
	282	return(DM_NORMAL);
	283
	284	sprintf(temp_buf,
	285	"Are you sure that you want to remove %s's PO Box (y/n)", argv[1]);
	286
	287	if (Confirm(temp_buf)) {
8defc06b	288	if ( (status = do_mr_query("delete_pobox", 1, argv + 1,
8defc06b	289	Scream, NULL)) != MR_SUCCESS)
2f25313c	290	com_err(program_name, status, " in delete_pobox.");
73c83e3d	291	else
	292	Put_message("PO Box removed.");
	293	}
	294	return(DM_NORMAL);
	295	}