CGIservletSETUP.pl

   1 # Configure CGIservlet by assigning to the relevant variables.
   2 # This is just a copy of the default setup area of CGIservlet.pl.
   3 # This file is read AFTER the default setup, but BEFORE the command line
   4 # options are processed.
   5 #
   6 # License for use and disclaimers
   7 #
   8 # CGIscriptor merges plain ASCII HTML files transparantly
   9 # with CGI variables, in-line PERL code, shell commands,
  10 # and executable scripts in other scripting languages.
  11 #
  12 # This program is free software; you can redistribute it and/or
  13 # modify it under the terms of the GNU General Public License
  14 # as published by the Free Software Foundation; either version 2
  15 # of the License, or (at your option) any later version.
  16 #
  17 # This program is distributed in the hope that it will be useful,
  18 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 # GNU General Public License for more details.
  21 #
  22 # You should have received a copy of the GNU General Public License
  23 # along with this program; if not, write to the Free Software
  24 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  25 #
  26 ############################################################
  27 #                                                          #
  28 #   Parse arguments (you can define DEFAULT VALUES here)   #
  29 #                                                          #
  30 ############################################################
  31
  32 $port      = 8080;           # The port number
  33
  34 # (Fast) direct translation of full URL paths
  35 %AliasTranslation = ('/Welcome.html' => '/');   # Alias => RealURL pairs (ONLY paths)
  36 # Regular expression alias translation, in order of application
  37 # (this can be quite slow)
  38 @RegAliasTranslation = ('^(\..*|.*/\..*)$','\.htm$', '^.*\.log$'); # Full regular expression alias/url pairs: URL
  39 @RegURLTranslation = ('/','.html', '/');   # Full regular expression alias/url pairs: PATH
  40
  41 #$textroot  = $ENV{'PWD'} || `pwd`; # current working directory
  42 #chomp($textroot);           # Remove nasty newline, if present
  43 #$doarg     = '';          # do "filename",
  44
  45 $beginarg  = "require 'CGIscriptor.pl';"; # eval($Argument) at the start of the program
  46 # Use the files from CGIscriptor/ if it exists
  47 $beginarg  = "require 'CGIscriptor/CGIscriptor.pl'" if -d 'CGIscriptor';
  48
  49 $evalarg   = 'Handle_Request();'; # eval($Argument) for each request
  50 $execarg   = '';          # `command \'$textroot$Path\' \'$QueryString\'`
  51
  52 #$welcome   = '/index.html';  # Default path
  53
  54 #  Rudimentary security, overflow detection
  55 #$MaxBrood  = 32;               # Maximum number of running children
  56 #$MaxTime  = 36000;           # Maximum time a child may run in seconds
  57 #$MaxLength = 2**15;          # Maximum Request Length
  58
  59 # If one of the following lists contains any client addresses or names, all others are
  60 # blocked (be carefull, your site will be inaccessible if you misspell them).
  61 #@RemoteHost = ();              # Accepted Hosts, suggest: localhost
  62 #@RemoteAddr = ();              # Accepted IP addresses, suggest: @RemoteAddr=('127.0.0.1')
  63 #$DefaultRemoteAddr = '127.0.0.1';  # default, use localhost IP address
  64 #$NONAME = 0;                   # if 1, do NOT ask for REMOTE_HOST (faster)
  65
  66 # Store the whole Web Site in a hash table and use this RAM image
  67 $UseRAMimage = 0;
  68
  69 # Execute shell CGI scripts when no -d, -e, or -x are supplied
  70 $ExecuteOSshell = 0;            # Do you REALY want this? It is dangerous
  71
  72 1;      # Make require happy