]> git.sesse.net Git - vlc/blobdiff - modules/access/directory.c
Qt: use %tmp%/$TMP folder for updates
[vlc] / modules / access / directory.c
index 63e4c84709f13c341d9ee6d80d1c6829741245e5..eff8d572c118285a5d9ea4c864040742cba9c78e 100644 (file)
 #endif
 
 #include <vlc_common.h>
-#include <vlc_plugin.h>
+#include "fs.h"
 #include <vlc_access.h>
 
-#ifdef HAVE_SYS_TYPES_H
-#   include <sys/types.h>
-#endif
+#include <sys/types.h>
 #ifdef HAVE_SYS_STAT_H
 #   include <sys/stat.h>
 #endif
 
 #ifdef HAVE_UNISTD_H
 #   include <unistd.h>
+#   include <fcntl.h>
 #elif defined( WIN32 ) && !defined( UNDER_CE )
 #   include <io.h>
-static inline int dirfd (void *dir)
-{
-    return -1;
-}
-#elif defined( UNDER_CE )
-#   define strcoll strcmp
 #endif
 
-#ifdef HAVE_DIRENT_H
-#   include <dirent.h>
-#endif
-
-#include <vlc_charset.h>
+#include <vlc_fs.h>
 #include <vlc_url.h>
-
-/*****************************************************************************
- * Module descriptor
- *****************************************************************************/
-static int  Open ( vlc_object_t * );
-static void Close( vlc_object_t * );
-
-#define RECURSIVE_TEXT N_("Subdirectory behavior")
-#define RECURSIVE_LONGTEXT N_( \
-        "Select whether subdirectories must be expanded.\n" \
-        "none: subdirectories do not appear in the playlist.\n" \
-        "collapse: subdirectories appear but are expanded on first play.\n" \
-        "expand: all subdirectories are expanded.\n" )
-
-static const char *const psz_recursive_list[] = { "none", "collapse", "expand" };
-static const char *const psz_recursive_list_text[] = {
-    N_("none"), N_("collapse"), N_("expand") };
-
-#define IGNORE_TEXT N_("Ignored extensions")
-#define IGNORE_LONGTEXT N_( \
-        "Files with these extensions will not be added to playlist when " \
-        "opening a directory.\n" \
-        "This is useful if you add directories that contain playlist files " \
-        "for instance. Use a comma-separated list of extensions." )
-
-vlc_module_begin();
-    set_category( CAT_INPUT );
-    set_shortname( N_("Directory" ) );
-    set_subcategory( SUBCAT_INPUT_ACCESS );
-    set_description( N_("Standard filesystem directory input") );
-    set_capability( "access", 55 );
-    add_shortcut( "directory" );
-    add_shortcut( "dir" );
-    add_shortcut( "file" );
-    add_string( "recursive", "expand" , NULL, RECURSIVE_TEXT,
-                RECURSIVE_LONGTEXT, false );
-      change_string_list( psz_recursive_list, psz_recursive_list_text, 0 );
-    add_string( "ignore-filetypes", "m3u,db,nfo,jpg,gif,sfv,txt,sub,idx,srt,cue",
-                NULL, IGNORE_TEXT, IGNORE_LONGTEXT, false );
-    set_callbacks( Open, Close );
-vlc_module_end();
-
-
-/*****************************************************************************
- * Local prototypes, constants, structures
- *****************************************************************************/
+#include <vlc_strings.h>
 
 enum
 {
-    MODE_EXPAND,
+    MODE_NONE,
     MODE_COLLAPSE,
-    MODE_NONE
+    MODE_EXPAND,
 };
 
 typedef struct directory_t directory_t;
@@ -119,48 +63,113 @@ struct directory_t
     directory_t *parent;
     DIR         *handle;
     char        *uri;
-    struct stat  st;
-    char         path[1];
+    char       **filev;
+    int          filec, i;
+#ifdef HAVE_OPENAT
+    dev_t        device;
+    ino_t        inode;
+#else
+    char         *path;
+#endif
 };
 
 struct access_sys_t
 {
     directory_t *current;
-    DIR *handle;
     char *ignored_exts;
-    int mode;
+    char mode;
+    bool header;
+    int i_item_count;
+    char *xspf_ext;
 };
 
