Changeset 4e5ee08 for server/lib/gutenbach

Timestamp:

Aug 12, 2010, 9:27:43 PM (14 years ago)

Author:

Jessica B. Hamrick <jhamrick@…>

Branches:

master, debian, mac, no-cups

Children:

79fac02

Parents:

22be2fa

git-author:

Jessica B. Hamrick <jhamrick@…> (08/12/10 21:27:43)

git-committer:

Jessica B. Hamrick <jhamrick@…> (08/12/10 21:27:43)

Message:

Fix the gutenbach backend, such that it updates
/var/run/gutenbach/status with the currently playing song.
gutenbach-remctl needs this file to exist so that it can respond to
the status get command (and, thus, gutenbach-web needs it, since it
uses the command to display the current status).

File:

• server/lib/gutenbach (modified) (6 diffs)

server/lib/gutenbach

@@ -116 +116 @@
   print(ZEPH "Playback aborted.\n");
   close(ZEPH);
+
+  open(STATUS, ">", "/var/run/gutenbach/status");
+  print(STATUS, "");
+  close(STATUS);
   die;
 }
@@ -130 +134 @@
 my ($newpath);
 
+open(STATUS, ">", "/var/run/gutenbach/status");
+
 if ($magic) {
   # $magic means that Image::ExifTool was able to identify the type of file
   printf(ZEPHYR "%s file %s\n", $magic, $arguments{"job-title"});
+  printf(STATUS "%s file %s\n", $magic, $arguments{"job-title"});
   $status .= sprintf(" Filetype: %s.", $magic);
   $status .= sprintf(" Filename: %s.", $arguments{"job-title"});
@@ -138 +145 @@
   if (exists $fileinfo->{'Title'}) {
     printf(ZEPHYR "\@b{%s}\n", $fileinfo->{'Title'}) if exists $fileinfo->{'Title'};
+    #printf(STATUS "%s\n", $fileinfo->{'Title'}) if exists $fileinfo->{'Title'};
     $status .= sprintf(" Title: %s.", $fileinfo->{'Title'});
   }
@@ -143 +151 @@
     if (exists $fileinfo->{$key}) {
       printf(ZEPHYR "%s\n", $fileinfo->{$key}) if exists $fileinfo->{$key};
+      printf(STATUS "%s\n", $fileinfo->{$key}) if exists $fileinfo->{$key};
       $status .= sprintf(" %s: %s\n", $key, $fileinfo->{$key});
     }
@@ -200 +209 @@
 
 close(ZEPHYR);
+close(STATUS);
 print CUPS "NOTICE: $status\n";
 play_mplayer_audio($filepath, \%arguments);
@@ -329 +339 @@
       print ZEPHYR "Playback completed successfully.\n";
       close(ZEPHYR);
+      open(STATUS, ">", "/var/run/gutenbach/status");
+      print(STATUS, "");
+      close(STATUS);
     }
     close(MP3STATUS) || print ZEPHYR "mplayer exited $?\n";