Skip to content

Latest commit

 

History

History
 
 

Oracle - Java

Folders and files

NameName
Last commit message
Last commit date

parent directory

..
 
 
 
 
 
 
 
 
 
 

Name: Oracle - Java (x64)

; ***************************************************************************
; *                                                                         *
; * Author:      marpie ([email protected])                                *
; * License:     BSD 2-clause                                               *
; * Copyright:   (c) 2019, a12d404.net                                      *
; * Status:      Prototype                                                  *
; * Created:     20190104                                                   *
; * Last Update: 20190104                                                   *
; *                                                                         *
; ***************************************************************************
EnableExplicit

; ---------------------------------------------------------------------------
;- Prototypes
Macro LoopForever()
  Sleep_(-1)
EndMacro

Macro DbgOutFunctionName()
  OutputDebugString_("Func: " + #PB_Compiler_Procedure)
EndMacro

Macro DummyExport(proc_name)
  ProcedureDLL proc_name()
    DbgOutFunctionName()
    LoopForever()
  EndProcedure
EndMacro

; ---------------------------------------------------------------------------
;- Exports: deploy.dll - javacpl.exe

DummyExport(GetCurrentJavaHomeFromRegistry)

; ---------------------------------------------------------------------------
;- Exports: jli.dll for java-rmi.exe and others

DummyExport(JLI_CmdToArgs)
DummyExport(JLI_GetStdArgc)
DummyExport(JLI_GetStdArgs)
DummyExport(JLI_Launch)
DummyExport(JLI_MemAlloc)

; ---------------------------------------------------------------------------

ProcedureDLL AttachProcess(Instance)
  DbgOutFunctionName()
EndProcedure

ProcedureDLL DetachProcess(Instance)
  DbgOutFunctionName()
EndProcedure

ProcedureDLL AttachThread(Instance)
  DbgOutFunctionName()
EndProcedure

ProcedureDLL DetachThread(Instance)
  DbgOutFunctionName()
EndProcedure

; --------------------------------------------------------------------------- ;- Exports: deploy.dll - javacpl.exe

ProcedureDLL.l GetCurrentJavaHomeFromRegistry() LoopForever() EndProcedure

; --------------------------------------------------------------------------- ;- Exports: jli.dll for java-rmi.exe and others

CompilerIf #PB_Compiler_Processor = #PB_Processor_x64 ProcedureDLL.l JLI_CmdToArgs() LoopForever() EndProcedure

ProcedureDLL.l JLI_GetStdArgc() LoopForever() EndProcedure

ProcedureDLL.l JLI_GetStdArgs() LoopForever() EndProcedure

ProcedureDLL.l JLI_Launch() LoopForever() EndProcedure

ProcedureDLL.l JLI_MemAlloc() LoopForever() EndProcedure CompilerEndIf