/*
CSC691 GPU programming
Project 4: Multi-Pi using multiple streams
Jiajie Xiao
Nov 19, 2017
*/


#include <stdio.h> 
#include <stdlib.h>
#include <time.h>
#define CHUNK 100000 

__global__ void partialHist(char *input, int len, int *hist)
{
    int i = threadIdx.x + blockDim.x*blockIdx.x;
    int number = input[i]-'0';
    //printf("%c\t%d\t%d\n", input[i], number, len);

    if (i<len)
    {
        // printf("%d\t",i);
        __shared__ int partial_sum[10];

         // thread 0 is responsible for initializing partial_sum
        if (threadIdx.x == 0)
        {
            for (i=0;i<10;i++)
                partial_sum[i] = 0;
        } 
        __syncthreads(); // each thread updates the partial sum
        atomicAdd(&partial_sum[number], 1);
        //printf("%d\t%d\n",number, partial_sum[number]);
        __syncthreads();

        // thread 0 updates the total sum
        if (threadIdx.x == 0)
        {
            for (i=0;i<10;i++)
                atomicAdd(&hist[i], partial_sum[i]); 
        }          
    }	
}

int main(int argc, char **argv)
{
        FILE *inputFile, *outputFile; 
        int numTruncated = -1;
        if (argc < 2)
        {
            printf("An input file name is required.");
            return -1;
        }
        else if (argc >2)
        {
            numTruncated = atoi(argv[2]);
            if (numTruncated<1)
            {
                printf("Please type positive number of digits to be evaluated.\n");
                return -1;
            }
        }
                
        inputFile = fopen(argv[1],"r");
        if (ferror(inputFile))
        {
                perror("Error: ");
                return -1;
        }
        else
        {
            int i, stream_idx;

            char *buf;
            // paged-locked allocation is required when inolving streams (for pinned data that is stored in memory all the time)
            //cudaHostAlloc((void**)&buf, CHUNK*sizeof(char), cudaHostAllocDefault);
            cudaMallocHost((void**)&buf, CHUNK*sizeof(char));
            int *histc;
            cudaHostAlloc((void**)&histc, 10*sizeof(int), cudaHostAllocDefault);
            for(int i=0;i<10;i++) histc[i] = 0;


            int *histc_temp; // used for hist merging among streams and devices
            cudaHostAlloc((void**)&histc_temp, 10*sizeof(int), cudaHostAllocDefault);

            size_t nread;
           
            cudaEvent_t start_gpu, stop_gpu;
            cudaEventCreate(&start_gpu);
            cudaEventCreate(&stop_gpu);
            cudaEventRecord(start_gpu);    

            // Create two streams
            int num_streams = 2;
            cudaStream_t streams[num_streams];
            for (int stream_idx=0; stream_idx < num_streams; stream_idx++) 
                cudaStreamCreate(&(streams[stream_idx])); 

            char *dev_buf0, *dev_buf1;
            int *dev_histc0, *dev_histc1;

            cudaMalloc((void**)&dev_buf0, (int)(CHUNK/num_streams) * sizeof(char));
            cudaMalloc((void**)&dev_buf1, (int)(CHUNK/num_streams) * sizeof(char));
            cudaMalloc((void**)&dev_histc0, 10 * sizeof(int));
            cudaMalloc((void**)&dev_histc1, 10 * sizeof(int));

            cudaError_t err1, err2;
            
            int NumDigitsHistogramed = 0, Finished = 0, last; 
            while((nread = fread(buf, 1, CHUNK * sizeof(char), inputFile)) > 0 && Finished !=1)
            {
                printf("# Element loaded in CHUNK: %d\t%d\t%d\n",(int)nread, (int)(CHUNK * sizeof(char)), (int)sizeof(buf));  
                               
                if (numTruncated == -1 || NumDigitsHistogramed + (int)nread < numTruncated)
                    last = 0;
                else
                    last = 1;

                // Compute partial hist
                cudaMemcpy(dev_histc0, histc, 10 * sizeof(int), cudaMemcpyHostToDevice);
                cudaMemcpy(dev_histc1, histc, 10 * sizeof(int), cudaMemcpyHostToDevice);

                cudaMemcpyAsync(dev_buf0, buf, (int)(CHUNK/num_streams) * sizeof(char), cudaMemcpyHostToDevice, streams[0]);
                cudaMemcpyAsync(dev_buf1, buf + (int)(CHUNK/num_streams), (int)(CHUNK/num_streams) * sizeof(char), cudaMemcpyHostToDevice, streams[1]);
                //cudaMemcpyAsync(dev_buf1, buf, (int) (1.0/num_streams * CHUNK) * sizeof(char), cudaMemcpyHostToDevice, streams[1]);

                // partial hist execution 
                if(last)
                {
                    partialHist <<< 100,1000, 0, streams[0] >>> (dev_buf0,  (numTruncated - NumDigitsHistogramed)/num_streams, dev_histc0); 
                    err1 = cudaGetLastError();
                    partialHist <<< 100,1000, 0, streams[1] >>> (dev_buf1,  (numTruncated - NumDigitsHistogramed)/num_streams, dev_histc1);
                    err2 = cudaGetLastError();
                }
                else
                {
                    partialHist <<< 100,1000, 0, streams[0] >>> (dev_buf0, (int) nread/num_streams, dev_histc0); 
                    err1 = cudaGetLastError();
                    partialHist <<< 100,1000, 0, streams[1] >>> (dev_buf1, (int) nread/num_streams, dev_histc1); 
                    err2 = cudaGetLastError();
                }
                
                
                if (err1 != cudaSuccess && err2 !=cudaSuccess) 
                {
                    printf("Error: stream1 %s\n stream2 %s\n", cudaGetErrorString(err1),cudaGetErrorString(err2));
                    return -1;
                }    

                // Synchronization                    
                for (stream_idx=0;stream_idx<num_streams;stream_idx++)
                {
                    cudaStreamSynchronize(streams[stream_idx]);
                    printf("Stream Synchronized (#) %d.\n", stream_idx);
                }

                cudaDeviceSynchronize();

                // Merge partial hist
                //cudaMemcpy(histc_temp, dev_histc0, 10 * sizeof(int), cudaMemcpyDeviceToHost);
                cudaMemcpyAsync(histc_temp, dev_histc0, 10 * sizeof(int), cudaMemcpyDeviceToHost,streams[0]);
                for (i=0;i<10;i++) 
                {
                    histc[i]+=histc_temp[i];
                    //printf("%d\t%d\n",i,histc_temp[i]);
                }
                cudaStreamSynchronize(streams[0]);
                cudaMemcpyAsync(histc_temp, dev_histc1, 10 * sizeof(int), cudaMemcpyDeviceToHost,streams[1]);
                for (i=0;i<10;i++) 
                {
                    histc[i]+=histc_temp[i];
                    //printf("%d\t%d\n",i,histc_temp[i]);            
                }
                cudaStreamSynchronize(streams[1]);

                // // cupy memory from gpu 1 to gpu0 using synchronized one instead of the asynchronized one
                // cudaMemcpyPeer(histc_temp, 0, dev_histc2, 1, 10 * sizeof(int));
                // for (i=0;i<10;i++) 
                //     histc[i]+=histc_temp[i];
                // cudaMemcpyPeer(histc_temp, 0, dev_histc3, 1, 10 * sizeof(int));
                // for (i=0;i<10;i++) 
                //     histc[i]+=histc_temp[i];
                
                if(last)
                {
                    NumDigitsHistogramed = numTruncated;
                    Finished = 1;
                }    
                else
                {
                    NumDigitsHistogramed += (int)nread;
                }
            }
            cudaEventRecord(stop_gpu);

            cudaStreamDestroy(streams[0]);
            cudaStreamDestroy(streams[1]);
            cudaFree(dev_histc0);
            cudaFree(dev_histc1);
            cudaFree(dev_buf0);
            cudaFree(dev_buf1);

            cudaEventSynchronize(stop_gpu);
            float milliseconds_gpu = 0;
            cudaEventElapsedTime(&milliseconds_gpu, start_gpu, stop_gpu);

            fclose(inputFile);
			printf("The histograming calculation time (ms): %f\n", milliseconds_gpu);

			outputFile = fopen("hist.txt", "a");
			if (ferror(inputFile))
   			{
            	perror("Error: ");
            	return -1;
    		}
   			else
    		{
				fprintf(outputFile, "%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\n", NumDigitsHistogramed, histc[0], histc[1], histc[2], histc[3], histc[4], histc[5], histc[6], histc[7], histc[8], histc[9] );
                fclose(outputFile);
    		}
        }
        return 0;
}


	.file	"tmpxft_003a8636_00000000-6_PiHist.cudafe1.cpp"
	.text
#APP

#NO_APP
	.type	_ZL26__cudaUnregisterBinaryUtilv, @function
_ZL26__cudaUnregisterBinaryUtilv:
.LFB2030:
	.cfi_startproc
	endbr64
	movq	_ZL20__cudaFatCubinHandle(%rip), %rdi
	jmp	__cudaUnregisterFatBinary@PLT
	.cfi_endproc
