动网论坛,站长建站首选,国内使用量最多的论坛软件 动网论坛官方技术讨论区 站长工具 申请属于您自己的免费论坛
首页 | 新闻资讯 | 网站运营 | 网络编程 | 数据库 | 服务器 | 网页设计 | 图像媒体 | 网络应用 | 搜索优化 | 资源下载 | 动网主机 | DVBOX
    本站内  互联网 ASP论坛  ASP.Net论坛  PHP论坛
   Cgi/Perl → 阅读文章

 CGI教程(6)调用CGI脚本文件的例子

作者来源: 
阅读 2081 人次 , 2006-4-20 8:53:00 

调用CGI脚本文件的例子

你可以使用以下的语句来执行服务器中的CGI脚本dynamic_page:

<A HREF="http://www.mc.com/cgi-bin/dynamic_page">Dynamic page</A>

当网络服务器处理一个请求来取文件的时候,如果这个请求的文件在服务器的cgi-bin目录中,那么只要这个文件被标识为可执行的,那个脚本将在服务器上运行。如果文件是不可执行的,那么将会报告一个错误。

最终脚本会返回一个HTML网页或者图片作为执行结果显示出来。当CGI脚本文件执行时,它可以访问环境变量来获得有关处理的额外信息。返回数据的第一行将为:

返回数据的类型
文本

一个HTML网页
Content-type: text/html

一张GIF图片
Content-type: image/gif


下面是一个在UNIX中基于网络服务器简单的CGI脚本,它返回当前用户的列表,这些用户登陆到网络服务器中,代码如下:

#!/bin/sh

echo Content-type: text/html

echo

echo

echo ""

echo "<HEAD>"

echo "</HEAD>"

echo ""

echo "<H2>Users logged in are:</H2>"

echo "<PRE>"

who

echo "</PRE>"

echo ""

echo ""

  这里要记住:"旁边的文本是< or >字符。在UNIX系统中,第一行为#!/bin/sh。文件被设置为可执行的。

  上面代码中的JCL(任务控制语言)命令echo回显行的其它部分到标准输出中。而JCL命令who列出了当前登陆的用户。这样就允许用户创建它们的CGI脚本,导致了服务器的安全问题。
调用CGI脚本文件的例子

当CGI脚本被执行的时候,可以被它访问的主要环境变量有:

环境变量
内容

QUERY_STRING
数据通过它的调用者发送给CGI脚本。这可能是来自表单或者其它动态或者静态产生数据的输出。

REMOTE_ADDR
产生请求的主机的Internet地址


以下的一个C++程序可以实现当它运行的时候,打印出CGI脚本的许多有效的环境变量:

#include "t99_type.h"

#include

#include

#include

#include

#include

#include



#include "mas_cvo.cpp"



// Main program



int main()

{

html("Content-type: text/html"); html(""); // 输出类型

cgi_var_output(); // 环境变量

return 0;

}

上面的程序当然还需要两个文件,即t99_type.h和mas_cvo.cpp。具体代码请看下一页。
调用CGI脚本文件的例子

上面的程序当然还需要两个文件,即t99_type.h和mas_cvo.cpp。具体代码请看下一页。如下:

//以下是t99_type.h文件

#ifndef MAS_TYPE

#define MAS_TYPE

#ifndef __TURBOC__

# define __TURBOC__ 0x0000

#endif

#define V5 (__TURBOC__ >= 0x0500 )

#define V4 (__TURBOC__ >= 0x0400 && __TURBOC__ <= 0x0499 )

#define V3 (__TURBOC__ >= 0x0300 && __TURBOC__ <= 0x0399 )

#if V3

#define DOES_NOT_HAVE_BOOL

#define DOES_NOT_HAVE_STRING

#define DOES_NOT_HAVE_EXCEPTION

#define DOES_NOT_HAVE_EXCEPTION_CLASSES

#define DOES_NOT_HAVE_MUTABLE

#define DOES_NOT_HAVE_EXPLICIT

#define DOES_NOT_HAVE_NAMESPACE_STD

#endif

#if V4

#define DOES_NOT_HAVE_BOOL

#define DOES_NOT_HAVE_EXCEPTION_CLASSES

#define DOES_NOT_HAVE_MUTABLE

#define DOES_NOT_HAVE_EXPLICIT

#define DOES_NOT_HAVE_NAMESPACE_STD

#endif

#if V5

#define DOES_NOT_HAVE_EXCEPTION_CLASSES

//#define HAS_NAMESPACE_STD

#endif

#ifdef __GNUC__

//#define NEED_TO_INCLUDE_libioP

//#define DOES_NOT_HAVE_EXCEPTION -fhandle-execeptions

#define DOES_NOT_HAVE_EXCEPTION_CLASSES

//#include (Broken)

#define DOES_NOT_HAVE_MUTABLE

#define DOES_NOT_HAVE_EXPLICIT

#define DOES_NOT_HAVE_NAMESPACE_STD

#endif

#ifdef DOES_NOT_HAVE_NAMESPACE_STD

#define std

#endif

#ifdef NEED_TO_INCLUDE_libioP

#include

#endif

#ifdef DOES_NOT_HAVE_BOOL

# define bool int

# define true 1

# define false 0

#endif

#ifdef DOES_NOT_HAVE_MUTABLE

# define mutable

#endif

#ifdef DOES_NOT_HAVE_EXPLICIT

# define explicit

#endif

#ifdef DOES_NOT_HAVE_EXCEPTION

# define throw

# define try

# define catch( parameter ) exception err; if ( false )

#endif

