1 // Copyright 2019 The Go Authors. All rights reserved.
2 // Use of this source code is governed by a BSD-style
3 // license that can be found in the LICENSE file.
4
5 //go:build gc
6
7 #include "textflag.h"
8
9 // func stfle() facilityList
10 TEXT ·stfle(SB), NOSPLIT|NOFRAME, $0-32
11 MOVD $ret+0(FP), R1
12 MOVD $3, R0 // last doubleword index to store
13 XC $32, (R1), (R1) // clear 4 doublewords (32 bytes)
14 WORD $0xb2b01000 // store facility list extended (STFLE)
15 RET
16
17 // func kmQuery() queryResult
18 TEXT ·kmQuery(SB), NOSPLIT|NOFRAME, $0-16
19 MOVD $0, R0 // set function code to 0 (KM-Query)
20 MOVD $ret+0(FP), R1 // address of 16-byte return value
21 WORD $0xB92E0024 // cipher message (KM)
22 RET
23
24 // func kmcQuery() queryResult
25 TEXT ·kmcQuery(SB), NOSPLIT|NOFRAME, $0-16
26 MOVD $0, R0 // set function code to 0 (KMC-Query)
27 MOVD $ret+0(FP), R1 // address of 16-byte return value
28 WORD $0xB92F0024 // cipher message with chaining (KMC)
29 RET
30
31 // func kmctrQuery() queryResult
32 TEXT ·kmctrQuery(SB), NOSPLIT|NOFRAME, $0-16
33 MOVD $0, R0 // set function code to 0 (KMCTR-Query)
34 MOVD $ret+0(FP), R1 // address of 16-byte return value
35 WORD $0xB92D4024 // cipher message with counter (KMCTR)
36 RET
37
38 // func kmaQuery() queryResult
39 TEXT ·kmaQuery(SB), NOSPLIT|NOFRAME, $0-16
40 MOVD $0, R0 // set function code to 0 (KMA-Query)
41 MOVD $ret+0(FP), R1 // address of 16-byte return value
42 WORD $0xb9296024 // cipher message with authentication (KMA)
43 RET
44
45 // func kimdQuery() queryResult
46 TEXT ·kimdQuery(SB), NOSPLIT|NOFRAME, $0-16
47 MOVD $0, R0 // set function code to 0 (KIMD-Query)
48 MOVD $ret+0(FP), R1 // address of 16-byte return value
49 WORD $0xB93E0024 // compute intermediate message digest (KIMD)
50 RET
51
52 // func klmdQuery() queryResult
53 TEXT ·klmdQuery(SB), NOSPLIT|NOFRAME, $0-16
54 MOVD $0, R0 // set function code to 0 (KLMD-Query)
55 MOVD $ret+0(FP), R1 // address of 16-byte return value
56 WORD $0xB93F0024 // compute last message digest (KLMD)
57 RET
58
View as plain text