herrie/src/vfs_playlist.c

   1 /*
   2  * Copyright (c) 2006-2011 Ed Schouten <ed@80386.nl>
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  */
  26 /**
  27  * @file vfs_playlist.c
  28  * @brief M3U and PLS playlist file access.
  29  */
  30
  31 #include "stdinc.h"
  32
  33 #include "vfs.h"
  34 #include "vfs_modules.h"
  35
  36 /**
  37  * @brief Open a VFS entry by relative Win32 pathname and add it to the
  38  *        tail of the current entry.
  39  */
  40 static void
  41 vfs_playlist_add_tail(struct vfsent *ve, char *fn, char *title, char *dirname)
  42 {
  43         struct vfsref *nvr;
  44
  45 #if G_DIR_SEPARATOR != '\\'
  46         /* Convert to proper separator */
  47         g_strdelimit(fn, "\\", G_DIR_SEPARATOR);
  48 #endif
  49         nvr = vfs_lookup(fn, title, dirname, 0);
  50
  51         if (nvr != NULL)
  52                 vfs_list_insert_tail(&ve->population, nvr);
  53 }
  54
  55 /*
  56  * PLS interface
  57  */
  58
  59 int
  60 vfs_pls_match(struct vfsent *ve, int isdir)
  61 {
  62         /* In order to speed up the process, we only match *.pls */
  63         if (isdir || !g_str_has_suffix(ve->name, ".pls"))
  64                 return (-1);
  65
  66         ve->recurse = 0;
  67         return (0);
  68 }
  69
  70 int
  71 vfs_pls_populate(struct vfsent *ve)
  72 {
  73         FILE *fio;
  74         char fbuf[1024];
  75         char *ch, *dn, **out;
  76         int idxoff, nidx;
  77
  78         /* Current item */
  79         int idx = -1;
  80         char *fn = NULL;
  81         char *title = NULL;
  82
  83         if ((fio = fopen(ve->filename, "r")) == NULL)
  84                 return (-1);
  85         dn = g_path_get_dirname(ve->filename);
  86
  87         while (vfs_fgets(fbuf, sizeof fbuf, fio) == 0) {
  88                 if (strncmp(fbuf, "File", 4) == 0) {
  89                         /* Filename */
  90                         out = &fn;
  91                         idxoff = 4;
  92                 } else if (strncmp(fbuf, "Title", 5) == 0) {
  93                         /* Song title */
  94                         out = &title;
  95                         idxoff = 5;
  96                 } else {
  97                         continue;
  98                 }
  99
 100                 /* Parse the index number */
 101                 if ((nidx = atoi(fbuf + idxoff)) == 0)
 102                         continue;
 103
 104                 /* See if we have a value */
 105                 ch = strchr(fbuf + idxoff, '=');
 106                 if ((ch == NULL) || (ch[1] == '\0'))
 107                         continue;
 108
 109                 if (nidx != idx) {
 110                         /* We've arrived at the next entry */
 111                         if (fn != NULL)
 112                                 vfs_playlist_add_tail(ve, fn, title, dn);
 113
 114                         g_free(fn); fn = NULL;
 115                         g_free(title); title = NULL;
 116                         idx = nidx;
 117                 }
 118
 119                 /* Copy the new value */
 120                 g_free(*out);
 121                 *out = g_strdup(ch + 1);
 122         }
 123
 124         /* Don't forget our trailing entry */
 125         if (fn != NULL)
 126                 vfs_playlist_add_tail(ve, fn, title, dn);
 127
 128         g_free(fn);
 129         g_free(title);
 130
 131         fclose(fio);
 132         g_free(dn);
 133
 134         return (0);
 135 }
 136
 137 int
 138 vfs_pls_write(const struct vfslist *vl, const char *filename)
 139 {
 140         const char *base = NULL;
 141         size_t cmplen;
 142         FILE *fio;
 143         struct vfsref *vr;
 144         unsigned int idx = 1;
 145
 146         fio = fopen(filename, "w");
 147         if (fio == NULL)
 148                 return (-1);
 149
 150         /* Directory name length of .pls filename */
 151         base = strrchr(filename, G_DIR_SEPARATOR);
 152         g_assert(base != NULL);
 153         cmplen = base - filename + 1;
 154
 155         fprintf(fio, "[playlist]\nNumberOfEntries=%u\n",
 156             vfs_list_items(vl));
 157         VFS_LIST_FOREACH(vl, vr) {
 158                 /* Skip directory name when relative is possible */
 159                 base = vfs_filename(vr);
 160                 if (strncmp(filename, base, cmplen) == 0)
 161                         base += cmplen;
 162
 163                 fprintf(fio, "File%u=%s\nTitle%u=%s\n",
 164                     idx, base,
 165                     idx, vfs_name(vr));
 166                 idx++;
 167         }
 168         fclose(fio);
 169
 170         return (0);
 171 }
 172
 173 /*
 174  * M3U interface
 175  */
 176
 177 int
 178 vfs_m3u_match(struct vfsent *ve, int isdir)
 179 {
 180         /* In order to speed up the process, we only match *.m3u */
 181         if (isdir || !g_str_has_suffix(ve->name, ".m3u"))
 182                 return (-1);
 183
 184         ve->recurse = 0;
 185         return (0);
 186 }
 187
 188 int
 189 vfs_m3u_populate(struct vfsent *ve)
 190 {
 191         FILE *fio;
 192         char fbuf[1024];
 193         char *ch, *dn;
 194         char *title = NULL;
 195
 196         if ((fio = fopen(ve->filename, "r")) == NULL)
 197                 return (-1);
 198         dn = g_path_get_dirname(ve->filename);
 199
 200         while (vfs_fgets(fbuf, sizeof fbuf, fio) == 0) {
 201                 if (fbuf[0] == '#') {
 202                         /* Only EXTINF is supported */
 203                         if (strncmp(fbuf, "#EXTINF:", 8) == 0) {
 204                                 /* Consolidate double lines */
 205                                 g_free(title); title = NULL;
 206
 207                                 /* Remove the duration in seconds */
 208                                 if (((ch = strchr(fbuf + 8, ',')) != NULL)
 209                                     && (ch[1] != '\0'))
 210                                         title = g_strdup(ch + 1);
 211                         }
 212                 } else if (fbuf[0] != '\0') {
 213                         vfs_playlist_add_tail(ve, fbuf, title, dn);
 214                         g_free(title); title = NULL;
 215                 }
 216         }
 217
 218         /* Trailing EXTINF */
 219         g_free(title);
 220
 221         fclose(fio);
 222         g_free(dn);
 223
 224         return (0);
 225 }
 226
 227 int
 228 vfs_m3u_write(const struct vfslist *vl, const char *filename)
 229 {
 230         const char *base = NULL;
 231         size_t cmplen;
 232         FILE *fio;
 233         struct vfsref *vr;
 234
 235         fio = fopen(filename, "w");
 236         if (fio == NULL)
 237                 return (-1);
 238
 239         /* Directory name length of .meu filename */
 240         base = strrchr(filename, G_DIR_SEPARATOR);
 241         g_assert(base != NULL);
 242         cmplen = base - filename + 1;
 243
 244         fprintf(fio, "#EXTM3U\n");
 245         VFS_LIST_FOREACH(vl, vr) {
 246                 /* Skip directory name when relative is possible */
 247                 base = vfs_filename(vr);
 248                 if (strncmp(filename, base, cmplen) == 0)
 249                         base += cmplen;
 250
 251                 fprintf(fio, "#EXTINF:-1,%s\n%s\n", vfs_name(vr), base);
 252         }
 253         fclose(fio);
 254
 255         return (0);
 256 }