aboutsummaryrefslogtreecommitdiffstats
path: root/common-address.c
diff options
context:
space:
mode:
authorMattias Andrée <maandree@kth.se>2021-04-04 23:48:03 +0200
committerMattias Andrée <maandree@kth.se>2021-04-04 23:48:03 +0200
commit4e07377ba62a1877a150faf196c8a9d3ac3fdcd7 (patch)
tree2e7434adcc7bf4d2f05ea0551ecda414a18e8ce4 /common-address.c
parentm (diff)
downloadcontacts-4e07377ba62a1877a150faf196c8a9d3ac3fdcd7.tar.gz
contacts-4e07377ba62a1877a150faf196c8a9d3ac3fdcd7.tar.bz2
contacts-4e07377ba62a1877a150faf196c8a9d3ac3fdcd7.tar.xz
Add find-contact-by-address and get-contact-addresses
Signed-off-by: Mattias Andrée <maandree@kth.se>
Diffstat (limited to 'common-address.c')
-rw-r--r--common-address.c89
1 files changed, 89 insertions, 0 deletions
diff --git a/common-address.c b/common-address.c
new file mode 100644
index 0000000..8ad8712
--- /dev/null
+++ b/common-address.c
@@ -0,0 +1,89 @@
+/* See LICENSE file for copyright and license details. */
+#include "common.h"
+
+
+int
+parse_coord(char *s, double *lat_min, double *lat_max, double *lon_min, double *lon_max)
+{
+ int withsign = 0, neg;
+ long int tmp;
+ double prec;
+
+ errno = 0;
+
+ if (s[0] == ':') {
+ *lat_min = -90;
+ *lat_max = +90;
+ } else {
+ prec = 1;
+ withsign = (s[0] == '-' || s[0] == '+');
+ neg = s[0] == '-';
+ s = &s[withsign];
+ tmp = 0;
+ if (isdigit(s[withsign])) {
+ tmp = strtol(s, &s, 0);
+ if (errno || tmp > INT_MAX)
+ return -1;
+ }
+ *lat_min = (double)tmp;
+ if (s[0] == '.') {
+ for (s++; isdigit(*s); s++) {
+ *lat_min *= 10;
+ *lat_min += (double)(*s & 15);
+ prec *= 10;
+ }
+ *lat_min /= prec;
+ }
+ if (!withsign && (s[0] == 'N' || s[0] == 'S')) {
+ neg = s[0] == 'S';
+ s = &s[1];
+ }
+ if (neg)
+ *lat_min = -*lat_min;
+ prec = (1 / prec) / 2;
+ *lat_max = *lat_min + prec;
+ *lat_min -= prec;
+ if (s[0] != ':')
+ return -1;
+ }
+
+ s = &s[1];
+
+ if (!s[0]) {
+ *lon_min = -180;
+ *lon_max = +180;
+ } else {
+ prec = 1;
+ withsign = (s[0] == '-' || s[0] == '+');
+ neg = s[0] == '-';
+ s = &s[withsign];
+ tmp = 0;
+ if (isdigit(s[withsign])) {
+ tmp = strtol(s, &s, 0);
+ if (errno || tmp > INT_MAX)
+ return -1;
+ }
+ *lon_min = (double)tmp;
+ if (s[0] == '.') {
+ for (s++; isdigit(*s); s++) {
+ *lon_min *= 10;
+ *lon_min += (double)(*s & 15);
+ prec *= 10;
+ }
+ *lon_min /= prec;
+ }
+ if (!withsign && (s[0] == 'E' || s[0] == 'W')) {
+ neg = s[0] == 'W';
+ s = &s[1];
+ }
+ if (neg)
+ *lon_min = -*lon_min;
+ prec = (1 / prec) / 2;
+ *lon_max = *lon_min + prec;
+ *lon_min -= prec;
+ if (s[0])
+ return -1;
+ }
+
+ return 0;
+}