Peppermint/debian-cd-clone
1
0
Fork 0
mirror of https://salsa.debian.org/images-team/debian-cd.git synced 2024-11-24 15:19:51 -01:00
Code Issues Packages Projects Releases Wiki Activity

Implement support for --output-dir

Browse Source
This commit is contained in:
Cyril Brulebois 2021-07-25 07:10:34 +02:00
parent 21509942d1
commit 18e27f6e08
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
tools/generate_firmware_patterns
View File

@ -16,6 +16,7 @@
use strict;
use warnings;
use File::Path qw(make_path);
use File::Slurp;
use Getopt::Long;
use YAML::XS;
@ -26,6 +27,12 @@ GetOptions( "output-dir=s" => \$output_dir,
"verbose" => \$verbose )
or die "Error in command line arguments";
if (! -d $output_dir) {
print STDERR "creating output directory $output_dir\n"
if $verbose;
make_path($output_dir, { verbose => $verbose });
}
process_components($_) for @ARGV;
sub process_components {
@ -53,8 +60,10 @@ sub process_components {
print STDERR "found modaliases entries for firmware package ", $array->{Package}, "\n"
if $verbose;
# XXX: Support output directory
my $pattern_file = $array->{Package} . ".pattern";
my $pattern_file = $output_dir . "/" . $array->{Package} . ".pattern";
printf STDERR "writing %d entries to %s\n",
(scalar @{ $array->{Provides}->{modaliases} }),
$pattern_file;
# For each alias, anchor the pattern on the left (^) and on
# the right ($), and replace each '*' with '.*':