1a19b88abffe9bcbe74033ecf236eb0000b74827
[occt.git] / src / DBRep / DBRep_Debug.cxx
1 // Created on: 1994-07-25
2 // Created by: Remi LEQUETTE
3 // Copyright (c) 1994-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
5 //
6 // This file is part of Open CASCADE Technology software library.
7 //
8 // This library is free software; you can redistribute it and/or modify it under
9 // the terms of the GNU Lesser General Public License version 2.1 as published
10 // by the Free Software Foundation, with special exception defined in the file
11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 // distribution for complete text of the license and disclaimer of any warranty.
13 //
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
16
17 #include <DBRep.hxx>
18 #include <Standard_ErrorHandler.hxx>
19 #include <Standard_Failure.hxx>
20 #include <TopTools_ListOfShape.hxx>
21 #include <TopoDS_Compound.hxx>
22 #include <BRep_Builder.hxx>
23
24 // This file defines global functions not declared in any public header,
25 // intended for use from debugger prompt (Command Window in Visual Studio)
26
27 //! Save shape identified by pointer
28 Standard_EXPORT const char* DBRep_Set (const char* theNameStr, void* theShapePtr)
29 {
30   if (theNameStr == 0 || theShapePtr == 0)
31   {
32     return "Error: name or shape is null";
33   }
34   try {
35     DBRep::Set (theNameStr, *(TopoDS_Shape*)theShapePtr);
36     return theNameStr;
37   }
38   catch (Standard_Failure const& anException)
39   {
40     return anException.GetMessageString();
41   }
42 }
43
44 //=======================================================================
45 //function : DBRep_SetComp
46 //purpose  : make compound from the given list of shapes
47 //=======================================================================
48 Standard_EXPORT const char* DBRep_SetComp(const char* theNameStr, void* theListPtr)
49 {
50   if (theNameStr == 0 || theListPtr == 0)
51   {
52     return "Error: name or list of shapes is null";
53   }
54   try {
55     TopTools_ListOfShape *pLS;
56     pLS = (TopTools_ListOfShape *)theListPtr;
57
58     TopoDS_Compound aC;
59     BRep_Builder aBB;
60     TopTools_ListIteratorOfListOfShape aIt;
61
62     aBB.MakeCompound(aC);
63     aIt.Initialize(*pLS);
64     for (; aIt.More(); aIt.Next()) {
65       const TopoDS_Shape& aE = aIt.Value();
66       aBB.Add(aC, aE);
67     }
68     DBRep::Set(theNameStr, aC);
69     return theNameStr;
70   }
71   catch (Standard_Failure const& anException)
72   {
73     return anException.GetMessageString();
74   }
75 }
76
77 // MSVC debugger cannot deal correctly with functions whose argunments 
78 // have non-standard types. Here we define alternative to the above functions
79 // with good types with the hope that GDB on Linux or other debugger could
80 // work with them (DBX could, on SUN Solaris).
81 #ifndef _MSC_VER
82
83 const char* DBRep_Set (char* theName, const TopoDS_Shape& theShape)
84 {
85  return DBRep_Set (theName, (void*)&theShape);
86 }
87
88 #endif /* _MSC_VER */
89
90 // old function, perhaps too dangerous to be used
91 /*
92 void DBRep_Get(char* name, TopoDS_Shape& S)
93 {
94   char n[255];
95   strcpy(n,name);
96   Standard_CString cs = (Standard_CString)n;
97   S = DBRep::Get(cs);
98   if (*name == '.')
99     std::cout << "Name : " << n << std::endl;
100 }
101 */