list.c File Reference

#include "cgi.h"

Include dependency graph for list.c:

Go to the source code of this file.

Functions
void	PrintAdminForm (EZSSTREAM *htmlout, char *db, char *pwd)
int	GenerateReport (EZSSTREAM *htmlout, FILE *db, CGINameValue *data, char *dbname, char *querytext, char *password, unsigned long range_count, unsigned long range_start)
int	GenerateForm (EZSSTREAM *htmlout, CGINameValue *data, char *dbname, int record, char *password)
int	FormatHTML (char *progname, char *file)
int	PrintPassword (EZSSTREAM *htmlout, CGINameValue *Params)
unsigned long	CharToUL (char *str, unsigned long defalt)
int	CGImain (char *progname, CGINameValue *Params, EZSSTREAM *htmlout)
int	PrintCSS (EZSSTREAM *htmlout)
int	PrintQueryForm (EZSSTREAM *htmlout, char *dbname, char *password)
int	PrintRangeLinks (EZSSTREAM *htmlout, char *dbname, char *password, unsigned long range_count, unsigned long range_start)
int	PrintRecords (EZSSTREAM *htmlout, FILE *db, CGINameValue *data, char *dbname, char *query, char *password, unsigned long range_count, unsigned long range_start, char *Comparison, char *lastfieldname, int flags)
int	GenerateTableHeader (EZSSTREAM *htmlout, CGINameValue *data, char *lastfieldname)

---

Function Documentation

int CGImain (  char *  progname, CGINameValue *  Params, EZSSTREAM *  htmlout )

