drstemplates.c

Go to the documentation of this file.

 
#include <stdlib.h>
#include "grib2.h"
#include "drstemplates.h"
 
g2int
getdrsindex(g2int number)
{
    g2int j, getdrsindex = -1;
 
    for (j = 0; j < MAXDRSTEMP; j++)
    {
        if (number == templatesdrs[j].template_num)
        {
            getdrsindex = j;
            return(getdrsindex);
        }
    }
 
    return(getdrsindex);
}
 
gtemplate *
getdrstemplate(g2int number)
{
    g2int index;
    gtemplate *new;
 
    index = getdrsindex(number);
 
    if (index != -1)
    {
        new = malloc(sizeof(gtemplate));
        new->type = 5;
        new->num = templatesdrs[index].template_num;
        new->maplen = templatesdrs[index].mapdrslen;
        new->needext = templatesdrs[index].needext;
        new->map = (g2int *)templatesdrs[index].mapdrs;
        new->extlen = 0;
        new->ext = NULL;
        return(new);
    }
    else
    {
        printf("getdrstemplate: DRS Template 5.%d not defined.\n", (int)number);
        return(NULL);
    }
 
    return(NULL);
}
 
gtemplate *
extdrstemplate(g2int number, g2int *list)
{
    gtemplate *new;
    g2int index, i;
 
    index = getdrsindex(number);
    if (index == -1)
        return(0);
 
    new = getdrstemplate(number);
 
    if (!new->needext)
        return(new);
 
    if (number == 1)
    {
        new->extlen = list[10] + list[12];
        new->ext = malloc(sizeof(g2int) * new->extlen);
        for (i = 0; i < new->extlen; i++)
        {
            new->ext[i] = 4;
        }
    }
    return(new);
}