Cleaned up some trash, renamed project
This commit is contained in:
@@ -1,20 +0,0 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
|
||||
<project xmlns="http://www.purebasic.com/namespace" version="1.0" creator="PureBasic 6.20 (Windows - x64)">
|
||||
<section name="config">
|
||||
<options closefiles="1" openmode="0" name="PB-DllWrapperMaker"/>
|
||||
</section>
|
||||
<section name="data">
|
||||
<explorer view="C:\ProgramData\PureBasic\Examples\" pattern="0"/>
|
||||
<log show="1"/>
|
||||
<lastopen date="2025-08-03 16:40" user="Herwin" host="DESKTOP-FND9TQS"/>
|
||||
</section>
|
||||
<section name="files"/>
|
||||
<section name="targets">
|
||||
<target name="Default Target" enabled="1" default="1">
|
||||
<inputfile value=""/>
|
||||
<outputfile value=""/>
|
||||
<options xpskin="1" dpiaware="1" debug="1" optimizer="0"/>
|
||||
</target>
|
||||
</section>
|
||||
</project>
|
||||
@@ -0,0 +1,72 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
|
||||
<project xmlns="http://www.purebasic.com/namespace" version="1.0" creator="PureBasic 6.21 (Windows - x64)">
|
||||
<section name="config">
|
||||
<options closefiles="1" openmode="0" name="PB-PEArch"/>
|
||||
</section>
|
||||
<section name="data">
|
||||
<explorer view="C:\ProgramData\PureBasic\Examples\" pattern="0"/>
|
||||
<log show="1"/>
|
||||
<lastopen date="2025-08-03 20:57" user="Herwin" host="DESKTOP-15GVDJD"/>
|
||||
</section>
|
||||
<section name="files">
|
||||
<file name="Main_PEArch.pb">
|
||||
<config load="0" scan="1" panel="1" warn="1" lastopen="0" sortindex="999" panelstate="+"/>
|
||||
<fingerprint md5="0ae927874ebb9b5f278ab868cd2eaad6"/>
|
||||
</file>
|
||||
<file name="Includes\ImageNtHeaderHelper.pbi">
|
||||
<config load="0" scan="1" panel="1" warn="1" lastopen="0" sortindex="999" panelstate="++"/>
|
||||
<fingerprint md5="a5b4cef967764153f8aed5a0ed6474c8"/>
|
||||
</file>
|
||||
<file name="Includes\WinApi_GetConsoleProcessList.pbi">
|
||||
<config load="0" scan="1" panel="1" warn="1" lastopen="0" sortindex="999" panelstate="++"/>
|
||||
<fingerprint md5="4ac133fc47ad2e720131876fa54f876c"/>
|
||||
</file>
|
||||
</section>
|
||||
<section name="targets">
|
||||
<target name="PEArch - x64" enabled="1" default="1">
|
||||
<inputfile value="Main_PEArch.pb"/>
|
||||
<outputfile value="Build\x64\pearch.exe"/>
|
||||
<compiler version="PureBasic 5.73 LTS (Windows - x64)"/>
|
||||
<commandline value="I:\Projects\PureBasic\PB-DllWrapperMaker\PureBasic_Compilation0.exe"/>
|
||||
<executable value="Build\x64\pearch.exe"/>
|
||||
<options debug="1" optimizer="1"/>
|
||||
<temporaryexe value="source"/>
|
||||
<format exe="console" cpu="0"/>
|
||||
<compilecount enable="1" value="46"/>
|
||||
<buildcount enable="1" value="15"/>
|
||||
<versioninfo enable="1">
|
||||
<field0 value="1,0,%BUILDCOUNT,%COMPILECOUNT"/>
|
||||
<field1 value="1,0,%BUILDCOUNT,%COMPILECOUNT"/>
|
||||
<field2 value="NibblePoker"/>
|
||||
<field3 value="PEArch"/>
|
||||
<field4 value="1.0.%BUILDCOUNT"/>
|
||||
<field5 value="1.0.%BUILDCOUNT"/>
|
||||
<field7 value="PEArch.exe"/>
|
||||
<field8 value="pearch.exe"/>
|
||||
</versioninfo>
|
||||
</target>
|
||||
<target name="PEArch - x86" enabled="1" default="0">
|
||||
<inputfile value="Main_PEArch.pb"/>
|
||||
<outputfile value="Build\x86\pearch.exe"/>
|
||||
<compiler version="PureBasic 5.73 LTS (Windows - x86)"/>
|
||||
<commandline value="I:\Projects\PureBasic\PB-DllWrapperMaker\PureBasic_Compilation0.exe"/>
|
||||
<executable value="Build\x86\pearch.exe"/>
|
||||
<options debug="1" optimizer="1"/>
|
||||
<temporaryexe value="source"/>
|
||||
<format exe="console" cpu="0"/>
|
||||
<compilecount enable="1" value="45"/>
|
||||
<buildcount enable="1" value="14"/>
|
||||
<versioninfo enable="1">
|
||||
<field0 value="1,0,%BUILDCOUNT,%COMPILECOUNT"/>
|
||||
<field1 value="1,0,%BUILDCOUNT,%COMPILECOUNT"/>
|
||||
<field2 value="NibblePoker"/>
|
||||
<field3 value="PEArch"/>
|
||||
<field4 value="1.0.%BUILDCOUNT"/>
|
||||
<field5 value="1.0.%BUILDCOUNT"/>
|
||||
<field7 value="PEArch.exe"/>
|
||||
<field8 value="pearch.exe"/>
|
||||
</versioninfo>
|
||||
</target>
|
||||
</section>
|
||||
</project>
|
||||
-105
@@ -1,105 +0,0 @@
|
||||
;{- Code Header
|
||||
; ==- Basic Info -================================
|
||||
; Name: PB-CTypes.pbi
|
||||
; Version: 0.0.1
|
||||
; Author: Herwin Bozet
|
||||
;
|
||||
; ==- Compatibility -=============================
|
||||
; Compiler version:
|
||||
; * PureBasic 6.0 LTS
|
||||
; * PureBasic 6.0 LTS - C Backend
|
||||
;
|
||||
; ==- Links & License -===========================
|
||||
; License: Unlicense
|
||||
; GitHub: https://github.com/aziascreations/PB-CTypes
|
||||
; Private Repo: https://git.nibblepoker.lu/aziascreations/PB-CTypes
|
||||
;}
|
||||
|
||||
|
||||
;- Compiler Directives
|
||||
EnableExplicit
|
||||
|
||||
|
||||
;- Constants
|
||||
; SEC_IMAGE_NO_EXECUTE
|
||||
; 0x11000000
|
||||
CompilerIf Not Defined(SEC_IMAGE_NO_EXECUTE, #PB_Constant)
|
||||
#SEC_IMAGE_NO_EXECUTE = $11000000
|
||||
CompilerEndIf
|
||||
|
||||
|
||||
If Not OpenConsole("DllWrapperMaker")
|
||||
End 1
|
||||
EndIf
|
||||
|
||||
; If CountProgramParameters() <> 2
|
||||
; PrintN("DllWrap <DLL> <Output>")
|
||||
; EndIf
|
||||
;
|
||||
; Define DllPath$ = ProgramParameter()
|
||||
; Define OutputPath$ = ProgramParameter()
|
||||
|
||||
Define DllPath1$ = "C:\Program Files\7-Zip\7-zip32.dll"
|
||||
Define DllPath2$ = "C:\Program Files\7-Zip\7-zip.dll"
|
||||
|
||||
; Debug DllPath$
|
||||
; Debug OutputPath$
|
||||
|
||||
Procedure GetImageCpuArch(ImagePath$)
|
||||
; Mapping the file into memory
|
||||
Define InputFileHandle = ReadFile(#PB_Any, ImagePath$)
|
||||
|
||||
If InputFileHandle = 0
|
||||
PrintN("Unable to open input file !")
|
||||
ProcedureReturn
|
||||
EndIf
|
||||
|
||||
Define InputFileMappingHandle = CreateFileMapping_(FileID(InputFileHandle), #Null, #PAGE_READONLY | #SEC_IMAGE_NO_EXECUTE, 0, 0, #Null)
|
||||
|
||||
If InputFileMappingHandle = #ERROR_ALREADY_EXISTS Or InputFileMappingHandle = 0
|
||||
PrintN("Unable to create a file mapping !")
|
||||
Goto GetImageCpuArch_CloseInputFileHandle
|
||||
EndIf
|
||||
|
||||
Define InputFileViewPtr.i = MapViewOfFile_(InputFileMappingHandle, #FILE_MAP_READ, 0, 0, 0)
|
||||
If InputFileViewPtr = #Null
|
||||
PrintN("Unable to map the input file into memory !")
|
||||
Goto GetImageCpuArch_CloseInputFileHandle
|
||||
EndIf
|
||||
|
||||
; Retrieving the NT headers
|
||||
Define *RetrievedNtHeaders.IMAGE_NT_HEADERS32 = ImageNtHeader_(InputFileViewPtr)
|
||||
If *RetrievedNtHeaders = #Null
|
||||
PrintN("Unable to retrieve the NT headers !")
|
||||
Goto GetImageCpuArch_UnmapFileView
|
||||
EndIf
|
||||
|
||||
Debug *RetrievedNtHeaders\FileHeader\ Machine
|
||||
|
||||
; Do not do this !
|
||||
;FreeMemory(*RetrievedNtHeaders)
|
||||
|
||||
; Cleaning up
|
||||
GetImageCpuArch_UnmapFileView:
|
||||
UnmapViewOfFile_(InputFileViewPtr)
|
||||
|
||||
GetImageCpuArch_CloseInputFileHandle:
|
||||
CloseFile(InputFileHandle)
|
||||
EndProcedure
|
||||
|
||||
GetImageCpuArch(DllPath1$)
|
||||
|
||||
GetImageCpuArch(DllPath2$)
|
||||
|
||||
Input()
|
||||
|
||||
; IDE Options = PureBasic 6.21 (Windows - x64)
|
||||
; CursorPosition = 78
|
||||
; FirstLine = 44
|
||||
; Folding = -
|
||||
; EnableXP
|
||||
; DPIAware
|
||||
; CommandLine = "C:\Program Files (x86)\PureBasic\Compilers\Engine3D.dll" "./test.pb"
|
||||
; CompileSourceDirectory
|
||||
; EnableCompileCount = 21
|
||||
; EnableBuildCount = 0
|
||||
@@ -1,109 +0,0 @@
|
||||
;{- Code Header
|
||||
; ==- Basic Info -================================
|
||||
; Name: PB-CTypes.pbi
|
||||
; Version: 0.0.1
|
||||
; Author: Herwin Bozet
|
||||
;
|
||||
; ==- Compatibility -=============================
|
||||
; Compiler version:
|
||||
; * PureBasic 6.0 LTS
|
||||
; * PureBasic 6.0 LTS - C Backend
|
||||
;
|
||||
; ==- Links & License -===========================
|
||||
; License: Unlicense
|
||||
; GitHub: https://github.com/aziascreations/PB-CTypes
|
||||
; Private Repo: https://git.nibblepoker.lu/aziascreations/PB-CTypes
|
||||
;}
|
||||
|
||||
|
||||
;- Compiler Directives
|
||||
EnableExplicit
|
||||
|
||||
|
||||
;- Constants
|
||||
; SEC_IMAGE_NO_EXECUTE
|
||||
; 0x11000000
|
||||
CompilerIf Not Defined(SEC_IMAGE_NO_EXECUTE, #PB_Constant)
|
||||
#SEC_IMAGE_NO_EXECUTE = $11000000
|
||||
CompilerEndIf
|
||||
|
||||
|
||||
If Not OpenConsole("DllWrapperMaker")
|
||||
End 1
|
||||
EndIf
|
||||
|
||||
If CountProgramParameters() <> 2
|
||||
PrintN("DllWrap <DLL> <Output>")
|
||||
EndIf
|
||||
|
||||
Define DllPath$ = ProgramParameter()
|
||||
Define OutputPath$ = ProgramParameter()
|
||||
|
||||
DllPath$ = "C:\Program Files\7-Zip\7-zip32.dll"
|
||||
DllPath$ = "C:\Program Files\7-Zip\7-zip.dll"
|
||||
|
||||
; Debug DllPath$
|
||||
; Debug OutputPath$
|
||||
|
||||
Procedure GetImageCpuArch(ImagePath$)
|
||||
; Mapping the file into memory
|
||||
Define InputFileHandle = ReadFile(#PB_Any, ImagePath$)
|
||||
|
||||
If InputFileHandle = 0
|
||||
PrintN("Unable to open input file !")
|
||||
ProcedureReturn
|
||||
EndIf
|
||||
|
||||
Define InputFileMappingHandle = CreateFileMapping_(FileID(InputFileHandle), #Null, #PAGE_READONLY | #SEC_IMAGE_NO_EXECUTE, 0, 0, #Null)
|
||||
|
||||
If InputFileMappingHandle = #ERROR_ALREADY_EXISTS Or InputFileMappingHandle = 0
|
||||
PrintN("Unable to create a file mapping !")
|
||||
Goto GetImageCpuArch_CloseInputFileHandle
|
||||
EndIf
|
||||
|
||||
Define InputFileViewPtr.i = MapViewOfFile_(InputFileMappingHandle, #FILE_MAP_READ, 0, 0, 0)
|
||||
If InputFileViewPtr = #Null
|
||||
PrintN("Unable to map the input file into memory !")
|
||||
Goto GetImageCpuArch_CloseInputFileHandle
|
||||
EndIf
|
||||
|
||||
; Retrieving the NT headers
|
||||
Define *RetrievedNtHeaders.IMAGE_NT_HEADERS32 = ImageNtHeader_(InputFileViewPtr)
|
||||
If *RetrievedNtHeaders = #Null
|
||||
PrintN("Unable to retrieve the NT headers !")
|
||||
Goto GetImageCpuArch_UnmapFileView
|
||||
EndIf
|
||||
|
||||
Debug *RetrievedNtHeaders\FileHeader\ Machine
|
||||
|
||||
;FreeMemory(*RetrievedNtHeaders)
|
||||
|
||||
; Cleaning up
|
||||
GetImageCpuArch_UnmapFileView:
|
||||
UnmapViewOfFile_(InputFileViewPtr)
|
||||
|
||||
GetImageCpuArch_CloseInputFileHandle:
|
||||
CloseFile(InputFileHandle)
|
||||
EndProcedure
|
||||
|
||||
|
||||
|
||||
GetImageCpuArch(DllPath$)
|
||||
|
||||
GetImageCpuArch(DllPath$)
|
||||
|
||||
GetImageCpuArch(DllPath$)
|
||||
|
||||
GetImageCpuArch(DllPath$)
|
||||
|
||||
Input()
|
||||
|
||||
; IDE Options = PureBasic 6.21 (Windows - x64)
|
||||
; CursorPosition = 8
|
||||
; Folding = -
|
||||
; EnableXP
|
||||
; DPIAware
|
||||
; CommandLine = "C:\Program Files (x86)\PureBasic\Compilers\Engine3D.dll" "./test.pb"
|
||||
; CompileSourceDirectory
|
||||
; EnableCompileCount = 20
|
||||
; EnableBuildCount = 0
|
||||
Reference in New Issue
Block a user