Re: Interface - Fragen
Verfasst: 16.08.2017 20:04
Achso, das ist gemeint. Aber ok, ist ein Funktionsaufruf außerhalb einer Procedure().
Ich bin da auch gerade drüber gestolpert...._JON_ hat geschrieben:Achso, das ist gemeint. Aber ok, ist ein Funktionsaufruf außerhalb einer Procedure().
Code: Alles auswählen
EndProcedure : InitModule()
<hust> das ist aber auch böse....Bisonte hat geschrieben:Bis ich dann dasnicht mehr "überlesen" habe....Code: Alles auswählen
EndProcedure : InitModule()
Würde ich nie so machen. Sinn und Zweck der Regeln ist doch, dass beim laden der DLL nicht unkontrolliert Code ausgeführt wird. Da nützt es auch nichts, dass du das in eine Prozedur verpackst. Kann gut gehn oder auch nicht, sicher ist das auf jeden Fall nicht.mk-soft hat geschrieben:Die Procedure InitModule() wir vor den Aufruf der Procedure AttachProcess(Instanse) bei Dll´s aufgerufen.
Funktioniert sicher.
Code: Alles auswählen
DeclareModule MyModule ;TODO EndDeclareModule Module MyModule Procedure InitModule() Debug "Init My Module!" ;TODO EndProcedure : InitModule() EndModule
Bei ProcessAttach von der DLL wird als erstes die Procedure PB_DllInit aufgerufen. In dieser werden nach der initialisierung die Module aufgerufen.;
; PureBasic 5.60 (Windows - x64) generated code
;
; (c) 2016 Fantaisie Software
;
; The header must remain intact for Re-Assembly
;
; :DLL
; :System
; kernel32.lib
; :Import
;
format MS64 COFF
;
;
extrn GetModuleHandleW
extrn HeapCreate
extrn HeapDestroy
extrn memset
public _PB_Instance
public PB_ExecutableType
public PB_OpenGLSubsystem
public _PB_MemoryBase
public PB_Instance
public PB_MemoryBase
public PB_EndFunctions
public _DLLEntryPoint@12
public _Procedure2
macro pb_public symbol
{
public _#symbol
public symbol
_#symbol:
symbol:
}
macro pb_align value { rb (value-1) - ($-_PB_DataSection + value-1) mod value }
macro pb_bssalign value { rb (value-1) - ($-_PB_BSSSection + value-1) mod value }
;
section '.code' code readable executable align 4096
;
;
_DLLEntryPoint@12:
SUB rsp,40
CMP rdx,1
JNE .SkipProcessAttach
MOV [_PB_Instance],rcx
CALL PB_DllInit
MOV rcx,[_PB_Instance]
CALL _Procedure2
JMP .End
.SkipProcessAttach:
CMP rdx,2
JNE .SkipThreadAttach
JMP .End
.SkipThreadAttach:
CMP rdx,0
JNE .SkipProcessDetach
CALL _PB_EOP
JMP .End
.SkipProcessDetach:
CMP rdx,3
JNE .SkipThreadDetach
.SkipThreadDetach:
.End:
MOV rax,1
ADD rsp,40
RET
;
PB_DllInit:
SUB rsp,40
XOR r8,r8
MOV rdx,4096
XOR rcx,rcx
CALL HeapCreate
MOV [PB_MemoryBase],rax
; DeclareModule MyModule
;
; EndDeclareModule
;
; Module MyModule
;
CALL _Procedure0
;
; EndModule
;
;
ADD rsp,40
RET
_PB_EOP:
SUB rsp,40
CALL PB_EndFunctions
MOV rcx,[PB_MemoryBase]
CALL HeapDestroy
ADD rsp,40
RET
PB_EndFunctions:
SUB rsp,40
ADD rsp,40
RET
;
; ProcedureDLL AttachProcess(Instance)
_Procedure2:
MOV qword [rsp+8],rcx
PS2=48
SUB rsp,40
;
; EndProcedure
_EndProcedureZero3:
XOR rax,rax
_EndProcedure3:
ADD rsp,40
RET
; Procedure InitModule()
_Procedure0:
PS0=48
SUB rsp,40
; Debug "Init My Module!"
;
; EndProcedure : InitModule()
_EndProcedureZero1:
XOR rax,rax
_EndProcedure1:
ADD rsp,40
RET
;
section '.data' data readable writeable
;
_PB_DataSection:
PB_OpenGLSubsystem: db 0
pb_public PB_DEBUGGER_LineNumber
dd -1
pb_public PB_DEBUGGER_IncludedFiles
dd 0
pb_public PB_DEBUGGER_FileName
db 0
pb_public PB_Compiler_Unicode
dd 1
pb_public PB_Compiler_Thread
dd 0
pb_public PB_Compiler_Purifier
dd 0
pb_public PB_Compiler_Debugger
dd 0
PB_ExecutableType: dd 0
pb_align 8
pb_align 8
pb_align 8
s_s:
dq 0
dq -1
pb_align 8
;
section '.bss' readable writeable
_PB_BSSSection:
pb_bssalign 8
;
I_BSSStart:
_PB_MemoryBase:
PB_MemoryBase: rq 1
_PB_Instance:
PB_Instance: rq 1
PB_ExitCode: rq 1
;
pb_bssalign 8
PB_DataPointer rq 1
pb_bssalign 8
pb_bssalign 8
pb_bssalign 8
pb_bssalign 8
I_BSSEnd:
section '.data' data readable writeable
SYS_EndDataSection:
Also die Situationen kann man ausschließen. Selbst ein Windows-Update oder ein Nicht-PB-Programm das eine PB-DLL aufruft, da wird sich nichts ändern. Außer irgendwas anderes in PB ruft eine Inkompatibilität aufJosh hat geschrieben:Ob das in allen Situationen funktioniert, in zukünftigen Windows-Versionen, in nicht PB-Programmen die deine DLL aufrufen sei dahingestellt.
Es ist dokumentiert, aber eben, dass es nicht erlaubt ist:GPI hat geschrieben:Allerdings ist es möglich, das in Zukünftigen PB-Versionen es anders gehandhabt wird und es dann nicht mehr läuft, da es nicht dokumentiert ist.
Auch wenn es mk-soft anders sieht, es wird definitiv Code außerhalb von Prozeduren ausgeführt, selbst wenn ich nur den Befehl InitModule() betrachte. Damit wird auch Code innerhalb der Prozedur ausgeführt, wobei ich hier die Prozedur nur als hübsche Verpackung betrachte.Help hat geschrieben:Hinweise zur Erstellung von DLL's:
- Die Deklaration von Arrays, Listen bzw. Maps mittels Dim, NewList bzw. NewMap muss stets innerhalb der Prozedur AttachProcess erfolgen.
- Schreiben Sie keinen Programmcode außerhalb von Prozeduren. Als Ausnahmen erlaubt sind lediglich Variablen- oder Strukturen-Deklarationen.
- DirectX Initialisierungsroutinen dürfen nicht innerhalb der AttachProcess Prozedur geschrieben werden.