[gelöst] Script "Tatort nach Ermittler"

Steevee · 12. Februar 2010

... Ich brauch ein Script ... (aber bin nicht so fit)

Ich nehme schon seit längerer Zeit alle Tatort Krimis auf. Die Tatort-Folgen erhalten vor Ihrem Titel noch die Folgennummer verpasst und werden zur Sortierung in den Unterordner Tatort_chronologisch/Jahreszahl verschoben.

Also z.B. der letzte Tatort ist nun abgespeichert unter:
/video0/Tatort_chronologisch/2010/(756)_Tatort:_Königskinder

Nachdem sich doch nun schon ein paar (hundert) angesammelt haben, habe ich festgestellt, dass wir haupsächlich nach den Ermittlern entscheiden, welchen Tatort wir nun als nächstes schauen.

Deshalb hätte ich gern noch eine Sortierung nach Ermmittler !!

Die alte Sortierung soll bleiben (nix verschieben), deshalb will ich ein Verzeichnis mit Symlinks mit der neuen Sortierung anlegen. Hab das mal für ein paar mit der Hand gemacht. Das gefällt mir sehr gut.

Das Script soll also:

das /video0/Tatort_chronologisch-Verzeichnis mit all seinen Unterverzeichnissen nach Tatort-Folgen durchsuchen. Für alle gefundenen Folgen dann in einer Datenbank (Text-Datei) für die Folge den Ermittler ermitteln und dann (wenn nicht vorhanden) ein Verzeichnis für den Ermittler anlegen und dann darin ein Symlink auf die Folge anlegen.

also z.B. für den neuen Tatort einen SymLink /video0/Tatort_nach_Ermittler/Lürsen/(756)_Tatort:_Königskinder

ln -s "/video0/Tatort_chronologisch/2010/(756)_Tatort:_Königskinder" "/video0/Tatort_nach_Ermittler/Lürsen/(756)_Tatort:_Königskinder"

Eine Zeile der Datenbankdatei könnte so aussehen:
756;Tatort:_Königskinder;Lürsen
Meine Tatort-Liste hab ich in Excel, kann man also leicht in ein passendes Textfile abspeichern.

Ich bin sozusagen noch der totale Programmieranfänger und weiss nun gar nicht wie ich da überhaupt anfangen soll...

Mit
svdrpsend.pl lstr | grep 'Tatort_chronologisch' | grep 'Tatort: ' | sed ' .... ' | > tatort-folgen.txt
könnte ich vieleicht relativ einfach nach den Tatort-Folgen suchen?

Wie bekomme ich das denn jetzt alles in ein Script. Könnte mir da jemand ein wenig helfen?

Viele Grüße
Steevee

maro1969 · 12. Februar 2010

Schon mal ein erster Ansatz:

Alle Tatort-Folgen finden, in denen ein bestimmter Ermittler mitspielt:

Code

find /video0/Tatort_chronologisch -name "info.vdr" -print0 | xargs -0r grep -l "ERMITTLER"

Ersetze ERMITTLER durch den Namen des Ermittlers!

Liefert eine solche Ausgabe:

Code

vdr02 / # find /video/ -name "info.vdr" -print0 | xargs -0r grep -l "Will Smith"
/video/Will_Smith/I_Am_Legend/2010-02-07.22.05.50.99.rec/info.vdr
/video/Will_Smith/Men_in_Black/2010-02-05.20.10.50.99.rec/info.vdr
/video/Will_Smith/Men_in_Black_II/2010-02-07.20.10.50.99.rec/info.vdr

Gruß
Martin

maro1969 · 12. Februar 2010

Bei mir fuknt das:

Bash

#!/bin/bash


if [ ! -z $1 ]                  # Wurde ein Suchverzeichnis angegeben?
then
  if [ -e $1 ]                  # Ja! Und existiert!
  then
    if [ -d $1 ]                        # Ist ein Verzeichnis!
    then
      echo "Suchverzeichnis: $1"
    else
      echo "$1 ist kein Verzeichnis!!"
      exit 1
    fi
  else
    echo "$1 existiert nicht!!"
    exit 1
  fi
else
  echo "Keine Argumente angegeben!!"
  exit 1
fi


if [ ! -z $2 ]
then
  echo "Ermittler: $2"
else
  echo "Kein Ermittler angegeben!!"
  exit 1
fi


if [ ! -z $3 ]                  # Linkverzeichnis wurde angegeben!
then
  if [ -e $3 ]                  # Ja! Und existiert!
  then
    if [ -d $3 ]                 # Ist ein Verzeichnis!
    then
      echo "Linkverzeichnis: $3"
    else
      echo "$3 ist kein Verzeichnis!!"
      exit 1
    fi
  else
    echo "$3 existiert nicht!!"
    exit 1
  fi
