uml: tidy kern_util.h
[linux-2.6] / arch / um / os-Linux / file.c
1 /*
2  * Copyright (C) 2002 Jeff Dike (jdike@karaya.com)
3  * Licensed under the GPL
4  */
5
6 #include <stdio.h>
7 #include <unistd.h>
8 #include <errno.h>
9 #include <fcntl.h>
10 #include <signal.h>
11 #include <sys/types.h>
12 #include <sys/stat.h>
13 #include <sys/socket.h>
14 #include <sys/un.h>
15 #include <sys/ioctl.h>
16 #include <sys/mount.h>
17 #include <sys/uio.h>
18 #include "os.h"
19 #include "user.h"
20
21 static void copy_stat(struct uml_stat *dst, const struct stat64 *src)
22 {
23         *dst = ((struct uml_stat) {
24                 .ust_dev     = src->st_dev,     /* device */
25                 .ust_ino     = src->st_ino,     /* inode */
26                 .ust_mode    = src->st_mode,    /* protection */
27                 .ust_nlink   = src->st_nlink,   /* number of hard links */
28                 .ust_uid     = src->st_uid,     /* user ID of owner */
29                 .ust_gid     = src->st_gid,     /* group ID of owner */
30                 .ust_size    = src->st_size,    /* total size, in bytes */
31                 .ust_blksize = src->st_blksize, /* blocksize for filesys I/O */
32                 .ust_blocks  = src->st_blocks,  /* number of blocks allocated */
33                 .ust_atime   = src->st_atime,   /* time of last access */
34                 .ust_mtime   = src->st_mtime,   /* time of last modification */
35                 .ust_ctime   = src->st_ctime,   /* time of last change */
36         });
37 }
38
39 int os_stat_fd(const int fd, struct uml_stat *ubuf)
40 {
41         struct stat64 sbuf;
42         int err;
43
44         CATCH_EINTR(err = fstat64(fd, &sbuf));
45         if(err < 0)
46                 return -errno;
47
48         if(ubuf != NULL)
49                 copy_stat(ubuf, &sbuf);
50         return err;
51 }
52
53 int os_stat_file(const char *file_name, struct uml_stat *ubuf)
54 {
55         struct stat64 sbuf;
56         int err;
57
58         do {
59                 err = stat64(file_name, &sbuf);
60         } while((err < 0) && (errno == EINTR)) ;
61
62         if(err < 0)
63                 return -errno;
64
65         if(ubuf != NULL)
66                 copy_stat(ubuf, &sbuf);
67         return err;
68 }
69
70 int os_access(const char* file, int mode)
71 {
72         int amode, err;
73
74         amode=(mode&OS_ACC_R_OK ? R_OK : 0) | (mode&OS_ACC_W_OK ? W_OK : 0) |
75               (mode&OS_ACC_X_OK ? X_OK : 0) | (mode&OS_ACC_F_OK ? F_OK : 0) ;
76
77         err = access(file, amode);
78         if(err < 0)
79                 return -errno;
80
81         return 0;
82 }
83
84 /* FIXME? required only by hostaudio (because it passes ioctls verbatim) */
85 int os_ioctl_generic(int fd, unsigned int cmd, unsigned long arg)
86 {
87         int err;
88
89         err = ioctl(fd, cmd, arg);
90         if(err < 0)
91                 return -errno;
92
93         return err;
94 }
95
96 /* FIXME: ensure namebuf in os_get_if_name is big enough */
97 int os_get_ifname(int fd, char* namebuf)
98 {
99         if(ioctl(fd, SIOCGIFNAME, namebuf) < 0)
100                 return -errno;
101
102         return 0;
103 }
104
105 int os_set_slip(int fd)
106 {
107         int disc, sencap;
108
109         disc = N_SLIP;
110         if(ioctl(fd, TIOCSETD, &disc) < 0)
111                 return -errno;
112
113         sencap = 0;
114         if(ioctl(fd, SIOCSIFENCAP, &sencap) < 0)
115                 return -errno;
116
117         return 0;
118 }
119
120 int os_set_owner(int fd, int pid)
121 {
122         if(fcntl(fd, F_SETOWN, pid) < 0){
123                 int save_errno = errno;
124
125                 if(fcntl(fd, F_GETOWN, 0) != pid)
126                         return -save_errno;
127         }
128
129         return 0;
130 }
131
132 int os_mode_fd(int fd, int mode)
133 {
134         int err;
135
136         do {
137                 err = fchmod(fd, mode);
138         } while((err < 0) && (errno==EINTR)) ;
139
140         if(err < 0)
141                 return -errno;
142
143         return 0;
144 }
145
146 int os_file_type(char *file)
147 {
148         struct uml_stat buf;
149         int err;
150
151         err = os_stat_file(file, &buf);
152         if(err < 0)
153                 return err;
154
155         if(S_ISDIR(buf.ust_mode))
156                 return OS_TYPE_DIR;
157         else if(S_ISLNK(buf.ust_mode))
158                 return OS_TYPE_SYMLINK;
159         else if(S_ISCHR(buf.ust_mode))
160                 return OS_TYPE_CHARDEV;
161         else if(S_ISBLK(buf.ust_mode))
162                 return OS_TYPE_BLOCKDEV;
163         else if(S_ISFIFO(buf.ust_mode))
164                 return OS_TYPE_FIFO;
165         else if(S_ISSOCK(buf.ust_mode))
166                 return OS_TYPE_SOCK;
167         else return OS_TYPE_FILE;
168 }
169
170 int os_file_mode(const char *file, struct openflags *mode_out)
171 {
172         int err;
173
174         *mode_out = OPENFLAGS();
175
176         err = access(file, W_OK);
177         if(err && (errno != EACCES))
178                 return -errno;
179         else if(!err)
180                 *mode_out = of_write(*mode_out);
181
182         err = access(file, R_OK);
183         if(err && (errno != EACCES))
184                 return -errno;
185         else if(!err)
186                 *mode_out = of_read(*mode_out);
187
188         return err;
189 }
190
191 int os_open_file(const char *file, struct openflags flags, int mode)
192 {
193         int fd, err, f = 0;
194
195         if(flags.r && flags.w) f = O_RDWR;
196         else if(flags.r) f = O_RDONLY;
197         else if(flags.w) f = O_WRONLY;
198         else f = 0;
199
200         if(flags.s) f |= O_SYNC;
201         if(flags.c) f |= O_CREAT;
202         if(flags.t) f |= O_TRUNC;
203         if(flags.e) f |= O_EXCL;
204
205         fd = open64(file, f, mode);
206         if(fd < 0)
207                 return -errno;
208
209         if(flags.cl && fcntl(fd, F_SETFD, 1)){
210                 err = -errno;
211                 close(fd);
212                 return err;
213         }
214
215         return fd;
216 }
217
218 int os_connect_socket(const char *name)
219 {
220         struct sockaddr_un sock;
221         int fd, err;
222
223         sock.sun_family = AF_UNIX;
224         snprintf(sock.sun_path, sizeof(sock.sun_path), "%s", name);
225
226         fd = socket(AF_UNIX, SOCK_STREAM, 0);
227         if(fd < 0) {
228                 err = -errno;
229                 goto out;
230         }
231
232         err = connect(fd, (struct sockaddr *) &sock, sizeof(sock));
233         if(err) {
234                 err = -errno;
235                 goto out_close;
236         }
237
238         return fd;
239
240 out_close:
241         close(fd);
242 out:
243         return err;
244 }
245
246 void os_close_file(int fd)
247 {
248         close(fd);
249 }
250
251 int os_seek_file(int fd, unsigned long long offset)
252 {
253         unsigned long long actual;
254
255         actual = lseek64(fd, offset, SEEK_SET);
256         if(actual != offset)
257                 return -errno;
258         return 0;
259 }
260
261 int os_read_file(int fd, void *buf, int len)
262 {
263         int n = read(fd, buf, len);
264
265         if(n < 0)
266                 return -errno;
267         return n;
268 }
269
270 int os_write_file(int fd, const void *buf, int len)
271 {
272         int n = write(fd, (void *) buf, len);
273
274         if(n < 0)
275                 return -errno;
276         return n;
277 }
278
279 int os_file_size(const char *file, unsigned long long *size_out)
280 {
281         struct uml_stat buf;
282         int err;
283
284         err = os_stat_file(file, &buf);
285         if(err < 0){
286                 printk("Couldn't stat \"%s\" : err = %d\n", file, -err);
287                 return err;
288         }
289
290         if(S_ISBLK(buf.ust_mode)){
291                 int fd;
292                 long blocks;
293
294                 fd = open(file, O_RDONLY, 0);
295                 if(fd < 0) {
296                         err = -errno;
297                         printk("Couldn't open \"%s\", errno = %d\n", file,
298                                errno);
299                         return err;
300                 }
301                 if(ioctl(fd, BLKGETSIZE, &blocks) < 0){
302                         err = -errno;
303                         printk("Couldn't get the block size of \"%s\", "
304                                "errno = %d\n", file, errno);
305                         close(fd);
306                         return err;
307                 }
308                 *size_out = ((long long) blocks) * 512;
309                 close(fd);
310         }
311         else *size_out = buf.ust_size;
312
313         return 0;
314 }
315
316 int os_file_modtime(const char *file, unsigned long *modtime)
317 {
318         struct uml_stat buf;
319         int err;
320
321         err = os_stat_file(file, &buf);
322         if(err < 0){
323                 printk("Couldn't stat \"%s\" : err = %d\n", file, -err);
324                 return err;
325         }
326
327         *modtime = buf.ust_mtime;
328         return 0;
329 }
330
331 int os_get_exec_close(int fd, int *close_on_exec)
332 {
333         int ret;
334
335         CATCH_EINTR(ret = fcntl(fd, F_GETFD));
336
337         if(ret < 0)
338                 return -errno;
339
340         *close_on_exec = (ret & FD_CLOEXEC) ? 1 : 0;
341         return ret;
342 }
343
344 int os_set_exec_close(int fd)
345 {
346         int err;
347
348         CATCH_EINTR(err = fcntl(fd, F_SETFD, FD_CLOEXEC));
349
350         if(err < 0)
351                 return -errno;
352         return err;
353 }
354
355 int os_pipe(int *fds, int stream, int close_on_exec)
356 {
357         int err, type = stream ? SOCK_STREAM : SOCK_DGRAM;
358
359         err = socketpair(AF_UNIX, type, 0, fds);
360         if(err < 0)
361                 return -errno;
362
363         if(!close_on_exec)
364                 return 0;
365
366         err = os_set_exec_close(fds[0]);
367         if(err < 0)
368                 goto error;
369
370         err = os_set_exec_close(fds[1]);
371         if(err < 0)
372                 goto error;
373
374         return 0;
375
376  error:
377         printk("os_pipe : Setting FD_CLOEXEC failed, err = %d\n", -err);
378         close(fds[1]);
379         close(fds[0]);
380         return err;
381 }
382
383 int os_set_fd_async(int fd, int owner)
384 {
385         int err;
386
387         /* XXX This should do F_GETFL first */
388         if(fcntl(fd, F_SETFL, O_ASYNC | O_NONBLOCK) < 0){
389                 err = -errno;
390                 printk("os_set_fd_async : failed to set O_ASYNC and "
391                        "O_NONBLOCK on fd # %d, errno = %d\n", fd, errno);
392                 return err;
393         }
394 #ifdef notdef
395         if(fcntl(fd, F_SETFD, 1) < 0){
396                 printk("os_set_fd_async : Setting FD_CLOEXEC failed, "
397                        "errno = %d\n", errno);
398         }
399 #endif
400
401         if((fcntl(fd, F_SETSIG, SIGIO) < 0) ||
402            (fcntl(fd, F_SETOWN, owner) < 0)){
403                 err = -errno;
404                 printk("os_set_fd_async : Failed to fcntl F_SETOWN "
405                        "(or F_SETSIG) fd %d to pid %d, errno = %d\n", fd,
406                        owner, errno);
407                 return err;
408         }
409
410         return 0;
411 }
412
413 int os_clear_fd_async(int fd)
414 {
415         int flags = fcntl(fd, F_GETFL);
416
417         flags &= ~(O_ASYNC | O_NONBLOCK);
418         if(fcntl(fd, F_SETFL, flags) < 0)
419                 return -errno;
420         return 0;
421 }
422
423 int os_set_fd_block(int fd, int blocking)
424 {
425         int flags;
426
427         flags = fcntl(fd, F_GETFL);
428
429         if(blocking) flags &= ~O_NONBLOCK;
430         else flags |= O_NONBLOCK;
431
432         if(fcntl(fd, F_SETFL, flags) < 0)
433                 return -errno;
434
435         return 0;
436 }
437
438 int os_accept_connection(int fd)
439 {
440         int new;
441
442         new = accept(fd, NULL, 0);
443         if(new < 0)
444                 return -errno;
445         return new;
446 }
447
448 #ifndef SHUT_RD
449 #define SHUT_RD 0
450 #endif
451
452 #ifndef SHUT_WR
453 #define SHUT_WR 1
454 #endif
455
456 #ifndef SHUT_RDWR
457 #define SHUT_RDWR 2
458 #endif
459
460 int os_shutdown_socket(int fd, int r, int w)
461 {
462         int what, err;
463
464         if(r && w) what = SHUT_RDWR;
465         else if(r) what = SHUT_RD;
466         else if(w) what = SHUT_WR;
467         else {
468                 printk("os_shutdown_socket : neither r or w was set\n");
469                 return -EINVAL;
470         }
471         err = shutdown(fd, what);
472         if(err < 0)
473                 return -errno;
474         return 0;
475 }
476
477 int os_rcv_fd(int fd, int *helper_pid_out)
478 {
479         int new, n;
480         char buf[CMSG_SPACE(sizeof(new))];
481         struct msghdr msg;
482         struct cmsghdr *cmsg;
483         struct iovec iov;
484
485         msg.msg_name = NULL;
486         msg.msg_namelen = 0;
487         iov = ((struct iovec) { .iov_base  = helper_pid_out,
488                                 .iov_len   = sizeof(*helper_pid_out) });
489         msg.msg_iov = &iov;
490         msg.msg_iovlen = 1;
491         msg.msg_control = buf;
492         msg.msg_controllen = sizeof(buf);
493         msg.msg_flags = 0;
494
495         n = recvmsg(fd, &msg, 0);
496         if(n < 0)
497                 return -errno;
498         else if(n != iov.iov_len)
499                 *helper_pid_out = -1;
500
501         cmsg = CMSG_FIRSTHDR(&msg);
502         if(cmsg == NULL){
503                 printk("rcv_fd didn't receive anything, error = %d\n", errno);
504                 return -1;
505         }
506         if((cmsg->cmsg_level != SOL_SOCKET) ||
507            (cmsg->cmsg_type != SCM_RIGHTS)){
508                 printk("rcv_fd didn't receive a descriptor\n");
509                 return -1;
510         }
511
512         new = ((int *) CMSG_DATA(cmsg))[0];
513         return new;
514 }
515
516 int os_create_unix_socket(const char *file, int len, int close_on_exec)
517 {
518         struct sockaddr_un addr;
519         int sock, err;
520
521         sock = socket(PF_UNIX, SOCK_DGRAM, 0);
522         if(sock < 0)
523                 return -errno;
524
525         if(close_on_exec) {
526                 err = os_set_exec_close(sock);
527                 if(err < 0)
528                         printk("create_unix_socket : close_on_exec failed, "
529                        "err = %d", -err);
530         }
531
532         addr.sun_family = AF_UNIX;
533
534         /* XXX Be more careful about overflow */
535         snprintf(addr.sun_path, len, "%s", file);
536
537         err = bind(sock, (struct sockaddr *) &addr, sizeof(addr));
538         if(err < 0)
539                 return -errno;
540
541         return sock;
542 }
543
544 void os_flush_stdout(void)
545 {
546         fflush(stdout);
547 }
548
549 int os_lock_file(int fd, int excl)
550 {
551         int type = excl ? F_WRLCK : F_RDLCK;
552         struct flock lock = ((struct flock) { .l_type   = type,
553                                               .l_whence = SEEK_SET,
554                                               .l_start  = 0,
555                                               .l_len    = 0 } );
556         int err, save;
557
558         err = fcntl(fd, F_SETLK, &lock);
559         if(!err)
560                 goto out;
561
562         save = -errno;
563         err = fcntl(fd, F_GETLK, &lock);
564         if(err){
565                 err = -errno;
566                 goto out;
567         }
568
569         printk("F_SETLK failed, file already locked by pid %d\n", lock.l_pid);
570         err = save;
571  out:
572         return err;
573 }