Re: PerlRun problem: can't find method "uri"

2001-01-01 Thread Ken Williams

[EMAIL PROTECTED] (Jie Gao) wrote:
>Using mod_perl-1.24_01.
>
>Error:
>
>[Tue Jan  2 16:02:37 2001] [error] Can't locate object method "uri" via
>package "Apache::PerlRun" at
>/usr/local/lib/perl5/site_perl/5.005/sun4-solaris/Apache/PerlRun.pm line 212.

Jie,

Try this patch.  Does it solve the problem?


--- PerlRun.pm  Mon Oct  2 01:02:05 2000
+++ PerlRun-new.pm  Tue Jan  2 00:59:15 2001
@@ -209,7 +209,7 @@
 my $pr = shift;
 if ($@ and substr($@,0,4) ne " at ") {
$pr->{r}->log_error("PerlRun: `$@'");
-   $@{$pr->uri} = $@;
+   $@{$pr->{r}->uri} = $@;
$@ = ''; #XXX fix me, if we don't do this Apache::exit() breaks
return SERVER_ERROR;
 }



I don't quite understand the voodoo of this line and what it's supposed
to do, so I'm not sure about the validity of this patch.  But I think it
might solve the problem if anything does.


  ------
  Ken Williams Last Bastion of Euclidity
  [EMAIL PROTECTED]The Math Forum



PerlRun problem: can't find method "uri"

2001-01-01 Thread Jie Gao

Hi All,

> perl -V 
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
  Platform:
osname=solaris, osvers=2.7, archname=sun4-solaris
uname='sunos groucho 5.7 generic_106541-12 sun4u sparc sunw,ultra-80 '
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef useperlio=undef d_sfio=undef
  Compiler:
cc='gcc -B/usr/ccs/bin/', optimize='-O2', gccversion=2.95.2 19991024 (release)
cppflags='-I/usr/local/include'
ccflags ='-I/usr/local/include'
stdchar='char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
alignbytes=8, usemymalloc=n, prototype=define
  Linker and Libraries:
ld='gcc -B/usr/ccs/bin/', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib
libs=-lsocket -lnsl -ldl -lm -lc -lcrypt
libc=/lib/libc.so, so=so, useshrplib=false, libperl=libperl.a
  Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags=' '
cccdlflags='-fPIC', lddlflags='-G -L/usr/local/lib'


Characteristics of this binary (from libperl): 
  Built under solaris
  Compiled at Jan  2 2001 10:03:49
  @INC:
/usr/local/lib/perl5/5.00503/sun4-solaris
/usr/local/lib/perl5/5.00503
/usr/local/lib/perl5/site_perl/5.005/sun4-solaris
/usr/local/lib/perl5/site_perl/5.005

Using mod_perl-1.24_01.

Error:

[Tue Jan  2 16:02:37 2001] [error] Can't locate object method "uri" via package 
"Apache::PerlRun" at
/usr/local/lib/perl5/site_perl/5.005/sun4-solaris/Apache/PerlRun.pm line 212.

Any idea?

Thanks,



Jie




Re: searchable site

2001-01-01 Thread Paul J. Lucas

On Mon, 1 Jan 2001, Bill Moseley wrote:

> BTW: http://homepage.mac.com/pauljlucas/software/swish/man/ seems broken.

The documentation link (different from above) is now fixed:

http://homepage.mac.com/pauljlucas/software/swish/documentation.html

Thanks.  (Apple, in their infinite wisdom, decided not to
implement directory listings in their web server.)

- Paul




Re: searchable site

2001-01-01 Thread Bill Moseley

At 07:08 PM 01/01/01 -0800, Paul J. Lucas wrote:
>   SWISH++ can run as a multi-threaded daemon that listens on
>   either a Unix-domain or TCP socket, hence also without forking.

Which I would guess seems like a better use of resources than placing the
SWISH-E code in each httpd child.

