src/BinDrivers/BinDrivers_DocumentRetrievalDriver.cxx

   1 // Created on: 2002-10-31
   2 // Created by: Michael SAZONOV
   3 // Copyright (c) 2002-2014 OPEN CASCADE SAS
   4 //
   5 // This file is part of Open CASCADE Technology software library.
   6 //
   7 // This library is free software; you can redistribute it and/or modify it under
   8 // the terms of the GNU Lesser General Public License version 2.1 as published
   9 // by the Free Software Foundation, with special exception defined in the file
  10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  11 // distribution for complete text of the license and disclaimer of any warranty.
  12 //
  13 // Alternatively, this file may be used under the terms of Open CASCADE
  14 // commercial license or contractual agreement.
  15
  16
  17 #include <BinDrivers.hxx>
  18 #include <BinDrivers_DocumentRetrievalDriver.hxx>
  19 #include <BinLDrivers_DocumentSection.hxx>
  20 #include <BinMDataStd.hxx>
  21 #include <BinMDF_ADriverTable.hxx>
  22 #include <BinMNaming.hxx>
  23 #include <BinMNaming_NamedShapeDriver.hxx>
  24 #include <Message_Messenger.hxx>
  25 #include <Standard_ErrorHandler.hxx>
  26 #include <Standard_Failure.hxx>
  27 #include <Standard_IStream.hxx>
  28 #include <Standard_Type.hxx>
  29 #include <TCollection_ExtendedString.hxx>
  30 #include <TNaming_NamedShape.hxx>
  31
  32 IMPLEMENT_STANDARD_RTTIEXT(BinDrivers_DocumentRetrievalDriver,BinLDrivers_DocumentRetrievalDriver)
  33
  34 //=======================================================================
  35 //function : BinDrivers_DocumentRetrievalDriver
  36 //purpose  : Constructor
  37 //=======================================================================
  38 BinDrivers_DocumentRetrievalDriver::BinDrivers_DocumentRetrievalDriver ()
  39 {
  40 }
  41
  42 //=======================================================================
  43 //function : AttributeDrivers
  44 //purpose  :
  45 //=======================================================================
  46
  47 Handle(BinMDF_ADriverTable) BinDrivers_DocumentRetrievalDriver::AttributeDrivers
  48        (const Handle(Message_Messenger)& theMessageDriver)
  49 {
  50   return BinDrivers::AttributeDrivers (theMessageDriver);
  51 }
  52
  53 //=======================================================================
  54 //function : ReadShapeSection
  55 //purpose  :
  56 //=======================================================================
  57
  58 void BinDrivers_DocumentRetrievalDriver::ReadShapeSection
  59                               (BinLDrivers_DocumentSection& /*theSection*/,
  60                                Standard_IStream&            theIS,
  61                                const Standard_Boolean       /*isMess*/)
  62
  63 {
  64   // Read Shapes
  65   Handle(BinMDF_ADriver) aDriver;
  66   if (myDrivers->GetDriver(STANDARD_TYPE(TNaming_NamedShape),aDriver))
  67   {
  68     try {
  69       OCC_CATCH_SIGNALS
  70       Handle(BinMNaming_NamedShapeDriver) aNamedShapeDriver =
  71         Handle(BinMNaming_NamedShapeDriver)::DownCast (aDriver);
  72       aNamedShapeDriver->ReadShapeSection (theIS);
  73     }
  74     catch(Standard_Failure const& anException) {
  75       const TCollection_ExtendedString aMethStr
  76         ("BinDrivers_DocumentRetrievalDriver: ");
  77       myMsgDriver ->Send(aMethStr + "error of Shape Section " +
  78         anException.GetMessageString(), Message_Fail);
  79     }
  80   }
  81 }
  82
  83 //=======================================================================
  84 //function : CheckShapeSection
  85 //purpose  :
  86 //=======================================================================
  87 void BinDrivers_DocumentRetrievalDriver::CheckShapeSection(
  88                               const Storage_Position& /*ShapeSectionPos*/,
  89                               Standard_IStream& /*IS*/)
  90 {}
  91
  92 //=======================================================================
  93 //function : Clear
  94 //purpose  :
  95 //=======================================================================
  96 void BinDrivers_DocumentRetrievalDriver::Clear()
  97 {
  98   // Clear NamedShape driver
  99   Handle(BinMDF_ADriver) aDriver;
 100   if (myDrivers->GetDriver(STANDARD_TYPE(TNaming_NamedShape), aDriver))
 101   {
 102     Handle(BinMNaming_NamedShapeDriver) aNamedShapeDriver =
 103       Handle(BinMNaming_NamedShapeDriver)::DownCast(aDriver);
 104     aNamedShapeDriver->Clear();
 105   }
 106   BinLDrivers_DocumentRetrievalDriver::Clear();
 107 }
 108
 109