From: greg@kroah.com <greg@kroah.com>
Date: Tue, 6 Jan 2004 09:11:53 +0000 (-0800)
Subject: [PATCH] add silly script that names cdrom drives based on the cd in them.
X-Git-Tag: 013~35
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a05b77509e6e3723f3e969eefd1c2a34bad79675;p=systemd

[PATCH] add silly script that names cdrom drives based on the cd in them.
---

diff --git a/extras/name_cdrom.pl b/extras/name_cdrom.pl
new file mode 100644
index 00000000..569b119b
--- /dev/null
+++ b/extras/name_cdrom.pl
@@ -0,0 +1,45 @@
+#!/usr/bin/perl
+
+# a horribly funny script that shows how flexible udev can really be
+# This is to be executed by udev with the following rules:
+# CALLOUT, BUS="ide", PROGRAM="name_cdrom.pl %M %m", ID="good*", NAME="%1c", SYMLINK="cdrom" 
+# CALLOUT, BUS="scsi", PROGRAM="name_cdrom.pl %M %m", ID="good*", NAME="%1c", SYMLINK="cdrom" 
+#
+# The scsi rule catches USB cdroms and ide-scsi devices.
+#
+
+use CDDB_get qw( get_cddb );
+
+my %config;
+
+$dev_node = "/tmp/cd_foo";
+
+# 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;
+
+$major = $ARGV[0];
+$minor = $ARGV[1];
+
+# create our temp device node to read the cd info from
+if (system("mknod $dev_node b $major $minor")) {
+       die "bad mknod failed";
+       }
+
+# get it on
+my %cd=get_cddb(\%config);
+
+# remove the dev node we just created
+unlink($dev_node);
+
+# print out our cd name if we have found it
+unless(defined $cd{title}) {
+	print"bad unknown cdrom\n";
+} else {
+	print "good $cd{artist}_$cd{title}\n";
+}