I was going to ask you why or what makes it "faster" and if that applies to
SWISH-E 2.x, but that's a bit too off topic.  Maybe in separate email.

BTW: http://homepage.mac.com/pauljlucas/software/swish/man/ seems broken.



Bill Moseley
mailto:[EMAIL PROTECTED]



Re: searchable site

2001-01-01 Thread Paul J. Lucas

On Mon, 1 Jan 2001, Bill Moseley wrote:

> Apache.org uses SWISH-E, if I remember correctly.
>  
> http://sunsite.berkeley.edu/SWISH-E/

Although getting off-topic, SWISH++ is significantly faster:

http://homepage.mac.com/pauljlucas/software/swish/

> The CPAN modules will let you move seamlessly from the forked model of 2.0
> to the library version of swish-e when 2.1 comes out.  This means you can
> run swish under mod_perl without forking.

SWISH++ can run as a multi-threaded daemon that listens on
either a Unix-domain or TCP socket, hence also without forking.

- Paul




Re: searchable site

2001-01-01 Thread Bill Moseley

At 02:24 AM 01/02/01 +0800, Yung Kwong Wing wrote:
>I was wondering...does anyone know of any links on using Perl to make a
>searchable site just like the site in "www.apache.org" or
>"www.apache.org".

Apache.org uses SWISH-E, if I remember correctly.
 
http://sunsite.berkeley.edu/SWISH-E/

Do note that there's a 2.0 version out that does phrase searching, and 2.1
is currently be developed.  I've been told that there are "SWISH" modules
on CPAN that make using swish-e a snap in perl .  I'd stay
away from many of the CGI examples on the current swish-e site due to the
security issues with piped opens.

The CPAN modules will let you move seamlessly from the forked model of 2.0
to the library version of swish-e when 2.1 comes out.  This means you can
run swish under mod_perl without forking.  (Although my ab benchmarks
didn't show that much of a difference between forking and non-forking
searches under mod_perl).

Oh, and thanks for the reminder -- I forgot to upload a bug fix to CPAN.



Bill Moseley
mailto:[EMAIL PROTECTED]



searchable site

2001-01-01 Thread Yung Kwong Wing

Hi,

I was wondering...does anyone know of any links on using Perl to make a
searchable site just like the site in "www.apache.org" or
"www.apache.org".

Does making a searchable site involve a lot of things?

Thanks.

Peter





Re: Help with Limit in

2001-01-01 Thread James G Smith

"Scott Alexander" <[EMAIL PROTECTED]> wrote:
>On 1 Jan 2001, at 11:40, James G Smith wrote:
>
>Thanks for the answer. I'm no mod_perl or apache guru but I had a 
>feeling it didn't make sense.
>
>I'm trying to use a Apache::AuthAnyModDav to authenticate for 
>mod_dav.
>
>I already have a Apache::AuthAny for normal authentication which 
>works fine.
>
>I'd like to have it so a user can use Web folders in Win 98 and 
>connect to a directory on the web server. But only their own 
>directory. I can get it to work via authentication but that is any user 
>can access any directory in the tree. I want that they can only 
>access their own directory. 
>
>At the moment users can upload, download to their own directory via 
>a html interface but to add WebDav functionality would be great!

Ahh...  Now we get into the interesting bits of mod_perl.  There 
is a way to change the DocumentRoot on a per-request basis.  Just 
not a way to do this in the config files.

Use the function Apache::document_root.  For example:

my $old_docroot = $r -> document_root($new_docroot);
$r -> register_cleanup(sub { shift -> document_root($old_docroot) } );

The new document root will be available as (the scalar) 
$Apache::Server::DocumentRoot .

This is based on information from several months ago.  I haven't 
actually tested it, but I think Doug said it should work back 
then (v. 1.23).

You might be able to put this in you authentication handler.  If 
you get something working with this, let us know.
+-
James Smith - [EMAIL PROTECTED] | http://www.jamesmith.com/
[EMAIL PROTECTED] | http://sourcegarden.org/
  [EMAIL PROTECTED]  | http://cis.tamu.edu/systems/opensystems/
