Op de leschte PHDays 9 hu mir e Concours ofgehalen fir eng Gaspompelanlag ze hacken - Concours . Et waren dräi Stänn op der Plaz mat verschiddene Sécherheetsparameter (Keng Sécherheet, Niddereg Sécherheet, Héich Sécherheet), déi deeselwechten industrielle Prozess emuléieren: Loft ënner Drock gouf an e Ballon gepompelt (an duerno fräigelooss).
Trotz de verschiddene Sécherheetsparameter war d'Hardwarekompositioun vun de Stänn déiselwecht: Siemens Simatic PLC S7-300 Serie; Noutfalldeflatiounsknäppchen an Drockmessgerät (verbonne mat PLC digitalen Inputen (DI)); Ventile fir d'Inflatioun an d'Deflatioun vun der Loft (verbonne mat den digitalen Ausgänge vun der PLC (DO)) - kuckt d'Figur hei ënnen.
D'PLC, jee no den Drockmessungen an am Aklang mat sengem Programm, huet eng Entscheedung getraff fir de Ball ze entlaaschten oder opzebauen (opgemaach an zougemaach déi entspriechend Ventile). Allerdéngs hunn all Stänn e manuelle Kontrollmodus, deen et méiglech gemaach huet, d'Staate vun de Ventile ouni Restriktiounen ze kontrolléieren.
D'Stänn ënnerscheeden sech an der Komplexitéit vun dësem Modus z'aktivéieren: um ongeschützte Stand war et am einfachsten ze maachen, an um High Security Stand war et entspriechend méi schwéier.
Fënnef vun de sechs Problemer goufen an zwee Deeg geléist; De Participant op der éischter Plaz huet 233 Punkten verdéngt (hien huet eng Woch fir de Concours virbereet). Dräi Gewënner: ech Plaz - a1exdandy, II - Rubikoid, III - Ze.
Wéi och ëmmer, während PHDays konnt kee vun de Participanten all dräi Stänn iwwerwannen, dofir hu mir decidéiert en Online-Concours ze maachen an déi schwieregst Aufgab Ufank Juni publizéiert. D'Participanten hu missen d'Aufgab bannent engem Mount fäerdeg maachen, de Fändel fannen, an d'Léisung am Detail an op eng interessant Manéier beschreiwen.
Ënnert dem Schnëtt publizéieren mir eng Analyse vun der beschter Léisung fir d'Aufgab vun deenen, déi iwwer de Mount geschéckt goufen, gouf vum Alexey Kovrizhnykh (a1exdandy) vun der Digital Security Firma fonnt, déi XNUMX. Plaz am Concours während PHDays geholl huet. Hei drënner presentéiere mir säin Text mat eise Kommentaren.
Éischt Analyse
Also, d'Aufgab enthält en Archiv mat de folgende Dateien:
- block_upload_traffic.pcapng
- DB100.bin
- hints.txt
D'hints.txt Datei enthält déi néideg Informatioun an Hiweiser fir d'Aufgab ze léisen. Hei ass säin Inhalt:
- De Petrovich huet mir gëschter gesot datt Dir Block vu PlcSim an Step7 luede kënnt.
- De Siemens Simatic S7-300 Serie PLC gouf um Stand benotzt.
- PlcSim ass e PLC Emulator deen Iech erlaabt Programmer fir Siemens S7 PLCs ze lafen an ze debuggen.
D'DB100.bin Datei schéngt den DB100 PLC Dateblock ze enthalen: 00000000: 0100 0102 6e02 0401 0206 0100 0101 0102 ....n......... 00000010: 1002 0501 0202 2002 0501 0206. ........ ......... 0100: 0102 00000020 0102 7702 0401 0206 0100 0103a0102 ..w.............. 0: 02 00000030 0501 0202 1602 0501 ................ 0206: 0100 0104 0102 00000040 7502 0401 0206a0100 0105 u............... 0102: 0 02 0501 00000050 0202 1602 0501 0206............0100. 0106: 0102 3402 4 00000060 0401 0206 0100 ......... & ..... 0107 0102 2602 0501. 0202 : 00000070 4 02 0501 0206a0100 0108 0102 3302 ................ 0401: 3 00000080 0206 0100a 0109 0102 0 02 .......... 0501a0202: 1602 00000090b 0501 0206 0100 010 0102 3702 ......".....F... 0401b0206: 7 000000 0c 0100 010 0102 2202 . .. 0501c0202: 4602d 0501 000000a0 0206 0100 010 0102 3302 ................ 0401d0206: 0100 3e 000000 0d010 0102 0 02 ..0501 . .... 0202e1602: 0501 0206 000000 0 0100 010 0102 6 ........#...... 02f0401: 0206 0100 010 000000 0 0102 1102...... ..... 0501: 0202 2302 0501 0206 0100 000000 0 0110 ............... 0102: 3502 0401 0206 0100 0111 0102 5 ..... 00000100 ..... .....&. 1202: 0501 0202 2502c0501 0206 0100 0112 ....L......
Wéi den Numm et scho seet, enthält d'Block_upload_traffic.pcapng Datei en Dump vum Block-Upload-Traffic op d'PLC.
Et ass derwäert ze notéieren datt dëse Verkéiersdump op der Konkurrenzplaz wärend der Konferenz e bësse méi schwéier war ze kréien. Fir dëst ze maachen, war et néideg de Skript aus der Projektdatei fir TeslaSCADA2 ze verstoen. Vun et war et méiglech ze verstoen wou den Dump verschlësselte mat RC4 lokaliséiert ass a wéi ee Schlëssel gebraucht gouf fir en ze entschlësselen. Dumps vun Dateblocken op der Plaz konnten mam S7 Protokoll Client kritt ginn. Fir dëst hunn ech den Demo Client aus dem Snap7 Package benotzt.
Extrait vun Signalveraarbechtungsblocken aus engem Verkéiersdump
Wann Dir den Inhalt vum Dump kuckt, kënnt Dir verstoen datt et Signalveraarbechtungsblocken OB1, FC1, FC2 an FC3 enthält:
Dës Blöcke musse geläscht ginn. Dëst kann zum Beispill mat dem folgenden Skript gemaach ginn, nodeems de Traffic virdru vum pcapng Format op pcap ëmgewandelt gouf:
#!/usr/bin/env python2
import struct
from scapy.all import *
packets = rdpcap('block_upload_traffic.pcap')
s7_hdr_struct = '>BBHHHHBB'
s7_hdr_sz = struct.calcsize(s7_hdr_struct)
tpkt_cotp_sz = 7
names = iter(['OB1.bin', 'FC1.bin', 'FC2.bin', 'FC3.bin'])
buf = ''
for packet in packets:
if packet.getlayer(IP).src == '10.0.102.11':
tpkt_cotp_s7 = str(packet.getlayer(TCP).payload)
if len(tpkt_cotp_s7) < tpkt_cotp_sz + s7_hdr_sz:
continue
s7 = tpkt_cotp_s7[tpkt_cotp_sz:]
s7_hdr = s7[:s7_hdr_sz]
param_sz = struct.unpack(s7_hdr_struct, s7_hdr)[4]
s7_param = s7[12:12+param_sz]
s7_data = s7[12+param_sz:]
if s7_param in ('x1ex00', 'x1ex01'): # upload
buf += s7_data[4:]
elif s7_param == 'x1f':
with open(next(names), 'wb') as f:
f.write(buf)
buf = ''Nodeems Dir déi doraus resultéierend Blocks ënnersicht hutt, mierkt Dir datt se ëmmer mat Bytes 70 70 (pp) ufänken. Elo musst Dir léieren wéi se se analyséieren. Den Aufgab Hiweis suggeréiert datt Dir PlcSim fir dëst muss benotzen.
Kritt mënschlech liesbar Instruktioune vu Blocken
Als éischt, loosst eis probéieren S7-PlcSim ze programméieren andeems Dir e puer Blocks mat Widderhuelungsinstruktiounen (= Q 0.0) an et mat der Simatic Manager Software lued, a späichert d'PLC kritt am Emulator an d'exempel.plc Datei. Andeems Dir den Inhalt vun der Datei kuckt, kënnt Dir einfach den Ufank vun den erofgeluede Blocken duerch d'Ënnerschrëft 70 70 bestëmmen, déi mir virdru entdeckt hunn. Virun de Blocken, anscheinend, ass d'Blockgréisst als e 4-Byte Little-endian Wäert geschriwwe ginn.
Nodeems mir Informatioun iwwer d'Struktur vun de plc Dateien kritt hunn, erschéngt de folgenden Aktiounsplang fir PLC S7 Programmer ze liesen:
- Mat Simatic Manager erstelle mir eng Blockstruktur am S7-PlcSim ähnlech wéi dee mir vum Dump krut. D'Blockgréissten musse passen (dëst gëtt erreecht andeems d'Blöcke mat der erfuerderter Unzuel vun Instruktiounen ausfëllen) an hir Identifizéierer (OB1, FC1, FC2, FC3).
- Späichert d'PLC op eng Datei.
- Mir ersetzen den Inhalt vun de Blocken an der resultéierender Datei mat de Blocken aus dem Traffic Dump. Den Ufank vun de Blöcke gëtt vun der Ënnerschrëft bestëmmt.
- Mir lueden déi resultéierend Datei an S7-PlcSim a kucken d'Inhalter vun de Blocken am Simatic Manager.
Blocks kënnen ersat ginn, zum Beispill, mat de folgende Code:
with open('original.plc', 'rb') as f:
plc = f.read()
blocks = []
for fname in ['OB1.bin', 'FC1.bin', 'FC2.bin', 'FC3.bin']:
with open(fname, 'rb') as f:
blocks.append(f.read())
i = plc.find(b'pp')
for block in blocks:
plc = plc[:i] + block + plc[i+len(block):]
i = plc.find(b'pp', i + 1)
with open('target.plc', 'wb') as f:
f.write(plc)Den Alexey huet e vläicht méi schwéieren, awer trotzdem richtege Wee gemaach. Mir hunn ugeholl datt d'Participanten den NetToPlcSim Programm benotze géifen, fir datt PlcSim iwwer d'Netzwierk kommunizéieren, Blocks op PlcSim iwwer Snap7 eropluede kënnen, an dann dës Blocks als Projet vu PlcSim mat der Entwécklungsëmfeld eroflueden.
Andeems Dir déi resultéierend Datei am S7-PlcSim opmaacht, kënnt Dir déi iwwerschriwwe Blocks mat dem Simatic Manager liesen. D'Haaptapparat Kontroll Funktiounen sinn am Block FC1 opgeholl. Besonnesch bemierkenswäert ass d'#TEMP0 Variabel, déi wann ageschalt schéngt d'PLC Kontroll op de manuelle Modus ze setzen baséiert op de M2.2 an M2.3 Bit Memory Wäerter. Den #TEMP0 Wäert gëtt vun der Funktioun FC3 festgeluegt.
Fir de Problem ze léisen, musst Dir d'FC3 Funktioun analyséieren a verstoen wat muss gemaach ginn, sou datt et eng logesch zréckkënnt.
D'PLC Signalveraarbechtungsblocken um Low Security Stand um Concours Site goufen op eng ähnlech Manéier arrangéiert, awer fir de Wäert vun der #TEMP0 Variabel ze setzen, war et genuch fir d'Linn mäi Ninja Wee an den DB1 Block ze schreiwen. De Wäert an engem Block ze kontrolléieren war einfach an huet keng déif Kenntnisser vun der Blockprogramméierungssprooch erfuerdert. Natierlech, um Héich Sécherheetsniveau, wäert d'manuell Kontroll erreechen vill méi schwéier sinn an et ass néideg d'Intricacies vun der STL Sprooch ze verstoen (ee vun de Weeër fir d'S7 PLC ze programméieren).
Réckblock FC3
Inhalter vum FC3 Block an der STL Representatioun:
L B#16#0
T #TEMP13
T #TEMP15
L P#DBX 0.0
T #TEMP4
CLR
= #TEMP14
M015: L #TEMP4
LAR1
OPN DB 100
L DBLG
TAR1
<=D
JC M016
L DW#16#0
T #TEMP0
L #TEMP6
L W#16#0
<>I
JC M00d
L P#DBX 0.0
LAR1
M00d: L B [AR1,P#0.0]
T #TEMP5
L W#16#1
==I
JC M007
L #TEMP5
L W#16#2
==I
JC M008
L #TEMP5
L W#16#3
==I
JC M00f
L #TEMP5
L W#16#4
==I
JC M00e
L #TEMP5
L W#16#5
==I
JC M011
L #TEMP5
L W#16#6
==I
JC M012
JU M010
M007: +AR1 P#1.0
L P#DBX 0.0
LAR2
L B [AR1,P#0.0]
L C#8
*I
+AR2
+AR1 P#1.0
L B [AR1,P#0.0]
JL M003
JU M001
JU M002
JU M004
M003: JU M005
M001: OPN DB 101
L B [AR2,P#0.0]
T #TEMP0
JU M006
M002: OPN DB 101
L B [AR2,P#0.0]
T #TEMP1
JU M006
M004: OPN DB 101
L B [AR2,P#0.0]
T #TEMP2
JU M006
M00f: +AR1 P#1.0
L B [AR1,P#0.0]
L C#8
*I
T #TEMP11
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP7
L P#M 100.0
LAR2
L #TEMP7
L C#8
*I
+AR2
TAR2 #TEMP9
TAR1 #TEMP4
OPN DB 101
L P#DBX 0.0
LAR1
L #TEMP11
+AR1
LAR2 #TEMP9
L B [AR2,P#0.0]
T B [AR1,P#0.0]
L #TEMP4
LAR1
JU M006
M008: +AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP3
+AR1 P#1.0
L B [AR1,P#0.0]
JL M009
JU M00b
JU M00a
JU M00c
M009: JU M005
M00b: L #TEMP3
T #TEMP0
JU M006
M00a: L #TEMP3
T #TEMP1
JU M006
M00c: L #TEMP3
T #TEMP2
JU M006
M00e: +AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP7
L P#M 100.0
LAR2
L #TEMP7
L C#8
*I
+AR2
TAR2 #TEMP9
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP8
L P#M 100.0
LAR2
L #TEMP8
L C#8
*I
+AR2
TAR2 #TEMP10
TAR1 #TEMP4
LAR1 #TEMP9
LAR2 #TEMP10
L B [AR1,P#0.0]
L B [AR2,P#0.0]
AW
INVI
T #TEMP12
L B [AR1,P#0.0]
L B [AR2,P#0.0]
OW
L #TEMP12
AW
T B [AR1,P#0.0]
L DW#16#0
T #TEMP0
L MB 101
T #TEMP1
L MB 102
T #TEMP2
L #TEMP4
LAR1
JU M006
M011: +AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP7
L P#M 100.0
LAR2
L #TEMP7
L C#8
*I
+AR2
TAR2 #TEMP9
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP8
L P#M 100.0
LAR2
L #TEMP8
L C#8
*I
+AR2
TAR2 #TEMP10
TAR1 #TEMP4
LAR1 #TEMP9
LAR2 #TEMP10
L B [AR1,P#0.0]
L B [AR2,P#0.0]
-I
T B [AR1,P#0.0]
L DW#16#0
T #TEMP0
L MB 101
T #TEMP1
L MB 102
T #TEMP2
L #TEMP4
LAR1
JU M006
M012: L #TEMP15
INC 1
T #TEMP15
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP7
L P#M 100.0
LAR2
L #TEMP7
L C#8
*I
+AR2
TAR2 #TEMP9
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP8
L P#M 100.0
LAR2
L #TEMP8
L C#8
*I
+AR2
TAR2 #TEMP10
TAR1 #TEMP4
LAR1 #TEMP9
LAR2 #TEMP10
L B [AR1,P#0.0]
L B [AR2,P#0.0]
==I
JCN M013
JU M014
M013: L P#DBX 0.0
LAR1
T #TEMP4
L B#16#0
T #TEMP6
JU M006
M014: L #TEMP4
LAR1
L #TEMP13
L L#1
+I
T #TEMP13
JU M006
M006: L #TEMP0
T MB 100
L #TEMP1
T MB 101
L #TEMP2
T MB 102
+AR1 P#1.0
L #TEMP6
+ 1
T #TEMP6
JU M005
M010: L P#DBX 0.0
LAR1
L 0
T #TEMP6
TAR1 #TEMP4
M005: TAR1 #TEMP4
CLR
= #TEMP16
L #TEMP13
L L#20
==I
S #TEMP16
L #TEMP15
==I
A #TEMP16
JC M017
L #TEMP13
L L#20
<I
S #TEMP16
L #TEMP15
==I
A #TEMP16
JC M018
JU M019
M017: SET
= #TEMP14
JU M016
M018: CLR
= #TEMP14
JU M016
M019: CLR
O #TEMP14
= #RET_VAL
JU M015
M016: CLR
O #TEMP14
= #RET_VALDe Code ass zimmlech laang a ka komplizéiert schéngen fir een deen net mat STL vertraut ass. Et huet kee Sënn fir all Instruktioun am Kader vun dësem Artikel ze analyséieren; detailléiert Instruktiounen a Fäegkeeten vun der STL Sprooch kënnen an der entspriechender Handbuch fonnt ginn: . Hei wäert ech dee selwechte Code no der Veraarbechtung presentéieren - d'Etiketten a Variabelen ëmbenennen an d'Kommentaren bäidroen, déi den Operatiounalgorithmus an e puer STL Sproochkonstruktioune beschreiwen. Loosst mech direkt bemierken datt de Block a Fro eng virtuell Maschinn enthält déi e Bytecode ausféiert deen am DB100 Block läit, den Inhalt vun deem mir wëssen. Virtuell Maschinn Instruktioune besteet aus 1 Byte vum Betribscode a Bytes vun Argumenter, ee Byte fir all Argument. All ugesinn Instruktiounen hunn zwee Argumenter; Ech hunn hir Wäerter an de Kommentaren als X an Y bezeechent.
Code no Veraarbechtung]
# Инициализация различных переменных
L B#16#0
T #CHECK_N # Счетчик успешно пройденных проверок
T #COUNTER_N # Счетчик общего количества проверок
L P#DBX 0.0
T #POINTER # Указатель на текущую инструкцию
CLR
= #PRE_RET_VAL
# Основной цикл работы интерпретатора байт-кода
LOOP: L #POINTER
LAR1
OPN DB 100
L DBLG
TAR1
<=D # Проверка выхода указателя за пределы программы
JC FINISH
L DW#16#0
T #REG0
L #TEMP6
L W#16#0
<>I
JC M00d
L P#DBX 0.0
LAR1
# Конструкция switch - case для обработки различных опкодов
M00d: L B [AR1,P#0.0]
T #OPCODE
L W#16#1
==I
JC OPCODE_1
L #OPCODE
L W#16#2
==I
JC OPCODE_2
L #OPCODE
L W#16#3
==I
JC OPCODE_3
L #OPCODE
L W#16#4
==I
JC OPCODE_4
L #OPCODE
L W#16#5
==I
JC OPCODE_5
L #OPCODE
L W#16#6
==I
JC OPCODE_6
JU OPCODE_OTHER
# Обработчик опкода 01: загрузка значения из DB101[X] в регистр Y
# OP01(X, Y): REG[Y] = DB101[X]
OPCODE_1: +AR1 P#1.0
L P#DBX 0.0
LAR2
L B [AR1,P#0.0] # Загрузка аргумента X (индекс в DB101)
L C#8
*I
+AR2
+AR1 P#1.0
L B [AR1,P#0.0] # Загрузка аргумента Y (индекс регистра)
JL M003 # Аналог switch - case на основе значения Y
JU M001 # для выбора необходимого регистра для записи.
JU M002 # Подобные конструкции используются и в других
JU M004 # операциях ниже для аналогичных целей
M003: JU LOOPEND
M001: OPN DB 101
L B [AR2,P#0.0]
T #REG0 # Запись значения DB101[X] в REG[0]
JU PRE_LOOPEND
M002: OPN DB 101
L B [AR2,P#0.0]
T #REG1 # Запись значения DB101[X] в REG[1]
JU PRE_LOOPEND
M004: OPN DB 101
L B [AR2,P#0.0]
T #REG2 # Запись значения DB101[X] в REG[2]
JU PRE_LOOPEND
# Обработчик опкода 02: загрузка значения X в регистр Y
# OP02(X, Y): REG[Y] = X
OPCODE_2: +AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP3
+AR1 P#1.0
L B [AR1,P#0.0]
JL M009
JU M00b
JU M00a
JU M00c
M009: JU LOOPEND
M00b: L #TEMP3
T #REG0
JU PRE_LOOPEND
M00a: L #TEMP3
T #REG1
JU PRE_LOOPEND
M00c: L #TEMP3
T #REG2
JU PRE_LOOPEND
# Опкод 03 не используется в программе, поэтому пропустим его
...
# Обработчик опкода 04: сравнение регистров X и Y
# OP04(X, Y): REG[0] = 0; REG[X] = (REG[X] == REG[Y])
OPCODE_4: +AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP7 # первый аргумент - X
L P#M 100.0
LAR2
L #TEMP7
L C#8
*I
+AR2
TAR2 #TEMP9 # REG[X]
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP8
L P#M 100.0
LAR2
L #TEMP8
L C#8
*I
+AR2
TAR2 #TEMP10 # REG[Y]
TAR1 #POINTER
LAR1 #TEMP9 # REG[X]
LAR2 #TEMP10 # REG[Y]
L B [AR1,P#0.0]
L B [AR2,P#0.0]
AW
INVI
T #TEMP12 # ~(REG[Y] & REG[X])
L B [AR1,P#0.0]
L B [AR2,P#0.0]
OW
L #TEMP12
AW # (~(REG[Y] & REG[X])) & (REG[Y] | REG[X]) - аналог проверки на равенство
T B [AR1,P#0.0]
L DW#16#0
T #REG0
L MB 101
T #REG1
L MB 102
T #REG2
L #POINTER
LAR1
JU PRE_LOOPEND
# Обработчик опкода 05: вычитание регистра Y из X
# OP05(X, Y): REG[0] = 0; REG[X] = REG[X] - REG[Y]
OPCODE_5: +AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP7
L P#M 100.0
LAR2
L #TEMP7
L C#8
*I
+AR2
TAR2 #TEMP9 # REG[X]
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP8
L P#M 100.0
LAR2
L #TEMP8
L C#8
*I
+AR2
TAR2 #TEMP10 # REG[Y]
TAR1 #POINTER
LAR1 #TEMP9
LAR2 #TEMP10
L B [AR1,P#0.0]
L B [AR2,P#0.0]
-I # ACCU1 = ACCU2 - ACCU1, REG[X] - REG[Y]
T B [AR1,P#0.0]
L DW#16#0
T #REG0
L MB 101
T #REG1
L MB 102
T #REG2
L #POINTER
LAR1
JU PRE_LOOPEND
# Обработчик опкода 06: инкремент #CHECK_N при равенстве регистров X и Y
# OP06(X, Y): #CHECK_N += (1 if REG[X] == REG[Y] else 0)
OPCODE_6: L #COUNTER_N
INC 1
T #COUNTER_N
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP7 # REG[X]
L P#M 100.0
LAR2
L #TEMP7
L C#8
*I
+AR2
TAR2 #TEMP9 # REG[X]
+AR1 P#1.0
L B [AR1,P#0.0]
T #TEMP8
L P#M 100.0
LAR2
L #TEMP8
L C#8
*I
+AR2
TAR2 #TEMP10 # REG[Y]
TAR1 #POINTER
LAR1 #TEMP9 # REG[Y]
LAR2 #TEMP10 # REG[X]
L B [AR1,P#0.0]
L B [AR2,P#0.0]
==I
JCN M013
JU M014
M013: L P#DBX 0.0
LAR1
T #POINTER
L B#16#0
T #TEMP6
JU PRE_LOOPEND
M014: L #POINTER
LAR1
# Инкремент значения #CHECK_N
L #CHECK_N
L L#1
+I
T #CHECK_N
JU PRE_LOOPEND
PRE_LOOPEND: L #REG0
T MB 100
L #REG1
T MB 101
L #REG2
T MB 102
+AR1 P#1.0
L #TEMP6
+ 1
T #TEMP6
JU LOOPEND
OPCODE_OTHER: L P#DBX 0.0
LAR1
L 0
T #TEMP6
TAR1 #POINTER
LOOPEND: TAR1 #POINTER
CLR
= #TEMP16
L #CHECK_N
L L#20
==I
S #TEMP16
L #COUNTER_N
==I
A #TEMP16
# Все проверки пройдены, если #CHECK_N == #COUNTER_N == 20
JC GOOD
L #CHECK_N
L L#20
<I
S #TEMP16
L #COUNTER_N
==I
A #TEMP16
JC FAIL
JU M019
GOOD: SET
= #PRE_RET_VAL
JU FINISH
FAIL: CLR
= #PRE_RET_VAL
JU FINISH
M019: CLR
O #PRE_RET_VAL
= #RET_VAL
JU LOOP
FINISH: CLR
O #PRE_RET_VAL
= #RET_VALNodeems Dir eng Iddi iwwer d'virtuelle Maschinninstruktioune kritt hutt, schreiwen mir e klengen Disassembler fir de Bytecode am DB100 Block ze analyséieren:
import string
alph = string.ascii_letters + string.digits
with open('DB100.bin', 'rb') as f:
m = f.read()
pc = 0
while pc < len(m):
op = m[pc]
if op == 1:
print('R{} = DB101[{}]'.format(m[pc + 2], m[pc + 1]))
pc += 3
elif op == 2:
c = chr(m[pc + 1])
c = c if c in alph else '?'
print('R{} = {:02x} ({})'.format(m[pc + 2], m[pc + 1], c))
pc += 3
elif op == 4:
print('R0 = 0; R{} = (R{} == R{})'.format(
m[pc + 1], m[pc + 1], m[pc + 2]))
pc += 3
elif op == 5:
print('R0 = 0; R{} = R{} - R{}'.format(
m[pc + 1], m[pc + 1], m[pc + 2]))
pc += 3
elif op == 6:
print('CHECK (R{} == R{})n'.format(
m[pc + 1], m[pc + 2]))
pc += 3
else:
print('unk opcode {}'.format(op))
breakAls Resultat kréie mir de folgende virtuelle Maschinncode:
Virtuell Maschinn Code
R1 = DB101[0]
R2 = 6e (n)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[1]
R2 = 10 (?)
R0 = 0; R1 = R1 - R2
R2 = 20 (?)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[2]
R2 = 77 (w)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[3]
R2 = 0a (?)
R0 = 0; R1 = R1 - R2
R2 = 16 (?)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[4]
R2 = 75 (u)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[5]
R2 = 0a (?)
R0 = 0; R1 = R1 - R2
R2 = 16 (?)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[6]
R2 = 34 (4)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[7]
R2 = 26 (?)
R0 = 0; R1 = R1 - R2
R2 = 4c (L)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[8]
R2 = 33 (3)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[9]
R2 = 0a (?)
R0 = 0; R1 = R1 - R2
R2 = 16 (?)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[10]
R2 = 37 (7)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[11]
R2 = 22 (?)
R0 = 0; R1 = R1 - R2
R2 = 46 (F)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[12]
R2 = 33 (3)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[13]
R2 = 0a (?)
R0 = 0; R1 = R1 - R2
R2 = 16 (?)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[14]
R2 = 6d (m)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[15]
R2 = 11 (?)
R0 = 0; R1 = R1 - R2
R2 = 23 (?)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[16]
R2 = 35 (5)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[17]
R2 = 12 (?)
R0 = 0; R1 = R1 - R2
R2 = 25 (?)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)
R1 = DB101[18]
R2 = 33 (3)
R0 = 0; R1 = (R1 == R2)
CHECK (R1 == R0)
R1 = DB101[19]
R2 = 26 (?)
R0 = 0; R1 = R1 - R2
R2 = 4c (L)
R0 = 0; R1 = R1 - R2
CHECK (R1 == R0)Wéi Dir kënnt gesinn, kontrolléiert dëse Programm einfach all Charakter vun DB101 fir Gläichheet zu engem bestëmmte Wäert. D'Finale Linn fir laanschtgoungen all Schecken ass: n0w u 4r3 7h3 m4573r. Wann dës Linn am Block DB101 plazéiert ass, da gëtt d'manuell PLC Kontroll aktivéiert an et wäert méiglech sinn de Ballon ze explodéieren oder ze entlaaschten.
Dat ass alles! Den Alexey huet en héije Wëssensniveau bewisen, deen en industriellen Ninja wäert ass :) Mir hunn un de Gewënner onvergiesslech Präisser geschéckt. E grousse Merci un all Participanten!
Source: will.com