x86asm: Add lzcnt/tzcnt support
[tinycc.git] / c67-link.c
blob514689c55b72a832e07b025a315bdea61812c2af
1 #ifdef TARGET_DEFS_ONLY
3 #define EM_TCC_TARGET EM_C60
5 /* relocation type for 32 bit data relocation */
6 #define R_DATA_32 R_C60_32
7 #define R_DATA_PTR R_C60_32
8 #define R_JMP_SLOT R_C60_JMP_SLOT
9 #define R_GLOB_DAT R_C60_GLOB_DAT
10 #define R_COPY R_C60_COPY
11 #define R_RELATIVE R_C60_RELATIVE
13 #define R_NUM R_C60_NUM
15 #define ELF_START_ADDR 0x00000400
16 #define ELF_PAGE_SIZE 0x1000
18 #define PCRELATIVE_DLLPLT 0
19 #define RELOCATE_DLLPLT 0
21 #else /* !TARGET_DEFS_ONLY */
23 #include "tcc.h"
25 /* Returns 1 for a code relocation, 0 for a data relocation. For unknown
26 relocations, returns -1. */
27 int code_reloc (int reloc_type)
29 switch (reloc_type) {
30 case R_C60_32:
31 case R_C60LO16:
32 case R_C60HI16:
33 case R_C60_GOT32:
34 case R_C60_GOTOFF:
35 case R_C60_GOTPC:
36 case R_C60_COPY:
37 return 0;
39 case R_C60_PLT32:
40 return 1;
42 return -1;
45 /* Returns an enumerator to describe whether and when the relocation needs a
46 GOT and/or PLT entry to be created. See tcc.h for a description of the
47 different values. */
48 int gotplt_entry_type (int reloc_type)
50 switch (reloc_type) {
51 case R_C60_32:
52 case R_C60LO16:
53 case R_C60HI16:
54 case R_C60_COPY:
55 return NO_GOTPLT_ENTRY;
57 case R_C60_GOTOFF:
58 case R_C60_GOTPC:
59 return BUILD_GOT_ONLY;
61 case R_C60_PLT32:
62 case R_C60_GOT32:
63 return ALWAYS_GOTPLT_ENTRY;
65 return -1;
68 ST_FUNC unsigned create_plt_entry(TCCState *s1, unsigned got_offset, struct sym_attr *attr)
70 tcc_error("C67 got not implemented");
71 return 0;
74 /* relocate the PLT: compute addresses and offsets in the PLT now that final
75 address for PLT and GOT are known (see fill_program_header) */
76 ST_FUNC void relocate_plt(TCCState *s1)
78 uint8_t *p, *p_end;
80 if (!s1->plt)
81 return;
83 p = s1->plt->data;
84 p_end = p + s1->plt->data_offset;
86 if (p < p_end) {
87 /* XXX: TODO */
88 while (p < p_end) {
89 /* XXX: TODO */
94 void relocate(TCCState *s1, ElfW_Rel *rel, int type, unsigned char *ptr, addr_t addr, addr_t val)
96 switch(type) {
97 case R_C60_32:
98 *(int *)ptr += val;
99 break;
100 case R_C60LO16:
102 uint32_t orig;
104 /* put the low 16 bits of the absolute address add to what is
105 already there */
106 orig = ((*(int *)(ptr )) >> 7) & 0xffff;
107 orig |= (((*(int *)(ptr+4)) >> 7) & 0xffff) << 16;
109 /* patch both at once - assumes always in pairs Low - High */
110 *(int *) ptr = (*(int *) ptr & (~(0xffff << 7)) ) |
111 (((val+orig) & 0xffff) << 7);
112 *(int *)(ptr+4) = (*(int *)(ptr+4) & (~(0xffff << 7)) ) |
113 ((((val+orig)>>16) & 0xffff) << 7);
115 break;
116 case R_C60HI16:
117 break;
118 default:
119 fprintf(stderr,"FIXME: handle reloc type %x at %x [%p] to %x\n",
120 type, (unsigned) addr, ptr, (unsigned) val);
121 break;
125 #endif /* !TARGET_DEFS_ONLY */