.LFE2030:
	.size	_ZL26__cudaUnregisterBinaryUtilv, .-_ZL26__cudaUnregisterBinaryUtilv
	.globl	_Z34__device_stub__Z11partialHistPciPiPciPi
	.type	_Z34__device_stub__Z11partialHistPciPiPciPi, @function
_Z34__device_stub__Z11partialHistPciPiPciPi:
.LFB2052:
	.cfi_startproc
	endbr64
	subq	$136, %rsp
	.cfi_def_cfa_offset 144
	movq	%rdi, 24(%rsp)
	leaq	40(%rsp), %rcx
	leaq	48(%rsp), %rdi
	movl	%esi, 20(%rsp)
	leaq	60(%rsp), %rsi
	movq	%rdx, 8(%rsp)
	leaq	32(%rsp), %rdx
	movq	%fs:40, %rax
	movq	%rax, 120(%rsp)
	xorl	%eax, %eax
	leaq	24(%rsp), %rax
	movl	$1, 56(%rsp)
	movq	%rax, 96(%rsp)
	leaq	20(%rsp), %rax
	movq	%rax, 104(%rsp)
	leaq	8(%rsp), %rax
	movq	%rax, 112(%rsp)
	movabsq	$4294967297, %rax
	movq	%rax, 48(%rsp)
	movq	%rax, 60(%rsp)
	movl	$1, 68(%rsp)
	call	__cudaPopCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L2
	pushq	40(%rsp)
	.cfi_def_cfa_offset 152
	leaq	_Z11partialHistPciPi(%rip), %rdi
	pushq	40(%rsp)
	.cfi_def_cfa_offset 160
	movq	76(%rsp), %rcx
	movl	84(%rsp), %r8d
	movq	64(%rsp), %rsi
	movl	72(%rsp), %edx
	leaq	112(%rsp), %r9
	call	cudaLaunchKernel@PLT
	popq	%rax
	.cfi_def_cfa_offset 152
	popq	%rdx
	.cfi_def_cfa_offset 144
.L2:
	movq	120(%rsp), %rax
	subq	%fs:40, %rax
	je	.L4
	call	__stack_chk_fail@PLT
.L4:
	addq	$136, %rsp
	.cfi_def_cfa_offset 8
	ret
	.cfi_endproc
.LFE2052:
	.size	_Z34__device_stub__Z11partialHistPciPiPciPi, .-_Z34__device_stub__Z11partialHistPciPiPciPi
	.globl	_Z11partialHistPciPi
	.type	_Z11partialHistPciPi, @function
_Z11partialHistPciPi:
.LFB2053:
	.cfi_startproc
	endbr64
	jmp	_Z34__device_stub__Z11partialHistPciPiPciPi
	.cfi_endproc
.LFE2053:
	.size	_Z11partialHistPciPi, .-_Z11partialHistPciPi
	.section	.rodata.str1.1,"aMS",@progbits,1
.LC0:
	.string	"An input file name is required."
.LC1:
	.string	"Please type positive number of digits to be evaluated.\n"
.LC2:
	.string	"r"
.LC3:
	.string	"Error: "
.LC4:
	.string	"Stream Synchronized (#) %d.\n"
.LC5:
	.string	"Error: stream1 %s\n stream2 %s\n"
.LC6:
	.string	"# Element loaded in CHUNK: %d\t%d\t%d\n"
.LC8:
	.string	"The histograming calculation time (ms): %f\n"
.LC9:
	.string	"a"
.LC10:
	.string	"hist.txt"
.LC11:
	.string	"%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\n"
	.section	.text.startup,"ax",@progbits
	.globl	main
	.type	main, @function
main:
.LFB2027:
	.cfi_startproc
	endbr64
	pushq	%rbp
	.cfi_def_cfa_offset 16
	.cfi_offset 6, -16
	movq	%rsp, %rbp
	.cfi_def_cfa_register 6
	pushq	%r15
	pushq	%r14
	pushq	%r13
	pushq	%r12
	pushq	%rbx
	subq	$168, %rsp
	.cfi_offset 15, -24
	.cfi_offset 14, -32
	.cfi_offset 13, -40
	.cfi_offset 12, -48
	.cfi_offset 3, -56
	movq	%fs:40, %rax
	movq	%rax, -56(%rbp)
	xorl	%eax, %eax
	cmpl	$1, %edi
	jg	.L9
	leaq	.LC0(%rip), %rsi
	movl	$2, %edi
	jmp	.L49
.L9:
	movq	%rsi, %r15
	cmpl	$2, %edi
	je	.L32
	movq	16(%rsi), %rdi
	call	atoi@PLT
	movl	%eax, %ebx
	testl	%eax, %eax
	jg	.L11
	leaq	.LC1(%rip), %rsi
	movl	$2, %edi
	xorl	%eax, %eax
.L49:
	call	__printf_chk@PLT
.L10:
	orl	$-1, %ebx
	jmp	.L8
.L32:
	orl	$-1, %ebx
.L11:
	movq	8(%r15), %rdi
	leaq	.LC2(%rip), %rsi
	call	fopen@PLT
	movq	%rax, %rdi
	movq	%rax, -192(%rbp)
	call	ferror@PLT
	movl	%eax, %r15d
	testl	%eax, %eax
	je	.L13
	leaq	.LC3(%rip), %rdi
	call	perror@PLT
	jmp	.L10
.L13:
	leaq	-168(%rbp), %rdi
	movl	$100000, %esi
	movq	%rsp, -200(%rbp)
	xorl	%r14d, %r14d
	call	cudaMallocHost@PLT
	leaq	-160(%rbp), %rdi
	xorl	%edx, %edx
	movl	$40, %esi
	call	cudaHostAlloc@PLT
	movl	%r15d, %eax
	movl	$10, %ecx
	xorl	%edx, %edx
	movq	-160(%rbp), %rdi
	movl	$40, %esi
	leaq	.LC6(%rip), %r15
	rep stosl
	leaq	-152(%rbp), %rdi
	call	cudaHostAlloc@PLT
	leaq	-144(%rbp), %rdi
	call	cudaEventCreate@PLT
	leaq	-136(%rbp), %rdi
	call	cudaEventCreate@PLT
	movq	-144(%rbp), %rdi
	xorl	%esi, %esi
	call	cudaEventRecord@PLT
	leaq	-72(%rbp), %rdi
	call	cudaStreamCreate@PLT
	leaq	-64(%rbp), %rdi
	call	cudaStreamCreate@PLT
	leaq	-128(%rbp), %rdi
	movl	$50000, %esi
	call	cudaMalloc@PLT
	leaq	-120(%rbp), %rdi
	movl	$50000, %esi
	call	cudaMalloc@PLT
	leaq	-112(%rbp), %rdi
	movl	$40, %esi
	call	cudaMalloc@PLT
	leaq	-104(%rbp), %rdi
	movl	$40, %esi
	call	cudaMalloc@PLT
	xorl	%eax, %eax
	movl	%eax, -180(%rbp)
.L14:
	movq	-192(%rbp), %r8
	movq	-168(%rbp), %rdi
	movl	$100000, %ecx
	movl	$1, %edx
	orq	$-1, %rsi
	call	__fread_chk@PLT
	movq	%rax, %r13
	testl	%r14d, %r14d
	jne	.L27
	testq	%rax, %rax
	je	.L27
	movl	%eax, -184(%rbp)
	movl	%eax, %edx
	movl	$8, %r8d
	xorl	%eax, %eax
	movl	$100000, %ecx
	movq	%r15, %rsi
	movl	$2, %edi
	call	__printf_chk@PLT
	cmpl	$-1, %ebx
	je	.L28
	movl	-180(%rbp), %eax
	xorl	%r14d, %r14d
	addl	%r13d, %eax
	cmpl	%ebx, %eax
	setge	%r14b
.L28:
	movq	-160(%rbp), %rsi
	movq	-112(%rbp), %rdi
	movl	$1, %ecx
	movl	$40, %edx
	call	cudaMemcpy@PLT
	movq	-160(%rbp), %rsi
	movq	-104(%rbp), %rdi
	movl	$1, %ecx
	movl	$40, %edx
	call	cudaMemcpy@PLT
	movq	-72(%rbp), %r8
	movq	-128(%rbp), %rdi
	movl	$1, %ecx
	movq	-168(%rbp), %rsi
	movl	$50000, %edx
	call	cudaMemcpyAsync@PLT
	movq	-168(%rbp), %rax
	movq	-64(%rbp), %r8
	movl	$1, %ecx
	movq	-120(%rbp), %rdi
	movl	$50000, %edx
	leaq	50000(%rax), %rsi
	call	cudaMemcpyAsync@PLT
	movl	$536871037, %edx
	movl	$1, -76(%rbp)
	movabsq	$4294967396, %rdi
	salq	$3, %rdx
	testl	%r14d, %r14d
	movq	%rdi, -96(%rbp)
	movq	-72(%rbp), %r9
	movq	%rdx, -84(%rbp)
	movl	$0, %r8d
	movl	$1, %ecx
	movl	$1, %esi
	movl	$1, -88(%rbp)
	je	.L15
	call	__cudaPushCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L16
	movl	-180(%rbp), %ecx
	movl	%ebx, %eax
	movq	-128(%rbp), %rdi
	subl	%ecx, %eax
	movl	$2, %ecx
	cltd
	idivl	%ecx
	movq	-112(%rbp), %rdx
	movl	%eax, %esi
	call	_Z34__device_stub__Z11partialHistPciPiPciPi
