aboutsummaryrefslogtreecommitdiff
path: root/src/bin
diff options
context:
space:
mode:
Diffstat (limited to '')
-rwxr-xr-xsrc/bin/paku382
1 files changed, 188 insertions, 194 deletions
diff --git a/src/bin/paku b/src/bin/paku
index e4f0b83..d73107a 100755
--- a/src/bin/paku
+++ b/src/bin/paku
@@ -132,76 +132,74 @@ if ($action eq 'nix') {
self: super: {
$ns = rec {
EOF
- for my $package (@{$json->{packages}}) {
- for my $version (@{$package->{versions}}) {
- my $ver = $version->{name};
- $ver =~ s/^v//;
- $ver =~ s/\./-/g;
- if ($version->{type} eq 'latest') {
- $ver = 'latest';
- print <<~EOF;
- $package->{name} = $package->{name}-latest;
- EOF
- }
-
- my $long = $version->{'long-description'};
- $long =~ s/^(.)/ $1/gm;
-
- my $base_url = $base_url_prefix . '/' . $package->{name};
-
+ for my $pkg (@{$json->{packages}}) {
+ my $ver = $pkg->{version};
+ $ver =~ s/^v//;
+ $ver =~ s/\./-/g;
+ if ($pkg->{type} eq 'latest') {
+ $ver = 'latest';
print <<~EOF;
- $package->{name}-$ver = pkgs.stdenv.mkDerivation rec {
- name = "$package->{name}";
- version = "$version->{name}";
+ $pkg->{name} = $pkg->{name}-latest;
+ EOF
+ }
- src = fetchTarball {
- url =
- "$version->{url}";
- sha256 = "$version->{sha256}";
- };
+ my $long = $pkg->{'long-description'};
+ $long =~ s/^(.)/ $1/gm;
- nativeBuildInputs = with pkgs; [
- EOF
+ my $base_url = $base_url_prefix . '/' . $pkg->{name};
- for my $input (@{$version->{'native-inputs'}}) {
- print <<~EOF;
- $input
- EOF
- }
- print <<~EOF;
- ];
+ print <<~EOF;
+ $pkg->{name}-$ver = pkgs.stdenv.mkDerivation rec {
+ name = "$pkg->{name}";
+ version = "$pkg->{version}";
+
+ src = fetchTarball {
+ url =
+ "$pkg->{url}";
+ sha256 = "$pkg->{sha256}";
+ };
+
+ nativeBuildInputs = with pkgs; [
+ EOF
- buildInputs = with pkgs; [
+ for my $input (@{$pkg->{'native-inputs'}}) {
+ print <<~EOF;
+ $input
EOF
- for my $input (@{$version->{inputs}}) {
- print <<~EOF;
- $input
- EOF
- }
+ }
+ print <<~EOF;
+ ];
+
+ buildInputs = with pkgs; [
+ EOF
+ for my $input (@{$pkg->{inputs}}) {
print <<~EOF;
- ];
-
- makeFlags = [ "PREFIX=\$(out)" ];
-
- doCheck = true;
- enableParallelBuilding = true;
-
- meta = with pkgs.lib; {
- description = "$version->{description}";
- longDescription = ''
- $long
- '';
- homepage = "$base_url/";
- changelog = "$base_url/CHANGELOG.html";
- downloadPage = "$base_url/#releases";
- license = licenses.agpl3;
- platforms = platforms.unix;
- };
- };
+ $input
EOF
- # FIXME: escape quotes in description
- # FIXME: parameterize license
}
+ print <<~EOF;
+ ];
+
+ makeFlags = [ "PREFIX=\$(out)" ];
+
+ doCheck = true;
+ enableParallelBuilding = true;
+
+ meta = with pkgs.lib; {
+ description = "$pkg->{description}";
+ longDescription = ''
+ $long
+ '';
+ homepage = "$base_url/";
+ changelog = "$base_url/CHANGELOG.html";
+ downloadPage = "$base_url/#releases";
+ license = licenses.agpl3;
+ platforms = platforms.unix;
+ };
+ };
+ EOF
+ # FIXME: escape quotes in description
+ # FIXME: parameterize license
}
print <<~EOF;
};
@@ -232,78 +230,76 @@ if ($action eq 'guix') {
EOF
- for my $package (@{$json->{packages}}) {
- for my $version (@{$package->{versions}}) {
- my $ver = $version->{name};
- $ver =~ s/^v//;
- $ver =~ s/\./-/g;
- if ($version->{type} eq 'latest') {
- push @pkgs, "$package->{name}";
- $ver = 'latest';
- }
+ for my $pkg (@{$json->{packages}}) {
+ my $ver = $pkg->{version};
+ $ver =~ s/^v//;
+ $ver =~ s/\./-/g;
+ if ($pkg->{type} eq 'latest') {
+ push @pkgs, "$pkg->{name}";
+ $ver = 'latest';
+ }
- my $long = $version->{'long-description'};
- $long =~ s/^(.)/ $1/gm;
+ my $long = $pkg->{'long-description'};
+ $long =~ s/^(.)/ $1/gm;
- my $base_url = $base_url_prefix . '/' . $package->{name};
+ my $base_url = $base_url_prefix . '/' . $pkg->{name};
- push @pkgs, "$package->{name}-$ver";
- # FIXME: indentation of (source ...)
- print <<~EOF;
- (define-public $package->{name}-$ver
- (package
- (name "$package->{name}-$ver")
- (version "$version->{name}")
- (source (origin
- (method url-fetch)
- (uri "$version->{url}")
- (sha256
- (base32 "$version->{sha256FIXME}"))))
- (build-system gnu-build-system)
- (native-inputs
- EOF
+ push @pkgs, "$pkg->{name}-$ver";
+ # FIXME: indentation of (source ...)
+ print <<~EOF;
+ (define-public $pkg->{name}-$ver
+ (package
+ (name "$pkg->{name}-$ver")
+ (version "$pkg->{version}")
+ (source (origin
+ (method url-fetch)
+ (uri "$pkg->{url}")
+ (sha256
+ (base32 "$pkg->{sha256FIXME}"))))
+ (build-system gnu-build-system)
+ (native-inputs
+ EOF
+
+ print ' (list';
+ for my $input (@{$pkg->{'native-inputs'}}) {
+ my $name = $json->{mappings}{$input}{guix} || $input;
+ print "\n $name";
+ }
+ print "))\n";
- print ' (list';
- for my $input (@{$version->{'native-inputs'}}) {
- my $name = $json->{mappings}{$input}{guix} || $input;
- print "\n $name";
- }
- print "))\n";
-
- print " (inputs\n";
- print ' (list';
- for my $input (@{$version->{inputs}}) {
- my $name = $json->{mappings}{$input}{guix} || $input;
- print "\n $name";
- }
- print "))\n";
+ print " (inputs\n";
+ print ' (list';
+ for my $input (@{$pkg->{inputs}}) {
+ my $name = $json->{mappings}{$input}{guix} || $input;
+ print "\n $name";
+ }
+ print "))\n";
+ print <<~EOF;
+ (arguments
+ (list
+ #:make-flags '(list (string-append "PREFIX=" %output))
+ #:phases
+ #~(modify-phases %standard-phases
+ (delete 'configure))))
+ (synopsis "$pkg->{description}")
+ (description
+ "$pkg->{'long-description'}")
+ (home-page "$base_url/")
+ (license license:agpl3+)))
+
+ EOF
+ # FIXME: escape quotes in description
+ # FIXME: parameterize license
+ if ($pkg->{type} eq 'latest') {
print <<~EOF;
- (arguments
- (list
- #:make-flags '(list (string-append "PREFIX=" %output))
- #:phases
- #~(modify-phases %standard-phases
- (delete 'configure))))
- (synopsis "$version->{description}")
- (description
- "$version->{'long-description'}")
- (home-page "$base_url/")
- (license license:agpl3+)))
+ (define-public $pkg->{name}
+ (package
+ (inherit $pkg->{name}-latest)
+ (name "$pkg->{name}")))
+
EOF
- # FIXME: escape quotes in description
- # FIXME: parameterize license
- if ($version->{type} eq 'latest') {
- print <<~EOF;
- (define-public $package->{name}
- (package
- (inherit $package->{name}-latest)
- (name "$package->{name}")))
-
-
- EOF
- }
}
}
print '(list';
@@ -326,82 +322,80 @@ my %vars = (
my @targets = ();
-for my $package (@{$json->{packages}}) {
- for my $version (@{$package->{versions}}) {
- push @{$vars{tarballs}}, "\t$dir/tarballs/$version->{fname} \\\n";
- push @{$vars{checkouts}}, "\t$dir/checkouts/$package->{name}-$version->{name} \\\n";
-
- push @targets, <<~EOF;
- $dir/tarballs/$version->{fname}:
- mkdir -p \$(\@D)
- wget -O \$\@ \\
- '$version->{url}'
+for my $pkg (@{$json->{packages}}) {
+ push @{$vars{tarballs}}, "\t$dir/tarballs/$pkg->{fname} \\\n";
+ push @{$vars{checkouts}}, "\t$dir/checkouts/$pkg->{name}-$pkg->{version} \\\n";
- $dir/checkouts/$package->{name}-$version->{name}: $dir/tarballs/$version->{fname}
- mkdir -p \$(\@D)
- tar -C $dir/checkouts/ -xf $dir/tarballs/$version->{fname}
- touch \$\@
-
- EOF
+ push @targets, <<~EOF;
+ $dir/tarballs/$pkg->{fname}:
+ mkdir -p \$(\@D)
+ wget -O \$\@ \\
+ '$pkg->{url}'
+ $dir/checkouts/$pkg->{name}-$pkg->{version}: $dir/tarballs/$pkg->{fname}
+ mkdir -p \$(\@D)
+ tar -C $dir/checkouts/ -xf $dir/tarballs/$pkg->{fname}
+ touch \$\@
- next if $version->{architectures} ne 'any';
+ EOF
- push @{$vars{destdirs}}, "\t$dir/debian-destdir/$package->{name}-$version->{name}/DEBIAN \\\n";
- push @{$vars{ctrlfiles}}, "\t$dir/debian-destdir/$package->{name}-$version->{name}/DEBIAN/control \\\n";
- push @{$vars{destdebs}}, "\t$dir/debian-destdir/$package->{name}-$version->{name}.deb \\\n";
- push @{$vars{debs}}, "\t$dir/debian/$package->{name}_$version->{name}_all.deb \\\n";
- my $ver = $version->{type} eq 'latest' ? '0.' . $version->{name} . '.latest' : $version->{name};
- $ver =~ s/^v//;
- my $maintainer_b64 = MIME::Base64::encode_base64 $version->{maintainer}, '';
- my $desc_b64 = MIME::Base64::encode_base64 $version->{description}, '';
- my $long_desc_b64 = MIME::Base64::encode_base64 $version->{'long-description'}, '';
-
- push @targets, <<~EOF;
- $dir/debian-destdir/$package->{name}-$version->{name}/DEBIAN: $dir/checkouts/$package->{name}-$version->{name}
- \$(MAKE) \\
- -C $dir/checkouts/$package->{name}-$version->{name} \\
- install \\
- PREFIX=/usr \\
- DESTDIR="\$\$PWD"/$dir/debian-destdir/$package->{name}-$version->{name}
- mkdir -p \$\@
- touch \$\@
-
- $dir/debian-destdir/$package->{name}-$version->{name}/DEBIAN/control: $dir/debian-destdir/$package->{name}-$version->{name}/DEBIAN
- printf '' > \$\@
- printf 'Package: $package->{name}\\n' >> \$\@
- printf 'Version: $ver\\n' >> \$\@
- printf 'Section: custom\\n' >> \$\@
- printf 'Depends:\\n' >> \$\@
- printf 'Priority: optional\\n' >> \$\@
- printf 'Architecture: all\\n' >> \$\@
- printf 'Essential: no\\n' >> \$\@
-
- printf 'Maintainer: ' >> \$\@
- printf '$maintainer_b64' | base64 -d >> \$\@
- printf '\\n' >> \$\@
-
- printf 'Description: ' >> \$\@
- printf '$desc_b64' | base64 -d >> \$\@
- printf '\\n' >> \$\@
-
- printf '$long_desc_b64' | \\
- base64 -d | \\
- sed 's|^\$\$|.|' | \\
- sed 's|^| |' >> \$\@
- printf '\\n' >> \$\@
-
- $dir/debian-destdir/$package->{name}-$version->{name}.deb: $dir/debian-destdir/$package->{name}-$version->{name}/DEBIAN/control
- dpkg-deb --build $dir/debian-destdir/$package->{name}-$version->{name}
-
- $dir/debian/$package->{name}_$version->{name}_all.deb: $dir/debian-destdir/$package->{name}-$version->{name}.deb
- mkdir -p \$(\@D)
- cp $dir/debian-destdir/$package->{name}-$version->{name}.deb \$\@
+ next if $pkg->{architectures} ne 'any';
+
+ push @{$vars{destdirs}}, "\t$dir/debian-destdir/$pkg->{name}-$pkg->{version}/DEBIAN \\\n";
+ push @{$vars{ctrlfiles}}, "\t$dir/debian-destdir/$pkg->{name}-$pkg->{version}/DEBIAN/control \\\n";
+ push @{$vars{destdebs}}, "\t$dir/debian-destdir/$pkg->{name}-$pkg->{version}.deb \\\n";
+ push @{$vars{debs}}, "\t$dir/debian/$pkg->{name}_$pkg->{version}_all.deb \\\n";
+
+ my $ver = $pkg->{type} eq 'latest' ? '0.' . $pkg->{version} . '.latest' : $pkg->{version};
+ $ver =~ s/^v//;
+ my $maintainer_b64 = MIME::Base64::encode_base64 $pkg->{maintainer}, '';
+ my $desc_b64 = MIME::Base64::encode_base64 $pkg->{description}, '';
+ my $long_desc_b64 = MIME::Base64::encode_base64 $pkg->{'long-description'}, '';
+
+ push @targets, <<~EOF;
+ $dir/debian-destdir/$pkg->{name}-$pkg->{version}/DEBIAN: $dir/checkouts/$pkg->{name}-$pkg->{version}
+ \$(MAKE) \\
+ -C $dir/checkouts/$pkg->{name}-$pkg->{version} \\
+ install \\
+ PREFIX=/usr \\
+ DESTDIR="\$\$PWD"/$dir/debian-destdir/$pkg->{name}-$pkg->{version}
+ mkdir -p \$\@
+ touch \$\@
+
+ $dir/debian-destdir/$pkg->{name}-$pkg->{version}/DEBIAN/control: $dir/debian-destdir/$pkg->{name}-$pkg->{version}/DEBIAN
+ printf '' > \$\@
+ printf 'Package: $pkg->{name}\\n' >> \$\@
+ printf 'Version: $ver\\n' >> \$\@
+ printf 'Section: custom\\n' >> \$\@
+ printf 'Depends:\\n' >> \$\@
+ printf 'Priority: optional\\n' >> \$\@
+ printf 'Architecture: all\\n' >> \$\@
+ printf 'Essential: no\\n' >> \$\@
+
+ printf 'Maintainer: ' >> \$\@
+ printf '$maintainer_b64' | base64 -d >> \$\@
+ printf '\\n' >> \$\@
+
+ printf 'Description: ' >> \$\@
+ printf '$desc_b64' | base64 -d >> \$\@
+ printf '\\n' >> \$\@
+
+ printf '$long_desc_b64' | \\
+ base64 -d | \\
+ sed 's|^\$\$|.|' | \\
+ sed 's|^| |' >> \$\@
+ printf '\\n' >> \$\@
+
+ $dir/debian-destdir/$pkg->{name}-$pkg->{version}.deb: $dir/debian-destdir/$pkg->{name}-$pkg->{version}/DEBIAN/control
+ dpkg-deb --build $dir/debian-destdir/$pkg->{name}-$pkg->{version}
+
+ $dir/debian/$pkg->{name}_$pkg->{version}_all.deb: $dir/debian-destdir/$pkg->{name}-$pkg->{version}.deb
+ mkdir -p \$(\@D)
+ cp $dir/debian-destdir/$pkg->{name}-$pkg->{version}.deb \$\@
- EOF
- }
+ EOF
}
generated by cgit v1.2.3 (git 2.47.1) at 2025-01-19 16:27:54 +0000