[BACK]Return to apachereload CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom

Diff for /loncom/apachereload between versions 1.1 and 1.5

version 1.1, 2003/09/30 10:06:48 version 1.5, 2006/01/27 21:21:05
Line 3 Line 3
 #  #
 # apachereload - setuid script that reloads the apache daemon.  # apachereload - setuid script that reloads the apache daemon.
 #  #
   # $Id$
 #  #
 # $Id  # Copyright Michigan State University Board of Trustees
 #  #
 #  Change log:  # This file is part of the LearningOnline Network with CAPA (LON-CAPA).
 #   $Log$  
 #   Revision 1.1  2003/09/30 10:06:48  foxr  
 #   This is a setuid script that allows the www user to issue  
 #   /etc/init.d/httpd reload  
 #  #
 #   This functionality is required by lond and lonc when they have been asked to  # LON-CAPA is free software; you can redistribute it and/or modify
 #   reinitialize themselves.  # it under the terms of the GNU General Public License as published by
   # the Free Software Foundation; either version 2 of the License, or 
   # (at your option) any later version.
 #  #
 #   Initial undebugged version.  # LON-CAPA is distributed in the hope that it will be useful,
   # but WITHOUT ANY WARRANTY; without even the implied warranty of
   # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   # GNU General Public License for more details.
   #
   # You should have received a copy of the GNU General Public License
   # along with LON-CAPA; if not, write to the Free Software
   # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
   #
   # /home/httpd/html/adm/gpl.txt
   #
   # http://www.lon-capa.org/
 #  #
 ###  
   
   
 use strict;  use strict;
Line 33  delete @ENV{qw(IFS CDPATH ENV BASH_ENV)} Line 42  delete @ENV{qw(IFS CDPATH ENV BASH_ENV)}
   
 my $command = "/etc/init.d/httpd reload";  my $command = "/etc/init.d/httpd reload";
   
   use lib '/home/httpd/lib/perl/';
   use LONCAPA::Configuration;
   my %perlvar= %{&LONCAPA::Configuration::read_conf('loncapa.conf')};
   
   my $execdir = ($perlvar{'lonDaemons'} =~/(.*)/);
   my $dist=`$execdir/distprobe`;
   if ($dist =~ /^(suse|sles)/) {
       $command = "/etc/init.d/apache reload";
   }
 # Do not print error messages  # Do not print error messages
 my $noprint=1;  my $noprint=1;
   
Removed from v.1.1  
changed lines
  Added in v.1.5

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>