.L16:
	call	cudaGetLastError@PLT
	movl	$536871037, %edx
	movl	$1073741849, %edi
	xorl	%r8d, %r8d
	movq	-64(%rbp), %r9
	salq	$3, %rdx
	salq	$2, %rdi
	movl	%eax, %r12d
	movl	$1, %ecx
	movl	$1, %esi
	movq	%rdx, -84(%rbp)
	movl	$1, -76(%rbp)
	movq	%rdi, -96(%rbp)
	movl	$1, -88(%rbp)
	call	__cudaPushCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L20
	movl	-180(%rbp), %ecx
	movl	%ebx, %eax
	subl	%ecx, %eax
	movl	$2, %ecx
	cltd
	idivl	%ecx
	movq	-104(%rbp), %rdx
	movl	%eax, %esi
	jmp	.L50
.L15:
	call	__cudaPushCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L19
	movl	%r13d, %eax
	movl	$2, %ecx
	movq	-128(%rbp), %rdi
	cltd
	idivl	%ecx
	movq	-112(%rbp), %rdx
	movl	%eax, %esi
	call	_Z34__device_stub__Z11partialHistPciPiPciPi
.L19:
	call	cudaGetLastError@PLT
	movl	$536871037, %edx
	movl	$1073741849, %edi
	xorl	%r8d, %r8d
	movq	-64(%rbp), %r9
	salq	$3, %rdx
	salq	$2, %rdi
	movl	%eax, %r12d
	movl	$1, %ecx
	movl	$1, %esi
	movq	%rdx, -84(%rbp)
	movl	$1, -76(%rbp)
	movq	%rdi, -96(%rbp)
	movl	$1, -88(%rbp)
	call	__cudaPushCallConfiguration@PLT
	testl	%eax, %eax
	jne	.L20
	movl	%r13d, %eax
	movl	$2, %ecx
	cltd
	idivl	%ecx
	movq	-104(%rbp), %rdx
	movl	%eax, %esi
.L50:
	movq	-120(%rbp), %rdi
	call	_Z34__device_stub__Z11partialHistPciPiPciPi
.L20:
	call	cudaGetLastError@PLT
	testl	%r12d, %r12d
	je	.L35
	testl	%eax, %eax
	jne	.L21
.L35:
	movq	-72(%rbp), %rdi
	leaq	.LC4(%rip), %r12
	call	cudaStreamSynchronize@PLT
	xorl	%edx, %edx
	movq	%r12, %rsi
	movl	$2, %edi
	xorl	%eax, %eax
	call	__printf_chk@PLT
	movq	-64(%rbp), %rdi
	call	cudaStreamSynchronize@PLT
	movl	$1, %edx
	movq	%r12, %rsi
	xorl	%eax, %eax
	movl	$2, %edi
	call	__printf_chk@PLT
	call	cudaDeviceSynchronize@PLT
	movq	-112(%rbp), %rsi
	movq	-72(%rbp), %r8
	movl	$40, %edx
	movq	-152(%rbp), %rdi
	movl	$2, %ecx
	call	cudaMemcpyAsync@PLT
	movq	-160(%rbp), %rdx
	movq	-152(%rbp), %rsi
	xorl	%eax, %eax
	jmp	.L23
.L21:
	movl	%eax, %edi
	call	cudaGetErrorString@PLT
	movl	%r12d, %edi
	movq	%rax, %rbx
	call	cudaGetErrorString@PLT
	movq	%rbx, %rcx
	movl	$2, %edi
	leaq	.LC5(%rip), %rsi
	movq	%rax, %rdx
	xorl	%eax, %eax
	call	__printf_chk@PLT
	jmp	.L24
.L23:
	movl	(%rsi,%rax), %ecx
	addl	%ecx, (%rdx,%rax)
	addq	$4, %rax
	cmpq	$40, %rax
	jne	.L23
	movq	-72(%rbp), %rdi
	call	cudaStreamSynchronize@PLT
	movq	-104(%rbp), %rsi
	movq	-64(%rbp), %r8
	movl	$40, %edx
	movq	-152(%rbp), %rdi
	movl	$2, %ecx
	call	cudaMemcpyAsync@PLT
	movq	-160(%rbp), %rdx
	movq	-152(%rbp), %rsi
	xorl	%eax, %eax
.L25:
	movl	(%rsi,%rax), %ecx
	addl	%ecx, (%rdx,%rax)
	addq	$4, %rax
	cmpq	$40, %rax
	jne	.L25
	movq	-64(%rbp), %rdi
	call	cudaStreamSynchronize@PLT
	testl	%r14d, %r14d
	jne	.L33
	addl	%r13d, -180(%rbp)
	jmp	.L14
.L33:
	movl	%ebx, -180(%rbp)
	jmp	.L14
.L27:
	movq	-136(%rbp), %rdi
	xorl	%esi, %esi
	call	cudaEventRecord@PLT
	movq	-72(%rbp), %rdi
	call	cudaStreamDestroy@PLT
	movq	-64(%rbp), %rdi
	call	cudaStreamDestroy@PLT
	movq	-112(%rbp), %rdi
	call	cudaFree@PLT
	movq	-104(%rbp), %rdi
	call	cudaFree@PLT
	movq	-128(%rbp), %rdi
	call	cudaFree@PLT
	movq	-120(%rbp), %rdi
	call	cudaFree@PLT
	movq	-136(%rbp), %rdi
	call	cudaEventSynchronize@PLT
	movq	-136(%rbp), %rdx
	leaq	-84(%rbp), %rdi
	movq	-144(%rbp), %rsi
	movl	$0x00000000, -84(%rbp)
	call	cudaEventElapsedTime@PLT
	movq	-192(%rbp), %rdi
	call	fclose@PLT
	leaq	.LC8(%rip), %rsi
	movl	$2, %edi
	movb	$1, %al
	cvtss2sd	-84(%rbp), %xmm0
	call	__printf_chk@PLT
	leaq	.LC9(%rip), %rsi
	leaq	.LC10(%rip), %rdi
	call	fopen@PLT
	movq	-192(%rbp), %rdi
	movq	%rax, %r12
	call	ferror@PLT
	movl	%eax, %ebx
	testl	%eax, %eax
	je	.L30
	leaq	.LC3(%rip), %rdi
	call	perror@PLT
	jmp	.L24
.L30:
	movq	-160(%rbp), %rax
	movl	-180(%rbp), %ecx
	movl	$2, %esi
	movq	%r12, %rdi
	movl	36(%rax), %edx
	movl	4(%rax), %r9d
	pushq	%rdx
	movl	32(%rax), %edx
	pushq	%rdx
	movl	28(%rax), %edx
	pushq	%rdx
	movl	24(%rax), %edx
	pushq	%rdx
	movl	20(%rax), %edx
	pushq	%rdx
	movl	16(%rax), %edx
	pushq	%rdx
	movl	12(%rax), %edx
	pushq	%rdx
	movl	8(%rax), %edx
	pushq	%rdx
	movl	(%rax), %r8d
	leaq	.LC11(%rip), %rdx
	xorl	%eax, %eax
	call	__fprintf_chk@PLT
	addq	$64, %rsp
	movq	%r12, %rdi
	call	fclose@PLT
	movq	-200(%rbp), %rsp
	jmp	.L8
.L24:
	movq	-200(%rbp), %rsp
	jmp	.L10
.L8:
	movq	-56(%rbp), %rax
	subq	%fs:40, %rax
	je	.L31
	call	__stack_chk_fail@PLT
.L31:
	leaq	-40(%rbp), %rsp
	movl	%ebx, %eax
	popq	%rbx
	popq	%r12
	popq	%r13
	popq	%r14
	popq	%r15
	popq	%rbp
	.cfi_def_cfa 7, 8
	ret
	.cfi_endproc
.LFE2027:
	.size	main, .-main
	.section	.rodata.str1.1
.LC12:
	.string	"_Z11partialHistPciPi"
	.section	.text.startup
	.type	_ZL24__sti____cudaRegisterAllv, @function
_ZL24__sti____cudaRegisterAllv:
.LFB2055:
	.cfi_startproc
	endbr64
	pushq	%rax
	.cfi_def_cfa_offset 16
	leaq	_ZL15__fatDeviceText(%rip), %rdi
	call	__cudaRegisterFatBinary@PLT
	pushq	$0
	.cfi_def_cfa_offset 24
	xorl	%r9d, %r9d
	orl	$-1, %r8d
	pushq	$0
	.cfi_def_cfa_offset 32
	leaq	.LC12(%rip), %rdx
	movq	%rax, %rdi
	leaq	_Z11partialHistPciPi(%rip), %rsi
	pushq	$0
	.cfi_def_cfa_offset 40
	movq	%rdx, %rcx
	pushq	$0
	.cfi_def_cfa_offset 48
	movq	%rax, _ZL20__cudaFatCubinHandle(%rip)
	call	__cudaRegisterFunction@PLT
	movq	_ZL20__cudaFatCubinHandle(%rip), %rdi
	addq	$32, %rsp
	.cfi_def_cfa_offset 16
	call	__cudaRegisterFatBinaryEnd@PLT
	leaq	_ZL26__cudaUnregisterBinaryUtilv(%rip), %rdi
	popq	%rdx
	.cfi_def_cfa_offset 8
	jmp	atexit@PLT
	.cfi_endproc
