geocoordinates/geocoordinates.php

   1 <?php
   2 /**
   3  * Name: Geocoordinates
   4  * Description: Use the OpenCage Geocoder http://geocoder.opencagedata.com to resolve nearest populated location for given latitude, longitude. Derived from "geonames"
   5  * Version: 0.1
   6  * Author: Michael Vogel <https://pirati.ca/profile/heluecht>
   7  */
   8
   9 use Friendica\Core\Config;
  10
  11 function geocoordinates_install() {
  12         register_hook('post_local', 'addon/geocoordinates/geocoordinates.php', 'geocoordinates_post_hook');
  13         register_hook('post_remote', 'addon/geocoordinates/geocoordinates.php', 'geocoordinates_post_hook');
  14 }
  15
  16
  17 function geocoordinates_uninstall() {
  18         unregister_hook('post_local',    'addon/geocoordinates/geocoordinates.php', 'geocoordinates_post_hook');
  19         unregister_hook('post_remote',    'addon/geocoordinates/geocoordinates.php', 'geocoordinates_post_hook');
  20 }
  21
  22 function geocoordinates_resolve_item(&$item) {
  23         if((!$item["coord"]) || ($item["location"]))
  24                 return;
  25
  26         $key = Config::get("geocoordinates", "api_key");
  27         if ($key == "")
  28                 return;
  29
  30         $language = Config::get("geocoordinates", "language");
  31         if ($language == "")
  32                 $language = "de";
  33
  34         $coords = explode(' ',$item["coord"]);
  35
  36         if (count($coords) < 2)
  37                 return;
  38
  39         $coords[0] = round($coords[0], 5);
  40         $coords[1] = round($coords[1], 5);
  41
  42         $result = Cache::get("geocoordinates:".$language.":".$coords[0]."-".$coords[1]);
  43         if (!is_null($result)) {
  44                 $item["location"] = $result;
  45                 return;
  46         }
  47
  48         $s = fetch_url("https://api.opencagedata.com/geocode/v1/json?q=".$coords[0].",".$coords[1]."&key=".$key."&language=".$language);
  49
  50         if (!$s) {
  51                 logger("API could not be queried", LOGGER_DEBUG);
  52                 return;
  53         }
  54
  55         $data = json_decode($s);
  56
  57         if ($data->status->code != "200") {
  58                 logger("API returned error ".$data->status->code." ".$data->status->message, LOGGER_DEBUG);
  59                 return;
  60         }
  61
  62         if (($data->total_results == 0) || (count($data->results) == 0)) {
  63                 logger("No results found for coordinates ".$item["coord"], LOGGER_DEBUG);
  64                 return;
  65         }
  66
  67         $item["location"] = $data->results[0]->formatted;
  68
  69         logger("Got location for coordinates ".$coords[0]."-".$coords[1].": ".$item["location"], LOGGER_DEBUG);
  70
  71         if ($item["location"] != "")
  72                 Cache::set("geocoordinates:".$language.":".$coords[0]."-".$coords[1], $item["location"]);
  73 }
  74
  75 function geocoordinates_post_hook($a, &$item) {
  76         geocoordinates_resolve_item($item);
  77 }
  78
  79 function geocoordinates_plugin_admin(&$a,&$o) {
  80
  81         $t = get_markup_template("admin.tpl", "addon/geocoordinates/");
  82
  83         $o = replace_macros($t, array(
  84                 '$submit' => t('Save Settings'),
  85                 '$api_key' => array('api_key', t('API Key'),  Config::get('geocoordinates', 'api_key' ), ''),
  86                 '$language' => array('language', t('Language code (IETF format)'),  Config::get('geocoordinates', 'language' ), ''),
  87         ));
  88 }
  89
  90 function geocoordinates_plugin_admin_post(&$a) {
  91         $api_key  = ((x($_POST,'api_key')) ? notags(trim($_POST['api_key']))   : '');
  92         Config::set('geocoordinates','api_key',$api_key);
  93
  94         $language  = ((x($_POST,'language')) ? notags(trim($_POST['language']))   : '');
  95         Config::set('geocoordinates','language',$language);
  96         info(t('Settings updated.'). EOL);
  97 }