Mercurial > pub > dyncall > dyncall
annotate dyncallback/dyncall_thunk_mips.c @ 357:d982a00c2177
- PPC64 asm syntax fix, specifying explicitly comparison mode for cmpi (newer toolchains complain, older ones took optional field of instruction which happened to be same value)
| author | Tassilo Philipp |
|---|---|
| date | Tue, 25 Feb 2020 18:16:13 +0100 |
| parents | f5577f6bf97a |
| children |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 | |
| 3 Package: dyncall | |
| 4 Library: dyncallback | |
| 5 File: dyncallback/dyncall_thunk_mips.c | |
| 6 Description: Thunk - Implementation for MIPS | |
| 7 License: | |
| 8 | |
| 281 | 9 Copyright (c) 2013-2018 Daniel Adler <dadler@uni-goettingen.de>, |
| 0 | 10 Tassilo Philipp <tphilipp@potion-studios.com> |
| 11 | |
| 12 Permission to use, copy, modify, and distribute this software for any | |
| 13 purpose with or without fee is hereby granted, provided that the above | |
| 14 copyright notice and this permission notice appear in all copies. | |
| 15 | |
| 16 THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |
| 17 WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |
| 18 MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |
| 19 ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |
| 20 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |
| 21 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |
| 22 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |
| 23 | |
| 24 */ | |
| 25 | |
| 26 #include "dyncall_thunk.h" | |
| 27 | |
| 97 | 28 static unsigned short hi16(x) { return ( (unsigned short) (((unsigned int)x)>>16UL) ); } |
| 29 static unsigned short lo16(x) { return ( (unsigned short) ((unsigned int)x) ); } | |
| 0 | 30 |
| 31 void dcbInitThunk(DCThunk* p, void (*entry)()) | |
| 32 { | |
| 33 /* | |
| 34 | |
| 35 Thunk Register: $t4 ($12) | |
| 36 According to o32abi: $t9 | |
| 37 | |
|
101
1ce60358fbad
- mips related cleanup, mostly comments, cpp macro lib
cslag
parents:
97
diff
changeset
|
38 'The Linux/MIPS convention is that all PIC calls use t9 to hold the address of |
|
1ce60358fbad
- mips related cleanup, mostly comments, cpp macro lib
cslag
parents:
97
diff
changeset
|
39 the called function.' [See MIPS Run, p.413] |
| 0 | 40 |
| 41 mips thunk code: | |
| 42 lui $t4, %hi(p) | |
| 43 lui $t9, %hi(entry) | |
| 44 ori $t9, $t9, %lo(entry) | |
| 45 jr $t9 | |
| 97 | 46 ori $t4, $t4, %lo(p) ; branch delay slot |
| 0 | 47 |
| 48 | |
| 49 00000000 <thunk>: | |
| 155 | 50 0: 3c0c0000 lui t4,0x0 |
| 51 4: 3c190000 lui t9,0x0 | |
| 52 8: 37390000 ori t9,t9,0x0 | |
| 53 c: 03200008 jr t9 | |
| 54 10: 00200825 move at,at | |
| 55 14: 358c0000 ori t4,t4,0x0 | |
| 56 18: 00200825 move at,at | |
| 57 1c: 00200825 move at,at | |
| 0 | 58 |
| 155 | 59 */ |
| 0 | 60 |
| 61 #if defined(DC__Endian_BIG) | |
| 62 | |
| 63 p->data[0] = 0x3c0c; p->data[1] = hi16(p); /* lui $t4, hi(p) */ | |
| 64 p->data[2] = 0x3c19; p->data[3] = hi16(entry); /* lui $t9, hi(entry) */ | |
| 65 p->data[4] = 0x3739; p->data[5] = lo16(entry); /* ori $t9, $t9, lo(entry) */ | |
| 66 p->jump = 0x03200008; /* jr $t9 */ | |
| 67 p->bddt[0] = 0x358c; p->bddt[1] = lo16(p); /* ori $t4, $t4, lo(p) - branch delay slot */ | |
| 68 | |
| 69 #else /* defined(DC__Endian_LITTLE) */ | |
| 70 | |
| 71 p->data[1] = 0x3c0c; p->data[0] = hi16(p); /* lui $t4, hi(p) */ | |
| 72 p->data[3] = 0x3c19; p->data[2] = hi16(entry); /* lui $t9, hi(entry) */ | |
| 73 p->data[5] = 0x3739; p->data[4] = lo16(entry); /* ori $t9, $t9, lo(entry) */ | |
| 74 p->jump = 0x03200008; /* jr $t9 */ | |
| 75 p->bddt[1] = 0x358c; p->bddt[0] = lo16(p); /* ori $t4, $t4, lo(p) - branch delay slot */ | |
| 76 | |
| 77 #endif | |
| 78 | |
| 79 } | |
| 80 |