2017-04-27 18:24:53 +00:00
|
|
|
// SPDX-License-Identifier: GPL-2.0
|
2015-02-11 19:22:00 +00:00
|
|
|
/* divesite.c */
|
|
|
|
#include "divesite.h"
|
2015-02-12 19:19:05 +00:00
|
|
|
#include "dive.h"
|
2018-05-11 15:25:41 +00:00
|
|
|
#include "subsurface-string.h"
|
2015-09-01 00:45:31 +00:00
|
|
|
#include "divelist.h"
|
2017-02-19 22:11:37 +00:00
|
|
|
#include "membuffer.h"
|
2015-02-12 19:19:05 +00:00
|
|
|
|
2015-06-13 09:54:33 +00:00
|
|
|
#include <math.h>
|
|
|
|
|
2015-02-12 19:19:05 +00:00
|
|
|
struct dive_site_table dive_site_table;
|
|
|
|
|
2015-02-13 09:14:33 +00:00
|
|
|
/* there could be multiple sites of the same name - return the first one */
|
|
|
|
uint32_t get_dive_site_uuid_by_name(const char *name, struct dive_site **dsp)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
struct dive_site *ds;
|
|
|
|
for_each_dive_site (i, ds) {
|
|
|
|
if (same_string(ds->name, name)) {
|
|
|
|
if (dsp)
|
|
|
|
*dsp = ds;
|
|
|
|
return ds->uuid;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* there could be multiple sites at the same GPS fix - return the first one */
|
|
|
|
uint32_t get_dive_site_uuid_by_gps(degrees_t latitude, degrees_t longitude, struct dive_site **dsp)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
struct dive_site *ds;
|
|
|
|
for_each_dive_site (i, ds) {
|
|
|
|
if (ds->latitude.udeg == latitude.udeg && ds->longitude.udeg == longitude.udeg) {
|
|
|
|
if (dsp)
|
|
|
|
*dsp = ds;
|
|
|
|
return ds->uuid;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2015-08-30 17:10:07 +00:00
|
|
|
|
|
|
|
/* to avoid a bug where we have two dive sites with different name and the same GPS coordinates
|
|
|
|
* and first get the gps coordinates (reading a V2 file) and happen to get back "the other" name,
|
|
|
|
* this function allows us to verify if a very specific name/GPS combination already exists */
|
|
|
|
uint32_t get_dive_site_uuid_by_gps_and_name(char *name, degrees_t latitude, degrees_t longitude)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
struct dive_site *ds;
|
|
|
|
for_each_dive_site (i, ds) {
|
|
|
|
if (ds->latitude.udeg == latitude.udeg && ds->longitude.udeg == longitude.udeg && same_string(ds->name, name))
|
|
|
|
return ds->uuid;
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2015-06-13 09:54:33 +00:00
|
|
|
// Calculate the distance in meters between two coordinates.
|
2015-07-14 18:35:04 +00:00
|
|
|
unsigned int get_distance(degrees_t lat1, degrees_t lon1, degrees_t lat2, degrees_t lon2)
|
2015-06-13 09:54:33 +00:00
|
|
|
{
|
|
|
|
double lat2_r = udeg_to_radians(lat2.udeg);
|
|
|
|
double lat_d_r = udeg_to_radians(lat2.udeg-lat1.udeg);
|
|
|
|
double lon_d_r = udeg_to_radians(lon2.udeg-lon1.udeg);
|
|
|
|
|
|
|
|
double a = sin(lat_d_r/2) * sin(lat_d_r/2) +
|
|
|
|
cos(lat2_r) * cos(lat2_r) * sin(lon_d_r/2) * sin(lon_d_r/2);
|
|
|
|
double c = 2 * atan2(sqrt(a), sqrt(1.0 - a));
|
|
|
|
|
|
|
|
// Earth radious in metres
|
2017-03-09 16:07:30 +00:00
|
|
|
return lrint(6371000 * c);
|
2015-06-13 09:54:33 +00:00
|
|
|
}
|
2015-06-10 18:45:34 +00:00
|
|
|
|
|
|
|
/* find the closest one, no more than distance meters away - if more than one at same distance, pick the first */
|
|
|
|
uint32_t get_dive_site_uuid_by_gps_proximity(degrees_t latitude, degrees_t longitude, int distance, struct dive_site **dsp)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
int uuid = 0;
|
|
|
|
struct dive_site *ds;
|
2015-06-13 09:54:33 +00:00
|
|
|
unsigned int cur_distance, min_distance = distance;
|
2015-06-10 18:45:34 +00:00
|
|
|
for_each_dive_site (i, ds) {
|
|
|
|
if (dive_site_has_gps_location(ds) &&
|
2015-06-13 09:54:33 +00:00
|
|
|
(cur_distance = get_distance(ds->latitude, ds->longitude, latitude, longitude)) < min_distance) {
|
2015-06-10 18:45:34 +00:00
|
|
|
min_distance = cur_distance;
|
|
|
|
uuid = ds->uuid;
|
|
|
|
if (dsp)
|
|
|
|
*dsp = ds;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return uuid;
|
|
|
|
}
|
|
|
|
|
2015-02-12 19:19:05 +00:00
|
|
|
/* try to create a uniqe ID - fingers crossed */
|
|
|
|
static uint32_t dive_site_getUniqId()
|
|
|
|
{
|
|
|
|
uint32_t id = 0;
|
|
|
|
|
2015-02-14 14:16:03 +00:00
|
|
|
while (id == 0 || get_dive_site_by_uuid(id)) {
|
|
|
|
id = rand() & 0xff;
|
|
|
|
id |= (rand() & 0xff) << 8;
|
|
|
|
id |= (rand() & 0xff) << 16;
|
|
|
|
id |= (rand() & 0xff) << 24;
|
|
|
|
}
|
2015-02-12 19:19:05 +00:00
|
|
|
|
|
|
|
return id;
|
|
|
|
}
|
|
|
|
|
2015-09-29 16:58:16 +00:00
|
|
|
/* we never allow a second dive site with the same uuid */
|
|
|
|
struct dive_site *alloc_or_get_dive_site(uint32_t uuid)
|
2015-02-12 19:19:05 +00:00
|
|
|
{
|
2015-09-29 16:58:16 +00:00
|
|
|
struct dive_site *ds;
|
2017-02-19 22:11:37 +00:00
|
|
|
|
|
|
|
if (uuid && (ds = get_dive_site_by_uuid(uuid)) != NULL)
|
|
|
|
return ds;
|
|
|
|
|
2015-09-29 16:58:16 +00:00
|
|
|
int nr = dive_site_table.nr;
|
|
|
|
int allocated = dive_site_table.allocated;
|
2015-02-12 19:19:05 +00:00
|
|
|
struct dive_site **sites = dive_site_table.dive_sites;
|
|
|
|
|
|
|
|
if (nr >= allocated) {
|
|
|
|
allocated = (nr + 32) * 3 / 2;
|
|
|
|
sites = realloc(sites, allocated * sizeof(struct dive_site *));
|
|
|
|
if (!sites)
|
|
|
|
exit(1);
|
|
|
|
dive_site_table.dive_sites = sites;
|
|
|
|
dive_site_table.allocated = allocated;
|
|
|
|
}
|
2015-09-29 16:58:16 +00:00
|
|
|
ds = calloc(1, sizeof(*ds));
|
2015-02-12 19:19:05 +00:00
|
|
|
if (!ds)
|
|
|
|
exit(1);
|
|
|
|
sites[nr] = ds;
|
|
|
|
dive_site_table.nr = nr + 1;
|
2015-09-29 16:58:16 +00:00
|
|
|
// we should always be called with a valid uuid except in the special
|
|
|
|
// case where we want to copy a dive site into the memory we allocated
|
|
|
|
// here - then we need to pass in 0 and create a temporary uuid here
|
|
|
|
// (just so things are always consistent)
|
|
|
|
if (uuid)
|
2015-07-24 16:53:21 +00:00
|
|
|
ds->uuid = uuid;
|
2015-09-29 16:58:16 +00:00
|
|
|
else
|
2015-07-24 16:53:21 +00:00
|
|
|
ds->uuid = dive_site_getUniqId();
|
2015-02-12 19:19:05 +00:00
|
|
|
return ds;
|
|
|
|
}
|
|
|
|
|
2015-07-18 20:34:05 +00:00
|
|
|
int nr_of_dives_at_dive_site(uint32_t uuid, bool select_only)
|
|
|
|
{
|
|
|
|
int j;
|
|
|
|
int nr = 0;
|
|
|
|
struct dive *d;
|
|
|
|
for_each_dive(j, d) {
|
|
|
|
if (d->dive_site_uuid == uuid && (!select_only || d->selected)) {
|
|
|
|
nr++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return nr;
|
|
|
|
}
|
|
|
|
|
2015-07-16 04:25:26 +00:00
|
|
|
bool is_dive_site_used(uint32_t uuid, bool select_only)
|
|
|
|
{
|
|
|
|
int j;
|
|
|
|
bool found = false;
|
|
|
|
struct dive *d;
|
|
|
|
for_each_dive(j, d) {
|
|
|
|
if (d->dive_site_uuid == uuid && (!select_only || d->selected)) {
|
|
|
|
found = true;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return found;
|
|
|
|
}
|
|
|
|
|
2015-02-13 15:02:26 +00:00
|
|
|
void delete_dive_site(uint32_t id)
|
|
|
|
{
|
|
|
|
int nr = dive_site_table.nr;
|
|
|
|
for (int i = 0; i < nr; i++) {
|
|
|
|
struct dive_site *ds = get_dive_site(i);
|
|
|
|
if (ds->uuid == id) {
|
|
|
|
free(ds->name);
|
|
|
|
free(ds->notes);
|
2018-10-07 18:13:46 +00:00
|
|
|
free_taxonomy(&ds->taxonomy);
|
2015-02-13 15:02:26 +00:00
|
|
|
free(ds);
|
|
|
|
if (nr - 1 > i)
|
|
|
|
memmove(&dive_site_table.dive_sites[i],
|
|
|
|
&dive_site_table.dive_sites[i+1],
|
|
|
|
(nr - 1 - i) * sizeof(dive_site_table.dive_sites[0]));
|
|
|
|
dive_site_table.nr = nr - 1;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2015-08-24 17:37:18 +00:00
|
|
|
uint32_t create_divesite_uuid(const char *name, timestamp_t divetime)
|
|
|
|
{
|
2015-09-27 17:16:40 +00:00
|
|
|
if (name == NULL)
|
|
|
|
name ="";
|
2017-12-30 20:01:13 +00:00
|
|
|
union {
|
|
|
|
unsigned char hash[20];
|
|
|
|
uint32_t i;
|
|
|
|
} u;
|
2015-08-24 17:37:18 +00:00
|
|
|
SHA_CTX ctx;
|
|
|
|
SHA1_Init(&ctx);
|
|
|
|
SHA1_Update(&ctx, &divetime, sizeof(timestamp_t));
|
|
|
|
SHA1_Update(&ctx, name, strlen(name));
|
2017-12-30 20:01:13 +00:00
|
|
|
SHA1_Final(u.hash, &ctx);
|
2015-08-24 17:37:18 +00:00
|
|
|
// now return the first 32 of the 160 bit hash
|
2017-12-30 20:01:13 +00:00
|
|
|
return u.i;
|
2015-08-24 17:37:18 +00:00
|
|
|
}
|
|
|
|
|
2015-02-12 19:19:05 +00:00
|
|
|
/* allocate a new site and add it to the table */
|
2015-08-24 17:37:18 +00:00
|
|
|
uint32_t create_dive_site(const char *name, timestamp_t divetime)
|
2015-02-12 09:59:16 +00:00
|
|
|
{
|
2015-08-24 17:37:18 +00:00
|
|
|
uint32_t uuid = create_divesite_uuid(name, divetime);
|
2015-09-29 16:58:16 +00:00
|
|
|
struct dive_site *ds = alloc_or_get_dive_site(uuid);
|
2015-02-12 09:59:16 +00:00
|
|
|
ds->name = copy_string(name);
|
2015-08-24 17:37:18 +00:00
|
|
|
return uuid;
|
2015-02-12 09:59:16 +00:00
|
|
|
}
|
|
|
|
|
2015-08-29 23:00:22 +00:00
|
|
|
/* same as before, but with current time if no current_dive is present */
|
|
|
|
uint32_t create_dive_site_from_current_dive(const char *name)
|
|
|
|
{
|
|
|
|
if (current_dive != NULL) {
|
|
|
|
return create_dive_site(name, current_dive->when);
|
|
|
|
} else {
|
|
|
|
timestamp_t when;
|
|
|
|
time_t now = time(0);
|
|
|
|
when = utc_mktime(localtime(&now));
|
|
|
|
return create_dive_site(name, when);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2015-02-12 09:59:16 +00:00
|
|
|
/* same as before, but with GPS data */
|
2015-08-24 17:37:18 +00:00
|
|
|
uint32_t create_dive_site_with_gps(const char *name, degrees_t latitude, degrees_t longitude, timestamp_t divetime)
|
2015-02-12 19:19:05 +00:00
|
|
|
{
|
2015-08-24 17:37:18 +00:00
|
|
|
uint32_t uuid = create_divesite_uuid(name, divetime);
|
2015-09-29 16:58:16 +00:00
|
|
|
struct dive_site *ds = alloc_or_get_dive_site(uuid);
|
2015-02-12 19:19:05 +00:00
|
|
|
ds->name = copy_string(name);
|
|
|
|
ds->latitude = latitude;
|
|
|
|
ds->longitude = longitude;
|
|
|
|
|
|
|
|
return ds->uuid;
|
|
|
|
}
|
2015-02-14 06:53:03 +00:00
|
|
|
|
|
|
|
/* a uuid is always present - but if all the other fields are empty, the dive site is pointless */
|
|
|
|
bool dive_site_is_empty(struct dive_site *ds)
|
|
|
|
{
|
2018-07-07 05:38:01 +00:00
|
|
|
return !ds ||
|
2018-07-11 06:46:02 +00:00
|
|
|
(empty_string(ds->name) &&
|
2018-01-07 10:12:48 +00:00
|
|
|
empty_string(ds->description) &&
|
|
|
|
empty_string(ds->notes) &&
|
2015-02-14 06:53:03 +00:00
|
|
|
ds->latitude.udeg == 0 &&
|
2018-07-11 06:46:02 +00:00
|
|
|
ds->longitude.udeg == 0);
|
2015-02-14 06:53:03 +00:00
|
|
|
}
|
2015-06-26 17:40:12 +00:00
|
|
|
|
2017-10-03 05:57:26 +00:00
|
|
|
void copy_dive_site_taxonomy(struct dive_site *orig, struct dive_site *copy)
|
2015-06-26 17:40:12 +00:00
|
|
|
{
|
2015-07-01 19:28:15 +00:00
|
|
|
if (orig->taxonomy.category == NULL) {
|
2015-07-13 14:09:55 +00:00
|
|
|
free_taxonomy(©->taxonomy);
|
2015-07-01 19:28:15 +00:00
|
|
|
} else {
|
|
|
|
if (copy->taxonomy.category == NULL)
|
|
|
|
copy->taxonomy.category = alloc_taxonomy();
|
2015-07-02 17:21:35 +00:00
|
|
|
for (int i = 0; i < TC_NR_CATEGORIES; i++) {
|
2018-01-05 08:50:07 +00:00
|
|
|
if (i < copy->taxonomy.nr) {
|
2015-07-06 19:09:20 +00:00
|
|
|
free((void *)copy->taxonomy.category[i].value);
|
2018-01-05 08:50:07 +00:00
|
|
|
copy->taxonomy.category[i].value = NULL;
|
|
|
|
}
|
2015-07-06 19:09:20 +00:00
|
|
|
if (i < orig->taxonomy.nr) {
|
|
|
|
copy->taxonomy.category[i] = orig->taxonomy.category[i];
|
|
|
|
copy->taxonomy.category[i].value = copy_string(orig->taxonomy.category[i].value);
|
|
|
|
}
|
2015-07-01 19:28:15 +00:00
|
|
|
}
|
2015-07-06 19:09:20 +00:00
|
|
|
copy->taxonomy.nr = orig->taxonomy.nr;
|
2015-07-01 19:28:15 +00:00
|
|
|
}
|
2015-06-26 17:40:12 +00:00
|
|
|
}
|
2017-10-03 05:57:26 +00:00
|
|
|
void copy_dive_site(struct dive_site *orig, struct dive_site *copy)
|
|
|
|
{
|
|
|
|
free(copy->name);
|
|
|
|
free(copy->notes);
|
|
|
|
free(copy->description);
|
|
|
|
|
|
|
|
copy->latitude = orig->latitude;
|
|
|
|
copy->longitude = orig->longitude;
|
|
|
|
copy->name = copy_string(orig->name);
|
|
|
|
copy->notes = copy_string(orig->notes);
|
|
|
|
copy->description = copy_string(orig->description);
|
|
|
|
copy->uuid = orig->uuid;
|
|
|
|
copy_dive_site_taxonomy(orig, copy);
|
|
|
|
}
|
2015-06-26 18:03:34 +00:00
|
|
|
|
2017-02-19 22:11:37 +00:00
|
|
|
static void merge_string(char **a, char **b)
|
|
|
|
{
|
|
|
|
char *s1 = *a, *s2 = *b;
|
|
|
|
|
2017-02-20 01:20:09 +00:00
|
|
|
if (!s2)
|
|
|
|
return;
|
|
|
|
|
2017-02-19 22:11:37 +00:00
|
|
|
if (same_string(s1, s2))
|
|
|
|
return;
|
|
|
|
|
|
|
|
if (!s1) {
|
|
|
|
*a = strdup(s2);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
*a = format_string("(%s) or (%s)", s1, s2);
|
|
|
|
free(s1);
|
|
|
|
}
|
|
|
|
|
|
|
|
void merge_dive_site(struct dive_site *a, struct dive_site *b)
|
|
|
|
{
|
|
|
|
if (!a->latitude.udeg) a->latitude.udeg = b->latitude.udeg;
|
|
|
|
if (!a->longitude.udeg) a->longitude.udeg = b->longitude.udeg;
|
|
|
|
merge_string(&a->name, &b->name);
|
|
|
|
merge_string(&a->notes, &b->notes);
|
|
|
|
merge_string(&a->description, &b->description);
|
|
|
|
|
|
|
|
if (!a->taxonomy.category) {
|
|
|
|
a->taxonomy = b->taxonomy;
|
|
|
|
memset(&b->taxonomy, 0, sizeof(b->taxonomy));
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2015-06-26 18:03:34 +00:00
|
|
|
void clear_dive_site(struct dive_site *ds)
|
|
|
|
{
|
|
|
|
free(ds->name);
|
|
|
|
free(ds->notes);
|
|
|
|
free(ds->description);
|
2017-10-05 18:36:23 +00:00
|
|
|
ds->name = NULL;
|
|
|
|
ds->notes = NULL;
|
|
|
|
ds->description = NULL;
|
2015-06-26 18:03:34 +00:00
|
|
|
ds->latitude.udeg = 0;
|
|
|
|
ds->longitude.udeg = 0;
|
|
|
|
ds->uuid = 0;
|
2015-07-01 19:28:15 +00:00
|
|
|
ds->taxonomy.nr = 0;
|
2015-07-13 14:09:55 +00:00
|
|
|
free_taxonomy(&ds->taxonomy);
|
2015-06-26 18:03:34 +00:00
|
|
|
}
|
2015-07-13 18:13:48 +00:00
|
|
|
|
2015-09-01 00:45:31 +00:00
|
|
|
void merge_dive_sites(uint32_t ref, uint32_t* uuids, int count)
|
2015-09-01 00:35:17 +00:00
|
|
|
{
|
2015-09-01 00:45:31 +00:00
|
|
|
int curr_dive, i;
|
|
|
|
struct dive *d;
|
|
|
|
for(i = 0; i < count; i++){
|
|
|
|
if (uuids[i] == ref)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
for_each_dive(curr_dive, d) {
|
|
|
|
if (d->dive_site_uuid != uuids[i] )
|
|
|
|
continue;
|
|
|
|
d->dive_site_uuid = ref;
|
2017-12-19 12:13:06 +00:00
|
|
|
invalidate_dive_cache(d);
|
2015-09-01 00:45:31 +00:00
|
|
|
}
|
|
|
|
}
|
2015-09-01 00:35:17 +00:00
|
|
|
|
2015-09-01 01:01:25 +00:00
|
|
|
for(i = 0; i < count; i++) {
|
2015-09-01 00:45:31 +00:00
|
|
|
if (uuids[i] == ref)
|
|
|
|
continue;
|
|
|
|
delete_dive_site(uuids[i]);
|
|
|
|
}
|
|
|
|
mark_divelist_changed(true);
|
2015-09-01 00:35:17 +00:00
|
|
|
}
|
|
|
|
|
2015-08-24 17:37:18 +00:00
|
|
|
uint32_t find_or_create_dive_site_with_name(const char *name, timestamp_t divetime)
|
2015-07-13 18:13:48 +00:00
|
|
|
{
|
|
|
|
int i;
|
|
|
|
struct dive_site *ds;
|
|
|
|
for_each_dive_site(i,ds) {
|
2015-09-23 14:38:38 +00:00
|
|
|
if (same_string(name, ds->name))
|
2015-07-13 18:13:48 +00:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (ds)
|
|
|
|
return ds->uuid;
|
2015-08-24 17:37:18 +00:00
|
|
|
return create_dive_site(name, divetime);
|
2015-07-13 18:13:48 +00:00
|
|
|
}
|
2015-08-24 18:07:57 +00:00
|
|
|
|
|
|
|
static int compare_sites(const void *_a, const void *_b)
|
|
|
|
{
|
|
|
|
const struct dive_site *a = (const struct dive_site *)*(void **)_a;
|
|
|
|
const struct dive_site *b = (const struct dive_site *)*(void **)_b;
|
|
|
|
return a->uuid > b->uuid ? 1 : a->uuid == b->uuid ? 0 : -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
void dive_site_table_sort()
|
|
|
|
{
|
|
|
|
qsort(dive_site_table.dive_sites, dive_site_table.nr, sizeof(struct dive_site *), compare_sites);
|
|
|
|
}
|