mirror of
https://github.com/ksherlock/65816.tmbundle.git
synced 2025-05-12 18:42:44 +00:00
update macgen commands
This commit is contained in:
Kelvin Sherlock
parent
d4f53acba8
commit
8389c42dd7
@ -2,6 +2,18 @@
|
|||||||
{
|
{
|
||||||
"caption": "Merlin To Text",
|
"caption": "Merlin To Text",
|
||||||
"command": "merlin_to_text"
|
"command": "merlin_to_text"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"caption": "Merlin MacGen",
|
||||||
|
"command": "merlin_mac_gen"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"caption": "ORCA/M MacGen",
|
||||||
|
"command": "orca_mac_gen"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"caption": "MPW Asm IIgs MacGen",
|
||||||
|
"command": "mpw_mac_gen"
|
||||||
}
|
}
|
||||||
]
|
]
|
||||||
|
|
||||||
|
|||||||
5
Preferences.sublime-settings
Normal file
5
Preferences.sublime-settings
Normal file
@ -0,0 +1,5 @@
|
|||||||
|
{
|
||||||
|
"merlin_macro_directories": ["/Library/GoldenGate/Libraries/Merlin"],
|
||||||
|
"orca_macro_directories": ["/Library/GoldenGate/Libraries/AInclude/", "/Library/GoldenGate/Libraries/ORCAInclude"],
|
||||||
|
"mpw_macro_directories": ["/Library/MPW/Interfaces/AIIGSIncludes/"]
|
||||||
|
}
|
||||||
518
mac-gen.py
Normal file
518
mac-gen.py
Normal file
@ -0,0 +1,518 @@
|
|||||||
|
import sublime
|
||||||
|
import sublime_plugin
|
||||||
|
import os
|
||||||
|
import re
|
||||||
|
import sys
|
||||||
|
import time
|
||||||
|
|
||||||
|
def each_line(file):
|
||||||
|
f = open(file, "r", encoding="ascii")
|
||||||
|
try:
|
||||||
|
while True:
|
||||||
|
x = f.readline()
|
||||||
|
if not x: break
|
||||||
|
x = x.rstrip("\r\n")
|
||||||
|
yield x
|
||||||
|
except Exception as e:
|
||||||
|
raise e
|
||||||
|
finally:
|
||||||
|
f.close()
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
def macro_files(dirs, filter):
|
||||||
|
|
||||||
|
rv = []
|
||||||
|
for root in dirs:
|
||||||
|
try:
|
||||||
|
tmp = [x for x in os.listdir(root) if filter(x)]
|
||||||
|
tmp.sort(key=str.upper)
|
||||||
|
tmp = [os.path.join(root, x) for x in tmp]
|
||||||
|
tmp = [x for x in tmp if os.path.isfile(x)]
|
||||||
|
|
||||||
|
rv += tmp
|
||||||
|
|
||||||
|
except Exception as e:
|
||||||
|
pass
|
||||||
|
|
||||||
|
return rv
|
||||||
|
|
||||||
|
re_pmc = re.compile('^[^.,/\\- ]*')
|
||||||
|
re_dot_s = re.compile('\\.S$', re.IGNORECASE)
|
||||||
|
re_ws = re.compile('[\t ]+')
|
||||||
|
re_comment = re.compile('^[\t ]*[;*]')
|
||||||
|
|
||||||
|
|
||||||
|
class MerlinMacGen(sublime_plugin.TextCommand):
|
||||||
|
|
||||||
|
opcodes = {
|
||||||
|
'BRL', 'COP', 'JML', 'JMPL', 'JSL', 'MVN', 'MVP', 'MX', 'PEA',
|
||||||
|
'PEI', 'PER', 'REP', 'SEP', 'WDM', 'XCE', 'ADR', 'ADRL', 'ASC',
|
||||||
|
'AST', 'BRK', 'CHK', 'CYC', 'DA', 'DAT', 'DB', 'DCI', 'DDB', 'DEND',
|
||||||
|
'DFB', 'DL', 'DS', 'DSK', 'DUM', 'DW', 'END', 'ENT', 'EQU', 'ERR', 'EXP',
|
||||||
|
'EXT', 'FLS', 'HEX', 'INV', 'KBD', 'LST', 'LSTL', 'LUP', 'OBJ',
|
||||||
|
'ORG', 'PAG', 'PAU', 'PMC', 'PUT', 'REL', 'REV', 'SAV', 'SKP',
|
||||||
|
'STR', 'TR', 'TTL', 'TYP', 'USE', 'USR', 'VAR', 'XC', 'XREF','=',
|
||||||
|
'>>>', 'DO', 'ELS', 'EOM', 'FIN', 'IF', 'MAC', '--^', '<<<',
|
||||||
|
'CLC', 'CLD', 'CLI', 'CLV', 'DEX', 'DEY', 'INX', 'INY', 'NOP',
|
||||||
|
'PHA', 'PHB', 'PHD', 'PHK', 'PHX', 'PHY', 'PLA', 'PLB', 'PLD',
|
||||||
|
'PLP', 'PLX', 'PLY', 'RTI', 'RTL', 'RTS', 'SEC', 'SED', 'SEI',
|
||||||
|
'STP', 'SWA', 'TAD', 'TAS', 'TAX', 'TAY', 'TCD', 'TCS', 'TDA',
|
||||||
|
'TDC', 'TSA', 'TSC', 'TSX', 'TXA', 'TXS', 'TXY', 'TYA', 'TYX',
|
||||||
|
'WAI', 'XBA', 'BCC', 'BCS', 'BEQ', 'BGE', 'BLT', 'BMI', 'BNE',
|
||||||
|
'BPL', 'BRA', 'BVC', 'BVS', 'ADCL', 'ANDL', 'CMPL', 'EORL',
|
||||||
|
'LDAL', 'ORAL', 'SBCL', 'STAL', 'ADC', 'AND', 'ASL', 'BIT',
|
||||||
|
'CMP', 'CPX', 'CPY', 'DEC', 'EOR', 'INC', 'JMP', 'JSR', 'LDA',
|
||||||
|
'LDX', 'LDY', 'LSR', 'ORA', 'ROL', 'ROR', 'SBC', 'STA', 'STX',
|
||||||
|
'STY', 'STZ', 'TRB', 'TSB', 'PHP', 'STRL', 'FLO', 'EXD', 'CAS',
|
||||||
|
''
|
||||||
|
}
|
||||||
|
|
||||||
|
def front_matter(self):
|
||||||
|
buffer = ""
|
||||||
|
name = self.view.file_name()
|
||||||
|
if name:
|
||||||
|
buffer += "* Generated from " + os.path.basename(name) + " on " + time.asctime() + "\n"
|
||||||
|
else:
|
||||||
|
buffer += "* Generated on " + time.asctime() + "\n"
|
||||||
|
buffer += "\n"
|
||||||
|
return buffer
|
||||||
|
|
||||||
|
def missing_matter(self, missing):
|
||||||
|
buffer = ""
|
||||||
|
if len(missing) == 0:
|
||||||
|
return ""
|
||||||
|
|
||||||
|
buffer = "* Missing Macros\n"
|
||||||
|
|
||||||
|
missing = list(missing)
|
||||||
|
missing.sort
|
||||||
|
for macro in missing:
|
||||||
|
buffer += "* " + macro + "\n"
|
||||||
|
|
||||||
|
buffer += "\n"
|
||||||
|
return buffer
|
||||||
|
|
||||||
|
|
||||||
|
def run(self, edit):
|
||||||
|
|
||||||
|
view = self.view
|
||||||
|
|
||||||
|
missing = set()
|
||||||
|
known = set()
|
||||||
|
self.build_missing(known, missing)
|
||||||
|
|
||||||
|
if len(missing) == 0: return
|
||||||
|
|
||||||
|
buffer = ""
|
||||||
|
dirlist = view.settings().get('merlin_macro_directories', [])
|
||||||
|
files = macro_files(dirlist, lambda x: x[-2:].upper() == ".S")
|
||||||
|
print(files)
|
||||||
|
|
||||||
|
|
||||||
|
for f in files:
|
||||||
|
buffer += self.one_macro_file(f, known, missing)
|
||||||
|
if len(missing) == 0: break;
|
||||||
|
|
||||||
|
|
||||||
|
buffer = self.front_matter() + self.missing_matter(missing) + buffer
|
||||||
|
|
||||||
|
view = view.window().new_file()
|
||||||
|
view.insert(edit, 0, buffer)
|
||||||
|
|
||||||
|
def build_missing(self, known, missing):
|
||||||
|
|
||||||
|
view = self.view
|
||||||
|
all = sublime.Region(0, view.size())
|
||||||
|
for r in view.lines(all):
|
||||||
|
text = view.substr(r).rstrip()
|
||||||
|
|
||||||
|
if text == "" or re_comment.match(text):
|
||||||
|
continue
|
||||||
|
|
||||||
|
tokens = re.split(re_ws, text, maxsplit=2)
|
||||||
|
if len(tokens) < 2:
|
||||||
|
continue
|
||||||
|
|
||||||
|
# _macro args
|
||||||
|
# PMC _macro,args << . / , - ( Space are separtors.
|
||||||
|
# >>> _macro
|
||||||
|
|
||||||
|
label = tokens[0].upper()
|
||||||
|
opcode = tokens[1].upper()
|
||||||
|
|
||||||
|
if opcode == "" or opcode[0] == ";":
|
||||||
|
continue
|
||||||
|
|
||||||
|
if opcode == 'MAC':
|
||||||
|
# label MAC
|
||||||
|
if label != "":
|
||||||
|
known.add(label)
|
||||||
|
continue
|
||||||
|
|
||||||
|
if opcode in {'PMC', '>>>'} and len(tokens) > 2:
|
||||||
|
tmp = tokens[2].upper()
|
||||||
|
opcode = re_pmc.match(tmp).group(0)
|
||||||
|
if opcode == "":
|
||||||
|
continue
|
||||||
|
|
||||||
|
|
||||||
|
if opcode in self.opcodes:
|
||||||
|
continue
|
||||||
|
if opcode in known:
|
||||||
|
continue
|
||||||
|
missing.add(opcode)
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
def one_macro_file(self, file, known, missing):
|
||||||
|
inmac = False
|
||||||
|
buffer = ""
|
||||||
|
|
||||||
|
for text in each_line(file):
|
||||||
|
|
||||||
|
text = text.rstrip()
|
||||||
|
|
||||||
|
if inmac:
|
||||||
|
buffer += text + "\n"
|
||||||
|
|
||||||
|
if text == "": continue
|
||||||
|
if re_comment.match(text): continue
|
||||||
|
|
||||||
|
tokens = re.split(re_ws, text, maxsplit=2)
|
||||||
|
|
||||||
|
if len(tokens) < 2: continue
|
||||||
|
|
||||||
|
label = tokens[0].upper()
|
||||||
|
opcode = tokens[1].upper()
|
||||||
|
|
||||||
|
|
||||||
|
if opcode == "" or opcode[0] == ";": continue
|
||||||
|
|
||||||
|
if opcode == "MAC" and label != "":
|
||||||
|
# print(label,file=sys.stderr)
|
||||||
|
# print(label in missing, file=sys.stderr)
|
||||||
|
|
||||||
|
if inmac:
|
||||||
|
known.add(label)
|
||||||
|
missing.discard(label)
|
||||||
|
elif label in missing:
|
||||||
|
inmac = True
|
||||||
|
known.add(label)
|
||||||
|
missing.discard(label)
|
||||||
|
buffer += text + "\n"
|
||||||
|
continue
|
||||||
|
|
||||||
|
if opcode in { '<<<', 'EOM' }:
|
||||||
|
inmac = False
|
||||||
|
continue
|
||||||
|
|
||||||
|
if not inmac: continue
|
||||||
|
|
||||||
|
if opcode in {'PMC', '>>>'} and len(tokens) > 2:
|
||||||
|
tmp = tokens[2].upper()
|
||||||
|
opcode = re_pmc.match(tmp).group(0)
|
||||||
|
if opcode == "":
|
||||||
|
continue
|
||||||
|
|
||||||
|
if opcode in self.opcodes: continue
|
||||||
|
if opcode in known: continue
|
||||||
|
missing.add(opcode)
|
||||||
|
|
||||||
|
return buffer
|
||||||
|
|
||||||
|
|
||||||
|
class OrcaMacGen(sublime_plugin.TextCommand):
|
||||||
|
|
||||||
|
|
||||||
|
opcodes = {
|
||||||
|
'ADC', 'AND', 'CMP', 'EOR', 'LDA', 'ORA', 'SBC', 'ASL', 'LSR',
|
||||||
|
'ROR', 'ROL', 'BIT', 'CPX', 'CPY', 'DEC', 'INC', 'LDX', 'LDY',
|
||||||
|
'STA', 'STX', 'STY', 'JMP', 'JSR', 'STZ', 'TRB', 'TSB', 'JSL',
|
||||||
|
'JML', 'COP', 'MVN', 'MVP', 'PEA', 'PEI', 'REP', 'SEP', 'PER',
|
||||||
|
'BRL', 'BRA', 'BEQ', 'BMI', 'BNE', 'BPL', 'BVC', 'BVS', 'BCC',
|
||||||
|
'BCS', 'CLI', 'CLV', 'DEX', 'DEY', 'INX', 'INY', 'NOP', 'PHA',
|
||||||
|
'PLA', 'PHP', 'PLP', 'RTI', 'RTS', 'SEC', 'SED', 'SEI', 'TAX',
|
||||||
|
'TAY', 'TSX', 'TXA', 'TXS', 'TYA', 'BRK', 'CLC', 'CLD', 'PHX',
|
||||||
|
'PHY', 'PLX', 'PLY', 'DEA', 'INA', 'PHB', 'PHD', 'PHK', 'PLB',
|
||||||
|
'PLD', 'WDM', 'RTL', 'STP', 'TCD', 'TCS', 'TDC', 'TSC', 'TXY',
|
||||||
|
'TYX', 'WAI', 'XBA', 'XCE', 'CPA', 'BLT', 'BGE', 'GBLA', 'GBLB',
|
||||||
|
'GBLC', 'LCLA', 'LCLB', 'LCLC', 'SETA', 'SETB', 'SETC', 'AMID',
|
||||||
|
'ASEARCH', 'AINPUT', 'AIF', 'AGO', 'ACTR', 'MNOTE', 'ANOP', 'DS',
|
||||||
|
'ORG', 'OBJ', 'EQU', 'GEQU', 'MERR', 'DIRECT', 'KIND', 'SETCOM',
|
||||||
|
'EJECT', 'ERR', 'GEN', 'MSB', 'LIST', 'SYMBOL', 'PRINTER',
|
||||||
|
'65C02', '65816', 'LONGA', 'LONGI', 'DATACHK', 'CODECHK',
|
||||||
|
'DYNCHK', 'IEEE', 'NUMSEX', 'CASE', 'OBJCASE', 'ABSADDR',
|
||||||
|
'INSTIME', 'TRACE', 'EXPAND', 'DC', 'USING', 'ENTRY', 'OBJEND',
|
||||||
|
'DATA', 'PRIVDATA', 'END', 'ALIGN', 'START', 'PRIVATE', 'MEM',
|
||||||
|
'TITLE', 'RENAME', 'KEEP', 'COPY', 'APPEND', 'MCOPY', 'MDROP',
|
||||||
|
'MLOAD', 'MACRO', 'MEXIT', 'MEND'
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
def run(self, edit):
|
||||||
|
|
||||||
|
view = self.view
|
||||||
|
|
||||||
|
known = set()
|
||||||
|
missing = set()
|
||||||
|
self.build_missing(known, missing)
|
||||||
|
|
||||||
|
if len(missing) == 0: return
|
||||||
|
|
||||||
|
buffer = ""
|
||||||
|
dirlist = view.settings().get('orca_macro_directories', [])
|
||||||
|
files = macro_files(dirlist, lambda x: x[:4].upper() == "M16.")
|
||||||
|
#print(files)
|
||||||
|
for f in files:
|
||||||
|
buffer += self.one_macro_file(f, known, missing)
|
||||||
|
if len(missing) == 0: break;
|
||||||
|
|
||||||
|
buffer = self.front_matter() + self.missing_matter(missing) + buffer
|
||||||
|
|
||||||
|
view = view.window().new_file()
|
||||||
|
view.insert(edit, 0, buffer)
|
||||||
|
|
||||||
|
|
||||||
|
def build_missing(self, known, missing):
|
||||||
|
|
||||||
|
view = self.view
|
||||||
|
all = sublime.Region(0, view.size())
|
||||||
|
for r in view.lines(all):
|
||||||
|
text = view.substr(r).rstrip()
|
||||||
|
|
||||||
|
if text == "": continue
|
||||||
|
if re_comment.match(text): continue
|
||||||
|
tokens = re.split(re_ws, text, maxsplit=2)
|
||||||
|
if len(tokens) < 2: continue
|
||||||
|
|
||||||
|
label = tokens[0].upper()
|
||||||
|
opcode = tokens[1].upper()
|
||||||
|
|
||||||
|
if opcode in self.opcodes: continue
|
||||||
|
missing.add(opcode)
|
||||||
|
|
||||||
|
|
||||||
|
def one_macro_file(self, file, known, missing):
|
||||||
|
buffer = ""
|
||||||
|
state = 0
|
||||||
|
|
||||||
|
for text in each_line(file):
|
||||||
|
|
||||||
|
if state == 2:
|
||||||
|
buffer += text + "\n"
|
||||||
|
|
||||||
|
if text == "": continue
|
||||||
|
if re_comment.match(text): continue
|
||||||
|
|
||||||
|
|
||||||
|
tokens = re.split(re_ws, text, maxsplit=2)
|
||||||
|
if len(tokens) < 2: continue
|
||||||
|
|
||||||
|
label = tokens[0].upper()
|
||||||
|
opcode = tokens[1].upper()
|
||||||
|
|
||||||
|
|
||||||
|
if state == 0:
|
||||||
|
if opcode == 'MACRO': state = 1
|
||||||
|
elif state == 1:
|
||||||
|
if opcode in missing:
|
||||||
|
known.add(opcode)
|
||||||
|
missing.discard(opcode)
|
||||||
|
buffer += "\tMACRO\n"
|
||||||
|
buffer += text + "\n"
|
||||||
|
state = 2
|
||||||
|
else:
|
||||||
|
state = 0
|
||||||
|
|
||||||
|
elif state == 2:
|
||||||
|
if opcode == 'MEND': state = 0
|
||||||
|
if opcode not in self.opcodes and opcode not in known:
|
||||||
|
missing.add(opcode)
|
||||||
|
|
||||||
|
|
||||||
|
return buffer
|
||||||
|
|
||||||
|
def front_matter(self):
|
||||||
|
buffer = ""
|
||||||
|
name = self.view.file_name()
|
||||||
|
if name:
|
||||||
|
buffer += "* Generated from " + os.path.basename(name) + " on " + time.asctime() + "\n"
|
||||||
|
else:
|
||||||
|
buffer += "* Generated on " + time.asctime() + "\n"
|
||||||
|
buffer += "\n"
|
||||||
|
return buffer
|
||||||
|
|
||||||
|
def missing_matter(self, missing):
|
||||||
|
buffer = ""
|
||||||
|
if len(missing) == 0:
|
||||||
|
return ""
|
||||||
|
|
||||||
|
buffer = "* Missing Macros\n"
|
||||||
|
|
||||||
|
missing = list(missing)
|
||||||
|
missing.sort
|
||||||
|
for macro in missing:
|
||||||
|
buffer += "* " + macro + "\n"
|
||||||
|
|
||||||
|
buffer += "\n"
|
||||||
|
return buffer
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
class MpwMacGen(sublime_plugin.TextCommand):
|
||||||
|
|
||||||
|
|
||||||
|
opcodes = {
|
||||||
|
'ACTR', 'ADC', 'AERROR', 'ALIGN', 'AND', 'ANOP', 'ASL',
|
||||||
|
'BBC0', 'BBC1', 'BBC2', 'BBC3', 'BBC4', 'BBC5', 'BBC6', 'BBC7',
|
||||||
|
'BBR0', 'BBR1', 'BBR2', 'BBR3', 'BBR4', 'BBR5', 'BBR6', 'BBR7',
|
||||||
|
'BBS0', 'BBS1', 'BBS2', 'BBS3', 'BBS4', 'BBS5', 'BBS6', 'BBS7',
|
||||||
|
'BCC', 'BCS', 'BEQ', 'BGE', 'BIT', 'BLANKS', 'BLT', 'BMI', 'BNE',
|
||||||
|
'BPL', 'BRA', 'BRK', 'BRL', 'BVC', 'BVS', 'CASE',
|
||||||
|
'CLB0', 'CLB1', 'CLB2', 'CLB3', 'CLB4', 'CLB5', 'CLB6', 'CLB7',
|
||||||
|
'CLC', 'CLD', 'CLI', 'CLT', 'CLV', 'CMP', 'CODECHK', 'COM', 'COP', 'CPA',
|
||||||
|
'CPX', 'CPY', 'CYCLE', 'DATACHK', 'DCB', 'DEA', 'DEC', 'DEX', 'DEY',
|
||||||
|
'DIRECT', 'DUMP', 'EJECT', 'ELSE', 'ELSEIF', 'END', 'ENDF', 'ENDFUNC',
|
||||||
|
'ENDI', 'ENDIF', 'ENDINIT', 'ENDM', 'ENDMACRO', 'ENDP', 'ENDPROC',
|
||||||
|
'ENDR', 'ENDS', 'ENDSTACK', 'ENDW', 'ENDWHILE', 'ENDWITH', 'ENTRY',
|
||||||
|
'EOR', 'EQU', 'EXITM', 'EXPORT', 'FUNC', 'GBLA', 'GBLC', 'GOTO',
|
||||||
|
'IMPORT', 'INA', 'INC', 'INCLUDE', 'INIT', 'INX', 'INY', 'JML', 'JMP',
|
||||||
|
'JSL', 'JSR', 'LCLA', 'LCLC', 'LDA', 'LDM', 'LDX', 'LDY', 'LEAVE',
|
||||||
|
'LOAD', 'LONGA', 'LONGI', 'LSR', 'MACHINE', 'MACRO', 'MEND', 'MEXIT',
|
||||||
|
'MSB', 'MVN', 'MVP', 'NOP', 'ORA', 'ORG', 'PAGESIZE', 'PEA', 'PEI',
|
||||||
|
'PER', 'PHA', 'PHB', 'PHD', 'PHK', 'PHP', 'PHX', 'PHY', 'PLA', 'PLB',
|
||||||
|
'PLD', 'PLP', 'PLX', 'PLY', 'PRINT', 'PROC', 'RECORD', 'REP', 'RMB0',
|
||||||
|
'RMB1', 'RMB2', 'RMB3', 'RMB4', 'RMB5', 'RMB6', 'RMB7', 'ROL', 'ROR',
|
||||||
|
'RRF', 'RTI', 'RTL', 'RTS', 'SBC', 'SEB0', 'SEB1', 'SEB2', 'SEB3',
|
||||||
|
'SEB4', 'SEB5', 'SEB6', 'SEB7', 'SEC', 'SED', 'SEG', 'SEGATTR', 'SEI',
|
||||||
|
'SEP', 'SET', 'SETA', 'SETC', 'SETT', 'SMB0', 'SMB1', 'SMB2', 'SMB3',
|
||||||
|
'SMB4', 'SMB5', 'SMB6', 'SMB7', 'SPACE', 'STA', 'STACKDP', 'STP',
|
||||||
|
'STRING', 'STX', 'STY', 'STZ', 'SWA', 'TAD', 'TAS', 'TAX', 'TAY', 'TCD',
|
||||||
|
'TCS', 'TDA', 'TDC', 'TITLE', 'TRB', 'TSA', 'TSB', 'TSC', 'TST', 'TSX',
|
||||||
|
'TXA', 'TXS', 'TXY', 'TYA', 'TYX', 'WAI', 'WHILE', 'WITH', 'WRITE',
|
||||||
|
'WRITELN', 'XBA', 'XCE'
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
def run(self, edit):
|
||||||
|
|
||||||
|
view = self.view
|
||||||
|
|
||||||
|
known = set()
|
||||||
|
missing = set()
|
||||||
|
self.build_missing(known, missing)
|
||||||
|
|
||||||
|
if len(missing) == 0: return
|
||||||
|
|
||||||
|
buffer = ""
|
||||||
|
dirlist = view.settings().get('mpw_macro_directories', [])
|
||||||
|
files = macro_files(dirlist, lambda x: x[:4].upper() == "M16.")
|
||||||
|
#print(files)
|
||||||
|
for f in files:
|
||||||
|
buffer += self.one_macro_file(f, known, missing)
|
||||||
|
if len(missing) == 0: break;
|
||||||
|
|
||||||
|
buffer = self.front_matter() + self.missing_matter(missing) + buffer
|
||||||
|
|
||||||
|
view = view.window().new_file()
|
||||||
|
view.insert(edit, 0, buffer)
|
||||||
|
|
||||||
|
|
||||||
|
def build_missing(self, known, missing):
|
||||||
|
|
||||||
|
state = 0
|
||||||
|
view = self.view
|
||||||
|
all = sublime.Region(0, view.size())
|
||||||
|
for r in view.lines(all):
|
||||||
|
text = view.substr(r).rstrip()
|
||||||
|
|
||||||
|
if text == "": continue
|
||||||
|
if re_comment.match(text): continue
|
||||||
|
tokens = re.split(re_ws, text, maxsplit=2)
|
||||||
|
if len(tokens) < 2: continue
|
||||||
|
|
||||||
|
label = tokens[0].upper()
|
||||||
|
opcode = tokens[1].upper()
|
||||||
|
|
||||||
|
if opcode == "MACRO":
|
||||||
|
state = 1
|
||||||
|
continue
|
||||||
|
if opcode == "MEND":
|
||||||
|
state = 0
|
||||||
|
continue
|
||||||
|
if state == 1:
|
||||||
|
known.add(opcode)
|
||||||
|
missing.discard(opcode)
|
||||||
|
state = 0
|
||||||
|
continue
|
||||||
|
|
||||||
|
if opcode in self.opcodes: continue
|
||||||
|
missing.add(opcode)
|
||||||
|
|
||||||
|
|
||||||
|
def one_macro_file(self, file, known, missing):
|
||||||
|
buffer = ""
|
||||||
|
state = 0
|
||||||
|
|
||||||
|
for text in each_line(file):
|
||||||
|
|
||||||
|
if state == 2:
|
||||||
|
buffer += text + "\n"
|
||||||
|
|
||||||
|
if text == "": continue
|
||||||
|
if re_comment.match(text): continue
|
||||||
|
|
||||||
|
|
||||||
|
tokens = re.split(re_ws, text, maxsplit=2)
|
||||||
|
if len(tokens) < 2: continue
|
||||||
|
|
||||||
|
label = tokens[0].upper()
|
||||||
|
opcode = tokens[1].upper()
|
||||||
|
|
||||||
|
|
||||||
|
if state == 0:
|
||||||
|
if opcode == 'MACRO': state = 1
|
||||||
|
elif state == 1:
|
||||||
|
if opcode in missing:
|
||||||
|
known.add(opcode)
|
||||||
|
missing.discard(opcode)
|
||||||
|
buffer += "\tMACRO\n"
|
||||||
|
buffer += text + "\n"
|
||||||
|
state = 2
|
||||||
|
else:
|
||||||
|
state = 0
|
||||||
|
|
||||||
|
elif state == 2:
|
||||||
|
if opcode == 'MEND': state = 0
|
||||||
|
if opcode not in self.opcodes and opcode not in known:
|
||||||
|
missing.add(opcode)
|
||||||
|
|
||||||
|
|
||||||
|
return buffer
|
||||||
|
|
||||||
|
def front_matter(self):
|
||||||
|
buffer = ""
|
||||||
|
name = self.view.file_name()
|
||||||
|
if name:
|
||||||
|
buffer += "* Generated from " + os.path.basename(name) + " on " + time.asctime() + "\n"
|
||||||
|
else:
|
||||||
|
buffer += "* Generated on " + time.asctime() + "\n"
|
||||||
|
buffer += "\n"
|
||||||
|
return buffer
|
||||||
|
|
||||||
|
def missing_matter(self, missing):
|
||||||
|
buffer = ""
|
||||||
|
if len(missing) == 0:
|
||||||
|
return ""
|
||||||
|
|
||||||
|
buffer = "* Missing Macros\n"
|
||||||
|
|
||||||
|
missing = list(missing)
|
||||||
|
missing.sort
|
||||||
|
for macro in missing:
|
||||||
|
buffer += "* " + macro + "\n"
|
||||||
|
|
||||||
|
buffer += "\n"
|
||||||
|
return buffer
|
||||||
@ -1,208 +0,0 @@
|
|||||||
import sublime
|
|
||||||
import sublime_plugin
|
|
||||||
import os
|
|
||||||
import re
|
|
||||||
import sys
|
|
||||||
import time
|
|
||||||
|
|
||||||
class MerlinMacGen(sublime_plugin.TextCommand):
|
|
||||||
|
|
||||||
opcodes = {
|
|
||||||
'BRL', 'COP', 'JML', 'JMPL', 'JSL', 'MVN', 'MVP', 'MX', 'PEA',
|
|
||||||
'PEI', 'PER', 'REP', 'SEP', 'WDM', 'XCE', 'ADR', 'ADRL', 'ASC',
|
|
||||||
'AST', 'BRK', 'CHK', 'CYC', 'DA', 'DAT', 'DB', 'DCI', 'DDB', 'DEND',
|
|
||||||
'DFB', 'DL', 'DS', 'DSK', 'DUM', 'DW', 'END', 'ENT', 'EQU', 'ERR', 'EXP',
|
|
||||||
'EXT', 'FLS', 'HEX', 'INV', 'KBD', 'LST', 'LSTL', 'LUP', 'OBJ',
|
|
||||||
'ORG', 'PAG', 'PAU', 'PMC', 'PUT', 'REL', 'REV', 'SAV', 'SKP',
|
|
||||||
'STR', 'TR', 'TTL', 'TYP', 'USE', 'USR', 'VAR', 'XC', 'XREF','=',
|
|
||||||
'>>>', 'DO', 'ELS', 'EOM', 'FIN', 'IF', 'MAC', '--^', '<<<',
|
|
||||||
'CLC', 'CLD', 'CLI', 'CLV', 'DEX', 'DEY', 'INX', 'INY', 'NOP',
|
|
||||||
'PHA', 'PHB', 'PHD', 'PHK', 'PHX', 'PHY', 'PLA', 'PLB', 'PLD',
|
|
||||||
'PLP', 'PLX', 'PLY', 'RTI', 'RTL', 'RTS', 'SEC', 'SED', 'SEI',
|
|
||||||
'STP', 'SWA', 'TAD', 'TAS', 'TAX', 'TAY', 'TCD', 'TCS', 'TDA',
|
|
||||||
'TDC', 'TSA', 'TSC', 'TSX', 'TXA', 'TXS', 'TXY', 'TYA', 'TYX',
|
|
||||||
'WAI', 'XBA', 'BCC', 'BCS', 'BEQ', 'BGE', 'BLT', 'BMI', 'BNE',
|
|
||||||
'BPL', 'BRA', 'BVC', 'BVS', 'ADCL', 'ANDL', 'CMPL', 'EORL',
|
|
||||||
'LDAL', 'ORAL', 'SBCL', 'STAL', 'ADC', 'AND', 'ASL', 'BIT',
|
|
||||||
'CMP', 'CPX', 'CPY', 'DEC', 'EOR', 'INC', 'JMP', 'JSR', 'LDA',
|
|
||||||
'LDX', 'LDY', 'LSR', 'ORA', 'ROL', 'ROR', 'SBC', 'STA', 'STX',
|
|
||||||
'STY', 'STZ', 'TRB', 'TSB', 'PHP', 'STRL', 'FLO', 'EXD', 'CAS',
|
|
||||||
''
|
|
||||||
}
|
|
||||||
re_pmc = re.compile('^[^.,/\\- ]*')
|
|
||||||
re_dot_s = re.compile('\\.S$', re.IGNORECASE)
|
|
||||||
re_ws = re.compile('[\t ]+')
|
|
||||||
re_comment = re.compile('^[\t ]*[;*]')
|
|
||||||
|
|
||||||
def front_matter(self):
|
|
||||||
buffer = ""
|
|
||||||
name = self.view.file_name()
|
|
||||||
if name:
|
|
||||||
buffer += "* Generated from " + os.path.basename(name) + " on " + time.asctime() + "\n"
|
|
||||||
else:
|
|
||||||
buffer += "* Generated on " + time.asctime() + "\n"
|
|
||||||
buffer += "\n"
|
|
||||||
return buffer
|
|
||||||
|
|
||||||
def missing_matter(self, missing):
|
|
||||||
buffer = ""
|
|
||||||
if len(missing) == 0:
|
|
||||||
return ""
|
|
||||||
|
|
||||||
buffer = "* Missing Macros\n"
|
|
||||||
|
|
||||||
missing = list(missing)
|
|
||||||
missing.sort
|
|
||||||
for macro in missing:
|
|
||||||
buffer += "* " + macro + "\n"
|
|
||||||
|
|
||||||
buffer += "\n"
|
|
||||||
return buffer
|
|
||||||
|
|
||||||
|
|
||||||
def run(self, edit):
|
|
||||||
|
|
||||||
|
|
||||||
missing = set()
|
|
||||||
known = set()
|
|
||||||
|
|
||||||
view = self.view
|
|
||||||
all = sublime.Region(0, view.size())
|
|
||||||
for r in view.lines(all):
|
|
||||||
text = view.substr(r).rstrip()
|
|
||||||
|
|
||||||
if text == "" or self.re_comment.match(text):
|
|
||||||
continue
|
|
||||||
|
|
||||||
line = re.split(self.re_ws, text, maxsplit=2)
|
|
||||||
if len(line) < 2:
|
|
||||||
continue
|
|
||||||
|
|
||||||
# _macro args
|
|
||||||
# PMC _macro,args << . / , - ( Space are separtors.
|
|
||||||
# >>> _macro
|
|
||||||
|
|
||||||
label = line[0].upper()
|
|
||||||
opcode = line[1].upper()
|
|
||||||
|
|
||||||
if opcode == "" or opcode[0] == ";":
|
|
||||||
continue
|
|
||||||
|
|
||||||
if opcode == 'MAC':
|
|
||||||
# label MAC
|
|
||||||
if label != "":
|
|
||||||
known.add(label)
|
|
||||||
continue
|
|
||||||
|
|
||||||
if opcode in {'PMC', '>>>'} and len(line) > 2:
|
|
||||||
tmp = line[2].upper()
|
|
||||||
opcode = self.re_pmc.match(tmp).group(0)
|
|
||||||
if opcode == "":
|
|
||||||
continue
|
|
||||||
|
|
||||||
|
|
||||||
if opcode in self.opcodes:
|
|
||||||
continue
|
|
||||||
if opcode in known:
|
|
||||||
continue
|
|
||||||
missing.add(opcode)
|
|
||||||
|
|
||||||
|
|
||||||
if len(missing) == 0:
|
|
||||||
return
|
|
||||||
|
|
||||||
#
|
|
||||||
buffer = ""
|
|
||||||
root = "/tmp/supermacs"
|
|
||||||
for e in os.listdir(root):
|
|
||||||
|
|
||||||
if not self.re_dot_s.search(e):
|
|
||||||
continue
|
|
||||||
|
|
||||||
path = os.path.join(root, e)
|
|
||||||
if not os.path.isfile(path):
|
|
||||||
continue
|
|
||||||
with open(path,'r') as file:
|
|
||||||
# print(e + "\n",file=sys.stderr)
|
|
||||||
buffer += self.one_macro_file(file, known, missing)
|
|
||||||
|
|
||||||
if len(missing) == 0:
|
|
||||||
break
|
|
||||||
|
|
||||||
buffer = self.front_matter() + self.missing_matter(missing) + buffer
|
|
||||||
|
|
||||||
|
|
||||||
view = view.window().new_file()
|
|
||||||
view.insert(edit, 0, buffer)
|
|
||||||
# p = 0
|
|
||||||
# for m in missing:
|
|
||||||
# p = p + view.insert(edit, p, str(m) + "\n")
|
|
||||||
|
|
||||||
|
|
||||||
def one_macro_file(self, file, known, missing):
|
|
||||||
inmac = False
|
|
||||||
buffer = ""
|
|
||||||
|
|
||||||
while True:
|
|
||||||
text = file.readline()
|
|
||||||
if not text:
|
|
||||||
return buffer
|
|
||||||
|
|
||||||
text = text.rstrip()
|
|
||||||
|
|
||||||
if inmac:
|
|
||||||
buffer += text + "\n"
|
|
||||||
|
|
||||||
if text == "" or self.re_comment.match(text):
|
|
||||||
continue
|
|
||||||
|
|
||||||
line = re.split(self.re_ws, text, maxsplit=2)
|
|
||||||
|
|
||||||
|
|
||||||
if len(line) < 2:
|
|
||||||
continue
|
|
||||||
|
|
||||||
# if line[0] == "_MMStartUp":
|
|
||||||
# print(line, file=sys.stderr)
|
|
||||||
|
|
||||||
label = line[0].upper()
|
|
||||||
opcode = line[1].upper()
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
if opcode == "" or opcode[0] == ";":
|
|
||||||
continue
|
|
||||||
|
|
||||||
if opcode == "MAC" and label != "":
|
|
||||||
# print(label,file=sys.stderr)
|
|
||||||
# print(label in missing, file=sys.stderr)
|
|
||||||
|
|
||||||
if inmac:
|
|
||||||
known.add(label)
|
|
||||||
missing.discard(label)
|
|
||||||
elif label in missing:
|
|
||||||
inmac = True
|
|
||||||
known.add(label)
|
|
||||||
missing.discard(label)
|
|
||||||
buffer += text + "\n"
|
|
||||||
continue
|
|
||||||
|
|
||||||
if opcode in { '<<<', 'EOM' }:
|
|
||||||
inmac = False
|
|
||||||
continue
|
|
||||||
|
|
||||||
if not inmac:
|
|
||||||
continue
|
|
||||||
|
|
||||||
if opcode in {'PMC', '>>>'} and len(line) > 2:
|
|
||||||
tmp = line[2].upper()
|
|
||||||
opcode = self.re_pmc.match(tmp).group(0)
|
|
||||||
if opcode == "":
|
|
||||||
continue
|
|
||||||
|
|
||||||
if opcode in self.opcodes:
|
|
||||||
continue
|
|
||||||
if opcode in known:
|
|
||||||
continue
|
|
||||||
missing.add(opcode)
|
|
||||||
|
|
||||||
Loading…
x
Reference in New Issue
Block a user