/* * fontconfig/src/fclist.c * * Copyright © 2000 Keith Packard * * 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 the author(s) not be used in * advertising or publicity pertaining to distribution of the software without * specific, written prior permission. The authors make no * representations about the suitability of this software for any purpose. It * is provided "as is" without express or implied warranty. * * THE AUTHOR(S) DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO * EVENT SHALL THE AUTHOR(S) 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. */ #include "fcint.h" static unsigned int FcObjectTypeHash (register const char *str, register FC_GPERF_SIZE_T len); static const struct FcObjectTypeInfo * FcObjectTypeLookup (register const char *str, register FC_GPERF_SIZE_T len); #include "fcobjshash.h" #include /* The 1000 is to leave some room for future added internal objects, such * that caches from newer fontconfig can still be used with older fontconfig * without getting confused. */ static fc_atomic_int_t next_id = FC_MAX_BASE_OBJECT + FC_EXT_OBJ_INDEX; struct FcObjectOtherTypeInfo { struct FcObjectOtherTypeInfo *next; FcObjectType object; FcObject id; } *other_types; void FcObjectFini (void) { struct FcObjectOtherTypeInfo *ots, *ot; retry: ots = fc_atomic_ptr_get (&other_types); if (!ots) return; if (!fc_atomic_ptr_cmpexch (&other_types, ots, NULL)) goto retry; while (ots) { ot = ots->next; if (ots->object.object) free (ots->object.object); free (ots); ots = ot; } } static FcObjectType * _FcObjectLookupOtherTypeByName (const char *str, FcObject *id) { struct FcObjectOtherTypeInfo *ots, *ot; retry: ots = fc_atomic_ptr_get (&other_types); for (ot = ots; ot; ot = ot->next) if (0 == strcmp (ot->object.object, str)) break; if (!ot) { ot = malloc (sizeof (*ot)); if (!ot) return NULL; ot->object.object = (char *) FcStrdup (str); ot->object.type = FcTypeUnknown; ot->id = fc_atomic_int_add (next_id, +1); if (ot->id < (FC_MAX_BASE_OBJECT + FC_EXT_OBJ_INDEX)) { fprintf (stderr, "Fontconfig error: No object ID to assign\n"); abort (); } ot->next = ots; if (!fc_atomic_ptr_cmpexch (&other_types, ots, ot)) { if (ot->object.object) free (ot->object.object); free (ot); goto retry; } } if (id) *id = ot->id; return &ot->object; } FcObject FcObjectLookupBuiltinIdByName (const char *str) { const struct FcObjectTypeInfo *o = FcObjectTypeLookup (str, strlen (str)); if (o) return o->id; return 0; } FcObject FcObjectLookupIdByName (const char *str) { const struct FcObjectTypeInfo *o = FcObjectTypeLookup (str, strlen (str)); FcObject id; if (o) return o->id; if (_FcObjectLookupOtherTypeByName (str, &id)) return id; return 0; } const char * FcObjectLookupOtherNameById (FcObject id) { struct FcObjectOtherTypeInfo *ot; for (ot = fc_atomic_ptr_get (&other_types); ot; ot = ot->next) if (ot->id == id) return ot->object.object; return NULL; } const FcObjectType * FcObjectLookupOtherTypeByName (const char *str) { return _FcObjectLookupOtherTypeByName (str, NULL); } FcPrivate const FcObjectType * FcObjectLookupOtherTypeById (FcObject id) { struct FcObjectOtherTypeInfo *ot; for (ot = fc_atomic_ptr_get (&other_types); ot; ot = ot->next) if (ot->id == id) return &ot->object; return NULL; } #include "fcaliastail.h" #undef __fcobjs__