src/BeOS/extfs_beos.cpp

/*
 *  extfs_beos.cpp - MacOS file system for access native file system access, BeOS specific stuff
 *
 *  Basilisk II (C) 1997-2001 Christian Bauer
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#include "sysdeps.h"

#include <sys/types.h>
#include <sys/stat.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <fcntl.h>
#include <dirent.h>
#include <errno.h>

#include <fs_attr.h>
#include <support/TypeConstants.h>
#include <storage/Mime.h>

#include "extfs.h"
#include "extfs_defs.h"

#define DEBUG 0
#include "debug.h"


// Default Finder flags
const uint16 DEFAULT_FINDER_FLAGS = kHasBeenInited;

// Temporary buffer for transfers from/to kernel space
const int TMP_BUF_SIZE = 0x10000;
static uint8 *tmp_buf = NULL;


/*
 *  Initialization
 */

void extfs_init(void)
{
        // Allocate temporary buffer
        tmp_buf = new uint8[TMP_BUF_SIZE];
}


/*
 *  Deinitialization
 */

void extfs_exit(void)
{
        // Delete temporary buffer
        delete[] tmp_buf;
}


/*
 *  Add component to path name
 */

void add_path_component(char *path, const char *component)
{
        int l = strlen(path);
        if (l < MAX_PATH_LENGTH-1 && path[l-1] != '/') {
                path[l] = '/';
                path[l+1] = 0;
        }
        strncat(path, component, MAX_PATH_LENGTH-1);
}


/*
 *  Get/set finder info for file/directory specified by full path
 */

struct mime2type {
        const char *mime;
        uint32 type;
        uint32 creator;
        bool reversible;        // type -> mime translation possible
};

static const mime2type m2t_translation[] = {
        {"application/x-compress", 'ZIVM', 'LZIV', true},
        {"application/x-gzip", 'Gzip', 'Gzip', true},
        {"application/x-macbinary", 'BINA', '????', false},
        {"application/mac-binhex40", 'TEXT', 'SITx', false},
        {"application/pdf", 'PDF ', 'CARO', true},
        {"application/postscript", 'TEXT', 'ttxt', false},
        {"application/x-stuffit", 'SIT!', 'SITx', true},
        {"application/x-tar", 'TARF', 'TAR ', true},
        {"application/x-uuencode", 'TEXT', 'SITx', false},
        {"application/zip", 'ZIP ', 'ZIP ', true},
        {"audio/x-8svx", '8SVX', 'SNDM', true},
        {"audio/x-aifc", 'AIFC', 'TVOD', true},
        {"audio/x-aiff", 'AIFF', 'TVOD', true},
        {"audio/basic", 'ULAW', 'TVOD', true},
        {"audio/x-midi", 'MIDI', 'TVOD', true},
        {"audio/x-mpeg", 'MPG ', 'TVOD', true},
        {"audio/x-wav", 'WAVE', 'TVOD', true},
        {"image/x-bmp", 'BMPf', 'ogle', true},
        {"image/gif", 'GIFf', 'ogle', true},
        {"image/x-ilbm", 'ILBM', 'GKON', true},
        {"image/jpeg", 'JPEG', 'ogle', true},
        {"image/jpeg", 'JFIF', 'ogle', true},
        {"image/x-photoshop", '8BPS', '8BIM', true},
        {"image/pict", 'PICT', 'ogle', true},
        {"image/png", 'PNGf', 'ogle', true},
        {"image/x-sgi", '.SGI', 'ogle', true},
        {"image/x-targa", 'TPIC', 'ogle', true},
        {"image/tiff", 'TIFF', 'ogle', true},
        {"text/html", 'TEXT', 'MOSS', false},
        {"text/plain", 'TEXT', 'ttxt', true},
        {"text/rtf", 'TEXT', 'MSWD', false},
        {"text/x-source-code", 'TEXT', 'R*ch', false},
        {"video/mpeg", 'MPEG', 'TVOD', true},
        {"video/quicktime", 'MooV', 'TVOD', true},
        {"video/x-flc", 'FLI ', 'TVOD', true},
        {"video/x-msvideo", 'VfW ', 'TVOD', true},
        {NULL, 0, 0, false}     // End marker
};

