console.c

Go to the documentation of this file.

#include "cgi.h"

static char* JSSQLEscape(ScriptEnvironment* Env, char* cmd, int argc, char** argv, CGINameValue* Params)
{
   size_t i=0,j=0;
   char *in;
    char *out;
   char *extra = NULL;;
   if (argc == 0) return NULL;

   in = argv[0];
   out = CGIMALLOC(1 + (strlen(in) * 2));
   if (argc > 1) extra = argv[1];

   while (in[i])
   {
    if (in[i] == '\'')
      {
       out[j++] = '\'';
       out[j++] = '\'';
      }
    else if (strchr("\t\r\n",in[i]))
     {
       out[j++] = ' ';
     }
    else if (extra && strchr(extra,in[i]))
     {
      out[j++] = '\\';
      out[j++] = in[i];
     }
    else out[j++] = in[i];

    i++;
   }

   out[j]=0;
   return out;
}

int CGImain(char * argv0,CGINameValue* Params,STREAM htmlout)
{
 char cmdline[1024];
 CGINameValue * nvp = NewNVP(16);
     int ret;
    ScriptFunction Functions[] =
     {{"print",10,(ScriptFunctionCall)*JSPrint},
      {"write",10,(ScriptFunctionCall)*JSPrint},
      {"eval",1,(ScriptFunctionCall)*JSEval},
      {"timestamp",0,(ScriptFunctionCall)*JSTimeStamp},
      {"toFixed",2,(ScriptFunctionCall)*JStoFixed},
      {"escape",1,(ScriptFunctionCall)*JSHTMLEscape},
      {"escapeSQL",1,(ScriptFunctionCall)*JSSQLEscape},
      {"subStr",3,(ScriptFunctionCall)*JSsubstr},
      {"indexOf",4,(ScriptFunctionCall)*JSIndexOf},
      {"length",1,(ScriptFunctionCall)*JSstrlen},
      {"hasRecord",1,(ScriptFunctionCall)*JSHasRecord},
      {"runReport",8,(ScriptFunctionCall)*JSReport},
      {"number",1,(ScriptFunctionCall)*JSToNumber},
      {"environment",1,(ScriptFunctionCall)*JSGetEnv},
      {"toNumber",1,(ScriptFunctionCall)*JSToNumber},
      {"random",1,(ScriptFunctionCall)*JSRandom},
      {0,0,0}};
    ScriptObject Objects[] =
     {{"data",0},
      {0,0}};
    ScriptEnvironment Env;

   memset(&Env,0,sizeof(Env));
    Env.Functions = Functions;
    Env.Objects   = Objects;
    Env.htmlout   = htmlout;
    Env.argv0     = argv0;
    Env.F2 = 0;

    Objects[0].data=0;

    ret = RunScript(&Env,stdin,nvp);
    if (ret > 0)
    {
     HTMLWriteL(htmlout,"***",3);
     PrintScriptError(htmlout,&Env, 0, ret);
     HTMLWriteL(htmlout,"***",3);
    }

 DeleteNVP(nvp);
 return 0;
}

Raosoft EZReport, EZSurvey, InterForm, RapidReport, Raosoft, and SurveyWin are registered trademarks of Raosoft, Inc. Page contents © 1996-2007 by Raosoft, Inc. You may use and modify this file for your own use, but may not distribute it or derivative works without the prior written consent of Raosoft, Inc. This software is provided "as is," and Raosoft makes no warranty, express or implied, of fitness for a particular application. Every measure has been taken to anticipate risks inherent to computer networks, but we cannot guarantee safety or reliability of this program in every situation.

Tel: 206-525-4025 (US) Email: raosoft@raosoft.com
http://www.raosoft.com/