.LFE2055:
	.size	_ZL24__sti____cudaRegisterAllv, .-_ZL24__sti____cudaRegisterAllv
	.section	.init_array,"aw"
	.align 8
	.quad	_ZL24__sti____cudaRegisterAllv
	.section	.nvFatBinSegment,"aw"
	.align 8
	.type	_ZL15__fatDeviceText, @object
	.size	_ZL15__fatDeviceText, 24
_ZL15__fatDeviceText:
	.long	1180844977
	.long	1
	.quad	fatbinData
	.quad	0
	.local	_ZL20__cudaFatCubinHandle
	.comm	_ZL20__cudaFatCubinHandle,8,8
	.ident	"GCC: (Ubuntu 13.3.0-6ubuntu2~24.04) 13.3.0"
	.section	.note.GNU-stack,"",@progbits
	.section	.note.gnu.property,"a"
	.align 8
	.long	1f - 0f
	.long	4f - 1f
	.long	5
0:
	.string	"GNU"
1:
	.align 8
	.long	0xc0000002
	.long	3f - 2f
2:
	.long	0x3
3:
	.align 8
4:

/*
CSC691 GPU programming
Project 4: Multi-Pi using multiple streams
Jiajie Xiao
Nov 19, 2017
*/



#include <hip/hip_runtime.h>
#include <stdio.h> 
#include <stdlib.h>
#include <time.h>
#define CHUNK 100000 

__global__ void partialHist(char *input, int len, int *hist)
{
    int i = threadIdx.x + blockDim.x*blockIdx.x;
    int number = input[i]-'0';
    //printf("%c\t%d\t%d\n", input[i], number, len);

    if (i<len)
    {
        // printf("%d\t",i);
        __shared__ int partial_sum[10];

         // thread 0 is responsible for initializing partial_sum
        if (threadIdx.x == 0)
        {
            for (i=0;i<10;i++)
                partial_sum[i] = 0;
        } 
        __syncthreads(); // each thread updates the partial sum
        atomicAdd(&partial_sum[number], 1);
        //printf("%d\t%d\n",number, partial_sum[number]);
        __syncthreads();

        // thread 0 updates the total sum
        if (threadIdx.x == 0)
        {
            for (i=0;i<10;i++)
                atomicAdd(&hist[i], partial_sum[i]); 
        }          
    }	
}

int main(int argc, char **argv)
{
        FILE *inputFile, *outputFile; 
        int numTruncated = -1;
        if (argc < 2)
        {
            printf("An input file name is required.");
            return -1;
        }
        else if (argc >2)
        {
            numTruncated = atoi(argv[2]);
            if (numTruncated<1)
            {
                printf("Please type positive number of digits to be evaluated.\n");
                return -1;
            }
        }
                
        inputFile = fopen(argv[1],"r");
        if (ferror(inputFile))
        {
                perror("Error: ");
                return -1;
        }
        else
        {
            int i, stream_idx;

            char *buf;
            // paged-locked allocation is required when inolving streams (for pinned data that is stored in memory all the time)
            //cudaHostAlloc((void**)&buf, CHUNK*sizeof(char), cudaHostAllocDefault);
            hipHostMalloc((void**)&buf, CHUNK*sizeof(char), hipHostMallocDefault);
            int *histc;
            hipHostAlloc((void**)&histc, 10*sizeof(int), hipHostMallocDefault);
            for(int i=0;i<10;i++) histc[i] = 0;


            int *histc_temp; // used for hist merging among streams and devices
            hipHostAlloc((void**)&histc_temp, 10*sizeof(int), hipHostMallocDefault);

            size_t nread;
           
            hipEvent_t start_gpu, stop_gpu;
            hipEventCreate(&start_gpu);
            hipEventCreate(&stop_gpu);
            hipEventRecord(start_gpu);    

            // Create two streams
            int num_streams = 2;
            hipStream_t streams[num_streams];
            for (int stream_idx=0; stream_idx < num_streams; stream_idx++) 
                hipStreamCreate(&(streams[stream_idx])); 

            char *dev_buf0, *dev_buf1;
            int *dev_histc0, *dev_histc1;

            hipMalloc((void**)&dev_buf0, (int)(CHUNK/num_streams) * sizeof(char));
            hipMalloc((void**)&dev_buf1, (int)(CHUNK/num_streams) * sizeof(char));
            hipMalloc((void**)&dev_histc0, 10 * sizeof(int));
            hipMalloc((void**)&dev_histc1, 10 * sizeof(int));

            hipError_t err1, err2;
            
            int NumDigitsHistogramed = 0, Finished = 0, last; 
            while((nread = fread(buf, 1, CHUNK * sizeof(char), inputFile)) > 0 && Finished !=1)
            {
                printf("# Element loaded in CHUNK: %d\t%d\t%d\n",(int)nread, (int)(CHUNK * sizeof(char)), (int)sizeof(buf));  
                               
                if (numTruncated == -1 || NumDigitsHistogramed + (int)nread < numTruncated)
                    last = 0;
                else
                    last = 1;

                // Compute partial hist
                hipMemcpy(dev_histc0, histc, 10 * sizeof(int), hipMemcpyHostToDevice);
                hipMemcpy(dev_histc1, histc, 10 * sizeof(int), hipMemcpyHostToDevice);

                hipMemcpyAsync(dev_buf0, buf, (int)(CHUNK/num_streams) * sizeof(char), hipMemcpyHostToDevice, streams[0]);
                hipMemcpyAsync(dev_buf1, buf + (int)(CHUNK/num_streams), (int)(CHUNK/num_streams) * sizeof(char), hipMemcpyHostToDevice, streams[1]);
                //cudaMemcpyAsync(dev_buf1, buf, (int) (1.0/num_streams * CHUNK) * sizeof(char), cudaMemcpyHostToDevice, streams[1]);

                // partial hist execution 
                if(last)
                {
                    partialHist <<< 100,1000, 0, streams[0] >>> (dev_buf0,  (numTruncated - NumDigitsHistogramed)/num_streams, dev_histc0); 
                    err1 = hipGetLastError();
                    partialHist <<< 100,1000, 0, streams[1] >>> (dev_buf1,  (numTruncated - NumDigitsHistogramed)/num_streams, dev_histc1);
                    err2 = hipGetLastError();
                }
                else
                {
                    partialHist <<< 100,1000, 0, streams[0] >>> (dev_buf0, (int) nread/num_streams, dev_histc0); 
                    err1 = hipGetLastError();
                    partialHist <<< 100,1000, 0, streams[1] >>> (dev_buf1, (int) nread/num_streams, dev_histc1); 
                    err2 = hipGetLastError();
                }
                
                
                if (err1 != hipSuccess && err2 !=hipSuccess) 
                {
                    printf("Error: stream1 %s\n stream2 %s\n", hipGetErrorString(err1),hipGetErrorString(err2));
                    return -1;
                }    

                // Synchronization                    
                for (stream_idx=0;stream_idx<num_streams;stream_idx++)
                {
                    hipStreamSynchronize(streams[stream_idx]);
                    printf("Stream Synchronized (#) %d.\n", stream_idx);
                }

                hipDeviceSynchronize();

                // Merge partial hist
                //cudaMemcpy(histc_temp, dev_histc0, 10 * sizeof(int), cudaMemcpyDeviceToHost);
                hipMemcpyAsync(histc_temp, dev_histc0, 10 * sizeof(int), hipMemcpyDeviceToHost,streams[0]);
                for (i=0;i<10;i++) 
                {
                    histc[i]+=histc_temp[i];
                    //printf("%d\t%d\n",i,histc_temp[i]);
                }
                hipStreamSynchronize(streams[0]);
                hipMemcpyAsync(histc_temp, dev_histc1, 10 * sizeof(int), hipMemcpyDeviceToHost,streams[1]);
                for (i=0;i<10;i++) 
                {
                    histc[i]+=histc_temp[i];
                    //printf("%d\t%d\n",i,histc_temp[i]);            
                }
                hipStreamSynchronize(streams[1]);

                // // cupy memory from gpu 1 to gpu0 using synchronized one instead of the asynchronized one
                // cudaMemcpyPeer(histc_temp, 0, dev_histc2, 1, 10 * sizeof(int));
                // for (i=0;i<10;i++) 
                //     histc[i]+=histc_temp[i];
                // cudaMemcpyPeer(histc_temp, 0, dev_histc3, 1, 10 * sizeof(int));
                // for (i=0;i<10;i++) 
                //     histc[i]+=histc_temp[i];
                
                if(last)
                {
                    NumDigitsHistogramed = numTruncated;
                    Finished = 1;
                }    
                else
                {
                    NumDigitsHistogramed += (int)nread;
                }
            }
            hipEventRecord(stop_gpu);

            hipStreamDestroy(streams[0]);
            hipStreamDestroy(streams[1]);
            hipFree(dev_histc0);
            hipFree(dev_histc1);
            hipFree(dev_buf0);
            hipFree(dev_buf1);

            hipEventSynchronize(stop_gpu);
            float milliseconds_gpu = 0;
            hipEventElapsedTime(&milliseconds_gpu, start_gpu, stop_gpu);

            fclose(inputFile);
			printf("The histograming calculation time (ms): %f\n", milliseconds_gpu);

			outputFile = fopen("hist.txt", "a");
			if (ferror(inputFile))
   			{
            	perror("Error: ");
            	return -1;
    		}
   			else
    		{
				fprintf(outputFile, "%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\n", NumDigitsHistogramed, histc[0], histc[1], histc[2], histc[3], histc[4], histc[5], histc[6], histc[7], histc[8], histc[9] );
                fclose(outputFile);
    		}
        }
        return 0;
}


	.text
	.file	"PiHist.hip"
	.globl	_Z26__device_stub__partialHistPciPi # -- Begin function _Z26__device_stub__partialHistPciPi
	.type	_Z26__device_stub__partialHistPciPi,@function
