Changeset 969 in ProjectBuilder for devel/pb-modules/bin/pbdistrocheck
- Timestamp:
- Feb 16, 2010, 8:03:47 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
devel/pb-modules/bin/pbdistrocheck
r839 r969 14 14 use ProjectBuilder::Distribution; 15 15 use ProjectBuilder::Base; 16 17 =pod 18 19 =head1 NAME 20 21 pb, aka project-builder.org - builds packages for your projects 22 23 =head1 DESCRIPTION 24 25 pb helps you build various packages directly from your project sources. 26 pbdistrocheck is a command from the pb project providing the same type of services as lsb_release, but extended. 27 28 =head1 SYNOPSIS 29 30 pbdistrocheck [-d][-v] [distro-ver-arch] 31 32 =head1 OPTIONS 33 34 =over 4 35 36 =item B<-v|--verbose> 37 38 Print a brief help message and exits. 39 40 =item B<-d|--description> 41 42 generate a short format user friendly 43 (by default, generate a longer format, comma separated allowing parsing) 44 45 =back 46 47 =head1 ARGUMENTS 48 49 arguments are optional. If none given, analyzes the underlying operating system 50 If one is given, it should have the format osname-version-architecture, and in that case pbdistrocheck will provide all the information related to that OS needed by pb. 51 52 =head1 WEB SITES 53 54 The main Web site of the project is available at L<http://www.project-builder.org/>. Bug reports should be filled using the trac instance of the project at L<http://trac.project-builder.org/>. 55 56 =head1 USER MAILING LIST 57 58 Cf: L<http://www.mondorescue.org/sympa/info/pb-announce> for announces and L<http://www.mondorescue.org/sympa/info/pb-devel> for the development of the pb project. 59 60 =head1 CONFIGURATION FILES 61 62 Uses the main /etc/pb/pb.conf (or /usr/local/etc/pb/pb.conf if installed from files) configuration file to give its answers. 63 64 =head1 AUTHORS 65 66 The Project-Builder.org team L<http://trac.project-builder.org/> lead by Bruno Cornec L<mailto:bruno@project-builder.org>. 67 68 =head1 COPYRIGHT 69 70 Project-Builder.org is distributed under the GPL v2.0 license 71 described in the file C<COPYING> included with the distribution. 72 73 =cut 16 74 17 75 my %opts; # CLI Options … … 31 89 pb_log_init($pbdebug, $pbLOG); 32 90 33 my ($ddir, $dver, $dfam, $dtype, $pbsuf, $pbupd, $arch) = pb_distro_init(); 91 my $dist = shift @ARGV || undef ; 92 my @param = undef; 93 @param = split(/-/,$dist) if (defined $dist); 94 95 my ($ddir, $dver, $dfam, $dtype, $pbsuf, $pbupd, $arch) = pb_distro_init(@param); 34 96 if (defined $opts{'d'}) { 35 print "\u$ddir $dver \n";97 print "\u$ddir $dver $arch\n"; 36 98 } else { 37 99 print "distro tuple: ".join(',',($ddir, $dver, $dfam, $dtype, $pbsuf, $pbupd, $arch))."\n";
Note:
See TracChangeset
for help on using the changeset viewer.