aboutsummaryrefslogtreecommitdiffstats
path: root/bootstrap-nsh_sfc-functional-virl.sh
blob: 034ea9bfd42a977f380df031f78e8ca63d89d605 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
#!/bin/bash
# Copyright (c) 2017 Cisco and/or its affiliates.
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at:
#
#     http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.

set -x

cat /etc/hostname
cat /etc/hosts

ARCHIVE_ARTIFACTS=(log.html output.xml report.html)

export DEBIAN_FRONTEND=noninteractive
sudo apt-get -y update
sudo apt-get -y install libpython2.7-dev python-virtualenv

if [ -f "/etc/redhat-release" ]; then
    OS="centos7"
else
    OS="ubuntu1604"
fi

VIRL_SERVERS=("10.30.51.28" "10.30.51.29" "10.30.51.30")
VIRL_SERVER=""

VIRL_USERNAME=jenkins-in
VIRL_PKEY=priv_key
VIRL_SERVER_STATUS_FILE="status"
VIRL_SERVER_EXPECTED_STATUS="PRODUCTION"

STREAM="master"

SCRIPT_DIR="$( cd "$( dirname "${BASH_SOURCE[0]}" )" && pwd )"
export PYTHONPATH=${SCRIPT_DIR}

if [ "${OS}" == "ubuntu1604" ]; then
    VIRL_TOPOLOGY=$(cat ${SCRIPT_DIR}/VIRL_TOPOLOGY_UBUNTU)
    VIRL_RELEASE=$(cat ${SCRIPT_DIR}/VIRL_RELEASE_UBUNTU)
elif [ "${OS}" == "centos7" ]; then
    VIRL_TOPOLOGY=$(cat ${SCRIPT_DIR}/VIRL_TOPOLOGY_CENTOS)
    VIRL_RELEASE=$(cat ${SCRIPT_DIR}/VIRL_RELEASE_CENTOS)
else
    echo Unsupported OS, exiting
    exit 1
fi

SSH_OPTIONS="-i ${VIRL_PKEY} -o StrictHostKeyChecking=no -o UserKnownHostsFile=/dev/null -o BatchMode=yes -o LogLevel=error"

function ssh_do() {
    echo
    echo "### "  ssh $@
    ssh ${SSH_OPTIONS} $@
}

