curve.c

Go to the documentation of this file.

/* curve.c 147 2007-04-09 00:44:09Z selinger */

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

#include "potracelib.h"
#include "lists.h"
#include "curve.h"

#define SAFE_MALLOC(var, n, typ) \
  if ((var = (typ *)malloc((n)*sizeof(typ))) == NULL) goto malloc_error

/* allocate and free path objects */

path_t *
path_new (void)
{
  path_t *p = NULL;
  privpath_t *priv = NULL;

  SAFE_MALLOC (p, 1, path_t);
  memset (p, 0, sizeof (path_t));
  SAFE_MALLOC (priv, 1, privpath_t);
  memset (priv, 0, sizeof (privpath_t));
  p->priv = priv;
  return p;

malloc_error:
  free (p);
  free (priv);
  return NULL;
}

static void
privcurve_free_members (privcurve_t * curve)
{
  free (curve->tag);
  free (curve->c);
  free (curve->vertex);
  free (curve->alpha);
  free (curve->alpha0);
  free (curve->beta);
}

void
path_free (path_t * p)
{
  if (p)
    {
      if (p->priv)
        {
          free (p->priv->pt);
          free (p->priv->lon);
          free (p->priv->sums);
          free (p->priv->po);
          privcurve_free_members (&p->priv->curve);
          privcurve_free_members (&p->priv->ocurve);
        }
      free (p->priv);
      /* do not free p->fcurve ! */
    }
  free (p);
}

void
pathlist_free (path_t * plist)
{
  path_t *p;

  list_forall_unlink (p, plist)
  {
    path_free (p);
  }
}

/* initialize and finalize curve structures */

typedef dpoint_t dpoint3_t[3];

int
privcurve_init (privcurve_t * curve, int n)
{
  memset (curve, 0, sizeof (privcurve_t));
  curve->n = n;
  SAFE_MALLOC (curve->tag, n, int);
  SAFE_MALLOC (curve->c, n, dpoint3_t);
  SAFE_MALLOC (curve->vertex, n, dpoint_t);
  SAFE_MALLOC (curve->alpha, n, double);
  SAFE_MALLOC (curve->alpha0, n, double);
  SAFE_MALLOC (curve->beta, n, double);
  return 0;

malloc_error:
  free (curve->tag);
  free (curve->c);
  free (curve->vertex);
  free (curve->alpha);
  free (curve->alpha0);
  free (curve->beta);
  return 1;
}

void
privcurve_to_curve (privcurve_t * pc, potrace_curve_t * c)
{
  c->n = pc->n;
  c->tag = pc->tag;
  c->c = pc->c;
}