mirror of
				https://github.com/netwide-assembler/nasm.git
				synced 2025-10-10 00:25:06 -04:00 
			
		
		
		
	
		
			
				
	
	
		
			60 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			60 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /* rdx.c	RDOFF Object File loader program
 | |
|  *
 | |
|  * The Netwide Assembler is copyright (C) 1996 Simon Tatham and
 | |
|  * Julian Hall. All rights reserved. The software is
 | |
|  * redistributable under the license given in the file "LICENSE"
 | |
|  * distributed in the NASM archive.
 | |
|  */
 | |
| 
 | |
| /* note: most of the actual work of this program is done by the modules
 | |
|    "rdfload.c", which loads and relocates the object file, and by "rdoff.c",
 | |
|    which contains general purpose routines to manipulate RDOFF object
 | |
|    files. You can use these files in your own program to load RDOFF objects
 | |
|    and execute the code in them in a similar way to what is shown here. */
 | |
| 
 | |
| #include "compiler.h"
 | |
| 
 | |
| #include <stdio.h>
 | |
| #include <stdlib.h>
 | |
| 
 | |
| #include "rdfload.h"
 | |
| #include "symtab.h"
 | |
| 
 | |
| typedef int (*main_fn) (int, char **);  /* Main function prototype */
 | |
| 
 | |
| int main(int argc, char **argv)
 | |
| {
 | |
|     rdfmodule *m;
 | |
|     main_fn code;
 | |
|     symtabEnt *s;
 | |
| 
 | |
|     if (argc < 2) {
 | |
|         puts("usage: rdx <rdoff-executable> [params]\n");
 | |
|         exit(255);
 | |
|     }
 | |
| 
 | |
|     m = rdfload(argv[1]);
 | |
| 
 | |
|     if (!m) {
 | |
|         rdfperror("rdx", argv[1]);
 | |
|         exit(255);
 | |
|     }
 | |
| 
 | |
|     rdf_relocate(m);            /* in this instance, the default relocation
 | |
|                                    values will work fine, but they may need changing
 | |
|                                    in other cases... */
 | |
| 
 | |
|     s = symtabFind(m->symtab, "_main");
 | |
|     if (!s) {
 | |
|         fprintf(stderr, "rdx: could not find symbol '_main' in '%s'\n",
 | |
|                 argv[1]);
 | |
|         exit(255);
 | |
|     }
 | |
| 
 | |
|     code = (main_fn)(size_t) s->offset;
 | |
| 
 | |
|     argv++, argc--;             /* remove 'rdx' from command line */
 | |
| 
 | |
|     return code(argc, argv);    /* execute */
 | |
| }
 |