<?php
/**
 * @brief		updatecheck Task
 * @author		<a href='https://www.invisioncommunity.com'>Invision Power Services, Inc.</a>
 * @copyright	(c) Invision Power Services, Inc.
 * @license		https://www.invisioncommunity.com/legal/standards/
 * @package		Invision Community
 * @since		14 Aug 2013
 */

namespace IPS\core\tasks;

/* To prevent PHP errors (extending class does not exist) revealing path */
if ( !\defined( '\IPS\SUITE_UNIQUE_KEY' ) )
{
	header( ( isset( $_SERVER['SERVER_PROTOCOL'] ) ? $_SERVER['SERVER_PROTOCOL'] : 'HTTP/1.0' ) . ' 403 Forbidden' );
	exit;
}

/**
 * updatecheck Task
 */
class _updatecheck extends \IPS\Task
{
	/**
	 * @brief	Type to send to update server
	 */
	public $type = 'task';

	/**
	 * @brief	Cache marketplace controller
	 */
	protected $_marketplaceController = null;
	
	/**
	 * Execute
	 *
	 * @return	mixed	Message to log or NULL
	 */
	public function execute()
	{
		/* Refresh stored license data */
		\IPS\IPS::licenseKey( TRUE );
		
		$fails = array();
		
		/* Do IPS apps */
		$versions = array();
		foreach ( \IPS\Db::i()->select( '*', 'core_applications', \IPS\Db::i()->in( 'app_directory', \IPS\Application::$ipsApps ) ) as $app )
		{
			if ( $app['app_enabled'] )
			{
				$versions[] = $app['app_long_version'];
			}
		}
		$version = min( $versions );
		$url = \IPS\Http\Url::ips('updateCheck')->setQueryString( array( 'type' => $this->type, 'key' => \IPS\Settings::i()->ipb_reg_number ) );
		if ( \IPS\USE_DEVELOPMENT_BUILDS )
		{
			$url = $url->setQueryString( 'development', 1 );
		}
		if ( \IPS\IPS_ALPHA_BUILD )
		{
			$url = $url->setQueryString( 'alpha', 1 );
		}
		try
		{
			$response = $url->setQueryString( 'version', $version )->request()->get()->decodeJson();
						
			$coreApp = \IPS\Application::load('core');
			$coreApp->update_version = json_encode( $response );
			$coreApp->update_last_check = time();
			$coreApp->save();

			/* Send a notification if new version is available */
			if ( $updates = $coreApp->availableUpgrade() and \count( $updates ) )
			{
				\IPS\core\AdminNotification::send( 'core', 'NewVersion', NULL, FALSE );
			}
			else
			{
				\IPS\core\AdminNotification::remove( 'core', 'NewVersion' );
			}
		}
		catch ( \Exception $e ) { }

		$updateChecked = [];

		/* Do everything else */
		foreach ( \IPS\Db::i()->union(
			array(
				\IPS\Db::i()->select( "'core_applications' AS `table`, app_directory AS `id`, app_update_check AS `url`, app_update_last_check AS `last`, app_long_version AS `current`, app_marketplace_id as `marketplace_id`", 'core_applications', "( app_update_check<>'' AND app_update_check IS NOT NULL ) OR app_marketplace_id IS NOT NULL" ),
				\IPS\Db::i()->select( "'core_plugins' AS `table`, plugin_id AS id, plugin_update_check as url, plugin_update_check_last AS last, plugin_version_long AS `current`, plugin_marketplace_id as `marketplace_id`", 'core_plugins', "(plugin_update_check<>'' AND plugin_update_check IS NOT NULL ) OR plugin_marketplace_id IS NOT NULL" ),
				\IPS\Db::i()->select( "'core_themes' AS `table`, set_id AS `id`, set_update_check AS `url`, set_update_last_check AS `last`, set_long_version AS `current`, set_marketplace_id as `marketplace_id`", 'core_themes', "(set_update_check<>'' AND set_update_check IS NOT NULL ) OR set_marketplace_id IS NOT NULL" ),
				\IPS\Db::i()->select( "'core_sys_lang' AS `table`, lang_id AS `id`, `lang_update_url` AS `url`, `lang_update_check` AS `last`, `lang_version_long` AS `current`, `lang_marketplace_id` as `marketplace_id`", "core_sys_lang", "(lang_update_url<>'' AND lang_update_url IS NOT NULL ) OR lang_marketplace_id IS NOT NULL" )
			),
			'last ASC',
			3
		) as $row )
		{
			switch ( $row['table'] )
			{
				case 'core_applications':
					$dataColumn = 'app_update_version';
					$timeColumn = 'app_update_last_check';
					$idColumn	= 'app_directory';
					$updateChecked[] = 'applications';
					$object = \IPS\Application::load( $row['id'] );

                    /* Account for legacy applications */
                    try
                    {
						$key = "__app_{$row['id']}";
                        $source = \IPS\Lang::load( \IPS\Lang::defaultLanguage() )->get( $key );
                    }
                    catch( \UnexpectedValueException $e )
                    {
                        continue 2;
                    }
                    catch( \UnderflowException $e )
                    {
                    	continue 2;
                    }
					break;

				case 'core_plugins':
					$dataColumn = 'plugin_update_check_data';
					$timeColumn = 'plugin_update_check_last';
					$idColumn	= 'plugin_id';
					$object = \IPS\Plugin::load( $row['id'] );
					$source = $object->name;
					$updateChecked[] = 'plugins';
					break;

				case 'core_themes':
					$dataColumn = 'set_update_data';
					$timeColumn = 'set_update_last_check';
					$idColumn	= 'set_id';
					$key = "core_theme_set_title_{$row['id']}";
					$source = \IPS\Lang::load( \IPS\Lang::defaultLanguage() )->get( $key );
					$updateChecked[] = 'themes';
					break;
				
				case 'core_sys_lang':
					$dataColumn	= 'lang_update_data';
					$timeColumn	= 'lang_update_check';
					$idColumn	= 'lang_id';
					$source		= \IPS\Lang::load( $row['id'] )->name;
					$updateChecked[] = 'languages';
					break;
			}

			try
			{
				/* Query the marketplace */
				if( $row['marketplace_id'] )
				{
					if( $this->_marketplaceController === null )
					{
						$this->_marketplaceController = new \IPS\core\modules\admin\marketplace\marketplace;
					}

					/* Get update information */
					try
					{
						$response = $this->_marketplaceController->_updateCheck( $row['marketplace_id'], $row['current'] );
					}
					catch( \Throwable $e )
					{
						throw new \RuntimeException( $e->getMessage(), $e->getCode() );
					}

					/* Use a local update URL */
					$response['updateurl'] = (string) \IPS\Http\Url::internal("app=core&module=marketplace&controller=marketplace&do=viewFile&id={$row['marketplace_id']}");
					if( isset( $object ) AND isset( $response['disableresource'] ) AND $response['disableresource'] === TRUE )
					{
						$object->_enabled = FALSE;
						$object->save();
					}
				}
				/* Query the applications update URL */
				else
				{
					$url = \IPS\Http\Url::external( $row['url'] )->setQueryString( array( 'version' => $row['current'], 'ips_version' => $version ) );
					$response = $url->request()->get()->decodeJson();
				}

				/* Unset the object so it isn't present for next update check. */
				unset( $object );

				/* Did we get all the information we need? */
				if ( !isset( $response['version'], $response['longversion'], $response['released'], $response['updateurl'] ) )
				{
					throw new \RuntimeException( \IPS\Lang::load( \IPS\Lang::defaultLanguage() )->get( 'update_check_missing' ) );
				}

				/* Save the latest version data and move on to the next app */
				\IPS\Db::i()->update( $row['table'], array(
					$dataColumn => json_encode( array(
						'version'		=> $response['version'],
						'longversion'	=> $response['longversion'],
						'released'		=> $response['released'],
						'updateurl'		=> $response['updateurl'],
						'releasenotes'	=> isset( $response['releasenotes'] ) ? $response['releasenotes'] : NULL
					) ),
					$timeColumn	=> time()
				), array( "{$idColumn}=?", $row['id'] ) );
			}
			/* \RuntimeException catches BAD_JSON and \IPS\Http\Request\Exception both */
			catch ( \RuntimeException $e )
			{
				$fails[] = $source . ": " . $e->getMessage();

				/* Save the time so that the next time the task runs it can move on to other apps/plugins/themes */
				\IPS\Db::i()->update( $row['table'], array(
					$timeColumn	=> time()
				), array( "{$idColumn}=?", $row['id'] ) );
			}
		}

		/* Reset Menu Cache */
		foreach( $updateChecked as $type )
		{
			$key = 'updatecount_' . $type;
			unset( \IPS\Data\Store::i()->$key, \IPS\Data\Store::i()->$type );
		}

		/* Check for bulletins while we're here */
		try
		{
			$bulletins = \IPS\Http\Url::ips('bulletin')->request()->get()->decodeJson();
			$knownBulletins = iterator_to_array( \IPS\Db::i()->select( 'id', 'core_ips_bulletins' ) );
			
			foreach ( $bulletins as $id => $bulletin )
			{
				if ( \in_array( $id, $knownBulletins ) )
				{
					break;
				}
				
				try
				{
					if ( @eval( $bulletin['conditions'] ) )
					{
						\IPS\core\AdminNotification::send( 'core', 'Bulletin', $id, FALSE );
					}
					else
					{
						\IPS\core\AdminNotification::remove( 'core', 'Bulletin', $id );
					}
				}
				catch ( \Exception $e )
				{
					\IPS\Log::log( $e, 'bulletin' );
				}
				catch ( \Throwable $e )
				{
					\IPS\Log::log( $e, 'bulletin' );
				}
								
				\IPS\Db::i()->insert( 'core_ips_bulletins', array(
					'id' 			=> $id,
					'title'			=> $bulletin['title'],
					'body'			=> $bulletin['body'],
					'severity'		=> $bulletin['severity'],
					'style'			=> $bulletin['style'],
					'dismissible'	=> $bulletin['dismissible'],
					'link'			=> $bulletin['link'],
					'conditions'	=> $bulletin['conditions'],
					'cached'		=> time()
				) );
			}
		}
		catch( \RuntimeException $e ) { }
		
		if ( !empty( $fails ) )
		{
			return $fails;
		}
		
		return NULL;
	}
}