Initial commit
This commit is contained in:
Elliot Nunn
commit
616e75d59a
Binary file not shown.
|
|
@ -0,0 +1,41 @@
|
|||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
|
||||
<plist version="1.0">
|
||||
<dict>
|
||||
<key>CFBundleDevelopmentRegion</key>
|
||||
<string>English</string>
|
||||
<key>CFBundleDocumentTypes</key>
|
||||
<array>
|
||||
<dict>
|
||||
<key>CFBundleTypeOSTypes</key>
|
||||
<array>
|
||||
<string>****</string>
|
||||
</array>
|
||||
<key>CFBundleTypeRole</key>
|
||||
<string>Editor</string>
|
||||
</dict>
|
||||
</array>
|
||||
<key>CFBundleExecutable</key>
|
||||
<string>mnvm9590</string>
|
||||
<key>CFBundleGetInfoString</key>
|
||||
<string>mnvm9590-3.5.8-mc64, Copyright 2017 maintained by Paul C. Pratt.</string>
|
||||
<key>CFBundleIconFile</key>
|
||||
<string>ICONAPPO.icns</string>
|
||||
<key>CFBundleIdentifier</key>
|
||||
<string>com.gryphel.minivmac</string>
|
||||
<key>CFBundleInfoDictionaryVersion</key>
|
||||
<string>6.0</string>
|
||||
<key>CFBundleName</key>
|
||||
<string>Mini vMac</string>
|
||||
<key>CFBundlePackageType</key>
|
||||
<string>APPL</string>
|
||||
<key>CFBundleShortVersionString</key>
|
||||
<string>3.5.8</string>
|
||||
<key>CFBundleSignature</key>
|
||||
<string>????</string>
|
||||
<key>CFBundleVersion</key>
|
||||
<string>3.5.8</string>
|
||||
<key>LSRequiresCarbon</key>
|
||||
<string>1</string>
|
||||
</dict>
|
||||
</plist>
|
||||
Binary file not shown.
|
|
@ -0,0 +1 @@
|
|||
APPL????
|
||||
|
|
@ -0,0 +1 @@
|
|||
dummy
|
||||
Binary file not shown.
|
|
@ -0,0 +1,19 @@
|
|||
EMPW (Emulated MPW) = Mini vMac + Macintosh Programmer's Workshop + glue
|
||||
|
||||
|
||||
Requirements (install all with brew):
|
||||
- hfsutils
|
||||
- rsync (newer than the one shipping with macOS)
|
||||
- python3
|
||||
|
||||
|
||||
Examples:
|
||||
|
||||
# Enjoy an interactive MPW session in Mini vMac (kills your battery life!)
|
||||
$ cd my-fancy-source-tree && empw
|
||||
|
||||
# Run a non-interactive MPW command and capture its standard output.
|
||||
$ empw Help FileSystem
|
||||
|
||||
# Transfer files to the emulated MPW session.
|
||||
$ echo Hello, world! > TextFile && empw Catenate TextFile
|
||||
|
|
@ -0,0 +1,104 @@
|
|||
#!/usr/bin/env python3
|
||||
|
||||
from os import path, listdir
|
||||
from sys import argv
|
||||
import datetime
|
||||
from subprocess import run, PIPE, DEVNULL
|
||||
import tempfile
|
||||
from shutil import copyfile
|
||||
|
||||
|
||||
|
||||
def h_topdir():
|
||||
rc = 0
|
||||
while rc == 0:
|
||||
rc = run(['hcd','::'], stderr=DEVNULL).returncode
|
||||
|
||||
|
||||
|
||||
|
||||
my_name, *cmds = argv
|
||||
|
||||
srcimage = 'SourceForEmulator.dmg'
|
||||
|
||||
cmdline = ' '.join(cmds)
|
||||
|
||||
scriptfolder = path.dirname(path.abspath(__file__))
|
||||
|
||||
vmac_app = path.join(scriptfolder, 'Mini vMac 9590.app') # requested for later: -t mc64 -m II -sound 0 -speed a -bg 1 -as 0
|
||||
vmac_exec = path.join(vmac_app, 'Contents', 'MacOS')
|
||||
vmac_exec = path.join(vmac_exec, next(l for l in listdir(vmac_exec) if not l.startswith('.')))
|
||||
|
||||
bootimg = path.join(scriptfolder, 'MPW-VM.dmg')
|
||||
backupimg = path.join(scriptfolder, 'MPW-VM-KnownGood.dmg')
|
||||
|
||||
hsync = path.join(scriptfolder, 'hsync')
|
||||
hsyncback = path.join(scriptfolder, 'hsyncback')
|
||||
|
||||
if not path.exists(bootimg):
|
||||
print('Creating new scratch boot disk.')
|
||||
copyfile(backupimg, bootimg)
|
||||
|
||||
|
||||
|
||||
|
||||
if cmds:
|
||||
mpw_cmd = """# This is an auto-generated MPW script!
|
||||
Echo '# %s'
|
||||
Echo '# %s'
|
||||
SetDirectory Src:
|
||||
Begin
|
||||
%s
|
||||
End > "{Boot}StdOut"
|
||||
Echo
|
||||
Move -y "{__Startup__i}" "{Boot}Trash:"
|
||||
ShutDown -y
|
||||
""" % (datetime.datetime.now(), cmdline, cmdline)
|
||||
else:
|
||||
mpw_cmd = """# This is an auto-generated MPW script!
|
||||
SetDirectory Src:
|
||||
Move -y "{__Startup__i}" "{Boot}Trash:"
|
||||
"""
|
||||
|
||||
mpw_cmd = mpw_cmd.replace('\n','\r')
|
||||
|
||||
with open('/tmp/AutoGen', 'w') as f:
|
||||
f.write(mpw_cmd)
|
||||
tmp_path = f.name
|
||||
|
||||
|
||||
run([hsync], check=True)
|
||||
|
||||
|
||||
|
||||
run(['SetFile', '-t', 'TEXT', '-c', 'MPS ', tmp_path], check=True)
|
||||
run(['macbinary', 'encode', '--overwrite', '-o', tmp_path+'.bin', tmp_path], check=True)
|
||||
|
||||
run(['hmount', bootimg], check=True, stdout=DEVNULL)
|
||||
h_topdir()
|
||||
run(['hcopy', '-m', tmp_path+'.bin', ':MPW:Startup Items:'], check=True)
|
||||
run(['humount'], check=True)
|
||||
|
||||
|
||||
|
||||
|
||||
# http://www.gryphel.com/c/minivmac/osx_note.html
|
||||
# Disable Path Randomization
|
||||
run(['xattr', '-cr', vmac_app], check=True)
|
||||
|
||||
run([vmac_exec, bootimg, srcimage], check=True)
|
||||
|
||||
|
||||
|
||||
run([hsyncback], check=True)
|
||||
|
||||
|
||||
|
||||
|
||||
if cmds:
|
||||
run(['hmount', bootimg], check=True, stdout=DEVNULL)
|
||||
run(['hcopy', '-t', ':StdOut', '/tmp/StdOut'], check=True)
|
||||
run(['humount'], check=True)
|
||||
|
||||
with open('/tmp/StdOut') as f:
|
||||
print(f.read(), end='')
|
||||
|
|
@ -0,0 +1,255 @@
|
|||
#!/usr/bin/env python3
|
||||
|
||||
from subprocess import run, PIPE, DEVNULL
|
||||
from sys import argv
|
||||
from time import sleep
|
||||
import datetime
|
||||
from os import path
|
||||
|
||||
import tempfile
|
||||
|
||||
# oldrun = run
|
||||
# def run(*args, **kwargs):
|
||||
# print('CMD', *args)
|
||||
# return oldrun(*args, **kwargs)
|
||||
|
||||
|
||||
|
||||
|
||||
# I am now modifying this to accept *no* arguments,
|
||||
# instead operating on the CWD.
|
||||
|
||||
|
||||
# A couple of useful HFSUTILS wrappers
|
||||
|
||||
def h_topdir():
|
||||
rc = 0
|
||||
while rc == 0:
|
||||
rc = run(['hcd','::'], stderr=DEVNULL).returncode
|
||||
|
||||
def h_reccd(path_comps):
|
||||
h_topdir()
|
||||
for p in path_comps:
|
||||
run(['hcd', p], check=True)
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
# We might need to sneakily edit some metadata...
|
||||
|
||||
def getfours(path):
|
||||
cmds = ('-c','-t')
|
||||
cps = (run(['GetFileInfo', cmd, path], stdout=PIPE, check=True) for cmd in cmds)
|
||||
return tuple(eval('b' + cp.stdout.decode('ascii')) for cp in cps)
|
||||
|
||||
def gettype(path):
|
||||
cmds = ('-t',)
|
||||
cps = (run(['GetFileInfo', cmd, path], stdout=PIPE, check=True) for cmd in cmds)
|
||||
return next(eval('b' + cp.stdout.decode('ascii')) for cp in cps)
|
||||
|
||||
def setfours(path, cc, tc):
|
||||
cc, tc = (set_to.replace(b'\0',b'\\0').decode('ascii') for set_to in (cc, tc))
|
||||
run(['SetFile', '-c', cc, '-t', tc, path], check=True)
|
||||
|
||||
def ensure_fourccs(xpath):
|
||||
cc = gettype(xpath)
|
||||
|
||||
if cc == b'\0\0\0\0':
|
||||
cc = b'MPS '
|
||||
tc = b'TEXT'
|
||||
|
||||
if xpath.endswith('.x'):
|
||||
tc = b'XCOF'
|
||||
elif xpath.endswith('.o') or xpath.endswith('.lib'):
|
||||
tc = b'OBJ '
|
||||
elif xpath.endswith('.rsrc') or xpath.endswith('Resources'):
|
||||
tc = b'rsrc'
|
||||
cc = b'RSED'
|
||||
|
||||
setfours(xpath, cc, tc)
|
||||
|
||||
|
||||
|
||||
|
||||
# All relative to the CWD, of course:
|
||||
srcimg = 'SourceForEmulator.dmg'
|
||||
label = 'Src'
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
# Read and sanitise the arguments. Outputs: "dirs" and "cmds" (both lists, may be empty)
|
||||
# Dirs are in /full/path/without/trailing/slash form, thanks to os.path.abspath
|
||||
|
||||
if not path.exists(srcimg):
|
||||
run(['dd', 'if=/dev/zero', 'of='+srcimg, 'bs=1048576', 'count='+str(128)], stdout=DEVNULL, stderr=DEVNULL, check=True)
|
||||
run(['hformat', '-l', label, srcimg], stdout=DEVNULL, check=True)
|
||||
run(['humount'], check=True)
|
||||
|
||||
|
||||
|
||||
|
||||
# Now run rsync and see what we can get out of it! (Should at least reconsider rsync policy!)
|
||||
# Rsync should update any changed file
|
||||
# Potential problem: need to remove ._ thingummyjigs!
|
||||
|
||||
rsync_opts = [
|
||||
'--dry-run', # Ask rsync what it *would* do if macOS
|
||||
'--itemize-changes', # hadn't dropped R/W HFS support.
|
||||
'--exclude', '.*', # Down with dotfiles.
|
||||
'--exclude', srcimg,
|
||||
'--exclude', 'Desktop DB',
|
||||
'--exclude', 'Desktop DF',
|
||||
'--exclude', 'Trash',
|
||||
'--recursive',
|
||||
'-tX', # consider times and xattrs
|
||||
'--delete', # may delete things on the vMac drive
|
||||
]
|
||||
|
||||
try:
|
||||
devnode, mountpoint = run(['hdiutil', 'attach', '-nobrowse', srcimg], stdout=PIPE, check=True).stdout.decode('ascii').split()
|
||||
mountpoint = mountpoint.rstrip('/') # try to deal in clean paths
|
||||
|
||||
rsync_list = [] # (local_base_path, relative_path_components, rsync_code) tuple
|
||||
|
||||
# rsync /src/dir/without/trailing/slash/DIRNAME /dest/dir/with/trailing/slash/
|
||||
# results in /dest/dir/with/trailing/slash/DIRNAME
|
||||
rsync = run(['rsync', *rsync_opts, './', mountpoint+'/'], stdout=PIPE, check=True)
|
||||
new_rsync_lines = rsync.stdout.decode('utf8').splitlines()
|
||||
|
||||
for new_rsync_line in new_rsync_lines:
|
||||
spcidx = new_rsync_line.index(' ')
|
||||
code_part = new_rsync_line[:spcidx]
|
||||
path_part = new_rsync_line[spcidx+1:].lstrip()
|
||||
|
||||
if '._' in path_part:
|
||||
raise ValueError('AppleDouble-style name detected: %s' % path_part)
|
||||
|
||||
rsync_list.append((code_part, path_part))
|
||||
|
||||
finally:
|
||||
run(['hdiutil', 'detach', mountpoint], check=True, stdout=DEVNULL)
|
||||
|
||||
|
||||
|
||||
# for rsync_code, path in rsync_list:
|
||||
# # Get rid of the silly AppleDouble prefix
|
||||
# a, b = path.splitext(rsync_path)
|
||||
# if b.startswith('._'):
|
||||
# b = b[2:]
|
||||
# path = path.join(a, b)
|
||||
|
||||
|
||||
# try:
|
||||
|
||||
|
||||
|
||||
|
||||
run(['hmount', srcimg], stdout=DEVNULL, check=True)
|
||||
|
||||
try:
|
||||
for rsync_code, rsync_path in rsync_list:
|
||||
# print([local_dir, rsync_code, rsync_path])
|
||||
|
||||
# Suggest: replace with code to make fuck/marry/kill plan for each file
|
||||
|
||||
|
||||
# first, parse the rsync commands!
|
||||
if rsync_code.startswith('*'):
|
||||
if rsync_code == '*deleting':
|
||||
print('-', rsync_path)
|
||||
|
||||
# similar to the folder creation code below
|
||||
if rsync_path.endswith('/'):
|
||||
cmdname = 'hrmdir'
|
||||
else:
|
||||
cmdname = 'hdel'
|
||||
|
||||
a, b = path.split(rsync_path.rstrip('/'))
|
||||
hfs_dir_comps = a.split('/') if a else []
|
||||
hfs_deleteme = b
|
||||
|
||||
h_reccd(hfs_dir_comps)
|
||||
run([cmdname, hfs_deleteme], check=True)
|
||||
|
||||
else:
|
||||
raise ValueError('Unknown extended rsync code: %s' % rsync_code)
|
||||
|
||||
elif rsync_code.startswith('.'):
|
||||
pass
|
||||
|
||||
else:
|
||||
utype, ftype, cdiff, sdiff, tdiff, pdiff, odiff, gdiff, *_ = rsync_code
|
||||
|
||||
if utype == '>':
|
||||
if ftype == 'f':
|
||||
print('+', rsync_path)
|
||||
|
||||
hfs_dir = ':' + path.join(path.dirname(rsync_path), '').replace(*'/:')
|
||||
|
||||
with tempfile.NamedTemporaryFile(prefix='/tmp/', suffix='.bin') as f:
|
||||
macbin_tmp = f.name
|
||||
|
||||
h_topdir()
|
||||
ensure_fourccs(rsync_path)
|
||||
run(['macbinary', 'encode', '--overwrite', '-o', macbin_tmp, rsync_path], check=True)
|
||||
run(['hcopy', '-m', macbin_tmp, hfs_dir], check=True)
|
||||
|
||||
else:
|
||||
raise ValueError()
|
||||
|
||||
elif utype == 'c':
|
||||
if ftype == 'd':
|
||||
a, b = path.split(rsync_path.rstrip('/'))
|
||||
hfs_dir_comps = a.split('/') if a else []
|
||||
hfs_mkdir_name = b
|
||||
|
||||
h_reccd(hfs_dir_comps)
|
||||
run(['hmkdir', hfs_mkdir_name], check=True)
|
||||
|
||||
else:
|
||||
raise ValueError()
|
||||
|
||||
elif utype == '.':
|
||||
pass
|
||||
|
||||
else:
|
||||
raise ValueError('Unknown rsync update code: %s' % rsync_code)
|
||||
|
||||
finally:
|
||||
run(['humount'], check=True)
|
||||
|
||||
|
||||
|
||||
|
||||
# YXcstpoguax path/to/file
|
||||
# |||||||||||
|
||||
# `----------- the type of update being done::
|
||||
# |||||||||| <: file is being transferred to the remote host (sent).
|
||||
# |||||||||| >: file is being transferred to the local host (received).
|
||||
# |||||||||| c: local change/creation for the item, such as:
|
||||
# |||||||||| - the creation of a directory
|
||||
# |||||||||| - the changing of a symlink,
|
||||
# |||||||||| - etc.
|
||||
# |||||||||| h: the item is a hard link to another item (requires --hard-links).
|
||||
# |||||||||| .: the item is not being updated (though it might have attributes that are being modified).
|
||||
# |||||||||| *: means that the rest of the itemized-output area contains a message (e.g. "deleting").
|
||||
# ||||||||||
|
||||
# `---------- the file type:
|
||||
# ||||||||| f for a file,
|
||||
# ||||||||| d for a directory,
|
||||
# ||||||||| L for a symlink,
|
||||
# ||||||||| D for a device,
|
||||
# ||||||||| S for a special file (e.g. named sockets and fifos).
|
||||
# |||||||||
|
||||
# `--------- c: different checksum (for regular files)
|
||||
# |||||||| changed value (for symlink, device, and special file)
|
||||
# `-------- s: Size is different
|
||||
# `------- t: Modification time is different
|
||||
# `------ p: Permission are different
|
||||
# `----- o: Owner is different
|
||||
# `---- g: Group is different
|
||||
# `--- u: The u slot is reserved for future use.
|
||||
# `-- a: The ACL information changed
|
||||
|
|
@ -0,0 +1,31 @@
|
|||
#!/usr/bin/env python3
|
||||
|
||||
from sys import argv
|
||||
from subprocess import run, PIPE, DEVNULL
|
||||
from os import path
|
||||
|
||||
srcimg = 'SourceForEmulator.dmg'
|
||||
|
||||
rsync_opts = [
|
||||
'--exclude', '.*', # Down with dotfiles.
|
||||
'--exclude', srcimg,
|
||||
'--exclude', 'Desktop DB',
|
||||
'--exclude', 'Desktop DF',
|
||||
'--exclude', 'Trash',
|
||||
'--recursive',
|
||||
'-tX', # consider times and xattrs
|
||||
'--delete', # may delete things on the vMac drive
|
||||
# '--itemize-changes',
|
||||
]
|
||||
|
||||
|
||||
|
||||
devnode, mountpoint = run(['hdiutil', 'attach', '-nobrowse', srcimg], stdout=PIPE, check=True).stdout.decode('ascii').split()
|
||||
|
||||
try:
|
||||
mountpoint = mountpoint.rstrip('/') # try to deal in clean paths
|
||||
|
||||
run(['rsync', *rsync_opts, mountpoint+'/', './'], check=True)
|
||||
|
||||
finally:
|
||||
run(['hdiutil', 'detach', mountpoint], stdout=DEVNULL, check=True)
|
||||
Loading…
Reference in New Issue