summaryrefslogtreecommitdiffstats
path: root/drawinglayer/source/processor2d/vclmetafileprocessor2d.cxx
blob: 673fd093dc8dfc516453b153a5bd1f29ac8261b7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785
1786
1787
1788
1789
1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866
1867
1868
1869
1870
1871
1872
1873
1874
1875
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950
1951
1952
1953
1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000
2001
2002
2003
2004
2005
2006
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069
2070
2071
2072
2073
2074
2075
2076
2077
2078
2079
2080
2081
2082
2083
2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097
2098
2099
2100
2101
2102
2103
2104
2105
2106
2107
2108
2109
2110
2111
2112
2113
2114
2115
2116
2117
2118
2119
2120
2121
2122
2123
2124
2125
2126
2127
2128
2129
2130
2131
2132
2133
2134
2135
2136
2137
2138
2139
2140
2141
2142
2143
2144
2145
2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362
2363
2364
2365
2366
2367
2368
2369
2370
2371
2372
2373
2374
2375
2376
2377
2378
2379
2380
2381
2382
2383
2384
2385
2386
2387
2388
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2404
2405
2406
2407
2408
2409
2410
2411
2412
2413
2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440
2441
2442
2443
2444
2445
2446
2447
2448
2449
2450
2451
2452
2453
2454
2455
2456
2457
2458
2459
2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484
2485
2486
2487
2488
2489
2490
2491
2492
2493
2494
2495
2496
2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507
2508
2509
2510
2511
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2522
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532
2533
2534
2535
2536
2537
2538
2539
2540
2541
2542
2543
2544
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566
2567
2568
2569
2570
2571
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
 * This file is part of the LibreOffice project.
 *
 * This Source Code Form is subject to the terms of the Mozilla Public
 * License, v. 2.0. If a copy of the MPL was not distributed with this
 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
 *
 * This file incorporates work covered by the following license notice:
 *
 *   Licensed to the Apache Software Foundation (ASF) under one or more
 *   contributor license agreements. See the NOTICE file distributed
 *   with this work for additional information regarding copyright
 *   ownership. The ASF licenses this file to you under the Apache
 *   License, Version 2.0 (the "License"); you may not use this file
 *   except in compliance with the License. You may obtain a copy of
 *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
 */

#include <cmath>
#include <memory>
#include "vclmetafileprocessor2d.hxx"
#include "vclpixelprocessor2d.hxx"
#include <rtl/ustring.hxx>
#include <tools/gen.hxx>
#include <tools/stream.hxx>
#include <tools/diagnose_ex.h>
#include <comphelper/flagguard.hxx>
#include <comphelper/processfactory.hxx>
#include <config_global.h>
#include <basegfx/polygon/b2dpolygonclipper.hxx>
#include <basegfx/polygon/b2dpolypolygontools.hxx>
#include <basegfx/polygon/b2dpolygontools.hxx>
#include <basegfx/polygon/b2dlinegeometry.hxx>
#include <vcl/virdev.hxx>
#include <vcl/gdimtf.hxx>
#include <vcl/gradient.hxx>
#include <vcl/graphictools.hxx>
#include <vcl/metaact.hxx>
#include <vcl/graph.hxx> // for PDFExtOutDevData Graphic support
#include <toolkit/helper/formpdfexport.hxx> // for PDFExtOutDevData Graphic support
#include <drawinglayer/primitive2d/drawinglayer_primitivetypes2d.hxx>
#include <drawinglayer/primitive2d/textprimitive2d.hxx>
#include <drawinglayer/primitive2d/PolygonHairlinePrimitive2D.hxx>
#include <drawinglayer/primitive2d/PolygonStrokeArrowPrimitive2D.hxx>
#include <drawinglayer/primitive2d/PolyPolygonColorPrimitive2D.hxx>
#include <drawinglayer/primitive2d/PolyPolygonGradientPrimitive2D.hxx>
#include <drawinglayer/primitive2d/PolyPolygonHatchPrimitive2D.hxx>
#include <drawinglayer/primitive2d/PolyPolygonGraphicPrimitive2D.hxx>
#include <drawinglayer/primitive2d/bitmapprimitive2d.hxx>
#include <drawinglayer/primitive2d/maskprimitive2d.hxx>
#include <drawinglayer/primitive2d/modifiedcolorprimitive2d.hxx>
#include <drawinglayer/primitive2d/unifiedtransparenceprimitive2d.hxx>
#include <drawinglayer/primitive2d/transparenceprimitive2d.hxx>
#include <drawinglayer/primitive2d/fillgradientprimitive2d.hxx>
#include <drawinglayer/primitive2d/transformprimitive2d.hxx>
#include <drawinglayer/primitive2d/markerarrayprimitive2d.hxx>
#include <drawinglayer/primitive2d/pointarrayprimitive2d.hxx>
#include <drawinglayer/primitive2d/texthierarchyprimitive2d.hxx>
#include <drawinglayer/primitive2d/controlprimitive2d.hxx>
#include <drawinglayer/primitive2d/graphicprimitive2d.hxx>
#include <drawinglayer/primitive2d/pagepreviewprimitive2d.hxx>
#include <drawinglayer/primitive2d/epsprimitive2d.hxx>
#include <drawinglayer/primitive2d/structuretagprimitive2d.hxx>
#include <drawinglayer/primitive2d/objectinfoprimitive2d.hxx> // for Title/Description metadata

#include <com/sun/star/awt/XControl.hpp>
#include <com/sun/star/i18n/BreakIterator.hpp>
#include <com/sun/star/i18n/CharacterIteratorMode.hpp>
#include <com/sun/star/i18n/WordType.hpp>
#include <com/sun/star/beans/XPropertySet.hpp>

using namespace com::sun::star;

// #112245# definition for maximum allowed point count due to Metafile target.
// To be on the safe side with the old tools polygon, use slightly less than
// the theoretical maximum (bad experiences with tools polygon)

#define MAX_POLYGON_POINT_COUNT_METAFILE (0x0000fff0)

namespace
{
// #112245# helper to split line polygon in half
void splitLinePolygon(const basegfx::B2DPolygon& rBasePolygon, basegfx::B2DPolygon& o_aLeft,
                      basegfx::B2DPolygon& o_aRight)
{
    const sal_uInt32 nCount(rBasePolygon.count());

    if (nCount)
    {
        const sal_uInt32 nHalfCount((nCount - 1) >> 1);

        o_aLeft = basegfx::B2DPolygon(rBasePolygon, 0, nHalfCount + 1);
        o_aLeft.setClosed(false);

        o_aRight = basegfx::B2DPolygon(rBasePolygon, nHalfCount, nCount - nHalfCount);
        o_aRight.setClosed(false);

        if (rBasePolygon.isClosed())
        {
            o_aRight.append(rBasePolygon.getB2DPoint(0));

            if (rBasePolygon.areControlPointsUsed())
            {
                o_aRight.setControlPoints(o_aRight.count() - 1, rBasePolygon.getPrevControlPoint(0),
                                          rBasePolygon.getNextControlPoint(0));
            }
        }
    }
    else
    {
        o_aLeft.clear();
        o_aRight.clear();
    }
}

// #112245# helper to evtl. split filled polygons to maximum metafile point count
void fillPolyPolygonNeededToBeSplit(basegfx::B2DPolyPolygon& rPolyPolygon)
{
    const sal_uInt32 nPolyCount(rPolyPolygon.count());

    if (!nPolyCount)
        return;

    basegfx::B2DPolyPolygon aSplitted;

    for (sal_uInt32 a(0); a < nPolyCount; a++)
    {
        const basegfx::B2DPolygon& aCandidate(rPolyPolygon.getB2DPolygon(a));
        const sal_uInt32 nPointCount(aCandidate.count());
        bool bNeedToSplit(false);

        if (aCandidate.areControlPointsUsed())
        {
            // compare with the maximum for bezier curved polygons
            bNeedToSplit = nPointCount > ((MAX_POLYGON_POINT_COUNT_METAFILE / 3L) - 1);
        }
        else
        {
            // compare with the maximum for simple point polygons
            bNeedToSplit = nPointCount > (MAX_POLYGON_POINT_COUNT_METAFILE - 1);
        }

        if (bNeedToSplit)
        {
            // need to split the partial polygon
            const basegfx::B2DRange aRange(aCandidate.getB2DRange());
            const basegfx::B2DPoint aCenter(aRange.getCenter());

            if (aRange.getWidth() > aRange.getHeight())
            {
                // clip in left and right
                const basegfx::B2DPolyPolygon aLeft(basegfx::utils::clipPolygonOnParallelAxis(
                    aCandidate, false, true, aCenter.getX(), false));
                const basegfx::B2DPolyPolygon aRight(basegfx::utils::clipPolygonOnParallelAxis(
                    aCandidate, false, false, aCenter.getX(), false));

                aSplitted.append(aLeft);
                aSplitted.append(aRight);
            }
            else
            {
                // clip in top and bottom
                const basegfx::B2DPolyPolygon aTop(basegfx::utils::clipPolygonOnParallelAxis(
                    aCandidate, true, true, aCenter.getY(), false));
                const basegfx::B2DPolyPolygon aBottom(basegfx::utils::clipPolygonOnParallelAxis(
                    aCandidate, true, false, aCenter.getY(), false));

                aSplitted.append(aTop);
                aSplitted.append(aBottom);
            }
        }
        else
        {
            aSplitted.append(aCandidate);
        }
    }

    if (aSplitted.count() != nPolyCount)
    {
        rPolyPolygon = aSplitted;
    }
}

/** Filter input polypolygon for effectively empty sub-fills

    Needed to fix fdo#37559

    @param rPoly
    tools::PolyPolygon to filter

    @return converted tools PolyPolygon, w/o one-point fills
 */
tools::PolyPolygon getFillPolyPolygon(const ::basegfx::B2DPolyPolygon& rPoly)
{
    // filter input rPoly
    basegfx::B2DPolyPolygon aPoly;
    sal_uInt32 nCount(rPoly.count());
    for (sal_uInt32 i = 0; i < nCount; ++i)
    {
        const basegfx::B2DPolygon& aCandidate(rPoly.getB2DPolygon(i));
        if (!aCandidate.isClosed() || aCandidate.count() > 1)
            aPoly.append(aCandidate);
    }
    return tools::PolyPolygon(aPoly);
}

} // end of anonymous namespace

