/* * Copyright 1992, 1993 by TOSHIBA Corp. * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, 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 TOSHIBA not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. TOSHIBA make no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * TOSHIBA DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL * TOSHIBA 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. * * Author: Katsuhisa Yano TOSHIBA Corp. * mopi@osa.ilab.toshiba.co.jp */ /* * Copyright 1995 by FUJITSU LIMITED * This is source code modified by FUJITSU LIMITED under the Joint * Development Agreement for the CDE/Motif PST. */ #ifdef HAVE_CONFIG_H #include <config.h> #endif #include "Xlibint.h" #include "XomGeneric.h" #include <stdio.h> /* For VW/UDC start */ #define VMAP 0 #define VROTATE 1 #define FONTSCOPE 2 static int is_rotate( XOC oc, XFontStruct *font) { XOCGenericPart *gen = XOC_GENERIC(oc); FontSet font_set; VRotate vrotate; int font_set_count; int vrotate_num; font_set = gen->font_set; font_set_count = gen->font_set_num; for( ; font_set_count-- ; font_set++) { if((font_set->vrotate_num > 0) && (font_set->vrotate != NULL)) { vrotate = font_set->vrotate; vrotate_num = font_set->vrotate_num; for( ; vrotate_num-- ; vrotate++) if(vrotate->font == font) return True; } } return False; } static int is_codemap( XOC oc, XFontStruct *font) { XOCGenericPart *gen = XOC_GENERIC(oc); FontSet font_set; FontData vmap; int font_set_count; int vmap_num; font_set = gen->font_set; font_set_count = gen->font_set_num; for( ; font_set_count-- ; font_set++) { if(font_set->vmap_num > 0) { vmap = font_set->vmap; vmap_num = font_set->vmap_num; for( ; vmap_num-- ; vmap++) if(vmap->font == font) return True; } } return False; } static int escapement_vertical( XOC oc, XFontStruct *font, Bool is_xchar2b, XPointer text, int length) { XChar2b *buf2b; char *buf; int escapement = 0, i; if(is_xchar2b) { for(i = 0, buf2b = (XChar2b *) text ; i < length ; i++, buf2b++) { if(is_rotate(oc, font) == True) { escapement += _XTextHeight16(font, buf2b, 1); } else { escapement += (int) (font->max_bounds.ascent + font->max_bounds.descent); } } } else { for(i = 0, buf = (char *)text ; i < length && *buf ; i++, buf++) { if(is_rotate(oc, font) == True) { escapement += _XTextHeight(font, buf, 1); } else { escapement += (int) (font->max_bounds.ascent + font->max_bounds.descent); } } } return escapement; } static int TextWidthWithFontSet( FontSet font_set, XOC oc, XPointer text, int length) { FontData fd; XFontStruct *font; unsigned char *ptr = (unsigned char *)text; Bool is_xchar2b; int ptr_len = length; int escapement = 0, char_len = 0; if(font_set == (FontSet) NULL) return escapement; is_xchar2b = font_set->is_xchar2b; while(length > 0) { fd = _XomGetFontDataFromFontSet(font_set, ptr, length, &ptr_len, is_xchar2b, FONTSCOPE); if(ptr_len <= 0) break; /* * First, see if the "Best Match" font for the FontSet was set. * If it was, use that font. If it was not set, then use the * font defined by font_set->font_data[0] (which is what * _XomGetFontDataFromFontSet() always seems to return for * non-VW text). Note that given the new algorithm in * parse_fontname() and parse_fontdata(), fs->font will * *always* contain good data. We should probably remove * the check for "fd->font", but we won't :-) -- jjw/pma (HP) * * Above comment and way this is done propagated from omText.c * Note that fd->font is junk so using the result of the * above call /needs/ to be ignored. * * Owen Taylor <otaylor@redhat.com> 12 Jul 2000 * */ if(fd == (FontData) NULL || (font = font_set->font) == (XFontStruct *) NULL) { if((font = fd->font) == (XFontStruct *) NULL) break; } switch(oc->core.orientation) { case XOMOrientation_LTR_TTB: case XOMOrientation_RTL_TTB: if (is_xchar2b) { char_len = ptr_len / sizeof(XChar2b); escapement += XTextWidth16(font, (XChar2b *)ptr, char_len); } else { char_len = ptr_len; escapement += XTextWidth(font, (char *)ptr, char_len); } break; case XOMOrientation_TTB_LTR: case XOMOrientation_TTB_RTL: if(font_set->font == font) { fd = _XomGetFontDataFromFontSet(font_set, ptr, length, &ptr_len, is_xchar2b, VMAP); if(ptr_len <= 0) break; if(fd == (FontData) NULL || (font = fd->font) == (XFontStruct *) NULL) break; if(is_codemap(oc, fd->font) == False) { fd = _XomGetFontDataFromFontSet(font_set, ptr, length, &ptr_len, is_xchar2b, VROTATE); if(ptr_len <= 0) break; if(fd == (FontData) NULL || (font = fd->font) == (XFontStruct *) NULL) break; } } if(is_xchar2b) char_len = ptr_len / sizeof(XChar2b); else char_len = ptr_len; escapement += escapement_vertical(oc, font, is_xchar2b, (XPointer) ptr, char_len); break; case XOMOrientation_Context: /* not used? */ break; } if(char_len <= 0) break; length -= char_len; ptr += ptr_len; } return escapement; } /* For VW/UDC end */ static int _XomGenericTextEscapement( XOC oc, XOMTextType type, XPointer text, int length) { XlcConv conv; XFontStruct *font; Bool is_xchar2b; /* VW/UDC */ XPointer args[3]; FontSet font_set; /* VW/UDC */ XChar2b xchar2b_buf[BUFSIZ], *buf; int escapement = 0; int buf_len = 0, left = 0; conv = _XomInitConverter(oc, type); if (conv == NULL) return escapement; args[0] = (XPointer) &font; args[1] = (XPointer) &is_xchar2b; args[2] = (XPointer) &font_set; while (length > 0) { buf = xchar2b_buf; left = buf_len = BUFSIZ; if (_XomConvert(oc, conv, (XPointer *) &text, &length, (XPointer *) &buf, &left, args, 3) < 0) break; buf_len -= left; /* VW/UDC */ escapement += TextWidthWithFontSet(font_set, oc, (XPointer) xchar2b_buf, buf_len); /* VW/UDC */ } return escapement; } int _XmbGenericTextEscapement(XOC oc, _Xconst char *text, int length) { return _XomGenericTextEscapement(oc, XOMMultiByte, (XPointer) text, length); } int _XwcGenericTextEscapement(XOC oc, _Xconst wchar_t *text, int length) { return _XomGenericTextEscapement(oc, XOMWideChar, (XPointer) text, length); } int _Xutf8GenericTextEscapement(XOC oc, _Xconst char *text, int length) { return _XomGenericTextEscapement(oc, XOMUtf8String, (XPointer) text, length); }