/***********************************************************************
* *
* This software is part of the ast package *
* Copyright (c) 1985-2011 AT&T Intellectual Property *
* and is licensed under the *
* Eclipse Public License, Version 1.0 *
* by AT&T Intellectual Property *
* *
* A copy of the License is available at *
* http://www.eclipse.org/org/documents/epl-v10.html *
* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
* *
* Information and Software Systems Research *
* AT&T Research *
* Florham Park NJ *
* *
* Glenn Fowler <gsf@research.att.com> *
* David Korn <dgk@research.att.com> *
* Phong Vo <kpv@research.att.com> *
* *
***********************************************************************/
#pragma prototyped
/*
* AT&T Research
*
* output printf prompt and read response
* if format==0 then verify that interaction is possible
*
* return:
*
* 0 [1yY+]
* -1 [qQ] or EOF
* 1 otherwise
*
* if (quit&ERROR_PROMPT) then tty forced for IO
* if quit>=0 then [qQ] or EOF calls exit(quit)
*/
#include <ast.h>
#include <error.h>
int
astquery(int quit, const char* format, ...)
{
va_list ap;
register int n;
register int c;
int r;
Sfio_t* ip;
Sfio_t* op;
static Sfio_t* rfp;
static Sfio_t* wfp;
r = 0;
va_start(ap, format);
if (!format)
goto done;
r = -1;
if (!rfp)
{
c = errno;
if (isatty(sffileno(sfstdin)))
rfp = sfstdin;
else if (!(rfp = sfopen(NiL, "/dev/tty", "r")))
goto done;
if (isatty(sffileno(sfstderr)))
wfp = sfstderr;
else if (!(wfp = sfopen(NiL, "/dev/tty", "w")))
goto done;
errno = c;
}
if (quit & ERROR_PROMPT)
{
quit &= ~ERROR_PROMPT;
ip = rfp;
op = wfp;
}
else
{
ip = sfstdin;
op = sfstderr;
}
sfsync(sfstdout);
sfvprintf(op, format, ap);
sfsync(op);
for (n = c = sfgetc(ip);; c = sfgetc(ip))
switch (c)
{
case EOF:
n = c;
/*FALLTHROUGH*/
case '\n':
switch (n)
{
case EOF:
case 'q':
case 'Q':
if (quit >= 0)
exit(quit);
goto done;
case '1':
case 'y':
case 'Y':
case '+':
r = 0;
goto done;
}
return 1;
}
done:
va_end(ap);
return r;
}