_Z26__device_stub__partialHistPciPi:    # @_Z26__device_stub__partialHistPciPi
	.cfi_startproc
# %bb.0:
	pushq	%r15
	.cfi_def_cfa_offset 16
	pushq	%r14
	.cfi_def_cfa_offset 24
	pushq	%r13
	.cfi_def_cfa_offset 32
	pushq	%r12
	.cfi_def_cfa_offset 40
	pushq	%rbx
	.cfi_def_cfa_offset 48
	subq	$112, %rsp
	.cfi_def_cfa_offset 160
	.cfi_offset %rbx, -48
	.cfi_offset %r12, -40
	.cfi_offset %r13, -32
	.cfi_offset %r14, -24
	.cfi_offset %r15, -16
	leaq	40(%rsp), %rax
	movq	%rdi, (%rax)
	leaq	12(%rsp), %rcx
	movl	%esi, (%rcx)
	leaq	32(%rsp), %rsi
	movq	%rdx, (%rsi)
	leaq	80(%rsp), %rbx
	movq	%rax, (%rbx)
	movq	%rcx, 8(%rbx)
	movq	%rsi, 16(%rbx)
	leaq	64(%rsp), %r14
	leaq	48(%rsp), %r15
	leaq	24(%rsp), %r12
	leaq	16(%rsp), %r13
	movq	%r14, %rdi
	movq	%r15, %rsi
	movq	%r12, %rdx
	movq	%r13, %rcx
	callq	__hipPopCallConfiguration
	movq	(%r14), %rsi
	movl	8(%r14), %edx
	movq	(%r15), %rcx
	movl	8(%r15), %r8d
	movl	$_Z11partialHistPciPi, %edi
	movq	%rbx, %r9
	pushq	(%r13)
	.cfi_adjust_cfa_offset 8
	pushq	(%r12)
	.cfi_adjust_cfa_offset 8
	callq	hipLaunchKernel
	addq	$128, %rsp
	.cfi_adjust_cfa_offset -128
	popq	%rbx
	.cfi_def_cfa_offset 40
	popq	%r12
	.cfi_def_cfa_offset 32
	popq	%r13
	.cfi_def_cfa_offset 24
	popq	%r14
	.cfi_def_cfa_offset 16
	popq	%r15
	.cfi_def_cfa_offset 8
	retq
.Lfunc_end0:
	.size	_Z26__device_stub__partialHistPciPi, .Lfunc_end0-_Z26__device_stub__partialHistPciPi
	.cfi_endproc
                                        # -- End function
	.globl	main                            # -- Begin function main
	.type	main,@function
main:                                   # @main
	.cfi_startproc
# %bb.0:
	pushq	%rbp
	.cfi_def_cfa_offset 16
	.cfi_offset %rbp, -16
	movq	%rsp, %rbp
	.cfi_def_cfa_register %rbp
	pushq	%r15
	pushq	%r14
	pushq	%r13
	pushq	%r12
	pushq	%rbx
	subq	$136, %rsp
	.cfi_offset %rbx, -56
	.cfi_offset %r12, -48
	.cfi_offset %r13, -40
	.cfi_offset %r14, -32
	.cfi_offset %r15, -24
	cmpl	$1, %edi
	jg	.LBB1_2
# %bb.1:
	movl	$.L.str, %edi
	xorl	%eax, %eax
	callq	printf
	jmp	.LBB1_30
.LBB1_2:
	movq	%rsi, %rbx
	movl	$-1, %r15d
	cmpl	$2, %edi
	je	.LBB1_4
# %bb.3:
	movq	16(%rbx), %rdi
	callq	atoi
	movl	%eax, %r15d
	testl	%eax, %eax
	jle	.LBB1_28
.LBB1_4:
	movq	8(%rbx), %rdi
	movl	$.L.str.2, %esi
	callq	fopen
	movq	%rax, %rbx
	movq	%rax, %rdi
	callq	ferror
	testl	%eax, %eax
	jne	.LBB1_29
# %bb.5:                                # %.critedge
	movq	%rbx, -120(%rbp)                # 8-byte Spill
	leaq	-152(%rbp), %rbx
	movl	$100000, %esi                   # imm = 0x186A0
	movq	%rbx, %rdi
	xorl	%edx, %edx
	callq	hipHostMalloc
	leaq	-80(%rbp), %r12
	movl	$40, %esi
	movq	%r12, %rdi
	xorl	%edx, %edx
	callq	hipHostAlloc
	movq	(%r12), %rax
	xorps	%xmm0, %xmm0
	movups	%xmm0, (%rax)
	movups	%xmm0, 16(%rax)
	movq	$0, 32(%rax)
	leaq	-104(%rbp), %rdi
	movl	$40, %esi
	xorl	%edx, %edx
	callq	hipHostAlloc
	leaq	-168(%rbp), %r12
	movq	%r12, %rdi
	callq	hipEventCreate
	leaq	-144(%rbp), %rdi
	callq	hipEventCreate
	movq	(%r12), %rdi
	xorl	%esi, %esi
	callq	hipEventRecord
	movq	%rsp, -112(%rbp)                # 8-byte Spill
	movq	%rsp, %r13
	leaq	-16(%r13), %r14
	movq	%r14, %rsp
	movq	%r14, %rdi
	callq	hipStreamCreate
	addq	$-8, %r13
	movq	%r13, %rdi
	callq	hipStreamCreate
	leaq	-96(%rbp), %rdi
	movl	$50000, %esi                    # imm = 0xC350
	callq	hipMalloc
	leaq	-88(%rbp), %rdi
	movl	$50000, %esi                    # imm = 0xC350
	callq	hipMalloc
	leaq	-72(%rbp), %rdi
	movl	$40, %esi
	callq	hipMalloc
	leaq	-64(%rbp), %rdi
	movl	$40, %esi
	callq	hipMalloc
	movq	(%rbx), %rdi
	xorl	%ebx, %ebx
	movl	$1, %esi
	movl	$100000, %edx                   # imm = 0x186A0
	movq	-120(%rbp), %rcx                # 8-byte Reload
	callq	fread
	testq	%rax, %rax
	je	.LBB1_24
# %bb.6:                                # %.lr.ph
	movq	%rax, %r13
	movabsq	$4294967396, %rax               # imm = 0x100000064
	addq	$900, %rax                      # imm = 0x384
	movq	%rax, -56(%rbp)                 # 8-byte Spill
	xorl	%r12d, %r12d
	movl	%r15d, -44(%rbp)                # 4-byte Spill
.LBB1_7:                                # =>This Loop Header: Depth=1
                                        #     Child Loop BB1_20 Depth 2
                                        #     Child Loop BB1_22 Depth 2
	cmpl	$-1, %r15d
	sete	%bl
	movl	$.L.str.4, %edi
	movl	%r13d, %esi
	movl	$100000, %edx                   # imm = 0x186A0
	movl	$8, %ecx
	xorl	%eax, %eax
	callq	printf
	movq	%r12, -160(%rbp)                # 8-byte Spill
	leal	(%r12,%r13), %eax
	movq	%rax, -136(%rbp)                # 8-byte Spill
	cmpl	%r15d, %eax
	setl	%r12b
	orb	%bl, %r12b
	movq	-72(%rbp), %rdi
	movq	-80(%rbp), %rsi
	movl	$40, %edx
	movl	$1, %ecx
	callq	hipMemcpy
	movq	-64(%rbp), %rdi
	movq	-80(%rbp), %rsi
	movl	$40, %edx
	movl	$1, %ecx
	callq	hipMemcpy
	movq	-96(%rbp), %rdi
	movq	-152(%rbp), %rsi
	movq	(%r14), %r8
	movl	$50000, %edx                    # imm = 0xC350
	movl	$1, %ecx
	callq	hipMemcpyAsync
	movq	-88(%rbp), %rdi
	movq	-152(%rbp), %rsi
	movl	$50000, %eax                    # imm = 0xC350
	addq	%rax, %rsi
	movq	8(%r14), %r8
	movl	$50000, %edx                    # imm = 0xC350
	movl	$1, %ecx
	callq	hipMemcpyAsync
	movq	%r14, %rbx
	movq	(%r14), %r9
	movabsq	$4294967396, %r15               # imm = 0x100000064
	movq	%r15, %rdi
	movl	$1, %esi
	movq	-56(%rbp), %rdx                 # 8-byte Reload
	movl	$1, %ecx
	xorl	%r8d, %r8d
	callq	__hipPushCallConfiguration
	movb	%r12b, -128(%rbp)               # 1-byte Spill
	testb	%r12b, %r12b
	je	.LBB1_12
