#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>

void extract_keys (char*, int, FILE*);
void extract_val (char*, FILE*);

int main(){
	FILE *fin, *fout;
	char *wholefile;
	int filedim;
	fin = fopen ("convertor.in", "r");
	fout = fopen("convertor.out","w");
	fseek (fin, 0, SEEK_END);
	filedim = ftell (fin);
	wholefile = (char *) calloc (filedim + 1, sizeof(char));
	fseek (fin, 0, SEEK_SET);
	if (fread (wholefile, filedim, 1, fin) == 1)
	{
		//extract the keys
		extract_keys (wholefile, filedim, fout);
		//fprintf (fout, "\n");
		fwrite ("\n", 1, 1, fout);
		//extract the values
		extract_val (wholefile, fout);
	}
	free (wholefile);
	fclose (fin);
	fclose (fout);
	return 0;
}
void extract_keys (char *f, int dim, FILE *out_file)
{
	char *p, *copyp, *p2;
	int i;
	copyp = (char*) calloc (dim + 1, sizeof (char));
	p = strchr (f, '}');
	//copy the first object, in order to extract the keys
	strncpy (copyp, f, p - f);
	p2 = strchr (copyp, '"');
	while (1)
	{
		//print only the characters within the double quotes
		//for (i = 1; p2[i] != '"'; i++)
		//	fwrite (&p2[i], 1, 1, out_file)i;
		i = 1;
		while (p2[i] != '"') fputc (p2[i++], out_file);
		fwrite (",", 1, 1, out_file);
		p = strchr (p2, ',');
		if (p != NULL) 
			p2 = strchr (p, '"');
		else break;
	}
	free (copyp);
}
void extract_val (char *f, FILE *out_file)
{
	char *p, *p1, *p2;
	int i, len;
	p = strtok (f, ",");
	while (p != NULL)
	{
		p1 = strchr (p, ':');
		p2 = strchr (p1, '"');
		if (p2 != NULL)
		{
			//d
			//len = strlen (p2);
			//consider the case where the value consists of a string
			//for (i = 1; i < len; i++)
			//	if (p2[i] == '"') break;
			//	else fwrite (&p2[i], 1, 1, out_file);
			i = 1;
			while (p2[i] != '"')
				fputc (p2[i++], out_file);
		}
		else
		{
			//len = strlen (p1);
			//consider the case where the value is an integer
			for (i = 0; i < len; i++)
				if (isdigit (p1[i]) != 0)
					fputc (p1[i], out_file);
			//i = 0;
			//while (isdigit (p1[i])) fputc (p1[i++], out_file);
		}
		fwrite (",", 1, 1, out_file);
		if (strchr (p, '}') != NULL) fwrite ("\n", 1, 1, out_file);
		p = strtok (NULL, ",");
	}
}