arch/x86/crypto/crc32c-pcl-intel-asm_64.S - arm/linux - Git at Google


            
            /*

            
             * Implement fast CRC32C with PCLMULQDQ instructions. (x86_64)

            
             *

            
             * The white papers on CRC32C calculations with PCLMULQDQ instruction can be

            
             * downloaded from:

            
             * http://www.intel.com/content/dam/www/public/us/en/documents/white-papers/crc-iscsi-polynomial-crc32-instruction-paper.pdf

            
             * http://www.intel.com/content/dam/www/public/us/en/documents/white-papers/fast-crc-computation-paper.pdf

            
             *

            
             * Copyright (C) 2012 Intel Corporation.

            
             *

            
             * Authors:

            
             *	Wajdi Feghali <wajdi.k.feghali@intel.com>

            
             *	James Guilford <james.guilford@intel.com>

            
             *	David Cote <david.m.cote@intel.com>

            
             *	Tim Chen <tim.c.chen@linux.intel.com>

            
             *

            
             * This software is available to you under a choice of one of two

            
             * licenses.  You may choose to be licensed under the terms of the GNU

            
             * General Public License (GPL) Version 2, available from the file

            
             * COPYING in the main directory of this source tree, or the

            
             * OpenIB.org BSD license below:

            
             *

            
             *     Redistribution and use in source and binary forms, with or

            
             *     without modification, are permitted provided that the following

            
             *     conditions are met:

            
             *

            
             *      - Redistributions of source code must retain the above

            
             *        copyright notice, this list of conditions and the following

            
             *        disclaimer.

            
             *

            
             *      - 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.

            
             *

            
             * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,

            
             * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF

            
             * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND

            
             * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS

            
             * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN

            
             * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN

            
             * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE

            
             * SOFTWARE.

            
             */


            #include <asm/inst.h>

            
            #include <linux/linkage.h>


            ## ISCSI CRC 32 Implementation with crc32 and pclmulqdq Instruction


            .macro LABEL prefix n

            
            \prefix\n\():

            
            .endm


            .macro JMPTBL_ENTRY i

            
            .word crc_\i - crc_array

            
            .endm


            .macro JNC_LESS_THAN j

            
            	jnc less_than_\j

            
            .endm


            # Define threshold where buffers are considered "small" and routed to more

            
            # efficient "by-1" code. This "by-1" code only handles up to 255 bytes, so

            
            # SMALL_SIZE can be no larger than 255.


            #define SMALL_SIZE 200


            .if (SMALL_SIZE > 255)

            
            .error "SMALL_ SIZE must be < 256"

            
            .endif


            # unsigned int crc_pcl(u8 *buffer, int len, unsigned int crc_init);


            .text

            
            ENTRY(crc_pcl)

            
            #define    bufp		%rdi

            
            #define    bufp_dw	%edi

            
            #define    bufp_w	%di

            
            #define    bufp_b	%dil

            
            #define    bufptmp	%rcx

            
            #define    block_0	%rcx

            
            #define    block_1	%rdx

            
            #define    block_2	%r11

            
            #define    len		%rsi

            
            #define    len_dw	%esi

            
            #define    len_w	%si

            
            #define    len_b	%sil

            
            #define    crc_init_arg %rdx

            
            #define    tmp		%rbx

            
            #define    crc_init	%r8

            
            #define    crc_init_dw	%r8d

            
            #define    crc1		%r9

            
            #define    crc2		%r10


            	pushq   %rbx

            
            	pushq   %rdi

            
            	pushq   %rsi


            	## Move crc_init for Linux to a different

            
            	mov     crc_init_arg, crc_init


            	################################################################

            
            	## 1) ALIGN:

            
            	################################################################


            	mov     bufp, bufptmp		# rdi = *buf

            
            	neg     bufp

            
            	and     $7, bufp		# calculate the unalignment amount of

            
            					# the address

            
            	je      proc_block		# Skip if aligned


            	## If len is less than 8 and we're unaligned, we need to jump

            
            	## to special code to avoid reading beyond the end of the buffer

            
            	cmp     $8, len

            
            	jae     do_align

            
            	# less_than_8 expects length in upper 3 bits of len_dw

            
            	# less_than_8_post_shl1 expects length = carryflag * 8 + len_dw[31:30]

            
            	shl     $32-3+1, len_dw

            
            	jmp     less_than_8_post_shl1


            do_align:

            
            	#### Calculate CRC of unaligned bytes of the buffer (if any)

            
            	movq    (bufptmp), tmp		# load a quadward from the buffer

            
            	add     bufp, bufptmp		# align buffer pointer for quadword

            
            					# processing

            
            	sub     bufp, len		# update buffer length

            
            align_loop:

            
            	crc32b  %bl, crc_init_dw 	# compute crc32 of 1-byte

            
            	shr     $8, tmp			# get next byte

            
            	dec     bufp

            
            	jne     align_loop


            proc_block:


            	################################################################

            
            	## 2) PROCESS  BLOCKS:

            
            	################################################################


            	## compute num of bytes to be processed

            
            	movq    len, tmp		# save num bytes in tmp


            	cmpq    $128*24, len

            
            	jae     full_block


            continue_block:

            
            	cmpq    $SMALL_SIZE, len

            
            	jb      small


            	## len < 128*24

            
            	movq    $2731, %rax		# 2731 = ceil(2^16 / 24)

            
            	mul     len_dw

            
            	shrq    $16, %rax


            	## eax contains floor(bytes / 24) = num 24-byte chunks to do


            	## process rax 24-byte chunks (128 >= rax >= 0)


            	## compute end address of each block

            
            	## block 0 (base addr + RAX * 8)

            
            	## block 1 (base addr + RAX * 16)

            
            	## block 2 (base addr + RAX * 24)

            
            	lea     (bufptmp, %rax, 8), block_0

            
            	lea     (block_0, %rax, 8), block_1

            
            	lea     (block_1, %rax, 8), block_2


            	xor     crc1, crc1

            
            	xor     crc2, crc2


            	## branch into array

            
            	lea	jump_table(%rip), bufp

            
            	movzxw  (bufp, %rax, 2), len

            
            	lea	crc_array(%rip), bufp

            
            	lea     (bufp, len, 1), bufp

            
            	jmp     *bufp


            	################################################################

            
            	## 2a) PROCESS FULL BLOCKS:

            
            	################################################################

            
            full_block:

            
            	movl    $128,%eax

            
            	lea     128*8*2(block_0), block_1

            
            	lea     128*8*3(block_0), block_2

            
            	add     $128*8*1, block_0


            	xor     crc1,crc1

            
            	xor     crc2,crc2


            	# Fall thruogh into top of crc array (crc_128)


            	################################################################

            
            	## 3) CRC Array:

            
            	################################################################


            crc_array:

            
            	i=128

            
            .rept 128-1

            
            .altmacro

            
            LABEL crc_ %i

            
            .noaltmacro

            
            	crc32q   -i*8(block_0), crc_init

            
            	crc32q   -i*8(block_1), crc1

            
            	crc32q   -i*8(block_2), crc2

            
            	i=(i-1)

            
            .endr


            .altmacro

            
            LABEL crc_ %i

            
            .noaltmacro

            
            	crc32q   -i*8(block_0), crc_init

            
            	crc32q   -i*8(block_1), crc1

            
            # SKIP  crc32  -i*8(block_2), crc2 ; Don't do this one yet


            	mov     block_2, block_0


            	################################################################

            
            	## 4) Combine three results:

            
            	################################################################


            	lea	(K_table-8)(%rip), bufp		# first entry is for idx 1

            
            	shlq    $3, %rax			# rax *= 8

            
            	pmovzxdq (bufp,%rax), %xmm0		# 2 consts: K1:K2

            
            	leal	(%eax,%eax,2), %eax		# rax *= 3 (total *24)

            
            	subq    %rax, tmp			# tmp -= rax*24


            	movq    crc_init, %xmm1			# CRC for block 1

            
            	PCLMULQDQ 0x00,%xmm0,%xmm1		# Multiply by K2


            	movq    crc1, %xmm2			# CRC for block 2

            
            	PCLMULQDQ 0x10, %xmm0, %xmm2		# Multiply by K1


            	pxor    %xmm2,%xmm1

            
            	movq    %xmm1, %rax

            
            	xor     -i*8(block_2), %rax

            
            	mov     crc2, crc_init

            
            	crc32   %rax, crc_init


            	################################################################

            
            	## 5) Check for end:

            
            	################################################################


            LABEL crc_ 0

            
            	mov     tmp, len

            
            	cmp     $128*24, tmp

            
            	jae     full_block

            
            	cmp     $24, tmp

            
            	jae     continue_block


            less_than_24:

            
            	shl     $32-4, len_dw			# less_than_16 expects length

            
            						# in upper 4 bits of len_dw

            
            	jnc     less_than_16

            
            	crc32q  (bufptmp), crc_init

            
            	crc32q  8(bufptmp), crc_init

            
            	jz      do_return

            
            	add     $16, bufptmp

            
            	# len is less than 8 if we got here

            
            	# less_than_8 expects length in upper 3 bits of len_dw

            
            	# less_than_8_post_shl1 expects length = carryflag * 8 + len_dw[31:30]

            
            	shl     $2, len_dw

            
            	jmp     less_than_8_post_shl1


            	#######################################################################

            
            	## 6) LESS THAN 256-bytes REMAIN AT THIS POINT (8-bits of len are full)

            
            	#######################################################################

            
            small:

            
            	shl $32-8, len_dw		# Prepare len_dw for less_than_256

            
            	j=256

            
            .rept 5					# j = {256, 128, 64, 32, 16}

            
            .altmacro

            
            LABEL less_than_ %j			# less_than_j: Length should be in

            
            					# upper lg(j) bits of len_dw

            
            	j=(j/2)

            
            	shl     $1, len_dw		# Get next MSB

            
            	JNC_LESS_THAN %j

            
            .noaltmacro

            
            	i=0

            
            .rept (j/8)

            
            	crc32q  i(bufptmp), crc_init	# Compute crc32 of 8-byte data

            
            	i=i+8

            
            .endr

            
            	jz      do_return		# Return if remaining length is zero

            
            	add     $j, bufptmp		# Advance buf

            
            .endr


            less_than_8:				# Length should be stored in

            
            					# upper 3 bits of len_dw

            
            	shl     $1, len_dw

            
            less_than_8_post_shl1:

            
            	jnc     less_than_4

            
            	crc32l  (bufptmp), crc_init_dw	# CRC of 4 bytes

            
            	jz      do_return		# return if remaining data is zero

            
            	add     $4, bufptmp

            
            less_than_4:				# Length should be stored in

            
            					# upper 2 bits of len_dw

            
            	shl     $1, len_dw

            
            	jnc     less_than_2

            
            	crc32w  (bufptmp), crc_init_dw	# CRC of 2 bytes

            
            	jz      do_return		# return if remaining data is zero

            
            	add     $2, bufptmp

            
            less_than_2:				# Length should be stored in the MSB

            
            					# of len_dw

            
            	shl     $1, len_dw

            
            	jnc     less_than_1

            
            	crc32b  (bufptmp), crc_init_dw	# CRC of 1 byte

            
            less_than_1:				# Length should be zero

            
            do_return:

            
            	movq    crc_init, %rax

            
            	popq    %rsi

            
            	popq    %rdi

            
            	popq    %rbx

            
                    ret

            
            ENDPROC(crc_pcl)


            .section	.rodata, "a", @progbits

            
                    ################################################################

            
                    ## jump table        Table is 129 entries x 2 bytes each

            
                    ################################################################

            
            .align 4

            
            jump_table:

            
            	i=0

            
            .rept 129

            
            .altmacro

            
            JMPTBL_ENTRY %i

            
            .noaltmacro

            
            	i=i+1

            
            .endr


            	################################################################

            
            	## PCLMULQDQ tables

            
            	## Table is 128 entries x 2 words (8 bytes) each

            
            	################################################################

            
            .align 8

            
            K_table:

            
            	.long 0x493c7d27, 0x00000001

            
            	.long 0xba4fc28e, 0x493c7d27

            
            	.long 0xddc0152b, 0xf20c0dfe

            
            	.long 0x9e4addf8, 0xba4fc28e

            
            	.long 0x39d3b296, 0x3da6d0cb

            
            	.long 0x0715ce53, 0xddc0152b

            
            	.long 0x47db8317, 0x1c291d04

            
            	.long 0x0d3b6092, 0x9e4addf8

            
            	.long 0xc96cfdc0, 0x740eef02

            
            	.long 0x878a92a7, 0x39d3b296

            
            	.long 0xdaece73e, 0x083a6eec

            
            	.long 0xab7aff2a, 0x0715ce53

            
            	.long 0x2162d385, 0xc49f4f67

            
            	.long 0x83348832, 0x47db8317

            
            	.long 0x299847d5, 0x2ad91c30

            
            	.long 0xb9e02b86, 0x0d3b6092

            
            	.long 0x18b33a4e, 0x6992cea2

            
            	.long 0xb6dd949b, 0xc96cfdc0

            
            	.long 0x78d9ccb7, 0x7e908048

            
            	.long 0xbac2fd7b, 0x878a92a7

            
            	.long 0xa60ce07b, 0x1b3d8f29

            
            	.long 0xce7f39f4, 0xdaece73e

            
            	.long 0x61d82e56, 0xf1d0f55e

            
            	.long 0xd270f1a2, 0xab7aff2a

            
            	.long 0xc619809d, 0xa87ab8a8

            
            	.long 0x2b3cac5d, 0x2162d385

            
            	.long 0x65863b64, 0x8462d800

            
            	.long 0x1b03397f, 0x83348832

            
            	.long 0xebb883bd, 0x71d111a8

            
            	.long 0xb3e32c28, 0x299847d5

            
            	.long 0x064f7f26, 0xffd852c6

            
            	.long 0xdd7e3b0c, 0xb9e02b86

            
            	.long 0xf285651c, 0xdcb17aa4

            
            	.long 0x10746f3c, 0x18b33a4e

            
            	.long 0xc7a68855, 0xf37c5aee

            
            	.long 0x271d9844, 0xb6dd949b

            
            	.long 0x8e766a0c, 0x6051d5a2

            
            	.long 0x93a5f730, 0x78d9ccb7

            
            	.long 0x6cb08e5c, 0x18b0d4ff

            
            	.long 0x6b749fb2, 0xbac2fd7b

            
            	.long 0x1393e203, 0x21f3d99c

            
            	.long 0xcec3662e, 0xa60ce07b

            
            	.long 0x96c515bb, 0x8f158014

            
            	.long 0xe6fc4e6a, 0xce7f39f4

            
            	.long 0x8227bb8a, 0xa00457f7

            
            	.long 0xb0cd4768, 0x61d82e56

            
            	.long 0x39c7ff35, 0x8d6d2c43

            
            	.long 0xd7a4825c, 0xd270f1a2

            
            	.long 0x0ab3844b, 0x00ac29cf

            
            	.long 0x0167d312, 0xc619809d

            
            	.long 0xf6076544, 0xe9adf796

            
            	.long 0x26f6a60a, 0x2b3cac5d

            
            	.long 0xa741c1bf, 0x96638b34

            
            	.long 0x98d8d9cb, 0x65863b64

            
            	.long 0x49c3cc9c, 0xe0e9f351

            
            	.long 0x68bce87a, 0x1b03397f

            
            	.long 0x57a3d037, 0x9af01f2d

            
            	.long 0x6956fc3b, 0xebb883bd

            
            	.long 0x42d98888, 0x2cff42cf

            
            	.long 0x3771e98f, 0xb3e32c28

            
            	.long 0xb42ae3d9, 0x88f25a3a

            
            	.long 0x2178513a, 0x064f7f26

            
            	.long 0xe0ac139e, 0x4e36f0b0

            
            	.long 0x170076fa, 0xdd7e3b0c

            
            	.long 0x444dd413, 0xbd6f81f8

            
            	.long 0x6f345e45, 0xf285651c

            
            	.long 0x41d17b64, 0x91c9bd4b

            
            	.long 0xff0dba97, 0x10746f3c

            
            	.long 0xa2b73df1, 0x885f087b

            
            	.long 0xf872e54c, 0xc7a68855

            
            	.long 0x1e41e9fc, 0x4c144932

            
            	.long 0x86d8e4d2, 0x271d9844

            
            	.long 0x651bd98b, 0x52148f02

            
            	.long 0x5bb8f1bc, 0x8e766a0c

            
            	.long 0xa90fd27a, 0xa3c6f37a

            
            	.long 0xb3af077a, 0x93a5f730

            
            	.long 0x4984d782, 0xd7c0557f

            
            	.long 0xca6ef3ac, 0x6cb08e5c

            
            	.long 0x234e0b26, 0x63ded06a

            
            	.long 0xdd66cbbb, 0x6b749fb2

            
            	.long 0x4597456a, 0x4d56973c

            
            	.long 0xe9e28eb4, 0x1393e203

            
            	.long 0x7b3ff57a, 0x9669c9df

            
            	.long 0xc9c8b782, 0xcec3662e

            
            	.long 0x3f70cc6f, 0xe417f38a

            
            	.long 0x93e106a4, 0x96c515bb

            
            	.long 0x62ec6c6d, 0x4b9e0f71

            
            	.long 0xd813b325, 0xe6fc4e6a

            
            	.long 0x0df04680, 0xd104b8fc

            
            	.long 0x2342001e, 0x8227bb8a

            
            	.long 0x0a2a8d7e, 0x5b397730

            
            	.long 0x6d9a4957, 0xb0cd4768

            
            	.long 0xe8b6368b, 0xe78eb416

            
            	.long 0xd2c3ed1a, 0x39c7ff35

            
            	.long 0x995a5724, 0x61ff0e01

            
            	.long 0x9ef68d35, 0xd7a4825c

            
            	.long 0x0c139b31, 0x8d96551c

            
            	.long 0xf2271e60, 0x0ab3844b

            
            	.long 0x0b0bf8ca, 0x0bf80dd2

            
            	.long 0x2664fd8b, 0x0167d312

            
            	.long 0xed64812d, 0x8821abed

            
            	.long 0x02ee03b2, 0xf6076544

            
            	.long 0x8604ae0f, 0x6a45d2b2

            
            	.long 0x363bd6b3, 0x26f6a60a

            
            	.long 0x135c83fd, 0xd8d26619

            
            	.long 0x5fabe670, 0xa741c1bf

            
            	.long 0x35ec3279, 0xde87806c

            
            	.long 0x00bcf5f6, 0x98d8d9cb

            
            	.long 0x8ae00689, 0x14338754

            
            	.long 0x17f27698, 0x49c3cc9c

            
            	.long 0x58ca5f00, 0x5bd2011f

            
            	.long 0xaa7c7ad5, 0x68bce87a

            
            	.long 0xb5cfca28, 0xdd07448e

            
            	.long 0xded288f8, 0x57a3d037

            
            	.long 0x59f229bc, 0xdde8f5b9

            
            	.long 0x6d390dec, 0x6956fc3b

            
            	.long 0x37170390, 0xa3e3e02c

            
            	.long 0x6353c1cc, 0x42d98888

            
            	.long 0xc4584f5c, 0xd73c7bea

            
            	.long 0xf48642e9, 0x3771e98f

            
            	.long 0x531377e2, 0x80ff0093

            
            	.long 0xdd35bc8d, 0xb42ae3d9

            
            	.long 0xb25b29f2, 0x8fe4c34d

            
            	.long 0x9a5ede41, 0x2178513a

            
            	.long 0xa563905d, 0xdf99fc11

            
            	.long 0x45cddf4e, 0xe0ac139e

            
            	.long 0xacfa3103, 0x6c23e841

            
            	.long 0xa51b6135, 0x170076fa
	/*
	* Implement fast CRC32C with PCLMULQDQ instructions. (x86_64)
	*
	* The white papers on CRC32C calculations with PCLMULQDQ instruction can be
	* downloaded from:
	* http://www.intel.com/content/dam/www/public/us/en/documents/white-papers/crc-iscsi-polynomial-crc32-instruction-paper.pdf
	* http://www.intel.com/content/dam/www/public/us/en/documents/white-papers/fast-crc-computation-paper.pdf
	*
	* Copyright (C) 2012 Intel Corporation.
	*
	* Authors:
	* Wajdi Feghali <wajdi.k.feghali@intel.com>
	* James Guilford <james.guilford@intel.com>
	* David Cote <david.m.cote@intel.com>
	* Tim Chen <tim.c.chen@linux.intel.com>
	*
	* This software is available to you under a choice of one of two
	* licenses. You may choose to be licensed under the terms of the GNU
	* General Public License (GPL) Version 2, available from the file
	* COPYING in the main directory of this source tree, or the
	* OpenIB.org BSD license below:
	*
	* Redistribution and use in source and binary forms, with or
	* without modification, are permitted provided that the following
	* conditions are met:
	*
	* - Redistributions of source code must retain the above
	* copyright notice, this list of conditions and the following
	* disclaimer.
	*
	* - 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.
	*
	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
	* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
	* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
	* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
	* BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
	* ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
	* CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
	* SOFTWARE.
	*/

	#include <asm/inst.h>
	#include <linux/linkage.h>

	## ISCSI CRC 32 Implementation with crc32 and pclmulqdq Instruction

	.macro LABEL prefix n
	\prefix\n\():
	.endm

	.macro JMPTBL_ENTRY i
	.word crc_\i - crc_array
	.endm

	.macro JNC_LESS_THAN j
	jnc less_than_\j
	.endm

	# Define threshold where buffers are considered "small" and routed to more
	# efficient "by-1" code. This "by-1" code only handles up to 255 bytes, so
	# SMALL_SIZE can be no larger than 255.

	#define SMALL_SIZE 200

	.if (SMALL_SIZE > 255)
	.error "SMALL_ SIZE must be < 256"
	.endif

	# unsigned int crc_pcl(u8 *buffer, int len, unsigned int crc_init);

	.text
	ENTRY(crc_pcl)
	#define bufp %rdi
	#define bufp_dw %edi
	#define bufp_w %di
	#define bufp_b %dil
	#define bufptmp %rcx
	#define block_0 %rcx
	#define block_1 %rdx
	#define block_2 %r11
	#define len %rsi
	#define len_dw %esi
	#define len_w %si
	#define len_b %sil
	#define crc_init_arg %rdx
	#define tmp %rbx
	#define crc_init %r8
	#define crc_init_dw %r8d
	#define crc1 %r9
	#define crc2 %r10

	pushq %rbx
	pushq %rdi
	pushq %rsi

	## Move crc_init for Linux to a different
	mov crc_init_arg, crc_init

	################################################################
	## 1) ALIGN:
	################################################################

	mov bufp, bufptmp # rdi = *buf
	neg bufp
	and $7, bufp # calculate the unalignment amount of
	# the address
	je proc_block # Skip if aligned

	## If len is less than 8 and we're unaligned, we need to jump
	## to special code to avoid reading beyond the end of the buffer
	cmp $8, len
	jae do_align
	# less_than_8 expects length in upper 3 bits of len_dw
	# less_than_8_post_shl1 expects length = carryflag * 8 + len_dw[31:30]
	shl $32-3+1, len_dw
	jmp less_than_8_post_shl1

	do_align:
	#### Calculate CRC of unaligned bytes of the buffer (if any)
	movq (bufptmp), tmp # load a quadward from the buffer
	add bufp, bufptmp # align buffer pointer for quadword
	# processing
	sub bufp, len # update buffer length
	align_loop:
	crc32b %bl, crc_init_dw # compute crc32 of 1-byte
	shr $8, tmp # get next byte
	dec bufp
	jne align_loop

	proc_block:

	################################################################
	## 2) PROCESS BLOCKS:
	################################################################

	## compute num of bytes to be processed
	movq len, tmp # save num bytes in tmp

	cmpq $128*24, len
	jae full_block

	continue_block:
	cmpq $SMALL_SIZE, len
	jb small

	## len < 128*24
	movq $2731, %rax # 2731 = ceil(2^16 / 24)
	mul len_dw
	shrq $16, %rax

	## eax contains floor(bytes / 24) = num 24-byte chunks to do

	## process rax 24-byte chunks (128 >= rax >= 0)

	## compute end address of each block
	## block 0 (base addr + RAX * 8)
	## block 1 (base addr + RAX * 16)
	## block 2 (base addr + RAX * 24)
	lea (bufptmp, %rax, 8), block_0
	lea (block_0, %rax, 8), block_1
	lea (block_1, %rax, 8), block_2

	xor crc1, crc1
	xor crc2, crc2

	## branch into array
	lea jump_table(%rip), bufp
	movzxw (bufp, %rax, 2), len
	lea crc_array(%rip), bufp
	lea (bufp, len, 1), bufp
	jmp *bufp

	################################################################
	## 2a) PROCESS FULL BLOCKS:
	################################################################
	full_block:
	movl $128,%eax
	lea 12882(block_0), block_1
	lea 12883(block_0), block_2
	add $12881, block_0

	xor crc1,crc1
	xor crc2,crc2

	# Fall thruogh into top of crc array (crc_128)

	################################################################
	## 3) CRC Array:
	################################################################

	crc_array:
	i=128
	.rept 128-1
	.altmacro
	LABEL crc_ %i
	.noaltmacro
	crc32q -i*8(block_0), crc_init
	crc32q -i*8(block_1), crc1
	crc32q -i*8(block_2), crc2
	i=(i-1)
	.endr

	.altmacro
	LABEL crc_ %i
	.noaltmacro
	crc32q -i*8(block_0), crc_init
	crc32q -i*8(block_1), crc1
	# SKIP crc32 -i*8(block_2), crc2 ; Don't do this one yet

	mov block_2, block_0

	################################################################
	## 4) Combine three results:
	################################################################

	lea (K_table-8)(%rip), bufp # first entry is for idx 1
	shlq $3, %rax # rax *= 8
	pmovzxdq (bufp,%rax), %xmm0 # 2 consts: K1:K2
	leal (%eax,%eax,2), %eax # rax = 3 (total 24)
	subq %rax, tmp # tmp -= rax*24

	movq crc_init, %xmm1 # CRC for block 1
	PCLMULQDQ 0x00,%xmm0,%xmm1 # Multiply by K2

	movq crc1, %xmm2 # CRC for block 2
	PCLMULQDQ 0x10, %xmm0, %xmm2 # Multiply by K1

	pxor %xmm2,%xmm1
	movq %xmm1, %rax
	xor -i*8(block_2), %rax
	mov crc2, crc_init
	crc32 %rax, crc_init

	################################################################
	## 5) Check for end:
	################################################################

	LABEL crc_ 0
	mov tmp, len
	cmp $128*24, tmp
	jae full_block
	cmp $24, tmp
	jae continue_block

	less_than_24:
	shl $32-4, len_dw # less_than_16 expects length
	# in upper 4 bits of len_dw
	jnc less_than_16
	crc32q (bufptmp), crc_init
	crc32q 8(bufptmp), crc_init
	jz do_return
	add $16, bufptmp
	# len is less than 8 if we got here
	# less_than_8 expects length in upper 3 bits of len_dw
	# less_than_8_post_shl1 expects length = carryflag * 8 + len_dw[31:30]
	shl $2, len_dw
	jmp less_than_8_post_shl1

	#######################################################################
	## 6) LESS THAN 256-bytes REMAIN AT THIS POINT (8-bits of len are full)
	#######################################################################
	small:
	shl $32-8, len_dw # Prepare len_dw for less_than_256
	j=256
	.rept 5 # j = {256, 128, 64, 32, 16}
	.altmacro
	LABEL less_than_ %j # less_than_j: Length should be in
	# upper lg(j) bits of len_dw
	j=(j/2)
	shl $1, len_dw # Get next MSB
	JNC_LESS_THAN %j
	.noaltmacro
	i=0
	.rept (j/8)
	crc32q i(bufptmp), crc_init # Compute crc32 of 8-byte data
	i=i+8
	.endr
	jz do_return # Return if remaining length is zero
	add $j, bufptmp # Advance buf
	.endr

	less_than_8: # Length should be stored in
	# upper 3 bits of len_dw
	shl $1, len_dw
	less_than_8_post_shl1:
	jnc less_than_4
	crc32l (bufptmp), crc_init_dw # CRC of 4 bytes
	jz do_return # return if remaining data is zero
	add $4, bufptmp
	less_than_4: # Length should be stored in
	# upper 2 bits of len_dw
	shl $1, len_dw
	jnc less_than_2
	crc32w (bufptmp), crc_init_dw # CRC of 2 bytes
	jz do_return # return if remaining data is zero
	add $2, bufptmp
	less_than_2: # Length should be stored in the MSB
	# of len_dw
	shl $1, len_dw
	jnc less_than_1
	crc32b (bufptmp), crc_init_dw # CRC of 1 byte
	less_than_1: # Length should be zero
	do_return:
	movq crc_init, %rax
	popq %rsi
	popq %rdi
	popq %rbx
	ret
	ENDPROC(crc_pcl)

	.section .rodata, "a", @progbits
	################################################################
	## jump table Table is 129 entries x 2 bytes each
	################################################################
	.align 4
	jump_table:
	i=0
	.rept 129
	.altmacro
	JMPTBL_ENTRY %i
	.noaltmacro
	i=i+1
	.endr


	################################################################
	## PCLMULQDQ tables
	## Table is 128 entries x 2 words (8 bytes) each
	################################################################
	.align 8
	K_table:
	.long 0x493c7d27, 0x00000001
	.long 0xba4fc28e, 0x493c7d27
	.long 0xddc0152b, 0xf20c0dfe
	.long 0x9e4addf8, 0xba4fc28e
	.long 0x39d3b296, 0x3da6d0cb
	.long 0x0715ce53, 0xddc0152b
	.long 0x47db8317, 0x1c291d04
	.long 0x0d3b6092, 0x9e4addf8
	.long 0xc96cfdc0, 0x740eef02
	.long 0x878a92a7, 0x39d3b296
	.long 0xdaece73e, 0x083a6eec
	.long 0xab7aff2a, 0x0715ce53
	.long 0x2162d385, 0xc49f4f67
	.long 0x83348832, 0x47db8317
	.long 0x299847d5, 0x2ad91c30
	.long 0xb9e02b86, 0x0d3b6092
	.long 0x18b33a4e, 0x6992cea2
	.long 0xb6dd949b, 0xc96cfdc0
	.long 0x78d9ccb7, 0x7e908048
	.long 0xbac2fd7b, 0x878a92a7
	.long 0xa60ce07b, 0x1b3d8f29
	.long 0xce7f39f4, 0xdaece73e
	.long 0x61d82e56, 0xf1d0f55e
	.long 0xd270f1a2, 0xab7aff2a
	.long 0xc619809d, 0xa87ab8a8
	.long 0x2b3cac5d, 0x2162d385
	.long 0x65863b64, 0x8462d800
	.long 0x1b03397f, 0x83348832
	.long 0xebb883bd, 0x71d111a8
	.long 0xb3e32c28, 0x299847d5
	.long 0x064f7f26, 0xffd852c6
	.long 0xdd7e3b0c, 0xb9e02b86
	.long 0xf285651c, 0xdcb17aa4
	.long 0x10746f3c, 0x18b33a4e
	.long 0xc7a68855, 0xf37c5aee
	.long 0x271d9844, 0xb6dd949b
	.long 0x8e766a0c, 0x6051d5a2
	.long 0x93a5f730, 0x78d9ccb7
	.long 0x6cb08e5c, 0x18b0d4ff
	.long 0x6b749fb2, 0xbac2fd7b
	.long 0x1393e203, 0x21f3d99c
	.long 0xcec3662e, 0xa60ce07b
	.long 0x96c515bb, 0x8f158014
	.long 0xe6fc4e6a, 0xce7f39f4
	.long 0x8227bb8a, 0xa00457f7
	.long 0xb0cd4768, 0x61d82e56
	.long 0x39c7ff35, 0x8d6d2c43
	.long 0xd7a4825c, 0xd270f1a2
	.long 0x0ab3844b, 0x00ac29cf
	.long 0x0167d312, 0xc619809d
	.long 0xf6076544, 0xe9adf796
	.long 0x26f6a60a, 0x2b3cac5d
	.long 0xa741c1bf, 0x96638b34
	.long 0x98d8d9cb, 0x65863b64
	.long 0x49c3cc9c, 0xe0e9f351
	.long 0x68bce87a, 0x1b03397f
	.long 0x57a3d037, 0x9af01f2d
	.long 0x6956fc3b, 0xebb883bd
	.long 0x42d98888, 0x2cff42cf
	.long 0x3771e98f, 0xb3e32c28
	.long 0xb42ae3d9, 0x88f25a3a
	.long 0x2178513a, 0x064f7f26
	.long 0xe0ac139e, 0x4e36f0b0
	.long 0x170076fa, 0xdd7e3b0c
	.long 0x444dd413, 0xbd6f81f8
	.long 0x6f345e45, 0xf285651c
	.long 0x41d17b64, 0x91c9bd4b
	.long 0xff0dba97, 0x10746f3c
	.long 0xa2b73df1, 0x885f087b
	.long 0xf872e54c, 0xc7a68855
	.long 0x1e41e9fc, 0x4c144932
	.long 0x86d8e4d2, 0x271d9844
	.long 0x651bd98b, 0x52148f02
	.long 0x5bb8f1bc, 0x8e766a0c
	.long 0xa90fd27a, 0xa3c6f37a
	.long 0xb3af077a, 0x93a5f730
	.long 0x4984d782, 0xd7c0557f
	.long 0xca6ef3ac, 0x6cb08e5c
	.long 0x234e0b26, 0x63ded06a
	.long 0xdd66cbbb, 0x6b749fb2
	.long 0x4597456a, 0x4d56973c
	.long 0xe9e28eb4, 0x1393e203
	.long 0x7b3ff57a, 0x9669c9df
	.long 0xc9c8b782, 0xcec3662e
	.long 0x3f70cc6f, 0xe417f38a
	.long 0x93e106a4, 0x96c515bb
	.long 0x62ec6c6d, 0x4b9e0f71
	.long 0xd813b325, 0xe6fc4e6a
	.long 0x0df04680, 0xd104b8fc
	.long 0x2342001e, 0x8227bb8a
	.long 0x0a2a8d7e, 0x5b397730
	.long 0x6d9a4957, 0xb0cd4768
	.long 0xe8b6368b, 0xe78eb416
	.long 0xd2c3ed1a, 0x39c7ff35
	.long 0x995a5724, 0x61ff0e01
	.long 0x9ef68d35, 0xd7a4825c
	.long 0x0c139b31, 0x8d96551c
	.long 0xf2271e60, 0x0ab3844b
	.long 0x0b0bf8ca, 0x0bf80dd2
	.long 0x2664fd8b, 0x0167d312
	.long 0xed64812d, 0x8821abed
	.long 0x02ee03b2, 0xf6076544
	.long 0x8604ae0f, 0x6a45d2b2
	.long 0x363bd6b3, 0x26f6a60a
	.long 0x135c83fd, 0xd8d26619
	.long 0x5fabe670, 0xa741c1bf
	.long 0x35ec3279, 0xde87806c
	.long 0x00bcf5f6, 0x98d8d9cb
	.long 0x8ae00689, 0x14338754
	.long 0x17f27698, 0x49c3cc9c
	.long 0x58ca5f00, 0x5bd2011f
	.long 0xaa7c7ad5, 0x68bce87a
	.long 0xb5cfca28, 0xdd07448e
	.long 0xded288f8, 0x57a3d037
	.long 0x59f229bc, 0xdde8f5b9
	.long 0x6d390dec, 0x6956fc3b
	.long 0x37170390, 0xa3e3e02c
	.long 0x6353c1cc, 0x42d98888
	.long 0xc4584f5c, 0xd73c7bea
	.long 0xf48642e9, 0x3771e98f
	.long 0x531377e2, 0x80ff0093
	.long 0xdd35bc8d, 0xb42ae3d9
	.long 0xb25b29f2, 0x8fe4c34d
	.long 0x9a5ede41, 0x2178513a
	.long 0xa563905d, 0xdf99fc11
	.long 0x45cddf4e, 0xe0ac139e
	.long 0xacfa3103, 0x6c23e841
	.long 0xa51b6135, 0x170076fa