mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-16 10:08:36 +03:00
332 lines
10 KiB
C++
332 lines
10 KiB
C++
// Created on: 1992-10-28
|
|
// Created by: Gilles DEBARBOUILLE
|
|
// Copyright (c) 1992-1999 Matra Datavision
|
|
// Copyright (c) 1999-2014 OPEN CASCADE SAS
|
|
//
|
|
// This file is part of Open CASCADE Technology software library.
|
|
//
|
|
// This library is free software; you can redistribute it and/or modify it under
|
|
// the terms of the GNU Lesser General Public License version 2.1 as published
|
|
// by the Free Software Foundation, with special exception defined in the file
|
|
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
|
// distribution for complete text of the license and disclaimer of any warranty.
|
|
//
|
|
// Alternatively, this file may be used under the terms of Open CASCADE
|
|
// commercial license or contractual agreement.
|
|
|
|
#include <Units.hxx>
|
|
|
|
#include <Units_Measurement.hxx>
|
|
#include <Units_Quantity.hxx>
|
|
#include <Units_Dimensions.hxx>
|
|
#include <Units_Unit.hxx>
|
|
#include <Units_Lexicon.hxx>
|
|
#include <Units_UnitsLexicon.hxx>
|
|
#include <Units_UnitsDictionary.hxx>
|
|
#include <Units_UnitsSystem.hxx>
|
|
#include <Units_UnitSentence.hxx>
|
|
#include <Units_ShiftedToken.hxx>
|
|
#include <Standard_NoSuchObject.hxx>
|
|
#include <TColStd_HSequenceOfHAsciiString.hxx>
|
|
#include <Units_Operators.hxx>
|
|
|
|
#include <stdlib.h>
|
|
|
|
static Handle(Units_Dimensions) nulldimensions;
|
|
static Handle(Units_UnitsLexicon) lexiconunits;
|
|
static Handle(Units_Lexicon) lexiconformula;
|
|
static Handle(Units_UnitsDictionary) unitsdictionary;
|
|
static Handle(Units_UnitsSystem) unitssystem;
|
|
|
|
static TCollection_AsciiString unitsfile;
|
|
static TCollection_AsciiString lexiconfile;
|
|
static TCollection_AsciiString lastunit;
|
|
static Handle(Units_Dimensions) lastdimension;
|
|
static Standard_Real lastvalue,lastmove;
|
|
|
|
|
|
//=======================================================================
|
|
//function : UnitsFile
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Units::UnitsFile(const Standard_CString afile) {
|
|
unitsfile = TCollection_AsciiString(afile);
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : LexiconFile
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Units::LexiconFile(const Standard_CString afile) {
|
|
lexiconfile = TCollection_AsciiString(afile);
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : DictionaryOfUnits
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Handle(Units_UnitsDictionary) Units::DictionaryOfUnits(const Standard_Boolean amode)
|
|
{
|
|
if(unitsdictionary.IsNull())
|
|
{
|
|
// std::cout<<"Allocation du dictionnaire"<<std::endl;
|
|
unitsdictionary = new Units_UnitsDictionary();
|
|
// std::cout<<"Creation du dictionnaire"<<std::endl;
|
|
unitsdictionary->Creates();
|
|
}
|
|
else if(amode)
|
|
{
|
|
// std::cout<<"Creation du dictionnaire"<<std::endl;
|
|
unitsdictionary->Creates();
|
|
}
|
|
return unitsdictionary;
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : Quantity
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Handle(Units_Quantity) Units::Quantity(const Standard_CString aquantity)
|
|
{
|
|
Standard_Integer index;
|
|
Handle(Units_Quantity) quantity;
|
|
Handle(Units_Quantity) nullquantity;
|
|
Handle(Units_QuantitiesSequence) quantitiessequence;
|
|
|
|
quantitiessequence = Units::DictionaryOfUnits()->Sequence();
|
|
for(index=1;index<=quantitiessequence->Length();index++)
|
|
{
|
|
quantity = quantitiessequence->Value(index);
|
|
if(quantity->Name() == aquantity) return quantity;
|
|
}
|
|
|
|
#ifdef OCCT_DEBUG
|
|
std::cout<<"Warning: BAD Quantity = Units::Quantity(quantity('" << aquantity << "'))" << std::endl;
|
|
#endif
|
|
return nullquantity;
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : Quantity
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
static TCollection_AsciiString symbol_string,quantity_string;
|
|
Standard_CString Units::FirstQuantity(const Standard_CString aunit)
|
|
{
|
|
Standard_Integer i,j,k;
|
|
Handle(Units_Quantity) thequantity;
|
|
Handle(Units_QuantitiesSequence) quantitiessequence;
|
|
Handle(Units_UnitsSequence) unitssequence;
|
|
Handle(Units_Unit) unit;
|
|
Handle(TColStd_HSequenceOfHAsciiString) symbolssequence;
|
|
TCollection_AsciiString symbol(aunit);
|
|
|
|
if( symbol == symbol_string ) return quantity_string.ToCString();
|
|
|
|
quantitiessequence = Units::DictionaryOfUnits()->Sequence();
|
|
for(i=1;i<=quantitiessequence->Length();i++) {
|
|
thequantity = quantitiessequence->Value(i);
|
|
unitssequence = thequantity->Sequence();
|
|
for(j=1;j<=unitssequence->Length();j++) {
|
|
unit = unitssequence->Value(j);
|
|
symbolssequence = unit->SymbolsSequence();
|
|
for( k=1;k<=symbolssequence->Length();k++) {
|
|
if( symbol == symbolssequence->Value(k)->String() ) {
|
|
symbol_string = symbol;
|
|
quantity_string = thequantity->Name();
|
|
return quantity_string.ToCString();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
#ifdef OCCT_DEBUG
|
|
std::cout<<"Warning: BAD Quantity = Units::Quantity(unit('" << symbol << "'))" << std::endl;
|
|
#endif
|
|
return NULL;
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : LexiconUnits
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Handle(Units_Lexicon) Units::LexiconUnits(const Standard_Boolean amode)
|
|
{
|
|
if(lexiconunits.IsNull()) {
|
|
// std::cout<<"Allocation du lexique d'unites"<<std::endl;
|
|
lexiconunits = new Units_UnitsLexicon();
|
|
// std::cout<<"Creation du lexique d'unites"<<std::endl;
|
|
lexiconunits->Creates(amode);
|
|
}
|
|
return lexiconunits;
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : LexiconFormula
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Handle(Units_Lexicon) Units::LexiconFormula()
|
|
{
|
|
if(lexiconformula.IsNull()) {
|
|
// std::cout<<"Allocation du lexique d'expression"<<std::endl;
|
|
lexiconformula = new Units_Lexicon();
|
|
// std::cout<<"Creation du lexique d'expression"<<std::endl;
|
|
lexiconformula->Creates();
|
|
}
|
|
return lexiconformula;
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : NullDimensions
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Handle(Units_Dimensions) Units::NullDimensions()
|
|
{
|
|
if(nulldimensions.IsNull()) nulldimensions = new Units_Dimensions(0.,0.,0.,0.,0.,0.,0.,0.,0.);
|
|
return nulldimensions;
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : Convert
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Standard_Real Units::Convert(const Standard_Real avalue,
|
|
const Standard_CString afirstunit,
|
|
const Standard_CString asecondunit)
|
|
{
|
|
Units_Measurement measurement(avalue,afirstunit);
|
|
measurement.Convert(asecondunit);
|
|
return measurement.Measurement();
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : ToSI
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Standard_Real Units::ToSI(const Standard_Real aData,
|
|
const Standard_CString aUnit){
|
|
|
|
Handle(Units_Dimensions) aDimBid;
|
|
return Units::ToSI(aData,aUnit,aDimBid);
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : ToSI
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Standard_Real Units::ToSI(const Standard_Real aData,
|
|
const Standard_CString aUnit,
|
|
Handle(Units_Dimensions) &dim)
|
|
{
|
|
if(lastunit != aUnit ) {
|
|
Units_UnitSentence unitsentence(aUnit);
|
|
if(!unitsentence.IsDone()) {
|
|
#ifdef OCCT_DEBUG
|
|
std::cout<<"can not convert - incorrect unit => return 0.0"<<std::endl;
|
|
#endif
|
|
return 0.0;
|
|
}
|
|
Handle(Units_Token) token = unitsentence.Evaluate();
|
|
lastvalue = token->Value();
|
|
lastmove = 0.;
|
|
if( token->IsKind(STANDARD_TYPE(Units_ShiftedToken)) ) {
|
|
Handle(Units_ShiftedToken) stoken =
|
|
Handle(Units_ShiftedToken)::DownCast(token) ;
|
|
lastmove = stoken->Move();
|
|
}
|
|
lastunit = TCollection_AsciiString(aUnit);
|
|
lastdimension = token->Dimensions();
|
|
}
|
|
dim = lastdimension;
|
|
return (aData + lastmove) * lastvalue;
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : FromSI
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Standard_Real Units::FromSI(const Standard_Real aData,
|
|
const Standard_CString aUnit){
|
|
Handle(Units_Dimensions) aDimBid;
|
|
return Units::FromSI(aData,aUnit,aDimBid);
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : FromSI
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Standard_Real Units::FromSI(const Standard_Real aData,
|
|
const Standard_CString aUnit,
|
|
Handle(Units_Dimensions) &dim)
|
|
{
|
|
if(lastunit != aUnit) {
|
|
Units_UnitSentence unitsentence(aUnit);
|
|
if(!unitsentence.IsDone()) {
|
|
#ifdef OCCT_DEBUG
|
|
std::cout<<"Warning: can not convert - incorrect unit => return 0.0"<<std::endl;
|
|
#endif
|
|
return 0.0;
|
|
}
|
|
Handle(Units_Token) token = unitsentence.Evaluate();
|
|
lastvalue = token->Value();
|
|
lastmove = 0.;
|
|
if( token->IsKind(STANDARD_TYPE(Units_ShiftedToken)) ) {
|
|
Handle(Units_ShiftedToken) stoken =
|
|
Handle(Units_ShiftedToken)::DownCast(token) ;
|
|
lastmove = stoken->Move();
|
|
}
|
|
lastunit = TCollection_AsciiString(aUnit);
|
|
lastdimension = token->Dimensions();
|
|
}
|
|
dim = lastdimension;
|
|
return (aData / lastvalue) - lastmove;
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//function : Dimensions
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Handle(Units_Dimensions) Units::Dimensions(const Standard_CString aType)
|
|
{
|
|
if (aType) {
|
|
Handle(Units_UnitsDictionary) dico=Units::DictionaryOfUnits(Standard_False);
|
|
|
|
Handle(Units_QuantitiesSequence) qSeq = dico->Sequence();
|
|
Handle(Units_Quantity) q;
|
|
for (Standard_Integer i=1; i <= qSeq->Length(); i++) {
|
|
if (qSeq->Value(i) == aType) {
|
|
return qSeq->Value(i)->Dimensions();
|
|
}
|
|
}
|
|
throw Standard_NoSuchObject("Units::Dimensions");
|
|
}
|
|
return Units_Dimensions::ALess();
|
|
}
|