codekingpro/portable-devtools

1/*
2 * this is the internal transfer function.
3 *
4 * HISTORY
5 * 16-Oct-20  Jesse Gorzinski <jgorzins@us.ibm.com>
6 *      Copied from Linux PPC64 implementation
7 * 04-Sep-18  Alexey Borzenkov  <snaury@gmail.com>
8 *      Workaround a gcc bug using manual save/restore of r30
9 * 21-Mar-18  Tulio Magno Quites Machado Filho  <tuliom@linux.vnet.ibm.com>
10 *      Added r30 to the list of saved registers in order to fully comply with
11 *      both ppc64 ELFv1 ABI and the ppc64le ELFv2 ABI, that classify this
12 *      register as a nonvolatile register used for local variables.
13 * 21-Mar-18  Laszlo Boszormenyi  <gcs@debian.org>
14 *      Save r2 (TOC pointer) manually.
15 * 10-Dec-13  Ulrich Weigand  <uweigand@de.ibm.com>
16 *	Support ELFv2 ABI.  Save float/vector registers.
17 * 09-Mar-12 Michael Ellerman <michael@ellerman.id.au>
18 *      64-bit implementation, copied from 32-bit.
19 * 07-Sep-05 (py-dev mailing list discussion)
20 *      removed 'r31' from the register-saved.  !!!! WARNING !!!!
21 *      It means that this file can no longer be compiled statically!
22 *      It is now only suitable as part of a dynamic library!
23 * 14-Jan-04  Bob Ippolito <bob@redivi.com>
24 *      added cr2-cr4 to the registers to be saved.
25 *      Open questions: Should we save FP registers?
26 *      What about vector registers?
27 *      Differences between darwin and unix?
28 * 24-Nov-02  Christian Tismer  <tismer@tismer.com>
29 *      needed to add another magic constant to insure
30 *      that f in slp_eval_frame(PyFrameObject *f)
31 *      STACK_REFPLUS will probably be 1 in most cases.
32 *      gets included into the saved stack area.
33 * 04-Oct-02  Gustavo Niemeyer <niemeyer@conectiva.com>
34 *      Ported from MacOS version.
35 * 17-Sep-02  Christian Tismer  <tismer@tismer.com>
36 *      after virtualizing stack save/restore, the
37 *      stack size shrunk a bit. Needed to introduce
38 *      an adjustment STACK_MAGIC per platform.
39 * 15-Sep-02  Gerd Woetzel       <gerd.woetzel@GMD.DE>
40 *      slightly changed framework for sparc
41 * 29-Jun-02  Christian Tismer  <tismer@tismer.com>
42 *      Added register 13-29, 31 saves. The same way as
43 *      Armin Rigo did for the x86_unix version.
44 *      This seems to be now fully functional!
45 * 04-Mar-02  Hye-Shik Chang  <perky@fallin.lv>
46 *      Ported from i386.
47 * 31-Jul-12  Trevor Bowen    <trevorbowen@gmail.com>
48 *      Changed memory constraints to register only.
49 */
50
51#define STACK_REFPLUS 1
52
53#ifdef SLP_EVAL
54
55#define STACK_MAGIC 6
56
57#if defined(__ALTIVEC__)
58#define ALTIVEC_REGS \
59       "v20", "v21", "v22", "v23", "v24", "v25", "v26", "v27", \
60       "v28", "v29", "v30", "v31",
61#else
62#define ALTIVEC_REGS
63#endif
64
65#define REGS_TO_SAVE "r14", "r15", "r16", "r17", "r18", "r19", "r20",  \
66       "r21", "r22", "r23", "r24", "r25", "r26", "r27", "r28", "r29",  \
67       "r31",                                                    \
68       "fr14", "fr15", "fr16", "fr17", "fr18", "fr19", "fr20", "fr21", \
69       "fr22", "fr23", "fr24", "fr25", "fr26", "fr27", "fr28", "fr29", \
70       "fr30", "fr31", \
71       ALTIVEC_REGS \
72       "cr2", "cr3", "cr4"
73
74static int
75slp_switch(void)
76{
77    int err;
78    long *stackref, stsizediff;
79    void * toc;
80    void * r30;
81    __asm__ volatile ("" : : : REGS_TO_SAVE);
82    __asm__ volatile ("std 2, %0" : "=m" (toc));
83    __asm__ volatile ("std 30, %0" : "=m" (r30));
84    __asm__ ("mr %0, 1" : "=r" (stackref) : );
85    {
86        SLP_SAVE_STATE(stackref, stsizediff);
87        __asm__ volatile (
88            "mr 11, %0\n"
89            "add 1, 1, 11\n"
90            : /* no outputs */
91            : "r" (stsizediff)
92            : "11"
93            );
94        SLP_RESTORE_STATE();
95    }
96    __asm__ volatile ("ld 30, %0" : : "m" (r30));
97    __asm__ volatile ("ld 2, %0" : : "m" (toc));
98    __asm__ volatile ("" : : : REGS_TO_SAVE);
99    __asm__ volatile ("li %0, 0" : "=r" (err));
100    return err;
101}
102
103#endif
104