Tweak license detection in portgen(1)

[Kurt Mosiejczuk]

I tweaked portgen's License.pm module a bit. There were common licenses
that it would spit out as "Unknown". So I modified the munging a little
and added more entries to its list of good licenses.

Now something that states its license is "The MIT License" will no
longer stump it.

ok?

--Kurt

Index: License.pm
===================================================================
RCS file: /cvs/ports/infrastructure/lib/OpenBSD/PortGen/License.pm,v
retrieving revision 1.5
diff -u -p -r1.5 License.pm
--- License.pm  13 May 2019 00:21:29 -0000      1.5
+++ License.pm  9 Oct 2022 00:07:08 -0000
@@ -28,28 +28,38 @@ our @EXPORT_OK = qw(
 
 # Add licenses not recognized here.
 my %good_licenses = (
-       agpl_3      => 'AGPL 3',
-       apache_1_1  => 'Apache 1.1',
-       apache_2_0  => 'Apache 2.0',
-       artistic_1  => 'Artistic 1.0',
-       artistic_2  => 'Artistic 2.0',
-       bsd         => 'BSD',
-       freebsd     => 'FreeBSD',
-       gpl_2       => 'GPLv2',
-       gpl_2_0     => 'GPLv2',
-       gpl_3       => 'GPLv3',
-       gpl_3_0     => 'GPLv3',
-       isc         => 'ISC',
-       lgpl        => 'LGPL',
-       lgpl_2_1    => 'LGPL v2.1',
-       'lgpl_2_1+' => 'LGPL v2.1',
-       mit         => 'MIT',
-       mpl_v2      => 'MPL 2.0',
-       new_bsd     => 'BSD-3',
-       perl_5      => 'Perl',
-       ruby        => 'Ruby',
-       qpl_1_0     => 'QPLv1',
-       zlib        => 'zlib',
+       agpl_3          => 'AGPL 3',
+       apache_1_1      => 'Apache 1.1',
+       apache_2_0      => 'Apache 2.0',
+       artistic_1      => 'Artistic 1.0',
+       artistic_1_0    => 'Artistic 1.0',
+       artistic_2      => 'Artistic 2.0',
+       artistic_2_0    => 'Artistic 2.0',
+       bsd             => 'BSD',
+       cc0             => 'CC0',
+       cc_by_nc_sa_3_0 => 'CC BY-NC-SA 3.0',
+       cmu             => 'CMU',
+       freebsd         => 'FreeBSD',
+       gpl_2           => 'GPLv2',
+       gpl_2_0         => 'GPLv2',
+       'gpl_2+'        => 'GPLv2+',
+       gpl_3           => 'GPLv3',
+       gpl_3_0         => 'GPLv3',
+       'gpl_3+'        => 'GPLv3+',
+       isc             => 'ISC',
+       lgpl            => 'LGPL',
+       lgpl_2_1        => 'LGPL v2.1',
+       'lgpl_2_1+'     => 'LGPL v2.1+',
+       lgpl_3          => 'LGPL v3',
+       'lgpl_3+'       => 'LGPL v3+',
+       mit             => 'MIT',
+       mpl_v2          => 'MPL 2.0',
+       new_bsd         => 'BSD-3',
+       perl_5          => 'Perl',
+       public_domain   => 'Public Domain',
+       ruby            => 'Ruby',
+       qpl_1_0         => 'QPLv1',
+       zlib            => 'zlib',
 );
 
 sub is_good
@@ -75,6 +85,8 @@ sub _munge
 
        $license = lc $license;
        $license =~ s/[,-\.\s]/_/g;
+       $license =~ s/the_//;
+       $license =~ s/gnu_public_license/gpl/;
        $license =~ s/_license//;
        $license =~ s/_version//;
        $license =~ s/_{2,}/_/g;