-// if (!m_pstream) return;
-
- wxFont *fontToUse = theFont;
-
- if (!fontToUse) fontToUse = (wxFont*) &m_font;
-
-#if !USE_AFM_FOR_POSTSCRIPT
- // Provide a VERY rough estimate (avoid using it)
- // Chris Breeze 5/11/97: produces accurate results for mono-spaced
- // font such as Courier (aka wxMODERN)
- int height = 12;
- if (fontToUse)
- {
- height = fontToUse->GetPointSize();
- }
- *x = strlen (string) * height * 72 / 120;
- *y = (long) (height * 1.32); // allow for descender
-
- if (descent)
- *descent = 0;
- if (externalLeading)
- *externalLeading = 0;
-#else
- // +++++ start of contributed code +++++
-
- // ************************************************************
- // method for calculating string widths in postscript:
- // read in the AFM (adobe font metrics) file for the
- // actual font, parse it and extract the character widths
- // and also the descender. this may be improved, but for now
- // it works well. the AFM file is only read in if the
- // font is changed. this may be chached in the future.
- // calls to GetTextExtent with the font unchanged are rather
- // efficient!!!
- //
- // for each font and style used there is an AFM file necessary.
- // currently i have only files for the roman font family.
- // i try to get files for the other ones!
- //
- // CAVE: the size of the string is currently always calculated
- // in 'points' (1/72 of an inch). this should later on be
- // changed to depend on the mapping mode.
- // CAVE: the path to the AFM files must be set before calling this
- // function. this is usually done by a call like the following:
- // wxSetAFMPath("d:\\wxw161\\afm\\");
- //
- // example:
- //
- // wxPostScriptDC dc(NULL, TRUE);
- // if (dc.Ok()){
- // wxSetAFMPath("d:\\wxw161\\afm\\");
- // dc.StartDoc("Test");
- // dc.StartPage();
- // long w,h;
- // dc.SetFont(new wxFont(10, wxROMAN, wxNORMAL, wxNORMAL));
- // dc.GetTextExtent("Hallo",&w,&h);
- // dc.EndPage();
- // dc.EndDoc();
- // }
- //
- // by steve (stefan.hammes@urz.uni-heidelberg.de)
- // created: 10.09.94
- // updated: 14.05.95
-
- assert(fontToUse && "void wxPostScriptDC::GetTextExtent: no font defined");
- assert(x && "void wxPostScriptDC::GetTextExtent: x == NULL");
- assert(y && "void wxPostScriptDC::GetTextExtent: y == NULL");
-
- // these static vars are for storing the state between calls
- static int lastFamily= INT_MIN;
- static int lastSize= INT_MIN;
- static int lastStyle= INT_MIN;
- static int lastWeight= INT_MIN;
- static int lastDescender = INT_MIN;
- static int lastWidths[256]; // widths of the characters
-
- // get actual parameters
- const int Family = fontToUse->GetFamily();
- const int Size = fontToUse->GetPointSize();
- const int Style = fontToUse->GetStyle();
- const int Weight = fontToUse->GetWeight();
-
- // if we have another font, read the font-metrics
- if(Family!=lastFamily||Size!=lastSize||Style!=lastStyle||Weight!=lastWeight){
- // store actual values
- lastFamily = Family;
- lastSize = Size;
- lastStyle = Style;
- lastWeight = Weight;
-
- // read in new font metrics **************************************
-
- // 1. construct filename ******************************************
- /* MATTHEW: [2] Use wxTheFontNameDirectory */
- const char *name;
-
- // Julian - we'll need to do this a different way now we've removed the
- // font directory system. Must find Stefan's original code.
-
- name = wxTheFontNameDirectory->GetAFMName(Family, Weight, Style);
- if (!name)
- name = "unknown";
-
- // get the directory of the AFM files
- char afmName[256];
- afmName[0] = 0;
- if (wxGetAFMPath())
- strcpy(afmName,wxGetAFMPath());
-
- // 2. open and process the file **********************************
-
- // a short explanation of the AFM format:
- // we have for each character a line, which gives its size
- // e.g.:
- //
- // C 63 ; WX 444 ; N question ; B 49 -14 395 676 ;
- //
- // that means, we have a character with ascii code 63, and width
- // (444/1000 * fontSize) points.
- // the other data is ignored for now!
- //
- // when the font has changed, we read in the right AFM file and store the
- // character widths in an array, which is processed below (see point 3.).
-
- // new elements JC Sun Aug 25 23:21:44 MET DST 1996
-
-
- strcat(afmName,name);
- strcat(afmName,".afm");
- FILE *afmFile = fopen(afmName,"r");
- if(afmFile==NULL){
- wxLogDebug("GetTextExtent: can't open AFM file '%s'\n",afmName);
- wxLogDebug(" using approximate values\n");
- int i;
- for (i=0; i<256; i++) lastWidths[i] = 500; // an approximate value
- lastDescender = -150; // dito.
- }else{
- int i;
- // init the widths array
- for(i=0; i<256; i++) lastWidths[i]= INT_MIN;
- // some variables for holding parts of a line
- char cString[10],semiString[10],WXString[10],descString[20];
- char upString[30], utString[30], encString[50];
- char line[256];
- int ascii,cWidth;
- // read in the file and parse it
- while(fgets(line,sizeof(line),afmFile)!=NULL){
- // A.) check for descender definition
- if(strncmp(line,"Descender",9)==0){
- if((sscanf(line,"%s%d",descString,&lastDescender)!=2)
- || (strcmp(descString,"Descender")!=0)) {
- wxLogDebug("AFM-file '%s': line '%s' has error (bad descender)\n",
- afmName,line);
- }
- }
- // JC 1.) check for UnderlinePosition
- else if(strncmp(line,"UnderlinePosition",17)==0){
- if((sscanf(line,"%s%lf",upString,&UnderlinePosition)!=2)
- || (strcmp(upString,"UnderlinePosition")!=0)) {
- wxLogDebug("AFM-file '%s': line '%s' has error (bad UnderlinePosition)\n",
- afmName,line);
- }
- }
- // JC 2.) check for UnderlineThickness
- else if(strncmp(line,"UnderlineThickness",18)==0){
- if((sscanf(line,"%s%lf",utString,&UnderlineThickness)!=2)
- || (strcmp(utString,"UnderlineThickness")!=0)) {
- wxLogDebug("AFM-file '%s': line '%s' has error (bad UnderlineThickness)\n",
- afmName,line);
- }
- }
- // JC 3.) check for EncodingScheme
- else if(strncmp(line,"EncodingScheme",14)==0){
- if((sscanf(line,"%s%s",utString,encString)!=2)
- || (strcmp(utString,"EncodingScheme")!=0)) {
- wxLogDebug("AFM-file '%s': line '%s' has error (bad EncodingScheme)\n",
- afmName,line);
- }
- else if (strncmp(encString, "AdobeStandardEncoding", 21))
- {
- wxLogDebug("AFM-file '%s': line '%s' has error (unsupported EncodingScheme %s)\n",
- afmName,line, encString);
- }
- }
- // B.) check for char-width
- else if(strncmp(line,"C ",2)==0){
- if(sscanf(line,"%s%d%s%s%d",
- cString,&ascii,semiString,WXString,&cWidth)!=5){
- wxLogDebug("AFM-file '%s': line '%s' has an error (bad character width)\n",afmName,line);
- }
- if(strcmp(cString,"C")!=0 || strcmp(semiString,";")!=0 ||
- strcmp(WXString,"WX")!=0){
- wxLogDebug("AFM-file '%s': line '%s' has a format error\n",afmName,line);
- }
- //printf(" char '%c'=%d has width '%d'\n",ascii,ascii,cWidth);
- if(ascii>=0 && ascii<256){
- lastWidths[ascii] = cWidth; // store width
- }else{
- /* MATTHEW: this happens a lot; don't print an error */
- // wxLogDebug("AFM-file '%s': ASCII value %d out of range\n",afmName,ascii);
- }
- }
- // C.) ignore other entries.
- }
- fclose(afmFile);
- }
- // hack to compute correct values for german 'Umlaute'
- // the correct way would be to map the character names
- // like 'adieresis' to corresp. positions of ISOEnc and read
- // these values from AFM files, too. Maybe later ...
- lastWidths[196] = lastWidths['A']; // Ä
- lastWidths[228] = lastWidths['a']; // ä
- lastWidths[214] = lastWidths['O']; // Ö
- lastWidths[246] = lastWidths['o']; // ö
- lastWidths[220] = lastWidths['U']; // Ü
- lastWidths[252] = lastWidths['u']; // ü
- lastWidths[223] = lastWidths[251]; // ß
- }
-
- // JC: calculate UnderlineThickness/UnderlinePosition
- m_underlinePosition = m_underlinePosition * fontToUse->GetPointSize() / 1000.0f;
- m_underlineThickness = m_underlineThickness * fontToUse->GetPointSize() / 1000.0f * m_scaleFactor;
-
- // 3. now the font metrics are read in, calc size *******************
- // this is done by adding the widths of the characters in the
- // string. they are given in 1/1000 of the size!
-
- long widthSum=0;
- long height=Size; // by default
- unsigned char *p;
- for(p=(unsigned char *)(const char *)string; *p; p++){
- if(lastWidths[*p]== INT_MIN){
- wxLogDebug("GetTextExtent: undefined width for character '%c' (%d)\n",
- *p,*p);
- widthSum += (long)(lastWidths[' ']/1000.0F * Size); // assume space
- }else{
- widthSum += (long)((lastWidths[*p]/1000.0F)*Size);
- }
- }
- // add descender to height (it is usually a negative value)
- if(lastDescender!=INT_MIN){
- height += (long)(((-lastDescender)/1000.0F) * Size); /* MATTHEW: forgot scale */
- }
-
- // return size values
- *x = widthSum;
- *y = height;
-
- // return other parameters
- if (descent){
- if(lastDescender!=INT_MIN){
- *descent = (long)(((-lastDescender)/1000.0F) * Size); /* MATTHEW: forgot scale */
- }else{
- *descent = 0;
- }
- }
projects / wxWidgets.git / blobdiff