Skip to content

P
proview
Commit 7efee103 authored by claes's avatar claes
Browse files
Options

*** empty log message ***

parent 37edcabd
Hide whitespace changes
Inline Side-by-side
Showing with 2133 additions and 155 deletions
src/wbl/pwrb/src/pwrb_c_pb_ai.wb_load
View file @ 7efee103
...@@ -33,35 +33,33 @@ SObject pwrb:Class ...@@ -33,35 +33,33 @@ SObject pwrb:Class
EndBody EndBody
EndObject EndObject
! !
Object NumberOfChannels $Attribute 4 Object NumberRepresentation $Attribute 4
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$Enum"
EndBody EndBody
EndObject EndObject
! !
Object BytesPerChannel $Attribute 5 Object NumberOfChannels $Attribute 5
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !
Object Status $Attribute 6 Object BytesPerChannel $Attribute 6
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
! !
Object BytesOfInput $Attribute 7 Object Status $Attribute 7
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
! !
Object BytesOfOutput $Attribute 8 Object BytesOfInput $Attribute 8
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
...@@ -76,27 +74,18 @@ SObject pwrb:Class ...@@ -76,27 +74,18 @@ SObject pwrb:Class
Attr Flags |= PWR_MASK_INVISIBLE Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
!
Object OffsetOutputs $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
! !
EndObject ! Rt body EndObject ! Rt body
! !
Object Template Pb_Ai Object Template Pb_Ai
Body RtBody Body RtBody
Attr NumberOfChannels = 8 Attr NumberRepresentation = 0
Attr NumberOfChannels = 4
Attr BytesPerChannel = 2 Attr BytesPerChannel = 2
Attr Process = 1 Attr Process = 1
Attr Status = 0 Attr Status = 0
Attr BytesOfInput = 0 Attr BytesOfInput = 0
Attr BytesOfOutput = 0
Attr OffsetInputs = 0 Attr OffsetInputs = 0
Attr OffsetOutputs = 0
EndBody EndBody
EndObject ! Template EndObject ! Template
! !
......
src/wbl/pwrb/src/pwrb_c_pb_ao.wb_load
View file @ 7efee103
...@@ -31,29 +31,27 @@ SObject pwrb:Class ...@@ -31,29 +31,27 @@ SObject pwrb:Class
EndBody EndBody
EndObject EndObject
! !
Object NumberOfChannels $Attribute 4 Object NumberRepresentation $Attribute 4
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$Enum"
EndBody EndBody
EndObject EndObject
! !
Object BytesPerChannel $Attribute 5 Object NumberOfChannels $Attribute 5
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !
Object Status $Attribute 6 Object BytesPerChannel $Attribute 6
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
! !
Object BytesOfInput $Attribute 7 Object Status $Attribute 7
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
...@@ -67,15 +65,7 @@ SObject pwrb:Class ...@@ -67,15 +65,7 @@ SObject pwrb:Class
EndBody EndBody
EndObject EndObject
! !
Object OffsetInputs $Attribute 9 Object OffsetOutputs $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
Object OffsetOutputs $Attribute 10
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
...@@ -91,9 +81,7 @@ SObject pwrb:Class ...@@ -91,9 +81,7 @@ SObject pwrb:Class
Attr BytesPerChannel = 2 Attr BytesPerChannel = 2
Attr Process = 1 Attr Process = 1
Attr Status = 0 Attr Status = 0
Attr BytesOfInput = 0
Attr BytesOfOutput = 0 Attr BytesOfOutput = 0
Attr OffsetInputs = 0
Attr OffsetOutputs = 0 Attr OffsetOutputs = 0
EndBody EndBody
EndObject ! Template EndObject ! Template
......
src/wbl/pwrb/src/pwrb_c_pb_di.wb_load
View file @ 7efee103
...@@ -34,13 +34,19 @@ SObject pwrb:Class ...@@ -34,13 +34,19 @@ SObject pwrb:Class
EndBody EndBody
EndObject EndObject
! !
Object NumberOfChannels $Attribute 4 Object Orientation $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!
Object NumberOfChannels $Attribute 5
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !
Object Status $Attribute 5 Object Status $Attribute 6
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
...@@ -48,39 +54,31 @@ SObject pwrb:Class ...@@ -48,39 +54,31 @@ SObject pwrb:Class
EndBody EndBody
EndObject EndObject
! !
Object ConvMask1 $Attribute 6 Object ConvMask1 $Attribute 7
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object ConvMask2 $Attribute 7 Object ConvMask2 $Attribute 8
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object InvMask1 $Attribute 8 Object InvMask1 $Attribute 9
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object InvMask2 $Attribute 9 Object InvMask2 $Attribute 10
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object BytesOfInput $Attribute 10 Object BytesOfInput $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
Object BytesOfOutput $Attribute 11
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
...@@ -95,14 +93,6 @@ SObject pwrb:Class ...@@ -95,14 +93,6 @@ SObject pwrb:Class
Attr Flags |= PWR_MASK_INVISIBLE Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
!
Object OffsetOutputs $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
! !
EndObject ! Rt body EndObject ! Rt body
! !
...@@ -110,15 +100,14 @@ SObject pwrb:Class ...@@ -110,15 +100,14 @@ SObject pwrb:Class
Body RtBody Body RtBody
Attr Process = 1 Attr Process = 1
Attr Status = 0 Attr Status = 0
Attr Orientation = 8
Attr NumberOfChannels = 32 Attr NumberOfChannels = 32
Attr ConvMask1 = 65535 Attr ConvMask1 = 65535
Attr ConvMask2 = 65535 Attr ConvMask2 = 65535
Attr InvMask1 = 0 Attr InvMask1 = 0
Attr InvMask2 = 0 Attr InvMask2 = 0
Attr BytesOfInput = 0 Attr BytesOfInput = 0
Attr BytesOfOutput = 0
Attr OffsetInputs = 0 Attr OffsetInputs = 0
Attr OffsetOutputs = 0
EndBody EndBody
EndObject ! Template EndObject ! Template
! !
......
src/wbl/pwrb/src/pwrb_c_pb_do.wb_load
View file @ 7efee103
...@@ -36,13 +36,19 @@ SObject pwrb:Class ...@@ -36,13 +36,19 @@ SObject pwrb:Class
EndBody EndBody
EndObject EndObject
! !
Object NumberOfChannels $Attribute 4 Object Orientation $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!
Object NumberOfChannels $Attribute 5
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !
Object Status $Attribute 5 Object Status $Attribute 6
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
...@@ -50,62 +56,54 @@ SObject pwrb:Class ...@@ -50,62 +56,54 @@ SObject pwrb:Class
EndBody EndBody
EndObject EndObject
! !
Object TestMask1 $Attribute 6 Object TestMask1 $Attribute 7
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object TestMask2 $Attribute 7 Object TestMask2 $Attribute 8
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object InvMask1 $Attribute 8 Object InvMask1 $Attribute 9
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object InvMask2 $Attribute 9 Object InvMask2 $Attribute 10
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object TestValue1 $Attribute 10 Object TestValue1 $Attribute 11
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object TestValue2 $Attribute 11 Object TestValue2 $Attribute 12
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object FixedOutValue1 $Attribute 12 Object FixedOutValue1 $Attribute 13
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object FixedOutValue2 $Attribute 13 Object FixedOutValue2 $Attribute 14
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !
Object BytesOfInput $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
Object BytesOfOutput $Attribute 15 Object BytesOfOutput $Attribute 15
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
...@@ -114,15 +112,7 @@ SObject pwrb:Class ...@@ -114,15 +112,7 @@ SObject pwrb:Class
EndBody EndBody
EndObject EndObject
! !
Object OffsetInputs $Attribute 16 Object OffsetOutputs $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
Object OffsetOutputs $Attribute 17
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
...@@ -145,10 +135,9 @@ SObject pwrb:Class ...@@ -145,10 +135,9 @@ SObject pwrb:Class
Attr FixedOutValue2 = 0 Attr FixedOutValue2 = 0
Attr Process = 1 Attr Process = 1
Attr Status = 0 Attr Status = 0
Attr Orientation = 8
Attr NumberOfChannels = 32 Attr NumberOfChannels = 32
Attr BytesOfInput = 0
Attr BytesOfOutput = 0 Attr BytesOfOutput = 0
Attr OffsetInputs = 0
Attr OffsetOutputs = 0 Attr OffsetOutputs = 0
EndBody EndBody
EndObject ! Template EndObject ! Template
......
src/wbl/pwrb/src/pwrb_c_pb_dp_slave.wb_load
View file @ 7efee103
SObject pwrb:Class SObject pwrb:Class
!/** !/**
! @Version 1.0 ! @Version 1.0
! @Group IO,IO_Profibus
! Object that configure one Profibus DP slave. ! Object that configure one Profibus DP slave.
!*/ !*/
! !
...@@ -58,14 +59,14 @@ SObject pwrb:Class ...@@ -58,14 +59,14 @@ SObject pwrb:Class
! !
Object ByteOrdering $Attribute 7 Object ByteOrdering $Attribute 7
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$Enum"
EndBody EndBody
EndObject EndObject
! !
! !
Object StallAction $Attribute 8 Object StallAction $Attribute 8
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$Enum"
EndBody EndBody
EndObject EndObject
! !
...@@ -274,12 +275,56 @@ SObject pwrb:Class ...@@ -274,12 +275,56 @@ SObject pwrb:Class
! !
EndObject ! Rt body EndObject ! Rt body
! !
Object ConfiguratorPosnn $Menu
Object Pointed $Menu
Object HelpClass $MenuButton
Body SysBody
Attr ButtonName = "Configure"
Attr MethodName = "Pb_DP_Slave-Configure"
Attr FilterName = "Pb_DP_Slave-ConfigureFilter"
EndBody
EndObject
EndObject
EndObject
Object ConfiguratorPoscn $Menu
Object Pointed $Menu
Object HelpClass $MenuButton
Body SysBody
Attr ButtonName = "Configure"
Attr MethodName = "Pb_DP_Slave-Configure"
Attr FilterName = "Pb_DP_Slave-ConfigureFilter"
EndBody
EndObject
EndObject
EndObject
Object ConfiguratorPosos $Menu
Object Pointed $Menu
Object HelpClass $MenuButton
Body SysBody
Attr ButtonName = "Configure"
Attr MethodName = "Pb_DP_Slave-Configure"
Attr FilterName = "Pb_DP_Slave-ConfigureFilter"
EndBody
EndObject
EndObject
EndObject
Object ConfiguratorPoson $Menu
Object Pointed $Menu
Object HelpClass $MenuButton
Body SysBody
Attr ButtonName = "Configure"
Attr MethodName = "Pb_DP_Slave-Configure"
Attr FilterName = "Pb_DP_Slave-ConfigureFilter"
EndBody
EndObject
EndObject
EndObject
Object Template Pb_DP_Slave Object Template Pb_DP_Slave
Body RtBody Body RtBody
Attr Process = 1 Attr Process = 1
Attr SlaveAddress = 0 Attr SlaveAddress = 0
Attr StallAction = 1 Attr StallAction = 1
Attr ByteOrdering = 1 Attr ByteOrdering = 0
Attr Status = 0 Attr Status = 0
Attr DisableSlave = 0 Attr DisableSlave = 0
Attr ErrorCount = 0 Attr ErrorCount = 0
......
src/wbl/pwrb/src/pwrb_c_pb_ii.wb_load 0 → 100644
View file @ 7efee103
SObject pwrb:Class
!
Object Pb_Ii $ClassDef 371
!
!
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
EndBody
!
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Pb_Ii"
EndBody
!
! Description of object
!
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
!
Object Process $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
!
Object ThreadObject $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
!
Object NumberRepresentation $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!
Object NumberOfChannels $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
EndBody
EndObject
!
Object BytesPerChannel $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
EndBody
EndObject
!
Object Status $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
Object BytesOfInput $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
Object OffsetInputs $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
EndObject ! Rt body
!
Object Template Pb_Ii
Body RtBody
Attr NumberRepresentation = 0
Attr NumberOfChannels = 4
Attr BytesPerChannel = 2
Attr Process = 1
Attr Status = 0
Attr BytesOfInput = 0
Attr OffsetInputs = 0
EndBody
EndObject ! Template
!
EndObject ! Pb_Ai
!
!
EndSObject
src/wbl/pwrb/src/pwrb_c_pb_io.wb_load 0 → 100644
View file @ 7efee103
SObject pwrb:Class
!
Object Pb_Io $ClassDef 372
!
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
EndBody
!
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Pb_Io"
EndBody
!
! Description of object
!
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
Object Process $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
!
Object ThreadObject $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
!
Object NumberRepresentation $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!
Object NumberOfChannels $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
EndBody
EndObject
!
Object BytesPerChannel $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
EndBody
EndObject
!
Object Status $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
Object BytesOfOutput $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
Object OffsetOutputs $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
EndObject ! Rt body
!
Object Template Pb_Io
Body RtBody
Attr NumberOfChannels = 4
Attr BytesPerChannel = 2
Attr Process = 1
Attr Status = 0
Attr BytesOfOutput = 0
Attr OffsetOutputs = 0
EndBody
EndObject ! Template
!
EndObject ! Pb_Ao
!
!
EndSObject
src/wbl/pwrb/src/pwrb_c_pb_profiboard.wb_load
View file @ 7efee103
...@@ -8,8 +8,15 @@ ...@@ -8,8 +8,15 @@
! Range ldh_eDId_Base ! Range ldh_eDId_Base
! !
SObject pwrb:Class SObject pwrb:Class
! !/**
! ! @Author Claes Jurstrand
! @Version 1.0
! @Group IO,IO_Profibus
! @Summary Configurates a Profibus PCI master card (Softing profiboard)
! Configurates a Profibus PCI master card (Softing Profiboard). Available on LynxOS and Linux.
! The object should be named Px, where x is the number of the device, eg P1.
! You can have maximum two buses (master cards) on each system.
!*/
Object Pb_Profiboard $ClassDef 287 Object Pb_Profiboard $ClassDef 287
! !
Body SysBody Body SysBody
...@@ -21,29 +28,38 @@ SObject pwrb:Class ...@@ -21,29 +28,38 @@ SObject pwrb:Class
Body SysBody Body SysBody
Attr StructName = "Pb_Profiboard" Attr StructName = "Pb_Profiboard"
EndBody EndBody
! !/**
! Description of object ! Text description of the object (comment).
! !*/
Object Description $Attribute 1 Object Description $Attribute 1
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$String80" Attr TypeRef = "pwrs:Type-$String80"
EndBody EndBody
EndObject EndObject
! !/**
! ! Defines the Proview process that will handle I/O for the bus.
! 1 for the PLC process (default).
!*/
Object Process $Attribute 2 Object Process $Attribute 2
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
! Defines which of the PLC threads that will handle I/O for the bus (if Process = 1).
!*/
Object ThreadObject $Attribute 3 Object ThreadObject $Attribute 3
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$Objid" Attr TypeRef = "pwrs:Type-$Objid"
EndBody EndBody
EndObject EndObject
! !/**
! ! Indicates the current state of the bus in runtime. Updated by the I/O-handler.
! 0 : Bus is not initialized.
! 1 : Bus is in stopped mode.
! 2 : Bus is in cleared mode.
! 3 : Bus is in operating mode (this should be the normal state when running).
!*/
Object Status $Attribute 4 Object Status $Attribute 4
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
...@@ -51,7 +67,9 @@ SObject pwrb:Class ...@@ -51,7 +67,9 @@ SObject pwrb:Class
Attr Flags |= PWR_MASK_INVISIBLE Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
! !/**
! Flag that disables the initialization of the bus. Cant be set dynamically.
!*/
Object DisableBus $Attribute 5 Object DisableBus $Attribute 5
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
...@@ -59,8 +77,9 @@ SObject pwrb:Class ...@@ -59,8 +77,9 @@ SObject pwrb:Class
Attr Flags |= PWR_MASK_INVISIBLE Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
! !/**
! ! Number of configured slaves in the bus. Updated by the I/O-handler.
!*/
Object NumberSlaves $Attribute 6 Object NumberSlaves $Attribute 6
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
...@@ -68,128 +87,230 @@ SObject pwrb:Class ...@@ -68,128 +87,230 @@ SObject pwrb:Class
Attr Flags |= PWR_MASK_INVISIBLE Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
! !/**
! Number of the bus. You can have one or two buses (master cards) on each system.
!*/
Object BusNumber $Attribute 7 Object BusNumber $Attribute 7
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
! Maximum number of slaves allowed on the bus. Range 0..127.
!*/
Object MaxNumberSlaves $Attribute 8 Object MaxNumberSlaves $Attribute 8
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
! ! Maximum size of each slaves output area.
!*/
Object MaxSlaveOutputLen $Attribute 9 Object MaxSlaveOutputLen $Attribute 9
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
! ! Maximum size of each slaves input area.
!*/
Object MaxSlaveInputLen $Attribute 10 Object MaxSlaveInputLen $Attribute 10
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
! Baud rate for the bus in Kbit/s. Possible values are 500, 1500, 3000, 6000, 12000.
! Note that the values for some of the following attributes are depending on the
! baud rate. For further information about these bus parameters, please refer to the
! documentation from Softing.
!*/
Object BaudRate $Attribute 11 Object BaudRate $Attribute 11
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
Object Tsl $Attribute 12 ! Watchdog timer for write supervision in the master card. This watchdog is
! activated at the first write operation after initialization. If the timer later
! elapses without a write operation, the master card will reset itself, and the bus
! will stop, leaving all slaves to stall when their own stalltime elapses.
! Range 100..10000 ms
!*/
Object StallTime $Attribute 12
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
Object MinTsdr $Attribute 13 ! Slot time, the maximum time a master station must wait for a transaction response.
! Range 37..16383 Bit Times.
! Recommended values for each baudrate:
! 500 kbit/s - 200
! 1500 kbit/s - 300
! 3000 kbit/s - 400
! 6000 kbit/s - 600
! 12000 kbit/s - 1000
!*/
Object Tsl $Attribute 13
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
Object MaxTsdr $Attribute 14 ! Minimum station delay time for responder, the period of time which may elapse before
! the responder can send the response frame. Range 11..1023 Bit Times.
! Recommended values for each baudrate:
! 500 kbit/s - 11
! 1500 kbit/s - 11
! 3000 kbit/s - 11
! 6000 kbit/s - 11
! 12000 kbit/s - 11
!*/
Object MinTsdr $Attribute 14
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
Object Tqui $Attribute 15 ! Maximum station delay time for responder, the responder has to send the response frame
! before this time is elapsed. Range 37..2^16-1 Bit Times.
! Recommended values for each baudrate:
! 500 kbit/s - 100
! 1500 kbit/s - 150
! 3000 kbit/s - 250
! 6000 kbit/s - 450
! 12000 kbit/s - 800
!*/
Object MaxTsdr $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16"
EndBody
EndObject
!/**
! Quiet time, the period of time which a transmitting station must wait after the end of a frame
! before enabling its receiver. It is significant when using repeaters. Range 0..493 Bit Times.
! Recommended values for each baudrate:
! 500 kbit/s - 0
! 1500 kbit/s - 0
! 3000 kbit/s - 3
! 6000 kbit/s - 6
! 12000 kbit/s - 9
!*/
Object Tqui $Attribute 16
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !/**
Object Tset $Attribute 16 ! Setup time, the time between the occurance of an interrupt request and the necessary request
! action is performed. Range 1..494-Tqui BitTimes.
! Recommended values for each baudrate:
! 500 kbit/s - 1
! 1500 kbit/s - 1
! 3000 kbit/s - 4
! 6000 kbit/s - 8
! 12000 kbit/s - 16
!*/
Object Tset $Attribute 17
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !/**
Object Ttr $Attribute 17 ! Target rotation time, the anticipated time for one token rotation on the bus, including
! allowances for high and low priority transactions and GAP maintenance.
! Range 256..2^24-1 Bit Times.
! The value is irrelevant in Profibus DP operations.
!*/
Object Ttr $Attribute 18
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32" Attr TypeRef = "pwrs:Type-$UInt32"
EndBody EndBody
EndObject EndObject
! !/**
Object G $Attribute 18 ! Gap update factor, defines the number of token rotations between GAP maintenance cycles.
! Range 1..100.
! Recommended values for each baudrate:
! 500 kbit/s - 1
! 1500 kbit/s - 10
! 3000 kbit/s - 10
! 6000 kbit/s - 10
! 12000 kbit/s - 10
!*/
Object G $Attribute 19
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !/**
Object Hsa $Attribute 19 ! Highest station address. Range 1..126.
!*/
Object Hsa $Attribute 20
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !/**
Object MaxRetryLimit $Attribute 20 ! Maximum retry limit, indicates how often FDL has to repeat the request frame when no response
! or acknowledge frame is receive from the recognized station within the slot time. Range 0..7.
! Recommended values for each baudrate:
! 500 kbit/s - 1
! 1500 kbit/s - 1
! 3000 kbit/s - 2
! 6000 kbit/s - 3
! 12000 kbit/s - 4
!*/
Object MaxRetryLimit $Attribute 21
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !/**
Object BpFlag $Attribute 21 ! Bus parameter flag. Should not be changed from the default value.
!*/
Object BpFlag $Attribute 22
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
EndBody EndBody
EndObject EndObject
! !/**
Object MinSlaveInterval $Attribute 22 ! Data exchange cycle time in 100 us. Should not be changed from the default value.
!*/
Object MinSlaveInterval $Attribute 23
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
Object PollTimeout $Attribute 23 ! Watchdog timer for Master to Master communication.
!*/
Object PollTimeout $Attribute 24
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
Object DataControlTime $Attribute 24 ! Control interval for global control status reports of the DP master.
!*/
Object DataControlTime $Attribute 25
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt16" Attr TypeRef = "pwrs:Type-$UInt16"
EndBody EndBody
EndObject EndObject
! !/**
Object Diag $Attribute 25 ! Area for receiving diagnostic data from the master. Not implemented yet.
!*/
Object Diag $Attribute 26
Body SysBody Body SysBody
Attr TypeRef = "pwrs:Type-$UInt8" Attr TypeRef = "pwrs:Type-$UInt8"
Attr Flags |= PWR_MASK_ARRAY Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 128 Attr Elements = 256
Attr Flags |= PWR_MASK_NOEDIT Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE Attr Flags |= PWR_MASK_INVISIBLE
EndBody EndBody
EndObject EndObject
! !
!
EndObject ! Rt body EndObject ! Rt body
! !
Object Template Pb_Profiboard Object Template Pb_Profiboard
...@@ -198,16 +319,17 @@ SObject pwrb:Class ...@@ -198,16 +319,17 @@ SObject pwrb:Class
Attr MaxNumberSlaves = 48 Attr MaxNumberSlaves = 48
Attr MaxSlaveOutputLen = 128 Attr MaxSlaveOutputLen = 128
Attr MaxSlaveInputLen = 128 Attr MaxSlaveInputLen = 128
Attr BaudRate = 1500 Attr BaudRate = 12000
Attr Tsl = 3000 Attr StallTime = 3000
Attr MinTsdr = 150 Attr Tsl = 1000
Attr MaxTsdr = 980 Attr MinTsdr = 11
Attr Tqui = 0 Attr MaxTsdr = 800
Attr Tset = 240 Attr Tqui = 9
Attr Tset = 16
Attr Ttr = 300000 Attr Ttr = 300000
Attr G = 10 Attr G = 10
Attr Hsa = 126 Attr Hsa = 126
Attr MaxRetryLimit = 1 Attr MaxRetryLimit = 4
Attr NumberSlaves = 0 Attr NumberSlaves = 0
Attr Status = 0 Attr Status = 0
Attr DisableBus = 0 Attr DisableBus = 0
......
src/wbl/pwrb/src/pwrb_c_remnode3964r.wb_load 0 → 100644
View file @ 7efee103
! pwrb_c_remnode3964r.wb_load -- Defines the class Remnode3964R.
!
! PROVIEW/R
! Copyright (C) 1997 by Comator Process AB.
!
! <Description>.
!
!
SObject pwrb:Class
!/**
! @Version 1.0
! @Group Servers,NodeConfiguration
! @Summary Configures communication to a remote system using Siemens 3964R on a serial line.
! Configures communication to a remote system using Siemens 3964R on a serial line..
!
! @b Object graph
! @image orm_remnode3964r_og.gif
!
! @b See also
! @classlink RemoteConfig pwrp_remoteconfig.html
! @classlink RemTrans ssab_remtrans.html
!*/
Object Remnode3964R $ClassDef 369
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr PopEditor = 2
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "Remnode3964R"
EndBody
!/**
! Optional description.
!*/
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
!/**
! Process priority for the transport process
!*/
Object Prio $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
EndBody
EndObject
!/**
! Device name for the serial port, ex /dev/ttyS0.
! Dynamic change is not possible.
!*/
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Baud rate for the serial port, ex 9600.
! Dynamic change is not possible.
!*/
Object Speed $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! Type of parity for the serial port.
! Dynamic change is not possible.
!*/
Object Parity $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Number of stop bits for the serial port.
! Dynamic change is not possible.
!*/
Object StopBits $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Number of data bits for the serial port.
! Dynamic change is not possible.
!*/
Object DataBits $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Timeout time in seconds between two characters used while reading data.
! Dynamic change is possible.
!*/
Object CharTimeout $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Timeout time in seconds used when waiting for DLE (acknowledge) in sending,
! and when waiting for data after sending DLE in receiving.
! Dynamic change is possible.
!*/
Object AckTimeout $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Attribute that indicates connection with the remote node.
! The link is considered down when we reach the link supervision timeout
! time without receiving any valid message.
! The link is considered up again when receiving a valid message.
!*/
Object LinkUp $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Time in seconds before the link is considered down.
! Dynamic change is possible
!*/
Object LinkTimeout $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! When set, this attribute tells the remote handler not to start
! or restart the process that handles this remote node. If the transport process
! is running while the attribute is set it will terminate.
! Dynamic change is possible.
!*/
Object Disable $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! This attribute shows how many times the remote handler has restarted the
! transport process that handles this remnode.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartCount $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! The restart limit tells the remote handler how many times the transport process
! that handle this remnode can be restarted.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartLimit $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! The restart time is set by the transport process at startup and therefore
! shows the latest (re)starttime.
!*/
Object RestartTime $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Time"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Scantime in seconds for outgoing RemTrans objects.
! Dynamic change is possible.
!*/
Object ScanTime $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Error counter.
!*/
Object ErrCount $Attribute 17
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Type of remnode. Used in the RemoteConfig classgraph.
!*/
Object Id $Attribute 18
Body SysBody
Attr TypeRef = "pwrs:Type-$String8"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Contains the objid for the RemTrans objects for this remnode.
! The objid's are inserted by the remote process.
!*/
Object RemTransObjects $Attribute 19
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 25
EndBody
EndObject
EndObject
Object Template Remnode3964R
Body RtBody
Attr Prio = 15
Attr DevName = "/dev/ttyS0"
Attr Speed = 9600
Attr Parity = 2
Attr StopBits = 1
Attr DataBits = 8
Attr CharTimeout = 0.22
Attr AckTimeout = 2.0
Attr LinkUp = 0
Attr LinkTimeout = 10.0
Attr Disable = 0
Attr RestartCount = 0
Attr RestartLimit = 100
Attr ScanTime = 0.1
Attr Id = "3964r"
EndBody
EndObject
EndObject
EndSObject
src/wbl/pwrb/src/pwrb_c_remnodealcm.wb_load 0 → 100644
View file @ 7efee103
! pwrb_c_remnodealcm.wb_load -- Defines the class RemnodeALCM.
!
! PROVIEW/R
! Copyright (C) 1997 by Comator Process AB.
!
! <Description>.
!
!
SObject pwrb:Class
!/**
! @Version 1.0
! @Group Servers,NodeConfiguration
! @Summary Configures communication to a remote using the ALCM protocol.
! Configures communication to a remote using the ALCM protocol.
! ALCM is a simple message oriented protocol that uses low level ethernet
! frames with protocol type 60-06 (DEC customer use). On DEC-based systems,
! ELN and VMS, the usage is simple and supported by the operating system. The
! DECnet address is used for addressing.
! On Linux systems, we have to use raw sockets to gain access to low level
! ethernet frames and the device's MAC address for addressing.
!
! @b Object graph
! @image orm_remnodealcm_og.gif
!
! @b See also
! @classlink RemoteConfig pwrp_remoteconfig.html
! @classlink RemTrans ssab_remtrans.html
!*/
Object RemnodeALCM $ClassDef 366
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr PopEditor = 2
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "RemnodeALCM"
EndBody
!/**
! Optional description.
!*/
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
!/**
! Process priority for the transport process
!*/
Object Prio $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
EndBody
EndObject
!/**
! Device name for the ethernet device, ex eth0.
! Dynamic change is not possible.
!*/
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Hostname for the remote node. Used when hostname is to be part of the
! ALCM header in remote I/O or when mirroring common areas.
! Dynamic change is possible.
!*/
Object RemoteHostname $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! DEC-net or MAC-address for the remote node. These to address types have
! the same format and is used directly in the address field of the low
! level ethernet frame. Note that on Linux systems, we often overwrite
! the MAC address to a "DEC-net lookalike" address in area 5 when using ALCM.
! This way we don't have to change address in remote when changing network device.
!
! The notation for DECnet address is node.area, eg 4.21 (decimal notation)
! The notation for MAC address is for example AA:00:A4:00:01:54 (hex notation)
!
! Dynamic change is not possible.
!*/
Object RemoteAddress $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Attribute that indicates connection with the remote node.
! The link is considered down when we reach the link supervision timeout
! time without receiving any ALCM data or I/O messages. The link is
! considered up again when receiving any kind of message. Note that this
! supervision is separated from the remote I/O supervision which uses
! IOStallFlag and IOStallTime.
!*/
Object LinkUp $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Time in seconds before the link is considered down.
! Dynamic change is possible
!*/
Object LinkTimeout $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! When set, this attribute tells the remote handler not to start
! or restart the process that handles this remote node. If the transport process
! is running while the attribute is set it will terminate.
! Dynamic change is possible.
!*/
Object Disable $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! This attribute shows how many times the remote handler has restarted the
! transport process that handles this remnode.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartCount $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! The restart limit tells the remote handler how many times the transport process
! that handle this remnode can be restarted.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartLimit $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! The restart time is set by the transport process at startup and therefore
! shows the latest (re)starttime.
!*/
Object RestartTime $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$Time"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Scantime in seconds for outgoing RemTrans objects.
! Dynamic change is possible.
!*/
Object ScanTime $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Time in seconds to wait before retransmit when using acknowledge and buffering.
! For more information about acknowledge handling and retransmitting,
! refer to the documentation of the RemTrans object.
! Dynamic change is possible.
!*/
Object RetransmitTime $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Error counter.
!*/
Object ErrCount $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!
! Parameter IOPoll
!
Object IOPoll $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!
! Parameter IOPollTime
!
Object IOPollTime $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!
! Parameter IOPollTimeSlow
!
Object IOPollTimeSlow $Attribute 17
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!
! Parameter IOPollDiff
!
Object IOPollDiff $Attribute 18
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
!
! Parameter IOStallTime
!
Object IOStallTime $Attribute 19
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!
! Parameter IOStallAction
!
Object IOStallAction $Attribute 20
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!
! Parameter IOStallFlag
!
Object IOStallFlag $Attribute 21
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
!
! Parameter IODataArea
!
Object IODataArea $Attribute 22
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
EndBody
EndObject
!
! Parameter NumberOfDI
!
Object NumberOfDI $Attribute 23
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
!
! Parameter NumberOfDO
!
Object NumberOfDO $Attribute 24
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
!
! Parameter NumberOfAI
!
Object NumberOfAI $Attribute 25
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
!
! Parameter NumberOfAO
!
Object NumberOfAO $Attribute 26
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
!
! Parameter NumberOfDV
!
Object NumberOfDV $Attribute 27
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
!
! Parameter NumberOfCo
!
Object NumberOfCo $Attribute 28
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_NOEDIT
EndBody
EndObject
!/**
! Type of remnode. Used in the RemoteConfig classgraph.
!*/
Object Id $Attribute 29
Body SysBody
Attr TypeRef = "pwrs:Type-$String8"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Contains the objid for the RemTrans objects for this remnode.
! The objid's are inserted by the remote process.
!*/
Object RemTransObjects $Attribute 30
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 25
EndBody
EndObject
EndObject
Object Template RemnodeALCM
Body RtBody
Attr Prio = 15
Attr DevName = "eth0"
Attr LinkUp = 0
Attr LinkTimeout = 3.0
Attr Disable = 0
Attr RestartCount = 0
Attr RestartLimit = 100
Attr ScanTime = 0.1
Attr RetransmitTime = 10.0
Attr IOPoll = 0
Attr IOPollDiff = 0
Attr IOPollTime = 1.0
Attr IOPollTimeSlow = 5.0
Attr IOStallTime = 3.0
Attr IOStallAction = 3
Attr Id = "Alcm"
EndBody
EndObject
EndObject
EndSObject
src/wbl/pwrb/src/pwrb_c_remnodemodbus.wb_load 0 → 100644
View file @ 7efee103
! pwrb_c_remnodemodbus.wb_load -- Defines the class RemnodeModbus.
!
! PROVIEW/R
! Copyright (C) 1997 by Comator Process AB.
!
! <Description>.
!
!
SObject pwrb:Class
!/**
! @Version 1.0
! @Group Servers,NodeConfiguration
! @Summary Configures communication to a remote system using Modbus on a serial line.
! Configures communication to a remote system using Modbus on a serial line.
!
! @b Object graph
! @image orm_remnodemodbus_og.gif
!
! @b See also
! @classlink RemoteConfig pwrp_remoteconfig.html
! @classlink RemTrans ssab_remtrans.html
!*/
Object RemnodeModbus $ClassDef 370
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr PopEditor = 2
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "RemnodeModbus"
EndBody
!/**
! Optional description.
!*/
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
!/**
! Process priority for the transport process
!*/
Object Prio $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
EndBody
EndObject
!/**
! Device name for the serial port, ex /dev/ttyS0.
! Dynamic change is not possible.
!*/
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Baud rate for the serial port, ex 9600.
! Dynamic change is not possible.
!*/
Object Speed $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! Type of parity for the serial port.
! Dynamic change is not possible.
!*/
Object Parity $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Number of stop bits for the serial port.
! Dynamic change is not possible.
!*/
Object StopBits $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Number of data bits for the serial port.
! Dynamic change is not possible.
!*/
Object DataBits $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Timeout time in seconds used when reading a message from the serial port.
! Dynamic change is possible.
!*/
Object ReadTimeout $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Attribute that indicates connection with the remote node.
! The link is considered down when we reach the link supervision timeout
! time without receiving any valid message.
! The link is considered up again when receiving a valid message.
!*/
Object LinkUp $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Time in seconds before the link is considered down.
! Dynamic change is possible
!*/
Object LinkTimeout $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! When set, this attribute tells the remote handler not to start
! or restart the process that handles this remote node. If the transport process
! is running while the attribute is set it will terminate.
! Dynamic change is possible.
!*/
Object Disable $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! This attribute shows how many times the remote handler has restarted the
! transport process that handles this remnode.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartCount $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! The restart limit tells the remote handler how many times the transport process
! that handle this remnode can be restarted.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartLimit $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! The restart time is set by the transport process at startup and therefore
! shows the latest (re)starttime.
!*/
Object RestartTime $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Time"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Scantime in seconds for outgoing RemTrans objects.
! Dynamic change is possible.
!*/
Object ScanTime $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Error counter.
!*/
Object ErrCount $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Type of remnode. Used in the RemoteConfig classgraph.
!*/
Object Id $Attribute 17
Body SysBody
Attr TypeRef = "pwrs:Type-$String8"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Contains the objid for the RemTrans objects for this remnode.
! The objid's are inserted by the remote process.
!*/
Object RemTransObjects $Attribute 18
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 25
EndBody
EndObject
EndObject
Object Template RemnodeModbus
Body RtBody
Attr Prio = 15
Attr DevName = "/dev/ttyS0"
Attr Speed = 9600
Attr Parity = 0
Attr StopBits = 1
Attr DataBits = 8
Attr ReadTimeout = 0.05
Attr LinkUp = 0
Attr LinkTimeout = 10.0
Attr Disable = 0
Attr RestartCount = 0
Attr RestartLimit = 100
Attr ScanTime = 0.1
Attr Id = "Modbus"
EndBody
EndObject
EndObject
EndSObject
src/wbl/pwrb/src/pwrb_c_remnodeserial.wb_load 0 → 100644
View file @ 7efee103
! pwrb_c_remnodeserial.wb_load -- Defines the class RemnodeSerial.
!
! PROVIEW/R
! Copyright (C) 1997 by Comator Process AB.
!
! <Description>.
!
!
SObject pwrb:Class
!/**
! @Version 1.0
! @Group Servers,NodeConfiguration
! @Summary Configures communication to a remote system using a serial line.
! Configures communication to a remote system using a serial line.
!
! @b Object graph
! @image orm_remnodeserial_og.gif
!
! @b See also
! @classlink RemoteConfig pwrp_remoteconfig.html
! @classlink RemTrans ssab_remtrans.html
!*/
Object RemnodeSerial $ClassDef 368
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr PopEditor = 2
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "RemnodeSerial"
EndBody
!/**
! Optional description.
!*/
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
!/**
! Process priority for the transport process
!*/
Object Prio $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
EndBody
EndObject
!/**
! Device name for the serial port, ex /dev/ttyS0.
! Dynamic change is not possible.
!*/
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Baud rate for the serial port, ex 9600.
! Dynamic change is not possible.
!*/
Object Speed $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! Type of parity for the serial port.
! Dynamic change is not possible.
!*/
Object Parity $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Number of stop bits for the serial port.
! Dynamic change is not possible.
!*/
Object StopBits $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Number of data bits for the serial port.
! Dynamic change is not possible.
!*/
Object DataBits $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! List of termination characters for incoming data in ASCII value. A value of -1 indicates end of list.
! If all entrys are set to -1, no termination character is used at all.
! Dynamic change is possible.
!*/
Object TermChar $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Int16"
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 8
EndBody
EndObject
!/**
! Timeout time in seconds used when reading a message from the serial port.
! Dynamic change is possible.
!*/
Object ReadTimeout $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Attribute that indicates connection with the remote node.
! The link is considered down when we reach the link supervision timeout
! time without receiving any valid message.
! The link is considered up again when receiving a valid message.
!*/
Object LinkUp $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Time in seconds before the link is considered down.
! Dynamic change is possible
!*/
Object LinkTimeout $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! When set, this attribute tells the remote handler not to start
! or restart the process that handles this remote node. If the transport process
! is running while the attribute is set it will terminate.
! Dynamic change is possible.
!*/
Object Disable $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! This attribute shows how many times the remote handler has restarted the
! transport process that handles this remnode.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartCount $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! The restart limit tells the remote handler how many times the transport process
! that handle this remnode can be restarted.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartLimit $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! The restart time is set by the transport process at startup and therefore
! shows the latest (re)starttime.
!*/
Object RestartTime $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Time"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Scantime in seconds for outgoing RemTrans objects.
! Dynamic change is possible.
!*/
Object ScanTime $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Error counter.
!*/
Object ErrCount $Attribute 17
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Type of remnode. Used in the RemoteConfig classgraph.
!*/
Object Id $Attribute 18
Body SysBody
Attr TypeRef = "pwrs:Type-$String8"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Contains the objid for the RemTrans objects for this remnode.
! The objid's are inserted by the remote process.
!*/
Object RemTransObjects $Attribute 19
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 25
EndBody
EndObject
EndObject
Object Template RemnodeSerial
Body RtBody
Attr Prio = 15
Attr DevName = "/dev/ttyS0"
Attr Speed = 9600
Attr Parity = 0
Attr StopBits = 1
Attr DataBits = 8
Attr TermChar[0] = -1
Attr TermChar[1] = -1
Attr TermChar[2] = -1
Attr TermChar[3] = -1
Attr TermChar[4] = -1
Attr TermChar[5] = -1
Attr TermChar[6] = -1
Attr TermChar[7] = -1
Attr ReadTimeout = 0.5
Attr LinkUp = 0
Attr LinkTimeout = 10.0
Attr Disable = 0
Attr RestartCount = 0
Attr RestartLimit = 100
Attr ScanTime = 0.1
Attr Id = "Serial"
EndBody
EndObject
EndObject
EndSObject
src/wbl/pwrb/src/pwrb_c_remnodetcp.wb_load 0 → 100644
View file @ 7efee103
! pwrb_c_remnodetcp.wb_load -- Defines the class RemnodeTCP.
!
! PROVIEW/R
! Copyright (C) 1997 by Comator Process AB.
!
! <Description>.
!
!
SObject pwrb:Class
!/**
! @Version 1.0
! @Group Servers,NodeConfiguration
! @Summary Configures communication to a remote using the TCP/ip protocol.
! Configures communication to a remote using the TCP/ip protocol.
!
! @b Object graph
! @image orm_remnodetcp_og.gif
!
! @b See also
! @classlink RemoteConfig pwrp_remoteconfig.html
! @classlink RemTrans ssab_remtrans.html
!*/
Object RemnodeTCP $ClassDef 367
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr PopEditor = 2
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "RemnodeTCP"
EndBody
!/**
! Optional description.
!*/
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
!/**
! Process priority for the transport process
!*/
Object Prio $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
EndBody
EndObject
!/**
! Device name for the ethernet device, ex eth0.
! Dynamic change is not possible.
!*/
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Hostname for the remote node.
! Dynamic change is not possible.
!*/
Object RemoteHostname $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! IP-address for the remote node. If address is omitted or invalid, RemoteHostname
! is used to get the address either locally or through DNS lookup.
! Dynamic change is not possible.
!*/
Object RemoteAddress $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Local portnumber.
! Dynamic change is not possible.
!*/
Object LocalPort $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! Remote portnumber.
! Dynamic change is not possible.
!*/
Object RemotePort $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! Connection mode determines if our side should act as client or as server.
! Dynamic change is not possible.
!*/
Object ConnectionMode $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Enum"
EndBody
EndObject
!/**
! Attribute that indicates connection with the remote node.
! The link is considered down when we reach the link supervision timeout
! time without receiving any keepalive or other message.
! The link is considered up again when receiving any kind of message.
!*/
Object LinkUp $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Time in seconds before the link is considered down.
! Dynamic change is possible
!*/
Object LinkTimeout $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! When set, this attribute tells the remote handler not to start
! or restart the process that handles this remote node. If the transport process
! is running while the attribute is set it will terminate.
! Dynamic change is possible.
!*/
Object Disable $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! This attribute shows how many times the remote handler has restarted the
! transport process that handles this remnode.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartCount $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! The restart limit tells the remote handler how many times the transport process
! that handle this remnode can be restarted.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartLimit $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! The restart time is set by the transport process at startup and therefore
! shows the latest (re)starttime.
!*/
Object RestartTime $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Time"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Scantime in seconds for outgoing RemTrans objects.
! Dynamic change is possible.
!*/
Object ScanTime $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Time in seconds to wait before retransmit when using acknowledge and buffering.
! For more information about acknowledge handling and retransmitting,
! refer to the documentation of the RemTrans object.
! Dynamic change is possible.
!*/
Object RetransmitTime $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! When set, this attribute enables the sending of keepalive messages.
! Dynamic change is possible.
!*/
Object UseKeepalive $Attribute 17
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! Time in seconds between the sending of keepalive messages if keepalive
! messages is enabled with UseKeepalive.
! Dynamic change is possible.
!*/
Object KeepaliveTime $Attribute 18
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Counter that keeps track of incoming and outgoing keepalive messanges.
! The counter is incremented when a keppalive message is sent and decremented
! when such a message is received.
!*/
Object KeepaliveDiff $Attribute 19
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! When set, this attribute disables use of the special Remote TCP header
! in each send message. Furthermore, when receiving a message, the whole part
! of the message is treated as data which means that it is not possible to
! tell which ingoing RemTrans object the message is meant for since this information
! lies in the header. Therefore each incoming message is placed in the first found
! RemTrans object.
! Dynamic change is possible.
!*/
Object DisableHeader $Attribute 20
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! Error counter.
!*/
Object ErrCount $Attribute 21
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Type of remnode. Used in the RemoteConfig classgraph.
!*/
Object Id $Attribute 22
Body SysBody
Attr TypeRef = "pwrs:Type-$String8"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Contains the objid for the RemTrans objects for this remnode.
! The objid's are inserted by the remote process.
!*/
Object RemTransObjects $Attribute 23
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 25
EndBody
EndObject
EndObject
Object Template RemnodeTCP
Body RtBody
Attr Prio = 15
Attr DevName = "eth0"
Attr LocalPort = 0
Attr RemotePort = 0
Attr ConnectionMode = 0
Attr LinkUp = 0
Attr LinkTimeout = 3.0
Attr Disable = 0
Attr RestartCount = 0
Attr RestartLimit = 100
Attr ScanTime = 0.1
Attr RetransmitTime = 10.0
Attr UseKeepalive = 1
Attr KeepaliveTime = 1.0
Attr DisableHeader = 0
Attr Id = "TCP"
EndBody
EndObject
EndObject
EndSObject
src/wbl/pwrb/src/pwrb_c_remnodeudp.wb_load 0 → 100644
View file @ 7efee103
! pwrb_c_remnodeudp.wb_load -- Defines the class RemnodeUDP.
!
! PROVIEW/R
! Copyright (C) 1997 by Comator Process AB.
!
! <Description>.
!
!
SObject pwrb:Class
!/**
! @Version 1.0
! @Group Servers,NodeConfiguration
! @Summary Configures communication to a remote using the UDP/ip protocol.
! Configures communication to a remote using the UDP/ip protocol.
!
! @b Object graph
! @image orm_remnodeudp_og.gif
!
! @b See also
! @classlink RemoteConfig pwrp_remoteconfig.html
! @classlink RemTrans ssab_remtrans.html
!*/
Object RemnodeUDP $ClassDef 365
Body SysBody
Attr Editor = pwr_eEditor_AttrEd
Attr Method = pwr_eMethod_Standard
Attr PopEditor = 2
EndBody
Object RtBody $ObjBodyDef 1
Body SysBody
Attr StructName = "RemnodeUDP"
EndBody
!/**
! Optional description.
!*/
Object Description $Attribute 1
Body SysBody
Attr TypeRef = "pwrs:Type-$String80"
EndBody
EndObject
!/**
! Process priority for the transport process
!*/
Object Prio $Attribute 2
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
EndBody
EndObject
!/**
! Device name for the ethernet device, ex eth0.
! Dynamic change is not possible.
!*/
Object DevName $Attribute 3
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Hostname for the remote node.
! Dynamic change is not possible.
!*/
Object RemoteHostname $Attribute 4
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! IP-address for the remote node. If address is omitted or invalid, RemoteHostname
! is used to get the address either locally or through DNS lookup.
! Dynamic change is not possible.
!*/
Object RemoteAddress $Attribute 5
Body SysBody
Attr TypeRef = "pwrs:Type-$String32"
EndBody
EndObject
!/**
! Local portnumber.
! Dynamic change is not possible.
!*/
Object LocalPort $Attribute 6
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! Remote portnumber.
! Dynamic change is not possible.
!*/
Object RemotePort $Attribute 7
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! Attribute that indicates connection with the remote node.
! The link is considered down when we reach the link supervision timeout
! time without receiving any keepalive or other message.
! The link is considered up again when receiving any kind of message.
!*/
Object LinkUp $Attribute 8
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Time in seconds before the link is considered down.
! Dynamic change is possible
!*/
Object LinkTimeout $Attribute 9
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! When set, this attribute tells the remote handler not to start
! or restart the process that handles this remote node. If the transport process
! is running while the attribute is set it will terminate.
! Dynamic change is possible.
!*/
Object Disable $Attribute 10
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! This attribute shows how many times the remote handler has restarted the
! transport process that handles this remnode.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartCount $Attribute 11
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! The restart limit tells the remote handler how many times the transport process
! that handle this remnode can be restarted.
! Dynamic change is possible and can be used in order to earn more restarts.
!*/
Object RestartLimit $Attribute 12
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
EndBody
EndObject
!/**
! The restart time is set by the transport process at startup and therefore
! shows the latest (re)starttime.
!*/
Object RestartTime $Attribute 13
Body SysBody
Attr TypeRef = "pwrs:Type-$Time"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Scantime in seconds for outgoing RemTrans objects.
! Dynamic change is possible.
!*/
Object ScanTime $Attribute 14
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Time in seconds to wait before retransmit when using acknowledge and buffering.
! For more information about acknowledge handling and retransmitting,
! refer to the documentation of the RemTrans object.
! Dynamic change is possible.
!*/
Object RetransmitTime $Attribute 15
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! When set, this attribute enables the sending of keepalive messages.
! Dynamic change is possible.
!*/
Object UseKeepalive $Attribute 16
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! Time in seconds between the sending of keepalive messages if keepalive
! messages is enabled with UseKeepalive.
! Dynamic change is possible.
!*/
Object KeepaliveTime $Attribute 17
Body SysBody
Attr TypeRef = "pwrs:Type-$Float32"
EndBody
EndObject
!/**
! Counter that keeps track of incoming and outgoing keepalive messanges.
! The counter is incremented when a keppalive message is sent and decremented
! when such a message is received.
!*/
Object KeepaliveDiff $Attribute 18
Body SysBody
Attr TypeRef = "pwrs:Type-$Int32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! When set, this attribute disables use of the special Remote UDP header
! in each send message. Furthermore, when receiving a message, the whole part
! of the message is treated as data which means that it is not possible to
! tell which ingoing RemTrans object the message is meant for since this information
! lies in the header. Therefore each incoming message is placed in the first found
! RemTrans object.
! Dynamic change is possible.
!*/
Object DisableHeader $Attribute 19
Body SysBody
Attr TypeRef = "pwrs:Type-$Boolean"
EndBody
EndObject
!/**
! Error counter.
!*/
Object ErrCount $Attribute 20
Body SysBody
Attr TypeRef = "pwrs:Type-$UInt32"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_NOEDIT
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Type of remnode. Used in the RemoteConfig classgraph.
!*/
Object Id $Attribute 21
Body SysBody
Attr TypeRef = "pwrs:Type-$String8"
Attr Flags |= PWR_MASK_INVISIBLE
EndBody
EndObject
!/**
! Contains the objid for the RemTrans objects for this remnode.
! The objid's are inserted by the remote process.
!*/
Object RemTransObjects $Attribute 22
Body SysBody
Attr TypeRef = "pwrs:Type-$Objid"
Attr Flags |= PWR_MASK_STATE
Attr Flags |= PWR_MASK_INVISIBLE
Attr Flags |= PWR_MASK_ARRAY
Attr Elements = 25
EndBody
EndObject
EndObject
Object Template RemnodeUDP
Body RtBody
Attr Prio = 15
Attr DevName = "eth0"
Attr LocalPort = 0
Attr RemotePort = 0
Attr LinkUp = 0
Attr LinkTimeout = 3.0
Attr Disable = 0
Attr RestartCount = 0
Attr RestartLimit = 100
Attr ScanTime = 0.1
Attr RetransmitTime = 10.0
Attr UseKeepalive = 1
Attr KeepaliveTime = 1.0
Attr DisableHeader = 0
Attr Id = "UDP"
EndBody
EndObject
EndObject
EndSObject
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment
GitLab Nexedi Edition | About GitLab | About Nexedi | 沪ICP备2021021310号-2 | 沪ICP备2021021310号-7