summaryrefslogtreecommitdiff
path: root/dev-perl/Net-FreeDB
diff options
context:
space:
mode:
authorroot <root@alpha.trunkmasters.com>2026-06-12 11:50:53 -0500
committerroot <root@alpha.trunkmasters.com>2026-06-12 11:50:53 -0500
commit290aebdea65a02557706eaeda477fef0437b6a48 (patch)
treef87a939169a508a2e943570501b64cc16b411cda /dev-perl/Net-FreeDB
parent6783ddcd4b73d9ce586a71770caed352bec93b16 (diff)
downloadbaldeagleos-repo-290aebdea65a02557706eaeda477fef0437b6a48.tar.gz
baldeagleos-repo-290aebdea65a02557706eaeda477fef0437b6a48.tar.xz
baldeagleos-repo-290aebdea65a02557706eaeda477fef0437b6a48.zip
Adding metadata
Diffstat (limited to 'dev-perl/Net-FreeDB')
-rw-r--r--dev-perl/Net-FreeDB/Manifest1
-rw-r--r--dev-perl/Net-FreeDB/Net-FreeDB-0.100.0-r2.ebuild43
-rw-r--r--dev-perl/Net-FreeDB/files/Net-FreeDB-0.100.0-c99.patch69
-rw-r--r--dev-perl/Net-FreeDB/files/Net-FreeDB-0.100.0-gnudb.patch52
-rw-r--r--dev-perl/Net-FreeDB/metadata.xml9
5 files changed, 0 insertions, 174 deletions
diff --git a/dev-perl/Net-FreeDB/Manifest b/dev-perl/Net-FreeDB/Manifest
deleted file mode 100644
index fdffb1336736..000000000000
--- a/dev-perl/Net-FreeDB/Manifest
+++ /dev/null
@@ -1 +0,0 @@
-DIST Net-FreeDB-0.10.tar.gz 23869 BLAKE2B 4fcd4e38db84efd55f96738ebe04330cc46005038282857a55095a25cc72bc1a1bdd4d12282a38e738eabcaf4efe318cf1505e60e41e88f7156fc6768be51f04 SHA512 b1b249dfb81128645e6e3481f93d914fc11ecf931b91f6a21a065fa2fde8674f9c8b5466b3112be4f4f28556c0ec899cf8723e60adaaf26b5165e61d61445368
diff --git a/dev-perl/Net-FreeDB/Net-FreeDB-0.100.0-r2.ebuild b/dev-perl/Net-FreeDB/Net-FreeDB-0.100.0-r2.ebuild
deleted file mode 100644
index b0c747f8de46..000000000000
--- a/dev-perl/Net-FreeDB/Net-FreeDB-0.100.0-r2.ebuild
+++ /dev/null
@@ -1,43 +0,0 @@
-# Copyright 1999-2024 Gentoo Authors
-# Distributed under the terms of the GNU General Public License v2
-
-EAPI=8
-
-DIST_AUTHOR=DSHULTZ
-DIST_VERSION=0.10
-inherit perl-module
-
-DESCRIPTION="OOP interface to the FreeDB database"
-
-SLOT="0"
-KEYWORDS="amd64 x86"
-
-RDEPEND="
- >=dev-perl/CDDB-File-1.10.0
- >=virtual/perl-File-Temp-0.50.0
- virtual/perl-IO
- dev-perl/Moo
- >=virtual/perl-libnet-2.120.0
-"
-BDEPEND="
- ${RDEPEND}
- virtual/perl-ExtUtils-MakeMaker
- test? (
- dev-perl/Test-Most
- )
-"
-
-PATCHES=(
- "${FILESDIR}"/${PN}-0.100.0-c99.patch
- "${FILESDIR}"/${PN}-0.100.0-gnudb.patch
-)
-
-src_test() {
- local my_test_control;
- my_test_control=${DIST_TEST_OVERRIDE:-${DIST_TEST:-do parallel}}
- if has network ${my_test_control} ; then
- export HAVE_INTERNET=1
- perl_rm_files "t/16-get_local_disc_id.t" "t/17-get_local_disc_data.t"
- fi
- perl-module_src_test
-}
diff --git a/dev-perl/Net-FreeDB/files/Net-FreeDB-0.100.0-c99.patch b/dev-perl/Net-FreeDB/files/Net-FreeDB-0.100.0-c99.patch
deleted file mode 100644
index fc05d9863cd4..000000000000
--- a/dev-perl/Net-FreeDB/files/Net-FreeDB-0.100.0-c99.patch
+++ /dev/null
@@ -1,69 +0,0 @@
-https://bugs.gentoo.org/883603
-https://rt.cpan.org/Public/Bug/Display.html?id=152242
-
-Description: define read_toc() before using it in discdata get_disc_id()
- otherwise the build fails with -Werror=implicit-function-declaration
-Origin: vendor
-Bug-Debian: https://bugs.debian.org/1065999
-Author: gregor herrmann <gregoa@debian.org>
-Last-Update: 2024-03-10
-
---- a/lib/linux.h
-+++ b/lib/linux.h
-@@ -46,28 +46,6 @@
- return ((n % 0xff) << 24 | t << 8 | tot_trks);
- }
-
--struct discdata get_disc_id(char* dev)
--{
-- struct discdata data;
-- int i;
--
-- data.num_of_trks = read_toc(dev);
--
-- if (data.num_of_trks == -1) {
-- return data;
-- }
--
-- data.discid = cddb_discid(data.num_of_trks);
--
-- for (i = 0; i < data.num_of_trks; i++) {
-- data.track_offsets[i] = (cdtoc[i].frame);
-- }
--
-- data.seconds = (cdtoc[data.num_of_trks].frame)/75;
--
-- return data;
--}
--
- int read_toc(char* dev)
- {
- int drive, i, status;
-@@ -151,4 +129,26 @@
- return tochdr.cdth_trk1;
- }
-
-+struct discdata get_disc_id(char* dev)
-+{
-+ struct discdata data;
-+ int i;
-+
-+ data.num_of_trks = read_toc(dev);
-+
-+ if (data.num_of_trks == -1) {
-+ return data;
-+ }
-+
-+ data.discid = cddb_discid(data.num_of_trks);
-+
-+ for (i = 0; i < data.num_of_trks; i++) {
-+ data.track_offsets[i] = (cdtoc[i].frame);
-+ }
-+
-+ data.seconds = (cdtoc[data.num_of_trks].frame)/75;
-+
-+ return data;
-+}
-+
- #endif //LINUX_H
-
diff --git a/dev-perl/Net-FreeDB/files/Net-FreeDB-0.100.0-gnudb.patch b/dev-perl/Net-FreeDB/files/Net-FreeDB-0.100.0-gnudb.patch
deleted file mode 100644
index d2a780ae0ce2..000000000000
--- a/dev-perl/Net-FreeDB/files/Net-FreeDB-0.100.0-gnudb.patch
+++ /dev/null
@@ -1,52 +0,0 @@
-https://rt.cpan.org/Public/Bug/Display.html?id=137752
-
-Description: replace default host freedb.freedb.org with gnudb.gnudb.org.
- Also remove reference to inaccessible documentation, and fix the non-online
- test which checks for the default host.
-Origin: vendor
-Bug-Debian: https://bugs.debian.org/991089
-Author: gregor herrmann <gregoa@debian.org>
-Last-Update: 2021-07-16
-
---- a/FreeDB.pm
-+++ b/FreeDB.pm
-@@ -7,7 +7,7 @@
- use File::Temp;
-
- has hostname => (is => 'ro', default => $ENV{HOSTNAME} // 'unknown');
--has remote_host => (is => 'rw', default => 'freedb.freedb.org');
-+has remote_host => (is => 'rw', default => 'gnudb.gnudb.org');
- has remote_port => (is => 'rw', default => 8880);
- has user => (is => 'rw', default => $ENV{USER} // 'unknown');
- has timeout => (is => 'rw', default => 120);
-@@ -449,7 +449,7 @@
-
-
- new() creates and returns a new Net::FreeDB object that is connected
-- to either the given host or freedb.freedb.org as default.
-+ to either the given host or gnudb.gnudb.org as default.
-
- =item lscat
-
-@@ -723,10 +723,6 @@
- giving the correct drive number will return in an
- accurate return.
-
--=head1 Resources
-- The current version of the CDDB Server Protocol can be
-- found at: http://ftp.freedb.org/pub/freedb/latest/CDDBPROTO
--
- =head1 AUTHOR
- David Shultz E<lt>dshultz@cpan.orgE<gt>
- Peter Pentchev E<lt>roam@ringlet.netE<gt>
---- a/t/00-basic.t
-+++ b/t/00-basic.t
-@@ -10,7 +10,7 @@
- ok($freedb->hostname eq 'unknown', 'Error setting hostname');
- }
-
--ok($freedb->remote_host eq 'freedb.freedb.org', 'Error setting default host');
-+ok($freedb->remote_host eq 'gnudb.gnudb.org', 'Error setting default host');
-
- ok($freedb->remote_port == 8880, 'Error setting default port');
-
diff --git a/dev-perl/Net-FreeDB/metadata.xml b/dev-perl/Net-FreeDB/metadata.xml
deleted file mode 100644
index 89c67f49bdb9..000000000000
--- a/dev-perl/Net-FreeDB/metadata.xml
+++ /dev/null
@@ -1,9 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<!DOCTYPE pkgmetadata SYSTEM "https://docs.baldeagleos.com/dtd/metadata.dtd">
-<pkgmetadata>
- <maintainer type="project">
- <email>perl@gentoo.org</email>
- <name>Gentoo Perl Project</name>
- </maintainer>
- <origin>baldeagleos-repo</origin>
-</pkgmetadata>