| Line 68... |
Line 68... |
Getopt::Long::config("require_order", "prefix=-");
|
Getopt::Long::config("require_order", "prefix=-");
|
GetOptions("h","help",
|
GetOptions("h","help",
|
"envidentifier=s" => \$envidentifier,
|
"envidentifier=s" => \$envidentifier,
|
"prefix=s" => \$prefix,
|
"prefix=s" => \$prefix,
|
"vendor=s" => \$vendor,
|
"vendor=s" => \$vendor,
|
"project=s" => \$project,
|
"library=s" => \$library,
|
"version=s" => \$version,
|
"version=s" => \$version,
|
"component=s" => \$component,
|
"component=s" => \$component,
|
"encoding=s" => \$encoding,
|
"encoding=s" => \$encoding,
|
"terse"
|
"terse"
|
) || die "(use '$program_name -h' for help)";
|
) || die "(use '$program_name -h' for help)";
|
| Line 81... |
Line 81... |
##############################################################################
|
##############################################################################
|
## Help option
|
## Help option
|
##############################################################################
|
##############################################################################
|
if ( $opt_h or $opt_help )
|
if ( $opt_h or $opt_help )
|
{
|
{
|
print "\n gen_fizzim -work_site /work/ -project project -component component -version version -encoding [onehot] -terse source_file destination_file";
|
print "\n gen_fizzim -work_site /work/ -library library -component component -version version -encoding [onehot] -terse source_file destination_file";
|
print "\n";
|
print "\n";
|
exit 1;
|
exit 1;
|
}
|
}
|
|
|
|
|
| Line 103... |
Line 103... |
my $source = $ARGV[0];
|
my $source = $ARGV[0];
|
my $destination = $ARGV[1];
|
my $destination = $ARGV[1];
|
|
|
|
|
|
|
my $lib_comp_sep = yp::lib::find_lib_comp_sep($vendor,$project,$component);
|
my $lib_comp_sep = yp::lib::find_lib_comp_sep($vendor,$library,$component);
|
|
|
|
|
|
|
|
|
unless ($encoding) {$encoding = "twohot";}
|
unless ($encoding) {$encoding = "twohot";}
|
| Line 119... |
Line 119... |
##
|
##
|
## wrapper for fizzim script
|
## wrapper for fizzim script
|
##
|
##
|
#############################################################################
|
#############################################################################
|
|
|
$cmd = "${home}${prefix}/${vendor}__${project}/bin/fizzim";
|
$cmd = "${home}${prefix}/${vendor}__${library}/bin/fizzim";
|
if ($encoding ) {$cmd = "$cmd -encoding $encoding";}
|
if ($encoding ) {$cmd = "$cmd -encoding $encoding";}
|
if ($opt_terse ) {$cmd = "$cmd -terse";}
|
if ($opt_terse ) {$cmd = "$cmd -terse";}
|
$cmd = "$cmd <${home}${prefix}/${vendor}__${project}${lib_comp_sep}${component}/${source}";
|
$cmd = "$cmd <${home}${prefix}/${vendor}__${library}${lib_comp_sep}${component}/${source}";
|
$cmd = "$cmd >${home}${prefix}/${vendor}__${project}${lib_comp_sep}${component}/${destination}";
|
$cmd = "$cmd >${home}${prefix}/${vendor}__${library}${lib_comp_sep}${component}/${destination}";
|
$cmd = "${cmd}\n";
|
$cmd = "${cmd}\n";
|
if (system($cmd)) {
|
if (system($cmd)) {
|
print "build_fizzim ${vendor}__${project}${lib_comp_sep}${component}/${destination} finished\n";
|
print "build_fizzim ${vendor}__${library}${lib_comp_sep}${component}/${destination} finished\n";
|
}
|
}
|
1
|
1
|
|
|
|
|
|
|