# %bb.8:                                #   in Loop: Header=BB1_7 Depth=1
	testl	%eax, %eax
	jne	.LBB1_10
# %bb.9:                                #   in Loop: Header=BB1_7 Depth=1
	movq	-96(%rbp), %rdi
	movl	%r13d, %esi
	shrl	$31, %esi
	addl	%r13d, %esi
	sarl	%esi
	movq	-72(%rbp), %rdx
	callq	_Z26__device_stub__partialHistPciPi
.LBB1_10:                               #   in Loop: Header=BB1_7 Depth=1
	callq	hipGetLastError
	movl	%eax, %r12d
	movq	%rbx, %r14
	movq	8(%rbx), %r9
	movq	%r15, %rdi
	movl	$1, %esi
	movq	-56(%rbp), %rdx                 # 8-byte Reload
	movl	$1, %ecx
	xorl	%r8d, %r8d
	callq	__hipPushCallConfiguration
	testl	%eax, %eax
	jne	.LBB1_17
# %bb.11:                               #   in Loop: Header=BB1_7 Depth=1
	movq	-88(%rbp), %rdi
	movl	%r13d, %esi
	shrl	$31, %esi
	addl	%r13d, %esi
	jmp	.LBB1_16
.LBB1_12:                               #   in Loop: Header=BB1_7 Depth=1
	testl	%eax, %eax
	jne	.LBB1_14
# %bb.13:                               #   in Loop: Header=BB1_7 Depth=1
	movq	-96(%rbp), %rdi
	movl	-44(%rbp), %eax                 # 4-byte Reload
	subl	-160(%rbp), %eax                # 4-byte Folded Reload
	movl	%eax, %esi
	shrl	$31, %esi
	addl	%eax, %esi
	sarl	%esi
	movq	-72(%rbp), %rdx
	callq	_Z26__device_stub__partialHistPciPi
.LBB1_14:                               #   in Loop: Header=BB1_7 Depth=1
	callq	hipGetLastError
	movl	%eax, %r12d
	movq	%rbx, %r14
	movq	8(%rbx), %r9
	movq	%r15, %rdi
	movl	$1, %esi
	movq	-56(%rbp), %rdx                 # 8-byte Reload
	movl	$1, %ecx
	xorl	%r8d, %r8d
	callq	__hipPushCallConfiguration
	testl	%eax, %eax
	jne	.LBB1_17
# %bb.15:                               #   in Loop: Header=BB1_7 Depth=1
	movq	-88(%rbp), %rdi
	movl	-44(%rbp), %eax                 # 4-byte Reload
	subl	-160(%rbp), %eax                # 4-byte Folded Reload
	movl	%eax, %esi
	shrl	$31, %esi
	addl	%eax, %esi
.LBB1_16:                               #   in Loop: Header=BB1_7 Depth=1
	sarl	%esi
	movq	-64(%rbp), %rdx
	callq	_Z26__device_stub__partialHistPciPi
.LBB1_17:                               #   in Loop: Header=BB1_7 Depth=1
	callq	hipGetLastError
	testl	%r12d, %r12d
	je	.LBB1_19
# %bb.18:                               #   in Loop: Header=BB1_7 Depth=1
	movl	%eax, %r13d
	testl	%eax, %eax
	jne	.LBB1_26
.LBB1_19:                               # %.preheader
                                        #   in Loop: Header=BB1_7 Depth=1
	movq	(%r14), %rdi
	callq	hipStreamSynchronize
	movl	$.L.str.6, %edi
	xorl	%esi, %esi
	xorl	%eax, %eax
	callq	printf
	movq	8(%r14), %rdi
	callq	hipStreamSynchronize
	movl	$.L.str.6, %edi
	movl	$1, %esi
	xorl	%eax, %eax
	callq	printf
	callq	hipDeviceSynchronize
	movq	-104(%rbp), %rdi
	movq	-72(%rbp), %rsi
	movq	(%r14), %r8
	movl	$40, %edx
	movl	$2, %ecx
	callq	hipMemcpyAsync
	movq	-104(%rbp), %rax
	movq	-80(%rbp), %rcx
	xorl	%edx, %edx
.LBB1_20:                               #   Parent Loop BB1_7 Depth=1
                                        # =>  This Inner Loop Header: Depth=2
	movl	(%rax,%rdx,4), %esi
	addl	%esi, (%rcx,%rdx,4)
	incq	%rdx
	cmpq	$10, %rdx
	jne	.LBB1_20
# %bb.21:                               #   in Loop: Header=BB1_7 Depth=1
	movq	(%r14), %rdi
	callq	hipStreamSynchronize
	movq	-104(%rbp), %rdi
	movq	-64(%rbp), %rsi
	movq	8(%r14), %r8
	movl	$40, %edx
	movl	$2, %ecx
	callq	hipMemcpyAsync
	movq	-104(%rbp), %rax
	movq	-80(%rbp), %rcx
	xorl	%edx, %edx
	movq	-136(%rbp), %rbx                # 8-byte Reload
.LBB1_22:                               #   Parent Loop BB1_7 Depth=1
                                        # =>  This Inner Loop Header: Depth=2
	movl	(%rax,%rdx,4), %esi
	addl	%esi, (%rcx,%rdx,4)
	incq	%rdx
	cmpq	$10, %rdx
	jne	.LBB1_22
# %bb.23:                               #   in Loop: Header=BB1_7 Depth=1
	movq	8(%r14), %rdi
	callq	hipStreamSynchronize
	movb	-128(%rbp), %r12b               # 1-byte Reload
	testb	%r12b, %r12b
	movl	-44(%rbp), %r15d                # 4-byte Reload
	cmovel	%r15d, %ebx
	movq	-152(%rbp), %rdi
	movl	$1, %esi
	movl	$100000, %edx                   # imm = 0x186A0
	movq	-120(%rbp), %rcx                # 8-byte Reload
	callq	fread
	movq	%rax, %r13
	testq	%rax, %rax
	setne	%al
	movl	%ebx, %ecx
	testb	%al, %r12b
	movq	%rcx, %r12
	jne	.LBB1_7
.LBB1_24:                               # %._crit_edge
	movq	%rbx, -136(%rbp)                # 8-byte Spill
	movq	-144(%rbp), %rdi
	xorl	%ebx, %ebx
	xorl	%esi, %esi
	callq	hipEventRecord
	movq	(%r14), %rdi
	callq	hipStreamDestroy
	movq	8(%r14), %rdi
	callq	hipStreamDestroy
	movq	-72(%rbp), %rdi
	callq	hipFree
	movq	-64(%rbp), %rdi
	callq	hipFree
	movq	-96(%rbp), %rdi
	callq	hipFree
	movq	-88(%rbp), %rdi
	callq	hipFree
	movq	-144(%rbp), %rdi
	callq	hipEventSynchronize
	leaq	-172(%rbp), %r15
	movl	$0, (%r15)
	movq	-168(%rbp), %rsi
	movq	-144(%rbp), %rdx
	movq	%r15, %rdi
	callq	hipEventElapsedTime
	movq	-120(%rbp), %r14                # 8-byte Reload
	movq	%r14, %rdi
	callq	fclose
	cvtss2sd	(%r15), %xmm0
	movl	$.L.str.7, %edi
	movb	$1, %al
	callq	printf
	movl	$.L.str.8, %edi
	movl	$.L.str.9, %esi
	callq	fopen
	movq	%rax, %r15
	movq	%r14, %rdi
	callq	ferror
	testl	%eax, %eax
	jne	.LBB1_32
# %bb.25:
	movq	-80(%rbp), %rax
	movl	(%rax), %ecx
	movl	4(%rax), %r8d
	movl	8(%rax), %r9d
	movl	12(%rax), %edx
	movq	%rdx, -56(%rbp)                 # 8-byte Spill
	movl	16(%rax), %edx
	movq	%rdx, -128(%rbp)                # 8-byte Spill
	movl	20(%rax), %r14d
	movl	24(%rax), %r12d
	movl	28(%rax), %r13d
	movl	32(%rax), %r10d
	movl	36(%rax), %r11d
	subq	$8, %rsp
	movl	$.L.str.10, %esi
	movq	%r15, %rdi
	movq	-136(%rbp), %rdx                # 8-byte Reload
                                        # kill: def $edx killed $edx killed $rdx
	xorl	%eax, %eax
	pushq	%r11
	pushq	%r10
	pushq	%r13
	pushq	%r12
	pushq	%r14
	pushq	-128(%rbp)                      # 8-byte Folded Reload
	pushq	-56(%rbp)                       # 8-byte Folded Reload
	callq	fprintf
	addq	$64, %rsp
	movq	%r15, %rdi
	callq	fclose
	movq	-112(%rbp), %rsp                # 8-byte Reload
	jmp	.LBB1_31
