1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
|
#include <Xw_Extension.h>
/* ifdef then trace on */
#ifdef TRACE
#define TRACE_GET_FONT_INDEX
#endif
/*
STATUS Xw_get_font_index(afontmap,size,fontname,index):
XW_EXT_FONTMAP *afontmap Fontmap extension structure
float size ; Font size in MM
char *fontname ; Font descriptor ended with '\0'
int *index ; Return Font index 0 >= x < MAXFONT
Gets the nearest font index from Font Descriptor.
Returns ERROR if BadFont Index or font is not defined
Returns SUCCESS if Successful
*/
#ifdef XW_PROTOTYPE
XW_STATUS Xw_get_font_index(void* afontmap,float size,char* fontname,int* index)
#else
XW_STATUS Xw_get_font_index(afontmap,size,fontname,index)
void *afontmap ;
float size ;
char *fontname ;
int *index ;
#endif /*XW_PROTOTYPE*/
{
XW_EXT_FONTMAP *pfontmap = (XW_EXT_FONTMAP*)afontmap ;
XW_STATUS status = XW_ERROR ;
int i,j ;
if( !pfontmap ) {
/*ERROR*Bad EXT_FONTMAP Address*/
Xw_set_error( 44,"Xw_get_font_index",pfontmap ) ;
return( XW_ERROR ) ;
}
if( fontname && strlen(fontname) ) {
for( i=j=0 ; i<pfontmap->maxfont ; i++ ) {
if( pfontmap->gnames[i] ) {
if( !strcmp(fontname,pfontmap->gnames[i]) ) {
if( fabs(size-pfontmap->gsizes[i]) < 0.1 ) break;
}
} else if( !j ) j = i ;
}
if( i<pfontmap->maxfont ) {
*index = i ;
status = XW_SUCCESS ;
} else {
*index = j ;
status = Xw_def_font (pfontmap,j,size,fontname) ;
}
} else {
*index = 0 ;
status = XW_SUCCESS ;
}
#ifdef TRACE_GET_FONT_INDEX
if( Xw_get_trace() > 1 ) {
printf(" %d = Xw_get_font_index(%lx,%f,'%s',%d)\n",
status,(long ) pfontmap,size,fontname,*index) ;
}
#endif
return( status ) ;
}
|
