//----------------------------------------------------------------------------- // Copyright © 2003 - Philip Howard - All rights reserved // // This program is free software; you can redistribute it and/or // modify it under the terms of the GNU General Public License // as published by the Free Software Foundation; either version 2 // of the License, or (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program; if not, write to the Free Software // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. //----------------------------------------------------------------------------- // package libh/cgi // purpose Demonstrate the cgi_form_parse() function call in a test CGI // which can also be a useful web debugging tool. // homepage http://libh.slashusr.org/ //----------------------------------------------------------------------------- // author Philip Howard // email libh at ipal dot org // homepage http://phil.ipal.org/ //----------------------------------------------------------------------------- // This file is best viewed using a fixed spaced font such as Courier // and in a display at least 120 columns wide. //----------------------------------------------------------------------------- #include #include #include #include #include #include #include #include #include #include //----------------------------------------------------------------------------- // program test.cgi // // purpose A CGI diagnostic tool which displays all CGI form variables // sent to the web server from the web browser during a form // submission using GET method or POST method, or other web // request. //----------------------------------------------------------------------------- //----------------------------------------------------------------------------- // main //----------------------------------------------------------------------------- int main( int argc , char * * argv , char * * envp ) { char * request_method ; int n ; //----------------------------------------------- // Make sure we are running in a CGI environment. //----------------------------------------------- request_method = getenv( "REQUEST_METHOD" ); if ( ! request_method ) { fprintf( stderr, "Environment variable REQUEST_METHOD is missing.\n" "This program needs to be run as web based CGI.\n" ); return 1; } //--------------------------------------- // Check to see if we are running as NPH. // Output the HTTP response if so. //--------------------------------------- { char * p; char * q; p = * argv; q = p; while ( * p ) if ( * p ++ == '/' ) q = p; if ( memcmp( "nph-" , q , 4 ) == 0 ) { printf( "HTTP/1.0 200 OK\r\n" ); } } //------------------------------------- // Output the rest of the HTTP headers. //------------------------------------- printf( "Content-type: text/html\r\n" "\r\n" ); fflush( stdout ); //---------------------------------------- // Make sure this is a GET or POST method. //---------------------------------------- if ( strcmp( request_method , "GET" ) != 0 && strcmp( request_method , "POST" ) != 0 ) { printf( "\n" "\n" "%s\n" "\n" "\n" "

%s

\n", "Invalid Request-Method", "Invalid Request-Method" ); printf( "

Expected: GET or POST

\n" "

Got: " ); html_asis( request_method , ~0 ); printf( "

\n" "\n" "\n" ); return 0; } //------------------------------- // Output the title for the page. //------------------------------- printf( "\n" "\n" "%s\n" "\n" "\n" "

%s

\n", "CGI test page", "CGI test page" ); fflush( stdout ); //--------------------------------------- // Output the system information section. //--------------------------------------- printf( "

System information

\n" "\n" "" "\n" "\n" "\n" "\n" "" ); //-------------------------------------------------- // Show the current working directory from getcwd(). //-------------------------------------------------- { char * cwd; if ( (cwd = getcwd( NULL , 0 )) ) { printf( "\n" "" "\n" "\n" "\n" "\n" ); free( cwd ); } } //------------------------------------------- // Show the real userid number and name and // show the effective userid number and name. //------------------------------------------- printf( "\n" "\n" "\n" "\n" "\n" "\n", "euid"+1, (unsigned long) getuid(), (unsigned long) strlen(getpwuid(getuid())->pw_name), getpwuid(getuid())->pw_name ); printf( "\n" "\n" "\n" "\n" "\n" "\n", "euid", (unsigned long) geteuid(), (unsigned long) strlen(getpwuid(geteuid())->pw_name), getpwuid(geteuid())->pw_name ); printf( "\n" "\n" "\n" "\n" "\n" "\n", "egid"+1, (unsigned long) getgid(), (unsigned long) strlen(getgrgid(getgid())->gr_name), getgrgid(getgid())->gr_name ); printf( "\n" "\n" "\n" "\n" "\n" "\n", "egid", (unsigned long) getegid(), (unsigned long) strlen(getgrgid(getegid())->gr_name), getgrgid(getegid())->gr_name ); printf( "
namenumeric
value		string
length		string value
" "cwd%lu", (unsigned long) strlen( cwd ) ); html_asis( cwd , ~0 ); printf( "
" "%s" "%lu" "%lu" "%s
" "%s" "%lu" "%lu" "%s
" "%s" "%lu" "%lu" "%s
" "%s" "%lu" "%lu" "%s
\n" ); //------------------------------------------------------------- // Output the command argument list that main() is called with. //------------------------------------------------------------- printf( "

Number of arguments is: %d

\n" , argc ); if ( argc ) { int argn; argn = 0; printf( "" "" "\n" "\n" "" ); while ( argc -- ) { printf( "\n" "\n" "\n" "\n" ); ++ argn; } printf( "
lenvalue of argument
" "%d", argn ); if ( argv[ argn ] ) { printf( "" ); html_asis( argv[ argn ] , ~0 ); printf( "" ); } printf( "
\n" ); } fflush( stdout ); //-------------------------------------- // Output all the environment variables. //-------------------------------------- { char * * p; n = 0; p = envp; while ( * p ) { ++ n; ++ p; } printf( "

Number of environment variables is: %d

\n" "" "" "\n" "\n" "\n" "", n ); p = envp; //-- Step through each environment variable and output it. while ( * p ) { char * q; q = * p; printf( "\n" "\n" "\n" "\n" "\n" ); ++ p; } } //------------------------------------------- // Close the table for environment variables. //------------------------------------------- printf( "
namelenvalue of environment variable
" "" ); while ( * q != '\0' && * q != '=' ) ++ q; html_asis( * p , q - * p ); printf( "" ); if ( * q ) { ++ q; printf( "%lu" "", (unsigned long)strlen(q) ); printf( "" ); html_asis( q , ~0 ); printf( "" ); } else { printf( "-" "" ); } printf( "
\n" ); fflush( stdout ); //--------------------------------- // Output QUERY data and POST data. //--------------------------------- n = 0; for (;;) { char * varstr; char * valstr; size_t varlen; size_t vallen; int src; //-- Get the next form variable. src = cgi_form_parse( & varstr , & varlen , & valstr , & vallen ); if ( ! src ) break; //-- If the data method is different than previous, //-- split the table with a header in between. if ( src != n ) { if ( n > 0 ) { printf( "\n" ); fflush( stdout ); } printf( "

Form data from %s method

\n" "\n" "\n" "\n" "\n" "\n" "\n" "\n", ((src==1)?"QUERY":"POST") ); n = src; } //-- Output the length and string of the name name and its value. printf( "\n" "\n" "\n" "\n" "\n" "\n" ); } //-- If there were any variables, then close the table. if ( n > 0 ) { printf( "
lenname stringlenconverted value string
%lu" "", (unsigned long) varlen ); html_asis( varstr , varlen ); printf( "%lu" "", (unsigned long) vallen ); html_asis( valstr , vallen ); printf( "
\n" ); fflush( stdout ); } //-- All done. Finish up and exit. printf( "\n" ); fflush( stdout ); return 0; }