]> git.mxchange.org Git - friendica-addons.git/blobdiff - curweather/curweather.php
Merge branch '3.6-rc'
[friendica-addons.git] / curweather / curweather.php
index bd0d6c7507dcdedc33e1b352d69ed9943acb1ca1..82ea2915ffc90e876d42e5705660e8665f7bb438 100644 (file)
@@ -1,29 +1,85 @@
-       <?php
+<?php
 /**
  * Name: Current Weather 
- * Description: Shows current weather conditions for user's location on their network page.<br />Find the location code for the station or airport nearest you <a href="http://en.wikipedia.org/wiki/International_Air_Transport_Association_airport_code" target="_blank">here</a>.
- * Version: 1.0
+ * Description: Shows current weather conditions for user's location on their network page.
+ * Version: 1.1
  * Author: Tony Baldwin <http://friendica.tonybaldwin.info/u/t0ny>
  * Author: Fabio Comuni <http://kirkgroup.com/u/fabrixxm>
+ * Author: Tobias Diekershoff <https://f.diekershoff.de/u/tobias>
  *
  */
-require_once('addon/curweather/getweather.php');
 
-function curweather_install() {
-       register_hook('network_mod_init', 'addon/curweather/curweather.php', 'curweather_network_mod_init');
-       register_hook('plugin_settings', 'addon/curweather/curweather.php', 'curweather_plugin_settings');
-       register_hook('plugin_settings_post', 'addon/curweather/curweather.php', 'curweather_plugin_settings_post');
+require_once 'mod/proxy.php';
+require_once 'include/text.php';
+
+use Friendica\Core\Addon;
+use Friendica\Core\Cache;
+use Friendica\Core\Config;
+use Friendica\Core\L10n;
+use Friendica\Core\PConfig;
+use Friendica\Util\Network;
+
+//  get the weather data from OpenWeatherMap
+function getWeather( $loc, $units='metric', $lang='en', $appid='', $cachetime=0) {
+    $url = "http://api.openweathermap.org/data/2.5/weather?q=".$loc."&appid=".$appid."&lang=".$lang."&units=".$units."&mode=xml";
+    $cached = Cache::get('curweather'.md5($url));
+    $now = new DateTime();
+    if (!is_null($cached)) {
+       $cdate = get_pconfig(local_user(), 'curweather', 'last');
+       $cached = unserialize($cached);
+       if ($cdate + $cachetime > $now->getTimestamp()) {
+           return $cached;
+       }
+    }
+    try {
+       $res = new SimpleXMLElement(Network::fetchUrl($url));
+    } catch (Exception $e) {
+       info(L10n::t('Error fetching weather data.\nError was: '.$e->getMessage()));
+       return false;
+    }
+    if ((string)$res->temperature['unit']==='metric') {
+       $tunit = '°C';
+       $wunit = 'm/s';
+    } else {
+       $tunit = '°F';
+       $wunit = 'mph';
+    }
+    if ( trim((string)$res->weather['value']) == trim((string)$res->clouds['name']) ) {
+       $desc = (string)$res->clouds['name'];
+    } else {
+       $desc = (string)$res->weather['value'].', '.(string)$res->clouds['name'];
+    }
+    $r = array(
+       'city'=> (string) $res->city['name'][0],
+       'country' => (string) $res->city->country[0],
+       'lat' => (string) $res->city->coord['lat'],
+       'lon' => (string) $res->city->coord['lon'],
+       'temperature' => (string) $res->temperature['value'][0].$tunit,
+       'pressure' => (string) $res->pressure['value'].(string)$res->pressure['unit'],
+       'humidity' => (string) $res->humidity['value'].(string)$res->humidity['unit'],
+       'descripion' => $desc,
+       'wind' => (string)$res->wind->speed['name'].' ('.(string)$res->wind->speed['value'].$wunit.')',
+       'update' => (string)$res->lastupdate['value'],
+       'icon' => (string)$res->weather['icon']
+    );
+    set_pconfig(local_user(), 'curweather', 'last', $now->getTimestamp());
+    Cache::set('curweather'.md5($url), serialize($r), CACHE_HOUR);
+    return $r;
+}
 
+function curweather_install()
+{
+       Addon::registerHook('network_mod_init', 'addon/curweather/curweather.php', 'curweather_network_mod_init');
+       Addon::registerHook('addon_settings', 'addon/curweather/curweather.php', 'curweather_addon_settings');
+       Addon::registerHook('addon_settings_post', 'addon/curweather/curweather.php', 'curweather_addon_settings_post');
 }
 
 function curweather_uninstall() {
-       unregister_hook('network_mod_init', 'addon/curweather/curweather.php', 'curweather_network_mod_init');
-       unregister_hook('plugin_settings', 'addon/curweather/curweather.php', 'curweather_plugin_settings');
-       unregister_hook('plugin_settings_post', 'addon/curweather/curweather.php', 'curweather_plugin_settings_post');
-
+       Addon::unregisterHook('network_mod_init', 'addon/curweather/curweather.php', 'curweather_network_mod_init');
+       Addon::unregisterHook('addon_settings', 'addon/curweather/curweather.php', 'curweather_addon_settings');
+       Addon::unregisterHook('addon_settings_post', 'addon/curweather/curweather.php', 'curweather_addon_settings_post');
 }
 
-
 function curweather_network_mod_init(&$fk_app,&$b) {
 
     if(! intval(get_pconfig(local_user(),'curweather','curweather_enable')))
@@ -31,78 +87,125 @@ function curweather_network_mod_init(&$fk_app,&$b) {
 
     $fk_app->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $fk_app->get_baseurl() . '/addon/curweather/curweather.css' . '" media="all" />' . "\r\n";
 
-    // the getweather file does all the work here
-    // the $rpt value is needed for location
-    // which getweather uses to fetch the weather data for weather and temp
+    // $rpt value is needed for location
+    // $lang will be taken from the browser session to honour user settings
+    // TODO $lang does not work if the default settings are used
+    //      and not all response strings are translated
+    // $units can be set in the settings by the user
+    // $appid is configured by the admin in the admin panel
+    // those parameters will be used to get: cloud status, temperature, preassure
+    // and relative humidity for display, also the relevent area of the map is
+    // linked from lat/log of the reply of OWMp
     $rpt = get_pconfig(local_user(), 'curweather', 'curweather_loc');
-    $wxdata = GetWeather::get($rpt);
-    $temp = $wxdata['TEMPERATURE_STRING'];
-    $weather = $wxdata['WEATHER'];
-    $rhumid = $wxdata['RELATIVE_HUMIDITY'];
-    $pressure = $wxdata['PRESSURE_STRING'];
-    $wind = $wxdata['WIND_STRING'];
-    $curweather = '<div id="curweather-network" class="widget">
-                <div class="title tool">
-                <h4>'.t("Current Weather").'</h4></div>';
-
-    $curweather .= "Weather: $weather<br />
-                 Temperature: $temp<br />
-                Relative Humidity: $rhumid<br />
-                Pressure: $pressure<br />
-                Wind: $wind";
-
-    $curweather .= '</div><div class="clear"></div>';
+
+
+    //  set the language to the browsers language and use metric units
+    $lang = $_SESSION['language'];
+    $units = get_pconfig( local_user(), 'curweather', 'curweather_units');
+    $appid = get_config('curweather','appid');
+    $cachetime = intval(get_config('curweather','cachetime'));
+    if ($units==="")
+       $units = 'metric';
+    $ok = true;
+
+    $res = getWeather($rpt, $units, $lang, $appid, $cachetime);
+    if ($res===false)
+       $ok = false;
+
+    if ($ok) {
+       $t = get_markup_template("widget.tpl", "addon/curweather/" );
+       $curweather = replace_macros ($t, [
+           '$title' => L10n::t("Current Weather"),
+           '$icon' => proxy_url('http://openweathermap.org/img/w/'.$res['icon'].'.png'),
+           '$city' => $res['city'],
+           '$lon' => $res['lon'],
+           '$lat' => $res['lat'],
+           '$description' => $res['descripion'],
+           '$temp' => $res['temperature'],
+           '$relhumidity' => ['caption'=>L10n::t('Relative Humidity'), 'val'=>$res['humidity']],
+           '$pressure' => ['caption'=>L10n::t('Pressure'), 'val'=>$res['pressure']],
+           '$wind' => ['caption'=>L10n::t('Wind'), 'val'=> $res['wind']],
+           '$lastupdate' => L10n::t('Last Updated').': '.$res['update'].'UTC',
+           '$databy' =>  L10n::t('Data by'),
+           '$showonmap' => L10n::t('Show on map')
+       ]);
+    } else {
+       $t = get_markup_template('widget-error.tpl', 'addon/curweather/');
+       $curweather = replace_macros( $t, [
+           '$problem' => L10n::t('There was a problem accessing the weather data. But have a look'),
+           '$rpt' => $rpt,
+           '$atOWM' => L10n::t('at OpenWeatherMap')
+       ]);
+    }
 
     $fk_app->page['aside'] = $curweather.$fk_app->page['aside'];
 
 }
 
 
-function curweather_plugin_settings_post($a,$post) {
+function curweather_addon_settings_post($a,$post) {
        if(! local_user() || (! x($_POST,'curweather-settings-submit')))
                return;
        set_pconfig(local_user(),'curweather','curweather_loc',trim($_POST['curweather_loc']));
        set_pconfig(local_user(),'curweather','curweather_enable',intval($_POST['curweather_enable']));
+       set_pconfig(local_user(),'curweather','curweather_units',trim($_POST['curweather_units']));
 
-       info( t('Current Weather settings updated.') . EOL);
+       info(L10n::t('Current Weather settings updated.') . EOL);
 }
 
 
-function curweather_plugin_settings(&$a,&$s) {
+function curweather_addon_settings(&$a,&$s) {
 
        if(! local_user())
                return;
 
-       /* Add our stylesheet to the curweather so we can make our settings look nice */
-
-       $a->page['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . $a->get_baseurl() . '/addon/curweather/curweather.css' . '" media="all" />' . "\r\n";
-
        /* Get the current state of our config variable */
 
-       $curweather_loc = get_pconfig(local_user(), 'curweather', 'curweather_loc');
+       $curweather_loc = PConfig::get(local_user(), 'curweather', 'curweather_loc');
+       $curweather_units = PConfig::get(local_user(), 'curweather', 'curweather_units');
+       $appid = Config::get('curweather','appid');
+       if ($appid=="") {
+               $noappidtext = L10n::t('No APPID found, please contact your admin to obtain one.');
+       } else {
+           $noappidtext = '';
+       }
        $enable = intval(get_pconfig(local_user(),'curweather','curweather_enable'));
        $enable_checked = (($enable) ? ' checked="checked" ' : '');
        
-       
-       /* Add some HTML to the existing form */
-
-       $s .= '<div class="settings-block">';
-       $s .= '<h3>' . t('Current Weather Settings') . '</h3>';
-       $s .= '<div id="curweather-settings-wrapper">';
-       $s .= '<p>Find the location code for the airport/weather station nearest you <a href="http://en.wikipedia.org/wiki/International_Air_Transport_Association_airport_code" target="_blank">here</a>.</p>';
-       $s .= '<label id="curweather-location-label" for="curweather_loc">' . t('Weather Location: ') . '</label>';
-       $s .= '<input id="curweather-location" type="text" name="curweather_loc" value="' . $curweather_loc . '"/>';
-       $s .= '<div class="clear"></div>';
-       $s .= '<label id="curweather-enable-label" for="curweather_enable">' . t('Enable Current Weather') . '</label>';
-       $s .= '<input id="curweather-enable" type="checkbox" name="curweather_enable" value="1" ' . $enable_checked . '/>';
-       $s .= '<div class="clear"></div>';
-
-       $s .= '</div>';
-
-       /* provide a submit button */
-
-       $s .= '<div class="settings-submit-wrapper" ><input type="submit" name="curweather-settings-submit" class="settings-submit" value="' . t('Save Settings') . '" /></div></div>';
+       // load template and replace the macros
+       $t = get_markup_template("settings.tpl", "addon/curweather/" );
+       $s = replace_macros ($t, [
+               '$submit' => L10n::t('Save Settings'),
+               '$header' => L10n::t('Current Weather').' '.L10n::t('Settings'),
+               '$noappidtext' => $noappidtext,
+               '$info' => L10n::t('Enter either the name of your location or the zip code.'),
+               '$curweather_loc' => [ 'curweather_loc', L10n::t('Your Location'), $curweather_loc, L10n::t('Identifier of your location (name or zip code), e.g. <em>Berlin,DE</em> or <em>14476,DE</em>.') ],
+               '$curweather_units' => [ 'curweather_units', L10n::t('Units'), $curweather_units, L10n::t('select if the temperature should be displayed in &deg;C or &deg;F'), ['metric'=>'°C', 'imperial'=>'°F']],
+               '$enabled' => [ 'curweather_enable', L10n::t('Show weather data'), $enable, '']
+           ]);
+       return;
 
 }
-
-
+// Config stuff for the admin panel to let the admin of the node set a APPID
+// for accessing the API of openweathermap
+function curweather_addon_admin_post (&$a) {
+       if(! is_site_admin())
+           return;
+       if ($_POST['curweather-submit']) {
+           Config::set('curweather','appid',trim($_POST['appid']));
+           Config::set('curweather','cachetime',trim($_POST['cachetime']));
+           info(L10n::t('Curweather settings saved.'.EOL));
+       }
+}
+function curweather_addon_admin (&$a, &$o) {
+    if(! is_site_admin())
+           return;
+    $appid = get_config('curweather','appid');
+    $cachetime = get_config('curweather','cachetime');
+    $t = get_markup_template("admin.tpl", "addon/curweather/" );
+    $o = replace_macros ($t, [
+       '$submit' => L10n::t('Save Settings'),
+       '$cachetime' => ['cachetime', L10n::t('Caching Interval'), $cachetime, L10n::t('For how long should the weather data be cached? Choose according your OpenWeatherMap account type.'), ['0'=>L10n::t('no cache'), '300'=>'5 '.L10n::t('minutes'), '900'=>'15 '.L10n::t('minutes'), '1800'=>'30 '.L10n::t('minutes'), '3600'=>'60 '.L10n::t('minutes')]],
+       '$appid' => ['appid', L10n::t('Your APPID'), $appid, L10n::t('Your API key provided by OpenWeatherMap')]
+    ]);
+}