rm -f ${VIRL_PKEY}
cat > ${VIRL_PKEY} <<EOF
-----BEGIN RSA PRIVATE KEY-----
MIIEpQIBAAKCAQEA+IHXq87GcqMR1C47rzx6Cbip5Ghq8pKrbqKrP5Nf41HcYrT6
GOXl9nFWKsMOzIlIn+8y7Il27eZh7csQGApbg8QLiHMtcYEmWNzKZpkqg4nuAPxX
VXwlKgnKX902SrET9Gp9TDayiHtCRWVfrlPPPSA0UEXW6BjLN/uHJ+W/Xzrrab+9
asBVa05vT2W6n0KJ66zfCaeDM912mQ6SttscAwFoWDmdHlegiVqrlIG2ABxOvxxz
L3dM3iSmlmQlzv9bThjo+nI4KFYh6m5wrZmAo5r/4q9CIJc21HVnTqkGOWJIZz6J
73lePJVSq5gYqaoGw3swFEA/MDkOx7baWKSoLQIDAQABAoIBAQCNBeolNp+JWJ76
gQ4fwLsknyXSV6sxYyhkDW4PEwwcTU06uqce0AAzXVffxne0fMe48x47+zqBgPbb
4huM+Pu8B9nfojUMr5TaYtl9Zbgpk3F8H7dT7LKOa6XrxvZTZrADSRc30+Z26zPN
e9zTaf42Gvt0/l0Zs1BHwbaOXqO+XuwJ3/F9Sf3PQYWXD3EOWjpHDP/X/1vAs6lV
SLkm6J/9KKE1m6I6LTYjIXuYt4SXybW6N2TSy54hhQtYcDUnIU2hR/PHVWKrGA0J
kELgrtTNTdbML27O5gFWU4PLUEYTZ9fN11D6qUZKxLcPOiPPHXkiILMRCCnG5DYI
ksBAU/YlAoGBAPxZO9VO18TYc8THV1nLKcvT2+1oSs1UcA2wNQMU55t910ZYinRa
MRwUhMOf8Mv5wOeiZaRICQB1PnVWtDVmGECgPpK6jUxqAwn8rgJcnoafLGL5YKMY
RVafTe6N5LXgCaOcJrk21wxs6v7ninEbUxxc575urOvZMBkymDw91dwbAoGBAPwa
YRhKhrzFKZzdK0RadVjnxKvolUllpoqqg3XuvmeAJHAOAnaOgVWq68NAcp5FZJv0
2D2Up7TX8pjf9MofP1SJbcraKBpK4NzfNkA0dSdEi+FhVofAJ9umB2o5LW1n7sab
UIrjsdzSJK/9Zb9yTTHPyibYzNEgaJV1HsbxfEFXAoGAYO2RmvRm0phll18OQVJV
IpKk9kLKAKZ/R/K32hAsikBC8SVPQTPniyaifFWx81diblalff2hX4ipTf7Yx24I
wMIMZuW7Im/R7QMef4+94G3Bad7p7JuE/qnAEHJ2OBnu+eYfxaK35XDsrq6XMazS
NqHE7hOq3giVfgg+C12hCKMCgYEAtu9dbYcG5owbehxzfRI2/OCRsjz/t1bv1seM
xVMND4XI6xb/apBWAZgZpIFrqrWoIBM3ptfsKipZe91ngBPUnL9s0Dolx452RVAj
yctHB8uRxWYgqDkjsxtzXf1HnZBBkBS8CUzYj+hdfuddoeKLaY3invXLCiV+PpXS
U4KAK9kCgYEAtSv0m5+Fg74BbAiFB6kCh11FYkW94YI6B/E2D/uVTD5dJhyEUFgZ
cWsudXjMki8734WSpMBqBp/J8wG3C9ZS6IpQD+U7UXA+roB7Qr+j4TqtWfM+87Rh
maOpG56uAyR0w5Z9BhwzA3VakibVk9KwDgZ29WtKFzuATLFnOtCS46E=
-----END RSA PRIVATE KEY-----
EOF
chmod 600 ${VIRL_PKEY}

