1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75
|
/****************************************************************
* *
* Copyright 2014 Fidelity Information Services, Inc *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
#include "mdef.h"
#include "gdsroot.h"
#include "gdsblk.h"
#include "gdsbt.h"
#include "gtm_facility.h"
#include "fileinfo.h"
#include "gdsfhead.h"
#include "util.h"
#include "mu_interactive.h"
#define PROCEED_PROMPT "Proceed? [Y/N]: "
#define CORRECT_PROMPT "Please enter Y or N: "
#define YES_STRING "YES"
#define NO_STRING "NO"
boolean_t mu_interactive(caddr_t message)
{
boolean_t done = FALSE, mur_error_allowed;
unsigned short len;
int index;
char res[8];
UNIX_ONLY(char *fgets_res;)
UNIX_ONLY(util_out_print(PROCEED_PROMPT, TRUE);)
VMS_ONLY($DESCRIPTOR (dres, res);)
VMS_ONLY($DESCRIPTOR (dprm, PROCEED_PROMPT);)
while (FALSE == done)
{
VMS_ONLY(lib$get_input(&dres, &dprm, &len);)
# if defined(UNIX)
fgets_res = util_input(res, SIZEOF(res), stdin, FALSE);
if (NULL != fgets_res)
{
len = strlen(res);
# endif
if (0 < len)
{
for (index = 0; index < len; index++)
res[index] = TOUPPER(res[index]);
if (0 == memcmp(res, YES_STRING, len))
{
done = TRUE;
mur_error_allowed = TRUE;
break;
} else if (0 == memcmp(res, NO_STRING, len))
{
done = TRUE;
mur_error_allowed = FALSE;
break;
}
}
util_out_print(CORRECT_PROMPT, TRUE);
# if defined(UNIX)
} else
{
mur_error_allowed = FALSE;
break;
}
# endif
}
if (FALSE == mur_error_allowed)
util_out_print(message, TRUE);
return (mur_error_allowed);
}
|