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, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
22 */
23
24#include <stdio.h>
25#include <string.h>
26#include <ctype.h>
27
28#include "misc.h"
29#include "tagutils.h"
30#include "textutils.h"
31#include "log.h"
32
33
34#define MAX_BUF 4096
35
36static FILE *fp = 0;
37static int _utf8bom = 0;
38static int _trackno;
39
40static int (*_next_track)(struct song_metadata*, struct stat*, char*, char*);
41static int _m3u_next_track(struct song_metadata*, struct stat*, char*, char*);
42static int _pls_next_track(struct song_metadata*, struct stat*, char*, char*);
43
44int
45start_plist(const char *path, struct song_metadata *psong, struct stat *stat, char *lang, char *type)
46{
47	char *fname, *suffix;
48
49	_next_track = 0;
50	_utf8bom = 0;
51	_trackno = 0;
52
53	if(strcasecmp(type, "m3u") == 0)
54		_next_track = _m3u_next_track;
55	else if(strcasecmp(type, "pls") == 0)
56		_next_track = _pls_next_track;
57
58	if(!_next_track)
59	{
60		DPRINTF(E_ERROR, L_SCANNER, "Unsupported playlist type <%s> (%s)\n", type, path);
61		return -1;
62	}
63
64	if(!(fp = fopen(path, "rb")))
65	{
66		DPRINTF(E_ERROR, L_SCANNER, "Cannot open %s\n", path);
67		return -1;
68	}
69
70	if(!psong)
71		return 0;
72
73	memset((void*)psong, 0, sizeof(struct song_metadata));
74	psong->is_plist = 1;
75	psong->path = strdup(path);
76	psong->type = type;
77
78	fname = strrchr(psong->path, '/');
79	psong->basename = fname ? fname + 1 : psong->path;
80
81	psong->title = strdup(psong->basename);
82	suffix = strrchr(psong->title, '.');
83	if(suffix) *suffix = '\0';
84
85	if(stat)
86	{
87		if(!psong->time_modified)
88			psong->time_modified = stat->st_mtime;
89		psong->file_size = stat->st_size;
90	}
91
92	return 0;
93}
94
95int
96_m3u_next_track(struct song_metadata *psong, struct stat *stat, char *lang, char *type)
97{
98	char buf[MAX_BUF], *p;
99	int len;
100
101	//
102	memset((void*)psong, 0, sizeof(struct song_metadata));
103
104	// read first line, check BOM
105	p = fgets(buf, MAX_BUF, fp);
106	if(!p)
107	{
108		fclose(fp);
109		return 1;
110	}
111
112	if(!_utf8bom && p[0] == '\xef' && p[1] == '\xbb' && p[2] == '\xbf')
113	{
114		_utf8bom = 1;
115		p += 3;
116	}
117
118	while(p)
119	{
120		while(isspace(*p)) p++;
121
122		if(!isprint(*p))
123		{
124			DPRINTF(E_ERROR, L_SCANNER, "Playlist looks bad (unprintable characters)\n");
125			fclose(fp);
126			return 2;
127		}
128
129		if(*p && *p != '#')
130		{
131			// check dos format
132			len = strlen((char*)p);
133
134			while(p[len - 1] == '\r' || p[len - 1] == '\n')
135			{
136				p[--len] = '\0';
137			}
138			psong->path = strdup(p);
139			psong->track = ++_trackno;
140			return 0;
141		}
142		p = fgets(buf, MAX_BUF, fp);
143		continue;
144	}
145
146	fclose(fp);
147	return 1;
148}
149
150int
151_pls_next_track(struct song_metadata *psong, struct stat *stat, char *lang, char *type)
152{
153	char buf[MAX_BUF], *p;
154	int len;
155
156	memset((void*)psong, 0, sizeof(struct song_metadata));
157
158	// read first line
159	p = fgets(buf, MAX_BUF, fp);
160
161	while(p)
162	{
163		while(isspace(*p)) p++;
164
165		if(!isprint(*p))
166		{
167			DPRINTF(E_ERROR, L_SCANNER, "Playlist looks bad (unprintable characters)\n");
168			fclose(fp);
169			return 2;
170		}
171
172		if(*p && *p != '#')
173		{
174			// verify that it's a valid pls playlist
175			if(!_trackno)
176			{
177				if(strncmp(p, "[playlist]", 10))
178					break;
179				_trackno++;
180				goto next_line;
181			}
182
183			if(strncmp(p, "File", 4))
184				goto next_line;
185
186			psong->track = strtol(p+4, &p, 10);
187			if(!psong->track || !p)
188				goto next_line;
189			_trackno = psong->track;
190			// check dos format
191			len = strlen(++p);
192
193			while(p[len - 1] == '\r' || p[len - 1] == '\n')
194			{
195				p[--len] = '\0';
196			}
197			psong->path = strdup(p);
198			return 0;
199		}
200next_line:
201		p = fgets(buf, MAX_BUF, fp);
202	}
203
204	fclose(fp);
205	return 1;
206}
207
208int
209next_plist_track(struct song_metadata *psong, struct stat *stat, char *lang, char *type)
210{
211	if(_next_track)
212		return _next_track(psong, stat, lang, type);
213	return -1;
214}
215