#include <stdio.h>
#include <string.h>
#define N 100

/* Tämä toteutus toimii vain jos sanat ovat kaikki pienillä kirjaimilla
 * kirjoitettuja, eivät sisällä erikoismerkkejä eivätkä ääkkösiä. 
 *
 * Ajo-ohjeet:
 * 1. argumentti on tiedoston nimi, josta luetaan sanoja (sanat oltava
 * tiedostossa allekain).
 * Toisesta argumentista alkaen sanat, jotka järjestetään c)-kohdassa. */

/* Molemmissa funktioissa 1. argumentti on tarkasteltava
 * merkkijonotaulukko ja 2. on sanojen lukumäärä. */
int check_order(char[][N],int);
void order(char[][N],int);
void prn_words(char[][N],int);

int main(int argc, char *argv[])
{
	int nwords1,nwords2,nwords3,i;
	char words1[5][N];
	char words2[5][N];
	char words3[5][N];
	char path[]="C:/Documents and Settings/yliopisto/Desktop/atk1_ma/";
	char filename_with_path[N];
	FILE *f;

	/* a) Kysytään sanat käyttäjältä. */

	printf("Enter how many words? "); scanf("%i",&nwords1);
	for(i=0;i<nwords1;i++) {
		printf("%2i. ",i+1); scanf("%s",words1[i]);
	}
	if(check_order(words1,nwords1))
	{
		printf("\nThe words you have entered are in alphabetical order.\n\n");
	}
	else
	{
		printf("\nThe words you have entered are NOT in alphabetical order.\n\n");
	}

	/* b) Sanat luetaan tiedostosta. */

	/* Muodostetaan tiedoston nimi (hakemistopolun kanssa), avataan tiedosto
	 * ja luetaan tiedostosta sanat. */
	sprintf(filename_with_path,"%s%s",path,argv[1]);
	f=fopen(filename_with_path,"r");
	if(f==NULL) {
		printf("h3y n00b!!11!1 n0 5uch f1l3!!1!\n\n");
		return 1;
	}
	for(i=0; !feof(f); i++) {
		fscanf(f,"%s",words2[i]);
	}
	/* Jos tiedostossa viimeisen sanan jälkeen on rivinsiirto,
	 * kirjoita tähän nwords2=i-1; */
	nwords2=i;

	if(check_order(words2,nwords2))
	{
		printf("The words in the file %s are in alphabetical order.\n\n",argv[1]);
	}
	else
	{
		printf("The words in the file %s are NOT in alphabetical order.\n\n",argv[1]);
	}

	/* c) Sanat annetaan pääohjelmalle argumentteina. */

	/* Argumentteina annettujen sanojen lukumäärä on argumenttien
	 * kokonaismäärä miinus kaksi (ohjelman nimi ja tiedoston nimi). */
	nwords3=argc-2; 
	for(i=0;i<nwords3;i++)
	{
		/* Kopioidaan argumenttina olevat sanat taulukkoon words3. */
		strcpy(words3[i],argv[i+2]);
	}

	if(check_order(words3,nwords3))
	{
		printf("The words given as arguments are in alphabetical order.\n\n");
	}
	else
	{
		printf("The words given as arguments are NOT in alphabetical order.\n\n");
	}


	return 0;
}

int check_order(char ct[][N],int n)
{
	int i,j;

	/* Tarkistetaan aakkosjärjestys seuraavasti:
	 * Vertaillaan peräkkäisten sanojen ct[i] ja ct[i+1]
	 * samoilla paikoilla olevia kirjaimia ct[i][j] ja ct[i+1][j],
	 * missä indeksit saavat seuraavat arvot: 
	 * i=0...n-2 ja j käy niin pitkälle kunnes 
	 * lyhemmässä sanassa tulee loppumerkki vastaan. 
	 *
	 * Kahden sanan, ct[i] ja ct[i+1], vertailu etenee seuraavasti:
	 *
	 * Jos ct[i][0]<ct[i+1][0], niin sanat ct[i] ja ct[i+1]
	 * ovat oikeassa järjestyksessä, joten kasvatetaan i:n arvoa yhdellä
	 * (eli siirrytään seuraavaan sanapariin).
	 * Jos ct[i][0]==ct[i+1][0], niin kasvatetaan j:n arvoa yhdellä
	 * (eli siirrytään seuraavaan kirjaimeen). Jos tällä tavalla löytyy
	 * sellainen j:n arvo, että ct[i][j]>ct[i+1][j], 
	 * niin sanat ct[i] ja ct[i+1] ovat väärässä
	 * järjestyksessä, joten sanataulukko ct ei ole aakkosjärjestyksessä. */
	for(i=0;i<n-1;i++)
	{
		for(j=0; ct[i][j]!='\0' && ct[i+1][j]!='\0'; j++)
		{
			if(ct[i][j]<ct[i+1][j])
			{
				break;
			}
			else if(ct[i][j]>ct[i+1][j])
			{
				return 0;
			}
		}
	}
	return 1;		
}

void prn_words(char ct[][N], int n)
{
	int i;
	for(i=0;i<n;i++)
	{
		printf("%s\n",ct[i]);
	}
}