void get_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir)
{
        // Set default finder info
        Mac_memset(finfo, 0, SIZEOF_FInfo);
        if (fxinfo)
                Mac_memset(fxinfo, 0, SIZEOF_FXInfo);
        WriteMacInt16(finfo + fdFlags, DEFAULT_FINDER_FLAGS);
        WriteMacInt32(finfo + fdLocation, (uint32)-1);

        // Open file
        int fd = open(path, O_RDONLY);
        if (fd < 0)
                return;

        if (!is_dir) {

                // Read BeOS MIME type
                ssize_t actual = fs_read_attr(fd, "BEOS:TYPE", B_MIME_STRING_TYPE, 0, tmp_buf, 256);
                tmp_buf[255] = 0;

                if (actual > 0) {

                        // Translate MIME type to MacOS type/creator
                        uint8 mactype[4];
                        if (sscanf((char *)tmp_buf, "application/x-MacOS-%c%c%c%c", mactype, mactype+1, mactype+2, mactype+3) == 4) {

                                // MacOS style type
                                WriteMacInt32(finfo + fdType, (mactype[0] << 24) | (mactype[1] << 16) | (mactype[2] << 8) | mactype[3]);

                        } else {

                                // MIME string, look in table
                                for (int i=0; m2t_translation[i].mime; i++) {
                                        if (!strcmp((char *)tmp_buf, m2t_translation[i].mime)) {
                                                WriteMacInt32(finfo + fdType, m2t_translation[i].type);
                                                WriteMacInt32(finfo + fdCreator, m2t_translation[i].creator);
                                                break;
                                        }
                                }
                        }
                }

                // Override file type with MACOS:CREATOR attribute
                if (fs_read_attr(fd, "MACOS:CREATOR", B_UINT32_TYPE, 0, tmp_buf, 4) == 4)
                        WriteMacInt32(finfo + fdCreator, (tmp_buf[0] << 24) | (tmp_buf[1] << 16) | (tmp_buf[2] << 8) | tmp_buf[3]);
        }

        // Read MACOS:HFS_FLAGS attribute
        if (fs_read_attr(fd, "MACOS:HFS_FLAGS", B_UINT16_TYPE, 0, tmp_buf, 2) == 2)
                WriteMacInt16(finfo + fdFlags, (tmp_buf[0] << 8) | tmp_buf[1]);

        // Close file
        close(fd);
}

void set_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir)
{
        // Open file
        int fd = open(path, O_WRONLY);
        if (fd < 0)
                return;

        if (!is_dir) {

                // Set BEOS:TYPE attribute
                uint32 type = ReadMacInt32(finfo + fdType);
                if (type) {
                        for (int i=0; m2t_translation[i].mime; i++) {
                                if (m2t_translation[i].type == type && m2t_translation[i].reversible) {
                                        fs_write_attr(fd, "BEOS:TYPE", B_MIME_STRING_TYPE, 0, m2t_translation[i].mime, strlen(m2t_translation[i].mime) + 1);
                                        break;
                                }
                        }
                }

                // Set MACOS:CREATOR attribute
                uint32 creator = ReadMacInt32(finfo + fdCreator);
                if (creator) {
                        tmp_buf[0] = creator >> 24;
                        tmp_buf[1] = creator >> 16;
                        tmp_buf[2] = creator >> 8;
                        tmp_buf[3] = creator;
                        fs_write_attr(fd, "MACOS:CREATOR", B_UINT32_TYPE, 0, tmp_buf, 4);
                }
        }

        // Write MACOS:HFS_FLAGS attribute
        uint16 flags = ReadMacInt16(finfo + fdFlags);
        if (flags != DEFAULT_FINDER_FLAGS) {
                tmp_buf[0] = flags >> 8;
                tmp_buf[1] = flags;
                fs_write_attr(fd, "MACOS:HFS_FLAGS", B_UINT16_TYPE, 0, tmp_buf, 2);
        } else
                fs_remove_attr(fd, "MACOS:HFS_FLAGS");

        // Close file
        close(fd);
}


/*
 *  Resource fork emulation functions
 */

uint32 get_rfork_size(const char *path)
{
        // Open file
        int fd = open(path, O_RDONLY);
        if (fd < 0)
                return 0;

        // Get size of MACOS:RFORK attribute
        struct attr_info info;
        if (fs_stat_attr(fd, "MACOS:RFORK", &info) < 0)
                info.size = 0;

        // Close file and return size
        close(fd);
        return info.size;
}