#
# Pick a random host from the array of VIRL servers, and attempt
# to reach it and verify it's status.
#
# The server must be reachable, and have a "status" file with
# the content "PRODUCTION", to be selected.
#
# If the server is not reachable, or does not have the correct
# status, remove it from the array and start again.
#
# Abort if there are no more servers left in the array.
#
while [[ ! "$VIRL_SERVER" ]]
do
    num_hosts=${#VIRL_SERVERS[@]}
    if [ $num_hosts == 0 ]
    then
        echo "No more VIRL candidate hosts available, failing."
        exit 127
    fi
    element=$[ $RANDOM % $num_hosts ]
    virl_server_candidate=${VIRL_SERVERS[$element]}
    virl_server_status=$(ssh ${SSH_OPTIONS} ${VIRL_USERNAME}@${virl_server_candidate} cat $VIRL_SERVER_STATUS_FILE 2>&1)
    echo VIRL HOST $virl_server_candidate status is \"$virl_server_status\"
    if [ "$virl_server_status" == "$VIRL_SERVER_EXPECTED_STATUS" ]
    then
        # Candidate is in good status. Select this server.
        VIRL_SERVER="$virl_server_candidate"
    else
        # Candidate is in bad status. Remove from array.
        VIRL_SERVERS=("${VIRL_SERVERS[@]:0:$element}" "${VIRL_SERVERS[@]:$[$element+1]}")
    fi
done

# Download VPP and NSH SFC packages from the current branch
echo Downloading packages...
bash ${SCRIPT_DIR}/resources/tools/scripts/download_nsh_sfc_pkgs.sh ${STREAM} ${OS}

if [ "${OS}" == "centos7" ]; then
    VPP_PKGS=(*.rpm)
else
    VPP_PKGS=(*.deb)
fi
echo ${VPP_PKGS[@]}
VIRL_DIR_LOC="/tmp"
VPP_PKGS_FULL=(${VPP_PKGS[@]})

# Prepend directory location at remote host to package file list
for index in "${!VPP_PKGS_FULL[@]}"; do
    VPP_PKGS_FULL[${index}]=${VIRL_DIR_LOC}/${VPP_PKGS_FULL[${index}]}
done

echo "Updated file names: " ${VPP_PKGS_FULL[@]}

cat ${VIRL_PKEY}

# Copy the files to VIRL hosts
DONE=""
for index in "${!VIRL_SERVER[@]}"; do
    # Do not copy files in case they have already been copied to the VIRL host
    [[ "${DONE[@]}" =~ "${VIRL_SERVER[${index}]}" ]] && copy=0 || copy=1

    if [ "${copy}" -eq "0" ]; then
        echo "files have already been copied to the VIRL host ${VIRL_SERVER[${index}]}"
    else
        if [ "${OS}" == "centos7" ]; then
            scp ${SSH_OPTIONS} *.rpm \
                ${VIRL_USERNAME}@${VIRL_SERVER[${index}]}:${VIRL_DIR_LOC}/
        else
            scp ${SSH_OPTIONS} *.deb \
                ${VIRL_USERNAME}@${VIRL_SERVER[${index}]}:${VIRL_DIR_LOC}/
        fi
         result=$?
        if [ "${result}" -ne "0" ]; then
            echo "Failed to copy files to VIRL host ${VIRL_SERVER[${index}]}"
            echo ${result}
            exit ${result}
        else
            echo "files successfully copied to the VIRL host ${VIRL_SERVER[${index}]}"
        fi
        DONE+=(${VIRL_SERVER[${index}]})
    fi
done

# Start a simulation on VIRL server
echo "Starting simulation on VIRL server"

function stop_virl_simulation {
    ssh ${SSH_OPTIONS} ${VIRL_USERNAME}@${VIRL_SERVER}\
        "stop-testcase ${VIRL_SID}"
}

# Upon script exit, cleanup the simulation execution
trap stop_virl_simulation EXIT

VIRL_SID=$(ssh ${SSH_OPTIONS} \
    ${VIRL_USERNAME}@${VIRL_SERVER} \
    "start-testcase -vv -c ${VIRL_TOPOLOGY} -r ${VIRL_RELEASE} ${VPP_PKGS_FULL[@]}")
retval=$?
if [ "${retval}" -ne "0" ]; then
    echo "VIRL simulation start failed"
    exit ${retval}
fi

if [[ ! "${VIRL_SID}" =~ session-[a-zA-Z0-9_]{6} ]]; then
    echo "No VIRL session ID reported."
    exit 127
fi

echo ${VIRL_SID}

ssh_do ${VIRL_USERNAME}@${VIRL_SERVER} cat /scratch/${VIRL_SID}/topology.yaml

# Download the topology file from virl session
scp ${SSH_OPTIONS} \
    ${VIRL_USERNAME}@${VIRL_SERVER}:/scratch/${VIRL_SID}/topology.yaml \
    topologies/enabled/topology.yaml

retval=$?
if [ "${retval}" -ne "0" ]; then
    echo "Failed to copy topology file from VIRL simulation"
    exit ${retval}
fi

virtualenv --system-site-packages env
. env/bin/activate

echo pip install
pip install -r ${SCRIPT_DIR}/requirements.txt

pykwalify -s ${SCRIPT_DIR}/resources/topology_schemas/3_node_topology.sch.yaml \
          -s ${SCRIPT_DIR}/resources/topology_schemas/topology.sch.yaml \
          -d ${SCRIPT_DIR}/topologies/enabled/topology.yaml \
          -vvv

if [ "$?" -ne "0" ]; then
    echo "Topology schema validation failed."
    echo "However, the tests will start."
fi

PYTHONPATH=`pwd` pybot -L TRACE -W 136\
    -v TOPOLOGY_PATH:${SCRIPT_DIR}/topologies/enabled/topology.yaml \
    --suite "tests.nsh_sfc.func" \
    --include vm_envAND3_node_single_link_topo \
    --exclude PERFTEST \
    --exclude SKIP_PATCH \
    tests/

# Archive artifacts
mkdir archive
for i in ${ARCHIVE_ARTIFACTS[@]}; do
    cp $( readlink -f ${i} | tr '\n' ' ' ) archive/
done
0, 6) _ (21, 7) _ (22, 8) _ (23, 9) _ (24, 10) _ (25, 11) \ _ (26, 12) _ (27, 13) _ (28, 14) _ (29, 15) _ (30, 16) _ (31, 17) #define _foreach_20_31 \ _ (20, 0) _ (21, 1) _ (22, 2) _ (23, 3) _ (24, 4) _ (25, 5) \ _ (26, 6) _ (27, 7) _ (28, 8) _ (29, 9) _ (30, 10) _ (31, 11) #ifdef __ALTIVEC__ #define CLIB_POWERPC_ALTIVEC_N_REGS 12 #else #define CLIB_POWERPC_ALTIVEC_N_REGS 0 #endif #if _CALL_ELF == 2 #define _prologue(n) \ .globl n ; \ .p2align 4 ; \ .type n, @function ; \ n: ; \ .L##n##_begin: ; #define _gep_lep(n) \ .L##n##_gep: ; \ addis 2, 12, .TOC.-.L##n##_gep@ha ; \ addi 2, 2, .TOC.-.L##n##_gep@l ; \ .L##n##_lep: ; \ .localentry n, .L##n##_lep-.L##n##_gep #else /* _CALL_ELF == 1 */ #define _prologue(n) \ .globl n ; \ .p2align 4 ; \ .type .##n, @function ; \ .section ".opd", "aw" ,@progbits ; \ n: ; \ .p2align 3 ; \ .quad .L##n##_begin ; \ .quad .TOC.@tocbase ; \ .quad 0 ; \ .text ; \ .L##n##_begin: ; #endif #define _epilogue(n) \ .long 0 ; \ .quad 0 ; \ .L##n##_end: ; \ .size n, .L##n##_end-.L##n##_begin #if _CALL_ELF == 2 .abiversion 2 .section ".text" #else .text #endif _prologue(clib_setjmp) mflr 0 std 0, 8*0(3) std 1, 8*1(3) std 2, 8*2(3) mfcr 0 std 0, 8*3(3) mfspr 0, 256 stw 0, 8*4(3) /* gprs 14 - 31 */ #define _(a,b) std a, 8*((b) + 4 + 18*0)(3) ; _foreach_14_31 #undef _ /* fprs 14 - 31 */ #define _(a,b) stfd a, 8*((b) + 4 + 18*1)(3) ; _foreach_14_31 #undef _ #if CLIB_POWERPC_ALTIVEC_N_REGS > 0 /* vrs 20 - 31 */ li 5, 8*(4 + 18*2) #define _(a,b) stvx a, 5, 3 ; addi 5, 5, 16 ; _foreach_20_31 #undef _ #endif /* CLIB_POWERPC_ALTIVEC_N_REGS > 0 */ /* Return value. */ mr 3, 4 blr _epilogue(clib_setjmp) _prologue(clib_longjmp) ld 0, 8*0(3) mtlr 0 ld 1, 8*1(3) ld 2, 8*2(3) ld 0, 8*3(3) mtcrf 0xff, 0 lwz 0, 8*3(3) mtspr 256, 0 /* gprs 14 - 31 */ #define _(a,b) ld a, 8*((b) + 4 + 18*0)(3) ; _foreach_14_31 #undef _ /* fprs 14 - 31 */ #define _(a,b) lfd a, 8*((b) + 4 + 18*1)(3) ; _foreach_14_31 #undef _ #if CLIB_POWERPC_ALTIVEC_N_REGS > 0 /* vrs 20 - 31 */ li 5, 8*(4 + 18*2) #define _(a,b) lvx a, 5, 3 ; addi 5, 5, 16 ; _foreach_20_31 #undef _ #endif /* CLIB_POWERPC_ALTIVEC_N_REGS > 0 */ /* Return value. */ mr 3, 4 blr _epilogue(clib_longjmp) #if _CALL_ELF == 2 _prologue(clib_calljmp) _gep_lep(clib_calljmp) mflr 0 /* get link register into r0 */ std 0,16(1) /* store r0 into the stack frame */ stdu 1,-32(1) /* move sp down for one frame */ mr 12,3 /* move func pointer to r12 */ mr 3,4 /* pass func_arg as first arg */ std 1,-8(5) /* store old sp into the top of the new stack */ addi 5,5,-256 /* stack_addr =- 256 */ mr 1,5 /* set new sp */ mtctr 12 /* put function pointer into CTR register */ std 2,24(1) /* store TOC pointer into stack frame */ bctrl /* unconditional branch to counter register */ ld 2,24(1) /* load TOC pointer from stack frame */ addi 1,1,256 /* go back to the start of the new stack */ ld 1,-8(1) /* load old sp */ addi 1,1,32 /* move sp back to previous frame */ ld 0,16(1) /* get old link reg value from the stack */ mtlr 0 /* restore link reg value */ blr _epilogue(clib_calljmp) #else /* v1 ABI */ _prologue(clib_calljmp) mflr 0 /* get link register into r0 */ mr 9,3 /* store function pointer into the r9 */ std 0,16(1) /* store r0 into the stack frame */ stdu 1,-112(1) /* move sp down for one frame */ std 1,-8(5) /* store old sp into the top of the new stack */ addi 5,5,-256 /* stack_addr =- 256 */ mr 1,5 /* set new sp */ ld 10,0(9) std 2,40(1) /* store TOC pointer into the stack */ mr 3,4 mtctr 10 ld 11,16(9) ld 2,8(9) bctrl /* unconditional branch to counter register */ ld 2,40(1) /* load TOC pointer from the stack */ addi 1,1,256 /* go back to the start of the new stack */ ld 1,-8(1) /* load the old sp */ addi 1,1,112 /* move sp back to previous frame */ ld 0,16(1) /* restore link register from the stack frame */ mtlr 0 blr _epilogue(clib_calljmp) #endif #elif defined(__powerpc__) #define _foreach_14_31 \ _ (14, 0) _ (15, 1) _ (16, 2) _ (17, 3) _ (18, 4) _ (19, 5) \ _ (20, 6) _ (21, 7) _ (22, 8) _ (23, 9) _ (24, 10) _ (25, 11) \ _ (26, 12) _ (27, 13) _ (28, 14) _ (29, 15) _ (30, 16) _ (31, 17) #define _foreach_20_31 \ _ (20, 0) _ (21, 1) _ (22, 2) _ (23, 3) _ (24, 4) _ (25, 5) \ _ (26, 6) _ (27, 7) _ (28, 8) _ (29, 9) _ (30, 10) _ (31, 11) #ifdef __ALTIVEC__ #define CLIB_POWERPC_ALTIVEC_N_REGS 12 #else #define CLIB_POWERPC_ALTIVEC_N_REGS 0 #endif .global cdecl(clib_setjmp) .align 4 .type cdecl(clib_setjmp), @function cdecl(clib_setjmp): mflr 0 stw 0, 4*0(3) stw 1, 4*1(3) mfcr 0 stw 0, 4*2(3) #if CLIB_POWERPC_ALTIVEC_N_REGS > 0 mfspr 0, 256 #endif stw 0, 4*3(3) #if CLIB_POWERPC_ALTIVEC_N_REGS > 0 li 5, 4*4 #define _(a,b) stvx a, 3, 5 ; addi 5, 5, 16 ; _foreach_20_31 #undef _ #endif /* CLIB_POWERPC_ALTIVEC_N_REGS > 0 */ /* gp 14 - 31 */ #define _(a,b) stw a, 4*(1*(b) + 4 + 4*CLIB_POWERPC_ALTIVEC_N_REGS + 0*18)(3) ; _foreach_14_31 #undef _ /* fp 14 - 31 */ #define _(a,b) stfd a, 4*(2*(b) + 4 + 4*CLIB_POWERPC_ALTIVEC_N_REGS + 1*18)(3) ; _foreach_14_31 #undef _ /* Return value. */ mr 3, 4 blr .global cdecl(clib_longjmp) .align 4 .type cdecl(clib_longjmp), @function cdecl(clib_longjmp): lwz 0, 4*0(3) mtlr 0 lwz 1, 4*1(3) lwz 0, 4*2(3) mtcr 0 lwz 0, 4*3(3) #if CLIB_POWERPC_ALTIVEC_N_REGS > 0 mtspr 256, 0 #endif #if CLIB_POWERPC_ALTIVEC_N_REGS > 0 li 5, 4*4 #define _(a,b) lvx a, 3, 5 ; addi 5, 5, 16 ; _foreach_20_31 #undef _ #endif /* CLIB_POWERPC_ALTIVEC_N_REGS > 0 */ /* gp 14 - 31 */ #define _(a,b) lwz a, 4*(1*(b) + 4 + 4*CLIB_POWERPC_ALTIVEC_N_REGS + 0*18)(3) ; _foreach_14_31 #undef _ /* fp 14 - 31 */ #define _(a,b) lfd a, 4*(2*(b) + 4 + 4*CLIB_POWERPC_ALTIVEC_N_REGS + 1*18)(3) ; _foreach_14_31 #undef _ /* Return value. */ mr 3, 4 blr .global cdecl(clib_calljmp) .align 4 .type cdecl(clib_calljmp), @function cdecl(clib_calljmp): /* Make sure stack is 16 byte aligned. */ andi. 0, 5, 0xf sub 5, 5, 0 addi 5, 5, -16 /* Save old stack/link pointer on new stack. */ stw 1, 0(5) mflr 0 stw 0, 4(5) /* account for (sp, lr) tuple, and keep aligned */ addi 5, 5, -16 /* Switch stacks. */ mr 1, 5 /* Move argument into place. */ mtctr 3 mr 3, 4 /* Away we go. */ bctrl /* back to our synthetic frame */ addi 1,1,16 /* Switch back to old stack. */ lwz 0, 4(1) mtlr 0 lwz 0, 0(1) mr 1, 0 /* Return to caller. */ blr #elif defined(__arm__) .global cdecl(clib_setjmp) .align 4 .type cdecl(clib_setjmp), %function cdecl(clib_setjmp): mov ip, r0 /* jmp buffer */ /* Save integer registers */ stmia ip!, {v1-v6, sl, fp, sp, lr} #ifdef __IWMMXT__ /* Save the call-preserved iWMMXt registers. */ wstrd wr10, [ip], #8 wstrd wr11, [ip], #8 wstrd wr12, [ip], #8 wstrd wr13, [ip], #8 wstrd wr14, [ip], #8 wstrd wr15, [ip], #8 #endif /* Give back user's return value. */ mov r0, r1 bx lr .global cdecl(clib_longjmp) .align 4 .type cdecl(clib_longjmp), %function cdecl(clib_longjmp): mov ip, r0 /* jmp buffer */ /* Restore integer registers. */ ldmia ip!, {v1-v6, sl, fp, sp, lr} #ifdef __IWMMXT__ /* Save the call-preserved iWMMXt registers. */ wldrd wr10, [ip], #8 wldrd wr11, [ip], #8 wldrd wr12, [ip], #8 wldrd wr13, [ip], #8 wldrd wr14, [ip], #8 wldrd wr15, [ip], #8 #endif /* Give back user's return value. */ mov r0, r1 bx lr .global cdecl(clib_calljmp) .align 4 .type cdecl(clib_calljmp), %function cdecl(clib_calljmp): /* Make sure stack is 8 byte aligned. */ bic r2, r2, #7 /* Allocate space for stack/link pointer on new stack. */ sub r2, r2, #8 /* Save old stack/link pointer on new stack. */ str sp, [r2, #0] str lr, [r2, #4] /* Switch stacks. */ mov sp, r2 /* Save function to call. */ mov ip, r0 /* Move argument into place. */ mov r0, r1 /* Away we go. */ bx ip /* Switch back to old stack. */ ldr lr, [sp, #4] ldr ip, [sp, #0] mov sp, ip /* Return to caller. */ bx lr #elif defined(__xtensa__) /* FIXME implement if needed. */ .global cdecl(clib_setjmp) .align 4 .type cdecl(clib_setjmp), %function cdecl(clib_setjmp): 1: j 1b .global cdecl(clib_longjmp) .align 4 .type cdecl(clib_longjmp), @function cdecl(clib_longjmp): 1: j 1b .global cdecl(clib_calljmp) .align 4 .type cdecl(clib_calljmp), %function cdecl(clib_calljmp): 1: j 1b #elif defined(__TMS320C6X__) /* FIXME implement if needed. */ .global cdecl(clib_setjmp) .align 4 .type cdecl(clib_setjmp), %function cdecl(clib_setjmp): 1: B .S1 1b .global cdecl(clib_longjmp) .align 4 .type cdecl(clib_longjmp), @function cdecl(clib_longjmp): 1: B .S1 1b .global cdecl(clib_calljmp) .align 4 .type cdecl(clib_calljmp), %function cdecl(clib_calljmp): 1: B .S1 1b #elif defined(_mips) && __mips == 64 .global cdecl(clib_setjmp) .align 8 .type cdecl(clib_setjmp), %function cdecl(clib_setjmp): sd $ra, 0($a0) sd $sp, 8($a0) sd $gp, 16($a0) sd $16, 24($a0) sd $17, 32($a0) sd $18, 40($a0) sd $19, 48($a0) sd $20, 56($a0) sd $21, 64($a0) sd $22, 72($a0) sd $23, 80($a0) sd $30, 88($a0) move $v0, $a1 jr $ra nop .global cdecl(clib_longjmp) .align 8 .type cdecl(clib_longjmp), @function cdecl(clib_longjmp): move $v0, $a1 bne $v0, $0, 1f nop daddu $v0, $v0, 1 1: ld $ra, 0($a0) ld $sp, 8($a0) ld $gp, 16($a0) ld $16, 24($a0) ld $17, 32($a0) ld $18, 40($a0) ld $19, 48($a0) ld $20, 56($a0) ld $21, 64($a0) ld $22, 72($a0) ld $23, 80($a0) ld $30, 88($a0) jr $ra nop .global cdecl(clib_calljmp) .align 8 .type cdecl(clib_calljmp), %function cdecl(clib_calljmp): /* Force 16 byte alignment of the new stack */ li $t1, -16 and $t0, $a2, $t1 /* Save old ra/gp/sp on new stack */ daddiu $t0, $t0, (-24) sd $ra, 0($t0) sd $gp, 8($t0) sd $sp, 16($t0) /* Switch stacks */ move $sp, $t0 /* Away we go */ move $t9, $a0 move $a0, $a1 jalr $t9 nop /* Switch back to old ra/gp/sp */ move $t0, $sp ld $ra, 0($t0) ld $gp, 8($t0) ld $sp, 16($t0) /* Return to caller */ jr $ra nop #elif defined (__aarch64__) /* Copyright (c) 2011, 2012 ARM Ltd All rights reserved. Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: 1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. 3. The name of the company may not be used to endorse or promote products derived from this software without specific prior written permission. THIS SOFTWARE IS PROVIDED BY ARM LTD ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL ARM LTD BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ #define GPR_LAYOUT \ REG_PAIR (x19, x20, 0); \ REG_PAIR (x21, x22, 16); \ REG_PAIR (x23, x24, 32); \ REG_PAIR (x25, x26, 48); \ REG_PAIR (x27, x28, 64); \ REG_PAIR (x29, x30, 80); \ REG_ONE (x16, 96) #define FPR_LAYOUT \ REG_PAIR ( d8, d9, 112); \ REG_PAIR (d10, d11, 128); \ REG_PAIR (d12, d13, 144); \ REG_PAIR (d14, d15, 160); // int cdecl(clib_setjmp) (jmp_buf) .global cdecl(clib_setjmp) .type cdecl(clib_setjmp), %function cdecl(clib_setjmp): mov x16, sp #define REG_PAIR(REG1, REG2, OFFS) stp REG1, REG2, [x0, OFFS] #define REG_ONE(REG1, OFFS) str REG1, [x0, OFFS] GPR_LAYOUT FPR_LAYOUT #undef REG_PAIR #undef REG_ONE mov x0, x1 ret .size cdecl(clib_setjmp), .-cdecl(clib_setjmp) // void cdecl(clib_longjmp) (jmp_buf, int) __attribute__ ((noreturn)) .global cdecl(clib_longjmp) .type cdecl(clib_longjmp), %function cdecl(clib_longjmp): #define REG_PAIR(REG1, REG2, OFFS) ldp REG1, REG2, [x0, OFFS] #define REG_ONE(REG1, OFFS) ldr REG1, [x0, OFFS] GPR_LAYOUT FPR_LAYOUT #undef REG_PAIR #undef REG_ONE mov sp, x16 mov x0, x1 // cmp w1, #0 // cinc w0, w1, eq // use br not ret, as ret is guaranteed to mispredict br x30 .size cdecl(clib_longjmp), .-cdecl(clib_longjmp) // void cdecl(clib_calljmp) (x0=function, x1=arg, x2=new_stack) .global cdecl(clib_calljmp) .type cdecl(clib_calljmp), %function cdecl(clib_calljmp): // save fn ptr mov x3, x0 // set up fn arg mov x0, x1 // switch stacks mov x4, sp // space for saved sp, lr on new stack sub x2, x2, #16 mov sp, x2 // save old sp and link register on new stack str x4, [sp] str x30,[sp,#8] mov x4, sp // go there blr x3 // restore old sp and link register mov x4, sp ldr x3, [x4] ldr x30,[x4, #8] mov sp, x3 ret .size cdecl(clib_calljmp), .-cdecl(clib_calljmp) #elif defined(__riscv) #define foreach_0_to_11 _(0) _(1) _(2) _(3) _(4) _(5) _(6) _(7) _(8) _(9) _(10) _(11) .global cdecl(clib_setjmp) .align 1 .type cdecl(clib_setjmp), @function cdecl(clib_setjmp): sd ra, 0*8(a0) sd sp, 1*8(a0) #define _(x) sd s##x, (x + 2)*8(a0); foreach_0_to_11 #undef _ #define _(x) fsd fs##x, (x + 14)*8(a0); foreach_0_to_11 #undef _ mv a0,a1 ret .size cdecl(clib_setjmp), .-cdecl(clib_setjmp) .global cdecl(clib_longjmp) .align 1 .type cdecl(clib_longjmp), @function cdecl(clib_longjmp): ld ra, 0*8(a0) ld sp, 1*8(a0) #define _(x) ld s##x, (x + 2)*8(a0); foreach_0_to_11 #undef _ #define _(x) fld fs##x, (x + 14)*8(a0); foreach_0_to_11 #undef _ mv a0,a1 ret .size cdecl(clib_longjmp), .-cdecl(clib_longjmp) .global cdecl(clib_calljmp) .align 1 .type cdecl(clib_calljmp), @function cdecl(clib_calljmp): andi a2,a2, -16 /* Make sure stack is 16-byte aligned. */ addi a2, a2, -16 /* allocate space on the new stack */ sd ra, 8(a2) /* store return address */ sd sp, 0(a2) /* store existing stack pointer */ mv sp, a2 /* change stack */ mv a2, a0 /* functon pointer to a2 */ mv a0, a1 /* 2nd argument becomes 1st one */ jalr a2 /* function call */ ld ra, 8(sp) /* restore old return address */ ld sp, 0(sp) /* restore old stack pointer */ ret .size cdecl(clib_calljmp), .-cdecl(clib_calljmp) #else #error "unknown machine" #endif #ifndef __APPLE__ .section .note.GNU-stack,"",%progbits #endif