[svn.haxx.se] · SVN Dev · SVN Users · SVN Org · TSVN Dev · TSVN Users · Subclipse Dev · Subclipse Users · this month's index

RE: Perl Bindings: checking for config...?

From: Goddard Lee <lee.goddard_at_easa.eu.int>
Date: 2005-09-27 13:30:02 CEST

Having, out of curiosity, done the unthinkable to /root/.subversion/ :

drwxrwxr-x 3 nobody dev 4096 Aug 4 08:13 .
drwxr-x--- 24 root root 4096 Sep 27 09:41 ..
drwxrwxr-x 5 nobody dev 4096 Jul 21 08:45 auth
-rwxrwxr-x 1 nobody dev 5024 Aug 3 14:01 config
-rwxrwxr-x 1 nobody dev 4277 Jul 21 08:45 README.txt
-rwxrwxr-x 1 nobody dev 3270 Jul 21 08:45 servers

The error persists. Can't upon the /root/.subversion/servers file.
Why is SVN even looking in /root, if it's run with sudo -u nobody?

Lee Goddard
Internet Application Development, European Aviation Safety Agency

T: +49 221 89990 3221
E: Lee.Goddard@EASA.EU.int

> -----Original Message-----
> From: Goddard Lee [mailto:lee.goddard@easa.eu.int]
> Sent: Tuesday, September 27, 2005 1:03 PM
> To: users@subversion.tigris.org
> Subject: Perl Bindings: checking for config...?
>
>
> When I run the little test script below as 'nobody', as my
> httpd would, it fails on both counts with the message:
>
> Bogus filename: Can't open config file
> '/root/.subversion/servers'
>
> All I want to do is create an SVN::Client object to
> add/commit a document with a specific username. From what I
> can make of the perldocs for SVN::Client, the "prompt"
> provider shouldn't look at the filesystem...
>
> Please help!
> Lee
>
> #! perl
> use Test::More tests => 3;
> use strict;
> use warnings;
> use_ok('SVN::Client');
>
> diag "Sub ref";
> eval {
> my $ctx = new SVN::Client(
> auth => [
> SVN::Client::get_simple_prompt_provider(\&simple_prompt, 1),
> ]
> );
> };
> $@? fail($@) : pass("OK");
>
> diag "Anon sub";
> eval {
> my $ctx = new SVN::Client(
> auth => [
> SVN::Client::get_simple_prompt_provider(sub {
> my $cred = shift;
> $cred->username("test");
> $cred->password("p455w0rd");
> }, 2),
> ]
> );
> };
> $@? fail($@) : pass("OK");
>
> exit;
>
> sub simple_prompt {
> my $cred = shift;
> $cred->username('test');
> $cred->password('p455w0rd');
> }
>
> __END__
>
> OUTPUT:
>
>
> [root@bdms t]# sudo -u nobody perl ctx.mini.t
> 1..3
> ok 1 - use SVN::Client;
> # Sub ref
> not ok 2 - Bogus filename: Can't open config file
> '/root/.subversion/servers' at ctx.mini.t line 12 #
> # Failed test (ctx.mini.t at line 18)
> # Anon sub
> not ok 3 - Bogus filename: Can't open config file
> '/root/.subversion/servers' at ctx.mini.t line 28 #
> # Failed test (ctx.mini.t at line 32)
> # Looks like you failed 2 tests of 3.
> [root@bdms t]#
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: users-unsubscribe@subversion.tigris.org
> For additional commands, e-mail: users-help@subversion.tigris.org
>
>

---------------------------------------------------------------------
To unsubscribe, e-mail: users-unsubscribe@subversion.tigris.org
For additional commands, e-mail: users-help@subversion.tigris.org
Received on Tue Sep 27 13:31:42 2005

This is an archived mail posted to the Subversion Users mailing list.