114 lines
2.9 KiB
C
114 lines
2.9 KiB
C
|
/* xscreensaver, Copyright (c) 1992, 1997, 1998
|
||
|
|
* Jamie Zawinski <jwz@jwz.org>
|
||
|
|
*
|
||
|
|
* 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. No representations are made about the suitability of this
|
||
|
|
* software for any purpose. It is provided "as is" without express or
|
||
|
|
* implied warranty.
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include "utils.h"
|
||
|
|
#include "resources.h"
|
||
|
|
#include <X11/Xresource.h>
|
||
|
|
|
||
|
|
|
||
|
|
/* Resource functions. Assumes: */
|
||
|
|
|
||
|
|
extern char *progname;
|
||
|
|
extern char *progclass;
|
||
|
|
extern XrmDatabase db;
|
||
|
|
|
||
|
|
#ifndef isupper
|
||
|
|
# define isupper(c) ((c) >= 'A' && (c) <= 'Z')
|
||
|
|
#endif
|
||
|
|
#ifndef _tolower
|
||
|
|
# define _tolower(c) ((c) - 'A' + 'a')
|
||
|
|
#endif
|
||
|
|
|
||
|
|
char *
|
||
|
|
get_string_resource (char *res_name, char *res_class)
|
||
|
|
{
|
||
|
|
XrmValue value;
|
||
|
|
char *type;
|
||
|
|
char full_name [1024], full_class [1024];
|
||
|
|
strcpy (full_name, progname);
|
||
|
|
strcat (full_name, ".");
|
||
|
|
strcat (full_name, res_name);
|
||
|
|
strcpy (full_class, progclass);
|
||
|
|
strcat (full_class, ".");
|
||
|
|
strcat (full_class, res_class);
|
||
|
|
if (XrmGetResource (db, full_name, full_class, &type, &value))
|
||
|
|
{
|
||
|
|
char *str = (char *) malloc (value.size + 1);
|
||
|
|
strncpy (str, (char *) value.addr, value.size);
|
||
|
|
str [value.size] = 0;
|
||
|
|
return str;
|
||
|
|
}
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
Bool
|
||
|
|
get_boolean_resource (char *res_name, char *res_class)
|
||
|
|
{
|
||
|
|
char *tmp, buf [100];
|
||
|
|
char *s = get_string_resource (res_name, res_class);
|
||
|
|
char *os = s;
|
||
|
|
if (! s) return 0;
|
||
|
|
for (tmp = buf; *s; s++)
|
||
|
|
*tmp++ = isupper (*s) ? _tolower (*s) : *s;
|
||
|
|
*tmp = 0;
|
||
|
|
free (os);
|
||
|
|
|
||
|
|
while (*buf &&
|
||
|
|
(buf[strlen(buf)-1] == ' ' ||
|
||
|
|
buf[strlen(buf)-1] == '\t'))
|
||
|
|
buf[strlen(buf)-1] = 0;
|
||
|
|
|
||
|
|
if (!strcmp (buf, "on") || !strcmp (buf, "true") || !strcmp (buf, "yes"))
|
||
|
|
return 1;
|
||
|
|
if (!strcmp (buf,"off") || !strcmp (buf, "false") || !strcmp (buf,"no"))
|
||
|
|
return 0;
|
||
|
|
fprintf (stderr, "%s: %s must be boolean, not %s.\n",
|
||
|
|
progname, res_name, buf);
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
unsigned int
|
||
|
|
get_pixel_resource (char *res_name, char *res_class,
|
||
|
|
Display *dpy, Colormap cmap)
|
||
|
|
{
|
||
|
|
XColor color;
|
||
|
|
char *s = get_string_resource (res_name, res_class);
|
||
|
|
char *s2;
|
||
|
|
if (!s) goto DEFAULT;
|
||
|
|
|
||
|
|
for (s2 = s + strlen(s) - 1; s2 > s; s2--)
|
||
|
|
if (*s2 == ' ' || *s2 == '\t')
|
||
|
|
*s2 = 0;
|
||
|
|
else
|
||
|
|
break;
|
||
|
|
|
||
|
|
if (! XParseColor (dpy, cmap, s, &color))
|
||
|
|
{
|
||
|
|
fprintf (stderr, "%s: can't parse color %s\n", progname, s);
|
||
|
|
goto DEFAULT;
|
||
|
|
}
|
||
|
|
if (! XAllocColor (dpy, cmap, &color))
|
||
|
|
{
|
||
|
|
fprintf (stderr, "%s: couldn't allocate color %s\n", progname, s);
|
||
|
|
goto DEFAULT;
|
||
|
|
}
|
||
|
|
free (s);
|
||
|
|
return color.pixel;
|
||
|
|
DEFAULT:
|
||
|
|
if (s) free (s);
|
||
|
|
return ((strlen(res_class) >= 10 &&
|
||
|
|
!strcmp ("Background", res_class + strlen(res_class) - 10))
|
||
|
|
? BlackPixel (dpy, DefaultScreen (dpy))
|
||
|
|
: WhitePixel (dpy, DefaultScreen (dpy)));
|
||
|
|
}
|
||
|
|
|