1/*
2            Copyright Edward Nevill + Oliver Kowalke 2015
3   Distributed under the Boost Software License, Version 1.0.
4      (See accompanying file LICENSE_1_0.txt or copy at
5          http://www.boost.org/LICENSE_1_0.txt)
6*/
7/*******************************************************
8 *                                                     *
9 *  -------------------------------------------------  *
10 *  |  0  |  1  |  2  |  3  |  4  |  5  |  6  |  7  |  *
11 *  -------------------------------------------------  *
12 *  | 0x0 | 0x4 | 0x8 | 0xc | 0x10| 0x14| 0x18| 0x1c|  *
13 *  -------------------------------------------------  *
14 *  |    d8     |    d9     |    d10    |    d11    |  *
15 *  -------------------------------------------------  *
16 *  -------------------------------------------------  *
17 *  |  8  |  9  |  10 |  11 |  12 |  13 |  14 |  15 |  *
18 *  -------------------------------------------------  *
19 *  | 0x20| 0x24| 0x28| 0x2c| 0x30| 0x34| 0x38| 0x3c|  *
20 *  -------------------------------------------------  *
21 *  |    d12    |    d13    |    d14    |    d15    |  *
22 *  -------------------------------------------------  *
23 *  -------------------------------------------------  *
24 *  |  16 |  17 |  18 |  19 |  20 |  21 |  22 |  23 |  *
25 *  -------------------------------------------------  *
26 *  | 0x40| 0x44| 0x48| 0x4c| 0x50| 0x54| 0x58| 0x5c|  *
27 *  -------------------------------------------------  *
28 *  |    x19    |    x20    |    x21    |    x22    |  *
29 *  -------------------------------------------------  *
30 *  -------------------------------------------------  *
31 *  |  24 |  25 |  26 |  27 |  28 |  29 |  30 |  31 |  *
32 *  -------------------------------------------------  *
33 *  | 0x60| 0x64| 0x68| 0x6c| 0x70| 0x74| 0x78| 0x7c|  *
34 *  -------------------------------------------------  *
35 *  |    x23    |    x24    |    x25    |    x26    |  *
36 *  -------------------------------------------------  *
37 *  -------------------------------------------------  *
38 *  |  32 |  33 |  34 |  35 |  36 |  37 |  38 |  39 |  *
39 *  -------------------------------------------------  *
40 *  | 0x80| 0x84| 0x88| 0x8c| 0x90| 0x94| 0x98| 0x9c|  *
41 *  -------------------------------------------------  *
42 *  |    x27    |    x28    |    FP     |     LR    |  *
43 *  -------------------------------------------------  *
44 *  -------------------------------------------------  *
45 *  |  40 |  41 |  42 | 43  |           |           |  *
46 *  -------------------------------------------------  *
47 *  | 0xa0| 0xa4| 0xa8| 0xac|           |           |  *
48 *  -------------------------------------------------  *
49 *  |     PC    |   align   |           |           |  *
50 *  -------------------------------------------------  *
51 *                                                     *
52 *******************************************************/
53
54.text
55.globl _make_fcontext
56.balign 16
57
58_make_fcontext:
59    ; shift address in x0 (allocated stack) to lower 16 byte boundary
60    and x0, x0, ~0xF
61
62    ; reserve space for context-data on context-stack
63    sub  x0, x0, #0xb0
64
65    ; third arg of make_fcontext() == address of context-function
66    ; store address as a PC to jump in
67    str  x2, [x0, #0xa0]
68
69    adr  x1, finish
70
71    ; save address of finish as return-address for context-function
72    ; will be entered after context-function returns (LR register)
73    str  x1, [x0, #0x98]
74
75    ret  lr ; return pointer to context-data (x0)
76
77finish:
78    ; exit code is zero
79    mov  x0, #0
80    ; exit application
81    bl  __exit
82
83
84