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

#include "rnd.h"

 /* https://www.math.cornell.edu/~mec/2003-2004/cryptography/subs/frequencies.html */

#define ALPHABET_SIZE 26
#define RND_MAXINT 10000

struct letter_frequency {
	int p;			/* pegged to 10000 rather than 1 */
	char c;
} letter_frequencies[] = {
	{
	7, 'Z'}, {
	10, 'J'}, {
	11, 'Q'}, {
	17, 'X'}, {
	69, 'K'}, {
	111, 'V'}, {
	149, 'B'}, {
	182, 'P'}, {
	203, 'G'}, {
	209, 'W'}, {
	211, 'Y'}, {
	230, 'F'}, {
	261, 'M'}, {
	271, 'C'}, {
	288, 'U'}, {
	398, 'L'}, {
	432, 'D'}, {
	592, 'H'}, {
	602, 'R'}, {
	628, 'S'}, {
	695, 'N'}, {
	731, 'I'}, {
	768, 'O'}, {
	812, 'A'}, {
	910, 'T'}, {
1202, 'E'},};

/* from http://stackoverflow.com/questions/822323/how-to-generate-a-random-number-in-c */
int random_number(int min_num, int max_num)
{
	static int initialised = 0;
	int result = 0;
	int low_num = 0;
	int hi_num = 0;
	if (min_num < max_num) {
		low_num = min_num;
		hi_num = max_num + 1;	// this is done to include max_num in output.
	} else {
		low_num = max_num + 1;	// this is done to include max_num in output.
		hi_num = min_num;
	}
	if (!initialised) {
		srand(time(NULL));
		initialised = 1;
	}
	result = (rand() % (hi_num - low_num)) + low_num;
	return result;
}

char get_random_letter()
{
	int rnd = random_number(0, RND_MAXINT);
	for (int i = 0; i < ALPHABET_SIZE; i++) {
		if (rnd < letter_frequencies[i].p) {
			return letter_frequencies[i].c;
		}
		rnd -= letter_frequencies[i].p;
	}
	return '\0';
}

#ifdef DEBUG_RND_MAIN
#include <stdio.h>

int main()
{
	int n = 32;
	while (--n > 0) {
		printf("%c", get_random_letter());
	}
	return 0;
}

#endif