mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-16 10:08:36 +03:00
973c2be1e1
The copying permission statements at the beginning of source files updated to refer to LGPL. Copyright dates extended till 2014 in advance.
182 lines
6.1 KiB
C++
182 lines
6.1 KiB
C++
// Created on: 1993-01-22
|
|
// Created by: Gilles DEBARBOUILLE
|
|
// Copyright (c) 1993-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 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 <Dynamic_DynamicInstance.ixx>
|
|
#include <Dynamic_Parameter.hxx>
|
|
#include <Dynamic_IntegerParameter.hxx>
|
|
#include <Dynamic_RealParameter.hxx>
|
|
#include <Dynamic_StringParameter.hxx>
|
|
#include <Dynamic_InstanceParameter.hxx>
|
|
#include <Dynamic_Method.hxx>
|
|
#include <Dynamic_CompiledMethod.hxx>
|
|
#include <Dynamic_InterpretedMethod.hxx>
|
|
#include <Dynamic_SequenceOfMethods.hxx>
|
|
#include <Standard_CString.hxx>
|
|
#include <TCollection_AsciiString.hxx>
|
|
|
|
//=======================================================================
|
|
//function : Dynamic_DynamicInstance
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Dynamic_DynamicInstance::Dynamic_DynamicInstance()
|
|
{
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Parameter
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Dynamic_DynamicInstance::Parameter
|
|
(const Handle(Dynamic_DynamicInstance)& aninstance) const
|
|
{
|
|
Handle(Dynamic_ParameterNode) parameternode = thefirstparameternode;
|
|
|
|
while(!parameternode.IsNull())
|
|
{
|
|
aninstance->Parameter(parameternode->Object());
|
|
parameternode = parameternode->Next();
|
|
}
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Parameter
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Dynamic_DynamicInstance::Parameter(const Handle(Dynamic_Parameter)& aparameter)
|
|
{
|
|
Handle(Dynamic_ParameterNode) parameternode = new Dynamic_ParameterNode(aparameter);
|
|
parameternode->Next(thefirstparameternode);
|
|
thefirstparameternode = parameternode;
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Parameter
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Dynamic_DynamicInstance::Parameter(const Standard_CString aparameter,
|
|
const Standard_Integer avalue) const
|
|
{
|
|
Handle(Dynamic_IntegerParameter) parameter =
|
|
Handle(Dynamic_IntegerParameter)::DownCast(Parameter(aparameter));
|
|
parameter->Value(avalue);
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Parameter
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Dynamic_DynamicInstance::Parameter(const Standard_CString aparameter,
|
|
const Standard_Real avalue) const
|
|
{
|
|
Handle(Dynamic_RealParameter) parameter =
|
|
Handle(Dynamic_RealParameter)::DownCast(Parameter(aparameter));
|
|
parameter->Value(avalue);
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Parameter
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Dynamic_DynamicInstance::Parameter(const Standard_CString aparameter,
|
|
const Standard_CString avalue) const
|
|
{
|
|
Handle(Dynamic_StringParameter) parameter =
|
|
Handle(Dynamic_StringParameter)::DownCast(Parameter(aparameter));
|
|
parameter->Value(avalue);
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Parameter
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Dynamic_DynamicInstance::Parameter
|
|
(const Standard_CString aparameter,
|
|
const Handle(Dynamic_DynamicInstance)& avalue) const
|
|
{
|
|
Handle(Dynamic_InstanceParameter) parameter =
|
|
Handle(Dynamic_InstanceParameter)::DownCast(Parameter(aparameter));
|
|
parameter->Value(avalue);
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Parameter
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
Handle(Dynamic_Parameter) Dynamic_DynamicInstance::Parameter
|
|
(const Standard_CString aparameter) const
|
|
{
|
|
Handle(Dynamic_Parameter) parameter;
|
|
Handle(Dynamic_ParameterNode) parameternode = thefirstparameternode;
|
|
|
|
while(!parameternode.IsNull())
|
|
{
|
|
TCollection_AsciiString aStr(aparameter);
|
|
parameter = parameternode->Object();
|
|
if(parameter->Name() == aStr) return parameter;
|
|
parameternode = parameternode->Next();
|
|
}
|
|
return parameter;
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Class
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
void Dynamic_DynamicInstance::Class(const Handle(Dynamic_DynamicClass)& aclass)
|
|
{
|
|
thedynamicclass = aclass;
|
|
}
|
|
|
|
//=======================================================================
|
|
//function : Execute
|
|
//purpose :
|
|
//=======================================================================
|
|
|
|
//extern source(Standard_Integer argc, char** argv);
|
|
|
|
void Dynamic_DynamicInstance::Execute(const Standard_CString amethod) const
|
|
{
|
|
Handle(Dynamic_Method) method = thedynamicclass->Method(amethod);
|
|
|
|
if(method->IsKind(STANDARD_TYPE(Dynamic_CompiledMethod)))
|
|
{
|
|
Handle(Dynamic_DynamicInstance) me(this) ;
|
|
Handle(Dynamic_CompiledMethod) method_1 = Handle(Dynamic_CompiledMethod)::DownCast(method);
|
|
typedef void (*function)(const Handle(Dynamic_DynamicInstance)&);
|
|
|
|
// ((function)((*(Handle_Dynamic_CompiledMethod*)&method)->Function().ToCString()))(me);
|
|
((function)(method_1->Function().ToCString()))(me);
|
|
}
|
|
else
|
|
{
|
|
/* Standard_Integer argc = 2;
|
|
char* argv[2];
|
|
argv[0] = "source";
|
|
argv[1] = (*(Handle_Dynamic_InterpretedMethod*)&method)->Function();
|
|
source(argc,argv);*/
|
|
}
|
|
}
|
|
|