#include <stddef.h> #include <stdio.h> #include <string.h> void *func[8], **pfunc; typedef struct xxx xxx_t; struct xxx { int dummy; void **pfunc; } q; #define XF_strcpy 3 #define XF_printf 4 #define LABEL(x) \ asm volatile ( \ #if defined(__i386__) #define EXPORT_FUNC(x) \ asm volatile ( \ " .globl mon_" #x "\n" \ "mon_" #x ":\n" \ " movl %0, %%eax\n" \ " movl pfunc, %%ecx\n" \ " jmp *(%%ecx,%%eax)\n" \ : : "i"(XF_ ## x * sizeof(void *)) : "eax", "ecx"); #elif defined(__powerpc__) #define EXPORT_FUNC(x) \ asm volatile ( \ " .globl mon_" #x "\n" \ "mon_" #x ":\n" \ " lwz %%r11, %0(%%r29)\n" \ " lwz %%r11, %1(%%r11)\n" \ " mtctr %%r11\n" \ " bctr\n" \ : : "i"(offsetof(xxx_t, pfunc)), "i"(XF_ ## x * sizeof(void *)) : "r11", "r29"); #elif defined(__arm__) #define EXPORT_FUNC(x) \ asm volatile ( \ " .globl mon_" #x "\n" \ "mon_" #x ":\n" \ " ldr ip, [r8, %0]\n" \ " ldr pc, [ip, %1]\n" \ : : "i"(offsetof(xxx_t, pfunc)), "i"(XF_ ## x * sizeof(void *)) : "ip"); #elif defined(__mips__) #define EXPORT_FUNC(x) \ asm volatile ( \ " .globl mon_" #x "\n" \ "mon_" #x ":\n" \ " lw $25, %0($26)\n" \ " lw $25, %1($25)\n" \ " jr $25\n" \ : : "i"(offsetof(xxx_t, pfunc)), "i"(XF_ ## x * sizeof(void *)) : "t9"); #else #error [No stub code for this arch] #endif void dummy(void) { EXPORT_FUNC(printf) EXPORT_FUNC(strcpy) } int main(void) { #if defined(__i386__) xxx_t *pq; #elif defined(__powerpc__) register volatile xxx_t *pq asm("r29"); #elif defined(__arm__) register volatile xxx_t *pq asm("r8"); #elif defined(__mips__) register volatile xxx_t *pq asm("k0"); #endif char buf[32]; func[XF_strcpy] = strcpy; func[XF_printf] = printf; pq = &q; pq->pfunc = pfunc = func; mon_strcpy(buf, "test"); mon_printf("hi %s %d z\n", buf, 444); return 0; }