// File: /workspace/github_c_makefile_star2_O2/sTeeLM[P]dwipe/pass.c
// Function: dwipe_static_verify
int dwipe_static_verify( DWIPE_METHOD_SIGNATURE, dwipe_pattern_t* pattern )
{
/**
 * Verifies that a static pass was correctly written to the device.
 *
 */

	/* The result holder. */
	int r;

	/* The IO size. */
	size_t blocksize;

	/* The result buffer for calls to lseek. */
	loff_t offset;

	/* The input buffer. */
	char* b;

	/* The pattern buffer that is used to check the input buffer. */
	char* d;

	/* A pointer into the pattern buffer. */
	char* q;

	/* The pattern buffer window offset. */
	int w = 0;

	/* The number of bytes remaining in the pass. */
	u64 z = c->device_size;

	if( pattern == NULL )
	{
		/* Caught insanity. */	
		dwipe_log( DWIPE_LOG_SANITY, "dwipe_static_verify: Null entropy pointer." );
		return -1;
	}

	if( pattern->length <= 0 )
	{
		/* Caught insanity. */	
		dwipe_log( DWIPE_LOG_SANITY, "dwipe_static_verify: The pattern length member is %i.", pattern->length );
		return -1;
	}

	/* Create the input buffer. */
	b = malloc( c->device_stat.st_blksize * 1024 );

	/* Check the memory allocation. */
	if( ! b )
	{
		dwipe_perror( errno, __FUNCTION__, "malloc" );
		dwipe_log( DWIPE_LOG_FATAL, "Unable to allocate memory for the input buffer." );
		return -1;
	}

	/* Create the pattern buffer */
	d = malloc( c->device_stat.st_blksize * 1024 + pattern->length * 2 );

	/* Check the memory allocation. */
	if( ! d )
	{
		dwipe_perror( errno, __FUNCTION__, "malloc" );
		dwipe_log( DWIPE_LOG_FATAL, "Unable to allocate memory for the pattern buffer." );
		return -1;
	}

	for( q = d ; q < d + c->device_stat.st_blksize * 1024 + pattern->length ; q += pattern->length )
	{
		/* Fill the pattern buffer with the pattern. */
		memcpy( q, pattern->s, pattern->length );
	}

	/* Tell our parent that we are syncing the device. */
	c->sync_status = 1;

	/* Sync the device. */
	r = fdatasync( c->device_fd );

	/* Tell our parent that we have finished syncing the device. */
	c->sync_status = 0;

	if( r != 0 )
	{
		/* FIXME: Is there a better way to handle this? */
		dwipe_perror( errno, __FUNCTION__, "fdatasync" );
		dwipe_log( DWIPE_LOG_WARNING, "Buffer flush failure on '%s'.", c->device_name );
	}


	/* Reset the file pointer. */
	offset = lseek( c->device_fd, 0, SEEK_SET );

	if( offset == (loff_t)-1 )
	{
		dwipe_perror( errno, __FUNCTION__, "lseek" );
		dwipe_log( DWIPE_LOG_FATAL, "Unable to reset the '%s' file offset.", c->device_name );
		return -1;
	}

	if( offset != 0 )
	{
		/* This is system insanity. */
		dwipe_log( DWIPE_LOG_SANITY, "dwipe_static_verify: lseek() returned a bogus offset on '%s'.", c->device_name );
		return -1;
	}


	while( z > 0 )
	{
		if( c->device_stat.st_blksize * 1024 < z )
		{
			blocksize = c->device_stat.st_blksize * 1024;
		}
		else
		{
			/* This is a seatbelt for buggy drivers and programming errors because */
			/* the device size should always be an even multiple of its blocksize. */
			blocksize = z;
			dwipe_log( DWIPE_LOG_WARNING,
			  "%s: The size of '%s' is not a multiple of its block size %i.",
			  __FUNCTION__, c->device_name, c->device_stat.st_blksize );
		}

		/* Fill the output buffer with the random pattern. */
		/* Read the buffer in from the device. */
		r = read( c->device_fd, b, blocksize );

		/* Check the result. */
		if( r < 0 )
		{
			dwipe_perror( errno, __FUNCTION__, "read" );
			dwipe_log( DWIPE_LOG_ERROR, "Unable to read from '%s'.", c->device_name );
			return -1;
		}

		/* Check for a partial read. */
		if( r == blocksize )
		{
			/* Check every byte in the buffer. */
			if( memcmp( b, &d[w], r ) != 0 ) { c->verify_errors += 1; }
		}
		else
		{
			/* The number of bytes that were not read. */
			int s = blocksize - r;

			/* TODO: Handle a partial read. */

			/* Increment the error count. */
			c->verify_errors += 1;
			
			dwipe_log( DWIPE_LOG_WARNING, "Partial read on '%s', %i bytes short.", c->device_name, s );

			/* Bump the file pointer to the next block. */
			offset = lseek( c->device_fd, s, SEEK_CUR );

			if( offset == (loff_t)-1 )
			{
				dwipe_perror( errno, __FUNCTION__, "lseek" );
				dwipe_log( DWIPE_LOG_ERROR, "Unable to bump the '%s' file offset after a partial read.", c->device_name );
				return -1;
			}

		} /* partial read */

		/* Adjust the window. */
		w = ( c->device_stat.st_blksize * 1024 + w ) % pattern->length;

		/* Intuition check: 
		 *   If the pattern length evenly divides the block size
		 *   then ( w == 0 ) always.
		 */

		/* Decrement the bytes remaining in this pass. */
		z -= r;

		/* Increment the total progress counters. */
		c->round_done += r;
		c->pass_done += r;

	} /* while bytes remaining */

	/* Release the buffers. */
	free( b );
	free( d );

	/* We're done. */
	return 0;
		
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
testq %rsi, %rsi
je 0x921f
movq %rsi, %r14
movl (%rsi), %r13d
testl %r13d, %r13d
jle 0x922d
movq %rdi, %rbx
movq 0x230(%rdi), %r15
movq 0x270(%rdi), %rbp
shlq $0xa, %rbp
movq %rbp, %rdi
callq 0x3300
movq %rax, 0x8(%rsp)
testq %rax, %rax
je 0x93b0
leaq (,%r13,2), %rdi
addq %rbp, %rdi
callq 0x3300
testq %rax, %rax
je 0x93d3
addq %rax, %rbp
addq %r13, %rbp
movq %rax, 0x10(%rsp)
movq %rax, %r12
cmpq %rbp, %r12
jae 0x9246
movq 0x8(%r14), %rsi
movq %r12, %rdi
movq %r13, %rdx
callq 0x32a0
addq %r13, %r12
jmp 0x9206
leaq 0x3f63(%rip), %rsi      # 0xd189
pushq $0x7
jmp 0x93f6
leaq 0x3f80(%rip), %rsi      # 0xd1b4
pushq $0x7
popq %rdi
movl %r13d, %edx
xorl %eax, %eax
callq 0x73a8
jmp 0x93fe
movw $0x1, 0x57c(%rbx)
movl 0x8(%rbx), %edi
callq 0x3080
andw $0x0, 0x57c(%rbx)
testl %eax, %eax
je 0x9295
callq 0x3070
movl (%rax), %edi
leaq 0x3f79(%rip), %rsi      # 0xd1ea
leaq 0x3cfa(%rip), %rdx      # 0xcf72
callq 0x7600
movq 0x228(%rbx), %rdx
leaq 0x3cf1(%rip), %rsi      # 0xcf7c
pushq $0x4
popq %rdi
xorl %eax, %eax
callq 0x73a8
movl 0x8(%rbx), %edi
xorl %esi, %esi
xorl %edx, %edx
callq 0x3420
cmpq $-0x1, %rax
je 0x9410
testq %rax, %rax
jne 0x943c
xorl %r13d, %r13d
testq %r15, %r15
je 0x944e
movq 0x270(%rbx), %r8
movq %r8, %rbp
shlq $0xa, %rbp
cmpq %r15, %rbp
jb 0x92f5
movq 0x228(%rbx), %rcx
pushq $0x4
popq %rdi
leaq 0x3cb6(%rip), %rsi      # 0xcf9a
leaq 0x3eff(%rip), %rdx      # 0xd1ea
xorl %eax, %eax
callq 0x73a8
movq %r15, %rbp
movl 0x8(%rbx), %edi
movq 0x8(%rsp), %rsi
movq %rbp, %rdx
callq 0x3240
testl %eax, %eax
js 0x9466
movl %eax, %r12d
andl $0x7fffffff, %r12d      # imm = 0x7FFFFFFF
cmpq %rbp, %r12
jne 0x9342
movslq %r13d, %r13
movq 0x10(%rsp), %rax
leaq (%rax,%r13), %rsi
movq 0x8(%rsp), %rdi
movq %rbp, %rdx
callq 0x3320
testl %eax, %eax
je 0x9381
incq 0x588(%rbx)
jmp 0x9381
subq %rax, %rbp
incq 0x588(%rbx)
movq 0x228(%rbx), %rdx
pushq $0x4
popq %rdi
leaq 0x3edf(%rip), %rsi      # 0xd23c
movl %ebp, %ecx
xorl %eax, %eax
callq 0x73a8
movl 0x8(%rbx), %edi
movslq %ebp, %rsi
pushq $0x1
popq %rdx
callq 0x3420
cmpq $-0x1, %rax
je 0x9490
movslq %r13d, %r13
movq 0x270(%rbx), %rax
shlq $0xa, %rax
addq %r13, %rax
movslq (%r14), %rcx
cqto
idivq %rcx
movq %rdx, %r13
subq %r12, %r15
addq %r12, 0x340(%rbx)
addq %r12, 0x2f0(%rbx)
jmp 0x92b7
callq 0x3070
movl (%rax), %edi
leaq 0x3e2c(%rip), %rsi      # 0xd1ea
leaq 0x17eb(%rip), %rdx      # 0xabb0
callq 0x7600
leaq 0x3b3f(%rip), %rsi      # 0xcf10
jmp 0x93f4
callq 0x3070
movl (%rax), %edi
leaq 0x3e09(%rip), %rsi      # 0xd1ea
leaq 0x17c8(%rip), %rdx      # 0xabb0
callq 0x7600
leaq 0x3b4c(%rip), %rsi      # 0xcf40
pushq $0x6
popq %rdi
xorl %eax, %eax
callq 0x73a8
pushq $-0x1
popq %rax
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
callq 0x3070
movl (%rax), %edi
leaq 0x3dcc(%rip), %rsi      # 0xd1ea
leaq 0x1974(%rip), %rdx      # 0xad99
callq 0x7600
movq 0x228(%rbx), %rdx
leaq 0x198d(%rip), %rsi      # 0xadc5
pushq $0x6
jmp 0x94ba
movq 0x228(%rbx), %rdx
leaq 0x3db4(%rip), %rsi      # 0xd1fe
pushq $0x7
jmp 0x94ba
movq 0x8(%rsp), %rdi
callq 0x3060
movq 0x10(%rsp), %rdi
callq 0x3060
xorl %eax, %eax
jmp 0x9401
callq 0x3070
movl (%rax), %edi
leaq 0x3d76(%rip), %rsi      # 0xd1ea
leaq 0x300c(%rip), %rdx      # 0xc487
callq 0x7600
movq 0x228(%rbx), %rdx
leaq 0x3b49(%rip), %rsi      # 0xcfd7
jmp 0x94b8
callq 0x3070
movl (%rax), %edi
leaq 0x3d4c(%rip), %rsi      # 0xd1ea
leaq 0x18f4(%rip), %rdx      # 0xad99
callq 0x7600
movq 0x228(%rbx), %rdx
leaq 0x3b65(%rip), %rsi      # 0xd01d
pushq $0x5
popq %rdi
xorl %eax, %eax
callq 0x73a8
jmp 0x93fe