0
+ − 1 /*
+ − 2
+ − 3 Package: dyncall
+ − 4 Library: dyncallback
+ − 5 File: dyncallback/dyncall_thunk_ppc32_sysv.c
+ − 6 Description: Thunks on PowerPC 32-bit System V ABI
+ − 7 License:
+ − 8
281
+ − 9 Copyright (c) 2015-2018 Daniel Adler <dadler@uni-goettingen.de>
0
+ − 10
+ − 11 Permission to use, copy, modify, and distribute this software for any
+ − 12 purpose with or without fee is hereby granted, provided that the above
+ − 13 copyright notice and this permission notice appear in all copies.
+ − 14
+ − 15 THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ − 16 WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ − 17 MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ − 18 ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ − 19 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ − 20 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+ − 21 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ − 22
+ − 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 /*
155
+ − 34 0: 3d 60 00 00 lis r11,0
+ − 35 4: 61 6b 00 01 ori r11,r11,1
+ − 36 8: 81 82 00 14 lwz r12,20(r2)
+ − 37 c: 7d 89 03 a6 mtctr r12
+ − 38 10: 4e 80 04 20 bctr
0
+ − 39 */
+ − 40 p->code_load_hi = 0x3d60U; /* lis r11, HI16(p) */
+ − 41 p->addr_self_hi = hi16(p);
155
+ − 42 p->code_load_lo = 0x616bU; /* ori r11, r11, LO16(p) */
0
+ − 43 p->addr_self_lo = lo16(p);
+ − 44 p->code_jump[0] = 0x818b0014U; /* lwz r12, 20(r11) */
+ − 45 p->code_jump[1] = 0x7d8903a6U; /* mtclr r12 */
+ − 46 p->code_jump[2] = 0x4e800420U; /* bctr */
+ − 47 p->addr_entry = entry;
+ − 48
+ − 49 }
+ − 50
