laag-nasm 2.13.03.2

data/vendor/repo.or.cz/nasm/rdoff/symtab.h

@@ -0,0 +1,55 @@
+/* ----------------------------------------------------------------------- *
+ *   
+ *   Copyright 1996-2009 The NASM Authors - All Rights Reserved
+ *   See the file AUTHORS included with the NASM distribution for
+ *   the specific copyright holders.
+ *
+ *   Redistribution and use in source and binary forms, with or without
+ *   modification, are permitted provided that the following
+ *   conditions are met:
+ *
+ *   * Redistributions of source code must retain the above copyright
+ *     notice, this list of conditions and the following disclaimer.
+ *   * Redistributions in binary form must reproduce the above
+ *     copyright notice, this list of conditions and the following
+ *     disclaimer in the documentation and/or other materials provided
+ *     with the distribution.
+ *     
+ *     THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
+ *     CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
+ *     INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+ *     MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+ *     DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
+ *     CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+ *     SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+ *     NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+ *     LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ *     HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ *     CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+ *     OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ *     EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *
+ * ----------------------------------------------------------------------- */
+
+/*
+ * symtab.h	Header file for symbol table manipulation routines
+ */
+
+#ifndef RDOFF_SYMTAB_H
+#define RDOFF_SYMTAB_H 1
+
+
+typedef struct {
+    char *name;
+    int segment;
+    int32_t offset;
+    int32_t flags;
+} symtabEnt;
+
+void *symtabNew(void);
+void symtabDone(void *symtab);
+void symtabInsert(void *symtab, symtabEnt * ent);
+symtabEnt *symtabFind(void *symtab, const char *name);
+void symtabDump(void *symtab, FILE * of);
+
+#endif

data/vendor/repo.or.cz/nasm/rdoff/test/Makefile

@@ -0,0 +1,10 @@
+RDT  = $(patsubst %.asm,%.rdf,$(wildcard *.asm))
+NASM = ../../nasm
+
+all: $(RDT)
+
+%.rdf: %.asm
+	$(NASM) -f rdf -o $@ -l $*.lst $<
+
+clean:
+	rm -f *.rdf *.rdx *.lst

data/vendor/repo.or.cz/nasm/rdoff/test/makelib.sh

@@ -0,0 +1,14 @@
+#! /bin/sh
+
+[ $1 ] || {
+    echo "Usage: $0 <library name> <module> [...]"
+    exit 1
+}
+
+libname=$1; shift
+
+rdflib c $libname
+
+for f in $*; do
+	rdflib a $libname $f $f
+done

data/vendor/repo.or.cz/nasm/rdoff/test/rdfseg.asm

@@ -0,0 +1,20 @@
+	;; program to test inter-segment production and linkage of RDF objects
+
+	;; [1] should produce segment base ref
+	;; [2] should produce standard relocation
+	
+[GLOBAL _main]
+[EXTERN _puts:	far]
+[BITS 16]
+	
+_main:
+	mov ax, seg _message	; 0000 [1]
+	mov ds, ax		; 0003
+	mov dx, _message	; 0005 [2]
+	call far _puts		; 0008 [2][1]
+	xor ax,ax		; 000D
+	int 21h			; 000F
+	
+[SECTION .data]
+_message:	db 'Hello, World', 10, 13, 0
+	

data/vendor/repo.or.cz/nasm/rdoff/test/rdfseg2.asm

@@ -0,0 +1,12 @@
+	;; library function for rdfseg - this file is linked as a far segment
+
+[BITS 16]
+[GLOBAL _puts]
+_puts:
+	;; can't remember how to print a string in DOS, but if anyone wants
+	;; to actually test this program, it should be fairly easy to put
+	;; in here!
+
+	retf
+
+	

data/vendor/repo.or.cz/nasm/rdoff/test/rdftest1.asm

