Initial source

1 files changed, 75 insertions, 0 deletions

diff --git a/i386/dos/dos_fstat.c b/i386/dos/dos_fstat.c
new file mode 100644
index 0000000..0c48016
--- /dev/null
+++ b/i386/dos/dos_fstat.c
@@ -0,0 +1,75 @@
+/* 
+ * Copyright (c) 1995-1994 The University of Utah and
+ * the Computer Systems Laboratory at the University of Utah (CSL).
+ * All rights reserved.
+ *
+ * Permission to use, copy, modify and distribute this software is hereby
+ * granted provided that (1) source code retains these copyright, permission,
+ * and disclaimer notices, and (2) redistributions including binaries
+ * reproduce the notices in supporting documentation, and (3) all advertising
+ * materials mentioning features or use of this software display the following
+ * acknowledgement: ``This product includes software developed by the
+ * Computer Systems Laboratory at the University of Utah.''
+ *
+ * THE UNIVERSITY OF UTAH AND CSL ALLOW FREE USE OF THIS SOFTWARE IN ITS "AS
+ * IS" CONDITION.  THE UNIVERSITY OF UTAH AND CSL DISCLAIM ANY LIABILITY OF
+ * ANY KIND FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
+ *
+ * CSL requests users of this software to return to csl-dist@cs.utah.edu any
+ * improvements that they make and grant CSL redistribution rights.
+ *
+ *      Author: Bryan Ford, University of Utah CSL
+ */
+
+#include <unistd.h>
+#include <errno.h>
+#include <string.h>
+#include <sys/stat.h>
+
+#include "dos_io.h"
+
+int dos_fstat(dos_fd_t fd, struct stat *st)
+{
+	int err;
+	int actual = 0;
+	struct real_call_data real_call_data;
+	vm_offset_t old_pos, new_pos;
+
+	dos_init_rcd(&real_call_data);
+
+	bzero(st, sizeof(*st));
+	st->st_nlink = 1;
+	st->st_mode = S_IRWXU | S_IRWXG | S_IRWXO; /* XXX attributes */
+
+	/* Get device information,
+	   which will tell us whether this is a character device
+	   or a regular file.  */
+	real_call_data.eax = 0x4400;
+	real_call_data.ebx = fd;
+	real_int(0x21, &real_call_data);
+	if (err = dos_check_err(&real_call_data))
+		return err;
+	if (real_call_data.edx & (1<<7))
+		st->st_mode |= S_IFCHR;
+	else
+		st->st_mode |= S_IFREG;
+
+	/* XXX get date/time with int 21 5700 */
+
+	/* Get file size by seeking to the end and back.  */
+	if (!dos_seek(fd, 0, 1, &old_pos)
+	    && !dos_seek(fd, 0, 2, &st->st_size))
+	{
+		if (err = dos_seek(fd, old_pos, 0, &new_pos))
+			return err;
+		if (new_pos != old_pos)
+			return EIO;/*XXX*/
+	}
+
+	/* Always assume 512-byte blocks for now... */
+	st->st_blocks = (st->st_size + 511) / 512;
+	st->st_blksize = 512;
+
+	return 0;
+}
+