#include <stdio.h>
#include <stdbool.h>
#include <stdint.h>

#include <winsock.h>
#include <winsock2.h>

//#define INTERNAL_INET_FUNC

/* 17.03.2015 In beginning... (Thnx to Dima) */
/* 18.03.2015 Added ip4toNum() function.     */
/* 18.03.2015 Added lwsock32 support (should be compiled with  */
/*            -lwsock32 option in command line)                */
/*            Improoved logic. Added constraints. Added retcodes */
 

#define BUF_SIZE    1024
#define COLUMNS_CNT 10

uint32_t ipv4toNum(char *IPv4){
	#ifdef INTERNAL_INET_FUNC
		uint32_t ipInt = 0;	
		char *p = (char*)strtok(IPv4,".");
		ipInt |= (atoi(p));
		p = (char*)strtok(NULL,".");
		ipInt |= (atoi(p) << 8);
		p = (char*)strtok(NULL,".");
		ipInt |= (atoi(p) << 16);
		p = (char*)strtok(NULL,".");
		ipInt |= (atoi(p) << 24);
	return ipInt;
	#else
		return htonl(inet_addr(IPv4));
	#endif
}


// TODO: Complete
int parse_csv_str(char* str, char **val, int val_size)
{
	int val_count = 0;
	bool quote_open = false;
	bool first = true;
	bool end_quote = false;
	bool center_quote = false;
	bool stop = false;
	while(!stop) {
		if(first) {
			first = false;
			if(val_count < val_size) *val = str;
			val_count++;
		}
		switch(*str) {
			case '"':
				quote_open = !quote_open;
				if(*val == str) {
					(*val)++; // пропуск кавычки в начале
					end_quote = true;
				} else {
					center_quote = true;
				}
				break;

			case ',':
				if(!quote_open) {
					*str = 0;
					first = true;
					if(end_quote) { // пропуск завершающей кавычки
						end_quote = false;
						*(str - 1) = 0;
					}
					if(center_quote) { // удаление двойных кавычек в центре
						center_quote = false;
						char* d = *val;
						char* s = *val;
						while(*d = *s) {
							if(*s != '"' || *(s + 1) != '"') d++;
							s++;
						}
					}
					if(val_count < val_size) val++;
				}
				break;

			case 0:
				stop = true;
				break;

			case 0xD:
			case 0xA:
				*str = 0;
				stop = true;
				break;

		}
		str++;
	}
	// заполнение пустыми строками недостающих
	int i;
	for(i = val_count; i < val_size; i++) *(++val) = str;
	// возврат количества параметров
	return val_count;
}

int main(int argc, char **argv, char **env){

	FILE *f = stdin;
	if(f) {
		char buf[BUF_SIZE];
		int line = 0;  
		int cnt = 0;
		uint32_t n_prevStartIp=0;
		uint32_t n_prevEndIp=0;
		while(fgets(buf, BUF_SIZE, f)) {
			line++;
			if(line == 1) {
				continue;
			} else {
				char* val[10];
				cnt = parse_csv_str(buf, val, 10);
				if(cnt != COLUMNS_CNT) {
					fprintf(stderr,"\nIPv4filter: parse error: %d parameters at line %d\n", cnt, line);
					return -1;
				}
				printf("startIpNum = '%s'\n", val[0]);
				printf("endIpNum   = '%s'\n", val[1]);
				printf("country    = '%s'\n", val[2]);
				printf("region     = '%s'\n", val[3]);
				printf("city       = '%s'\n", val[4]);
				printf("postalCode = %s\n", val[5]);
				printf("latitude   = %s\n", val[6]);
				printf("longitude  = %s\n", val[7]);
				printf("dmaCode    = '%s'\n", val[8]);
				printf("areaCode   = '%s'\n", val[9]);
				uint32_t n_startIp = ipv4toNum(val[0]);
				uint32_t n_endIp   = ipv4toNum(val[1]);
				if (n_startIp > n_endIp){
					fprintf(stderr,"\nIPv4filter: check constraint (END_LESS_THAN_BEGIN) violated at line %d\n", line);
					return -3;
				}
				printf("n_startIp  = %d\n", n_startIp);
				printf("n_endIp    = %d\n", n_endIp);
				printf("---------------------\n");
				if (line>2){
					if (n_startIp <= n_prevEndIp){
						fprintf(stderr,"\nIPv4filter: check constraint (OVERLAPPED_INTERVALS) violated at line %d\n", line);
						return -2;
					}
				}
				n_prevStartIp = n_startIp;
			}       n_prevEndIp   = n_prevEndIp;
		}
		fprintf(stderr,"\nIPv4filter: OK! Lines proceed: %d\n",line);
	}
	return 0;
}