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
|
# -*- coding: utf-8 -*-
#
# AWL simulator - System-blocks
#
# Copyright 2012-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.exceptions import *
from awlsim.common.util import *
from awlsim.core.instructions.insn_generic_call import * #+cimport
from awlsim.core.systemblocks.error_codes import *
from awlsim.core.systemblocks.systemblockinterface import *
from awlsim.core.blocks import * #+cimport
from awlsim.core.blockinterface import *
from awlsim.core.identifier import *
from awlsim.core.offset import * #+cimport
from awlsim.core.operatortypes import * #+cimport
from awlsim.core.operators import * #+cimport
from awlsim.awlcompiler.translator import *
class SystemBlock(StaticCodeBlock): #+cdef
# The block identification. To be overridden by the subclass.
# The tuple is: (number, name, short_description)
name = (-1, "<unknown>", None)
BLOCKTYPESTR = "SystemBlock"
_isSystemBlock = True
def __init__(self, cpu, interface):
insns = [
AwlInsn_GENERIC_CALL(cpu, self.run),
]
StaticCodeBlock.__init__(self, insns, self.name[0], interface)
self.cpu = cpu
self.__widthMaskAll = AwlOperatorWidths.WIDTH_MASK_ALL
def run(self): #+cpdef
# Reimplement this method
raise NotImplementedError
# Fetch the value of a block-interface field.
def fetchInterfaceFieldByName(self, name): #@nocy
#@cy cdef AwlMemoryObject fetchInterfaceFieldByName(self, object name) except NULL:
return self.cpu.fetch(self.__interfaceOpers[name],
self.__widthMaskAll)
# Store a value to a block-interface field.
def storeInterfaceFieldByName(self, name, value): #@nocy
#@cy cdef storeInterfaceFieldByName(self, object name, AwlMemoryObject value):
return self.cpu.store(self.__interfaceOpers[name], value,
self.__widthMaskAll)
# Resolve hard wired symbolic accesses
# (i.e. accesses not done in AWL instructions)
def resolveSymbols(self):
super(SystemBlock, self).resolveSymbols()
resolver = AwlSymResolver(self.cpu)
self.__interfaceOpers = {}
for field in self.interface.fields_IN_OUT_INOUT_STAT:
# Create a scratch-operator for the access.
offset = make_AwlOffset(0, 0)
offset.identChain = AwlDataIdentChain.parseString(field.name)
oper = make_AwlOperator(AwlOperatorTypes.NAMED_LOCAL, 0,
offset, None)
# Resolve the scratch-operator.
oper = resolver.resolveNamedLocal(block=self, insn=None,
oper=oper, pointer=False)
# Store the scratch operator for later use.
self.__interfaceOpers[field.name] = oper
class SFB(SystemBlock): #+cdef
"""SFB base class.
"""
BLOCKTYPESTR = "SFB"
_isFB = True
def __init__(self, cpu):
SystemBlock.__init__(self, cpu, SFBInterface())
class SFC(SystemBlock): #+cdef
"""SFC base class.
"""
BLOCKTYPESTR = "SFC"
_isFC = True
def __init__(self, cpu):
SystemBlock.__init__(self, cpu, SFCInterface())
|
