BSD 4_4_Lite1 development

Work on file usr/src/contrib/X11R5-lib/lib/X/XScrResStr.c

Synthesized-from: CSRG/cd2/4.4BSD-Lite1

diff --git a/usr/src/contrib/X11R5-lib/lib/X/XScrResStr.c b/usr/src/contrib/X11R5-lib/lib/X/XScrResStr.c
new file mode 100644 (file)
index 0000000..1594c85
--- /dev/null
+++ b/usr/src/contrib/X11R5-lib/lib/X/XScrResStr.c
@@ -0,0 +1,42 @@
+/* $XConsortium: XScrResStr.c,v 1.2 91/02/04 09:30:59 rws Exp $ */
+/* Copyright    Massachusetts Institute of Technology    1991  */
+
+/*
+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 M.I.T. not be used in advertising or
+publicity pertaining to distribution of the software without specific,
+written prior permission.  M.I.T. makes no representations about the
+suitability of this software for any purpose.  It is provided "as is"
+without express or implied warranty.
+*/
+
+#include "Xlibint.h"
+#include <X11/Xatom.h>
+
+char *XScreenResourceString(screen)
+       Screen *screen;
+{
+    Atom prop_name;
+    Atom actual_type;
+    int actual_format;
+    unsigned long nitems;
+    unsigned long leftover;
+    char *val = NULL;
+
+    prop_name = XInternAtom(screen->display, "SCREEN_RESOURCES", True);
+    if (prop_name &&
+       XGetWindowProperty(screen->display, screen->root, prop_name,
+                          0L, 100000000L, False,
+                          XA_STRING, &actual_type, &actual_format,
+                          &nitems, &leftover,
+                          (unsigned char **) &val) == Success) {
+       if ((actual_type == XA_STRING) && (actual_format == 8))
+           return val;
+       if (val)
+           Xfree(val);
+    }
+    return (char *)NULL;
+}