summaryrefslogtreecommitdiffstats
path: root/src/crypto/sha512/sha512block_s390x.s
blob: f221bd1399c9347213808b2ff882939502952e0a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
// Copyright 2016 The Go Authors. All rights reserved.
// Use of this source code is governed by a BSD-style
// license that can be found in the LICENSE file.

#include "textflag.h"

// func block(dig *digest, p []byte)
TEXT ·block(SB), NOSPLIT|NOFRAME, $0-32
	MOVBZ  ·useAsm(SB), R4
	LMG    dig+0(FP), R1, R3            // R2 = &p[0], R3 = len(p)
	MOVBZ  $3, R0                       // SHA-512 function code
	CMPBEQ R4, $0, generic

loop:
	WORD $0xB93E0002 // KIMD R2
	BVS  loop        // continue if interrupted
	RET

generic:
	BR ·blockGeneric(SB)