richterm

commit fd4f1616bd5ca5c42fc6448d95151becb11b7bad
parent e8a244ca5cba8f49d5db04892bfbcd86836c93ad
Author: glenda <glenda@9front.local>
Date:   Fri,  3 Sep 2021 15:58:27 +0000

add simple Dir command

Diffstat:
A
extra/Dir.c
 | 
71
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
M
extra/mkfile
 | 
6
+++---

2 files changed, 74 insertions(+), 3 deletions(-)
diff --git a/extra/Dir.c b/extra/Dir.c
@@ -0,0 +1,71 @@
+#include <u.h>
+#include <libc.h>
+#include <bio.h>
+
+char *rroot = "/mnt/richterm";
+
+char *
+getnewid(void)
+{
+	char *s, *id;
+	int fd;
+	long n;
+	s = smprint("%s/new", rroot);
+	fd = open(s, OREAD);
+	free(s);
+	if (fd < 0) sysfatal("getnewid: %r");
+	id = mallocz(256, 1);
+	n = read(fd, id, 256);
+	if (n <= 0) sysfatal("getnewid: %r");
+	return id;
+}
+
+int
+rprint(char *id, char *file, char *str)
+{
+	int fd;
+	long n;
+	char *path;
+	path = smprint("%s/%s/%s", rroot, id, file);
+	fd = open(path, OWRITE);
+	if (fd < 0) sysfatal("rprint: %r");
+	n = write(fd, str, strlen(str));
+	if (n < 0) sysfatal("rprint: %r");
+	close(fd);
+	return 0;
+}
+
+void
+main(int argc, char **argv)
+{
+	int fd;
+	long i, n;
+	Dir *dp, *dbuf;
+	char *path, buf[4096];
+	path = getwd(buf, sizeof(buf));
+	if (argc == 2) path = argv[1];
+	fd = open(path, OREAD);
+	if (fd < 0) sysfatal("%r");
+	dp = dirfstat(fd);
+	if (dp == nil) sysfatal("%r");
+	if (dp->mode & DMDIR) {
+		dbuf = mallocz(DIRMAX, 1);
+		n = dirreadall(fd, &dbuf);
+		for (i = 0; i < n; i++) {
+			char *id, *link, *text;
+			id = getnewid();
+			text = smprint("%s/%s/text", rroot, id);
+			link = smprint("%s/%s/link", rroot, id);
+			rprint(id, "text", dbuf[i].name);
+			rprint(id, "link", dbuf[i].name);
+			free(id);
+			free(link);
+			free(text);
+			id = getnewid();
+			text = smprint("%s/%s/text", rroot, id);
+			rprint(id, "text", "\n");
+			free(id);
+			free(text);
+		}
+	} else sysfatal("not a directory");
+}
diff --git a/extra/mkfile b/extra/mkfile
@@ -1,5 +1,6 @@
 </$objtype/mkfile
 
-TARG=mdprint
+TARG=mdprint\
+	Dir\
 
-</sys/src/cmd/mkmany
-\ No newline at end of file
+</sys/src/cmd/mkmany