1 files changed, 61 insertions, 0 deletions
diff --git a/src/builtins/dir.c b/src/builtins/dir.c
new file mode 100644
index 0000000..c657710
--- /dev/null
+++ b/src/builtins/dir.c
@@ -0,0 +1,61 @@
+/*
+ * Id: dir.c,v 1.2 1999/11/02 06:16:47 keithp Exp $
+ *
+ * Copyright 1999 SuSE, Inc.
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of SuSE not be used in advertising or
+ * publicity pertaining to distribution of the software without specific,
+ * written prior permission.  SuSE makes no representations about the
+ * suitability of this software for any purpose.  It is provided "as is"
+ * without express or implied warranty.
+ *
+ * SuSE DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL SuSE
+ * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
+ * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN 
+ * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ * Author:  Keith Packard, SuSE, Inc.
+ */
+/* $XFree86: xc/lib/font/builtins/dir.c,v 1.4 2000/02/23 20:29:33 dawes Exp $ */
+
+#include "builtin.h"
+
+int
+BuiltinReadDirectory (directory, pdir)
+    char		*directory;
+    FontDirectoryPtr	*pdir;
+{
+    FontDirectoryPtr	dir;
+    int			i;
+
+    dir = FontFileMakeDir ("", builtin_dir_count);
+    for (i = 0; i < builtin_dir_count; i++)
+    {
+	if (!FontFileAddFontFile (dir,
+				  (char *) builtin_dir[i].font_name,
+				  (char *) builtin_dir[i].file_name))
+	{
+	    FontFileFreeDir (dir);
+	    return BadFontPath;
+	}
+    }
+    for (i = 0; i < builtin_alias_count; i++)
+    {
+	if (!FontFileAddFontAlias (dir, 
+				   (char *) builtin_alias[i].alias_name,
+				   (char *) builtin_alias[i].font_name))
+	{
+	    FontFileFreeDir (dir);
+	    return BadFontPath;
+	}
+    }
+    FontFileSortDir (dir);
+    *pdir = dir;
+    return Successful;
+}