static int
make_shape(struct rt_wdb *fd, int verbose, int debug, size_t idx, size_t num, point2d_t *v)
{
size_t i;
point_t V = VINIT_ZERO;
vect_t h = VINIT_ZERO;
struct bu_vls str_sketch = BU_VLS_INIT_ZERO;
struct bu_vls str_extrude = BU_VLS_INIT_ZERO;
struct rt_sketch_internal skt;
struct line_seg *lsg = NULL;
/* nothing to do? */
if (num == 0 || !v)
return 0;
if (!fd) {
if (debug)
bu_log("ERROR: unable to write out shape\n");
return 1;
}
if (verbose || debug)
bu_log("%zu vertices\n", num);
skt.magic = RT_SKETCH_INTERNAL_MAGIC;
VMOVE(skt.V, V);
VSET(skt.u_vec, 1.0, 0.0, 0.0);
VSET(skt.v_vec, 0.0, 1.0, 0.0);
skt.vert_count = num;
skt.verts = v;
/* Specify number of segments */
skt.curve.count = num;
/* FIXME: investigate allocation */
skt.curve.reverse = (int *)bu_calloc(skt.curve.count, sizeof(int), "sketch: reverse");
skt.curve.segment = (void **)bu_calloc(skt.curve.count, sizeof(void *), "segs");
/* Insert all line segments except the last one */
for (i = 0; i < num-1; i++) {
BU_ALLOC(lsg, struct line_seg);
lsg->magic = CURVE_LSEG_MAGIC;
lsg->start = i;
lsg->end = i + 1;
skt.curve.segment[i] = (void *)lsg;
}
/* Connect the last connected vertex to the first vertex */
BU_ALLOC(lsg, struct line_seg);
lsg->magic = CURVE_LSEG_MAGIC;
lsg->start = num - 1;
lsg->end = 0;
skt.curve.segment[num - 1] = (void *)lsg;
/* write out sketch shape */
bu_vls_sprintf(&str_sketch, "shape-%zu.sketch", idx);
mk_sketch(fd, bu_vls_addr(&str_sketch), &skt);
/* extrude the shape */
bu_vls_sprintf(&str_extrude, "shape-%zu.extrude", idx);
VSET(h, 0.0, 0.0, 10.0); /* FIXME: arbitrary height */
mk_extrusion(fd, bu_vls_addr(&str_extrude), bu_vls_addr(&str_sketch), skt.V, h, skt.u_vec, skt.v_vec, 0);
/* clean up */
bu_vls_free(&str_sketch);
bu_vls_free(&str_extrude);
rt_curve_free(&skt.curve);
return 0;
}
int
main(int argc, char **argv)
{
struct rt_sketch_internal *skt;
struct bezier_seg *bsg;
struct line_seg *lsg;
struct carc_seg *csg;
point_t V;
vect_t u_vec, v_vec;
point2d_t verts[] = {
{ 250, 0 }, /* 0 */
{ 500, 0 }, /* 1 */
{ 500, 500 }, /* 2 */
{ 0, 500 }, /* 3 */
{ 0, 250 }, /* 4 */
{ 250, 250 }, /* 5 */
{ 125, 125 }, /* 6 */
{ 0, 125 }, /* 7 */
{ 125, 0 }, /* 8 */
{ 200, 200 } /* 9 */
};
int i;
VSET( V, 10, 20, 30 );
VSET( u_vec, 1, 0, 0 );
VSET( v_vec, 0, 1, 0 );
skt = (struct rt_sketch_internal *)bu_calloc( 1, sizeof( struct rt_sketch_internal ), "sketch" );
skt->magic = RT_SKETCH_INTERNAL_MAGIC;
VMOVE( skt->V, V );
VMOVE( skt->u_vec, u_vec );
VMOVE( skt->v_vec, v_vec );
skt->vert_count = 10;
skt->verts = (point2d_t *)bu_calloc( skt->vert_count, sizeof( point2d_t ), "verts" );
for ( i=0; i<skt->vert_count; i++ ) {
V2MOVE( skt->verts[i], verts[i] );
}
skt->skt_curve.seg_count = 6;
skt->skt_curve.reverse = (int *)bu_calloc( skt->skt_curve.seg_count, sizeof( int ), "sketch: reverse" );
skt->skt_curve.segments = (genptr_t *)bu_calloc( skt->skt_curve.seg_count, sizeof( genptr_t ), "segs" );
bsg = (struct bezier_seg *)bu_malloc( sizeof( struct bezier_seg ), "sketch: bsg" );
bsg->magic = CURVE_BEZIER_MAGIC;
bsg->degree = 4;
bsg->ctl_points = (int *)bu_calloc( bsg->degree+1, sizeof( int ), "sketch: bsg->ctl_points" );
bsg->ctl_points[0] = 4;
bsg->ctl_points[1] = 7;
bsg->ctl_points[2] = 9;
bsg->ctl_points[3] = 8;
bsg->ctl_points[4] = 0;
skt->skt_curve.segments[0] = (genptr_t)bsg;
lsg = (struct line_seg *)bu_malloc( sizeof( struct line_seg ), "sketch: lsg" );
lsg->magic = CURVE_LSEG_MAGIC;
lsg->start = 0;
lsg->end = 1;
skt->skt_curve.segments[1] = (genptr_t)lsg;
lsg = (struct line_seg *)bu_malloc( sizeof( struct line_seg ), "sketch: lsg" );
lsg->magic = CURVE_LSEG_MAGIC;
lsg->start = 1;
lsg->end = 2;
skt->skt_curve.segments[2] = (genptr_t)lsg;
lsg = (struct line_seg *)bu_malloc( sizeof( struct line_seg ), "sketch: lsg" );
lsg->magic = CURVE_LSEG_MAGIC;
lsg->start = 2;
lsg->end = 3;
skt->skt_curve.segments[3] = (genptr_t)lsg;
lsg = (struct line_seg *)bu_malloc( sizeof( struct line_seg ), "sketch: lsg" );
lsg->magic = CURVE_LSEG_MAGIC;
lsg->start = 3;
lsg->end = 4;
skt->skt_curve.segments[4] = (genptr_t)lsg;
csg = (struct carc_seg *)bu_malloc( sizeof( struct carc_seg ), "sketch: csg" );
csg->magic = CURVE_CARC_MAGIC;
csg->radius = -1.0;
csg->start = 6;
csg->end = 5;
skt->skt_curve.segments[5] = (genptr_t)csg;
outfp = wdb_fopen( "sketch.g" );
mk_id( outfp, "sketch test" );
mk_sketch( outfp, "test_sketch", skt );
return 0;
}
