1 // Copyright (c) 1999-2014 OPEN CASCADE SAS
3 // This file is part of Open CASCADE Technology software library.
5 // This library is free software; you can redistribute it and/or modify it under
6 // the terms of the GNU Lesser General Public License version 2.1 as published
7 // by the Free Software Foundation, with special exception defined in the file
8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
9 // distribution for complete text of the license and disclaimer of any warranty.
11 // Alternatively, this file may be used under the terms of Open CASCADE
12 // commercial license or contractual agreement.
15 #include <IFSelect_Signature.hxx>
16 #include <Interface_InterfaceModel.hxx>
17 #include <Standard_Transient.hxx>
18 #include <Standard_Type.hxx>
19 #include <TCollection_AsciiString.hxx>
23 //static Standard_CString nulsign = "";
24 static char intval[20];
27 IFSelect_Signature::IFSelect_Signature (const Standard_CString name)
28 : thename (name) { thecasi[0] = thecasi[1] = thecasi[2] = 0; }
30 void IFSelect_Signature::SetIntCase
31 (const Standard_Boolean hasmin, const Standard_Integer valmin,
32 const Standard_Boolean hasmax, const Standard_Integer valmax)
35 if (hasmin) { thecasi[0] += 2; thecasi[1] = valmin; }
36 if (hasmax) { thecasi[0] += 4; thecasi[2] = valmax; }
39 Standard_Boolean IFSelect_Signature::IsIntCase
40 (Standard_Boolean& hasmin, Standard_Integer& valmin,
41 Standard_Boolean& hasmax, Standard_Integer& valmax) const
43 hasmin = hasmax = Standard_False;
45 if (!thecasi[0]) return Standard_False;
46 if (thecasi[0] & 2) { hasmin = Standard_True; valmin = thecasi[1]; }
47 if (thecasi[0] & 4) { hasmax = Standard_True; valmax = thecasi[2]; }
51 void IFSelect_Signature::AddCase (const Standard_CString acase)
53 if (thecasl.IsNull()) thecasl = new TColStd_HSequenceOfAsciiString();
54 TCollection_AsciiString scase(acase);
55 thecasl->Append(scase);
58 Handle(TColStd_HSequenceOfAsciiString) IFSelect_Signature::CaseList () const
62 Standard_CString IFSelect_Signature::Name () const
63 { return thename.ToCString(); }
65 TCollection_AsciiString IFSelect_Signature::Label () const
67 TCollection_AsciiString label("Signature : ");
68 label.AssignCat(thename);
73 Standard_Boolean IFSelect_Signature::Matches
74 (const Handle(Standard_Transient)& ent,
75 const Handle(Interface_InterfaceModel)& model,
76 const TCollection_AsciiString& text, const Standard_Boolean exact) const
78 { return IFSelect_Signature::MatchValue ( Value(ent,model) , text, exact); }
81 Standard_Boolean IFSelect_Signature::MatchValue
82 (const Standard_CString val,
83 const TCollection_AsciiString& text, const Standard_Boolean exact)
85 if (exact) return text.IsEqual (val);
87 char cardeb = text.Value(1);
88 Standard_Integer ln,lnt,i,j;
90 lnt = (Standard_Integer)(strlen(val) - ln);
91 for (i = 0; i <= lnt; i ++) {
92 if (val[i] == cardeb) {
94 Standard_Boolean res = Standard_True;
95 for (j = 1; j < ln; j ++) {
96 if (val[i+j] != text.Value(j+1))
97 { res = Standard_False; break; }
102 return Standard_False;
106 Standard_CString IFSelect_Signature::IntValue
107 (const Standard_Integer val)
122 sprintf (intval,"%d",val);