#include <u.h>#include <libc.h>#include	<cda/fizz.h>#include	<stdio.h>#define MIN(a,b) ((a) <= (b) ? (a) : (b))#define MAX(a,b) ((a) >= (b) ? (a) : (b)) static pkgbase, curpkg, npkgs;int pcnts[2000]; staticintcloseto(Rectangle a, Rectangle b){	register m; 	m = MAX(MAX(abs(a.min.x-b.min.x),abs(a.min.y-b.min.y)),		MAX(abs(a.max.x-b.max.x),abs(a.max.y-b.max.y)));	return(m < INCH/4);} static voiddopkg(Package *p){	register i;	register Package *pp; 	npkgs++;	for(i = pkgbase; i < curpkg; i++){		pp = (Package *)symlook("~", i, (void *)0);		if(closeto(p->r, pp->r)){/*		if((p->npins == pp->npins) && rinr(p->r, pp->r) && rinr(pp->r, p->r)){/**/			symlook(p->name, i, (void *)p);			p->class = i;			return;		}	}	symlook("~", curpkg, (void *)p);	p->class = curpkg++;} voidpkgch(Chip *c){	pcnts[c->type->pkg->class]++;} voidpkgclass(void *f){	int i;	FILE *fp; 	fp = (FILE *) f;	pkgbase = 100;	curpkg = pkgbase;	npkgs = 0;	symtraverse(S_PACKAGE, dopkg);	fprintf(fp, "%d pkg classes from %d pkgs\n", curpkg-pkgbase, npkgs);	for(i = pkgbase; i < curpkg; i++)		pcnts[i] = 0;	symtraverse(S_CHIP, pkgch);	for(i = pkgbase; i < curpkg; i++)		fprintf(fp, "%d ", pcnts[i]);	fprintf(fp, "\n");}