int open_rfork(const char *path, int flag)
{
        // Open original file
        int fd = open(path, flag);
        if (fd < 0)
                return -1;

        // Open temporary file for resource fork
        char rname[L_tmpnam];
        tmpnam(rname);
        int rfd = open(rname, O_RDWR | O_CREAT | O_TRUNC, 0666);
        if (rfd < 0) {
                close(fd);
                return -1;
        }
        unlink(rname);  // File will be deleted when closed

        // Get size of MACOS:RFORK attribute
        struct attr_info info;
        if (fs_stat_attr(fd, "MACOS:RFORK", &info) < 0)
                info.size = 0;

        // Copy resource data from attribute to temporary file
        if (info.size > 0) {

                // Allocate buffer
                void *buf = malloc(info.size);
                if (buf == NULL) {
                        close(rfd);
                        close(fd);
                        return -1;
                }

                // Copy data
                fs_read_attr(fd, "MACOS:RFORK", B_RAW_TYPE, 0, buf, info.size);
                write(rfd, buf, info.size);
                lseek(rfd, 0, SEEK_SET);

                // Free buffer
                if (buf)
                        free(buf);
        }

        // Close original file
        close(fd);
        return rfd;
}

void close_rfork(const char *path, int fd)
{
        if (fd < 0)
                return;

        // Get size of temporary file
        struct stat st;
        if (fstat(fd, &st) < 0)
                st.st_size = 0;

        // Open original file
        int ofd = open(path, O_WRONLY);
        if (ofd > 0) {

                // Copy resource data to MACOS:RFORK attribute
                if (st.st_size > 0) {

                        // Allocate buffer
                        void *buf = malloc(st.st_size);
                        if (buf == NULL) {
                                close(ofd);
                                close(fd);
                                return;
                        }

                        // Copy data
                        lseek(fd, 0, SEEK_SET);
                        read(fd, buf, st.st_size);
                        fs_write_attr(ofd, "MACOS:RFORK", B_RAW_TYPE, 0, buf, st.st_size);

                        // Free buffer
                        if (buf)
                                free(buf);

                } else
                        fs_remove_attr(ofd, "MACOS:RFORK");

                // Close original file
                close(ofd);
        }

        // Close temporary file
        close(fd);
}


/*
 *  Read "length" bytes from file to "buffer",
 *  returns number of bytes read (or -1 on error)
 */

static inline ssize_t sread(int fd, void *buf, size_t count)
{
        ssize_t res;
        while ((res = read(fd, buf, count)) == B_INTERRUPTED) ;
        return res;
}

ssize_t extfs_read(int fd, void *buffer, size_t length)
{
        // Buffer in kernel space?
        if ((uint32)buffer < 0x80000000) {

                // Yes, transfer via buffer
                ssize_t actual = 0;
                while (length) {
                        size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length;
                        ssize_t res = sread(fd, tmp_buf, transfer_size);
                        if (res < 0)
                                return res;
                        memcpy(buffer, tmp_buf, res);
                        buffer = (void *)((uint8 *)buffer + res);
                        length -= res;
                        actual += res;
                        if (res != transfer_size)
                                return actual;
                }
                return actual;

        } else {

                // No, transfer directly
                return sread(fd, buffer, length);
        }
}


/*
 *  Write "length" bytes from "buffer" to file,
 *  returns number of bytes written (or -1 on error)
 */

static inline ssize_t swrite(int fd, void *buf, size_t count)
{
        ssize_t res;
        while ((res = write(fd, buf, count)) == B_INTERRUPTED) ;
        return res;
}

ssize_t extfs_write(int fd, void *buffer, size_t length)
{
        // Buffer in kernel space?
        if ((uint32)buffer < 0x80000000) {

                // Yes, transfer via buffer
                ssize_t actual = 0;
                while (length) {
                        size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length;
                        memcpy(tmp_buf, buffer, transfer_size);
                        ssize_t res = swrite(fd, tmp_buf, transfer_size);
                        if (res < 0)
                                return res;
                        buffer = (void *)((uint8 *)buffer + res);
                        length -= res;
                        actual += res;
                        if (res != transfer_size)
                                return actual;
                }
                return actual;

        } else {

                // No, transfer directly
                return swrite(fd, buffer, length);
        }
}


/*
 *  Remove file/directory, returns false on error (and sets errno)
 */

bool extfs_remove(const char *path)
{
        if (remove(path) < 0) {
                if (errno == EISDIR)
                        return rmdir(path) == 0;
                else
                        return false;
        }
        return true;
}


