/* The contents of this file are subject to the THDL Open Community License Version 1.0 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License on the THDL web site (http://www.thdl.org/). Software distributed under the License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for the specific terms governing rights and limitations under the License. The Initial Developer of this software is the Tibetan and Himalayan Digital Library (THDL). Portions created by the THDL are Copyright 2001 THDL. All Rights Reserved. Contributor(s): ______________________________________. */ package org.thdl.tib.text; import java.util.*; import javax.swing.*; import javax.swing.text.*; import javax.swing.text.rtf.RTFEditorKit; import java.io.*; import org.thdl.util.ThdlDebug; import org.thdl.util.ThdlOptions; /** Represents a character meant to be rendered in a certain font. * @author David Chandler */ class CharacterInAGivenFont { private char character; private String fontName; public CharacterInAGivenFont(char ch, String font) { character = ch; fontName = font; } public CharacterInAGivenFont(String s, String font) { if (s.length() != 1) throw new Error("character in a given font was given a string " + s + " in a given font"); character = s.charAt(0); fontName = font; } public boolean equals(Object x) { return ((x instanceof CharacterInAGivenFont) && ((CharacterInAGivenFont)x).character == character && ((CharacterInAGivenFont)x).fontName.equals(fontName)); } public int hashCode() { return (int)character + fontName.hashCode(); } public String toString() { String characterRepresentation = "'" + new Character(character).toString() + "'"; if ('\n' == character) characterRepresentation = "newline"; if ('\r' == character) characterRepresentation = "carriage return"; return characterRepresentation + " in the font " + ((null == fontName) ? "_ERROR_FINDING_FONT_" : fontName); } } /** * A TibetanDocument is a styled document that knows about Tibetan and * will respect line breaks and the like. It allows you to insert * Tibetan also. * @author Edward Garrett, Tibetan and Himalayan Digital Library * @version 1.0 */ public class TibetanDocument extends DefaultStyledDocument { private int tibetanFontSize = 36; /** Creates a new TibetanDocument with default styles. */ public TibetanDocument() { super(); } /** Do not use this contructor. */ private TibetanDocument(AbstractDocument.Content c, StyleContext styles ) { super(c, styles); } /** * Creates a TibetanDocument. * @param styles a StyleContext, which is simply passed on * to DefaultStyledDocument's constructor */ public TibetanDocument(StyleContext styles) { super(styles); } /** * Sets the point size used by default for Tibetan text. * @param size the point size for Tibetan text */ public void setTibetanFontSize(int size) { tibetanFontSize = size; } /** * Gets the point size for Tibetan text. * @return the point size used for Tibetan text */ public int getTibetanFontSize() { return tibetanFontSize; } /** * Writes the document to an OutputStream as Rich Text Format (.rtf). * @param out the OutputStream to write to */ public void writeRTFOutputStream(OutputStream out) throws IOException { RTFEditorKit rtf = new RTFEditorKit(); try { rtf.write(out, this, 0, getLength()); } catch (BadLocationException ble) { ThdlDebug.noteIffyCode(); } } /** * Inserts Tibetan text into the document. The font size is applied automatically, * according to the current Tibetan font size. * @param offset the position at which you want to insert text * @param s the string you want to insert * @param attr the attributes to apply, normally a particular TibetanMachineWeb font * @see #setTibetanFontSize(int size) */ public void appendDuff(int offset, String s, MutableAttributeSet attr) { appendDuff(tibetanFontSize, offset, s, attr); } private void appendDuff(int fontSize, int offset, String s, MutableAttributeSet attr) { try { StyleConstants.setFontSize(attr, fontSize); insertString(offset, s, attr); } catch (BadLocationException ble) { ThdlDebug.noteIffyCode(); } } /** * Inserts a stretch of TibetanMachineWeb data into the document. * @param glyphs the array of Tibetan data you want to insert * @param pos the position at which you want to insert text */ public int insertDuff(int pos, DuffData[] glyphs) { return insertDuff(tibetanFontSize, pos, glyphs, true); } private int insertDuff(int fontSize, int pos, DuffData[] glyphs, boolean asTMW) { if (glyphs == null) return pos; MutableAttributeSet mas; for (int i=0; i= end) return ""; java.util.List dcs = new ArrayList(); int i = begin; StringBuffer wylieBuffer = new StringBuffer(); try { while (i < end) { attr = getCharacterElement(i).getAttributes(); fontName = StyleConstants.getFontFamily(attr); ch = getText(i,1).charAt(0); //current character is formatting if (ch == '\n' || ch == '\t') { if (dcs.size() > 0) { DuffCode[] dc_array = new DuffCode[0]; dc_array = (DuffCode[])dcs.toArray(dc_array); wylieBuffer.append(TibTextUtils.getWylie(dc_array)); dcs.clear(); } wylieBuffer.append(ch); } //current character isn't TMW else if ((0 == (fontNum = TibetanMachineWeb.getTMWFontNumber(fontName)))) { if (dcs.size() > 0) { DuffCode[] dc_array = new DuffCode[0]; dc_array = (DuffCode[])dcs.toArray(dc_array); wylieBuffer.append(TibTextUtils.getWylie(dc_array)); dcs.clear(); } } //current character is convertable else { dc = new DuffCode(fontNum, ch); dcs.add(dc); } i++; } if (dcs.size() > 0) { DuffCode[] dc_array = new DuffCode[0]; dc_array = (DuffCode[])dcs.toArray(dc_array); wylieBuffer.append(TibTextUtils.getWylie(dc_array)); } return wylieBuffer.toString(); } catch (BadLocationException ble) { ble.printStackTrace(); ThdlDebug.noteIffyCode(); } return ""; } /** Prints to standard output a list of all the indices of characters that are not in a TMW font within the range [start, end). Using a negative number for end means that this will run to the end of the document. SPEED_FIXME: might be faster to run over the elements, if they are one per font. @return 1 if at least one non-TMW character was found in the specified range, zero if none were, -1 on error. */ public int findAllNonTMWCharacters(int begin, int end) { return findAllNonTMWCharacters(begin, end, System.out); } /** Configurable so that System.out isn't necessarily used. */ public int findAllNonTMWCharacters(int begin, int end, PrintStream out) { if (end < 0) end = getLength(); if (begin >= end) return 0; int i = begin; int returnValue = 0; try { while (i < end) { AttributeSet attr = getCharacterElement(i).getAttributes(); String fontName = StyleConstants.getFontFamily(attr); if ((0 == TibetanMachineWeb.getTMWFontNumber(fontName))) { returnValue = 1; CharacterInAGivenFont cgf = new CharacterInAGivenFont(getText(i, 1), fontName); out.println("non-TMW character " + cgf + " at location " + i); } i++; } } catch (BadLocationException ble) { ble.printStackTrace(out); ThdlDebug.noteIffyCode(); returnValue = -1; } return returnValue; } /** Finds the first occurrence of a non-TMW character in a given font and prints it to System.out. If you have a Tahoma newline and an Arial newline, the first occurrence of each will be reported.

Works within the range [start, end). Using a negative number for end means that this will run to the end of the document. SPEED_FIXME: might be faster to run over the elements, if they are one per font. @return 1 if at least one non-TMW character was found in the specified range, zero if none were, -1 on error. */ public int findSomeNonTMWCharacters(int begin, int end) { return findSomeNonTMWCharacters(begin, end, System.out); } /** Configurable so that System.out isn't necessarily used. */ public int findSomeNonTMWCharacters(int begin, int end, PrintStream out) { if (end < 0) end = getLength(); if (begin >= end) return 0; int i = begin; int returnValue = 0; try { HashMap cgfTable = new HashMap(); while (i < end) { AttributeSet attr = getCharacterElement(i).getAttributes(); String fontName = StyleConstants.getFontFamily(attr); if ((0 == TibetanMachineWeb.getTMWFontNumber(fontName))) { returnValue = 1; CharacterInAGivenFont cgf = new CharacterInAGivenFont(getText(i, 1), fontName); if (!cgfTable.containsKey(cgf)) { cgfTable.put(cgf, "yes this character appears once"); out.println("non-TMW character " + cgf + " appears first at location " + i); } } i++; } } catch (BadLocationException ble) { ble.printStackTrace(out); ThdlDebug.noteIffyCode(); returnValue = -1; } return returnValue; } private static final DuffData[] leftCurlyBraceTMW = new DuffData[] { new DuffData("{", 1) }; private static final DuffData[] rightCurlyBraceTMW = new DuffData[] { new DuffData("}", 1) }; private static final DuffData[] backslashTMW = new DuffData[] { new DuffData("\\", 2) }; /** This is a band-aid used to help Jskad fix RTF files that are mostly TMW but have some Tahoma characters that should be TMW. Replaces '{', '}', and '\\' characters with the correct TibetanMachineWeb. Works within the range [start, end). Using a negative number for end means that this will run to the end of the document. Be sure to set the size for Tibetan as you like it before using this (well, it usually gets it right on its own, but just in case). SPEED_FIXME: might be faster to run over the elements, if they are one per font. */ public void replaceTahomaCurlyBracesAndBackslashes(int begin, int end) { if (end < 0) end = getLength(); if (begin >= end) return; int i = begin; try { while (i < end) { AttributeSet attr = getCharacterElement(i).getAttributes(); String fontName = StyleConstants.getFontFamily(attr); if (fontName.equals("Tahoma")) { DuffData[] toReplaceWith = null; switch (getText(i, 1).charAt(0)) { case '{': toReplaceWith = leftCurlyBraceTMW; break; case '}': toReplaceWith = rightCurlyBraceTMW; break; case '\\': toReplaceWith = backslashTMW; break; } if (null != toReplaceWith) { // SPEED_FIXME: determining font size might be slow int fontSize = tibetanFontSize; try { fontSize = ((Integer)getCharacterElement(i).getAttributes().getAttribute(StyleConstants.FontSize)).intValue(); } catch (Exception e) { // leave it as tibetanFontSize } insertDuff(fontSize, i, toReplaceWith, true); remove(i+1, 1); } } i++; } } catch (BadLocationException ble) { ble.printStackTrace(); ThdlDebug.noteIffyCode(); } } /** Converts all TibetanMachineWeb glyphs in the document to TibetanMachine. Works within the range [start, end). Using a negative number for end means that this will run to the end of the document. Be sure to set the size for Tibetan as you like it before using this (well, it usually gets it right on its own, but just in case). SPEED_FIXME: might be faster to run over the elements, if they are one per font. @return true on 100% success, false if any exceptional case was encountered @param errors if non-null, then notes about all exceptional cases will be appended to this StringBuffer */ public boolean convertToTM(int begin, int end, StringBuffer errors) { return convertTMW_TM(begin, end, true, errors); } /** Converts all TibetanMachine glyphs in the document to TibetanMachineWeb. Works within the range [start, end). Using a negative number for end means that this will run to the end of the document. Be sure to set the size for Tibetan as you like it before using this (well, it usually gets it right on its own, but just in case). SPEED_FIXME: might be faster to run over the elements, if they are one per font. @return true on 100% success, false if any exceptional case was encountered @param errors if non-null, then notes about all exceptional cases will be appended to this StringBuffer */ public boolean convertToTMW(int begin, int end, StringBuffer errors) { return convertTMW_TM(begin, end, false, errors); } /** Helper function. @param errors if non-null, then notes about all exceptional cases will be appended to this StringBuffer @return true on 100% success, false if any exceptional case was encountered @see convertToTMW(int,int) @see convertToTM(int,int) */ private boolean convertTMW_TM(int begin, int end, boolean toTM, StringBuffer errors) { boolean toStdout = ThdlOptions.getBooleanOption("thdl.debug"); boolean errorReturn = false; if (end < 0) end = getLength(); if (begin >= end) return errorReturn; // nothing to do, so no errors in the doing. int i = begin; HashMap problemGlyphsTable = new HashMap(); try { Position endPos = createPosition(end); DuffData[] equivalent = new DuffData[1]; equivalent[0] = new DuffData(); while (i < endPos.getOffset()) { AttributeSet attr = getCharacterElement(i).getAttributes(); String fontName = StyleConstants.getFontFamily(attr); int fontNum = (toTM ? TibetanMachineWeb.getTMWFontNumber(fontName) : TibetanMachineWeb.getTMFontNumber(fontName)); if (0 != fontNum) { DuffCode dc = null; if (toTM) { dc = TibetanMachineWeb.mapTMWtoTM(fontNum - 1, getText(i,1).charAt(0)); } else { dc = TibetanMachineWeb.mapTMtoTMW(fontNum - 1, getText(i,1).charAt(0)); } if (null != dc) { equivalent[0].setData(dc.getCharacter(), dc.getFontNum()); // SPEED_FIXME: determining font size might be slow int fontSize = tibetanFontSize; try { fontSize = ((Integer)getCharacterElement(i).getAttributes().getAttribute(StyleConstants.FontSize)).intValue(); } catch (Exception e) { // leave it as tibetanFontSize } // We have two choices: remove-then-insert // second vs. insert-then-remove and also // insert-before vs. insert-after. It turns // out that insert-after preserves formatting // whereas insert-before doesn't. And we do // insert-then-remove because we're guessing // that helps with formatting too. insertDuff(fontSize, i+1, equivalent, !toTM); remove(i, 1); } else { // DLC FIXME: insert into document a string // saying "<<[[there's no TM equivalent for // this, details are ...]]>>" (For now, I'm // inserting the alphabet in a big font in TMW // to try and get some attention. And I've // *documented* this on the website.) errorReturn = true; CharacterInAGivenFont cgf = new CharacterInAGivenFont(getText(i,1), fontName); if (!problemGlyphsTable.containsKey(cgf)) { problemGlyphsTable.put(cgf, "yes this character appears once"); if (null != errors) { String err = (toTM ? "TMW->TM" : "TM->TMW") + " conversion failed for a glyph:\nFont is " + fontName + ", glyph number is " + (int)getText(i,1).charAt(0) + "; first position found (from zero) is " + i + "\n"; errors.append(err); if (toStdout) { System.out.print(err); } } } String trickyTMW = "!-\"-#-$-%-&-'-(-)-*-+-,-.-/-0-1-2-3-4-5-6-7-8-9-:-;-<-=->-?-"; equivalent[0] = new DuffData(trickyTMW, 1); insertDuff(72, i, equivalent, true); i += trickyTMW.length(); } } i++; } } catch (BadLocationException ble) { ble.printStackTrace(); ThdlDebug.noteIffyCode(); } return errorReturn; } }