File: print.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 (80 lines) | stat: -rw-r--r-- 2,518 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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
#include "local_proto.h"

/*
   print out upload values
 */
int print_upload(NEAR *Near, UPLOAD *Upload, int i, dbCatValArray *cvarr,
                 dbCatVal *catval, char *sep)
{
    int j;

    j = 0;
    while (Upload[j].upload != END) {
        if (Near[i].count == 0) { /* no nearest found */
            fprintf(stdout, "%snull", sep);
        }
        else {
            switch (Upload[j].upload) {
            case CAT:
                if (Near[i].to_cat >= 0)
                    fprintf(stdout, "%s%d", sep, Near[i].to_cat);
                else
                    fprintf(stdout, "%snull", sep);
                break;
            case DIST:
                fprintf(stdout, "%s%.17g", sep, Near[i].dist);
                break;
            case FROM_X:
                fprintf(stdout, "%s%.17g", sep, Near[i].from_x);
                break;
            case FROM_Y:
                fprintf(stdout, "%s%.17g", sep, Near[i].from_y);
                break;
            case TO_X:
                fprintf(stdout, "%s%.17g", sep, Near[i].to_x);
                break;
            case TO_Y:
                fprintf(stdout, "%s%.17g", sep, Near[i].to_y);
                break;
            case FROM_ALONG:
                fprintf(stdout, "%s%.17g", sep, Near[i].from_along);
                break;
            case TO_ALONG:
                fprintf(stdout, "%s%.17g", sep, Near[i].to_along);
                break;
            case TO_ANGLE:
                fprintf(stdout, "%s%f", sep, Near[i].to_angle);
                break;
            case TO_ATTR:
                if (catval) {
                    switch (cvarr->ctype) {
                    case DB_C_TYPE_INT:
                        fprintf(stdout, "%s%d", sep, catval->val.i);
                        break;

                    case DB_C_TYPE_DOUBLE:
                        fprintf(stdout, "%s%.17g", sep, catval->val.d);
                        break;

                    case DB_C_TYPE_STRING:
                        fprintf(stdout, "%s%s", sep,
                                db_get_string(catval->val.s));
                        break;

                    case DB_C_TYPE_DATETIME:
                        /* TODO: formatting datetime */
                        fprintf(stdout, "%s", sep);
                        break;
                    }
                }
                else {
                    fprintf(stdout, "%snull", sep);
                }
                break;
            }
        }
        j++;
    }

    return 0;
}