File: error.c

package info (click to toggle)
grass 8.4.2-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 277,040 kB
  • sloc: ansic: 460,798; python: 227,732; cpp: 42,026; sh: 11,262; makefile: 7,007; xml: 3,637; sql: 968; lex: 520; javascript: 484; yacc: 450; asm: 387; perl: 157; sed: 25; objc: 6; ruby: 4
file content (25 lines) | stat: -rw-r--r-- 508 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
#include <stdio.h>
#include <unistd.h>
#include <grass/gis.h>
#include "local_proto.h"

extern FILE *tracefd;

int error(const char *a, const char *b, const char *c)
{
    char msg[2000];

    sprintf(msg, "%s%s%s : %s", a, *b ? " " : "", b, c);

    if (tracefd != NULL && !(isatty(fileno(tracefd)) && isatty(fileno(stderr))))
        fprintf(tracefd, "## error: %s\n", c);

    if (isatty(0))
        fprintf(stderr, "%s\n", msg);
    else
        G_fatal_error("%s", msg);

    reject();

    return 0;
}