Hello again,
sorry, attachment missing.
Kind regards,
Georg Jansing
Am 29.06.2012 18:26, schrieb Georg Jansing:
Hello everybody,
I was trying to install Linux TV Kernel Modules via your media_build
git repo/scripts. Since I am on openSUSE and there are no installation
hints yet, and I needed to look up the correct packages anyways, here
is a small patch that adds the corresponding infomation to your script.
I hope, the formulation for adding the perl buildservice repository
(something like Ubuntu's PPAs) is clear enough. Please also be warned,
that I never did anything in perl yet, so I don't know if I chose the
best/perl way to add the repo message.
Sadly, the media_build drivers did not work for me, but with the
script I could at least compile them correctly (I think ;-)).
Kind regards,
Georg Jansing
>From 7c622ca8df674a5b39c3e6c60cc69000f021e395 Mon Sep 17 00:00:00 2001
From: Georg Jansing <jansing@xxxxxxxxxxxxxxxxxxxxx>
Date: Fri, 29 Jun 2012 18:38:46 +0200
Subject: [PATCH] Add installation hints for openSUSE.
---
build | 37 +++++++++++++++++++++++++++++++++++++
1 files changed, 37 insertions(+), 0 deletions(-)
diff --git a/build b/build
index e023f6b..3384fdd 100755
--- a/build
+++ b/build
@@ -91,6 +91,38 @@ sub give_ubuntu_hints()
printf("You should run:\n\tsudo apt-get install $install\n");
}
+sub give_opensuse_hints()
+{
+ my $install;
+
+ my %map = (
+ "lsdiff" => "patchutils",
+ "Digest::SHA" => "perl-Digest-SHA1",
+ "Proc::ProcessTable" => "perl-Proc-ProcessTable",
+ );
+
+ my $need_perl_repo = 0;
+
+ foreach my $prog (@missing) {
+ print "ERROR: please install \"$prog\", otherwise, build won't work.\n";
+ if (defined($map{$prog})) {
+ $install .= " " . $map{$prog};
+ } else {
+ $install .= " " . $prog;
+ }
+ if ($prog eq "Proc::ProcessTable") {
+ $need_perl_repo = 1;
+ }
+ }
+
+ printf("You should run:\n\tsudo zypper install $install\n");
+
+ if ($need_perl_repo) {
+ printf("\nThe Proc::ProcessTable perl module can be found in the perl buildservice repository. ");
+ printf("Add with the command (replacing 12.1 with your openSUSE release version):\n");
+ printf("\tsudo zypper ar http://download.opensuse.org/repositories/devel:/languages:/perl/openSUSE_12.1/ perl\n");
+ }
+}
sub give_arch_linux_hints()
{
@@ -152,6 +185,10 @@ sub give_hints()
give_ubuntu_hints;
return;
}
+ if ($system_release =~ /openSUSE/) {
+ give_opensuse_hints;
+ return;
+ }
if ($system_release =~ /Arch Linux/) {
give_arch_linux_hints;
return;
--
1.7.7
