Topic: How to allow index of ibay

[electroman00]

Hi

On my (2) 7pre1 system mod_perl.so does not exist.....hmmm.

[dsemuk]

Well Gordon has said pre4 is being pushed out to the mirrors so I'm waiting to see how I fair with mod_perl on that before putting in the bugtracker.

Dave

[electroman00]

Charlie said it's installed and he's the man, looks like a bug.

So I don't know.

[electroman00]

doing this now to see if that helps

yum install mod_perl

[electroman00]

hi all

gjz-mitel-modindex-0.0.4-4.noarch.rpm is failing dependencies

So that rpm doesn't look like it will work.

and this one is listed as not working on 7.x either

e-smith-modindex-0.0.5-2.noarch.rpm

Does anyone have a 7.x rpm for this or know of one that works.

Not one for reinventing the wheel.

[Denbert]

mod-perl is already installed. It just needs to be enabled.

config setprop modPerl status enabled
signal-event post-upgrade
signal-event reboot

Works on SME 7.0pre4

[electroman00]

Denbert

Just to keep this in line 7pre1 needs the following.

Code: [Select]


yum install mod_perl
config setprop modPerl status enabled
signal-event post-upgrade
signal-event reboot

7pre2 and 7pre3 ??

So somewhere between 7pre2 - 7pre4 mod_perl is on the radar.

You don't know of a modindex around for 7pre?

[ajkeane]

Thanks for that guys.

OK having installed Mod_perl and then tried modindexer with --nodeps I get the following.

Preparing...                ########################################### [100%]
   1:gjz-mitel-modindex     ########################################### [100%]
WARNING in /etc/e-smith/templates-custom//etc/httpd/conf/httpd.conf/90e-smithAcc
ess40ibays: *WARNING* esmith::config(/home/e-smith/accounts) called with old dat
abase path. The following package needs to be updated:  at /usr/lib/perl5/site_p
erl/esmith/config.pm line 374
        esmith::config::TIEHASH('esmith::config', '/home/e-smith/accounts') call
ed at /etc/e-smith/templates-custom//etc/httpd/conf/httpd.conf/90e-smithAccess40
ibays line 7
        eval 'package esmith::__TEMPLATE__::1; ;
