#include <stdio.h>
#include <stdlib.h>
#include <sys/types.h>
#include <fcntl.h>
#include <unistd.h>
#include <string.h>
#include <sys/time.h>

#define SIZE 1048576

typedef struct batch {
	int lo;
	char rw;
	int size;
	int term;
} batch;

int main(int argc, char* argv[])
{
	FILE* fp;
	ssize_t rtsize;
	char buf[SIZE];
	char data[20];	
	batch b[100];
	char _lo[20], _rw[5], _size[20], _term[5];
	int i=0, j, fd, line;
	struct timeval start, end;
	int Read_C, Write_C=0, C_sum=0;
	double s_msec, e_msec, result, idle, eff;
	double delay=0, read_delay=0, write_delay=0, delay_sum=0;
	double r_ex=0, w_ex=0, ex_sum=0; 
	

	if(!argv[1] || argc!=2) {
		printf("입력 에러! 입력 예) ./hw1 batch0.txt\n");
		exit(0);
	}

	fp = fopen(argv[1], "r");

	fscanf(fp, "%s", data);
	fscanf(fp, "%d", &line);

	while(i<line)
	{
		fscanf(fp, "%s %s %s %s", _lo, _rw, _size, _term);
		b[i].lo = atoi(_lo);
		b[i].rw = _rw[0];
		b[i].size = atoi(_size);
		b[i].term = atoi(_term); 			
		//printf("%d %c %d %d\n", b[i].lo, b[i].rw, b[i].size, b[i].term);		
		i++;
	}

	fclose(fp);
	
	fd = open(data, O_RDWR);
	
	for(i=0; i<line; i++)
	{
		lseek(fd, 0, SEEK_SET);
		if(b[i].rw == 'r')
		{
			Read_C++;
			gettimeofday(&start, NULL);
			s_msec = start.tv_usec/1000;

			rtsize = read(fd, buf, b[i].size);
			for(j=0; j<rtsize; j++)
				buf[j]++;
			gettimeofday(&end, NULL);
			e_msec = end.tv_usec/1000;
			
			if(s_msec > e_msec)
				e_msec+=1000;		
			result = e_msec - s_msec;
			r_ex += result;

			if(delay==0)
			{
				if(result<b[i].term)
					idle+=b[i].term-result;
				else if(result>b[i].term)
					delay=result-b[i].term;
			}
			else if((delay+result)<b[i].term)
				idle+=b[i].term-result-delay;
			else 
				delay=(delay+result)-b[i].term;
			read_delay+=delay;
		}
		if(b[i].rw == 'w')
		{
			Write_C++;
			gettimeofday(&start, NULL);
			s_msec = start.tv_usec/1000;
			for(j=0; j<b[i].size; j++)
				buf[j]++;
			write(fd, buf, b[i].size);			
			gettimeofday(&end, NULL);
			e_msec = end.tv_usec/1000;
			
			if(s_msec > e_msec)
				e_msec+=1000;		
			result = e_msec - s_msec;
			w_ex += result;

			if(delay==0)
			{
				if(result<b[i].term)
					idle+=b[i].term-result;
				else if(result>b[i].term)
					delay=result-b[i].term;
			}
			else if((delay+result)<b[i].term)
				idle+=b[i].term-result-delay;
			else
				delay=(delay+result)-b[i].term;
			write_delay+=delay;
		}	
	}			
	
	ex_sum=(r_ex+w_ex);	
	C_sum=Read_C+Write_C;
	delay_sum=read_delay+write_delay;		
	eff=ex_sum/(ex_sum+idle)*100;

	printf("execution time : %.02lf, %.02lf, %.02lf\n", r_ex/Read_C, w_ex/Write_C, ex_sum/C_sum);
	printf("delay : %.02lf, %.02lf, %.02lf\n", read_delay/Read_C, write_delay/Write_C, delay_sum/C_sum);
	printf("idle, effciency : %.02lf, %.02lf\n", idle, eff);

	close(fd);
	return 0;
}
	
















/*	
	
	printf("%s, %d\n", name, line);

	for(i=0; i<100; i++)
		printf("%d %c %d %d\n", location[i], rw[i], b_size[i], term[i]);

*/
/*
	while(
	if(rw='r') {	
		rtsize = read(fd, buff, size);
		for(i=0; i<rtsize; i++)
			buff[i]++;
	}
	else {
		for(i=0; i<size; i++)
			buff[i]++;
		write(fd, buff, size);
	}
*/