.LBB1_26:                               # %.thread
	movl	%r12d, %edi
	callq	hipGetErrorString
	movq	%rax, %rbx
	movl	%r13d, %edi
	callq	hipGetErrorString
	movl	$.L.str.5, %edi
	movq	%rbx, %rsi
	movq	%rax, %rdx
	xorl	%eax, %eax
	callq	printf
.LBB1_27:
	movq	-112(%rbp), %rsp                # 8-byte Reload
	jmp	.LBB1_30
.LBB1_28:
	movl	$.Lstr, %edi
	callq	puts@PLT
	jmp	.LBB1_30
.LBB1_29:
	movl	$.L.str.3, %edi
	callq	perror
.LBB1_30:
	movl	$-1, %ebx
.LBB1_31:
	movl	%ebx, %eax
	leaq	-40(%rbp), %rsp
	popq	%rbx
	popq	%r12
	popq	%r13
	popq	%r14
	popq	%r15
	popq	%rbp
	.cfi_def_cfa %rsp, 8
	retq
.LBB1_32:
	.cfi_def_cfa %rbp, 16
	movl	$.L.str.3, %edi
	callq	perror
	jmp	.LBB1_27
.Lfunc_end1:
	.size	main, .Lfunc_end1-main
	.cfi_endproc
                                        # -- End function
	.p2align	4, 0x90                         # -- Begin function __hip_module_ctor
	.type	__hip_module_ctor,@function
__hip_module_ctor:                      # @__hip_module_ctor
	.cfi_startproc
# %bb.0:
	subq	$40, %rsp
	.cfi_def_cfa_offset 48
	movq	__hip_gpubin_handle(%rip), %rdi
	testq	%rdi, %rdi
	jne	.LBB2_2
# %bb.1:
	movl	$__hip_fatbin_wrapper, %edi
	callq	__hipRegisterFatBinary
	movq	%rax, %rdi
	movq	%rax, __hip_gpubin_handle(%rip)
.LBB2_2:
	xorps	%xmm0, %xmm0
	movups	%xmm0, 16(%rsp)
	movups	%xmm0, (%rsp)
	movl	$_Z11partialHistPciPi, %esi
	movl	$.L__unnamed_1, %edx
	movl	$.L__unnamed_1, %ecx
	movl	$-1, %r8d
	xorl	%r9d, %r9d
	callq	__hipRegisterFunction
	movl	$__hip_module_dtor, %edi
	addq	$40, %rsp
	.cfi_def_cfa_offset 8
	jmp	atexit                          # TAILCALL
.Lfunc_end2:
	.size	__hip_module_ctor, .Lfunc_end2-__hip_module_ctor
	.cfi_endproc
                                        # -- End function
	.p2align	4, 0x90                         # -- Begin function __hip_module_dtor
	.type	__hip_module_dtor,@function
__hip_module_dtor:                      # @__hip_module_dtor
	.cfi_startproc
# %bb.0:
	movq	__hip_gpubin_handle(%rip), %rdi
	testq	%rdi, %rdi
	je	.LBB3_2
# %bb.1:
	pushq	%rax
	.cfi_def_cfa_offset 16
	callq	__hipUnregisterFatBinary
	movq	$0, __hip_gpubin_handle(%rip)
	addq	$8, %rsp
	.cfi_def_cfa_offset 8
.LBB3_2:
	retq
.Lfunc_end3:
	.size	__hip_module_dtor, .Lfunc_end3-__hip_module_dtor
	.cfi_endproc
                                        # -- End function
	.type	_Z11partialHistPciPi,@object    # @_Z11partialHistPciPi
	.section	.rodata,"a",@progbits
	.globl	_Z11partialHistPciPi
	.p2align	3, 0x0
_Z11partialHistPciPi:
	.quad	_Z26__device_stub__partialHistPciPi
	.size	_Z11partialHistPciPi, 8

	.type	.L.str,@object                  # @.str
	.section	.rodata.str1.1,"aMS",@progbits,1
.L.str:
	.asciz	"An input file name is required."
	.size	.L.str, 32

	.type	.L.str.2,@object                # @.str.2
.L.str.2:
	.asciz	"r"
	.size	.L.str.2, 2

	.type	.L.str.3,@object                # @.str.3
.L.str.3:
	.asciz	"Error: "
	.size	.L.str.3, 8

	.type	.L.str.4,@object                # @.str.4
.L.str.4:
	.asciz	"# Element loaded in CHUNK: %d\t%d\t%d\n"
	.size	.L.str.4, 37

	.type	.L.str.5,@object                # @.str.5
.L.str.5:
	.asciz	"Error: stream1 %s\n stream2 %s\n"
	.size	.L.str.5, 31

	.type	.L.str.6,@object                # @.str.6
.L.str.6:
	.asciz	"Stream Synchronized (#) %d.\n"
	.size	.L.str.6, 29

	.type	.L.str.7,@object                # @.str.7
.L.str.7:
	.asciz	"The histograming calculation time (ms): %f\n"
	.size	.L.str.7, 44

	.type	.L.str.8,@object                # @.str.8
.L.str.8:
	.asciz	"hist.txt"
	.size	.L.str.8, 9

	.type	.L.str.9,@object                # @.str.9
.L.str.9:
	.asciz	"a"
	.size	.L.str.9, 2

	.type	.L.str.10,@object               # @.str.10
.L.str.10:
	.asciz	"%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\t%d\n"
	.size	.L.str.10, 34

	.type	.L__unnamed_1,@object           # @0
.L__unnamed_1:
	.asciz	"_Z11partialHistPciPi"
	.size	.L__unnamed_1, 21

	.type	__hip_fatbin_wrapper,@object    # @__hip_fatbin_wrapper
	.section	.hipFatBinSegment,"a",@progbits
	.p2align	3, 0x0
__hip_fatbin_wrapper:
	.long	1212764230                      # 0x48495046
	.long	1                               # 0x1
	.quad	__hip_fatbin
	.quad	0
	.size	__hip_fatbin_wrapper, 24

	.type	__hip_gpubin_handle,@object     # @__hip_gpubin_handle
	.local	__hip_gpubin_handle
	.comm	__hip_gpubin_handle,8,8
	.section	.init_array,"aw",@init_array
	.p2align	3, 0x0
	.quad	__hip_module_ctor
	.type	__hip_cuid_,@object             # @__hip_cuid_
	.bss
	.globl	__hip_cuid_
__hip_cuid_:
	.byte	0                               # 0x0
	.size	__hip_cuid_, 1

	.type	.Lstr,@object                   # @str
	.section	.rodata.str1.1,"aMS",@progbits,1
.Lstr:
	.asciz	"Please type positive number of digits to be evaluated."
	.size	.Lstr, 55

	.ident	"AMD clang version 18.0.0git (https://github.com/RadeonOpenCompute/llvm-project roc-6.3.2 25012 e5bf7e55c91490b07c49d8960fa7983d864936c4)"
	.section	".note.GNU-stack","",@progbits
	.addrsig
	.addrsig_sym _Z26__device_stub__partialHistPciPi
	.addrsig_sym __hip_module_ctor
	.addrsig_sym __hip_module_dtor
	.addrsig_sym _Z11partialHistPciPi
	.addrsig_sym __hip_fatbin
	.addrsig_sym __hip_fatbin_wrapper
	.addrsig_sym __hip_cuid_

	.text
	.amdgcn_target "amdgcn-amd-amdhsa--gfx1100"
	.protected	_Z11partialHistPciPi    ; -- Begin function _Z11partialHistPciPi
	.globl	_Z11partialHistPciPi
	.p2align	8
	.type	_Z11partialHistPciPi,@function
_Z11partialHistPciPi:                   ; @_Z11partialHistPciPi
; %bb.0:
	s_clause 0x1
	s_load_b32 s2, s[0:1], 0x24
	s_load_b32 s3, s[0:1], 0x8
	s_waitcnt lgkmcnt(0)
	s_and_b32 s2, s2, 0xffff
	s_delay_alu instid0(SALU_CYCLE_1) | instskip(SKIP_1) | instid1(VALU_DEP_1)
	v_mad_u64_u32 v[1:2], null, s15, s2, v[0:1]
	s_mov_b32 s2, exec_lo
	v_cmpx_gt_i32_e64 s3, v1
	s_cbranch_execz .LBB0_9
; %bb.1:
	s_load_b64 s[2:3], s[0:1], 0x0
	v_ashrrev_i32_e32 v2, 31, v1
	s_waitcnt lgkmcnt(0)
	v_add_co_u32 v1, vcc_lo, s2, v1
	s_delay_alu instid0(VALU_DEP_2)
	v_add_co_ci_u32_e32 v2, vcc_lo, s3, v2, vcc_lo
	v_cmp_eq_u32_e32 vcc_lo, 0, v0
	s_mov_b32 s3, 0
	global_load_u8 v1, v[1:2], off
	s_and_saveexec_b32 s2, vcc_lo
	s_cbranch_execz .LBB0_4