namespace drawinglayer::processor2d
{
tools::Rectangle
VclMetafileProcessor2D::impDumpToMetaFile(const primitive2d::Primitive2DContainer& rContent,
                                          GDIMetaFile& o_rContentMetafile)
{
    // Prepare VDev, MetaFile and connections
    OutputDevice* pLastOutputDevice = mpOutputDevice;
    GDIMetaFile* pLastMetafile = mpMetaFile;
    basegfx::B2DRange aPrimitiveRange(rContent.getB2DRange(getViewInformation2D()));

    // transform primitive range with current transformation (e.g shadow offset)
    aPrimitiveRange.transform(maCurrentTransformation);

    const tools::Rectangle aPrimitiveRectangle(
        basegfx::fround(aPrimitiveRange.getMinX()), basegfx::fround(aPrimitiveRange.getMinY()),
        basegfx::fround(aPrimitiveRange.getMaxX()), basegfx::fround(aPrimitiveRange.getMaxY()));
    ScopedVclPtrInstance<VirtualDevice> aContentVDev;
    MapMode aNewMapMode(pLastOutputDevice->GetMapMode());

    mpOutputDevice = aContentVDev.get();
    mpMetaFile = &o_rContentMetafile;
    aContentVDev->EnableOutput(false);
    aContentVDev->SetMapMode(pLastOutputDevice->GetMapMode());
    o_rContentMetafile.Record(aContentVDev.get());
    aContentVDev->SetLineColor(pLastOutputDevice->GetLineColor());
    aContentVDev->SetFillColor(pLastOutputDevice->GetFillColor());
    aContentVDev->SetFont(pLastOutputDevice->GetFont());
    aContentVDev->SetDrawMode(pLastOutputDevice->GetDrawMode());
    aContentVDev->SetSettings(pLastOutputDevice->GetSettings());
    aContentVDev->SetRefPoint(pLastOutputDevice->GetRefPoint());

    // dump to MetaFile
    process(rContent);

    // cleanups
    o_rContentMetafile.Stop();
    o_rContentMetafile.WindStart();
    aNewMapMode.SetOrigin(aPrimitiveRectangle.TopLeft());
    o_rContentMetafile.SetPrefMapMode(aNewMapMode);
    o_rContentMetafile.SetPrefSize(aPrimitiveRectangle.GetSize());
    mpOutputDevice = pLastOutputDevice;
    mpMetaFile = pLastMetafile;

    return aPrimitiveRectangle;
}

void VclMetafileProcessor2D::impConvertFillGradientAttributeToVCLGradient(
    Gradient& o_rVCLGradient, const attribute::FillGradientAttribute& rFiGrAtt,
    bool bIsTransparenceGradient) const
{
    if (bIsTransparenceGradient)
    {
        // it's about transparence channel intensities (black/white), do not use color modifier
        o_rVCLGradient.SetStartColor(Color(rFiGrAtt.getStartColor()));
        o_rVCLGradient.SetEndColor(Color(rFiGrAtt.getEndColor()));
    }
    else
    {
        // use color modifier to influence start/end color of gradient
        o_rVCLGradient.SetStartColor(
            Color(maBColorModifierStack.getModifiedColor(rFiGrAtt.getStartColor())));
        o_rVCLGradient.SetEndColor(
            Color(maBColorModifierStack.getModifiedColor(rFiGrAtt.getEndColor())));
    }

    o_rVCLGradient.SetAngle(
        Degree10(static_cast<sal_uInt32>(basegfx::rad2deg<10>(rFiGrAtt.getAngle()))));
    o_rVCLGradient.SetBorder(static_cast<sal_uInt16>(rFiGrAtt.getBorder() * 100.0));
    o_rVCLGradient.SetOfsX(static_cast<sal_uInt16>(rFiGrAtt.getOffsetX() * 100.0));
    o_rVCLGradient.SetOfsY(static_cast<sal_uInt16>(rFiGrAtt.getOffsetY() * 100.0));
    o_rVCLGradient.SetSteps(rFiGrAtt.getSteps());

    // defaults for intensity; those were computed into the start/end colors already
    o_rVCLGradient.SetStartIntensity(100);
    o_rVCLGradient.SetEndIntensity(100);

    switch (rFiGrAtt.getStyle())
    {
        default: // attribute::GradientStyle::Linear :
        {
            o_rVCLGradient.SetStyle(GradientStyle::Linear);
            break;
        }
        case attribute::GradientStyle::Axial:
        {
            o_rVCLGradient.SetStyle(GradientStyle::Axial);
            break;
        }
        case attribute::GradientStyle::Radial:
        {
            o_rVCLGradient.SetStyle(GradientStyle::Radial);
            break;
        }
        case attribute::GradientStyle::Elliptical:
        {
            o_rVCLGradient.SetStyle(GradientStyle::Elliptical);
            break;
        }
        case attribute::GradientStyle::Square:
        {
            o_rVCLGradient.SetStyle(GradientStyle::Square);
            break;
        }
        case attribute::GradientStyle::Rect:
        {
            o_rVCLGradient.SetStyle(GradientStyle::Rect);
            break;
        }
    }
}

void VclMetafileProcessor2D::impStartSvtGraphicFill(SvtGraphicFill const* pSvtGraphicFill)
{
    if (pSvtGraphicFill && !mnSvtGraphicFillCount)
    {
        SvMemoryStream aMemStm;

        WriteSvtGraphicFill(aMemStm, *pSvtGraphicFill);
        mpMetaFile->AddAction(new MetaCommentAction(
            "XPATHFILL_SEQ_BEGIN", 0, static_cast<const sal_uInt8*>(aMemStm.GetData()),
            aMemStm.TellEnd()));
        mnSvtGraphicFillCount++;
    }
}

void VclMetafileProcessor2D::impEndSvtGraphicFill(SvtGraphicFill const* pSvtGraphicFill)
{
    if (pSvtGraphicFill && mnSvtGraphicFillCount)
    {
        mnSvtGraphicFillCount--;
        mpMetaFile->AddAction(new MetaCommentAction("XPATHFILL_SEQ_END"));
    }
}

double VclMetafileProcessor2D::getTransformedLineWidth(double fWidth) const
{
    // #i113922# the LineWidth is duplicated in the MetaPolylineAction,
    // and also inside the SvtGraphicStroke and needs transforming into
    // the same space as its coordinates here cf. fdo#61789
    // This is a partial fix. When an object transformation is used which
    // e.g. contains a scaleX != scaleY, an unproportional scaling will happen.
    const basegfx::B2DVector aDiscreteUnit(maCurrentTransformation
                                           * basegfx::B2DVector(fWidth, 0.0));

    return aDiscreteUnit.getLength();
}

std::unique_ptr<SvtGraphicStroke> VclMetafileProcessor2D::impTryToCreateSvtGraphicStroke(
    const basegfx::B2DPolygon& rB2DPolygon, const basegfx::BColor* pColor,
    const attribute::LineAttribute* pLineAttribute,
    const attribute::StrokeAttribute* pStrokeAttribute,
    const attribute::LineStartEndAttribute* pStart, const attribute::LineStartEndAttribute* pEnd)
{
    std::unique_ptr<SvtGraphicStroke> pRetval;

    if (rB2DPolygon.count() && !mnSvtGraphicStrokeCount)
    {
        basegfx::B2DPolygon aLocalPolygon(rB2DPolygon);
        basegfx::BColor aStrokeColor;
        basegfx::B2DPolyPolygon aStartArrow;
        basegfx::B2DPolyPolygon aEndArrow;

        if (pColor)
        {
            aStrokeColor = *pColor;
        }
        else if (pLineAttribute)
        {
            aStrokeColor = maBColorModifierStack.getModifiedColor(pLineAttribute->getColor());
        }

        // It IS needed to record the stroke color at all in the metafile,
        // SvtGraphicStroke has NO entry for stroke color(!)
        mpOutputDevice->SetLineColor(Color(aStrokeColor));

        if (!aLocalPolygon.isClosed())
        {
            double fPolyLength(0.0);
            double fStart(0.0);
            double fEnd(0.0);

            if (pStart && pStart->isActive())
            {
                fPolyLength = basegfx::utils::getLength(aLocalPolygon);

                aStartArrow = basegfx::utils::createAreaGeometryForLineStartEnd(
                    aLocalPolygon, pStart->getB2DPolyPolygon(), true, pStart->getWidth(),
                    fPolyLength, pStart->isCentered() ? 0.5 : 0.0, &fStart);
            }

            if (pEnd && pEnd->isActive())
            {
                if (basegfx::fTools::equalZero(fPolyLength))
                {
                    fPolyLength = basegfx::utils::getLength(aLocalPolygon);
                }

                aEndArrow = basegfx::utils::createAreaGeometryForLineStartEnd(
                    aLocalPolygon, pEnd->getB2DPolyPolygon(), false, pEnd->getWidth(), fPolyLength,
                    pEnd->isCentered() ? 0.5 : 0.0, &fEnd);
            }

            if (0.0 != fStart || 0.0 != fEnd)
            {
                // build new poly, consume something from old poly
                aLocalPolygon = basegfx::utils::getSnippetAbsolute(aLocalPolygon, fStart,
                                                                   fPolyLength - fEnd, fPolyLength);
            }
        }

        SvtGraphicStroke::JoinType eJoin(SvtGraphicStroke::joinNone);
        SvtGraphicStroke::CapType eCap(SvtGraphicStroke::capButt);
        double fLineWidth(0.0);
        double fMiterLength(0.0);
        SvtGraphicStroke::DashArray aDashArray;

        if (pLineAttribute)
        {
            fLineWidth = fMiterLength = getTransformedLineWidth(pLineAttribute->getWidth());

            // get Join
            switch (pLineAttribute->getLineJoin())
            {
                case basegfx::B2DLineJoin::NONE:
                {
                    eJoin = SvtGraphicStroke::joinNone;
                    break;
                }
                case basegfx::B2DLineJoin::Bevel:
                {
                    eJoin = SvtGraphicStroke::joinBevel;
                    break;
                }
                case basegfx::B2DLineJoin::Miter:
                {
                    eJoin = SvtGraphicStroke::joinMiter;
                    // ATM 15 degrees is assumed
                    // TODO wait for P1383R0 and C++20's std::numbers::pi
                    fMiterLength /= std::sin(M_PI / 12);
                    break;
                }
                case basegfx::B2DLineJoin::Round:
                {
                    eJoin = SvtGraphicStroke::joinRound;
                    break;
                }
            }

            // get stroke
            switch (pLineAttribute->getLineCap())
            {
                default: /* css::drawing::LineCap_BUTT */
                {
                    eCap = SvtGraphicStroke::capButt;
                    break;
                }
                case css::drawing::LineCap_ROUND:
                {
                    eCap = SvtGraphicStroke::capRound;
                    break;
                }
                case css::drawing::LineCap_SQUARE:
                {
                    eCap = SvtGraphicStroke::capSquare;
                    break;
                }
            }
        }

        if (pStrokeAttribute)
        {
            // copy dash array
            aDashArray = pStrokeAttribute->getDotDashArray();
        }

        // #i101734# apply current object transformation to created geometry.
        // This is a partial fix. When an object transformation is used which
        // e.g. contains a scaleX != scaleY, an unproportional scaling would
        // have to be applied to the evtl. existing fat line. The current
        // concept of PDF export and SvtGraphicStroke usage does simply not
        // allow handling such definitions. The only clean way would be to
        // add the transformation to SvtGraphicStroke and to handle it there
        aLocalPolygon.transform(maCurrentTransformation);
        aStartArrow.transform(maCurrentTransformation);
        aEndArrow.transform(maCurrentTransformation);

        pRetval.reset(
            new SvtGraphicStroke(tools::Polygon(aLocalPolygon), tools::PolyPolygon(aStartArrow),
                                 tools::PolyPolygon(aEndArrow), mfCurrentUnifiedTransparence,
                                 fLineWidth, eCap, eJoin, fMiterLength, std::move(aDashArray)));
    }

    return pRetval;
}

void VclMetafileProcessor2D::impStartSvtGraphicStroke(SvtGraphicStroke const* pSvtGraphicStroke)
{
    if (pSvtGraphicStroke && !mnSvtGraphicStrokeCount)
    {
        SvMemoryStream aMemStm;

        WriteSvtGraphicStroke(aMemStm, *pSvtGraphicStroke);
        mpMetaFile->AddAction(new MetaCommentAction(
            "XPATHSTROKE_SEQ_BEGIN", 0, static_cast<const sal_uInt8*>(aMemStm.GetData()),
            aMemStm.TellEnd()));
        mnSvtGraphicStrokeCount++;
    }
}

void VclMetafileProcessor2D::impEndSvtGraphicStroke(SvtGraphicStroke const* pSvtGraphicStroke)
{
    if (pSvtGraphicStroke && mnSvtGraphicStrokeCount)
    {
        mnSvtGraphicStrokeCount--;
        mpMetaFile->AddAction(new MetaCommentAction("XPATHSTROKE_SEQ_END"));
    }
}

void VclMetafileProcessor2D::popStructureElement(vcl::PDFWriter::StructElement eElem)
{
    if (!maListElements.empty() && maListElements.top() == eElem)
    {
        maListElements.pop();
        mpPDFExtOutDevData->EndStructureElement();
    }
}

void VclMetafileProcessor2D::popListItem()
{
    popStructureElement(vcl::PDFWriter::LIBody);
    popStructureElement(vcl::PDFWriter::ListItem);
}

void VclMetafileProcessor2D::popList()
{
    popListItem();
    popStructureElement(vcl::PDFWriter::List);
}

// init static break iterator
uno::Reference<css::i18n::XBreakIterator> VclMetafileProcessor2D::mxBreakIterator;

VclMetafileProcessor2D::VclMetafileProcessor2D(const geometry::ViewInformation2D& rViewInformation,
                                               OutputDevice& rOutDev)
    : VclProcessor2D(rViewInformation, rOutDev)
    , mpMetaFile(rOutDev.GetConnectMetaFile())
    , mnSvtGraphicFillCount(0)
    , mnSvtGraphicStrokeCount(0)
    , mfCurrentUnifiedTransparence(0.0)
    , mpPDFExtOutDevData(dynamic_cast<vcl::PDFExtOutDevData*>(rOutDev.GetExtOutDevData()))
    , mnCurrentOutlineLevel(-1)
    , mbInListItem(false)
    , mbBulletPresent(false)
{
    OSL_ENSURE(rOutDev.GetConnectMetaFile(),
               "VclMetafileProcessor2D: Used on OutDev which has no MetaFile Target (!)");
    // draw to logic coordinates, do not initialize maCurrentTransformation to viewTransformation
    // but only to ObjectTransformation. Do not change MapMode of destination.
    maCurrentTransformation = rViewInformation.getObjectTransformation();
}

VclMetafileProcessor2D::~VclMetafileProcessor2D()
{
    // MapMode was not changed, no restore necessary
}

/***********************************************************************************************

    Support of MetaCommentActions in the VclMetafileProcessor2D
    Found MetaCommentActions and how they are supported:

    XGRAD_SEQ_BEGIN, XGRAD_SEQ_END:

    Used inside OutputDevice::DrawGradient to mark the start and end of a MetaGradientEx action.
    It is used in various exporters/importers to have direct access to the gradient before it
    is rendered by VCL (and thus fragmented to polygon color actions and others). On that base, e.g.
    the Metafile to SdrObject import creates its gradient objects.
    Best (and safest) way to support it here is to use PRIMITIVE2D_ID_POLYPOLYGONGRADIENTPRIMITIVE2D,
    map it back to the corresponding tools tools::PolyPolygon and the Gradient and just call
    OutputDevice::DrawGradient which creates the necessary compatible actions.

    XPATHFILL_SEQ_BEGIN, XPATHFILL_SEQ_END:

    Two producers, one is vcl/source/gdi/gdimtf.cxx, line 1273. There, it is transformed
    inside GDIMetaFile::Rotate, nothing to take care of here.
    The second producer is in graphics/svx/source/svdraw/impgrfll.cxx, line 374. This is used
    with each incarnation of Imp_GraphicFill when a metafile is recorded, fillstyle is not
    XFILL_NONE and not completely transparent. It creates a SvtGraphicFill and streams it
    to the comment action. A closing end token is created in the destructor.
    Usages of Imp_GraphicFill are in Do_Paint_Object-methods of SdrCircObj, SdrPathObj and
    SdrRectObj.
    The token users pick various actions from SvtGraphicFill, so it may need to be added for all kind
    of filled objects, even simple colored polygons. It is added as extra information; the
    Metafile actions between the two tokens are interpreted as output generated from those
    fills. Thus, users have the choice to use the SvtGraphicFill info or the created output
    actions.
    Even for XFillTransparenceItem it is used, thus it may need to be supported in
    UnifiedTransparencePrimitive2D, too, when interpreted as normally filled PolyPolygon.
    Implemented for:
        PRIMITIVE2D_ID_POLYPOLYGONGRAPHICPRIMITIVE2D,
        PRIMITIVE2D_ID_POLYPOLYGONHATCHPRIMITIVE2D,
        PRIMITIVE2D_ID_POLYPOLYGONGRADIENTPRIMITIVE2D,
        PRIMITIVE2D_ID_POLYPOLYGONCOLORPRIMITIVE2D,
        and for PRIMITIVE2D_ID_UNIFIEDTRANSPARENCEPRIMITIVE2D when detected unified transparence

    XPATHSTROKE_SEQ_BEGIN, XPATHSTROKE_SEQ_END:

    Similar to pathfill, but using SvtGraphicStroke instead. It also has two producers where one
    is also the GDIMetaFile::Rotate. Another user is MetaCommentAction::Move which modifies the
    contained path accordingly.
    The other one is SdrObject::Imp_DrawLineGeometry. It's done when MetaFile is set at OutDev and
    only when geometry is a single polygon (!). I see no reason for that; in the PS exporter this
    would hinder to make use of tools::PolyPolygon strokes. I will need to add support at:
        PRIMITIVE2D_ID_POLYGONHAIRLINEPRIMITIVE2D
        PRIMITIVE2D_ID_POLYGONSTROKEPRIMITIVE2D
        PRIMITIVE2D_ID_POLYGONSTROKEARROWPRIMITIVE2D
    This can be done hierarchical, too.
    Okay, base implementation done based on those three primitives.

    FIELD_SEQ_BEGIN, FIELD_SEQ_END

    Used from slideshow for URLs, created from diverse SvxField implementations inside
    createBeginComment()/createEndComment(). createBeginComment() is used from editeng\impedit3.cxx
    inside ImpEditEngine::Paint.
    Created TextHierarchyFieldPrimitive2D and added needed infos there; it is a group primitive and wraps
    text primitives (but is not limited to that). It contains the field type if special actions for the
    support of FIELD_SEQ_BEGIN/END are needed; this is the case for Page and URL fields. If more is
    needed, it may be supported there.
    FIELD_SEQ_BEGIN;PageField
    FIELD_SEQ_END
    Okay, these are now completely supported by TextHierarchyFieldPrimitive2D. URL works, too.

    XTEXT

    XTEXT_EOC(i) end of character
    XTEXT_EOW(i) end of word
    XTEXT_EOS(i) end of sentence

    this three are with index and are created with the help of an i18n::XBreakIterator in
    ImplDrawWithComments. Simplifying, moving out text painting, reworking to create some
    data structure for holding those TEXT infos.
    Supported directly by TextSimplePortionPrimitive2D with adding a Locale to the basic text
    primitive. In the MetaFileRenderer, the creation is now done (see below). This has the advantage
    that this creations do not need to be done for all paints all the time. This would be
    expensive since the BreakIterator and it's usage is expensive and for each paint also the
    whole character stops would need to be created.
    Created only for TextDecoratedPortionPrimitive2D due to XTEXT_EOL and XTEXT_EOP (see below)

    XTEXT_EOL() end of line
    XTEXT_EOP() end of paragraph

    First try with boolean marks at TextDecoratedPortionPrimitive2D did not work too well,
    i decided to solve it with structure. I added the TextHierarchyPrimitives for this,
    namely:
    - TextHierarchyLinePrimitive2D: Encapsulates single line
    - TextHierarchyParagraphPrimitive2D: Encapsulates single paragraph
    - TextHierarchyBlockPrimitive2D: encapsulates object texts (only one ATM)
    Those are now supported in hierarchy. This means the MetaFile renderer will support them
    by using them, recursively using their content and adding MetaFile comments as needed.
    This also means that when another text layouter will be used it will be necessary to
    create/support the same HierarchyPrimitives to support users.
    To transport the information using this hierarchy is best suited to all future needs;
    the slideshow will be able to profit from it directly when using primitives; all other
    renderers not interested in the text structure will just ignore the encapsulations.

    XTEXT_PAINTSHAPE_BEGIN, XTEXT_PAINTSHAPE_END
    Supported now by the TextHierarchyBlockPrimitive2D.

    EPSReplacementGraphic:
    Only used in goodies\source\filter.vcl\ieps\ieps.cxx and svx\source\xml\xmlgrhlp.cxx to
    hold the original EPS which was imported in the same MetaFile as first 2 entries. Only
    used to export the original again (if exists).
    Not necessary to support with MetaFileRenderer.

    XTEXT_SCROLLRECT, XTEXT_PAINTRECT
    Currently used to get extra MetaFile infos using GraphicExporter which again uses
    SdrTextObj::GetTextScrollMetaFileAndRectangle(). ATM works with primitives since
    the rectangle data is added directly by the GraphicsExporter as comment. Does not need
    to be adapted at once.
    When adapting later, the only user - the diashow - should directly use the provided
    Animation infos in the appropriate primitives (e.g. AnimatedSwitchPrimitive2D)

    PRNSPOOL_TRANSPARENTBITMAP_BEGIN, PRNSPOOL_TRANSPARENTBITMAP_END
    VCL usage when printing PL -> THB. Okay, THB confirms that it is only used as
    a fix (hack) while VCL printing. It is needed to not downscale a bitmap which
    was explicitly created for the printer already again to some default maximum
    bitmap sizes.
    Nothing to do here for the primitive renderer.

    Support for vcl::PDFExtOutDevData:
    PL knows that SJ did that stuff, it's used to hold a pointer to PDFExtOutDevData at
    the OutDev. When set, some extra data is written there. Trying simple PDF export and
    watching if I get those infos.
    Well, a PDF export does not use e.g. ImpEditEngine::Paint since the PdfFilter uses
    the SdXImpressDocument::render and thus uses the VclMetafileProcessor2D. I will check
    if I get a PDFExtOutDevData at the target output device.
    Indeed, I get one. Checking what all may be done when that extra-device-info is there.

    All in all I have to talk to SJ. I will need to emulate some of those actions, but
    i need to discuss which ones.
    In the future, all those infos would be taken from the primitive sequence anyways,
    thus these extensions would potentially be temporary, too.
    Discussed with SJ, added the necessary support and tested it. Details follow.

    - In ImpEditEngine::Paint, paragraph infos and URL stuff is added.
      Added in primitive MetaFile renderer.
      Checking URL: Indeed, current version exports it, but it is missing in primitive
      CWS version. Adding support.
      Okay, URLs work. Checked, Done.

    - UnoControlPDFExportContact is only created when PDFExtOutDevData is used at the
      target and uno control data is created in UnoControlPDFExportContact::do_PaintObject.
      This may be added in primitive MetaFile renderer.
      Adding support...
      OOps, the necessary helper stuff is in svx/source/form/formpdxexport.cxx in namespace
      svxform. Have to talk to FS if this has to be like that. Especially since
      vcl::PDFWriter::AnyWidget is filled out, which is already part of vcl.
      Wrote an eMail to FS, he is on vacation currently. I see no reason why not to move
      that stuff to somewhere else, maybe tools or svtools ?!? We will see...
      Moved to toolkit, so I have to link against it. I tried VCL first, but it did
      not work since VCLUnoHelper::CreateFont is unresolved in VCL (!). Other than the name
      may imply, it is defined in toolkit (!). Since toolkit is linked against VCL itself,
      the lowest movement plane is toolkit.
      Checked form control export, it works well. Done.

    - In goodies, in GraphicObject::Draw, when the used Graphic is linked, infos are
      generated. I will need to check what happens here with primitives.
      To support, use of GraphicPrimitive2D (PRIMITIVE2D_ID_GRAPHICPRIMITIVE2D) may be needed.
      Added support, but feature is broken in main version, so i cannot test at all.
      Writing a bug to CL (or SJ) and seeing what happens (#i80380#).
      SJ took a look and we got it working. Tested VCL MetaFile Renderer based export,
      as intended, the original file is exported. Works, Done.


    To be done:

    - Maybe there are more places to take care of for vcl::PDFExtOutDevData!


****************************************************************************************************/

void VclMetafileProcessor2D::processBasePrimitive2D(const primitive2d::BasePrimitive2D& rCandidate)
{
    switch (rCandidate.getPrimitive2DID())
    {
        case PRIMITIVE2D_ID_WRONGSPELLPRIMITIVE2D:
        {
            // directdraw of wrong spell primitive
            // Ignore for VclMetafileProcessor2D, this is for printing and MetaFile recording only
            break;
        }
        case PRIMITIVE2D_ID_GRAPHICPRIMITIVE2D:
        {
            processGraphicPrimitive2D(
                static_cast<const primitive2d::GraphicPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_CONTROLPRIMITIVE2D:
        {
            processControlPrimitive2D(
                static_cast<const primitive2d::ControlPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_TEXTHIERARCHYFIELDPRIMITIVE2D:
        {
            processTextHierarchyFieldPrimitive2D(
                static_cast<const primitive2d::TextHierarchyFieldPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_TEXTHIERARCHYLINEPRIMITIVE2D:
        {
            processTextHierarchyLinePrimitive2D(
                static_cast<const primitive2d::TextHierarchyLinePrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_TEXTHIERARCHYBULLETPRIMITIVE2D:
        {
            processTextHierarchyBulletPrimitive2D(
                static_cast<const primitive2d::TextHierarchyBulletPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_TEXTHIERARCHYPARAGRAPHPRIMITIVE2D:
        {
            processTextHierarchyParagraphPrimitive2D(
                static_cast<const primitive2d::TextHierarchyParagraphPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_TEXTHIERARCHYBLOCKPRIMITIVE2D:
        {
            processTextHierarchyBlockPrimitive2D(
                static_cast<const primitive2d::TextHierarchyBlockPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_TEXTSIMPLEPORTIONPRIMITIVE2D:
        case PRIMITIVE2D_ID_TEXTDECORATEDPORTIONPRIMITIVE2D:
        {
            // for supporting TEXT_ MetaFile actions there is more to do here; get the candidate
            processTextSimplePortionPrimitive2D(
                static_cast<const primitive2d::TextSimplePortionPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_POLYGONHAIRLINEPRIMITIVE2D:
        {
            processPolygonHairlinePrimitive2D(
                static_cast<const primitive2d::PolygonHairlinePrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_POLYGONSTROKEPRIMITIVE2D:
        {
            processPolygonStrokePrimitive2D(
                static_cast<const primitive2d::PolygonStrokePrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_POLYGONSTROKEARROWPRIMITIVE2D:
        {
            processPolygonStrokeArrowPrimitive2D(
                static_cast<const primitive2d::PolygonStrokeArrowPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_BITMAPPRIMITIVE2D:
        {
            // direct draw of transformed BitmapEx primitive; use default processing, but without
            // former testing if graphic content is inside discrete local viewport; this is not
            // setup for metafile targets (metafile renderer tries to render in logic coordinates,
            // the mapping is kept to the OutputDevice for better Metafile recording)
            RenderBitmapPrimitive2D(static_cast<const primitive2d::BitmapPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_POLYPOLYGONGRAPHICPRIMITIVE2D:
        {
            processPolyPolygonGraphicPrimitive2D(
                static_cast<const primitive2d::PolyPolygonGraphicPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_POLYPOLYGONHATCHPRIMITIVE2D:
        {
            processPolyPolygonHatchPrimitive2D(
                static_cast<const primitive2d::PolyPolygonHatchPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_POLYPOLYGONGRADIENTPRIMITIVE2D:
        {
            processPolyPolygonGradientPrimitive2D(
                static_cast<const primitive2d::PolyPolygonGradientPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_POLYPOLYGONCOLORPRIMITIVE2D:
        {
            processPolyPolygonColorPrimitive2D(
                static_cast<const primitive2d::PolyPolygonColorPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_MASKPRIMITIVE2D:
        {
            processMaskPrimitive2D(static_cast<const primitive2d::MaskPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_MODIFIEDCOLORPRIMITIVE2D:
        {
            // modified color group. Force output to unified color. Use default processing.
            RenderModifiedColorPrimitive2D(
                static_cast<const primitive2d::ModifiedColorPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_UNIFIEDTRANSPARENCEPRIMITIVE2D:
        {
            processUnifiedTransparencePrimitive2D(
                static_cast<const primitive2d::UnifiedTransparencePrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_TRANSPARENCEPRIMITIVE2D:
        {
            processTransparencePrimitive2D(
                static_cast<const primitive2d::TransparencePrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_TRANSFORMPRIMITIVE2D:
        {
            // use default transform group processing
            RenderTransformPrimitive2D(
                static_cast<const primitive2d::TransformPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_PAGEPREVIEWPRIMITIVE2D:
        {
            // new XDrawPage for ViewInformation2D
            RenderPagePreviewPrimitive2D(
                static_cast<const primitive2d::PagePreviewPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_MARKERARRAYPRIMITIVE2D:
        {
            // use default marker array processing
            RenderMarkerArrayPrimitive2D(
                static_cast<const primitive2d::MarkerArrayPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_POINTARRAYPRIMITIVE2D:
        {
            // use default point array processing
            RenderPointArrayPrimitive2D(
                static_cast<const primitive2d::PointArrayPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_STRUCTURETAGPRIMITIVE2D:
        {
            processStructureTagPrimitive2D(
                static_cast<const primitive2d::StructureTagPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_EPSPRIMITIVE2D:
        {
            RenderEpsPrimitive2D(static_cast<const primitive2d::EpsPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_OBJECTINFOPRIMITIVE2D:
        {
            processObjectInfoPrimitive2D(
                static_cast<const primitive2d::ObjectInfoPrimitive2D&>(rCandidate));
            break;
        }
        case PRIMITIVE2D_ID_SHADOWPRIMITIVE2D:
        case PRIMITIVE2D_ID_GLOWPRIMITIVE2D:
        case PRIMITIVE2D_ID_SOFTEDGEPRIMITIVE2D:
        {
            processPrimitive2DOnPixelProcessor(rCandidate);
            break;
        }
        default:
        {
            // process recursively
            process(rCandidate);
            break;
        }
    }
}

void VclMetafileProcessor2D::processObjectInfoPrimitive2D(
    primitive2d::ObjectInfoPrimitive2D const& rObjectInfoPrimitive2D)
{
    // currently StructureTagPrimitive2D is only used for SdrObjects - have to
    // avoid adding Alt text if the SdrObject is not actually tagged, as it
    // would then end up on an unrelated structure element.
    if (mpCurrentStructureTag && mpCurrentStructureTag->isTaggedSdrObject())
    {
        // Create image alternative description from ObjectInfoPrimitive2D info
        // for PDF export, for the currently active SdrObject's structure element
        if (mpPDFExtOutDevData->GetIsExportTaggedPDF())
        {
            OUString aAlternateDescription;

            if (!rObjectInfoPrimitive2D.getTitle().isEmpty())
            {
                aAlternateDescription += rObjectInfoPrimitive2D.getTitle();
            }

            if (!rObjectInfoPrimitive2D.getDesc().isEmpty())
            {
                if (!aAlternateDescription.isEmpty())
                {
                    aAlternateDescription += " - ";
                }

                aAlternateDescription += rObjectInfoPrimitive2D.getDesc();
            }

            // Use SetAlternateText to set it. This will work as long as some
            // structure is used (see PDFWriterImpl::setAlternateText and
            // m_nCurrentStructElement - tagged PDF export works with this in
            // Draw/Impress/Writer, but not in Calc due to too less structure...)
            //Z maybe add structure to Calc PDF export, may need some BeginGroup/EndGroup stuff ..?
            if (!aAlternateDescription.isEmpty())
            {
                mpPDFExtOutDevData->SetAlternateText(aAlternateDescription);
            }
        }
    }

    // process content
    process(rObjectInfoPrimitive2D.getChildren());
}

void VclMetafileProcessor2D::processGraphicPrimitive2D(
    const primitive2d::GraphicPrimitive2D& rGraphicPrimitive)
{
    bool bUsingPDFExtOutDevData(false);
    basegfx::B2DVector aTranslate, aScale;
    static bool bSuppressPDFExtOutDevDataSupport(false); // loplugin:constvars:ignore

    if (mpPDFExtOutDevData && !bSuppressPDFExtOutDevDataSupport)
    {
        // emulate data handling from UnoControlPDFExportContact, original see
        // svtools/source/graphic/grfmgr.cxx
        const Graphic& rGraphic = rGraphicPrimitive.getGraphicObject().GetGraphic();

        if (rGraphic.IsGfxLink())
        {
            const GraphicAttr& rAttr = rGraphicPrimitive.getGraphicAttr();

            if (!rAttr.IsSpecialDrawMode() && !rAttr.IsAdjusted())
            {
                const basegfx::B2DHomMatrix& rTransform = rGraphicPrimitive.getTransform();
                double fRotate, fShearX;
                rTransform.decompose(aScale, aTranslate, fRotate, fShearX);

                if (basegfx::fTools::equalZero(fRotate) && (aScale.getX() > 0.0)
                    && (aScale.getY() > 0.0))
                {
                    bUsingPDFExtOutDevData = true;
                    mpPDFExtOutDevData->BeginGroup();
                }
            }
        }
    }

    // process recursively and add MetaFile comment
    process(rGraphicPrimitive);

    if (!bUsingPDFExtOutDevData)
        return;

    // emulate data handling from UnoControlPDFExportContact, original see
    // svtools/source/graphic/grfmgr.cxx
    const basegfx::B2DRange aCurrentRange(aTranslate.getX(), aTranslate.getY(),
                                          aTranslate.getX() + aScale.getX(),
                                          aTranslate.getY() + aScale.getY());
    const tools::Rectangle aCurrentRect(
        sal_Int32(floor(aCurrentRange.getMinX())), sal_Int32(floor(aCurrentRange.getMinY())),
        sal_Int32(ceil(aCurrentRange.getMaxX())), sal_Int32(ceil(aCurrentRange.getMaxY())));
    const GraphicAttr& rAttr = rGraphicPrimitive.getGraphicAttr();
    // fdo#72530 don't pass empty Rectangle to EndGroup
    tools::Rectangle aCropRect(aCurrentRect);

    if (rAttr.IsCropped())
    {
        // calculate scalings between real image size and logic object size. This
        // is necessary since the crop values are relative to original bitmap size
        double fFactorX(1.0);
        double fFactorY(1.0);

        {
            const MapMode aMapMode100thmm(MapUnit::Map100thMM);
            const Size aBitmapSize(OutputDevice::LogicToLogic(
                rGraphicPrimitive.getGraphicObject().GetPrefSize(),
                rGraphicPrimitive.getGraphicObject().GetPrefMapMode(), aMapMode100thmm));
            const double fDivX(aBitmapSize.Width() - rAttr.GetLeftCrop() - rAttr.GetRightCrop());
            const double fDivY(aBitmapSize.Height() - rAttr.GetTopCrop() - rAttr.GetBottomCrop());

            if (!basegfx::fTools::equalZero(fDivX))
            {
                fFactorX = aScale.getX() / fDivX;
            }

            if (!basegfx::fTools::equalZero(fDivY))
            {
                fFactorY = aScale.getY() / fDivY;
            }
        }

        // calculate crop range and rect
        basegfx::B2DRange aCropRange;
        aCropRange.expand(
            aCurrentRange.getMinimum()
            - basegfx::B2DPoint(rAttr.GetLeftCrop() * fFactorX, rAttr.GetTopCrop() * fFactorY));
        aCropRange.expand(
            aCurrentRange.getMaximum()
            + basegfx::B2DPoint(rAttr.GetRightCrop() * fFactorX, rAttr.GetBottomCrop() * fFactorY));

        aCropRect = tools::Rectangle(
            sal_Int32(floor(aCropRange.getMinX())), sal_Int32(floor(aCropRange.getMinY())),
            sal_Int32(ceil(aCropRange.getMaxX())), sal_Int32(ceil(aCropRange.getMaxY())));
    }

    // #i123295# 3rd param is uncropped rect, 4th is cropped. The primitive has the cropped
    // object transformation, thus aCurrentRect *is* the clip region while aCropRect is the expanded,
    // uncropped region. Thus, correct order is aCropRect, aCurrentRect
    mpPDFExtOutDevData->EndGroup(rGraphicPrimitive.getGraphicObject().GetGraphic(),
                                 255 - rAttr.GetAlpha(), aCropRect, aCurrentRect);
}

void VclMetafileProcessor2D::processControlPrimitive2D(
    const primitive2d::ControlPrimitive2D& rControlPrimitive)
{
    const uno::Reference<awt::XControl>& rXControl(rControlPrimitive.getXControl());
    bool bIsPrintableControl(false);

    // find out if control is printable
    if (rXControl.is())
    {
        try
        {
            uno::Reference<beans::XPropertySet> xModelProperties(rXControl->getModel(),
                                                                 uno::UNO_QUERY);
            uno::Reference<beans::XPropertySetInfo> xPropertyInfo(
                xModelProperties.is() ? xModelProperties->getPropertySetInfo()
                                      : uno::Reference<beans::XPropertySetInfo>());
            static const OUStringLiteral sPrintablePropertyName(u"Printable");

            if (xPropertyInfo.is() && xPropertyInfo->hasPropertyByName(sPrintablePropertyName))
            {
                OSL_VERIFY(xModelProperties->getPropertyValue(sPrintablePropertyName)
                           >>= bIsPrintableControl);
            }
        }
        catch (const uno::Exception&)
        {
            TOOLS_WARN_EXCEPTION("drawinglayer",
                                 "VclMetafileProcessor2D: No access to printable flag of Control");
        }
    }

    // PDF export and printing only for printable controls
    if (!bIsPrintableControl)
        return;

    const bool bPDFExport(mpPDFExtOutDevData && mpPDFExtOutDevData->GetIsExportFormFields());
    bool bDoProcessRecursively(true);

    if (bPDFExport)
    {
        // PDF export. Emulate data handling from UnoControlPDFExportContact
        // I have now moved describePDFControl to toolkit, thus i can implement the PDF
        // form control support now as follows
        std::unique_ptr<vcl::PDFWriter::AnyWidget> pPDFControl(
            ::toolkitform::describePDFControl(rXControl, *mpPDFExtOutDevData));

        if (pPDFControl)
        {
            // still need to fill in the location (is a class Rectangle)
            const basegfx::B2DRange aRangeLogic(
                rControlPrimitive.getB2DRange(getViewInformation2D()));
            const tools::Rectangle aRectLogic(static_cast<sal_Int32>(floor(aRangeLogic.getMinX())),
                                              static_cast<sal_Int32>(floor(aRangeLogic.getMinY())),
                                              static_cast<sal_Int32>(ceil(aRangeLogic.getMaxX())),
                                              static_cast<sal_Int32>(ceil(aRangeLogic.getMaxY())));
            pPDFControl->Location = aRectLogic;

            Size aFontSize(pPDFControl->TextFont.GetFontSize());
            aFontSize = OutputDevice::LogicToLogic(aFontSize, MapMode(MapUnit::MapPoint),
                                                   mpOutputDevice->GetMapMode());
            pPDFControl->TextFont.SetFontSize(aFontSize);

            mpPDFExtOutDevData->BeginStructureElement(vcl::PDFWriter::Form);
            mpPDFExtOutDevData->CreateControl(*pPDFControl);
            mpPDFExtOutDevData->EndStructureElement();

            // no normal paint needed (see original UnoControlPDFExportContact::do_PaintObject);
            // do not process recursively
            bDoProcessRecursively = false;
        }
        else
        {
            // PDF export did not work, try simple output.
            // Fallback to printer output by not setting bDoProcessRecursively
            // to false.
        }
    }

    // #i93169# used flag the wrong way; true means that nothing was done yet
    if (bDoProcessRecursively)
    {
        // printer output
        try
        {
            // remember old graphics and create new
            uno::Reference<awt::XView> xControlView(rXControl, uno::UNO_QUERY_THROW);
            const uno::Reference<awt::XGraphics> xOriginalGraphics(xControlView->getGraphics());
            const uno::Reference<awt::XGraphics> xNewGraphics(mpOutputDevice->CreateUnoGraphics());

            if (xNewGraphics.is())
            {
                // link graphics and view
                xControlView->setGraphics(xNewGraphics);

                // get position
                const basegfx::B2DHomMatrix aObjectToDiscrete(
                    getViewInformation2D().getObjectToViewTransformation()
                    * rControlPrimitive.getTransform());
                const basegfx::B2DPoint aTopLeftDiscrete(aObjectToDiscrete
                                                         * basegfx::B2DPoint(0.0, 0.0));

                // draw it
                xControlView->draw(basegfx::fround(aTopLeftDiscrete.getX()),
                                   basegfx::fround(aTopLeftDiscrete.getY()));
                bDoProcessRecursively = false;

                // restore original graphics
                xControlView->setGraphics(xOriginalGraphics);
            }
        }
        catch (const uno::Exception&)
        {
            TOOLS_WARN_EXCEPTION("drawinglayer",
                                 "VclMetafileProcessor2D: Printing of Control failed");
        }
    }

    // process recursively if not done yet to export as decomposition (bitmap)
    if (bDoProcessRecursively)
    {
        process(rControlPrimitive);
    }
}

void VclMetafileProcessor2D::processTextHierarchyFieldPrimitive2D(
    const primitive2d::TextHierarchyFieldPrimitive2D& rFieldPrimitive)
{
    // support for FIELD_SEQ_BEGIN, FIELD_SEQ_END and URL. It wraps text primitives (but is not limited to)
    // thus do the MetafileAction embedding stuff but just handle recursively.
    const OString aCommentStringCommon("FIELD_SEQ_BEGIN");
    OUString aURL;

    switch (rFieldPrimitive.getType())
    {
        default: // case drawinglayer::primitive2d::FIELD_TYPE_COMMON :
        {
            mpMetaFile->AddAction(new MetaCommentAction(aCommentStringCommon));
            break;
        }
        case drawinglayer::primitive2d::FIELD_TYPE_PAGE:
        {
            mpMetaFile->AddAction(new MetaCommentAction("FIELD_SEQ_BEGIN;PageField"));
            break;
        }
        case drawinglayer::primitive2d::FIELD_TYPE_URL:
        {
            aURL = rFieldPrimitive.getValue("URL");

            if (!aURL.isEmpty())
            {
                mpMetaFile->AddAction(new MetaCommentAction(
                    aCommentStringCommon, 0, reinterpret_cast<const sal_uInt8*>(aURL.getStr()),
                    2 * aURL.getLength()));
            }

            break;
        }
    }

    // process recursively
    primitive2d::Primitive2DContainer rContent;
    rFieldPrimitive.get2DDecomposition(rContent, getViewInformation2D());
    process(rContent);

    // for the end comment the type is not relevant yet, they are all the same. Just add.
    mpMetaFile->AddAction(new MetaCommentAction("FIELD_SEQ_END"));

    if (!(mpPDFExtOutDevData
          && drawinglayer::primitive2d::FIELD_TYPE_URL == rFieldPrimitive.getType()))
        return;

    // emulate data handling from ImpEditEngine::Paint
    const basegfx::B2DRange aViewRange(rContent.getB2DRange(getViewInformation2D()));
    const tools::Rectangle aRectLogic(static_cast<sal_Int32>(floor(aViewRange.getMinX())),
                                      static_cast<sal_Int32>(floor(aViewRange.getMinY())),
                                      static_cast<sal_Int32>(ceil(aViewRange.getMaxX())),
                                      static_cast<sal_Int32>(ceil(aViewRange.getMaxY())));
    vcl::PDFExtOutDevBookmarkEntry aBookmark;
    OUString const content(rFieldPrimitive.getValue("Representation"));
    aBookmark.nLinkId = mpPDFExtOutDevData->CreateLink(aRectLogic, content);
    aBookmark.aBookmark = aURL;
    std::vector<vcl::PDFExtOutDevBookmarkEntry>& rBookmarks = mpPDFExtOutDevData->GetBookmarks();
    rBookmarks.push_back(aBookmark);
}

void VclMetafileProcessor2D::processTextHierarchyLinePrimitive2D(
    const primitive2d::TextHierarchyLinePrimitive2D& rLinePrimitive)
{
    // process recursively and add MetaFile comment
    process(rLinePrimitive);
    mpMetaFile->AddAction(new MetaCommentAction("XTEXT_EOL"));
}

void VclMetafileProcessor2D::processTextHierarchyBulletPrimitive2D(
    const primitive2d::TextHierarchyBulletPrimitive2D& rBulletPrimitive)
{
    // this is a part of list item, start LILabel ( = bullet)
    if (mbInListItem)
    {
        maListElements.push(vcl::PDFWriter::LILabel);
        mpPDFExtOutDevData->BeginStructureElement(vcl::PDFWriter::LILabel);
    }

    // process recursively and add MetaFile comment
    process(rBulletPrimitive);
    // in Outliner::PaintBullet(), a MetafileComment for bullets is added, too. The
    // "XTEXT_EOC" is used, use here, too.
    mpMetaFile->AddAction(new MetaCommentAction("XTEXT_EOC"));

    if (mbInListItem)
    {
        if (maListElements.top() == vcl::PDFWriter::LILabel)
        {
            maListElements.pop();
            mpPDFExtOutDevData->EndStructureElement(); // end LILabel
            mbBulletPresent = true;
        }
    }
}

void VclMetafileProcessor2D::processTextHierarchyParagraphPrimitive2D(
    const primitive2d::TextHierarchyParagraphPrimitive2D& rParagraphPrimitive)
{
    const OString aCommentString("XTEXT_EOP");
    static bool bSuppressPDFExtOutDevDataSupport(false); // loplugin:constvars:ignore

    if (nullptr == mpPDFExtOutDevData || bSuppressPDFExtOutDevDataSupport)
    {
        // Non-PDF export behaviour (metafile only).
        // Process recursively and add MetaFile comment.
        process(rParagraphPrimitive);
        mpMetaFile->AddAction(new MetaCommentAction(aCommentString));
        return;
    }

    if (!mpPDFExtOutDevData->GetIsExportTaggedPDF())
    {
        // No Tagged PDF -> Dump as Paragraph
        // Emulate data handling from old ImpEditEngine::Paint
        mpPDFExtOutDevData->BeginStructureElement(vcl::PDFWriter::Paragraph);

        // Process recursively and add MetaFile comment
        process(rParagraphPrimitive);
        mpMetaFile->AddAction(new MetaCommentAction(aCommentString));

        // Emulate data handling from ImpEditEngine::Paint
        mpPDFExtOutDevData->EndStructureElement();
        return;
    }

    // Create Tagged PDF -> deeper tagged data using StructureElements.
    // Use OutlineLevel from ParagraphPrimitive, ensure not below -1 what
    // means 'not active'
    const sal_Int16 nNewOutlineLevel(
        std::max(static_cast<sal_Int16>(-1), rParagraphPrimitive.getOutlineLevel()));

    // Do we have a change in OutlineLevel compared to the current one?
    if (nNewOutlineLevel != mnCurrentOutlineLevel)
    {
        if (nNewOutlineLevel > mnCurrentOutlineLevel)
        {
            // increase List level
            for (sal_Int16 a(mnCurrentOutlineLevel); a != nNewOutlineLevel; ++a)
            {
                maListElements.push(vcl::PDFWriter::List);
                mpPDFExtOutDevData->BeginStructureElement(vcl::PDFWriter::List);
            }
        }
        else // if(nNewOutlineLevel < mnCurrentOutlineLevel)
        {
            // close list levels below nNewOutlineLevel completely by removing
            // list items as well as list tag itself
            for (sal_Int16 a(nNewOutlineLevel); a < mnCurrentOutlineLevel; ++a)
            {
                popList(); // end LBody LI and L
            }

            // on nNewOutlineLevel close the previous list item (LBody and LI)
            popListItem();
        }

        // Remember new current OutlineLevel
        mnCurrentOutlineLevel = nNewOutlineLevel;
    }
    else // the same list level
    {
        // close the previous list item (LBody and LI)
        popListItem();
    }

    const bool bDumpAsListItem(-1 != mnCurrentOutlineLevel);

    if (bDumpAsListItem)
    {
        // Dump as ListItem
        maListElements.push(vcl::PDFWriter::ListItem);
        mpPDFExtOutDevData->BeginStructureElement(vcl::PDFWriter::ListItem);
        mbInListItem = true;
    }
    else
    {
        // Dump as Paragraph
        mpPDFExtOutDevData->BeginStructureElement(vcl::PDFWriter::Paragraph);
    }

    // Process recursively and add MetaFile comment
    process(rParagraphPrimitive);
    mpMetaFile->AddAction(new MetaCommentAction(aCommentString));

    if (bDumpAsListItem)
        mbInListItem = false;
    else
        mpPDFExtOutDevData->EndStructureElement(); // end Paragraph
}

void VclMetafileProcessor2D::processTextHierarchyBlockPrimitive2D(
    const primitive2d::TextHierarchyBlockPrimitive2D& rBlockPrimitive)
{
    // add MetaFile comment, process recursively and add MetaFile comment
    mpMetaFile->AddAction(new MetaCommentAction("XTEXT_PAINTSHAPE_BEGIN"));
    process(rBlockPrimitive);

    if (mnCurrentOutlineLevel >= 0)
    {
        // end any opened List structure elements (LBody, LI, L)
        for (sal_Int16 a(0); a <= mnCurrentOutlineLevel; ++a)
        {
            popList();
        }
    }

    mpMetaFile->AddAction(new MetaCommentAction("XTEXT_PAINTSHAPE_END"));
}

void VclMetafileProcessor2D::processTextSimplePortionPrimitive2D(
    const primitive2d::TextSimplePortionPrimitive2D& rTextCandidate)
{
    // Adapt evtl. used special DrawMode
    const DrawModeFlags nOriginalDrawMode(mpOutputDevice->GetDrawMode());
    adaptTextToFillDrawMode();

    // this is a 2nd portion of list item
    // bullet has been already processed, start LIBody
    if (mbInListItem && mbBulletPresent)
    {
        maListElements.push(vcl::PDFWriter::LIBody);
        mpPDFExtOutDevData->BeginStructureElement(vcl::PDFWriter::LIBody);
    }

    // directdraw of text simple portion; use default processing
    RenderTextSimpleOrDecoratedPortionPrimitive2D(rTextCandidate);

    if (mbInListItem && mbBulletPresent)
        mbBulletPresent = false;

    // restore DrawMode
    mpOutputDevice->SetDrawMode(nOriginalDrawMode);

    // #i101169# if(pTextDecoratedCandidate)
    {
        // support for TEXT_ MetaFile actions only for decorated texts
        if (!mxBreakIterator.is())
        {
            uno::Reference<uno::XComponentContext> xContext(
                ::comphelper::getProcessComponentContext());
            mxBreakIterator = i18n::BreakIterator::create(xContext);
        }

        const OUString& rTxt = rTextCandidate.getText();
        const sal_Int32 nTextLength(rTextCandidate.getTextLength()); // rTxt.getLength());

        if (nTextLength)
        {
            const css::lang::Locale& rLocale = rTextCandidate.getLocale();
            const sal_Int32 nTextPosition(rTextCandidate.getTextPosition());

            sal_Int32 nDone;
            sal_Int32 nNextCellBreak(mxBreakIterator->nextCharacters(
                rTxt, nTextPosition, rLocale, css::i18n::CharacterIteratorMode::SKIPCELL, 0,
                nDone));
            css::i18n::Boundary nNextWordBoundary(mxBreakIterator->getWordBoundary(
                rTxt, nTextPosition, rLocale, css::i18n::WordType::ANY_WORD, true));
            sal_Int32 nNextSentenceBreak(
                mxBreakIterator->endOfSentence(rTxt, nTextPosition, rLocale));
            const OString aCommentStringA("XTEXT_EOC");
            const OString aCommentStringB("XTEXT_EOW");
            const OString aCommentStringC("XTEXT_EOS");

            for (sal_Int32 i(nTextPosition); i < nTextPosition + nTextLength; i++)
            {
                // create the entries for the respective break positions
                if (i == nNextCellBreak)
                {
                    mpMetaFile->AddAction(
                        new MetaCommentAction(aCommentStringA, i - nTextPosition));
                    nNextCellBreak = mxBreakIterator->nextCharacters(
                        rTxt, i, rLocale, css::i18n::CharacterIteratorMode::SKIPCELL, 1, nDone);
                }
                if (i == nNextWordBoundary.endPos)
                {
                    mpMetaFile->AddAction(
                        new MetaCommentAction(aCommentStringB, i - nTextPosition));
                    nNextWordBoundary = mxBreakIterator->getWordBoundary(
                        rTxt, i + 1, rLocale, css::i18n::WordType::ANY_WORD, true);
                }
                if (i == nNextSentenceBreak)
                {
                    mpMetaFile->AddAction(
                        new MetaCommentAction(aCommentStringC, i - nTextPosition));
                    nNextSentenceBreak = mxBreakIterator->endOfSentence(rTxt, i + 1, rLocale);
                }
            }
        }
    }
}

void VclMetafileProcessor2D::processPolygonHairlinePrimitive2D(
    const primitive2d::PolygonHairlinePrimitive2D& rHairlinePrimitive)
{
    const basegfx::B2DPolygon& rBasePolygon = rHairlinePrimitive.getB2DPolygon();

    if (rBasePolygon.count() > (MAX_POLYGON_POINT_COUNT_METAFILE - 1))
    {
        // #i112245# Metafiles use tools Polygon and are not able to have more than 65535 points
        // per polygon. If there are more, split the polygon in half and call recursively
        basegfx::B2DPolygon aLeft, aRight;
        splitLinePolygon(rBasePolygon, aLeft, aRight);
        rtl::Reference<primitive2d::PolygonHairlinePrimitive2D> xPLeft(
            new primitive2d::PolygonHairlinePrimitive2D(aLeft, rHairlinePrimitive.getBColor()));
        rtl::Reference<primitive2d::PolygonHairlinePrimitive2D> xPRight(
            new primitive2d::PolygonHairlinePrimitive2D(aRight, rHairlinePrimitive.getBColor()));

        processBasePrimitive2D(*xPLeft);
        processBasePrimitive2D(*xPRight);
    }
    else
    {
        // direct draw of hairline; use default processing
        // support SvtGraphicStroke MetaCommentAction
        const basegfx::BColor aLineColor(
            maBColorModifierStack.getModifiedColor(rHairlinePrimitive.getBColor()));
        std::unique_ptr<SvtGraphicStroke> pSvtGraphicStroke;

        // #i121267# Not needed, does not give better quality compared with
        // the MetaActionType::POLYPOLYGON written by RenderPolygonHairlinePrimitive2D
        // below
        const bool bSupportSvtGraphicStroke(false);

        if (bSupportSvtGraphicStroke)
        {
            pSvtGraphicStroke
                = impTryToCreateSvtGraphicStroke(rHairlinePrimitive.getB2DPolygon(), &aLineColor,
                                                 nullptr, nullptr, nullptr, nullptr);

            impStartSvtGraphicStroke(pSvtGraphicStroke.get());
        }

        RenderPolygonHairlinePrimitive2D(rHairlinePrimitive, false);

        if (bSupportSvtGraphicStroke)
        {
            impEndSvtGraphicStroke(pSvtGraphicStroke.get());
        }
    }
}

void VclMetafileProcessor2D::processPolygonStrokePrimitive2D(
    const primitive2d::PolygonStrokePrimitive2D& rStrokePrimitive)
{
    const basegfx::B2DPolygon& rBasePolygon = rStrokePrimitive.getB2DPolygon();

    if (rBasePolygon.count() > (MAX_POLYGON_POINT_COUNT_METAFILE - 1))
    {
        // #i112245# Metafiles use tools Polygon and are not able to have more than 65535 points
        // per polygon. If there are more, split the polygon in half and call recursively
        basegfx::B2DPolygon aLeft, aRight;
        splitLinePolygon(rBasePolygon, aLeft, aRight);
        rtl::Reference<primitive2d::PolygonStrokePrimitive2D> xPLeft(
            new primitive2d::PolygonStrokePrimitive2D(aLeft, rStrokePrimitive.getLineAttribute(),
                                                      rStrokePrimitive.getStrokeAttribute()));
        rtl::Reference<primitive2d::PolygonStrokePrimitive2D> xPRight(
            new primitive2d::PolygonStrokePrimitive2D(aRight, rStrokePrimitive.getLineAttribute(),
                                                      rStrokePrimitive.getStrokeAttribute()));

        processBasePrimitive2D(*xPLeft);
        processBasePrimitive2D(*xPRight);
    }
    else
    {
        mpOutputDevice->Push(vcl::PushFlags::LINECOLOR | vcl::PushFlags::FILLCOLOR);

        // support SvtGraphicStroke MetaCommentAction
        std::unique_ptr<SvtGraphicStroke> pSvtGraphicStroke = impTryToCreateSvtGraphicStroke(
            rBasePolygon, nullptr, &rStrokePrimitive.getLineAttribute(),
            &rStrokePrimitive.getStrokeAttribute(), nullptr, nullptr);

        impStartSvtGraphicStroke(pSvtGraphicStroke.get());
        const attribute::LineAttribute& rLine = rStrokePrimitive.getLineAttribute();

        // create MetaPolyLineActions, but without LineStyle::Dash
        if (basegfx::fTools::more(rLine.getWidth(), 0.0))
        {
            const attribute::StrokeAttribute& rStroke = rStrokePrimitive.getStrokeAttribute();

            const basegfx::BColor aHairlineColor(
                maBColorModifierStack.getModifiedColor(rLine.getColor()));
            mpOutputDevice->SetLineColor(Color(aHairlineColor));
            mpOutputDevice->SetFillColor();

            // use the transformed line width
            LineInfo aLineInfo(LineStyle::Solid,
                               basegfx::fround(getTransformedLineWidth(rLine.getWidth())));
            aLineInfo.SetLineJoin(rLine.getLineJoin());
            aLineInfo.SetLineCap(rLine.getLineCap());

            basegfx::B2DPolyPolygon aHairLinePolyPolygon;
            if (0.0 == rStroke.getFullDotDashLen())
            {
                aHairLinePolyPolygon.append(rBasePolygon);
            }
            else
            {
                bool done = false;
                const std::vector<double>& array = rStroke.getDotDashArray();
                // The dotdash array should generally have the form
                // (<dashLen> <distance>)+ (<dotLen> <distance>)*
                // (where (,),+ and * have their regex meaning).
                // Find out what the lengths and their counts are.
                if (!array.empty() && array.size() % 2 == 0)
                {
                    double dashLen = array[0];
                    double distance = array[1];
                    int dashCount = 1;
                    double dotLen = 0;
                    int dotCount = 0;
                    size_t pos = 2;
                    while (pos + 2 <= array.size())
                    {
                        if (array[pos] != dashLen || array[pos + 1] != distance)
                            break;
                        ++dashCount;
                        pos += 2;
                    }
                    if (pos + 2 <= array.size() && array[pos + 1] == distance)
                    {
                        dotLen = array[pos];
                        ++dotCount;
                        pos += 2;
                        while (pos + 2 <= array.size())
                        {
                            if (array[pos] != dotLen || array[pos + 1] != distance)
                                break;
                            ++dotCount;
                            pos += 2;
                        }
                    }
                    if (array.size() == pos)
                    {
                        aHairLinePolyPolygon.append(rBasePolygon);
                        // This will be used by setupStrokeAttributes() in cppcanvas.
                        aLineInfo.SetStyle(LineStyle::Dash);
                        aLineInfo.SetDashCount(dashCount);
                        aLineInfo.SetDashLen(getTransformedLineWidth(dashLen));
                        aLineInfo.SetDistance(getTransformedLineWidth(distance));
                        if (dotCount != 0)
                        {
                            aLineInfo.SetDotCount(dotCount);
                            aLineInfo.SetDotLen(getTransformedLineWidth(dotLen));
                        }
                        done = true;
                    }
                }
                if (!done)
                {
                    // LineInfo can hold only limited info about dashing, apply dashing manually
                    // if LineInfo cannot describe it. That should not happen though.
                    SAL_WARN("drawinglayer", "dotdash array cannot be converted to LineInfo");
                    basegfx::utils::applyLineDashing(rBasePolygon, rStroke.getDotDashArray(),
                                                     &aHairLinePolyPolygon, nullptr,
                                                     rStroke.getFullDotDashLen());
                }
            }
            aHairLinePolyPolygon.transform(maCurrentTransformation);

            for (sal_uInt32 a(0); a < aHairLinePolyPolygon.count(); a++)
            {
                const basegfx::B2DPolygon& aCandidate(aHairLinePolyPolygon.getB2DPolygon(a));

                if (aCandidate.count() > 1)
                {
                    const tools::Polygon aToolsPolygon(aCandidate);

                    mpMetaFile->AddAction(new MetaPolyLineAction(aToolsPolygon, aLineInfo));
                }
            }
        }
        else
        {
            process(rStrokePrimitive);
        }

        impEndSvtGraphicStroke(pSvtGraphicStroke.get());

        mpOutputDevice->Pop();
    }
}

void VclMetafileProcessor2D::processPolygonStrokeArrowPrimitive2D(
    const primitive2d::PolygonStrokeArrowPrimitive2D& rStrokeArrowPrimitive)
{
    const basegfx::B2DPolygon& rBasePolygon = rStrokeArrowPrimitive.getB2DPolygon();

    if (rBasePolygon.count() > (MAX_POLYGON_POINT_COUNT_METAFILE - 1))
    {
        // #i112245# Metafiles use tools Polygon and are not able to have more than 65535 points
        // per polygon. If there are more, split the polygon in half and call recursively
        basegfx::B2DPolygon aLeft, aRight;
        splitLinePolygon(rBasePolygon, aLeft, aRight);
        const attribute::LineStartEndAttribute aEmpty;
        rtl::Reference<primitive2d::PolygonStrokeArrowPrimitive2D> xPLeft(
            new primitive2d::PolygonStrokeArrowPrimitive2D(
                aLeft, rStrokeArrowPrimitive.getLineAttribute(),
                rStrokeArrowPrimitive.getStrokeAttribute(), rStrokeArrowPrimitive.getStart(),
                aEmpty));
        rtl::Reference<primitive2d::PolygonStrokeArrowPrimitive2D> xPRight(
            new primitive2d::PolygonStrokeArrowPrimitive2D(
                aRight, rStrokeArrowPrimitive.getLineAttribute(),
                rStrokeArrowPrimitive.getStrokeAttribute(), aEmpty,
                rStrokeArrowPrimitive.getEnd()));

        processBasePrimitive2D(*xPLeft);
        processBasePrimitive2D(*xPRight);
    }
    else
    {
        // support SvtGraphicStroke MetaCommentAction
        std::unique_ptr<SvtGraphicStroke> pSvtGraphicStroke = impTryToCreateSvtGraphicStroke(
            rBasePolygon, nullptr, &rStrokeArrowPrimitive.getLineAttribute(),
            &rStrokeArrowPrimitive.getStrokeAttribute(), &rStrokeArrowPrimitive.getStart(),
            &rStrokeArrowPrimitive.getEnd());

        // write LineGeometry start marker
        impStartSvtGraphicStroke(pSvtGraphicStroke.get());

        // #i116162# When B&W is set as DrawMode, DrawModeFlags::WhiteFill is used
        // to let all fills be just white; for lines DrawModeFlags::BlackLine is used
        // so all line geometry is supposed to get black. Since in the in-between
        // stages of line geometry drawing filled polygons are used (e.g. line
        // start/ends) it is necessary to change these drawmodes to preserve
        // that lines shall be black; thus change DrawModeFlags::WhiteFill to
        // DrawModeFlags::BlackFill during line geometry processing to have line geometry
        // parts filled black.
        const DrawModeFlags nOldDrawMode(mpOutputDevice->GetDrawMode());
        const bool bDrawmodeChange(nOldDrawMode & DrawModeFlags::WhiteFill
                                   && mnSvtGraphicStrokeCount);

        if (bDrawmodeChange)
        {
            mpOutputDevice->SetDrawMode((nOldDrawMode & ~DrawModeFlags::WhiteFill)
                                        | DrawModeFlags::BlackFill);
        }

        // process sub-line geometry (evtl. filled PolyPolygons)
        process(rStrokeArrowPrimitive);

        if (bDrawmodeChange)
        {
            mpOutputDevice->SetDrawMode(nOldDrawMode);
        }

        // write LineGeometry end marker
        impEndSvtGraphicStroke(pSvtGraphicStroke.get());
    }
}

void VclMetafileProcessor2D::processPolyPolygonGraphicPrimitive2D(
    const primitive2d::PolyPolygonGraphicPrimitive2D& rBitmapCandidate)
{
    // need to handle PolyPolygonGraphicPrimitive2D here to support XPATHFILL_SEQ_BEGIN/XPATHFILL_SEQ_END
    basegfx::B2DPolyPolygon aLocalPolyPolygon(rBitmapCandidate.getB2DPolyPolygon());

    if (!rBitmapCandidate.getDefinitionRange().isEmpty()
        && aLocalPolyPolygon.getB2DRange() != rBitmapCandidate.getDefinitionRange())
    {
        // The range which defines the bitmap fill is defined and different from the
        // range of the defining geometry (e.g. used for FillStyle UseSlideBackground).
        // This cannot be done calling vcl, thus use decomposition here directly
        process(rBitmapCandidate);
        return;
    }

    fillPolyPolygonNeededToBeSplit(aLocalPolyPolygon);

    std::unique_ptr<SvtGraphicFill> pSvtGraphicFill;

    if (!mnSvtGraphicFillCount && aLocalPolyPolygon.count())
    {
        // #121194# Changed implementation and checked usages of convert to metafile,
        // presentation start (uses SvtGraphicFill) and printing.

        // calculate transformation. Get real object size, all values in FillGraphicAttribute
        // are relative to the unified object
        aLocalPolyPolygon.transform(maCurrentTransformation);
        const basegfx::B2DVector aOutlineSize(aLocalPolyPolygon.getB2DRange().getRange());

        // the scaling needs scale from pixel to logic coordinate system
        const attribute::FillGraphicAttribute& rFillGraphicAttribute
            = rBitmapCandidate.getFillGraphic();
        const Size aBmpSizePixel(rFillGraphicAttribute.getGraphic().GetSizePixel());

        // setup transformation like in impgrfll. Multiply with aOutlineSize
        // to get from unit coordinates in rFillGraphicAttribute.getGraphicRange()
        // to object coordinates with object's top left being at (0,0). Divide
        // by pixel size so that scale from pixel to logic will work in SvtGraphicFill.
        const basegfx::B2DVector aTransformScale(
            rFillGraphicAttribute.getGraphicRange().getRange()
            / basegfx::B2DVector(std::max(1.0, double(aBmpSizePixel.Width())),
                                 std::max(1.0, double(aBmpSizePixel.Height())))
            * aOutlineSize);
        const basegfx::B2DPoint aTransformPosition(
            rFillGraphicAttribute.getGraphicRange().getMinimum() * aOutlineSize);

        // setup transformation like in impgrfll
        SvtGraphicFill::Transform aTransform;

        // scale values are divided by bitmap pixel sizes
        aTransform.matrix[0] = aTransformScale.getX();
        aTransform.matrix[4] = aTransformScale.getY();

        // translates are absolute
        aTransform.matrix[2] = aTransformPosition.getX();
        aTransform.matrix[5] = aTransformPosition.getY();

        pSvtGraphicFill.reset(new SvtGraphicFill(
            getFillPolyPolygon(aLocalPolyPolygon), Color(), 0.0, SvtGraphicFill::fillEvenOdd,
            SvtGraphicFill::fillTexture, aTransform, rFillGraphicAttribute.getTiling(),
            SvtGraphicFill::hatchSingle, Color(), SvtGraphicFill::GradientType::Linear, Color(),
            Color(), 0, rFillGraphicAttribute.getGraphic()));
    }

    // Do use decomposition; encapsulate with SvtGraphicFill
    impStartSvtGraphicFill(pSvtGraphicFill.get());
    process(rBitmapCandidate);
    impEndSvtGraphicFill(pSvtGraphicFill.get());
}

void VclMetafileProcessor2D::processPolyPolygonHatchPrimitive2D(
    const primitive2d::PolyPolygonHatchPrimitive2D& rHatchCandidate)
{
    // need to handle PolyPolygonHatchPrimitive2D here to support XPATHFILL_SEQ_BEGIN/XPATHFILL_SEQ_END
    const attribute::FillHatchAttribute& rFillHatchAttribute = rHatchCandidate.getFillHatch();
    basegfx::B2DPolyPolygon aLocalPolyPolygon(rHatchCandidate.getB2DPolyPolygon());

    if (aLocalPolyPolygon.getB2DRange() != rHatchCandidate.getDefinitionRange())
    {
        // the range which defines the hatch is different from the range of the
        // geometry (used for writer frames). This cannot be done calling vcl, thus use
        // decomposition here
        process(rHatchCandidate);
        return;
    }

    // #i112245# Metafiles use tools Polygon and are not able to have more than 65535 points
    // per polygon. Split polygon until there are less than that
    fillPolyPolygonNeededToBeSplit(aLocalPolyPolygon);

    if (rFillHatchAttribute.isFillBackground())
    {
        // with fixing #i111954# (see below) the possible background
        // fill of a hatched object was lost.Generate a background fill
        // primitive and render it
        const primitive2d::Primitive2DReference xBackground(
            new primitive2d::PolyPolygonColorPrimitive2D(aLocalPolyPolygon,
                                                         rHatchCandidate.getBackgroundColor()));

        process(primitive2d::Primitive2DContainer{ xBackground });
    }

    std::unique_ptr<SvtGraphicFill> pSvtGraphicFill;
    aLocalPolyPolygon.transform(maCurrentTransformation);

    if (!mnSvtGraphicFillCount && aLocalPolyPolygon.count())
    {
        // re-create a VCL hatch as base data
        SvtGraphicFill::HatchType eHatch(SvtGraphicFill::hatchSingle);

        switch (rFillHatchAttribute.getStyle())
        {
            default: // attribute::HatchStyle::Single :
            {
                eHatch = SvtGraphicFill::hatchSingle;
                break;
            }
            case attribute::HatchStyle::Double:
            {
                eHatch = SvtGraphicFill::hatchDouble;
                break;
            }
            case attribute::HatchStyle::Triple:
            {
                eHatch = SvtGraphicFill::hatchTriple;
                break;
            }
        }

        SvtGraphicFill::Transform aTransform;

        // scale
        aTransform.matrix[0] *= rFillHatchAttribute.getDistance();
        aTransform.matrix[4] *= rFillHatchAttribute.getDistance();

        // rotate (was never correct in impgrfll anyways, use correct angle now)
        aTransform.matrix[0] *= cos(rFillHatchAttribute.getAngle());
        aTransform.matrix[1] *= -sin(rFillHatchAttribute.getAngle());
        aTransform.matrix[3] *= sin(rFillHatchAttribute.getAngle());
        aTransform.matrix[4] *= cos(rFillHatchAttribute.getAngle());

        pSvtGraphicFill.reset(new SvtGraphicFill(
            getFillPolyPolygon(aLocalPolyPolygon), Color(), 0.0, SvtGraphicFill::fillEvenOdd,
            SvtGraphicFill::fillHatch, aTransform, false, eHatch,
            Color(maBColorModifierStack.getModifiedColor(rFillHatchAttribute.getColor())),
            SvtGraphicFill::GradientType::Linear, Color(), Color(), 0, Graphic()));
    }

    // Do use decomposition; encapsulate with SvtGraphicFill
    impStartSvtGraphicFill(pSvtGraphicFill.get());

    // #i111954# do NOT use decomposition, but use direct VCL-command
    // process(rCandidate.get2DDecomposition(getViewInformation2D()));
    const tools::PolyPolygon aToolsPolyPolygon(
        basegfx::utils::adaptiveSubdivideByAngle(aLocalPolyPolygon));
    const HatchStyle aHatchStyle(
        attribute::HatchStyle::Single == rFillHatchAttribute.getStyle()
            ? HatchStyle::Single
            : attribute::HatchStyle::Double == rFillHatchAttribute.getStyle() ? HatchStyle::Double
                                                                              : HatchStyle::Triple);

    mpOutputDevice->DrawHatch(
        aToolsPolyPolygon,
        Hatch(aHatchStyle,
              Color(maBColorModifierStack.getModifiedColor(rFillHatchAttribute.getColor())),
              basegfx::fround(rFillHatchAttribute.getDistance()),
              Degree10(basegfx::fround(basegfx::rad2deg<10>(rFillHatchAttribute.getAngle())))));

    impEndSvtGraphicFill(pSvtGraphicFill.get());
}

void VclMetafileProcessor2D::processPolyPolygonGradientPrimitive2D(
    const primitive2d::PolyPolygonGradientPrimitive2D& rGradientCandidate)
{
    basegfx::B2DVector aScale, aTranslate;
    double fRotate, fShearX;

    maCurrentTransformation.decompose(aScale, aTranslate, fRotate, fShearX);

    if (!basegfx::fTools::equalZero(fRotate) || !basegfx::fTools::equalZero(fShearX))
    {
        // #i121185# When rotation or shear is used, a VCL Gradient cannot be used directly.
        // This is because VCL Gradient mechanism does *not* support to rotate the gradient
        // with objects and this case is not expressible in a Metafile (and cannot be added
        // since the FileFormats used, e.g. *.wmf, do not support it either).
        // Such cases happen when a graphic object uses a Metafile as graphic information or
        // a fill style definition uses a Metafile. In this cases the graphic content is
        // rotated with the graphic or filled object; this is not supported by the target
        // format of this conversion renderer - Metafiles.
        // To solve this, not a Gradient is written, but the decomposition of this object
        // is written to the Metafile. This is the PolyPolygons building the gradient fill.
        // These will need more space and time, but the result will be as if the Gradient
        // was rotated with the object.
        // This mechanism is used by all exporters still not using Primitives (e.g. Print,
        // Slideshow, Export rto PDF, export to Picture, ...) but relying on Metafile
        // transfers. One more reason to *change* these to primitives.
        // BTW: One more example how useful the principles of primitives are; the decomposition
        // is by definition a simpler, maybe more expensive representation of the same content.
        process(rGradientCandidate);
        return;
    }

    basegfx::B2DPolyPolygon aLocalPolyPolygon(rGradientCandidate.getB2DPolyPolygon());

    if (aLocalPolyPolygon.getB2DRange() != rGradientCandidate.getDefinitionRange())
    {
        // the range which defines the gradient is different from the range of the
        // geometry (used for writer frames). This cannot be done calling vcl, thus use
        // decomposition here
        process(rGradientCandidate);
        return;
    }

    // #i112245# Metafiles use tools Polygon and are not able to have more than 65535 points
    // per polygon. Split polygon until there are less than that
    fillPolyPolygonNeededToBeSplit(aLocalPolyPolygon);

    // for support of MetaCommentActions of the form XGRAD_SEQ_BEGIN, XGRAD_SEQ_END
    // it is safest to use the VCL OutputDevice::DrawGradient method which creates those.
    // re-create a VCL-gradient from FillGradientPrimitive2D and the needed tools PolyPolygon
    Gradient aVCLGradient;
    impConvertFillGradientAttributeToVCLGradient(aVCLGradient, rGradientCandidate.getFillGradient(),
                                                 false);
    aLocalPolyPolygon.transform(maCurrentTransformation);

    // #i82145# ATM VCL printing of gradients using curved shapes does not work,
    // i submitted the bug with the given ID to THB. When that task is fixed it is
    // necessary to again remove this subdivision since it decreases possible
    // printing quality (not even resolution-dependent for now). THB will tell
    // me when that task is fixed in the master
    const tools::PolyPolygon aToolsPolyPolygon(
        getFillPolyPolygon(basegfx::utils::adaptiveSubdivideByAngle(aLocalPolyPolygon)));

    // XPATHFILL_SEQ_BEGIN/XPATHFILL_SEQ_END support
    std::unique_ptr<SvtGraphicFill> pSvtGraphicFill;

    if (!mnSvtGraphicFillCount && aLocalPolyPolygon.count())
    {
        // setup gradient stuff like in impgrfll
        SvtGraphicFill::GradientType eGrad(SvtGraphicFill::GradientType::Linear);

        switch (aVCLGradient.GetStyle())
        {
            default: // GradientStyle::Linear:
            case GradientStyle::Axial:
                eGrad = SvtGraphicFill::GradientType::Linear;
                break;
            case GradientStyle::Radial:
            case GradientStyle::Elliptical:
                eGrad = SvtGraphicFill::GradientType::Radial;
                break;
            case GradientStyle::Square:
            case GradientStyle::Rect:
                eGrad = SvtGraphicFill::GradientType::Rectangular;
                break;
        }

        pSvtGraphicFill.reset(new SvtGraphicFill(
            aToolsPolyPolygon, Color(), 0.0, SvtGraphicFill::fillEvenOdd,
            SvtGraphicFill::fillGradient, SvtGraphicFill::Transform(), false,
            SvtGraphicFill::hatchSingle, Color(), eGrad, aVCLGradient.GetStartColor(),
            aVCLGradient.GetEndColor(), aVCLGradient.GetSteps(), Graphic()));
    }

    // call VCL directly; encapsulate with SvtGraphicFill
    impStartSvtGraphicFill(pSvtGraphicFill.get());
    mpOutputDevice->DrawGradient(aToolsPolyPolygon, aVCLGradient);
    impEndSvtGraphicFill(pSvtGraphicFill.get());
}

void VclMetafileProcessor2D::processPolyPolygonColorPrimitive2D(
    const primitive2d::PolyPolygonColorPrimitive2D& rPolygonCandidate)
{
    mpOutputDevice->Push(vcl::PushFlags::LINECOLOR | vcl::PushFlags::FILLCOLOR);
    basegfx::B2DPolyPolygon aLocalPolyPolygon(rPolygonCandidate.getB2DPolyPolygon());

    // #i112245# Metafiles use tools Polygon and are not able to have more than 65535 points
    // per polygon. Split polygon until there are less than that
    fillPolyPolygonNeededToBeSplit(aLocalPolyPolygon);

    const basegfx::BColor aPolygonColor(
        maBColorModifierStack.getModifiedColor(rPolygonCandidate.getBColor()));
    aLocalPolyPolygon.transform(maCurrentTransformation);

    // set line and fill color
    mpOutputDevice->SetFillColor(Color(aPolygonColor));
    mpOutputDevice->SetLineColor();

    mpOutputDevice->DrawPolyPolygon(aLocalPolyPolygon);

    mpOutputDevice->Pop();
}

void VclMetafileProcessor2D::processMaskPrimitive2D(
    const primitive2d::MaskPrimitive2D& rMaskCandidate)
{
    // mask group. Special handling for MetaFiles.
    if (rMaskCandidate.getChildren().empty())
        return;

    basegfx::B2DPolyPolygon aMask(rMaskCandidate.getMask());

    if (aMask.count())
    {
        // prepare new mask polygon and rescue current one
        aMask.transform(maCurrentTransformation);
        const basegfx::B2DPolyPolygon aLastClipPolyPolygon(maClipPolyPolygon);

        if (maClipPolyPolygon.count())
        {
            // there is already a clip polygon set; build clipped union of
            // current mask polygon and new one
            maClipPolyPolygon = basegfx::utils::clipPolyPolygonOnPolyPolygon(
                aMask, maClipPolyPolygon,
                true, // #i106516# we want the inside of aMask, not the outside
                false);
        }
        else
        {
            // use mask directly
            maClipPolyPolygon = aMask;
        }

        if (maClipPolyPolygon.count())
        {
            // set VCL clip region; subdivide before conversion to tools polygon. Subdivision necessary (!)
            // Removed subdivision and fixed in vcl::Region::ImplPolyPolyRegionToBandRegionFunc() in VCL where
            // the ClipRegion is built from the Polygon. An AdaptiveSubdivide on the source polygon was missing there
            mpOutputDevice->Push(vcl::PushFlags::CLIPREGION);
            mpOutputDevice->SetClipRegion(vcl::Region(maClipPolyPolygon));

            // recursively paint content
            // #i121267# Only need to process sub-content when clip polygon is *not* empty.
            // If it is empty, the clip is empty and there can be nothing inside.
            process(rMaskCandidate.getChildren());

            // restore VCL clip region
            mpOutputDevice->Pop();
        }

        // restore to rescued clip polygon
        maClipPolyPolygon = aLastClipPolyPolygon;
    }
    else
    {
        // no mask, no clipping. recursively paint content
        process(rMaskCandidate.getChildren());
    }
}

void VclMetafileProcessor2D::processUnifiedTransparencePrimitive2D(
    const primitive2d::UnifiedTransparencePrimitive2D& rUniTransparenceCandidate)
{
    mpOutputDevice->Push(vcl::PushFlags::LINECOLOR | vcl::PushFlags::FILLCOLOR);
    // for metafile: Need to examine what the pure vcl version is doing here actually
    // - uses DrawTransparent with metafile for content and a gradient
    // - uses DrawTransparent for single PolyPolygons directly. Can be detected by
    //   checking the content for single PolyPolygonColorPrimitive2D
    const primitive2d::Primitive2DContainer& rContent = rUniTransparenceCandidate.getChildren();

    if (!rContent.empty())
    {
        if (0.0 == rUniTransparenceCandidate.getTransparence())
        {
            // not transparent at all, use content
            process(rUniTransparenceCandidate.getChildren());
        }
        else if (rUniTransparenceCandidate.getTransparence() > 0.0
                 && rUniTransparenceCandidate.getTransparence() < 1.0)
        {
            // try to identify a single PolyPolygonColorPrimitive2D in the
            // content part of the transparence primitive
            const primitive2d::PolyPolygonColorPrimitive2D* pPoPoColor = nullptr;
            static bool bForceToMetafile(false); // loplugin:constvars:ignore

            if (!bForceToMetafile && 1 == rContent.size())
            {
                const primitive2d::Primitive2DReference xReference(rContent[0]);
                pPoPoColor = dynamic_cast<const primitive2d::PolyPolygonColorPrimitive2D*>(
                    xReference.get());
            }

            // PolyPolygonGradientPrimitive2D, PolyPolygonHatchPrimitive2D and
            // PolyPolygonGraphicPrimitive2D are derived from PolyPolygonColorPrimitive2D.
            // Check also for correct ID to exclude derived implementations
            if (pPoPoColor
                && PRIMITIVE2D_ID_POLYPOLYGONCOLORPRIMITIVE2D == pPoPoColor->getPrimitive2DID())
            {
                // single transparent tools::PolyPolygon identified, use directly
                const basegfx::BColor aPolygonColor(
                    maBColorModifierStack.getModifiedColor(pPoPoColor->getBColor()));
                basegfx::B2DPolyPolygon aLocalPolyPolygon(pPoPoColor->getB2DPolyPolygon());

                // #i112245# Metafiles use tools Polygon and are not able to have more than 65535 points
                // per polygon. Split polygon until there are less than that
                fillPolyPolygonNeededToBeSplit(aLocalPolyPolygon);

                // now transform
                aLocalPolyPolygon.transform(maCurrentTransformation);

                // set line and fill color
                const sal_uInt16 nTransPercentVcl(static_cast<sal_uInt16>(
                    basegfx::fround(rUniTransparenceCandidate.getTransparence() * 100.0)));
                mpOutputDevice->SetFillColor(Color(aPolygonColor));
                mpOutputDevice->SetLineColor();

                mpOutputDevice->DrawTransparent(tools::PolyPolygon(aLocalPolyPolygon),
                                                nTransPercentVcl);
            }
            else
            {
                // save old mfCurrentUnifiedTransparence and set new one
                // so that contained SvtGraphicStroke may use the current one
                const double fLastCurrentUnifiedTransparence(mfCurrentUnifiedTransparence);
                // #i105377# paint the content metafile opaque as the transparency gets
                // split of into the gradient below
                // mfCurrentUnifiedTransparence = rUniTransparenceCandidate.getTransparence();
                mfCurrentUnifiedTransparence = 0;

                // various content, create content-metafile
                GDIMetaFile aContentMetafile;
                const tools::Rectangle aPrimitiveRectangle(
                    impDumpToMetaFile(rContent, aContentMetafile));

                // restore mfCurrentUnifiedTransparence; it may have been used
                // while processing the sub-content in impDumpToMetaFile
                mfCurrentUnifiedTransparence = fLastCurrentUnifiedTransparence;

                // create uniform VCL gradient for uniform transparency
                Gradient aVCLGradient;
                const sal_uInt8 nTransPercentVcl(static_cast<sal_uInt8>(
                    basegfx::fround(rUniTransparenceCandidate.getTransparence() * 255.0)));
                const Color aTransColor(nTransPercentVcl, nTransPercentVcl, nTransPercentVcl);

                aVCLGradient.SetStyle(GradientStyle::Linear);
                aVCLGradient.SetStartColor(aTransColor);
                aVCLGradient.SetEndColor(aTransColor);
                aVCLGradient.SetAngle(0_deg10);
                aVCLGradient.SetBorder(0);
                aVCLGradient.SetOfsX(0);
                aVCLGradient.SetOfsY(0);
                aVCLGradient.SetStartIntensity(100);
                aVCLGradient.SetEndIntensity(100);
                aVCLGradient.SetSteps(2);

                // render it to VCL
                mpOutputDevice->DrawTransparent(aContentMetafile, aPrimitiveRectangle.TopLeft(),
                                                aPrimitiveRectangle.GetSize(), aVCLGradient);
            }
        }
    }

    mpOutputDevice->Pop();
}

void VclMetafileProcessor2D::processTransparencePrimitive2D(
    const primitive2d::TransparencePrimitive2D& rTransparenceCandidate)
{
    // for metafile: Need to examine what the pure vcl version is doing here actually
    // - uses DrawTransparent with metafile for content and a gradient
    // i can detect this here with checking the gradient part for a single
    // FillGradientPrimitive2D and reconstruct the gradient.
    // If that detection goes wrong, I have to create a transparence-blended bitmap. Eventually
    // do that in stripes, else RenderTransparencePrimitive2D may just be used
    const primitive2d::Primitive2DContainer& rContent = rTransparenceCandidate.getChildren();
    const primitive2d::Primitive2DContainer& rTransparence
        = rTransparenceCandidate.getTransparence();

    if (rContent.empty() || rTransparence.empty())
        return;

    // try to identify a single FillGradientPrimitive2D in the
    // transparence part of the primitive
    const primitive2d::FillGradientPrimitive2D* pFiGradient = nullptr;
    static bool bForceToBigTransparentVDev(false); // loplugin:constvars:ignore

    if (!bForceToBigTransparentVDev && 1 == rTransparence.size())
    {
        const primitive2d::Primitive2DReference xReference(rTransparence[0]);
        pFiGradient = dynamic_cast<const primitive2d::FillGradientPrimitive2D*>(xReference.get());
    }

    // Check also for correct ID to exclude derived implementations
    if (pFiGradient && PRIMITIVE2D_ID_FILLGRADIENTPRIMITIVE2D == pFiGradient->getPrimitive2DID())
    {
        // various content, create content-metafile
        GDIMetaFile aContentMetafile;
        const tools::Rectangle aPrimitiveRectangle(impDumpToMetaFile(rContent, aContentMetafile));

        // re-create a VCL-gradient from FillGradientPrimitive2D
        Gradient aVCLGradient;
        impConvertFillGradientAttributeToVCLGradient(aVCLGradient, pFiGradient->getFillGradient(),
                                                     true);

        // render it to VCL
        mpOutputDevice->DrawTransparent(aContentMetafile, aPrimitiveRectangle.TopLeft(),
                                        aPrimitiveRectangle.GetSize(), aVCLGradient);
    }
    else
    {
        // sub-transparence group. Draw to VDev first.
        // this may get refined to tiling when resolution is too big here

        // need to avoid switching off MapMode stuff here; maybe need another
        // tooling class, cannot just do the same as with the pixel renderer.
        // Need to experiment...

        // Okay, basic implementation finished and tested. The DPI stuff was hard
        // and not easy to find out that it's needed.
        // Since this will not yet happen normally (as long as no one constructs
        // transparence primitives with non-trivial transparence content) i will for now not
        // refine to tiling here.

        basegfx::B2DRange aViewRange(rContent.getB2DRange(getViewInformation2D()));
        aViewRange.transform(maCurrentTransformation);
        const tools::Rectangle aRectLogic(static_cast<sal_Int32>(floor(aViewRange.getMinX())),
                                          static_cast<sal_Int32>(floor(aViewRange.getMinY())),
                                          static_cast<sal_Int32>(ceil(aViewRange.getMaxX())),
                                          static_cast<sal_Int32>(ceil(aViewRange.getMaxY())));
        const tools::Rectangle aRectPixel(mpOutputDevice->LogicToPixel(aRectLogic));
        Size aSizePixel(aRectPixel.GetSize());
        ScopedVclPtrInstance<VirtualDevice> aBufferDevice;
        const sal_uInt32 nMaxSquarePixels(500000);
        const sal_uInt32 nViewVisibleArea(aSizePixel.getWidth() * aSizePixel.getHeight());
        double fReduceFactor(1.0);

        if (nViewVisibleArea > nMaxSquarePixels)
        {
            // reduce render size
            fReduceFactor = sqrt(double(nMaxSquarePixels) / static_cast<double>(nViewVisibleArea));
            aSizePixel = Size(
                basegfx::fround(static_cast<double>(aSizePixel.getWidth()) * fReduceFactor),
                basegfx::fround(static_cast<double>(aSizePixel.getHeight()) * fReduceFactor));
        }

        if (aBufferDevice->SetOutputSizePixel(aSizePixel))
        {
            // create and set MapModes for target devices
            MapMode aNewMapMode(mpOutputDevice->GetMapMode());
            aNewMapMode.SetOrigin(Point(-aRectLogic.Left(), -aRectLogic.Top()));
            aBufferDevice->SetMapMode(aNewMapMode);

            // prepare view transformation for target renderers
            // ATTENTION! Need to apply another scaling because of the potential DPI differences
            // between Printer and VDev (mpOutputDevice and aBufferDevice here).
            // To get the DPI, LogicToPixel from (1,1) from MapUnit::MapInch needs to be used.
            basegfx::B2DHomMatrix aViewTransform(aBufferDevice->GetViewTransformation());
            const Size aDPIOld(mpOutputDevice->LogicToPixel(Size(1, 1), MapMode(MapUnit::MapInch)));
            const Size aDPINew(aBufferDevice->LogicToPixel(Size(1, 1), MapMode(MapUnit::MapInch)));
            const double fDPIXChange(static_cast<double>(aDPIOld.getWidth())
                                     / static_cast<double>(aDPINew.getWidth()));
            const double fDPIYChange(static_cast<double>(aDPIOld.getHeight())
                                     / static_cast<double>(aDPINew.getHeight()));

            if (!basegfx::fTools::equal(fDPIXChange, 1.0)
                || !basegfx::fTools::equal(fDPIYChange, 1.0))
            {
                aViewTransform.scale(fDPIXChange, fDPIYChange);
            }

            // also take scaling from Size reduction into account
            if (!basegfx::fTools::equal(fReduceFactor, 1.0))
            {
                aViewTransform.scale(fReduceFactor, fReduceFactor);
            }

            // create view information and pixel renderer. Reuse known ViewInformation
            // except new transformation and range
            const geometry::ViewInformation2D aViewInfo(
                getViewInformation2D().getObjectTransformation(), aViewTransform, aViewRange,
                getViewInformation2D().getVisualizedPage(), getViewInformation2D().getViewTime());

            VclPixelProcessor2D aBufferProcessor(aViewInfo, *aBufferDevice);

            // draw content using pixel renderer
            const Point aEmptyPoint;
            aBufferProcessor.process(rContent);
            const Bitmap aBmContent(aBufferDevice->GetBitmap(aEmptyPoint, aSizePixel));

            // draw transparence using pixel renderer
            aBufferDevice->Erase();
            aBufferProcessor.process(rTransparence);
            const AlphaMask aBmAlpha(aBufferDevice->GetBitmap(aEmptyPoint, aSizePixel));

            // paint
            mpOutputDevice->DrawBitmapEx(aRectLogic.TopLeft(), aRectLogic.GetSize(),
                                         BitmapEx(aBmContent, aBmAlpha));
        }
    }
}

void VclMetafileProcessor2D::processStructureTagPrimitive2D(
    const primitive2d::StructureTagPrimitive2D& rStructureTagCandidate)
{
    ::comphelper::ValueRestorationGuard const g(mpCurrentStructureTag, &rStructureTagCandidate);

    // structured tag primitive
    const vcl::PDFWriter::StructElement& rTagElement(rStructureTagCandidate.getStructureElement());
    bool bTagUsed((vcl::PDFWriter::NonStructElement != rTagElement));
    sal_Int32 nPreviousElement(-1);

    if (!rStructureTagCandidate.isTaggedSdrObject())
    {
        bTagUsed = false;
    }

    if (mpPDFExtOutDevData && bTagUsed)
    {
        // foreground object: tag as regular structure element
        if (!rStructureTagCandidate.isBackground())
        {
            if (rStructureTagCandidate.GetAnchorStructureElementId() != -1)
            {
                auto const nTemp = mpPDFExtOutDevData->GetCurrentStructureElement();
                bool const bSuccess = mpPDFExtOutDevData->SetCurrentStructureElement(
                    rStructureTagCandidate.GetAnchorStructureElementId());
                if (bSuccess)
                {
                    nPreviousElement = nTemp;
                }
                else
                {
                    SAL_WARN("drawinglayer", "anchor structure element not found?");
                }
            }
            mpPDFExtOutDevData->BeginStructureElement(rTagElement);
            switch (rTagElement)
            {
                case vcl::PDFWriter::H1:
                case vcl::PDFWriter::H2:
                case vcl::PDFWriter::H3:
                case vcl::PDFWriter::H4:
                case vcl::PDFWriter::H5:
                case vcl::PDFWriter::H6:
                case vcl::PDFWriter::Paragraph:
                case vcl::PDFWriter::Heading:
                case vcl::PDFWriter::Caption:
                case vcl::PDFWriter::BlockQuote:
                case vcl::PDFWriter::Table:
                case vcl::PDFWriter::TableRow:
                case vcl::PDFWriter::Formula:
                case vcl::PDFWriter::Figure:
                    mpPDFExtOutDevData->SetStructureAttribute(vcl::PDFWriter::Placement,
                                                              vcl::PDFWriter::Block);
                    break;
                case vcl::PDFWriter::TableData:
                case vcl::PDFWriter::TableHeader:
                    mpPDFExtOutDevData->SetStructureAttribute(vcl::PDFWriter::Placement,
                                                              vcl::PDFWriter::Inline);
                    break;
                default:
                    break;
            }
            switch (rTagElement)
            {
                case vcl::PDFWriter::Table:
                case vcl::PDFWriter::Formula:
                case vcl::PDFWriter::Figure:
                {
                    auto const range(rStructureTagCandidate.getB2DRange(getViewInformation2D()));
                    tools::Rectangle const aLogicRect(
                        basegfx::fround(range.getMinX()), basegfx::fround(range.getMinY()),
                        basegfx::fround(range.getMaxX()), basegfx::fround(range.getMaxY()));
                    mpPDFExtOutDevData->SetStructureBoundingBox(aLogicRect);
                    break;
                }
                default:
                    break;
            }
            if (rTagElement == vcl::PDFWriter::TableHeader)
            {
                mpPDFExtOutDevData->SetStructureAttribute(vcl::PDFWriter::Scope,
                                                          vcl::PDFWriter::Column);
            }
        }
        // background object
        else
        {
            // background image: tag as artifact
            if (rStructureTagCandidate.isImage())
                mpPDFExtOutDevData->BeginStructureElement(vcl::PDFWriter::NonStructElement);
            // any other background object: do not tag
            else
                assert(false);
        }
    }

    // process children normally
    process(rStructureTagCandidate.getChildren());

    if (mpPDFExtOutDevData && bTagUsed)
    {
        // write end tag
        mpPDFExtOutDevData->EndStructureElement();
        if (nPreviousElement != -1)
        {
#ifndef NDEBUG
            bool const bSuccess =
#endif
                mpPDFExtOutDevData->SetCurrentStructureElement(nPreviousElement);
            assert(bSuccess);
        }
    }
}

VclPtr<VirtualDevice>
VclMetafileProcessor2D::CreateBufferDevice(const basegfx::B2DRange& rCandidateRange,
                                           geometry::ViewInformation2D& rViewInfo,
                                           tools::Rectangle& rRectLogic, Size& rSizePixel) const
{
    constexpr double fMaxSquarePixels = 500000;
    basegfx::B2DRange aViewRange(rCandidateRange);
    aViewRange.transform(maCurrentTransformation);
    rRectLogic = tools::Rectangle(static_cast<tools::Long>(std::floor(aViewRange.getMinX())),
                                  static_cast<tools::Long>(std::floor(aViewRange.getMinY())),
                                  static_cast<tools::Long>(std::ceil(aViewRange.getMaxX())),
                                  static_cast<tools::Long>(std::ceil(aViewRange.getMaxY())));
    const tools::Rectangle aRectPixel(mpOutputDevice->LogicToPixel(rRectLogic));
    rSizePixel = aRectPixel.GetSize();
    const double fViewVisibleArea(rSizePixel.getWidth() * rSizePixel.getHeight());
    double fReduceFactor(1.0);

    if (fViewVisibleArea > fMaxSquarePixels)
    {
        // reduce render size
        fReduceFactor = sqrt(fMaxSquarePixels / fViewVisibleArea);
        rSizePixel = Size(basegfx::fround(rSizePixel.getWidth() * fReduceFactor),
                          basegfx::fround(rSizePixel.getHeight() * fReduceFactor));
    }

    VclPtrInstance<VirtualDevice> pBufferDevice(DeviceFormat::DEFAULT, DeviceFormat::DEFAULT);
    if (pBufferDevice->SetOutputSizePixel(rSizePixel))
    {
        // create and set MapModes for target devices
        MapMode aNewMapMode(mpOutputDevice->GetMapMode());
        aNewMapMode.SetOrigin(Point(-rRectLogic.Left(), -rRectLogic.Top()));
        pBufferDevice->SetMapMode(aNewMapMode);

        // prepare view transformation for target renderers
        // ATTENTION! Need to apply another scaling because of the potential DPI differences
        // between Printer and VDev (mpOutputDevice and pBufferDevice here).
        // To get the DPI, LogicToPixel from (1,1) from MapUnit::MapInch needs to be used.
        basegfx::B2DHomMatrix aViewTransform(pBufferDevice->GetViewTransformation());
        const Size aDPIOld(mpOutputDevice->LogicToPixel(Size(1, 1), MapMode(MapUnit::MapInch)));
        const Size aDPINew(pBufferDevice->LogicToPixel(Size(1, 1), MapMode(MapUnit::MapInch)));
        const double fDPIXChange(static_cast<double>(aDPIOld.getWidth())
                                 / static_cast<double>(aDPINew.getWidth()));
        const double fDPIYChange(static_cast<double>(aDPIOld.getHeight())
                                 / static_cast<double>(aDPINew.getHeight()));

        if (!basegfx::fTools::equal(fDPIXChange, 1.0) || !basegfx::fTools::equal(fDPIYChange, 1.0))
        {
            aViewTransform.scale(fDPIXChange, fDPIYChange);
        }

        // also take scaling from Size reduction into account
        if (!basegfx::fTools::equal(fReduceFactor, 1.0))
        {
            aViewTransform.scale(fReduceFactor, fReduceFactor);
        }

        // create view information and pixel renderer. Reuse known ViewInformation
        // except new transformation and range
        rViewInfo = geometry::ViewInformation2D(
            getViewInformation2D().getObjectTransformation(), aViewTransform, aViewRange,
            getViewInformation2D().getVisualizedPage(), getViewInformation2D().getViewTime());
    }
    else
        pBufferDevice.disposeAndClear();

#if HAVE_P1155R3
    return pBufferDevice;
#else
    return std::move(pBufferDevice);
#endif
}

void VclMetafileProcessor2D::processPrimitive2DOnPixelProcessor(
    const primitive2d::BasePrimitive2D& rCandidate)
{
    basegfx::B2DRange aViewRange(rCandidate.getB2DRange(getViewInformation2D()));
    geometry::ViewInformation2D aViewInfo;
    tools::Rectangle aRectLogic;
    Size aSizePixel;
    auto pBufferDevice(CreateBufferDevice(aViewRange, aViewInfo, aRectLogic, aSizePixel));
    if (pBufferDevice)
    {
        VclPixelProcessor2D aBufferProcessor(aViewInfo, *pBufferDevice, maBColorModifierStack);

        // draw content using pixel renderer
        primitive2d::Primitive2DReference aRef(
            &const_cast<primitive2d::BasePrimitive2D&>(rCandidate));
        aBufferProcessor.process({ aRef });
        const BitmapEx aBmContent(pBufferDevice->GetBitmapEx(Point(), aSizePixel));
        mpOutputDevice->DrawBitmapEx(aRectLogic.TopLeft(), aRectLogic.GetSize(), aBmContent);

        // aBufferProcessor dtor pops state off pBufferDevice pushed on by its ctor, let
        // pBufferDevice live past aBufferProcessor scope to avoid warnings
    }
    pBufferDevice.disposeAndClear();
}

} // end of namespace

/* vim:set shiftwidth=4 softtabstop=4 expandtab: */