Application: gvSIG desktop » gvSIG raster

/* Copyright (C) 2001-2007 Peter Selinger.

   This file is part of Potrace. It is free software and it is covered

   by the GNU General Public License. See the file COPYING for details. */

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

/* private part of the path and curve data structures */

#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;

}

/* free the members of the given curve structure. Leave errno unchanged. */

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);

}

/* free a path. Leave errno untouched. */

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);

}  

/* free a pathlist, leaving errno untouched. */

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];

/* initialize the members of the given curve structure to size m.

   Return 0 on success, 1 on error with errno set. */

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;

}

/* copy private to public curve structure */

void privcurve_to_curve(privcurve_t *pc, potrace_curve_t *c) {

  c->n = pc->n;

  c->tag = pc->tag;

  c->c = pc->c;

}