/*
* 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 Keith Packard not be used in
* advertising or publicity pertaining to distribution of the software without
* specific, written prior permission. Keith Packard makes no
* representations about the suitability of this software for any purpose. It
* is provided "as is" without express or implied warranty.
*
* KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
* EVENT SHALL KEITH PACKARD 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 "xftint.h"
_X_EXPORT FcPattern *
XftFontMatch (Display *dpy,
int screen,
_Xconst FcPattern *pattern,
FcResult *result)
{
FcPattern *new;
FcPattern *match;
if (!XftInit (NULL))
return NULL;
new = FcPatternDuplicate (pattern);
if (!new)
return NULL;
if (XftDebug () & XFT_DBG_OPENV)
{
printf ("XftFontMatch pattern ");
FcPatternPrint (new);
}
FcConfigSubstitute (NULL, new, FcMatchPattern);
if (XftDebug () & XFT_DBG_OPENV)
{
printf ("XftFontMatch after FcConfig substitutions ");
FcPatternPrint (new);
}
XftDefaultSubstitute (dpy, screen, new);
if (XftDebug () & XFT_DBG_OPENV)
{
printf ("XftFontMatch after X resource substitutions ");
FcPatternPrint (new);
}
match = FcFontMatch (NULL, new, result);
if (XftDebug () & XFT_DBG_OPENV)
{
printf ("XftFontMatch result ");
FcPatternPrint (match);
}
FcPatternDestroy (new);
return match;
}
_X_EXPORT XftFont *
XftFontOpen (Display *dpy, int screen, ...)
{
va_list va;
FcPattern *pat;
FcPattern *match;
FcResult result;
XftFont *font;
va_start (va, screen);
pat = FcPatternVaBuild (NULL, va);
va_end (va);
if (!pat)
{
if (XftDebug () & XFT_DBG_OPEN)
printf ("XftFontOpen: Invalid pattern argument\n");
return NULL;
}
match = XftFontMatch (dpy, screen, pat, &result);
if (XftDebug () & XFT_DBG_OPEN)
{
printf ("Pattern ");
FcPatternPrint (pat);
if (match)
{
printf ("Match ");
FcPatternPrint (match);
}
else
printf ("No Match\n");
}
FcPatternDestroy (pat);
if (!match)
return NULL;
font = XftFontOpenPattern (dpy, match);
if (!font)
{
if (XftDebug () & XFT_DBG_OPEN)
printf ("No Font\n");
FcPatternDestroy (match);
}
return font;
}
_X_EXPORT XftFont *
XftFontOpenName (Display *dpy, int screen, const char *name)
{
FcPattern *pat;
FcPattern *match;
FcResult result;
XftFont *font;
pat = FcNameParse ((FcChar8 *) name);
if (XftDebug () & XFT_DBG_OPEN)
{
printf ("XftFontOpenName \"%s\": ", name);
if (pat)
FcPatternPrint (pat);
else
printf ("Invalid name\n");
}
if (!pat)
return NULL;
match = XftFontMatch (dpy, screen, pat, &result);
if (XftDebug () & XFT_DBG_OPEN)
{
if (match)
{
printf ("Match ");
FcPatternPrint (match);
}
else
printf ("No Match\n");
}
FcPatternDestroy (pat);
if (!match)
return NULL;
font = XftFontOpenPattern (dpy, match);
if (!font)
{
if (XftDebug () & XFT_DBG_OPEN)
printf ("No Font\n");
FcPatternDestroy (match);
}
return font;
}
_X_EXPORT XftFont *
XftFontOpenXlfd (Display *dpy, int screen, const char *xlfd)
{
FcPattern *pat;
FcPattern *match;
FcResult result;
XftFont *font;
pat = XftXlfdParse (xlfd, FcFalse, FcFalse);
if (XftDebug () & XFT_DBG_OPEN)
{
printf ("XftFontOpenXlfd \"%s\": ", xlfd);
if (pat)
printf ("Invalid xlfd\n");
else
FcPatternPrint (pat);
}
if (!pat)
return NULL;
match = XftFontMatch (dpy, screen, pat, &result);
if (XftDebug () & XFT_DBG_OPEN)
{
if (match)
{
printf ("Match ");
FcPatternPrint (match);
}
else
printf ("No Match\n");
}
FcPatternDestroy (pat);
if (!match)
return NULL;
font = XftFontOpenPattern (dpy, match);
if (!font)
{
if (XftDebug () & XFT_DBG_OPEN)
printf ("No Font\n");
FcPatternDestroy (match);
}
return font;
}