_PAGE stores the page currently being viewed _PAGENEXT is a FIFO of the pages to go to. New pages are appended _PAGEBACK is a LIFO for the "Previous" button. New pages are prepended For both of these lists, the "current" value is taken from the beginning of the comma-delimited values. Definition at line 44 of file list.c. References CGI_ALLOW_READ, CharToUL(), DATABASE, DatabaseClose(), DatabaseFFD(), DatabaseOpen(), DatabaseReadRecord(), DeleteNVP(), ExpandLocalPath(), GenerateForm(), GenerateReport(), GetFieldValue, GetSecurityFlags(), GetSetting(), HTMLEscape(), HTMLPrintf(), HTMLWrite(), LogError(), MAXPATH, NULL, NULLSTR, PrintAdminForm(), ReadINIFileSection(), RenameField(), SendCGIHeader(), and strnicmp(). {/* security level depends on what you're trying to do */ char * dbname = GetFieldValue(Params,"DATABASE"); char * password = GetFieldValue(Params,"_PASSWORD"); char * action = GetFieldValue(Params,"_ACTION"); char * query = GetFieldValue(Params,"_QUERY"); unsigned long range_count = CharToUL(GetFieldValue(Params,"_COUNT"),50); unsigned long range_start = CharToUL(GetFieldValue(Params,"_START"),0); int record = atoi(GetFieldValue(Params,"_ROWID")); int ret=0; int iaction=0; char databasefile[MAXPATH]; char fn[MAXPATH]; CGINameValue* config=0; int Security=0; DATABASE* db=0; CGINameValue * data=0; #ifdef CGI_ALLOW Security = GetSecurityFlags(progname,GetFieldValue(Params,"HOST"),dbname,password); #else Security = GetSecurityFlags(progname,0,dbname,password); #endif /* Use a standard header. */ SendCGIHeader(htmlout,NULL); if (!*action || !*dbname || !(Security & CGI_ALLOW_READ)) { PrintAdminForm(htmlout,dbname,password); return 0; } RenameField(Params,"DATABASE",0); { ExpandLocalPath(progname,fn,dbname,".ini"); config = ReadINIFileSection(fn,"DATABASE",0); if (config == NULL) { HTMLWrite(htmlout,progname); HTMLWrite(htmlout,": A configuration file was not found. " "Please check your server setup and try again.<P>\n"); PrintAdminForm(htmlout,dbname,password); LogError("\nCould not open config file"); LogError(fn); return 21; } } { char * c; memset(databasefile,0,MAXPATH); c = GetSetting(config,"SAVEDATANAME",NULLSTR); if (c[0] == 0) /* use the default name, "database.asc" */ ExpandLocalPath(progname,databasefile,dbname,".asc"); else /* use the filename from the config file, but in the current directory */ ExpandLocalPath(progname,databasefile,c,NULLSTR); } ret = 0; if (!strnicmp(action,"VIEW",4)) iaction=4; else if (!strnicmp(action,"LIST",4)) iaction=7; else { HTMLWrite(htmlout,"Invalid command: "); HTMLEscape(htmlout,action); return 30; } if (!DatabaseOpen(databasefile,&db,&data,0,0)) { HTMLWrite(htmlout,"Unable to open the data file: "); HTMLEscape(htmlout,dbname); LogError("\nCould not open the data file in LIST "); LogError(databasefile); return 3; } if (iaction == 7) { ret = GenerateReport(htmlout,db, data, dbname, query, password, range_count, range_start); } else if (iaction == 4 && record > 0) /* view */ { DatabaseFFD(db,record-1); if (DatabaseReadRecord(db,data,0)) { ret = GenerateForm(htmlout, data, dbname, record, password); } else { HTMLPrintf(htmlout,"Row (%d) does not exist in the database.",record); ret = 8; } } /* ret == 0 */ DatabaseClose(db,data); DeleteNVP(config); return ret; }

unsigned long CharToUL (  char *  str, unsigned long  defalt )

Definition at line 311 of file list.c. Referenced by CGImain(). { long rslt = 0; if(!str) return defalt; if(*str) rslt = atol(str); if(rslt <= 0) return defalt; else return (unsigned long)rslt; }

int FormatHTML (  char *  progname, char *  file )

int GenerateForm (  EZSSTREAM *  htmlout, CGINameValue *  data, char *  dbname, int  record, char *  password )

Definition at line 530 of file list.c. References HTMLEscape(), HTMLPrintf(), HTMLWrite(), CGINameValue::name, PrintCSS(), and PrintQueryForm(). Referenced by CGImain(). : print, else view 4/edit 5/copy 6 */ { unsigned long x = 0; /* Start HTML */ /* Start HTML HEAD */ HTMLWrite(htmlout,"<HTML>\n"); HTMLWrite(htmlout,"<HEAD>\n"); /* Write the CSS */ PrintCSS(htmlout); HTMLWrite(htmlout,"</HEAD>\n\n"); /* End HTML HEAD */ /* Start HTML BODY */ HTMLWrite(htmlout,"<BODY>\n"); HTMLPrintf(htmlout,"<H2>Viewing record %d</H2>", record); /* Write the Query form */ PrintQueryForm(htmlout,dbname,password); HTMLWrite(htmlout,"<HR>\n"); HTMLWrite(htmlout,"<TABLE>\n"); for(x=0; data[x].name; x++) { if (x%2) HTMLWrite(htmlout,"<TR CLASS=\"LIGHT\">\n"); else HTMLWrite(htmlout,"<TR CLASS=\"DARK\">\n"); //name HTMLWrite(htmlout,"<TD>"); HTMLWrite(htmlout,data[x].name); HTMLWrite(htmlout,"</TD>\n"); //value HTMLWrite(htmlout,"<TD>"); if (data[x].value) HTMLEscape(htmlout,data[x].value); else HTMLWrite(htmlout,"&nbsp;"); HTMLWrite(htmlout,"</TD>\n"); } HTMLWrite(htmlout,"</TABLE>\n\n"); /* Print the list recrods Link */ /* HTMLWrite(htmlout,"<FORM METHOD=GET>\n"); HTMLWrite(htmlout,"<INPUT TYPE=HIDDEN NAME=_ACTION VALUE=LIST>"); HTMLWrite(htmlout,"<INPUT TYPE=HIDDEN NAME=DATABASE VALUE=\""); HTMLWrite(htmlout,dbname); HTMLWrite(htmlout,"\">\n"); HTMLWrite(htmlout,"<INPUT TYPE=HIDDEN NAME=_PASSWORD VALUE=\""); HTMLWrite(htmlout,password); HTMLWrite(htmlout,"\">"); HTMLWrite(htmlout,"<P><INPUT TYPE=SUBMIT VALUE=\"List records\">"); HTMLWrite(htmlout,"\n</FORM>"); */ HTMLWrite(htmlout,"</BODY>\n</HTML>\n\n"); /* End HTML BODY and HTML */ return 0; }

int GenerateReport (  EZSSTREAM *  htmlout, FILE *  db, CGINameValue *  data, char *  dbname, char *  querytext, char *  password, unsigned long  range_count, unsigned long  range_start )

Definition at line 462 of file list.c. References CGIFREE, GenerateTableHeader(), HTMLWrite(), NULLSTR, PrintCSS(), PrintQueryForm(), PrintRangeLinks(), PrintRecords(), and strdup(). Referenced by CGImain(). { /*CGINameValue * query = ReadPairedString(querytext,';',0); */ char * lastfieldname = NULLSTR; int flags = 0; //int i=0; char * Comparison = strdup(query); /* check inputs */ if(!data) return -1; /* Start HTML */ /* Start HTML HEAD */ HTMLWrite(htmlout,"<HTML>\n"); HTMLWrite(htmlout,"<HEAD>\n"); /* Write the CSS */ PrintCSS(htmlout); HTMLWrite(htmlout,"</HEAD>\n\n"); /* End HTML HEAD */ /* Start HTML BODY */ HTMLWrite(htmlout,"<BODY>\n"); HTMLWrite(htmlout,"<h3>EZSurvey Database List</h3>\n"); /* Write the Query form */ PrintQueryForm(htmlout,dbname,password); HTMLWrite(htmlout,"<HR>\n"); //Print the range links. PrintRangeLinks(htmlout, dbname, password, range_count, range_start); /* Write the table and the header row. */ HTMLWrite(htmlout,"<TABLE CLASS=\"LIST\">\n"); GenerateTableHeader(htmlout,data,lastfieldname); /* Write all of the records.*/ PrintRecords(htmlout,db,data,dbname,query,password,range_count,range_start,Comparison,lastfieldname,flags); HTMLWrite(htmlout,"\n</TABLE>\n\n\n"); //Print the range links. PrintRangeLinks(htmlout, dbname, password, range_count, range_start); /* Write the Query form */ // PrintQueryForm(htmlout,dbname,password); HTMLWrite(htmlout,"</BODY>\n</HTML>\n\n"); /* End HTML BODY and HTML */ CGIFREE(Comparison); /*if (query != NULL) DeleteNVP(query); */ return 0; }

int GenerateTableHeader (  EZSSTREAM *  htmlout, CGINameValue *  data, char *  lastfieldname )

Definition at line 428 of file list.c. References HTMLWrite(), CGINameValue::name, and stricmp(). Referenced by GenerateReport(). { unsigned long i=0; HTMLWrite(htmlout,"<TR><TH COLSPAN=2>Row Actions"); for (i=0; data[i].name; i++) { char * c; c=strchr(data[i].name,'_'); if (c) *c = 0; if (data[i].name[0] == 0) continue; if (stricmp(lastfieldname,data[i].name)) { HTMLWrite(htmlout,"<TH>"); HTMLWrite(htmlout,data[i].name); HTMLWrite(htmlout,"</TH>"); } lastfieldname = data[i].name; } HTMLWrite(htmlout,"</TR>"); return 0; }

void PrintAdminForm (  EZSSTREAM *  htmlout, char *  db, char *  pwd )

Definition at line 611 of file list.c. References HTMLPrintf(), HTMLWrite(), and PrintCSS(). Referenced by CGImain(). { char* warning_color = "#FF0000"; /* Start HTML */ /* Start HTML HEAD */ HTMLWrite(htmlout,"<HTML>\n"); HTMLWrite(htmlout,"<HEAD>\n"); /* Write the CSS */ PrintCSS(htmlout); HTMLWrite(htmlout,"</HEAD>\n\n"); /* End HTML HEAD */ /* Start HTML BODY */ HTMLWrite(htmlout,"<BODY>\n"); HTMLWrite(htmlout, "<FORM method=\"post\" ACCEPT-CHARSET=\"UTF-8\"><h4>To view a database or report, please choose an option:</h4>\n"); HTMLWrite(htmlout, "<TABLE>\n"); HTMLWrite(htmlout, "<TR><TD CLASS=\"OPTION\">"); HTMLPrintf(htmlout, "Database:<font color=\"%s\">*</font>",warning_color); HTMLWrite(htmlout, "</TD><TD CLASS=\"OPTION\">"); HTMLPrintf(htmlout,"<input name=\"DATABASE\" VALUE=\"%s\">\n",db); HTMLWrite(htmlout, "</TD></TR>\n"); HTMLWrite(htmlout, "<TR><TD CLASS=\"OPTION\">"); HTMLPrintf(htmlout,"Query:"); HTMLWrite(htmlout, "</TD><TD CLASS=\"OPTION\">"); HTMLWrite(htmlout, "<INPUT NAME=\"_QUERY\">"); HTMLWrite(htmlout, " (<b>field</b>=<i>value</i>&amp;<b>field</b>=<i>value</i>)"); HTMLWrite(htmlout, "</TD></TR>\n"); HTMLWrite(htmlout, "<TR><TD CLASS=\"OPTION\">"); HTMLPrintf(htmlout, "Password:<font color=\"%s\">*</font>",warning_color); HTMLWrite(htmlout, "</TD><TD CLASS=\"OPTION\">"); HTMLPrintf(htmlout,"<INPUT TYPE=\"PASSWORD\" NAME=\"_PASSWORD\" VALUE=\"%s\">",pwd); HTMLWrite(htmlout, " (to use multiple passwords, separate them with commas)"); HTMLWrite(htmlout, "</TD></TR>\n"); HTMLWrite(htmlout, "<TR><TD CLASS=\"OPTION\">"); HTMLWrite(htmlout, "<INPUT TYPE=\"HIDDEN\" NAME=\"_ACTION\" VALUE=\"LIST\">"); HTMLWrite(htmlout, "<INPUT TYPE=\"SUBMIT\" VALUE=\"List records\">"); HTMLWrite(htmlout, "</TD></TR>\n"); HTMLWrite(htmlout, "</TABLE>\n\n"); HTMLWrite(htmlout, "</FORM>\n"); HTMLWrite(htmlout, "<HR>&copy; 2002 by Raosoft, Inc. All Rights Reserved."); HTMLWrite(htmlout,"</BODY>\n</HTML>\n\n"); /* End HTML BODY and HTML */ }

int PrintCSS (  EZSSTREAM *  htmlout  )

Definition at line 184 of file list.c. References HTMLWrite(). Referenced by GenerateForm(), GenerateReport(), and PrintAdminForm(). { /* Use CSS */ HTMLWrite(htmlout,"<style type=\"text/css\">\n"); HTMLWrite(htmlout,"BODY\n{\n"); HTMLWrite(htmlout,"background-color: white;\n"); HTMLWrite(htmlout,"font-family: courier;\n"); HTMLWrite(htmlout,"font-size: 100%;\n"); HTMLWrite(htmlout,"color: #000000;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TABLE\n{\n"); HTMLWrite(htmlout,"border-collapse: collapse;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TR\n{\n"); HTMLWrite(htmlout,"font-size: 100%;\n"); HTMLWrite(htmlout,"border: thin solid #000000;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TR.DARK\n{\n"); HTMLWrite(htmlout,"background-color: lightcyan;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TR.LIGHT\n{\n"); HTMLWrite(htmlout,"background-color: lightyellow;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TH\n{\n"); HTMLWrite(htmlout,"font-size: 50%;\n"); HTMLWrite(htmlout,"border-width: thin;\n"); HTMLWrite(htmlout,"border-style: solid;\n"); HTMLWrite(htmlout,"border-color: #000000;\n"); HTMLWrite(htmlout,"padding: 3px;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TD\n{\n"); HTMLWrite(htmlout,"font-size: 50%;\n"); HTMLWrite(htmlout,"border-width: thin;\n"); HTMLWrite(htmlout,"border-style: solid;\n"); HTMLWrite(htmlout,"border-color: slategray;\n"); HTMLWrite(htmlout,"text-align: center;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TD.INDEX\n{\n"); HTMLWrite(htmlout,"color: #FF0000;\n"); HTMLWrite(htmlout,"font-size: 30%;\n"); HTMLWrite(htmlout,"font-weight: bold;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TD.QUERY\n{\n"); HTMLWrite(htmlout,"color: #000000;\n"); HTMLWrite(htmlout,"border-color: #FFFFFF;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TD.OPTION\n{\n"); HTMLWrite(htmlout,"color: #000000;\n"); HTMLWrite(htmlout,"border-color: #FFFFFF;\n"); HTMLWrite(htmlout,"text-align: left;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"TABLE.LIST\n{\n"); HTMLWrite(htmlout,"border-width: thin;\n"); HTMLWrite(htmlout,"border-style: solid;\n"); HTMLWrite(htmlout,"border-color: #000000;\n"); HTMLWrite(htmlout,"}\n\n"); HTMLWrite(htmlout,"</style>\n"); /* End CSS */ return 0; }

int PrintPassword (  EZSSTREAM *  htmlout, CGINameValue *  Params )

Definition at line 160 of file list.c. References HTMLWrite(), and stricmp(). { int i; HTMLWrite(htmlout,"<FORM METHOD=POST ACCEPT-CHARSET=\"UTF-8\">\n"); for (i=0; Params[i].name; i++) { if (!stricmp(Params[i].name,"_PASSWORD")) continue; HTMLWrite(htmlout,"<INPUT TYPE=HIDDEN VALUE=\""); HTMLWrite(htmlout,Params[i].value); HTMLWrite(htmlout,"\">\n"); } HTMLWrite(htmlout,"Password: <INPUT NAME=_PASSWORD TYPE=PASSWORD>\n"); HTMLWrite(htmlout,"<INPUT TYPE=SUBMIT>\n"); HTMLWrite(htmlout,"</FORM>\n"); return 0; }

int PrintQueryForm (  EZSSTREAM *  htmlout, char *  dbname, char *  password )

Definition at line 263 of file list.c. References HTMLPrintf(), and HTMLWrite(). Referenced by GenerateForm(), and GenerateReport(). { /* Write the Query form */ HTMLWrite(htmlout, "<TABLE><TR><TD CLASS=\"QUERY\">"); HTMLPrintf(htmlout,"<FORM ACCEPT-CHARSET=\"UTF-8\"><INPUT TYPE=HIDDEN NAME=DATABASE VALUE=\"%s\">\n",dbname); HTMLPrintf(htmlout,"<INPUT TYPE=HIDDEN NAME=_PASSWORD VALUE=\"%s\">\n",password); HTMLWrite(htmlout, " Query: <INPUT NAME=_QUERY>"); HTMLWrite(htmlout, "<INPUT TYPE=SUBMIT NAME=_ACTION VALUE=\"List records\">\n"); HTMLWrite(htmlout, "</FORM>\n\n"); HTMLWrite(htmlout, "</TD><TD CLASS=\"QUERY\">"); /* Write the Start over form */ HTMLWrite(htmlout, "<FORM ACCEPT-CHARSET=\"UTF-8\">\n<INPUT TYPE=SUBMIT NAME=_ACTION VALUE=\"Start over\"></FORM>\n"); HTMLWrite(htmlout, "</TD></TABLE>"); HTMLWrite(htmlout, "(<b>field</b>=<i>value</i>&<b>field</b>=<i>value</i>) wildcards are _ and %\n"); return 0; }

int PrintRangeLinks (  EZSSTREAM *  htmlout, char *  dbname, char *  password, unsigned long  range_count, unsigned long  range_start )

Definition at line 294 of file list.c. References HTMLPrintf(), and HTMLWrite(). Referenced by GenerateReport(). { HTMLPrintf(htmlout,"<a href=\"?DATABASE=%s&_PASSWORD=%s&_ACTION=LIST&_COUNT=%i&_START=%i\">Back</a>",dbname,password,range_count,range_start-range_count); HTMLWrite(htmlout, " | "); HTMLPrintf(htmlout,"<a href=\"?DATABASE=%s&_PASSWORD=%s&_ACTION=LIST&_COUNT=%i&_START=%i\">Next</a>",dbname,password,range_count,range_start+range_count); return 0; }

int PrintRecords (  EZSSTREAM *  htmlout, FILE *  db, CGINameValue *  data, char *  dbname, char *  query, char *  password, unsigned long  range_count, unsigned long  range_start, char *  Comparison, char *  lastfieldname, int  flags )

Definition at line 332 of file list.c. References DatabaseReadRecord(), EvaluateLogic(), HTMLEscape(), HTMLPrintf(), HTMLWrite(), CGINameValue::name, stricmp(), and CGINameValue::value. Referenced by GenerateReport(). { unsigned long record = 0; /* The record number in the database. */ unsigned long row = 0; /* The dark-light row indicator. */ unsigned long i=0; /* The column counter. */ unsigned long j=0; /* The index of the one we are on. */ unsigned long range_max = range_start + range_count; /*char* format = "<FORM><INPUT TYPE=\"HIDDEN\" NAME=\"_PASSWORD\" VALUE=\"%s\" />" "<INPUT TYPE=\"HIDDEN\" NAME=\"DATABASE\" VALUE=\"%s\" />" "<INPUT TYPE=\"HIDDEN\" NAME=\"_ROWID\" VALUE=\"%d\" />" "<INPUT TYPE=\"SUBMIT\" NAME=\"_ACTION\" VALUE=\"View\" /></FORM>"; */ char* format = "<a href=\"?_PASSWORD=%s&DATABASE=%s&_ROWID=%d&_ACTION=View\">View</a>"; /* check the inputs */ if(!data) return -1; if(!dbname) return -1; for(j=0; j<range_max; j++) { DatabaseReadRecord(db,data,&flags); record ++; if(j<range_start) continue; if (flags) continue; strcpy(Comparison,query); if (!EvaluateLogic(Comparison,data,0)) continue; /* if (!DatabaseEvalQuery(data, query, 0)) continue; */ /* keep track of the row number */ /* Start the row */ if (++row%2) HTMLWrite(htmlout,"\n<TR CLASS=\"LIGHT\">\n"); else HTMLWrite(htmlout,"\n<TR CLASS=\"DARK\">\n"); /* Write the index number */ HTMLWrite(htmlout,"<TD>"); HTMLPrintf(htmlout,format,password,dbname,record); HTMLPrintf(htmlout,"</TD>\n",record); HTMLPrintf(htmlout,"<TD CLASS=\"INDEX\">"); HTMLPrintf(htmlout,"%d",record); HTMLPrintf(htmlout,"</TD>\n",record); /*Write each cell of the record*/ for (i = 0 ; data[i].name; i++) { if (data[i].name[0] == 0) continue; /* The td tag is not needed when looking at multiple choice questions. */ if(stricmp(lastfieldname,data[i].name)) HTMLWrite(htmlout,"<TD>"); else HTMLWrite(htmlout,","); /*Write the cell's data */ if(data[i].value) //HTMLWrite(htmlout,data[i].value); HTMLEscape(htmlout,data[i].value); else HTMLWrite(htmlout,"&nbsp;"); /* ensure that the table cell appears */ /* The td tag is not needed when looking at multiple choice questions. */ //if(stricmp(lastfieldname,data[i].name)) // HTMLPrintf(htmlout,"</TD>\n",record); lastfieldname = data[i].name; } HTMLWrite(htmlout,"</TR>\n\n"); /*End Record*/ } 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/