-static block_t *Block( access_t * );
-static int Control( access_t *, int, va_list );
+/* Select non-hidden files only */
+static int visible (const char *name)
+{
+    return name[0] != '.';
+}
+
+static int collate (const char **a, const char **b)
+{
+#ifdef HAVE_STRCOLL
+    return strcoll (*a, *b);
+#else
+    return strcmp  (*a, *b);
+#endif
+}
 
 /*****************************************************************************
  * Open: open the directory
  *****************************************************************************/
-static int Open( vlc_object_t *p_this )
+int DirOpen( vlc_object_t *p_this )
 {
     access_t *p_access = (access_t*)p_this;
-    access_sys_t *p_sys;
 
-    if( !p_access->psz_path )
+    if( !p_access->psz_filepath )
         return VLC_EGENERIC;
 
-    DIR *handle = utf8_opendir (p_access->psz_path);
+    DIR *handle = vlc_opendir (p_access->psz_filepath);
     if (handle == NULL)
         return VLC_EGENERIC;
 
-    p_sys = malloc (sizeof (*p_sys));
-    if (!p_sys)
-        return VLC_ENOMEM;
+    return DirInit (p_access, handle);
+}
+
+int DirInit (access_t *p_access, DIR *handle)
+{
+    access_sys_t *p_sys = malloc (sizeof (*p_sys));
+    if (unlikely(p_sys == NULL))
+        goto error;
+
+    char *uri;
+    if (!strcmp (p_access->psz_access, "fd"))
+    {
+        if (asprintf (&uri, "fd://%s", p_access->psz_location) == -1)
+            uri = NULL;
+    }
+    else
+        uri = make_URI (p_access->psz_filepath, "file");
+    if (unlikely(uri == NULL))
+        goto error;
+
+    /* "Open" the base directory */
+    directory_t *root = malloc (sizeof (*root));
+    if (unlikely(root == NULL))
+    {
+        free (uri);
+        goto error;
+    }
+    root->parent = NULL;
+    root->handle = handle;
+    root->uri = uri;
+    root->filec = vlc_loaddir (handle, &root->filev, visible, collate);
+    if (root->filec < 0)
+        root->filev = NULL;
+    root->i = 0;
+#ifdef HAVE_OPENAT
+    struct stat st;
+    if (fstat (dirfd (handle), &st))
+    {
+        free (root);
+        free (uri);
+        goto error;
+    }
+    root->device = st.st_dev;
+    root->inode = st.st_ino;
+#else
+    root->path = strdup (p_access->psz_filepath);
+#endif
 
     p_access->p_sys = p_sys;
-    p_sys->current = NULL;
-    p_sys->handle = handle;
-    p_sys->ignored_exts = var_CreateGetString (p_access, "ignore-filetypes");
+    p_sys->current = root;
+    p_sys->ignored_exts = var_InheritString (p_access, "ignore-filetypes");
+    p_sys->header = true;
+    p_sys->i_item_count = 0;
+    p_sys->xspf_ext = strdup ("");
 
     /* Handle mode */
-    char *psz = var_CreateGetString( p_access, "recursive" );
-    if( *psz == '\0' || !strcasecmp( psz, "none" )  )
+    char *psz = var_InheritString (p_access, "recursive");
+    if (psz == NULL || !strcasecmp (psz, "none"))
         p_sys->mode = MODE_NONE;
     else if( !strcasecmp( psz, "collapse" )  )
         p_sys->mode = MODE_COLLAPSE;
@@ -168,20 +177,26 @@ static int Open( vlc_object_t *p_this )
         p_sys->mode = MODE_EXPAND;
     free( psz );
 
+    access_InitFields(p_access);
     p_access->pf_read  = NULL;
-    p_access->pf_block = Block;
+    p_access->pf_block = DirBlock;
     p_access->pf_seek  = NULL;
-    p_access->pf_control= Control;
+    p_access->pf_control= DirControl;
     free (p_access->psz_demux);
     p_access->psz_demux = strdup ("xspf-open");
 
     return VLC_SUCCESS;
+
+error:
+    closedir (handle);
+    free (p_sys);
+    return VLC_EGENERIC;
 }
 
 /*****************************************************************************
  * Close: close the target
  *****************************************************************************/
