X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=AcessNative%2Fld-acess_src%2Fbinary.c;h=d04ac6d2504026c0f93de0ae832cb2793e543f46;hb=f64e0f5e295394f2e75900e6c92b1d347f62f59d;hp=e9408ef9a63e9b07bb8975c33be7d7661d286058;hpb=6d32a3c22e659994d7ae6164ba3722ab12d11421;p=tpg%2Facess2.git

diff --git a/AcessNative/ld-acess_src/binary.c b/AcessNative/ld-acess_src/binary.c
index e9408ef9..d04ac6d2 100644
--- a/AcessNative/ld-acess_src/binary.c
+++ b/AcessNative/ld-acess_src/binary.c
@@ -1,7 +1,11 @@
 /*
- * AcessNative
+ * AcessNative Dynamic Linker
+ * - By John Hodge (thePowersGang)
+ * 
+ * binary.c
+ * - Provides binary loading and type abstraction
  */
-#define DEBUG	1
+#define DEBUG	0
 #include "common.h"
 #include <stdint.h>
 #include <stdio.h>
@@ -24,6 +28,7 @@ extern uintptr_t	ElfRelocate(void *Base);
 extern int	ElfGetSymbol(void *Base, char *Name, uintptr_t *ret, size_t *size);
 extern int	ciNumBuiltinSymbols;
 extern tSym	caBuiltinSymbols[];
+extern char	**gEnvP;
 
 // === PROTOTYPES ===
 void	Binary_AddToList(const char *Filename, void *Base, tBinFmt *Format);
@@ -109,7 +114,8 @@ void *Binary_LoadLibrary(const char *Name)
 	}
 
 	ret = Binary_Load(path, (uintptr_t*)&entry);
-	printf("LOADED '%s' to %p (Entry=%p)\n", path, ret, entry);
+	if( ret != (void*)-1 )
+		Debug("LOADED '%s' to %p (Entry=%p)", path, ret, entry);
 	free(path);
 	
 	#if DEBUG
@@ -120,7 +126,7 @@ void *Binary_LoadLibrary(const char *Name)
 		#if DEBUG
 		printf("Calling '%s' entry point %p\n", Name, entry);
 		#endif
-		entry(ret, 0, argv, NULL);
+		entry(ret, 0, argv, gEnvP);
 	}
 
 	return ret;
@@ -252,6 +258,8 @@ int Binary_GetSymbol(const char *SymbolName, uintptr_t *Value, size_t *Size)
 	}
 
 	//printf("Binary_GetSymbol: RETURN 0, not found\n");
-	
+	printf("--- ERROR: Unable to find symbol '%s'\n", SymbolName);
+
+	exit( -1 );
 	return 0;
 }