tagutils/tagutils-plist.c

   1 //=========================================================================
   2 // FILENAME     : playlist.c
   3 // DESCRIPTION  : Playlist
   4 //=========================================================================
   5 // Copyright (c) 2008- NETGEAR, Inc. All Rights Reserved.
   6 //=========================================================================
   7
   8 /*
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program. If not, see <http://www.gnu.org/licenses/>.
  21  */
  22
  23 #include <stdio.h>
  24 #include <string.h>
  25 #include <ctype.h>
  26
  27 #include "tagutils.h"
  28 #include "log.h"
  29
  30
  31 #define MAX_BUF 4096
  32
  33 static FILE *fp = 0;
  34 static int _utf8bom = 0;
  35 static int _trackno;
  36
  37 static int (*_next_track)(struct song_metadata*, struct stat*, char*, char*);
  38 static int _m3u_pls_next_track(struct song_metadata*, struct stat*, char*, char*);
  39
  40 int
  41 start_plist(const char *path, struct song_metadata *psong, struct stat *stat, char *lang, char *type)
  42 {
  43         char *fname, *suffix;
  44
  45         _next_track = 0;
  46         _utf8bom = 0;
  47         _trackno = 0;
  48
  49         if(strcasecmp(type, "m3u") == 0)
  50                 _next_track = _m3u_pls_next_track;
  51         else if(strcasecmp(type, "pls") == 0)
  52                 _next_track = _m3u_pls_next_track;
  53
  54         if(!_next_track)
  55         {
  56                 DPRINTF(E_ERROR, L_SCANNER, "Unsupported playlist type <%s> (%s)\n", type, path);
  57                 return -1;
  58         }
  59
  60         if(!(fp = fopen(path, "rb")))
  61         {
  62                 DPRINTF(E_ERROR, L_SCANNER, "Cannot open %s\n", path);
  63                 return -1;
  64         }
  65
  66         if(!psong)
  67                 return 0;
  68
  69         memset((void*)psong, 0, sizeof(struct song_metadata));
  70         psong->is_plist = 1;
  71         psong->path = strdup(path);
  72         psong->type = type;
  73
  74         fname = strrchr(psong->path, '/');
  75         psong->basename = fname ? fname + 1 : psong->path;
  76
  77         psong->title = strdup(psong->basename);
  78         suffix = strrchr(psong->title, '.');
  79         if(suffix) *suffix = '\0';
  80
  81         if(stat)
  82         {
  83                 if(!psong->time_modified)
  84                         psong->time_modified = stat->st_mtime;
  85                 psong->file_size = stat->st_size;
  86         }
  87
  88         return 0;
  89 }
  90
  91 int
  92 _m3u_pls_next_track(struct song_metadata *psong, struct stat *stat, char *lang, char *type)
  93 {
  94         char buf[MAX_BUF], *p;
  95         int len;
  96
  97         memset((void*)psong, 0, sizeof(struct song_metadata));
  98
  99         // read first line
 100         p = fgets(buf, MAX_BUF, fp);
 101         if(!p)
 102         {
 103                 fclose(fp);
 104                 return 1;
 105         }
 106
 107         if(strcasecmp(type, "m3u") == 0)
 108         {
 109                 // check BOM
 110                 if(!_utf8bom && p[0] == '\xef' && p[1] == '\xbb' && p[2] == '\xbf')
 111                 {
 112                         _utf8bom = 1;
 113                         p += 3;
 114                 }
 115         }
 116
 117         while(p)
 118         {
 119                 while(isspace(*p)) p++;
 120
 121                 if(!(*p) || *p == '#')
 122                         goto next_line;
 123
 124                 if(!isprint(*p))
 125                 {
 126                         DPRINTF(E_ERROR, L_SCANNER, "Playlist looks bad (unprintable characters)\n");
 127                         fclose(fp);
 128                         return 2;
 129                 }
 130
 131                 if(strcasecmp(type, "pls") == 0)
 132                 {
 133                         // verify that it's a valid pls playlist
 134                         if(!_trackno)
 135                         {
 136                                 if(strncmp(p, "[playlist]", 10))
 137                                         break;
 138                                 _trackno++;
 139                                 goto next_line;
 140                         }
 141
 142                         if(strncmp(p, "File", 4) != 0)
 143                                 goto next_line;
 144
 145                         psong->track = strtol(p+4, &p, 10);
 146                         if(!psong->track || !p++)
 147                                 goto next_line;
 148                         _trackno = psong->track;
 149                 }
 150                 else if(strcasecmp(type, "m3u") == 0)
 151                         psong->track = ++_trackno;
 152
 153                 len = strlen(p);
 154                 while(p[len-1] == '\r' || p[len-1] == '\n')
 155                         p[--len] = '\0';
 156                 psong->path = strdup(p);
 157                 return 0;
 158 next_line:
 159                 p = fgets(buf, MAX_BUF, fp);
 160         }
 161
 162         fclose(fp);
 163         return 1;
 164 }
 165
 166 int
 167 next_plist_track(struct song_metadata *psong, struct stat *stat, char *lang, char *type)
 168 {
 169         if(_next_track)
 170                 return _next_track(psong, stat, lang, type);
 171         return -1;
 172 }