-static void Close( vlc_object_t * p_this )
+void DirClose( vlc_object_t * p_this )
 {
     access_t *p_access = (access_t*)p_this;
     access_sys_t *p_sys = p_access->p_sys;
@@ -193,48 +208,35 @@ static void Close( vlc_object_t * p_this )
         p_sys->current = current->parent;
         closedir (current->handle);
         free (current->uri);
+        while (current->i < current->filec)
+            free (current->filev[current->i++]);
+        free (current->filev);
+#ifndef HAVE_OPENAT
+        free (current->path);
+#endif
         free (current);
     }
-    if (p_sys->handle != NULL)
-        closedir (p_sys->handle); /* corner case,:Block() not called ever */
+
+    free (p_sys->xspf_ext);
     free (p_sys->ignored_exts);
     free (p_sys);
 }
 
-/**
- * URI-encodes a file path. The only reserved characters is slash.
- */
-static char *encode_path (const char *path)
-{
-    static const char sep[]= "%2F";
-    char *enc = encode_URI_component (path), *ptr = enc;
-
-    if (enc == NULL)
-        return NULL;
-
-    /* Replace '%2F' with '/'. TODO: extend encode_URI*() */
-    /* (On Windows, both ':' and '\\' will be encoded) */
-    while ((ptr = strstr (ptr, sep)) != NULL)
-    {
-        *ptr++ = '/';
-        memmove (ptr, ptr + 2, strlen (ptr) - 1);
-    }
-    return enc;
-}
-
+#ifdef HAVE_OPENAT
 /* Detect directories that recurse into themselves. */
-static bool has_inode_loop (const directory_t *dir)
+static bool has_inode_loop (const directory_t *dir, dev_t dev, ino_t inode)
 {
-    dev_t dev = dir->st.st_dev;
-    ino_t inode = dir->st.st_ino;
-
-    while ((dir = dir->parent) != NULL)
-        if ((dir->st.st_dev == dev) && (dir->st.st_ino == inode))
+    while (dir != NULL)
+    {
+        if ((dir->device == dev) && (dir->inode == inode))
             return true;
+        dir = dir->parent;
+    }
     return false;
 }
+#endif
 
