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 // +build gc
7
8 #include "textflag.h"
9
10 // func stfle() facilityList
11 TEXT ·stfle(SB), NOSPLIT|NOFRAME, $0-32
12 MOVD $ret+0(FP), R1
13 MOVD $3, R0 // last doubleword index to store
14 XC $32, (R1), (R1) // clear 4 doublewords (32 bytes)
15 WORD $0xb2b01000 // store facility list extended (STFLE)
16 RET
17
18 // func kmQuery() queryResult
19 TEXT ·kmQuery(SB), NOSPLIT|NOFRAME, $0-16
20 MOVD $0, R0 // set function code to 0 (KM-Query)
21 MOVD $ret+0(FP), R1 // address of 16-byte return value
22 WORD $0xB92E0024 // cipher message (KM)
23 RET
24
25 // func kmcQuery() queryResult
26 TEXT ·kmcQuery(SB), NOSPLIT|NOFRAME, $0-16
27 MOVD $0, R0 // set function code to 0 (KMC-Query)
28 MOVD $ret+0(FP), R1 // address of 16-byte return value
29 WORD $0xB92F0024 // cipher message with chaining (KMC)
30 RET
31
32 // func kmctrQuery() queryResult
33 TEXT ·kmctrQuery(SB), NOSPLIT|NOFRAME, $0-16
34 MOVD $0, R0 // set function code to 0 (KMCTR-Query)
35 MOVD $ret+0(FP), R1 // address of 16-byte return value
36 WORD $0xB92D4024 // cipher message with counter (KMCTR)
37 RET
38
39 // func kmaQuery() queryResult
40 TEXT ·kmaQuery(SB), NOSPLIT|NOFRAME, $0-16
41 MOVD $0, R0 // set function code to 0 (KMA-Query)
42 MOVD $ret+0(FP), R1 // address of 16-byte return value
43 WORD $0xb9296024 // cipher message with authentication (KMA)
44 RET
45
46 // func kimdQuery() queryResult
47 TEXT ·kimdQuery(SB), NOSPLIT|NOFRAME, $0-16
48 MOVD $0, R0 // set function code to 0 (KIMD-Query)
49 MOVD $ret+0(FP), R1 // address of 16-byte return value
50 WORD $0xB93E0024 // compute intermediate message digest (KIMD)
51 RET
52
53 // func klmdQuery() queryResult
54 TEXT ·klmdQuery(SB), NOSPLIT|NOFRAME, $0-16
55 MOVD $0, R0 // set function code to 0 (KLMD-Query)
56 MOVD $ret+0(FP), R1 // address of 16-byte return value
57 WORD $0xB93F0024 // compute last message digest (KLMD)
58 RET
59
View as plain text