[Users] GetComponents script not working

[Bruno Giacomazzo]

btw, why is svn still needed? I see that it is only used for
ExternalLibraries which are anyway in a git repository (is it because of
the particular directory structure of that repository?).

Il giorno lun 24 gen 2022 alle ore 17:16 Steven R. Brandt <
sbrandt at cct.lsu.edu> ha scritto:

> Ah, so it's subversion that's hanging. GetComponents should have a print
> statement before calling svn in verbose mode.
>
> Could you add a print statement before line 622 so we can see the svn
> command with the $svn and $url expanded? Also, what is your svn version?
>
> --Steve
> On 1/24/2022 9:57 AM, Konrad Topolski wrote:
>
> Thank you all for the responses.
>
> @Steven, yes, the usual help message is printed out
>
> @Roland, it works for my other machine, under Ubuntu 20.04 with 5.11
> kernel, but the perl version I believe to be the same (perhaps the OS
> details are not relevant here at all);
> I'm sending the log in the attachments.
> It seems that the script hangs up at this point:
>
> >> ./GetComponents:580:         $rec{"AUTH_URL_ORIG"} = $rec{"AUTH_URL"};
> >> ./GetComponents:583:         if ($ANONYMOUS_CHECKOUT) {
> >> ./GetComponents:584:             delete $rec{AUTH_URL};
> >> ./GetComponents:592:         my @checkouts = split( /\s+/m,
> $rec{"CHECKOUT"} );
> >> ./GetComponents:593:         foreach my $checkout (@checkouts) {
> >> ./GetComponents:596:             my ( $dir1, $dir2 );
> >> ./GetComponents:597:             if ( $checkout =~ m!/! ) {
> >> ./GetComponents:598:                 ( $dir1, $dir2 ) = $checkout =~
> m!(.+)/(.+)!;
> >> ./GetComponents:603:             if ( defined( $rec{URL} ) ) {
> >> ./GetComponents:604:                 $rec{URL} = $rec{"URL_ORIG"};
> >> ./GetComponents:605:                 $rec{URL} =~ s!\$1!$dir1!;
> >> ./GetComponents:606:                 $rec{URL} =~ s!\$2!$dir2!;
> >> ./GetComponents:608:             if ( defined( $rec{AUTH_URL} ) ) {
> >> ./GetComponents:616:             if ( $rec{"TYPE"} eq "svn" ) {
> >> ./GetComponents:617:                 my $url = ($rec{"AUTH_URL"} or
> $rec{"URL"});
> >> ./GetComponents:618:                 if ( $url =~ m!https://! ) {
> >> ./GetComponents:619:                     my $base = $url;
> >> ./GetComponents:620:                     $base =~
> s/(https\:\/\/[\w\.]+)\/(.*)$/$1/i;
> >> ./GetComponents:621:                     unless ( defined
> $svn_servers{$base} ) {
> >> ./GetComponents:622:                         my $ret = `$svn
> --non-interactive info $url 2>&1`;
>
> Best regards
> Konrad
>
>
>
> pon., 24 sty 2022 o 16:23 Steven R. Brandt <sbrandt at cct.lsu.edu>
> napisał(a):
>
>> What change are you referring to? Thanks.
>>
>>
>> --Steve
>>
>>
>> On 1/24/2022 9:21 AM, Barkhouse, Wayne wrote:
>>
>> The directory structure on bitbucket.org has changed. I ran into the
>> same problem.
>>
>> cheers,
>> Wayne
>>
>> ***************************************
>> Dr. Wayne Barkhouse
>> Professor
>> Department of Physics and Astrophysics
>> University of North Dakota
>> Grand Forks, ND 58202-7129
>>
>> Email: wayne.barkhouse at und.edu
>> Phone: 701-777-3520
>> FaX: 701-777-3523
>> ***************************************
>>
>> ------------------------------
>> *From:* users-bounces at einsteintoolkit.org
>> <users-bounces at einsteintoolkit.org> <users-bounces at einsteintoolkit.org>
>> on behalf of Roland Haas <rhaas at illinois.edu> <rhaas at illinois.edu>
>> *Sent:* Monday, January 24, 2022 9:20 AM
>> *To:* Konrad Topolski <k.topolski2 at student.uw.edu.pl>
>> <k.topolski2 at student.uw.edu.pl>
>> *Cc:* Einstein Toolkit Users <users at einsteintoolkit.org>
>> <users at einsteintoolkit.org>
>> *Subject:* Re: [Users] GetComponents script not working
>>
>> Hello Konrad,
>>
>> Hmm, workedforme (not helpful I know), when I tested this last week on
>> a Ubuntu 20.04 VM, which makes debugging this harder. No output at all
>> is very strange. If you can try, does it work with any other OS?
>>
>> Can you try thess command lines, which makes Perl enter Debug mode, and
>> send the log file GetComponents.log that it produces, please?
>>
>> export PERL5DB='sub DB::DB {my ($p, $f, $l) = caller;my $code =
>> \@{"::_<$f"};print STDERR ">> $f:$l: $code->[$l]";}'
>>
>> (all in one line)
>>
>> and
>>
>> /usr/bin/perl -d ./GetComponents --parallel
>> https://bitbucket.org/einsteintoolkit/manifest/raw/ET_2021_11/einsteintoolkit.th
>> 2>&1 | tee GetComponents.log
>>
>> (also a single line)
>>
>> Yours,
>> Roland
>>
>> --
>> My email is as private as my paper mail. I therefore support encrypting
>> and signing email messages. Get my PGP key from http://pgp.mit.edu .
>>
>> _______________________________________________
>> Users mailing listUsers at einsteintoolkit.orghttp://lists.einsteintoolkit.org/mailman/listinfo/users
>>
>> _______________________________________________
>> Users mailing list
>> Users at einsteintoolkit.org
>> http://lists.einsteintoolkit.org/mailman/listinfo/users
>>
>
> _______________________________________________
> Users mailing listUsers at einsteintoolkit.orghttp://lists.einsteintoolkit.org/mailman/listinfo/users
>
> _______________________________________________
> Users mailing list
> Users at einsteintoolkit.org
> http://lists.einsteintoolkit.org/mailman/listinfo/users
>


-- 

Prof. Bruno Giacomazzo
Department of Physics
University of Milano-Bicocca
Piazza della Scienza 3
20126 Milano
Italy

email: bruno.giacomazzo at unimib.it
phone: (+39) 02 6448 2321
web: http://www.brunogiacomazzo.org

----------------------------------------------------------------------
There are only 10 types of people in the world:
Those who understand binary, and those who don't
----------------------------------------------------------------------
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.einsteintoolkit.org/pipermail/users/attachments/20220124/e967bc3a/attachment-0001.html