-static block_t *Block (access_t *p_access)
+block_t *DirBlock (access_t *p_access)
 {
     access_sys_t *p_sys = p_access->p_sys;
     directory_t *current = p_sys->current;
@@ -242,100 +244,148 @@ static block_t *Block (access_t *p_access)
     if (p_access->info.b_eof)
         return NULL;
 
-    if (current == NULL)
+    if (p_sys->header)
     {   /* Startup: send the XSPF header */
         static const char header[] =
             "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
-            "<playlist version=\"1\" xmlns=\"http://xspf.org/ns/0/\">\n"
+            "<playlist version=\"1\" xmlns=\"http://xspf.org/ns/0/\" xmlns:vlc=\"http://www.videolan.org/vlc/playlist/ns/0/\">\n"
             " <trackList>\n";
         block_t *block = block_Alloc (sizeof (header) - 1);
         if (!block)
             goto fatal;
         memcpy (block->p_buffer, header, sizeof (header) - 1);
-
-        /* "Open" the base directory */
-        current = malloc (sizeof (*current) + strlen (p_access->psz_path));
-        if (current == NULL)
-        {
-            block_Release (block);
-            goto fatal;
-        }
-        current->parent = NULL;
-        current->handle = p_sys->handle;
-        strcpy (current->path, p_access->psz_path);
-        current->uri = encode_path (current->path);
-        if ((current->uri == NULL)
-         || fstat (dirfd (current->handle), &current->st))
-        {
-            free (current->uri);
-            free (current);
-            block_Release (block);
-            goto fatal;
-        }
-
-        p_sys->handle = NULL;
-        p_sys->current = current;
+        p_sys->header = false;
         return block;
     }
 
-    char *entry = utf8_readdir (current->handle);
-    if (entry == NULL)
+    if (current->i >= current->filec)
     {   /* End of directory, go back to parent */
         closedir (current->handle);
         p_sys->current = current->parent;
+        free (current->uri);
+        free (current->filev);
+#ifndef HAVE_OPENAT
+        free (current->path);
+#endif
         free (current);
 
         if (p_sys->current == NULL)
         {   /* End of XSPF playlist */
-            static const char footer[] =
-                " </trackList>\n"
-                "</playlist>\n";
-
-            block_t *block = block_Alloc (sizeof (footer) - 1);
-            if (!block)
+            char *footer;
+            int len = asprintf (&footer, " </trackList>\n"
+                " <extension application=\"http://www.videolan.org/"
+                                             "vlc/playlist/0\">\n"
+                "%s"
+                " </extension>\n"
+                "</playlist>\n", p_sys->xspf_ext ? p_sys->xspf_ext : "");
+            if (unlikely(len == -1))
                 goto fatal;
-            memcpy (block->p_buffer, footer, sizeof (footer) - 1);
+
+            block_t *block = block_heap_Alloc (footer, footer, len);
+            if (unlikely(block == NULL))
+                free (footer);
             p_access->info.b_eof = true;
             return block;
         }
+        else
+        {
+            /* This was the end of a "subnode" */
+            /* Write the ID to the extension */
+            char *old_xspf_ext = p_sys->xspf_ext;
+            if (old_xspf_ext != NULL
+             && asprintf (&p_sys->xspf_ext, "%s  </vlc:node>\n",
+                          old_xspf_ext ? old_xspf_ext : "") == -1)
+                p_sys->xspf_ext = NULL;
+            free (old_xspf_ext);
+        }
         return NULL;
     }
 
-    /* Skip current and parent directories */
-    if (!strcmp (entry, ".") || !strcmp (entry, ".."))
-        return NULL;
+    char *entry = current->filev[current->i++];
+
     /* Handle recursion */
     if (p_sys->mode != MODE_COLLAPSE)
     {
-        directory_t *sub = malloc (sizeof (*sub) + strlen (current->path) + 1
-                                                 + strlen (entry));
-        if (sub == NULL)
-            return NULL;
-        sprintf (sub->path, "%s/%s", current->path, entry);
-
-        DIR *handle = utf8_opendir (sub->path);
-        if (handle != NULL)
+        DIR *handle;
+#ifdef HAVE_OPENAT
+        int fd = vlc_openat (dirfd (current->handle), entry, O_RDONLY);
+        if (fd == -1)
+            goto skip; /* File cannot be opened... forget it */
+
+        struct stat st;
+        if (fstat (fd, &st))
         {
-            sub->parent = current;
-            sub->handle = handle;
-            sub->uri = encode_path (sub->path);
-
-            if ((p_sys->mode == MODE_NONE)
-             || fstat (dirfd (handle), &sub->st)
-             || has_inode_loop (sub)
-             || (sub->uri == NULL))
-            {
-                closedir (handle);
-                free (sub);
-                return NULL;
-            }
-            p_sys->current = sub;
-            return NULL;
+            close (fd);
+            goto skip; /* cannot stat?! */
         }
-        else
-            free (sub);
+        if (!S_ISDIR (st.st_mode))
+        {
+            close (fd);
+            goto notdir;
+        }
+        if (p_sys->mode == MODE_NONE
+         || has_inode_loop (current, st.st_dev, st.st_ino)
+         || (handle = fdopendir (fd)) == NULL)
+        {
+            close (fd);
+            goto skip;
+        }
+#else
+        char *path;
+        if (asprintf (&path, "%s/%s", current->path, entry) == -1)
+            goto skip;
+        if ((handle = vlc_opendir (path)) == NULL)
+            goto notdir;
+        if (p_sys->mode == MODE_NONE)
+            goto skip;
+#endif
+        directory_t *sub = malloc (sizeof (*sub));
+        if (unlikely(sub == NULL))
+        {
+            closedir (handle);
+#ifndef HAVE_OPENAT
+            free (path);
+#endif
+            goto skip;
+        }
+        sub->parent = current;
+        sub->handle = handle;
+        sub->filec = vlc_loaddir (handle, &sub->filev, visible, collate);
+        if (sub->filec < 0)
+            sub->filev = NULL;
+        sub->i = 0;
+#ifdef HAVE_OPENAT
+        sub->device = st.st_dev;
+        sub->inode = st.st_ino;
+#else
+        sub->path = path;
+#endif
+        p_sys->current = sub;
+
+        char *encoded = encode_URI_component (entry);
+        if (encoded == NULL
+         || (asprintf (&sub->uri, "%s/%s", current->uri, encoded) == -1))
+             sub->uri = NULL;
+        free (encoded);
+        if (unlikely(sub->uri == NULL))
+        {
+            free (entry);
+            goto fatal;
+        }
+
+        /* Add node to XSPF extension */
+        char *old_xspf_ext = p_sys->xspf_ext;
+        char *title = convert_xml_special_chars (entry);
+        if (old_xspf_ext != NULL && title != NULL
+         && asprintf (&p_sys->xspf_ext, "%s  <vlc:node title=\"%s\">\n",
+                      old_xspf_ext, title) == -1)
+            p_sys->xspf_ext = NULL;
+        free (old_xspf_ext);
+        free (title);
+        goto skip;
     }
 
+notdir:
     /* Skip files with ignored extensions */
     if (p_sys->ignored_exts != NULL)
     {
@@ -352,7 +402,13 @@ static block_t *Block (access_t *p_access)
 
                 if (type + extlen == end
                  && !strncasecmp (ext, type, extlen))
+                {
+                    free (entry);
                     return NULL;
+                }
+
+                if (*end == '\0')
+                    break;
             }
         }
     }