; %bb.2:                                ; %.preheader14.preheader
	v_mov_b32_e32 v0, 0
.LBB0_3:                                ; %.preheader14
                                        ; =>This Inner Loop Header: Depth=1
	v_mov_b32_e32 v2, s3
	s_add_i32 s3, s3, 4
	s_delay_alu instid0(SALU_CYCLE_1)
	s_cmp_lg_u32 s3, 40
	ds_store_b32 v2, v0
	s_cbranch_scc1 .LBB0_3
.LBB0_4:                                ; %Flow31
	s_or_b32 exec_lo, exec_lo, s2
	s_waitcnt vmcnt(0)
	v_bfe_i32 v0, v1, 0, 8
	v_mov_b32_e32 v1, 1
	s_waitcnt lgkmcnt(0)
	s_barrier
	buffer_gl0_inv
	v_lshl_add_u32 v0, v0, 2, 0xffffff40
	ds_add_u32 v0, v1
	s_waitcnt lgkmcnt(0)
	s_barrier
	buffer_gl0_inv
	s_and_b32 exec_lo, exec_lo, vcc_lo
	s_cbranch_execz .LBB0_9
; %bb.5:                                ; %.preheader.preheader
	s_load_b64 s[0:1], s[0:1], 0x10
	v_mov_b32_e32 v0, 0
	s_mov_b32 s2, 0
.LBB0_6:                                ; %.preheader
                                        ; =>This Inner Loop Header: Depth=1
	s_mov_b32 s4, exec_lo
	s_mov_b32 s3, exec_lo
	v_mbcnt_lo_u32_b32 v1, s4, 0
	s_delay_alu instid0(VALU_DEP_1)
	v_cmpx_eq_u32_e32 0, v1
	s_cbranch_execz .LBB0_8
; %bb.7:                                ;   in Loop: Header=BB0_6 Depth=1
	v_mov_b32_e32 v1, s2
	s_bcnt1_i32_b32 s4, s4
	ds_load_b32 v1, v1
	s_waitcnt lgkmcnt(0)
	v_mul_lo_u32 v1, v1, s4
	global_atomic_add_u32 v0, v1, s[0:1]
.LBB0_8:                                ;   in Loop: Header=BB0_6 Depth=1
	s_or_b32 exec_lo, exec_lo, s3
	s_add_i32 s2, s2, 4
	s_waitcnt lgkmcnt(0)
	s_add_u32 s0, s0, 4
	s_addc_u32 s1, s1, 0
	s_cmp_lg_u32 s2, 40
	s_cbranch_scc1 .LBB0_6
.LBB0_9:                                ; %.loopexit
	s_nop 0
	s_sendmsg sendmsg(MSG_DEALLOC_VGPRS)
	s_endpgm
	.section	.rodata,"a",@progbits
	.p2align	6, 0x0
	.amdhsa_kernel _Z11partialHistPciPi
		.amdhsa_group_segment_fixed_size 40
		.amdhsa_private_segment_fixed_size 0
		.amdhsa_kernarg_size 280
		.amdhsa_user_sgpr_count 15
		.amdhsa_user_sgpr_dispatch_ptr 0
		.amdhsa_user_sgpr_queue_ptr 0
		.amdhsa_user_sgpr_kernarg_segment_ptr 1
		.amdhsa_user_sgpr_dispatch_id 0
		.amdhsa_user_sgpr_private_segment_size 0
		.amdhsa_wavefront_size32 1
		.amdhsa_uses_dynamic_stack 0
		.amdhsa_enable_private_segment 0
		.amdhsa_system_sgpr_workgroup_id_x 1
		.amdhsa_system_sgpr_workgroup_id_y 0
		.amdhsa_system_sgpr_workgroup_id_z 0
		.amdhsa_system_sgpr_workgroup_info 0
		.amdhsa_system_vgpr_workitem_id 0
		.amdhsa_next_free_vgpr 3
		.amdhsa_next_free_sgpr 16
		.amdhsa_float_round_mode_32 0
		.amdhsa_float_round_mode_16_64 0
		.amdhsa_float_denorm_mode_32 3
		.amdhsa_float_denorm_mode_16_64 3
		.amdhsa_dx10_clamp 1
		.amdhsa_ieee_mode 1
		.amdhsa_fp16_overflow 0
		.amdhsa_workgroup_processor_mode 1
		.amdhsa_memory_ordered 1
		.amdhsa_forward_progress 0
		.amdhsa_shared_vgpr_count 0
		.amdhsa_exception_fp_ieee_invalid_op 0
		.amdhsa_exception_fp_denorm_src 0
		.amdhsa_exception_fp_ieee_div_zero 0
		.amdhsa_exception_fp_ieee_overflow 0
		.amdhsa_exception_fp_ieee_underflow 0
		.amdhsa_exception_fp_ieee_inexact 0
		.amdhsa_exception_int_div_zero 0
	.end_amdhsa_kernel
	.text
.Lfunc_end0:
	.size	_Z11partialHistPciPi, .Lfunc_end0-_Z11partialHistPciPi
                                        ; -- End function
	.section	.AMDGPU.csdata,"",@progbits
; Kernel info:
; codeLenInByte = 348
; NumSgprs: 18
; NumVgprs: 3
; ScratchSize: 0
; MemoryBound: 0
; FloatMode: 240
; IeeeMode: 1
; LDSByteSize: 40 bytes/workgroup (compile time only)
; SGPRBlocks: 2
; VGPRBlocks: 0
; NumSGPRsForWavesPerEU: 18
; NumVGPRsForWavesPerEU: 3
; Occupancy: 16
; WaveLimiterHint : 0
; COMPUTE_PGM_RSRC2:SCRATCH_EN: 0
; COMPUTE_PGM_RSRC2:USER_SGPR: 15
; COMPUTE_PGM_RSRC2:TRAP_HANDLER: 0
; COMPUTE_PGM_RSRC2:TGID_X_EN: 1
; COMPUTE_PGM_RSRC2:TGID_Y_EN: 0
; COMPUTE_PGM_RSRC2:TGID_Z_EN: 0
; COMPUTE_PGM_RSRC2:TIDIG_COMP_CNT: 0
	.text
	.p2alignl 7, 3214868480
	.fill 96, 4, 3214868480
	.type	__hip_cuid_,@object             ; @__hip_cuid_
	.section	.bss,"aw",@nobits
	.globl	__hip_cuid_
__hip_cuid_:
	.byte	0                               ; 0x0
	.size	__hip_cuid_, 1

	.ident	"AMD clang version 18.0.0git (https://github.com/RadeonOpenCompute/llvm-project roc-6.3.2 25012 e5bf7e55c91490b07c49d8960fa7983d864936c4)"
	.section	".note.GNU-stack","",@progbits
	.addrsig
	.addrsig_sym __hip_cuid_
	.amdgpu_metadata
---
amdhsa.kernels:
  - .args:
      - .address_space:  global
        .offset:         0
        .size:           8
        .value_kind:     global_buffer
      - .offset:         8
        .size:           4
        .value_kind:     by_value
      - .address_space:  global
        .offset:         16
        .size:           8
        .value_kind:     global_buffer
      - .offset:         24
        .size:           4
        .value_kind:     hidden_block_count_x
      - .offset:         28
        .size:           4
        .value_kind:     hidden_block_count_y
      - .offset:         32
        .size:           4
        .value_kind:     hidden_block_count_z
      - .offset:         36
        .size:           2
        .value_kind:     hidden_group_size_x
      - .offset:         38
        .size:           2
        .value_kind:     hidden_group_size_y
      - .offset:         40
        .size:           2
        .value_kind:     hidden_group_size_z
      - .offset:         42
        .size:           2
        .value_kind:     hidden_remainder_x
      - .offset:         44
        .size:           2
        .value_kind:     hidden_remainder_y
      - .offset:         46
        .size:           2
        .value_kind:     hidden_remainder_z
      - .offset:         64
        .size:           8
        .value_kind:     hidden_global_offset_x
      - .offset:         72
        .size:           8
        .value_kind:     hidden_global_offset_y
      - .offset:         80
        .size:           8
        .value_kind:     hidden_global_offset_z
      - .offset:         88
        .size:           2
        .value_kind:     hidden_grid_dims
    .group_segment_fixed_size: 40
    .kernarg_segment_align: 8
    .kernarg_segment_size: 280
    .language:       OpenCL C
    .language_version:
      - 2
      - 0
    .max_flat_workgroup_size: 1024
    .name:           _Z11partialHistPciPi
    .private_segment_fixed_size: 0
    .sgpr_count:     18
    .sgpr_spill_count: 0
    .symbol:         _Z11partialHistPciPi.kd
    .uniform_work_group_size: 1
    .uses_dynamic_stack: false
    .vgpr_count:     3
    .vgpr_spill_count: 0
    .wavefront_size: 32
    .workgroup_processor_mode: 1
amdhsa.target:   amdgcn-amd-amdhsa--gfx1100
amdhsa.version:
  - 1
  - 2
...

	.end_amdgpu_metadata
