put_title.c

Go to the documentation of this file.

/**************************************************************
 * Rast_put_cell_title (name, title)
 *   char *name        name of map file
 *   char *title       new title
 *
 *   changes the title for the cell file 'name' in  current mapset
 *
 *   returns  1 if ok, -1 if error
 *************************************************************/
 
#include <string.h>
#include <grass/gis.h>
#include <grass/glocale.h>
 
int Rast_put_cell_title(const char *name, const char *title)
{
    const char *mapset;
    FILE *in, *out;
    char *tempfile;
    int line;
    char buf[1024];
 
    mapset = G_mapset();
    in = out = 0;
    in = G_fopen_old("cats", name, mapset);
    if (!in) {
        G_warning(_("category information for [%s] in [%s]"
                    " missing or invalid"),
                  name, mapset);
        return -1;
    }
 
    tempfile = G_tempfile();
    out = fopen(tempfile, "w");
    if (!out) {
        fclose(in);
        G_warning(_("G_put_title - can't create a temp file"));
        G_free(tempfile);
        return -1;
    }
 
    for (line = 0; G_getl(buf, sizeof buf, in); line++) {
        if (line == 1) {
            strcpy(buf, title);
            G_strip(buf);
        }
        fprintf(out, "%s\n", buf);
    }
    fclose(in);
    fclose(out);
 
    /* must be #cats line, title line, and label for cat 0 */
    if (line < 3) {
        G_warning(_("category information for [%s] in [%s] invalid"), name,
                  mapset);
        remove(tempfile);
        G_free(tempfile);
        return -1;
    }
 
    in = fopen(tempfile, "r");
    if (!in) {
        G_warning(_("G_put_title - can't reopen temp file"));
        G_free(tempfile);
        return -1;
    }
 
    out = G_fopen_new("cats", name);
    if (!out) {
        fclose(in);
        G_warning(_("can't write category information for [%s] in [%s]"), name,
                  mapset);
        remove(tempfile);
        G_free(tempfile);
        return -1;
    }
 
    while (fgets(buf, sizeof buf, in))
        fprintf(out, "%s", buf);
 
    fclose(in);
    fclose(out);
    remove(tempfile);
    G_free(tempfile);
 
    return 1;
}