<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"

<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv=Content-Type content="text/html; charset=utf8">
<title>/usr/web/sources/contrib/quanstro/fontchr.c - Plan 9 from Bell Labs</title>


</meta>
</head>
<body>


<a href="/plan9/">Plan 9 from Bell Labs</a>’s /usr/web/sources/contrib/quanstro/fontchr.c


<center>
Copyright © 2009 Alcatel-Lucent. 
Distributed under the
<a href="/plan9/license.html">Lucent Public License version 1.02</a>.
 
<a href="/plan9/download.html">Download the Plan 9 distribution.</a>

</center>

<table width="100%" cellspacing=0 border=0><tr><td align="center">
<table cellspacing=0 cellpadding=5 bgcolor="#eeeeff"><tr><td align="left">
<pre>

#include <u.h>
#include <libc.h>
#include <draw.h>

static char *lastname;
Subfont *lastsubfont;

Subfont*
lookupsubfont(Display *d, char *name)
{
if(d && strcmp(name, "*default*") == 0)
return d->defaultsubfont;
if(lastname && strcmp(name, lastname)==0)
if(d==lastsubfont->bits->display){
lastsubfont->ref++;
return lastsubfont;
}
return 0;
}

void
installsubfont(char *name, Subfont *subfont)
{
// print("installsubfont %s\n", name);
free(lastname);
lastname = strdup(name);
lastsubfont = subfont; /* notice we don't free the old one; that's your business */
}

void
uninstallsubfont(Subfont *subfont)
{
if(subfont == lastsubfont){
lastname = 0;
lastsubfont = 0;
}
}

void
usage(void)
{
fprint(2, "font [-f font] [chars]\n");
exits("usage");
}

void
dumplast(Font *font, Subfont *sf, Rune r)
{
int i, n;
Cachefont *cf;
Fontchar *fc;

cf = nil;
for(i = 0; i < font->nsubf; i++){
cf = font->subf->cf;
if(r >= cf->min && r <= cf->max)
break;
}
if(font->nsubf == 0 || i == font->nsubf)
sysfatal("rune %.6x not cached", r);
n = r - cf->min;
if(n > sf->n)
sysfatal("subfont too small %d > %d", n, sf->n);
fc = sf->info + n;

print(" Fontchar\tx %d top %d bottom %d left %d width %d\n",
fc->x, fc->top, fc->bottom, fc->left, fc->width);
}

void
main(int argc, char **argv)
{
char *s, *sfname, buf[UTFmax+1];
int i, j, n;
Rune r;
Cacheinfo c;
Font *font;

s = getenv("font");
font = nil;
ARGBEGIN{
case 'f':
s = EARGF(usage());
break;
default:
usage();
}ARGEND
if(s == nil || (font = openfont(nil, s)) == nil)
sysfatal("no/bad font");

for(i = 0; i < argc; i++)
for(j = 0;; j += n){
n = chartorune(&r, argv[i] + j);
if(r == 0)
break;
memset(&c, 0, sizeof c);
snprint(buf, sizeof buf, "%C", r);
stringwidth(font, buf); /* force cache */
if(loadchar(font, r, &c, 1, 0, &sfname) == -1)
sysfatal("loadchar");
if(sfname == nil)
sfname = lastname;
print("sfname %s \n", sfname);
print(" Cacheinfo\tx %d w %d left %d v %.6ux\n",
c.x, c.width, c.left, c.value);
dumplast(font, lastsubfont, r);
}
exits("");
}

</pre>
</td></tr></table>
</td></tr></table>





<center><table border="0"><tr>
<td valign="middle"><a href="http://www.alcatel-lucent.com/"><img border="0" src="/plan9/img/logo_ft.gif" alt="Bell Labs" />
</a></td>
<td valign="middle"><a href="http://www.opensource.org"><img border="0" alt="OSI certified" src="/plan9/img/osi-certified-60x50.gif" />
</a></td>
<td><img style="padding-right: 45px;" alt="Powered by Plan 9" src="/plan9/img/power36.gif" />
</td>
</tr></table></center>

<center>
(<a href="/plan9/">Return to Plan 9 Home Page</a>)
</center>

<center>
<a href="http://www.lucent.com/copyright.html">Copyright</a>
© 2009 Alcatel-Lucent.
All Rights Reserved.
 
Comments to
<a href="mailto:[email protected]">[email protected]</a>.
</center>
</body>
</html>