scripts/innshellvars.pl.in

   1 #
   2 # Author:       James Brister <brister@vix.com> -- berkeley-unix --
   3 # Start Date:   Sat, 24 Aug 1996 22:08:19 +0200
   4 # Project:      INN
   5 # File:         innshellvars.pl
   6 # RCSId:        $Id: innshellvars.pl.in 7466 2005-12-12 03:04:08Z eagle $
   7 # Description:  Set up any and all variables that an INN perl script
   8 #               might need.
   9
  10 package inn ;
  11
  12 eval `@prefix@/bin/innconfval -p`;
  13
  14 $newshome = $pathnews;
  15 $newslib = "@LIBDIR@";
  16 $spooldir = $pathspool;
  17 $most_logs = $pathlog;
  18
  19 $errlog = "${most_logs}/errlog" ;
  20 $log = "${most_logs}/news" ;
  21
  22 $spool = $patharticles;
  23 $overviewdir = $pathoverview;
  24 $archivedir = $patharchive;
  25 $badnews = "$pathincoming/bad";
  26 $spoolnews = $pathincoming;
  27 $batch = $pathoutgoing;
  28 $incoming = $pathincoming;
  29
  30 $locks = $pathrun;
  31 $newsbin = $pathbin;
  32 $innddir = $pathrun;
  33 $newsetc = $pathetc;
  34 $newslbin = "$pathnews/local";
  35
  36 $active = "${pathdb}/active" ;
  37 $activetimes = "${pathdb}/active.times" ;
  38 $ctlfile = "${newsetc}/control.ctl" ;
  39 $ctlwatch = "${newsetc}/innwatch.ctl" ;
  40 $history = "${pathdb}/history" ;
  41 $newactive = "${pathdb}/active.tmp" ;
  42 $newsfeeds = "${newsetc}/newsfeeds" ;
  43 $newsgroups = "${pathdb}/newsgroups" ;
  44 $oldactive = "${pathdb}/active.old" ;
  45 $path_motd = "${newsetc}/motd.news" ;
  46 $localgroups = "$newsetc/localgroups" ;
  47 $expirectl = "${newsetc}/expire.ctl" ;
  48
  49 $controlprogs = $pathcontrol;
  50 $inews = "${newsbin}/inews" ;
  51 $innconfval = "${newsbin}/innconfval" ;
  52 $innd = "${newsbin}/innd" ;
  53 $inndstart = "${newsbin}/inndstart" ;
  54 $innwatch = "${newsbin}/innwatch" ;
  55 $rnews = "${newsbin}/rnews" ;
  56 $perl_startup_innd = "$pathfilter/startup_innd.pl" ;
  57 $perl_filter_innd = "$pathfilter/filter_innd.pl" ;
  58 $perl_filter_nnrpd = "$pathfilter/filter_nnrpd.pl" ;
  59 $python_filter_innd = "$pathfilter/filter_innd.py" ;
  60 $path_python_inn_module ="$pathfilter/INN.py" ;
  61 $path_tcl_startup = "$pathfilter/startup.tcl" ;
  62 $path_tcl_filter = "$pathfilter/filter.tcl" ;
  63
  64 $daily = "${locks}/LOCK.news.daily" ;
  65
  66 $newscontrol = "${innddir}/control" ;
  67 $nntpconnect = "${innddir}/nntpin" ;
  68 $serverpid = "${innddir}/innd.pid" ;
  69 $innwstatus = "${innddir}/innwatch.status" ;
  70 $watchpid = "${innddir}/innwatch.pid" ;
  71
  72 $awk = "@_PATH_AWK@" ;
  73 $sed = "@_PATH_SED@" ;
  74 $inndf = "${newsbin}/inndf" ;
  75 $egrep = "@_PATH_EGREP@" ;
  76 $gpgv = "@PATH_GPGV@" ;
  77 $perl = "@_PATH_PERL@" ;
  78 $pgp = "@_PATH_PGP@" ;
  79 $sort = "@_PATH_SORT@" ;
  80 $getftp = "@GETFTP@" ;
  81 $uux = "@_PATH_UUX@" ;
  82
  83 $compress = "@COMPRESS@" ;
  84 $gzip = "@GZIP@" ;
  85 $uncompress = "@UNCOMPRESS@" ;
  86 $log_compress = "@LOG_COMPRESS@" ;
  87 $z = "@LOG_COMPRESSEXT@" ;
  88
  89 if ($ovmethod && $ovmethod eq "ovdb") {
  90     $ENV{'DB_HOME'} = $pathoverview;
  91 }
  92
  93 ($tempsock = "${innddir}/ctlinndXXXXXX") =~ s!.*/(.*)XXXXXX$!$1*! ;
  94 ($tempsockdir = "${innddir}/ctlinndXXXXXX") =~ s!/[^/]*$!! ;
  95
  96 $have_uustat = ("@HAVE_UUSTAT@" eq "DO" ? 1 : 0) ;
  97
  98 $newsmaster = '@NEWSMASTER@' ;
  99 $newsuser = '@NEWSUSER@' ;
 100 $newsgroup = '@NEWSGRP@' ;
 101
 102 $ENV{'TMPDIR'} = $pathtmp;
 103 $tmpdir = $pathtmp;
 104 $spooltemp = $pathtmp;
 105
 106 $umask = @NEWSUMASK@ ;
 107
 108 $syslog_facility = lc("@SYSLOG_FACILITY@");
 109 $syslog_facility =~ s/log_//;
 110
 111 $ENV{'PATH'} ||= '';
 112 $ENV{'PATH'} = "${newslbin}:${newsbin}:$ENV{'PATH'}:/bin:/usr/bin:/usr/ucb" ;
 113
 114 $ENV{'HOME'} = ${pathnews};
 115
 116 1 ;