chiark / gitweb /
run_directory: fix typo in "make install"
[elogind.git] / extras / name_cdrom.pl
index e522c9fda839e496a2a088d946a00a2a3da79bf4..5e696f33ae31bff2591c257d4f3d4940d5f9c6c8 100644 (file)
@@ -2,47 +2,31 @@
 
 # a horribly funny script that shows how flexible udev can really be
 # This is to be executed by udev with the following rules:
 
 # a horribly funny script that shows how flexible udev can really be
 # This is to be executed by udev with the following rules:
-# BUS="ide", PROGRAM="name_cdrom.pl %M %m", PROGRAM="good*", NAME="%2c", SYMLINK="cdrom"
-# BUS="scsi", PROGRAM="name_cdrom.pl %M %m", PROGRAM="good*", NAME="%2c", SYMLINK="cdrom"
 #
 #
-# The scsi rule catches USB cdroms and ide-scsi devices.
-#
-
-use CDDB_get qw( get_cddb );
+# KERNEL="hd*[!0-9]|sr*", PROGRAM="name_cdrom.pl $tempnode", SYMLINK+="%c"
 
 
-my %config;
+use strict;
+use warnings;
 
 
-$dev_node = "/tmp/cd_foo";
+use CDDB_get qw(get_cddb);
 
 # following variables just need to be declared if different from defaults
 
 # following variables just need to be declared if different from defaults
-$config{CDDB_HOST}="freedb.freedb.org";                # set cddb host
-$config{CDDB_PORT}=8880;                       # set cddb port
-$config{CDDB_MODE}="cddb";                     # set cddb mode: cddb or http
-$config{CD_DEVICE}="$dev_node";                        # set cd device
-
-# No user interaction, this is a automated script!
-$config{input}=0;
+my %config;
+$config{'CDDB_HOST'} = "freedb.freedb.org";    # set cddb host
+$config{'CDDB_PORT'} = 8880;                   # set cddb port
+$config{'CDDB_MODE'} = "cddb";                 # set cddb mode: cddb or http
+$config{'CD_DEVICE'} = $ARGV[0];               # set cd device
+$config{'input'} = 0;                          # no user interaction
 
 
-$major = $ARGV[0];
-$minor = $ARGV[1];
+my %cd = get_cddb(\%config);
 
 
-# create our temp device node to read the cd info from
-unlink($dev_node);
-if (system("mknod $dev_node b $major $minor")) {
-       die "bad mknod failed";
+if (!defined $cd{title}) {
+       exit 1;
 }
 
 }
 
-# get it on
-my %cd=get_cddb(\%config);
-
-# remove the dev node we just created
-unlink($dev_node);
+# print out our cd name
+$cd{artist} =~ s/ /_/g;
+$cd{title} =~ s/ /_/g;
+print "$cd{artist}-$cd{title}\n";
 
 
-# print out our cd name if we have found it
-unless(defined $cd{title}) {
-       print"bad unknown cdrom\n";
-} else {
-       $cd{artist} =~ s/ /_/g;
-       $cd{title} =~ s/ /_/g;
-       print "good $cd{artist}-$cd{title}\n";
-}
+exit 0;