Author: nhosoi Update of /cvs/dirsec/adminserver/admserv/cgi-src40 In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv19006/admserv/cgi-src40 Modified Files: monreplication.properties Added Files: repl-monitor-cgi.pl.in Log Message: Resolves: #273501 Summary: Replication monitor CGI seems misconfigured (comment #2, #3) i1) added repl-monitor-cgi.pl(.in) 2) removed "perl?" from nsExecRef, with which CGI expects "perl" is in the cgi-bin directory --- NEW FILE repl-monitor-cgi.pl.in --- #!@perlexec@ # # BEGIN COPYRIGHT BLOCK # This Program is free software; you can redistribute it and/or modify it under # the terms of the GNU General Public License as published by the Free Software # Foundation; version 2 of the License. # # This Program 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 # this Program; if not, write to the Free Software Foundation, Inc., 59 Temple # Place, Suite 330, Boston, MA 02111-1307 USA. # # In addition, as a special exception, Red Hat, Inc. gives You the additional # right to link the code of this Program with code not covered under the GNU # General Public License ("Non-GPL Code") and to distribute linked combinations # including the two, subject to the limitations in this paragraph. Non-GPL Code # permitted under this exception must only link to the code of this Program # through those well defined interfaces identified in the file named EXCEPTION # found in the source code files (the "Approved Interfaces"). The files of # Non-GPL Code may instantiate templates or use macros or inline functions from # the Approved Interfaces without causing the resulting work to be covered by # the GNU General Public License. Only Red Hat, Inc. may make changes or # additions to the list of Approved Interfaces. You must obey the GNU General # Public License in all respects for all of the Program code and other code used # in conjunction with the Program except the Non-GPL Code covered by this # exception. If you modify this file, you may extend this exception to your # version of the file, but you are not obligated to do so. If you do not wish to # provide this exception without modification, you must delete this exception # statement from your version and license this file solely under the GPL without # exception. # # # Copyright (C) 2005 Red Hat, Inc. # All rights reserved. # END COPYRIGHT BLOCK # use CGI; my $query = CGI->new; $params = ""; $params .= " -h " . $query->url_param('servhost') if $query->url_param('servhost'); $params .= " -p " . $query->url_param('servport') if $query->url_param('servport'); $params .= " -f " . $query->url_param('configfile') if $query->url_param('configfile'); $params .= " -t " . $query->url_param('refreshinterval') if $query->url_param('refreshinterval'); if ($query->url_param('admurl')) { $admurl = $query->url_param('admurl'); if ( $ENV{'QUERY_STRING'} ) { $admurl .= "?$ENV{'QUERY_STRING'}"; } elsif ( $ENV{'CONTENT_LENGTH'} ) { $admurl .= "?$CGI::CONTENT"; } $params .= " -u \"$admurl\""; } # Now the real work $replmon = "@bindir(a)/repl-monitor.pl"; system("$replmon $params"); Index: monreplication.properties =================================================================== RCS file: /cvs/dirsec/adminserver/admserv/cgi-src40/monreplication.properties,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- monreplication.properties 18 Aug 2005 18:59:03 -0000 1.3 +++ monreplication.properties 5 Sep 2007 16:45:59 -0000 1.4 @@ -23,7 +23,7 @@ root { -monreplication1 { "s/admin-serv/tasks/configuration/repl-monitor-cgi.pl" } +monreplication1 { "%s/admin-serv/tasks/configuration/repl-monitor-cgi.pl" } monreplication2 { "300" } monreplication3 { "" }