/*
Any entry in the cgiList need to be checked to see if it has
*/
PUBLIC void websCgiGatherOutput(Cgi *cgip)
{
Webs *wp;
WebsStat sbuf;
char buf[BIT_GOAHEAD_LIMIT_BUFFER];
ssize nbytes, skip;
int fdout;
if ((stat(cgip->stdOut, &sbuf) == 0) && (sbuf.st_size > cgip->fplacemark)) {
trace(5, "cgi: gather output");
if ((fdout = open(cgip->stdOut, O_RDONLY | O_BINARY, 0444)) >= 0) {
/*
Check to see if any data is available in the output file and send its contents to the socket.
Write the HTTP header on our first pass.
*/
wp = cgip->wp;
lseek(fdout, cgip->fplacemark, SEEK_SET);
while ((nbytes = read(fdout, buf, BIT_GOAHEAD_LIMIT_BUFFER)) > 0) {
trace(5, "cgi: read %d bytes from CGI", nbytes);
skip = (cgip->fplacemark == 0) ? parseCgiHeaders(wp, buf) : 0;
trace(5, "cgi: write %d bytes to client", nbytes - skip);
websWriteBlock(wp, &buf[skip], nbytes - skip);
cgip->fplacemark += (off_t) nbytes;
}
close(fdout);
} else {
trace(5, "cgi: open failed");
}
}
}
PUBLIC void websCgiGatherOutput(Cgi *cgip)
{
Webs *wp;
WebsStat sbuf;
char buf[ME_GOAHEAD_LIMIT_HEADERS + 2];
ssize nbytes, skip;
int fdout;
/*
OPT - currently polling and doing a stat each poll. Also doing open/close each chunk.
If the CGI process writes partial headers, this repeatedly reads the data until complete
headers are written or more than ME_GOAHEAD_LIMIT_HEADERS of data is received.
*/
if ((stat(cgip->stdOut, &sbuf) == 0) && (sbuf.st_size > cgip->fplacemark)) {
if ((fdout = open(cgip->stdOut, O_RDONLY | O_BINARY, 0444)) >= 0) {
/*
Check to see if any data is available in the output file and send its contents to the socket.
Write the HTTP header on our first pass. The header must fit into ME_GOAHEAD_LIMIT_BUFFER.
*/
wp = cgip->wp;
lseek(fdout, cgip->fplacemark, SEEK_SET);
while ((nbytes = read(fdout, buf, sizeof(buf))) > 0) {
if (!(wp->flags & WEBS_HEADERS_CREATED)) {
if ((skip = parseCgiHeaders(wp, buf)) == 0) {
if (cgip->handle && sbuf.st_size < ME_GOAHEAD_LIMIT_HEADERS) {
trace(5, "cgi: waiting for http headers");
break;
} else {
trace(5, "cgi: missing http headers - create default headers");
writeCgiHeaders(wp, HTTP_CODE_OK, -1, 0, 0);
}
}
}
trace(5, "cgi: write %d bytes to client", nbytes - skip);
websWriteBlock(wp, &buf[skip], nbytes - skip);
cgip->fplacemark += (off_t) nbytes;
}
close(fdout);
} else {
trace(5, "cgi: open failed");
}
}
}
static void readFromCgi(Cgi *cgi, int channel)
{
HttpConn *conn;
HttpPacket *packet;
HttpTx *tx;
HttpQueue *q, *writeq;
MprCmd *cmd;
ssize nbytes;
int err;
cmd = cgi->cmd;
conn = cgi->conn;
tx = conn->tx;
q = cgi->readq;
writeq = conn->writeq;
assert(conn->sock);
assert(conn->state > HTTP_STATE_BEGIN);
if (tx->finalized) {
mprCloseCmdFd(cmd, channel);
}
while (mprGetCmdFd(cmd, channel) >= 0 && !tx->finalized && writeq->count < writeq->max) {
if ((packet = cgi->headers) != 0) {
if (mprGetBufSpace(packet->content) < ME_MAX_BUFFER && mprGrowBuf(packet->content, ME_MAX_BUFFER) < 0) {
break;
}
} else if ((packet = httpCreateDataPacket(ME_MAX_BUFFER)) == 0) {
break;
}
nbytes = mprReadCmd(cmd, channel, mprGetBufEnd(packet->content), ME_MAX_BUFFER);
if (nbytes < 0) {
err = mprGetError();
if (err == EINTR) {
continue;
} else if (err == EAGAIN || err == EWOULDBLOCK) {
break;
}
mprCloseCmdFd(cmd, channel);
break;
} else if (nbytes == 0) {
mprCloseCmdFd(cmd, channel);
break;
} else {
traceData(cmd, mprGetBufEnd(packet->content), nbytes);
mprAdjustBufEnd(packet->content, nbytes);
}
if (channel == MPR_CMD_STDERR) {
mprLog("error cgi", 0, "CGI failed uri=\"%s\", details: %s", conn->rx->uri, mprGetBufStart(packet->content));
httpSetStatus(conn, HTTP_CODE_SERVICE_UNAVAILABLE);
cgi->seenHeader = 1;
}
if (!cgi->seenHeader) {
if (!parseCgiHeaders(cgi, packet)) {
cgi->headers = packet;
return;
}
cgi->headers = 0;
cgi->seenHeader = 1;
}
if (!tx->finalizedOutput && httpGetPacketLength(packet) > 0) {
/* Put the data to the CGI readq, then cgiToBrowserService will take care of it */
httpPutPacket(q, packet);
}
}
}
static void readFromCgi(Cgi *cgi, int channel)
{
HttpConn *conn;
HttpPacket *packet;
HttpTx *tx;
HttpQueue *q, *writeq;
MprCmd *cmd;
ssize nbytes;
int err;
cmd = cgi->cmd;
conn = cgi->conn;
tx = conn->tx;
q = cgi->readq;
writeq = conn->writeq;
assert(conn->sock);
assert(conn->state > HTTP_STATE_BEGIN);
if (tx->finalized) {
mprCloseCmdFd(cmd, channel);
}
while (mprGetCmdFd(cmd, channel) >= 0 && !tx->finalized && writeq->count < writeq->max) {
if ((packet = cgi->headers) != 0) {
if (mprGetBufSpace(packet->content) < ME_MAX_BUFFER && mprGrowBuf(packet->content, ME_MAX_BUFFER) < 0) {
break;
}
} else if ((packet = httpCreateDataPacket(ME_MAX_BUFFER)) == 0) {
break;
}
nbytes = mprReadCmd(cmd, channel, mprGetBufEnd(packet->content), ME_MAX_BUFFER);
if (nbytes < 0) {
err = mprGetError();
if (err == EINTR) {
continue;
} else if (err == EAGAIN || err == EWOULDBLOCK) {
break;
}
mprTrace(6, "CGI: Gateway read error %d for %s", err, (channel == MPR_CMD_STDOUT) ? "stdout" : "stderr");
mprCloseCmdFd(cmd, channel);
break;
} else if (nbytes == 0) {
mprTrace(6, "CGI: Gateway EOF for %s, pid %d", (channel == MPR_CMD_STDOUT) ? "stdout" : "stderr", cmd->pid);
mprCloseCmdFd(cmd, channel);
break;
} else {
mprTrace(6, "CGI: Gateway read %d bytes from %s", nbytes, (channel == MPR_CMD_STDOUT) ? "stdout" : "stderr");
traceData(cmd, mprGetBufEnd(packet->content), nbytes);
mprAdjustBufEnd(packet->content, nbytes);
}
if (channel == MPR_CMD_STDERR) {
// FUTURE - should be an option to keep going despite stderr output
mprError("CGI: Error for \"%s\"\n\n%s", conn->rx->uri, mprGetBufStart(packet->content));
httpSetStatus(conn, HTTP_CODE_SERVICE_UNAVAILABLE);
cgi->seenHeader = 1;
}
if (!cgi->seenHeader) {
if (!parseCgiHeaders(cgi, packet)) {
cgi->headers = packet;
return;
}
cgi->headers = 0;
cgi->seenHeader = 1;
}
if (!tx->finalizedOutput && httpGetPacketLength(packet) > 0) {
/* Put the data to the CGI readq, then cgiToBrowserService will take care of it */
httpPutPacket(q, packet);
}
}
}
