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
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
|
# -*- coding: utf-8 -*-
#
# AWL simulator - data structs
#
# Copyright 2013-2018 Michael Buesch <m@bues.ch>
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
from __future__ import division, absolute_import, print_function, unicode_literals
#from awlsim.common.cython_support cimport * #@cy
from awlsim.common.compat import *
from awlsim.common.datatypehelpers import * #+cimport
from awlsim.common.exceptions import *
from awlsim.common.util import *
from awlsim.core.identifier import *
from awlsim.core.memory import * #+cimport
from awlsim.core.offset import * #+cimport
#from awlsim.core.cpu cimport * #@cy
__all__ = [
"AwlStructField",
"AwlStruct",
"AwlStructInstance",
]
class AwlStructField(object): #+cdef
"""Data structure field.
"""
__slots__ = (
"name",
"offset",
"dataType",
"dataTypeId",
"initBytes",
"override",
"finalOverride",
"bitSize",
"byteSize",
"compound",
"callByRef",
)
# name => Field name string
# offset => Field offset as AwlOffset
# dataType => AwlDataType (or data type declaration string)
# initBytes => bytes or bytearray of initialization data
# override => Optional: Another AwlStructField that overrides this one.
# May be None, if unused.
def __init__(self, name, offset, dataType, initBytes=None, override=None):
from awlsim.core.datatypes import AwlDataType
if isString(dataType):
dataType = AwlDataType.makeByName(dataType)
self.name = name
self.offset = offset
self.dataType = dataType
self.initBytes = initBytes
self.override = override
self.finalOverride = None # Not known, yet.
self.bitSize = self.dataType.width
self.byteSize = intDivRoundUp(self.bitSize, 8)
self.compound = bool(dataType.compound)
from awlsim.core.blockinterface import BlockInterface
self.callByRef = bool(dataType.type in AwlDataType.callByRefTypes)
if self.initBytes is not None:
assert(len_u32(self.initBytes) == self.byteSize)
def __eq__(self, other): #@nocy
#@cy cdef __eq(self, other):
return (self is other) or (\
isinstance(other, AwlStructField) and\
self.name == other.name and\
self.offset == other.offset and\
self.dataType == other.dataType and\
self.initBytes == other.initBytes and\
self.override == other.override\
)
def __ne__(self, other): #@nocy
return not self.__eq__(other) #@nocy
#@cy def __richcmp__(self, object other, int op):
#@cy if op == 2: # __eq__
#@cy return self.__eq(other)
#@cy elif op == 3: # __ne__
#@cy return not self.__eq(other)
#@cy return False
# Return the final AwlStructField override in the chain.
def getFinalOverride(self):
if self.override:
return self.override.getFinalOverride()
return self
def __repr__(self): #@nocov
s = "AwlStructField(\"%s\", P#%s, %s (%d bit), init=%s)" %\
(str(self.name),
str(self.offset),
str(self.dataType),
self.bitSize,
str(self.initBytes))
if self.override:
s += " as "
s += str(self.override)
return s
class AwlStruct(object): #+cdef
"""Data structure.
This is a generic class holding information about data structures
in an AWL program. That might be an actual STRUCT or the internal
low level representation of an UDT, DB, etc...
"""
__slots__ = (
"fields",
"name2field",
)
def __init__(self):
self.fields = []
self.name2field = {}
def __eq__(self, other): #@nocy
#@cy cdef __eq(self, other):
return (self is other) or (\
isinstance(other, AwlStruct) and\
self.fields == other.fields\
)
def __ne__(self, other): #@nocy
return not self.__eq__(other) #@nocy
#@cy def __richcmp__(self, object other, int op):
#@cy if op == 2: # __eq__
#@cy return self.__eq(other)
#@cy elif op == 3: # __ne__
#@cy return not self.__eq(other)
#@cy return False
# Return aligned size, in bytes.
def getSize(self):
size = self.getUnalignedSize()
if size % 2:
size += 1
return size
# Return unaligned size, in bytes.
def getUnalignedSize(self):
if not self.fields:
return 0
# Get the offset of the last field and
# add its size.
lastField = self.fields[-1].getFinalOverride()
return lastField.offset.byteOffset + lastField.byteSize
def __registerField(self, field):
self.fields.append(field)
if field.name:
self.name2field[field.name] = field
# Add zero-length field.
def addDummyField(self, name=None):
offset = make_AwlOffset(self.getUnalignedSize(), 0)
field = AwlStructField(name, offset, "VOID")
self.__registerField(field)
# Merge another struct 'otherStruct' into this struct 'self'.
# 'otherStructName' is the name string of the other struct.
# 'otherStructDataType' is the AwlDataType of the other struct.
def merge(self, otherStruct, otherStructName=None, otherStructDataType=None):
if not otherStructDataType:
otherStructDataType = "VOID"
# First add a field with the sub-structure's name.
# This field is used for retrieval of a pointer to the sub-struct,
# for alignment and for informational purposes only.
baseOffset = make_AwlOffset(self.getUnalignedSize(), 0)
baseField = AwlStructField(otherStructName,
baseOffset, otherStructDataType,
override = AwlStructField(otherStructName,
baseOffset, "VOID"))
self.__registerField(baseField)
# Add all fields from the other struct.
baseOffset = make_AwlOffset(self.getUnalignedSize(), 0)
for otherField in otherStruct.fields:
if otherStructName and otherField.name:
if otherField.name.startswith('[') and\
otherField.name.endswith(']'):
newName = otherStructName + otherField.name
else:
newName = otherStructName + "." + otherField.name
else:
newName = None
field = AwlStructField(name = newName,
offset = baseOffset + otherField.offset,
dataType = otherField.dataType,
initBytes = otherField.initBytes,
override = otherField.override)
self.__registerField(field)
# Add a zero-length sub-struct-end guard field,
# to enforce alignment of following fields.
self.addDummyField()
return baseField
def addField(self, cpu, name, dataType, initBytes=None):
#@cy cdef S7CPU _cpu
from awlsim.core.datatypes import AwlDataType
_cpu = cpu
initMem = AwlMemory(initBytes)
if dataType.type == dataType.TYPE_UDT_X:
# Add an UDT.
udt = _cpu.getUDT(dataType.index)
if not udt: #@nocov
assert(0) # Should never happen
assert(not initBytes)
# Assign the struct to the UDT data type, if
# not already done so.
assert(dataType._struct is None or
dataType._struct is udt._struct)
dataType.setStruct(udt._struct)
# Merge the UDT struct with this struct.
return self.merge(udt._struct, name, dataType)
if dataType.width < 0:
raise AwlSimError("Width of data structure field '%s : %s' "
"is undefined. This probably means that its data "
"type is unsupported." %\
(name, str(dataType)))
if dataType.type == dataType.TYPE_STRUCT or\
dataType.type == dataType.TYPE_STRING:
# Add a STRUCT (or STRING, which is represented as struct).
# The struct is represented by the data types struct.
# Merge the data type struct into this struct.
assert(dataType._struct)
baseField = self.merge(dataType._struct, name, dataType)
baseField.override = AwlStructField(baseField.name,
baseField.offset,
"VOID")
baseField.initBytes = initBytes
if dataType.type == dataType.TYPE_ARRAY:
# Add an ARRAY.
# First add a field with the array's name.
# It has the data type 'ARRAY' and is informational only.
offset = make_AwlOffset(self.getUnalignedSize(), 0)
baseField = AwlStructField(name, offset, dataType,
override = AwlStructField(name, offset,
"VOID"))
self.__registerField(baseField)
# Add fields for each ARRAY entry.
initOffset = make_AwlOffset(0, 0)
childIdent = AwlDataIdent(name,
[ d[0] for d in dataType.arrayDimensions ],
doValidateName = False)
childType = dataType.arrayElementType
if not childType.allowedInArray:
raise AwlSimError("Data type '%s' not allowed in ARRAY" %\
str(childType))
for i in range(dataType.arrayGetNrElements()):
try:
if not initBytes:
raise ValueError
fieldInitMem = AwlMemory(intDivRoundUp(childType.width, 8))
fieldInitMem.store(make_AwlOffset(0, 0),
initMem.fetch(initOffset,
childType.width))
fieldInitData = fieldInitMem.getDataBytes()
except (AwlSimError, ValueError) as e:
fieldInitData = None
self.addField(_cpu, str(childIdent), childType,
fieldInitData)
initOffset += make_AwlOffset_fromLongBitOffset(childType.width)
childIdent.advanceToNextArrayElement(dataType.arrayDimensions)
if childType.width > 8 and\
intDivRoundUp(childType.width, 8) % 2 != 0:
# Align each element to 2-byte-boundary, if word or bigger.
self.addField(_cpu, None, AwlDataType.makeByName("BYTE"))
# Add a zero-length array-end guard field,
# to enforce alignment of following fields.
self.addDummyField()
if dataType.type not in {dataType.TYPE_ARRAY,
dataType.TYPE_STRUCT,
dataType.TYPE_STRING}:
# Add a single data type.
if dataType.width == 1 and self.fields and\
self.fields[-1].bitSize == 1 and\
self.fields[-1].offset.bitOffset < 7:
# Consecutive bitfields are merged into one byte
offset = make_AwlOffset(self.fields[-1].offset.byteOffset,
self.fields[-1].offset.bitOffset + 1)
else:
offset = make_AwlOffset(self.getUnalignedSize(), 0)
baseField = AwlStructField(name, offset, dataType, initBytes)
self.__registerField(baseField)
return baseField
def addFieldAligned(self, cpu, name, dataType, byteAlignment, initBytes=None):
from awlsim.core.datatypes import AwlDataType
padding = byteAlignment - self.getUnalignedSize() % byteAlignment
if padding == byteAlignment:
padding = 0
while padding:
self.addField(cpu, None, AwlDataType.makeByName("BYTE"), None)
padding -= 1
return self.addField(cpu, name, dataType, initBytes)
def addFieldNaturallyAligned(self, cpu, name, dataType, initBytes=None):
if dataType.naturalAlignment == dataType.ALIGN_WORD:
alignment = 2
else:
alignment = 1
return self.addFieldAligned(cpu, name, dataType, alignment, initBytes)
def getField(self, name):
try:
return self.name2field[name]
except KeyError:
raise AwlSimError("Data structure field '%s' not found" % name)
def __repr__(self): #@nocov
return "\n".join(str(field) for field in self.fields)
class AwlStructInstance(object): #+cdef
"""Data structure instance.
This represents an instance that corresponds to an AwlStruct() object.
"""
__slots__ = (
"_struct",
"memory",
)
def __init__(self, _struct):
# Store a reference to the data structure
self._struct = _struct
# Allocate self.memory
self.memory = AwlMemory(self._struct.getSize())
# Initialize the data structure
for field in self._struct.fields:
if not field.initBytes:
continue
try:
self.memory.store(field.offset,
make_AwlMemoryObject_fromBytes(field.initBytes,
field.bitSize))
except AwlSimError as e:
raise AwlSimError("Data structure field '%s' "
"initialization is out of range." %\
str(field))
def getFieldData(self, field, baseOffset): #@nocy
#@cy cdef AwlMemoryObject getFieldData(self, AwlStructField field, AwlOffset baseOffset) except NULL:
if baseOffset is None:
return self.memory.fetch(field.offset, field.bitSize)
return self.memory.fetch(baseOffset.add(field.offset), field.bitSize)
def setFieldData(self, field, memObj, baseOffset): #@nocy
#@cy cdef setFieldData(self, AwlStructField field, AwlMemoryObject memObj, AwlOffset baseOffset):
AwlMemoryObject_assertWidth(memObj, field.bitSize)
if baseOffset is None:
self.memory.store(field.offset, memObj)
else:
self.memory.store(baseOffset.add(field.offset), memObj)
def getFieldDataByName(self, name): #@nocy
#@cy cdef AwlMemoryObject getFieldDataByName(self, object name) except NULL:
return self.getFieldData(self._struct.getField(name), None)
def setFieldDataByName(self, name, memObj): #@nocy
#@cy cdef setFieldDataByName(self, object name, AwlMemoryObject memObj):
self.setFieldData(self._struct.getField(name), memObj, None)
|