examples/echo2.c

   1 /*
   2  * echo2.c --
   3  *
   4  *      Produce a page containing all the inputs (fcgiapp version)
   5  *
   6  *
   7  * Copyright (c) 1996 Open Market, Inc.
   8  *
   9  * See the file "LICENSE.TERMS" for information on usage and redistribution
  10  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  11  *
  12  */
  13
  14 #ifndef lint
  15 static const char rcsid[] = "$Id: echo2.c,v 1.4 1999/07/26 05:33:00 roberts Exp $";
  16 #endif /* not lint */
  17
  18 #if defined HAVE_UNISTD_H || __linux__
  19 #include <unistd.h>
  20 #endif
  21
  22 #include <stdlib.h>
  23 #include "fcgiapp.h"
  24
  25 #ifdef _WIN32
  26 #include <process.h>
  27 #else
  28 extern char **environ;
  29 #endif
  30
  31 static void PrintEnv(FCGX_Stream *out, char *label, char **envp)
  32 {
  33     FCGX_FPrintF(out, "%s:<br>\n<pre>\n", label);
  34     for( ; *envp != NULL; envp++) {
  35         FCGX_FPrintF(out, "%s\n", *envp);
  36     }
  37     FCGX_FPrintF(out, "</pre><p>\n");
  38 }
  39
  40 int main ()
  41 {
  42     FCGX_Stream *in, *out, *err;
  43     FCGX_ParamArray envp;
  44     int count = 0;
  45
  46     while (FCGX_Accept(&in, &out, &err, &envp) >= 0) {
  47         char *contentLength = FCGX_GetParam("CONTENT_LENGTH", envp);
  48         int len = 0;
  49
  50         FCGX_FPrintF(out,
  51            "Content-type: text/html\r\n"
  52            "\r\n"
  53            "<title>FastCGI echo (fcgiapp version)</title>"
  54            "<h1>FastCGI echo (fcgiapp version)</h1>\n"
  55            "Request number %d,  Process ID: %d<p>\n", ++count, getpid());
  56
  57         if (contentLength != NULL)
  58             len = strtol(contentLength, NULL, 10);
  59
  60         if (len <= 0) {
  61             FCGX_FPrintF(out, "No data from standard input.<p>\n");
  62         }
  63         else {
  64             int i, ch;
  65
  66             FCGX_FPrintF(out, "Standard input:<br>\n<pre>\n");
  67             for (i = 0; i < len; i++) {
  68                 if ((ch = FCGX_GetChar(in)) < 0) {
  69                     FCGX_FPrintF(out,
  70                         "Error: Not enough bytes received on standard input<p>\n");
  71                     break;
  72                 }
  73                 FCGX_PutChar(ch, out);
  74             }
  75             FCGX_FPrintF(out, "\n</pre><p>\n");
  76         }
  77
  78         PrintEnv(out, "Request environment", envp);
  79         PrintEnv(out, "Initial environment", environ);
  80     } /* while */
  81
  82     exit(0);
  83 }