2 * $Id: ad_open.c,v 1.30.6.5 2004-01-03 22:16:32 didg Exp $
4 * Copyright (c) 1999 Adrian Sun (asun@u.washington.edu)
5 * Copyright (c) 1990,1991 Regents of The University of Michigan.
8 * Permission to use, copy, modify, and distribute this software and
9 * its documentation for any purpose and without fee is hereby granted,
10 * provided that the above copyright notice appears in all copies and
11 * that both that copyright notice and this permission notice appear
12 * in supporting documentation, and that the name of The University
13 * of Michigan not be used in advertising or publicity pertaining to
14 * distribution of the software without specific, written prior
15 * permission. This software is supplied as is without expressed or
16 * implied warranties of any kind.
18 * Research Systems Unix Group
19 * The University of Michigan
21 * 535 W. William Street
24 * netatalk@itd.umich.edu
26 * NOTE: I don't use inline because a good compiler should be
27 * able to optimize all the static below. Didier
32 #endif /* HAVE_CONFIG_H */
37 #endif /* HAVE_FCNTL_H */
40 #endif /* HAVE_UNISTD_H */
42 #include <atalk/logger.h>
45 #include <sys/types.h>
47 #include <sys/param.h>
50 #include <netatalk/endian.h>
51 #include <atalk/adouble.h>
52 #include <atalk/util.h>
54 #include "ad_private.h"
57 #define MAX(a, b) ((a) < (b) ? (b) : (a))
61 * AppleDouble entry default offsets.
62 * The layout looks like this:
64 * this is the v1 layout:
66 * | NAME | COMMENT | FILEI | FINDERI | RFORK |
68 * we need to change it to look like this:
71 * field length (in bytes)
74 * FILEDATESI 16 replaces FILEI
78 * SHORTNAME 12 8.3 new
81 * so, all we need to do is replace FILEI with FILEDATESI, move RFORK,
82 * and add in the new fields.
84 * NOTE: the HFS module will need similar modifications to interact with
88 #define ADEDOFF_MAGIC (0)
89 #define ADEDOFF_VERSION (ADEDOFF_MAGIC + ADEDLEN_MAGIC)
90 #define ADEDOFF_FILLER (ADEDOFF_VERSION + ADEDLEN_VERSION)
91 #define ADEDOFF_NENTRIES (ADEDOFF_FILLER + ADEDLEN_FILLER)
93 /* initial lengths of some of the fields */
94 #define ADEDLEN_INIT 0
96 /* make sure we don't redefine ADEDOFF_FILEI */
99 #endif /* ADEDOFF_FILEI */
101 #define ADEDOFF_NAME_V1 (AD_HEADER_LEN + ADEID_NUM_V1*AD_ENTRY_LEN)
102 #define ADEDOFF_COMMENT_V1 (ADEDOFF_NAME_V1 + ADEDLEN_NAME)
103 #define ADEDOFF_FILEI (ADEDOFF_COMMENT_V1 + ADEDLEN_COMMENT)
104 #define ADEDOFF_FINDERI_V1 (ADEDOFF_FILEI + ADEDLEN_FILEI)
105 #define ADEDOFF_RFORK_V1 (ADEDOFF_FINDERI_V1 + ADEDLEN_FINDERI)
107 /* i stick things in a slightly different order than their eid order in
108 * case i ever want to separate RootInfo behaviour from the rest of the
110 #define ADEDOFF_NAME_V2 (AD_HEADER_LEN + ADEID_NUM_V2*AD_ENTRY_LEN)
111 #define ADEDOFF_COMMENT_V2 (ADEDOFF_NAME_V2 + ADEDLEN_NAME)
112 #define ADEDOFF_FILEDATESI (ADEDOFF_COMMENT_V2 + ADEDLEN_COMMENT)
113 #define ADEDOFF_FINDERI_V2 (ADEDOFF_FILEDATESI + ADEDLEN_FILEDATESI)
114 #define ADEDOFF_DID (ADEDOFF_FINDERI_V2 + ADEDLEN_FINDERI)
115 #define ADEDOFF_AFPFILEI (ADEDOFF_DID + ADEDLEN_DID)
116 #define ADEDOFF_SHORTNAME (ADEDOFF_AFPFILEI + ADEDLEN_AFPFILEI)
117 #define ADEDOFF_PRODOSFILEI (ADEDOFF_SHORTNAME + ADEDLEN_SHORTNAME)
118 #define ADEDOFF_PRIVDEV (ADEDOFF_PRODOSFILEI + ADEDLEN_PRODOSFILEI)
119 #define ADEDOFF_PRIVINO (ADEDOFF_PRIVDEV + ADEDLEN_PRIVDEV)
120 #define ADEDOFF_PRIVSYN (ADEDOFF_PRIVINO + ADEDLEN_PRIVINO)
122 #define ADEDOFF_RFORK_V2 (ADEDOFF_PRIVSYN + ADEDLEN_PRIVSYN)
124 /* we keep local copies of a bunch of stuff so that we can initialize things
127 /* Bits in the finderinfo data.
128 * see etc/afpd/{directory.c,file.c} for the finderinfo structure
130 #define FINDERINFO_CUSTOMICON 0x4
131 #define FINDERINFO_CLOSEDVIEW 0x100
133 /* offsets in finderinfo */
134 #define FINDERINFO_FRTYPEOFF 0
135 #define FINDERINFO_FRCREATOFF 4
136 #define FINDERINFO_FRFLAGOFF 8
137 #define FINDERINFO_FRVIEWOFF 14
139 /* invisible bit for dot files */
140 #define ATTRBIT_INVISIBLE (1 << 0)
141 #define FINDERINFO_INVISIBLE (1 << 14)
143 /* this is to prevent changing timezones from causing problems with
144 localtime volumes. the screw-up is 30 years. we use a delta of 5
146 #define TIMEWARP_DELTA 157680000
150 u_int32_t id, offset, len;
153 static const struct entry entry_order1[ADEID_NUM_V1 +1] = {
154 {ADEID_NAME, ADEDOFF_NAME_V1, ADEDLEN_INIT}, /* 3 */
155 {ADEID_COMMENT, ADEDOFF_COMMENT_V1, ADEDLEN_INIT}, /* 4 */
156 {ADEID_FILEI, ADEDOFF_FILEI, ADEDLEN_FILEI}, /* 7 */
157 {ADEID_FINDERI, ADEDOFF_FINDERI_V1, ADEDLEN_FINDERI}, /* 9 */
158 {ADEID_RFORK, ADEDOFF_RFORK_V1, ADEDLEN_INIT}, /* 2 */
162 #if AD_VERSION == AD_VERSION1
163 #define DISK_EID(ad, a) (a)
165 #else /* AD_VERSION == AD_VERSION2 */
167 static u_int32_t get_eid(struct adouble *ad, u_int32_t eid)
171 if (ad->ad_version == AD_VERSION1)
174 return ADEID_PRIVDEV;
176 return ADEID_PRIVINO;
178 return ADEID_PRIVSYN;
183 #define DISK_EID(ad, a) get_eid(ad, a)
185 static const struct entry entry_order2[ADEID_NUM_V2 +1] = {
186 {ADEID_NAME, ADEDOFF_NAME_V2, ADEDLEN_INIT},
187 {ADEID_COMMENT, ADEDOFF_COMMENT_V2, ADEDLEN_INIT},
188 {ADEID_FILEDATESI, ADEDOFF_FILEDATESI, ADEDLEN_FILEDATESI},
189 {ADEID_FINDERI, ADEDOFF_FINDERI_V2, ADEDLEN_FINDERI},
190 {ADEID_DID, ADEDOFF_DID, ADEDLEN_DID},
191 {ADEID_AFPFILEI, ADEDOFF_AFPFILEI, ADEDLEN_AFPFILEI},
192 {ADEID_SHORTNAME, ADEDOFF_SHORTNAME, ADEDLEN_INIT},
193 {ADEID_PRODOSFILEI, ADEDOFF_PRODOSFILEI, ADEDLEN_PRODOSFILEI},
194 {ADEID_PRIVDEV, ADEDOFF_PRIVDEV, ADEDLEN_INIT},
195 {ADEID_PRIVINO, ADEDOFF_PRIVINO, ADEDLEN_INIT},
196 {ADEID_PRIVSYN, ADEDOFF_PRIVSYN, ADEDLEN_INIT},
197 {ADEID_RFORK, ADEDOFF_RFORK_V2, ADEDLEN_INIT},
201 #endif /* AD_VERSION == AD_VERSION2 */
203 #if AD_VERSION == AD_VERSION2
205 /* FIXME work only if < 2GB */
206 static int ad_v1tov2(struct adouble *ad, const char *path)
212 /* use resource fork offset from file */
215 /* check to see if we should convert this header. */
216 if (!path || (ad->ad_version != AD_VERSION1))
219 /* we want version1 anyway */
220 if (ad->ad_flags == AD_VERSION1)
225 /* we don't really know what we want */
226 ad->ad_flags = ad->ad_version;
230 /* convert from v1 to v2. what does this mean?
231 * 1) change FILEI into FILEDATESI
232 * 2) create space for SHORTNAME, AFPFILEI, DID, and PRODOSI
233 * 3) move FILEI attributes into AFPFILEI
234 * 4) initialize ACCESS field of FILEDATESI.
235 * 5) move the resource fork
238 /* bail if we can't get a lock */
239 if (ad_tmplock(ad, ADEID_RFORK, ADLOCK_WR, 0, 0, 0) < 0)
242 if ((fd = open(path, O_RDWR)) < 0)
245 if (ad->ad_eid[ADEID_RFORK].ade_off) {
246 shiftdata = ADEDOFF_RFORK_V2 -ad->ad_eid[ADEID_RFORK].ade_off;
249 shiftdata = ADEDOFF_RFORK_V2 -ADEDOFF_RFORK_V1; /* 136 */
252 if (fstat(fd, &st) ||
253 sys_ftruncate(fd, st.st_size + shiftdata) < 0) {
256 if (st.st_size > 0x7fffffff) {
257 LOG(log_debug, logtype_default, "ad_v1tov2: file too big.");
261 /* last place for failure. */
262 if ((void *) (buf = (char *)
263 mmap(NULL, st.st_size + shiftdata,
264 PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0)) ==
269 off = ad->ad_eid[ADEID_RFORK].ade_off;
271 /* move the RFORK. this assumes that the RFORK is at the end */
273 memmove(buf + ADEDOFF_RFORK_V2, buf + off, ad->ad_eid[ADEID_RFORK].ade_len);
276 munmap(buf, st.st_size + shiftdata);
279 /* now, fix up our copy of the header */
280 memset(ad->ad_filler, 0, sizeof(ad->ad_filler));
282 /* replace FILEI with FILEDATESI */
283 ad_getattr(ad, &attr);
284 ad->ad_eid[ADEID_FILEDATESI].ade_off = ADEDOFF_FILEDATESI;
285 ad->ad_eid[ADEID_FILEDATESI].ade_len = ADEDLEN_FILEDATESI;
286 ad->ad_eid[ADEID_FILEI].ade_off = 0;
287 ad->ad_eid[ADEID_FILEI].ade_len = 0;
289 /* add in the new entries */
290 ad->ad_eid[ADEID_DID].ade_off = ADEDOFF_DID;
291 ad->ad_eid[ADEID_DID].ade_len = ADEDLEN_DID;
292 ad->ad_eid[ADEID_AFPFILEI].ade_off = ADEDOFF_AFPFILEI;
293 ad->ad_eid[ADEID_AFPFILEI].ade_len = ADEDLEN_AFPFILEI;
294 ad->ad_eid[ADEID_SHORTNAME].ade_off = ADEDOFF_SHORTNAME;
295 ad->ad_eid[ADEID_SHORTNAME].ade_len = ADEDLEN_INIT;
296 ad->ad_eid[ADEID_PRODOSFILEI].ade_off = ADEDOFF_PRODOSFILEI;
297 ad->ad_eid[ADEID_PRODOSFILEI].ade_len = ADEDLEN_PRODOSFILEI;
299 ad->ad_eid[ADEID_PRIVDEV].ade_off = ADEDOFF_PRIVDEV;
300 ad->ad_eid[ADEID_PRIVDEV].ade_len = ADEDLEN_INIT;
301 ad->ad_eid[ADEID_PRIVINO].ade_off = ADEDOFF_PRIVINO;
302 ad->ad_eid[ADEID_PRIVINO].ade_len = ADEDLEN_INIT;
303 ad->ad_eid[ADEID_PRIVSYN].ade_off = ADEDOFF_PRIVSYN;
304 ad->ad_eid[ADEID_PRIVSYN].ade_len = ADEDLEN_INIT;
306 /* shift the old entries (NAME, COMMENT, FINDERI, RFORK) */
307 ad->ad_eid[ADEID_NAME].ade_off = ADEDOFF_NAME_V2;
308 ad->ad_eid[ADEID_COMMENT].ade_off = ADEDOFF_COMMENT_V2;
309 ad->ad_eid[ADEID_FINDERI].ade_off = ADEDOFF_FINDERI_V2;
310 ad->ad_eid[ADEID_RFORK].ade_off = ADEDOFF_RFORK_V2;
313 ad->ad_version = AD_VERSION2;
315 /* move our data buffer to make space for the new entries. */
316 memmove(ad->ad_data + ADEDOFF_NAME_V2, ad->ad_data + ADEDOFF_NAME_V1,
317 ADEDOFF_RFORK_V1 - ADEDOFF_NAME_V1);
319 /* now, fill in the space with appropriate stuff. we're
320 operating as a v2 file now. */
321 ad_setdate(ad, AD_DATE_ACCESS | AD_DATE_UNIX, st.st_mtime);
322 memset(ad_entry(ad, ADEID_DID), 0, ADEDLEN_DID);
323 memset(ad_entry(ad, ADEID_AFPFILEI), 0, ADEDLEN_AFPFILEI);
324 ad_setattr(ad, attr);
325 memset(ad_entry(ad, ADEID_SHORTNAME), 0, ADEDLEN_SHORTNAME);
326 memset(ad_entry(ad, ADEID_PRODOSFILEI), 0, ADEDLEN_PRODOSFILEI);
328 /* rebuild the header and cleanup */
329 ad_flush(ad, ADFLAGS_HF );
330 ad_tmplock(ad, ADEID_RFORK, ADLOCK_CLR, 0, 0, 0);
335 sys_ftruncate(fd, st.st_size);
339 ad_tmplock(ad, ADEID_RFORK, ADLOCK_CLR, 0, 0, 0);
343 #endif /* AD_VERSION == AD_VERSION2 */
346 mode_t ad_hf_mode (mode_t mode)
348 /* fnctl lock need write access */
349 if ((mode & S_IRUSR))
351 if ((mode & S_IRGRP))
353 if ((mode & S_IROTH))
355 /* if write mode set add read mode */
356 if ((mode & S_IWUSR))
358 if ((mode & S_IWGRP))
360 if ((mode & S_IWOTH))
368 /* -------------------------------------
371 static void parse_entries(struct adouble *ad, char *buf,
374 u_int32_t eid, len, off;
377 /* now, read in the entry bits */
378 for (; nentries > 0; nentries-- ) {
379 memcpy(&eid, buf, sizeof( eid ));
380 eid = DISK_EID(ad, ntohl( eid ));
381 buf += sizeof( eid );
382 memcpy(&off, buf, sizeof( off ));
384 buf += sizeof( off );
385 memcpy(&len, buf, sizeof( len ));
387 buf += sizeof( len );
389 if ( 0 < eid && eid < ADEID_MAX ) {
390 ad->ad_eid[ eid ].ade_off = off;
391 ad->ad_eid[ eid ].ade_len = len;
392 } else if (!warning) {
394 LOG(log_debug, logtype_default, "ad_refresh: nentries %hd eid %d\n",
401 /* this reads enough of the header so that we can figure out all of
402 * the entry lengths and offsets. once that's done, we just read/mmap
403 * the rest of the header in.
405 * NOTE: we're assuming that the resource fork is kept at the end of
406 * the file. also, mmapping won't work for the hfs fs until it
407 * understands how to mmap header files. */
408 static int ad_header_read(struct adouble *ad, struct stat *hst)
410 char *buf = ad->ad_data;
414 static int warning = 0;
417 /* read the header */
418 if ((header_len = adf_pread( &ad->ad_hf, buf, sizeof(ad->ad_data), 0)) < 0) {
421 if (header_len < AD_HEADER_LEN) {
426 memcpy(&ad->ad_magic, buf, sizeof( ad->ad_magic ));
427 memcpy(&ad->ad_version, buf + ADEDOFF_VERSION, sizeof( ad->ad_version ));
429 /* tag broken v1 headers. just assume they're all right.
430 * we detect two cases: null magic/version
431 * byte swapped magic/version
432 * XXX: in the future, you'll need the v1compat flag.
433 * (ad->ad_flags & ADFLAGS_V1COMPAT) */
434 if (!ad->ad_magic && !ad->ad_version) {
436 LOG(log_debug, logtype_default, "notice: fixing up null v1 magic/version.");
439 ad->ad_magic = AD_MAGIC;
440 ad->ad_version = AD_VERSION1;
442 } else if (ad->ad_magic == AD_MAGIC && ad->ad_version == AD_VERSION1) {
444 LOG(log_debug, logtype_default, "notice: fixing up byte-swapped v1 magic/version.");
449 ad->ad_magic = ntohl( ad->ad_magic );
450 ad->ad_version = ntohl( ad->ad_version );
453 if ((ad->ad_magic != AD_MAGIC) || ((ad->ad_version != AD_VERSION1)
454 #if AD_VERSION == AD_VERSION2
455 && (ad->ad_version != AD_VERSION2)
456 #endif /* AD_VERSION == AD_VERSION2 */
459 LOG(log_debug, logtype_default, "ad_open: can't parse AppleDouble header.");
463 memcpy(ad->ad_filler, buf + ADEDOFF_FILLER, sizeof( ad->ad_filler ));
464 memcpy(&nentries, buf + ADEDOFF_NENTRIES, sizeof( nentries ));
465 nentries = ntohs( nentries );
467 /* read in all the entry headers. if we have more than the
468 * maximum, just hope that the rfork is specified early on. */
469 len = nentries*AD_ENTRY_LEN;
471 if (len + AD_HEADER_LEN > sizeof(ad->ad_data))
472 len = sizeof(ad->ad_data) - AD_HEADER_LEN;
474 buf += AD_HEADER_LEN;
475 if (len > header_len - AD_HEADER_LEN) {
477 LOG(log_debug, logtype_default, "ad_header_read: can't read entry info.");
481 /* figure out all of the entry offsets and lengths. if we aren't
482 * able to read a resource fork entry, bail. */
483 nentries = len / AD_ENTRY_LEN;
484 parse_entries(ad, buf, nentries);
485 if (!ad_getentryoff(ad, ADEID_RFORK)
486 || (ad_getentryoff(ad, ADEID_RFORK) > sizeof(ad->ad_data))
488 LOG(log_debug, logtype_default, "ad_header_read: problem with rfork entry offset.");
492 if (ad_getentryoff(ad, ADEID_RFORK) > header_len) {
494 LOG(log_debug, logtype_default, "ad_header_read: can't read in entries.");
500 if (fstat(ad->ad_hf.adf_fd, &st) < 0) {
501 return 1; /* fail silently */
504 ad->ad_rlen = hst->st_size - ad_getentryoff(ad, ADEID_RFORK);
506 /* fix up broken dates */
507 if (ad->ad_version == AD_VERSION1) {
510 /* check to see if the ad date is wrong. just see if we have
511 * a modification date in the future. */
512 if (((ad_getdate(ad, AD_DATE_MODIFY | AD_DATE_UNIX, &aint)) == 0) &&
513 (aint > TIMEWARP_DELTA + hst->st_mtime)) {
514 ad_setdate(ad, AD_DATE_MODIFY | AD_DATE_UNIX, aint - AD_DATE_DELTA);
515 ad_getdate(ad, AD_DATE_CREATE | AD_DATE_UNIX, &aint);
516 ad_setdate(ad, AD_DATE_CREATE | AD_DATE_UNIX, aint - AD_DATE_DELTA);
517 ad_getdate(ad, AD_DATE_BACKUP | AD_DATE_UNIX, &aint);
518 ad_setdate(ad, AD_DATE_BACKUP | AD_DATE_UNIX, aint - AD_DATE_DELTA);
527 * Put the .AppleDouble where it needs to be:
531 * \ b/.AppleDouble/.Parent
534 ad_path( path, adflags )
538 static char pathbuf[ MAXPATHLEN + 1];
539 char c, *slash, buf[MAXPATHLEN + 1];
541 strncpy(buf, path, MAXPATHLEN);
542 if ( adflags & ADFLAGS_DIR ) {
543 strncpy( pathbuf, buf, MAXPATHLEN );
544 if ( *buf != '\0' ) {
545 strcat( pathbuf, "/" );
549 if (NULL != ( slash = strrchr( buf, '/' )) ) {
552 strncpy( pathbuf, buf, MAXPATHLEN);
559 strncat( pathbuf, ".AppleDouble/", MAXPATHLEN - strlen(pathbuf));
560 strncat( pathbuf, slash, MAXPATHLEN - strlen(pathbuf));
566 * Support inherited protection modes for AppleDouble files. The supplied
567 * mode is ANDed with the parent directory's mask value in lieu of "umask",
568 * and that value is returned.
571 #define DEFMASK 07700 /* be conservative */
577 static char modebuf[ MAXPATHLEN + 1];
581 if ( (len = strlen( path )) >= MAXPATHLEN ) {
582 errno = ENAMETOOLONG;
583 return NULL; /* can't do it */
587 * For a path with directories in it, remove the final component
588 * (path or subdirectory name) to get the name we want to stat.
589 * For a path which is just a filename, use "." instead.
591 strcpy( modebuf, path );
592 slash = strrchr( modebuf, '/' );
593 /* is last char a '/' */
594 if (slash && slash[1] == 0) {
595 while (modebuf < slash && slash[-1] == '/') {
598 if (modebuf < slash) {
599 *slash = '\0'; /* remove pathname component */
600 slash = strrchr( modebuf, '/' );
604 *slash = '\0'; /* remove pathname component */
606 modebuf[0] = '.'; /* use current directory */
612 /* ---------------- */
613 static uid_t default_uid = -1;
615 int ad_setfuid(const uid_t id)
621 /* ---------------- */
622 uid_t ad_getfuid(void)
628 return inode of path parent directory
630 int ad_stat(const char *path, struct stat *stbuf)
639 return stat( p, stbuf );
643 if we are root change path user/ group
644 It can be a native function for BSD cf. FAQ.Q10
645 path: pathname to chown
646 stbuf: parent directory inode
648 use fstat and fchown or lchown with linux?
650 #define EMULATE_SUIDDIR
652 static int ad_chown(const char *path, struct stat *stbuf)
655 #ifdef EMULATE_SUIDDIR
658 if (default_uid != -1) {
659 /* we are root (admin) */
660 id = (default_uid)?default_uid:stbuf->st_uid;
661 ret = chown( path, id, stbuf->st_gid );
668 return access right and inode of path parent directory
670 static int ad_mode_st(const char *path, int *mode, struct stat *stbuf)
675 if (ad_stat(path, stbuf) != 0) {
679 *mode &= stbuf->st_mode;
684 return access right of path parent directory
687 ad_mode( path, mode )
692 ad_mode_st(path, &mode, &stbuf);
697 * Use mkdir() with mode bits taken from ad_mode().
700 ad_mkdir( path, mode )
709 LOG(log_info, logtype_default, "ad_mkdir: Creating directory with mode %d", mode);
712 st_invalid = ad_mode_st(path, &mode, &stbuf);
713 ret = mkdir( path, mode );
714 if (ret || st_invalid)
716 ad_chown(path, &stbuf);
721 /* ----------------- */
722 static int ad_error(struct adouble *ad, int adflags)
724 if ((adflags & ADFLAGS_NOHF)) {
725 /* FIXME double check : set header offset ?*/
728 if ((adflags & ADFLAGS_DF)) {
729 ad_close( ad, ADFLAGS_DF );
734 static int new_rfork(const char *path, struct adouble *ad, int adflags);
739 #define AD_SET(a) a = 0
742 void ad_init(struct adouble *ad, int flags)
744 memset( ad, 0, sizeof( struct adouble ) );
745 ad->ad_flags = flags;
748 /* -------------------
749 * It's not possible to open the header file O_RDONLY -- the read
750 * will fail and return an error. this refcounts things now.
752 int ad_open( path, adflags, oflags, mode, ad )
754 int adflags, oflags, mode;
763 if (ad->ad_inited != AD_INITED) {
766 adf_lock_init(&ad->ad_df);
767 adf_lock_init(&ad->ad_hf);
768 ad->ad_inited = AD_INITED;
772 if ((adflags & ADFLAGS_DF)) {
773 if (ad_dfileno(ad) == -1) {
774 hoflags = (oflags & ~(O_RDONLY | O_WRONLY)) | O_RDWR;
776 st_invalid = ad_mode_st(path, &admode, &st);
777 ad->ad_df.adf_fd =open( path, hoflags, admode );
778 if (ad->ad_df.adf_fd < 0 ) {
779 if ((errno == EACCES || errno == EROFS) && !(oflags & O_RDWR)) {
781 ad->ad_df.adf_fd =open( path, hoflags, admode );
784 if ( ad->ad_df.adf_fd < 0)
787 AD_SET(ad->ad_df.adf_off);
788 ad->ad_df.adf_flags = hoflags;
789 if ((oflags & O_CREAT) && !st_invalid) {
790 /* just created, set owner if admin (root) */
795 /* the file is already open... but */
796 if ((oflags & ( O_RDWR | O_WRONLY)) && /* we want write access */
797 !(ad->ad_df.adf_flags & ( O_RDWR | O_WRONLY))) /* and it was denied the first time */
803 * for now ad_open is never called with O_TRUNC or O_EXCL if the file is
804 * already open. Should we check for it? ie
806 * O_TRUNC --> truncate the fork.
807 * idem for ressource fork.
810 open_df = ADFLAGS_DF;
811 ad->ad_df.adf_refcount++;
814 if (!(adflags & ADFLAGS_HF))
817 if (ad_hfileno(ad) != -1) { /* the file is already open */
818 if ((oflags & ( O_RDWR | O_WRONLY)) &&
819 !(ad->ad_hf.adf_flags & ( O_RDWR | O_WRONLY))) {
821 /* don't call with ADFLAGS_HF because we didn't open ressource fork */
822 ad_close( ad, open_df );
828 ad->ad_hf.adf_refcount++;
832 ad_p = ad_path( path, adflags );
834 hoflags = oflags & ~O_CREAT;
835 hoflags = (hoflags & ~(O_RDONLY | O_WRONLY)) | O_RDWR;
836 ad->ad_hf.adf_fd = open( ad_p, hoflags, 0 );
837 if (ad->ad_hf.adf_fd < 0 ) {
838 if ((errno == EACCES || errno == EROFS) && !(oflags & O_RDWR)) {
839 hoflags = oflags & ~O_CREAT;
840 ad->ad_hf.adf_fd = open( ad_p, hoflags, 0 );
844 if ( ad->ad_hf.adf_fd < 0 ) {
845 if (errno == ENOENT && (oflags & O_CREAT) ) {
847 * We're expecting to create a new adouble header file,
849 * if ((oflags & O_CREAT) ==> (oflags & O_RDWR)
852 st_invalid = ad_mode_st(ad_p, &admode, &st);
853 admode = ad_hf_mode(admode);
855 ad->ad_hf.adf_fd = open( ad_p, oflags,admode );
856 if ( ad->ad_hf.adf_fd < 0 ) {
858 * Probably .AppleDouble doesn't exist, try to
861 if (errno == ENOENT && (adflags & ADFLAGS_NOADOUBLE) == 0) {
862 if (NULL == ( slash = strrchr( ad_p, '/' )) ) {
863 return ad_error(ad, adflags);
867 if ( ad_mkdir( ad_p, 0777 ) < 0 ) {
868 return ad_error(ad, adflags);
872 st_invalid = ad_mode_st(ad_p, &admode, &st);
873 admode = ad_hf_mode(admode);
874 ad->ad_hf.adf_fd = open( ad_p, oflags, admode);
875 if ( ad->ad_hf.adf_fd < 0 ) {
876 return ad_error(ad, adflags);
879 return ad_error(ad, adflags);
882 ad->ad_hf.adf_flags = oflags;
883 /* just created, set owner if admin owner (root) */
889 return ad_error(ad, adflags);
891 } else if (fstat(ad->ad_hf.adf_fd, &st) == 0 && st.st_size == 0) {
892 /* for 0 length files, treat them as new. */
893 ad->ad_hf.adf_flags = hoflags| O_TRUNC;
895 ad->ad_hf.adf_flags = hoflags;
897 AD_SET(ad->ad_hf.adf_off);
899 memset(ad->ad_eid, 0, sizeof( ad->ad_eid ));
900 ad->ad_hf.adf_refcount++;
901 if ((ad->ad_hf.adf_flags & ( O_TRUNC | O_CREAT ))) {
903 * This is a new adouble header file. Initialize the structure,
904 * instead of reading it.
906 if (new_rfork(path, ad, adflags) < 0) {
907 /* the file is already deleted, perm, whatever, so return an error*/
908 ad_close(ad, adflags);
912 /* Read the adouble header in and parse it.*/
913 if ((ad_header_read( ad , &st) < 0)
914 #if AD_VERSION == AD_VERSION2
915 || (ad_v1tov2(ad, ad_p) < 0)
916 #endif /* AD_VERSION == AD_VERSION2 */
918 ad_close( ad, adflags );
925 /* ----------------------------------- */
926 static int new_rfork(const char *path, struct adouble *ad, int adflags)
931 const struct entry *eid;
935 ad->ad_magic = AD_MAGIC;
936 ad->ad_version = ad->ad_flags;
938 ad->ad_version = AD_VERSION;
940 memset(ad->ad_filler, 0, sizeof( ad->ad_filler ));
941 memset(ad->ad_data, 0, sizeof(ad->ad_data));
943 #if AD_VERSION == AD_VERSION2
944 if (ad->ad_version == AD_VERSION2)
951 ad->ad_eid[eid->id].ade_off = eid->offset;
952 ad->ad_eid[eid->id].ade_len = eid->len;
956 /* put something sane in the directory finderinfo */
957 if ((adflags & ADFLAGS_DIR)) {
958 /* set default view */
959 ashort = htons(FINDERINFO_CLOSEDVIEW);
960 memcpy(ad_entry(ad, ADEID_FINDERI) + FINDERINFO_FRVIEWOFF,
961 &ashort, sizeof(ashort));
963 /* set default creator/type fields */
964 memcpy(ad_entry(ad, ADEID_FINDERI) + FINDERINFO_FRTYPEOFF,"TEXT", 4);
965 memcpy(ad_entry(ad, ADEID_FINDERI) + FINDERINFO_FRCREATOFF,"UNIX", 4);
968 /* make things invisible */
969 if ((*path == '.') && strcmp(path, ".") && strcmp(path, "..")) {
970 ashort = htons(ATTRBIT_INVISIBLE);
971 ad_setattr(ad, ashort);
972 ashort = htons(FINDERINFO_INVISIBLE);
973 memcpy(ad_entry(ad, ADEID_FINDERI) + FINDERINFO_FRFLAGOFF,
974 &ashort, sizeof(ashort));
978 if (gettimeofday(&tv, NULL) < 0) {
983 if (stat(path, &st) < 0) {
987 /* put something sane in the date fields */
988 ad_setdate(ad, AD_DATE_CREATE | AD_DATE_UNIX, st.st_mtime);
989 ad_setdate(ad, AD_DATE_MODIFY | AD_DATE_UNIX, st.st_mtime);
990 ad_setdate(ad, AD_DATE_ACCESS | AD_DATE_UNIX, st.st_mtime);
991 ad_setdate(ad, AD_DATE_BACKUP, AD_DATE_START);
995 /* to do this with mmap, we need the hfs fs to understand how to mmap
997 int ad_refresh(struct adouble *ad)
1000 if (ad->ad_hf.adf_fd < -1)
1003 return ad_header_read(ad, NULL);