/* Program to calculate dictionary word lengths.

   John Nordlie, November, 2011
*/

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

#define MAXSIZE 255

int main() {

	char word[MAXSIZE], *p;
	FILE *infile, *outfile;
	int i, lengths[MAXSIZE], longest = 0;

	/* open files, exit if problem */
	infile = fopen("dict.txt", "r");
	if (infile == NULL)
		return 0;

	/* zero lengths */
	for (i=0; i<MAXSIZE; i++)
		lengths[i] = 0;

	/* main loop, read in a word, sort it, write both out.  repeat until no more data */
	while (!feof(infile)) {

		/* get a word from the dictionary file */
		fgets(word, MAXSIZE, infile);

		/* strip that pesky newline */
		p = strchr(word, '\n');
		if (p) 
			*p = '\0';

		/* increment the length array */
		lengths[strlen(word)]++;
		if (strlen(word) > longest)
			longest = strlen(word);

	} /* end while loop */
	fclose(infile);

	outfile = fopen("word_freq.txt", "w");
	if (outfile == NULL)
		return 0;

	fprintf(outfile, "Word length	Number of words of that length\n");

	for (i=0; i < longest + 1; i++)
		fprintf(outfile, "%d		%d\n", i, lengths[i]);

	fclose(outfile);

} /* end main */