@@ -362,61 +418,62 @@ static block_t *Block (access_t *p_access)
     if (encoded == NULL)
         goto fatal;
     int len = asprintf (&entry,
-                        "  <track><location>file://%s/%s</location></track>\n",
-                        current->uri, encoded);
+                        "  <track><location>%s/%s</location>\n" \
+                        "   <extension application=\"http://www.videolan.org/vlc/playlist/0\">\n" \
+                        "    <vlc:id>%d</vlc:id>\n" \
+                        "   </extension>\n" \
+                        "  </track>\n",
+                        current->uri, encoded, p_sys->i_item_count++);
     free (encoded);
     if (len == -1)
         goto fatal;
 
-    /* TODO: new block allocator for malloc()ated data */
-    block_t *block = block_Alloc (len);
-    if (!block)
+    /* Write the ID to the extension */
+    char *old_xspf_ext = p_sys->xspf_ext;
+    if (old_xspf_ext != NULL
+     && asprintf (&p_sys->xspf_ext, "%s   <vlc:item tid=\"%i\" />\n",
+                  old_xspf_ext, p_sys->i_item_count - 1) == -1)
+        p_sys->xspf_ext = NULL;
+    free (old_xspf_ext);
+
+    block_t *block = block_heap_Alloc (entry, entry, len);
+    if (unlikely(block == NULL))
     {
         free (entry);
         goto fatal;
     }
-    memcpy (block->p_buffer, entry, len);
-    free (entry);
     return block;
 
 fatal:
     p_access->info.b_eof = true;
     return NULL;
+
+skip:
+    free (entry);
+    return NULL;
 }
 
 /*****************************************************************************
  * Control:
  *****************************************************************************/
-static int Control( access_t *p_access, int i_query, va_list args )
+int DirControl( access_t *p_access, int i_query, va_list args )
 {
-    bool   *pb_bool;
-    int          *pi_int;
-    int64_t      *pi_64;
-
     switch( i_query )
     {
         /* */
         case ACCESS_CAN_SEEK:
         case ACCESS_CAN_FASTSEEK:
-            pb_bool = (bool*)va_arg( args, bool* );
-            *pb_bool = false;
+            *va_arg( args, bool* ) = false;
             break;
 
         case ACCESS_CAN_PAUSE:
         case ACCESS_CAN_CONTROL_PACE:
-            pb_bool = (bool*)va_arg( args, bool* );
-            *pb_bool = true;
+            *va_arg( args, bool* ) = true;
             break;
 
         /* */
-        case ACCESS_GET_MTU:
-            pi_int = (int*)va_arg( args, int * );
-            *pi_int = 0;
-            break;
-
         case ACCESS_GET_PTS_DELAY:
-            pi_64 = (int64_t*)va_arg( args, int64_t * );
-            *pi_64 = DEFAULT_PTS_DELAY * 1000;
+            *va_arg( args, int64_t * ) = DEFAULT_PTS_DELAY * 1000;
             break;
 
         /* */