|
Hi
there all I
had a problem with apache2 failing when starting, reloading, etc... I was
forced to remove apache-mod-fastcgi and also apache-mod-fcgi. I then reinstalled
apache-mod-fastcgi and installed apache2-mod-fastcgi... Not sure if that was
correct, but either way the CGI interface does not display. I made sure that fastcgi
was enabled in Apache2 , see below: [EMAIL PROTECTED]:/etc/apache2/mods-enabled#
ls –l | grep fastcgi lrwxrwxrwx
1 root root 40 2006-07-19 11:58 fastcgi.conf ->
/etc/apache2/mods-available/fastcgi.conf lrwxrwxrwx
1 root root 40 2006-07-19 11:58 fastcgi.load ->
/etc/apache2/mods-available/fastcgi.load Please
help me?! I am now quite lost. See below at what displays one I have
authenticated http://192.168.0.2/backuppc: ------------------------------------------------------------------------------------------------------ #!/usr/bin/perl #=============================================================
-*-perl-*-w # #
BackupPC_Admin: Apache/CGI interface for BackupPC. # #
DESCRIPTION #
BackupPC_Admin provides a flexible web interface for BackupPC. #
It is a CGI script that runs under Apache. # #
It requires that Apache pass in $ENV{SCRIPT_NAME} and #
$ENV{REMOTE_USER}. The latter requires .ht_access style #
authentication. Replace the code below if you are using some other #
type of authentication, and have a different way of getting the #
user name. # #
Also, this script needs to run as the BackupPC user. To accomplish #
this the script is typically installed as setuid to the BackupPC user, #
or it can run under mod_perl with httpd running as the BackupPC user. # #
AUTHOR #
Craig Barratt <[EMAIL PROTECTED]> # #
COPYRIGHT # Copyright
(C) 2001-2003 Craig Barratt # #
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; either version 2 of the License, or #
(at your option) any later version. # #
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 # #======================================================================== # #
Version 2.1.2, released 5 Sep 2005. # #
See http://backuppc.sourceforge.net. # #======================================================================== use
strict; no
utf8; use
CGI; use
CGI::Carp qw(fatalsToBrowser); use
lib "/usr/share/backuppc/lib"; use
BackupPC::Lib; use
BackupPC::CGI::Lib qw(:all); BackupPC::CGI::Lib::NewRequest; my
%ActionDispatch = (
"summary"
=> "Summary",
$Lang->{Start_Incr_Backup} => "StartStopBackup",
$Lang->{Start_Full_Backup} => "StartStopBackup",
$Lang->{Stop_Dequeue_Backup} => "StartStopBackup",
$Lang->{Stop_Dequeue_Archive} => "StartStopBackup",
"queue"
=> "Queue",
"view"
=> "View",
"LOGlist"
=> "LOGlist",
"emailSummary" =>
"EmailSummary",
"browse"
=> "Browse",
"dirHistory"
=> "DirHistory",
$Lang->{Restore} =>
"Restore",
"RestoreFile" =>
"RestoreFile",
"hostInfo"
=> "HostInfo",
"generalInfo" =>
"GeneralInfo",
"restoreInfo" =>
"RestoreInfo",
"archiveInfo" =>
"ArchiveInfo",
$Lang->{Start_Archive} => "Archive",
"Archive"
=> "Archive",
"Reload"
=> "ReloadServer",
"startServer"
=> "StartServer",
"Stop"
=> "StopServer",
"adminOpts"
=> "AdminOptions", ); # #
Set default actions, then call sub handler # $In{action}
||= "hostInfo" if ( defined($In{host}) ); $In{action}
= "generalInfo" if ( !defined($ActionDispatch{$In{action}}) ); my
$action = $ActionDispatch{$In{action}}; # #
For some reason under mod_perl, the use lib above is unreliable, #
and sometimes the module below cannot be found. Explicitly push #
the directory onto INC if it is missing. This is an ugly hack; #
need to figure out what's really going on... # my
$installDir = '/usr/share/backuppc/lib'; push(@INC,
$installDir) if ( !grep($_ eq $installDir, @INC) ); # #
Load the relevant action script and run it # require
"BackupPC/CGI/$action.pm"
if ( !defined($BackupPC::CGI::{"${action}::"}) ); $BackupPC::CGI::{"${action}::"}{action}(); ------------------------------------------------------------------------------------------------------ Thanks
for your help! Ashley |
------------------------------------------------------------------------- Take Surveys. Earn Cash. Influence the Future of IT Join SourceForge.net's Techsay panel and you'll get the chance to share your opinions on IT & business topics through brief surveys -- and earn cash http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________ BackupPC-users mailing list BackupPC-users@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/backuppc-users http://backuppc.sourceforge.net/