+--



Happy new millenium

2001-01-01 Thread yow

Happy new millenium to all [EMAIL PROTECTED] dwellers!

Have a year full of features, and few bugs.
Have a year with alot of code and no management.
Have a year with lots of happy clever users.
have a happy new year and a wonderful new
Millenium!

Pavel



Re: Help with Limit in

2001-01-01 Thread Scott Alexander

On 1 Jan 2001, at 11:40, James G Smith wrote:

Thanks for the answer. I'm no mod_perl or apache guru but I had a 
feeling it didn't make sense.

I'm trying to use a Apache::AuthAnyModDav to authenticate for 
mod_dav.

I already have a Apache::AuthAny for normal authentication which 
works fine.

I'd like to have it so a user can use Web folders in Win 98 and 
connect to a directory on the web server. But only their own 
directory. I can get it to work via authentication but that is any user 
can access any directory in the tree. I want that they can only 
access their own directory. 

At the moment users can upload, download to their own directory via 
a html interface but to add WebDav functionality would be great!

regards

Scott

> Short answer: no.
> 
> Long answer: Since the httpd.conf file is read only at startup 
> (or other well defined times, such as a HUP signal), which 
> REMOTE_USER would you have in mind?  Mod_perl feeds any 
> information from the  sections into the httpd configuration 
> engine at the time the conf file is read.  Any variable 
> substitutions get made at that time.
> +-
> James Smith - [EMAIL PROTECTED] | http://www.jamesmith.com/
> [EMAIL PROTECTED] | http://sourcegarden.org/
>   [EMAIL PROTECTED]  | http://cis.tamu.edu/systems/opensystems/
> +--


_
scott alexander
tietoverkkosuunnittelija
humak amk - finland
+358(0)407505640



Re: Help with Limit in

2001-01-01 Thread James G Smith

"Scott Alexander" <[EMAIL PROTECTED]> wrote:
>My final question is: Is it possible to have the name of the 
>REMOTE_USER in the httpd.conf file?

Short answer: no.

Long answer: Since the httpd.conf file is read only at startup 
(or other well defined times, such as a HUP signal), which 
REMOTE_USER would you have in mind?  Mod_perl feeds any 
information from the  sections into the httpd configuration 
engine at the time the conf file is read.  Any variable 
substitutions get made at that time.
+-
James Smith - [EMAIL PROTECTED] | http://www.jamesmith.com/
[EMAIL PROTECTED] | http://sourcegarden.org/
  [EMAIL PROTECTED]  | http://cis.tamu.edu/systems/opensystems/
+--



Re: Help with Limit in

2001-01-01 Thread Scott Alexander


I finally got it to work like it should.

Syntax I found in the archives even written by dougm was wrong. 

But after reading http://perl.apache.org/guide/config.html

it was written correctly.


My final question is: Is it possible to have the name of the 
REMOTE_USER in the httpd.conf file?

ie 

$user = $ENV{REMOTE_USER} ;
my $location = "/users/". $user ;
my $require = "user " . $user ;

Scott


#!perl

$Location {"/users/supervisor"} = {
  DAV => 'On',
  AllowOverride => 'None',
  Options => 'None',
  AuthName => 'Test',
  AuthType => 'Basic',
  Auth_MySQL_Password_Table => 'users',
  Auth_MySQL_Username_Field => 'user',
  Auth_MySQL_Password_Field => 'passwd',
  Auth_MySQL_Encryption_Types => 'Plaintext',
  Auth_MYSQL => 'on',
  Limit => {
METHODS => 'GET POST PUT DELETE PROPFIND PROPPATCH MKCOL COPY MOVE LOCK UNLOCK',
Require => 'user alexsc01',
  },
} ;
__END__

--- End of forwarded message ---
_
scott alexander
tietoverkkosuunnittelija
humak amk - finland
+358(0)407505640