void
DoDisplay (
void
) {
int Row, Col;
if (pFileHead == NULL) {
return;
}
if (TESTFLAG (fDisplay, RCURSOR)) {
Row = YCUR(pInsCur) - YWIN(pInsCur) + WINYPOS(pWinCur);
Col = XCUR(pInsCur) - XWIN(pInsCur) + WINXPOS(pWinCur);
if ( Row >= YSIZE || Col >= XSIZE ) {
docursor( XCUR(pInsCur), YCUR(pInsCur) );
}
}
/*
* If text needs updating, do so. Return immediately if a keystroke was
* pressed.
*/
if (TESTFLAG (fDisplay, RTEXT) && !DoText (0, YSIZE)) {
return;
}
if ((fDisplayCursorLoc && TESTFLAG (fDisplay, RCURSOR)) ||
TESTFLAG (fDisplay, RSTATUS)) {
DoStatus ();
}
if (TESTFLAG (fDisplay, RCURSOR)) {
Row = YCUR(pInsCur) - YWIN(pInsCur) + WINYPOS(pWinCur);
Col = XCUR(pInsCur) - XWIN(pInsCur) + WINXPOS(pWinCur);
consoleMoveTo( Row, Col );
RSETFLAG (fDisplay, RCURSOR);
}
}
void CopyWText( int x, int y )
{
DoText( " -- Deluxe Paint -- ", x, y );
DoText( " by Daniel Silva ", x, y + 30 );
DoText( " (c) 1986 by Electronic Arts", x, y + 60 );
}
int
main(
int argc, /* Number of command-line arguments. */
char **argv) /* Values of command-line arguments. */
{
FILE *f;
#define MAX_LINE_SIZE 4000
char line[MAX_LINE_SIZE];
char *p;
/*
* Find the file to read, and open it if it isn't stdin.
*/
if (argc == 1) {
f = stdin;
} else if (argc == 2) {
f = fopen(argv[1], "r");
if (f == NULL) {
fprintf(stderr, "Couldn't read \"%s\": %s\n", argv[1],
strerror(errno));
exit(1);
}
} else {
fprintf(stderr, "Usage: %s ?fileName?\n", argv[0]);
}
/*
* Make two passes over the file. In the first pass, just check to make
* sure we can handle everything. If there are problems, generate output
* and stop. If everything is OK, make a second pass to actually generate
* output.
*/
for (writeOutput = 0; writeOutput < 2; writeOutput++) {
lineNumber = 0;
status = 0;
while (fgets(line, MAX_LINE_SIZE, f) != NULL) {
for (p = line; *p != 0; p++) {
if (*p == '\n') {
*p = 0;
break;
}
}
lineNumber++;
if (((line[0] == '.') || (line[0] == '\'')) && (line[1] == '\\') && (line[2] == '\"')) {
/*
* This line is a comment. Ignore it.
*/
continue;
}
if (strlen(line) >= MAX_LINE_SIZE -1) {
fprintf(stderr, "Too long line. Max is %d chars.\n",
MAX_LINE_SIZE - 1);
exit(1);
}
if ((line[0] == '.') || (line[0] == '\'')) {
/*
* This line is a macro invocation.
*/
DoMacro(line);
} else {
/*
* This line is text, possibly with formatting characters
* embedded in it.
*/
DoText(line);
}
}
if (status != 0) {
break;
}
fseek(f, 0, SEEK_SET);
}
exit(status);
}
/*
* Determine which clients (if any) have sent data to the server and handle it
* as required.
*/
void
HandleClientInput(__pmFdSet *fdsPtr)
{
int sts;
int i;
__pmPDU *pb;
__pmPDUHdr *php;
ClientInfo *cp;
for (i = 0; i < nClients; i++) {
int pinpdu;
if (!client[i].status.connected || !__pmFD_ISSET(client[i].fd, fdsPtr))
continue;
cp = &client[i];
this_client_id = i;
pinpdu = sts = __pmGetPDU(cp->fd, LIMIT_SIZE, _pmcd_timeout, &pb);
if (sts > 0) {
pmcd_trace(TR_RECV_PDU, cp->fd, sts, (int)((__psint_t)pb & 0xffffffff));
} else {
CleanupClient(cp, sts);
continue;
}
php = (__pmPDUHdr *)pb;
if (__pmVersionIPC(cp->fd) == UNKNOWN_VERSION && php->type != PDU_CREDS) {
/* old V1 client protocol, no longer supported */
sts = PM_ERR_IPC;
CleanupClient(cp, sts);
__pmUnpinPDUBuf(pb);
continue;
}
if (pmDebug & DBG_TRACE_APPL0)
ShowClients(stderr);
switch (php->type) {
case PDU_PROFILE:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoProfile(cp, pb);
break;
case PDU_FETCH:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoFetch(cp, pb);
break;
case PDU_INSTANCE_REQ:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoInstance(cp, pb);
break;
case PDU_DESC_REQ:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoDesc(cp, pb);
break;
case PDU_TEXT_REQ:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoText(cp, pb);
break;
case PDU_RESULT:
sts = (cp->denyOps & PMCD_OP_STORE) ?
PM_ERR_PERMISSION : DoStore(cp, pb);
break;
case PDU_PMNS_IDS:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoPMNSIDs(cp, pb);
break;
case PDU_PMNS_NAMES:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoPMNSNames(cp, pb);
break;
case PDU_PMNS_CHILD:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoPMNSChild(cp, pb);
break;
case PDU_PMNS_TRAVERSE:
sts = (cp->denyOps & PMCD_OP_FETCH) ?
PM_ERR_PERMISSION : DoPMNSTraverse(cp, pb);
break;
case PDU_CREDS:
sts = DoCreds(cp, pb);
break;
default:
sts = PM_ERR_IPC;
}
if (sts < 0) {
if (pmDebug & DBG_TRACE_APPL0)
fprintf(stderr, "PDU: %s client[%d]: %s\n",
__pmPDUTypeStr(php->type), i, pmErrStr(sts));
/* Make sure client still alive before sending. */
if (cp->status.connected) {
pmcd_trace(TR_XMIT_PDU, cp->fd, PDU_ERROR, sts);
sts = __pmSendError(cp->fd, FROM_ANON, sts);
if (sts < 0)
__pmNotifyErr(LOG_ERR, "HandleClientInput: "
"error sending Error PDU to client[%d] %s\n", i, pmErrStr(sts));
}
}
if (pinpdu > 0)
__pmUnpinPDUBuf(pb);
}
}
