Subversion Repositories DevTools

Rev

Rev 273 | Rev 279 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 273 Rev 275
Line 115... Line 115...
115
my $cmd = shift @ARGV || "";
115
my $cmd = shift @ARGV || "";
116
help(1)                                 if ( $cmd =~ m/^help$/ || $cmd eq "" );
116
help(1)                                 if ( $cmd =~ m/^help$/ || $cmd eq "" );
117
create_sandbox()                        if ( $cmd =~ m/^create$/ );
117
create_sandbox()                        if ( $cmd =~ m/^create$/ );
118
info(@ARGV)                             if ( $cmd =~ m/^info$/ );
118
info(@ARGV)                             if ( $cmd =~ m/^info$/ );
119
cmd(@ARGV)                              if ( $cmd =~ m/^cmd$/ );
119
cmd(@ARGV)                              if ( $cmd =~ m/^cmd$/ );
-
 
120
cmd($cmd, @ARGV )                       if ( $cmd =~ m/(^all$)|(^build$)|(^make$)/  );
120
clean($cmd, @ARGV)                      if ( $cmd =~ m/(^clobber$)|(^clean$)/  );
121
clean($cmd, @ARGV)                      if ( $cmd =~ m/(^clobber$)|(^clean$)/  );
121
 
122
 
122
Error ("Unknown sandbox command: $cmd");
123
Error ("Unknown sandbox command: $cmd");
123
exit 1;
124
exit 1;
124
 
125
 
Line 268... Line 269...
268
    {
269
    {
269
        next if ( $pname =~ m~^\.~ );
270
        next if ( $pname =~ m~^\.~ );
270
        next if ( $pname =~ m~dpkg_archive$~ );
271
        next if ( $pname =~ m~dpkg_archive$~ );
271
        next unless ( -d $pname );
272
        next unless ( -d $pname );
272
        Verbose ("Package discovered: $pname");
273
        Verbose ("Package discovered: $pname");
-
 
274
 
-
 
275
        if ( -f "$pname/stop" )
-
 
276
        {
-
 
277
            Warning("Package contains stop file: $pname");
-
 
278
            next;
-
 
279
        }
-
 
280
 
273
        push @dirlist, $pname;
281
        push @dirlist, $pname;
274
 
282
 
275
        #
283
        #
276
        #   Locate the build files in each package
284
        #   Locate the build files in each package
277
        #   Scan the build files and extract dependancy information
285
        #   Scan the build files and extract dependancy information
Line 481... Line 489...
481
 Commands:
489
 Commands:
482
    help                - Same as -help
490
    help                - Same as -help
483
    create              - Create a sandbox in the current directory
491
    create              - Create a sandbox in the current directory
484
    info [[-v]-v]       - Sandbox information. -v: Be more verbose
492
    info [[-v]-v]       - Sandbox information. -v: Be more verbose
485
    cmd                 - Do commands in all sandbox components
493
    cmd                 - Do commands in all sandbox components
-
 
494
    all                 - Do 'build and make' in all sandbox components
-
 
495
    build               - Do 'build' in all sandbox components
-
 
496
    make                - Do 'make' in all sandbox components
486
    clean               - Do 'make clean' in all sandbox components
497
    clean               - Do 'make clean' in all sandbox components
487
    clobber             - Do 'build clobber' is all sandbox components
498
    clobber             - Do 'build clobber' is all sandbox components
488
 
499
 
489
=head1 OPTIONS
500
=head1 OPTIONS
490
 
501