[Tool] PureLibrary Explorer
Re: [New tool] PureLibrary Explorer
Nice work and I'm sure it'll be very handy.
Windows 11, Manjaro, Raspberry Pi OS
Re: [New tool] PureLibrary Explorer
impresses, seems you learned PB internals very well. Though I'm a bit disappointed there are no any hidden functions inside
"W̷i̷s̷h̷i̷n̷g o̷n a s̷t̷a̷r"
Re: [New tool] PureLibrary Explorer
just trying to get my stupid head around things lol. The file formats i just figured them out with a hex editor, theyre not obfuscated or compressed or anything so it was straight forwadLunasole wrote:impresses, seems you learned PB internals very well.
Re: [Tool] PureLibrary Explorer
If the procedure GetPurelibType(file$)
is replaced by:
replace SetReturns(sTxt.s) with:
You can remove or comment the following lines in AppMain:
Then it works with PB 5.73
is replaced by:
Code: Select all
Procedure.s GetPurelibType(file$)
Protected hFile.i, *sMagicBuffer, sMagic.s, sType.s, sInternal.s
hFile = ReadFile(#PB_Any, file$, #PB_File_SharedRead)
If hFile
*sMagicBuffer = AllocateMemory(5)
If *sMagicBuffer
ReadData(hFile, *sMagicBuffer, 4)
sMagic = PeekS(*sMagicBuffer, 4, #PB_Ascii)
If sMagic = "ERUP"
FileSeek(hFile,4)
ReadData(hFile, *sMagicBuffer, 4)
If PeekL(*sMagicBuffer) = 'EDLL'
sType = "EDL"
FileSeek(hFile,$0D)
ElseIf PeekL(*sMagicBuffer) = 'LSO1'
sType = "LSO"
FileSeek(hFile,$0D)
Else
FileSeek(hFile,8)
ReadData(hFile, *sMagicBuffer, 4)
sType = Chr(PeekA(*sMagicBuffer+3)) + Chr(PeekA(*sMagicBuffer+2)) + Chr(PeekA(*sMagicBuffer+1))
FileSeek(hFile,$14)
EndIf
sInternal = ReadString(hFile,#PB_Ascii)
CloseFile(hFile)
ProcedureReturn sType + "|" + sInternal
EndIf
FreeMemory(*sMagicBuffer)
EndIf
EndIf
EndProcedure
Code: Select all
Procedure.s SetReturns(sTxt.s)
Protected offset.i, *pchar.Character = @sTxt + StringByteLength(sTxt) - SizeOf(Character)
Repeat
*pchar - SizeOf(Character)
Until *pchar\c = ' '
offset = (*pchar - @sTxt) / SizeOf(Character)
ProcedureReturn Left(sTxt, offset) + " retn " + Right(sTxt, Len(sTxt) - offset - 1)
EndProcedure
You can remove or comment the following lines in AppMain:
Code: Select all
; If SizeOf(Character) = 2
; MessageRequester("Compile Error","My bad, Unicode not supported - please use Ascii compile"):
; End
; EndIf
-
- Enthusiast
- Posts: 494
- Joined: Sat Oct 11, 2008 9:07 pm
- Location: Germany, Berlin > member German forum
Re: [Tool] PureLibrary Explorer
Hello Infratec,
a nice tool. I test it put it looks that "deepscan" doesnt work on my win 10 pc. I klick on a lib and then the deepscan button, but the deep scan windows is empty...
Do you have a solution?
Greetings Michael
a nice tool. I test it put it looks that "deepscan" doesnt work on my win 10 pc. I klick on a lib and then the deepscan button, but the deep scan windows is empty...
Do you have a solution?
Greetings Michael
Working on - MP3D Library - PB 5.73 version ready for download
Re: [Tool] PureLibrary Explorer
If you start PureLibrary Explorer with the IDE (Tools), you could change the line to so you don't need to recompile on ever new release and you're able to inspect the libraries of the current PB version you are working with.
Btw. thanks for sharing, Keya
Code: Select all
sPurelibsPath = #PB_Compiler_Home + "purelibraries"
Code: Select all
sPurelibsPath = GetPathPart(GetEnvironmentVariable("PB_TOOL_IDE")) + "PureLibraries"
Btw. thanks for sharing, Keya
Et cetera is my worst enemy
Re: [Tool] PureLibrary Explorer
Did you put some text into the Find: stringgadget? Like Find: window + DeepScan
Et cetera is my worst enemy
Re: [Tool] PureLibrary Explorer
It's not written by me
I only modified it that it works with newer PB versions.
But yes, you have to insert a word like 'window' in the search field.
I only modified it that it works with newer PB versions.
But yes, you have to insert a word like 'window' in the search field.
-
- Enthusiast
- Posts: 494
- Joined: Sat Oct 11, 2008 9:07 pm
- Location: Germany, Berlin > member German forum
Re: [Tool] PureLibrary Explorer
thanks for the help,
i think it was a problem of the missing help file...
Greeting
Michael
i think it was a problem of the missing help file...
Greeting
Michael
Working on - MP3D Library - PB 5.73 version ready for download