#include <stdio.h>
#include <math.h>
#include <string.h>

#define Nmax 100

typedef struct
{
    int x;
    int y;
}	Tacka;

typedef struct
{
    Tacka A;
    Tacka B;
}	Duz;

double duzina_duzi(Duz D)
{
    return sqrt((D.A.x - D.B.x)*(D.A.x - D.B.x) + (D.A.y - D.B.y)*(D.A.y - D.B.y));
}

double koeficijent_pravca(Duz D)
{
    return (double)(D.B.y - D.A.y)/(D.B.x - D.A.x);
}

void SortiranjePoDuziniDuzi(Duz* duzi, int n)  //insertion sort
{
    int i,j;

    for(i=1; i<n; i++)
    {
        Duz pom = duzi[i];
        double duzina_pom = duzina_duzi(duzi[i]);

        for(j=i; j>0 && duzina_duzi(duzi[j-1]) > duzina_pom; j--)
            duzi[j] = duzi[j-1];

        duzi[j] = pom;
    }
}

void SortiranjePoKoeficijentuPravca(Duz* duzi, int n) //selection sort
{
    int i,j,min;

    for(i=0; i<n-1; i++)
    {
        min = i;
        double koeficijent_pom = koeficijent_pravca(duzi[i]);

        for(j=i+1; j<n; j++)
            if(koeficijent_pravca(duzi[j]) < koeficijent_pom)
                min = j;

        if(min != i)
        {
            Duz pom = duzi[i];
            duzi[i] = duzi[min];
            duzi[min] = pom;
        }
    }
}

int main(int argc, char** argv)
{
    FILE *ulaz, *izlaz;
    Duz duzi[Nmax];
    int i=0, n, opcijaSortiranja;

    if(argc != 4)
    {
        fprintf(stderr, "Nekorektan broj argumenata.\n");
        return 1;
    }

    if(strcmp(argv[1], "-d") == 0)
        opcijaSortiranja = 0;
    else if(strcmp(argv[1], "-k") == 0)
        opcijaSortiranja = 1;
    else
    {
        fprintf(stderr, "Argument komandne linije su i opcije: \"-d\" ili \"-k\".\n");
        return 1;
    }


    if((ulaz = fopen(argv[2], "r"))==NULL)
    {
        fprintf(stderr, "Datoteka %s ne postoji.\n", argv[2]);
        return 1;
    }

    while(fscanf(ulaz, "%d%d%d%d", &duzi[i].A.x, &duzi[i].A.y, &duzi[i].B.x, &duzi[i].B.y) != EOF)
        i++;
    n=i;

    fclose(ulaz);

    if(opcijaSortiranja==0)
        SortiranjePoDuziniDuzi(duzi,n);
    else
        SortiranjePoKoeficijentuPravca(duzi,n);

    izlaz = fopen(argv[3], "w");
    if(izlaz == NULL)
    {
        fprintf(stderr, "Neuspesno otvaranje datoteke %s za upis.\n", argv[3]);
        return 1;
    }

    for(i=0; i<n; i++)
        fprintf(izlaz, "%d %d %d %d\n", duzi[i].A.x, duzi[i].A.y, duzi[i].B.x, duzi[i].B.y);

    fclose(izlaz);

    return 0;
}