From 0cc9b20c15460213e488bf5e70963b941482f628 Mon Sep 17 00:00:00 2001
From: William Harrington <kb0iic@berzerkula.org>
Date: Tue, 14 Jan 2025 16:06:02 -0600
Subject: Add source.

---
 sdk/other/filename.c | 74 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 74 insertions(+)
 create mode 100644 sdk/other/filename.c

(limited to 'sdk/other/filename.c')

diff --git a/sdk/other/filename.c b/sdk/other/filename.c
new file mode 100644
index 0000000..2a7275e
--- /dev/null
+++ b/sdk/other/filename.c
@@ -0,0 +1,74 @@
+/*
+ * Portable file and directory name functions.
+ * $Id$
+ * Copyright (c) 1997 by Tycho Softworks.
+ * For conditions of distribution and reuse see product license.
+ */
+
+#include <other/files.h>
+#include <std/string.h>
+#include <std/math.h>
+
+char *dirname(char *path)
+{
+	char *p = basename(path);
+	if(p == path)
+		return ".";
+	
+	*(--p) = 0;
+	return path;
+}
+
+char *basename(const char *path)
+{
+	char *p = strrchr(path, '/');
+#if defined(_MSDOS) || defined(_OS2) || defined(_WIN32)
+	char *p1 = strrchr(path, '\\');
+	p = max(p, p1);
+#endif
+	
+	if(p)
+		return ++p;
+	else
+		return (char *)path;
+}
+
+char *extfname(const char *path)
+{
+	char *e = strrchr(pathfname(path), '.');
+
+	if(e)
+		return e;
+	else
+		return "";
+}
+
+bool	ispath(const char *p)
+{
+	if(strchr(p, '/'))
+		return TRUE;
+#if defined(_MSDOS) || defined(_OS2) || defined(_WIN32)
+	if(strchr(p, '\\'))
+		return TRUE;
+#endif
+	return FALSE;
+}
+
+bool	isroot(const char *p)
+{
+#if defined(_MSDOS) || defined(_OS2) || defined(_WIN32)
+	if(!strncmp(p, "\\\\", 2))
+		return TRUE;
+	
+	if(p[1] == ':')
+		return TRUE;	
+#else
+	if(*p == '/')
+		return TRUE;
+#endif
+	return FALSE;
+}
+
+
+
+
-- 
cgit v1.2.3-54-g00ecf