src/IGESDimen/IGESDimen_ToolGeneralLabel.cxx

   1 // Created by: CKY / Contract Toubro-Larsen
   2 // Copyright (c) 1993-1999 Matra Datavision
   3 // Copyright (c) 1999-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 //--------------------------------------------------------------------
  18
  19 #include <IGESData_DirChecker.hxx>
  20 #include <IGESData_Dump.hxx>
  21 #include <IGESData_IGESDumper.hxx>
  22 #include <IGESData_IGESReaderData.hxx>
  23 #include <IGESData_IGESWriter.hxx>
  24 #include <IGESData_ParamCursor.hxx>
  25 #include <IGESData_ParamReader.hxx>
  26 #include <IGESDimen_GeneralLabel.hxx>
  27 #include <IGESDimen_GeneralNote.hxx>
  28 #include <IGESDimen_HArray1OfLeaderArrow.hxx>
  29 #include <IGESDimen_LeaderArrow.hxx>
  30 #include <IGESDimen_ToolGeneralLabel.hxx>
  31 #include <Interface_Check.hxx>
  32 #include <Interface_CopyTool.hxx>
  33 #include <Interface_EntityIterator.hxx>
  34 #include <Interface_Macros.hxx>
  35 #include <Interface_ShareTool.hxx>
  36 #include <Message_Messenger.hxx>
  37 #include <Standard_DomainError.hxx>
  38
  39 IGESDimen_ToolGeneralLabel::IGESDimen_ToolGeneralLabel ()    {  }
  40
  41
  42 void  IGESDimen_ToolGeneralLabel::ReadOwnParams
  43   (const Handle(IGESDimen_GeneralLabel)& ent,
  44    const Handle(IGESData_IGESReaderData)& IR, IGESData_ParamReader& PR) const
  45 {
  46   //Standard_Boolean st; //szv#4:S4163:12Mar99 moved down
  47
  48   Handle(IGESDimen_GeneralNote) note;
  49   Standard_Integer nbval;
  50   Handle(IGESDimen_HArray1OfLeaderArrow) leaders;
  51
  52   PR.ReadEntity(IR, PR.Current(), "General Note Entity",
  53                 STANDARD_TYPE(IGESDimen_GeneralNote),note); //szv#4:S4163:12Mar99 `st=` not needed
  54
  55   Standard_Boolean st = PR.ReadInteger(PR.Current(), "Number of Leaders", nbval);
  56   if (st && nbval > 0)
  57     leaders = new IGESDimen_HArray1OfLeaderArrow(1, nbval);
  58   else  PR.AddFail("Number of Leaders: Not Positive");
  59
  60   if (! leaders.IsNull())
  61     for (Standard_Integer i = 1; i <= nbval; i++)
  62       {
  63         Handle(IGESDimen_LeaderArrow) anentity;
  64         //st = PR.ReadEntity(IR, PR.Current(), "Leaders",
  65                              //STANDARD_TYPE(IGESDimen_LeaderArrow), anentity); //szv#4:S4163:12Mar99 moved in if
  66         if (PR.ReadEntity(IR, PR.Current(), "Leaders", STANDARD_TYPE(IGESDimen_LeaderArrow), anentity))
  67           leaders->SetValue(i, anentity);
  68       }
  69
  70   DirChecker(ent).CheckTypeAndForm(PR.CCheck(),ent);
  71   ent->Init(note, leaders);
  72 }
  73
  74 void  IGESDimen_ToolGeneralLabel::WriteOwnParams
  75   (const Handle(IGESDimen_GeneralLabel)& ent, IGESData_IGESWriter& IW) const
  76 {
  77   Standard_Integer upper = ent->NbLeaders();
  78   IW.Send(ent->Note());
  79   IW.Send(upper);
  80   for (Standard_Integer i = 1; i <= upper; i++)
  81     IW.Send(ent->Leader(i));
  82 }
  83
  84 void  IGESDimen_ToolGeneralLabel::OwnShared
  85   (const Handle(IGESDimen_GeneralLabel)& ent, Interface_EntityIterator& iter) const
  86 {
  87   Standard_Integer upper = ent->NbLeaders();
  88   iter.GetOneItem(ent->Note());
  89   for (Standard_Integer i = 1; i <= upper; i++)
  90     iter.GetOneItem(ent->Leader(i));
  91 }
  92
  93 void  IGESDimen_ToolGeneralLabel::OwnCopy
  94   (const Handle(IGESDimen_GeneralLabel)& another,
  95    const Handle(IGESDimen_GeneralLabel)& ent, Interface_CopyTool& TC) const
  96 {
  97   DeclareAndCast(IGESDimen_GeneralNote, note,
  98                  TC.Transferred(another->Note()));
  99   Standard_Integer nbval = another->NbLeaders();
 100
 101   Handle(IGESDimen_HArray1OfLeaderArrow) leaders =
 102     new IGESDimen_HArray1OfLeaderArrow(1, nbval);
 103   for (Standard_Integer i = 1; i <= nbval; i++)
 104     {
 105       DeclareAndCast(IGESDimen_LeaderArrow, new_ent,
 106                      TC.Transferred(another->Leader(i)));
 107       leaders->SetValue(i, new_ent);
 108     }
 109   ent->Init(note, leaders);
 110 }
 111
 112 IGESData_DirChecker  IGESDimen_ToolGeneralLabel::DirChecker
 113   (const Handle(IGESDimen_GeneralLabel)& /* ent */ ) const
 114 {
 115   IGESData_DirChecker DC (210, 0);
 116   DC.Structure(IGESData_DefVoid);
 117   DC.LineFont(IGESData_DefAny);
 118   DC.LineWeight(IGESData_DefValue);
 119   DC.Color(IGESData_DefAny);
 120   DC.UseFlagRequired(1);
 121   return DC;
 122 }
 123
 124 void  IGESDimen_ToolGeneralLabel::OwnCheck
 125   (const Handle(IGESDimen_GeneralLabel)& /* ent */,
 126    const Interface_ShareTool& , Handle(Interface_Check)& /* ach */) const
 127 {
 128 }
 129
 130 void  IGESDimen_ToolGeneralLabel::OwnDump
 131   (const Handle(IGESDimen_GeneralLabel)& ent, const IGESData_IGESDumper& dumper,
 132    const Handle(Message_Messenger)& S, const Standard_Integer level) const
 133 {
 134   Standard_Integer sublevel = (level > 4) ? 1 : 0;
 135
 136   S << "IGESDimen_GeneralLabel" << endl;
 137   S << "General Note Entity : ";
 138   dumper.Dump(ent->Note(),S, sublevel);
 139   S << endl;
 140   S << "Number of Leaders : " << ent->NbLeaders() << endl;
 141   S << "Leaders : ";
 142   IGESData_DumpEntities(S,dumper ,level,1, ent->NbLeaders(),ent->Leader);
 143   S << endl;
 144 }
 145