[NLUUG]   Welcome to ftp.nluug.nl
Current directory: /languages/perl/CPAN/scripts/infoserv/gopher/servers/go4gw/
 
Current bandwidth utilization 2136.48 Mbit/s
Bandwidth utilization bar
Contents of README:
go4gw version 1.01
------------------

go4gw is a daemon which can handle many different gopher gateways
written in perl. It should be started from inetd.

Bugs to gopher@boombox.micro.umn.edu

INSTALLATION
------------

You need to put the following line in /etc/services:

go4gw     	4320/tcp

And the following line in /etc/inetd.conf (depending on your system type):

go4gw  stream  tcp     nowait  /usr/local/etc/go4gw  go4gw

The go4gw script has a few variables you might want to change:

$Gconf_file = "/usr/local/etc/go4gw.conf"; # configuration file
$Gport=4320;                               # port THIS daemon is running on
$Ghost="Slapshot.Stanford.EDU";            # host THIS daemon is running on

You need to set Gport to the same port as in /etc/services, and Ghost to
your fully qualified host name.

Why aren't these two auto-magically figured out?
Mainly for speed, but also because some `hostname` commands don't
have the domain, some do, etc. Its easier just to define them here.
Since all the other gateways are run in the context of this perl script,
the gateways don't need any of this stuff in them.

Gconf_file should be set to the location of your go4gw.conf file. The
format of this file is:

#
# format
# gateway : user : module : gopher title
#
whois:-2:/usr/local/etc/g2whois:Whois:
nntp:-2:/usr/local/etc/g2nntp:USENET News:
webster:-2:/usr/local/etc/g2webster:Webster:
#

Where gateway is the name of the gateway, user is either a numeric uid
or name,  module is the name of the perl script that go4gw will dynamically 
load, and title is the title that will show up in the gopher menu if go4gw 
is sent the string "". If the gateway doesn't take an empty string, the title
should be "" and it won't show up in the menu. By writing all your gateways so
they take a "" command, you can point a link at the go4gw daemon with
path set to "" and get a menu of all your gateways. The menu order will
be the same order as the go4gw.conf file.

Once you've done all this configuration you'll want to try HUP inetd.
Then you can test it out by running a gopher client to the newly
created port..


Writing go4gw gateways
-----------------------
go4gw gateways need to a follow a few simple conventions:

You need to have a routine called "${gateway}_main", where gateway
is the name of your gateway. For example, if your gateway is called 
whois, then you need:

whois_main {
  local($_) = @_;
  ...
}

In your module (/usr/local/etc/g2whois for example).

Your *_main will be passed the string sent to go4gw WITHOUT your gateway 
prefix. For example, if someone sends the following string to go4gw:

nntp ls su.jobs

Then go4gw will call &nntp_main("ls su.jobs"),  after loading g2nntp.

You should define any variables that users might have to change at the
front of your script, and prefix them with your gateway name. 

When your gateway has to return selector string, hostname, and port, it
should use the following variables:

$Ggw    -> name of this gateway
$Gport  -> port this gateway is running on
$Ghost  -> host this gateway is running on

For example, nntp might do the following:

&Greply("0$Subject\t$Ggw article $group $article\t$Ghost\t$Gport");

So when the user selects this they will send:

nntp article su.jobs 104

Back to the go4gw daemon, which will figure out that "article su.jobs 104"
needs to get passed to g2nntp.

The following variables and routines are defined in go4gw, and can be used 
by gateways:

$GnotServer    You can define this in perl scripts that want to include
               the go4gw script without running the server. See the
               g2nntp_groups script.

$Ggw           Can be used by gateway routines to determine their gateway     
               name.

$Gport         Can be used by gateway routines to determine which port go4gw
               is running on.

$Ghost         Can be used by gateway routines to determine which host go4gw
               is running on.

GSERVER        File handle which is opened when GopenServer is called.

&Greply(reply) Sends string back to gopher client with \r\n on the end.

&Gabort(mess)  Sends error message back to gopher client with 
               "3mess\r\n.\r\n" on end.
              
&GopenServer(server,port)
               Opens TCP port at server or calls Gabort.

&GcloseServer  Closes server.

$Gdebug        define this to turn on debugging in &Gsend and &Grecv.

&Gsend(cmd)    Sends "cmd\r\n" to GSERVER.

$_ = &Grecv;   Gets response from GSERVER and strips \r and \n.

&Gsorry        Sends message about data that cannot be delivered due to
               restrictions.

Other "standard" routines and variables may be added. They will start
with a 'G'.

Roland

Icon  Name                                                  Last modified      Size  
[DIR] Parent Directory - [TXT] README 05-Apr-1993 23:00 4.6K [   ] areacode 05-Apr-1993 23:00 7.8K [   ] firewall.gopher 22-May-1993 23:00 4.9K [   ] g2alexhack 05-Apr-1993 23:00 2.6K [TXT] g2archie 05-Apr-1993 23:00 2.0K [TXT] g2areacode 05-Apr-1993 23:00 1.1K [TXT] g2finger 05-Apr-1993 23:00 2.1K [   ] g2ftphack 05-Apr-1993 23:00 539 [TXT] g2geo 05-Apr-1993 23:00 2.8K [   ] g2nntp 05-Apr-1993 23:00 7.2K [TXT] g2nntp_groups 05-Apr-1993 23:00 419 [TXT] g2snmp 05-Apr-1993 23:00 16K [   ] g2webster 05-Apr-1993 23:00 2.5K [TXT] g2whois 05-Apr-1993 23:00 3.1K [   ] go4gw 05-Apr-1993 23:00 2.5K [   ] go4gw.QandA 05-Aug-1993 23:00 4.2K [   ] go4gw.conf 05-Apr-1993 23:00 610 [   ] go4gw.g2linkdb 23-Aug-1993 23:00 6.0K [TXT] index.html 13-Aug-1995 23:04 772 [   ] menu 30-Mar-1994 23:00 1.5K

NLUUG - Open Systems. Open Standards
Become a member and get discounts on conferences and more, see the NLUUG website!