else
  echo "Keine Linkverzeichnis angegeben!!"
  exit 1
fi


if [ -e $3/$2 ]                 # Ermittlerverzeichnis existiert
then
  echo "Ermittler-Verzeichnis: $3/$2"
else
  echo "Ermittler-Verzeichnis: $3/$2 wird angelegt"
  mkdir $3/$2
fi


for film in `find $1 -name "info.vdr" -print0 | xargs -0r grep -l $2`
do
rec=${film%/*}
filmname=`echo ${rec%/*} | awk -F/ '{print $NF}'`
#echo ${film}
#echo ${rec}
#echo ${filmname}
mkdir $3/$2/${filmname}
ln -s $rec $3/$2/${filmname}
echo "Link angelegt für ${filmname}"
done

Alles anzeigen

Aufrufen mit Argumenten:

Code

./script.sh <Verzeichnis das durchsucht werden soll> <Ermitler> <Verzeichnis in dem das Ermitlerverzeichnis liegt>

Bei der Ausführung:

Code

vdr02 martin # ./TatortErmitler.sh /video/Will_Smith/ Smith /video/testsmith
Suchverzeichnis: /video/Will_Smith/
Ermittler: Smith
Linkverzeichnis: /video/testsmith
Ermittler-Verzeichnis: /video/testsmith/Smith wird angelegt
Link angelegt für I_Am_Legend
Link angelegt für Men_in_Black
Link angelegt für Men_in_Black_II
vdr02 martin # ./TatortErmitler.sh /video/Will_Smith/ Smith /video/testsmith
Suchverzeichnis: /video/Will_Smith/
Ermittler: Smith
Linkverzeichnis: /video/testsmith
Ermittler-Verzeichnis: /video/testsmith/Smith
mkdir: cannot create directory `/video/testsmith/Smith/I_Am_Legend': File exists
Link für I_Am_Legend konnte nicht angelegt werden!! Vielleicht schon da?
mkdir: cannot create directory `/video/testsmith/Smith/Men_in_Black': File exists
Link für Men_in_Black konnte nicht angelegt werden!! Vielleicht schon da?
mkdir: cannot create directory `/video/testsmith/Smith/Men_in_Black_II': File exists
Link für Men_in_Black_II konnte nicht angelegt werden!! Vielleicht schon da?
vdr02 martin # ls -l /video/testsmith/Smith/
total 20
drwxr-xr-x 5 root root 4096 2010-02-12 23:24 .
drwxr-xr-x 4 root root 4096 2010-02-12 23:24 ..
drwxr-xr-x 2 root root 4096 2010-02-12 23:24 I_Am_Legend
drwxr-xr-x 2 root root 4096 2010-02-12 23:24 Men_in_Black
drwxr-xr-x 2 root root 4096 2010-02-12 23:24 Men_in_Black_II
vdr02 martin # ls -l /video/testsmith/Smith/I_Am_Legend/
total 8
drwxr-xr-x 2 root root 4096 2010-02-12 23:24 .
drwxr-xr-x 5 root root 4096 2010-02-12 23:24 ..
lrwxrwxrwx 1 root root   56 2010-02-12 23:24 2010-02-07.22.05.50.99.rec -> /video/Will_Smith/I_Am_Legend/2010-02-07.22.05.50.99.rec
vdr02 martin #

Alles anzeigen

Profis bitte nicht lachen, bin auch nur Anfänger!!:)

Gruß
Martin

Steevee · 13. Februar 2010

Hallo,

vielen Dank für deine Hilfe.

Auch nicht schlecht. Aus so was ähnlichem könnte man auch eine generelle Suche machen. Suchverzeichnis immer /video (ohne /video/Suche), Linkverzeichnis = /video/Suche/<Suchkriterium> und Suchkriterium per OSD dem Script übergeben. Dann hätten wir ne prima Suche in Aufzeichnungen.

Jedoch brauch ich einen anderen Weg.

Das Auslesen der Ermittler aus der info.vdr funktioniert leider bei den Tatort-Folgen nicht, da es jede Menge Folgen gibt, wo der Name des Ermittlers nicht im EPG drinsteht (Wäre natürlich auch die Aufgabe eines Scripts, dies der info.vdr hinzuzufügen).

Beim Aufruf des Scripts möchte ich nicht den Ermittlernamen mit übergeben müssen. Es sollen einfach alle abgearbeitet werden. Im Laufe der letzten 37 Jahre Tatort sind ja über 60 verschiedene Ermittler am Werk gewesen. Ich weiß natürlich so nicht unbedingt, von welchen Ermittlern ich schon was aufgenommen habe.

Deshalb möchte ich beim Erstellen der Links auf meine erstellte tatort.db (Nummer Tab Titel Tab Ermittler) zugreifen (siehe Anhang).

Also schon so wie im ersten Post:

Zitat

das /video0/Tatort_chronologisch-Verzeichnis mit all seinen Unterverzeichnissen nach Tatort-Folgen durchsuchen. Für alle gefundenen Folgen dann in einer Datenbank (Text-Datei) für die Folge den Ermittler ermitteln und dann (wenn nicht vorhanden) ein Verzeichnis für den Ermittler anlegen und dann darin ein Symlink auf die Folge anlegen.

Dazu soll die Folge in der tatort.db anhand der Nummer gefunden werden, nicht nach dem Namen (ich geh davon aus, dass meine Nummerierung stimmt), denn bei manchen Titeln (wenn Sonderzeichen im Titel vorkommen) stimmt der Titel nicht immer 100% mit meiner Liste überein.

... Stunden später ...

Ich hab das jetzt mal in Perl gemacht. Musste mich erst mal ein bisschen die Syntax einlesen. Ist ja teilweise nicht so klar (wenn man keine Ahnung hat).

Rausgekommen ist das:

Perl

#!/usr/bin/perl 


use strict ;
use locale ;
use warnings ;
use File::Find ;


my $DIR_TATORT_CHRONOLOGISCH = "/video0/Tatort_chronologisch" ;
my $DIR_TATORT_ERMITTLER     = "/video0/Tatort_nach_Ermittler_(Symlinks)" ;
my @DB_Datei                 = "/usr/local/bin/tatort.db" ;
my $Nr  = 0 ;


# Aufnahme-Verzeichnis auslesen und in @Videolist speichern
my @VideoList ;
find ( \&funcfind , "$DIR_TATORT_CHRONOLOGISCH" )  ;


sub funcfind {
return unless ( $File::Find::name =~ /.*rec\/index.vdr?/ ) ;
push ( @VideoList , $File::Find::name ) ;
}


# für alle gefundenen Aufnahmen
foreach my $Zeile ( @VideoList ) {
	my @CurrFile = split ( "/" , $Zeile ) ;
	shift @CurrFile  ; # 1. Element wegschneiden, weil split ein erstest leeres Element liefert
	my $ODatumElement = $CurrFile[$#CurrFile -1] ;
	my $OFolge        = $CurrFile[$#CurrFile -2] ;
	my $OVerzeichnis  = $CurrFile[$#CurrFile -3] ;
	my $ONr = substr("$OFolge", 1, 3);  
        print "Folge='$OFolge' " ;


        # Datenbank öffnen
	open DB_DATEI , "@DB_Datei" or die "konnte @DB_Datei nicht öffnen" ;
	# Datenbank zeilenweise einlesen
		while ( my $EZeile = <DB_DATEI> ) {
			chomp $EZeile ;
			my ( $Nr , $Folge , $Ermittler ) = split ( "\t" ,  $EZeile ) ;#=~ /^(\d+\.\d+)\ (.*)$/ ;				
			# Wenn Ermittler gefunden 						
		  	if ($ONr eq $Nr) {
		    	print "---- Ermittler: '$Ermittler'\n" ;
		    	my $ErmittlerDIR = $DIR_TATORT_ERMITTLER."/".$Ermittler ;
	    		if (-d $ErmittlerDIR) {
#				print "'$ErmittlerDIR' ist vorhanden \n";
			        }
			else {
				mkdir($ErmittlerDIR,0777);
#			        print "\n'$ErmittlerDIR'-Verzeichnis erstellt\n";
                                }     

  			# Verzeichnis mit Folge anlegen
  			my $LVerzeichnis	= $ErmittlerDIR."/".$OFolge ;	
  			mkdir($LVerzeichnis,0777);

  			# Symlink erstellen
 			my $Symlink_Filename = $DIR_TATORT_CHRONOLOGISCH."/".$OVerzeichnis."/".$OFolge."/".$ODatumElement ;
 			my $Symlink_Link     = $DIR_TATORT_ERMITTLER."/".$Ermittler."/".$OFolge."/".$ODatumElement;
 			symlink ($Symlink_Filename,$Symlink_Link) ;					
		}
        }
 	close DB_DATEI ;	
}

Alles anzeigen

und es funktioniert. Ich bin begeistert. Mein erstes Perl-Script.
Viele Grüße
Steevee

[gelöst] Script "Tatort nach Ermittler"

Jetzt mitmachen!

Teilen

Benutzer online in diesem Thema