Changeset b5d15a0

Timestamp:

Feb 26, 2009, 12:38:42 AM (16 years ago)

Author:

Edward Z. Yang <edwardzyang@…>

Branches:

master, debian, mac, no-cups, nodebathena, web

Children:

f014bc4

Parents:

3a900ef

git-author:

Edward Z. Yang <edwardzyang@…> (02/26/09 00:38:42)

git-committer:

Edward Z. Yang <edwardzyang@…> (02/26/09 00:38:42)

Message:

Implement status file for remctl.
Signed-off-by: Edward Z. Yang <edwardzyang@…>

File:

• gutenbach/debian/lib/sipbmp3-filter (modified) (5 diffs)

gutenbach/debian/lib/sipbmp3-filter

@@ -96 +96 @@
 print(ZEPHYR "$opts{'n'}\@$opts{'H'} is playing:\n");
 
+# For the Now Playing remctl command
+open(STATUS, '>', '/var/run/sipbmp3/status') or die("Can't open status file /var/run/sipbmp3/status");
+
 # So, the file we're currently processing is "-d/-e".
 
@@ -105 +108 @@
 if ($magic) {
     printf(ZEPHYR "%s file %s\n", $magic, $opts{'J'});
-    printf(ZEPHYR "\@b{%s}\n", $fileinfo->{'Title'}) if exists $fileinfo->{'Title'};
+    printf(STATUS "Filetype: %s\n", $magic);
+    printf(STATUS "Filename: %s\n", $opts{'J'});
+    if (exists $fileinfo->{'Title'}) {
+        printf(ZEPHYR "\@b{%s}\n", $fileinfo->{'Title'}) if exists $fileinfo->{'Title'};
+        printf(STATUS "Title: %s\n", $fileinfo->{'Title'});
+    }
     foreach my $key (qw/Artist Album AlbumArtist/) {
-        printf(ZEPHYR "%s\n", $fileinfo->{$key}) if exists $fileinfo->{$key};
+        if (exists $fileinfo->{$key}) {
+            printf(ZEPHYR "%s\n", $fileinfo->{$key}) if exists $fileinfo->{$key};
+            printf(STATUS "%s: %s\n", $key, $fileinfo->{$key});
+        }
     }
     my $tempdir = tempdir();
@@ -119 +130 @@
     print STDERR "Resolved external reference to $filepath\n";
     printf(ZEPHYR "%s\n", $filepath);
-    close(ZEPHYR);
+    printf(STATUS "External: %s\n", $filepath);
 }
 elsif (-T $filepath) {
     split_playlist($filepath, \%opts);
     close(ZEPHYR);
+    close(STATUS);
     exit 0;
 }
@@ -130 +142 @@
 #printf(ZEPHYR "Job priority %s\n", $opts{'C'}) if ($opts{'C'} && ($opts{'C'} ne 'A'));
 close(ZEPHYR);
+close(STATUS);
 play_mplayer_audio($filepath, \%opts);
 
@@ -246 +259 @@
         
         close(ZEPHYR);
+        open(STATUS, '>', '/var/run/sipbmp3/status');
+        close(STATUS);
     }
   else { # child