Import BSDDB 4.7.25 (as of svn r89086)

common/mkpath.c

@@ -0,0 +1,68 @@
+/*-
+ * See the file LICENSE for redistribution information.
+ *
+ * Copyright (c) 1997,2008 Oracle.  All rights reserved.
+ *
+ * $Id: mkpath.c 63573 2008-05-23 21:43:21Z trent.nelson $
+ */
+
+#include "db_config.h"
+
+#include "db_int.h"
+
+/*
+ * __db_mkpath -- --
+ *	Create intermediate directories.
+ *
+ * PUBLIC: int __db_mkpath __P((ENV *, const char *));
+ */
+int
+__db_mkpath(env, name)
+	ENV *env;
+	const char *name;
+{
+	size_t len;
+	int ret;
+	char *p, *t, savech;
+
+	/*
+	 * Get a copy so we can modify the string.  It's a path and potentially
+	 * quite long, so don't allocate the space on the stack.
+	 */
+	len = strlen(name) + 1;
+	if ((ret = __os_malloc(env, len, &t)) != 0)
+		return (ret);
+	memcpy(t, name, len);
+
+	/*
+	 * Cycle through the path, creating intermediate directories.
+	 *
+	 * Skip the first byte if it's a path separator, it's the start of an
+	 * absolute pathname.
+	 */
+	if (PATH_SEPARATOR[1] == '\0') {
+		for (p = t + 1; p[0] != '\0'; ++p)
+			if (p[0] == PATH_SEPARATOR[0]) {
+				savech = *p;
+				*p = '\0';
+				if (__os_exists(env, t, NULL) &&
+				    (ret = __os_mkdir(
+					env, t, env->dir_mode)) != 0)
+					break;
+				*p = savech;
+			}
+	} else
+		for (p = t + 1; p[0] != '\0'; ++p)
+			if (strchr(PATH_SEPARATOR, p[0]) != NULL) {
+				savech = *p;
+				*p = '\0';
+				if (__os_exists(env, t, NULL) &&
+				    (ret = __os_mkdir(
+					env, t, env->dir_mode)) != 0)
+					break;
+				*p = savech;
+			}
+
+	__os_free(env, t);
+	return (ret);
+}