From c9804541726c2768b48d0325a1c3d0225edfb0c9 Mon Sep 17 00:00:00 2001
From: Cyril Brulebois <kibi@debian.org>
Date: Sun, 25 Jul 2021 08:28:53 +0200
Subject: [PATCH] Extract alias formatting for later reuse.

---
 tools/generate_firmware_patterns | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/tools/generate_firmware_patterns b/tools/generate_firmware_patterns
index 8b966549..bb156845 100755
--- a/tools/generate_firmware_patterns
+++ b/tools/generate_firmware_patterns
@@ -35,6 +35,11 @@ GetOptions( "output-dir=s" => \$output_dir,
     or die "Error in command line arguments";
 
 
+sub format_alias {
+    return map { $a = $_; $a =~ s/[*]/.*/g; "^$a\$\n" } @_;
+}
+
+
 sub process_components {
     my $input = shift;
     my $content;
@@ -73,8 +78,7 @@ sub process_components {
         # For each alias, anchor the pattern on the left (^) and on
         # the right ($), and replace each '*' with '.*':
         write_file($patterns_file,
-                   map { $a = $_; $a =~ s/[*]/.*/g; "^$a\$\n" }
-                   @{ $array->{Provides}->{modaliases} });
+                   format_alias( @{ $array->{Provides}->{modaliases} } ));
         push @packages, $array->{Package};
     }
     return @packages;