first working version, need more test
This commit is contained in:
tTh
parent
4bca017774
commit
3dbcb198bf
|
|
@ -1,5 +1,7 @@
|
|||
/*
|
||||
* EXPERIMENTAL CODE !
|
||||
*
|
||||
* see also 'rdwredges.c
|
||||
*/
|
||||
|
||||
|
||||
|
|
@ -8,7 +10,8 @@ typedef struct {
|
|||
BBList *Blist;
|
||||
EdgeList *Elist;
|
||||
int status;
|
||||
} EdgeAndVertices;
|
||||
} EdgesAndVertices;
|
||||
|
||||
int x_write_vertedges(char *filename, BBList *bblist, EdgeList *edges);
|
||||
|
||||
int x_load_vertedges(char *filename, EdgesAndVertices *eav);
|
||||
|
|
|
|||
|
|
@ -19,6 +19,17 @@
|
|||
|
||||
extern int verbosity;
|
||||
|
||||
/* --------------------------------------------------------------------- */
|
||||
static void dumper(void *ptr, int count)
|
||||
{
|
||||
int idx;
|
||||
unsigned char *cptr = (unsigned char *)ptr;
|
||||
|
||||
for (idx=0; idx<count; idx++) {
|
||||
fprintf(stderr, "%02x", cptr[idx]);
|
||||
}
|
||||
fprintf(stderr, " ?\n");
|
||||
}
|
||||
/* --------------------------------------------------------------------- */
|
||||
/* EXPERIMENTAL GRUIK-CODE !!! */
|
||||
int x_write_vertedges(char *filename, BBList *bblist, EdgeList *edges)
|
||||
|
|
@ -26,6 +37,7 @@ int x_write_vertedges(char *filename, BBList *bblist, EdgeList *edges)
|
|||
FILE *fp;
|
||||
int idx, edg[2];
|
||||
double coo[3];
|
||||
int nbre;
|
||||
|
||||
fprintf(stderr, ">>> %s ( '%s' %p %p )\n", __func__, filename,
|
||||
bblist, edges);
|
||||
|
|
@ -37,6 +49,8 @@ if (NULL==(fp=fopen(filename, "w"))) {
|
|||
|
||||
print_bublist_desc(bblist, 0);
|
||||
fwrite("VERTICES", 8, 1, fp);
|
||||
nbre = bblist->fidx;
|
||||
fwrite(&nbre, sizeof(int), 1, fp);
|
||||
for (idx=0; idx<bblist->fidx; idx++) {
|
||||
fprintf(stderr, "vertice %d\n", idx);
|
||||
coo[0] = bblist->bbs[idx].p.x;
|
||||
|
|
@ -47,6 +61,8 @@ for (idx=0; idx<bblist->fidx; idx++) {
|
|||
|
||||
print_edgelist_desc(edges, 0);
|
||||
fwrite("EDGES ", 8, 1, fp);
|
||||
nbre = edges->fidx;
|
||||
fwrite(&nbre, sizeof(int), 1, fp);
|
||||
for (idx=0; idx<edges->fidx; idx++) {
|
||||
edg[0] = edges->edges[idx].A;
|
||||
edg[1] = edges->edges[idx].B;
|
||||
|
|
@ -57,3 +73,108 @@ fclose(fp);
|
|||
return 0;
|
||||
}
|
||||
/* --------------------------------------------------------------------- */
|
||||
/* EXPERIMENTAL GRUIK-CODE !!! */
|
||||
int x_load_vertedges(char *filename, EdgesAndVertices *eav)
|
||||
{
|
||||
BBList *blst;
|
||||
EdgeList *elst;
|
||||
FILE *fp;
|
||||
char marker[8];
|
||||
int nbre, foo, idx, edg[2];
|
||||
double coo[3];
|
||||
|
||||
#if DEBUG_LEVEL
|
||||
fprintf(stderr, ">>> %s ( '%s' %p )\n", __func__, filename, eav);
|
||||
#endif
|
||||
|
||||
if (NULL==(fp=fopen(filename, "r"))) {
|
||||
perror(filename);
|
||||
return -4;
|
||||
}
|
||||
|
||||
/* + + + + + + + + + + + */
|
||||
foo = fread(marker, 8, 1, fp);
|
||||
if (1 != foo) {
|
||||
fprintf(stderr, " %s of '%s': short read %d\n", __func__, filename, foo);
|
||||
return -1;
|
||||
}
|
||||
if (memcmp("VERTICES", marker, 8)) {
|
||||
fprintf(stderr, " %s is not an evblob file.\n", filename);
|
||||
dumper(marker, 8);
|
||||
return -4;
|
||||
}
|
||||
|
||||
/* now, get the numbers of vertices */
|
||||
foo = fread(&nbre, sizeof(int), 1, fp);
|
||||
if (1 != foo) {
|
||||
fprintf(stderr, " %s of '%s': short read %d\n", __func__, filename, foo);
|
||||
return -1;
|
||||
}
|
||||
fprintf(stderr, " %d vertices to be loaded\n", nbre);
|
||||
|
||||
/* allocate memory */
|
||||
blst = alloc_bubulles(filename, nbre, 0);
|
||||
if (NULL==blst) {
|
||||
fprintf(stderr, "in %s, no mem, aborting...\n", __func__);
|
||||
abort();
|
||||
}
|
||||
if (verbosity > 1) print_bublist_desc(blst, 0);
|
||||
/* load all that XYZ points */
|
||||
for (idx=0; idx<nbre; idx++) {
|
||||
if (3 != fread(coo, sizeof(double), 3, fp)) {
|
||||
fprintf(stderr, "%s err reading vertice #%d\n", __func__, idx);
|
||||
exit(1);
|
||||
}
|
||||
blst->bbs[idx].p.x = coo[0];
|
||||
blst->bbs[idx].p.y = coo[1];
|
||||
blst->bbs[idx].p.z = coo[2];
|
||||
blst->fidx++;
|
||||
}
|
||||
|
||||
/* + + + + + + + + + + + */
|
||||
foo = fread(marker, 8, 1, fp);
|
||||
if (1 != foo) {
|
||||
fprintf(stderr, " %s of '%s': short read %d\n", __func__, filename, foo);
|
||||
return -1;
|
||||
}
|
||||
if (memcmp("EDGES ", marker, 8)) {
|
||||
fprintf(stderr, " %s is not an evblob file.\n", filename);
|
||||
dumper(marker, 8);
|
||||
return -4;
|
||||
}
|
||||
/* now, get the numbers of eges */
|
||||
foo = fread(&nbre, sizeof(int), 1, fp);
|
||||
if (1 != foo) {
|
||||
fprintf(stderr, " %s of '%s': short read %d\n", __func__, filename, foo);
|
||||
return -1;
|
||||
}
|
||||
fprintf(stderr, " %d edges to be loaded\n", nbre);
|
||||
/* allocate memory for edges list */
|
||||
elst = alloc_edgelist("krkrkr", nbre, 0);
|
||||
if (NULL==elst) {
|
||||
fprintf(stderr, "no mem for edges in %s, aborting...\n", __func__);
|
||||
abort(); /* be violent before OOMK */
|
||||
}
|
||||
|
||||
/* read (and check ?) the edges */
|
||||
for (idx=0; idx<nbre; idx++) {
|
||||
if (2 != fread(edg, sizeof(int), 2, fp)) {
|
||||
fprintf(stderr, "%s: err reading edge #%d\n", __func__, idx);
|
||||
return -6;
|
||||
}
|
||||
elst->edges[idx].A = edg[0];
|
||||
elst->edges[idx].B = edg[1];
|
||||
elst->fidx++;
|
||||
}
|
||||
|
||||
/* so, now I think we have got all the data */
|
||||
eav->Blist = blst;
|
||||
eav->Elist = elst;
|
||||
eav->status = 0x51;
|
||||
|
||||
fclose(fp);
|
||||
|
||||
return 0;
|
||||
}
|
||||
/* --------------------------------------------------------------------- */
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue