imagery/alloc.c

Go to the documentation of this file.

#include <stdio.h>
#include <stdlib.h>
#include <grass/imagery.h>
 
void *I_malloc(size_t n)
{
    void *b;
 
    b = G_malloc(n);
 
    return b;
}
 
void *I_realloc(void *b, size_t n)
{
    b = G_realloc(b, n);
 
    return b;
}
 
int I_free(void *b)
{
    if ((char *)b != NULL)
        G_free(b);
 
    return 0;
}
 
double **I_alloc_double2(int a, int b)
{
    double **x;
    int i;
 
    x = (double **)I_malloc((a + 1) * sizeof(double *));
 
    for (i = 0; i < a; i++) {
        int n;
 
        x[i] = (double *)I_malloc(b * sizeof(double));
 
        for (n = 0; n < b; n++)
            x[i][n] = 0;
    }
    x[a] = NULL;
 
    return x;
}
 
int *I_alloc_int(int a)
{
    int *x;
    int i;
 
    x = (int *)I_malloc(a * sizeof(int));
 
    for (i = 0; i < a; i++)
        x[i] = 0;
 
    return x;
}
 
int **I_alloc_int2(int a, int b)
{
    int **x;
    int i, n;
 
    x = (int **)I_malloc((a + 1) * sizeof(int *));
 
    for (i = 0; i < a; i++) {
        x[i] = (int *)I_malloc(b * sizeof(int));
 
        for (n = 0; n < b; n++)
            x[i][n] = 0;
    }
    x[a] = NULL;
 
    return x;
}
 
int I_free_int2(int **x)
{
    int i;
 
    if (x != NULL) {
        for (i = 0; x[i] != NULL; i++)
            G_free(x[i]);
        G_free(x);
    }
 
    return 0;
}
 
int I_free_double2(double **x)
{
    int i;
 
    if (x != NULL) {
        for (i = 0; x[i] != NULL; i++)
            G_free(x[i]);
        G_free(x);
    }
 
    return 0;
}
 
double ***I_alloc_double3(int a, int b, int c)
{
    double ***x;
    int i, n;
 
    x = (double ***)G_malloc((a + 1) * sizeof(double **));
 
    for (i = 0; i < a; i++) {
        x[i] = I_alloc_double2(b, c);
        if (x[i] == NULL) {
            for (n = 0; n < i; n++)
                G_free(x[n]);
            G_free(x);
 
            return (double ***)NULL;
        }
    }
    x[a] = NULL;
 
    return x;
}
 
int I_free_double3(double ***x)
{
    int i;
 
    if (x != NULL) {
        for (i = 0; x[i] != NULL; i++)
            I_free_double2(x[i]);
        G_free(x);
    }
 
    return 0;
}