1 |
slords |
1.1 |
--- smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm.RemoveLeftoverReferencesToModAuthz 2008-02-06 23:07:00.000000000 +0100 |
2 |
|
|
+++ smeserver-subversion-1.4/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/subversion.pm 2008-02-07 20:56:05.000000000 +0100 |
3 |
|
|
@@ -115,7 +115,7 @@ |
4 |
|
|
=head2 subversion_status_print() |
5 |
|
|
|
6 |
|
|
Display the status of all services involved: modSSL (provides Secure Scoket Layer (SSL) better known as the https protocl for httpd), modDAV (procides Distributed Authoring and Versioning |
7 |
|
|
-(DAV) for httpd), modDAVSVN (provides SVN (Subversion) for DAV for the httpd), modAuthzSVN (provides authorization for Subversion over DAV for httpd) |
8 |
|
|
+(DAV) for httpd), modDAVSVN (provides SVN (Subversion) for DAV for the httpd) |
9 |
|
|
|
10 |
|
|
=cut |
11 |
|
|
|
12 |
|
|
@@ -333,16 +333,12 @@ |
13 |
|
|
|| ($self->error('ERR_NO_MODDAV_RECORD') and return undef); |
14 |
|
|
my $modDAVSVN = $configdb->get('modDAVSVN') |
15 |
|
|
|| ($self->error('ERR_NO_MODDAVSVN_RECORD') and return undef); |
16 |
|
|
- my $modAuthzSVN = $configdb->get('modAuthzSVN') |
17 |
|
|
- || ($self->error('ERR_NO_MODAUTHZSVN_RECORD') and return undef); |
18 |
|
|
|
19 |
|
|
if ( $current ) { |
20 |
|
|
$modDAV->set_prop("status", "disabled") ; |
21 |
|
|
$self->debug_msg("'mod_dav_status_change' : mod_dav disabled.") ; |
22 |
|
|
$modDAVSVN->set_prop("status", "disabled") ; |
23 |
|
|
$self->debug_msg("'mod_dav_svn_status_change' : mod_dav_svn disabled.") ; |
24 |
|
|
- $modAuthzSVN->set_prop("status", "disabled") ; |
25 |
|
|
- $self->debug_msg("'mod_authz_svn_status_change' : mod_authz_svn disabled.") ; |
26 |
|
|
} else { |
27 |
|
|
$modDAV->set_prop("status", "enabled") ; |
28 |
|
|
$self->debug_msg("'mod_dav_status_change' : mod_dav enabled.") ; |
29 |
|
|
@@ -374,60 +370,13 @@ |
30 |
|
|
|| ($self->error('ERR_NO_MODDAV_RECORD') and return undef); |
31 |
|
|
my $modDAVSVN = $configdb->get('modDAVSVN') |
32 |
|
|
|| ($self->error('ERR_NO_MODDAVSVN_RECORD') and return undef); |
33 |
|
|
- my $modAuthzSVN = $configdb->get('modAuthzSVN') |
34 |
|
|
- || ($self->error('ERR_NO_MODAUTHZSVN_RECORD') and return undef); |
35 |
|
|
|
36 |
|
|
if ( $current ) { |
37 |
|
|
$modDAVSVN->set_prop("status", "disabled") ; |
38 |
|
|
$self->debug_msg("'mod_dav_svn_status_change' : mod_dav_svn disabled.") ; |
39 |
|
|
- $modAuthzSVN->set_prop("status", "disabled") ; |
40 |
|
|
- $self->debug_msg("'mod_authz_svn_status_change' : mod_authz_svn disabled.") ; |
41 |
|
|
} else { |
42 |
|
|
$modDAV->set_prop("status", "enabled") ; |
43 |
|
|
$self->debug_msg("'mod_dav_status_change' : mod_dav enabled.") ; |
44 |
|
|
- $modDAVSVN->set_prop("status", "enabled") ; |
45 |
|
|
- $self->debug_msg("'mod_dav_svn_status_change' : mod_dav_svn enabled.") ; |
46 |
|
|
- } |
47 |
|
|
- |
48 |
|
|
- if (system ("/sbin/e-smith/signal-event", "subversion-modify") == 0) { |
49 |
|
|
- $self->debug_msg("'subversion-modify' : files update OK.") ; |
50 |
|
|
- $self->success("CONFIG_CHANGE_SUCCESS"); |
51 |
|
|
- } else { |
52 |
|
|
- $self->debug_msg("'subversion-modify' : files update fails.") ; |
53 |
|
|
- $self->error("CONFIG_CHANGE_ERROR"); |
54 |
|
|
- } |
55 |
|
|
- return undef ; |
56 |
|
|
-} |
57 |
|
|
- |
58 |
|
|
-=head2 mod_authz_svn_status_change() |
59 |
|
|
- |
60 |
|
|
-This method changes the status of the httpd mod_authz_svn module. |
61 |
|
|
- |
62 |
|
|
-=cut |
63 |
|
|
- |
64 |
|
|
-sub mod_authz_svn_status_change { |
65 |
|
|
- my $self = shift ; |
66 |
|
|
- $self->debug_msg("Start of sub 'mod_authz_svn_status_change'.") ; |
67 |
|
|
- my $current = $self->{cgi}->param('Current') ; |
68 |
|
|
- $self->debug_msg("'mod_authz_svn_status_change' : \$current = $current") ; |
69 |
|
|
- |
70 |
|
|
- my $modDAV = $configdb->get('modDAV') |
71 |
|
|
- || ($self->error('ERR_NO_MODDAV_RECORD') and return undef); |
72 |
|
|
- my $modDAVSVN = $configdb->get('modDAVSVN') |
73 |
|
|
- || ($self->error('ERR_NO_MODDAVSVN_RECORD') and return undef); |
74 |
|
|
- my $modAuthzSVN = $configdb->get('modAuthzSVN') |
75 |
|
|
- || ($self->error('ERR_NO_MODAUTHZSVN_RECORD') and return undef); |
76 |
|
|
- |
77 |
|
|
- if ( $current ) { |
78 |
|
|
- $modAuthzSVN->set_prop("status", "disabled") ; |
79 |
|
|
- $self->debug_msg("'mod_authz_svn_status_change' : mod_authz_svn disabled.") ; |
80 |
|
|
- } else { |
81 |
|
|
- $modDAV->set_prop("status", "enabled") ; |
82 |
|
|
- $self->debug_msg("'mod_dav_status_change' : mod_dav enabled.") ; |
83 |
|
|
- $modDAVSVN->set_prop("status", "enabled") ; |
84 |
|
|
- $self->debug_msg("'mod_dav_svn_status_change' : mod_dav_svn enabled.") ; |
85 |
|
|
- $modAuthzSVN->set_prop("status", "enabled") ; |
86 |
|
|
- $self->debug_msg("'mod_authz_svn_status_change' : mod_authz_svn enabled.") ; |
87 |
|
|
} |
88 |
|
|
|
89 |
|
|
if (system ("/sbin/e-smith/signal-event", "subversion-modify") == 0) { |