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
start_plist(const char * path,struct song_metadata * psong,struct stat * stat,char * lang,char * type)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
_m3u_pls_next_track(struct song_metadata * psong,struct stat * stat,char * lang,char * type)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
next_plist_track(struct song_metadata * psong,struct stat * stat,char * lang,char * type)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 }
173