| 0,0 → 1,48 |
|---|
| #include"mcoff.h" |
| #include<stdlib.h> |
| #include"string.h" |
| |
| /* static inline void nprintf(char * s,int n) |
| { |
| printf("nprintf(%u, '",n); |
| for(;n;n--) |
| putch(*s++); |
| printf("')"); |
| } */ |
| |
| SYMENT * find_coff_symbol(coffobj_t * obj,char * objname) |
| { |
| int namelen; |
| int symno; |
| int xlen; |
| SYMENT * symtab; |
| char * symnamep,symnamelen; |
| symtab=obj->co_symtab; |
| namelen=strlen(objname); |
| for(symno=0;symno<obj->co_filehdr->f_nsyms;symno++,symtab++) |
| { |
| if(symtab->e.e.e_zeroes==0) |
| { |
| symnamep=(char *)(((long)obj->co_strtab)+symtab->e.e.e_offset); |
| symnamelen=strlen(symnamep); |
| /* printf("strtab=%u %x %u ",symtab->e.e.e_offset,symnamep,symnamelen); */ |
| } else { |
| symnamep=(char *)symtab->e.e_name; |
| symnamelen=strlen(symnamep); |
| if(symnamelen>E_SYMNMLEN) |
| symnamelen=E_SYMNMLEN; |
| } |
| /* nprintf(symnamep,symnamelen); |
| printf("\n"); */ |
| if(symtab->e_scnum!=0 && namelen==symnamelen && !strncmp(objname,symnamep,namelen)) |
| return symtab; |
| } |
| return NULL; |
| } |
| |
| unsigned long mcoff_get_ref(coffobj_t * obj,char * symname) |
| { |
| SYMENT * sym=find_coff_symbol(obj,symname); |
| if(!sym) return 0; |
| return sym->e_value+obj->co_sections[sym->e_scnum-1].s_scnptr+obj->co_loadaddr; |
| } |