Merge commit 'cb0244daaca83ab666798818f74f5181bf6bc387'
[ffmpeg.git] / libavutil / file.c
1 /*
2  * This file is part of FFmpeg.
3  *
4  * FFmpeg is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * FFmpeg is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with FFmpeg; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
17  */
18
19 #include "config.h"
20 #include "file.h"
21 #include "internal.h"
22 #include "log.h"
23 #include "mem.h"
24 #include <stdarg.h>
25 #include <fcntl.h>
26 #include <sys/stat.h>
27 #if HAVE_UNISTD_H
28 #include <unistd.h>
29 #endif
30 #if HAVE_IO_H
31 #include <io.h>
32 #endif
33 #if HAVE_MMAP
34 #include <sys/mman.h>
35 #elif HAVE_MAPVIEWOFFILE
36 #include <windows.h>
37 #endif
38
39 #if defined(_WIN32) && !defined(__MINGW32CE__)
40 #undef open
41 #undef lseek
42 #undef stat
43 #undef fstat
44 #include <windows.h>
45 #include <share.h>
46 #include <errno.h>
47
48 static int win32_open(const char *filename_utf8, int oflag, int pmode)
49 {
50     int fd;
51     int num_chars;
52     wchar_t *filename_w;
53
54     /* convert UTF-8 to wide chars */
55     num_chars = MultiByteToWideChar(CP_UTF8, MB_ERR_INVALID_CHARS, filename_utf8, -1, NULL, 0);
56     if (num_chars <= 0)
57         goto fallback;
58     filename_w = av_mallocz(sizeof(wchar_t) * num_chars);
59     if (!filename_w) {
60         errno = ENOMEM;
61         return -1;
62     }
63     MultiByteToWideChar(CP_UTF8, 0, filename_utf8, -1, filename_w, num_chars);
64
65     fd = _wsopen(filename_w, oflag, SH_DENYNO, pmode);
66     av_freep(&filename_w);
67
68     if (fd != -1 || (oflag & O_CREAT))
69         return fd;
70
71 fallback:
72     /* filename may be be in CP_ACP */
73     return _sopen(filename_utf8, oflag, SH_DENYNO, pmode);
74 }
75 #define open win32_open
76 #endif
77
78 int avpriv_open(const char *filename, int flags, ...)
79 {
80     int fd;
81     unsigned int mode = 0;
82     va_list ap;
83
84     va_start(ap, flags);
85     if (flags & O_CREAT)
86         mode = va_arg(ap, unsigned int);
87     va_end(ap);
88
89 #ifdef O_CLOEXEC
90     flags |= O_CLOEXEC;
91 #endif
92
93     fd = open(filename, flags, mode);
94 #if HAVE_FCNTL
95     if (fd != -1)
96         fcntl(fd, F_SETFD, FD_CLOEXEC);
97 #endif
98
99     return fd;
100 }
101
102 typedef struct {
103     const AVClass *class;
104     int   log_offset;
105     void *log_ctx;
106 } FileLogContext;
107
108 static const AVClass file_log_ctx_class = {
109     "FILE", av_default_item_name, NULL, LIBAVUTIL_VERSION_INT,
110     offsetof(FileLogContext, log_offset), offsetof(FileLogContext, log_ctx)
111 };
112
113 int av_file_map(const char *filename, uint8_t **bufptr, size_t *size,
114                 int log_offset, void *log_ctx)
115 {
116     FileLogContext file_log_ctx = { &file_log_ctx_class, log_offset, log_ctx };
117     int err, fd = avpriv_open(filename, O_RDONLY);
118     struct stat st;
119     av_unused void *ptr;
120     off_t off_size;
121     char errbuf[128];
122     *bufptr = NULL;
123
124     if (fd < 0) {
125         err = AVERROR(errno);
126         av_strerror(err, errbuf, sizeof(errbuf));
127         av_log(&file_log_ctx, AV_LOG_ERROR, "Cannot read file '%s': %s\n", filename, errbuf);
128         return err;
129     }
130
131     if (fstat(fd, &st) < 0) {
132         err = AVERROR(errno);
133         av_strerror(err, errbuf, sizeof(errbuf));
134         av_log(&file_log_ctx, AV_LOG_ERROR, "Error occurred in fstat(): %s\n", errbuf);
135         close(fd);
136         return err;
137     }
138
139     off_size = st.st_size;
140     if (off_size > SIZE_MAX) {
141         av_log(&file_log_ctx, AV_LOG_ERROR,
142                "File size for file '%s' is too big\n", filename);
143         close(fd);
144         return AVERROR(EINVAL);
145     }
146     *size = off_size;
147
148 #if HAVE_MMAP
149     ptr = mmap(NULL, *size, PROT_READ|PROT_WRITE, MAP_PRIVATE, fd, 0);
150     if (ptr == MAP_FAILED) {
151         err = AVERROR(errno);
152         av_strerror(err, errbuf, sizeof(errbuf));
153         av_log(&file_log_ctx, AV_LOG_ERROR, "Error occurred in mmap(): %s\n", errbuf);
154         close(fd);
155         return err;
156     }
157     *bufptr = ptr;
158 #elif HAVE_MAPVIEWOFFILE
159     {
160         HANDLE mh, fh = (HANDLE)_get_osfhandle(fd);
161
162         mh = CreateFileMapping(fh, NULL, PAGE_READONLY, 0, 0, NULL);
163         if (!mh) {
164             av_log(&file_log_ctx, AV_LOG_ERROR, "Error occurred in CreateFileMapping()\n");
165             close(fd);
166             return -1;
167         }
168
169         ptr = MapViewOfFile(mh, FILE_MAP_READ, 0, 0, *size);
170         CloseHandle(mh);
171         if (!ptr) {
172             av_log(&file_log_ctx, AV_LOG_ERROR, "Error occurred in MapViewOfFile()\n");
173             close(fd);
174             return -1;
175         }
176
177         *bufptr = ptr;
178     }
179 #else
180     *bufptr = av_malloc(*size);
181     if (!*bufptr) {
182         av_log(&file_log_ctx, AV_LOG_ERROR, "Memory allocation error occurred\n");
183         close(fd);
184         return AVERROR(ENOMEM);
185     }
186     read(fd, *bufptr, *size);
187 #endif
188
189     close(fd);
190     return 0;
191 }
192
193 void av_file_unmap(uint8_t *bufptr, size_t size)
194 {
195 #if HAVE_MMAP
196     munmap(bufptr, size);
197 #elif HAVE_MAPVIEWOFFILE
198     UnmapViewOfFile(bufptr);
199 #else
200     av_free(bufptr);
201 #endif
202 }
203
204 int av_tempfile(const char *prefix, char **filename, int log_offset, void *log_ctx) {
205     FileLogContext file_log_ctx = { &file_log_ctx_class, log_offset, log_ctx };
206     int fd=-1;
207 #if !HAVE_MKSTEMP
208     void *ptr= tempnam(NULL, prefix);
209     if(!ptr)
210         ptr= tempnam(".", prefix);
211     *filename = av_strdup(ptr);
212 #undef free
213     free(ptr);
214 #else
215     size_t len = strlen(prefix) + 12; /* room for "/tmp/" and "XXXXXX\0" */
216     *filename = av_malloc(len);
217 #endif
218     /* -----common section-----*/
219     if (*filename == NULL) {
220         av_log(&file_log_ctx, AV_LOG_ERROR, "ff_tempfile: Cannot allocate file name\n");
221         return AVERROR(ENOMEM);
222     }
223 #if !HAVE_MKSTEMP
224 #   ifndef O_BINARY
225 #       define O_BINARY 0
226 #   endif
227 #   ifndef O_EXCL
228 #       define O_EXCL 0
229 #   endif
230     fd = open(*filename, O_RDWR | O_BINARY | O_CREAT | O_EXCL, 0600);
231 #else
232     snprintf(*filename, len, "/tmp/%sXXXXXX", prefix);
233     fd = mkstemp(*filename);
234 #ifdef _WIN32
235     if (fd < 0) {
236         snprintf(*filename, len, "./%sXXXXXX", prefix);
237         fd = mkstemp(*filename);
238     }
239 #endif
240 #endif
241     /* -----common section-----*/
242     if (fd < 0) {
243         int err = AVERROR(errno);
244         av_log(&file_log_ctx, AV_LOG_ERROR, "ff_tempfile: Cannot open temporary file %s\n", *filename);
245         av_freep(filename);
246         return err;
247     }
248     return fd; /* success */
249 }
250
251 #ifdef TEST
252
253 #undef printf
254
255 int main(void)
256 {
257     uint8_t *buf;
258     size_t size;
259     if (av_file_map("file.c", &buf, &size, 0, NULL) < 0)
260         return 1;
261
262     buf[0] = 's';
263     printf("%s", buf);
264     av_file_unmap(buf, size);
265     return 0;
266 }
267 #endif
268