git.sesse.net Git - vlc/blob - src/win32/filesystem.c

   1 /*****************************************************************************
   2  * filesystem.c: Windows file system helpers
   3  *****************************************************************************
   4  * Copyright (C) 2005-2006 the VideoLAN team
   5  * Copyright © 2005-2008 Rémi Denis-Courmont
   6  *
   7  * Authors: Rémi Denis-Courmont <rem # videolan.org>
   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., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  22  *****************************************************************************/
  23
  24 /*****************************************************************************
  25  * Preamble
  26  *****************************************************************************/
  27 #ifdef HAVE_CONFIG_H
  28 # include "config.h"
  29 #endif
  30
  31 #include <vlc_common.h>
  32 #include <vlc_charset.h>
  33 #include <vlc_fs.h>
  34 #include "libvlc.h" /* vlc_mkdir */
  35
  36 #include <assert.h>
  37
  38 #include <stdio.h>
  39 #include <errno.h>
  40 #include <sys/types.h>
  41 #include <dirent.h>
  42 #include <sys/stat.h>
  43 #include <fcntl.h>
  44 #include <winsock2.h>
  45 #ifndef UNDER_CE
  46 # include <direct.h>
  47 #else
  48 # include <tchar.h>
  49 #endif
  50
  51 static int convert_path (const char *restrict path, wchar_t *restrict wpath)
  52 {
  53     if (!MultiByteToWideChar (CP_UTF8, 0, path, -1, wpath, MAX_PATH))
  54     {
  55         errno = ENOENT;
  56         return -1;
  57     }
  58     wpath[MAX_PATH] = L'\0';
  59     return 0;
  60 }
  61 #define CONVERT_PATH(path, wpath, err) \
  62   wchar_t wpath[MAX_PATH+1]; \
  63   if (convert_path (path, wpath)) \
  64       return (err)
  65
  66 int vlc_open (const char *filename, int flags, ...)
  67 {
  68     unsigned int mode = 0;
  69     va_list ap;
  70
  71     va_start (ap, flags);
  72     if (flags & O_CREAT)
  73         mode = va_arg (ap, unsigned int);
  74     va_end (ap);
  75
  76 #ifdef UNDER_CE
  77     /*_open translates to wchar internally on WinCE*/
  78     return _open (filename, flags, mode);
  79 #else
  80     /*
  81      * open() cannot open files with non-“ANSI” characters on Windows.
  82      * We use _wopen() instead. Same thing for mkdir() and stat().
  83      */
  84     CONVERT_PATH(filename, wpath, -1);
  85     return _wopen (wpath, flags, mode);
  86
  87 #endif
  88 }
  89
  90 int vlc_openat (int dir, const char *filename, int flags, ...)
  91 {
  92     (void) dir; (void) filename; (void) flags;
  93     errno = ENOSYS;
  94     return -1;
  95 }
  96
  97 int vlc_mkdir( const char *dirname, mode_t mode )
  98 {
  99 #if defined (UNDER_CE)
 100     (void) mode;
 101     /* mkdir converts internally to wchar */
 102     return _mkdir(dirname);
 103 #else
 104     (void) mode;
 105     CONVERT_PATH (dirname, wpath, -1);
 106     return _wmkdir (wpath);
 107
 108 #endif
 109 }
 110
 111 /* Under Windows, these wrappers return the list of drive letters
 112  * when called with an empty argument or just '\'. */
 113 typedef struct vlc_DIR
 114 {
 115     _WDIR *p_real_dir;
 116     int i_drives;
 117     bool b_insert_back;
 118 } vlc_DIR;
 119
 120
 121 DIR *vlc_opendir (const char *dirname)
 122 {
 123     CONVERT_PATH (dirname, wpath, NULL);
 124
 125     vlc_DIR *p_dir = malloc (sizeof (*p_dir));
 126     if (unlikely(p_dir == NULL))
 127         return NULL;
 128
 129     if (wpath == NULL || wpath[0] == '\0'
 130      || (wcscmp (wpath, L"\\") == 0))
 131     {
 132         /* Special mode to list drive letters */
 133         p_dir->p_real_dir = NULL;
 134 #ifdef UNDER_CE
 135         p_dir->i_drives = 1;
 136 #else
 137         p_dir->i_drives = GetLogicalDrives ();
 138 #endif
 139         return (void *)p_dir;
 140     }
 141
 142     _WDIR *p_real_dir = _wopendir (wpath);
 143     if (p_real_dir == NULL)
 144     {
 145         free (p_dir);
 146         return NULL;
 147     }
 148
 149     p_dir->p_real_dir = p_real_dir;
 150
 151     assert (wpath[0]); // wpath[1] is defined
 152     p_dir->b_insert_back = !wcscmp (wpath + 1, L":\\");
 153     return (void *)p_dir;
 154 }
 155
 156 char *vlc_readdir (DIR *dir)
 157 {
 158     vlc_DIR *p_dir = (vlc_DIR *)dir;
 159
 160     if (p_dir->p_real_dir == NULL)
 161     {
 162         /* Drive letters mode */
 163         DWORD drives = p_dir->i_drives;
 164         if (drives == 0)
 165             return NULL; /* end */
 166 #ifdef UNDER_CE
 167         p_dir->i_drives = 0;
 168         return strdup ("\\");
 169 #else
 170         unsigned int i;
 171         for (i = 0; !(drives & 1); i++)
 172             drives >>= 1;
 173         p_dir->i_drives &= ~(1UL << i);
 174         assert (i < 26);
 175
 176         char *ret;
 177         if (asprintf (&ret, "%c:\\", 'A' + i) == -1)
 178             return NULL;
 179         return ret;
 180 #endif
 181     }
 182
 183     if (p_dir->b_insert_back)
 184     {
 185         /* Adds "..", gruik! */
 186         p_dir->b_insert_back = false;
 187         return strdup ("..");
 188     }
 189
 190     struct _wdirent *ent = _wreaddir (p_dir->p_real_dir);
 191     if (ent == NULL)
 192         return NULL;
 193     return FromWide (ent->d_name);
 194 }
 195
 196 int vlc_stat (const char *filename, struct stat *buf)
 197 {
 198 #ifdef UNDER_CE
 199     /* _stat translates to wchar internally on WinCE */
 200     return _stat (filename, buf);
 201 #else
 202     CONVERT_PATH (filename, wpath, -1);
 203     return _wstati64 (wpath, buf);
 204 #endif
 205 }
 206
 207 int vlc_lstat (const char *filename, struct stat *buf)
 208 {
 209     return vlc_stat (filename, buf);
 210 }
 211
 212 int vlc_unlink (const char *filename)
 213 {
 214 #ifdef UNDER_CE
 215     /*_open translates to wchar internally on WinCE*/
 216     return _unlink( filename );
 217 #else
 218     CONVERT_PATH (filename, wpath, -1);
 219     return _wunlink (wpath);
 220 #endif
 221 }
 222
 223 int vlc_rename (const char *oldpath, const char *newpath)
 224 {
 225     CONVERT_PATH (oldpath, wold, -1);
 226     CONVERT_PATH (newpath, wnew, -1);
 227 # ifdef UNDER_CE
 228     /* FIXME: errno support */
 229     return MoveFileW (wold, wnew) ? 0 : -1;
 230 #else
 231     if (_wrename (wold, wnew) && errno == EACCES)
 232     {   /* Windows does not allow atomic file replacement */
 233         if (_wremove (wnew))
 234         {
 235             errno = EACCES; /* restore errno */
 236             return -1;
 237         }
 238         if (_wrename (wold, wnew))
 239             return -1;
 240     }
 241     return 0;
 242 #endif
 243 }
 244
 245 int vlc_dup (int oldfd)
 246 {
 247 #ifdef UNDER_CE
 248     (void) oldfd;
 249     errno = ENOSYS;
 250     return -1;
 251 #else
 252     return dup (oldfd);
 253 #endif
 254 }
 255
 256 #include <vlc_network.h>
 257
 258 int vlc_socket (int pf, int type, int proto, bool nonblock)
 259 {
 260     int fd = socket (pf, type, proto);
 261     if (fd == -1)
 262         return -1;
 263
 264     if (nonblock)
 265         ioctlsocket (fd, FIONBIO, &(unsigned long){ 1 });
 266     return fd;
 267 }
 268
 269 int vlc_accept (int lfd, struct sockaddr *addr, socklen_t *alen, bool nonblock)
 270 {
 271     int fd = accept (lfd, addr, alen);
 272     if (fd != -1 && nonblock)
 273         ioctlsocket (fd, FIONBIO, &(unsigned long){ 1 });
 274     return fd;
 275 }