#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "mplib.h"

void mp_dump_solved_path (MP mp, mp_knot h) {
    mp_knot p, q;
    if (h == NULL) return;
    p = h;
    do {
        q=mp_knot_next(mp,p);
        printf ("(%g,%g)..controls (%g,%g) and (%g,%g)",
                mp_number_as_double(mp,p->x_coord),
                mp_number_as_double(mp,p->y_coord),
                mp_number_as_double(mp,p->right_x),
                mp_number_as_double(mp,p->right_y),
                mp_number_as_double(mp,q->left_x),
                mp_number_as_double(mp,q->left_y));
        p=q;
        if ( p!=h || h->data.types.left_type!=mp_endpoint) {
            printf ("\n ..");
        }
    } while (p!=h);
    if ( h->data.types.left_type!=mp_endpoint )
        printf("cycle");
    printf (";\n");
}

int main (int argc, char ** argv) {
    MP mp ;
    mp_knot p, first, q;
    MP_options * opt = mp_options () ;
    opt -> command_line = NULL;
    opt -> noninteractive = 1 ;
    mp = mp_initialize ( opt ) ;
    if ( ! mp ) exit ( EXIT_FAILURE ) ;
    /* Equivalent Metapost code:
       path p;
       p := (0,0)..(10,10)..(10,-5)..cycle;
    */
    first = p = mp_append_knot(mp,NULL,0,0);
    if ( ! p ) exit ( EXIT_FAILURE ) ;
    q = mp_append_knot(mp,p,10,10);
    if ( ! q ) exit ( EXIT_FAILURE ) ;
    p = mp_append_knot(mp,q,10,-5);
    if ( ! p ) exit ( EXIT_FAILURE ) ;
    mp_close_path_cycle(mp, p, first);
    /* mp_dump_path(mp, first); */
    if (mp_solve_path(mp, first)) {
        mp_dump_solved_path(mp, first);
    }
    mp_free_path(mp, first);
    mp_finish ( mp ) ;
    free(opt);
    return 0;
}