| blob | cd33f289dda7948001a2a12d4d8ee9275c3c803c |
1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 /*
3 * This file is part of the LibreOffice project.
4 *
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 *
9 * This file incorporates work covered by the following license notice:
10 *
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 */
22 #include <filter/msfilter/classids.hxx>
23 #include <osl/diagnose.h>
24 #include <sfx2/docfile.hxx>
25 #include <sot/storage.hxx>
26 #include <sal/log.hxx>
29 #include <node.hxx>
32 {
33 //These are the default MathType sizes
42 /*
43 These are the default MathType italic/bold settings If mathtype is changed
44 from its defaults, there is nothing we can do, as this information is not
45 stored in the document
46 */
47 MathTypeFont aFont;
49 {
52 {
63 }
65 }
66 }
69 /*ToDo replace with table rather than switch, returns
70 sal_True in the case that the char is just a char, and
71 sal_False if the character is an operator which must not be
72 placed inside the quote sequence designed to protect
73 against being parsed as a keyword
75 General solution required to force starmath to handle
76 unicode math chars the way it handles its own math
77 chars rather than handle them as text as it will do
78 for the default case below, i.e. incorrect spacing
79 between math symbols and ordinary text e.g. 1=2 rather
80 than 1 = 2
81 */
83 sal_uInt8 nTypeFace)
84 {
88 {
116 else
117 {
120 }
173 else
174 {
177 }
182 else
183 {
186 }
191 else
192 {
195 }
200 else
201 {
204 }
227 else
506 }
510 }
513 {
516 {
529 }
532 }
535 {
541 }
544 {
551 }
554 {
558 EQNOLEFILEHDR aHdr;
560 sal_uInt8 nProdVersion;
561 sal_uInt8 nProdSubVersion;
562 sal_uInt8 nPlatform;
563 sal_uInt8 nProduct;
574 //little crude hack to close occasionally open expressions
575 //a sophisticated system to determine what expressions are
576 //opened is required, but this is as much work as rewriting
577 //starmaths internals.
581 }
584 {
588 )
589 {
592 }
593 }
596 {
599 {
607 }
610 }
613 {
614 sal_uInt8 nXNudge;
616 sal_uInt8 nYNudge;
619 {
620 sal_uInt16 nXLongNudge;
621 sal_uInt16 nYLongNudge;
624 }
625 }
627 /* Fabulously complicated as many tokens have to be reordered and generally
628 * moved around from mathtypes paradigm to starmaths. */
631 {
632 //depth-protect
638 sal_uInt16 nTabOffset;
651 do
652 {
657 /*MathType strings can of course include words which
658 *are StarMath keywords, the simplest solution is
659 to escape strings of greater than len 1 with double
660 quotes to avoid scanning the TokenTable for matches
662 Unfortunately it may turn out that the string gets
663 split during the handling of a character emblishment
664 so this special case must be handled in the
665 character handler case 2:
666 */
668 {
671 }
673 {
676 {
677 OUString aStr;
682 }
684 {
691 }
692 }
695 {
697 {
704 {
706 {
722 else
750 else
768 {
771 else
772 {
775 }
776 }
792 {
795 }
798 {
801 }
820 {
826 }
830 {
836 }
840 {
846 }
850 {
853 else
856 {
858 }
859 }
871 {
874 else
877 {
879 }
880 }
888 {
891 else
894 {
896 }
897 }
905 {
908 else
911 }
923 {
926 else
929 }
936 {
939 else
942 }
953 {
956 {
958 }
959 }
970 {
973 }
984 {
987 {
989 }
990 }
1001 {
1004 }
1015 {
1018 {
1020 }
1021 }
1032 {
1035 }
1046 {
1049 {
1051 }
1052 }
1063 {
1066 }
1077 {
1080 {
1082 }
1083 }
1094 {
1097 }
1119 {
1121 {
1123 }
1124 }
1127 {
1130 }
1141 {
1143 }
1156 {
1158 }
1182 {
1185 }
1187 {
1189 newline--;
1190 }
1192 {
1194 newline--;
1195 }
1217 }
1223 {
1227 {
1230 {
1233 }
1234 }
1235 else
1242 nSetSize--;
1244 }
1251 {
1267 else
1291 else
1311 {
1313 {
1314 newline--;
1316 }
1318 {
1323 }
1324 }
1325 else
1326 {
1328 newline--;
1329 }
1330 nPart++;
1338 newline--;
1339 else
1341 nPart++;
1344 {
1347 newline--;
1352 {
1355 {
1358 }
1359 }
1360 else
1367 nPart++;
1368 }
1373 newline--;
1375 nPart++;
1389 {
1390 newline--;
1392 }
1393 nPart++;
1398 {
1399 newline--;
1401 }
1402 nPart++;
1407 {
1408 newline--;
1410 }
1411 nPart++;
1415 newline--;
1418 newline--;
1420 nPart++;
1425 {
1427 {
1429 }
1431 {
1436 }
1437 }
1439 newline--;
1440 nPart++;
1445 {
1446 newline--;
1448 {
1455 }
1456 }
1457 nPart++;
1471 {
1473 {
1475 }
1476 newline--;
1477 }
1479 {
1484 newline--;
1485 }
1487 newline--;
1489 {
1494 newline--;
1495 }
1496 nPart++;
1501 {
1503 {
1505 }
1506 newline--;
1507 }
1510 {
1515 newline--;
1516 }
1518 newline--;
1520 {
1525 newline--;
1526 }
1527 nPart++;
1533 {
1535 {
1537 }
1538 newline--;
1539 }
1542 {
1547 newline--;
1548 }
1549 nPart++;
1554 {
1556 newline--;
1557 }
1560 {
1565 newline--;
1566 }
1568 newline--;
1570 {
1575 newline--;
1576 }
1577 nPart++;
1583 {
1585 newline--;
1586 }
1588 {
1593 newline--;
1594 }
1595 nPart++;
1603 {
1605 newline--;
1606 }
1608 newline--;
1610 {
1612 newline--;
1613 }
1616 {
1621 }
1622 nPart++;
1626 {
1628 {
1631 }
1632 else
1634 }
1639 nPart++;
1643 }
1645 //symbols that follow some of these
1646 //records. Foo Data.
1648 /*In matrices and piles we cannot separate equation
1649 *lines with the newline keyword*/
1651 newline++;
1652 }
1653 }
1685 {
1688 }
1692 {
1693 MathTypeFont aFont;
1695 /*
1696 The typeface number is the negative (which makes it
1697 positive) of the typeface value (unbiased) that appears in
1698 CHAR records that might follow a given FONT record
1699 */
1703 // read font name
1705 {
1710 }
1711 }
1726 }
1727 }
1730 {
1732 nSetSize--;
1733 }
1735 }
1737 /*Simply determine if we are at the end of a record or the end of a line,
1738 *with fiddly logic to see if we are in a matrix or a pile or neither
1740 Note we cannot tell until after the event that this is the last entry
1741 of a pile, so we must strip the last separator of a pile after this
1742 is detected in the PILE handler
1743 */
1746 {
1751 {
1755 {
1757 rCurRow++;
1758 }
1759 }
1760 else
1761 {
1764 rCurCol++;
1765 else
1767 }
1768 }
1770 /* set the alignment of the following term, but starmath currently
1771 * cannot handle vertical alignment */
1773 {
1775 {
1786 }
1787 rSetAlign++;
1788 }
1790 /* set size of text, complexity due to overuse of signedness as a flag
1791 * indicator by mathtype file format*/
1793 {
1797 {
1799 {
1801 {
1802 rSetSize--;
1805 }
1807 {
1813 rSetSize++;
1814 }
1816 }
1817 }
1818 else
1819 {
1820 /*sizetable should theoretically be filled with the default sizes
1821 *of the various font groupings matching starmaths equivalents
1822 in aTypeFaces, and a test would be done to see if the new font
1823 size would be the same as what starmath would have chosen for
1824 itself anyway in which case the size setting could be ignored*/
1828 {
1830 {
1831 rSetSize--;
1834 }
1836 {
1842 rSetSize++;
1843 }
1845 }
1846 }
1848 }
1851 {
1857 {
1877 };
1885 };
1916 }
1919 }
1923 {
1925 {
1948 {
1950 //if the token str and the result text are the same then this
1951 //is to be seen as text, else assume it's a mathchar
1954 else
1956 }
1966 {
1969 {
1972 }
1974 }
1976 //Root Node, PILE equivalent, i.e. vertical stack
1983 {
1988 {
1991 }
1994 }
2003 else
2007 {
2010 {
2013 }
2015 }
2016 }
2017 }
2021 {
2028 //there's just no way we can now handle any character
2029 //attributes (from mathtypes perspective) centered
2030 //over an expression but above template attribute
2031 //such as widevec and similar constructs
2032 //we have to drop them
2035 }
2038 {
2042 }
2046 {
2055 nBytes++;
2060 nBytes++;
2065 {
2067 {
2071 }
2072 }
2074 }
2077 //Root Node, PILE equivalent, i.e. vertical stack
2079 {
2081 //The root of the starmath is a table, if
2082 //we convert this them each iteration of
2083 //conversion from starmath to mathtype will
2084 //add an extra unnecessary level to the
2085 //mathtype output stack which would grow
2086 //without bound in a multi step conversion
2092 {
2096 }
2099 {
2101 {
2105 }
2106 }
2109 }
2113 {
2119 else
2124 {
2128 }
2131 {
2135 }
2136 else
2141 }
2145 {
2149 {
2153 }
2158 {
2167 {
2171 }
2172 else
2179 {
2183 }
2184 else
2187 {
2191 }
2192 else
2194 }
2196 }
2199 /*
2200 Sub and Sup scripts and another problem area, StarMath
2201 can have all possible options used at the same time, whereas
2202 Mathtype cannot. The ordering of the nodes for each system
2203 is quite different as well leading to some complexity
2204 */
2206 {
2209 {
2213 }
2219 {
2227 {
2231 }
2232 else
2235 {
2239 }
2240 else
2244 }
2250 {
2252 }
2258 {
2262 }
2267 {
2275 {
2279 }
2280 else
2283 {
2287 }
2288 else
2291 }
2293 //After subscript mathtype will keep the size of
2294 //normal text at the subscript size, sigh.
2296 }
2300 {
2320 }
2324 {
2334 {
2336 {
2376 }
2377 }
2380 {
2384 }
2389 {
2398 }
2403 }
2407 {
2412 else
2418 {
2422 }
2425 {
2429 }
2431 }
2434 {
2438 sal_uInt64 nPos;
2439 sal_uInt8 nVariation;
2442 {
2455 }
2462 {
2466 {
2469 }
2474 }
2475 else
2476 {
2479 }
2482 {
2487 else
2493 {
2496 }
2497 else
2498 {
2501 }
2505 {
2508 }
2509 else
2510 {
2513 }
2517 {
2520 }
2521 else
2522 {
2525 }
2529 {
2532 }
2533 else
2534 {
2537 }
2541 {
2544 }
2545 else
2546 {
2549 }
2564 }
2569 else
2570 {
2576 }
2580 {
2616 }
2619 }
2622 bool MathType::HandlePile(int &rSetAlign, int nLevel, sal_uInt8 nSelector, sal_uInt8 nVariation)
2623 {
2624 sal_uInt8 nVAlign;
2637 {
2639 rSetAlign--;
2640 }
2642 }
2645 {
2654 nBytes++;
2658 nBytes++;
2670 }
2674 {
2681 {
2683 }
2685 {
2687 }
2689 //For the (broken) case where one subscript template ends, and there is
2690 //another one after it, mathtype handles it as if the second one was
2691 //inside the first one and renders it as sub of sub
2694 {
2698 {
2701 }
2702 }
2704 //suborderlist
2708 {
2713 }
2716 else
2721 }
2724 {
2725 sal_uInt8 nEmbel;
2726 do
2727 {
2732 {
2744 {
2747 }
2753 {
2756 }
2762 {
2765 }
2786 {
2789 }
2799 }
2803 }
2806 {
2807 sal_uInt8 nTemp;
2810 {
2825 }
2826 }
2830 {
2835 {
2836 //This is a candidate for function recognition, whatever
2837 //that is!
2838 }
2843 {
2847 }
2848 else
2851 /*
2852 bad character, old mathtype < 3 has these
2853 */
2858 {
2859 //A bit tricky, the character emblishments for
2860 //mathtype can all be listed after each other, in
2861 //starmath some must go before the character and some
2862 //must go after. In addition some of the emblishments
2863 //may repeated and in starmath some of these groups
2864 //must be gathered together. sPost is the portion that
2865 //follows the char and nPostSup and nPostlSup are the
2866 //indexes at which this class of emblishment is
2867 //collated together
2876 {
2878 {
2879 OUString aStr;
2887 }
2888 else
2891 }
2892 }
2895 {
2900 )
2901 {
2903 {
2905 OUString aStr;
2909 }
2911 }
2914 {
2916 {
2918 OUString aStr;
2922 }
2924 }
2926 }
2929 {
2930 rRet.append("}}").append(sPost); // #i24340# make what would be "vec {A}_n" become "{vec {A}}_n"
2932 }
2934 }
2937 {
2939 //Special case for the "lim" option in StarMath
2943 )
2944 {
2946 {
2948 nLevel);
2963 {
2977 }
2979 {
2993 }
3001 {
3004 }
3007 }
3008 }
3010 }
3013 {
3016 {
3026 }
3029 {
3032 }
3034 }
3037 {
3039 {
3044 }
3047 {
3051 {
3053 }
3056 {
3058 }
3059 else
3061 //The typeface seems to be MTEXTRA for unicode characters,
3062 //though how to determine when mathtype chooses one over
3063 //the other is unknown. This should do the trick
3064 //nevertheless.
3065 sal_uInt8 nBias;
3069 ))
3070 {
3072 }
3081 else
3087 {
3093 }
3105 {
3113 }
3115 {
3121 }
3123 {
3129 }
3131 {
3137 }
3138 else
3140 }
3142 }
3145 {
3151 {
3155 {
3157 //there's just no way we can now handle any character
3158 //attributes (from mathtypes perspective) centered
3159 //over an expression but above template attributes
3160 //such as widevec and similar constructs
3161 //we have to drop them
3176 //or text with more than one char
3182 nPendingAttributes++;
3184 }
3185 }
3191 {
3203 }
3205 //if there was no suitable place to put the attribute,
3206 //then we have to just give up on it
3208 nPendingAttributes--;
3209 else
3210 {
3212 {
3214 nInsertion--;
3217 {
3263 }
3265 }
3266 }
3267 }
3270 {
3273 {
3276 {
3278 //after the character
3279 }
3280 else
3292 //Mathtype can only have these sort of character
3293 //attributes on a single character, starmath can put them
3294 //anywhere, when the entity involved is a text run this is
3295 //a large effort to place the character attribute on the
3296 //central mathtype character so that it does pretty much
3297 //what the user probably has in mind. The attributes
3298 //filled in here are dummy ones which are replaced in the
3299 //ATTRIBUT handler if a suitable location for the
3300 //attributes was found here. Unfortunately it is
3301 //possible for starmath to place character attributes on
3302 //entities which cannot occur in mathtype e.g. a Summation
3303 //symbol so these attributes may be lost
3306 {
3309 {
3311 //wedge the attributes in here and clear
3312 //the pending stack
3313 nPendingAttributes--;
3314 }
3318 }
3319 }
3320 }
3323 {
3324 OUStringBuffer sText;
3327 try
3328 {
3330 }
3332 {
3333 }
3335 }
3337 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */