libavutil: Don't use fcntl if the function does not exist
[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 int avpriv_open(const char *filename, int flags, ...)
40 {
41     int fd;
42     unsigned int mode = 0;
43     va_list ap;
44
45     va_start(ap, flags);
46     if (flags & O_CREAT)
47         mode = va_arg(ap, unsigned int);
48     va_end(ap);
49
50 #ifdef O_CLOEXEC
51     flags |= O_CLOEXEC;
52 #endif
53
54     fd = open(filename, flags, mode);
55 #if HAVE_FCNTL
56     if (fd != -1)
57         fcntl(fd, F_SETFD, FD_CLOEXEC);
58 #endif
59
60     return fd;
61 }
62
63 typedef struct {
64     const AVClass *class;
65     int   log_offset;
66     void *log_ctx;
67 } FileLogContext;
68
69 static const AVClass file_log_ctx_class = {
70     "FILE", av_default_item_name, NULL, LIBAVUTIL_VERSION_INT,
71     offsetof(FileLogContext, log_offset), offsetof(FileLogContext, log_ctx)
72 };
73
74 int av_file_map(const char *filename, uint8_t **bufptr, size_t *size,
75                 int log_offset, void *log_ctx)
76 {
77     FileLogContext file_log_ctx = { &file_log_ctx_class, log_offset, log_ctx };
78     int err, fd = avpriv_open(filename, O_RDONLY);
79     struct stat st;
80     av_unused void *ptr;
81     off_t off_size;
82     char errbuf[128];
83     *bufptr = NULL;
84
85     if (fd < 0) {
86         err = AVERROR(errno);
87         av_strerror(err, errbuf, sizeof(errbuf));
88         av_log(&file_log_ctx, AV_LOG_ERROR, "Cannot read file '%s': %s\n", filename, errbuf);
89         return err;
90     }
91
92     if (fstat(fd, &st) < 0) {
93         err = AVERROR(errno);
94         av_strerror(err, errbuf, sizeof(errbuf));
95         av_log(&file_log_ctx, AV_LOG_ERROR, "Error occurred in fstat(): %s\n", errbuf);
96         close(fd);
97         return err;
98     }
99
100     off_size = st.st_size;
101     if (off_size > SIZE_MAX) {
102         av_log(&file_log_ctx, AV_LOG_ERROR,
103                "File size for file '%s' is too big\n", filename);
104         close(fd);
105         return AVERROR(EINVAL);
106     }
107     *size = off_size;
108
109 #if HAVE_MMAP
110     ptr = mmap(NULL, *size, PROT_READ|PROT_WRITE, MAP_PRIVATE, fd, 0);
111     if (ptr == MAP_FAILED) {
112         err = AVERROR(errno);
113         av_strerror(err, errbuf, sizeof(errbuf));
114         av_log(&file_log_ctx, AV_LOG_ERROR, "Error occurred in mmap(): %s\n", errbuf);
115         close(fd);
116         return err;
117     }
118     *bufptr = ptr;
119 #elif HAVE_MAPVIEWOFFILE
120     {
121         HANDLE mh, fh = (HANDLE)_get_osfhandle(fd);
122
123         mh = CreateFileMapping(fh, NULL, PAGE_READONLY, 0, 0, NULL);
124         if (!mh) {
125             av_log(&file_log_ctx, AV_LOG_ERROR, "Error occurred in CreateFileMapping()\n");
126             close(fd);
127             return -1;
128         }
129
130         ptr = MapViewOfFile(mh, FILE_MAP_READ, 0, 0, *size);
131         CloseHandle(mh);
132         if (!ptr) {
133             av_log(&file_log_ctx, AV_LOG_ERROR, "Error occurred in MapViewOfFile()\n");
134             close(fd);
135             return -1;
136         }
137
138         *bufptr = ptr;
139     }
140 #else
141     *bufptr = av_malloc(*size);
142     if (!*bufptr) {
143         av_log(&file_log_ctx, AV_LOG_ERROR, "Memory allocation error occurred\n");
144         close(fd);
145         return AVERROR(ENOMEM);
146     }
147     read(fd, *bufptr, *size);
148 #endif
149
150     close(fd);
151     return 0;
152 }
153
154 void av_file_unmap(uint8_t *bufptr, size_t size)
155 {
156 #if HAVE_MMAP
157     munmap(bufptr, size);
158 #elif HAVE_MAPVIEWOFFILE
159     UnmapViewOfFile(bufptr);
160 #else
161     av_free(bufptr);
162 #endif
163 }
164
165 int av_tempfile(const char *prefix, char **filename, int log_offset, void *log_ctx) {
166     FileLogContext file_log_ctx = { &file_log_ctx_class, log_offset, log_ctx };
167     int fd=-1;
168 #if !HAVE_MKSTEMP
169     void *ptr= tempnam(NULL, prefix);
170     if(!ptr)
171         ptr= tempnam(".", prefix);
172     *filename = av_strdup(ptr);
173 #undef free
174     free(ptr);
175 #else
176     size_t len = strlen(prefix) + 12; /* room for "/tmp/" and "XXXXXX\0" */
177     *filename = av_malloc(len);
178 #endif
179     /* -----common section-----*/
180     if (*filename == NULL) {
181         av_log(&file_log_ctx, AV_LOG_ERROR, "ff_tempfile: Cannot allocate file name\n");
182         return AVERROR(ENOMEM);
183     }
184 #if !HAVE_MKSTEMP
185 #   ifndef O_BINARY
186 #       define O_BINARY 0
187 #   endif
188 #   ifndef O_EXCL
189 #       define O_EXCL 0
190 #   endif
191     fd = open(*filename, O_RDWR | O_BINARY | O_CREAT | O_EXCL, 0600);
192 #else
193     snprintf(*filename, len, "/tmp/%sXXXXXX", prefix);
194     fd = mkstemp(*filename);
195 #ifdef _WIN32
196     if (fd < 0) {
197         snprintf(*filename, len, "./%sXXXXXX", prefix);
198         fd = mkstemp(*filename);
199     }
200 #endif
201 #endif
202     /* -----common section-----*/
203     if (fd < 0) {
204         int err = AVERROR(errno);
205         av_log(&file_log_ctx, AV_LOG_ERROR, "ff_tempfile: Cannot open temporary file %s\n", *filename);
206         av_freep(filename);
207         return err;
208     }
209     return fd; /* success */
210 }
211
212 #ifdef TEST
213
214 #undef printf
215
216 int main(void)
217 {
218     uint8_t *buf;
219     size_t size;
220     if (av_file_map("file.c", &buf, &size, 0, NULL) < 0)
221         return 1;
222
223     buf[0] = 's';
224     printf("%s", buf);
225     av_file_unmap(buf, size);
226     return 0;
227 }
228 #endif
229