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
|
/******************************************************************************
*
* Project: Shapelib
* Purpose: Sample application for adding a record to an existing .dbf file.
* Author: Frank Warmerdam, warmerdam@pobox.com
*
******************************************************************************
* Copyright (c) 1999, Frank Warmerdam
*
* SPDX-License-Identifier: MIT OR LGPL-2.0-or-later
******************************************************************************
*/
#include <string.h>
#include <math.h>
#include <stdio.h>
#include <stdlib.h>
#include "shapefil.h"
int main(int argc, char **argv)
{
if (argc < 3)
{
printf("dbfadd xbase_file field_values\n");
return EXIT_FAILURE;
}
DBFHandle hDBF = DBFOpen(argv[1], "r+b");
if (hDBF == NULL)
{
printf("DBFOpen(%s,\"rb+\") failed.\n", argv[1]);
return 2;
}
// Do we have the correct number of arguments?
if (DBFGetFieldCount(hDBF) != argc - 2)
{
printf("Got %d fields, but require %d\n", argc - 2,
DBFGetFieldCount(hDBF));
DBFClose(hDBF);
return 3;
}
const int iRecord = DBFGetRecordCount(hDBF);
SHPDate date;
char boolean;
// Loop assigning the new field values.
for (int i = 0; i < DBFGetFieldCount(hDBF); i++)
{
if (strcmp(argv[i + 2], "") == 0)
DBFWriteNULLAttribute(hDBF, iRecord, i);
else if (DBFGetFieldInfo(hDBF, i, NULL, NULL, NULL) == FTString)
DBFWriteStringAttribute(hDBF, iRecord, i, argv[i + 2]);
else if (DBFGetFieldInfo(hDBF, i, NULL, NULL, NULL) == FTDate)
{
if (3 == sscanf(argv[i + 2], "%4d%2d%2d", &date.year, &date.month,
&date.day))
{
DBFWriteDateAttribute(hDBF, iRecord, i, &date);
}
}
else if (DBFGetFieldInfo(hDBF, i, NULL, NULL, NULL) == FTLogical)
{
if (1 == sscanf(argv[i + 2], "%c", &boolean))
{
DBFWriteLogicalAttribute(hDBF, iRecord, i, boolean);
}
}
else
DBFWriteDoubleAttribute(hDBF, iRecord, i, atof(argv[i + 2]));
}
DBFClose(hDBF);
return 0;
}
|
