| blob | 611ea68d3019fdfc2336513a9683f30951fc46d9 |
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>
28 #include <node.hxx>
31 {
32 //These are the default MathType sizes
41 /*
42 These are the default MathType italic/bold settings If mathtype is changed
43 from its defaults, there is nothing we can do, as this information is not
44 stored in the document
45 */
46 MathTypeFont aFont;
48 {
51 {
62 }
64 }
65 }
68 /*ToDo replace with table rather than switch, returns
69 sal_True in the case that the char is just a char, and
70 sal_False if the character is an operator which must not be
71 placed inside the quote sequence designed to protect
72 against being parsed as a keyword
74 General solution required to force starmath to handle
75 unicode math chars the way it handles its own math
76 chars rather than handle them as text as it will do
77 for the default case below, i.e. incorrect spacing
78 between math symbols and ordinary text e.g. 1=2 rather
79 than 1 = 2
80 */
82 sal_uInt8 nTypeFace)
83 {
87 {
115 else
116 {
119 }
172 else
173 {
176 }
181 else
182 {
185 }
190 else
191 {
194 }
199 else
200 {
203 }
226 else
523 }
527 }
530 {
533 {
546 }
549 }
552 {
558 }
561 {
568 }
571 {
575 EQNOLEFILEHDR aHdr;
577 sal_uInt8 nProdVersion;
578 sal_uInt8 nProdSubVersion;
579 sal_uInt8 nPlatform;
580 sal_uInt8 nProduct;
591 //little crude hack to close occasionally open expressions
592 //a sophisticated system to determine what expressions are
593 //opened is required, but this is as much work as rewriting
594 //starmaths internals.
598 }
601 {
605 )
606 {
609 }
610 }
613 {
616 {
624 }
627 }
630 {
631 sal_uInt8 nXNudge;
633 sal_uInt8 nYNudge;
636 {
637 sal_uInt16 nXLongNudge;
638 sal_uInt16 nYLongNudge;
641 }
642 }
644 /* Fabulously complicated as many tokens have to be reordered and generally
645 * moved around from mathtypes paradigm to starmaths. */
648 {
649 //depth-protect
655 sal_uInt16 nTabOffset;
668 do
669 {
674 /*MathType strings can of course include words which
675 *are StarMath keywords, the simplest solution is
676 to escape strings of greater than len 1 with double
677 quotes to avoid scanning the TokenTable for matches
679 Unfortunately it may turn out that the string gets
680 split during the handling of a character emblishment
681 so this special case must be handled in the
682 character handler case 2:
683 */
685 {
688 }
690 {
693 {
694 OUString aStr;
699 }
701 {
708 }
709 }
712 {
714 {
721 {
723 {
739 else
785 {
788 else
789 {
792 }
793 }
809 {
812 }
815 {
818 }
837 {
843 }
847 {
853 }
857 {
863 }
867 {
870 else
873 {
875 }
876 }
888 {
891 else
894 {
896 }
897 }
905 {
908 else
911 {
913 }
914 }
922 {
925 else
928 }
940 {
943 else
946 }
953 {
956 else
959 }
970 {
973 {
975 }
976 }
987 {
990 }
1001 {
1004 {
1006 }
1007 }
1018 {
1021 }
1032 {
1035 {
1037 }
1038 }
1049 {
1052 }
1063 {
1066 {
1068 }
1069 }
1080 {
1083 }
1094 {
1097 {
1099 }
1100 }
1111 {
1114 }
1136 {
1138 {
1140 }
1141 }
1144 {
1147 }
1158 {
1160 }
1173 {
1175 }
1199 {
1202 }
1204 {
1206 newline--;
1207 }
1209 {
1211 newline--;
1212 }
1234 }
1240 {
1244 {
1247 {
1250 }
1251 }
1252 else
1259 nSetSize--;
1261 }
1268 {
1284 else
1328 {
1330 {
1331 newline--;
1333 }
1335 {
1340 }
1341 }
1342 else
1343 {
1345 newline--;
1346 }
1347 nPart++;
1355 newline--;
1356 else
1358 nPart++;
1361 {
1364 newline--;
1369 {
1372 {
1375 }
1376 }
1377 else
1384 nPart++;
1385 }
1390 newline--;
1392 nPart++;
1406 {
1407 newline--;
1409 }
1410 nPart++;
1415 {
1416 newline--;
1418 }
1419 nPart++;
1424 {
1425 newline--;
1427 }
1428 nPart++;
1432 newline--;
1435 newline--;
1437 nPart++;
1442 {
1444 {
1446 }
1448 {
1453 }
1454 }
1456 newline--;
1457 nPart++;
1462 {
1463 newline--;
1465 {
1472 }
1473 }
1474 nPart++;
1488 {
1490 {
1492 }
1493 newline--;
1494 }
1496 {
1501 newline--;
1502 }
1504 newline--;
1506 {
1511 newline--;
1512 }
1513 nPart++;
1518 {
1520 {
1522 }
1523 newline--;
1524 }
1527 {
1532 newline--;
1533 }
1535 newline--;
1537 {
1542 newline--;
1543 }
1544 nPart++;
1550 {
1552 {
1554 }
1555 newline--;
1556 }
1559 {
1564 newline--;
1565 }
1566 nPart++;
1571 {
1573 newline--;
1574 }
1577 {
1582 newline--;
1583 }
1585 newline--;
1587 {
1592 newline--;
1593 }
1594 nPart++;
1600 {
1602 newline--;
1603 }
1605 {
1610 newline--;
1611 }
1612 nPart++;
1620 {
1622 newline--;
1623 }
1625 newline--;
1627 {
1629 newline--;
1630 }
1633 {
1638 }
1639 nPart++;
1643 {
1645 {
1648 }
1649 else
1651 }
1656 nPart++;
1660 }
1662 //symbols that follow some of these
1663 //records. Foo Data.
1665 /*In matrices and piles we cannot separate equation
1666 *lines with the newline keyword*/
1668 newline++;
1669 }
1670 }
1702 {
1705 }
1709 {
1710 MathTypeFont aFont;
1712 /*
1713 The typeface number is the negative (which makes it
1714 positive) of the typeface value (unbiased) that appears in
1715 CHAR records that might follow a given FONT record
1716 */
1720 // read font name
1722 {
1727 }
1728 }
1743 }
1744 }
1747 {
1749 nSetSize--;
1750 }
1752 }
1754 /*Simply determine if we are at the end of a record or the end of a line,
1755 *with fiddly logic to see if we are in a matrix or a pile or neither
1757 Note we cannot tell until after the event that this is the last entry
1758 of a pile, so we must strip the last separator of a pile after this
1759 is detected in the PILE handler
1760 */
1763 {
1765 {
1767 {
1771 {
1773 rCurRow++;
1774 }
1775 }
1776 else
1777 {
1780 rCurCol++;
1781 else
1783 }
1784 }
1785 }
1787 /* set the alignment of the following term, but starmath currently
1788 * cannot handle vertical alignment */
1790 {
1792 {
1803 }
1804 rSetAlign++;
1805 }
1807 /* set size of text, complexity due to overuse of signedness as a flag
1808 * indicator by mathtype file format*/
1810 {
1814 {
1816 {
1818 {
1819 rSetSize--;
1822 }
1824 {
1830 rSetSize++;
1831 }
1833 }
1834 }
1835 else
1836 {
1837 /*sizetable should theoreticaly be filled with the default sizes
1838 *of the various font groupings matching starmaths equivalents
1839 in aTypeFaces, and a test would be done to see if the new font
1840 size would be the same as what starmath would have chosen for
1841 itself anyway in which case the size setting could be ignored*/
1845 {
1847 {
1848 rSetSize--;
1851 }
1853 {
1859 rSetSize++;
1860 }
1862 }
1863 }
1865 }
1868 {
1874 {
1894 };
1902 };
1933 }
1936 }
1940 {
1942 {
1965 {
1967 //if the token str and the result text are the same then this
1968 //is to be seen as text, else assume it's a mathchar
1971 else
1973 }
1983 {
1986 {
1989 }
1991 }
1993 //Root Node, PILE equivalent, i.e. vertical stack
2000 {
2005 {
2008 }
2011 }
2020 else
2024 {
2027 {
2030 }
2032 }
2033 }
2034 }
2038 {
2045 //there's just no way we can now handle any character
2046 //attributes (from mathtypes perspective) centered
2047 //over an expression but above template attribute
2048 //such as widevec and similar constructs
2049 //we have to drop them
2052 }
2055 {
2059 }
2063 {
2072 nBytes++;
2077 nBytes++;
2082 {
2084 {
2088 }
2089 }
2091 }
2094 //Root Node, PILE equivalent, i.e. vertical stack
2096 {
2098 //The root of the starmath is a table, if
2099 //we convert this them each iteration of
2100 //conversion from starmath to mathtype will
2101 //add an extra unnecessary level to the
2102 //mathtype output stack which would grow
2103 //without bound in a multi step conversion
2109 {
2113 }
2116 {
2118 {
2122 }
2123 }
2126 }
2130 {
2136 else
2141 {
2145 }
2148 {
2152 }
2153 else
2158 }
2162 {
2166 {
2170 }
2175 {
2184 {
2188 }
2189 else
2196 {
2200 }
2201 else
2204 {
2208 }
2209 else
2211 }
2213 }
2216 /*
2217 Sub and Sup scripts and another problem area, StarMath
2218 can have all possible options used at the same time, whereas
2219 Mathtype cannot. The ordering of the nodes for each system
2220 is quite different as well leading to some complexity
2221 */
2223 {
2226 {
2230 }
2236 {
2244 {
2248 }
2249 else
2252 {
2256 }
2257 else
2261 }
2267 {
2269 }
2275 {
2279 }
2284 {
2292 {
2296 }
2297 else
2300 {
2304 }
2305 else
2308 }
2310 //After subscript mathtype will keep the size of
2311 //normal text at the subscript size, sigh.
2313 }
2317 {
2337 }
2341 {
2351 {
2353 {
2393 }
2394 }
2397 {
2401 }
2406 {
2415 }
2420 }
2424 {
2429 else
2435 {
2439 }
2442 {
2446 }
2448 }
2451 {
2455 sal_uInt64 nPos;
2456 sal_uInt8 nVariation;
2459 {
2472 }
2479 {
2483 {
2486 }
2491 }
2492 else
2493 {
2496 }
2499 {
2504 else
2510 {
2513 }
2514 else
2515 {
2518 }
2522 {
2525 }
2526 else
2527 {
2530 }
2534 {
2537 }
2538 else
2539 {
2542 }
2546 {
2549 }
2550 else
2551 {
2554 }
2558 {
2561 }
2562 else
2563 {
2566 }
2581 }
2586 else
2587 {
2593 }
2597 {
2619 SAL_FALLTHROUGH;
2625 SAL_FALLTHROUGH;
2633 }
2636 }
2639 bool MathType::HandlePile(int &rSetAlign, int nLevel, sal_uInt8 nSelector, sal_uInt8 nVariation)
2640 {
2641 sal_uInt8 nVAlign;
2654 {
2656 rSetAlign--;
2657 }
2659 }
2662 {
2671 nBytes++;
2675 nBytes++;
2687 }
2691 {
2698 {
2700 }
2702 {
2704 }
2706 //For the (broken) case where one subscript template ends, and there is
2707 //another one after it, mathtype handles it as if the second one was
2708 //inside the first one and renders it as sub of sub
2711 {
2715 {
2718 }
2719 }
2721 //suborderlist
2725 {
2730 }
2733 else
2738 }
2741 {
2742 sal_uInt8 nEmbel;
2743 do
2744 {
2749 {
2761 {
2764 }
2770 {
2773 }
2779 {
2782 }
2803 {
2806 }
2816 }
2820 }
2823 {
2824 sal_uInt8 nTemp;
2827 {
2842 }
2843 }
2847 {
2852 {
2853 //This is a candidate for function recognition, whatever
2854 //that is!
2855 }
2860 {
2864 }
2865 else
2868 /*
2869 bad character, old mathtype < 3 has these
2870 */
2875 {
2876 //A bit tricky, the character emblishments for
2877 //mathtype can all be listed after each other, in
2878 //starmath some must go before the character and some
2879 //must go after. In addition some of the emblishments
2880 //may repeated and in starmath some of these groups
2881 //must be gathered together. sPost is the portion that
2882 //follows the char and nPostSup and nPostlSup are the
2883 //indexes at which this class of emblishment is
2884 //collated together
2893 {
2895 {
2896 OUString aStr;
2904 }
2905 else
2908 }
2909 }
2912 {
2917 )
2918 {
2920 {
2922 OUString aStr;
2926 }
2928 }
2931 {
2933 {
2935 OUString aStr;
2939 }
2941 }
2943 }
2946 {
2947 rRet.append("}}").append(sPost); // #i24340# make what would be "vec {A}_n" become "{vec {A}}_n"
2949 }
2951 }
2954 {
2956 //Special case for the "lim" option in StarMath
2960 )
2961 {
2963 {
2965 nLevel);
2980 {
2994 }
2996 {
3010 }
3018 {
3021 }
3024 }
3025 }
3027 }
3030 {
3033 {
3043 }
3046 {
3049 }
3051 }
3054 {
3056 {
3061 }
3064 {
3068 {
3070 }
3073 {
3075 }
3076 else
3078 //The typeface seems to be MTEXTRA for unicode characters,
3079 //though how to determine when mathtype chooses one over
3080 //the other is unknown. This should do the trick
3081 //nevertheless.
3082 sal_uInt8 nBias;
3086 ))
3087 {
3089 }
3098 else
3104 {
3110 }
3122 {
3130 }
3132 {
3138 }
3140 {
3146 }
3148 {
3154 }
3155 else
3157 }
3159 }
3162 {
3168 {
3172 {
3174 //there's just no way we can now handle any character
3175 //attributes (from mathtypes perspective) centered
3176 //over an expression but above template attributes
3177 //such as widevec and similar constructs
3178 //we have to drop them
3192 //or text with more than one char
3198 nPendingAttributes++;
3200 }
3201 }
3207 {
3219 }
3221 //if there was no suitable place to put the attribute,
3222 //then we have to just give up on it
3224 nPendingAttributes--;
3225 else
3226 {
3228 {
3230 nInsertion--;
3233 {
3278 }
3280 }
3281 }
3282 }
3285 {
3288 {
3291 {
3293 //after the character
3294 }
3295 else
3307 //Mathtype can only have these sort of character
3308 //attributes on a single character, starmath can put them
3309 //anywhere, when the entity involved is a text run this is
3310 //a large effort to place the character attribute on the
3311 //central mathtype character so that it does pretty much
3312 //what the user probably has in mind. The attributes
3313 //filled in here are dummy ones which are replaced in the
3314 //ATTRIBUT handler if a suitable location for the
3315 //attributes was found here. Unfortunately it is
3316 //possible for starmath to place character attributes on
3317 //entities which cannot occur in mathtype e.g. a Summation
3318 //symbol so these attributes may be lost
3321 {
3324 {
3326 //wedge the attributes in here and clear
3327 //the pending stack
3328 nPendingAttributes--;
3329 }
3333 }
3334 }
3335 }
3338 {
3339 OUStringBuffer sText;
3342 try
3343 {
3345 }
3347 {
3348 }
3350 }
3352 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */