restore -f flag, name_map repos, plus FreeDOS improvements.
Chris Pressey
10 years ago
| 19 | 19 |
http://ftp.mpoli.fi/software/DOS/EDITORS/TED3.ZIP
|
| 20 | 20 |
http://www.tortall.net/projects/yasm/releases/yasm-1.2.0-dos.exe
|
| 21 | 21 |
http://www.lua.org/ftp/lua-5.2.2.tar.gz
|
| 22 | |
|
|
22 |
http://waterlan.home.xs4all.nl/dos2unix/d2u70b.zip
|
|
23 |
|
| 23 | 24 |
http://catseye.tc/distfiles/shelta-1.2-2014.0422.zip
|
| 24 | 25 |
https://github.com/catseye/Illgol-Grand-Mal/archive/rel_16_tons_and_what_do_you_get.zip
|
| 25 | 26 |
|
|
| 32 | 33 |
["shelta-1.2-2014.0422.zip"] = 'shelta12.zip',
|
| 33 | 34 |
["rel_16_tons_and_what_do_you_get.zip"] = 'illgolgm.zip',
|
| 34 | 35 |
["gpl-2.0.txt"] = 'gpl20.txt',
|
|
36 |
["befunge-93"] = 'befung93',
|
|
37 |
["maentwrog"] = 'maentwrg',
|
| 35 | 38 |
},
|
| 36 | 39 |
|
| 37 | 40 |
distrepos_hg = [[
|
| 23 | 23 |
UNZIP D:\TED3.ZIP
|
| 24 | 24 |
COPY D:\INITFLOP.BAT .
|
| 25 | 25 |
COPY D:\PUTFLOPY.BAT .
|
|
26 |
MKDIR DOS2UNIX
|
|
27 |
CD DOS2UNIX
|
|
28 |
UNZIP D:\d2u70b.zip
|
|
29 |
CD C:\TOOLS
|
|
30 |
COPY DOS2UNIX\BIN\*.EXE .
|
| 26 | 31 |
|
| 27 | 32 |
:AlreadyTools
|
| 28 | 33 |
CD C:\
|
| 29 | |
COPY AUTOEXEC.BAT TMP.BAT
|
| 30 | |
COPY TMP.BAT+D:\DJGPPENV.BAT AUTOEXEC.BAT
|
| 31 | |
DEL TMP.BAT
|
| 32 | |
COPY FDCONFIG.SYS TMP.SYS
|
| 33 | |
COPY TMP.SYS+D:\NANSI.CFG FDCONFIG.SYS
|
| 34 | |
DEL TMP.SYS
|
|
34 |
IF EXIST C:\AUTOEXEC.OLD GOTO AlreadyAutoexec
|
|
35 |
COPY AUTOEXEC.BAT AUTOEXEC.OLD
|
|
36 |
COPY AUTOEXEC.OLD+D:\DJGPPENV.BAT AUTOEXEC.BAT
|
|
37 |
COPY FDCONFIG.SYS FDCONFIG.OLD
|
|
38 |
COPY FDCONFIG.OLD+D:\NANSI.CFG FDCONFIG.SYS
|
| 35 | 39 |
|
|
40 |
:AlreadyAutoexec
|
| 36 | 41 |
MKDIR SKEL
|
| 37 | 42 |
XCOPY D:\SKEL C:\SKEL /S /Y /R
|
| 38 | 43 |
COPY D:\GPL20.TXT C:\SKEL\FLOPPY
|
| 319 | 319 |
execute(funicular, 'cd distrepos && tar zcf ../staging_area/bitbucket.org,catseye,' ..
|
| 320 | 320 |
basename(url) .. '-master.tar.gz ' .. basename(url))
|
| 321 | 321 |
else
|
|
322 |
local source_name = basename(url)
|
|
323 |
local dest_name = source_name
|
|
324 |
if funicular.name_map and funicular.name_map[source_name] then
|
|
325 |
dest_name = funicular.name_map[source_name]
|
|
326 |
end
|
| 322 | 327 |
execute(funicular, 'cd distrepos && tar zcf ../staging_area/' ..
|
| 323 | |
basename(url) .. '.tgz ' .. basename(url))
|
|
328 |
dest_name .. '.tgz ' .. source_name)
|
| 324 | 329 |
end
|
| 325 | 330 |
end
|
| 326 | 331 |
for url in string.gmatch(funicular.distrepos_git or "", "[^%s]+") do
|
|
| 404 | 409 |
end,
|
| 405 | 410 |
|
| 406 | 411 |
restore = function(funicular, arg)
|
|
412 |
local force = false
|
| 407 | 413 |
bup = arg[2]
|
|
414 |
if bup == '-f' then
|
|
415 |
force = true
|
|
416 |
bup = arg[3]
|
|
417 |
end
|
| 408 | 418 |
if bup == nil then
|
| 409 | |
print "Usage: funicular restore <backup-basename>"
|
|
419 |
print "Usage: funicular restore [-f] <backup-basename>"
|
| 410 | 420 |
os.exit(1)
|
| 411 | 421 |
end
|
| 412 | 422 |
|
|
| 419 | 429 |
if not exists(bup_img_gz) then
|
| 420 | 430 |
print(bup_img_gz .. ' does not exist.')
|
| 421 | 431 |
os.exit(1)
|
|
432 |
end
|
|
433 |
|
|
434 |
if force then
|
|
435 |
execute(funicular, "rm -rf ${SYSTEM_IMAGE}")
|
| 422 | 436 |
end
|
| 423 | 437 |
|
| 424 | 438 |
if exists(funicular.system_image) then
|