nanostructures.c

Go to the documentation of this file.

/*
** nanostructures.c
** 
** Made by (Johnny Q. Hacker)
** Login   <solarion@borkborkbork>

    Copyright (C) 2009 Joseph Pingenot

    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU Affero General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU Affero General Public License for more details.

    You should have received a copy of the GNU Affero General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.

** Started on  Fri Mar 20 16:38:26 2009 Johnny Q. Hacker
** Last update Sun May 12 01:17:25 2002 Speed Blue
*/

#include <unistd.h>
#include <stdlib.h>
#include <libmodeling/nanostructures.h>
#include <libcommon/gcc_hints.h>


/*====================================================================
  FREES
  ====================================================================*/

static void region_1d_free(struct region_1d *region) {
  free(region);
}

static void doping_region_1d_free(struct doping_region_1d *region) {
  free(region);
}


static void foreach_region_1d_free(gpointer region, gpointer private) {
  region_1d_free(region);
}

static void foreach_doping_region_1d_free(gpointer region, gpointer private) {
  doping_region_1d_free(region);
}

void nanostructure_1d_free(struct nanostructure_1d* s) {
  g_list_foreach(s->regions, foreach_region_1d_free, NULL);
  g_list_foreach(s->doping_regions, foreach_doping_region_1d_free, NULL);
  free(s);
}

void nanostructure_free(struct nanostructure* s) {
  if(likely((s->storage) != NULL)) {
    switch(s->type) {
    case NS_D1:
      nanostructure_1d_free(s->storage);
      break;
    default:
      nanostructure_free(s);
    }
  }
  free(s);
}

/*====================================================================
  NEWS
  ====================================================================*/

struct doping_region_1d* doping_region_1d_new(enum doping_type dt) {
  struct doping_region_1d *dr;
  if(unlikely((dr = malloc(sizeof(struct doping_region_1d))) == NULL)) return NULL;
  return dr;
}

struct region_1d* region_1d_new() {
  struct region_1d *r;
  if(unlikely((r = malloc(sizeof(struct region_1d))) == NULL)) return NULL;
  return r;
}

struct nanostructure_1d* nanostructure_1d_new() {
  struct nanostructure_1d *s;
  if(unlikely((s = malloc(sizeof(struct nanostructure_1d))) == NULL)) return NULL;
  s->regions = s->doping_regions = NULL;
  return s;
}

struct nanostructure* nanostructure_new(enum nanostructure_type type) {
  struct nanostructure *s;
  if(unlikely((s = malloc(sizeof(struct nanostructure))) == NULL)) return NULL;
  switch(type) {
  case NS_D1:
    s->type = type;
    s->storage = nanostructure_1d_new();
    break;
  default:
    s->storage = NULL;
  }
  /*Catch allocation errors and de-allocate if we errored*/
  if(unlikely((s->storage) == NULL)) {
    nanostructure_free(s);
  }
  return s;
}