#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <ctype.h>
void creare_string(char string[800000], FILE *input)
{
    char c;
    short nr = 0;
    c = fgetc(input);
    while(c != EOF)
    {
        string[nr] = c;
        c = fgetc(input);
        nr++;
    }
}
void identificare_elemente(char *string, char *elemente)
{
    short i, j, nr = 0;
    for(i = 0; i < strlen(string); i++)
    {
        if(string[i] == ':')
        {
            j = i + 2;
            while(string[j-1] != ',')
            {
                elemente[nr] = string[j];
                j++;
                nr++;
            }
        }

    }
}
void identificare_chei(char *string, char *chei)
{
    short i, j, nr = 0;
    for(i = 0; i < strlen(string); i++)
    {
        if(string[i] == '{' || string[i] == ',')
        {
            j = i + 2;
            while(string[j-1] != ':')
            {
                chei[nr] = string[j];
                j++;
                nr++;
            }
        }

    }
}
short numar_chei(char *string)
{
    short i, numar = 0;
    for(i = 0; i < strlen(string); i++)
    {
        if(string[i] == '}')
        {
           break;
        }
        if(string[i] == ':')
        {
            numar++;
        }
    }
    return numar;
}
void introducere_chei(char *chei, int nr_chei, FILE *output)
{
    char *token;
    short numar = 0;
    token = strtok(chei, "\"");
    while(token != NULL)
    {
        if(token[0] == ' ')
        {
            ;
        }
        else
        {
            if(isalpha(token[0]) != 0 || isdigit(token[0]) != 0)
            {
                fprintf(output, "%s,", token);
                numar++;
            }
            if(numar == nr_chei)
            {
                fprintf(output, "%s", "\n");
                break;
            }
        }
        token = strtok(NULL, "\"");
    }
}
void introducere_elemente(char *elemente, int nr_chei, FILE *output)
{
    char *token;
    short numar = 0, i, j, cont = 0;
    token = strtok(elemente, ",\"");
    while(token != NULL)
    {
        for(j = 0; j < strlen(token); j++)
        {
            if(token[j] == ' ')
            {
                ;
            }
            else
            {
                cont = 1;
            }
        }
        if(cont == 1)
        {
            i = 0;
            while(token[i] == ' ')
            {
                strcpy(token, token + 1);
                i++;
            }
            i = strlen(token) - 1;
            while(token[i] == ' ')
            {
                token[i] = '\0';
                i--;
            }
            if(isalpha(token[0]) != 0 || isdigit(token[0]) != 0)
            {
                fprintf(output, "%s,", token);
                numar++;
            }
            if(numar == nr_chei)
            {
                fprintf(output, "%s", "\n");
                numar = 0;
            }
        }
        token = strtok(NULL, ",\"");
    }
}
void stergere_trash(char *str, char c)
{
    char *src, *dst;
    for(src = dst = str; *src != '\0'; src++)
    {
        *dst = *src;
        if(*dst != c)
        {
            dst++;
        }
    }
    *dst = '\0';
}
int main()
{
    FILE *input, *output;
    char string[800000], elemente[600000], chei[600000], trash[7] = {'}', ']', '[','{','\n', ':'};
    short nr_chei, i;
    input = fopen("convertor.in", "rt");
    output = fopen("convertor.out", "wt");
    creare_string(string, input);
    identificare_elemente(string, elemente);
    identificare_chei(string, chei);
    nr_chei = numar_chei(string);
    for(i = 0; i < strlen(trash); i++)
    {
        stergere_trash(elemente, trash[i]);
        stergere_trash(chei, trash[i]);
    }
    introducere_chei(chei, nr_chei, output);
    introducere_elemente(elemente, nr_chei, output);
    fclose(input);
    fclose(output);
    return 0;
}