Home | History | Annotate | Line # | Download | only in src 
      1 /*
      2 
      3 Copyright 1988, 1998  The Open Group
      4 
      5 Permission to use, copy, modify, distribute, and sell this software and its
      6 documentation for any purpose is hereby granted without fee, provided that
      7 the above copyright notice appear in all copies and that both that
      8 copyright notice and this permission notice appear in supporting
      9 documentation.
     10 
     11 The above copyright notice and this permission notice shall be included in
     12 all copies or substantial portions of the Software.
     13 
     14 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
     15 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
     16 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
     17 OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
     18 AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
     19 CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
     20 
     21 Except as contained in this notice, the name of The Open Group shall not be
     22 used in advertising or otherwise to promote the sale, use or other dealings
     23 in this Software without prior written authorization from The Open Group.
     24 
     25 */
     26 
     27 /*
     28  * This file contains routines to cache atoms, avoiding multiple
     29  * server round-trips.  Not so useful now that Xlib caches them.
     30  *
     31  * Public entry points:
     32  *
     33  *	XmuMakeAtom		creates & initializes an opaque AtomRec
     34  *	XmuInternAtom		fetches an Atom from cache or Display
     35  *	XmuInternStrings	fetches multiple Atoms as strings
     36  *	XmuGetAtomName		returns name of an Atom
     37  *	XmuNameOfAtom		returns name from an AtomPtr
     38  */
     39 
     40 #ifdef HAVE_CONFIG_H
     41 #include <config.h>
     42 #endif
     43 #include <X11/Intrinsic.h>
     44 #include "Atoms.h"
     45 
     46 typedef struct _DisplayRec {
     47     struct _DisplayRec* next;
     48     Display *dpy;
     49     Atom atom;
     50 } DisplayRec;
     51 
     52 struct _AtomRec {
     53     _Xconst char *name;
     54     DisplayRec* head;
     55 };
     56 
     57 #define DeclareAtom(atom,text) \
     58 static struct _AtomRec __##atom = { text, NULL }; \
     59 AtomPtr _##atom = &__##atom;
     60 
     61 DeclareAtom(XA_ATOM_PAIR,		"ATOM_PAIR"		)
     62 DeclareAtom(XA_CHARACTER_POSITION,	"CHARACTER_POSITION"	)
     63 DeclareAtom(XA_CLASS,			"CLASS"			)
     64 DeclareAtom(XA_CLIENT_WINDOW,		"CLIENT_WINDOW"		)
     65 DeclareAtom(XA_CLIPBOARD,		"CLIPBOARD"		)
     66 DeclareAtom(XA_COMPOUND_TEXT,		"COMPOUND_TEXT"		)
     67 DeclareAtom(XA_DECNET_ADDRESS,		"DECNET_ADDRESS"	)
     68 DeclareAtom(XA_DELETE,			"DELETE"		)
     69 DeclareAtom(XA_FILENAME,		"FILENAME"		)
     70 DeclareAtom(XA_HOSTNAME,		"HOSTNAME"		)
     71 DeclareAtom(XA_IP_ADDRESS,		"IP_ADDRESS"		)
     72 DeclareAtom(XA_LENGTH,			"LENGTH"		)
     73 DeclareAtom(XA_LIST_LENGTH,		"LIST_LENGTH"		)
     74 DeclareAtom(XA_NAME,			"NAME"			)
     75 DeclareAtom(XA_NET_ADDRESS,		"NET_ADDRESS"		)
     76 DeclareAtom(XA_NULL,			"NULL"			)
     77 DeclareAtom(XA_OWNER_OS,		"OWNER_OS"		)
     78 DeclareAtom(XA_SPAN,			"SPAN"			)
     79 DeclareAtom(XA_TARGETS,			"TARGETS"		)
     80 DeclareAtom(XA_TEXT,			"TEXT"			)
     81 DeclareAtom(XA_TIMESTAMP,		"TIMESTAMP"		)
     82 DeclareAtom(XA_USER,			"USER"			)
     83 DeclareAtom(XA_UTF8_STRING,		"UTF8_STRING"		)
     84 
     85 /******************************************************************
     86 
     87   Public procedures
     88 
     89  ******************************************************************/
     90 
     91 
     92 AtomPtr
     93 XmuMakeAtom(_Xconst char *name)
     94 {
     95     AtomPtr ptr = XtNew(struct _AtomRec);
     96     ptr->name = name;
     97     ptr->head = NULL;
     98     return ptr;
     99 }
    100 
    101 char *
    102 XmuNameOfAtom(AtomPtr atom_ptr)
    103 {
    104     return (char *) atom_ptr->name;
    105 }
    106 
    107 
    108 Atom
    109 XmuInternAtom(Display *d, AtomPtr atom_ptr)
    110 {
    111     DisplayRec* display_rec;
    112     for (display_rec = atom_ptr->head; display_rec != NULL;
    113 	 display_rec = display_rec->next) {
    114 	if (display_rec->dpy == d)
    115 	    return display_rec->atom;
    116     }
    117     display_rec = XtNew(DisplayRec);
    118     display_rec->next = atom_ptr->head;
    119     atom_ptr->head = display_rec;
    120     display_rec->dpy = d;
    121     display_rec->atom = XInternAtom(d, atom_ptr->name, False);
    122     return display_rec->atom;
    123 }
    124 
    125 
    126 char *
    127 XmuGetAtomName(Display *d, Atom atom)
    128 {
    129     if (atom == 0) return (NULL);
    130     return XGetAtomName(d, atom);
    131 }
    132 
    133 /* convert (names, count) to a list of atoms. Caller allocates list */
    134 void
    135 XmuInternStrings(Display *d, register String *names,
    136 		 register Cardinal count, register Atom *atoms)
    137 {
    138     (void) XInternAtoms(d, (char**)names, (int)count, FALSE, atoms);
    139 }
    140