xmloff/source/draw/ximp3dobject.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include "ximp3dobject.hxx"
  21 #include <xmloff/xmluconv.hxx>
  22 #include <com/sun/star/beans/XPropertySet.hpp>
  23 #include <xexptran.hxx>
  24 #include <com/sun/star/drawing/PolyPolygonShape3D.hpp>
  25 #include <com/sun/star/drawing/Direction3D.hpp>
  26 #include <com/sun/star/drawing/Position3D.hpp>
  27 #include <osl/diagnose.h>
  28 #include <basegfx/polygon/b2dpolypolygon.hxx>
  29 #include <basegfx/polygon/b2dpolypolygontools.hxx>
  30 #include <basegfx/polygon/b3dpolypolygontools.hxx>
  31
  32 using namespace ::com::sun::star;
  33
  34
  35 SdXML3DObjectContext::SdXML3DObjectContext(
  36     SvXMLImport& rImport,
  37     const css::uno::Reference< css::xml::sax::XAttributeList>& xAttrList,
  38     uno::Reference< drawing::XShapes > const & rShapes)
  39 :   SdXMLShapeContext( rImport, xAttrList, rShapes, false/*bTemporaryShape*/ ),
  40     mbSetTransform( false )
  41 {
  42     sal_Int16 nAttrCount = xAttrList.is() ? xAttrList->getLength() : 0;
  43     for(sal_Int16 i=0; i < nAttrCount; i++)
  44     {
  45         OUString sAttrName = xAttrList->getNameByIndex( i );
  46         OUString aLocalName;
  47         sal_uInt16 nPrefix = GetImport().GetNamespaceMap().GetKeyByAttrName( sAttrName, &aLocalName );
  48         OUString sValue = xAttrList->getValueByIndex( i );
  49         const SvXMLTokenMap& rAttrTokenMap = GetImport().GetShapeImport()->Get3DObjectAttrTokenMap();
  50
  51         switch(rAttrTokenMap.Get(nPrefix, aLocalName))
  52         {
  53             case XML_TOK_3DOBJECT_DRAWSTYLE_NAME:
  54             {
  55                 maDrawStyleName = sValue;
  56                 break;
  57             }
  58             case XML_TOK_3DOBJECT_TRANSFORM:
  59             {
  60                 SdXMLImExTransform3D aTransform(sValue, GetImport().GetMM100UnitConverter());
  61                 if(aTransform.NeedsAction())
  62                     mbSetTransform = aTransform.GetFullHomogenTransform(mxHomMat);
  63                 break;
  64             }
  65         }
  66     }
  67 }
  68
  69 SdXML3DObjectContext::~SdXML3DObjectContext()
  70 {
  71 }
  72
  73 void SdXML3DObjectContext::StartElement(const uno::Reference< xml::sax::XAttributeList>& xAttrList)
  74 {
  75     uno::Reference< beans::XPropertySet > xPropSet(mxShape, uno::UNO_QUERY);
  76     if(xPropSet.is())
  77     {
  78         // set parameters
  79         if(mbSetTransform)
  80         {
  81             xPropSet->setPropertyValue("D3DTransformMatrix", uno::Any(mxHomMat));
  82         }
  83
  84         // call parent
  85         SdXMLShapeContext::StartElement(xAttrList);
  86     }
  87 }
  88
  89 SdXML3DCubeObjectShapeContext::SdXML3DCubeObjectShapeContext(
  90     SvXMLImport& rImport,
  91     const css::uno::Reference< css::xml::sax::XAttributeList>& xAttrList,
  92     uno::Reference< drawing::XShapes > const & rShapes)
  93 :   SdXML3DObjectContext( rImport, xAttrList, rShapes ),
  94     maMinEdge(-2500.0, -2500.0, -2500.0),
  95     maMaxEdge(2500.0, 2500.0, 2500.0)
  96 {
  97     sal_Int16 nAttrCount = xAttrList.is() ? xAttrList->getLength() : 0;
  98     for(sal_Int16 i=0; i < nAttrCount; i++)
  99     {
 100         OUString sAttrName = xAttrList->getNameByIndex( i );
 101         OUString aLocalName;
 102         sal_uInt16 nPrefix = GetImport().GetNamespaceMap().GetKeyByAttrName( sAttrName, &aLocalName );
 103         OUString sValue = xAttrList->getValueByIndex( i );
 104         const SvXMLTokenMap& rAttrTokenMap = GetImport().GetShapeImport()->Get3DCubeObjectAttrTokenMap();
 105
 106         switch(rAttrTokenMap.Get(nPrefix, aLocalName))
 107         {
 108             case XML_TOK_3DCUBEOBJ_MINEDGE:
 109             {
 110                 ::basegfx::B3DVector aNewVec;
 111                 SvXMLUnitConverter::convertB3DVector(aNewVec, sValue);
 112
 113                 if(aNewVec != maMinEdge)
 114                     maMinEdge = aNewVec;
 115                 break;
 116             }
 117             case XML_TOK_3DCUBEOBJ_MAXEDGE:
 118             {
 119                 ::basegfx::B3DVector aNewVec;
 120                 SvXMLUnitConverter::convertB3DVector(aNewVec, sValue);
 121
 122                 if(aNewVec != maMaxEdge)
 123                     maMaxEdge = aNewVec;
 124                 break;
 125             }
 126         }
 127     }
 128 }
 129
 130 SdXML3DCubeObjectShapeContext::~SdXML3DCubeObjectShapeContext()
 131 {
 132 }
 133
 134 void SdXML3DCubeObjectShapeContext::StartElement(const uno::Reference< xml::sax::XAttributeList>& xAttrList)
 135 {
 136     // create shape
 137     AddShape( "com.sun.star.drawing.Shape3DCubeObject" );
 138     if(!mxShape.is())
 139         return;
 140
 141     // add, set style and properties from base shape
 142     SetStyle();
 143     SdXML3DObjectContext::StartElement(xAttrList);
 144
 145     // set local parameters on shape
 146     uno::Reference< beans::XPropertySet > xPropSet(mxShape, uno::UNO_QUERY);
 147     if(!xPropSet.is())
 148         return;
 149
 150     // set parameters
 151     drawing::Position3D aPosition3D;
 152     drawing::Direction3D aDirection3D;
 153
 154     // convert from min, max to size to be set
 155     maMaxEdge = maMaxEdge - maMinEdge;
 156
 157     aPosition3D.PositionX = maMinEdge.getX();
 158     aPosition3D.PositionY = maMinEdge.getY();
 159     aPosition3D.PositionZ = maMinEdge.getZ();
 160
 161     aDirection3D.DirectionX = maMaxEdge.getX();
 162     aDirection3D.DirectionY = maMaxEdge.getY();
 163     aDirection3D.DirectionZ = maMaxEdge.getZ();
 164
 165     xPropSet->setPropertyValue("D3DPosition", uno::Any(aPosition3D));
 166     xPropSet->setPropertyValue("D3DSize", uno::Any(aDirection3D));
 167 }
 168
 169 SdXML3DSphereObjectShapeContext::SdXML3DSphereObjectShapeContext(
 170     SvXMLImport& rImport,
 171     const css::uno::Reference< css::xml::sax::XAttributeList>& xAttrList,
 172     uno::Reference< drawing::XShapes > const & rShapes)
 173 :   SdXML3DObjectContext( rImport, xAttrList, rShapes ),
 174     maCenter(0.0, 0.0, 0.0),
 175     maSphereSize(5000.0, 5000.0, 5000.0)
 176 {
 177     sal_Int16 nAttrCount = xAttrList.is() ? xAttrList->getLength() : 0;
 178     for(sal_Int16 i=0; i < nAttrCount; i++)
 179     {
 180         OUString sAttrName = xAttrList->getNameByIndex( i );
 181         OUString aLocalName;
 182         sal_uInt16 nPrefix = GetImport().GetNamespaceMap().GetKeyByAttrName( sAttrName, &aLocalName );
 183         OUString sValue = xAttrList->getValueByIndex( i );
 184         const SvXMLTokenMap& rAttrTokenMap = GetImport().GetShapeImport()->Get3DSphereObjectAttrTokenMap();
 185
 186         switch(rAttrTokenMap.Get(nPrefix, aLocalName))
 187         {
 188             case XML_TOK_3DSPHEREOBJ_CENTER:
 189             {
 190                 ::basegfx::B3DVector aNewVec;
 191                 SvXMLUnitConverter::convertB3DVector(aNewVec, sValue);
 192
 193                 if(aNewVec != maCenter)
 194                     maCenter = aNewVec;
 195                 break;
 196             }
 197             case XML_TOK_3DSPHEREOBJ_SIZE:
 198             {
 199                 ::basegfx::B3DVector aNewVec;
 200                 SvXMLUnitConverter::convertB3DVector(aNewVec, sValue);
 201
 202                 if(aNewVec != maSphereSize)
 203                     maSphereSize = aNewVec;
 204                 break;
 205             }
 206         }
 207     }
 208 }
 209
 210 SdXML3DSphereObjectShapeContext::~SdXML3DSphereObjectShapeContext()
 211 {
 212 }
 213
 214 void SdXML3DSphereObjectShapeContext::StartElement(const uno::Reference< xml::sax::XAttributeList>& xAttrList)
 215 {
 216     // create shape
 217     AddShape( "com.sun.star.drawing.Shape3DSphereObject" );
 218     if(!mxShape.is())
 219         return;
 220
 221     // add, set style and properties from base shape
 222     SetStyle();
 223     SdXML3DObjectContext::StartElement(xAttrList);
 224
 225     // set local parameters on shape
 226     uno::Reference< beans::XPropertySet > xPropSet(mxShape, uno::UNO_QUERY);
 227     if(!xPropSet.is())
 228         return;
 229
 230     // set parameters
 231     drawing::Position3D aPosition3D;
 232     drawing::Direction3D aDirection3D;
 233
 234     aPosition3D.PositionX = maCenter.getX();
 235     aPosition3D.PositionY = maCenter.getY();
 236     aPosition3D.PositionZ = maCenter.getZ();
 237
 238     aDirection3D.DirectionX = maSphereSize.getX();
 239     aDirection3D.DirectionY = maSphereSize.getY();
 240     aDirection3D.DirectionZ = maSphereSize.getZ();
 241
 242     xPropSet->setPropertyValue("D3DPosition", uno::Any(aPosition3D));
 243     xPropSet->setPropertyValue("D3DSize", uno::Any(aDirection3D));
 244 }
 245
 246 SdXML3DPolygonBasedShapeContext::SdXML3DPolygonBasedShapeContext(
 247     SvXMLImport& rImport,
 248     const css::uno::Reference< css::xml::sax::XAttributeList>& xAttrList,
 249     uno::Reference< drawing::XShapes > const & rShapes)
 250 :   SdXML3DObjectContext( rImport, xAttrList, rShapes )
 251 {
 252     sal_Int16 nAttrCount = xAttrList.is() ? xAttrList->getLength() : 0;
 253     for(sal_Int16 i=0; i < nAttrCount; i++)
 254     {
 255         OUString sAttrName = xAttrList->getNameByIndex( i );
 256         OUString aLocalName;
 257         sal_uInt16 nPrefix = GetImport().GetNamespaceMap().GetKeyByAttrName( sAttrName, &aLocalName );
 258         OUString sValue = xAttrList->getValueByIndex( i );
 259         const SvXMLTokenMap& rAttrTokenMap = GetImport().GetShapeImport()->Get3DPolygonBasedAttrTokenMap();
 260
 261         switch(rAttrTokenMap.Get(nPrefix, aLocalName))
 262         {
 263             case XML_TOK_3DPOLYGONBASED_VIEWBOX:
 264             {
 265                 maViewBox = sValue;
 266                 break;
 267             }
 268             case XML_TOK_3DPOLYGONBASED_D:
 269             {
 270                 maPoints = sValue;
 271                 break;
 272             }
 273         }
 274     }
 275 }
 276
 277 SdXML3DPolygonBasedShapeContext::~SdXML3DPolygonBasedShapeContext()
 278 {
 279 }
 280
 281 void SdXML3DPolygonBasedShapeContext::StartElement(const uno::Reference< xml::sax::XAttributeList>& xAttrList)
 282 {
 283     uno::Reference< beans::XPropertySet > xPropSet(mxShape, uno::UNO_QUERY);
 284
 285     if(!xPropSet.is())
 286         return;
 287
 288     // set parameters
 289     if(!maPoints.isEmpty() && !maViewBox.isEmpty())
 290     {
 291         // import 2d tools::PolyPolygon from svg:d
 292         basegfx::B2DPolyPolygon aPolyPolygon;
 293
 294         if(basegfx::utils::importFromSvgD(aPolyPolygon, maPoints, GetImport().needFixPositionAfterZ(), nullptr))
 295         {
 296             // convert to 3D PolyPolygon
 297             const basegfx::B3DPolyPolygon aB3DPolyPolygon(
 298                 basegfx::utils::createB3DPolyPolygonFromB2DPolyPolygon(
 299                     aPolyPolygon));
 300
 301             // convert to UNO API class PolyPolygonShape3D
 302             drawing::PolyPolygonShape3D aPolyPolygon3D;
 303             basegfx::utils::B3DPolyPolygonToUnoPolyPolygonShape3D(
 304                 aB3DPolyPolygon,
 305                 aPolyPolygon3D);
 306
 307             // set polygon data
 308             xPropSet->setPropertyValue("D3DPolyPolygon3D", uno::Any(aPolyPolygon3D));
 309         }
 310         else
 311         {
 312             OSL_ENSURE(false, "Error on importing svg:d for 3D tools::PolyPolygon (!)");
 313         }
 314     }
 315
 316     // call parent
 317     SdXML3DObjectContext::StartElement(xAttrList);
 318 }
 319
 320
 321 SdXML3DLatheObjectShapeContext::SdXML3DLatheObjectShapeContext(
 322     SvXMLImport& rImport,
 323     const css::uno::Reference< css::xml::sax::XAttributeList>& xAttrList,
 324     uno::Reference< drawing::XShapes > const & rShapes)
 325 :   SdXML3DPolygonBasedShapeContext( rImport, xAttrList, rShapes )
 326 {
 327 }
 328
 329 SdXML3DLatheObjectShapeContext::~SdXML3DLatheObjectShapeContext()
 330 {
 331 }
 332
 333 void SdXML3DLatheObjectShapeContext::StartElement(const uno::Reference< xml::sax::XAttributeList>& xAttrList)
 334 {
 335     // create shape
 336     AddShape( "com.sun.star.drawing.Shape3DLatheObject" );
 337     if(mxShape.is())
 338     {
 339         // add, set style and properties from base shape
 340         SetStyle();
 341         SdXML3DPolygonBasedShapeContext::StartElement(xAttrList);
 342     }
 343 }
 344
 345 SdXML3DExtrudeObjectShapeContext::SdXML3DExtrudeObjectShapeContext(
 346     SvXMLImport& rImport,
 347     const css::uno::Reference< css::xml::sax::XAttributeList>& xAttrList,
 348     uno::Reference< drawing::XShapes > const & rShapes)
 349 :   SdXML3DPolygonBasedShapeContext( rImport, xAttrList, rShapes )
 350 {
 351 }
 352
 353 SdXML3DExtrudeObjectShapeContext::~SdXML3DExtrudeObjectShapeContext()
 354 {
 355 }
 356
 357 void SdXML3DExtrudeObjectShapeContext::StartElement(const uno::Reference< xml::sax::XAttributeList>& xAttrList)
 358 {
 359     AddShape( "com.sun.star.drawing.Shape3DExtrudeObject" );
 360     if(mxShape.is())
 361     {
 362         // add, set style and properties from base shape
 363         SetStyle();
 364         SdXML3DPolygonBasedShapeContext::StartElement(xAttrList);
 365     }
 366 }
 367
 368
 369 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */