1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
// File: Draw_UnitCommands.cxx
// Created: Thu Feb 23 18:21:17 1995
// Author: Remi LEQUETTE
// <rle@bravox>
#include <Draw.ixx>
#include <TCollection_AsciiString.hxx>
#include <Units_Token.hxx>
#include <Units_UnitSentence.hxx>
#include <Units_TokensSequence.hxx>
#include <UnitsAPI.hxx>
#include <Units.hxx>
#include <Units_UnitsDictionary.hxx>
//=======================================================================
//function : parsing
//purpose : parsing of unit's expression
//=======================================================================
static Standard_Integer parsing
(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
{
if (argc < 2) {
di << "Usage : " << argv[0] << " string [nbiter]" << "\n";
return 1;
}
TCollection_AsciiString aStrTok(argv[1]);
Standard_Integer nbIter =1;
if(argc >2)
nbIter = atoi(argv[2]);
UnitsAPI::SetLocalSystem();
Handle(Units_Token) atoken;
Units_UnitSentence aUnitSent(aStrTok.ToCString());
if(!aUnitSent.IsDone()) {
di<<"can not create a sentence"<<"\n";
return 1;
}
Standard_Integer i =1;
for( ; i <= nbIter; i++) {
aUnitSent.Analyse();
//aUnitSent.Dump();
Handle(Units_TokensSequence) aseq = aUnitSent.Sequence();
}
atoken = aUnitSent.Evaluate();
di<<"Token word : "<<atoken->Word().ToCString()<<"\n";
return 0;
}
//=======================================================================
//function : unitsdico
//purpose : dump dictionary of units
//=======================================================================
static Standard_Integer unitsdico
(Draw_Interpretor& /* di */, Standard_Integer /*argc*/, const char** /*argv*/)
{
UnitsAPI::SetLocalSystem();
Standard_Integer mode = 2;
Units::DictionaryOfUnits(Standard_False)->Dump(mode);
return 0;
}
//=======================================================================
//function : converttoSI
//purpose :
//=======================================================================
static Standard_Integer converttoSI
(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
{
if (argc < 3) {
di<<"Invalid number of parameter, use: unitconvtoSI real string"<<"\n";
return 1;
}
Standard_Real aData = atof(argv[1]);
Standard_CString aUnit = argv[2];
Standard_Real res = UnitsAPI::AnyToSI(aData,aUnit);
di<<"result: "<<res<<"\n";
return 0;
}
//=======================================================================
//function : converttoMDTV
//purpose :
//=======================================================================
static Standard_Integer converttoMDTV
(Draw_Interpretor& di, Standard_Integer argc, const char** argv)
{
if (argc < 3) {
di<<"Invalid number of parameter, use: unitconvtoMDTV real string"<<"\n";
return 1;
}
Standard_Real aData = atof(argv[1]);
Standard_CString aUnit = argv[2];
UnitsAPI::SetLocalSystem(UnitsAPI_MDTV);
Standard_Real res = UnitsAPI::AnyToLS(aData,aUnit);
di<<"result: "<<res<<"\n";
return 0;
}
//=======================================================================
//function : unit
//purpose :
//=======================================================================
static Standard_Integer unit(Draw_Interpretor& , Standard_Integer n, const char** a)
{
if(n == 4) {
cout << Units::Convert(atof(a[1]), a[2], a[3]) << endl;
return 0;
}
else
return 1;
}
//=======================================================================
//function : UnitCommands
//purpose :
//=======================================================================
void Draw::UnitCommands(Draw_Interpretor& theCommands)
{
static Standard_Boolean Done = Standard_False;
if (Done) return;
Done = Standard_True;
const char* g = "DRAW Unit Commands";
theCommands.Add("unitparsing", "unitparsing string [nbiter]",
__FILE__,parsing,g);
theCommands.Add("unitsdico","unitsdico",
__FILE__,unitsdico,g);
theCommands.Add("unitconvtoSI","unitconvtoSI real string",
__FILE__,converttoSI,g);
theCommands.Add("unitconvtoMDTV","unitconvtoMDTV real string",
__FILE__,converttoMDTV,g);
theCommands.Add("unit","unit value unitfrom unitto",
__FILE__,unit,g);
}
|
