ezmlm-web.patch

   1 diff -urN ezmlm-web-1.0.orig/.htaccess ezmlm-web-1.0/.htaccess
   2 --- ezmlm-web-1.0.orig/.htaccess        Tue Jun  8 23:00:39 1999
   3 +++ ezmlm-web-1.0/.htaccess     Tue Jun  8 23:00:56 1999
   4 @@ -1,4 +1,4 @@
   5 -AuthName EZ Mailing List Manager
   6 +AuthName 'EZ Mailing List Manager'
   7  AuthType Basic
   8 -AuthUserFile /etc/ezmlm-users
   9 +AuthUserFile AUTHFILE
  10  require valid-user
  11 diff -urN ezmlm-web-1.0.orig/ezmlm-web.cgi ezmlm-web-1.0/ezmlm-web.cgi
  12 --- ezmlm-web-1.0.orig/ezmlm-web.cgi    Tue Jun  8 23:00:39 1999
  13 +++ ezmlm-web-1.0/ezmlm-web.cgi Tue Jun  8 23:00:47 1999
  14 @@ -32,10 +32,14 @@
  15  # Default domain name to use if one isn't supplied. This is mainly used to
  16  # determine if we are using a virtual host, and to allow the user to enter
  17  # "user@" instead of the full email address to add a local subscriber.
  18 -$DEFAULT_HOST = 'rucus.ru.ac.za';
  19 +open( DEFAULT_HOST_FILE, "</etc/qmail/control/me" ) || die "Can't open /etc/qmail/control/me: $!\n";
  20 +@DEFAULT_HOST_TABLE = <DEFAULT_HOST_FILE>;
  21 +close( DEFAULT_HOST_FILE );
  22 +$DEFAULT_HOST = $DEFAULT_HOST_TABLE[0];
  23 +$DEFAULT_HOST =~ s/(\n|\r)//;
  24
  25  # Where is the qmail virtual domains file kept on this system?
  26 -$VIRTUAL_DOMAINS = '/var/qmail/control/virtualdomains';
  27 +$VIRTUAL_DOMAINS = '/etc/qmail/control/virtualdomains';
  28
  29  # Safe list deletion?
  30  # 0 = move list to .list and the .qmails to deleted.qmail/. Recoverable :)
  31 @@ -528,11 +532,14 @@
  32
  33     # Set owner if required ...
  34     if (defined($q->param('5'))) {
  35 -      $options .= "5 \'$USER\@$DEFAULT_HOST\'";
  36 +      $options .= "5$USER\@$DEFAULT_HOST";
  37     }
  38
  39     # Actually make the list ...
  40 -   system "ezmlm-make -x$options $LIST_DIR/$list $HOME_DIR/.qmail-$qmail " . $q->param('inlocal') . ' ' . $q->param('inhost') ||
  41 +   $inlocal_pld = $q->param('inlocal');
  42 +   $inhost_pld  = $q->param('inhost');
  43 +
  44 +   system "ezmlm-make", "-x$options", "$LIST_DIR/$list", "$HOME_DIR/.qmail-$qmail", "$inlocal_pld", "$inhost_pld" ||
  45        die "List creation failed";
  46
  47     # Handle the change to inlocal for virtual hosts ...
  48 @@ -653,7 +660,7 @@
  49     }
  50
  51     # Actually update the list ...
  52 -   system "ezmlm-make -ex$options $list" || die "List update failed";
  53 +   system "ezmlm-make",  "-ex$options", "$list" || die "List update failed";
  54
  55     # Update headeradd, headerremove, mimeremove and prefix ...
  56     open(ADD, ">$list/headeradd") || die "Unable to write DIR/headeradd: $!";
  57 diff -urN ezmlm-web-1.0.orig/index.c ezmlm-web-1.0/index.c
  58 --- ezmlm-web-1.0.orig/index.c  Tue Jun  8 23:00:39 1999
  59 +++ ezmlm-web-1.0/index.c       Tue Jun  8 23:00:47 1999
  60 @@ -4,14 +4,9 @@
  61  /* Copyright (C) 1998, Guy Antony Halse, All Rights Reserved */
  62  /* See the README file in this distribution for copyright information */
  63
  64 -void main(void) {
  65 -   /* Change this path to wherever you decided to put ezmlm-web.cgi */
  66 -   system("/usr/local/bin/ezmlm-web.cgi");
  67 -
  68 -   /* Note that you could also use the following to allow a specific user
  69 -      to store their mailing lists in a different directory defined by
  70 -      /home/user/mailinglists ... This over-rides the default */
  71 -   /*
  72 -   system("/usr/local/bin/ezmlm-web.cgi -d /var/mail/user/mailinglists");
  73 -   */
  74 +int main(void)
  75 +{
  76 +/* Change this path to wherever you decided to put ezmlm-web.cgi */
  77 +system("/etc/httpd/ezmlm/ezmlm-web.cgi");
  78 +return -1; /* Shouldn't ever happen */
  79  }