--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/dyncall/dyncall_call_x86_nasm.asm	Thu Mar 19 22:24:28 2015 +0100
@@ -0,0 +1,234 @@
+;//////////////////////////////////////////////////////////////////////////////
+;
+; Copyright (c) 2007,2009 Daniel Adler <dadler@uni-goettingen.de>, 
+;                         Tassilo Philipp <tphilipp@potion-studios.com>
+;
+; Permission to use, copy, modify, and distribute this software for any
+; purpose with or without fee is hereby granted, provided that the above
+; copyright notice and this permission notice appear in all copies.
+;
+; THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+;
+;//////////////////////////////////////////////////////////////////////////////
+
+;///////////////////////////////////////////////////////////////////////
+;
+;	dyncall_call_x86_nasm.nasm
+;
+;	X86 Calls for nasm assembler
+;
+;///////////////////////////////////////////////////////////////////////
+
+
+    BITS 32
+    section .text
+
+;///////////////////////////////////////////////////////////////////////
+; CSYM macro
+;///////////////////////////////////////////////////////////////////////
+
+%ifdef BUILD_OS_windows
+
+%macro EXPORT_C 1
+  global _%1
+_%1:
+%endmacro
+
+%else
+
+%macro EXPORT_C 1
+  global %1
+%1:
+%endmacro
+
+%endif
+
+; -----------------------------------------------------------------------------
+; Calling Convention x86 standard C
+; - all arguments are on the stack
+; - caller cleans up stack
+;
+; C proto 
+;   dcCallC(DCptr funptr, DCptr args, DCsize size)
+; -----------------------------------------------------------------------------
+
+EXPORT_C dcCall_x86_cdecl
+
+	push ebp              ; prolog 
+	mov  ebp, esp         
+
+	; arguments:
+	;
+	; funptr  ebp+8
+	; args    ebp+12
+	; size    ebp+16
+	; result  ebp+20
+
+	push esi              ; save esi, edi
+	push edi
+
+	mov  esi, [ebp+12]    ; esi = pointer on args
+	mov  ecx, [ebp+16]    ; ecx = size
+
+	sub  esp, ecx         ; cdecl call: allocate 'size' bytes on stack
+	mov  edi, esp         ; edi = stack args
+
+	rep movsb             ; copy arguments
+
+	call [ebp+8]          ; call function
+
+	add  esp, [ebp+16]    ; cdecl call: cleanup stack
+
+	pop  edi              ; restore edi, esi
+	pop  esi
+
+	mov  esp, ebp         ; epilog
+	pop  ebp
+
+	ret
+
+; -----------------------------------------------------------------------------
+; Calling Convention x86 microsoft thiscall
+; - thispointer is in ECX, rest is on the stack
+; - callee cleans up stack
+;  
+; C proto
+;   dcCallThisMS(DCptr funptr, DCptr args, DCsize size)
+; -----------------------------------------------------------------------------
+EXPORT_C dcCall_x86_win32_msthis
+    
+	push ebp              ; prolog 
+	mov  ebp, esp         
+
+	; arguments:
+	;
+	; funptr  ebp+8
+	; args    ebp+12
+	; size    ebp+16
+
+	push esi              ; save esi, edi
+	push edi
+
+	mov  esi, [ebp+12]    ; esi = pointer on args
+	mov  ecx, [ebp+16]    ; ecx = size
+
+	mov  eax, [esi]       ; eax = this pointer
+	add  esi, 4           ; increment args pointer by thisptr
+	sub  ecx, 4           ; decrement size by sizeof(thisptr)
+
+	sub  esp, ecx         ; allocate argument-block on stack
+	mov  edi, esp         ; edi = stack args
+
+	rep movsb             ; copy arguments
+
+	mov  ecx, eax         ; ecx = this pointer
+
+	call [ebp+8]          ; call function (thiscall: cleanup by callee)
+
+	pop  edi              ; restore edi, esi
+	pop  esi
+
+	mov  esp, ebp         ; epilog
+	pop  ebp
+
+	ret    
+
+; -----------------------------------------------------------------------------
+; Calling Convention x86 win32 stdcall
+; - all arguments are passed by stack
+; - callee cleans up stack
+; 
+; C proto
+;   dcCallStd(DCptr funptr, DCptr args, DCsize size)
+; -----------------------------------------------------------------------------
+EXPORT_C dcCall_x86_win32_std
+
+	push ebp              ; prolog 
+	mov  ebp, esp         
+
+	; arguments:
+	;
+	; funptr  ebp+8
+	; args    ebp+12
+	; size    ebp+16
+
+	push esi              ; save esi, edi
+	push edi
+
+	mov  esi, [ebp+12]    ; esi = pointer on args
+	mov  ecx, [ebp+16]    ; ecx = size
+
+	sub  esp, ecx         ; stdcall: allocate 'size'-8 bytes on stack
+	mov  edi, esp         ; edi = stack args
+
+	rep movsb             ; copy arguments
+
+	call [ebp+8]          ; call function (stdcall: cleanup by callee)
+
+	pop  edi              ; restore edi, esi
+	pop  esi
+
+	mov  esp, ebp         ; epilog
+	pop  ebp
+
+	ret
+
+; -----------------------------------------------------------------------------
+; Calling Convention x86 win32 fastcall
+; - first two integer (up to 32bits) are passed in ECX and EDX
+; - others are passed on the stack
+; - callee cleans up stack
+; 
+; C proto
+;   dcCallFast(DCptr funptr, DCptr args, DCsize size)
+; -----------------------------------------------------------------------------
+EXPORT_C dcCall_x86_win32_fast
+
+	push ebp              ; prolog 
+	mov  ebp, esp
+
+	; arguments:
+	;
+	; funptr  ebp+8
+	; args    ebp+12
+	; size    ebp+16
+
+	push esi              ; save esi, edi
+	push edi
+
+	mov  esi, [ebp+12]    ; esi = pointer on args
+	mov  ecx, [ebp+16]    ; ecx = size
+	mov  eax, [esi]       ; eax = first argument
+	mov  edx, [esi+4]     ; edx = second argument
+	add  esi, 8           ; increment source pointer
+	sub  ecx, 8           ; decrement size by 8
+
+	sub  esp, ecx         ; fastcall: allocate 'size'-8 bytes on stack
+	mov  edi, esp         ; edi = stack args
+
+	rep movsb             ; copy arguments
+
+	mov  ecx, eax         ; ecx = first argument
+
+	call [ebp+8]          ; call function (fastcall: cleanup by callee)
+
+	pop  edi              ; restore edi, esi
+	pop  esi
+
+	mov  esp, ebp         ; epilog
+	pop  ebp
+
+	ret    
+
+; Stack markings for ELF/GNU to specify no executable stack */
+
+%ifidn __OUTPUT_FORMAT__,elf
+section .note.GNU-stack noalloc noexec nowrite progbits
+%endif
+