#ifndef _DTC_H
#define _DTC_H

/*
 * (C) Copyright David Gibson <dwg@au1.ibm.com>, IBM Corporation.  2005.
 *
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 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
 *  General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
 *                                                                   USA
 */

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <stdint.h>
#include <stdarg.h>
#include <assert.h>
#include <ctype.h>
#include <errno.h>
#include <unistd.h>

#include <libfdt_env.h>
#include <fdt.h>

#define DEFAULT_FDT_VERSION     17
/*
 * Command line options
 */
extern int quiet;               /* Level of quietness */
extern int reservenum;          /* Number of memory reservation slots */
extern int minsize;             /* Minimum blob size */
extern int padsize;             /* Additional padding to blob */

static inline void __attribute__((noreturn)) die(char * str, ...)
{
        va_list ap;

        va_start(ap, str);
        fprintf(stderr, "FATAL ERROR: ");
        vfprintf(stderr, str, ap);
        exit(1);
}

static inline void *xmalloc(size_t len)
{
        void *new = malloc(len);

        if (! new)
                die("malloc() failed\n");

        return new;
}

static inline void *xrealloc(void *p, size_t len)
{
        void *new = realloc(p, len);

        if (! new)
                die("realloc() failed (len=%d)\n", len);

        return new;
}

typedef uint32_t cell_t;


#define streq(a, b)     (strcmp((a), (b)) == 0)
#define strneq(a, b, n) (strncmp((a), (b), (n)) == 0)

#define ALIGN(x, a)     (((x) + (a) - 1) & ~((a) - 1))
#define ARRAY_SIZE(x) (sizeof(x) / sizeof((x)[0]))

/* Data blobs */
enum markertype {
        REF_PHANDLE,
        REF_PATH,
        LABEL,
};

struct  marker {
        enum markertype type;
        int offset;
        char *ref;
        struct marker *next;
};

struct data {
        int len;
        char *val;
        struct marker *markers;
};


#define empty_data ((struct data){ /* all .members = 0 or NULL */ })

#define for_each_marker(m) \
        for (; (m); (m) = (m)->next)
#define for_each_marker_of_type(m, t) \
        for_each_marker(m) \
                if ((m)->type == (t))

void data_free(struct data d);

struct data data_grow_for(struct data d, int xlen);

struct data data_copy_mem(const char *mem, int len);
struct data data_copy_escape_string(const char *s, int len);
struct data data_copy_file(FILE *f, size_t len);

struct data data_append_data(struct data d, const void *p, int len);
struct data data_insert_at_marker(struct data d, struct marker *m,
                                  const void *p, int len);
struct data data_merge(struct data d1, struct data d2);
struct data data_append_cell(struct data d, cell_t word);
struct data data_append_re(struct data d, const struct fdt_reserve_entry *re);
struct data data_append_addr(struct data d, uint64_t addr);
struct data data_append_byte(struct data d, uint8_t byte);
struct data data_append_zeroes(struct data d, int len);
struct data data_append_align(struct data d, int align);

struct data data_add_marker(struct data d, enum markertype type, char *ref);

int data_is_one_string(struct data d);

/* DT constraints */

#define MAX_PROPNAME_LEN        31
#define MAX_NODENAME_LEN        31

/* Live trees */
struct property {
        char *name;
        struct data val;

        struct property *next;

        char *label;
};

struct node {
        char *name;
        struct property *proplist;
        struct node *children;

        struct node *parent;
        struct node *next_sibling;

        char *fullpath;
        int basenamelen;

        cell_t phandle;
        int addr_cells, size_cells;

        char *label;
};

#define for_each_property(n, p) \
        for ((p) = (n)->proplist; (p); (p) = (p)->next)

#define for_each_child(n, c)    \
        for ((c) = (n)->children; (c); (c) = (c)->next_sibling)

struct property *build_property(char *name, struct data val, char *label);
struct property *chain_property(struct property *first, struct property *list);
struct property *reverse_properties(struct property *first);

struct node *build_node(struct property *proplist, struct node *children);
struct node *name_node(struct node *node, char *name, char *label);
struct node *chain_node(struct node *first, struct node *list);

void add_property(struct node *node, struct property *prop);
void add_child(struct node *parent, struct node *child);

const char *get_unitname(struct node *node);
struct property *get_property(struct node *node, const char *propname);
cell_t propval_cell(struct property *prop);
struct node *get_subnode(struct node *node, const char *nodename);
struct node *get_node_by_path(struct node *tree, const char *path);
struct node *get_node_by_label(struct node *tree, const char *label);
struct node *get_node_by_phandle(struct node *tree, cell_t phandle);
struct node *get_node_by_ref(struct node *tree, const char *ref);
cell_t get_node_phandle(struct node *root, struct node *node);

/* Boot info (tree plus memreserve information */

struct reserve_info {
        struct fdt_reserve_entry re;

        struct reserve_info *next;

        char *label;
};

struct reserve_info *build_reserve_entry(uint64_t start, uint64_t len, char *label);
struct reserve_info *chain_reserve_entry(struct reserve_info *first,
                                         struct reserve_info *list);
struct reserve_info *add_reserve_entry(struct reserve_info *list,
                                       struct reserve_info *new);


struct boot_info {
        struct reserve_info *reservelist;
        struct node *dt;                /* the device tree */
        uint32_t boot_cpuid_phys;
};

struct boot_info *build_boot_info(struct reserve_info *reservelist,
                                  struct node *tree, uint32_t boot_cpuid_phys);

/* Checks */

void process_checks(int force, struct boot_info *bi);

/* Flattened trees */

void dt_to_blob(FILE *f, struct boot_info *bi, int version);
void dt_to_asm(FILE *f, struct boot_info *bi, int version);

struct boot_info *dt_from_blob(const char *fname);

/* Tree source */

void dt_to_source(FILE *f, struct boot_info *bi);
struct boot_info *dt_from_source(const char *f);

/* FS trees */

struct boot_info *dt_from_fs(const char *dirname);

/* misc */

char *join_path(const char *path, const char *name);

#endif /* _DTC_H */