@@ -0,0 +1,54 @@
+	;; program to test RDOFF production and linkage
+
+	;; items to test include:
+	;;	[1] relocation within the same segment in each module
+	;;	[2] relocation to different segments in same module
+	;;	[3] relocation to same segment in different module
+	;;	[4] relocation to different segment in different module
+	;;	[5] relative relocation to same module
+	;;	[6] relative relocation to different module
+	;;	[7] correct generation of BSS addresses
+
+[SECTION .text]
+[BITS 32]
+	
+_main:
+	mov ax,localdata	; [2] (16 bit) => 66 b8 0000
+	mov eax,localdata2	; [2] (32 bit) => b8 0000000a
+
+[EXTERN _fardata]
+
+	mov eax,[_fardata]	; [4] => a1 00000000 (+20)
+	mov cx,next		; [1] => 66 b9 0012
+next:
+	call localproc		; [5] => e8 00000019
+
+[EXTERN _farproc]
+	mov eax,_farproc	; [3] => b8 00000000 (+40+0)
+	call _farproc		; [6] => e8 -$ (-0+40+0) (=1f)
+
+	mov eax,localbss	; [7] => b8 00000000
+
+[GLOBAL _term]
+_term:	xor ax,ax		; => 66 31 c0
+	int 21h			; => cd 21
+	jmp _term		; => e9 -0a (=fffffff6)
+
+localproc:	
+	ret			; => c3
+
+[GLOBAL _test1proc]
+_test1proc:
+	call localproc		; [5] => e8 -$ (-0+0+?) (=-6=fffffffa)
+	ret			; => c3
+			
+[SECTION .data]
+[GLOBAL localdata2]
+localdata:	db 'localdata',0
+localdata2:	db 'localdata2',0
+farref:		dd _fardata	; [3] => 0 (+20)
+localref:	dd _main	; [2] => 0 (+0)
+
+[SECTION .bss]
+localbss:	resw 4		; reserve 8 bytes BSS
+	

data/vendor/repo.or.cz/nasm/rdoff/test/rdftest2.asm

@@ -0,0 +1,33 @@
+	;; rdftest2.asm - test linkage and generation of RDOFF files
+
+[SECTION .text]
+[BITS 32]
+
+[GLOBAL _farproc]
+[EXTERN _test1proc]
+[EXTERN localdata2]
+[EXTERN _term]
+_farproc:
+	
+	mov bx,localdata2	; [4] 0 => 66 bb 000a(+0)
+	mov eax,_term		; [3] 5 => b8 00000000(+26+0)
+	call _test1proc		; [6] A => e8 fffffff2(-40+0+31)(=ffffffe3)
+
+	mov eax,_farproc	; [1] => b8 00000000(+40)
+	add eax,[_fardata]	; [2] => 03 05 00000000(+20)
+
+	mov ebx,mybssdata	; [7] => bb 00000000(+08)
+	call myproc		; [5] => e8 00000001
+	ret
+
+myproc:
+	add eax,ebx
+	ret
+	
+[SECTION .data]
+[GLOBAL _fardata]
+_fardata:	dw _term	; [4]
+_localref:	dd _farproc	; [2]
+
+[SECTION .bss]
+mybssdata:	resw 1

data/vendor/repo.or.cz/nasm/rdoff/test/rdtlib.asm

@@ -0,0 +1,48 @@
+	;; library functions for rdtmain - test of rdx linking and execution
+
+	;; library function = _strcmp, defined as in C
+
+[SECTION .text]
+[BITS 32]
+
+[GLOBAL _strcmp]
+_strcmp:
+	push ebp
+	mov ebp,esp
+
+	;; ebp+8 = first paramater, ebp+12 = second
+
+	mov esi,[ebp+8]
+	mov edi,[ebp+12]
+
+.loop:
+	mov cl,byte [esi]
+	mov dl,byte [edi]
+	cmp cl,dl
+	jb .below
+	ja .above
+	or cl,cl
+	jz .match
+	inc esi
+	inc edi
+	jmp .loop
+
+.below:	
+	mov eax,-1
+	pop ebp
+	ret
+	
+.above:
+	mov eax,1
+	pop ebp
+	ret
+
+.match:
+	xor eax,eax
+	pop ebp
+	ret
+
+[SECTION .data]
+[GLOBAL _message]
+
+_message:	db 'hello',0

data/vendor/repo.or.cz/nasm/rdoff/test/rdtmain.asm

@@ -0,0 +1,47 @@
+	;; rdtmain - main part of test program for RDX execution.
+	;; returns true (0) if its parameter equals the phrase "hello"
+	;; "hello" is stored in the library part, to complicate the
+	;; linkage.
+
+	;; assemble and link with the following commands:
+	;; nasm -f rdf rdtmain.asm
+	;; nasm -f rdf rdtlib.asm
+	;; ldrdf rdtmain.rdf rdtlib.rdf -o rdxtest.rdx
+
+	;; run with 'rdx rdxtest.rdx [parameters]' on a Linux (or possibly
+	;; other 32 bit OS) systems (x86 architectures only!)
+	;; try using '&& echo Yes' afterwards to find out when it returns 0.
+	
+[EXTERN _strcmp]		; strcmp is an imported function
+[EXTERN _message]		; imported data
+[SECTION .text]
+[BITS 32]
+
+	;; main(int argc,char **argv)
+[GLOBAL _main]
+_main:
+	push ebp
+	mov ebp,esp
+
+	;; ebp+8 = argc, ebp+12 = argv
+
+	cmp dword [ebp+8],2
+	jb error		; cause error if < 1 parameters
+
+	mov eax, [ebp+12]	; eax = argv
+
+	mov ebx, [eax+4]	; ebx = argv[1]
+	mov ecx, _message	; ecx = "hello"
+
+	push ecx
+	push ebx
+	call _strcmp		; compare strings
+	add esp,8		; caller clears stack
+	
+	pop ebp
+	ret			; return return value of _strcmp
+	
+error:
+	mov eax,2		; return 2 on error
+	pop ebp
+	ret

