analyse.c

Go to the documentation of this file.

/*
 * vim:expandtab:shiftwidth=8:tabstop=8:
 *
 * Copyright CEA/DAM/DIF  (2008)
 * contributeur : Philippe DENIEL   philippe.deniel@cea.fr
 *                Thomas LEIBOVICI  thomas.leibovici@cea.fr
 *
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser 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
 * Lesser General Public License for more details.
 * 
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 * 
 * ---------------------------------------
 */

#include "config.h"
#include "analyse.h"
#include <stdlib.h>
#include <stdio.h>

#if HAVE_STRING_H
#   include <string.h>
#endif

list_items *config_CreateItemsList()
{
  list_items *new = (list_items *) malloc(sizeof(list_items));

  (*new) = NULL;
  return new;
}

generic_item *config_CreateBlock(char *blockname, list_items * list)
{
  generic_item *new = (generic_item *) malloc(sizeof(generic_item));

  new->type = TYPE_BLOCK;

  strncpy(new->item.block.block_name, blockname, MAXSTRLEN);

  if(list)
    {
      new->item.block.block_content = *list;
      free(list);
    }
  else
    new->item.block.block_content = NULL;

  new->next = NULL;

  return new;

}

generic_item *config_CreateAffect(char *varname, char *varval)
{
  generic_item *new = (generic_item *) malloc(sizeof(generic_item));

  new->type = TYPE_AFFECT;
  strncpy(new->item.affect.varname, varname, MAXSTRLEN);
  strncpy(new->item.affect.varvalue, varval, MAXSTRLEN);

  new->next = NULL;

  return new;

}

void config_AddItem(list_items * list, generic_item * item)
{
  if((*list) == NULL)
    {
      (*list) = item;
    }
  else
    {
      item->next = (*list);
      (*list) = item;
    }
}

static void print_list_ident(FILE * output, list_items * list, unsigned int indent)
{

  generic_item *curr_item;

  /* sanity check */
  if(!list)
    return;

  curr_item = (*list);

  while(curr_item)
    {

      if(curr_item->type == TYPE_BLOCK)
        {
          fprintf(output, "%*s<BLOCK '%s'>\n", indent, " ",
                  curr_item->item.block.block_name);
          print_list_ident(output, &curr_item->item.block.block_content, indent + 3);
          fprintf(output, "%*s</BLOCK '%s'>\n", indent, " ",
                  curr_item->item.block.block_name);
        }
      else
        {
          /* affectation */
          fprintf(output, "%*sKEY: '%s', VALUE: '%s'\n", indent, " ",
                  curr_item->item.affect.varname, curr_item->item.affect.varvalue);
        }

      curr_item = curr_item->next;
    }

}

void config_print_list(FILE * output, list_items * list)
{

  print_list_ident(output, list, 0);

}

static void free_list_items_recurse(list_items * list)
{
  generic_item *curr_item;
  generic_item *next_item;

  /* sanity check */
  if(!list)
    return;

  curr_item = (*list);

  while(curr_item)
    {

      next_item = curr_item->next;

      if(curr_item->type == TYPE_BLOCK)
        {
          free_list_items_recurse(&curr_item->item.block.block_content);
        }

      free(curr_item);
      curr_item = next_item;

    }
  return;
}

void config_free_list(list_items * list)
{

  free_list_items_recurse(list);
  free(list);
  return;
}