/*
 * IC Designs ICD2061A Dual Programmable Graphics Clock Generator.
 */
#include <u.h>
#include <libc.h>

#include "vga.h"

enum {
	Prescale	= 2,			/* P counter prescale (default) */
	NIndex		= 14,			/* number of index field values */
};

/*
 * For an index value of x, the appropriate VCO range
 * is >= index[x] && <= index[x+1]. The higher index is
 * prefered if VCO is on a boundary.
 */
static ulong index[NIndex] = {
	 50000000,
	 51000000,
	 53200000,
	 58500000,
	 60700000,
	 64400000,
	 66800000,
	 73500000,
	 75600000,
	 80900000,
	 83200000,
	 91500000,
	100000000,
	120000000,
};

static void
init(Vga *vga, Ctlr *ctlr)
{
	int f;
	ulong d, dmax, fmin, n;

	verbose("%s->init\n", ctlr->name);
	if(ctlr->flag & Finit)
		return;

	if(vga->f == 0)
		vga->f = vga->mode->frequency;

	/*
	 * Post-VCO divisor. Constraint:
	 * 	50MHz <= vga->f <= 120MHz
	 */
	for(vga->p = 0; vga->f <= 50000000; vga->p++)
		vga->f <<= 1;

	/*
	 * Determine index.
	 */
	for(vga->i = NIndex-1; vga->f < index[vga->i] && vga->i; vga->i--)
		;

	/*
	 * Denominator. Constraints:
	 *	200KHz <= Frequency/d <= 1MHz
	 * and
	 *	3 <= d <= 129
	 *
	 * Numerator. Constraint:
	 *	4 <= n <= 130
	 */
	d = Frequency/1000000 > 3 ? Frequency/1000000: 3;
	dmax = Frequency/200000 < 129 ? Frequency/200000: 129;

	/*
	 * Now look for values of p and q that give
	 * the least error for
	 *	vga->f = (Prescale*Frequency*n/d);
	 */
	vga->d = d;
	vga->n = 4;
	for(fmin = vga->f; d <= dmax; d++){
		for(n = 4; n <= 130; n++){
			f = vga->f - (Prescale*Frequency*n/d);
			if(f < 0)
				f = -f;
			if(f < fmin){
				fmin = f;
				vga->d = d;
				vga->n = n;
			}
		}
	}

	/*
	 * The serial word to be loaded into the icd2061a is
	 *	(2<<21)|(vga->i<<17)|((vga->n)<<10)|(vga->p<<7)|vga->d
	 * Always select ICD2061A REG2.
	 */
	vga->f = (Prescale*Frequency*vga->n/vga->d);
	vga->d -= 2;
	vga->n -= 3;

	verbose("%s->init done - %lud\n", ctlr->name, vga->f);
	ctlr->flag |= Finit;
}

Ctlr icd2061a = {
	"icd2061a",
	0,				/* snarf */
	0,				/* options */
	init,				/* init */
	0,				/* load */
	0,				/* dump */
};