/*
 *  Rename/move file/directory, returns false on error (and sets errno)
 */

bool extfs_rename(const char *old_path, const char *new_path)
{
        return rename(old_path, new_path) == 0;
}
Revision:	1.14
Committed:	2001-03-31T14:31:59Z (23 years, 7 months ago) by cebix
Branch:	MAIN
CVS Tags:	snapshot-29052001, release-0_9-1
Changes since 1.13:	+53 -56 lines
Log Message:	- fixed bugs in the BeOS extfs file types handling
#	User	Rev	Content
1	cebix	1.1	/*
2			* extfs_beos.cpp - MacOS file system for access native file system access, BeOS specific stuff
3			*
4	cebix	1.12	* Basilisk II (C) 1997-2001 Christian Bauer
5	cebix	1.1	*
6			* This program is free software; you can redistribute it and/or modify
7			* it under the terms of the GNU General Public License as published by
8			* the Free Software Foundation; either version 2 of the License, or
9			* (at your option) any later version.
10			*
11			* This program is distributed in the hope that it will be useful,
12			* but WITHOUT ANY WARRANTY; without even the implied warranty of
13			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14			* GNU General Public License for more details.
15			*
16			* You should have received a copy of the GNU General Public License
17			* along with this program; if not, write to the Free Software
18			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19			*/
20
21	cebix	1.2	#include "sysdeps.h"
22
23	cebix	1.1	#include <sys/types.h>
24			#include <sys/stat.h>
25	cebix	1.2	#include <string.h>
26	cebix	1.1	#include <stdio.h>
27			#include <stdlib.h>
28			#include <unistd.h>
29	cebix	1.2	#include <fcntl.h>
30	cebix	1.1	#include <dirent.h>
31			#include <errno.h>
32
33			#include <fs_attr.h>
34	cebix	1.2	#include <support/TypeConstants.h>
35			#include <storage/Mime.h>
36	cebix	1.1
37			#include "extfs.h"
38			#include "extfs_defs.h"
39
40			#define DEBUG 0
41			#include "debug.h"
42
43
44			// Default Finder flags
45			const uint16 DEFAULT_FINDER_FLAGS = kHasBeenInited;
46
47			// Temporary buffer for transfers from/to kernel space
48			const int TMP_BUF_SIZE = 0x10000;
49			static uint8 *tmp_buf = NULL;
50
51
52			/*
53			* Initialization
54			*/
55
56			void extfs_init(void)
57			{
58			// Allocate temporary buffer
59			tmp_buf = new uint8[TMP_BUF_SIZE];
60			}
61
62
63			/*
64			* Deinitialization
65			*/
66
67			void extfs_exit(void)
68			{
69			// Delete temporary buffer
70			delete[] tmp_buf;
71			}
72
73
74			/*
75	cebix	1.3	* Add component to path name
76			*/
77
78	cebix	1.5	void add_path_component(char path, const char component)
79	cebix	1.3	{
80			int l = strlen(path);
81	cebix	1.5	if (l < MAX_PATH_LENGTH-1 && path[l-1] != '/') {
82	cebix	1.3	path[l] = '/';
83			path[l+1] = 0;
84			}
85	cebix	1.5	strncat(path, component, MAX_PATH_LENGTH-1);
86	cebix	1.3	}
87
88
89			/*
90	cebix	1.11	* Get/set finder info for file/directory specified by full path
91	cebix	1.1	*/
92
93			struct mime2type {
94			const char *mime;
95			uint32 type;
96			uint32 creator;
97			bool reversible; // type -> mime translation possible
98			};
99
100			static const mime2type m2t_translation[] = {
101			{"application/x-compress", 'ZIVM', 'LZIV', true},
102			{"application/x-gzip", 'Gzip', 'Gzip', true},
103			{"application/x-macbinary", 'BINA', '????', false},
104			{"application/mac-binhex40", 'TEXT', 'SITx', false},
105			{"application/pdf", 'PDF ', 'CARO', true},
106			{"application/postscript", 'TEXT', 'ttxt', false},
107			{"application/x-stuffit", 'SIT!', 'SITx', true},
108			{"application/x-tar", 'TARF', 'TAR ', true},
109			{"application/x-uuencode", 'TEXT', 'SITx', false},
110			{"application/zip", 'ZIP ', 'ZIP ', true},
111			{"audio/x-8svx", '8SVX', 'SNDM', true},
112			{"audio/x-aifc", 'AIFC', 'TVOD', true},
113			{"audio/x-aiff", 'AIFF', 'TVOD', true},
114			{"audio/basic", 'ULAW', 'TVOD', true},
115			{"audio/x-midi", 'MIDI', 'TVOD', true},
116			{"audio/x-mpeg", 'MPG ', 'TVOD', true},
117			{"audio/x-wav", 'WAVE', 'TVOD', true},
118			{"image/x-bmp", 'BMPf', 'ogle', true},
119			{"image/gif", 'GIFf', 'ogle', true},
120			{"image/x-ilbm", 'ILBM', 'GKON', true},
121			{"image/jpeg", 'JPEG', 'ogle', true},
122			{"image/jpeg", 'JFIF', 'ogle', true},
123			{"image/x-photoshop", '8BPS', '8BIM', true},
124			{"image/pict", 'PICT', 'ogle', true},
125			{"image/png", 'PNGf', 'ogle', true},
126			{"image/x-sgi", '.SGI', 'ogle', true},
127			{"image/x-targa", 'TPIC', 'ogle', true},
128			{"image/tiff", 'TIFF', 'ogle', true},
129			{"text/html", 'TEXT', 'MOSS', false},
130			{"text/plain", 'TEXT', 'ttxt', true},
131			{"text/rtf", 'TEXT', 'MSWD', false},
132			{"text/x-source-code", 'TEXT', 'R*ch', false},
133			{"video/mpeg", 'MPEG', 'TVOD', true},
134			{"video/quicktime", 'MooV', 'TVOD', true},
135			{"video/x-flc", 'FLI ', 'TVOD', true},
136			{"video/x-msvideo", 'VfW ', 'TVOD', true},
137			{NULL, 0, 0, false} // End marker
138			};
139
140	cebix	1.14	void get_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir)
141	cebix	1.1	{
142	cebix	1.11	// Set default finder info
143			Mac_memset(finfo, 0, SIZEOF_FInfo);
144			if (fxinfo)
145			Mac_memset(fxinfo, 0, SIZEOF_FXInfo);
146			WriteMacInt16(finfo + fdFlags, DEFAULT_FINDER_FLAGS);
147			WriteMacInt32(finfo + fdLocation, (uint32)-1);
148	cebix	1.1
149			// Open file
150			int fd = open(path, O_RDONLY);
151			if (fd < 0)
152			return;
153
154	cebix	1.14	if (!is_dir) {
155	cebix	1.1
156	cebix	1.14	// Read BeOS MIME type
157			ssize_t actual = fs_read_attr(fd, "BEOS:TYPE", B_MIME_STRING_TYPE, 0, tmp_buf, 256);
158			tmp_buf[255] = 0;
159
160			if (actual > 0) {
161
162			// Translate MIME type to MacOS type/creator
163			uint8 mactype[4];
164			if (sscanf((char *)tmp_buf, "application/x-MacOS-%c%c%c%c", mactype, mactype+1, mactype+2, mactype+3) == 4) {
165
166			// MacOS style type
167			WriteMacInt32(finfo + fdType, (mactype[0] << 24) \| (mactype[1] << 16) \| (mactype[2] << 8) \| mactype[3]);
168
169			} else {
170
171			// MIME string, look in table
172			for (int i=0; m2t_translation[i].mime; i++) {
173			if (!strcmp((char *)tmp_buf, m2t_translation[i].mime)) {
174			WriteMacInt32(finfo + fdType, m2t_translation[i].type);
175			WriteMacInt32(finfo + fdCreator, m2t_translation[i].creator);
176			break;
177			}
178	cebix	1.1	}
179			}
180			}
181	cebix	1.14
182			// Override file type with MACOS:CREATOR attribute
183			if (fs_read_attr(fd, "MACOS:CREATOR", B_UINT32_TYPE, 0, tmp_buf, 4) == 4)
184			WriteMacInt32(finfo + fdCreator, (tmp_buf[0] << 24) \| (tmp_buf[1] << 16) \| (tmp_buf[2] << 8) \| tmp_buf[3]);
185	cebix	1.1	}
186
187	cebix	1.11	// Read MACOS:HFS_FLAGS attribute
188	cebix	1.14	if (fs_read_attr(fd, "MACOS:HFS_FLAGS", B_UINT16_TYPE, 0, tmp_buf, 2) == 2)
189			WriteMacInt16(finfo + fdFlags, (tmp_buf[0] << 8) \| tmp_buf[1]);
190	cebix	1.1
191			// Close file
192			close(fd);
193			}
194
195	cebix	1.14	void set_finfo(const char *path, uint32 finfo, uint32 fxinfo, bool is_dir)
196	cebix	1.1	{
197			// Open file
198			int fd = open(path, O_WRONLY);
199			if (fd < 0)
200			return;
201
202	cebix	1.14	if (!is_dir) {
203
204			// Set BEOS:TYPE attribute
205			uint32 type = ReadMacInt32(finfo + fdType);
206			if (type) {
207			for (int i=0; m2t_translation[i].mime; i++) {
208			if (m2t_translation[i].type == type && m2t_translation[i].reversible) {
209			fs_write_attr(fd, "BEOS:TYPE", B_MIME_STRING_TYPE, 0, m2t_translation[i].mime, strlen(m2t_translation[i].mime) + 1);
210			break;
211			}
212	cebix	1.1	}
213			}
214	cebix	1.14
215			// Set MACOS:CREATOR attribute
216			uint32 creator = ReadMacInt32(finfo + fdCreator);
217			if (creator) {
218			tmp_buf[0] = creator >> 24;
219			tmp_buf[1] = creator >> 16;
220			tmp_buf[2] = creator >> 8;
221			tmp_buf[3] = creator;
222			fs_write_attr(fd, "MACOS:CREATOR", B_UINT32_TYPE, 0, tmp_buf, 4);
223	cebix	1.1	}
224			}
225
226			// Write MACOS:HFS_FLAGS attribute
227	cebix	1.11	uint16 flags = ReadMacInt16(finfo + fdFlags);
228			if (flags != DEFAULT_FINDER_FLAGS) {
229	cebix	1.14	tmp_buf[0] = flags >> 8;
230			tmp_buf[1] = flags;
231			fs_write_attr(fd, "MACOS:HFS_FLAGS", B_UINT16_TYPE, 0, tmp_buf, 2);
232	cebix	1.11	} else
233	cebix	1.1	fs_remove_attr(fd, "MACOS:HFS_FLAGS");
234
235			// Close file
236			close(fd);
237			}
238
239
240			/*
241			* Resource fork emulation functions
242			*/
243
244			uint32 get_rfork_size(const char *path)
245			{
246			// Open file
247			int fd = open(path, O_RDONLY);
248			if (fd < 0)
249			return 0;
250
251			// Get size of MACOS:RFORK attribute
252			struct attr_info info;
253			if (fs_stat_attr(fd, "MACOS:RFORK", &info) < 0)
254			info.size = 0;
255
256			// Close file and return size
257			close(fd);
258			return info.size;
259			}
260
261			int open_rfork(const char *path, int flag)
262			{
263			// Open original file
264			int fd = open(path, flag);
265			if (fd < 0)
266			return -1;
267
268			// Open temporary file for resource fork
269			char rname[L_tmpnam];
270			tmpnam(rname);
271	cebix	1.6	int rfd = open(rname, O_RDWR \| O_CREAT \| O_TRUNC, 0666);
272	cebix	1.1	if (rfd < 0) {
273			close(fd);
274			return -1;
275			}
276			unlink(rname); // File will be deleted when closed
277
278			// Get size of MACOS:RFORK attribute
279			struct attr_info info;
280			if (fs_stat_attr(fd, "MACOS:RFORK", &info) < 0)
281			info.size = 0;
282
283			// Copy resource data from attribute to temporary file
284			if (info.size > 0) {
285
286			// Allocate buffer
287			void *buf = malloc(info.size);
288			if (buf == NULL) {
289			close(rfd);
290			close(fd);
291			return -1;
292			}
293
294			// Copy data
295			fs_read_attr(fd, "MACOS:RFORK", B_RAW_TYPE, 0, buf, info.size);
296			write(rfd, buf, info.size);
297			lseek(rfd, 0, SEEK_SET);
298
299			// Free buffer
300			if (buf)
301			free(buf);
302			}
303
304			// Close original file
305			close(fd);
306			return rfd;
307			}
308
309			void close_rfork(const char *path, int fd)
310			{
311			if (fd < 0)
312			return;
313
314			// Get size of temporary file
315			struct stat st;
316			if (fstat(fd, &st) < 0)
317			st.st_size = 0;
318
319			// Open original file
320			int ofd = open(path, O_WRONLY);
321			if (ofd > 0) {
322
323			// Copy resource data to MACOS:RFORK attribute
324			if (st.st_size > 0) {
325
326			// Allocate buffer
327			void *buf = malloc(st.st_size);
328			if (buf == NULL) {
329			close(ofd);
330			close(fd);
331			return;
332			}
333
334			// Copy data
335			lseek(fd, 0, SEEK_SET);
336			read(fd, buf, st.st_size);
337			fs_write_attr(ofd, "MACOS:RFORK", B_RAW_TYPE, 0, buf, st.st_size);
338
339			// Free buffer
340			if (buf)
341			free(buf);
342
343			} else
344			fs_remove_attr(ofd, "MACOS:RFORK");
345
346			// Close original file
347			close(ofd);
348			}
349
350			// Close temporary file
351			close(fd);
352			}
353
354
355			/*
356			* Read "length" bytes from file to "buffer",
357	cebix	1.9	* returns number of bytes read (or -1 on error)
358	cebix	1.1	*/
359
360			static inline ssize_t sread(int fd, void *buf, size_t count)
361			{
362			ssize_t res;
363			while ((res = read(fd, buf, count)) == B_INTERRUPTED) ;
364			return res;
365			}
366
367	cebix	1.9	ssize_t extfs_read(int fd, void *buffer, size_t length)
368	cebix	1.1	{
369			// Buffer in kernel space?
370			if ((uint32)buffer < 0x80000000) {
371
372			// Yes, transfer via buffer
373	cebix	1.9	ssize_t actual = 0;
374	cebix	1.1	while (length) {
375			size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length;
376			ssize_t res = sread(fd, tmp_buf, transfer_size);
377	cebix	1.9	if (res < 0)
378			return res;
379			memcpy(buffer, tmp_buf, res);
380			buffer = (void )((uint8 )buffer + res);
381			length -= res;
382			actual += res;
383	cebix	1.1	if (res != transfer_size)
384			return actual;
385			}
386	cebix	1.9	return actual;
387	cebix	1.1
388			} else {
389
390			// No, transfer directly
391	cebix	1.9	return sread(fd, buffer, length);
392	cebix	1.1	}
393			}
394
395
396			/*
397			* Write "length" bytes from "buffer" to file,
398	cebix	1.9	* returns number of bytes written (or -1 on error)
399	cebix	1.1	*/
400
401			static inline ssize_t swrite(int fd, void *buf, size_t count)
402			{
403			ssize_t res;
404			while ((res = write(fd, buf, count)) == B_INTERRUPTED) ;
405			return res;
406			}
407
408	cebix	1.9	ssize_t extfs_write(int fd, void *buffer, size_t length)
409	cebix	1.1	{
410			// Buffer in kernel space?
411			if ((uint32)buffer < 0x80000000) {
412
413			// Yes, transfer via buffer
414	cebix	1.9	ssize_t actual = 0;
415	cebix	1.1	while (length) {
416			size_t transfer_size = (length > TMP_BUF_SIZE) ? TMP_BUF_SIZE : length;
417			memcpy(tmp_buf, buffer, transfer_size);
418			ssize_t res = swrite(fd, tmp_buf, transfer_size);
419	cebix	1.9	if (res < 0)
420			return res;
421			buffer = (void )((uint8 )buffer + res);
422			length -= res;
423			actual += res;
424	cebix	1.1	if (res != transfer_size)
425			return actual;
426			}
427	cebix	1.9	return actual;
428	cebix	1.1
429			} else {
430
431			// No, transfer directly
432	cebix	1.9	return swrite(fd, buffer, length);
433	cebix	1.1	}
434			}
435	cebix	1.7
436
437			/*
438			* Remove file/directory, returns false on error (and sets errno)
439			*/
440
441			bool extfs_remove(const char *path)
442			{
443			if (remove(path) < 0) {
444			if (errno == EISDIR)
445			return rmdir(path) == 0;
446			else
447			return false;
448			}
449			return true;
450			}
451	cebix	1.8
452
453			/*
454			* Rename/move file/directory, returns false on error (and sets errno)
455			*/
456
457			bool extfs_rename(const char old_path, const char new_path)
458			{
459			return rename(old_path, new_path) == 0;
460			}