0024624: Lost word in license statement in source files
[occt.git] / src / Aspect / Aspect_LineStyle.cxx
1 // Created on: 1992-09-14
2 // Created by: GG
3 // Copyright (c) 1992-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 //-Version      
18
19 //-Design       Declaration des variables specifiques aux Type de traits
20
21 //-Warning      Un style est definie, soit par son type predefini TOL_...
22 //              soit par sa description en METRE
23
24 //-References   
25
26 //-Language     C++ 2.0
27
28 //-Declarations
29
30 // for the class
31 #include <Aspect_LineStyle.ixx>
32 #include <Aspect_Units.hxx>
33
34 //-Aliases
35
36 //-Global data definitions
37
38 //      MyLineType              : TypeOfLine from Aspect;
39 //      MyLineDescriptor        : HArray1OfReal from TColStd;
40
41 //-Constructors
42
43 //-Destructors
44
45 //-Methods, in order
46
47 Aspect_LineStyle::Aspect_LineStyle () : MyLineDescriptor(PredefinedStyle(Aspect_TOL_SOLID)) {
48 }
49
50 Aspect_LineStyle::Aspect_LineStyle (const Aspect_TypeOfLine Type) : MyLineDescriptor(PredefinedStyle(Type)) {
51 }
52
53 Aspect_LineStyle::Aspect_LineStyle (const TColQuantity_Array1OfLength& UserDefinedStyle) {
54 Standard_Integer i ;
55
56         MyLineType = Aspect_TOL_USERDEFINED ;
57         // Modif CAL 8/2/95
58         MyLineDescriptor = new TColQuantity_HArray1OfLength
59                 (UserDefinedStyle.Lower(), UserDefinedStyle.Upper()) ;
60
61         for( i=UserDefinedStyle.Lower() ; i<=UserDefinedStyle.Upper() ; i++ ) {
62             // Modif CAL 8/2/95
63             MyLineDescriptor->SetValue(i, UserDefinedStyle(i)) ;
64             if( UserDefinedStyle(i) <= 0. )
65                 Aspect_LineStyleDefinitionError::Raise ("Bad Descriptor") ;
66         }
67 }
68
69 Aspect_LineStyle& Aspect_LineStyle::Assign (const Aspect_LineStyle& Other) {
70 Standard_Integer i ;
71
72         // Modif CAL 8/2/95
73         MyLineDescriptor = new TColQuantity_HArray1OfLength
74                 ((Other.Values()).Lower(), (Other.Values()).Upper()) ;
75         MyLineType = Other.MyLineType ;
76
77         if( MyLineType != Aspect_TOL_SOLID ) {
78           for( i=MyLineDescriptor->Lower() ; 
79                                 i<=MyLineDescriptor->Upper() ; i++ ){
80             // Modif CAL 8/2/95
81             MyLineDescriptor->SetValue(i, (Other.Values())(i)) ;
82             if( (Other.Values())(i) <= 0. )
83                 Aspect_LineStyleDefinitionError::Raise ("Bad Descriptor") ;
84           }
85         }
86
87         return (*this);
88
89 }
90
91 void Aspect_LineStyle::SetValues (const Aspect_TypeOfLine Type) {
92
93         MyLineDescriptor = PredefinedStyle(Type) ;
94
95 }
96
97 void Aspect_LineStyle::SetValues (const TColQuantity_Array1OfLength& UserDefinedStyle) {
98 Standard_Integer i ;
99
100         // Modif CAL 8/2/95
101         MyLineDescriptor = new TColQuantity_HArray1OfLength
102                 (UserDefinedStyle.Lower(), UserDefinedStyle.Upper()) ;
103         MyLineType = Aspect_TOL_USERDEFINED ;
104
105         for( i=UserDefinedStyle.Lower() ; i<=UserDefinedStyle.Upper() ; i++ ) {
106             // Modif CAL 8/2/95
107             MyLineDescriptor->SetValue(i, UserDefinedStyle(i)) ;
108             if( UserDefinedStyle(i) <= 0. )
109                 Aspect_LineStyleDefinitionError::Raise ("Bad Descriptor") ;
110         }
111 }
112
113 Aspect_TypeOfLine Aspect_LineStyle::Style () const {
114
115         return (MyLineType);
116 }
117
118 Standard_Integer Aspect_LineStyle::Length () const {
119
120         if( MyLineDescriptor.IsNull() ) return (0) ;
121         else return (MyLineDescriptor->Length());
122 }
123
124 const TColQuantity_Array1OfLength& Aspect_LineStyle::Values () const {
125
126         return (MyLineDescriptor->Array1());
127 }
128
129 Handle(TColQuantity_HArray1OfLength) Aspect_LineStyle::PredefinedStyle(const Aspect_TypeOfLine Type) {
130 Handle(TColQuantity_HArray1OfLength) descriptor ; 
131
132         MyLineType      = Type ;
133         switch ( Type ) {
134             case Aspect_TOL_USERDEFINED :
135                 Aspect_LineStyleDefinitionError::Raise ("Bad Line Type Style");
136             case Aspect_TOL_SOLID :
137                 descriptor = new TColQuantity_HArray1OfLength(1,1) ;
138                 descriptor->SetValue(1,0.) ;
139                 break ;
140             case Aspect_TOL_DASH :
141                 descriptor = new TColQuantity_HArray1OfLength(1,2) ;
142                 descriptor->SetValue(1,2.0 MILLIMETER) ;
143                 descriptor->SetValue(2,1.0 MILLIMETER) ;
144                 break ;
145             case Aspect_TOL_DOT :
146                 descriptor = new TColQuantity_HArray1OfLength(1,2) ;
147                 descriptor->SetValue(1,0.2 MILLIMETER) ;
148                 descriptor->SetValue(2,0.5 MILLIMETER) ;
149                 break ;
150             case Aspect_TOL_DOTDASH :
151                 descriptor = new TColQuantity_HArray1OfLength(1,4) ;
152                 descriptor->SetValue(1,10.0 MILLIMETER) ;
153                 descriptor->SetValue(2,1.0 MILLIMETER) ;
154                 descriptor->SetValue(3,2.0 MILLIMETER) ;
155                 descriptor->SetValue(4,1.0 MILLIMETER) ;
156                 break ;
157             default :
158                 descriptor.Nullify() ;
159         }
160
161         return (descriptor) ;
162 }
163
164 Standard_Boolean Aspect_LineStyle::IsEqual(const Aspect_LineStyle& Other) const
165 {
166   return (
167           (MyLineType == Other.MyLineType) &&
168           (MyLineDescriptor == Other.MyLineDescriptor));
169 }
170
171 Standard_Boolean Aspect_LineStyle::IsNotEqual(const Aspect_LineStyle& Other) const
172 {
173   return !IsEqual(Other);
174 }