1 be36ff68 2004-04-29 devnull #define _GNU_SOURCE	/* for Linux O_DIRECT */
 2 fd04aace 2003-11-23 devnull #include <u.h>
 3 32f69c36 2003-12-11 devnull #define NOPLAN9DEFINES
 4 e7504005 2004-06-11 devnull #include <sys/file.h>
 5 f84eebeb 2005-01-04 devnull #include <unistd.h>
 6 f84eebeb 2005-01-04 devnull #include <fcntl.h>
 7 fd04aace 2003-11-23 devnull #include <libc.h>
 8 32f69c36 2003-12-11 devnull #include <sys/stat.h>
 9 983990c8 2004-05-14 devnull #ifndef O_DIRECT
10 983990c8 2004-05-14 devnull #define O_DIRECT 0
11 983990c8 2004-05-14 devnull #endif
12 fd04aace 2003-11-23 devnull 
13 fd04aace 2003-11-23 devnull int
14 8ad51794 2004-03-25 devnull p9create(char *path, int mode, ulong perm)
15 fd04aace 2003-11-23 devnull {
16 d9e16d25 2004-06-11 devnull 	int fd, cexec, umode, rclose, lock, rdwr;
17 f84eebeb 2005-01-04 devnull 	struct flock fl;
18 32f69c36 2003-12-11 devnull 
19 d9e16d25 2004-06-11 devnull 	rdwr = mode&3;
20 e7504005 2004-06-11 devnull 	lock = mode&OLOCK;
21 32f69c36 2003-12-11 devnull 	cexec = mode&OCEXEC;
22 32f69c36 2003-12-11 devnull 	rclose = mode&ORCLOSE;
23 e7504005 2004-06-11 devnull 	mode &= ~(ORCLOSE|OCEXEC|OLOCK);
24 32f69c36 2003-12-11 devnull 
25 32f69c36 2003-12-11 devnull 	/* XXX should get mode mask right? */
26 32f69c36 2003-12-11 devnull 	fd = -1;
27 32f69c36 2003-12-11 devnull 	if(perm&DMDIR){
28 32f69c36 2003-12-11 devnull 		if(mode != OREAD){
29 32f69c36 2003-12-11 devnull 			werrstr("bad mode in directory create");
30 32f69c36 2003-12-11 devnull 			goto out;
31 32f69c36 2003-12-11 devnull 		}
32 32f69c36 2003-12-11 devnull 		if(mkdir(path, perm&0777) < 0)
33 32f69c36 2003-12-11 devnull 			goto out;
34 32f69c36 2003-12-11 devnull 		fd = open(path, O_RDONLY);
35 32f69c36 2003-12-11 devnull 	}else{
36 32f69c36 2003-12-11 devnull 		umode = (mode&3)|O_CREAT|O_TRUNC;
37 32f69c36 2003-12-11 devnull 		mode &= ~(3|OTRUNC);
38 be36ff68 2004-04-29 devnull 		if(mode&ODIRECT){
39 be36ff68 2004-04-29 devnull 			umode |= O_DIRECT;
40 be36ff68 2004-04-29 devnull 			mode &= ~ODIRECT;
41 be36ff68 2004-04-29 devnull 		}
42 32f69c36 2003-12-11 devnull 		if(mode&OEXCL){
43 32f69c36 2003-12-11 devnull 			umode |= O_EXCL;
44 32f69c36 2003-12-11 devnull 			mode &= ~OEXCL;
45 32f69c36 2003-12-11 devnull 		}
46 b589fce2 2005-02-11 devnull 		if(mode&OAPPEND){
47 b589fce2 2005-02-11 devnull 			umode |= O_APPEND;
48 b589fce2 2005-02-11 devnull 			mode &= ~OAPPEND;
49 b589fce2 2005-02-11 devnull 		}
50 32f69c36 2003-12-11 devnull 		if(mode){
51 32f69c36 2003-12-11 devnull 			werrstr("unsupported mode in create");
52 32f69c36 2003-12-11 devnull 			goto out;
53 32f69c36 2003-12-11 devnull 		}
54 32f69c36 2003-12-11 devnull 		fd = open(path, umode, perm);
55 32f69c36 2003-12-11 devnull 	}
56 32f69c36 2003-12-11 devnull out:
57 32f69c36 2003-12-11 devnull 	if(fd >= 0){
58 e7504005 2004-06-11 devnull 		if(lock){
59 f84eebeb 2005-01-04 devnull 			fl.l_type = (rdwr==OREAD) ? F_RDLCK : F_WRLCK;
60 f84eebeb 2005-01-04 devnull 			fl.l_whence = SEEK_SET;
61 f84eebeb 2005-01-04 devnull 			fl.l_start = 0;
62 f84eebeb 2005-01-04 devnull 			fl.l_len = 0;
63 f84eebeb 2005-01-04 devnull 			if(fcntl(fd, F_SETLK, &fl) < 0){
64 e7504005 2004-06-11 devnull 				close(fd);
65 915734a7 2005-03-18 devnull 				werrstr("lock: %r");
66 e7504005 2004-06-11 devnull 				return -1;
67 e7504005 2004-06-11 devnull 			}
68 e7504005 2004-06-11 devnull 		}
69 32f69c36 2003-12-11 devnull 		if(cexec)
70 32f69c36 2003-12-11 devnull 			fcntl(fd, F_SETFL, FD_CLOEXEC);
71 32f69c36 2003-12-11 devnull 		if(rclose)
72 32f69c36 2003-12-11 devnull 			remove(path);
73 32f69c36 2003-12-11 devnull 	}
74 32f69c36 2003-12-11 devnull 	return fd;
75 fd04aace 2003-11-23 devnull }