CHDK Wiki
Register
(→‎Universal dumper: revised instruction wording for clarity)
Tag: Visual edit
(17 intermediate revisions by 7 users not shown)
Line 1: Line 1:
 
__TOC__
 
__TOC__
  +
{{Notice|read this first : [http://chdk.wikia.com/wiki/Canon_Basic/Card_Setup Canon_Basic Card_Setup]}}
  +
 
==Universal dumper==
 
==Universal dumper==
 
VxWorks and dryos compatible dumper. Log file records status, start and OS. Shows how to safely call event procs that might not be registered. If this doesn't work on your camera, you can try the original.
 
VxWorks and dryos compatible dumper. Log file records status, start and OS. Shows how to safely call event procs that might not be registered. If this doesn't work on your camera, you can try the original.
  +
  +
'''IMPORTANT:''' While this script attempts to display status messages on the screen, the text message may not be visible. '''If the camera appears not to respond to the script, check the card'''. If the script ran, status will be recorded in CBDUMPER.LOG and if the dump was successful, the ROM image will be saved in PRIMARY.BIN
  +
  +
  +
Save this script as the file 'extend.m' on your card.
  +
 
<source lang="thinbasic">
 
<source lang="thinbasic">
 
' dump ROM to A/PRIMARY.BIN
 
' dump ROM to A/PRIMARY.BIN
 
' log to A/CBDUMPER.LOG
 
' log to A/CBDUMPER.LOG
  +
 
 
DIM startaddr=0
 
DIM startaddr=0
 
DIM os="unk"
 
DIM os="unk"
 
DIM lcdmsg=0
 
DIM lcdmsg=0
 
DIM msgstr=0
 
DIM msgstr=0
  +
DIM romsize=0
 
  +
 
' detect start address and OS
 
' detect start address and OS
  +
' order must be from highest to lowest, since accessing outside of ROM may trigger an exception
 
private sub GetStart()
 
private sub GetStart()
 
if memcmp(0xFFC00004,"gaonisoy",8) = 0 then
 
if memcmp(0xFFC00004,"gaonisoy",8) = 0 then
Line 24: Line 34:
 
end if
 
end if
 
if memcmp(0xFF810004,"gaonisoy",8) = 0 then
 
if memcmp(0xFF810004,"gaonisoy",8) = 0 then
  +
startaddr = 0xFF810000
  +
os = "dry"
  +
exit sub
  +
end if
  +
if memcmp(0xFF820004,"gaonisoy",8) = 0 then
 
startaddr = 0xFF810000
 
startaddr = 0xFF810000
 
os = "dry"
 
os = "dry"
Line 31: Line 46:
 
startaddr = 0xFF810000
 
startaddr = 0xFF810000
 
os = "vx"
 
os = "vx"
  +
exit sub
  +
end if
  +
if memcmp(0xFF000004,"gaonisoy",8) = 0 then
  +
startaddr = 0xFF000000
  +
os = "dry"
  +
exit sub
  +
end if
  +
if memcmp(0xFF020004,"gaonisoy",8) = 0 then
  +
startaddr = 0xFF010000
  +
os = "dry"
  +
exit sub
  +
end if
  +
if memcmp(0xFC020004,"gaonisoy",8) = 0 then
  +
startaddr = 0xFC000000
  +
os = "dry"
  +
romsize = 0x2000000
 
exit sub
 
exit sub
 
end if
 
end if
 
end sub
 
end sub
  +
 
 
private sub RegisterProcs()
 
private sub RegisterProcs()
  +
' Newest cams (Dryos rel 43 and later) only have System.Create()
' ExecuteEventProcedure does is not registered by default on vx
 
' Newer cams seem to have this as an alias for System.Create()
+
' on older dryos cams SystemEventInit is an alias for System.Create()
 
' ExecuteEventProcedure does is not registered by default on vx,
SystemEventInit()
 
  +
' but calling an unregistered is not fatal
  +
if System.Create() = -1 then
 
SystemEventInit()
  +
end if
 
if ExecuteEventProcedure("UI_RegistDebugEventProc") = -1 then
 
if ExecuteEventProcedure("UI_RegistDebugEventProc") = -1 then
 
ExecuteEventProcedure("UI.CreatePublic")
 
ExecuteEventProcedure("UI.CreatePublic")
 
end if
 
end if
 
end sub
 
end sub
  +
 
 
private sub InitMsg()
 
private sub InitMsg()
 
lcdmsg = ExecuteEventProcedure("LCDMsg_Create")
 
lcdmsg = ExecuteEventProcedure("LCDMsg_Create")
Line 53: Line 88:
 
end if
 
end if
 
end sub
 
end sub
  +
 
 
private sub PutMsg(msg)
 
private sub PutMsg(msg)
 
if lcdmsg >= 0 then
 
if lcdmsg >= 0 then
Line 65: Line 100:
 
end if
 
end if
 
end sub
 
end sub
  +
 
 
private sub Initialize()
 
private sub Initialize()
 
RegisterProcs()
 
RegisterProcs()
 
InitMsg()
 
InitMsg()
 
PutMsg("Started")
 
PutMsg("Started")
+
 
GetStart()
 
GetStart()
  +
 
 
if startaddr <> 0 then
 
if startaddr <> 0 then
 
sprintf(msgstr,"%0X %s",startaddr,os)
 
sprintf(msgstr,"%0X %s",startaddr,os)
 
PutMsg(msgstr)
 
PutMsg(msgstr)
romsize = 0xFFFFFFFC - startaddr
+
if romsize = 0 then
  +
romsize = 0xFFFFFFFC - startaddr
  +
end if
 
dumpfile = Fopen_Fut("A/PRIMARY.BIN","w")
 
dumpfile = Fopen_Fut("A/PRIMARY.BIN","w")
 
if dumpfile <> 0 then
 
if dumpfile <> 0 then
Line 128: Line 165:
 
[[Category:Development]]
 
[[Category:Development]]
 
[[Category:CanonBasic]]
 
[[Category:CanonBasic]]
  +
[[Category:Firmware]]

Revision as of 23:11, 19 September 2014

Notice

read this first : Canon_Basic Card_Setup


Universal dumper

VxWorks and dryos compatible dumper. Log file records status, start and OS. Shows how to safely call event procs that might not be registered. If this doesn't work on your camera, you can try the original.

IMPORTANT: While this script attempts to display status messages on the screen, the text message may not be visible. If the camera appears not to respond to the script, check the card. If the script ran, status will be recorded in CBDUMPER.LOG and if the dump was successful, the ROM image will be saved in PRIMARY.BIN


Save this script as the file 'extend.m' on your card.

' dump ROM to A/PRIMARY.BIN 
' log to A/CBDUMPER.LOG
 
DIM startaddr=0
DIM os="unk"
DIM lcdmsg=0
DIM msgstr=0
DIM romsize=0
 
' detect start address and OS
' order must be from highest to lowest, since accessing outside of ROM may trigger an exception
private sub GetStart()
	if memcmp(0xFFC00004,"gaonisoy",8) = 0 then
		startaddr = 0xFFC00000
		os = "dry"
		exit sub
	end if
	if memcmp(0xFFC00008,"Copyrigh",8) = 0 then
		startaddr = 0xFFC00000
		os = "vx"
		exit sub
	end if
	if memcmp(0xFF810004,"gaonisoy",8) = 0 then
		startaddr = 0xFF810000
		os = "dry"
		exit sub
	end if
	if memcmp(0xFF820004,"gaonisoy",8) = 0 then
		startaddr = 0xFF810000
		os = "dry"
		exit sub
	end if
	if memcmp(0xFF810008,"Copyrigh",8) = 0 then
		startaddr = 0xFF810000
		os = "vx"
		exit sub
	end if
	if memcmp(0xFF000004,"gaonisoy",8) = 0 then
		startaddr = 0xFF000000
		os = "dry"
		exit sub
	end if
	if memcmp(0xFF020004,"gaonisoy",8) = 0 then
		startaddr = 0xFF010000
		os = "dry"
		exit sub
	end if
	if memcmp(0xFC020004,"gaonisoy",8) = 0 then
		startaddr = 0xFC000000
		os = "dry"
		romsize = 0x2000000
		exit sub
	end if
end sub
 
private sub RegisterProcs()
	' Newest cams (Dryos rel 43 and later) only have System.Create()
	' on older dryos cams SystemEventInit is an alias for System.Create()
	' ExecuteEventProcedure does is not registered by default on vx, 
	' but calling an unregistered is not fatal
	if System.Create() = -1 then
		SystemEventInit()
	end if
	if ExecuteEventProcedure("UI_RegistDebugEventProc") = -1 then
		ExecuteEventProcedure("UI.CreatePublic")
	end if
end sub
 
private sub InitMsg()
	lcdmsg = ExecuteEventProcedure("LCDMsg_Create")
	msgstr = AllocateMemory(80)
	' truncate log
	msgfile = Fopen_Fut("A/CBDUMPER.LOG","w")
	if msgfile <> 0 then
		Fclose_Fut(msgfile)
	end if
end sub
 
private sub PutMsg(msg)
	if lcdmsg >= 0 then
		LCDMsg_SetStr(lcdmsg,msg)
	end if
	msgfile = Fopen_Fut("A/CBDUMPER.LOG","a")
	if msgfile <> 0 then
		Fwrite_Fut(msg,strlen(msg),1,msgfile)
		Fwrite_Fut("\n",1,1,msgfile)
		Fclose_Fut(msgfile)
	end if
end sub
 
private sub Initialize()
	RegisterProcs()
	InitMsg()
	PutMsg("Started")
 
	GetStart()
 
	if startaddr <> 0 then
		sprintf(msgstr,"%0X %s",startaddr,os)
		PutMsg(msgstr)
		if romsize = 0 then
			romsize = 0xFFFFFFFC - startaddr
		end if
		dumpfile = Fopen_Fut("A/PRIMARY.BIN","w")
		if dumpfile <> 0 then
			Fwrite_Fut(startaddr,romsize,1,dumpfile)
			Fclose_Fut(dumpfile)
			Wait(500)
			PutMsg("done")
		else
			PutMsg("file error")
		end if
	else
		PutMsg("not found!")
	end if
	FreeMemory(msgstr)
end sub

Original simple dumper

dim f,a,startadr=0,romsize
 
private sub Initialize()
	UI.CreatePublic()
	a=LCDMsg_Create()
	LCDMsg_SetStr(a,"Running")
	System.Create()
 
	if memcmp(0xFFC00004,"gaonisoy",8) = 0 then
		startadr = 0xFFC00000
		LCDMsg_SetStr(a,"FFC00000")
	else
		if memcmp(0xFF810004,"gaonisoy",8) = 0 then
			startadr = 0xFF810000
			LCDMsg_SetStr(a,"FF810000")
		else
			LCDMsg_SetStr(a,"start not found!")
			Wait(1000)
		end if
	end if
 
	if startadr <> 0 then
		romsize = 0xFFFFFFFC - startadr
		f=Fopen_Fut("A/PRIMARY.BIN","w")
		Fwrite_Fut(startadr,romsize,1,f)
		Fclose_Fut(f)
		LCDMsg_SetStr(a,"done")
	end if
end sub