#undef DOES_NOT_HAVE_EXCEPTION_CLASSES

#ifdef DOES_NOT_HAVE_EXCEPTION_CLASSES

# ifdef DOES_NOT_HAVE_STRING

# include "t99_str.h"

# else

# ifdef __GNUC__

# include

# //include

# //include "t99_str.h"

# //include

# else

# include

# endif

# endif

class exception

{

public:

exception( const string& arg="" )

{

the_message = arg;

}

virtual ~exception(){};

virtual const char* what()

{

return the_message.c_str();

}

private:

string the_message;

};

class logic_error: public exception

{

public:

logic_error( const string& arg ) : exception( arg ) {};

};

class runtime_error: public exception

{

public:

runtime_error( const string& arg ) : exception( arg ) {};

};

class range_error: public runtime_error

{

public:

range_error( const string& arg ) : runtime_error( arg ) {};

};

class overflow_error: public runtime_error

{

public:

overflow_error( const string& arg ) : runtime_error( arg ) {};

};

class domain_error: public logic_error

{

public:

domain_error( const string& arg ) : logic_error( arg ) {};

};

class out_of_range: public logic_error

{

public:

out_of_range( const string& arg ) : logic_error( arg ) {};

};

class invalid_argument: public logic_error

{

public:

invalid_argument( const string& arg ) : logic_error( arg ) {};

};

class length_error: public logic_error

{

public:

length_error( const string& arg ) : logic_error( arg ) {};

};

#endif

#endif

下一页是mas_cvo.cpp文件

调用CGI脚本文件的例子

//以下是mas_cvo.cpp文件

#include "t99_type.h"

#include

#include

inline void html( char str[] ) { cout << str << "\n"; }

inline void html_( char str[] ) { cout << str; }

inline void html_( char c ) { cout << c; }

// 传递调试选项

// 可以由脚本看到的环境变量

char* getenv_n( char var[] )

{

char *p = getenv( var );

return p == NULL ? (char*)"[]" : p;

}

void cgi_var_output( )

{

html("");

html("");

html( "
" );

html_("AUTH_TYPE "); html( getenv_n( "AUTH_TYPE" ) );

html_("CONTENT_LENGTH "); html( getenv_n( "CONTENT_LENGTH" ) );

html_("CONTENT_TYPE "); html( getenv_n( "CONTENT_TYPE" ) );

html_("GATEWAY_INTERFACE "); html( getenv_n( "GATEWAY_INTERFACE" ) );

html_("HOSTTYPE "); html( getenv_n( "HOSTTYPE" ) );

html_("HTTP_ACCEPT "); html( getenv_n( "HTTP_ACCEPT" ) );

html_("HTTP_CONNECTION "); html( getenv_n( "HTTP_CONNECTION" ) );

html_("HTTP_HOST "); html( getenv_n( "HTTP_HOST" ) );

html_("HTTP_PRAGMA "); html( getenv_n( "HTTP_PRAGMA" ) );

html_("HTTP_REFERER "); html( getenv_n( "HTTP_REFERER" ) );

html_("HTTP_USER_AGENT "); html( getenv_n( "HTTP_USER_AGENT" ) );

html_("OSTYPE "); html( getenv_n( "OSTYPE" ) );

html_("PATH_INFO "); html( getenv_n( "PATH_INFO" ) );

html_("PATH_TRANSLATED "); html( getenv_n( "PATH_TRANSLATED" ) );

html_("QUERY_STRING "); html( getenv_n( "QUERY_STRING" ) );

html_("REMOTE_ADDR "); html( getenv_n( "REMOTE_ADDR" ) );

html_("REMOTE_HOST "); html( getenv_n( "REMOTE_HOST" ) );

html_("REMOTE_IDENT "); html( getenv_n( "REMOTE_IDENT" ) );

html_("REMOTE_USER "); html( getenv_n( "REMOTE_USER" ) );

html_("REQUEST_METHOD "); html( getenv_n( "REQUEST_METHOD" ) );

html_("SCRIPT_NAME "); html( getenv_n( "SCRIPT_NAME" ) );

html_("SERVER_NAME "); html( getenv_n( "SERVER_NAME" ) );

html_("SERVER_PORT "); html( getenv_n( "SERVER_PORT" ) );

html_("SERVER_PROTOCOL "); html( getenv_n( "SERVER_PROTOCOL" ) );

html_("SERVER_SOFTWARE "); html( getenv_n( "SERVER_SOFTWARE" ) );

html("<P>");

html("Unix command printenv");

cout << flush;

system( "printenv | sort" );

html("

");

html("Unix command set");

cout << flush;

system( "set | sort " );

html( "

" );

html( "" );

html( "" );

}

  实际上,CGI脚本也可以用其它的语言来编写。如果你使用C语言来编写并且是在UNIX系统中,最好是使用版本高于2.7.0的gcc编译器,因为这个编译器支持新的数据类型:bool(布尔型)。
  
 
 收藏本文  打印本文  论坛讨论  关闭窗口
· 上一篇:Perl教学 第十四篇 Perl5的包和模块
· 下一篇:CGI教程(7)解码数据发送给CGI脚本
· Perl在WAP网站中应用实例一谈
· Perl6的结构
· CGI动态创建图象
· perl中匿名散列表与引用
· Perl渐成气候


关于本站 | 联系我们 | 业务合作 | 客户案例 | 诚聘英才 | 广告合作 | 收藏本站
海口动网先锋网络科技有限公司版权所有
Copyright © 2000 - 2006 Cndw.Com
中华人民共和国电信与信息服务业务经营许可证编号 琼 ICP 020077