#line 5 /etc/e-smith/templates-custom//etc/httpd/conf/httpd.conf/90e-smithAccess
40ibays

    my %accounts;
    tie %accounts, \'esmith::config\', \'/home/e-smith/accounts\';

    my $key;
    my $value;
    my $result = "";

    while (($key,$value) = each %accounts)
    {
        my ($type, %properties) = split (/\\|/, $value, -1);
        if ($type eq \'ibay\')
        {
            #------------------------------------------------------------
            # Figure out which combination of parameters to use. If
            # PublicAccess parameter is present, this is e-smith 4.0.
            # Otherwise, it\'s e-smith 3.0.
            #------------------------------------------------------------

            my $allow;
            my $pass;
            my $satisfy;

            if ($properties{\'PublicAccess\'})
            {
                if ($properties{\'PublicAccess\'} eq \'none\')
                {
                    next;
                }
                elsif ($properties{\'PublicAccess\'} eq \'local\')
                {
                    $allow   = $localAccess;
                    $pass    = 0;
                    $satisfy = \'all\';
                }
                elsif ($properties{\'PublicAccess\'} eq \'local-pw\')
                {
                    $allow   = $localAccess;
                    $pass    = 1;
                    $satisfy = \'all\';
                }
                elsif ($properties{\'PublicAccess\'} eq \'global\')
                {
                    $allow   = \'all\';
                    $pass    = 0;
                    $satisfy = \'all\';
                }
                elsif ($properties{\'PublicAccess\'} eq \'global-pw\')
                {
                    $allow   = \'all\';
                    $pass    = 1;
                    $satisfy = \'all\';
                }
                elsif ($properties{\'PublicAccess\'} eq \'global-pw-remote\')
                {
                    $allow   = $localAccess;
                    $pass    = 1;
                    $satisfy = \'any\';
                }
            }
            elsif ($properties {\'ReadAccess\'} eq \'global\')
            {
                if ($properties {\'UsePassword\'} eq \'yes\')
                {
                    $allow   = \'all\';
                    $pass    = 1;
                    $satisfy = \'all\';
                }
                else
                {
                    $allow   = \'all\';
                    $pass    = 0;
                    $satisfy = \'all\';
                }
            }
            else
            {
                if ($properties {\'UsePassword\'} eq \'yes\')
                {
                    $allow   = $localAccess;
                    $pass    = 1;
                    $satisfy = \'all\';
                }
                else
                {
                    $allow   = $localAccess;
                    $pass    = 0;
                    $satisfy = \'all\';
                }
            }


            my $dynamicContent = $properties{\'CgiBin\'} || "disabled";
            $result .= "\\n";
            $result .= "#-------------------------------------------------------
-----\\n";
            $result .= "# $key ibay directories ($properties{\'Name\'})\\n";
            $result .= "#-------------------------------------------------------
-----\\n";

            $result .= "\\n";
            $result .= "<Directory /home/e-smith/files/ibays/$key/html>\\n";
            $result .= "    Options Indexes\\n";
            if ($dynamicContent eq \'enabled\')
            {
                $result .= "    Options +Includes\\n";
            }
            else
            {
                $result .= "    <FilesMatch \\"\\\\.(php|php3|phtml)\\$\\">\\n";
                $result .= "        order deny,allow\\n";
                $result .= "        Deny from all\\n";
                $result .= "    </FilesMatch>\\n";
                $result .= "    Options +IncludesNOEXEC\\n";
            }
            $result .= "    AllowOverride All\\n";
            $result .= "    order deny,allow\\n";
            $result .= "    deny from all\\n";
            $result .= "    allow from $allow\\n";
            if ($pass)
            {
                $result .= "    AuthName \\"$properties{\'Name\'}\\"\\n";
                $result .= "    AuthType Basic\\n";
                $result .= "    AuthExternal pwauth\\n";
                $result .= "    require user $key\\n";
                $result .= "    Satisfy $satisfy\\n";
            }
            $result .= "</Directory>\\n";

            $result .= "\\n";
            $result .= "<Directory /home/e-smith/files/ibays/$key/cgi-bin>\\n";
            if ($dynamicContent eq \'enabled\')
            {
                $result .= "    Options ExecCGI\\n";
            }
            $result .= "    AllowOverride All\\n";
            $result .= "    order deny,allow\\n";
            $result .= "    deny from all\\n";
            $result .= "    allow from $allow\\n";
            if ($pass)
            {
                $result .= "    AuthName \\"$properties{\'Name\'}\\"\\n";
                $result .= "    AuthType Basic\\n";
                $result .= "    AuthExternal pwauth\\n";
                $result .= "    require user $key\\n";
                $result .= "    Satisfy $satisfy\\n";
            }
            $result .= "</Directory>\\n";

            $result .= "\\n";
            $result .= "<Directory /home/e-smith/files/ibays/$key/files>\\n";
            $result .= "    AllowOverride All\\n";
            $result .= "    ForceType application/octet-stream\\n";
            $result .= "    order deny,allow\\n";
            $result .= "    deny from all\\n";
            $result .= "    allow from $allow\\n";
            if ($pass)
            {
                $result .= "    AuthName \\"$properties{\'Name\'}\\"\\n";
                $result .= "    AuthType Basic\\n";
                $result .= "    AuthExternal pwauth\\n";
                $result .= "    require user $key\\n";
                $result .= "    Satisfy $satisfy\\n";
            }
            $result .= "</Directory>\\n";
        }
    }

    $result;
;' called at /usr/lib/perl5/vendor_perl/5.8.5/Text/Template.pm line 319
        Text::Template::fill_in('Text::Template=HASH(0x959fce4)', 'HASH', 'ARRAY
(0x93ef18c)', 'PACKAGE', 'esmith::__TEMPLATE__::1', 'BROKEN', 'CODE(0x95b3654)',
 'UNTAINT', 1, ...) called at /usr/lib/perl5/vendor_perl/5.8.5/Text/Template.pm
line 382
        Text::Template::fill_in_file('/etc/e-smith/templates-custom//etc/httpd/c
onf/httpd.conf/90e-...', 'HASH', 'ARRAY(0x93ef18c)', 'PACKAGE', 'esmith::__TEMPL
ATE__::1', 'BROKEN', 'CODE(0x95b3654)', 'UNTAINT', 1, ...) called at /usr/lib/pe
rl5/site_perl/esmith/templates.pm line 528
        esmith::templates::processTemplate('HASH(0x9252fb4)') called at /sbin/e-
smith/expand-template line 45
WARNING: Template processing succeeded for //etc/httpd/conf/httpd.conf: 1 fragme
nt generated warnings
 at /sbin/e-smith/expand-template line 45
Stopping httpd: [  OK  ]
Starting httpd: [Mon Mar 06 07:09:07 2006] [error] Can't locate Apache/ModIndex.
pm in @INC (@INC contains: /usr/lib/perl5/5.8.5/i386-linux-thread-multi /usr/lib
/perl5/5.8.5 /usr/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi /usr/lib/per
l5/site_perl/5.8.4/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.3/i386-l
inux-thread-multi /usr/lib/perl5/site_perl/5.8.2/i386-linux-thread-multi /usr/li
b/perl5/site_perl/5.8.1/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.0/i
386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.5 /usr/lib/perl5/site_perl/5
.8.4 /usr/lib/perl5/site_perl/5.8.3 /usr/lib/perl5/site_perl/5.8.2 /usr/lib/perl
5/site_perl/5.8.1 /usr/lib/perl5/site_perl/5.8.0 /usr/lib/perl5/site_perl /usr/l
ib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.
8.4/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.3/i386-linux-thread-m
ulti /usr/lib/perl5/vendor_perl/5.8.2/i386-linux-thread-multi /usr/lib/perl5/ven
dor_perl/5.8.1/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.0/i386-lin
ux-thread-multi /usr/lib/perl5/vendor_perl/5.8.5 /usr/lib/perl5/vendor_perl/5.8.
4 /usr/lib/perl5/vendor_perl/5.8.3 /usr/lib/perl5/vendor_perl/5.8.2 /usr/lib/per
l5/vendor_perl/5.8.1 /usr/lib/perl5/vendor_perl/5.8.0 /usr/lib/perl5/vendor_perl
 . /etc/httpd/ /etc/httpd/lib/perl) at (eval 2) line 3.\n
[Mon Mar 06 07:09:07 2006] [error] Can't load Perl module Apache::ModIndex for s
erver www.keane.co.nz:0, exiting...
[FAILED]
error: %post(gjz-mitel-modindex-0.0.4-4.noarch) scriptlet failed, exit status 1

Seems to be issues with the db paths and other things.

Tony

[electroman00]

ajkeane

I should be so courageous.

"To go where no man has gone before."

It's seems my patience paid off...though.

[electroman00]

ajkeane

Which rpm did you use?

[ajkeane]

gjz-mitel-modindex-0.0.4-4.noarch.rpm

I used --nodeps to get it to install.

Tony

[Denbert]

Hi,

Tried to install the ModIndexer 0.04 on my SME 7rc2 and I enabled the Mod_Perl with:

config setprop modPerl status enabled
signal-event post-upgrade
signal-event reboot

After the reboot i installed the indexer contribs with following command:

rpm -ivh --nodeps gjz-mitel-modindex-0.0.4-4.noarch.rpm

And yes, my webserver is broken.

Tried to disable the modPerl with following commands:

config setprop modPerl status disabled
signal-event post-upgrade
signal-event reboot

But webserver is dead

Any suggestions?

[Denbert]

Same conclusion here, mod_perl kills access to server-manager, webmail and my web page.
Disabling mod_perl returns everything back to normal

I can’t get the server back to “normal” configuration.

What did you do?

See http://forums.contribs.org/index.php?topic=31004.msg135972#msg135972

[Denbert]

Investigated a bit more and the command apachectl start said error in line 1652 where the ModIndexer contrib. installed a line with PerlModule command that apache didn’t recognized

After deleting the file /etc/e-smith/templates/etc/httpd/conf/httpd.conf/86ModIndex and then running:

signal-event post-upgrade
signal-event reboot

The web server was back.