Initial revision

lang/cem/libcc/gen/readdir.c

@@ -0,0 +1,64 @@
+#include <sys/types.h>
+#include <sys/dir.h>
+
+#ifndef BSD4_2
+/*
+ * read an old stlye directory entry and present it as a new one
+ */
+#define	ODIRSIZ	14
+
+struct	olddirect {
+	ino_t	od_ino;
+	char	od_name[ODIRSIZ];
+};
+#else
+#define olddirect direct
+#endif
+
+/*
+ * get next entry in a directory.
+ */
+struct direct *readdir(dirp)
+register DIR *dirp;
+{
+	register struct olddirect *dp;
+	static struct direct dir;
+
+	for (;;) {
+		if (dirp->dd_loc == 0) {
+			dirp->dd_size = read(dirp->dd_fd, dirp->dd_buf, 
+					     DIRBLKSIZ);
+			if (dirp->dd_size <= 0) {
+				dirp->dd_size = 0;
+				return NULL;
+			}
+#ifdef BSD4_2
+			if (! ((struct direct *) dirp->dd_buf)->d_ino) {
+				dirp->dd_loc += ((struct direct *)dirp->dd_buf)->d_reclen;
+			}
+#endif
+		}
+		if (dirp->dd_loc >= dirp->dd_size) {
+			dirp->dd_loc = 0;
+			continue;
+		}
+		dp = (struct olddirect *) (dirp->dd_buf + dirp->dd_loc);
+#ifndef BSD4_2
+		dirp->dd_loc += sizeof (struct olddirect);
+		if (dp->od_ino == 0)
+			continue;
+		dir.d_ino = dp->od_ino;
+		strncpy(dir.d_name, dp->od_name, ODIRSIZ);
+		dir.d_name[ODIRSIZ] = '\0'; /* insure null termination */
+		dir.d_reclen = DIRSIZ(&dir);
+		dir.d_namlen = strlen(dir.d_name);
+#else
+		dirp->dd_loc += dp->d_reclen;
+		dir.d_ino = dp->d_ino;
+		strcpy(dir.d_name, dp->d_name);
+		dir.d_reclen = dp->d_reclen;
+		dir.d_namlen = dp->d_namlen;
+#endif
+		return &dir;
+	}
+}