data/vendor/repo.or.cz/nasm/rdoff/test/testlib.asm

@@ -0,0 +1,18 @@
+; program to test retrieval of and linkage to modules in libraries by
+; ldrdf
+
+[SECTION .text]
+[GLOBAL _main]
+[EXTERN _strcmp]
+
+_main:
+	push dword string1
+	push dword string2
+	call _strcmp
+	add esp,8		; doh! clear up stack ;-)
+	ret
+
+[SECTION .data]
+
+string1:	db 'abc',0	; try changing these strings and see
+string2:	db 'abd',0	; what happens!

data/vendor/repo.or.cz/nasm/stdlib/snprintf.c

@@ -0,0 +1,29 @@
+/*
+ * snprintf()
+ *
+ * Implement snprintf() in terms of vsnprintf()
+ */
+
+#include "compiler.h"
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <stdarg.h>
+
+#include "nasmlib.h"
+
+#if !defined(HAVE_SNPRINTF) && !defined(HAVE__SNPRINTF)
+
+int snprintf(char *str, size_t size, const char *format, ...)
+{
+    va_list ap;
+    int rv;
+
+    va_start(ap, format);
+    rv = vsnprintf(str, size, format, ap);
+    va_end(ap);
+
+    return rv;
+}
+
+#endif

data/vendor/repo.or.cz/nasm/stdlib/strlcpy.c

@@ -0,0 +1,51 @@
+/*
+ * Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.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.
+ */
+
+#include "compiler.h"
+
+/*
+ * Copy src to string dst of size siz.  At most siz-1 characters
+ * will be copied.  Always NUL terminates (unless siz == 0).
+ * Returns strlen(src); if retval >= siz, truncation occurred.
+ */
+#ifndef HAVE_STRLCPY
+
+size_t strlcpy(char *dst, const char *src, size_t siz)
+{
+    char *d = dst;
+    const char *s = src;
+    size_t n = siz;
+
+    /* Copy as many bytes as will fit */
+    if (n != 0) {
+	while (--n != 0) {
+	    if ((*d++ = *s++) == '\0')
+		break;
+	}
+    }
+
+    /* Not enough room in dst, add NUL and traverse rest of src */
+    if (n == 0) {
+	if (siz != 0)
+	    *d = '\0';		/* NUL-terminate dst */
+	while (*s++)
+	    ;
+    }
+
+    return(s - src - 1);	/* count does not include NUL */
+}
+
+#endif

data/vendor/repo.or.cz/nasm/stdlib/strnlen.c

@@ -0,0 +1,46 @@
+/* ----------------------------------------------------------------------- *
+ *
+ *   Copyright 1996-2016 The NASM Authors - All Rights Reserved
+ *   See the file AUTHORS included with the NASM distribution for
+ *   the specific copyright holders.
+ *
+ *   Redistribution and use in source and binary forms, with or without
+ *   modification, are permitted provided that the following
+ *   conditions are met:
+ *
+ *   * Redistributions of source code must retain the above copyright
+ *     notice, this list of conditions and the following disclaimer.
+ *   * Redistributions in binary form must reproduce the above
+ *     copyright notice, this list of conditions and the following
+ *     disclaimer in the documentation and/or other materials provided
+ *     with the distribution.
+ *
+ *     THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
+ *     CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
+ *     INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+ *     MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+ *     DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
+ *     CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+ *     SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+ *     NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+ *     LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ *     HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ *     CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+ *     OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ *     EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *
+ * ----------------------------------------------------------------------- */
+
+#include "compiler.h"
+#include <string.h>
+
+#ifndef HAVE_STRNLEN
+
+size_t strnlen(const char *s, size_t maxlen)
+{
+    const char *end = memchr(s, 0, maxlen);
+
+    return end ? (size_t)(end - s) : maxlen;
+}
+
+#endif