/*
 *		EdgesAndVertices

	https://git.tetalab.org/tTh/libbubulle/src/branch/master/tools/

 */

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

#include  "../bubulles.h"
#include  "../edges.h"

#include  "objtrucs.h"

int		verbosity;

/* --------------------------------------------------------------------- */
/*			EXPERIMENTAL GRUIK-CODE !!!			 */
int printf_the_vertices(EdgesAndVertices *eav)
{
int		idx;

#if DEBUG_LEVEL
fprintf(stderr, ">>> %s ( %p )\n", __func__, eav);
#endif

if (verbosity) fprintf(stderr, "fprinting %d vertices\n", eav->Blist->fidx);

for (idx=0; idx<eav->Blist->fidx; idx++) {
	printf("%.9f %.9f %.9f\n",
		eav->Blist->bbs[idx].p.x,
		eav->Blist->bbs[idx].p.y,
		eav->Blist->bbs[idx].p.z	);
	}

return 0;
}
/* --------------------------------------------------------------------- */
/*			EXPERIMENTAL GRUIK-CODE !!!			 */
int printf_the_edges(EdgesAndVertices *eav)
{
int		idx, a, b;

#if DEBUG_LEVEL
fprintf(stderr, ">>> %s ( %p )\n", __func__, eav);
#endif

if (verbosity) fprintf(stderr, "fprinting %d edges\n", eav->Elist->fidx);

/*
 *	OK we have (maybe) all the data in da place
 *	and we can spit all the edges to stdout
 */
for (idx=0; idx<eav->Elist->fidx; idx++) {

	a = eav->Elist->edges[idx].A;
	b = eav->Elist->edges[idx].B;
	// fprintf(stderr, "%7d %7d\n", a, b);

	printf("%.9f %.9f %.9f   %.9f %.9f %.9f\n",
		eav->Blist->bbs[a].p.x,
		eav->Blist->bbs[a].p.y,
		eav->Blist->bbs[a].p.z,
		eav->Blist->bbs[b].p.x,
		eav->Blist->bbs[b].p.y,
		eav->Blist->bbs[b].p.z	);
	}

return 0;		/* allway success ? */
}
/* --------------------------------------------------------------------- */
/*			EXPERIMENTAL GRUIK-CODE !!!			 */
int load_and_printf_evblob(char *filename, int mode)
{
EdgesAndVertices	eav;
int			foo;

#if DEBUG_LEVEL
fprintf(stderr, ">>> %s ( '%s'  %d )\n", __func__, filename, mode);
#endif

memset(&eav, 0, sizeof(EdgesAndVertices));
foo = x_load_vertedges(filename, &eav);
if (foo) {
	fprintf(stderr, "    load vertice & edges blob -> %d\n", foo);
	return foo;
	}

if (verbosity > 1) {
	fprintf(stderr, "vertices at   %p\n", eav.Blist);
	fprintf(stderr, "edges at      %p\n", eav.Elist);
	fprintf(stderr, "status is     %d\n", eav.status);
	fprintf(stderr, "got %d vertices and %d edges\n",
				eav.Blist->fidx,
				eav.Elist->fidx);
	}

switch (mode) {
	case 0:
		printf_the_edges(&eav);			break;
	case 1:
		printf_the_vertices(&eav);		break;
	default:
		fprintf(stderr, "no way to do %d\n", mode);
		exit(1);
		break;
	}

return 0;
}
/* --------------------------------------------------------------------- */
void help(void)
{
fprintf(stderr, "YOLO!\n");
/* XXX */
exit(0);
}
/* --------------------------------------------------------------------- */
/*			EXPERIMENTAL GRUIK-CODE !!!			 */

int main(int argc, char *argv[])
{
int			opt, foo;
int			outmode = 0;

fprintf(stderr, "### Export EVblob   (%s %s)\n", __DATE__, __TIME__);

verbosity = 0;

while ((opt = getopt(argc, argv, "ht:v")) != -1) {
	switch(opt) {
		case 'h':
			help();			break;
		case 'v':
			verbosity++;		break;
		case 't':
			// fprintf(stderr, "t -> %s\n", optarg);
			switch(optarg[0]) {
				case 'e': outmode=0;	break;
				case 'v': outmode=1;	break;
				}
			break;
		default:
			exit(1);
			break;
		}
	}

#if DEBUG_LEVEL
fprintf(stderr, "optind=%d argc=%d\n", optind, argc);
#endif

if (optind < argc) {
	// fprintf(stderr, "ARG = %s\n", argv[optind]);
	foo = load_and_printf_evblob(argv[optind], outmode);
	if (foo) {
		fprintf(stderr, "Error number %d on '%s'\n", foo, argv[optind]);
		exit(1);
		}
	}
else	{
	fprintf(stderr, "%s need a input filename\n", argv[0]);
	exit(1);
	}

return 0;
}
/* --------------------------------------------------------------------- */