Changeset 29595 for main/trunk/package-kits/linux/perllib/Greenstone/Package/_apt.pm

Timestamp:

2014-12-11T18:45:10+13:00 (9 years ago)

Author:

Jeremy Symon

Message:

Modifying package generation to use sub-packages in order to avoid compiling the same source multiple times. Currently works for Pacman. Needs testing (and fixing) for other package managers.

File:

• main/trunk/package-kits/linux/perllib/Greenstone/Package/_apt.pm (modified) (1 diff)

main/trunk/package-kits/linux/perllib/Greenstone/Package/_apt.pm

@@ -35 +35 @@
 }
 
+sub add_package_section {
+    my ($self, $out) = @_;
+    for my $line (
+        'Package: %NAME%',
+        'Architecture: %ARCHITECTURE%',
+        'Homepage: %HOMEPAGE%',
+        'Depends:',
+        '%DEPENDS',
+        'Description: %DESCRIPTION_SHORT',
+        '  %DESCRIPTION'
+    ) {
+        my $copy = $line;
+        $self->subst ($copy);
+        print $out $copy, "\n";
+    }
+}
+
+sub add_package_impl {
+    my ($self, $packages) = @_;
+    $self->add_install;
+    open my $CONTROL, '>', "/tmp/gspkg.control";
+    for my $line (
+        'Source: %NAME%',
+        'Section: java',
+        'Priority: optional',
+        'Maintainer: %MAINTAINER_NAME% <%MAINTAINER_EMAIL%>',
+        'BuildDepends:',
+        '%MAKEDEPENDS%',
+    ) {
+        my $copy = $line;
+        $self->subst ($copy);
+        print $CONTROL $copy, "\n";
+    }
+    if (defined $packages) {
+        my $config = $self->{config};
+        for my $package (@{$packages}) {
+            $package->{HOMEPAGE} = $config->{HOMEPAGE};
+            $self->{config} = $package;
+            $self->add_package_section ($CONTROL);
+        }
+        $self->{config} = $config;
+    } else {
+        $self->add_package_section ($CONTROL);
+    }
+    close $CONTROL;
+    $self->add ("/tmp/gspkg.control", "$self->{output}/debian/control");
+}
+
 1;