From b6e210d698acb6872a1b1badccc2d83ad9b635c7 Mon Sep 17 00:00:00 2001 From: Artem Daniliants Date: Fri, 5 Mar 2010 13:30:48 +0200 Subject: [PATCH] Initial Kohana install --- Server/.htaccess | 15 + Server/application/config/config.php | 125 ++ Server/application/controllers/examples.php | 470 +++++ Server/application/controllers/welcome.php | 54 + Server/application/views/welcome_content.php | 15 + Server/index.php | 107 ++ Server/install.php | 154 ++ Server/system/config/cache.php | 32 + Server/system/config/cache_memcache.php | 20 + Server/system/config/cache_sqlite.php | 10 + Server/system/config/cache_xcache.php | 12 + Server/system/config/captcha.php | 29 + Server/system/config/cookie.php | 32 + Server/system/config/credit_cards.php | 60 + Server/system/config/database.php | 45 + Server/system/config/email.php | 22 + Server/system/config/encryption.php | 31 + Server/system/config/http.php | 19 + Server/system/config/image.php | 13 + Server/system/config/inflector.php | 58 + Server/system/config/locale.php | 16 + Server/system/config/mimes.php | 224 +++ Server/system/config/pagination.php | 25 + Server/system/config/profiler.php | 8 + Server/system/config/routes.php | 7 + Server/system/config/session.php | 47 + Server/system/config/sql_types.php | 58 + Server/system/config/upload.php | 17 + Server/system/config/user_agents.php | 112 ++ Server/system/config/view.php | 17 + Server/system/controllers/captcha.php | 23 + Server/system/controllers/template.php | 54 + Server/system/core/Benchmark.php | 125 ++ Server/system/core/Bootstrap.php | 58 + Server/system/core/Event.php | 232 +++ Server/system/core/Kohana.php | 1788 ++++++++++++++++++++ Server/system/core/utf8.php | 743 ++++++++ Server/system/core/utf8/from_unicode.php | 68 + Server/system/core/utf8/ltrim.php | 22 + Server/system/core/utf8/ord.php | 88 + Server/system/core/utf8/rtrim.php | 22 + Server/system/core/utf8/str_ireplace.php | 70 + Server/system/core/utf8/str_pad.php | 54 + Server/system/core/utf8/str_split.php | 33 + Server/system/core/utf8/strcasecmp.php | 19 + Server/system/core/utf8/strcspn.php | 30 + Server/system/core/utf8/stristr.php | 28 + Server/system/core/utf8/strlen.php | 21 + Server/system/core/utf8/strpos.php | 30 + Server/system/core/utf8/strrev.php | 18 + Server/system/core/utf8/strrpos.php | 30 + Server/system/core/utf8/strspn.php | 30 + Server/system/core/utf8/strtolower.php | 84 + Server/system/core/utf8/strtoupper.php | 84 + Server/system/core/utf8/substr.php | 75 + Server/system/core/utf8/substr_replace.php | 22 + Server/system/core/utf8/to_unicode.php | 141 ++ Server/system/core/utf8/transliterate_to_ascii.php | 77 + Server/system/core/utf8/trim.php | 17 + Server/system/core/utf8/ucfirst.php | 18 + Server/system/core/utf8/ucwords.php | 26 + Server/system/fonts/DejaVuSerif.ttf | Bin 0 -> 305632 bytes Server/system/fonts/LICENSE | 99 ++ Server/system/helpers/arr.php | 312 ++++ Server/system/helpers/cookie.php | 84 + Server/system/helpers/date.php | 405 +++++ Server/system/helpers/download.php | 105 ++ Server/system/helpers/email.php | 181 ++ Server/system/helpers/expires.php | 111 ++ Server/system/helpers/feed.php | 122 ++ Server/system/helpers/file.php | 186 ++ Server/system/helpers/form.php | 542 ++++++ Server/system/helpers/format.php | 66 + Server/system/helpers/html.php | 446 +++++ Server/system/helpers/inflector.php | 193 +++ Server/system/helpers/num.php | 26 + Server/system/helpers/remote.php | 66 + Server/system/helpers/request.php | 239 +++ Server/system/helpers/security.php | 47 + Server/system/helpers/text.php | 410 +++++ Server/system/helpers/upload.php | 162 ++ Server/system/helpers/url.php | 252 +++ Server/system/helpers/valid.php | 338 ++++ Server/system/i18n/en_US/cache.php | 10 + Server/system/i18n/en_US/calendar.php | 59 + Server/system/i18n/en_US/captcha.php | 33 + Server/system/i18n/en_US/core.php | 34 + Server/system/i18n/en_US/database.php | 15 + Server/system/i18n/en_US/encrypt.php | 8 + Server/system/i18n/en_US/errors.php | 16 + Server/system/i18n/en_US/event.php | 7 + Server/system/i18n/en_US/image.php | 33 + Server/system/i18n/en_US/orm.php | 3 + Server/system/i18n/en_US/pagination.php | 15 + Server/system/i18n/en_US/profiler.php | 15 + Server/system/i18n/en_US/session.php | 6 + Server/system/i18n/en_US/swift.php | 6 + Server/system/i18n/en_US/upload.php | 6 + Server/system/i18n/en_US/validation.php | 41 + Server/system/libraries/Cache.php | 208 +++ Server/system/libraries/Calendar.php | 362 ++++ Server/system/libraries/Calendar_Event.php | 307 ++++ Server/system/libraries/Captcha.php | 279 +++ Server/system/libraries/Controller.php | 86 + Server/system/libraries/Database.php | 1444 ++++++++++++++++ Server/system/libraries/Database_Expression.php | 26 + Server/system/libraries/Encrypt.php | 164 ++ Server/system/libraries/Event_Observer.php | 70 + Server/system/libraries/Event_Subject.php | 67 + Server/system/libraries/Image.php | 431 +++++ Server/system/libraries/Input.php | 452 +++++ Server/system/libraries/Model.php | 31 + Server/system/libraries/ORM.php | 1431 ++++++++++++++++ Server/system/libraries/ORM_Iterator.php | 228 +++ Server/system/libraries/ORM_Tree.php | 76 + Server/system/libraries/ORM_Versioned.php | 143 ++ Server/system/libraries/Pagination.php | 236 +++ Server/system/libraries/Profiler.php | 271 +++ Server/system/libraries/Profiler_Table.php | 69 + Server/system/libraries/Router.php | 304 ++++ Server/system/libraries/Session.php | 458 +++++ Server/system/libraries/Tagcloud.php | 130 ++ Server/system/libraries/URI.php | 279 +++ Server/system/libraries/Validation.php | 826 +++++++++ Server/system/libraries/View.php | 309 ++++ Server/system/libraries/drivers/Cache.php | 40 + Server/system/libraries/drivers/Cache/Apc.php | 64 + .../libraries/drivers/Cache/Eaccelerator.php | 66 + Server/system/libraries/drivers/Cache/File.php | 261 +++ Server/system/libraries/drivers/Cache/Memcache.php | 191 +++ Server/system/libraries/drivers/Cache/Sqlite.php | 257 +++ Server/system/libraries/drivers/Cache/Xcache.php | 119 ++ Server/system/libraries/drivers/Captcha.php | 227 +++ Server/system/libraries/drivers/Captcha/Alpha.php | 92 + Server/system/libraries/drivers/Captcha/Basic.php | 81 + Server/system/libraries/drivers/Captcha/Black.php | 72 + Server/system/libraries/drivers/Captcha/Math.php | 61 + Server/system/libraries/drivers/Captcha/Riddle.php | 47 + Server/system/libraries/drivers/Captcha/Word.php | 37 + Server/system/libraries/drivers/Database.php | 636 +++++++ Server/system/libraries/drivers/Database/Mssql.php | 462 +++++ Server/system/libraries/drivers/Database/Mysql.php | 496 ++++++ .../system/libraries/drivers/Database/Mysqli.php | 358 ++++ .../libraries/drivers/Database/Pdosqlite.php | 486 ++++++ Server/system/libraries/drivers/Database/Pgsql.php | 538 ++++++ Server/system/libraries/drivers/Image.php | 149 ++ Server/system/libraries/drivers/Image/GD.php | 379 +++++ .../libraries/drivers/Image/GraphicsMagick.php | 211 +++ .../system/libraries/drivers/Image/ImageMagick.php | 212 +++ Server/system/libraries/drivers/Session.php | 70 + Server/system/libraries/drivers/Session/Cache.php | 105 ++ Server/system/libraries/drivers/Session/Cookie.php | 80 + .../system/libraries/drivers/Session/Database.php | 163 ++ Server/system/views/kohana/template.php | 36 + Server/system/views/kohana_calendar.php | 52 + Server/system/views/kohana_error_disabled.php | 17 + Server/system/views/kohana_error_page.php | 27 + Server/system/views/kohana_errors.css | 21 + Server/system/views/kohana_profiler.php | 37 + Server/system/views/kohana_profiler_table.css | 53 + Server/system/views/kohana_profiler_table.php | 25 + Server/system/views/pagination/classic.php | 39 + Server/system/views/pagination/digg.php | 83 + Server/system/views/pagination/extended.php | 27 + Server/system/views/pagination/punbb.php | 37 + 165 files changed, 25784 insertions(+) create mode 100644 Server/.htaccess create mode 100644 Server/application/config/config.php create mode 100644 Server/application/controllers/examples.php create mode 100644 Server/application/controllers/welcome.php create mode 100644 Server/application/views/welcome_content.php create mode 100644 Server/index.php create mode 100644 Server/install.php create mode 100644 Server/system/config/cache.php create mode 100644 Server/system/config/cache_memcache.php create mode 100644 Server/system/config/cache_sqlite.php create mode 100644 Server/system/config/cache_xcache.php create mode 100644 Server/system/config/captcha.php create mode 100644 Server/system/config/cookie.php create mode 100644 Server/system/config/credit_cards.php create mode 100644 Server/system/config/database.php create mode 100644 Server/system/config/email.php create mode 100644 Server/system/config/encryption.php create mode 100644 Server/system/config/http.php create mode 100644 Server/system/config/image.php create mode 100644 Server/system/config/inflector.php create mode 100644 Server/system/config/locale.php create mode 100644 Server/system/config/mimes.php create mode 100644 Server/system/config/pagination.php create mode 100644 Server/system/config/profiler.php create mode 100644 Server/system/config/routes.php create mode 100644 Server/system/config/session.php create mode 100644 Server/system/config/sql_types.php create mode 100644 Server/system/config/upload.php create mode 100644 Server/system/config/user_agents.php create mode 100644 Server/system/config/view.php create mode 100644 Server/system/controllers/captcha.php create mode 100644 Server/system/controllers/template.php create mode 100644 Server/system/core/Benchmark.php create mode 100644 Server/system/core/Bootstrap.php create mode 100644 Server/system/core/Event.php create mode 100644 Server/system/core/Kohana.php create mode 100644 Server/system/core/utf8.php create mode 100644 Server/system/core/utf8/from_unicode.php create mode 100644 Server/system/core/utf8/ltrim.php create mode 100644 Server/system/core/utf8/ord.php create mode 100644 Server/system/core/utf8/rtrim.php create mode 100644 Server/system/core/utf8/str_ireplace.php create mode 100644 Server/system/core/utf8/str_pad.php create mode 100644 Server/system/core/utf8/str_split.php create mode 100644 Server/system/core/utf8/strcasecmp.php create mode 100644 Server/system/core/utf8/strcspn.php create mode 100644 Server/system/core/utf8/stristr.php create mode 100644 Server/system/core/utf8/strlen.php create mode 100644 Server/system/core/utf8/strpos.php create mode 100644 Server/system/core/utf8/strrev.php create mode 100644 Server/system/core/utf8/strrpos.php create mode 100644 Server/system/core/utf8/strspn.php create mode 100644 Server/system/core/utf8/strtolower.php create mode 100644 Server/system/core/utf8/strtoupper.php create mode 100644 Server/system/core/utf8/substr.php create mode 100644 Server/system/core/utf8/substr_replace.php create mode 100644 Server/system/core/utf8/to_unicode.php create mode 100644 Server/system/core/utf8/transliterate_to_ascii.php create mode 100644 Server/system/core/utf8/trim.php create mode 100644 Server/system/core/utf8/ucfirst.php create mode 100644 Server/system/core/utf8/ucwords.php create mode 100644 Server/system/fonts/DejaVuSerif.ttf create mode 100644 Server/system/fonts/LICENSE create mode 100644 Server/system/helpers/arr.php create mode 100644 Server/system/helpers/cookie.php create mode 100644 Server/system/helpers/date.php create mode 100644 Server/system/helpers/download.php create mode 100644 Server/system/helpers/email.php create mode 100644 Server/system/helpers/expires.php create mode 100644 Server/system/helpers/feed.php create mode 100644 Server/system/helpers/file.php create mode 100644 Server/system/helpers/form.php create mode 100644 Server/system/helpers/format.php create mode 100644 Server/system/helpers/html.php create mode 100644 Server/system/helpers/inflector.php create mode 100644 Server/system/helpers/num.php create mode 100644 Server/system/helpers/remote.php create mode 100644 Server/system/helpers/request.php create mode 100644 Server/system/helpers/security.php create mode 100644 Server/system/helpers/text.php create mode 100644 Server/system/helpers/upload.php create mode 100644 Server/system/helpers/url.php create mode 100644 Server/system/helpers/valid.php create mode 100644 Server/system/i18n/en_US/cache.php create mode 100644 Server/system/i18n/en_US/calendar.php create mode 100644 Server/system/i18n/en_US/captcha.php create mode 100644 Server/system/i18n/en_US/core.php create mode 100644 Server/system/i18n/en_US/database.php create mode 100644 Server/system/i18n/en_US/encrypt.php create mode 100644 Server/system/i18n/en_US/errors.php create mode 100644 Server/system/i18n/en_US/event.php create mode 100644 Server/system/i18n/en_US/image.php create mode 100644 Server/system/i18n/en_US/orm.php create mode 100644 Server/system/i18n/en_US/pagination.php create mode 100644 Server/system/i18n/en_US/profiler.php create mode 100644 Server/system/i18n/en_US/session.php create mode 100644 Server/system/i18n/en_US/swift.php create mode 100644 Server/system/i18n/en_US/upload.php create mode 100644 Server/system/i18n/en_US/validation.php create mode 100644 Server/system/libraries/Cache.php create mode 100644 Server/system/libraries/Calendar.php create mode 100644 Server/system/libraries/Calendar_Event.php create mode 100644 Server/system/libraries/Captcha.php create mode 100644 Server/system/libraries/Controller.php create mode 100644 Server/system/libraries/Database.php create mode 100644 Server/system/libraries/Database_Expression.php create mode 100644 Server/system/libraries/Encrypt.php create mode 100644 Server/system/libraries/Event_Observer.php create mode 100644 Server/system/libraries/Event_Subject.php create mode 100644 Server/system/libraries/Image.php create mode 100644 Server/system/libraries/Input.php create mode 100644 Server/system/libraries/Model.php create mode 100644 Server/system/libraries/ORM.php create mode 100644 Server/system/libraries/ORM_Iterator.php create mode 100644 Server/system/libraries/ORM_Tree.php create mode 100644 Server/system/libraries/ORM_Versioned.php create mode 100644 Server/system/libraries/Pagination.php create mode 100644 Server/system/libraries/Profiler.php create mode 100644 Server/system/libraries/Profiler_Table.php create mode 100644 Server/system/libraries/Router.php create mode 100644 Server/system/libraries/Session.php create mode 100644 Server/system/libraries/Tagcloud.php create mode 100644 Server/system/libraries/URI.php create mode 100644 Server/system/libraries/Validation.php create mode 100644 Server/system/libraries/View.php create mode 100644 Server/system/libraries/drivers/Cache.php create mode 100644 Server/system/libraries/drivers/Cache/Apc.php create mode 100644 Server/system/libraries/drivers/Cache/Eaccelerator.php create mode 100644 Server/system/libraries/drivers/Cache/File.php create mode 100644 Server/system/libraries/drivers/Cache/Memcache.php create mode 100644 Server/system/libraries/drivers/Cache/Sqlite.php create mode 100644 Server/system/libraries/drivers/Cache/Xcache.php create mode 100644 Server/system/libraries/drivers/Captcha.php create mode 100644 Server/system/libraries/drivers/Captcha/Alpha.php create mode 100644 Server/system/libraries/drivers/Captcha/Basic.php create mode 100644 Server/system/libraries/drivers/Captcha/Black.php create mode 100644 Server/system/libraries/drivers/Captcha/Math.php create mode 100644 Server/system/libraries/drivers/Captcha/Riddle.php create mode 100644 Server/system/libraries/drivers/Captcha/Word.php create mode 100644 Server/system/libraries/drivers/Database.php create mode 100644 Server/system/libraries/drivers/Database/Mssql.php create mode 100644 Server/system/libraries/drivers/Database/Mysql.php create mode 100644 Server/system/libraries/drivers/Database/Mysqli.php create mode 100644 Server/system/libraries/drivers/Database/Pdosqlite.php create mode 100644 Server/system/libraries/drivers/Database/Pgsql.php create mode 100644 Server/system/libraries/drivers/Image.php create mode 100644 Server/system/libraries/drivers/Image/GD.php create mode 100644 Server/system/libraries/drivers/Image/GraphicsMagick.php create mode 100644 Server/system/libraries/drivers/Image/ImageMagick.php create mode 100644 Server/system/libraries/drivers/Session.php create mode 100644 Server/system/libraries/drivers/Session/Cache.php create mode 100644 Server/system/libraries/drivers/Session/Cookie.php create mode 100644 Server/system/libraries/drivers/Session/Database.php create mode 100644 Server/system/views/kohana/template.php create mode 100644 Server/system/views/kohana_calendar.php create mode 100644 Server/system/views/kohana_error_disabled.php create mode 100644 Server/system/views/kohana_error_page.php create mode 100644 Server/system/views/kohana_errors.css create mode 100644 Server/system/views/kohana_profiler.php create mode 100644 Server/system/views/kohana_profiler_table.css create mode 100644 Server/system/views/kohana_profiler_table.php create mode 100644 Server/system/views/pagination/classic.php create mode 100644 Server/system/views/pagination/digg.php create mode 100644 Server/system/views/pagination/extended.php create mode 100644 Server/system/views/pagination/punbb.php diff --git a/Server/.htaccess b/Server/.htaccess new file mode 100644 index 0000000..b79e25f --- /dev/null +++ b/Server/.htaccess @@ -0,0 +1,15 @@ +# Turn on URL rewriting +RewriteEngine On + +# Installation directory +RewriteBase / + +# Protect application and system files from being viewed +RewriteRule ^(application|modules|system) - [F,L] + +# Allow any files or directories that exist to be displayed directly +RewriteCond %{REQUEST_FILENAME} !-f +RewriteCond %{REQUEST_FILENAME} !-d + +# Rewrite all other URLs to index.php/URL +RewriteRule .* index.php/$0 [PT,L] diff --git a/Server/application/config/config.php b/Server/application/config/config.php new file mode 100644 index 0000000..8c45192 --- /dev/null +++ b/Server/application/config/config.php @@ -0,0 +1,125 @@ +Examples:\n"; + echo "\n"; + echo '

'.Kohana::lang('core.stats_footer')."

\n"; + } + + /** + * Demonstrates how to archive a directory. First enable the archive module + */ + //public function archive($build = FALSE) + //{ + // if ($build === 'build') + // { + // // Load archive + // $archive = new Archive('zip'); + + // // Download the application/views directory + // $archive->add(APPPATH.'views/', 'app_views/', TRUE); + + // // Download the built archive + // $archive->download('test.zip'); + // } + // else + // { + // echo html::anchor(Router::$current_uri.'/build', 'Download views'); + // } + //} + + /** + * Demonstrates how to parse RSS feeds by using DOMDocument. + */ + function rss() + { + // Parse an external atom feed + $feed = feed::parse('http://dev.kohanaphp.com/projects/kohana2/activity.atom'); + + // Show debug info + echo Kohana::debug($feed); + + echo Kohana::lang('core.stats_footer'); + } + + /** + * Demonstrates the Session library and using session data. + */ + function session() + { + // Gets the singleton instance of the Session library + $s = Session::instance(); + + echo 'SESSID: 
'.session_id()."
\n"; + + echo '
'.print_r($_SESSION, TRUE)."
\n"; + + echo '
{execution_time} seconds'; + } + + /** + * Demonstrates how to use the form helper with the Validation libraryfor file uploads . + */ + function form() + { + // Anything submitted? + if ($_POST) + { + // Merge the globals into our validation object. + $post = Validation::factory(array_merge($_POST, $_FILES)); + + // Ensure upload helper is correctly configured, config/upload.php contains default entries. + // Uploads can be required or optional, but should be valid + $post->add_rules('imageup1', 'upload::required', 'upload::valid', 'upload::type[gif,jpg,png]', 'upload::size[1M]'); + $post->add_rules('imageup2', 'upload::required', 'upload::valid', 'upload::type[gif,jpg,png]', 'upload::size[1M]'); + + // Alternative syntax for multiple file upload validation rules + //$post->add_rules('imageup.*', 'upload::required', 'upload::valid', 'upload::type[gif,jpg,png]', 'upload::size[1M]'); + + if ($post->validate() ) + { + // It worked! + // Move (and rename) the files from php upload folder to configured application folder + upload::save('imageup1'); + upload::save('imageup2'); + echo 'Validation successfull, check your upload folder!'; + } + else + { + // You got validation errors + echo '

validation errors: '.var_export($post->errors(), TRUE).'

'; + echo Kohana::debug($post); + } + } + + // Display the form + echo form::open('examples/form', array('enctype' => 'multipart/form-data')); + echo form::label('imageup', 'Image Uploads').':
'; + // Use discrete upload fields + // Alternative syntax for multiple file uploads + // echo form::upload('imageup[]').'
'; + + echo form::upload('imageup1').'
'; + echo form::upload('imageup2').'
'; + echo form::submit('upload', 'Upload!'); + echo form::close(); + + } + + /** + * Demontrates how to use the Validation library to validate an arbitrary array. + */ + function validation() + { + // To demonstrate Validation being able to validate any array, I will + // be using a pre-built array. When you load validation with no arguments + // it will default to validating the POST array. + $data = array + ( + 'user' => 'hello', + 'pass' => 'bigsecret', + 'reme' => '1' + ); + + $validation = new Validation($data); + + $validation->add_rules('user', 'required', 'length[1,12]')->pre_filter('trim', 'user'); + $validation->add_rules('pass', 'required')->post_filter('sha1', 'pass'); + $validation->add_rules('reme', 'required'); + + $result = $validation->validate(); + + var_dump($validation->errors()); + var_dump($validation->as_array()); + + // Yay! + echo '{execution_time} ALL DONE!'; + } + + /** + * Demontrates how to use the Captcha library. + */ + public function captcha() + { + // Look at the counters for valid and invalid + // responses in the Session Profiler. + new Profiler; + + // Load Captcha library, you can supply the name + // of the config group you would like to use. + $captcha = new Captcha; + + // Ban bots (that accept session cookies) after 50 invalid responses. + // Be careful not to ban real people though! Set the threshold high enough. + if ($captcha->invalid_count() > 49) + exit('Bye! Stupid bot.'); + + // Form submitted + if ($_POST) + { + // Captcha::valid() is a static method that can be used as a Validation rule also. + if (Captcha::valid($this->input->post('captcha_response'))) + { + echo '

Good answer!

'; + } + else + { + echo '

Wrong answer!

'; + } + + // Validate other fields here + } + + // Show form + echo form::open(); + echo '

Other form fields here...

'; + + // Don't show Captcha anymore after the user has given enough valid + // responses. The "enough" count is set in the captcha config. + if ( ! $captcha->promoted()) + { + echo '

'; + echo $captcha->render(); // Shows the Captcha challenge (image/riddle/etc) + echo '

'; + echo form::input('captcha_response'); + } + else + { + echo '

You have been promoted to human.

'; + } + + // Close form + echo form::submit(array('value' => 'Check')); + echo form::close(); + } + + /** + * Demonstrates the features of the Database library. + * + * Table Structure: + * CREATE TABLE `pages` ( + * `id` mediumint( 9 ) NOT NULL AUTO_INCREMENT , + * `page_name` varchar( 100 ) NOT NULL , + * `title` varchar( 255 ) NOT NULL , + * `content` longtext NOT NULL , + * `menu` tinyint( 1 ) NOT NULL default '0', + * `filename` varchar( 255 ) NOT NULL , + * `order` mediumint( 9 ) NOT NULL , + * `date` int( 11 ) NOT NULL , + * `child_of` mediumint( 9 ) NOT NULL default '0', + * PRIMARY KEY ( `id` ) , + * UNIQUE KEY `filename` ( `filename` ) + * ) ENGINE = MYISAM DEFAULT CHARSET = utf8 PACK_KEYS =0; + * + */ + function database() + { + $db = new Database; + + $table = 'pages'; + echo 'Does the '.$table.' table exist? '; + if ($db->table_exists($table)) + { + echo '

YES! Lets do some work =)

'; + + $query = $db->select('DISTINCT pages.*')->from($table)->get(); + echo $db->last_query(); + echo '

Iterate through the result:

'; + foreach ($query as $item) + { + echo '

'.$item->title.'

'; + } + echo '

Numrows using count(): '.count($query).'

'; + echo 'Table Listing:
'.print_r($db->list_tables(), TRUE).'
'; + + echo '

Try Query Binding with objects:

'; + $sql = 'SELECT * FROM '.$table.' WHERE id = ?'; + $query = $db->query($sql, array(1)); + echo '

'.$db->last_query().'

'; + $query->result(TRUE); + foreach ($query as $item) + { + echo '
'.print_r($item, true).'
'; + } + + echo '

Try Query Binding with arrays (returns both associative and numeric because I pass MYSQL_BOTH to result():

'; + $sql = 'SELECT * FROM '.$table.' WHERE id = ?'; + $query = $db->query($sql, array(1)); + echo '

'.$db->last_query().'

'; + $query->result(FALSE, MYSQL_BOTH); + foreach ($query as $item) + { + echo '
'.print_r($item, true).'
'; + } + + echo '

Look, we can also manually advance the result pointer!

'; + $query = $db->select('title')->from($table)->get(); + echo 'First:
'.print_r($query->current(), true).'

'; + $query->next(); + echo 'Second:
'.print_r($query->current(), true).'

'; + $query->next(); + echo 'Third:
'.print_r($query->current(), true).'
'; + echo '

And we can reset it to the beginning:

'; + $query->rewind(); + echo 'Rewound:
'.print_r($query->current(), true).'
'; + + echo '

Number of rows using count_records(): '.$db->count_records('pages').'

'; + } + else + { + echo 'NO! The '.$table.' table doesn\'t exist, so we can\'t continue =( '; + } + echo "

\n"; + echo 'done in {execution_time} seconds'; + } + + /** + * Demonstrates how to use the Pagination library and Pagination styles. + */ + function pagination() + { + $pagination = new Pagination(array( + // Base_url will default to the current URI + // 'base_url' => 'welcome/pagination_example/page/x', + + // The URI segment (integer) in which the pagination number can be found + // The URI segment (string) that precedes the pagination number (aka "label") + 'uri_segment' => 'page', + + // You could also use the query string for pagination instead of the URI segments + // Just set this to the $_GET key that contains the page number + // 'query_string' => 'page', + + // The total items to paginate through (probably need to use a database COUNT query here) + 'total_items' => 254, + + // The amount of items you want to display per page + 'items_per_page' => 10, + + // The pagination style: classic (default), digg, extended or punbb + // Easily add your own styles to views/pagination and point to the view name here + 'style' => 'classic', + + // If there is only one page, completely hide all pagination elements + // Pagination->render() will return an empty string + 'auto_hide' => TRUE, + )); + + // Just echo to display the links (__toString() rocks!) + echo 'Classic style: '.$pagination; + + // You can also use the render() method and pick a style on the fly if you want + echo '
Digg style: ', $pagination->render('digg'); + echo '
Extended style: ', $pagination->render('extended'); + echo '
PunBB style: ', $pagination->render('punbb'); + echo 'done in {execution_time} seconds'; + } + + /** + * Demonstrates the User_Agent library. + */ + function user_agent() + { + foreach (array('agent', 'browser', 'version') as $key) + { + echo $key.': '.Kohana::user_agent($key).'
'."\n"; + } + + echo "

\n"; + echo 'done in {execution_time} seconds'; + } + + /** + * Demonstrates the Payment library. + */ + /*function payment() + { + $credit_card = new Payment; + + // You can also pass the driver name to the library to use multiple ones: + $credit_card = new Payment('Paypal'); + $credit_card = new Payment('Authorize'); + + // You can specify one parameter at a time: + $credit_card->login = 'this'; + $credit_card->first_name = 'Jeremy'; + $credit_card->last_name = 'Bush'; + $credit_card->card_num = '1234567890'; + $credit_card->exp_date = '0910'; + $credit_card->amount = '478.41'; + + // Or you can also set fields with an array and the method: + $credit_card->set_fields(array('login' => 'test', + 'first_name' => 'Jeremy', + 'last_name' => 'Bush', + 'card_num' => '1234567890', + 'exp_date' => '0910', + 'amount' => '487.41')); + + echo '
'.print_r($credit_card, true).'
'; + + echo 'Success? '; + echo ($response = $credit_card->process() == TRUE) ? 'YES!' : $response; + }*/ + + function calendar() + { + $profiler = new Profiler; + + $calendar = new Calendar($this->input->get('month', date('m')), $this->input->get('year', date('Y'))); + $calendar->attach($calendar->event() + ->condition('year', 2008) + ->condition('month', 8) + ->condition('day', 8) + ->output(html::anchor('http://forum.kohanaphp.com/comments.php?DiscussionID=275', 'Learning about Kohana Calendar'))); + + echo $calendar->render(); + } + + /** + * Demonstrates how to use the Image libarary.. + */ + function image() + { + // For testing only, save the new image in DOCROOT + $dir = realpath(DOCROOT); + + // Original Image filename + $image = DOCROOT.'kohana.png'; + + // Create an instance of Image, with file + // The orginal image is not affected + $image = new Image($image); + + // Most methods are chainable + // Resize the image, crop the center left + $image->resize(200, 100)->crop(150, 50, 'center', 'left'); + + // Display image in browser. + // Keep the actions, to be applied when saving the image. + $image->render($keep_actions = TRUE); + + // Save the image, as a jpeg + // Here the actions will be discarded, by default. + $image->save($dir.'/mypic_thumb.jpg'); + + //echo Kohana::debug($image); + } + + /** + * Demonstrates how to use vendor software with Kohana. + */ + function vendor() + { + // Let's do a little Markdown shall we. + $br = "\n\n"; + $output = '#Marked Down!#'.$br; + $output .= 'This **_markup_** is created *on-the-fly*, by '; + $output .= '[php-markdown-extra](http://michelf.com/projects/php-markdown/extra)'.$br; + $output .= 'It\'s *great* for user & writing about ``'.$br; + $output .= 'It\'s also good at footnotes :-) [^1]'.$br; + $output .= '[^1]: A footnote.'; + + // looks in system/vendor for Markdown.php + require Kohana::find_file('vendor', 'Markdown'); + + echo Markdown($output); + + echo 'done in {execution_time} seconds'; + } +} // End Examples diff --git a/Server/application/controllers/welcome.php b/Server/application/controllers/welcome.php new file mode 100644 index 0000000..8941953 --- /dev/null +++ b/Server/application/controllers/welcome.php @@ -0,0 +1,54 @@ +template->content = new View('welcome_content'); + + // You can assign anything variable to a view by using standard OOP + // methods. In my welcome view, the $title variable will be assigned + // the value I give it here. + $this->template->title = 'Welcome to Kohana!'; + + // An array of links to display. Assiging variables to views is completely + // asyncronous. Variables can be set in any order, and can be any type + // of data, including objects. + $this->template->content->links = array + ( + 'Home Page' => 'http://kohanaphp.com/', + 'Documentation' => 'http://docs.kohanaphp.com/', + 'Forum' => 'http://forum.kohanaphp.com/', + 'License' => 'Kohana License.html', + 'Donate' => 'http://kohanaphp.com/donate', + ); + } + + public function __call($method, $arguments) + { + // Disable auto-rendering + $this->auto_render = FALSE; + + // By defining a __call method, all pages routed to this controller + // that result in 404 errors will be handled by this method, instead of + // being displayed as "Page Not Found" errors. + echo 'This text is generated by __call. If you expected the index page, you need to use: welcome/index/'.substr(Router::$current_uri, 8); + } + +} // End Welcome Controller \ No newline at end of file diff --git a/Server/application/views/welcome_content.php b/Server/application/views/welcome_content.php new file mode 100644 index 0000000..0adcab6 --- /dev/null +++ b/Server/application/views/welcome_content.php @@ -0,0 +1,15 @@ + +
+

This is the default Kohana index page. You may also access this page as .

+ +

+ To change what gets displayed for this page, edit application/controllers/welcome.php.
+ To change this text, edit application/views/welcome_content.php. +

+
+ + \ No newline at end of file diff --git a/Server/index.php b/Server/index.php new file mode 100644 index 0000000..4217a28 --- /dev/null +++ b/Server/index.php @@ -0,0 +1,107 @@ + + + + + + +Kohana Installation + + + + + + +

Environment Tests

+ +

The following tests have been run to determine if Kohana will work in your environment. If any of the tests have failed, consult the documentation for more information on how to correct the problem.

+ +
+ + + + +=')): ?> + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
PHP VersionKohana requires PHP 5.2 or newer, this version is .
System DirectoryThe configured system directory does not exist or does not contain required files.
Application DirectoryThe configured application directory does not exist or does not contain required files.
Modules DirectoryThe configured modules directory does not exist or does not contain required files.
PCRE UTF-8PCRE support is missing.PCRE has not been compiled with UTF-8 support.PCRE has not been compiled with Unicode property support.Pass
Reflection EnabledPassPHP reflection is either not loaded or not compiled in.
Filters EnabledPassThe filter extension is either not loaded or not compiled in.
Iconv Extension LoadedPassThe iconv extension is not loaded.
SPL EnabledPassSPL is not enabled.
Mbstring Not OverloadedThe mbstring extension is overloading PHP's native string functions.Pass
XML supportPHP is compiled without XML support, thus lacking support for utf8_encode()/utf8_decode().Pass
URI DeterminationPassNeither $_SERVER['REQUEST_URI'] or $_SERVER['PHP_SELF'] is available.
+ +
+ +

Kohana may not work correctly with your environment.

+ +

Your environment passed all requirements. Remove or rename the install file now.

+ +
+ +
+ + + \ No newline at end of file diff --git a/Server/system/config/cache.php b/Server/system/config/cache.php new file mode 100644 index 0000000..ccd3da4 --- /dev/null +++ b/Server/system/config/cache.php @@ -0,0 +1,32 @@ + File cache is fast and reliable, but requires many filesystem lookups. + * > Database cache can be used to cache items remotely, but is slower. + * > Memcache is very high performance, but prevents cache tags from being used. + * + * params - Driver parameters, specific to each driver. + * + * lifetime - Default lifetime of caches in seconds. By default caches are stored for + * thirty minutes. Specific lifetime can also be set when creating a new cache. + * Setting this to 0 will never automatically delete caches. + * + * requests - Average number of cache requests that will processed before all expired + * caches are deleted. This is commonly referred to as "garbage collection". + * Setting this to 0 or a negative number will disable automatic garbage collection. + */ +$config['default'] = array +( + 'driver' => 'file', + 'params' => APPPATH.'cache', + 'lifetime' => 1800, + 'requests' => 1000 +); diff --git a/Server/system/config/cache_memcache.php b/Server/system/config/cache_memcache.php new file mode 100644 index 0000000..43d8f20 --- /dev/null +++ b/Server/system/config/cache_memcache.php @@ -0,0 +1,20 @@ + '127.0.0.1', + 'port' => 11211, + 'persistent' => FALSE, + ) +); + +/** + * Enable cache data compression. + */ +$config['compression'] = FALSE; diff --git a/Server/system/config/cache_sqlite.php b/Server/system/config/cache_sqlite.php new file mode 100644 index 0000000..818b893 --- /dev/null +++ b/Server/system/config/cache_sqlite.php @@ -0,0 +1,10 @@ + 'basic', + 'width' => 150, + 'height' => 50, + 'complexity' => 4, + 'background' => '', + 'fontpath' => SYSPATH.'fonts/', + 'fonts' => array('DejaVuSerif.ttf'), + 'promote' => FALSE, +); \ No newline at end of file diff --git a/Server/system/config/cookie.php b/Server/system/config/cookie.php new file mode 100644 index 0000000..b6ddfe4 --- /dev/null +++ b/Server/system/config/cookie.php @@ -0,0 +1,32 @@ + array + ( + 'length' => '13,14,15,16,17,18,19', + 'prefix' => '', + 'luhn' => TRUE + ), + 'american express' => array + ( + 'length' => '15', + 'prefix' => '3[47]', + 'luhn' => TRUE + ), + 'diners club' => array + ( + 'length' => '14,16', + 'prefix' => '36|55|30[0-5]', + 'luhn' => TRUE + ), + 'discover' => array + ( + 'length' => '16', + 'prefix' => '6(?:5|011)', + 'luhn' => TRUE, + ), + 'jcb' => array + ( + 'length' => '15,16', + 'prefix' => '3|1800|2131', + 'luhn' => TRUE + ), + 'maestro' => array + ( + 'length' => '16,18', + 'prefix' => '50(?:20|38)|6(?:304|759)', + 'luhn' => TRUE + ), + 'mastercard' => array + ( + 'length' => '16', + 'prefix' => '5[1-5]', + 'luhn' => TRUE + ), + 'visa' => array + ( + 'length' => '13,16', + 'prefix' => '4', + 'luhn' => TRUE + ), +); \ No newline at end of file diff --git a/Server/system/config/database.php b/Server/system/config/database.php new file mode 100644 index 0000000..6519156 --- /dev/null +++ b/Server/system/config/database.php @@ -0,0 +1,45 @@ + 'mysql://dbuser:secret@localhost/kohana' + * character_set - Database character set + * table_prefix - Database table prefix + * object - Enable or disable object results + * cache - Enable or disable query caching + * escape - Enable automatic query builder escaping + */ +$config['default'] = array +( + 'benchmark' => TRUE, + 'persistent' => FALSE, + 'connection' => array + ( + 'type' => 'mysql', + 'user' => 'dbuser', + 'pass' => 'p@ssw0rd', + 'host' => 'localhost', + 'port' => FALSE, + 'socket' => FALSE, + 'database' => 'kohana' + ), + 'character_set' => 'utf8', + 'table_prefix' => '', + 'object' => TRUE, + 'cache' => FALSE, + 'escape' => TRUE +); \ No newline at end of file diff --git a/Server/system/config/email.php b/Server/system/config/email.php new file mode 100644 index 0000000..c768367 --- /dev/null +++ b/Server/system/config/email.php @@ -0,0 +1,22 @@ + 'K0H@NA+PHP_7hE-SW!FtFraM3w0R|<', + 'mode' => MCRYPT_MODE_NOFB, + 'cipher' => MCRYPT_RIJNDAEL_128 +); diff --git a/Server/system/config/http.php b/Server/system/config/http.php new file mode 100644 index 0000000..3c4a86a --- /dev/null +++ b/Server/system/config/http.php @@ -0,0 +1,19 @@ + 'children', + 'clothes' => 'clothing', + 'man' => 'men', + 'movie' => 'movies', + 'person' => 'people', + 'woman' => 'women', + 'mouse' => 'mice', + 'goose' => 'geese', + 'ox' => 'oxen', + 'leaf' => 'leaves', + 'course' => 'courses', + 'size' => 'sizes', +); diff --git a/Server/system/config/locale.php b/Server/system/config/locale.php new file mode 100644 index 0000000..3a26882 --- /dev/null +++ b/Server/system/config/locale.php @@ -0,0 +1,16 @@ + array('text/h323'), + '7z' => array('application/x-7z-compressed'), + 'abw' => array('application/x-abiword'), + 'acx' => array('application/internet-property-stream'), + 'ai' => array('application/postscript'), + 'aif' => array('audio/x-aiff'), + 'aifc' => array('audio/x-aiff'), + 'aiff' => array('audio/x-aiff'), + 'asf' => array('video/x-ms-asf'), + 'asr' => array('video/x-ms-asf'), + 'asx' => array('video/x-ms-asf'), + 'atom' => array('application/atom+xml'), + 'avi' => array('video/avi', 'video/msvideo', 'video/x-msvideo'), + 'bin' => array('application/octet-stream','application/macbinary'), + 'bmp' => array('image/bmp'), + 'c' => array('text/x-csrc'), + 'c++' => array('text/x-c++src'), + 'cab' => array('application/x-cab'), + 'cc' => array('text/x-c++src'), + 'cda' => array('application/x-cdf'), + 'class' => array('application/octet-stream'), + 'cpp' => array('text/x-c++src'), + 'cpt' => array('application/mac-compactpro'), + 'csh' => array('text/x-csh'), + 'css' => array('text/css'), + 'csv' => array('text/x-comma-separated-values', 'application/vnd.ms-excel', 'text/comma-separated-values', 'text/csv'), + 'dbk' => array('application/docbook+xml'), + 'dcr' => array('application/x-director'), + 'deb' => array('application/x-debian-package'), + 'diff' => array('text/x-diff'), + 'dir' => array('application/x-director'), + 'divx' => array('video/divx'), + 'dll' => array('application/octet-stream', 'application/x-msdos-program'), + 'dmg' => array('application/x-apple-diskimage'), + 'dms' => array('application/octet-stream'), + 'doc' => array('application/msword'), + 'dvi' => array('application/x-dvi'), + 'dxr' => array('application/x-director'), + 'eml' => array('message/rfc822'), + 'eps' => array('application/postscript'), + 'evy' => array('application/envoy'), + 'exe' => array('application/x-msdos-program', 'application/octet-stream'), + 'fla' => array('application/octet-stream'), + 'flac' => array('application/x-flac'), + 'flc' => array('video/flc'), + 'fli' => array('video/fli'), + 'flv' => array('video/x-flv'), + 'gif' => array('image/gif'), + 'gtar' => array('application/x-gtar'), + 'gz' => array('application/x-gzip'), + 'h' => array('text/x-chdr'), + 'h++' => array('text/x-c++hdr'), + 'hh' => array('text/x-c++hdr'), + 'hpp' => array('text/x-c++hdr'), + 'hqx' => array('application/mac-binhex40'), + 'hs' => array('text/x-haskell'), + 'htm' => array('text/html'), + 'html' => array('text/html'), + 'ico' => array('image/x-icon'), + 'ics' => array('text/calendar'), + 'iii' => array('application/x-iphone'), + 'ins' => array('application/x-internet-signup'), + 'iso' => array('application/x-iso9660-image'), + 'isp' => array('application/x-internet-signup'), + 'jar' => array('application/java-archive'), + 'java' => array('application/x-java-applet'), + 'jpe' => array('image/jpeg', 'image/pjpeg'), + 'jpeg' => array('image/jpeg', 'image/pjpeg'), + 'jpg' => array('image/jpeg', 'image/pjpeg'), + 'js' => array('application/x-javascript'), + 'json' => array('application/json'), + 'latex' => array('application/x-latex'), + 'lha' => array('application/octet-stream'), + 'log' => array('text/plain', 'text/x-log'), + 'lzh' => array('application/octet-stream'), + 'm4a' => array('audio/mpeg'), + 'm4p' => array('video/mp4v-es'), + 'm4v' => array('video/mp4'), + 'man' => array('application/x-troff-man'), + 'mdb' => array('application/x-msaccess'), + 'midi' => array('audio/midi'), + 'mid' => array('audio/midi'), + 'mif' => array('application/vnd.mif'), + 'mka' => array('audio/x-matroska'), + 'mkv' => array('video/x-matroska'), + 'mov' => array('video/quicktime'), + 'movie' => array('video/x-sgi-movie'), + 'mp2' => array('audio/mpeg'), + 'mp3' => array('audio/mpeg'), + 'mp4' => array('application/mp4','audio/mp4','video/mp4'), + 'mpa' => array('video/mpeg'), + 'mpe' => array('video/mpeg'), + 'mpeg' => array('video/mpeg'), + 'mpg' => array('video/mpeg'), + 'mpg4' => array('video/mp4'), + 'mpga' => array('audio/mpeg'), + 'mpp' => array('application/vnd.ms-project'), + 'mpv' => array('video/x-matroska'), + 'mpv2' => array('video/mpeg'), + 'ms' => array('application/x-troff-ms'), + 'msg' => array('application/msoutlook','application/x-msg'), + 'msi' => array('application/x-msi'), + 'nws' => array('message/rfc822'), + 'oda' => array('application/oda'), + 'odb' => array('application/vnd.oasis.opendocument.database'), + 'odc' => array('application/vnd.oasis.opendocument.chart'), + 'odf' => array('application/vnd.oasis.opendocument.forumla'), + 'odg' => array('application/vnd.oasis.opendocument.graphics'), + 'odi' => array('application/vnd.oasis.opendocument.image'), + 'odm' => array('application/vnd.oasis.opendocument.text-master'), + 'odp' => array('application/vnd.oasis.opendocument.presentation'), + 'ods' => array('application/vnd.oasis.opendocument.spreadsheet'), + 'odt' => array('application/vnd.oasis.opendocument.text'), + 'oga' => array('audio/ogg'), + 'ogg' => array('application/ogg'), + 'ogv' => array('video/ogg'), + 'otg' => array('application/vnd.oasis.opendocument.graphics-template'), + 'oth' => array('application/vnd.oasis.opendocument.web'), + 'otp' => array('application/vnd.oasis.opendocument.presentation-template'), + 'ots' => array('application/vnd.oasis.opendocument.spreadsheet-template'), + 'ott' => array('application/vnd.oasis.opendocument.template'), + 'p' => array('text/x-pascal'), + 'pas' => array('text/x-pascal'), + 'patch' => array('text/x-diff'), + 'pbm' => array('image/x-portable-bitmap'), + 'pdf' => array('application/pdf', 'application/x-download'), + 'php' => array('application/x-httpd-php'), + 'php3' => array('application/x-httpd-php'), + 'php4' => array('application/x-httpd-php'), + 'php5' => array('application/x-httpd-php'), + 'phps' => array('application/x-httpd-php-source'), + 'phtml' => array('application/x-httpd-php'), + 'pl' => array('text/x-perl'), + 'pm' => array('text/x-perl'), + 'png' => array('image/png', 'image/x-png'), + 'po' => array('text/x-gettext-translation'), + 'pot' => array('application/vnd.ms-powerpoint'), + 'pps' => array('application/vnd.ms-powerpoint'), + 'ppt' => array('application/powerpoint'), + 'ps' => array('application/postscript'), + 'psd' => array('application/x-photoshop', 'image/x-photoshop'), + 'pub' => array('application/x-mspublisher'), + 'py' => array('text/x-python'), + 'qt' => array('video/quicktime'), + 'ra' => array('audio/x-realaudio'), + 'ram' => array('audio/x-realaudio', 'audio/x-pn-realaudio'), + 'rar' => array('application/rar'), + 'rgb' => array('image/x-rgb'), + 'rm' => array('audio/x-pn-realaudio'), + 'rpm' => array('audio/x-pn-realaudio-plugin', 'application/x-redhat-package-manager'), + 'rss' => array('application/rss+xml'), + 'rtf' => array('text/rtf'), + 'rtx' => array('text/richtext'), + 'rv' => array('video/vnd.rn-realvideo'), + 'sea' => array('application/octet-stream'), + 'sh' => array('text/x-sh'), + 'shtml' => array('text/html'), + 'sit' => array('application/x-stuffit'), + 'smi' => array('application/smil'), + 'smil' => array('application/smil'), + 'so' => array('application/octet-stream'), + 'src' => array('application/x-wais-source'), + 'svg' => array('image/svg+xml'), + 'swf' => array('application/x-shockwave-flash'), + 't' => array('application/x-troff'), + 'tar' => array('application/x-tar'), + 'tcl' => array('text/x-tcl'), + 'tex' => array('application/x-tex'), + 'text' => array('text/plain'), + 'texti' => array('application/x-texinfo'), + 'textinfo' => array('application/x-texinfo'), + 'tgz' => array('application/x-tar'), + 'tif' => array('image/tiff'), + 'tiff' => array('image/tiff'), + 'torrent' => array('application/x-bittorrent'), + 'tr' => array('application/x-troff'), + 'tsv' => array('text/tab-separated-values'), + 'txt' => array('text/plain'), + 'wav' => array('audio/x-wav'), + 'wax' => array('audio/x-ms-wax'), + 'wbxml' => array('application/wbxml'), + 'wm' => array('video/x-ms-wm'), + 'wma' => array('audio/x-ms-wma'), + 'wmd' => array('application/x-ms-wmd'), + 'wmlc' => array('application/wmlc'), + 'wmv' => array('video/x-ms-wmv', 'application/octet-stream'), + 'wmx' => array('video/x-ms-wmx'), + 'wmz' => array('application/x-ms-wmz'), + 'word' => array('application/msword', 'application/octet-stream'), + 'wp5' => array('application/wordperfect5.1'), + 'wpd' => array('application/vnd.wordperfect'), + 'wvx' => array('video/x-ms-wvx'), + 'xbm' => array('image/x-xbitmap'), + 'xcf' => array('image/xcf'), + 'xhtml' => array('application/xhtml+xml'), + 'xht' => array('application/xhtml+xml'), + 'xl' => array('application/excel', 'application/vnd.ms-excel'), + 'xla' => array('application/excel', 'application/vnd.ms-excel'), + 'xlc' => array('application/excel', 'application/vnd.ms-excel'), + 'xlm' => array('application/excel', 'application/vnd.ms-excel'), + 'xls' => array('application/excel', 'application/vnd.ms-excel'), + 'xlt' => array('application/excel', 'application/vnd.ms-excel'), + 'xml' => array('text/xml'), + 'xof' => array('x-world/x-vrml'), + 'xpm' => array('image/x-xpixmap'), + 'xsl' => array('text/xml'), + 'xvid' => array('video/x-xvid'), + 'xwd' => array('image/x-xwindowdump'), + 'z' => array('application/x-compress'), + 'zip' => array('application/x-zip', 'application/zip', 'application/x-zip-compressed') +); diff --git a/Server/system/config/pagination.php b/Server/system/config/pagination.php new file mode 100644 index 0000000..808fc31 --- /dev/null +++ b/Server/system/config/pagination.php @@ -0,0 +1,25 @@ + 'pagination', + 'style' => 'classic', + 'uri_segment' => 3, + 'query_string' => '', + 'items_per_page' => 20, + 'auto_hide' => FALSE, +); diff --git a/Server/system/config/profiler.php b/Server/system/config/profiler.php new file mode 100644 index 0000000..98ab5a4 --- /dev/null +++ b/Server/system/config/profiler.php @@ -0,0 +1,8 @@ + array('type' => 'int', 'max' => 127), + 'smallint' => array('type' => 'int', 'max' => 32767), + 'mediumint' => array('type' => 'int', 'max' => 8388607), + 'int' => array('type' => 'int', 'max' => 2147483647), + 'integer' => array('type' => 'int', 'max' => 2147483647), + 'bigint' => array('type' => 'int', 'max' => 9223372036854775807), + 'float' => array('type' => 'float'), + 'float unsigned' => array('type' => 'float', 'min' => 0), + 'boolean' => array('type' => 'boolean'), + 'time' => array('type' => 'string', 'format' => '00:00:00'), + 'time with time zone' => array('type' => 'string'), + 'date' => array('type' => 'string', 'format' => '0000-00-00'), + 'year' => array('type' => 'string', 'format' => '0000'), + 'datetime' => array('type' => 'string', 'format' => '0000-00-00 00:00:00'), + 'timestamp with time zone' => array('type' => 'string'), + 'char' => array('type' => 'string', 'exact' => TRUE), + 'binary' => array('type' => 'string', 'binary' => TRUE, 'exact' => TRUE), + 'varchar' => array('type' => 'string'), + 'varbinary' => array('type' => 'string', 'binary' => TRUE), + 'blob' => array('type' => 'string', 'binary' => TRUE), + 'text' => array('type' => 'string') +); + +// DOUBLE +$config['double'] = $config['double precision'] = $config['decimal'] = $config['real'] = $config['numeric'] = $config['float']; +$config['double unsigned'] = $config['float unsigned']; + +// BIT +$config['bit'] = $config['boolean']; + +// TIMESTAMP +$config['timestamp'] = $config['timestamp without time zone'] = $config['datetime']; + +// ENUM +$config['enum'] = $config['set'] = $config['varchar']; + +// TEXT +$config['tinytext'] = $config['mediumtext'] = $config['longtext'] = $config['text']; + +// BLOB +$config['tsvector'] = $config['tinyblob'] = $config['mediumblob'] = $config['longblob'] = $config['clob'] = $config['bytea'] = $config['blob']; + +// CHARACTER +$config['character'] = $config['char']; +$config['character varying'] = $config['varchar']; + +// TIME +$config['time without time zone'] = $config['time']; diff --git a/Server/system/config/upload.php b/Server/system/config/upload.php new file mode 100644 index 0000000..df26a2d --- /dev/null +++ b/Server/system/config/upload.php @@ -0,0 +1,17 @@ + 'Windows Vista', + 'windows nt 5.2' => 'Windows 2003', + 'windows nt 5.0' => 'Windows 2000', + 'windows nt 5.1' => 'Windows XP', + 'windows nt 4.0' => 'Windows NT', + 'winnt4.0' => 'Windows NT', + 'winnt 4.0' => 'Windows NT', + 'winnt' => 'Windows NT', + 'windows 98' => 'Windows 98', + 'win98' => 'Windows 98', + 'windows 95' => 'Windows 95', + 'win95' => 'Windows 95', + 'windows' => 'Unknown Windows OS', + 'os x' => 'Mac OS X', + 'intel mac' => 'Intel Mac', + 'ppc mac' => 'PowerPC Mac', + 'powerpc' => 'PowerPC', + 'ppc' => 'PowerPC', + 'cygwin' => 'Cygwin', + 'linux' => 'Linux', + 'debian' => 'Debian', + 'openvms' => 'OpenVMS', + 'sunos' => 'Sun Solaris', + 'amiga' => 'Amiga', + 'beos' => 'BeOS', + 'apachebench' => 'ApacheBench', + 'freebsd' => 'FreeBSD', + 'netbsd' => 'NetBSD', + 'bsdi' => 'BSDi', + 'openbsd' => 'OpenBSD', + 'os/2' => 'OS/2', + 'warp' => 'OS/2', + 'aix' => 'AIX', + 'irix' => 'Irix', + 'osf' => 'DEC OSF', + 'hp-ux' => 'HP-UX', + 'hurd' => 'GNU/Hurd', + 'unix' => 'Unknown Unix OS', +); + +// The order of this array should NOT be changed. Many browsers return +// multiple browser types so we want to identify the sub-type first. +$config['browser'] = array +( + 'Opera' => 'Opera', + 'MSIE' => 'Internet Explorer', + 'Internet Explorer' => 'Internet Explorer', + 'Shiira' => 'Shiira', + 'Firefox' => 'Firefox', + 'Chimera' => 'Chimera', + 'Phoenix' => 'Phoenix', + 'Firebird' => 'Firebird', + 'Camino' => 'Camino', + 'Netscape' => 'Netscape', + 'OmniWeb' => 'OmniWeb', + 'Chrome' => 'Chrome', + 'Safari' => 'Safari', + 'Konqueror' => 'Konqueror', + 'Epiphany' => 'Epiphany', + 'Galeon' => 'Galeon', + 'Mozilla' => 'Mozilla', + 'icab' => 'iCab', + 'lynx' => 'Lynx', + 'links' => 'Links', + 'hotjava' => 'HotJava', + 'amaya' => 'Amaya', + 'IBrowse' => 'IBrowse', +); + +$config['mobile'] = array +( + 'mobileexplorer' => 'Mobile Explorer', + 'openwave' => 'Open Wave', + 'opera mini' => 'Opera Mini', + 'operamini' => 'Opera Mini', + 'elaine' => 'Palm', + 'palmsource' => 'Palm', + 'digital paths' => 'Palm', + 'avantgo' => 'Avantgo', + 'xiino' => 'Xiino', + 'palmscape' => 'Palmscape', + 'nokia' => 'Nokia', + 'ericsson' => 'Ericsson', + 'blackBerry' => 'BlackBerry', + 'motorola' => 'Motorola', + 'iphone' => 'iPhone', + 'android' => 'Android', +); + +// There are hundreds of bots but these are the most common. +$config['robot'] = array +( + 'googlebot' => 'Googlebot', + 'msnbot' => 'MSNBot', + 'slurp' => 'Inktomi Slurp', + 'yahoo' => 'Yahoo', + 'askjeeves' => 'AskJeeves', + 'fastcrawler' => 'FastCrawler', + 'infoseek' => 'InfoSeek Robot 1.0', + 'lycos' => 'Lycos', +); \ No newline at end of file diff --git a/Server/system/config/view.php b/Server/system/config/view.php new file mode 100644 index 0000000..6bed22e --- /dev/null +++ b/Server/system/config/view.php @@ -0,0 +1,17 @@ +" /> + * + * $Id: captcha.php 3769 2008-12-15 00:48:56Z zombor $ + * + * @package Captcha + * @author Kohana Team + * @copyright (c) 2007-2008 Kohana Team + * @license http://kohanaphp.com/license.html + */ +class Captcha_Controller extends Controller { + + public function __call($method, $args) + { + // Output the Captcha challenge resource (no html) + // Pull the config group name from the URL + Captcha::factory($this->uri->segment(2))->render(FALSE); + } + +} // End Captcha_Controller \ No newline at end of file diff --git a/Server/system/controllers/template.php b/Server/system/controllers/template.php new file mode 100644 index 0000000..34d1a22 --- /dev/null +++ b/Server/system/controllers/template.php @@ -0,0 +1,54 @@ +template = new View($this->template); + + if ($this->auto_render == TRUE) + { + // Render the template immediately after the controller method + Event::add('system.post_controller', array($this, '_render')); + } + } + + /** + * Render the loaded template. + */ + public function _render() + { + if ($this->auto_render == TRUE) + { + // Render the template when the class is destroyed + $this->template->render(TRUE); + } + } + +} // End Template_Controller \ No newline at end of file diff --git a/Server/system/core/Benchmark.php b/Server/system/core/Benchmark.php new file mode 100644 index 0000000..ce230f1 --- /dev/null +++ b/Server/system/core/Benchmark.php @@ -0,0 +1,125 @@ + microtime(TRUE), + 'stop' => FALSE, + 'memory_start' => self::memory_usage(), + 'memory_stop' => FALSE + ); + + array_unshift(self::$marks[$name], $mark); + } + + /** + * Set a benchmark stop point. + * + * @param string benchmark name + * @return void + */ + public static function stop($name) + { + if (isset(self::$marks[$name]) AND self::$marks[$name][0]['stop'] === FALSE) + { + self::$marks[$name][0]['stop'] = microtime(TRUE); + self::$marks[$name][0]['memory_stop'] = self::memory_usage(); + } + } + + /** + * Get the elapsed time between a start and stop. + * + * @param string benchmark name, TRUE for all + * @param integer number of decimal places to count to + * @return array + */ + public static function get($name, $decimals = 4) + { + if ($name === TRUE) + { + $times = array(); + $names = array_keys(self::$marks); + + foreach ($names as $name) + { + // Get each mark recursively + $times[$name] = self::get($name, $decimals); + } + + // Return the array + return $times; + } + + if ( ! isset(self::$marks[$name])) + return FALSE; + + if (self::$marks[$name][0]['stop'] === FALSE) + { + // Stop the benchmark to prevent mis-matched results + self::stop($name); + } + + // Return a string version of the time between the start and stop points + // Properly reading a float requires using number_format or sprintf + $time = $memory = 0; + for ($i = 0; $i < count(self::$marks[$name]); $i++) + { + $time += self::$marks[$name][$i]['stop'] - self::$marks[$name][$i]['start']; + $memory += self::$marks[$name][$i]['memory_stop'] - self::$marks[$name][$i]['memory_start']; + } + + return array + ( + 'time' => number_format($time, $decimals), + 'memory' => $memory, + 'count' => count(self::$marks[$name]) + ); + } + + /** + * Returns the current memory usage. This is only possible if the + * memory_get_usage function is supported in PHP. + * + * @return integer + */ + private static function memory_usage() + { + static $func; + + if ($func === NULL) + { + // Test if memory usage can be seen + $func = function_exists('memory_get_usage'); + } + + return $func ? memory_get_usage() : 0; + } + +} // End Benchmark diff --git a/Server/system/core/Bootstrap.php b/Server/system/core/Bootstrap.php new file mode 100644 index 0000000..1334190 --- /dev/null +++ b/Server/system/core/Bootstrap.php @@ -0,0 +1,58 @@ + $event_callback) + { + if ($callback === $event_callback) + { + unset(self::$events[$name][$i]); + } + } + } + } + + /** + * Execute all of the callbacks attached to an event. + * + * @param string event name + * @param array data can be processed as Event::$data by the callbacks + * @return void + */ + public static function run($name, & $data = NULL) + { + if ( ! empty(self::$events[$name])) + { + // So callbacks can access Event::$data + self::$data =& $data; + $callbacks = self::get($name); + + foreach ($callbacks as $callback) + { + call_user_func($callback); + } + + // Do this to prevent data from getting 'stuck' + $clear_data = ''; + self::$data =& $clear_data; + } + + // The event has been run! + self::$has_run[$name] = $name; + } + + /** + * Check if a given event has been run. + * + * @param string event name + * @return boolean + */ + public static function has_run($name) + { + return isset(self::$has_run[$name]); + } + +} // End Event \ No newline at end of file diff --git a/Server/system/core/Kohana.php b/Server/system/core/Kohana.php new file mode 100644 index 0000000..c934b12 --- /dev/null +++ b/Server/system/core/Kohana.php @@ -0,0 +1,1788 @@ + 1, + 'alert' => 2, + 'info' => 3, + 'debug' => 4, + ); + + // Internal caches and write status + private static $internal_cache = array(); + private static $write_cache; + private static $internal_cache_path; + private static $internal_cache_key; + private static $internal_cache_encrypt; + + /** + * Sets up the PHP environment. Adds error/exception handling, output + * buffering, and adds an auto-loading method for loading classes. + * + * This method is run immediately when this file is loaded, and is + * benchmarked as environment_setup. + * + * For security, this function also destroys the $_REQUEST global variable. + * Using the proper global (GET, POST, COOKIE, etc) is inherently more secure. + * The recommended way to fetch a global variable is using the Input library. + * @see http://www.php.net/globals + * + * @return void + */ + public static function setup() + { + static $run; + + // This function can only be run once + if ($run === TRUE) + return; + + // Start the environment setup benchmark + Benchmark::start(SYSTEM_BENCHMARK.'_environment_setup'); + + // Define Kohana error constant + define('E_KOHANA', 42); + + // Define 404 error constant + define('E_PAGE_NOT_FOUND', 43); + + // Define database error constant + define('E_DATABASE_ERROR', 44); + + if (self::$cache_lifetime = self::config('core.internal_cache')) + { + // Are we using encryption for caches? + self::$internal_cache_encrypt = self::config('core.internal_cache_encrypt'); + + if(self::$internal_cache_encrypt===TRUE) + { + self::$internal_cache_key = self::config('core.internal_cache_key'); + + // Be sure the key is of acceptable length for the mcrypt algorithm used + self::$internal_cache_key = substr(self::$internal_cache_key, 0, 24); + } + + // Set the directory to be used for the internal cache + if ( ! self::$internal_cache_path = self::config('core.internal_cache_path')) + { + self::$internal_cache_path = APPPATH.'cache/'; + } + + // Load cached configuration and language files + self::$internal_cache['configuration'] = self::cache('configuration', self::$cache_lifetime); + self::$internal_cache['language'] = self::cache('language', self::$cache_lifetime); + + // Load cached file paths + self::$internal_cache['find_file_paths'] = self::cache('find_file_paths', self::$cache_lifetime); + + // Enable cache saving + Event::add('system.shutdown', array(__CLASS__, 'internal_cache_save')); + } + + // Disable notices and "strict" errors + $ER = error_reporting(~E_NOTICE & ~E_STRICT); + + // Set the user agent + self::$user_agent = ( ! empty($_SERVER['HTTP_USER_AGENT']) ? trim($_SERVER['HTTP_USER_AGENT']) : ''); + + if (function_exists('date_default_timezone_set')) + { + $timezone = self::config('locale.timezone'); + + // Set default timezone, due to increased validation of date settings + // which cause massive amounts of E_NOTICEs to be generated in PHP 5.2+ + date_default_timezone_set(empty($timezone) ? date_default_timezone_get() : $timezone); + } + + // Restore error reporting + error_reporting($ER); + + // Start output buffering + ob_start(array(__CLASS__, 'output_buffer')); + + // Save buffering level + self::$buffer_level = ob_get_level(); + + // Set autoloader + spl_autoload_register(array('Kohana', 'auto_load')); + + // Set error handler + set_error_handler(array('Kohana', 'exception_handler')); + + // Set exception handler + set_exception_handler(array('Kohana', 'exception_handler')); + + // Send default text/html UTF-8 header + header('Content-Type: text/html; charset=UTF-8'); + + // Load locales + $locales = self::config('locale.language'); + + // Make first locale UTF-8 + $locales[0] .= '.UTF-8'; + + // Set locale information + self::$locale = setlocale(LC_ALL, $locales); + + if (self::$configuration['core']['log_threshold'] > 0) + { + // Set the log directory + self::log_directory(self::$configuration['core']['log_directory']); + + // Enable log writing at shutdown + register_shutdown_function(array(__CLASS__, 'log_save')); + } + + // Enable Kohana routing + Event::add('system.routing', array('Router', 'find_uri')); + Event::add('system.routing', array('Router', 'setup')); + + // Enable Kohana controller initialization + Event::add('system.execute', array('Kohana', 'instance')); + + // Enable Kohana 404 pages + Event::add('system.404', array('Kohana', 'show_404')); + + // Enable Kohana output handling + Event::add('system.shutdown', array('Kohana', 'shutdown')); + + if (self::config('core.enable_hooks') === TRUE) + { + // Find all the hook files + $hooks = self::list_files('hooks', TRUE); + + foreach ($hooks as $file) + { + // Load the hook + include $file; + } + } + + // Setup is complete, prevent it from being run again + $run = TRUE; + + // Stop the environment setup routine + Benchmark::stop(SYSTEM_BENCHMARK.'_environment_setup'); + } + + /** + * Loads the controller and initializes it. Runs the pre_controller, + * post_controller_constructor, and post_controller events. Triggers + * a system.404 event when the route cannot be mapped to a controller. + * + * This method is benchmarked as controller_setup and controller_execution. + * + * @return object instance of controller + */ + public static function & instance() + { + if (self::$instance === NULL) + { + Benchmark::start(SYSTEM_BENCHMARK.'_controller_setup'); + + // Include the Controller file + require Router::$controller_path; + + try + { + // Start validation of the controller + $class = new ReflectionClass(ucfirst(Router::$controller).'_Controller'); + } + catch (ReflectionException $e) + { + // Controller does not exist + Event::run('system.404'); + } + + if ($class->isAbstract() OR (IN_PRODUCTION AND $class->getConstant('ALLOW_PRODUCTION') == FALSE)) + { + // Controller is not allowed to run in production + Event::run('system.404'); + } + + // Run system.pre_controller + Event::run('system.pre_controller'); + + // Create a new controller instance + $controller = $class->newInstance(); + + // Controller constructor has been executed + Event::run('system.post_controller_constructor'); + + try + { + // Load the controller method + $method = $class->getMethod(Router::$method); + + // Method exists + if (Router::$method[0] === '_') + { + // Do not allow access to hidden methods + Event::run('system.404'); + } + + if ($method->isProtected() or $method->isPrivate()) + { + // Do not attempt to invoke protected methods + throw new ReflectionException('protected controller method'); + } + + // Default arguments + $arguments = Router::$arguments; + } + catch (ReflectionException $e) + { + // Use __call instead + $method = $class->getMethod('__call'); + + // Use arguments in __call format + $arguments = array(Router::$method, Router::$arguments); + } + + // Stop the controller setup benchmark + Benchmark::stop(SYSTEM_BENCHMARK.'_controller_setup'); + + // Start the controller execution benchmark + Benchmark::start(SYSTEM_BENCHMARK.'_controller_execution'); + + // Execute the controller method + $method->invokeArgs($controller, $arguments); + + // Controller method has been executed + Event::run('system.post_controller'); + + // Stop the controller execution benchmark + Benchmark::stop(SYSTEM_BENCHMARK.'_controller_execution'); + } + + return self::$instance; + } + + /** + * Get all include paths. APPPATH is the first path, followed by module + * paths in the order they are configured, follow by the SYSPATH. + * + * @param boolean re-process the include paths + * @return array + */ + public static function include_paths($process = FALSE) + { + if ($process === TRUE) + { + // Add APPPATH as the first path + self::$include_paths = array(APPPATH); + + foreach (self::$configuration['core']['modules'] as $path) + { + if ($path = str_replace('\\', '/', realpath($path))) + { + // Add a valid path + self::$include_paths[] = $path.'/'; + } + } + + // Add SYSPATH as the last path + self::$include_paths[] = SYSPATH; + } + + return self::$include_paths; + } + + /** + * Get a config item or group. + * + * @param string item name + * @param boolean force a forward slash (/) at the end of the item + * @param boolean is the item required? + * @return mixed + */ + public static function config($key, $slash = FALSE, $required = TRUE) + { + if (self::$configuration === NULL) + { + // Load core configuration + self::$configuration['core'] = self::config_load('core'); + + // Re-parse the include paths + self::include_paths(TRUE); + } + + // Get the group name from the key + $group = explode('.', $key, 2); + $group = $group[0]; + + if ( ! isset(self::$configuration[$group])) + { + // Load the configuration group + self::$configuration[$group] = self::config_load($group, $required); + } + + // Get the value of the key string + $value = self::key_string(self::$configuration, $key); + + if ($slash === TRUE AND is_string($value) AND $value !== '') + { + // Force the value to end with "/" + $value = rtrim($value, '/').'/'; + } + + return $value; + } + + /** + * Sets a configuration item, if allowed. + * + * @param string config key string + * @param string config value + * @return boolean + */ + public static function config_set($key, $value) + { + // Do this to make sure that the config array is already loaded + self::config($key); + + if (substr($key, 0, 7) === 'routes.') + { + // Routes cannot contain sub keys due to possible dots in regex + $keys = explode('.', $key, 2); + } + else + { + // Convert dot-noted key string to an array + $keys = explode('.', $key); + } + + // Used for recursion + $conf =& self::$configuration; + $last = count($keys) - 1; + + foreach ($keys as $i => $k) + { + if ($i === $last) + { + $conf[$k] = $value; + } + else + { + $conf =& $conf[$k]; + } + } + + if ($key === 'core.modules') + { + // Reprocess the include paths + self::include_paths(TRUE); + } + + return TRUE; + } + + /** + * Load a config file. + * + * @param string config filename, without extension + * @param boolean is the file required? + * @return array + */ + public static function config_load($name, $required = TRUE) + { + if ($name === 'core') + { + // Load the application configuration file + require APPPATH.'config/config'.EXT; + + if ( ! isset($config['site_domain'])) + { + // Invalid config file + die('Your Kohana application configuration file is not valid.'); + } + + return $config; + } + + if (isset(self::$internal_cache['configuration'][$name])) + return self::$internal_cache['configuration'][$name]; + + // Load matching configs + $configuration = array(); + + if ($files = self::find_file('config', $name, $required)) + { + foreach ($files as $file) + { + require $file; + + if (isset($config) AND is_array($config)) + { + // Merge in configuration + $configuration = array_merge($configuration, $config); + } + } + } + + if ( ! isset(self::$write_cache['configuration'])) + { + // Cache has changed + self::$write_cache['configuration'] = TRUE; + } + + return self::$internal_cache['configuration'][$name] = $configuration; + } + + /** + * Clears a config group from the cached configuration. + * + * @param string config group + * @return void + */ + public static function config_clear($group) + { + // Remove the group from config + unset(self::$configuration[$group], self::$internal_cache['configuration'][$group]); + + if ( ! isset(self::$write_cache['configuration'])) + { + // Cache has changed + self::$write_cache['configuration'] = TRUE; + } + } + + /** + * Add a new message to the log. + * + * @param string type of message + * @param string message text + * @return void + */ + public static function log($type, $message) + { + if (self::$log_levels[$type] <= self::$configuration['core']['log_threshold']) + { + $message = array(date('Y-m-d H:i:s P'), $type, $message); + + // Run the system.log event + Event::run('system.log', $message); + + self::$log[] = $message; + } + } + + /** + * Save all currently logged messages. + * + * @return void + */ + public static function log_save() + { + if (empty(self::$log) OR self::$configuration['core']['log_threshold'] < 1) + return; + + // Filename of the log + $filename = self::log_directory().date('Y-m-d').'.log'.EXT; + + if ( ! is_file($filename)) + { + // Write the SYSPATH checking header + file_put_contents($filename, + ''.PHP_EOL.PHP_EOL); + + // Prevent external writes + chmod($filename, 0644); + } + + // Messages to write + $messages = array(); + + do + { + // Load the next mess + list ($date, $type, $text) = array_shift(self::$log); + + // Add a new message line + $messages[] = $date.' --- '.$type.': '.$text; + } + while ( ! empty(self::$log)); + + // Write messages to log file + file_put_contents($filename, implode(PHP_EOL, $messages).PHP_EOL, FILE_APPEND); + } + + /** + * Get or set the logging directory. + * + * @param string new log directory + * @return string + */ + public static function log_directory($dir = NULL) + { + static $directory; + + if ( ! empty($dir)) + { + // Get the directory path + $dir = realpath($dir); + + if (is_dir($dir) AND is_writable($dir)) + { + // Change the log directory + $directory = str_replace('\\', '/', $dir).'/'; + } + else + { + // Log directory is invalid + throw new Kohana_Exception('core.log_dir_unwritable', $dir); + } + } + + return $directory; + } + + /** + * Load data from a simple cache file. This should only be used internally, + * and is NOT a replacement for the Cache library. + * + * @param string unique name of cache + * @param integer expiration in seconds + * @return mixed + */ + public static function cache($name, $lifetime) + { + if ($lifetime > 0) + { + $path = self::$internal_cache_path.'kohana_'.$name; + + if (is_file($path)) + { + // Check the file modification time + if ((time() - filemtime($path)) < $lifetime) + { + // Cache is valid! Now, do we need to decrypt it? + if(self::$internal_cache_encrypt===TRUE) + { + $data = file_get_contents($path); + + $iv_size = mcrypt_get_iv_size(MCRYPT_RIJNDAEL_256, MCRYPT_MODE_ECB); + $iv = mcrypt_create_iv($iv_size, MCRYPT_RAND); + + $decrypted_text = mcrypt_decrypt(MCRYPT_RIJNDAEL_256, self::$internal_cache_key, $data, MCRYPT_MODE_ECB, $iv); + + $cache = unserialize($decrypted_text); + + // If the key changed, delete the cache file + if(!$cache) + unlink($path); + + // If cache is false (as above) return NULL, otherwise, return the cache + return ($cache ? $cache : NULL); + } + else + { + return unserialize(file_get_contents($path)); + } + } + else + { + // Cache is invalid, delete it + unlink($path); + } + } + } + + // No cache found + return NULL; + } + + /** + * Save data to a simple cache file. This should only be used internally, and + * is NOT a replacement for the Cache library. + * + * @param string cache name + * @param mixed data to cache + * @param integer expiration in seconds + * @return boolean + */ + public static function cache_save($name, $data, $lifetime) + { + if ($lifetime < 1) + return FALSE; + + $path = self::$internal_cache_path.'kohana_'.$name; + + if ($data === NULL) + { + // Delete cache + return (is_file($path) and unlink($path)); + } + else + { + // Using encryption? Encrypt the data when we write it + if(self::$internal_cache_encrypt===TRUE) + { + // Encrypt and write data to cache file + $iv_size = mcrypt_get_iv_size(MCRYPT_RIJNDAEL_256, MCRYPT_MODE_ECB); + $iv = mcrypt_create_iv($iv_size, MCRYPT_RAND); + + // Serialize and encrypt! + $encrypted_text = mcrypt_encrypt(MCRYPT_RIJNDAEL_256, self::$internal_cache_key, serialize($data), MCRYPT_MODE_ECB, $iv); + + return (bool) file_put_contents($path, $encrypted_text); + } + else + { + // Write data to cache file + return (bool) file_put_contents($path, serialize($data)); + } + } + } + + /** + * Kohana output handler. Called during ob_clean, ob_flush, and their variants. + * + * @param string current output buffer + * @return string + */ + public static function output_buffer($output) + { + // Could be flushing, so send headers first + if ( ! Event::has_run('system.send_headers')) + { + // Run the send_headers event + Event::run('system.send_headers'); + } + + self::$output = $output; + + // Set and return the final output + return self::$output; + } + + /** + * Closes all open output buffers, either by flushing or cleaning, and stores the Kohana + * output buffer for display during shutdown. + * + * @param boolean disable to clear buffers, rather than flushing + * @return void + */ + public static function close_buffers($flush = TRUE) + { + if (ob_get_level() >= self::$buffer_level) + { + // Set the close function + $close = ($flush === TRUE) ? 'ob_end_flush' : 'ob_end_clean'; + + while (ob_get_level() > self::$buffer_level) + { + // Flush or clean the buffer + $close(); + } + + // Store the Kohana output buffer + ob_end_clean(); + } + } + + /** + * Triggers the shutdown of Kohana by closing the output buffer, runs the system.display event. + * + * @return void + */ + public static function shutdown() + { + // Close output buffers + self::close_buffers(TRUE); + + // Run the output event + Event::run('system.display', self::$output); + + // Render the final output + self::render(self::$output); + } + + /** + * Inserts global Kohana variables into the generated output and prints it. + * + * @param string final output that will displayed + * @return void + */ + public static function render($output) + { + if (self::config('core.render_stats') === TRUE) + { + // Fetch memory usage in MB + $memory = function_exists('memory_get_usage') ? (memory_get_usage() / 1024 / 1024) : 0; + + // Fetch benchmark for page execution time + $benchmark = Benchmark::get(SYSTEM_BENCHMARK.'_total_execution'); + + // Replace the global template variables + $output = str_replace( + array + ( + '{kohana_version}', + '{kohana_codename}', + '{execution_time}', + '{memory_usage}', + '{included_files}', + ), + array + ( + KOHANA_VERSION, + KOHANA_CODENAME, + $benchmark['time'], + number_format($memory, 2).'MB', + count(get_included_files()), + ), + $output + ); + } + + if ($level = self::config('core.output_compression') AND ini_get('output_handler') !== 'ob_gzhandler' AND (int) ini_get('zlib.output_compression') === 0) + { + if ($level < 1 OR $level > 9) + { + // Normalize the level to be an integer between 1 and 9. This + // step must be done to prevent gzencode from triggering an error + $level = max(1, min($level, 9)); + } + + if (stripos(@$_SERVER['HTTP_ACCEPT_ENCODING'], 'gzip') !== FALSE) + { + $compress = 'gzip'; + } + elseif (stripos(@$_SERVER['HTTP_ACCEPT_ENCODING'], 'deflate') !== FALSE) + { + $compress = 'deflate'; + } + } + + if (isset($compress) AND $level > 0) + { + switch ($compress) + { + case 'gzip': + // Compress output using gzip + $output = gzencode($output, $level); + break; + case 'deflate': + // Compress output using zlib (HTTP deflate) + $output = gzdeflate($output, $level); + break; + } + + // This header must be sent with compressed content to prevent + // browser caches from breaking + header('Vary: Accept-Encoding'); + + // Send the content encoding header + header('Content-Encoding: '.$compress); + + // Sending Content-Length in CGI can result in unexpected behavior + if (stripos(PHP_SAPI, 'cgi') === FALSE) + { + header('Content-Length: '.strlen($output)); + } + } + + echo $output; + } + + /** + * Displays a 404 page. + * + * @throws Kohana_404_Exception + * @param string URI of page + * @param string custom template + * @return void + */ + public static function show_404($page = FALSE, $template = FALSE) + { + throw new Kohana_404_Exception($page, $template); + } + + /** + * Dual-purpose PHP error and exception handler. Uses the kohana_error_page + * view to display the message. + * + * @param integer|object exception object or error code + * @param string error message + * @param string filename + * @param integer line number + * @return void + */ + public static function exception_handler($exception, $message = NULL, $file = NULL, $line = NULL) + { + try + { + // PHP errors have 5 args, always + $PHP_ERROR = (func_num_args() === 5); + + // Test to see if errors should be displayed + if ($PHP_ERROR AND (error_reporting() & $exception) === 0) + return; + + // This is useful for hooks to determine if a page has an error + self::$has_error = TRUE; + + // Error handling will use exactly 5 args, every time + if ($PHP_ERROR) + { + $code = $exception; + $type = 'PHP Error'; + $template = 'kohana_error_page'; + } + else + { + $code = $exception->getCode(); + $type = get_class($exception); + $message = $exception->getMessage(); + $file = $exception->getFile(); + $line = $exception->getLine(); + $template = ($exception instanceof Kohana_Exception) ? $exception->getTemplate() : 'kohana_error_page'; + } + + if (is_numeric($code)) + { + $codes = self::lang('errors'); + + if ( ! empty($codes[$code])) + { + list($level, $error, $description) = $codes[$code]; + } + else + { + $level = 1; + $error = $PHP_ERROR ? 'Unknown Error' : get_class($exception); + $description = ''; + } + } + else + { + // Custom error message, this will never be logged + $level = 5; + $error = $code; + $description = ''; + } + + // Remove the DOCROOT from the path, as a security precaution + $file = str_replace('\\', '/', realpath($file)); + $file = preg_replace('|^'.preg_quote(DOCROOT).'|', '', $file); + + if ($level <= self::$configuration['core']['log_threshold']) + { + // Log the error + self::log('error', self::lang('core.uncaught_exception', $type, $message, $file, $line)); + } + + if ($PHP_ERROR) + { + $description = self::lang('errors.'.E_RECOVERABLE_ERROR); + $description = is_array($description) ? $description[2] : ''; + + if ( ! headers_sent()) + { + // Send the 500 header + header('HTTP/1.1 500 Internal Server Error'); + } + } + else + { + if (method_exists($exception, 'sendHeaders') AND ! headers_sent()) + { + // Send the headers if they have not already been sent + $exception->sendHeaders(); + } + } + + // Close all output buffers except for Kohana + while (ob_get_level() > self::$buffer_level) + { + ob_end_clean(); + } + + // Test if display_errors is on + if (self::$configuration['core']['display_errors'] === TRUE) + { + if ( ! IN_PRODUCTION AND $line != FALSE) + { + // Remove the first entry of debug_backtrace(), it is the exception_handler call + $trace = $PHP_ERROR ? array_slice(debug_backtrace(), 1) : $exception->getTrace(); + + // Beautify backtrace + $trace = self::backtrace($trace); + } + + // Load the error + require self::find_file('views', empty($template) ? 'kohana_error_page' : $template); + } + else + { + // Get the i18n messages + $error = self::lang('core.generic_error'); + $message = self::lang('core.errors_disabled', url::site(), url::site(Router::$current_uri)); + + // Load the errors_disabled view + require self::find_file('views', 'kohana_error_disabled'); + } + + if ( ! Event::has_run('system.shutdown')) + { + // Run the shutdown even to ensure a clean exit + Event::run('system.shutdown'); + } + + // Turn off error reporting + error_reporting(0); + exit; + } + catch (Exception $e) + { + if (IN_PRODUCTION) + { + die('Fatal Error'); + } + else + { + die('Fatal Error: '.$e->getMessage().' File: '.$e->getFile().' Line: '.$e->getLine()); + } + } + } + + /** + * Provides class auto-loading. + * + * @throws Kohana_Exception + * @param string name of class + * @return bool + */ + public static function auto_load($class) + { + if (class_exists($class, FALSE)) + return TRUE; + + if (($suffix = strrpos($class, '_')) > 0) + { + // Find the class suffix + $suffix = substr($class, $suffix + 1); + } + else + { + // No suffix + $suffix = FALSE; + } + + if ($suffix === 'Core') + { + $type = 'libraries'; + $file = substr($class, 0, -5); + } + elseif ($suffix === 'Controller') + { + $type = 'controllers'; + // Lowercase filename + $file = strtolower(substr($class, 0, -11)); + } + elseif ($suffix === 'Model') + { + $type = 'models'; + // Lowercase filename + $file = strtolower(substr($class, 0, -6)); + } + elseif ($suffix === 'Driver') + { + $type = 'libraries/drivers'; + $file = str_replace('_', '/', substr($class, 0, -7)); + } + else + { + // This could be either a library or a helper, but libraries must + // always be capitalized, so we check if the first character is + // uppercase. If it is, we are loading a library, not a helper. + $type = ($class[0] < 'a') ? 'libraries' : 'helpers'; + $file = $class; + } + + if ($filename = self::find_file($type, $file)) + { + // Load the class + require $filename; + } + else + { + // The class could not be found + return FALSE; + } + + if ($filename = self::find_file($type, self::$configuration['core']['extension_prefix'].$class)) + { + // Load the class extension + require $filename; + } + elseif ($suffix !== 'Core' AND class_exists($class.'_Core', FALSE)) + { + // Class extension to be evaluated + $extension = 'class '.$class.' extends '.$class.'_Core { }'; + + // Start class analysis + $core = new ReflectionClass($class.'_Core'); + + if ($core->isAbstract()) + { + // Make the extension abstract + $extension = 'abstract '.$extension; + } + + // Transparent class extensions are handled using eval. This is + // a disgusting hack, but it gets the job done. + eval($extension); + } + + return TRUE; + } + + /** + * Find a resource file in a given directory. Files will be located according + * to the order of the include paths. Configuration and i18n files will be + * returned in reverse order. + * + * @throws Kohana_Exception if file is required and not found + * @param string directory to search in + * @param string filename to look for (without extension) + * @param boolean file required + * @param string file extension + * @return array if the type is config, i18n or l10n + * @return string if the file is found + * @return FALSE if the file is not found + */ + public static function find_file($directory, $filename, $required = FALSE, $ext = FALSE) + { + // NOTE: This test MUST be not be a strict comparison (===), or empty + // extensions will be allowed! + if ($ext == '') + { + // Use the default extension + $ext = EXT; + } + else + { + // Add a period before the extension + $ext = '.'.$ext; + } + + // Search path + $search = $directory.'/'.$filename.$ext; + + if (isset(self::$internal_cache['find_file_paths'][$search])) + return self::$internal_cache['find_file_paths'][$search]; + + // Load include paths + $paths = self::$include_paths; + + // Nothing found, yet + $found = NULL; + + if ($directory === 'config' OR $directory === 'i18n') + { + // Search in reverse, for merging + $paths = array_reverse($paths); + + foreach ($paths as $path) + { + if (is_file($path.$search)) + { + // A matching file has been found + $found[] = $path.$search; + } + } + } + else + { + foreach ($paths as $path) + { + if (is_file($path.$search)) + { + // A matching file has been found + $found = $path.$search; + + // Stop searching + break; + } + } + } + + if ($found === NULL) + { + if ($required === TRUE) + { + // Directory i18n key + $directory = 'core.'.inflector::singular($directory); + + // If the file is required, throw an exception + throw new Kohana_Exception('core.resource_not_found', self::lang($directory), $filename); + } + else + { + // Nothing was found, return FALSE + $found = FALSE; + } + } + + if ( ! isset(self::$write_cache['find_file_paths'])) + { + // Write cache at shutdown + self::$write_cache['find_file_paths'] = TRUE; + } + + return self::$internal_cache['find_file_paths'][$search] = $found; + } + + /** + * Lists all files and directories in a resource path. + * + * @param string directory to search + * @param boolean list all files to the maximum depth? + * @param string full path to search (used for recursion, *never* set this manually) + * @return array filenames and directories + */ + public static function list_files($directory, $recursive = FALSE, $path = FALSE) + { + $files = array(); + + if ($path === FALSE) + { + $paths = array_reverse(self::include_paths()); + + foreach ($paths as $path) + { + // Recursively get and merge all files + $files = array_merge($files, self::list_files($directory, $recursive, $path.$directory)); + } + } + else + { + $path = rtrim($path, '/').'/'; + + if (is_readable($path)) + { + $items = (array) glob($path.'*'); + + if ( ! empty($items)) + { + foreach ($items as $index => $item) + { + $files[] = $item = str_replace('\\', '/', $item); + + // Handle recursion + if (is_dir($item) AND $recursive == TRUE) + { + // Filename should only be the basename + $item = pathinfo($item, PATHINFO_BASENAME); + + // Append sub-directory search + $files = array_merge($files, self::list_files($directory, TRUE, $path.$item)); + } + } + } + } + } + + return $files; + } + + /** + * Fetch an i18n language item. + * + * @param string language key to fetch + * @param array additional information to insert into the line + * @return string i18n language string, or the requested key if the i18n item is not found + */ + public static function lang($key, $args = array()) + { + // Extract the main group from the key + $group = explode('.', $key, 2); + $group = $group[0]; + + // Get locale name + $locale = self::config('locale.language.0'); + + if ( ! isset(self::$internal_cache['language'][$locale][$group])) + { + // Messages for this group + $messages = array(); + + if ($files = self::find_file('i18n', $locale.'/'.$group)) + { + foreach ($files as $file) + { + include $file; + + // Merge in configuration + if ( ! empty($lang) AND is_array($lang)) + { + foreach ($lang as $k => $v) + { + $messages[$k] = $v; + } + } + } + } + + if ( ! isset(self::$write_cache['language'])) + { + // Write language cache + self::$write_cache['language'] = TRUE; + } + + self::$internal_cache['language'][$locale][$group] = $messages; + } + + // Get the line from cache + $line = self::key_string(self::$internal_cache['language'][$locale], $key); + + if ($line === NULL) + { + self::log('error', 'Missing i18n entry '.$key.' for language '.$locale); + + // Return the key string as fallback + return $key; + } + + if (is_string($line) AND func_num_args() > 1) + { + $args = array_slice(func_get_args(), 1); + + // Add the arguments into the line + $line = vsprintf($line, is_array($args[0]) ? $args[0] : $args); + } + + return $line; + } + + /** + * Returns the value of a key, defined by a 'dot-noted' string, from an array. + * + * @param array array to search + * @param string dot-noted string: foo.bar.baz + * @return string if the key is found + * @return void if the key is not found + */ + public static function key_string($array, $keys) + { + if (empty($array)) + return NULL; + + // Prepare for loop + $keys = explode('.', $keys); + + do + { + // Get the next key + $key = array_shift($keys); + + if (isset($array[$key])) + { + if (is_array($array[$key]) AND ! empty($keys)) + { + // Dig down to prepare the next loop + $array = $array[$key]; + } + else + { + // Requested key was found + return $array[$key]; + } + } + else + { + // Requested key is not set + break; + } + } + while ( ! empty($keys)); + + return NULL; + } + + /** + * Sets values in an array by using a 'dot-noted' string. + * + * @param array array to set keys in (reference) + * @param string dot-noted string: foo.bar.baz + * @return mixed fill value for the key + * @return void + */ + public static function key_string_set( & $array, $keys, $fill = NULL) + { + if (is_object($array) AND ($array instanceof ArrayObject)) + { + // Copy the array + $array_copy = $array->getArrayCopy(); + + // Is an object + $array_object = TRUE; + } + else + { + if ( ! is_array($array)) + { + // Must always be an array + $array = (array) $array; + } + + // Copy is a reference to the array + $array_copy =& $array; + } + + if (empty($keys)) + return $array; + + // Create keys + $keys = explode('.', $keys); + + // Create reference to the array + $row =& $array_copy; + + for ($i = 0, $end = count($keys) - 1; $i <= $end; $i++) + { + // Get the current key + $key = $keys[$i]; + + if ( ! isset($row[$key])) + { + if (isset($keys[$i + 1])) + { + // Make the value an array + $row[$key] = array(); + } + else + { + // Add the fill key + $row[$key] = $fill; + } + } + elseif (isset($keys[$i + 1])) + { + // Make the value an array + $row[$key] = (array) $row[$key]; + } + + // Go down a level, creating a new row reference + $row =& $row[$key]; + } + + if (isset($array_object)) + { + // Swap the array back in + $array->exchangeArray($array_copy); + } + } + + /** + * Retrieves current user agent information: + * keys: browser, version, platform, mobile, robot, referrer, languages, charsets + * tests: is_browser, is_mobile, is_robot, accept_lang, accept_charset + * + * @param string key or test name + * @param string used with "accept" tests: user_agent(accept_lang, en) + * @return array languages and charsets + * @return string all other keys + * @return boolean all tests + */ + public static function user_agent($key = 'agent', $compare = NULL) + { + static $info; + + // Return the raw string + if ($key === 'agent') + return self::$user_agent; + + if ($info === NULL) + { + // Parse the user agent and extract basic information + $agents = self::config('user_agents'); + + foreach ($agents as $type => $data) + { + foreach ($data as $agent => $name) + { + if (stripos(self::$user_agent, $agent) !== FALSE) + { + if ($type === 'browser' AND preg_match('|'.preg_quote($agent).'[^0-9.]*+([0-9.][0-9.a-z]*)|i', self::$user_agent, $match)) + { + // Set the browser version + $info['version'] = $match[1]; + } + + // Set the agent name + $info[$type] = $name; + break; + } + } + } + } + + if (empty($info[$key])) + { + switch ($key) + { + case 'is_robot': + case 'is_browser': + case 'is_mobile': + // A boolean result + $return = ! empty($info[substr($key, 3)]); + break; + case 'languages': + $return = array(); + if ( ! empty($_SERVER['HTTP_ACCEPT_LANGUAGE'])) + { + if (preg_match_all('/[-a-z]{2,}/', strtolower(trim($_SERVER['HTTP_ACCEPT_LANGUAGE'])), $matches)) + { + // Found a result + $return = $matches[0]; + } + } + break; + case 'charsets': + $return = array(); + if ( ! empty($_SERVER['HTTP_ACCEPT_CHARSET'])) + { + if (preg_match_all('/[-a-z0-9]{2,}/', strtolower(trim($_SERVER['HTTP_ACCEPT_CHARSET'])), $matches)) + { + // Found a result + $return = $matches[0]; + } + } + break; + case 'referrer': + if ( ! empty($_SERVER['HTTP_REFERER'])) + { + // Found a result + $return = trim($_SERVER['HTTP_REFERER']); + } + break; + } + + // Cache the return value + isset($return) and $info[$key] = $return; + } + + if ( ! empty($compare)) + { + // The comparison must always be lowercase + $compare = strtolower($compare); + + switch ($key) + { + case 'accept_lang': + // Check if the lange is accepted + return in_array($compare, self::user_agent('languages')); + break; + case 'accept_charset': + // Check if the charset is accepted + return in_array($compare, self::user_agent('charsets')); + break; + default: + // Invalid comparison + return FALSE; + break; + } + } + + // Return the key, if set + return isset($info[$key]) ? $info[$key] : NULL; + } + + /** + * Quick debugging of any variable. Any number of parameters can be set. + * + * @return string + */ + public static function debug() + { + if (func_num_args() === 0) + return; + + // Get params + $params = func_get_args(); + $output = array(); + + foreach ($params as $var) + { + $output[] = '
('.gettype($var).') '.html::specialchars(print_r($var, TRUE)).'
'; + } + + return implode("\n", $output); + } + + /** + * Displays nice backtrace information. + * @see http://php.net/debug_backtrace + * + * @param array backtrace generated by an exception or debug_backtrace + * @return string + */ + public static function backtrace($trace) + { + if ( ! is_array($trace)) + return; + + // Final output + $output = array(); + + foreach ($trace as $entry) + { + $temp = '
  • '; + + if (isset($entry['file'])) + { + $temp .= self::lang('core.error_file_line', preg_replace('!^'.preg_quote(DOCROOT).'!', '', $entry['file']), $entry['line']); + } + + $temp .= '
    ';
+
+			if (isset($entry['class']))
+			{
+				// Add class and call type
+				$temp .= $entry['class'].$entry['type'];
+			}
+
+			// Add function
+			$temp .= $entry['function'].'( ';
+
+			// Add function args
+			if (isset($entry['args']) AND is_array($entry['args']))
+			{
+				// Separator starts as nothing
+				$sep = '';
+
+				while ($arg = array_shift($entry['args']))
+				{
+					if (is_string($arg) AND is_file($arg))
+					{
+						// Remove docroot from filename
+						$arg = preg_replace('!^'.preg_quote(DOCROOT).'!', '', $arg);
+					}
+
+					$temp .= $sep.html::specialchars(print_r($arg, TRUE));
+
+					// Change separator to a comma
+					$sep = ', ';
+				}
+			}
+
+			$temp .= ' )
    • '; + + $output[] = $temp; + } + + return ''; + } + + /** + * Saves the internal caches: configuration, include paths, etc. + * + * @return boolean + */ + public static function internal_cache_save() + { + if ( ! is_array(self::$write_cache)) + return FALSE; + + // Get internal cache names + $caches = array_keys(self::$write_cache); + + // Nothing written + $written = FALSE; + + foreach ($caches as $cache) + { + if (isset(self::$internal_cache[$cache])) + { + // Write the cache file + self::cache_save($cache, self::$internal_cache[$cache], self::$configuration['core']['internal_cache']); + + // A cache has been written + $written = TRUE; + } + } + + return $written; + } + +} // End Kohana + +/** + * Creates a generic i18n exception. + */ +class Kohana_Exception extends Exception { + + // Template file + protected $template = 'kohana_error_page'; + + // Header + protected $header = FALSE; + + // Error code + protected $code = E_KOHANA; + + /** + * Set exception message. + * + * @param string i18n language key for the message + * @param array addition line parameters + */ + public function __construct($error) + { + $args = array_slice(func_get_args(), 1); + + // Fetch the error message + $message = Kohana::lang($error, $args); + + if ($message === $error OR empty($message)) + { + // Unable to locate the message for the error + $message = 'Unknown Exception: '.$error; + } + + // Sets $this->message the proper way + parent::__construct($message); + } + + /** + * Magic method for converting an object to a string. + * + * @return string i18n message + */ + public function __toString() + { + return (string) $this->message; + } + + /** + * Fetch the template name. + * + * @return string + */ + public function getTemplate() + { + return $this->template; + } + + /** + * Sends an Internal Server Error header. + * + * @return void + */ + public function sendHeaders() + { + // Send the 500 header + header('HTTP/1.1 500 Internal Server Error'); + } + +} // End Kohana Exception + +/** + * Creates a custom exception. + */ +class Kohana_User_Exception extends Kohana_Exception { + + /** + * Set exception title and message. + * + * @param string exception title string + * @param string exception message string + * @param string custom error template + */ + public function __construct($title, $message, $template = FALSE) + { + Exception::__construct($message); + + $this->code = $title; + + if ($template !== FALSE) + { + $this->template = $template; + } + } + +} // End Kohana PHP Exception + +/** + * Creates a Page Not Found exception. + */ +class Kohana_404_Exception extends Kohana_Exception { + + protected $code = E_PAGE_NOT_FOUND; + + /** + * Set internal properties. + * + * @param string URL of page + * @param string custom error template + */ + public function __construct($page = FALSE, $template = FALSE) + { + if ($page === FALSE) + { + // Construct the page URI using Router properties + $page = Router::$current_uri.Router::$url_suffix.Router::$query_string; + } + + Exception::__construct(Kohana::lang('core.page_not_found', $page)); + + $this->template = $template; + } + + /** + * Sends "File Not Found" headers, to emulate server behavior. + * + * @return void + */ + public function sendHeaders() + { + // Send the 404 header + header('HTTP/1.1 404 File Not Found'); + } + +} // End Kohana 404 Exception diff --git a/Server/system/core/utf8.php b/Server/system/core/utf8.php new file mode 100644 index 0000000..9f20f42 --- /dev/null +++ b/Server/system/core/utf8.php @@ -0,0 +1,743 @@ +PCRE has not been compiled with UTF-8 support. '. + 'See PCRE Pattern Modifiers '. + 'for more information. This application cannot be run without UTF-8 support.', + E_USER_ERROR + ); +} + +if ( ! extension_loaded('iconv')) +{ + trigger_error + ( + 'The iconv extension is not loaded. '. + 'Without iconv, strings cannot be properly translated to UTF-8 from user input. '. + 'This application cannot be run without UTF-8 support.', + E_USER_ERROR + ); +} + +if (extension_loaded('mbstring') AND (ini_get('mbstring.func_overload') & MB_OVERLOAD_STRING)) +{ + trigger_error + ( + 'The mbstring extension is overloading PHP\'s native string functions. '. + 'Disable this by setting mbstring.func_overload to 0, 1, 4 or 5 in php.ini or a .htaccess file.'. + 'This application cannot be run without UTF-8 support.', + E_USER_ERROR + ); +} + +// Check PCRE support for Unicode properties such as \p and \X. +$ER = error_reporting(0); +define('PCRE_UNICODE_PROPERTIES', (bool) preg_match('/^\pL$/u', 'ñ')); +error_reporting($ER); + +// SERVER_UTF8 ? use mb_* functions : use non-native functions +if (extension_loaded('mbstring')) +{ + mb_internal_encoding('UTF-8'); + define('SERVER_UTF8', TRUE); +} +else +{ + define('SERVER_UTF8', FALSE); +} + +// Convert all global variables to UTF-8. +$_GET = utf8::clean($_GET); +$_POST = utf8::clean($_POST); +$_COOKIE = utf8::clean($_COOKIE); +$_SERVER = utf8::clean($_SERVER); + +if (PHP_SAPI == 'cli') +{ + // Convert command line arguments + $_SERVER['argv'] = utf8::clean($_SERVER['argv']); +} + +final class utf8 { + + // Called methods + static $called = array(); + + /** + * Recursively cleans arrays, objects, and strings. Removes ASCII control + * codes and converts to UTF-8 while silently discarding incompatible + * UTF-8 characters. + * + * @param string string to clean + * @return string + */ + public static function clean($str) + { + if (is_array($str) OR is_object($str)) + { + foreach ($str as $key => $val) + { + // Recursion! + $str[self::clean($key)] = self::clean($val); + } + } + elseif (is_string($str) AND $str !== '') + { + // Remove control characters + $str = self::strip_ascii_ctrl($str); + + if ( ! self::is_ascii($str)) + { + // Disable notices + $ER = error_reporting(~E_NOTICE); + + // iconv is expensive, so it is only used when needed + $str = iconv('UTF-8', 'UTF-8//IGNORE', $str); + + // Turn notices back on + error_reporting($ER); + } + } + + return $str; + } + + /** + * Tests whether a string contains only 7bit ASCII bytes. This is used to + * determine when to use native functions or UTF-8 functions. + * + * @param string string to check + * @return bool + */ + public static function is_ascii($str) + { + return ! preg_match('/[^\x00-\x7F]/S', $str); + } + + /** + * Strips out device control codes in the ASCII range. + * + * @param string string to clean + * @return string + */ + public static function strip_ascii_ctrl($str) + { + return preg_replace('/[\x00-\x08\x0B\x0C\x0E-\x1F\x7F]+/S', '', $str); + } + + /** + * Strips out all non-7bit ASCII bytes. + * + * @param string string to clean + * @return string + */ + public static function strip_non_ascii($str) + { + return preg_replace('/[^\x00-\x7F]+/S', '', $str); + } + + /** + * Replaces special/accented UTF-8 characters by ASCII-7 'equivalents'. + * + * @author Andreas Gohr + * + * @param string string to transliterate + * @param integer -1 lowercase only, +1 uppercase only, 0 both cases + * @return string + */ + public static function transliterate_to_ascii($str, $case = 0) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _transliterate_to_ascii($str, $case); + } + + /** + * Returns the length of the given string. + * @see http://php.net/strlen + * + * @param string string being measured for length + * @return integer + */ + public static function strlen($str) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strlen($str); + } + + /** + * Finds position of first occurrence of a UTF-8 string. + * @see http://php.net/strlen + * + * @author Harry Fuecks + * + * @param string haystack + * @param string needle + * @param integer offset from which character in haystack to start searching + * @return integer position of needle + * @return boolean FALSE if the needle is not found + */ + public static function strpos($str, $search, $offset = 0) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strpos($str, $search, $offset); + } + + /** + * Finds position of last occurrence of a char in a UTF-8 string. + * @see http://php.net/strrpos + * + * @author Harry Fuecks + * + * @param string haystack + * @param string needle + * @param integer offset from which character in haystack to start searching + * @return integer position of needle + * @return boolean FALSE if the needle is not found + */ + public static function strrpos($str, $search, $offset = 0) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strrpos($str, $search, $offset); + } + + /** + * Returns part of a UTF-8 string. + * @see http://php.net/substr + * + * @author Chris Smith + * + * @param string input string + * @param integer offset + * @param integer length limit + * @return string + */ + public static function substr($str, $offset, $length = NULL) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _substr($str, $offset, $length); + } + + /** + * Replaces text within a portion of a UTF-8 string. + * @see http://php.net/substr_replace + * + * @author Harry Fuecks + * + * @param string input string + * @param string replacement string + * @param integer offset + * @return string + */ + public static function substr_replace($str, $replacement, $offset, $length = NULL) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _substr_replace($str, $replacement, $offset, $length); + } + + /** + * Makes a UTF-8 string lowercase. + * @see http://php.net/strtolower + * + * @author Andreas Gohr + * + * @param string mixed case string + * @return string + */ + public static function strtolower($str) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strtolower($str); + } + + /** + * Makes a UTF-8 string uppercase. + * @see http://php.net/strtoupper + * + * @author Andreas Gohr + * + * @param string mixed case string + * @return string + */ + public static function strtoupper($str) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strtoupper($str); + } + + /** + * Makes a UTF-8 string's first character uppercase. + * @see http://php.net/ucfirst + * + * @author Harry Fuecks + * + * @param string mixed case string + * @return string + */ + public static function ucfirst($str) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _ucfirst($str); + } + + /** + * Makes the first character of every word in a UTF-8 string uppercase. + * @see http://php.net/ucwords + * + * @author Harry Fuecks + * + * @param string mixed case string + * @return string + */ + public static function ucwords($str) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _ucwords($str); + } + + /** + * Case-insensitive UTF-8 string comparison. + * @see http://php.net/strcasecmp + * + * @author Harry Fuecks + * + * @param string string to compare + * @param string string to compare + * @return integer less than 0 if str1 is less than str2 + * @return integer greater than 0 if str1 is greater than str2 + * @return integer 0 if they are equal + */ + public static function strcasecmp($str1, $str2) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strcasecmp($str1, $str2); + } + + /** + * Returns a string or an array with all occurrences of search in subject (ignoring case). + * replaced with the given replace value. + * @see http://php.net/str_ireplace + * + * @note It's not fast and gets slower if $search and/or $replace are arrays. + * @author Harry Fuecks + * + * @param string input string + * @param string needle + * @return string matched substring if found + * @return boolean FALSE if the substring was not found + */ + public static function stristr($str, $search) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _stristr($str, $search); + } + + /** + * Finds the length of the initial segment matching mask. + * @see http://php.net/strspn + * + * @author Harry Fuecks + * + * @param string input string + * @param string mask for search + * @param integer start position of the string to examine + * @param integer length of the string to examine + * @return integer length of the initial segment that contains characters in the mask + */ + public static function strspn($str, $mask, $offset = NULL, $length = NULL) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strspn($str, $mask, $offset, $length); + } + + /** + * Finds the length of the initial segment not matching mask. + * @see http://php.net/strcspn + * + * @author Harry Fuecks + * + * @param string input string + * @param string mask for search + * @param integer start position of the string to examine + * @param integer length of the string to examine + * @return integer length of the initial segment that contains characters not in the mask + */ + public static function strcspn($str, $mask, $offset = NULL, $length = NULL) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strcspn($str, $mask, $offset, $length); + } + + /** + * Pads a UTF-8 string to a certain length with another string. + * @see http://php.net/str_pad + * + * @author Harry Fuecks + * + * @param string input string + * @param integer desired string length after padding + * @param string string to use as padding + * @param string padding type: STR_PAD_RIGHT, STR_PAD_LEFT, or STR_PAD_BOTH + * @return string + */ + public static function str_pad($str, $final_str_length, $pad_str = ' ', $pad_type = STR_PAD_RIGHT) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _str_pad($str, $final_str_length, $pad_str, $pad_type); + } + + /** + * Converts a UTF-8 string to an array. + * @see http://php.net/str_split + * + * @author Harry Fuecks + * + * @param string input string + * @param integer maximum length of each chunk + * @return array + */ + public static function str_split($str, $split_length = 1) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _str_split($str, $split_length); + } + + /** + * Reverses a UTF-8 string. + * @see http://php.net/strrev + * + * @author Harry Fuecks + * + * @param string string to be reversed + * @return string + */ + public static function strrev($str) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _strrev($str); + } + + /** + * Strips whitespace (or other UTF-8 characters) from the beginning and + * end of a string. + * @see http://php.net/trim + * + * @author Andreas Gohr + * + * @param string input string + * @param string string of characters to remove + * @return string + */ + public static function trim($str, $charlist = NULL) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _trim($str, $charlist); + } + + /** + * Strips whitespace (or other UTF-8 characters) from the beginning of a string. + * @see http://php.net/ltrim + * + * @author Andreas Gohr + * + * @param string input string + * @param string string of characters to remove + * @return string + */ + public static function ltrim($str, $charlist = NULL) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _ltrim($str, $charlist); + } + + /** + * Strips whitespace (or other UTF-8 characters) from the end of a string. + * @see http://php.net/rtrim + * + * @author Andreas Gohr + * + * @param string input string + * @param string string of characters to remove + * @return string + */ + public static function rtrim($str, $charlist = NULL) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _rtrim($str, $charlist); + } + + /** + * Returns the unicode ordinal for a character. + * @see http://php.net/ord + * + * @author Harry Fuecks + * + * @param string UTF-8 encoded character + * @return integer + */ + public static function ord($chr) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _ord($chr); + } + + /** + * Takes an UTF-8 string and returns an array of ints representing the Unicode characters. + * Astral planes are supported i.e. the ints in the output can be > 0xFFFF. + * Occurrances of the BOM are ignored. Surrogates are not allowed. + * + * The Original Code is Mozilla Communicator client code. + * The Initial Developer of the Original Code is Netscape Communications Corporation. + * Portions created by the Initial Developer are Copyright (C) 1998 the Initial Developer. + * Ported to PHP by Henri Sivonen , see http://hsivonen.iki.fi/php-utf8/. + * Slight modifications to fit with phputf8 library by Harry Fuecks . + * + * @param string UTF-8 encoded string + * @return array unicode code points + * @return boolean FALSE if the string is invalid + */ + public static function to_unicode($str) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _to_unicode($str); + } + + /** + * Takes an array of ints representing the Unicode characters and returns a UTF-8 string. + * Astral planes are supported i.e. the ints in the input can be > 0xFFFF. + * Occurrances of the BOM are ignored. Surrogates are not allowed. + * + * The Original Code is Mozilla Communicator client code. + * The Initial Developer of the Original Code is Netscape Communications Corporation. + * Portions created by the Initial Developer are Copyright (C) 1998 the Initial Developer. + * Ported to PHP by Henri Sivonen , see http://hsivonen.iki.fi/php-utf8/. + * Slight modifications to fit with phputf8 library by Harry Fuecks . + * + * @param array unicode code points representing a string + * @return string utf8 string of characters + * @return boolean FALSE if a code point cannot be found + */ + public static function from_unicode($arr) + { + if ( ! isset(self::$called[__FUNCTION__])) + { + require SYSPATH.'core/utf8/'.__FUNCTION__.EXT; + + // Function has been called + self::$called[__FUNCTION__] = TRUE; + } + + return _from_unicode($arr); + } + +} // End utf8 \ No newline at end of file diff --git a/Server/system/core/utf8/from_unicode.php b/Server/system/core/utf8/from_unicode.php new file mode 100644 index 0000000..66c6742 --- /dev/null +++ b/Server/system/core/utf8/from_unicode.php @@ -0,0 +1,68 @@ += 0) AND ($arr[$k] <= 0x007f)) + { + echo chr($arr[$k]); + } + // 2 byte sequence + elseif ($arr[$k] <= 0x07ff) + { + echo chr(0xc0 | ($arr[$k] >> 6)); + echo chr(0x80 | ($arr[$k] & 0x003f)); + } + // Byte order mark (skip) + elseif ($arr[$k] == 0xFEFF) + { + // nop -- zap the BOM + } + // Test for illegal surrogates + elseif ($arr[$k] >= 0xD800 AND $arr[$k] <= 0xDFFF) + { + // Found a surrogate + trigger_error('utf8::from_unicode: Illegal surrogate at index: '.$k.', value: '.$arr[$k], E_USER_WARNING); + return FALSE; + } + // 3 byte sequence + elseif ($arr[$k] <= 0xffff) + { + echo chr(0xe0 | ($arr[$k] >> 12)); + echo chr(0x80 | (($arr[$k] >> 6) & 0x003f)); + echo chr(0x80 | ($arr[$k] & 0x003f)); + } + // 4 byte sequence + elseif ($arr[$k] <= 0x10ffff) + { + echo chr(0xf0 | ($arr[$k] >> 18)); + echo chr(0x80 | (($arr[$k] >> 12) & 0x3f)); + echo chr(0x80 | (($arr[$k] >> 6) & 0x3f)); + echo chr(0x80 | ($arr[$k] & 0x3f)); + } + // Out of range + else + { + trigger_error('utf8::from_unicode: Codepoint out of Unicode range at index: '.$k.', value: '.$arr[$k], E_USER_WARNING); + return FALSE; + } + } + + $result = ob_get_contents(); + ob_end_clean(); + return $result; +} diff --git a/Server/system/core/utf8/ltrim.php b/Server/system/core/utf8/ltrim.php new file mode 100644 index 0000000..556fe07 --- /dev/null +++ b/Server/system/core/utf8/ltrim.php @@ -0,0 +1,22 @@ += 0 AND $ord0 <= 127) + { + return $ord0; + } + + if ( ! isset($chr[1])) + { + trigger_error('Short sequence - at least 2 bytes expected, only 1 seen', E_USER_WARNING); + return FALSE; + } + + $ord1 = ord($chr[1]); + + if ($ord0 >= 192 AND $ord0 <= 223) + { + return ($ord0 - 192) * 64 + ($ord1 - 128); + } + + if ( ! isset($chr[2])) + { + trigger_error('Short sequence - at least 3 bytes expected, only 2 seen', E_USER_WARNING); + return FALSE; + } + + $ord2 = ord($chr[2]); + + if ($ord0 >= 224 AND $ord0 <= 239) + { + return ($ord0 - 224) * 4096 + ($ord1 - 128) * 64 + ($ord2 - 128); + } + + if ( ! isset($chr[3])) + { + trigger_error('Short sequence - at least 4 bytes expected, only 3 seen', E_USER_WARNING); + return FALSE; + } + + $ord3 = ord($chr[3]); + + if ($ord0 >= 240 AND $ord0 <= 247) + { + return ($ord0 - 240) * 262144 + ($ord1 - 128) * 4096 + ($ord2-128) * 64 + ($ord3 - 128); + } + + if ( ! isset($chr[4])) + { + trigger_error('Short sequence - at least 5 bytes expected, only 4 seen', E_USER_WARNING); + return FALSE; + } + + $ord4 = ord($chr[4]); + + if ($ord0 >= 248 AND $ord0 <= 251) + { + return ($ord0 - 248) * 16777216 + ($ord1-128) * 262144 + ($ord2 - 128) * 4096 + ($ord3 - 128) * 64 + ($ord4 - 128); + } + + if ( ! isset($chr[5])) + { + trigger_error('Short sequence - at least 6 bytes expected, only 5 seen', E_USER_WARNING); + return FALSE; + } + + if ($ord0 >= 252 AND $ord0 <= 253) + { + return ($ord0 - 252) * 1073741824 + ($ord1 - 128) * 16777216 + ($ord2 - 128) * 262144 + ($ord3 - 128) * 4096 + ($ord4 - 128) * 64 + (ord($chr[5]) - 128); + } + + if ($ord0 >= 254 AND $ord0 <= 255) + { + trigger_error('Invalid UTF-8 with surrogate ordinal '.$ord0, E_USER_WARNING); + return FALSE; + } +} \ No newline at end of file diff --git a/Server/system/core/utf8/rtrim.php b/Server/system/core/utf8/rtrim.php new file mode 100644 index 0000000..efa0e19 --- /dev/null +++ b/Server/system/core/utf8/rtrim.php @@ -0,0 +1,22 @@ + $val) + { + $str[$key] = utf8::str_ireplace($search, $replace, $val, $count); + } + return $str; + } + + if (is_array($search)) + { + $keys = array_keys($search); + + foreach ($keys as $k) + { + if (is_array($replace)) + { + if (array_key_exists($k, $replace)) + { + $str = utf8::str_ireplace($search[$k], $replace[$k], $str, $count); + } + else + { + $str = utf8::str_ireplace($search[$k], '', $str, $count); + } + } + else + { + $str = utf8::str_ireplace($search[$k], $replace, $str, $count); + } + } + return $str; + } + + $search = utf8::strtolower($search); + $str_lower = utf8::strtolower($str); + + $total_matched_strlen = 0; + $i = 0; + + while (preg_match('/(.*?)'.preg_quote($search, '/').'/s', $str_lower, $matches)) + { + $matched_strlen = strlen($matches[0]); + $str_lower = substr($str_lower, $matched_strlen); + + $offset = $total_matched_strlen + strlen($matches[1]) + ($i * (strlen($replace) - 1)); + $str = substr_replace($str, $replace, $offset, strlen($search)); + + $total_matched_strlen += $matched_strlen; + $i++; + } + + $count += $i; + return $str; +} diff --git a/Server/system/core/utf8/str_pad.php b/Server/system/core/utf8/str_pad.php new file mode 100644 index 0000000..aab4ccc --- /dev/null +++ b/Server/system/core/utf8/str_pad.php @@ -0,0 +1,54 @@ +0x0061, 0x03A6=>0x03C6, 0x0162=>0x0163, 0x00C5=>0x00E5, 0x0042=>0x0062, + 0x0139=>0x013A, 0x00C1=>0x00E1, 0x0141=>0x0142, 0x038E=>0x03CD, 0x0100=>0x0101, + 0x0490=>0x0491, 0x0394=>0x03B4, 0x015A=>0x015B, 0x0044=>0x0064, 0x0393=>0x03B3, + 0x00D4=>0x00F4, 0x042A=>0x044A, 0x0419=>0x0439, 0x0112=>0x0113, 0x041C=>0x043C, + 0x015E=>0x015F, 0x0143=>0x0144, 0x00CE=>0x00EE, 0x040E=>0x045E, 0x042F=>0x044F, + 0x039A=>0x03BA, 0x0154=>0x0155, 0x0049=>0x0069, 0x0053=>0x0073, 0x1E1E=>0x1E1F, + 0x0134=>0x0135, 0x0427=>0x0447, 0x03A0=>0x03C0, 0x0418=>0x0438, 0x00D3=>0x00F3, + 0x0420=>0x0440, 0x0404=>0x0454, 0x0415=>0x0435, 0x0429=>0x0449, 0x014A=>0x014B, + 0x0411=>0x0431, 0x0409=>0x0459, 0x1E02=>0x1E03, 0x00D6=>0x00F6, 0x00D9=>0x00F9, + 0x004E=>0x006E, 0x0401=>0x0451, 0x03A4=>0x03C4, 0x0423=>0x0443, 0x015C=>0x015D, + 0x0403=>0x0453, 0x03A8=>0x03C8, 0x0158=>0x0159, 0x0047=>0x0067, 0x00C4=>0x00E4, + 0x0386=>0x03AC, 0x0389=>0x03AE, 0x0166=>0x0167, 0x039E=>0x03BE, 0x0164=>0x0165, + 0x0116=>0x0117, 0x0108=>0x0109, 0x0056=>0x0076, 0x00DE=>0x00FE, 0x0156=>0x0157, + 0x00DA=>0x00FA, 0x1E60=>0x1E61, 0x1E82=>0x1E83, 0x00C2=>0x00E2, 0x0118=>0x0119, + 0x0145=>0x0146, 0x0050=>0x0070, 0x0150=>0x0151, 0x042E=>0x044E, 0x0128=>0x0129, + 0x03A7=>0x03C7, 0x013D=>0x013E, 0x0422=>0x0442, 0x005A=>0x007A, 0x0428=>0x0448, + 0x03A1=>0x03C1, 0x1E80=>0x1E81, 0x016C=>0x016D, 0x00D5=>0x00F5, 0x0055=>0x0075, + 0x0176=>0x0177, 0x00DC=>0x00FC, 0x1E56=>0x1E57, 0x03A3=>0x03C3, 0x041A=>0x043A, + 0x004D=>0x006D, 0x016A=>0x016B, 0x0170=>0x0171, 0x0424=>0x0444, 0x00CC=>0x00EC, + 0x0168=>0x0169, 0x039F=>0x03BF, 0x004B=>0x006B, 0x00D2=>0x00F2, 0x00C0=>0x00E0, + 0x0414=>0x0434, 0x03A9=>0x03C9, 0x1E6A=>0x1E6B, 0x00C3=>0x00E3, 0x042D=>0x044D, + 0x0416=>0x0436, 0x01A0=>0x01A1, 0x010C=>0x010D, 0x011C=>0x011D, 0x00D0=>0x00F0, + 0x013B=>0x013C, 0x040F=>0x045F, 0x040A=>0x045A, 0x00C8=>0x00E8, 0x03A5=>0x03C5, + 0x0046=>0x0066, 0x00DD=>0x00FD, 0x0043=>0x0063, 0x021A=>0x021B, 0x00CA=>0x00EA, + 0x0399=>0x03B9, 0x0179=>0x017A, 0x00CF=>0x00EF, 0x01AF=>0x01B0, 0x0045=>0x0065, + 0x039B=>0x03BB, 0x0398=>0x03B8, 0x039C=>0x03BC, 0x040C=>0x045C, 0x041F=>0x043F, + 0x042C=>0x044C, 0x00DE=>0x00FE, 0x00D0=>0x00F0, 0x1EF2=>0x1EF3, 0x0048=>0x0068, + 0x00CB=>0x00EB, 0x0110=>0x0111, 0x0413=>0x0433, 0x012E=>0x012F, 0x00C6=>0x00E6, + 0x0058=>0x0078, 0x0160=>0x0161, 0x016E=>0x016F, 0x0391=>0x03B1, 0x0407=>0x0457, + 0x0172=>0x0173, 0x0178=>0x00FF, 0x004F=>0x006F, 0x041B=>0x043B, 0x0395=>0x03B5, + 0x0425=>0x0445, 0x0120=>0x0121, 0x017D=>0x017E, 0x017B=>0x017C, 0x0396=>0x03B6, + 0x0392=>0x03B2, 0x0388=>0x03AD, 0x1E84=>0x1E85, 0x0174=>0x0175, 0x0051=>0x0071, + 0x0417=>0x0437, 0x1E0A=>0x1E0B, 0x0147=>0x0148, 0x0104=>0x0105, 0x0408=>0x0458, + 0x014C=>0x014D, 0x00CD=>0x00ED, 0x0059=>0x0079, 0x010A=>0x010B, 0x038F=>0x03CE, + 0x0052=>0x0072, 0x0410=>0x0430, 0x0405=>0x0455, 0x0402=>0x0452, 0x0126=>0x0127, + 0x0136=>0x0137, 0x012A=>0x012B, 0x038A=>0x03AF, 0x042B=>0x044B, 0x004C=>0x006C, + 0x0397=>0x03B7, 0x0124=>0x0125, 0x0218=>0x0219, 0x00DB=>0x00FB, 0x011E=>0x011F, + 0x041E=>0x043E, 0x1E40=>0x1E41, 0x039D=>0x03BD, 0x0106=>0x0107, 0x03AB=>0x03CB, + 0x0426=>0x0446, 0x00DE=>0x00FE, 0x00C7=>0x00E7, 0x03AA=>0x03CA, 0x0421=>0x0441, + 0x0412=>0x0432, 0x010E=>0x010F, 0x00D8=>0x00F8, 0x0057=>0x0077, 0x011A=>0x011B, + 0x0054=>0x0074, 0x004A=>0x006A, 0x040B=>0x045B, 0x0406=>0x0456, 0x0102=>0x0103, + 0x039B=>0x03BB, 0x00D1=>0x00F1, 0x041D=>0x043D, 0x038C=>0x03CC, 0x00C9=>0x00E9, + 0x00D0=>0x00F0, 0x0407=>0x0457, 0x0122=>0x0123, + ); + } + + $uni = utf8::to_unicode($str); + + if ($uni === FALSE) + return FALSE; + + for ($i = 0, $c = count($uni); $i < $c; $i++) + { + if (isset($UTF8_UPPER_TO_LOWER[$uni[$i]])) + { + $uni[$i] = $UTF8_UPPER_TO_LOWER[$uni[$i]]; + } + } + + return utf8::from_unicode($uni); +} \ No newline at end of file diff --git a/Server/system/core/utf8/strtoupper.php b/Server/system/core/utf8/strtoupper.php new file mode 100644 index 0000000..f3ded73 --- /dev/null +++ b/Server/system/core/utf8/strtoupper.php @@ -0,0 +1,84 @@ +0x0041, 0x03C6=>0x03A6, 0x0163=>0x0162, 0x00E5=>0x00C5, 0x0062=>0x0042, + 0x013A=>0x0139, 0x00E1=>0x00C1, 0x0142=>0x0141, 0x03CD=>0x038E, 0x0101=>0x0100, + 0x0491=>0x0490, 0x03B4=>0x0394, 0x015B=>0x015A, 0x0064=>0x0044, 0x03B3=>0x0393, + 0x00F4=>0x00D4, 0x044A=>0x042A, 0x0439=>0x0419, 0x0113=>0x0112, 0x043C=>0x041C, + 0x015F=>0x015E, 0x0144=>0x0143, 0x00EE=>0x00CE, 0x045E=>0x040E, 0x044F=>0x042F, + 0x03BA=>0x039A, 0x0155=>0x0154, 0x0069=>0x0049, 0x0073=>0x0053, 0x1E1F=>0x1E1E, + 0x0135=>0x0134, 0x0447=>0x0427, 0x03C0=>0x03A0, 0x0438=>0x0418, 0x00F3=>0x00D3, + 0x0440=>0x0420, 0x0454=>0x0404, 0x0435=>0x0415, 0x0449=>0x0429, 0x014B=>0x014A, + 0x0431=>0x0411, 0x0459=>0x0409, 0x1E03=>0x1E02, 0x00F6=>0x00D6, 0x00F9=>0x00D9, + 0x006E=>0x004E, 0x0451=>0x0401, 0x03C4=>0x03A4, 0x0443=>0x0423, 0x015D=>0x015C, + 0x0453=>0x0403, 0x03C8=>0x03A8, 0x0159=>0x0158, 0x0067=>0x0047, 0x00E4=>0x00C4, + 0x03AC=>0x0386, 0x03AE=>0x0389, 0x0167=>0x0166, 0x03BE=>0x039E, 0x0165=>0x0164, + 0x0117=>0x0116, 0x0109=>0x0108, 0x0076=>0x0056, 0x00FE=>0x00DE, 0x0157=>0x0156, + 0x00FA=>0x00DA, 0x1E61=>0x1E60, 0x1E83=>0x1E82, 0x00E2=>0x00C2, 0x0119=>0x0118, + 0x0146=>0x0145, 0x0070=>0x0050, 0x0151=>0x0150, 0x044E=>0x042E, 0x0129=>0x0128, + 0x03C7=>0x03A7, 0x013E=>0x013D, 0x0442=>0x0422, 0x007A=>0x005A, 0x0448=>0x0428, + 0x03C1=>0x03A1, 0x1E81=>0x1E80, 0x016D=>0x016C, 0x00F5=>0x00D5, 0x0075=>0x0055, + 0x0177=>0x0176, 0x00FC=>0x00DC, 0x1E57=>0x1E56, 0x03C3=>0x03A3, 0x043A=>0x041A, + 0x006D=>0x004D, 0x016B=>0x016A, 0x0171=>0x0170, 0x0444=>0x0424, 0x00EC=>0x00CC, + 0x0169=>0x0168, 0x03BF=>0x039F, 0x006B=>0x004B, 0x00F2=>0x00D2, 0x00E0=>0x00C0, + 0x0434=>0x0414, 0x03C9=>0x03A9, 0x1E6B=>0x1E6A, 0x00E3=>0x00C3, 0x044D=>0x042D, + 0x0436=>0x0416, 0x01A1=>0x01A0, 0x010D=>0x010C, 0x011D=>0x011C, 0x00F0=>0x00D0, + 0x013C=>0x013B, 0x045F=>0x040F, 0x045A=>0x040A, 0x00E8=>0x00C8, 0x03C5=>0x03A5, + 0x0066=>0x0046, 0x00FD=>0x00DD, 0x0063=>0x0043, 0x021B=>0x021A, 0x00EA=>0x00CA, + 0x03B9=>0x0399, 0x017A=>0x0179, 0x00EF=>0x00CF, 0x01B0=>0x01AF, 0x0065=>0x0045, + 0x03BB=>0x039B, 0x03B8=>0x0398, 0x03BC=>0x039C, 0x045C=>0x040C, 0x043F=>0x041F, + 0x044C=>0x042C, 0x00FE=>0x00DE, 0x00F0=>0x00D0, 0x1EF3=>0x1EF2, 0x0068=>0x0048, + 0x00EB=>0x00CB, 0x0111=>0x0110, 0x0433=>0x0413, 0x012F=>0x012E, 0x00E6=>0x00C6, + 0x0078=>0x0058, 0x0161=>0x0160, 0x016F=>0x016E, 0x03B1=>0x0391, 0x0457=>0x0407, + 0x0173=>0x0172, 0x00FF=>0x0178, 0x006F=>0x004F, 0x043B=>0x041B, 0x03B5=>0x0395, + 0x0445=>0x0425, 0x0121=>0x0120, 0x017E=>0x017D, 0x017C=>0x017B, 0x03B6=>0x0396, + 0x03B2=>0x0392, 0x03AD=>0x0388, 0x1E85=>0x1E84, 0x0175=>0x0174, 0x0071=>0x0051, + 0x0437=>0x0417, 0x1E0B=>0x1E0A, 0x0148=>0x0147, 0x0105=>0x0104, 0x0458=>0x0408, + 0x014D=>0x014C, 0x00ED=>0x00CD, 0x0079=>0x0059, 0x010B=>0x010A, 0x03CE=>0x038F, + 0x0072=>0x0052, 0x0430=>0x0410, 0x0455=>0x0405, 0x0452=>0x0402, 0x0127=>0x0126, + 0x0137=>0x0136, 0x012B=>0x012A, 0x03AF=>0x038A, 0x044B=>0x042B, 0x006C=>0x004C, + 0x03B7=>0x0397, 0x0125=>0x0124, 0x0219=>0x0218, 0x00FB=>0x00DB, 0x011F=>0x011E, + 0x043E=>0x041E, 0x1E41=>0x1E40, 0x03BD=>0x039D, 0x0107=>0x0106, 0x03CB=>0x03AB, + 0x0446=>0x0426, 0x00FE=>0x00DE, 0x00E7=>0x00C7, 0x03CA=>0x03AA, 0x0441=>0x0421, + 0x0432=>0x0412, 0x010F=>0x010E, 0x00F8=>0x00D8, 0x0077=>0x0057, 0x011B=>0x011A, + 0x0074=>0x0054, 0x006A=>0x004A, 0x045B=>0x040B, 0x0456=>0x0406, 0x0103=>0x0102, + 0x03BB=>0x039B, 0x00F1=>0x00D1, 0x043D=>0x041D, 0x03CC=>0x038C, 0x00E9=>0x00C9, + 0x00F0=>0x00D0, 0x0457=>0x0407, 0x0123=>0x0122, + ); + } + + $uni = utf8::to_unicode($str); + + if ($uni === FALSE) + return FALSE; + + for ($i = 0, $c = count($uni); $i < $c; $i++) + { + if (isset($UTF8_LOWER_TO_UPPER[$uni[$i]])) + { + $uni[$i] = $UTF8_LOWER_TO_UPPER[$uni[$i]]; + } + } + + return utf8::from_unicode($uni); +} \ No newline at end of file diff --git a/Server/system/core/utf8/substr.php b/Server/system/core/utf8/substr.php new file mode 100644 index 0000000..daf66b8 --- /dev/null +++ b/Server/system/core/utf8/substr.php @@ -0,0 +1,75 @@ += $strlen OR ($length < 0 AND $length <= $offset - $strlen)) + return ''; + + // Whole string + if ($offset == 0 AND ($length === NULL OR $length >= $strlen)) + return $str; + + // Build regex + $regex = '^'; + + // Create an offset expression + if ($offset > 0) + { + // PCRE repeating quantifiers must be less than 65536, so repeat when necessary + $x = (int) ($offset / 65535); + $y = (int) ($offset % 65535); + $regex .= ($x == 0) ? '' : '(?:.{65535}){'.$x.'}'; + $regex .= ($y == 0) ? '' : '.{'.$y.'}'; + } + + // Create a length expression + if ($length === NULL) + { + $regex .= '(.*)'; // No length set, grab it all + } + // Find length from the left (positive length) + elseif ($length > 0) + { + // Reduce length so that it can't go beyond the end of the string + $length = min($strlen - $offset, $length); + + $x = (int) ($length / 65535); + $y = (int) ($length % 65535); + $regex .= '('; + $regex .= ($x == 0) ? '' : '(?:.{65535}){'.$x.'}'; + $regex .= '.{'.$y.'})'; + } + // Find length from the right (negative length) + else + { + $x = (int) (-$length / 65535); + $y = (int) (-$length % 65535); + $regex .= '(.*)'; + $regex .= ($x == 0) ? '' : '(?:.{65535}){'.$x.'}'; + $regex .= '.{'.$y.'}'; + } + + preg_match('/'.$regex.'/us', $str, $matches); + return $matches[1]; +} \ No newline at end of file diff --git a/Server/system/core/utf8/substr_replace.php b/Server/system/core/utf8/substr_replace.php new file mode 100644 index 0000000..45e2d2a --- /dev/null +++ b/Server/system/core/utf8/substr_replace.php @@ -0,0 +1,22 @@ + 0x10FFFF)) + { + trigger_error('utf8::to_unicode: Illegal sequence or codepoint in UTF-8 at byte '.$i, E_USER_WARNING); + return FALSE; + } + + if (0xFEFF != $mUcs4) + { + // BOM is legal but we don't want to output it + $out[] = $mUcs4; + } + + // Initialize UTF-8 cache + $mState = 0; + $mUcs4 = 0; + $mBytes = 1; + } + } + else + { + // ((0xC0 & (*in) != 0x80) AND (mState != 0)) + // Incomplete multi-octet sequence + trigger_error('utf8::to_unicode: Incomplete multi-octet sequence in UTF-8 at byte '.$i, E_USER_WARNING); + return FALSE; + } + } + } + + return $out; +} \ No newline at end of file diff --git a/Server/system/core/utf8/transliterate_to_ascii.php b/Server/system/core/utf8/transliterate_to_ascii.php new file mode 100644 index 0000000..07461fb --- /dev/null +++ b/Server/system/core/utf8/transliterate_to_ascii.php @@ -0,0 +1,77 @@ + 'a', 'ô' => 'o', 'ď' => 'd', 'ḟ' => 'f', 'ë' => 'e', 'Å¡' => 's', 'Æ¡' => 'o', + 'ß' => 'ss', 'ă' => 'a', 'ř' => 'r', 'ț' => 't', 'ň' => 'n', 'ā' => 'a', 'Ä·' => 'k', + 'ŝ' => 's', 'ỳ' => 'y', 'ņ' => 'n', 'ĺ' => 'l', 'ħ' => 'h', 'ṗ' => 'p', 'ó' => 'o', + 'ú' => 'u', 'ě' => 'e', 'é' => 'e', 'ç' => 'c', 'ẁ' => 'w', 'ċ' => 'c', 'õ' => 'o', + 'ṡ' => 's', 'ø' => 'o', 'Ä£' => 'g', 'ŧ' => 't', 'ș' => 's', 'ė' => 'e', 'ĉ' => 'c', + 'ś' => 's', 'î' => 'i', 'ű' => 'u', 'ć' => 'c', 'ę' => 'e', 'ŵ' => 'w', 'ṫ' => 't', + 'Å«' => 'u', 'č' => 'c', 'ö' => 'o', 'è' => 'e', 'Å·' => 'y', 'ą' => 'a', 'ł' => 'l', + 'ų' => 'u', 'ů' => 'u', 'ş' => 's', 'ğ' => 'g', 'ļ' => 'l', 'ƒ' => 'f', 'ž' => 'z', + 'ẃ' => 'w', 'ḃ' => 'b', 'Ã¥' => 'a', 'ì' => 'i', 'ï' => 'i', 'ḋ' => 'd', 'Å¥' => 't', + 'ŗ' => 'r', 'ä' => 'a', 'í' => 'i', 'ŕ' => 'r', 'ê' => 'e', 'ü' => 'u', 'ò' => 'o', + 'ē' => 'e', 'ñ' => 'n', 'ń' => 'n', 'Ä¥' => 'h', 'ĝ' => 'g', 'đ' => 'd', 'ĵ' => 'j', + 'ÿ' => 'y', 'Å©' => 'u', 'Å­' => 'u', 'Æ°' => 'u', 'Å£' => 't', 'ý' => 'y', 'ő' => 'o', + 'â' => 'a', 'ľ' => 'l', 'ẅ' => 'w', 'ż' => 'z', 'Ä«' => 'i', 'ã' => 'a', 'Ä¡' => 'g', + 'ṁ' => 'm', 'ō' => 'o', 'Ä©' => 'i', 'ù' => 'u', 'į' => 'i', 'ź' => 'z', 'á' => 'a', + 'û' => 'u', 'þ' => 'th', 'ð' => 'dh', 'æ' => 'ae', 'µ' => 'u', 'ĕ' => 'e', + ); + } + + $str = str_replace( + array_keys($UTF8_LOWER_ACCENTS), + array_values($UTF8_LOWER_ACCENTS), + $str + ); + } + + if ($case >= 0) + { + if ($UTF8_UPPER_ACCENTS === NULL) + { + $UTF8_UPPER_ACCENTS = array( + 'À' => 'A', 'Ô' => 'O', 'Ď' => 'D', 'Ḟ' => 'F', 'Ë' => 'E', 'Å ' => 'S', 'Æ ' => 'O', + 'Ă' => 'A', 'Ř' => 'R', 'Ț' => 'T', 'Ň' => 'N', 'Ā' => 'A', 'Ķ' => 'K', 'Ĕ' => 'E', + 'Ŝ' => 'S', 'Ỳ' => 'Y', 'Ņ' => 'N', 'Ĺ' => 'L', 'Ħ' => 'H', 'Ṗ' => 'P', 'Ó' => 'O', + 'Ú' => 'U', 'Ě' => 'E', 'É' => 'E', 'Ç' => 'C', 'Ẁ' => 'W', 'Ċ' => 'C', 'Õ' => 'O', + 'á¹ ' => 'S', 'Ø' => 'O', 'Ä¢' => 'G', 'Ŧ' => 'T', 'Ș' => 'S', 'Ė' => 'E', 'Ĉ' => 'C', + 'Ś' => 'S', 'Î' => 'I', 'Å°' => 'U', 'Ć' => 'C', 'Ę' => 'E', 'Å´' => 'W', 'Ṫ' => 'T', + 'Ū' => 'U', 'Č' => 'C', 'Ö' => 'O', 'È' => 'E', 'Ŷ' => 'Y', 'Ą' => 'A', 'Ł' => 'L', + 'Ų' => 'U', 'Å®' => 'U', 'Ş' => 'S', 'Ğ' => 'G', 'Ä»' => 'L', 'Ƒ' => 'F', 'Ž' => 'Z', + 'Ẃ' => 'W', 'Ḃ' => 'B', 'Å' => 'A', 'Ì' => 'I', 'Ï' => 'I', 'Ḋ' => 'D', 'Ť' => 'T', + 'Ŗ' => 'R', 'Ä' => 'A', 'Í' => 'I', 'Ŕ' => 'R', 'Ê' => 'E', 'Ü' => 'U', 'Ò' => 'O', + 'Ē' => 'E', 'Ñ' => 'N', 'Ń' => 'N', 'Ĥ' => 'H', 'Ĝ' => 'G', 'Đ' => 'D', 'Ä´' => 'J', + 'Ÿ' => 'Y', 'Ũ' => 'U', 'Ŭ' => 'U', 'Ư' => 'U', 'Å¢' => 'T', 'Ý' => 'Y', 'Ő' => 'O', + 'Â' => 'A', 'Ľ' => 'L', 'Ẅ' => 'W', 'Å»' => 'Z', 'Ī' => 'I', 'Ã' => 'A', 'Ä ' => 'G', + 'Ṁ' => 'M', 'Ō' => 'O', 'Ĩ' => 'I', 'Ù' => 'U', 'Ä®' => 'I', 'Ź' => 'Z', 'Á' => 'A', + 'Û' => 'U', 'Þ' => 'Th', 'Ð' => 'Dh', 'Æ' => 'Ae', + ); + } + + $str = str_replace( + array_keys($UTF8_UPPER_ACCENTS), + array_values($UTF8_UPPER_ACCENTS), + $str + ); + } + + return $str; +} \ No newline at end of file diff --git a/Server/system/core/utf8/trim.php b/Server/system/core/utf8/trim.php new file mode 100644 index 0000000..7434102 --- /dev/null +++ b/Server/system/core/utf8/trim.php @@ -0,0 +1,17 @@ +)Tt-1e7&nrj4#POgFbGNC_g8gqAnG{J_dU;i&%A$pw{p5pS65e` zI(6#QsZ-S*LJ1)r9AuK)qsNf`{ob&>MF{PP)FwTJz>9qv;9~eJo##EvqkltRLTgOkDJ8pq<*G`-V z3A^digwio3f6eNYPT0nHTyHx83HFyfFX4P3&eJDMo;fFOWY6z#K9i6ZO(&L4pE9br zwkgrS@@z9UPT#fk^E8tFm zL_CB^4-hIXl{Nu;TzVY%6Vg+_w@6O|e@5B{{5k1);M=90z+aGd0e?|C0Q{hI2>6@Q zQQ+_CUlOW+rGG`3{!2Yx_Pn7dj=cx>$Fc7XBlvMpUw#xR{lsyAI1cVR80murKI8^|?+}sm zXHR3i9f^1HnCTNq;^c{wCz4={MqV>sHx7)LKxI5p#d*A_50#b(4p5&;DD{$B9NVH* zl1O{fiF6}<$UxM5Bq=5n$P_Y@RFXyHUb2)tMAniGWHZ@Hs>p8g3VEHpP2MNR2sMaW zB97z4(fg}o&tIjy&r>u!ANNM@iXJD4l;|;lW&zv*P)H z7I~YzQ{E%*mk-JB$REm|$fxD6DuL`)n+5UUAt3TqAk}}YwNU4INzde({^fmwEfy4?H%ny z4YH^~7B$GC23gb~i`oV4vWb{flhx!l#hX%0=_W{?Dc1zKGj%j|G4(PHFbx4d0#F1P z2bcty4wwU20Js})KVT(b4FKbe=?TCyfad|b0DA!k0fzxc0UrTA1$+*u27Cwj9&iy* zM~GPhm;iQw7mx@D0x|(PfIL8ZKqo*qKp((Bz)-+QKrvtfV2XLBxzfDIe6M+_`62UK z^9H1C25dD~nRlCCF~4qp+x))ynE5mFm*!gYIr9(ZOJ+ltbzOJre!YpFsyEeJ>TUE6 zdRXtF_tOXI!}MGA61`lXs?XMM*YDJq=*#uh`Z|4+zD3`r@6`9``}ITmJNk$EC;DlO zPT%O~^$YrC3$dsctHo`Jx1?CoEzK;smbR9T7^Qky23UqzMp%k0<1CXb(=Br>3oLhA z?zgP8tg)=OJYjjp^1Nl2Wv}I+<*?Hf0ZEPKEVOtMdKieSNFx#!R z5?i@#s%^IIcH5n{CAQ_Z)wXrEO|~tzZML1ZJ+}R}L$-Gav3+R!#CF>Dwe1_=kTu%{ z0%azhQC{Xpfu9xlS&p;oInJ*CWx8}u5b|xr|@(+MWmk;`A-V`ae+TB@FN00BJe^PT3IUOIPIl! zs-pQPi1Z1tZ74e-(nTKWR*`-4?D@rVNn_ei87-!H_*fHdXuNqUc4Mh(9cc?ylFID&|??(qMsvYp`agqANhNU z^g#meBJeI8XB8Z06~9cEI*L3UMfom)yF{KpX%kV}DQyP0y+iPPhbSi|Z#+Ni%=5&K zjoO{vBhoj>uq4?AqM)2u?f6|(P#EQyBsd_SQeMDQPDL)`C~+EOQJ1Ujg*KA@#A%31 zd#to*FW4j6dPDRmD2z(@c;yY;CCZP=o)nd|DBq%z_PBBod7>PM%1o34EktQ8L}{X4 z4ZTTlsgZ<4>k@5oDSB@sS(QEz{QN-hvymJ!A5UjKkuKV_fj=UDj8_8pMvo$Aj=-VC zL33mLm`Fdy(;L$hlgXjtYOG~Nt2J&Z(VDTo|ELxZsx(peFT_#k5ILqLIIm*bAj*>{ z|EmR`mnxWXu7)xBmo9Le9uw)ueubY9=_f?`Zh`L>_a=#Z zlLVe8@H~!_2**i8^0X3pG8)x)nMhwI z=n*|J$_M%vk*AQ;EE6uhym-zfkw1guaz~Ngk>ic&ks6JajEekJ z+`)1A4z9gfqx7GR-NOWLg)Kq5@%+&-QCcg~*NQSf7U|D&TzWvHKOpd~Je>;LL)s$J zxA1z!%K4G!q4RkgMf1=ZqPG>_bqmm~KS=EhKldJJ=oMUbckYM;5aO*fMe-dx$+mma>Q0!(^M74HpxZuO!Bz8McqPntM91qkeAf=)c439 z^+WX|^0InN{e--teyV;-4q#UL9XY5U*H4i*^@yc8Ig0s7SMrmkyQLSog7z~B-yIQN zJD>2^B?wPlity2;3h!JC;X5f1zLU1(28cf&)T{tE0Cx6o_&5k!m+-Nk4gd@RV9rU4 z0OJ6Y0Mh|;01F^ z2f(*P>(GlNfC*kBJ7O;&5fB7qA`RAxlm}=J=mfx=Q^K56!kklrT`ghGDHQ`I0Hy$D z0xAKE0QU-S3VI5>IR7h0ND_b6^lL}nTMZokZ$HNP6Qw-LE8y@#{X6(3CA8-rQEw-I z8-~{rZ{FtpBs)wNeF_!Ri0Z4^PkJ6#VjcjlN%A z`8S{cjMx9>vj2^@jof=|LwhziTn=qLGDi?u_MA?x_{BKY3V9pnM)}ux z_{$<(26f7=C&QKw_}JUnIp_3yW(hId&Zu}@r7UA_nQe+`Sm5^l1OW8 zlm0r>zexF?>C0a|y^uu1zj$KfOIN)>jT8S{I3IB_k9>&~{#Ro!q%&r7{I?z?k-^wo z>BPEQI)X$p5Ew?@O!ySD5ERlBL4{{A8@qR#A(%)D1T$%gpo{r~g|tSnk~{<($w#nb z1*8pekOBlJX^Y?@?GW5p6KRhfvz)75tc-LZKCFyfNBmeB=}6+RigG>ndGB#{FMDdZqRh`ff7f<2ngl#ZgTzHsX)2DHG?S#$T$+o0-R)>Ql0iGr4kV6t zrkzQ=R3?>?Om&8eJt5e&R|$N9x`1S1|K1|f6nlx!kOb@wy$*CrWD#1&fmY{jFQIi@ zX!T^&RTgrf2nkR{duyV-O`>(pqAhjNmKM>LR?(I=(Ux}6mJZRDPOOG?L#aIw+@vRh zhx9`5iq`dE&8!bn`XTs9e}p)4BSJiO?fwpJ&s#kak~tXdF$BRAlYpVnKgr}~gcLFi zApn^ej#eCj5E7D+DkLKfD{-Sx6D}W$kdF)@AF7ZBvycX}kOr%e1}Av}A(K3bkcHjB zPXm7jp()nvo`vLZMQBF;fY2QKVxI%P3n7QRh|mK2i1z^J($kXc!(Q1|LWXjM^yCWZ zX-(ch$P+Tun!JgSCnTvgc?%&=$dgKrAY==v(u7oLLaJ2q0YWx8j*w4IAmo#i2>Ij` zLO%HuLUZytf+nO*!>-(~fmb7F)K2XQzvx-cTpE`H+2K|P!Dh}e`e~#YGfNB ze+5GF3WVh8G(9B zs4gVei$37ftMwYlE+yk2`{~eknP~H-;BYgvWlOYPYqUr{^j86-y&ZBELb|VmR9_F- z9RSI^Nob;5AZd4!yU5+-9!S{|$k+Yk0gQ;tpnFz9&K@Rf#47MQ$k}@GduX1G&^S9G zH!nhBUV_Z*g`6COl)MhPI1Cwh2d(}-G{{HL9bZCYM4&4ebc7eWAr3kr2`!Qej^~1} z9cX8%41K*4^;@K$L9fOt7(gcmR+4}HF2E4+E~~(@n*nO@n%4Ycr&0xycsZ6ycsZ6ycsZ6ycsZ6ycsZ6 zyctj;-V9hUoTh0NNx$8^yfPj%O3;RU{{a)4m65&(Oq5H7PGykNwMbb< z9>M&LIC5K%3Ejhl z?qNdrFrj-G-pRoGI^-Mz!y5wUar_>EiP}=~0|LWa0~c_-h``7t1V*mFE@V`r8jgH? zWYmgvb|y3#6FQ6u?Zt%NVq)B6G@iyI4<9!fZ9<#in1U5~MuQaZ7YXgfgx+F8V=>y4 zHbr_f+6>1WnuB9Y+7d^u!x+t@c{sMAZE)n8j0qja(Ce-Pemw=Z#hAAxT~LD zjq`rEDkCL|HRR_xb@T{+4R1I>f;sk043n^%@7Xz66>jJ+3O>@B|m zd3E%UWzuqKh4hfLN?I*FBCVAki{3$gq(AWe9hUC&2Z8sn;Jq6>jrX*_fvf$%!PRVy zd=|Y2eO6AyZVTuFj3STXG$k6d6J(r(ogI>@GQ5EyNir%E8AN`%qRS+R`^dm?-AhQA z1S1jEYk288Z8AMmM99W3PVlSvas9%z3iep=Hc?7I1%9?kNaYx04pi}US;77b+6Rdm zGz}pO=*x6Jy(lF~A*qYhU3yu1jkmq@vGj@bx%91co^@tj*^StjGltD#mDpW#KU>Nk zXYaGGWmmElLncOk?mgLgp zImz>q?@4|s`9MmGl)forQyxosGUe5j4^mF1oK5*D;0q)Nx(E6PZVn6&+!7cSm><{` zI28Cea4PWEz=ePj^aV46t%Dtcor1lCCBbRI<-yg#Ex~QU?ZF+v7eg#$4%tKgP+}-K zlp0D8WrdoDdWZUk?oK7Ca;iDin(9jprnX4EKDBFVuhg4T$E22~E>7K^`evGxW=V6U zC8UMYGSZr+%};wi?Su3*OiDUt_RJigS&{X4)|Xk|W-rYCb2EFhR?QQ0Cgt4LGQMTY zi*H{1(wE>Rxys9#f|qxL zm&@6c>_hgwT#Pq%rprs^mGTC8tGrh}D8D7YD}UhJ>%xMSV!X@@H4AkFF9(NKrb?-5swLHt z8kd@u+CH@lcsVe&D77T@&eWxXm!>plT6|itF)v~Cw9o9ES(I5Oc==7%_u!=!yd*i} zb7nQ-B{4|kC(g^rnaJyr*CGca2O_UV_C;QfY>zx2*&2B!@>Jx>$P`i9} zp6zkA``Pf>HfQtC=AF$sn{+neth4q??d96NwR>uJ)mGJRtKD3?zIJu({k4l~D{JS} z&aRzVJH2*V?bO;T5TTq){n^zmE zZBm<9n@}59^KQ-Inm1}*t=U)ea?Oi1yJ}vj*-`U&&8C`1YnIn6t65s}K+SzMOKR?| zxxHpi&CHs~HDhbW)O4@8p(dyL`|3YepRN9?`c(C&)t^+~Sv{ya@5~ox*w;tDe&_3* zU+?&8(N|r*y6&rjFW>oc>zDU`vG?;SpN~6z`1B5MlGo|AJI+|YvvB?V|Ns779Kh~7 zyjNw46}J^}5U>Ei_3kF<)Rz%s{~Fx~*blfJa1d}2um}Kelaz!Q-WDkZ5CVP*aXO$2 z@GlT|j{@IlCJh9jOp5*>p-kyDKpEgL0DBFjseq#~;Ctmh1Yl)L!fKcFNet#9{uJ;z zfbXUI67VhH4gmab0<7dl{T9UVEhh(nk3yUS;B_rRoD1j(d@SNl0OXaYA_gCl!3TLc z;@bdofIozIUKHfji0_Gl{4nCj052iW8pM#PhtFQ7mhzA1j zOa=8ynE=53N<3oJHwEpa^h3N2@G5Yg7c!Xwz9^t8E7qfA0v4LA#Y3gRCC;G2TB zLRCq?2OP2zK)C_bUs;Jb2Fkew#L5ybvz)R(I#KWVYyo30bC@5&30C>ki zIf@wa5||GhavN9#*aiF?Vzhk#?W=|mgXREaQ_V&E3E&iP@Hp@%z+ZuPLkyY&7l7m0 zfr|hGINA@A z1o)$f%K_7XZ$vy3fVNeiMhw0L(Vi;m9^4WI^)1BUKL_<~#M`5w9zl$EvpA^WPZ0GE zz6c!r2}uA396Sj@9yzFJvycs72mT>q)G6c#{t@B?KqByCh?AqBf={8;D5xh8r$+%h zpGgQj2xTGvNyOkos5x-(G=#c`czwaw5af%4`e($00e1sOyM$0j6ic)e#Go@(2EGEZ z3ILtjLx?Q^D{$~F)d2vl+FHcme<~V81K(2904;z&i?}`Ddf?zeY8OCP;Cm56t~h9r ztJHyjn}ENHxCk%?_#24PCaLIO+M9^)1S|#)o~JGafY%y$n98pKw7(IO2AVl&ke4(Q z0JLg9B6b2?!2f|5a-IgBYCjPcQg2y*%{CiIQW=Z1Q-w8jkpX@0UT|d^>`G_pegIi zD40_be*^dydGL&^?+M9X2pkW}M*DHlAzRJRCe0u}`fkLnqM*M_;3fp1Y#lt$!83Cv z0Y8p-7T`AEkd2n$2?zai#4V$se?iE_H>03~mWzLk0=`s1Esc}hWP5GUm&;{Kkf}uFo)HM2`d~r z{4-Xp8rb0}cfyzLh9BBXe8dlLbv(S(i3I+6!oB7J5`_Obm8AW`p9ph0=2Oi57hc6q z*tH$TI|W@xSNP1k!(-kPp7P$93-%SW)&ZDnbHDf?_``?5`#2QyEog&8`cAYG<_o5)~ zdKZ4Vz2G}az_`chA0#~ZT~K--aQ!5`i)^OHv5LBk%z$Em89;UAIA|#+#maFJzK5Tg zKbfbME5}tYXemcMUjb#Cqvem=oONnyhi$HeN-z|wfT@o ziOgg9be)lSlcZ-$Uy{H?~ z1`opn@W+$!wC>$74Dpsi%VS2%c)g4@@;GHPaE&B}t*|fEx2Q=OCCQ}Kp=0M-6X&sW z$Ij(?Tp?FR$Q2qVle!r!sjkLYquDS0FkQ_Cx8ovbq!8N70u3=a>~^p*<|1pc+fJP} z73#z3b{;x*sP2&SJW8v+P5c8!K z(71ku?FI~JSJ+RcQnz^%+7B4ezTJTS%2Rdk*43fDN7z=W2DC=&Yf-37icPXgB$M;l z>0?Jh;f0Pz^Kz*x4K+@4(Fq%+CL5LG^~a^=90d0^pvT53`%y-K+#GJ3Y*xmSIFDnj zlw`q2KN4(`&lN~%l9U(+%BUh)<2^2?-DWkLG*xEArn~icDd@a#^pGpA5Pw)K>UbzG z?-)Ng&qpDb!gpk$Ax}Po%R@jKDhMbD36R}J?GT#WaU4w?zpae6F`gPkI~bdQ8#NQQ zjx*k+BL^9W=-3JD9%Cn4Y>c5BjWO$tosSyDbOVP+>40@~BkIG*^Tx;WWb`T(n!Ys| z7cNw7-b^{IoKP@BD@{sHY?V`#m#PO_CVH4=CQjYX)SxLlC!-1cc&a^4 z%5z>gbnZ}G-m&U)&hyT{#GyL8$$8bzht>J zs4G8(#<^M|t!+D3zKfrvwWL`<(7GC0q9v7fPP=XP^pf$@%cdH|ljOB)YWJQ#R8qQc z_+;z-voF5+&BrB0?|0Luj2=2CAU&p)4I5YmVGa4LNoH&FBxY@GY2&p4A}N;D{%mrg<8j(|3oBEggE(*s*NK&0|Z3 z4lN#g(}unKe!pq&zSOmKBi1HucxB(ljW6$2R&9BB)iY18Uj1}^+A|NYdiv>AtDhZl zdf&cNr}n*aO8WArA646_eXo9Y>Xp5xgj%na-4W*`DXNwdWFZjB^HoOGY7QSo9b>LH9Uceet}3 z9G{%e!zJ*v5WgrJ?SDZJ(wwn~GgY9&Q!}t!5@oCs%Cgh6AmO4V1Pm%eNLQL*eH`sX z+octRd}(&7#pTO`>i6D!bM3ZqFG?>M759~$zuz#7j~;z2Key)1t}o1(W?wXA{Gx7? zB)R*I`Yw8Mn``XgZGS#1l@54u+?KC;KKbCVq15#CJ!ea=pW9{QzSLC1m^gLXi0kK0 ztN(J~%ViTM-uZRWOWaC>9-3KGM1Lm zlaq_fjfKXO#%5z-Ihq`0KZvsDi?Wl#R*e$VG`q#65!voMb|{ale^Iojpsm~Gl(Gu^ zJbG~5;>GJOT)JeuR$NZ+pd;xhdPjNjWFyO1Z~WfK66J=l%J2nb$whjHn>%e5-K@zN z0d=d1DK4wM%#F`4S#`y%xf}{!_r@pLWQ*CRxt&}Mo(4cQLQQ~x3phWNhgQzTOT$`* zC(WZ|wV>@3md`TS7sgz=xSz2ZU#l@T_oIuAx&7!!oY0Z-@!c=aK55)V=bxPY(w^H+ z;*ILNPDbmDNI3;Bf`x>_4x+K?W~!KEVwH5&%Aa4?@eqXWSVzQY3+P`y7!-tD7&=wECJzlhx%4|em88Fj`3aY*wNXsU3%4Dppu~w)LZ=RzueRc%;>qifeb%Hc=juhjM91?n`u=P!#7#**VeqsrK3JZDsmrEBqq zcm-W+OfVia9x^5feqF{ucL6l$WKOt=T!IxXR-!8XnJQC7Ei=&>1fqyuXhD0yRzdrp z%e!#M1yv)eCquEwTwC|8(uWLt6>JZq^WfW0k%R4B?b;6yn}Z}sTbWzw@+jo7h&+*l z(L5w9@^BGS3NrE`Q8bOp#>aHh{S?b9pS^L{xyzNY{`dfVT?0U86Vg8%vU-WbMrKMS ziKR-J?KYR!W{o2{jZ;l_-AUb+WONR0o;lBRjmQV+M@e*Kj3K^(5_F*Z-8ht^!V|B0GGt*rfR~m3+&m^Up zr3`~X^I(cOIW1c!X(~RqX7%dCEj1T<|0?NRkkIyZ=bVRyqA$$#aB8__r*R8F4y9&h zaT6grPBy0nQ3SMWX>ZLsaqFpzTi5S-*Enljn)St$srvI99^J9KYINTA?JE~Ae%Llu zS(DT9)n^vJ7)(6zhd+LimrqkyuHLb(>cw#nK6KXuixxme;g683P!GNnY-2b>DlzM3 zTB7Ub{#3V;8FmQw484p=+*Wkin8RX{+|CP77F=7nIPa_LIv(qIE-xl9ke2B9zO$8? z(owsE=AbQTXHntkTV)+`OW!IRKRAZm0(o)^S#e{69hH@Eyah}7?P+f+tCC-8s<)Ne z>pi7jx`u6C)MajHK`u-oSHASFA+g={!@jSdDJ?%tlZ`Xq)5|QeuGUb?X~txBp-!J@ zz_mfi^JuTR=+go6TsVWN$#W7*Rp(4cskaoxZ;?VCWAt-l&O? z@t;ncW`1(jhON(T9C2U4Q04e$V@P_sap9Z482{j{zkJPyZ@m6NxT{!dAoqbMYtZ%< zxU0s7;m%V_9i-F;b7pQ@X;PW5C^M+1_?hbVSyi(VZ^;BppsyM<7NnM&dgyW)W~51D7p|#6CVs;C_ib# zvbAfMtyr`6im)=U3(C1T9E|!)Xp9$T!4YGX~+T28@hm#p!dzTocq(26O+q7benJK(JI-E#m z-YcUsk_+b=1o^6=%G(;EY8EYQhLsoa=-lo`4Xwv{U+-&Mco zVW~y^fLZK>QgQh~rS%><67(^_|7C*zaoBs-DV&-f&q{sf(iBH&v$B+;-1K;>TgkF2 zEr^=rQ`M}HC6^O=p+S8#3>=@F=T?x=Xi>|LHNvBMBrP?)u^9;c!uD=lxpE_i?E7z@ z_rL@5Zohxh*8RrCOaCzbzW)!8Jbvlq$xDyZwVQVA*!1|09c=cJwQHB$w|4E3xc4@G zbmq)Q8{dmd+P-Ah2OsQOvYn50cR-eST@oNmqr&MVF<8nxliYLTN*ye*)C_f)>DApt zO;fDCWYz6gxinRyE)b$1I;uU}#N{=(pB-@m_fD3*># zfsfptI)i7K;66zWJGn*W9%Ge#X5vuX%m-^nI4Af#>;1-dm8a3OVm4N1{zwiD#+Gbp z-+w?mq@gFAB)2N3ET zp-8OGxW`z$mHu%Hg)^Abe3Fh+PO%M;XpJO??b39jPM1vzjh9KB34R5^o~SzoTAK%W z-*{1%4Ypy^rA=Hv|BN0ODfo)5Of^;FWq_WJ=dRM@DZqx+0xF7-?W}IA(Q1p)YAc;9 zXn7!VhMg6CDwT8$2mNTQcwfkxQtES*nTyh3F(xIteU!wxL)0pz2_+w$h6yR;lQQS~ zPUFqo#x542tYAW@8ai}?@t~#A3H_r!m;Qe$KQQETO8@l5yd5t*v|##!zA+8CeYSnns_WKoeWhF1a^r&+MpO-b=gX4OlWFtk z?)b8(V3KkE$(M{5=HGG8y^9vo;je!}$K2L$fU(!8r7LF4UA&}n`tnPI23|gLU)@7{EL^Z;%lhKl+l>px z5p1$6oB!DM4I8)r9kvt>sx^~FohHo= zuvjIV(`3^6ORBwsI5An1E7W40xttEW%>w_Gf(~Nyn3)HCBIdfPJ_m;nrZ^35jkr7w zLk1r;Ou_^Lilo@d@YJ16-LQwkem=lE><)+ARB5U6iu9MP@^Yy*%lDyAIzE$;KZJA%cbpB>3Svq_rxm=le`Qh?%e2sFCu%Q{e-Pltm z#yb~QBf5vPQnU)Q&sh;y>>(BA1#YLV(fE{fh1l##GPY;A)6K-?4Q24|4rdjH6;w^w z)8{Y=I0r8lq$Ly`v_X|6kxDPq=DW5$^`ddy*!;*Nn+@Z({rjb_zOLE$ z=>9j2Z;TV=>$g7pSowk__sze&rd%NtU*2=i26y}$n?L^ueSwl0ku%C>^x0(6KAe;| zg)rwrM~QcewTu;|xEzkm%VVZarVr8HmDIa&TE-Vg{(AA^U!VRomp<^v6D4D&(&Sy3(*GfR zgYnEOJ29bp$=G8&w{Zg`iSzY>;H!^ZA5O4p74~8s9M!1L0gr*(W=R_wb$zkp$~R-S@wl1TGe6qIyqPgw63s2* zY5VufJLlC8qTkM&XT(YS=kdlgcKy+??lYYG>R0^H!18XCwsxS+M|y;_eomQ(R>TPN z>L!O>Z6J*EjuQq|%-yAYN_RdFlR80J?mwd^-^ZyrJg>eJH9(E@*Pqj}AU3b$vh@aJ zD~0rgh3higDjeo1Ua~N`giT2-^A-h&BiU|sC1*O}$ju0F5v#uHvgZ>sVd56%?hXcX zgEs~lL=BP^#1tL&2VAy%atqmuHY683C6M;{VYtqyYD{~7lyR0;-($SD-FV(8!~A^s zBI;Tv$L)K;*oA5POUCo<+tWKH)_>f;KYbdXdMl<+UDwfon_ciwy$?K0BDaQH#w{{C zEE;1KHl;Yh=VBDS84HrubUjf`H@WTUe%<8+E8|UQ<0cJl41U4~jX!V`BSBo=#f~_@ zM!}>#d1~^avawapDzH zUM}5P&p9pVmG*#M3uzbj>S~1vuDuG$Owltmmac@Xu=eum1T8|h~-P7z?b(xuaEd*_WI6TKN_`fl^xTy=%f@^qB&xg zK8xCyZ3|)y63Z^zrn6zgZoBmxY1;n7r+cn4*8O?xm^Gg%g%c-UKJbszsWG0Y37|Kg zHVt=kmbjdlTU#xXUgB^%yqFt_B_5y8+u!FjW0$+mTiB`;`(5b2M7LR(+o`(a)O4Q- z9-4G1lpuK6u{!S%M)c_V$+^5d*hX=}O(@*!v9Sj(_UPb)foEzWA9$Y7%zksaIm_AB z+{4_Qr6vy3gjb`y76k-|hGKyv_6sONKSm zmTAv&G<9~++uGXNxt9gL7HinrgMUif9=3OJgk52G*c0}K69?18AbPRJ2 zbCp@jtfjV6`#49jtH@pCDe}&>EVRtEF0{_J&9={W%yrInb;We|nlw@&jAlL>Vv&S* zc1VMC*Aw*nXX+P9?`<`ns_z(+#&@Lx$mDzV`Q_4^^-uARAJstt@ZLsp!-*EN#?_*E z5v?HTFuKDEe)7HoN3u}a&T64?E}qYW7Q99Sm&e$Hw+dZ1@rvuR0aq1&gNSHHMB948 zJv}9`CEO)2Abd_3QC_E}sr`K(wX(aoS{$N*mzXt^+u=^o;@tsv zQ+F$OwkO-$-rd<<=qdE})_S>bbocS}@eb35xktN4ct&{3v%`jl&xz>=s?i-P`= zBS+{$w(xDqdSq^0w3#&+XHW4Ez=A~$N9y!awbo?1NC7-~HEg7H;F@mP=; zvuU_)GGWHvH5?)pzPp576Q@V*8aX~KX4?3gu_i7aZ`xfn>@u_<|RdGZU+f^J&ATJyowoo{&wsf*3N|4>a0ElKl=OJ zY~4LNy&`>6I(VvpcUPH+*-Hw&j{2~|+Q`?=ii~HC@~g}=jv1HQJ~lbQG<#$Pq^+3_BwO;7GNHhtT5YVj8z z*KbCH{r$7QJXc>yvmRNw@)6^tRO7j2kkP%Ip1S{c^}EF2{NaIhJ2F?SStI=7+u#SP zf$V3~tZ)}t;OQYJ{!2tkKuQietyW8ai!~UM{d6H8y0iQXeIOrlUFghjXKQXEJD40y%>rC&xuLOsIVp2Jh%D4=2M$5 zYOe6{J?4(>Tjdo#*=E8Fz-#RdKG~T~^=u1wS7ryYgV~|%)b{2=y@RELwS%qDUYOD$ z&>`3%RG8X6t+(FW(#P7{)+^9E*gMoab+|s=XIXZ&Seq!(6%wm!LR z@uZpUuDjv&XZL^9qPg+FB*Av+n@CwBNXF97g!NQa*8FU7hju*I&~V21~i_8{-dfb~K^bWeYp@9C*+7 z;@HVU;X-VXlDPRm@s=122I0#U`7Mtu%Z;mD!9y){uulJ~Ms)?E;naQ%rjCUrbcykk56MIvsnXQ@Krr~AEEQ)2C zQD#Y07Q;1<={UTRw&xkT`@#A@Z>vB5uoP6vuiPtFV!&I&Ybj(&$39m+7xmIL;agY< z`aAcyptnm-CfV#Z>a^Q!SlPs+o_OsgHtbLJTAWsktbi0rcPfh9-)=!IJq|NdDqL2r zm=P~`y;v=}DY}Ks;Z|YS!ym~lq6-~=X7e`Kx(&`2ZuvI&VWM0B4+4HZO7RsLwDT`5 z{P1TsNw+BWL$u%{yKAm@C{#=+jju+C zc7;I=oQt!Xu-VvZY~5_kT`h(7;>GeIPtXyxa2tJomAwB-7v8#8cF23L6v`uG?TkHu z`0r8}*XWPo@eo^D0&|R%BoUaq#EChT-u8w&9Tg}&b7_6FMz--gvf+F3tjWv^E~st zbA7Y?a}wqx&PtjNAre!uf(Ge{2~jLj+G4DF&2U3@jDDM>fmJk2dmp6VK4Z+HCpOhr z?UWYQ{~6AL8Pc+e6O91<3e&aM>N}T5^?C$*+VTI)xc+Dr?ryV6mJ)1#)UgtcDYEXg z=-hHLVUdm-PdddCG`zDmwb+f}%IdOs?C@-veVRn!Bh&Gq8cs$?)etJZ^Xhz zg6Bafj(?>q9b8ZBMC);7Ar}6A=`cWgY0Qbch_%WBV6P3IqWvwq?t_? zW@WZSEz#t(I&ICgW~NsD4q69OJ9B%zv!&45*;;7pZ0pRoe>!`Zds~K@hg)v3-eN1W zOt4m1C)g@%MgG~^Y|&nGY%BcPyklehZ0Offwao|7yABxnOQq(|<6i~LdWP;?W^_JK zj(-4f7F^#fp)=R#)E_H{4S-chr8D?$gFhwB?8GJ)$!Rj1`diGhv`EEt8UMCSXBwu< z%%NBb-x|f&xHwyRhdh4~?zuw^?(c@VsDs;HiB^1hUQ+Ro3-LC@we9qd8yz~R&M%0r zjQYfC{z&#jUEMr+eci3BUu7@F{RJJ->+*TwN(7Bn#t+gR*r%nD^srl=p<6)6SUvKpOAsA&hGLO%^JVfA{0+N;h|oiESGVTORsWIr-)X*Kge*hFKJV$D*K^ zImJgI>`;pr4n;xVGrGxB{d`LN@9`YUXABsB|e=y--B9@j%(Sqpq1Q>cAF-fvFES80$ zt6o}K0pGdcXRZEn-@Qv_&RDi*v$6U5O%r!~c>W}nR^2n@PUq;N7l;1oEFJLG?8=He zm(y43KPsQmr^hRsp4#1e?mZ>NC$h7#BZb%dI@Eg)fmCwWB*yVdLTAiyF4r4+zwjS_UU%*=U=B2DC$=<@6NW6(^ zvm`zzKN|IK)Nulh>fD_bO+Z_0<(_-a8&7b!A6-t)`n>8J*vN_Bl)ha$(YNfbhu1!` z=C3s`P+= zT9Iw3@N^e2v zXDgp_ewDG7GxDcPZ-SA}({X!NEnWWLgUi9l@+~E!X}impY1`2yQg->3cgqgE^W~pT ze|_XC-Tc3QdEp@#5KfUyzDif=Cn9T5rDEfi)f$xJP%yQv|i7v~w!(Pj)yCgKMSYUBi9$I(yi4Aif z3#`uh%WK~nHPrw0->7s^f|#Ke1!)tNUN(a!T>O3Sra0 z=O$!YI1~TT)2&xxyQjP&VVcug={2pln{BiOv01b%($?dEq~>CS9^BMmGZu5i$a_AI z`--p&UhHJf-MJ!#%R}EPAGgMng}zC~`d?Jvyi`PrsMI-yVyvKIAx}+4#rOm<>b1y^ ztzNTfW9Z-;#}A>|#))(F+p4OnUVfqLy;nWe0~9x$m9-#3R=vi%u}sHb@qGrS6uRpE5JQm{9c6p%vGJY|BJr zX-vcpHnf?H;RZad20J-8vlFJ;a;#a9H&-rJ5BcH}*E!g}3Pa#1BrL9xg!u)Hu*qXIHr_46 zonp~-r?e>QY=#4-0x~tP@?WRGu+FcmJ?kwaZfi4UWi`!^6`8WFfW|L#1(*YCEzR_$pdAyR_ z*9os7IXc-LnA7$5J4~3*n=37Hr8+I%i^+YZWj$WVRG1kn&{kb_`8Br-FOgS;;I8HHXPU|EF#An$ep8|& z(VuC`c4Yf8Rq_|c^>Pd~-Ru}|8t)kIpAdJOX^DT0W49?@Hfy?O!M{(&k`}?DmdRuB zYJRubqkAwl_t@NaCziL8yz!WoH8nTYn_4n4A8X-k=4$3{?#=OK`&%Wowen@ILT7=e z(APPshq)Uj>fP+!J;Tkzu()-zW2kGWd#GoEd7O2eZM?nIG2S`GHO5`+DfN!?7bVRx z&(Y^tDxGs&bKJ8%mA(f&4|wnM-REDCw8pW<`LcPhzSpwHKLi>sn?|MYsv$4rk!sl8 z+NZv53r1^t@KO5J?*GHyd&gCErTwFO?R^TT0H@M>JJJL}K$LRChS(4ku^}p=fCdmt zM6pIq>`9DKgC&k*jL8@^%``NL>BVspV=}3em||Whlg!U#CQ-Kc`>eeW9MsJF{(kq~ z&;94d=z+yz?X}l>*0Y}aeUR0(eOKp|o$^a}AEG03&BXRVoB9OeMLm0Ry{yDiU|+>D z>?@)Y-8NmTPqPLolDPa_dMQPlZd4A6dQ5OgOkRh?$cfJgF-&2@-40oH@M!0yIwt%gI&%PdttAXq$pQhNbt z%2(33x)tma~kN7r#}%D+(;oM-m$-d zp72e?G>db#-+%x1?f37zm!!YoOP5%%{O!>1FJ8QK>EgxjXF?j0S%&;B0xI6Yy#|?C zu0X}~!3eyJ6~?<$m|zW;d^Oucd|UlvB3h%2+Z~%is-sr>x5q`M2>Ot~tZ2WKaEsvb zO^@pmoyi~Qxx8TyR^{g>R>U8RCxfseK`G+Ci?nK@1&=hX+-K~dM`k|RLz<>zA{N)F zLi3Xi5Cc8Jv>Xa68gw1ZpJb2#%)i{79ILknNasU;nOXq0qAQ9^N5H zxDQ5UgI&u6|5mG@4cLUs!P*X+Ep$^$ip|GmPVq~ps0AEuT!Cl6cM#SizX~zXf|v{n z_3a1O0BqhC$wJ}dPD_9#&=Qmu;uhS@ExIK)%DN7Ax&z#S?jR=~EmG$w7A5LP*i}z| zFhBjl@C&H=suKOB^U%6y4+Et4>b0Xs+mSHOeL{UJC7-EOQ@XLy0XkIOkU zPE7R|hTPhXbq&!eTuJTe#!~b6PDF7pR;4S_73GR{#kgW887G-0nJ4*9ikuWRDSA>& zW$e1hby4f0*Tt-h-4VGXYDe^rm>sc)A`e9!iar!`C^p=kydwEA$79aN0v-!|EaQ?5J#E+8yOw_N z!nkK=)@$xuxM1<5_4nMr_S?5+pBeD)#fzp+99q#QHRX=ldk&=}eK&hSS=pemNvUa@ z8}I*93XU$;6#A~@(l�%yEYY8U>5*RtJ*tTXkZ)qdG`$v9c6{)+GsP;2{VazNpwi zAVOTuIAf7{b`Q4PmsExzZdnKtf;`?kr&h1^aq68u3Hk(|wBQxNTZ8un8>iZ1!Q7Q( z5v~I(dQn2wrw0x^!zRgx`VK8F5;yv6xqIIo((?_hM1HEFbL#q$nh4uGKvAE1>+~LH99*{bpINe-aaK_Ae zcGOKSrWK*b$i<}6GCWUsDm+jgT2{0kI?f3^{>ZB6^43`KJgYn^@6J5XaQvY|Y#JA( zHLh!e>YuM~eB*+c+t7L6OWU4*oP9-Wj|$#`W(D5EPdMq$H5x>peQ?a^_v!R-&FBk! zI9Q}s)D@6LOfQ&yV32P$O6`K5FHhelpOZ=K_Bmls5OnmP?5I9Q65Wb*Fp<0TQTlTI zO#LFg-p9ws5Q^-6r@?8A7m_qd+9X4gG0Cr=kZvg!hWQTj1HgsfY+;VyBF!T0V%_aN zT#)h&1Gz@`v~;rHC+}lh7t2eqgAJYW;>U2f0ZxR$sv_t*@Xii)#y#1z z&+f1r_Zf^1d=wDAh+v?%CI8z#^1tol{x^Gp!*2F9Tdbn3z}MG2%5G$mkJVQPS=V19 zw3`qZW3!N7N_EBgYyGF#s?naOL^p;?u>b?eF=q-nxb5grxR}*m% zd+%d0*o+QSkU79^cO(eCSfU}p7;8#`pc{|S9)KGIOt?@g)D&t9b%iiS4}i~mfVrP< zKU;r94Gk5BupvG}3>51%++6HiY$>)D+lmncG!`XjOT|*DR8y)g)s^Z?eM${w#&M=f zh{WZN(tsJz;H$+NsYX++t=3iRt9_~sGmJH+TKfz~b-+U5cD6)pLwVjM+9kRr`c@xz zxhGaOfnNtAzSXVL{``EfT}wMag* z3+~rn@0DL!%>MQ$Y`-`QFNyCFEf8)4r;StzkTVQt8F*!&i%@pVJ)1mL`y6ml;Xsh5 zs-VkLRRDJ^*@$sSbizKx%T>_jVB(-ygR;$(M@nex2%WTsaY=Q7& zo$+>LDd*=u6UxnwEHDW(46#mbbiK)O^@T<-`Z{XOc;)%G(kVnuhLm7)avK> z&2cXATjE?RZ1i&&xy#DntMk_eYeRIQ0M8XeByv}U_&WWAgM&kyp@79^DPoF5k$=5> zU49Av36=zFVsK)JD>PRu6mtPZ3aA=3%x|dwu+T|tqBv2S2*=b!-wA%>{VM`0f-6EQ zLhD(*STD`i&w&$T4p)~m#WKv?~RbP}i?(?l|*Jk-EHgcovT>tHN z8|1m0S-kwh8usxD@h+ALZE3Nb18u25ehL3>XC36&1aE|0h^LW$w|gqJx5kTHPdAgDVYKgx}}?#c1@A$=GjU|<%L0xc7v z72eJ?diWL-wTU{gP?HP6nF*FkcnHU9OSR*5rMhx`g|WgkhtQmw1eFA^5B+r{P5 za?Jwm0^JhB?dIDNlCsc$p=FVEQOKguMPa?L#M+#me3oB59s?G8cBtIagX;!ov^J*A z%&5}k=H(1}`MC71hX-FBw`{V-|E<9T^6AW#!G?GlYwRo3yJNt3;cF`J_?lXE?S@wF zYf9A`Q}t%8;%cI_9Ne8GG|D%7n)rR{i8Aryw$>fqGI7U(x&=F! z`02fKDmTl2+k0n3%(^}D-!@m$Jx z-w6Bb@y?UoY36`n|45BbsM8eeuZ_}#wgd|;vHmUAW=$B_fyEz##pA~z&Pb=rr0ITT z9)O1T!!{`|?0H|s^_rWmrPwCCC1FrN&*rZUCEO9v{o0Upg`u0q&sej1=J-uR3x9oR z?v{drEps3Gweaf+TUg|tbukfl?q!i%Cd|3_Q(5NkFUy~9C%XEGeTv*O@N(o&MmZh9 zHoeZIVK)C@6TESM2sZt}7UpySe?|!M0~5Y-nL{hkzE}u!gP%NQUzn2!J&hsil8oit z%M-~00x9N4`*F<^Q>%{}O#$~#oARfLHIG-(H;%ifPdO&JwpWfT(r661!$<9$Fcx3= z^e-W7ASkQR+J8b%MjVpc;%AsH)tUX7ua$BJeZ7!@(tbg*8S~2C3xz$%Y4^hO8MJh; zb{@~%8$J5Bx1_9V*RH*Vy%vSt@&#PKBjG=cfo;^K-xaCbYBGl0AADbgu+KT!`1E$kKQ3KkzE)>mF&D3Z{kscyaShMU80qd6r1ug0kSO2cBSdJBfoy9r zuMB_;qX+1fuhHLW9d6QF1MQLgyr~&WM0h~#fG)*>b}ZaGovykKoIFjOY&wcv2ZkQ5 z<7h_L8JnwDEMe_(4f|}twfGlbeDUi~#~&D>d1KnF2M)>~HFUo4m3**XENft{cg_bx zV!(RO5vFLK&>V*5o(8LWzSAIuYEmNvN$)xOr5eO|)C^1L7Hq(Uc;=QTQQ{XY%Uw zFs>>rS?^L{U2=9PkSdZF)8Kjw6pzg zA5zph_JR3L?GH3Jw@V+LtvZ+2S~O%)?%Aq$Qj!uA->EuV(CQw#7~h{wN$Mr9Y}&oM zX?{EM>)3VR4r;^UvyNjU+*9FUwATcM2ia<@ws3q{5b|!;`&*D5V>atY*|fpNmQbH4 zsYM%Tw@Bs|r{9bi))Ju=f*s+JAwhOcY=A9X)DTa#`kRpR84x=>I^60j4A+UoVGzWD zzr~C)y`ECORhu%|^V|S|ZM?Gt-8@RcS{p5-Ekp1gg$JNPqlS4(s{cwOC(eA|k zpeMu@81FR<0m;Jshsq5>5t+Ff-(Iei#yDTIwXv`+u1Kqs5ZsWdaYUr~%{xtEH0m3KK(9#{k$DBr!7xOTRwTs z-q7%KtaR**am_2ty4D>ttJX&LSw3dGbjv-SbS2n8z(`>W@t6!eHj?Wr)%KMfhlTN2Z<0Rx zW-IBN%GWGEeMnJeM$r)VWZICTjLf1Ty67S4nMFmJ=|eo9cn^t%LZALx`wnaq8Su*i z_XPQL!Xtr)CErJ^hYixhg@%VS4~71*@Q}-)3jrf98!{qVH#T=f^r+MkxOH&B$er)L z|E}d-MWp+?zv>DEzZL%#N|eWlAcM?zX%0NG!0jeBP#2jZGmP}Cy8{j!lK z0h+*OYpX+_-16M#e|x6%feGWR^XnEbxqZ>}X6L1yOh0el+`04S$-nO0DgUZ`&Gb9h zd|5Sh+O(-vU#_|1tE#C}tENm{^_ffC_sgd?sc1-|n< zA<`1yr%i~6WGAKM#K@C=&nG6Flzal74LWH*>GND@U20;WDJoWzgjlv%O+cU+;jft} z#7+z}iEusRh~UCTdO95s&;K~Dz)(Ph^O+ysfuH1E5}CPFLu(3Ka4ZjEpe-Lj%R{1# zCxWFr)P1`7>AM7~t&VsrLwSFTC8!SO4nt^@57P?> zkAyqUAo@wdBvEVBPcoPZ$O|kUho9sSLcpRw^l5n&LFP^>O_gO=J~Z+21^D@sW0en0 zY>RwYKHS0%l(7R{U()kQCX9qkSOsLeAh$^b9Jx+1BjaBO+!`(k1Bubjv8{k1u>a~_ zsjBluwg+KGH1k~(2>a_28|js z-g9hzfRqN|46-$MrIO^TDn^}1Y_fDx_6PD_ATxOMNb;qEWfCxznz(I`V3AOmV{t@o z$^emm=PbE?=j=%<+RDqvm9_nnG{CW7WXGD=f<9Bm$uF0evwbU9S6{frk-Fn|j-M1b zazx2U`KVuJudfHoL(}AQg9nTI2Q|$rpDfnj>SWFSy>rO-{=9aEl&t*)r?1zISYqIu z+;)6pcpG7iofj)Qk7$2^N&)(P8MRgN`P~LPtlOk>3g)^{gG~ww!X7K&Rt+x()z5^3b;7>jrGN zuYTI%C6E1~c;n!q+8I--YHMd@g-)M2c4XNE{ZQ@mAt7^T79;C-an1bJu&^VnWK?C@ z)M+IpC4-9H1Hq@*U78=HGF>fbbquG~|BZOet^i~uWBEps=3sOiUy~nQsH>IlB%Vlq z(@U_wL<%e1nc;!D5W86;hO9MM;mL?Ve1gyp1NUlpG%QgLzZA2O60Z0)94P^2mn}Vt zoTucVM>q%F*C4}-mw%AKb|8S`&f(V)1tD6Zm52iF>xklBny4<^s}n1t;kEPfXaL*H z6MWO{*Z7M2HTvE=DYwc+4%I`fio2y@&>c7j&J6%s?PzGwT=jBrASULjV_WVBp}O-Vp!8bFaiDV#uO~ZyPTB z7t?6ZH~e}|m-g#9X|(mzlO5mDI(CRf>wIVZ_%I z)SZ!Z{#dNMP<#xYI>`HPBeRo zH)4^yaCuWwW$(l>vAIPlDek5|V<(!;Ypm9+)Ue7tn&Z7V<2$sUBaoxe9j+nBKcJrw zgFIJdWtvbAFg4(9G;`A0jQw{poVtnCHkx!xX_%(9)07-+CPcy`P2`V-T@+4Haqh=QMh ze=5i#3K*#ekp@D%7Hp0Et-fJy-JE%I>mGam{l^}A|GmzCi^n=krPO`x?fVbxeqjH| z3&)OMxN!XV2Qx_M5K&8Uv!=LP<}hg_U!7hsNgG(F+RJerTVPIklJ1-|wbfG+&f7MI=P!lUxmC02ttddo>bbm>;2!SK3U#0!g z;?g~&+1OcQNdP9dfL!psQWj9~m7f>l=SsUvX}9Qw1=JfqN3Qb?zYlbN&+p?MH(vi5 z*hXYiiUCqeM39rvjiSxYh*|#ChC0GFaTG!Cg2}jum6%9|1DNE)|d1KY#v%ql?+)F03Klq{4|41{PLUUK2U!kVcMg zEua73gY!#Q#9kFW@I&JDPl1Q96Z{vojfEH8p<2{nugT@}7EcvYaj zQHYMTJ6HOPjn)~0uR+@wxiWCMNrU7scufR-9FifxJwhD*wkZD?O`JI*z^Y?$+(2;# zktFmdgYFzPF${1;8N|Q<+=BQ@0<-Cof)yVutvX+1_;}zzi3B*5QqUm?%510*CGZjs z>G5OY8{@ae`_mm23)BxQfiOW{A(IS`t5>Xu3MdXrIbN!n)Y19P&VzF08gcXm?Xjhu zrR*}mXdL2;OT}<$6mr`+JX23-8U-c?=e1A4U6Sy9Hx>24QK^6?RvL1$Fj;TgY2dq1^(0vPOhul@tn_GxH;M^ED` zNFp)cIvwXPBu~?NX^U^! z-tTwX2lQyC@s)9Md$iL!D(yMc4p|{o7_8l`c@aD<4O%pz=)<3k$P5!uWPmG;#8^ZD z2tFLV`RxqFdJIbvti`}8H!zoh%FZILtO%=zqXx$k`T4tqyaD)*5yo9O!{ ze1EoC&SVr{C*clyP3J<;tN{lkS!i+hk4*7RPOuvdf+jpF(V_8`k`f|(ZwrxbOQ;K} zPKiv3O>zWUq9S6IE{PUhvc)e@=NB8F!moS|ZQf<(R%EY>6!&zR957_k8_sCa$I**d1(j|A91jW2%{1$yWl@_ci?@BP$$U(fgb#`b>NTelDB(N6oTjFY3Z zD|wH6e28tJtA3h;UFS!^=AiSFpl`GZjlmW(P{%@zjlqy;gYB9yf5PVo0Q6W0O1PWo z0P(~iC^#3Dh$CD?XE;U&L0AE$Ba#I38&Eo&u}+|+aik9CO-LP0-?Cf+>-hC^fOW7F z5ANFe;MI>g8q>#Loqp-!Cp-?Aa+qZJO*4fj-2;MBdk0IgI+M_9jg4__jg+=p{hA}I z4Xt_v@7b)uNvXY^LR@N$v!IXQvL?C0VstK_lrXC?9km0_5YPabfZxYo5DF27A}|66 zUw##hls>|pB8VFtY)B1C4eXtk1vDXBW7gIzAMBZ0s7K?}2I$kY=~`aS8v%yEg}2zP z4u{hjfav@*XS%bGCBu>#OgAP`8+@d~I#=`Swt(H`w-7wWy+^*T?xxQyDt3osvj1Y#hKpxZ*>G50VbB_k;=I3Ubn%J9i; zO=7K%j9qD4eYQI8^$Xh)u{r61yx^^_=uO#v)oxL1ic5BAg|O7{LKL3L$aD(1AxYYh zaBGrVF=fKg2aCU=Jo4R!I8Ls}%NdAswS4mfB|3RDOT|x{?(XG3uyLT+BY_VNzcaSe z_S25j&a+8plh3A{%{^OarJe1zZw7W5mv6}8<9;&%1|aX?K!qgqT^WA!%HM2z<-$Kc zWa74!3+~|QeVbp*DLK6m*;ATp-#xewDOL9-|8TnXtT=^|sqXdn+)4lf#$M}?Yvzw2vv@cTI4QOBA z-7Yq%?MV9&SLkSbrGGuOLl)ri;@}T{sD?G&otc`F?23zx(MS9DijcO38n!yCL+|X> zjEXBZb8JjdwAs}Q2$jkH8l5@BHdq%Dl++uH?Fs=?avH%u#2P><d8wj2}xPU;w{%BqC_%{b&IPrl}R_fSZfBNH|E!!SQoBQ;0^0$}1 zM(|L`#n=&j1BPeF9q}waf6p}A;&W42QM|O@VEEvRzg+zKeA9dE!-wQ0A0Z^2rCqrU zGoVjaL(YAp*Y_VAP!Uo!c*kgE{g8h}XK*a7D=Jpq+qG}?e7(z*{hZUipY?oQmG(uq zZWo(+wA1*!zqq_dJMDuqPCd2bEPo_y)PAf{FpNV5m)j225h%tX^9?~^!2mK2G7E@N zQ)@sdmJ&qod&eax>=9}N>=9&c6ai_hXo;RrS;HZHuc-Ep&he_M$gUpXa~OI3fTm5e zR+TMQxeJq%5+Wl)ZWJ!IhDgZwy;-=>B?el;VA$$Z4T7oKKWOX7`|=Brxlpy=y>X<}n4A0kSH+9^%+4S1Utf(}lDVbi)kPqb ztn5b%PmFr81<4GV8HWJ6PiKtB7IRua><;n!V()f3+e-VQTepi%J=$r{mHzcgyAs#N zX$qPC7=ID26*`kVhXQAkaww34Ksgi|Bu*fUf>J185NxIt3dg4ZtrQ9}s-~Yf7Ee-! zcLs$-x)T|H|4%X~#6R>%NTwVL*b;cW9_Ka6d)3o>b=esDSX|IRK4$|!)p1>CZlm@W z*j<`q1+?;I=;~i*afz+MWftADzb@61Ahwo&?cHBqO!@lg-^Q*8G?F^LyqNOWdHW3B zjwfJ$348P)m+!cKXX>ZT;_@T$#BjbZ3a|I@ZneL~Wg4K(XA3bteh=fQ{V^Y$ezfAZ zyvDCW|H51Jk4FEcx9Cr{8D&0sx1NvKtlk-<$6ev`M{OI(r+J!hJ@eOor*mK&2+C;B z)=#?rDCSB1q4$B(?%{Ms^QQdlFj!=2+!+xXOSlw`T(H(qYxH(s*LJ3GWp0LD~b3v_VL=AkX1g@-36L5l@jt zk-~6${ioz@`B^p;sguW!-8zMvmDDe+|Gd7_;g!a%zHg>JgVWoaEDt-=t82e1wErS{ zt72%S<4F5R>yxRUhy5xbO}uA+T`|#H742`&{(OIL(Vy>c&;FoK;4l##ig;G{_@GbZ zn{)cq@^(C-Yd%B|m^baO7d?2%7G3l}^!c*BfzxLtpMR3_zLZz3t0nrJLQjS4z}uDn z^DsX8Vf+GZrb0iwe=*w86L(`PDm{A6%gcI&o^KwXzi-d+)u@Z^#SIv+U~q#4eL|SU|9#v6u`8)co@8ot`p$@t z4hO=OusjlF2E8$P-Ns;}b)`N`6io~_RT>frG6*|5DzPbXW#XwsN+qY*AjRatNgAq~ z`U&Dz{V3#GK>-xqwciM9kwd1c=)E5NUa9t#tLN*b7h7LxXn2MGwq64cj|$@p-vM@n z=Z(h;8{8qm`Jv{x6k}jYsLR=3>yr}WXGD^?UQ9>rhCC#7;Wc@_=G(}qa|gtP`8!$U zTARMr&>R~QfRK3GrXWFm&#nw|w~x-$D*5@@4E#M|+<7X^wZe7G<&_4VaQ!r@_+E;r0@{@e-2VSaF7OF8IUc#d$P=aYXqGEc1A zXd60OSN2anX0u#Q_{wNMp>2u1hdA^U%N&ZjXOAweXJ0f=IUwGPpwVkzPLcoKc|gUv#t9UcLWZ+Kdyj{I23Ba) zU~DyWTmc`OUMrzOHe)Hiz+;k-zL}2dU?j33P5`M8VDa3YP0{5vn-isW(ht;J#~X`( zsel9ObghVZW{*;)@`n7^Ae`NscNQ#1EU2#7EUu{U+=+Y$@D+{^t?aS3p6{{BZ}>fy z4Sus|#GkR!W5EH457o#+2v3^xjCFz)Kk@LVa>~!=H1TIn6Znm;@fU)(q92!$X0sK< z&-nPHqoE&ow3p1RYa<`8Sic|rg|Tca=RMVO1$;gKgd{P_?H}Oph(MIHHZERol}L1e z%?qv%^3}S-B7EcYns}I`YJzXGt`;N|A`zn38tdXg2;3!t?v^VkjbOD2%Kp;cat$k3 zaqhxmNfwYCq+M7L@rSa!na=7{$Jo-6?;q&=fzaxQH%+cw*e7jA$Lr@h8Z_4%-k85Y z{#1VJ+EyUf#{kHF#PClfH;enLeEnb7u27B?@o!BDY=OOmxo)c~MHk`n187XV0vZDh zE=uvnye^&y$o3;?z@hhxjE93FhNI53y9jayvH;S*xg-GD{VAR_wTC06q4Y#cP)i_? zPTZ!nr0S%VNym~-CjsEWgT+p-hqA&wa8Ky{yf1%_D|2*wc{cz`axxDbQSl6B&HV7% z6%_=fAaAw!mzO=j2G~!?s=9FHPG`mZPS4=`&+S)=?#Oj1SXFqt(x1!nV!*z{O( zs##+d|Cu(Le3cY4O!Z`9__}?I=%Yr@F8bcD|i)mygPLG z>#hG}OvTaag05iCs%G99)2me&i<#BcGrNGbKy%HAr_ND%7vsE3i4y^Dk>1mF^RDr< zbkra64sgXe?^?rol-ge|Cp-pfhvY?a5PqX;eA4gGk9e2nW3GQG;}h>fKjK{^uAx82 z?(Q+4Y!9tVC%oo^`^u|7*9SEn{0w;a=lY-@QFK>-*tmfWj_0Bu`MZS|s7Mf8JkgR{J~PPY0$o?$=hbw&KY-e4GIoAGia!3tGRV zR`|1dy94)b5w~xkA77t8^6@!Nfo>GWM^Ch8Yc^f~7Ceym$C(Tiwz(aC{$?M4V*oB> zrv*^iMy+0?QgGzOqJPMD(Z_AI>KYv=eQxmAqezJp92_iA!O-Tx3|&ClH%9rNhz#cU zWH*rZjZyw!l)=?NIoKb3Dp&>5hM|ovc{Nl4dJ>dD0BZk&)GHNKo071A1)9HDbSv1} zou?OfzD!u49&Cnagr;?2CXm^L$K~Z@E5HdZjzN&=K~L!D0DeMrv;v?|RJ4A*2See~ z7Ww`4Ba@N=qcCjf!z^VBUvI^4O8R{+c|frf{dl`#2hG8qxxAS62Ubk4{@lL8rgNU` z)nDPsx8K}f;mJ3T&+RKWkMC25ea5)3Lo8$S*i6uuGM|5<9W%lCST_E$*L)Nne)IT5 z?gQv92IwN#GOR>@-i|%d zbtw7|YvOc0iP}~FG4HQ=koSil8SRRFl%Kymnh&g`Uj4}rjeel(9P&3~KKQw|u*bR2 z=g-AWBwhA8_t0Z`yVAc2^DNZ-g{{XEy!vZD$2u&{>p*MI{=|pSkDs$Q_;Z!<=^Udc z@u6^f0M}bN-e52g*8FX$Ru=5CW&^(p(j@>kIItib#eLj1*h~O%WwkiB`jR~A(=Kue zLjfAZr3Zj3UYo)TTf>Hc9}l+1)77X&BNm1-WMFlHU3sttl^hhk&dE-AK?`!c!K5Tb z_vOHXZ;lwRqjdD#OiLe;VJl2|>lbsn&f)i3;^~hy~r=Q@)>|8kP>q1Pkl}7|1=QWz8eKmO4 zs@f-7W{9z0ENB^1y6g1x8C1Qkb9BdBC^C+~^|dn9c`GkNp*L;)#L3UH%8_x_sZ&m_ z9W%xjG<^o@xz&qT3JdStlU#6BXg~7M80g)gFWhr9H;Yah(_@`1h%gbDgHmiE%V9cj z3}U^x^g%Pvuvzr*HX(yc4H9MtONMXSTs(Yu@#am#OT^MTIXHVp_` z0aEt)=~*?+&7XYQ)HG|>Dd}zb=WU(e)c`vbOV|EDS~^foIfR*F-{WiMgVZUZs|JPv zX){q>OJ$AqDsH!!-6gYSTRf}M!Ry+w3bwKHuEUGA;q9eG-gIC_U>V+zl9-g#8)qFRQIkAxLTlpGI@3xCa-F`Vh~+3H^W@v)r(5OA z-X-%i#k^#m{M8fkL3zA;Agg@-1gen_hv;06l6lJ9^trk!y6I7Pn|y}Y#)K?O4pPsM zt=E^f7oW~pzU{#GjOB^fdY#px&;u3iYkz>xAUg+DcZRoam^p9ki221u0}G~QB$Z9B zXpV1edgC8U@!vllnmd=u_|2t~H(R!%j^FtYq5^wO=$~h?0`f35wRQD(&rh8A@DVEN z_wbR@F_ zFs)B=+2oX@2ItUWYwjC4a>Pgvi0!W30I}V*GstAyR-C0yD?fkrcbnYqmIZR(1q%Rb ztDY4v9|}L$RC~|~e9a!G8YGHHIGpAIVpL8xuPMk6@P=(wivex1`of1)K(O;@$6F{a z_&_@^E~p;b*#_$?uPBuS>kl0g=Q1+Id7TFXC`yR8M$>5o^#YxMOs!D}6vplmm{P1& z`dB{yWO>=4C&VXUSssl5>F;K2Vaw#s@}>3ShS8%QKGF^tF;s~A%V*mb9cI_gQD~$0 z*-*}Y*P&OL0FTC}kV{T7t^^C9cd-lfNNLRQl1-b37Z(rTys2b(=P~J-GUs}X~?@p;tB zJ{-r6$K1tp)~NEDtQ>p?hUDUui8&~w3RXl+6}wN%ogmF9icXj@<4pFPIZboT#l_DL z87{?-nsI6KrcIkKeYbh@rb79R?ckXsS+9{Jc7_J`>37$v!GkQ;$X9|V_D=27w`f|_ zh+VtbwOzY+?~*mU21$n(E|mK%T(Dpvd;NRRCh<(Az9aUSmY*-X=aaS|Q=56UV5!(4 z2QFR8E_IeI)tu<)U?b0o&CjtPpJP|Bn9 zjw#)Hu3;{(GPP|>(~OKh85uZ=Tb>-o0`Ggcvyc2q`{Bdwc&|421gTDRFQM4&F!@IN zX?#R~AfZBH|M{a5@xM0<{MFazy*hG6y+knM1_|!Yu79S6ygzB2{B2xPl)L zKtySd3Pvz!RfUxB((QP3JCA`zpxe?W-}{an+4iTuW=#9|iQ{+O`MmyQ!cRZ`D1ZCb z$@U|^FyFJ<9rCZsS8m*}aclkKfBfU|4Y_qMe17hc3n5WYu0Q+&){)&@;~IT}S}O0pXa3`h)6$uDmC8d?<%+@ob!Nn<4^b(wTRYB|Uz-UX z1mh2o*K*k>4c`!NR4&DE3b>%%B0h?T;!G%)CLRWXg(x&25NOC6LwM4d*-1&1vM^;T zVIg-l9XqBpXoH>h-eInOxdf2h=fvd6LBVhGmfU{#NoN6;Of8s-%EL#2ho|EkPz`u= zmWcUK@k=c|o@btEqN5NYukdw+YjU2hbGOA=n)_ZDTTitxN0!g}@>!~dDgPq>K|cES zTW`P3Ccgh`aK5{3^Rj8Tg=w!Y$}as*%S?kqs4`~f54VLj@xqw9-+Q0xV!rp6aienc ziax$K!T@@}f{2(aW8h8c! zEh%NPukRZL3#o`Ao3fyH z{I?DAzsL@2JR**SwfKo63ax-&>F&|~9Xv*0URS#-27$;Jld~}8Y+z7L+kMLh4IGv` ztxtUZgb^r8p_X%0Ykq3$*H~?lxVICud7b~|DeK51PdncNT_XO0V;4ip?%I7mZvxHb z^S?p7AgS_??9`1YxRG5wKI`KmyXoGeD(0I6GFuNiS*T9xOz9&iVzhXG)!gt3dY zrUWTE@7*rgykkHFJ$jT9*Vv!yrKb983H9=BxGQS;?~cRVKhj0Q4lF28GsKOvJmLnK zy!jib09QO-O?1S^#AfA%h3l%oR?`~u^E2+vdx)J{EI03yzm{J)A_p#EdlKZI^I4QO zbV@{Ic*Nkh{C#|Sr!JdO(QN}+V5cRuKpjw zpbomODtCFq;dT~BSGf2kUFQ$q zCto62^)}edOLb1@?-^Ige)5p^7xq5dXF{${=Jvd@PTsCL2im8)j;DNraQ7#ZUCw*< z8G-x&^nhk2b=4!E^eEQo^)_$s&d(n{?2}hJI=6mTwYW0H;{Uqm<&-j+Jzi*Bh@bV7 ze_ic`+|fV(bw|3t(jb&UDzh|#sx+M4ep7^SG-Hnx^T!3K2>IqEI(5M|@yMW|UHVZEwH>_j7@;P2>+NjZp(#_X z7OuO&Rr6PG{hb3T^LaMQ&+$5&(TFdDv_u|Gq%*+C!EGH%wM!fk57>bnrVjYSVCd)& zr@Y7JqORp5Lo+j!dY6N9`Y8o3-||$tqylJvrP`JO_SD`=$;*wdMEO^+^7&i2NfQrM zZ04Y8*j(aCl2){&Lg@J(-A1pNVJOW)uk$Bm*t4QJnVR?RSg~@c{CD~LiV1H$^Tx8W z^1V-1PP8^}TDEM?73Mdg@`G2N%I#M*^~9;FsoIv}%;4ZpKH4{}DnBQ$wE>KG*wDSK zAUQDLFC7n0pFVIvPXGRM*AE+7Hue!L59Y@0h2ngNp9IXMJjF-hc%Q@6^=Ke0JOm9~9)@wRTr}+Q5O!HVhl8sUMJ%GNI!B#-YQ~ zQj-#U4Ju1aTrm5)q?AMV)D{(`r1nWp9y&3t_kaP5xh<$1^c+F9AQ4DXpzr>O3vuWI z5TgPq(;fqsWcuv^+LyGN&ToKnwD`f=f!fC#ma=KZ1sbYARq z%o|(KJEi)sF&4|zmMwmoGvB;6H6Lq-m=lgw3_ja!59jwIOyM`UA@dn7ryDVayS`q7<>FBB8kNTEJbCJ?AwyxSyIp%; zDUgX`nRJqCV2@Mwp6vPKAfu3ljq48lF3-v2I)rlJtBL~zSk($cV$u#36`8F1V}{+m zuc+w2fu2GV$}|&1G8y*=4T5!F{6oW*n`I;i^dx#0U|$;ZXf3*{5%uH^Q=ZRT}B{%pmHnT`GXFKyM1yo;qiHMISK z@8nBI9)9=;3%ta#hdw30ch>}Y{|EQ4Su=Zbb$Z&A*>|kjasJqG%&Gahtlfq6i5G-u zotFScnq5vd=?zdP`grLR;+gX!xcHtFvHF9%@0wD%bM9yLZMg&H&0JY$8mI{KSAT9R zO4Aum;PJn1ToX3G{INfObpM)lHIvgx+$4X2ZYG`ytx1*h6{czElGyR$xYn3tCKBr| zBDeZZ&bswU$z{tk<=G_ucbAh>*>rK|TzUq4586?he0nc~g6V|!h#(A_LVzC-i#8}_ z7(5_P(s_BLH-u<>H^8XTyIsn?dcgxII>iGsy4KUe_nG@8)bj(CLs4Ytp*R7w>rAsp z9xCrZnYpXsY|Fpde72ico|B8Dh$FHdCFhF8lp|suRiNvWzmrR*=j-17x&}Uv)g% zb)vp#GIm?}dMP|wv`k}_oj)y=>g26sPS(!ayh;A|!p5fCnv6&H?wVLRd9pOFmhH!c z+vGv|@FlmO{=RKlSXeF_{NSOQnUB6wJL|@0lElDIAF(mwsGxQ-AYgZtW5Ar^zGIUo zS5Dlu_oxvMYFsG)d(-AwwI|2OTcx_CojZNHmnJ zs_dj9mvO$wd3uI4^WK=hbDh%=WFZ6OT{4<&Yb%^Ba_8!+kSla zu_wg^+)yMc^ypI86`2R@cc}*QAw7xyik7EtMK;Ie*N;ojz<(n8Izcw)ZX_EqunvwB zc{)E=pI!e_nhV^1oM}c-AhAxBT)A(CTRl7;9LQR*NU<#^j~<<0HUk$2H`nWvVXsfd zf0Gv+JEm=xpRRwzXH?b2FQ!hlSYrNKozlA?uj8e>0;a3y&-)b5S%I~b@JR@SD-LMS z|CWpf=oa{yWG5d#TgkSQ*O0B`zhguDZghbS1Dg$noGcggM*&D;Yvs+X^Jy$OxUKa6U zJ=!6cXa@2a!cii;j(9G7YUp1hR~RlR<6z>{4yli~=lY;t6^+xQ9r0YckJRxobMzle z{cpnW$kY6d`)Vl;Y9o)iKyC~9YM~m?_=vy|-{&zDDQHKGiF68hD0orfukD1)E|IXj(-~Sf< zKg9T(di1Atrd$o3h!ynghw?s}ulW0{GN69I87#zo(B-V%ymtdH=&$aIRzMHmN)p$(Ljs zhBlm?lZ8V_e<*~+3EV~{!VG9~R&8YLXRne`SSL5XJ5?Uco+rcb8*i+Y-+4?vD%Y`{ zY~o60-K_~k*&!H%;j=s1uixs1?G4u(ULG}yJwyg!_QwHv@?MhB?~;PZx#npwPr<7v5H&kB6x zSwgYQ26;<^LW7`jHBTl_JCUz_lCp+8?}cLhb|No@*1UwbgJm+4{7 zlk$7;LbMwzc>B~I?VwHYNQ#f1+Ji@SuV+8)_*<^$=I-@W?qZ)Wa2Js7LstO|m)uJ0 zQ9tmhdbol~IwWTei9uT78n<+lm0QW0nOe1a+t3ok9^bM0b@}T0bz<4>&gCe9CQz8P zs6lOsYx0-P&CQEgFdIKtPL?0pym`wOzE(apc$3@NWDi*dtLRG)}f{^HIo zbp^(;lU-0g@{~2~so0?S(!z0?r^L=#(uCz4+D9C7%$_lJeraJs*ws5#M4x)i;_&$V z^7&&6eQA?5D&J@T7CSAeu}b&A2@?joD?Qoux2&wI5ub7ND*a~v{%=Z$>E(YER!+cg;fm2?}QwAY`{Hj{` zYNMei!fm03O7ROkFk=9VQq^MeKZAjADxJgIa@RsI-^Qzkd@Iw;UnZZ%GK zjS}{qI!=_Kt5yjgXX=oN9=TA-mAwV;Ko|$)J}+JaJ!7Go8~nI7nA0dI8+%WC+P04&Zijj!Ta6J6TIiezNg<)V`P;a?F0PzdAyy+$SSf=cZ@9g zKCZ`0pMfs*q{+tzWCmpQ)$3f2K=`y_n~rhmV7J14s}?&^8oXg&;}Z|ZZGPcx`KMhC z2H2FOAp31_0UxXq=PhI6_xtKL{qWkbsPWsj%^G8WOwd zRQNtGiG^pnhQp(O^Yb+i^JmL@d5(*$lq99X$~R1=QJo2MtG+}v9p=pswjH0~HMd7E z)4b^Y{|sGUPgWGq`%4IOxOoDk>2p1s{d~(+Xyi5a)TfL0$dx^o;?c|Ouu^aj>p^iZ zsH+TnkxdxyHk(t8#%x}*J>9N=3nSXsV$+xelhJ=G5(mU~{T`G%qaYxvphTg*Po+7k z9Zim|EaGQi3UK$E_(Y4T#Y`2HNzm(AHTk!m#gY-b-lImclB+Tdv|xt!4IH)yXUgIH zN##|NQYpThDJg&#YP_$sw2LiuRSoSfzS*OGD21;nh2l@EHAG>E<+bFy*inyAP%Its zQn^Au476m1?#-L-6^lLdWuG=Q4CszfCNG^*MO2x&{FyX!E(jiiNZ^?Y zAf_CaiMlsx=z|o^^pM>3E|wF^BsPFWOXit5tn=_5_Qz5=i;d=Tt(+wPXgVlg?(1e1 zp%!-P4*7@TEo^j6eZIE0JcpedCi`4_fXlQWMAYZzvh5ML9fB}E(}5W|XyRJHz3P9{|z0Q^^u60-qxx@Dt3>K~f}d^yCW&Td&)x~SPd z=3uZDU>^`?7FZ-4)2_%xgwYFdA7i3M>SgkucIZ~DA^%0d08hH_71!2 zaYf+R{^x?HF1E8IDJ;A+86nIWGxN6;OwAY*9u*w)AIqS^C3#?KM8p6D-&lI(wLCp2 z++h08by0PgHkS!MUm$RQ2gq z&?PKf96mjyYcf^$;5j34@Md5i@f;-zlt9^4{J(S$gaj6ixEiY%AD67FF1VwZB`6?( z>E9xn;LZEm+waphB#_56ickPMKZ7%93t3^gu}f>03SRDd&#qs5(U zunLj#T7ig!(WCG4JgE=j7S>E!^Ihj3I@s*7rMq^HEma;gzxnh_^G5~msmI;vk$qr4 z(24M9;jD0*7M@8tg#vS`Z-A#toKE>2O1M=>`tuM4mm(1+_|o6+T6gDymSICr9%NJU z_ct8>^AEuFDjB}^w$%W7n>?xF)0PF|M}J$?+PHeyFnO@pyS}Al==1x5>9%B0QO%4C zi4Nzy+dOk1JCp+vaAVvF0UC=_5`wq;MsC;JTW#$^tG?QIljyWaE?WviN#`)&+fbI~ zm5az1%k##zLEI~cwTZRFu82Jrdn;HQI(+{L&W6qD2C`|OBGfGBx8GDFRjlWRq5V?U zj^-Ue_UrgAO9^CJ;x=@Hxe_E#z=9{FfxRp5B&ZD@#j&jI->*>e1yVD%Pbe87XVoarhL2iv68Ec%$C>E)GrNLF_*9h8R-9$0Cq2L^ z-4KpKk$pX)Nst6`gWrL9XN^d&4)KmAIaDvr{O;gXuMoe^B(Fe}Q*=IwzJSdKnjYvj z1c&Hh%S`o;w!DALFk;*>;|Nsad`9p`A>xUsVZ?K|{e@lOTcu4V%l-b&t)}W|%M}36 zcioO}9<48|JB}`wTJd8j@Z0+0lvyrAn^+l2djU`V+pR%D}Z(9b!L)bsWIQ9(L za49ip3z7rotj;S)O|AYo+G3qrb@01{9`XN)_19kdS2r!z%<4J^kOds@aZ$#K6{ada zpKiM2LV1tL+Hahu)OrKqAr{hWre!(alayAmzCGyf>XSV(6*_;rVUo&Og|3F%Ga6AT zHku;BoMF5qud#=Y@>zT|4Ds01TJ5S;KYhspwrsxi;^IXq+apJfUb1)W*v`|U+j7r} zJBx>l0t>xwyZrVwdH1f$%E#IY-M7uV;8Xuh$23@lRNm12ylBtsD%k^^h!OqfO2|>K z+FB`i?AX0aMvsczp0a51iEEY0cH+OxF|f_k2*gNiNSWi=1)WjYwNSRkyu!5!=9ls}k&47Yr`Ndh|tENq1wlD+%6K|-w z{*m;WCIgap3pA8OA7i9XG%CUdg$RjBeE@Vi;+U;`#Ib;}lfWYc&Lb?B(=tEFgU*8N zhJaK@tJNB>iHr{08gIPc$9Jn{Q+#zF%5OjlF*4oJE$uQ=9Nea+jB20KXm>_bhIZ;x z)fuH3?hL8f-c6^p=g?5$ZsF(ohKnwTY_B-%`?^wAwpCpM6vvdkqe`+SY*}#FIJbW8 zoYF6rwz9fmx0hwtN=Zt(%BK@2J#?zBAaB8#jI#RLZ{uvXF=KYDADtayj~ztsKj->~ z{QaT5t1^YUJ^Y>rWdwpiQN5mIFE7qbRX}0#VLw+D7n|oc&6$&ZX2y)#?6TX3%@&um zeO5YW?(Dj%aSOIg$SN7Ncgj@8q}Nk>Py8&>Y8fvxPPWj0&fx3yVW zWf@}@-vYfBiIvowD_D{-SO2b$>eYXBZ-iLlgK_D7|=D%2ykd6`r=lz zoUH$8e$n8v`qYxt*z5@{)5^{A^NuiO=B%~tvoUp8N#o%gr_Mg5xfd=xPh^xjI>BUR zQ^wvQ|5u>xhIgs=dKG>KKOt;E#Gul-z}6}ma@}_ZucxX^m&I8v@i#0#$LmCx@CW9~ z#9=@FXsJ#pnA<;h=&%h52?*ZH?JqBpA7SJB&l+8FrlEes$o1<-j(Go-UQIdD$0&zD zk%^rfEfJ>7%<8(VzBO5W>!)S*y*A>0hwBuQq+XtSuqo^EuT|pV`WVsZUw<7BA+Vw?^TY+!sl;Xdz4S z(4HP|-aSL__Yh;n)5mV|JBs05(?z`9waGm_j=$mgaEzNdc)1tFB ztjTs2^{X4-cN{y%{s91}7g!cg9c15?nndQHTO1kocxGuC?1=|u%|0bH2}Z^nBpj)JZcfgdA9TJ7 zEl}{}Bi$fU=dQ!Mj>Fj~!91Xwcg@2?5V#t!8N_t+A$k2b(+X#vdEGFT|89z(e0Q+Q zE2jKA_Wke7cfcM0z|z464yyv;?O75`xJfKJ6D~ZyrvDdpZyFd?k+lJL-FtgWI=!aT zoqg*pkU&BfLdZfBAV3lz0wRPZA%raf!YYu6EQ+`xE+C>Pyego$Oh9G85kzHNaa;yR zUqu}h6%`R@kP%2%zUS2K&PH_JAK&-mBaqOyJNKTdI(6!t=WKL+2G$L(QNi9~wVXKP zE-@HIP*tC*oyw}EsSUmXlxa0>62>p?h2II*3`O1}suqZ1d_gb;Q&8DJn`r{hnbnGV zkyPWU6;%=UZwl#DD$CS%6gM&9ORb35Uao-lmRgZd3VT*9OE4Q#tQiR!KgWDS7WhBw zmj?m;NwAifc7P-*@39{#Ye|u9j^1v!wnoa%o*e1`K8Yj8nU<-D3*liD{duD#8B$X! zHk6H2q=Nd^6I$6&S&ml(Xh`&Ic?q5!ib@NCr+c6$W(oBkigaR1GT9u`YKr{l>lr(H zT>+kR;lgXq5e2wEGEiRoh7FMF>RaPx%=nVA#dB#)6q8+x`?~yRi+`&E9trFn>sj2U zo2{VTTYu^1E*61oRM)Wp^+RXlevnpySj_fV0SXr-t$=v+s;Er4Z#66P{W6QD3lEfQ zeX-G{Gp$Qa~@IfB98#vr0#ygnQ^>#NQJ-)B2|EY z$wAp^T;ExBhuB0r2os~)tU4Ui!aACl7B<_3G~AgQu?O*tG1%Gu zZh{UnCVT8Pe!-lXxpK{rA>9a5JPn6C%jJa%wGX9lUPD7MyZvq|-@sSl%h7%Qj{W!JjwKcZtiFqLzVhr$nJFJ3#QZbArQM&#{_93P2moA&J zfB%eS?82M%%a+x*p4#>xQuOhMD-UkN^PrEyhwcL1CJ|*U#Fz`6YVy#^H9ig{#Pa(0 zV(<_G7f(UV5&g`~mfk)vf6km)hojQ_%Gs@3_&I(Y_jSnC(-|U9C$Q>j#`m%xr_0al zmMwhq?S+jJGs!myI{AnFOcmv|+OwDHbG zPqpAgd$RG)I~$)oI4--qBAW$OW|fy`@uN5(dWAR9$~1+uhKAYv?(mhgLMy}P%4;J= zFGU@N(ekX;wUHGlrmz%~}haAW^my`I*>e_x&B|8(E=%@-LMP2^}dVb?2xF!zVZb4AXel!V%H$8Q6Dd3Gf`TjJ|5i~F-?9%If?c@ zo}0#`3t65h&&GQs{`Kz6)YM^3H%mNT+JmoY4_!OHxQO?EW`0(7c22`HlG_{?F_Qmt zHXBDMtU-hNW@qor$|gSVfexX(L%2B-Q{r849+BX6;D0DxtJ8{? zGy&3urlR8U*FNNXl%CDLlx}VsmYSNmn?+0aYy^e;#%CIGva_@1OBTzZL9=cxE2GEH z<}0J4YuVV@{GTHu;>!7!?5v&HL#|a3o?BkP zqybYWl}_l_C;jGG_wG*beP;I3v15l^)4NZ`#>TDBgn@1mBfAHAjwzrUP?Lac+x3?e zNlxyLSh#TTyH<8epqSLB&{kjVT;A!@y_rd>>S2 z_4%T%2=otPLzMOF44#limu&--L`~xRQ)pG7{2A?mZb%J+0iHc1YKyRORBS|kiQm`_ zxIxK^PQ}q~^Y8luN-^b-XdOuKB$TpaYv`{|^JIhG61kimi?c57En8uqNu8E!-5h!N zf@_Kd)^D>;yJ3Cnp#_!g(Elp%ZMXbVFex4#=L}VIbyJe#v$CbU9_HQwCIU|I{G`6Q z2D6#JC23rPXZ;Vq4IOSG6r_}ftq3dw!9`exd6SxCR>!v&kEmwN4L1%in)=4K$}#g@ zOFAz_sPFWIlU{E%=A(cgkW(OE!-a)J4T#CDPLUflFMcPHv>qWed^fA=Qf3jz#{pK> zAU(FBBCR(nES3&`lJ+RwbArfO#XY;_tYU8>R88paf!d8-ZW*ZCc;)@B_mtGwM#!HS zvLu;`=XE+Si!e)S1q{RlP#-PTj+Z_HI`QnY{J{Wdu^X@j`*P<_9#7!Kkikj{z&@14 zcuB=BMj=@a@E=>pLqh>!Oha@$#xtw!l5)2)LU?r({rU@LM=&k~APH>B=Yofyo{N-V zlDR1e2^{e2wyLVMv`VV0((vL)a74x6Z`%$n#GgY{b!C@2x2OT5tiU`ZfG|QUNc;&}h!8cnh|EPl4bopk zWtVhNFs%WVT?8%=DEiXnx%z42p7kRIg-p6xt@MKZdKq$mHJ)cCBuyw#fs!E7YPMk| zckSgL@sD=!Ma$U+G{znZTk11k5{i7hq|yryk?sh7KNR`{Db$eEEE~5_?eiXroWFBEa$OLpX2A`VqYJ+PwO{wq`2?jTVECTRB6(l6Tba!bxQn4T!)`l zdbyNs>_X;uSw%&S8K__~O&1+im=~X*{IIVzD?qpM^bLLb8Vr_qhQ>t4#;9W$-^P_+ zm0qImYHpqltd`_NIT`VT+47w1i5Gdx5h>+GW@Xmb*{6s2p+nLfiDgUCjZ&k;N3etR z)AtL1S)v-JV}T{_6};Rz_AP&Ild#u(;lCt4~2yzJ@MI~?YAJ=@IjF_>YMeo#QLIi%7OLs zW~}4~+aJK#uy5ZyLi?aoE@el2$nT;P5^_d?PSne@{t%X++|=L0BP7kb_B=z1si5o# z#U=I^4vFqrtNJi~Vu~&=Sq}%4D@#fxG0BW9V{V_xlUuscVhgpfMaKWRzT!yZu3LHk zH_k}%gAz>ETM2bGKM-~p`HCtIG5Rj{>Rkr z9Z^zJT%(&XRvq2a7F}4q?-nC6DZlgwFjN&49(k>>Ncsl`By=U|d)Ow>Ir4h)XkX3w zxr@7D4c*kERZ3nby|>_|E62%j2<(DskJG;Gs8bVyeL&b6!D?y@| z-PNsvjifg-=^qJknSB%DN~XmnEdEt3<8rZU0hoe=(AlP*TtLd^fIqCNsNm-J7~$uonCtJwTsMoj zEnr|$wu+~(AUu5-u?xmiz{k_)NNNH|frNC3^GXh!djc1de!7QE+b!+$eY;QM-fbK} zMIoQJO)@aQ>$PGx)s!cIL1)1rMwz7G%X3!FZXzd&kMwr#xVjKq#N6R6bC z`m%^n1TUaw1;whQikTHO1iUi-@RXteFLxYtPT6nh1$I-elJh43pq&Cg#`W)JL3W8& zAsiHuvYl#FR&)zUy0247%cB@qKz{TRx+4T0Xwv-Fn`)N-jXEgOC}#zy1>F$rBL<{u7zlr5gc%=tD^AJPPemaZJu7$Z1cf zG!=Q~?;PR2;6O}yyN{tO!N2cq7|#{Fs_Luv9f!?#VbF`CK12z=e z&ylXhTM@i<-nT{`Knnr6f%;>8kgEVW)6L$2xdSdFiAce$J;nMGXe*9g)eKgxirh}d zQHk`@K!aiU?N=iKefr*V@BKrD01G%)8)QO_oSOsY6V=7Jwz^-wL0`}V9+29*SD(Hk zN`VNZrz_^*A*lL8vM*md1bU74cW?o?f@u`0`KDIir<{xAo{Uyybcb1riVFl7tmw!0 z!qO{IOZ4AN85zSvv#Lrb>;`o(u-Zf+Xn(+8r?Xa#Sd^!(>K21&w>W8;Uae(KelMZKpsJtnF!cM4Pdz#q*>dt2a>y8p#~7)-b; zCK@t~ev-8742&QdE#Oo7gQhgn*SmSI?$zVROPkQ1u1lYq^xh(e2d7ahe7HE10^rG_ zdu}^CZ^7?3uA%w=S~&%JlPHf!ZP)9^ZbY4z4km|AqYfk<>3gJN26hH}yc5dR!P~VK zv+rNz-JGLr3~U0~)PZhwaC4ZfkbkrFH=eTm`T*aPoJ2H=HX5{9)rwYrK`pXRaHI=) z!5$At<=pr9L3$iXV9S5777|igETt|`0Racm_ z`H3yn=SCi@e)O@)$40W=4V(8?UUfyvCVWIDPc9;*5T!n?afqfvo)6-Rfg?=n2 zf(|`px&pA3x(e z|JsP*FOmybl|gz1w3L9B|MqO!5D={b?rrxC7D?G^UM2(-yVNs5@N;#;y%|$SprrgR zajlcO+81-y6#2&kQZ;?0?Xp=Xi)dJNkE%s~U`_eAZQu~Y%beNszl_Vu9x^{WXD0va zjOdv1%3i%^NZSjfUkdoTqS)B{{N?;;K>>@MpPHJJGlTyO_N8Y$BpY;+s1ff6IeNG` z?W|5pc0i;tLtMY^PvpmD7Z%m`N$r(fphQGw4~UFVZtn5v1?<~(Q*v^QMn_Zs@bJV~ z%E?8}5_^Qbp#2_kB(NSeLL{l~a2I%A4T&QRED%tW%TjtrNA(U3jfr;Z=Y4@Er}t`q za-?=sPI7XN!)|}G(6?ktPOdS?-i&7@B#sa~+E;p5s@5{}@72Ic4GhXZwY1gz6CzcY z$ZmJW_&$AZ=8s{T6LNAZqGDo|U$*oKbLQmMVk!&R=LPkHVqz3U%;}v{wQ`>B>*$~q zG8TIncTWsBOE}k7q$sXQYL@ zV`e{8Sz}NC<))H2{3(&&G$eY8MyK}b&DwhR{t-pD5BJ^|?}_~(I%-7}oZl+HKCBGK zvw{2dBq5p9e3kT5&i5$i#C%Fua4(8a6Luv;tSWTXl71bG)}IYcyI2my=g^_r|CI3$ z<2=d3qGMxY3uL=JDWSKNIYWwvP@T=TLCDq)cZVxl!(vno2M@ze+^H;OJCL8Rlin9& z_&~lWC84H_K@;gU$r{Bl*J#klcCFERqV*WUrmYu_BSi-Bo)C-0EKf=rHSATk>Q?Pe z@7}e8p8aJq%|pjMqP-!q#-P;V9$LFb#!Zf$rQmDzF386~rAe&A2kK3f(!fnR?h%9= zW}+ilN+x7qn3Od7)>Z7)VM=M`R9rdc+saDN+3EKvRDlfjP^TK?8p<|^Us^)HF8^Fv`R$m> z;-ZOzyc3H9YyCR=Sl1U`b`45!bhZ8hvWj48>?s(DJ1Yi8M@B{u>>nAW4CZ*Qu~>S&fYm8!xocLnOSPf(^M~@e^o&=ObMheFER9Yx z*=vNCMWa`c8e%csR6_q*hrW<0p$x zl($%V{utbqP#4(KPyD#_op+Y%X7O8@!dtsMzrt$-&oRBMW$n)|JpSLGZyw(hU2=9L z%a+;G;(0$R=hzC~ibvi`JbFUOWpjYf$zuI%CpP2t7hK&FA8BjlH0?zIKB(G2pKX)b z9L*{EEaDgNS)ck*Iuky@2R@Zo;61q5dof40426V!%K40(G#fW(t4To;i<=TAp8fd9v1Em478)p#YY&M|_klBg3 znzqfmc5U7zEurtbHmlEjL)%Nv*Np%Mv%njo*95<;nDvtlY_i5|rS62ZxMz=LQ6Drh ze`c|+X1G1nbrp+_dF|o41?z36^>&D*#&3W${3entYDQe8k|uLlNp^P0FkSqx%`X$pB+WVHlx)}QaBr7piq~v;+30*( zcAF+^?2~oq7Z;d<6K81(=usvbQm}Yl_m*!U#)MB8dwf%E{izx$`c4_(vVF&rB|GR} zQ=ov3_QH~#JH^F7c^t+n&|CTyQ0&kodu_qyAZ);w;d`YXx*-E12gWeZkhn!R6iUq*eFubutTq}aUDIza*hOFnrQTRq7ZYHMIB|; zznR{_MvW=R6l^k?LQH0p#e|-?CcDXD3AH%UVbx`f4A(>jMFmHhqC%p~QI;rclr730 z<%kW9b;gFpy22ylM2kI|bV!Tx7OR-oD8YeIP)^!8u$|LF)lUdEz$XH1kV2rU-)jq4 zK^RwlzGJQV5%G@RnTV#HH96UvlXQl_VYlmNhc{d3S}+ovKp`uCytBL>qO!4tgbTAASgHBvwoR~&=5HM5?RaM3yUS) zett?7cq>Ty&{{~+Qn^a8QVgCWkWAH)8Kae0xxVI^g=YyA^+Q1ID7esNI~&M;Du+o^sw&fZ7tgqEQf29|=Dflp z?=Y!PdPVu@nCOYs)6>(+%Wody9V8vOy`&@}A}b{`GQwS!KQ^PUDa5sIU|f9PzR6)O zcX&i?L`{<>M^Xf35`X2f9#60MC`ve0%As%1%5`BK=QZDRf91C<`cgNrC?abVfd{o7z_y zQ2*N6T3eK}d?jkN=`}-I;dr6*(07}1u5B!IRlVl=R=R|1t2!tzJ&JGrNSff=tG&3H?xE5C1s?lg#6)gszX#6FHk_Tf zM^oUM4`&s}S%quOforX=Y4h6p(KStd;90&BByhc`jv934Il-c zeZv)@PT(43RU2d#uB~pTr(-@Asn;~jcM$Yc=;n*DV_kg*H$xY?k*}lseu{ha)}e2w zv`zB`GA;Ddwl-)%_#?Fr#_wJ7%R=OT0qJohGG6r3;tM-ZE#;?#1_y!0R^UGBeED!6 znwyijkAL1U_x`ygokd1CqbjcB!bmT8Q>XXy7kf96)C1-oRXM4pfn|%?$dz#T;FjY5n>YN(&ILHbRXX@eG>X7 zC-e)dESHqWjNz%eN5fM}2P7vd<0@h#<@QId>4|x`PunWxoaQDmXBru2z|hz47J^^! z>hr#{d{x^_!P7yPFvZ~M+kHQ^jT6_dZ)Lx=;Ue=*_6_Ho+mcA5gpLQ(IWd=OHgDd= z*X-g6Lb+qUdHBpO^)p((8t9uxs^4c&05yy+)ZVWdtzRl+2f~AF@q8isVlzLWU&<3$ z8Lcnl?@PxuRmxy7cew$;KE*{PlnI%~`#1FMJHTXKV+g9M%$g&Q>ZV~3tvCAy^84GW zDOM(6L-|c8en0wHR*n%ClyBgeO4wY@WPgcg`y4(W|D~ z#B*Br@cgzI%^K<{l%ftD$b}jSP{h9K$dpV=TXUwPb-)>-vGsHO?s)Zg1IIYU1glzE z>*t3Ece@rLjyIt%$(lfui(qtYOzNa8ZkF{JcrM2s}p-f2v!IOy)VzdM|fTP9>H@G`7#du68G$oWzad*YtpKA zIdQ=E4KKqzNk)>KII!9Gt&kHWKf$MIZL`FB0Vx7Y<@)AsmL_cGAAZAD@(thMGq3U? zZN+W10VaS-9SGc`xP}}X82gtTd9{;saT)Pw3Apb8V`{!^-TfUfAjQ0|v zj7bLZVYpWJhcbu{^UEMStA&@h4W)faXUHW)ZsOWU{6m@p%p*M?F$}n-;n2JId|WGO zm%-v%+fAs>a)90>i)ce=t|Z(Lqv0<&LoY;5n5q?Z|5)qZ zpy04OX3xqicUj~bDJyqI-T1k?x?U@qJh5i(pRW3t)Jsu}`OcW))Z{G%McKVdI=w9I z-K(_An}WxlVehxSCJhw)0DRE*j1-2_`s5g9R~&fn&mHewaiE`Z;JsVh9&J0Mtf$}8 zrZCr)6BY6|71IVOk0SvQzkBJEwl~@yLMJFLmP$!YXTHp8myDhnGUO;9-DRJ_9H~aQ(25a&SY~?pN&(8V=VIR%L zb4jv-hv}bh84KgJQZoO7|DgWQ_i0yN)?#%Weh4;HAHZVuiK1%8AM*0q(fm|rR%Wqa zW#)@lw(-w(*9y6nlIKGGC6_)$pW?fJ>6~TD<}4N8waWwl!)yG`TID7FknXt9@F6l zvvcr~1wbbM#m)2{pTKr#M$mgn&_UP^yg7oKQSq3u7kH)Af-0$Go9K0b6P=-hnA9@j zxh>h~mSIi(Xx*l%AqYYty|j#f&%Tyd!bpRpcLmf@drp6WB_xzhn@D9J2aQ@dYSh9v zhW%xI5^6rme_uFibl!kbxIKgZDMSAR9b;aQ08`0IXRM+FAXD0of@%d{eq&Gt$OO8e zVq;f*0;ZyL#~b|VWu#PLjx}#-^W?Gm-%$4z`wdd)1PHh{P=ASPyGviH*V}?3ri6!nw*7Mccp7Vqi56z_e*CS3iVVixaxclCSl`4{26 zWa+0kK@;84e?PDIoqw@!ufCt|I`KOfGdur|t?l1Z3yn|KiQo9BZ3Nv*t$|PVrTjJ1 z7eNMy{?!z{j#;JG)B_Ytiu2Zw>yvkZUH;j3>k+lzCn9Q4Cz?O^Aq`lf%H7(9_#GJt zCoC4k;!4_um%osTo?scgjE_KvgDuL+D;sDmbbs`I#q(3e*f4igdlavW#B02-yG^`K z!@WD=?SeINh>xl9Mrjt9bPL>bO*MVeQ!KrZ3TN>cWpkv_Y)|Tgnp3DnbnYoe1BPjnvupFWd@K$v;ohK`{^M zf!8|pO2a(itb`tX0rU15<{UCSDG)ua20$ydH0O__BDNIzgycji!Frl}ELp?lE%o(S zgIVCux5T|N#l1y6Z}GaHm~&dAMBJNvz_9C+pd*vKhg~NWlg?A1Jkfk*bTa~~hoVJq zvo8;W{zr53OLz064T-9Q+lm;UBEW!tkgZPt8GGl;bas z0+}M{$mOQpH-G-Zx>a?fkD$xv=$SXvEyU~DD@ztpx%EXQD`)fh&(^G3HRGvwo|>_0 zRgIGI27i4_X?%Fl^!obgLE-VGV_xTPj2VF{Ds>GFb!enKqV^4;}S#20{Fv`>gJ6c8V1YA}WuFb1p~v-OiiZ&VjmeMg>>*uF?k4`=x);0c3_6&2oyx92%L_8})=x6A1g&dJJFZR3H=;0}9V&UBtC4 zc*T;$`senyqh2Ih6WT)UE`;4+n8{QcC9l2Zd#I$;u*zk=mgf)gb6+sU`f2r4%&;5NrzSU+5+01cWC!Lt7 z-bd6`qU$mgZ@P}lbbspQSthP4>h%i$b&}=cx+=?0sInY+pUB$~GTtse|Iu}HBMEVD zcrNm9JR*mdSeo=qd?oyV(G8b8hd_OLCyeC4vH0oO1*;s?f>XP!B^s5!{^E77?YHqaH7L z7Ae6Gtg7xX6lajB{jwTije&q*E4mM**jRq$ecSd;p89Nc*6N8PGDb}~b@0^kv42@n zT{`TB19N6l2ck!d))wr0@Pn$U4I_$n3>$Nktmlg^XKLSPj}3^qZ)x3Kva@64{mqcuAVS6gx3If&&2I&qpJGJ9yu z&i@u@$hmDu>%@+RoZvryy)U~?g3g2a7{{+wD0U_mFPsXJAEmHt4;7Pwxqt)^NETa; zqkj?|3-V>Y@WsW9ZF_^|r-e0Cz5M2D{LGyjpSX=R`}WS&g*G4MKRx+9|Lrt8xwxug z-oxwJ0}ry8H(2;LJMU(}V(!8F;8`bpq$V>uOGxRVSc=RroatFO$EjVqHrO1B7z^8a zL&!P}Ym&Dc?$l(QL!D$u4V&FXb&_4HT`ex0c`1LW`j(C`d7Hax0tci`+FaLIHtKDFYrbNi{WPE%mP@24`6s^phbuX4S~| z=!ceXzOQ14UK;0nMnAOT-uo(s^3Q2mzdiFE|CWWzUN-o#7hZUbzudrIdF;S}$CS;y zoZrv4@G^D)u~7Bw1+ivjBrDXo@b>yGVvmdZEoB34IDXeumLNUY(0b*LM0XkXW~Gol zrHCj0PQ_z#ICtyad?m4?aWfu=^)H1i zpg8$R_)=|}^l)v8oX!SX)9t1db7qvv1gIu@8nf)yg*(D5CPfNcZ;Z4w*)-dwrjT_; z9IL0#p5r(#tXw@kaAfSaBFPin5KPZmzt?_cz(wP&|L@=Ef0$UAlbri#s2UjhgVu#hKWqP09So_mC4* zqk($ys1@uXH!b|4hPK%KpXID#?vwW)aJ>t66>#rGk@VeMW9rcnBXM#A- zD|bo{?qtCYexCn7=Z{kMk#uU|lZ7R{d&nP68d9sIj9Ieoo5mWEw|Z6nC^Hw#%AjXT znkwY8c$GfTG082EsFny(Pf|76QB`%tns;Qh>N`1!5P>82I`~FG>4?F7!b=LDTv$6K zDKF>CJ{8}-KBpwS&)`vm3tvB#m6w!qT}6Kn14Ob%iHaZQomY6@H|v&+Dae>LfdBkr z<6H;Zb?W-p6#4DdXYMPU=Pi$n(9L(%%{%=0yhV%3IsX=O9FBSyPlI1_K`H6vOvWkS zO`-~6je1w4lhNs*4nm~T2Qx|G&O6wWTcTroTMMJ2QMbEaRz~6Qip2VJtJ!Ba@mto% z#B_US&KasDBK?`YHNzDf9fP{v21DO|EBF?62o0VF^TAy%v*~<{x|Yz%w6B97$eu{F z!Mjag!rJkxKVT7H*I}ff1*mM#7nau^ntI*fQNvSQNy#}gSM>4b4PAR^_0T-;fcZ1C zQj=UM!$%FiZZf9wF;8T9>8!%XKA*QRsbKcxbsrsRSTD=RS_|d%4M$Edshd{dSv2>b zj}^`;Esq2ajXA7pyQE71U6jeD)3?(VAVIJ$ws$UQBO8b4BW7#Y*+}pvCdf!3Yz}{5;p{?21T))!Ss4Yy zxGD#D0DqD`?-Y7_d;o*d)VD#QCq19`3-G;US?KMWdO$ODUC33T=flb)yP#3Mu6~~E z1y#>K0f31U#ee9JKJU4~6D&hHdec9KY`=`3vYLa$%he{p0q1L&#(VD zu!zVx1VN5Op&Ze|Y3JRb+pzJ>>AN3u;+v z<5;h>clp6S%tieqhn?uqDtA=H^_t7Sqz=LNHng(nZL2cpu$T)GAxiSHnQMY$;Ew7K z`}fc6>7So%*wW13lg65YKV5>gz>?_xjI~ISP7rEm)ypw#4W3TxB%Uw&!Q?4Bspp&= zgEwT&DC{*4^lLq|om_48P)kU5?klJ$FWh&C|GIqR#_O5s z5Hl^mbK`RU>mj^RQBWQ_h3W!Lb6j4@?sl%FIznrm?C-pfb1hX7TI-xC-|Lu0RfK42 zuukdNSEI47;xvVbDuF7Gd1&9y$thj8T4FB>j{Tjzmaa?K=ZPK~*gUH{c3NW0KIO^Q z_xq$LK^}DMwv=R)|BNc=*fkyd?dKJP+)3VCe)e~^n~Hr*fm}sIFy%sO6NIQlERN8y zz)uv0Y$xH>P0)r>Ep~i?3#nzjq?%f|K<&ecNl9p^&Pn-8gQalzh?LYYXUfz81AF~6 z#9#`&r)q}TkkdulmU}#5aiJrohL`>{#O6$0SvAMf{)v?Qsxf;;+*DkxzjkbS!9+vf zjHVk8JMC#X>vH)!x7bRTEF8~tca2NwB%_=5M+7C7luc&2wRqtdr*D<<0X4* zu8oiXtfs2Ciq>ukdRU=XBKA3Ud1vHO3lhiWFTo=!MbZR>+< z7`q#Z$2U&83ay;Q7qEMS60>?rInGJ|4ah6?*C>Mwf{tQMj?-C510n*fU@LGhX(wCx zCtDx*`OvN<8_`ejLl%DLlG1?fIhD_6_qm(Ft1OGG(+6+Bo?XJP)iz^n*cV#pv#6dW z+LxfmrqHdBVeJZQSH4n`<$rSi$gOi0&KF%vSm=&LNnfHhN%K;+jZI7^gY*NVAv!A^ zf;(DtD)A2HPrS6BdXn&CFFY-=uT(`0dm^CU{Ul^(^403K(DR^4h7r>^b%{Euer-)f z`KYd@@5X({w)Y)tY{Zm*HTBhzBA*yIDB;9d^)=7joqc_2t*(4zWqL6i#9z5#*6ysO!)tYA zBP!Ddhby=KrMAu$_Qiy;!@Mp0^Ln2SuftrQPZ(P|8)JqlrwmkaRz%sNRxAWHl9c6a zWgvg)KHmceo`0SVdsKRE<$(ioHh)NdxW4u8?8R1c3u#`)@7{`7UmSa=VBv_zuPL|k z?-qU4`X!>+zLIZfy;(XYk3qE_rrC~l{Xkt;d=}t`_=Z{51CjJ(qn4W^Opn6?gUiL? zq@3|xUMsDLt!zEIR&L(<-0O=MCN0{*LYvr#|NPk!9G|~>%ew1_+_&~A>7Twh`KD(Z zuhb~N-X%$sC%wcb4)*d3uk-sa?chId-Jh4$u=h(<=1l?5RzM%qphFL0`cw)8AxXI) zK$hTDbM%*Qj^dZrvYOD$5Q!VtN?9-RMyc|*qfw51)5eBqQI95$-_9uFx5wEZgN(=fc~N#Fp3gS;W;{y&N>S=W<@QI$beOwGvpuVPAi zy9d!C)I(J?WoG;r(S&&;>~5?=wpOCR7ztPuSu_}s4*Fs@TZ>K%G}?e-8;H=-NfkG* zsmiJj&Z@rW+RSCkr**Nwawcu;FwXc_g;M&1dCp!HedK9nPf7J%>@nV2J+MxGtixi% zya#$(gk#<*P(;(!EVB|Fc}g@jqX4wh$s*fIjVRclz57{qXLF3_oVj5Ya9-rIGU_+2 z)4*NX$v35icOo9oinrS1?4;Y1W0v($|3N#THSRJyds*w8v5JSTn&D(W_E7!dEPsyw z32vh|&foInlee62UDb2J2jbU&g>{jd@5Fx(Qv#!5D{c%OS3(L_i)&H2Y zIevsAqN=KI(TnTi!W&&WCf~mPaCpSxnblJoEEOZxeO72y5NYoTE|o8CDi3uIwi?(B zcl5fwSp$6!-DH;-3wLMm^S74_X6(1((R2B@ZuG=C5H%_2z;lJefeu@I`Kb)3@#ya$ zg|mcU?qQ!Q*22%$ji|6ROsSr^I3oP;`rBoub2Wy?t$VSkZ&g))oXE#Gtzd`fZ^{v_abKxA0Fn!FMZh*={Tb_e2be8=`v8=xzniT=2sQFEY^fE;jt)TI)A zUQEb{f_3NTaVQ-+SwKl}9cK9v2OE2wxSCpv9Yiu{M+Y)L;PClB-@YfoRs%!)b_MiT-)o$NkN@x}Sp=sdE>*gSv6`Z~z|U&+K@F)=u>cl2r7g zFYvXs`#T{f0l_Rf@)mneGD#-(z#CALk8sUKt~o-};(J*d+;ByMnuxFYK9bU|6k&oG z_1V-`L%)ROVwAex40)w)_8=S1svdpTcV!3v`v(5^gG!3;3n^h%>z+CF(nW4z*I!wr z{Q&cPE#~sV)MAJ=#T zyLbM=>6h<4$KPUiJhB6Q1xB!uY}|hJWV)6={yhJB;qLX?f5-$q&>~_L)!Yj;x%&5JKpqyL#n<|3Lh>|3iTxuGSxB_?rXi?PL$IC6T+n%X%n#?t96(WNyl_YP@cHHjta&mk?EYbUl? z{4WNySZpmUchbH!8gUnQOSF}4LARPy&|I4l-xvL#7li*^`2VR~DT$7Og)0Lk5QHke4gikYr8yky%xl; zOA3+~L}m5X9M2GG3Qb%?j4Js#lQNQ@UbFBU1;p5h1! zF^4A+aG!tTEIPhmd=VD2(V*z9rZvG))&Ic zjG&C*3{yskGL>b)pdmz6lCkk45RBoVriBQ}fahfNFRV}~`)5qjd%g_gPd~FUHKIu& z|AbFt_iE3t6`KB0{$mqj&|YLkAAHOnWi|ME3cU0*uR71$WtJ?0= z2O7LadgH2=5VXg#pgmSg7=3fmH#dEYr*Db)Hjy2H0pZ2;Xzz&VWfRw({{4 z*-bM>y5l(DR56?lg=*6rPC1+XZM#~NMnYf zzHfaej`-dgoA*Wvc&xH)XMn)lBn7DQ07mDb5pPkMKk#cq}otB#k@N zgY2iU_+G+El!aWXEI1Xi=&u-}+hAD}ofsP_yBg!eYi%JK+1Z#BePeJag%-f?aFLu3 z)^k~zs4xrl6#nP-!K$7ISVDm>VqwAIjYednNfJwm32&&5%4q$y#tD0N2LH#M*^AsG#2GN#K8JX zmwq|od*#q`H$MNDfOz;w?EODW5;i}ok+Zr(3*MO5E*Si>R~PP=0V9MAK)|^wll}d- z2Wppz>l4IvH_p!%{S&}0rxPj`bV_rcEdw_%;xCKwM`}vFPK-R%}&Ro z{0#rtH~Pqt`t5t4d`LQlNIW?8zqwWynE!g{l(*puwgJU_p7#36zovF3(vK!2L1)$7z6baF_rorO4= z$06I&T%KOx5T1o#Mf^L4mdt2mi2+29a@ZBwZPZGsiQ3+cNqS9fsMQo5r*${Rm|Yo# z#F!VvcYHpxeB4BDBCuS8G00-InL}(=lieER2o5#{+k+hVs?$2^6fI6j5YYj zdaL0ltM(`MexWt+carAM5spZELU1pbO6nK$rbWv3DA^V*TVrHPtZa^xL(ozhQ>r0B9-`*R8722>(&L^;i~LKWe!xu zNnM9fL*&e8n{#HgIc2G4re~%!*Id)9U8gv1J(r*9fae#$woXsc+|=+mrM*y)2sk3i zFA`nX{`?*bxwv=x!FTv~=gVq#2&&|Jm->zNH)o;4v_B+@S8I=X3@WV=p75=t&{x2I^pCJ25sw1>0eLMPQh9{!7l`J#c#BB4X^D1Y=vJ!o9vjJ9)+)ame?~$3o~b(!q4YAVXp` z!@PE!60sg;3y<hj^B&SZYV)p%kODyWBZ8<9+`NJRMkalRzW zN#_8)k($L`lhqZXwaCG)@DNxXCyt#whS+d~2VnuiM%jZy42o=6ps9&+huY+jMyI(J zdIzx^#&qI1KBtQ9@L;Rm?l4(xHoKz^8?-LiWUsT^!rkE{p$$LfYsKa>VE<_$TF?#> z7~>!oU@ui-B6$4uUiXwOo-$y3=5U_06D{Fjge*A9et5!nHuU~zQiAKsS1IEWO8Yk% zitv@%zK8~wHOnARGBBPb#D3=?2Hu%w4su8yTe58PWSgTyHJ-2x&j6fHIGkW3qUSRG z#0W!za3H1REwH-m&c@J;*20rej;$AP5Ivuqu^>^w(UcYWXZ%-5ls%2=+mkZs3_#_c z7@WXnDUIX?Rw_3!p)aCrixFX*n@BwnP)asAO-g__5VcXH45{>pd;0NXjg2oKS?WIG zd+~_7>A^SF&wlgM>)c1!t?q|EfA6WU+*`gmvD=L$9#^vMy=6^r+*`J&zJAf5H7D0C zeB;SM;|{kzu!os6Z3iCX=RW%c>kKb=msn@g8TVrzT+kWA%${JqCrIOTSUtfuyN-bs z<#@MWgCPY&4K4CQr#8ykMzgNgE;Rqib_PWhAkU;HvsQ4VeYf+Ytwi)4BIX|@_i z>)M-dl5X+Gj=_ZJINzIrmCV5&P3&+)Q`@aBma3tOs4v( znN;m7nubm@N@qUSR?r)(sq;n$>9q=Ij`c*_B#)w!9OWlD&M$3XM;yj7qfz zR7Zub(J3m~Fc5m8Tg5eLt$Q#SFecqxBD~&H_uF%wXvYY&AAxwm0G$Rvi~&2L6#LW; zelQ^JVz}4kwnU)Al|DqV26$f<}R7=6CZw$G~;dZSFYK*{) zH#&s!-6{<4cGJK?vNKNO^c&)MCH=yTWJ_}h{gZ46lVFW5Ji;Gp_FDxFunFLjs=#sZ z0jt1%0#E1{z^*|Io^k-zm`+wPY+Tny3cB4Iuh$t&wvFOQ1kFaP$>TKG%<K};D-)OX#(s7yID5c+?Md1rR1)w}e1az>8^!DG&{{+}=$-x>n=I66U zU#9fF>3ae1vO?{74gi;L=hHs^fWO8{Swa(YGB07fYoP93@n{LJP-Vl({Ie(WNnE=V7ld1EbE6lyYUHRjreHm6G!s+NnB$m# z#5rF$dm%snY$vM>d=PKX>mRR<2A*;`o^{G$V(r)jn;rGaQIt%9tDjGWoBiFtzH8wR zEB!BCzI+jBOsX~4;5);jUpdMr@W=Q=y!x;2vcbLw;EF0|W$YUMCw_px!2cx1N4%~T zJQIf#$?WoI!fiGf@mh1N3GL&Lo>c`OMr9vm)HFui#B7b&n2uOiV@wz{f-JK1pbDwy zt2G*GQcSETF2ZVzw8q65^;Y(i^(Th27=I@rk5nxihC*e8L0^jRxTkpPm z>-I-J{OMD97&MB<|ISbHO|U|ql;fq5cin&grm1m9_V0UNs25U&?|I6z#hxHvA$kx) zmmpkE(p-nvb9Ma%j#lEey5gfWA-yA_h9*TgQ7sTg;IU&z!G0%5HNfC(daFb0G$n3w z#)sdTx+%6M-Ford#r*tpuZ!9~nGTda6FxW(in&oKHU+*f7p{o*=7`=*NoI({3PUiK zb*544PMGxMG!{CpN?&hzXas*|O-K~QQxi#lmHkkd4#ev83b`g!^{pNC zBb7j)XVU#_O4Bly`j4-DAMe@2s-LW1vUKi~$Cs_X@%rOvjdE$)qL9R&9=X3>9#_vN zPZ~P3s`Z(LlP530o<~%V{0V3b(PVnfx^%7FN2Aq+7}J9?flPor2u;F)f|;`3)D*H^ zXKXTnG$6--Q|K7-TRMrk@+bAY|0eF(y$=uka(C+y*frx+Sy#rtQMTb3gj0-Aaf)=K z&JvssoTAU~;1m{1aFb@eX}f;CHL589RDcNxsMsHuh!}G8`_${Y!WHm9#V1%0Lz$h0 z%wcx8zgr3lXHRq8ZrQhM*Bq<0&Uag#)jDTD*)+HO?6YV2Kc)k9$hM#h+cUg*<6U=c zWb4oS_6B$qz3RcE6ex&zQpoWk7(;igBHbbD(p>5P7p$TwNw3-N$10lsFIYvf$zI$U ztJtA+?D+o?Rv|qtDZAN$ZS2$mc;hy0^Idp=zYX!wx_c9U`vKpDZEO>N>i|2ojUCvn zq}20T_DFp_|ICNxb?k)=oPPA(z{`PL^kqqS2k+CqqPWzr<^RAhnM5{UR7AKO>*=G3 z)hS`RAiKtz40&<9Gg4vKM>Iv+9GgPWZD*5oXJklCvi0KME}r}1Z`O18tKt;2#X4XL zHEKdlixMbBoIdfUKYhb?e-w_|LBG6x@R!KVB^R0>{nN8kGXJ#au9cjJ&66*e@oyiQ zD1|QCdjG?FRvunGscLQgtjfu=o+6qdyZyNqE4|^NrXt`IMZhQ0!-90yfr=*GjiRvr zoC^}tzYkC}g=n`6fTHR50g4?2Q0(XgP_X?ONW1tWn4)y|Zd$GH=sPVD58qAux8C=N zBv;e^z%q>W`NohfE5@Sz&6*PQm1cX}z3|Umk9CRA?Dx7-M~+3(2QUd-05%bDo~YwT zt_$qLJG|jRHoH;L8LVb0B$O4&cAX(4!jprcPNUi2d)R8 z&tlQTYJ~YXiHzfb!6-~F7C_z-bEUG~?5JSgV{Efv-dFFTnfV=F6~Yc4Bb;ULV4NP! zAg|S0WYYzuhZLFg>7jjMwMl+70;)fq(Q&Z}o1z@+gY;y1S23v9psl@Mn=|Uo zm(=x>hd#Sw*|_&AM~u;jt%`*qMSNKXJ@jYL>(<=ljX{=!Lod4wmLi+0$Z6Asq#M(N zm2{_t5=fwqB7x+DKY@hMSYgpSVGi2$3Ja2(4BG8sRughi%xZSY1vq;G=uxO+hu)yK z?=Tqj&SIR$p~ZRxs9-$^c~$>u+kv#JLm>PwP76YMGX zZ+%D3ZGD^0oX-1gy*Jzulx}cqi(GnLWRZjvr%;2=YDyP5PILkzDTY`MkRX=DX;|+x z!NDb4o5F3|nbs(WG%2PIMgx?A6Nt8x#@j0+EW?>$$j~1RJL)`YII7XOthH8E2REp!E)4SuqB!x<~qdj&9Gi5ux!G zb<&?Y=K=*}iv#j7)RZ2iFEZ*hO1eDIVNQp5q0}FMMc7(?r;a6Py<}^0Y!_frQx~vk ze}LKrHyT08uBGbR6@L3nDH@oSACOfIlV-XDBGdn&7I)d$DM;y%s1M zP&afzA$=^+Hmuf@r%wV#!8g)2B(q{#Z`rQ(Ya6Zb#CK6QXzr9)M2(Ay`*LoF%2BeL z#nbui7IDhx%cGfsAR$z@KuiqPM^6O)R-~!*ItN4qJJPjTcAcwtM2wW~OxI+(iUpoS zh9coPLM=JI!gnRVOkQd7|SF2D~qO*os{GyH?Fbk;hugZX#whO#zS9uL8F zL@o)aXMuhFxj09rd7bw3P6D_8Hv=+m5zKt^q*gIyM0cvZ{!S>K;qXRX$fYL+!M!yBXg(tdLb9 zLs3W}mcMZn^VZjYwxkm345m_*vHAginj=6nvMhBvW4Zw{Ru@qOT!`ovhd)8OJ>f!4 zz=gJJLf0Er%b*j!5*!y17oOqHa9N_Ye~b)8v%}(WzhqbES-fgiXIB+5>RkJ2=HCdK zV>Pq<*id?CY@~}fei_={|h$M1Z-$~ROotOL#k2Jnf44bsDWeue?tU?37@SSYVx?hWAZ@m`xH zU4!gun?~nO4>$D*3XebmR9HAiK^DSALwBL?$|QPC=&&GHR~Z?MT-|CZvb!;-k`I6rItj(OE-qWO)Kc z<4GaW1<_7tlffP5z=;)a+inPt*5JsBRFAB7q_drTSE$iXewfwSiF|EW=qMnqNc~`s zs{@gyixIR)W*QBv7ut}dh!MSufrw*jKdWf{li;U$f%(_^$2Hn(!KgY71`xBwmCffUY9AP#`M$ z2oWAxUz|g}LL-{P|F3oZVs#ckc^DE0+~;F`fC zwb-pKj=~m;wI#GLD44Z4TI{%)cluRPiR(cYkGXE*gX!i>>FOllzI8@|J z&ij7eteNwrvHNy&Y3Ji8>T>G7OT*ts5XrS{PTiO>v)G5~(Qz}k*Ry*ZYwlXUxg95) zpsTYd%S$MZM>9loSEuXo>UEn=Q$MHYNK8wM24hHS`F|*T5BRpK>kr)bJxNaDJ!E;? z+On*@w`AF}Ez5iF9j`dCGd*KxCxj%B5HiRlWI&k-qs)}ON-3+QtPY?BT4-r$`Lz(g z{Lg()vK>hK|NlQ9h=!l;IQNY2IrrRib3>V!V#vgdxqc>Q?tCU@ZrlUp;!I2+2{eJ5 zf=oPKi^-5M)wH z>QZ?cMr`lQi+9pw3VAf_CQj_(m|GKXN;wv}htrvMjd&*|`Y(p1VDU~$VZ<9J{?q3i zr15~{g2&IZajs-A&;R*1{t2i2NtE{K>K7ol|G+ltefE52|1aRM0}4ku8l20&g_?pq zewYWu-^oiferEExN9Y^a8P+)XJPT)7rEsbhqEfK(-@rUe7V;uvaR#G^P7t^Z z5l0WKMHsva<`W?y#W9%S2!97BJ@|LpO@}1MADy=#us_Rz3xT1P+^|wlf|Qe;j+_K1 zRgs&{Q?Qkh+=T?kPnn&Sq})k}-$usVw2ZYql{cAud|9UuO@=M@ZQ(%;?F?~a2~0%V zmvy0p1$P&73ST-O-u&79)MlGx%I|OFlo||fjgWSEKYsoRYV*g8ZR#V7@1wq<-ac57 z0lw`pil*IO>e9XYsMq>N+uKJ#-+&jwISX^i0v+1wNf&Wo>u9MWoX2t|aR7*Ar`rO$!j7a0be&QtHnrzk*GIElPSnM5w3$T#68B_+>?sn>+ zic>Id%Q*`c^{4kkuw}99cmBEW@0dHq%nKP{`~V%U@dBw!7pXhxNzr@`83e4qg1m{t zh9IvGVh-Q~rYN9VUot0Kl&;`sKu8SyTZpSTUZZ#LuuV(c9!_RWW`_wU#j7J?Qpohl zaGcfnI>b`0eEFf{iX--~xEwsLRgW)3_-STVHa`pzR)1shm)w(VO;eEPR0#=@!U;8fyVL<(*k+Ge(h(B zTo+@x9*3_(-+w{tMTk4mdT|r|J?--a<5Fj?9)MrqeIXR)0AJ=?SogHBm6$%UiOvKL zFI7S3Jt|^3%RPGN@v9*CJ%8S&5Ygqt(1{T;zWb+m)9*{_!rZaTKkbeu(SPRm z1wTgo{uL|wsoy2$();0B41NN4yq1b6GZqq~s|oLMA;cSEC(0`?8!Ub1HLQ?zZ6O89gVFD&dw zLq7Fh*uPW2hyRj(j`!L^CYF&Z*ofnp|3^Oho6kj2C+IvE*!o1hi4VTQzD{=fo6jLP z-k-v|p>r=H#pPeacrfNF2h0WX6;k(bz-!*b)BWpdpmdG?XC1@myg>i&oL%xw2rGRX zKfU+5mf+}tKT=~sv~>EdEe97&LIuW1p&Us9ul-UI3R!^6L4kTMTow{634~}SU|@#; z-=j`kMNgt9{&VI6x=VR*55-~cq&RyHD$!kZy5Kr>pc&JnIiRN2orlcL4D`u&=ZA<^ zPbVQQE}na@(=&G#qP?yHoJ37*DVTc}%Oi{hVg&Ra$p5dgJPT)-gx|*yaR%Y`I#MD^R0tgV7 zHw1OVe7+R<4;UM+zwjwtA0`q`JtaX*lY@`q;j@8o7Mi|6Bf&^ylf?0WM#P0M+B8!8m;} z9OjoyWS>Wmp+|LhxVtJlYK_&&bN{+$?yu}2$S2ytn%t2t`Jlhb_TBw#Jb1c2b{+85 ze{TGj3JMSE${RXLZT3WJW+ycPSZD==JD)$5D!VJELwlu?e3D)l9n7~K^aC#} zn;v0EKY)T>&-p`Kn)3O^6&1J9wUzU{E)Pe%=4_Wfo55 zMifQh>aN85Qv?^+b)EZuYVKwbxY7Bsz6&<%zqVt)c#%9lNSV+ywG9siJv)Uq4M9Yd z+CN3z3BuAyx3e0~MRmh?uuh#HKclZr_$>bqk1oYQH9&k~b#dugD+)t`Q>zx8UMe4d zVzjvqJx5)jNerbw=SKHPa?h_>e0~Yt|B$gNIl2YFEYKc&g4Hk|&|*Iv2VX}IgFcrX zDgyx*W5W%0XK5Ofj}1~OsQ<;Xnx3w^_fF%g4z)T($8Pi*1sjIoW>WvUnYwfN%Gaq+ z@91dr;!+L98$N#SCVKwKkmH1N%+>VyN;v+G1sEJQT6xcJ{e+T|=C^-v;&t-kWNMI@ zMQPWNq(t4lIP-c@J~fk7&179ub&$1oZRR!5A_Zb=crW??ZA=VwxMoZ#i#JX2R>8vd zDh(!nzj%vv(Z(sWeadXF(xI|zc31&xjZo`x{x|qglM0-rR0q_SD4md9mpFPN$Ker0r~8PJPzdui&?>Aj4-oljCb_#&IIQ1=37C`0n) zqN!lJx~OYN%EXz<&po$jJ`1_ZKmR#S5Ine%I`X5ud-87^@%=WSs{zv{LM8iLBUE!v1=JwCZ%==YOz%YU?Q&Vu@a&==rm*kSt>KEwP!GOuCA zh2-G%bFU$>?fTi*klx174)7uS4p<}H2Oa&q{!D~i2l4Epby+lxf0Ah^as@TNE}*)Y z-G8#?4ATeZHJl3#d_cq8kSb*ufmUYN_|RFThpD?mdCjm)%;7M|Dg4oquD)X4aC z{+s}99k68xofM$Yuz`WV>Dlzjw&2=w#u>W*?{?=$Ox^+sI%nsobD^z$7_SR&p<(Mq z?=v!T?OO`9!kG#a|I0wkpKV*PDqJD^=l{)CV8j{BH|Hc@CSLvT)?x%36;>!29oJq2 z+YufEbA>A0a2X*DbVHP*S%Cbn7KG(R7+x~|^+ncW7tw#WBg|fA?cgAF=z6vU$7iVZ zbPl{UY!X342DD)Ztt0zDcV;j;vKN0li`f>&ok;x**TN1i@KcF$PNAE|sDm^CZ=$hhCh;-k z$&XQcfnnB?H{iCu0Qrad-nh=!HEnURRtv6`k#9siBKJN7hZOHbm-bR_WTIZh1;40Q z;hi4i-E|XX30YqsqqJ6#+Pu?FCf^bwxSPafA_na(9ylrC#duQRy{+=MLi3&I*2YqXAn|^f5#~Ef?Wgt zTcU-zrTviq7U?!f#$LpSj6la|rn7f3e9As!741vLz`PrTdWz z@bN3uzlqCqdi&h>pFT~&$uQJ#*5BBB*w7vnGa?N>pIz|u<_nk$! zI0xujceV6$w7(Aby-A5l^fOvtt)qDm`vkaFf)kWir zEDSIr2O^jJH-CWE@N}f*=Y(;^3VKY~Kez{Y3hVfV94x%xOt%nd{BK^uhZZdAi*VoM zvFrE>2Aoj12mv0so|4D7)<qr~)0lqxZ2sk=|!L}j7 z*@=vcB2B#%^%_0 zRd@>X&$q%EdUy`sJHXBg-Y6E0P`lxo^j^-L^kCdnUU&|V z5AO=Xx1TJ`XUQL#=Q%h0NJr3nO1PRi`~q|Y%%46F%skK9L_ZH6A$(8g-ZJek#ZS}z zAbgMa+WdI_Xo49BWn%epJ`s^ee}?%(tpXkFU9CpjkOO|n>~Y~3{}=3U@%Lf((EUS9 zAKGJ{XX?#tqx)a-|b(&Gia7Hl_zp_d-h>&DP}&@~!pdW5}8)1!-ip4r1- z=&=L$fcG$<9j2xOO%K+)bo+~*57Ohu&#wTR;JME8xMu2X*y85_3$kAf@{^rze>vSR zUZ0PG?VqN{vmItY`~P&DD{kKZr{i1rA{KaL)i9jTQZW!PZVXLm*&en3c zkYNB-jFCYFhbslqp!UG?7V~hOPBuPt32K+r8{w~ubC2K;^bR%oMr4LgdW*inE&O}} ziQHMz6($r>-f4`Rq)tsvhR0>{uKZCvwj}hvvN$0vy57KE+ zUjJry*Y}UynWD&!UrrqL`{(*4`7Op9JAsxkMvffDn2V#TcpHsDCvf(Yl+u_dF_VC@ z3_<*(g9|}nysX2+SxV@i8g1E9BPDS6F`4RYw0#nNFuAF=t^_K49`kyaqtYzjXccS- zboWq3U4BkHG1b%a{o9kPj(6g9Ty<5=rZ`DB_QBS<;It{G5C%sycsI{?3Pj?w_GRT6 z_ySM6^XtjEs}q!DVuJPDq^f7s5>4Gax-6$QU@6IsTh3C={d#Z!5pw9~t-!6nKZMs| z%hfZS1ehZavKSWDAp^nG>7~)RyyE<-X_EQODQ6u&=WF*yT1Kb!Ok{GS;v@E@xi`DJ5uxht{;nLT9Bd=J59SYc z9&@2^-Z>)m;fqXui03%=*i3mU_18&CI!=Y5aYV^zVxwk#d!f9R`W3M&*Di{=^83zC z=6EP)l zDpTj~FqWv367}`oB}Y!?_*!-3Ge})nEAH#=Zq6{}ruLu@vh#Wi7@oL&Nd=5Cj;<#U zVu{&-WkvM2dl)sp6LVCw<(px`6X!vCH1$7 zx%VEW-hFG0b@1TBZ>}LSCs20rOow@fI>vse@BS~gT?!o8x3SGcuphkg&;0JZ>?<`y z`??nq`@rknkKVqc!`O+aCVktsD(WLpe|X)1j^vjx#uR4lL*(KL!|^d;44=4sB5MQn zjJjBxGKPLLj!gOJ+tsTnJ!1I<)`09-clS=Wr|0{hc0zlMKB|WHqL`XDpt@d3CFV~zm)j8>~N1`ytc6r**_yTQv9j8Z&iLvPD&(5{WwBj6%G0XWLaKU z9-mSd^c4sYdi2U~P**2f#y1yN)<6k%5Jl_Y0qDOO_~LDvFSPTV2>ruNogjnekPI5* z0E~hbpw$oT9ASp|DotA;qfVr1i0etk<@JL1N4Cc^eyy*)gd z9#=7p3#;h3d3KFs(^@HxJ{nK6EzVWMtZSriI)@8x>9v5uk}yzuMb?z}TDVE-V%-{D znIVm^CaBBpJH-{#jaQp)?lYr5p)l&Q%%{sh8_;`GIRZjGjqC-T&h(Ac36jq<)Vio+ z;tG#k;;NJr-e)|eIgxXh8zxExl8W&v)Q*b&52YDPHA6i;XiBN*{!g-Vuxjp`K1P?b zeJ~HuT&AVEZphhMMuBO69JwfYP z4wt7ZH_Q7DTaMOv$nLY3ksFa z#WJFBy1t=`kVcd6Hx&!(S`av0CJUa5Cc-mG9@fQie0IBK&E0ESmtUC7PuBRmCQC+r z6U!^i8N@@qmoMfNdh-OMysXIk{y#_5AUX*u6|*TIPfb&jvykghT1s|5~a zDiV{)w|;wn*T`dk-?GAc^vK@fJYDnjp}U%?{piJ;wl_I5wBzj3R@- zhHML1F)?R!I;VAi|K$}&I+Y)23l-dP^xhbmtS!}}yzwYWzVWiw&W`}&$(p|6FInjq z34AO3#7e@B zNP0YRcx<$1%Zi;KsNtcFKh^lP$)MWbn?M!ruTWH$Q3m(DpbsV{peQThLgO=NDID^t z^W56qz1v$rJuc7Jq>zy?81!95C&O#u$AYv7YIs~c0(Va`V1c24$;iY`AWjPMfg`9K zYhqRom-?!3&)h5Ko`7=a80(?#ZmK=YKi){)3tOKwmSO8)On@gAuTL;|GruDEGg~)f zUB0L0z2aSiZbai3kv;d9xi(=8F^zsp`sWUmZzz|^t3YSG)!qHQ%28)ZiI;iQ#Hk)e zX8>+uJq&$C(2~faRCha3%LEWjQN)z=bS7*ME zdfD2%%5`j44L9G}wzd6%qnlcE>iVf87rXYh-+O4PL9;9& zC8lboLFJ^jkx6yuZr#{wFtp4ZJYUyYf7fl>y3A{z`EKVNQSD7Ns3j3qo0`SdT$Bv?Z5m}m`6uVx$rs!2F< zOJMtf6OzD?@e-hPWL#{#o)0JEiORwbdrFGEqwsCwp>$VQ;VbCX!Y)_(XL%bRS@+5` zC0>u-`RhNw{s*z+tMAzln#P{ovH7799r*$kx99R&-4(lba^V!BI&I4Xxd@E-7+2*t!tHre=%bAUy3^F@&z+(qaOcSB z!&M{*Ou##mVzYoGKrSg(j;}>e%^^S!j4Y^NTzrT(Le*Tb^vGS{}*j z@r3N$Wa^uAWp*4~J)Sczs@~ZRH%(k1Cn*tY`OwzlWRzUIb;b9`IyzX2@t;n)|MT_t z@8G2g_Je(#ELsQAz-~d_790m)``Sr@+SswPF^877IEh;g=f=Tbn52Y=@CvK8bram4 zp1JRfdfXXgL{HDWo?&aCeZ1}qI+w=jX1MwV_}U2Z9SkRFAc^&^UJM~@K3hGRH@MCF zS>BG7KBccpgzmd|nxNLUZmX4zq4&@PD_N&P+dih3 z-=9S2aN$&oaU+$D2#>bL!N2l5Y(Fs?arW&jnftmkNYfF(&xv8M&m)#bv$0l17>CB2 zM6|tx8yzv1gDC$%!oj9u-7AIuh3w>vWlDE>eVfv;@4LrWbUuVwXY2G6Q)`<{2u)I( z#VHC`Nlk8D$;Ms~@)T`J&s0fMPJ3%zo^%cR#pL8?dlA=Q&`Xk6Jc-b)?;k}GFRc-} z>-*N)Yf)Dh>dz=C^;-qzj!g$oRoq%|@aE0kHon2@wI@CU?#JAx9Sq*&{0Y`B9!Jc6 zfU6Q1TtzP6DqQCQFCq_a6qv_SeZ~FW%rsNArB_*`NhJs+PpnRP1{s&%(te@&$V%7O ze?$qB=(lJFA#HB6UpE@|Gc24DZ1)4l`kak(# z%5=6k=H7rUc#MtDup?otQS_}%j78&Po%sX2w4l=24CLd1#$kzLgk~vaMlUI?*^v)L z^G#Cfvq?&}VFOv>p6s-n+NOO}A{wb$>CGV4QFpK%DT=K4xz7^>x~#dnB#kVUVs&(| zFZReir9$dsQ>{G{{YL0&G;HZ+Wb6#P6~=~xsEN^d&4ZpQ+(v=5JMG0{JVhgV%mG5o zlQ>%u6O!Gkt6Q^qci#Bmt0y~+4XdmTy7nD)epOpti7CrDcw;#f0hwSOoFQhZ+YqJw zV)wru8%CP^(ME4>lDdAfq}?-AD(`fi&hd4-Gg1{!U#a-!qK)ll;+C#1>OVbbXzmTm z=y^JLxnP6A*W_Ol)d&~Dc<8YKcS5Bz97+H!2x=kKP^zC>2|)&$AB#WUNwCpCuj`x zU<|N#M~h4XFd6i{0FoHhjH$%oe);I5`OW6!&)$FI51^B#&?g18>bP-AIzc@9bCgJ( zYnUz$i}#HgD*|7%K?pe!;TxM}WL0L3n0>14xIge^t+nTJU9t2k+% zc27^w_N2`CB|`sdi06V10Y50*4r2z~wn(P|@}>PAhDO0v4eB-fq@{aT#Sps`*GjFw#QvGZS^Hn@Y%W=ThgUC=sm7hf}D2>{zP^%mHx+>$g6zr{8bu>_EV< zJ#RZ!9%;J`;1}Kg84g_k8|H-%LAeHZlE$7uXN*B0$sW3usz_RaV;>fn6{d>gE1dYQ z({GGi@ZYp$v`W1e9VyASls0y#hhF@debuR+&OL2PYu9Wc8u|z)F9wl8)l?NxUf;47ifJeLTgabWogM7#==M$?mX7YWd>WOff?loa!C zFW?~XQ#tQLyetYLiaww*kP?`j)>2rzhE#zGKxhI(e+f-zJHmpe!$^>$MsQ9J!djA)O)fZ=ex1NZZL#*HadX69- zoFS&E+t@K;XD*K#;DK1O@ycdsd*tW}VaJ=?YqZx|y8 z>Td%C^-3=~iunW-F8KiK2AqS2`2@R9Q02$Wi-tQxz)4Esd=? zZ1ndHkIv?oZhvIZHa@z%LLcs}F=iz3a`H``ol=!Fw|KN6B5(RlP{qe|I#_C=7 zx2<~OhO(T7oox*p{8`-%>e@U>nz%SACp$sbu%jcesol79SM7mDXE|kKe+BcY3d1l}$Y=vh;c%&oG^|G?iG@ zY2Jg49miHW?88S|J?pwFESXEV!t@k{&Lz*Q(Zr|K+%~iSi?faV7-f|=zfqsa)i-Xd zQpQj=agoQA5X+0gQ+>02`uCK<8R*FbZm_ms)=Q}eg4h&_qE);tpYH3-=Nl1 zS5hF1&)`OAJ8o?5efZ#LmZ+#_A2~H#u(C8q(tL1L+wN9XPCaabV0oydY~*u56F^C9 zeER|x2Vlg-@<1c_AFg#0mwfKs_XaMkcV}pv9#=9qhMyLnY;JOU>I_L))+)WS$|2M^ z95Sya)zH1W;l*E-zVNVf_+X>8DPNr#OL`)6U6nepN;#?4<~*|B5s=5E8_P7x;;fsa zY$cV#*3DI-b3dWS*bHO*7{*wM#~6}XSQB0}6hoR9S~`Bu$Zt?=e!!Y^oQM3_wdVHT zfqSM3)aAX#EQ37D-RX7K=#x?m<)*48agkY&Y^-${yGn9(3ZbGvoopMtxuNXHctBO! zsm~kq%lHEz?efMOyKF=Cj!38MhL++US319HXWyoM1<~D^juuBvpE*8BS7qa=B5q;n zyhSPg@miI*bVHSAsM;2jS~H4w!$_Qm#BzYHHbKT>D=bDd$&jBg2Va2;q5Kt$+l6?* zp*$5_F$9VMD_6#{r{OhU|*@k>yewxr>GNeW>AxnmfMZ|?jBGYS0sTn&# zRD+iRA=$xo<0E`W?c7k{=u~N7_I#_bwyx4C_KY6JGyr|f;ltV{0QQAFw}g2`!mKlL zfrHJ6B3(L}R?qbE#)RfgbAYMWKXpe_^SPNo-uRvU%g?RPBfd!uRF!35q*OX}tjws= z*4X)}=6YwO-kp~`CG<3!9L@HOWJ^o_=w>2e`?E7n=gf0EH$K0sD6so^^r*fB>SD}3 zvu)E0I}7^)6GzHMPW7sn3Gz%7exvR^@!^>v!<#gJVtxKAn1ck?5Q=jNjaWT03Ifa? zJ}?0{$^|Dz{%YsiVUbPBjn;Km7dNP*3rjW+Zgj4>y{GrwdJn<9i~6SBxlG-2cDC{4 zc%iKK?k)KjFC{v=Q22$Br*>DA-tZ)J336KqGVu;80$1t!flM%$UonINngK@u=E21V zLCFPa$qL7B$aj2G7rI-|O&1$0TBXU{^tkYKo2#30!k4CLq*pB4R+k{OG}~bid9xh} zInwNe1Q=#Ev^-1Z}@9L;XYQdy$HRG>I=qoV!5@`0Ixq!D@P zO0U?KlO)N$kF$i0B*p!C#!{PH$WQc+-^I|4Di6QJ$_xW(z`li0x=4D1gfqGj<68iO z&wqsx98F#ls%&SnKq14C6cr1m86FL#$7x+2qBqD5o@?+W{E{@Up`%C10{ohqswq^c z3)RWIl)t6$;^ajpLy;meBlTZV2~nIRU8T)ZERScCmgP5|d!no1;afZ0uFegs+fy1g z)Y#MY<@tHiDoK&QT-AMkyr6LH!E#w$z!tsK5~vZ0D~n7^<7_1j>e79yyhMA|f$82t zacyAB{e7)7<$_dei+6P{7%W+iFL#}}HBThUYc+4k&4+KeVv!_it+~m`2VB|Oryn{q z+2~Ov#98XbD#fu2L;p02`dsxqag!#}2S zeX@G+JmwXG#ymJytHE^#7vT-sWb+chl1l((WTI;D=+VAXaP+n=K-_Id=_>P#SNSyfqT)5$U4`x%yMlexD{neA?OTUtCqB4g7lH~MX> z&kqydw!#iHFM}78B1}vZh?s)zj{=!*(G6F78|Nn*-_+JJ(SDkzz-h}Gx0pJsIeU&~0+b57#HS*%Qg{b5Vz zj6UC>75IgDo&sre8(Nx_Tc9&kn$j~;|1UK$!%}517v?5%h}2wjMqa^arNTONxP9mr zN%1!g`<7b>!J#9k6-(l?w9*EnUzymP`0?A?uBK8;wye0%RVyu&$Yhd2X|1cTSe9Gb zyKc(iS<~!_Xb=qUx$mt9xBAB>zAoMI)6l&BMgAH13}QzpiP7IQcH%`7SWrXgdXb?H zqFpEj6paxt`316#+%d4~-f_1SHvghhlb0c|r>^owWkgn9udn}Ml}i$%@V9lf`4#o1 zrqyGsn@riJ!ayLqZ1;c*UFf-ewbRivo9|p+=}0V$vF5oG?Y+f0imJ86L$|i)cBg9n z8l6{>k;d1T*^-h4^7Oek*o+q_hDF{BG9d`!#TAdqF%roplfI!At9QS z0?q|>!-0&rOp->#Dv}d!%mkAKJ6*3^M=y+2-?61C%T{aT3E~KpYVR)2Z?mT&U2|)< zO;A~&L?}U1;dHOnrP<7eB$+OKS)#<^Z!ubLId*V;QCr=nS9TZ6%SU~Mg8_ARbL_Ad94|47P+CCNxx{&K&vp;*6kX^Q+4L7_RDWb@Uw%yf@klS(H2nj6bbmgwPx z0?l(*+3&IE!XT)VfMp|T5y%CL^}jVQy?B`QXl#g)NHiPJKa2NPtgWKMG`L?Txv9JP z$cQ_)cDA;~UZF``BCRMC7TYB$yua`gMCJm%z22NA%4^UsFWuB?h*4B-d2(~#v5}$# zJ3B$_XxrLUb$Hu~5;2Qh=I-%{hR4T;OSV3|qU9$CR`dHcJx7P?Pfir4dj`wuC4R9? zCiY9}%LhGa*5PAaeWzAh`ZG5i{z-Mg=?iD~jb^1}re>wF;^9Ki+%%LM=v_T#fgIb{ z!w`!PyqSk(F36knz!nI=2o=5g8gc>|-o>>)GFdEs@zj~dmZKxCC5hs6ZZ0(x|*_w=aKu>3$fS?O!g#wUpsNwXJ39!>h; z16Sro4mL|NDsEiau(D9C%eQ8_ZTk3eX|~kmD(cvXaS`|`>seRBI>XlCe5Gr=FVNOt z<)BJlCZw_IF%w?ny<&SW#WfxAG~qsV?7h&XY$51QS9=5|4uL1UvS1q%z@AD&jhNW$ zt55#vmLq>XTQ3f*F3aojYol_-#kzE-RUIQEl4bnla8@{*kanG!T60^gG(0M9X>^K6 zCy9#_I;vDXE7+NN_GaITo}qQVCR?|&X{Jg-B`rzO$wfI_4iP66D~#z&BRD*zRH;wl zaJV@lN9h|o{{HY#|HVIVYdLr9U|?y6)|R+4BRzrxCG+Fkk^^;(BCbT^R^Ii`lcf#k zzrIaVU{nxfO`QxdazQF1IFPVjYK2c0}b)0&BMG7P|w1#e=Ju*tcA>ws|F za18aNu=4`&im^UMGgRBd^~^vc&{9Uj4=(F<*hg#G(%4sg>ttDO)w&XtDoc;y+p5&f zo*H!`o0TY3rK${R;beGJ#PiD{!wIA?Da^5P{2aYN=F_I5Er~HIRk}1WQK2}hkz~*de8H~H;BM!cLogCVg|$l$9}o{?623ayJxye9iQdt z$cyI1EYY`btsL4@&0m&ktn)PXXd`3gB{rc^tI3Q^<3;<{94PC!ZP;!fIn~224HTxP z7Z!PwTaK)Bn%Xy&6wY>9=i(Do<@WqKO?;fXCf`$~jP2;y*^rZ}bov4!nMst$;Ymc| zBxSixzz41BY{^%oMpUL(>|LEdTq?tS8LiE$P;S1vHzzQCs;>F$#z3^dk}I1jJ&PG2GWH#Kkwjf?=s~YgMY_3x-$&1MKHd{R_z!9un?IDxg#iC`g5F56-Q*KRA zdfW2t17(UhnMXr-W?K%x*db2BNvGGG)|D7hhj7$92A>BeI6MUqJe+~xA=R`H5(=(6 zCtXszqa)4c6)cTYRygf#c|vaTA9#tW)+Ud$N|VTrP8R6|+Sz@#?%mjC_SyP&pLw83 zU0Y<1?N;=={Hx1k?$yWJ44oB@_*h@dkg55=fR*U1+&43_tr@g^D7l$!Oun5!p6rgVh`%+H&fiveBQc zv!|P@Ou8y-X5RYKw9TxfEaV432Pf7Eq1Xsv=7u=mWQ+?6J=U@M(AOXkaeDHDPk+~P zZl*+2x4wYSkAZxK8pn?HaayNeUVmgwzNB)dVancU&y1D(t@_qN`D?L%`bTbH!0GGp zikB2cNi=r8E}%;pSVu(5eEN*y4M(erW`^psvI-j4RW|Hu*Xb&{HRvT6Cynn}IJe3d z*0jjFK^TYjd>EAln>AqMKv4nG$2uPXXVB(_fWQv{Kdag^{*%Gs^Q&!HwyK`BE_q$C zDI!g2%__(%tqmk;a#F)%l43Hn1@d@xNwcDDgvZ_7=ot#+yd*2^v=lUG6OznrMXpvy zCOX=5Xr;5`wr9HYXGh!fC1R^D3w2;*mp&P~IyeixDkRdNjCGN2!WN%cI~q-P9Q z#M1^ola5dl^5l3FE3zv^dVVZor|a|TJ++5cdu4g`9i6!%Bug*xs(AWJo2jot{i?40 zhKAx!TXID)YYW$}=lVKM&a^o*5ULROK5%3C&gC{udAD}% z23FD3{i8;Sw^8Trhf{M!^5ujz&+7yx>C+4r+~{J%1@F=9#R!Ce{LgtXq6ZPf zp`c7Q>zTHLPqa$Bj zij&!Wc3C45n2Y>{W`0KTRJ*V&P+-VPA2>B^u08zr?9uAS9z1D@%*wS&wxh^|G+}Pa z@`S?H6~q0x)T=$`#=MG(5pVg{b|Y#9*Vvj{5%34fa&nxyT)D zY_G@z11?jkhL>z<^I4kReDuYthc*|M?0Ic-`-6Mx__i_y`blY$b{c5I^h)MQ|1 zpJQ3FEGyAdR$p7@5D`Tz2#=5v0;MrMB83~1UAVfcqCY-HX7+1*?ba0P?_5YcwJtAJ zp!j$mTv(5UHRT?-3n?|0T_SZE)yWxYxjBk7t1VfoPg}Jr+aOMqSB;fd-(0b3P~Wzr zI-{Vb$0;4$FgvxT%^RInRG63A^T^{bt&vaezrAYk#DKoBUgOP4NY1)niPYPq zmv5;Wd+higzh?K%+j8Yy11p2{gL-3$VWVN##NpHuIyxB&S}rzi;Kv#zCO3pMgCS)m z*5D!}QWe6q1eV8v8a+^sh6>?;o47o&F=P@m2>=D;*`EpxPJ__3_T1}tO?b5xy}FD{ zK|DLnRB7;c+j%^pOpuI-WkQj^xKN-A=u=Y-Ri-pgQHdmC8RV$2%G^KvD^#h2}MTX~zSn-zP0ZuyQ&y&XqaShM83 zv}m@Ur!6ySD=b-Jn^^3w*U1X16w!&c^s;@!c^@R{YR0?rMX82zLl@l)|SyC(}ulP{^<_TX<`hTL?Cx7kR& zlee;5VIKi~rvrKW56c{OZr*=k;dM6$quMlQ=oiHWu<+4b0gS=$0S!0ki#V8B1DF62 zo3~@v;3ir-Lh}$!!A?4pZD!6SS^vo}1yquX%F43hY)idY7tc-c6nOR7hR)sf>ISc@ zAX9D2&=)EaE(i4(XmPf}fAq6IHwx+_Gm98t0M(7IbRgq~~;-qwiND%L{#H7no3X^lQ z;#ZjJo&1=b;?YyXLJPD`M5QZSRr8|RJ_3LDa_55 zWo7eb?i<#`XUUTZbD3;~YNlA*m@jp%J2x1WnVuY;n4@*c)z+w_%(!?^nvoK@G)m@G zrKVZy?aFemDT$MmB~6n01LaDaPaIiLkeZbk$(f9nnu@S(f?)ht94oyu#`wp8SAV!K z3it7b8+kZm8po;T-(rUovK}D76O`ro7xJsZ^~Y*WtB2Z)a=HfK($8h2ymZLpt<@%Q zh2V_DjgKdJ?DE8Hxk4T{GQ#uNb7J+~)m0M}usP|jl;8g1O0lA-QK@MwRth|=HgmUM zj`sE)>e9prtTn6s-8V?o(L!B;CV$W`l@t#Z6g3-p9G32c2t|tX%`&qvaVb)tP!bU$ zk3nV@#1ceYZi$U6%}OLPtu-crLo11lNLM&>6+VMFGR9O?6U0+)kiqD%0nl>{XoB1X z7m1O4(6ymo7)(e*3%IKU{wAbz+Cz>I5Qt$zOse3QQgbGosPzOOStlZ@V$hX>{vxsz z3exSG%q*=VBi*6P`sB|85AP_=ZP?O)qU0S%R)r&3$zWbdyD>2~UCJvhDQ-?z+A;&> zGOs$7C%23EJa@j=kj>5t_!PC1<$WniSHsqvLaQPsTBNoLG7L&dY^>4|Q108Q9e?F0 z+VtT69nGgcFX}CI@u{0{dT6UL#+^bGe*!V5G`pdF2qILPz z&Fw&!@fWE*II0rHu7{JU0dmt5pAR6(vA)A@WA`^IqM$g20 zMM1f6sl3K3`yi`eWjPX*28uG2{cEPZON}c=*4R_a>+1N`>q>-yP3N1ft9ojkLP9@u zpjrCRD>psVD`LKB2A0&vImXbq9ApPwq;G@cQk6iIUR4f*yaM<&l$ z=W0QJCM@-Xy){XhE`4^Qp|!ZEAx{eHO zznxziX)7tqbdA(#m3`;N%h#3XkSsd425=>fhg;_LEbVpEreTqKh2ew##GYIb$>4pF z@CAd56JhB15c#EJ&6&RS_ph_z-7zIMIf|9-ZgbW*Nl2Esu5xVB;+Mxs^P9BR)vZ>0 z=fw2-jsmzONA9XM$!ZF6wbd)_infL_8-HfgEn8!U@0;{GdpG9!SJ!(|YGV}M7Pr64 z3OH^uzw^cxC7FHEg;G^{ImRltE;-H9INcB!%+E^m3|D36Rjc6UKZnxLRN~;pWrFUUvUJvJqgv7UTF(g`< zrOA$6KT|b8MdfYS%PU`BCe^jfmNji|P;pMl>bAF)%{FWK#cQfk4^HHNV7$+dbrI#@ z)Ut8S3W(g!1J0n0CvZ02{0u-r;U%Xv754n-=|bH;Y#4=RnkqQX$508BHG4yrrCcp) zDA6g4nv~jdQ~H%-9k4UvU3aoI-smm>-zZK|?vCMQ#IVzN7N04CJTnGqiz+fT<(BLWbES@mn7*SE_5ParN3QES|9-~R@!xTX44%V zB3g!RtVYm1u(uG}@5Jbb;b%N0fC}^u*8GYF@j!?nAV!5i`I4;0mi-SlHav8&J+NVa zp<$@rC~{OO4b|36a_KUgO{Qqv(oitlc&JNd zS$X=6L#rx*<} zr@hHvAaP~ZEgxZYl7;*mD+|XK5+IitmLp^!f<_dpC@H?J3%)mFnT4^_D+wXp-q+-X zt$M3p9-C=zvQ0J2R7&#K9Icc4o!YqdJ8%#W!8xWhPSbdCR>{n{mfwHEilEe*?h2i* zeOE)}SZh&MR@17@MO8;P6ldstvble(8%Tk01K({BbL!#^#cej{Kp^)Yf5LJ`#{l6> zGmeA6j@9BFdf+hl51RmblqSi-ATeKJG;f}t8jWCkLy17kxT2I8qpwEMG#TKh>xyz! z)h-c2Ng^4~X_nXq_BRAJHtSFf&ItN7-`nG@SsxJGbf%=wok0|a5`uIc^?~%b9EBn= zr?Sj1kXofsq*lq7TY0_g41I|fju#1K1ugn>Lv&V9TRm)e>HAL&pT9@Zx;HpCVwf1> zcp--qXVDvk0?5C^6p!U+r{DvbSdefumy7H5GQtA_277Nw=<_YJvl?SEdkb}iq9jGj z-OI8?qUboATwqHRYqH|QQ&d83lt;H?hMaiy)fcmj#d4^O9EHAC14LXFu`E8;m65$< z>5@c#F7KZSI5mvcX%S>3`E*zeWVJ(%nhAygBLE48JnXRl`e7h8T`ZTR$Ht~hX2kL+D0Hss4v zbLGnP$fWof&eFuV$TXExKsf8uleWVC$w?%r}) zlB;ewf0?qiM7@kiNRO0?QkNuT^RkS&f+(q@6|Gdw??UqP(7ZqBqE7wjZ9!hFyVinxBx4)<;Ik~u~Z|`jh z@#1&elq!S1W5{6aH5dmw^*V%Fr#E-u{Q45Agy>``fu4}X1YAMyG?{csOcEx|C6^86|Kn5-poL?4mCajvt%-#&O_mS-Ik?*R>lrtxR*asC~J-y|Ze%~**e2!A7 z&%W69dZGX2$$wB+-@)WR5KI2y&y)qK_rLsSsxV0F?yk-rs7}wKUhnDb>_IsfY0ASr z2}B~?4O4(?ZGab$&4Ca%#I(5NEr+S!9DWz70l$S(h(ui3pF%n~lmm~^^&p0b1o}6L zFca{L;5SC(#G`zd`ixRhpAiZ4Z>ZPdSNJ!dUHuh1mo+~}0#Yd+v&F!ZDBW$VX&`R3e< zP+UrU$L_~3QK|4wacU>?4(i%GH8eVfZZ)1;b>ZxJxRa)HWNPzi^zYy+bsqRmf3kNP zGGU0T|0a%;53qj^+#3%g;gcXMP*WJjVbn|c;d(A2Q1iW%zXnwdp~_b3CxaE#y7GSV z=V;$tzMWip<^SyVM<0bmN!-?-iQ}wSpe>R<@du|1zypTUuFC34rr#>H~{ya#XS^qfh zj|?kpd8*(XN+(pn95BQK7BF?+N zhB8Itv4^~!{WtI&!T=c3jx4SFp*{vb4l90<(ICPbxLnefv}fa))8|eXZLwWM z+S+GU{ffGZ(EFA5bg}+4*!%dCk3N-^^&1EEa&GQd&%gL3pAVZd^jKM$FmK4ipPx4z zvVhh>sA(>tD?Gq((a0G3Yz&Qzk5l`{sFX2g_6{g)$9Fj9^maQMppF37(QTqfpiQig zm?r4vkb8{UPq#z7OLLC{@*NJMd(o@#ENEw74O&?SPuIhZkDx_|iwKK3U_XF%k5AvI zY(?*EHJjm-+*iA4%}xh!gf;Ya*a%#?AsF)m9pGxPVk z*Jh|kW=o0Ynd>z|(0uql@ZnO-iD6(bXhW082KYfIZJ0yo1QLGX(7x%!3F_4o$kKV* zS>*E-IZt){;)<`xb&`1b$;Tdl^2x^^`?tm9KDE5>l-q3n>+`+0yUb=Rhm1^{V7_p@ z6Xu>D$aGTh$P#j&Z}0AIKaa)wslDgU?R{ZCtFXDQzKId*+271kzrX}!+WRxKmqu%& zOoWdY3rQ7J?+$V|uqJJELbdaWA%!R9hBY7EA}@07*-mYR9zMF^&`N6X@s8%^j>lQ{ z2)*jxcC@TaMLj}u@wycaJxP^!g3EzDyV2{bys0cCF(N6xWx)Ve#_XMt-g zPtVStMi0O{-_K5-x{SxbA&#@<&=y8K!U!Z}uudApf*7G7-|c_*H~rtXqs9%-zuWiz z3oB7fD{-8-bFPtG0&;bTI6qfItaiYm4+8jl5AhKjO52A?p*4s_;3x$E8kmpJNW)JE zzuEylgWCi+4sruQ84>8#`nvi9jq3(Jlq}C5-FoPTGp)70>SYec8uN|&$%YwkfxEck zKh#ThPmXl3xwS8+pu}RH;PIyDHCyNtr@RCaFtiTD&~rn4mJ0@&zK{>LBcUEPeQR|3 zkGfT*^Nq!RmSM*0bNMU(gRIcAY^bTNF9)`HE#`4vM5Gg3TzbA_BFs05nJ>(e zo@ua$SU@Peqy&s$p|U)XfI*>pwu@r`9hgFvNfY*wmN%H~FuiglpP zL5b{bmbBD{29$hXS{n6R`wFYY?V6tQxGh#}H(}1KY3O$uoMLe;%o>Qw;C{^b*Ma>K z>9zPX2>XdAFeUuOO+Le>^66cNcb#dj^4DPco0=wts)>>#XGrwT^4_wp#MZP!6Qx_J zt*n;%%C@B;3c=MbeUAfi0+=>Djb5v}aFR7XRaDsBqo-aT7+Qh%PsP9+|KX6Jo3epx z@#-)ajxhE2fIrN%pTh74_tw!*1%qYN$B$2!4GKQ}w6(FRwY90Sm3WuQNn;0OUus56_)kTMPOi95pC{R>=cM_h)1lOXhO z*5iWmwflBx)OB@g&5miK!;$9-mrDHwVv$1GkeuA0R22J)%cI((trobWp~5DWMMueG z){2IRW!!N?N@_-i(UFm1$;h+=ef5QYlX1~_FrNPZ;t$fEp%A-+E`+@MwyQODbsF_{ zJRGl^BbAmEh=mFT9!{fB|0eCVzf5L8$m8(cv+1upjp;8pi41sq2Uc)n|W7Mh&1xd z47ofbb7&>11dRgOXA+4)Oza2kE&_E7G!=t=;ekAW4~DNWqlHdP8;o$~jJ-6Rt4FJ; zCk979MX6m#z2+sVi+ZHv<(2_#*#B;yd*w5S;|@^0_J5V);|N)&cy`1{l;K;}P9(Va5Ys#CyZawuh07OGe z*+38VH+W}h3IyMMWFK<4eatw}3F09b2UwaQ)}gii^)5lc)&^G+GU8tP3RW47Q^U#{ zse@%QSWS+y%DUw+TlAr0$mz10C#XQ{U_$(qNmt-U2Uk`N^uic|w(Vu;5Bn-%VLI^U z!K>#9B(WxZV-J!(-qG=R$CC#xT||S=to*7R;lu}XM-l@u;~d9LJJTegdSRe5PDO(6cuSApa_VH5s@bd z*y&AtqWCO`1;GX?mWYjy2W0o=|C@8}-E2bm{vVoTckY~-IdkUBnKSp4l0i))xAbk@ zdO2gAJ9jGpdFn&Tzh#n9%=oCm7D(6A8M@TT`-%FP-U;60Yy|fvUe85`ytnv=w z2h%`JySx!QoaN~HSFb4VJg{QL1CQ?6W9*%bVK2+KLEle`LUF_1dAr-)Z7lq`Fazdo zI_^21{(P#we}-}uPL;dv@mV8Hf3E*YaRk}zTISSt8}UstdKe9@bv*5w2@~di^_8t{ zyLdKO8#;XaK=rk(Lx-~ThkGX^ruOgMuaxLSV?N}s{=w}Z@vAu=(3}D3=`acy5gEVt z<+Sf@6S~frRQ`2VVgEtn)jwQ6XHLq@nK7T`Wa+!6_OB>ojk&%y$`2}?wdOphkxKD> zZJq&vA%(d}Z)}u@b-k}^wnHm34 zgGMVX_rHZKW%9A3W!1fJ0xKNOWg^>(!0#8F(@1hZpcLX(9;6~%c-szGd)%WnN**6z zmB+ea(KUZ6{_?;8tGe2R)i^QWea2x(T2oo{u?aXo_bPHzhR@|`9oij2<7sp5ZGr;u zswdWt><0FriGZIvHw$zAGU?=y(LoO{u6(l7iwn=(zV*(+7dz=&Sox;4k8arT=-N&C zDdmM9Z^y=dTR!@&GwaJn>F?=&`un5Gc1>n;PQ3r!*O#xncar4C+@9vR0Txw^lQif* zf-`;Hb1E^{HRrpt4jhof_TiuF*8}Y13bq`#Z!M_Mx8W%730$|A^mKUu))zI!d(33K z&oR1t3v_?F5ni}u8{4_>?L9qK9_ z!7zUMAWWLO^-z9uRX98m#kP2R!J}Os?O?Qy<`HLVO5cTj`)yy;HzhTyLwgZXweKL` z9+|~1Q@j~DWU&78%S|I$ROaNg^d$=yElEp56%0Q?ev8Htk3h$4ngD7Ehx}v{IIUM- zh0DtA+Gyy&(ov&Idk+gx`i&m9_tEuxBH^xjEYtPn1>~$KR>-nb&#QP^uq~8|AYYCmT!cAPYA) zw{ufOa*skJ$PtF^s&=a#dk^qdh=n`CWvsM}m|8w==Vl!mJDb;}ncIU!H?1MQ4=1}6wGLQT@>#{sOz40i&zCF9Oc1J)l`MvCR zOKz8}tkgwjs3bp<+NozjGQ-}w%ofelGO|*eH*Xq|GB4D}*9?>F8U0FxpOO=xpJouw z?2Yga##j#%G;|{;U=w3f=hUM|pU_uLpFVxg%=qGX?f&?L-2Q!NQbU7m?{O0vHHOc5 zkUfn_VsD5Uf%->Q zy_jw7qL=j>A1|JPSpmgs7;D(ee5^sngC+B1n>dgj-dyxW(}COB$!Rp)q@4Xu(Mgh! z@1V{Pc9cfNU1ovP^aE&x=~t#rdptBOBR;N0^RUp+u*|slj4;Zoy_bm$UsWc%o)R34 z$T6sU3SN(-#ELu_@mvNyBBw=}08x!l(0`guzY^IjeM(M-GKLMv(r5LuMLSYy8X@FF z8HztVb9q7#Ry2*c!UocT+XM8s09W``R0K^$!#sZA6H|Lkn+AOR(+^Bjc0kbdOOQ8{ z7D*^ID_}e0ppPJU)fn&!3y-$*y2DL~L6gELdg&R&J1v5&C_BrKRJ;4;j{03zUcA3x z>i3IUPberaQYnZI3C#*+cN{VC2{V?gI0&hAs$UFZ&M5Q) zk#{j#7H-O&R7efL#IF^w?C zn{Z>?LHax^J7==!p-r15XLM@Wg2y8W@#&Kp<9AHT#qfjGBdOgcrKHGX&F&i!foS_* z!|jMp%$PqW)+6X|*(y3JuZt}zGkxx5QQr>iWj+rf!xOefBNHm|e+i`2)am+xsUlDc zxCH4-8uhb=7JZbLEx zqg^nXH^9-U6~Y_@HTJ`aZ7lj~OI#wGrzRvGPE0tsap+LIZ;qvjll*oUM_HNU^BGy4 zJ7?*g2MuP;O7KtrVK9zU<-9PLp)sFwz0_{P?SK(DI1G1$JPSBk?SZhV0HpE)VeOcq zu@lqu{nICRA3CJ_l-4`F3)ERk8@`vy(#c0P~k`!#F3Ts;{n{}jD;us_;)@rnCzkf3@YE?yBehI>TwMFf**RU6wv4qK)OSGEn1O@sv0d};PtC~8 z=_)5A^y(QC+q~JJ5u@Vcd-i;wbB??%txh{HFY9V!tx}TgiOnJ+Vq($Gn`%Y~WmzvCVi}-Mh{GBFqyNxy)8+K~J5Mo$`gT_-jO$EV#2ploE$h)_V zPEU`FOm3H%_3(Y|lOrS3)5n}=O?vl9Pd}WNVUO+oz54Iyo;`--rl!TkgoM~*;~kxH zhVqzE!zUQOF@t2ZSc6BPHMB6&skEkU!vY}3s`{e#Iz zkBxWs{x2r)^3x+%gYr_Vi1NqW@XUJNg5g}2MEfxZo2kYE>;$4&y+MZF#gkHY$7eM|~z{d31TONS2G z)vKVOpu1(-xG`ytS<0&PzeqcOtAP(sSy9l$y$Qa1$fgaL z#SKxXy*_-xgyFAey+(iJ4GS0O6$=+ESjaXnSco}#%?(#)?UMFcP%PbIi%i2S>Q$b5 znBeNHu2J&=M^wY%=^TzZyjEr{#r+w%>NPeu$U;#g=K8o3T0LkT3H)vxf0NRKWdS}@ zpQn{^`oII7{pvM=ug_Bt;_fCpAQvUvVov2a{`ori$K3em4g6zu@cG?y*2&W0UYHF`GF6dt~V!e##J&fn@#gK2U zTFT~8eMEV)q(KLIu2cSV{v0I@I#%qUD`hjdK0-9yn~3L!)GDqg$U%Jd5VZvN$`G8& zS%^Q!?`_~8t%u*6@J;&iQ7Xmp=X%~B6l7tB{X&24`-1@ef!qY)qdpF!{cm#njpJ~{ z3d&60{ylm9H{n!xYJc2!qrJ`T3$X?C@|ZTnurK7-w40CzB?+#MFzMqyAKpK-#hgAO zBG3VrdY#knE$G+w54u+idf2Zm=6W#jVPAB&8QI-)9FB5Ae$W^9|9H~(<@8G-kD&j! zoBmv)4>;&T&ew34G?xeZ0ev_AYgj|h>FZtV;2$QbNPfL*9sI*272pMWZ}}@u9|;%G zKdRtb6Zn-|fUnia?g|aK(Y`p(E5bSpaOA3Ze=TH-KnGE)dd>O@;C%&L$z?~VzWO}6 zgVw}{me4+g5B=c2SQ8&w+Q{KE_49S`kGb*B*TFyL#-FFPH2U{haJEn;R?wG`Yb5Mc&E zxqe=r&E*GOf-9!|hZyo4B24rPlmi`aJw#r~w7{!mL{C9K_Bo^-hcPkpXl1Zs3#s3;KrroA~DmA94bZ^roQ{ z)ffI1_<#eC>si=mnI2-$KSY?&n@K;!pns?ieSW`{*EgV(1Um4S{1!3zORb0eGwB=S zLN^~Npa;I^c^`wvfLG<17nEhif^#7ybzmIeIJ8?SDyYecRzl7+^3%vyWy|AMnaep`Y(c@fx z10V9dYSp%Ji-yb<@UhlM>tf))z~#Y$DrzstW4De3 z--R_9EDQ7p3w-zw+hxR5_YKTr73gTOzgzF^>=SK4Va z0T=kkRN0^(!s*kv3QX`tIg&>Y!TYwEkmnF#y5$*-_8QCE_kgyN!_zpv1A4oJd+O}+ z0Tq@B{2?4ZTJKHx;0rv+d6Y_lzC-U#_<#eC;8Y6m(dd7I{-JvGLk#+d>e7e*7|Y`o zqHmYiYb$Y^8TFq>c)a33`(LttY4E{wwFl?7PVK>F5kFr3ydfX;UtV5*Tw5u>LUQu* z6sMA$)cZvF$59@Byaq9f_M^1|&k;p|Z@T&oTLw5rP4xkb1Ms1o-+HwR)vu-s?fIk8 zKmNuO3zZ{$=nr=ZgTsEjg(Eo1fxi##y-w!+JHyg~+Y2TzfMZ@^Ic_Nf{#tE1*Y~h` z_-PH`3;%vMK93I?z!&!!&bW)d7!U52hx`HLKznW?sYrf(o)_Xdz#%u;silRGA9i${ zx4*#OZ{YhupSz9zfiu)$M;PfrCj$D!{ez%0T+kQ##QSi<7x(%7Z}^WJ`u_#^!wmY* zar#+AANo&6dl7xaWhB4K;q*<*<@(Q5-{bh%Tpm~}_DIrvVI;?YR1M_t5oq6BUSHr* zebx5_KKg4Fudl%0@5Vo02mhEG|9l<%V+KASw>;voVdWDxzMGBuV!W~xB5p9}aZ_mYfd1?HOVSU#8uWGp_4S+&?lC!sf5WF^O37c4C+PW^BS)J{v0Jt{+N%XvzJVHy(8WHITiHtj5_80 zjdH|A@L#K@vpw$ef7UOL`dw98x%n@=t32voTi)xd`sLwgewP0-%UgHdRen9nPdD4g zddywk)E}=0mFN2F;Vy6LkJkgwX+BQ#F)<$`dxpm|%F%pG%mWE-%&*YC$-I3L5Ab%x zEv<%}CA@uw|9rv|pZiaak9z$`{*$*$3HP4@f4zxM^6>c;;Zu7<9<)a$%~MUexIIug zdJeg`J-FqQ4|4h1a`+R(N510TdE@@VZU zaiAMm0Wak6+3;)4Mf{+V1Qv=54Y{!Qhf7q>;bOcK@gMaE;E}#4el+S|!Sw|^u1Ayt zoYUv^Cwy?{Tu^_r9NM#j*PqH!{fQg(7g4@;{N7LFE9Aqt3A*O^ZH~wL)rUD;jE^KA zjjtph#z(@ZagobM<0AFf9)vIMvFGzO_)p$Xo}>Ai;a@v}4*464)Kxt%@X?;Q_nu3N z2ps+%q^n!lvU>Oq;IH?@hu!^z zJ9;W{kFZX1TH+UpxT-GPY8fjnC3))MTP+T0M}zQuX>)_{H0ex(@NUw{TDbLwA&(U& zYHV*1ULZY2aN%FM{ND=smvi~+!6APQ+70r1W8P;4zFq#7@g8Au)KHb_8Dft*&n%Yw z58k{ELZJo`7VrO++tS*IFs9x(~+n!K#f8_y7v2@OMr zUYP6k0vyLFaA-W5gJi1@AB!e$2<{lsFg)L=e_c9gZwa38F8WqWH%~aVw;@mZJP-OF z@B#x)bzZ~k^&_Jeucu$@1LB!Q1nS78xtD|4?!7xFUP zdQJU$YsNG50k?h;>39u>+;;g#_8~8mPQ8bhp=bS#XJ`4d0{63CHUG#5KrdFY@F(## z1wwE2;A3kb3H4pT|Mb9j)F1-^copEkd%*LJ{+0)LwHt1+q&+EQim3TV@$rCnLvvAk z$;6lIU&xa#_~JtMy6}RUejFd|q8tVtyL_#oc2RbVXVRa%c6HiCn<1Vx)Gpe6#W7%SImsjc&L!pE1@bfke42pwCyj6o1MXdO z)$2j7kKbij2%dP@J)Uhcp54c5XV^XVMK=;~qrE)r9?$Z{GiK*y;JLx4SIup89^kP` z5QoMa^{x*eiw*D%;X4otHw4ee6r~|}+QNq5q^C`__}qSlJn8*C@IBxK-2@yqW%-WR z>u>fj*Hf*H(!Bb0@l2tak%t|6O)=nti_iu7x%E|UPk+nk`_Or7=o&2I1XUel48qL&%fP(i(&pusjYYJ=sZqS$J5t z{Q?eu^XUN!&D{VQ@ZroS&SVk|KZ5T29c2|q)4!vB;Qb}!(-Qz8U?-v0kZ0*V;L8LYxrQR`64{9*PI?V3VbPY8JPp8Ca5=s8A`!n@;uw!S zwFf!e=Pvj|9PS7D6xR~{bDTcB2K3fQFXC}6;LOV5D+w<6k`21$L15b;d=;nDOE2Pa znq59$gMNb+*nAH-26FJd8-L3^;9Ktj-*yl9Q?+p3hfI04-vjr z96cBC=Q+HwUL@i&!09cfMHBs!;5;S+976%%FL3-}Xh-tX&_8)T=>Nlez(2YN9FZjC zyqnG^_kf?j2mI4oxX`~L526^8ejWH{98PvfewyrX0I%2QZaDdAg74z+FE||f7k(Og zILhH)ayaxad^F$`vs&nloY24U(P+mm9R8IX&iyms=+nTz#Np7h@Xvr_!~^`Y8_s<* z;Bcvcf6d{-|MoEbvb;bN_RQh*u7}UL=^fBx0-yUU_%*{nU<{~*Q|?K?sZ=c-@4QSn zY{i4G!=!IXFy<-39}=AV9}7(zp$9QnwoU?^yoMEWRxz6!-qD0Z&Tmku2$t1g#*>-*t7zB1hwy*T63kB z#R0l#MgHBP^s=r)&P$Bqc;nAX02h9T-YuAZ;R?s+aGt|5;4~h(@#)=y0XN1&F>XS? z#yl`#o@ft2pK>n-zD2}KUWhkdF=6)PbZD+vS8t{?GW1h24g)LqqeBT`9ah|W61o%l>halkY zbqLU-n$PukjUh^^uXD9A*Q4+QkGS>4^#t6pH5d=MoDbm{&Ff+g+ zV>!NvVMt#=q+NM|XDrY4#o^LSREYGz@wvV@+)@k&W-@j$pR(<_i^SFM6-=sL)n`}=0o`0f1X% zF-E+Ebyl;%4;fbeT#Qw`FB@abueETVUp2-;iXA~u;PbvL@Qv7!$C%oe;Ge*9YMu+S zc;XY>98)dBI2|v{DRX(fe`itk>y3GBHm|oBM@UEGIqprCQy&*P8O(9N=5!a+7)beb za}1<83w-D*^|~^E@bKma3gSL!`K({Fhn(q6!3;DsZ3G>E_~2Y!mmWEDYgxhC0&wd zZx^}~xIq>Rq99)OYxS5s7G)d1&dYZA(4(X}uKH_Y-i*>z7mrO^4h8_!x7&r=d> z;VlDCVqbenb?6y*fsoisx`k&CQCmxTb5*Jt3IC7IgtZscrT&CGpC~uw80}BkZe*UH zBB@@JyuBnPNb?T3;5?I#D%|)WJv|ZI5wScLr-sWheY%}yiyzT;R8awf+Ph*&Qt}tsbDiUZm7jIlpFdMoMuZ_sR_AzmuJ8H_i)mS z{tNp|x(XW2NDeRcE)o|=5S-;ENDLb__#Lke8{h4A%iDIrkQ zAnSvqa1Tvrrb?6ph27qk7d@iC?Wvmme-1Bls|Y-yBV`uXQJ|EZ*Oc=N^lGGz`%EurwySyd zI(2sQUCl^OwfsV*5qTX$l%1h+F!nt)_TJgZ$KPuw2G=0)_6_q=e8Jtvswr}ypVT9` zacEG0(kLw8LU`7hq#u%!E{B76(wQVK%bBEr&$E8w;slUXKe?r<6-}ulpQn`3p0er} z^-IlnHP^ebBlyE&n4L?`a0cBc%0sFRdJ1^MTk*3<(1_sy7~hm9_F=H(mzONsvv=|0 zz4Dz!d-g0^ymv3JH_9)={i8EsDH00=Ik}Q8lmFBoA)S0ubCq3^uG71rPPMc?>67N@ z+t-nvIHPZ0e4_q@_k#~{yiiGMU5n}QQCVn|a{1IP-p8PV^fS@1b^skZdoWsx%?pn7 zSH{>vy+^mkz~CnZwUC;$MyI?`b)kwJQ&v`0Qc_|}Ex*`%eYV6HObcBlcYi8R;}z+X zR_`wqL~A&&`V_)f2$>S`#xf6Ye;4I-$yM^Q^Rktk+?+ms-CI{kEh@S@Gww#E zll^G_O-iTWWELIl@!jjjGl!2nz2oqaX9t&+4K5iw?$+`lVl_6ts2FBPigJc6G zYKwE&mdIz09(nfJLx+`s%SVn}x^(2|rD40D*!1Fyn;!p{{PnIUHomxP)8j9?Y`ZvY z)9w)_mi*oAe=LnI9Xa;ZrK5)t1L18XblYe;bnAm%_BQOSOUHVUepr);Fc5X*CtN^c z&nm_=48FVObZ`jO+ayBOmT^W0KX@a>FT7r*osZN5)YZb?`bt>AvW_0nPalF3^wo8h zFzhbKU20*mP>WHnj#|*?o{`qcv(;$HB1Pu~D2PEciz-_cX_yR`7jWZD6}grRXU?3t za3m^wQaE2pfXtLJYA6>yBQgIjyAD@Hrb|B+Mi5PvOt5 zp)G^3$0ingd2+BT6Q?~|aJN?=uC~M$da*~C8)C469e%XUeoe)R;%^xH`rCyWO+tEx zj`_MzI`=KFr4CFP)-z7q)S><7Zyv5n)>*K8u2E2zh1Jgqf1y3)dazCA`0cCuwG*;Q z+7VT<_=?EJ`V5!18~n*C#E-F3)M1KwqLfOr9@-)S=dqBgV6YVRYLylGc5&ZWUl9_nstD{*uJHcKMxWQi9lDlSy8#rnQcrKO|T0Q{EE96fRT=+WaR z{+TuF!~e{}zyEwVi-^kZ{pMcKngsQTt>t3Z6>UpioWM7ePvZN_uV|0*gNIzx_}*?R zPkWJXYTx2hpj4D+mrr^7p#6M&y!$X8Kk0O1xQo-uNuTl{*-LGt`1_9VQY{h!jI1+f zocJ-~iyO|Y3-F|YhL=%IFB6Ev60xZcM}Qc+?bzG;2Xe9AccVUwJ+^M=&J8$s^hte^ z{z>twVmZiFHDDENE?-_J{{)%fvRSCj+`lX~LdBW~JJp`J6)11kV_GM6%-lV8%($_y z^w`|DuVvPRsrO}MPRs3(7?Y`eJK}nXk5BL3%O2|0t68(ke#LX9P07dz3W{N9OVqp# z_}xOgG@`XSw3AiPreom9$UKhof-5l&xS*3Ku(LJoOlnF>>ezARDZOL6b4eAwyA zS4Nh8cg~TOo!ifASf7Wxbdk?wWK5ZwkujrUdKRm|{>#GN%OBV>sp9Rg|Mc<>Se=$N zU?8<6llq}8?x5b7-*~fVu>nrLqgPC1%k`)M@*ZuM^QL@l;@i|$QXz8Sh5hLM?9agwcBCGK`sVVZT4p~`++g=?#Mrbo9H7mD| zcl&m|S3bDJ(0EF!8iLaRHZNP&yU^6-nzWWJcFO%TGNz(^)6y!iq?Gi!3TJB_&?ZAy zh)*!3!EJ0doZKk)V`KDZ$Lr6sG1_GP-^2BPvy9;^!ziPCt{hN1Lemn>+g2%d=S8(6 z1;nznN-4v$=kW~L40=lcaSV?2{IE4*E-?WoMLdOl%YNV+D+dJ8A?}z?gtMo%Zr{Fj zOmXoT_DeSNW{)!OY)9r7XWsrIi_1G4leyJ5Xq~Tl#+GTio(BU!$@rQwaq73Nl9IblO->oFzca2y z^WH^q@#D;swOY1JPp{p&F7}jj-}$VnhSZk!>s2@2V)bcJVJ=!T*8^6P|$ zyJJnfvYNl-|8Uq`Hw<gJT8Ke-lGTXvDagY^x- z-Z2UD8%2uaX9|QS+Znbmo7KNsr=R}( z^L@7T!pXC;-}`_5dFReN{muvPGs~t5Wyy^j&gB*C&59dzR+1i!Uz7DE_~v?B&enTX z$g6MMAbYL3h1h*2`gw{pBQLX^Wp;v>EogQ?$MKTV^nr-77URPvDWjtUQrji8R@y|j zjSBKg4e)N%-qtqQ(kQBJo5+Y1sf{Jj+9(xqL{ilSib~F$2}(~F{|BbiBsP!-wU{2= zsB%)c8*n}8>#XaT3(-jul7j0+_-^V>4txrd#2J$Oa3HJAYD4INZWoGA{G11eIy2$g z%g6LTI~;Gfk}+A9UvIae1M@#V?%hQdAzK$b@ZO zOW3;WRqo%UW8_d-+X$<4z@b)3RABy()a2Y67OS8SpMdvMGvR+lGpC&_0vh#Lx1(Vlo2J1 zdi8qnz~=4wO?M3VR2j8vLz7Y#`0R7~uYc+H>tAhIu!HSp)AoJr8lu-c=URhv24=G^ z`U^Ng-Vv=2kZ~ze*PH*NA6icJn29{)NZ43w*jOTsG}xkVS{OFV+vvC_7#Bq@_(Pk@ z=}26~mgKOdhT3Q(jj`dVwVB81NQdL{>F-wbY*ktyvu?v$^;z+q{_eGF%*Eez+ zlU?u0ExKILZ&fIrCYMZpX7bFuA(O)+f`cdHDm>TM74og!r%HlCBEly_!>~JU|2JWG zUGastv3YO?9Rd;Esx=aK=nHUzxwxkq9^V+(DUhV&A$V|UNbQf&Rt^mGODi4u>WR{k z+Uy4(Sh`UEUH>(B&kve5=s$;A+nhfu-#Z2jeCCZILjz~7U9_nD25a2tgIkRPhkmwJ z{z`7;=a(^MW%q&s{rBj5lOrN7U+kS-VX>5EJA8dBvc@mW>)gG^c9xS69(MkCXGcY7 z@YuX~q-4?6u_x$LbtcXovq|xyCO8o{5cV9%&$mbp#m;P;l>>mC#C9;MULX#+fE~{n zxx8%KBd1O-++EhSOBu|!Fn7e@tiq=H^JTeHr+0$QP8$-aSFxZ*t4^~5miWc0MmKI+ zLtB#Bj_K!L{b-~7fzRkC)oCH6OZB5Q(mSIePYL`A={16%2mu>~g$78rBo$Inr@~N1 zr-+fxNsMsXDX!hjg#GCH!+KBl7F+NTYxUd%_7DH{)rAX}pE#D_{Gng&n{Vb6`7K$( zUb^-jdyb7~6WDWko%Icv1D$Y9&`<8#tt@Mk`7(%n^m3*>;DmhT1jW;%us&%X_t9$RPiQ)P;^Z1=Fq;(f@45sV#x{ zfbJH`l2h5R6DQcG%0tIxpA-5W=hWlpm2U?*J5VL6zg2e6pMPhk>Tq^J4F*(CpM>ik z@K2QrF~3OwZEwW?p|lqiD#k3I&P$c)Xevucn1bkr@<5>!qS5i>$OEKOluR0B)`Z6< zmaku5KCxZDeslZwJ;tuznio|^slPgN*3jqv>a5At6NGG|;d?%TYyqfubNC;#?ldV>g`W{8tRyHn z@tj-`x(CJX)S?4!vsnG&E&cjmf6Z9_)V38f=C5BbHyuBrqWi=N-AO6GzkBu%-G9D( z_2mtZ?LmWne&4}E^TIL)KDur|y5L`;uea<#KcE{llB5Di)0%e#-W{|Sj32fet0V;l z(ou(UU_cNH3k+hT}l|d2Bx0tG}gxoVsOxa`WSQ;fceC zPaHpTL{43}pu@m{88NDVlMcC~ou4mUlsP81LxjJo`bPlJ+`@1?BCB9e>t*^A`e}Vm zhxDYIJ6Rm-fOuX8`oVGi0e#ttCOPBgy)-U5Z}gyX#RIAB*J@ z29^yP)j7I#=TU>k4y5;IIL!h&w!F&wOSELi-qkKJYMhow6G)}*Y3i+LDo&@V2hep7 z6hkX;NgZ&4O|SwFWyS4vT>Sv5xkDGU`)aEmdcE72l5FZzCzN8QvdH&bn^&xT^2xO; z=C4<79gT`@oe>ijdu~@)NPC58p}`|MX0=VskS{hGF<2ixpS``dkL&CC)K;II-2R4b z3v0SrbUs#|+q{{VCAydXfci;9eCdohNB@|J1jmG~W1{hzmHN!z$|lQp)T@cqMp}@U z&l*|${UX)qmLUN?n#Ic=xi_YHn4;Q(ydq?2Y#a;pjvW{g``40?jUEH*lqeWc6g&)o!ZTLeH{RI4g|E>r8aDj4eB9nN=NZkf}7@h=RIwF@u zhSS;IPDhD`ozgid=s0l?c$b&TIp}z~sBRj-q?M3U;XQOSKmRkFPW(1JrCa@OpAWScJo%(n zv}KEH#R~oT<@ysd>~o%@51^Z*57c}?w<)5a6zITW4MGfI z!K*uea9iIN z;W^7b=v}U#ZPu^#!&$B;+Q%h3tc}AO%ep>D4x4^~s+`b{YLz%$l+BCDq$nH0c(xVpyi4lsh}NpF#FN8n&>>w1pUP>KcUQ zE*thISN`Vw^u!4*d6jF6esjZy`MjIyJHDuHM`iM6&UGQ6MztV11M!&Oh`M@)lRQdTyc4a0||5`H6+jubyOobRJjqnp`FSqQCyO z9`D-mm_AG!;kwWRw)#9`mm~1m7>~tVzf)@puo1pQwYH}s{x`l@*ksnrb$u>tx`UOn zHTqn=a-)8G`V8k9SZpvNzw48CtGYgYm%MD?Abp~~N#CeX>{0N=sL?Emb-=-+Nin={ zAXlUO3w6;j^@ci9ZOXsicg5jqmjuj9ArCSH%5L!-@}L2f-Of?+7usic5?<1{uflmr z7>LEYPtc&u4}uc)+C_b=KK`N{a891!+NLy?-*u%UXZjKPz&_CP=3^pyBs{W&FeAVQ zoh1h&0ugCMS+e29mBPXl+1i?(%du;IWg)rE^rzN1-v~c(<3zZuvyBH9hZN{O`gHxf z8|!bVaTPs#zQ)E544Ti{vhI&9Vr6%BlKVZm>bs#6G4MQqFYv&XZ|H0FWrtSb6u>?V z#zApJ81z0FaZqC^3Q;5V63krCNhl*l@po&fRX9n<5EVI$WE7l|H;YYi1UZ1n=V;2P zC#NlJ7wOaN^JT3=f}PcPQF|hN+?H^5NB`x?aNXK;zTUa4YoMB6Bh6rvv)tZ1d*<*S z3*!Ap%YVJK|HpNYMh)3@c+$A(EPf|*&bu>y{>q)3%O3ANL|J*~8!hV2$GI0av$Poz zU1wh`%)M_t$(@h6>j~_j_JTWWD4pBzJz-(ZV$#od!fl0W zvq$71E0?txG;qWR_g^@4{f(D4On9zfAZC+owoiVg-w3@jW6#VDC(A4Js_vQZ%BPz@ zxH0lw(s2#45b`U~F`YBt4Dv$9$oFDYj*1N?weseV&B5XFQH{~?_{!q9?&!N^N53bw zguAAPKe^+{aCUoMqF1x5j()bP89QcZ?aCh*(&#{V%-Het7~ z<>_hj9&I~Qi&<0HguR&PXUle^>-YB>;Q!H#kHWNe6PJ#4On6|lesF&E2>ng_71km* zqjaIA3B+mNyz}jj;e&ds3Duur5Fr0H25UmrqMv)y`2*fy2%igsi?Pv7ZLK6I#khqE z2dxDf_YWbDhJ1mzBMTDRqvij|1%n6ww0FWAE@W_4O}f4sS8%o8`c!h_kMDGSZT8H@ zOQ%g-nm@(m?AFicb=|%P+*-)MNJNy@lsO^@H%di=OHkxJ_` zJSb=qQDH>GdJ#0jV9hcHLfmd8a&=;?wS_9f*dcasH+yq~>$knG>kE&&4ndstT1EB4 z>VnCW?`*~=Nyvpdi*qJ;-Dony=)1LC&^K#F42Tg%9QtE?99tUymDdS16Uy{5G_u1k^B=9NKet4CCQ&#gpHx=@5dbbTH%=(e~QJCRrdAyW3}dl3Q_J;Dr<`v< z->)5Dd93G2_RDU4F8gAK>%gnd_Dk75y->6dZRJzp8JCBzn+ZV!1;u64EHEj-NY0 z@}Q~YP?CdqB3a8NsYYx<(tssw6+FEj=R8|be&pU^z zb)Wkw4Lk>)_w%)QbcUAYHpd(8DF_VP}It@t9|h?Jx_)(WW@ z@tZ}{XIpY`AO>4}&}v-IBlA$i_Os>kNVc5q*NdFL9o8@7a!E{p4xc*=-{8>S*DtfR z@(H$Dzt7cKpQBai2VIZrxErQgVukV)*2CmWXAr_x`8oh{PdsXmW2u=kXBSO5QN&^v zYXm|up7UWHj>`iCWBmcwzT>qV40NodN^wfuW+pTmrlWVw3_6OpR8d1uZ!h z(_bWQ8RRuJrFHuGXLsd=DEh*me?G2%tDj??SgYe)I=S!N`eUI<>#1LiD@Grq`A{$qgG925r@;Bl2-9|Y zhthiX!Nf0L{Nv`$Ki>N`X6CajWC82RHcp)}=FZ0J$T+Nd=2=Y8djK}@)uU`k=RAFo zzVmhc>WndE*gFC~hHa5I6@2*d%lv3jBiSw*47tS#k2ihv{>{A$3k#oEQP4ef^7yi{ z@jtJ_zn>3$!*Uldnlp!eFlTmN-dYxr7~W(Hwa(U8iASMy!;-6}A?7R0^YNB7FU6`# znh#zZUB*g7q+2@Xd3$*)7ESh+eQ3!oKpzBrkeKI}@0~B_dF5I2lsq-BQL%TiT;x?` zEmDe9KQ@wu+7KyYiGpIuy>si7uRe-B=X*-NR;ll2Px~O}wjb+*528;xHM--eSDv@U zOHnlh>|ky1AkIv+$`;zX(BXn14>dpFD`dRxa{p7qx!@Y*HQI=8GQOYRUPa0_p z#A%|*EHoxi@pd!QyiWPD=k!s&r|#T>YEkdGsCT(pZ#Nq-H~E0O%&eN~#k}g)`+woi zMh4py@WxUu+gwkc*u33eALpZwWBsY#HD93K?{l4dE6k#5#KfcCKD7ct<)%cWbFX}s zXW=?W&5ON?S&@b7oNCSjW5AiEYJtigH#_b9TJ>v~SetE5bw@;o^T~y{Mr&z{O+{57 zu5C3pHMc^Ej!}<)h)z4ALaYttdr06ebJ`@R7MM)9JglA6Uwc-48~Tu9tW2>h4lP{M zo}KNSH38-*_x93Py**1=udniwds`JRWU?6xk&3j3)ziETi*dw+D^>+i4=m@b)5>}x z;CjQ0-S33+5#=gS?lP5w6Acazw#L|FSjcSUQ8%huG0QoV-S6dkgEM2Sy;Py?Fv^58 ztkkjxJA$?Lo>=N-Pic9-`W^i$m$HWF3yMA1><_l!aP$e+f#)_Zbyb@hk^Ar1w2XSk z?runwm|cVo>8AhAZS{B9DyJ2U+*r8cHZssfMi8WA%~YvtKauKI$qUyu91(^n(kxbB znV{_8zRS=wf5Vr9m3=Lll~%koW^|9hRk!X-hb&w)B##``Z%a0TR!G) zkJ2GSa(eZ`(`ED_CN>*<`hrgv!3UW-aW*$jceXo-5pm2lT21?8WOm6Q5Fc`DFz9nW zLl!L@QfiWykCkS}#`MY=GGrMZgU^s5rAAwEJq!OO^b9MGHY^#JKts>fe?!H4N0@pZ z!HP{U)W25E_$chz@JFD9U>KI1YFKk9+=;S>d{^C4YGY`<7}SMt8KLj>J;mEg_!iJX zd!dIV8@-IAo7+$!YA+&fItltH?A7!YRKH~E;Gsq*C+QULyNhY>H&kb;ANTbIqThS7 zaP(L!Gp$lx%8F;{=UMw%`d;T-rn<;&&DKBn(LbNHj{KFDY@ltn00>-=r%)jGH=tx}y}%2K_J^EJl+lts*icQ1x744hjBmo-v?^s}{X za~5K{eK^UC6lAE)biNpM&ep-#+IUuimo;QYha{Oj+$Iqbl6TWZ(~6pcc_o95jPX6C z95HL*>;}y|>+S>N5K&5u?!LjBM7j*et;NK4d3o(-KJ&~>r?pm>dBgH5pSki(tuoCq zQP6QKBPy1^rbIT1J*eDv^R^N_(DfMEK&=u~p<2wtL|icrksf7@Ynv3edh+#@3CzK- z>A~6!_3cVmm|L)4LFSp6Q>TLVuslo*HMfLQ!BViuYd4j6i1ssi1R@L~+RfdDXbZ$E zT=Bk@{Uu7vznV30h3S7y1q;qY@T_g(YWAWKfZGYxg~rPc_|}S+kT`IQui2&X0vF3k z;5PBP(vG)yru)GQYaq(|SxJ1TEudN7LGGT=DW+M;u+{A&N+Q~?9#+yUrjuFso`d=} z3qV%lXZ^~f?UuNuiC@N=ZrP&$v@G7OiY4tH8i)Q;zRz>bYeb+;#E zf9%+_)T8kl8hOZ8N7wwQE!V!FzS$1`!pN2-z zuC~g3?5N3JUM}P;kfv&bw3NH#?C62Wj=SZQFF03|oY)T+XR+f1R?J~pbV_?Us+Y@7I=dwpzU{)V7q$(TLy7^#!(x-iTtM-V=&l3ZVS;Y3Amk=1 zn5;9XxTzXkm?`YK2h#ndM2_9fEpD0e%H?H$F$RV4OlM0j(9V-+fQ1r|($h{Hr#Sr4Y7K&TXX?L@0%=AY-M251tLH`NA?x`v-PpBkRGlmh_}vIpFhhC~uT2 ztVx3X-9b5ecG{qsL*;7lM&ELr(`?C38#M8R)0~TP<-8ox%0W5&B`hijS&nP(lPo&$ z@ytd~c)0?pt!0{qJe##2zNg_CGD#9b57eRdSzm(TS#QF@XBv0+z*d%F-4W%G`4k*) zvBIq|2mWJs*kT+uYdE_l=Hx@=*pe+>*oUtF=F5Ft^YB@JoV}RuI+~n(gNIp_zd2s7 zJSu*dmV$@Ed6a`kINq31p96I}51l|5^urCVSSA{7bAY>Dc?&GOhKewGsGdVyZVfdA zV5c+nR>{e1`=9yjyX0hb8TfIJ&Up$MDoaa`9tC$A^Y>sZHtPp&sW$%OAww{+l(&LM zlI)%DdJUIwgZ&hfz3Zz7^5y*Ga0a%7@sKAil5XWR$O}4d zU-OwI5_5m5D^C_!5t;Zi{9> z!xIV)%!YCqerbyuC?da2R3MMiZMJh!i;2pEvz$jD0_7Pjk%CSPPcnpKme!Ktm$I^f zB6C2aeq9aweGEQeJLMic>=)+iX~Nm+gVm|on%A9M+3LCKMUTnMM`o)kSK~j@&0Og* z^fOMw!xmwRp5~Zcy+}Qmedm_um0g{xKB#VY)%dt-3?jAth~iWCwA>M?(BfvhuOhd* zX@(2O=e>o0^On4oOMhvq$Sq0V|B?PS%ch@?DyNzsc^%EZLbO2(H^C-z%0`^1uFNA! zxo<5Il#iPsquk9+XKH0Fb$3KV?O@I+5nmw>fI8EEW@d{vyU>4>4>*g-DE*ky8eh+{ z*D8lpvO^|My*s`VT_f*DaT}sbLC2gontW(ZFQ|G>IR!|2U+)7_dUsQA>=04LknZ+b zw10+Hozm(e!~p!qjDhh@x&Mmt(iP{MmrV-F&MU|}(LZ-BDl4&n(9}UKJ+a1)7Actt zRzRSIdS&IaSDYnRlwRN!Zk(n1 z5zO(Auu{rn^ST*jdHxqA;qEC1tWr9440QV}LaP;gx`lZ>5)*uSFUD(;zp~)vhJ;Ll zH5?f}*aja%L$yoQzg1PKp=H&-Ws~F1Rx-Q&`fE3~&vkt(?;%?$zBb#6(})R7wp)_} zHCp;bJvUmZsaK>-4XvuG{tbV!sfDs(KjvJTVmZix{Z|fLGOoZT`8bq%v0f4O7tzGN zhM=w7aYGEZzo+<&>Jk_o?uZVI!9g=66ca%s$tgNca**qx;)s_@DP1-lu3^h;2fC&>ILbxbTEH>aA z@C2>l(6>3d5xp`GCi;sziq!cI2T?7ne;$=T>h`W=0E5266-|`q2y$56H3CL%&MyAt9vLpRaG8(3Px;-m44=$i3a!}9Y>8# zDm0qnE^a%B7qo~*k@M?wT%h=&fo|{yBHMlkW7$N}=I9Y(wIzi~sSa-FsQ{(2>9uM% znwPCRt5lvfOk9|OD;6<0`U_U^SfaEQ_2;x=eWZ5Y^KF1$rY*el%W2Oy7}fi=6=iq6 z2c3D0XhJ(N>p06d?_B#)0;p(Y6uO0f|SzM;IboV`a7ek|q+2;%&z<5_A zm8#>6+K9$;9U?8#j~eRQAzX|+TC|=ktEx(AgN7p;cl+-MtVK*94}n+2v`@*%kp$Z) z$B)+rwwPqRucddC;dC`8<;v!=1;I&0KNKYev!&*spf5E*`onU-6^nP9jFk4?m(36I zwcMnlBD^9nQ#;~orMFjHoYx-yyY5`Br7@SY(QHk~t6#B{TY8~=g891+_Y4J|#E7kH zKjB^7LSHsqf5CSl1vB^fJQHVq_~@4|RzGTdP}&+FFb0_KQ7KQ4WUxEQMLi}E?|VM3 zbiHqmxpJpUde>7wa)8{ma{$o693Exe3I@%&a$=>7bfFknUGG=Q-9)fp>WOGl{e?Uf z(|hIy>q+I28*E>xw>PC@=OLY2^LI;GTUW9)Uf1Y)l(8`#b#5qDG3#Bw?iAnDsXu6o z`V%cr9T2a%4Fy=HE+}~N)W_XA!TWS(#vGv5kn|q9*+UW69=CP|;cI>UG*}xm2cCvr zjuk>I(5hjh55{ELKk)A=RwTNc8p`&v3%}OBSRxCq9gmH&4h-w$u;3Qd>s9&z(M79& zQzCFO{YFxyV=hOF=vmG>aPSV*(vopjBOMbaS)YpQ);@s`9Lv8P#qDi(erk zmy7a8=d{ltp%3b03szV%UTr2bC0<{8vWx5cJxAEhBYRxmD;-^b>tAc1xpY~+1BXF% zDzCYwoYLB%KgLO&@**U=%{$U!54HH)BK<>OiT7)*NG*a|H;Koa@XI( z{i8Vx8P*-3k`i_YD{rCBl=R|$nS8S?Re8(#j=a@1k$!0Hc_q@>?7!RrDbk{vVC5~# zX?P#8)<2L^BM6vrHL#7cV2*Hq*kGV9!|L_7T(9PBPw6)E;s3JehxNhiv)rds+OGWQ z&Puk7=>8u6wn3Uc>E7(Wu8F!A-Sr2ZCL^9H;q76O`sBsQWs0h>GKs196Cg9qf*g{? zqV+*t?pMbunkv)LC5ja~rtQBSeyB1Jn4n{9yo?_@&L#%S)DX3($$F_i@`#+ZSI*q2 zcCJ3LlVrM!H*5j>3|O?9>^#DrcU5Z9u6Ooo9ji~MKLVRc7a?b`rqbvXgPBiMYixLI zolKu-ojU%8;a*;4I6J8K*r$KFcQ0$Rk3KK|rgPiI$|mR3#%())vttLqYy@kwcgOPS zg~gS{h0~XlyaQYmk$gyBUzhNVcX&LO^n z;ke;bx6EACzl4~Uj@#1rqr!L9m(vf&I~i0AOt6tmSQ?lF$6~Pn)PTF9IbXrB zjOzOc>I2Zt+D0xARqZP>D3TxiT7ZQl_-r$daHn?zG4pKu1q;aHAfVz5G-=4nN`L4c7obz2} zZf24#QksQX zQxhp%#j#a%Y)}|{}(H|hsykO16>}?|_dHg8F>!Ca9iD>(kef)~E2x zT9OjeSJhmV|AT!7ijp|MDKB*4mYit@ZD?e1u-VSdl6`V1rK1p>b)OR*|q>;X}kge3`7qSuf!bT`*Zyvhu zqP~JHzIfkT2k*a#bAeV|q}30F^b0LMfkv? zESj%$99PZy`gr5BilY{pmoJv#i9;HkRWL1_oyV83Td`tE9dT^7YhM@r)Zz&2hmLmr#f)OO4Wq3fq41s9^`%5~d}z@4rS}c(zk;3WwW+B4Q=?WMdGX;< zn|tR!GbVmTpQMMn%G-tvd1%u3hac3d=B|5W$#*a8|8n8F)hjkXv~%cC>Te41)jr~U z!|{GSKd-g7%|EnVq~zDSiR!P|ZOXpL{r>xGFDLp*t(yc{2E_*rYLN&lzkqQI|G3}4 z=@lob>(TyDiV+|iKM0C^yhlyK>s7-%ZB5yf^iZ*=$Gh$tJzl3a4;@3jHpv}^4qb`b zJd|$KDyX(fS9b0DVlHxgk+(=&Eh4US6qOKBq2mwyysi!z+KToUL@8 zREiB8>0(V9TWEP2+CjX5Owz(i%hR`>vW_SFdZi{!iN-S?izEl)%?>cEcDA*0?(CoO zqcl<;a|PkEbGrP;T)ZnKyRJ!-FLHWTL6IU}`6Axx2)Z7$)iJ;eCM?jVA3euSt>SETi^(}YQz0O|Bo7FU)ehD9T89t2579E%p)Vh@# zgq`z&DeYOS#*EGLhz-8co!=~%m%En8%gwQsJ}>_U|C0{CthuILR(~_=86vB#TFa@Z zZAc5&Du-!V9>eZ8Oa-k;M9qv#=(C$v2YsD#$I=+RCi?#|_a5+3Rq5aOJ?EB51CmUV zA=HF4P)bNh29(|u3{4R!7DPZr1P!3#(!l~^MG>&YQ4tXp5d~3qMcrLRe+mkg6u0m$!SF@o>T5A{WJ4k(pv3k_LA50VsXlN zU)%9Uar(hy2PrIv-b3|ptdx~`EB)Ay#4$ap6gprVwiK6xwZn^p8O=FM`}3aBQ~Uc* z>zQUHr(f0FFfv|yYt*#Ceez3Nq@;*izIA3VuCrIi4yf!`T+rg|@O`^yiF`5Tya7G2 zkUR4{_&R8_9LiLL=->xrQ@!mwZ=Lejf z8igUNi(l;+|1AOx+9uj|U(xZ^5;xU{JE30gP!B_R_&>gx1FWgpbDaX$a zz?8-34A+y1PR2ycp`MK4+NY`^3o_sLH-C5{5J z{IH*##OiX^+ix)uvDLHE{ zx$v0@(_Xk}^0O(aS$AK0;a2_Onhk3vj_sFhB=s6rwPxbE0}Va7*Dx8!*mU6e4tUxr zJWS!?4Pu${;>7@*Uk?elYWVUs6V4lGq$wl=41d| z7c-wqLdMkk7%8)TQYg+%TPo78N%rPo851Z5yPS-o0{ul>fWjma z&+2yDaHwAldvWg#o6#s#r+pcPKGX(oY>UBiQaoc&$Oxyt$9jydQw(q z^JZyD=wl@%n=M;tzATqF!L4Xp%-5CIc=KuYiJIGj$>r#X`13!b?O7K-%eslP-{gM^ z)e5ojS#f~9^k(=L{bAN``e)!(?4~an!~YCAh9c#mHWfuL*{LB3I&9E4|FDK<)r5CO z`a{Mhv~N_mle$X z+;+Y84?g&yK7FIOd$YJ}BSXlP@!swW!iVF=VVbja8iC789i(MT$35~QTUYV0 z;>I}ovh=P@pAcTcmqc1%NK05TqZ+b#C3(ge&gU4z$;EykF(WuMP9%qLAUl>*f_epn z;>AObBDJh^+PX^%^6!-+MsHv+gJp;p#iQBV*r;29Zot4<*)=sD@qJI0+QK`|9zK!- zH=(}#bbb9YurvGGei)!d?6+yirnm&V0unW9qXtxnM;~f3FozheZ&^2X!nwdpBR6}1 z_@PhOCE-2%n%Uxs5HUJ?h~@41ZFcE6dk9Akp6GAYJQW(UjMyH~N#d-Vfq1w9x<=pH zPdwssjgCpJsNVdtgsQ-EEo#Et7Hu2iWHSM0%Hcs*>< z+J|3J57#m~&gCUW<>E`>k|P>4P>(T^1i17Rv7dFWVV&`HPdqYaF$@KtE)E0`bS_Jb zkm8?a9z%ZyeIDB_jg$DuPL)Pn zqdIs8$f5p~?5oLqc#jPBuvq_~0%K+c?=Y&-o_G3lY8|ZH1tSxlj!qqhF!KuW+Kk3$ zEl?#}L>MNgannlthFAJ>K6OTd?EzAg-FAM}>;av5TXq|UPG?uKN-11-;IuDd#OGfnO@<4Mu zZTj<};WV5}KHoVsUVn*xpo==7Gm9gM-9$s$7*PGq{wDlxSpV87rqoJ>Y5KoO-P+LlRpBYmJJVIN?(xuY}9x$ zx}>uVV%o8VsQ=LYN6nRo87xs-j7ApmxQyHwMgS4wi#QwPPLz3t#vkmQ;a_5{j@qV< z?bA4;+=H*)SYubJixbhJAB!7<{A;5W#STyg8>K61=QdTW{+Mb5R2kpV25ME}R~l>m zl^p7wDwalLt!bgp8zWG+R@`#klUQqg&Xd>Obo2F3vU9|XPtI?YOqcwq%|?B1&1sAB z2I#{c{hPz%=(@d8YG&5lTf=5Hj^1TMI%ZqYTpR@3;zltyiWL>%M~$J3`oC(UwxIq# z1=S*4h_CsGl{9561F<;VRb0bM=}46tI#8tsZGKb~0d}Xjmfgv_(9o zu9Xis!H4zNL;dNZ@~R-9xMGp6S(saqMk_ibEqMD!8`I;Hp?s(X|3cg?^4Qhv%Wxr^ z#SV+R6(vZ93vlC0?ERI;4~n~EXo>LV?sX7d1oODl!Qj(vx*UfS6Nps!x2!X*B)ku$ zItqlL8Z7uMVB8*@6TrLZ%LC!*v3Y2GmEK-hNrB)T0~`I-p3XM}`1%N}XUt`)z9UE( z=o9QGD3_bd0>L~i`H9b04p@ZtGrk^B0>5#^Wd1j)HAA&fAyivxPM&^}O8 zi>*tQq$plS%XmoFvJ?p-T9Rv2nC$~)s;~=y#OawXX{6FFu5>`*eyJKs>Z>Si6RW`3 zvaQRqlC0f?n`DB@3NpbAZ7CP_FZTEv@hA3k_^)Ep8g`So6hOk4>o*M!{Us2(aj-rR z`UVX)40;#ufY&@!;?* zh%?-2Fkd6G`R%XbbsWjahOfgjvDc6-*>Xjzo?YN6Y0dlvO31fIDE@WOtTlnafB}xg z71iPY-g#^=o5UuqCjM!>B+D}${Og#>(GsIl4s=@*iU;h_?JdBvj%}ijSHY$-cO+j*2N%)FMb4W=R~tMs zzQF%(H?BdioX=*iGTs8^m??toyRj)jK0fc^3;2TICVi(U6otHo7lsdpCkNOewpPqQ zIi_tDzwo8l6AkZ8WFNd>D=g~AzgSr_PMl58AI9_9>baC}1)u#F@uQV>{0nR6jJWdB z1GoN#Wr|-s9ZsAL1hM7G;mi4K(T!#PMf@_u+KK0%vGy4EyO{7Z>FVgGKU||wZ99VXK2DVzuqZe*x zf>-(GEsvJ9$_X#DH{I!IRXeW``Y?N&Hq3hQM&8sWbl+JLpE+4g3rNI_~<7GPq}o} zlqst&oidnT2LOYSbLa9UyI99vOPB3bC3h}cx=VbzYsqr@jUq!XMUn8#G{Exmj!5FFi;v|DT7kyLG zCbtD%mCS5r7$~?o`g+8hQKa6F1hG;JxK9(U_&lp4%>br-zoRc-(2k~ehj>Sm!RIA{ zYjq5bo7pQI7K7=vi-gOs+C9ri0bJ}kj=g@yVt;yjBuPf9d>Uoh!UysV?7i@-*p$0c z|CMhKSDA0uzIU(L!*U<+qy=V_N{S83O4%e6bT2Qb_81??|5 z5Bn3G826JF#Kasg7KUIAH5c?mP|Mcjsv+?Jn!a)lmNb zoBJg$`aS<2q}}lUZ|H1FS-0Fgq*A550#aeQ*TtM0m?@v;m$hYC1?>E!BZm(C-tN$v z;Ymk^4g0;_aHbaxFT($S7M)XAcuo-;u6~N4>idxTVlT)1wC~1#u{(-_MfiVwP@=pC z6WxpjP}oS8#)|*Zat?3pif${S|3yW=omN;>bgv@A7RZSwii!-QsK`8UDERfELq_XE z_#QsoXgxgCW>`_tFzic0;@crVRl4b)r&{V%^Kbt{R4MvDFA`rA72TItG^{9mwhN9e z9vPptR-&t?zxKWwbwaI$NJpQo*baRs+abOSCW-If7o3RzeMDlqjJ zb^IM&Vy^8%rFZ~s2h_F{wa}f&$hQuh_!@H>nxFXEYEA8iU~hID54C$lS929`qn+}XJkJcU-Ji1ziN6#KK8di!G5;SSH!aoc=n5YhT`;W0~;?k z0XA;6=Qyt^|dRx_`y+hZebx6va42~+ zB#-|qWlcD#9H?~vWjW`}tpUqEe_irH|BfED! zC#%Kt4OZ9SY2<}cHf|X3ifr;W^cid*b{-cTnMo4F`#hX$FG7*jMj z`IJ37GL@Y=W%ZpA`(XBFXA0TMrlo!(@F+&Y@?}1ltnsmo?aKBYnG(Ew8lyl?Quk;Z zW^G53Y5lw;SMmcujbz)Q5?UZoKnB>qZhpMDh-{W0mUcekjxgD6l zC|iYGr391)RLq33#!17D=5^8O!Vj1+`5sjM1c;!M_%Tk9jR0PwbW%>ejj|`>By=h% zshHe2oi6+?I_($+epKv1I|L>|p^)Ma#X{8vPCP}?>jCyaN>my)-G?^dr%{K5a@9b{ScT$(ZWMEDjItZ3jN&A2c0}h2%LDG7$^OmDksIl2H#(^(KfKk0h@F9)?pYmvmr%_KO5z46I=1r9YK3TT`pYmC!ej~4q zioTxg9S-AV?^alpMrnJ*6Ku)G6qUWZNCSB4%ia+p2|pf>(wB`VPG9xq7okmREE3;i zr6=Pj_L_IKq*==+V|8V+D@L~q(M0z6p z7ZN@Wt1(o)#besx5-yV*s-8zocA{ah@wI+7`eG_NVTKdv#Kt=w;{<;Yvu`$0Cxf#a z&~6`(4E_CvuHGtXp zH|ST3In=$9Eq!Am=}qF7a7`7R2&#%Uls{ZfO|3a7vJH)K*rS9`{=#>HHwB;k1^Nbs zXqn(b+g*PawA7BY?Lr@qcDWt*iIRehEPW;zguVzUg+7F7(i_PFa2;Bd6%p*6;U4-- zktgN?1JPeQ5-7j`wZ|c6$WPKDDTie2mL~%1U~5Hi30Z}di(RMLd8OB7Gm-ih3yH8nUdCM2jf?5 zXyrOIR$==X$&Y&RvJ6@lc3CNPGOZd%j@VFv%u4}~IHiw7ab`m<@Mp4l*~09BPigg` zb77s*7Hl5`UlgUNMJz2J4Lvv^***|Nj9=1d#|tS-Dud`EDWuYf9HBLmMsi3BAU2Ik zlyy8aN^}mvd(z$Jga0yw9J3c{UKFZg0rSB*fyBtL~ zWx=;caFHEH@R3YFBhAAm-fRy6fAklPAk@qZf23?wh7w7#if*>eIB?u_M`Uc%;0W4w zCNf(`;27JnX(5})kn01fRY-Ls8iEHWoTpS_u?RzUQ#%_#R?j z8u3YIoC7kJrGddQlQv<6?ky80!CEFiy7=ZTixz}xlrHRX5ZNZcsZ(;vEw;%=p{`vf zh+EkWn_n`AK+N2LD%7i59uV-yy!wQCl;VZx*u!uKITHFE*HIpXbT*{w;fQl?wBxzfNnA=y{76#(V+1190Z9$Jc zdPw?kJ;w^Dag~XXM{lP=)_;wG{H;P3oa-d|`O`HeSFBw}n?gsFwvFGIPz` z;6uh`wcj{4idV4Fu~2>&xegu?FMO!vJv!dWhnmZ3K{VqFBJBhX+RO%wEA4_ZHbSd3 zcUso?h>1YGHHd>QC@yb6-st!$@S!bF9S-#G`Ox?=R2w1TbJ`rTWgzjXf^u8{<4!g{ zYURoPGa;1tWPen(5@2`KE4qtc8NMInqH{S;jX_Afb_+#DJB)%*OLi;qOO)HRM_|c5 z4z-LFERZq|Ju#aW89zZM=0o5@D_0E@M1awmK|ISk)9RS+NxB6?kT}tVXcd}uW}QiL zqkdVIHA-mA6v61T-(sKrCh&sME{EMz-R1Nap?^o7@vN9N!K&um6&JxA=fkg z-?7iU?q?-2&-gIcGk#IbGq%|EjID`zroHGqgS)@uJgTeHz0lDaQg3%+g%$lvBfZ&t zsc~$zw*#GtT!Oc_-5?ff+2Hcp-zWQRJh>;-e9xXep%(Axza&a3yCB=ZOe*@MYgQ!H z=sltt@tJH5JZ55rVo&WHqLHk%yA07tsJ}mW%e;0EyI0JNUg5yWZ@dE)T`bPv~ z|Nht=@au{2OQ##>gXd0atswPA3hawCr0O_)=3-6~Vr~5^>mB;XFW!Uyd%)M8J$lDI zd&Eq2Mba86hJCCqQqb?8I_fcBQmOFm%naWVP1738x?^U69T!%B>;k%HUK_Ewd(4|i zeab)eOqXBl#R6djer?-mFP??ivR>J!iZ^bJY zaR-HUifxFk&!@9N=~P!imC=mHMB-`iEETL;V{iZ9q@ zAY+%+I%MUYIE-g_PZ)WINKSjhQ541Wc7N?V)mH0OX7Ac_>*bYu7ZgP&KV<6}>77_! zE~8J@`KUho=+V&KN2{?z#cVcCY!2NmHcvcyRG*96tM$3^)@ret=yvdfbG$PFr_Znq z&}BLIL31=dNb2b{*7!egRC@uD9DhkZtG8BfQ&*#K6WA@_iZ8cr6$iI%6JJEXCDgfQ z&)Tq;&f7%SXWc*f&gi3t(kLRnkQSEYk{zuEYmVLdXqF!4B$L&$>~cCro@HaA z4lde{(Y|~YQvXMeuoc1ZQawKyJZk)TesEyGXcPKpfG-vc0!O6E*w`a{aY!u0{m?(L zG<|V!AX{v_7Cai#^TJC*Z21vX)!4Bjs>1|y6qQ$)gxaSrTC!tb{sOX>El0vjgP`PS zP|vS@XTGGwXcG+mlP?a61xFMm)gX3xD7=*E`Jv!ZX8d_^aL}V5>+qu>cj2Q%hRc>{ z{$F#{I!tP424Jq6V@DTimul0r8QN@Z4&2^{14OZFafwH!=tGbB zMR)8ARuTQ-+$>?`s&Ga0j?9JI$nM<5FVk0!Uovi#EvT4ZwrEiq8?|Ur#XUkSTChma zZ+=Yv4li1`P`tQs;Ue+kqD71Jl?%Ji7vTkq7Kj(<F}bDz+~K6)!DtsMx*$S(f%#(4GIVsBC?A7ZpUk z*xsYZBGztEcRT^*L`4rkU)8ZCypw5BF|##0p23~?`r;^TM_8S*?F-+3UKB-^x%w@ zb-`I|m2tPEh-ivF2Q17yVJ24MVLD=Z=sfY0epKalQAV^`sE6`VM{#&N*5A-H6}yrG zyvQ@WHTLBv>(3j14L=n64`o_q?5TZA#t)(^M;DMcU|{)<#X>A(3!G?jo&koRU~ufx zD-6nXE8iIUR!TdTjtpkWsxtI5`C~jC$xP2+HyD2no{5U`Tt1youU%#3sl2hY0FG3> z0AWf#Zdw!^9td9y#qY)`cISnj(?cq+gk$B~JV|=MkqeIfjCiu?Ssk1Udg{Z8$Pjaa zC11aog?1YtM!w!;R+P`4=TrD)wReI2UyN*MiW900`#8FI0%F@#l(nD(@GQKzdT6+Oy3U4sp!*Sy(E7?s%uNuM8 zkMk@h64ImKaLi?=OyU{7Q9NU3Rd5_RJM_5WMCB~kW?)BRW3?hE22hkQ_^LM<$L*0F z|3bWleuim8ZAgx-dy}n)`8Dz`sx71?r();61MGk} zJ$zeyY4(ZeBs#HA;-Ki-HKNYC&FqAITU(K#~8XNJ%#wVX(Bg6|&Jh|}+(U;xw=9_Q5NjpN} z>&>6|@Oy?2zbE_>KK05le|_@g*SWxFuuflbGf$t|eN?ZZKU8g~D!%0P$@=j0^jTS1;Yabi zWb*5mgm%i`clPdHoHwImX`kWq@`^hT=ri(+(vC)n`)2pveTNJz?O3}%Cudgc*8GxT zHN#3K?U|$xm%qc0+P|qy9+fZcn@|M4%QdYs##+1?#Hm_un(kv6WL6n4DxX|(ngLlL zm3~dE)uj4z2jE}s%BP=ZYdfFbrE}*lr~fvfe=DD_RsXLxpX;(5MB6{NXi?-de)AQz zxcd3L1X?B0)iSm8-K>0((VY@IjR z5BU1(UcJufRb7pbUO#Ldf5G_iTeptKm+&=iO?;g=J}^HYhj!po%w}t+m6uNwGw{iu zYs}7=c1@iDpUtDUVD2@l*X(0gVQ%_W`}T?Z#6{vhHh=}#RUdwcUl)t}KKxMDG10OZ z*>;yUZ9k8P!h1Vz9S`qP<--6=J{F-V4le89LBz-@uMZbt;sp{>JY3_@RHZh3maqG!a*#$jH&aLbm33!Z*Dbe+}v#9LIi?GhT+?R1p&5_)>5f?Rb^ zY`sL_*f2-yi7Oy+i8bmzS>s64nvC`x)i_6F3^{SO8dW7b-o>*d-Za|P*9*u6jy-gO zWk?!!S)*F1YE8^HH`ac@Mr?dy<3?<)m_>s|>c!9>DL|+2P-UuE;dYJ->x)5!LEa(95WW7XJHry=3 zA|PZ%XzYND>!eAlyk0vm>Tku8^(JcPd63pdvy-G3CQR)e=oaHk5^e?ADX6uqjj+gh z;91lGCR}TLacAX^zlBv`1n; z(L_xMn+bdL>ArJKE+&RixVTvWXe@ z%xUK*e3q}u#r09JX9Mob7Bt65#6JBdBOmrpXN5%V-{UOt>rl*Qt$KUa%FCwRcIGpS z7Ca4?;I&g%t(tn-%9WSF9TvbX$R`gLmIB)F* z{DJVahVo)9fDKm;nV5c8MmJ0+A0zZ?Xf2WxKI@_rb(2FWQ`Ck}=a+>a3U}sH!Vf!z zYTr_HN87R~@OV1e!X+Yf%J||7`t}_+Zs9ml7VYA(8MsBa#qdaHPs$*wU-W-W6o*9v zb$rLLeqJAzQF3%~>gA+1q?WV-@kowwW~MW2_@JdTYy^SN!aQsM&5XRFf3v?HVQ(E_ ze-&pQ5xtLucX5;H9NVpOGaMA*a7cuWcEMvJxO_P?jVxv^Utar=v5B3wcCGk0I9`0b zcCCzkwj61$0^YGw&)psez&DM-k{HpMgH9n!jKzjKg*#DSS0BcwQS6K@Px4pg$!=I@ zz8_sU8pT!RaU@wMXE?VyQTZr-yZjV>K$ce;UBy4))6{4%6|av!TAnD8^q(Gn82Fv? z)A%QH!~w`_>y|{G}p08^gSQHDEyd@^-!T%ys&ary=w0t z%|~s+DY|0IHUw%O+C8dy_;lC=`b3eoOv`xuXusRNA)5?eef;xQt)zaCjNqW-gK&4y zfkmou&9RG{k0Pv-C)-4fYR)eM`o{5d)E)3EE<0q{fTYk{uN{H*&&rj2uTQ*36tESb zriU*ah)1u#8aBW(KfuO<|6mb>!NxWTKlKPH&UqNfs4suumqG{9(v>UqBOs){@FjMz z&c^Zs%}0f6K?KDA5aEyZg*j&HXmsXrM*a6+L3h-nwQn7Qs`MvQRG=MluR;$L|jH=-FYO^%kI5*hatgPJw%g3|)l8PexTQAR{%oRoD&X+F&mYUEq$zPFw*zl6kk zYXh~jwUOFbZK5_=o371-Ub5sinl!bggU2lPmsk4HKlfGoD=K~2IX?8-v2R&8*0twnOdqxCrI90FTs7v> zj4@ZVX2JZzv^%D-C7s&tn7Ud#mz48vm5=}4(qft3G2yGSQpC?W=kV=GIq#jDA?D^6 zrQLp+SlqT`=hWNv;uYPxUA&^SwDir9BX=wqeM$Q0>Fo$f&g?NQCXbo_^2m`}myf8|hUF{u}hp1+HA_NK6AIU_cwc>gvsTl6h%_4MRr{&pQw7Ecl9v^yF0EASEYqb( zw}&B;y|zc%LNkxjR{DU}*!3X|`!c0zmAHoD8i#8-uIq5!jB72fjksRI^*3A}<7#%% z08{%KiT~o_^y7Pgti^>Nt+5eaCdkRe3zJMZOD47k$keXHH6PbXTGf=@!b*M9lJ^TNNU*4!DE72ZOLD?J|mJqqp+!(_oK zww+b}S3JTl{qG5Ok$6np-b~c8i!xh^rx`zNT{F*_ znJwA*La_PuEQH4EqA?^J92RN+vx}O>lGSElwG|p_#C9ub6&W&3HC+a-9B3k^oAmv5 z@cnj<@3({Rw}bDugYUP4@3({Rw}bDugYUP4@3({Rw}bDugYUP4@3)h_-wY5t0AdGJ zn}ngHzPIK{^g2jsgT5}2)dm@flr$7fL%}?xTOv*O3*)?%6=a%)-V$D7K?4>lh)UEG z^1GggvfD=a*cw*jI~PaD^L0s!S0`C3R)%+5OK$g=H?6AYm8IgcwmEDg7jHCA;}ch= zB;9#)a`Nh1)HkGwdeM<{{kFt-?Yo`Y1Q0(Fmwpi3xX{* z(61l*^+UgY=+_VZ`k`Mx^y`Oy{m`%9(XSu+^~)O54`}&&(PYJUAAEPk_rQbDdmc=Q zob+^DU2ru+8#e`Q5F$ARB$sGqGF^i78E7}t{WByhWm<`3#S2hL0GWz!GUOC|XW%;n zkXoZOI z+L-#49Sd(-G4sw(58^%6o;`fc)i>Q#*b(>cm~{TU;<@Kfy5puo@q6*S^C#_Cws^;+ z^Nn$>3YWk3>Vm1w_wlK0&%0ChHJi5J)z_96w#qG9{%TUnvWe$;Jm*bZmXh@9@}f(u zu@jap+q`+%vI*$jLARpLJk9(Ev~5A#7PM_a+ZMEKLEDz2Z427Aq_%URf;Lb=8z_|G1V!R3d>50(+d?mhx03J- zFwqKHB8I3^NX86ON|R|8;G*bD)iVXER`@0p%I^kk((z`ta!e?ZT24~CI78U<73c*O z`FgQ&{kM-k{>?X!Kl*Lx%ct1rpK#FJlPh0f>Ee6-IIq*{_%1#0_|c<}KlbUT|9a@h zpIDXH{?m^SEy@(X^F>_XurrpN9;b`e)XdA5BvQrULwl9T^&#EbZVI+mtzaEe)FDM3 zQq&C3 zq0wY$G#MIAhDMX2(PU^e85&K7MlmdfwrU#0mJYF{Ll@-JnMh|MO=6Y$AV0BCZ4x77 zVCkr`DV>gVwE0iJcWPb~_L7$(osD!h(uBZAJy1s>6+MbekK>PQv8XD)i^ z#~;OZR`uhL4=qu#@4x65(tdvhTKiofUim~jkWxf7eH&O6@z5q6bQKqREW9=}fZdA? z!>Bi00#Xbg!$xr#o(z_gssB1x{B7=>Idj>Nd2>>;H+{!{*tn5z+Q{C%hFvLcU(J5J zQ>>esu2;-SxpuDDHMg42oy&TMKYsl2C;p{>|K!Gu%h`o|waB`Y%@cu{q8G*t*m-C) ze}ev08|@J?`kh)kTx~%i#a;vHOjUbk!csC}DVea8Ojt@LEF}|`k_k)6gr#J{QZivF znXr^hSPFG+U>si~@n2m0B8mfsmMMcFNuVWa{9IhwG=9($h;pFe78rLRiBL}^+m=o? zGHax{3g?iZwyePMC0Y|ufVBg9vl}-*^{4qyuVsAaD~wM3!TsR-b?`j{e7D#BuEKjhNT8-vq!j}GHT+HnjV99hNVh=RcTn2A z4>s>}Y~BZ(_rd0Uuz4SB-Upla!RCFic^_=v2b=f7=6$evA8g(yZQikQ3L|Yv3S_e+ zegl%w5$Z@1XgiF%-Pd!}sGj~&BeVLHR;|1Gs`XXf z`ijHi{RbXkWi0Q0mdCoUUoSoohuP{;{$3+T_VSOKlUZ6dbLRT>GiO$H&tR*?IrsCA z)`{WlCA!vyyWG!Sgq#_}Y&{E&FReFQPF|v#71X3;Py!hNL%IiSjM6>81jl9V-37l& z)p|&e%EBGrUiG9kp0u%_kk(Y5UFhIDxfya7?3H%h33lAcvExoic7h#uf*p5)9e08q zcY+;vf*p5)9e08qcY+;vf*p5)9b>8wVs|G%Be9J>BvNB6D*{G{q|svI%iHQGm`Q~Qf(rswviOZChW2WkrbV3so-^v zq`F5^ShFRcmUb`7E~p?^LVK&E!c*eMxMK-<6$}M~m+CjoG(iK*^_b?}AeVmR{;gY| zxN$AJi`~8MuDdvASB$*;Zg$W8ci%m2#0>i`V{31G;<;B|dFB4wa&BDv$=EwquV26V zj4fePhm1l8hpcxRGHS0&PLTv_p_;X%g=+G(L^wKlpNp9 zz?%omknz*FDEpPIXI-b}1<$M$oB54NNuhAk-E8Qxv(u9TMPtlQ_l~$k{B~hR_?e_- zNlE74my5z>twulIn_lg)L6F6_=6+SfHn#`2ny16YGQd7XR1!l6YK`T1Gkw^WQ;jtj zWT*QIDk?Kd3TWuL8}{VH{3@oeyZF-|tdc-Q{|%R%cHSrF>&4y9U;Ii{@+<7j3A(xe zNpVbk-|PI*9iN<>b0|%Gz1F&)wbjSpv~O6~9q+PbPf*Z?%f75JYmT`Oqibc_7=#=U z&;wU9$Uh%f3UrWy-{sJQ(>!T)a2I+&*;+Fgyrg{>=71GT`6VG6sgt6d978Yj=46-o zaegjwlkUN46efEJI{F59PYlB(q2}pUc7Ymow)koPnA^r`cFn)`-B^4`^yzJdYi{`a zn6LM;&voASir3CMLmVHMVx2whwP&v?GWUreMz?;ZZCeGB0m%Fhs(j)(2$F2+vHtvul~JEZa@xr_slsJ~Lb|Kn-R^c#BX!^e7mob21z@vL8_>F4gX&ex~@_b=0P ze;ZhyJZ_{uwr%fEKC7yo)^@EPBom)1r< zYsjoI&EL5KbDXfebRbp~evh_d2l)=+8R}B1+LpSM%}^_lE79nbiDhAwHl@2|NsFQ8 zFb2mZ^O=!U0ZNfQ?ZOm(=V@O%h4(iUhe=D+RXJpX}JK z{nigy``|UciRU7AptY)5*Tb%S2xUqRB#&gs0`K5$tCiM5{cWNewt|Hi(%E>&cjunQ z^@0m$-m-5|-rn#}R`~r*e;;e^|JOy`16R#FeBQ9yufjL+=l|y)A1&yDI2HAe)QESK zcE@oK*{m4WrLSeb4++1O7Jh#={9w-c&BCpd_@U;j$Tpofoz zA5Bg3u&iY9q>LG(4Ds!|L(cfuxoOrl&lkUYrB}T0zpitQaxE;Icr4cmo7+uJNSN^$@*nE&F8gpNKJ2PAwsGad-S6in8B|&+w)dw!TvVJNBNgcG|U4@wc*FQ7&o{mF9 z*}&0OE2nm88;OI|%c*DM;K>4>41^^Wr`y;mXbp`l*$~IeVJYYmEaorh0PVo-GWhrl zl3G9W^NmKkK1VOiJ>2V;{l3W)%mbLt+;8ZrdnV^~A3OA{(^>^TUf*TYa$kSrV`>-N zP}j|T0ra%frm5y;9@wPTP+OP`^>dvT5_J-21e)PKjW|;Wt2usCry;|MktXPFj;NsM zPLHJ8+9_~gLS`Tt7DFP#VGmM*&QBiZFX*pV9(cZF+?epewS!uHy7}}8qs;?*jM^U_ zIPGy`QI39wk@{5d^OZf59`M}Q!5CzG1l@7%)wUGn2WfC~2 zog%VjDDl}T@C$a$4j7>z^PmYF1$odG824r8S6EjWBKTeAcUOiF^c zB=dj~%si0&_^Re-^83OQKPY^DVS0b#%MTuWQ1bd>U9H~1{0tO%wTDRHswYIzEXlT7 zY78~U#rIO=OVyG4;|Oh-T@CX6cA#>4;|Oh-T@C zX6cA#>4;_+OhP|~U}rlTC$C5W@0K0OXw1n#Z(DhY7amexS)SwNW(ii07iLtJba&%%}$Z2lt?Nql1h)Hymkujg28!_J&B`$7S0!C6g=O_Vk5cH(G<_|9-Ou1=4Ynp z_9zctW}58l8e>&>y;yh`rb>hFXHcQ_0N)+8&aBTaFyBg=pBLh7ZkwpmuQJC}w2O7z zPX&?GEmYd4fsf?KT`zd`Azw?t^2&T|@Vs5*S1UZHp;;fksj{K`MffIJ)0hOAeTn@| z{n(DUC=U%OP@dBOtuvqz4K8Vtx_nZan2{-EXu``>Dmjvp^EKtu%*ef#kyLIZ)h?21 zA4wHQQl~{yo$Zv2nHhdxw<2(}$c^BR@TG#Eb$@g+Bv*R|Fy)>5##1>1tlD>(}4N z=9^tjaTw$FOPBJ+OYzO}FlLcQD%;ze-|p!xZu8$_3=*GUx44YeVk5o=^uELD&HmK$ zwgId?_Uf;_8B@yFid$}DbK$m#{qwY6tt*V4PzlX)uAud^1r_s*>^|&KaY-L`JI`D% zE=v)Yt%oYD$eJ8Fk48(zluDM*PO$%qRMCw6N37!?inVM;xT`f!t+~;=hm&y1FyYyO zGbR3HWm3%b(sn8ZJ6NmD;(zhMm+5zft_fYE=y@FZu2A`q2|KUwE5!e9X07nSmxZp; z@6zv*bgxGHucP@N^cOTQt@F(;!C0caK5#8+^TS|uKNTq_Yh1H1FJxwKwlS^A0KpC9mD>Vus;HnEl(Af zut!q|7`F!dcQbyf{j6n6vm}_&&3HX{gQRnsHq$CIzSW8VvmGnz%X@U?9h&p(B8kB4 z(U+IC<5|r)PJZWm{p&ZapEY2>EcwO8NWrr)lQ!)Ce*cC^@@oXU+3#dPzOlO%{@wGO z49GWvzjz5Zi>vFLrbF2t|UVWS)a~ zY?R;u=tjbxvOLGlmS{^9VHI)(`W(;?wZU=R9KHS0rGZI!!Qjs*JyO6T&@7B z^vkguOeZWry+nWWUTrbZK1*`kz!pb#D=qFmg1hRlN8An2p>rd~){Gs2W9gd5{NO_Z zORmMqk@sG^B*K?-V{Fx|fnA!j+vp^^fwQW{2Gk8Pj}EJ&8<1m__G_xH{DWoZdub_m zxt^;3*2571{|4(s*+VJpA@Q8@r_|22KjquZ=Fdxh&!PLb9{igKAvS!7&YvXKeNQ-2#&UY`8gZx8+|=?w%fzBoW- z5d$R6v^qnoN1p9kf^8I%mnd;h`0c^u*UHO(8M0QvoI6KqnF&iMW6q+{jfzh{+4;3=8}h`QLt4<>ie&MtUQ;7H}tK;XBJUGnG| z`jPc?2_wo6%F5kg9Jyx93nZTwk?F^*nVu=$j>_|Gs^c6vHbdJ1{AA!gpTkW?MZU+E z0`$N4jqvftZ(o;}8|_0st_(QzzY6+!M5YQ3c4^4YFR`VQkqxmhUm%e5#spiuzxPdU zU0zNEt;8WX2)8)qiQq(eDF8LCbzj7!N>Y`aGgp z=|^ATly~zHuOB-iMzT9HqCZJcJ zM`e`1>MIh_m&kq{{W;GP;m5NC_>_ErPx9fEZvbx$k8XLm@W&trf=fL-< zSk+z9YlN{K*CX6y+X+N0yD}M_kG;uiK({ z6zH5%`-bkRn1JKRuZiWKo+*2XK6B(5SFS;PD*i>wJMv0YK3+a?_!G*b0XPlN)BX#V+YfP>VJSVSPo(bq{vK(D-8rw5rlgmGmd=kKu@^SJuMgGWp zD)h#{Z;JdK_=)7-2>p^Kr_8DFq3ktrebbP>mApuYP11vufn$Szq)gNKiQ1K;(?5c* z>3WLdb7X&t`2L{YV(>~BvHa@uD8{Syuf8JM{&m_+bT7XB>$F#*&+5xvK1+a4wNIS> zzXQ9z9HZqE$xGRH{XC7)k=T9}|H^(HeiGTMgGEt1n{J8oV-n;voZO(^a0rKO9-SUk0hxoirq0=c7 zYY&O-SJBY8{VI4-n{m?{Z(s3wPfqWt*>61jlgl{@U-23pAB*;xVr<6o)h64oizcUx z{7xkQ1p4)yEDk&HW8t~S59-tJC;(0@5ny#0q{W>~rivKBDM18jDdWzypq_2kj-Gxue-YNS> z_*61W+5bZ3BKanu7xIYGa&kFG;X5*HBK@Z*_ZU2~ zY$ARV+h1etaK~O`O!UO}XA;1Z@^NrCMgGWpD)h#{Z;JdK_=)7-2>p^Kr_8DFaf3WIURU&(8D!!)cDT*(VzM6pV59%!jZ-e@4#9p9_rqx4^{u0Tv5%^Mn zPMK5DAIkg@eq!*QivApYiS*Y5{v@qV*+0Ukl5gVn@5$^($(L-Q>3*pAmGIi3i z#?SHAuMY6i@LswCqRg4=&E5}xMsvMa23`%UjGgYS=6g$dDcFE$|HaSy*3Swk$hx!6M(CaqU^60! z*0MLt%fk1^>ix-2NXclp?d=XeP)bS z_zKw93J=w8gnwJkVhLxFnU>V^(kwplVSVn<$t60_vIR7Cy`O2P6 zxiqPWV3JNy6mn5(MaW)Z1H97ln(&?gV2s5gn#l?VEj5X*YocXM*d?2#aJCZ5nW77t z`UDpk@Aj!ZZYK2!Rv0S?M%^cXq4+R4{dz?*O#-@Ut2r&+vS+?)d-n%$|gdtd%@C7Wra0RJ+Rsv=D5mNMpYx!_; ziWMtj93r#>JIu4L;=^h-wmayR5*tJ4qP`)Xo5M~^VW-Uz&yhV@nuD9xA?9I=kxC7# zsWj(Agn|x*r;t=jbG*i)ijKv8e{o0g_md}#T(vyqYd(9V-(OPfuWaOt)yV+Di1dgr z>>=yHnS&LK#GcQvS(}~=mM<2sAT+#!@8^t#5EK^Gh(}U)2baf}#rnr=Myk(e6=sJ1 zGz1o4L$Km!2)@UddxFbh3y;8vE=}ESEJVz5Waa}ADp`L&OLuLd4)C zo?KQ}K#bW;8IVJK4IF+xicT&%bDJ7jUIbG@zG7-%H*frjfOMVs3jeLZwNZrE+T6wA zjOEaUm)1v;%wlVPY8TL-&83uTX5fSRyna9pgtu)E>lu-40_<$(Yu` z4pr;+$X0QDYc}&3OM?G3QrXyQ@geJ4EyKec@o|dycuqtwDpqM^ql!r0!$=MO*Aava zO*S@J#=%3e&F4|5Jmm@e*9{u*$8d8LC`Y~e$`n8PSs%=rSBA_2`PTYf|X z!7ITT2}Fk9F+={)mxwp~weTR&^W~KeQMmQZ7Zhb+0$;ez0Pv`-LGa{y#Qe6Lmfd*} z+2 zl%($F)wB#xR6@OUd%`a!vFk%8rh9Y`KPO47WL50?r0|O#J!zV5iIqwG z97>Wc0M-@e%?ehL=`l;ZelIqREb{3dou{)KlET|9o-`e$ZcXAEo^BqNCrPZFzi zYkCs5!rPM=Ei(qJE_K_@ZpNEfl#jNWO%Th;!XbkGoU+Ou#?|4{X`oJ$#6K8a^Uu-M zd6W9F4E}*b)AVrn(f_O&JtwceUylN^Cg)oh! z=S}RNH)nLsVcaEjQW%oH71|8*W^=xx&k8v)IWadbR-EwkZW9G0A*++9k7dFg=LhNAPB#}!bv0)Cr z8Q@RiBV@h^nq)_0jAawB4+)r?Uhz^C*l=S;H6DM2kC@vr0+I6UBIT*@0U1PUYbGLC zW_CF_EaM=^Q8M2VmH9BYbaw!sj{V6qx0Z3#2Zf$ap_@x{po79tUCCu(Xu-D z9a~y07D0v8V)2|gbmtpAshTaXP5?t%0m?&K46T+$fTAbO34T}23)#{+Vi7bANH}nG zj*(j}76OP^7@>u9OYL8(vwetsC4O7KMG^h-`$0-I(4UAHQ0Q9y&WIjE*YY7mEH9`& z5xp6@Hlhw3v788>v?iZzMZoM>7QbKez_OyyPJ|Cu>vu-b^KT_%;@F7@juT?x9Q}?6 z`UpOfwbQna@a9O&XzSuB{2#aIzH#wFPa*Ck~2;X&FfG-0%LlRm?xP(IX6^3QI? zI=1m?D-SJECHE%C$YXys!=iDK-ERpRf<%CNzL(V2}wB}Y48>=w^m zyt(iA;}K6~y?ldnpY2z52 zpogs}?cD$*LFMMf^@`}1JbYL@%N|Z)4~nfzC$Y_dF%B?h*)Y(Q%*rWuNsEoEN4kCq z+bqUSTFOR?sVQO#JNGcetucNCKr(g*g89IWx{YbH+K< zlNJvhx_FXPe;ujXzW?z4?N!wiKdlqL)qOgV>f~f=MMK(;^b-Oa2o{8gzn)9r7 zXnj$3S)VGf)e^}O2m17hpK5h1MFZSwg-F8Hs@WQAl>P(J>O|na4100l=pxzygt7A* zhQJM*M6uG1lVqS>!TMQ4^z{<1?Lf_Wo)Se_UuI5;G%Fl-ZL;)^2^pbrp=sJCYanRV zvB#CPwjxQQr^KdM$pxohHfO)EbE4vO7`Fj$3hYX#0MN}f1bQitR5_A{;WO+GD>sdG zT3|8K(a#QS+7#F%UTj!MY&hir&IV=0I%<8)tBu3N74x@aYPT0V2&g?_ijDJ}?NvrZ z;Mlvt7_*%1Sw=);YVQF9n?4J$SKF|gGr6COQ`4wjUn>3lQaigpQr_P0WrQ)yM&ges z#opy*gvMDLZKk=->V=)&Ize^>TW(*2(GO;MnlpnKp?zf-_JYNLZCN|U{v6#ihW4g; zvsv1RS^E0O4mLB=Td?a=X}20KTwC3s19667=Fhqzvd_(iE*^_ji{~b7Xpjzu&1295 zh7Csu;naW3@x{sqAGh@m6jG{oQ7m;r7&Xg8cYEKe8E zp;gtbwXQJNBCb=b*cq8hjmBJkV)ziarX7KHzhNdh@fO2N7+!S-{`ji^sRkJ8!HmSC z2y|Va$Z5n|2JY}7{&nqf2LoFf0i<6Xg-?DTPwOecHHJjshW|Gn?mYMp)itTo^IiU< zM{z8bPBS$|0JfK~ha#|TIsuRRoAuyDC17lp@HoaeBdkZj#nKn;>ruUn`l`h5^ZPsz z(tMs0PYG`=CbErpR)6_r^_}b=j%-D-yn{~uUDbyVSKk$(Q~m_8(Q)|p*xUW=rXT38sVsobL-Y4 zR&vL=9g`2*->%BJU)kuLCAxqk~UhWA?VG3*=hT$;$0?|@wSZEZtQ z)~sL)2*qpsdv_`ylLqwPq*2!!v2JJGKJa#e;A2B#Y+fhF1hXR`%@YcX!btWNQwHM* zG_DT;=#K!T$OUloL=+q4*M{;TF+7lt^Cb`ZF7W%qiBA;|vOG*6IZBg>u>~TlC|l1? zOCze-m~K`_qA4_VH##K}KFNrGqj` zEqRb~BpyzDN-PtB630B&O!^ddJY*O=!|~Em85rnL!=!jSLvLo}@GII@nma#y1}vjY zf%#DFr_SIkyaE)-kyprcpM1};hjvtqj_Venixh=wc8rYZ#^f&oWP3!HhGA`(0kfks zkV`V6@tS@{dj(&HS>l5EqPf(FzZ^x5%TJW!bWCr41q~9ZL1lOlZ4xDijHxY2?`gim z`w?3{_UJUdps`1$&5lvlWAhi~J7dx17>tfW#elv&1Wh&+mA~`@Ns}@nBQFrBeabc= zxpS2*fASlm2QQ!OAu4ND?Nfn(k*D0iew9Z0wdH?;@=HIEG-c@05hP7LZBIBH2$*Qa z%QDhVCC{)^Xj#7Hf}u*K;T3H+^MXJic-U>Hwhr(HM{(dS80uu=pQkBIG{WZSY?jiQ z>s_HT?4YE>Hfza*^4XI$Qm)9dwE39L!JXneOon2ONy|;@Qu5&-Rvi0?$U&^~CuF9#0iLkpc zlwEFQv|Qajl-q-HqbWbijiK`R$D#LyR1R-$Xy-BMba>?fDoe^$6nvxBV|A?c7;juL zTF<2b5fBT~0x!z4gj0V`m6Z~tS00dwufP^!U-EOrtG-u^=3Zhsz*bP}-^tn+CTF?|(6n#?GO#ZoKrajv^B6|CY^$5;9odgI5HBTRhLb zY48x<8AXMnnLPqO{Q@ZjixEu$-(vW!Bg z-wwy!M7TiTJm8q+#!*B9MKu8&Fb~O`L_us(e!!mv_?Gex3IzE&ibRFjt+tX^DEU?4 zT_M?m)G675qf==U%1$EBq@JU8BK`Ij@bUzW1$)sEmEGC=GSsvM`SXldy7cegB{;-* z<=TfIzBV|7cj`Z}f8gOG4})_#9&KKWl!yAWUI?B3qRo_pdXLb1bY1RlLz&mstgYFO zm}xg2r99Qx_PuD4wx#G{(ZtvnMARe#N9@foI>*4vt)pYyPg@ip2+kPYct&{D` z2JxH%KP(oNiy!EqZnll51n1jnMF}M5O>nPK?AO%eJ666s-JJi~{o?@_ZPa$3YW1@! zVZ-T&@H`u@UtH4tJot;zyjGZeYE-D^YH^deWi#8ik?jlS$I6t(hpIi(4BEY$>KC+G zBP~^=@izZgy{z_x`0W3X_ulbU6EyNEPn00k7qt0*W67L<#4FV~CYoPFN!TIZY)5WUayzW=@Ho0k6URwHqyt~iAeN^h*sY1Qpv^s zLuup06d$#v<>KN~rxugj=gBAWIa+70P;PBFB_mF4cybN4kz|(%0!;`B!+!sG4XwgBOi{ zwQD`STC|~%=+&a@%O~)=L?@JEJmR`^$|oE8h`c>qcw@Lo$8grLxKaKCk@{FJsx3)G z%SAclc7-ZKA=rjf##g5t`|QI+oIY8XbfPI51qKBliw=}q0F|1v^iq|5i%*U6z~87- ziz#vCfVB&`aVV=%9&TslonRXXU%K*P_m_L|rFLC> z>T!1u5BJCILO3(ydj3UBL%K`&WS76GC2AR~vX-sVQ)vm54*i8){k?nfCI5bB!p_p6 z_H+B4$HG;Wx8x1O!|-sv-xza8qOs8Zipdjm$D2B|3v!j0;kGir$=bo2=3kgU#8YpX zJn>FkAyfQlg7u~EQaHX}71I`P>{qD?`kNK{s13eTL3hcNkula&F>KQ8KVanh{fcrk z+O+pDxq6TDRHTdXFX=O4WNqKay4)9@bh{Dm`VPv1v;K6UwNqU5EAGB9&)vb82ka*n2C@xw4t)qOa19c$@IL zchZfP*pBH{+S~T=5W6~ldXV(PUIXvT#V9VyrDVl;E7=-)#dt=!^hCVU)2zfjF$lrf zd_^!eVW%pW#>bKUG;TbS#5y_AcFYvfkY7m#m>r z#3^Q_XZ#b&r9oFHQDaxKWf3Jvd%1Drt)avt_BX5a5q2K2zhKr?Y%OH)4snK5T=>D> z3b+A>NYA<_{t0WS_7UYHWqz_+VhtT1NBhKarKwgfmUZt47CQ!HHu7v{f9W zZNsCA>hHPjT^h~4X(6|v~-cj|C*;)5^rg4=w zu4sM49o36`9Cb_2C=E5*xE}QpcUIo*eIDqWSa-AW3Cc4U@gM8!u6n{Fj&qLx;QEVdL6-RXzBYU{M0Z}X%0-@y*P z65=dt9X+2;dIsQYCSkBy#$tv{#@E7xj$N75bUz>wox7xc8g|)dzryZKLmb4zmFd$< zB@^*yynOPf_qE;=OMZfDY?^qP0s(>FPo60EoIELaz5l)?YBK)xZQoBMck->eiIcx~ z-jg3qp7=f0i4-NqA=7;QQ#${NuXNHY!SS6=*lF0sb(#VV4h9VLsgi>Sm2L-B6XC(J zQANgU2Q9Y_j@8AuaaJ5a9yhLD7=u)K|5&Bm`qWsY-P8C^yJqsI-6%)eKKDz~3&`Yx zj}}qFP_#%lN)0I3yhDyo-8g>7=1rr$y^D?NtSZ6DzwnBh0)*J`> zA1LV%;*>R&1yJ6zzD)dQga04EKUSZy7>%h=8YgX+K$?A0m7Z41<~QXSdH6;7%^ssx zE_;z>xVX|dx_C2*U~!jg$Bi@2TR&zY%L#hVclFx%m_IxV#s(;>tiO&`M_ETH+liII z>ZpA(aZt0s4J_R#jXc;I zO~{|pa1>ADgwzEyW*EVnQ8b$sZL>1xZ-)2V#;CDl)q!Kj8tFs+(RKJ-a(AG&Pk_#7U6GojHZuS{ldrQ}$4UiXd(!JTqmEqYJT7s=e{c{t09Jk->2vF+dY?7y0782_-QH}UH@LmOG#r%(HgKDQoIX130LY|Z?>P^f8qTVT6{{IA36 zgPs(1J1giEq+8RMyn|4AZSk?lD0DB?&5@C8^Kii8iBBzg>&+QoUy$;vfEaTszTmFAJQx+88Qav=-8gM%#wnReR(mZzwF z&C;b>VM@j5*>9JpzZu`7K6~=)$z-wHM{Rn@t$C97*{iiFNjp4x73^^BRq)_Y@s4P2 zJB%W0j(@rBebd@Mu*0)g0f&oRd${c|hhu%l3lwu8KBwkbkOcTs#kQ5Rx+W!cHKjc9 zM2d-g3EMYs-qS`u+_r1iB)336KX31(u3g(EBt0^MzRh|}e@M+Vje^EG2t1nbLE#1- zgATccIC%tr#6}3S7lM_XgFP?s?hD>`_&Ef?9WaU*f61sRyk)CnNf8lA!6`FmrUa8O z&8Ro((@f2pB_%~g1w}>%MMWhgHEXtUBa#E3J#98q8;oV?VoGkygyiUisO0#>n5cGX z@y&(VKfzCxAu)dKT=jT&b5c9+8#$L#E?aVHy{~zn&ADv%`D7-G-0-;25DzUXQMycT z7UdV|+d61bORtiobVW5!cW)NICRI<&xt5Z0Ehxo+`}dr>6mMMm24yBmY>zlbnN-ID zFu>k?L!t25SA@3%V8Q3u>MpBs)w*rRjvf1Ub*k=Es0`>gsz6a1UC7qP=M+PITUuVn z;4)xb)y_RlgWvDfr)2T`%G=&?bk|W97;R!u77=1rZnC*KzBe}AMMP+e!b$>tJyo~q zAuenDJ!FDta-Wx9yxA+pJzls52gLiBW10meMWS%7rd&=rTYLGc_htOMmMlnS68YNS z>maUgW@b{Zt9Mjl)P$(@QJQ>6_Sz9pF!UV}iQ1RwU6H7LpN#eoNM0J_bJ)%S*y)mX zU@s9ZafCX3#*5D>$6mKydDHsq>(-x87C(JAWX}V-Ne&+L+>1q)&Lp)%_QLm$hcx5* zhK#{Hca`S0^=Rf2A_9b_-U@fQ@;)?iFBx#eq%xVBK2g(qt5b=F-77dOb0EuPJdPK-~8Nl8c( zXvG=v=`m4R_h`g9cQs-Xh??_d%Vo6VD0@3jzq1{;#kW@#-QJRuGtrd)q%H4Bye}*{ zEQQ2x5VN7mZZ~3QtNxQ}RxemTvA6BNz16w8)5CIL-^UA-1g_ja*1CG&kIkEF``q2l zfcrb)p`5-MD{eG%A{0x0Lwg_?UE*pda;hOU~t7m&o|=m{u4b&S%<7 z%PXQ)a=N0Mrnhb8wkA65cERL&CrQ`oZmp+>m+1J4@glDh?gN%<)a#S}YvD8$-W_d3 zJ!k#&kL42g%Z)#@nR}MWiP}3`k-h!&wSB8!KzX!9=OC3cRNgflLD#^pemI?+!+e)Y zQ$eeAYOdS_)KRhhZ&pG^163Y7PvgOxTX?2k(F&5dg3_LN)!J+#@un% zhvwxE8o9W7;j7BVap?I)wo7JT{d;^B6t-&T)EyLvtqjs{$TAj_p4tK$GCnogDpAsW zj#(<`w!O^Wk^aCTVzU+ion!1+?dj6VQxn=&FL|MJ=N~?Jy!Mf?+QMgMmXCa~YW|GB zzY`kjc5~O@)g5wk{vgAG(cNF`8mC_S@$tz626S%SCN`mM_q+)!w#UccoI2&92l56d zC&X8dTC!P{L$EmCq6cR!t9|57=EBLwXhYq1Y+NjbQajBqnK%C6a{Zz z1^DCZaH;9{lhy+E{ah7wnL}|g{@zG&F>Fv=epf9P&7%E<{vw~D2&zS>HmnLw`K(j> z(ivscA$gj0G#H*kuDkOJzYupMM-_m+I7hc>xZ*;YVyPHbL8hQSZ%$_^x?NQ zm6ge4TX{n(W%`IerzlMCc7ULkT z!=uvXeIU-3L5XdbalcC6ZB?N?k{c6f#^=8a4;@lVrH}M|Xa6_XjW>O+-;F$+5nOK%eq*xEBZt#{J64rwyRKe|nRS^IF`Vb4Uh z$fkaxv3#o_p9@y4!O+Y_bZUyPk2kHN>?(dse3wv!YV(6_mrSY9(_5frq@a(Ja<2GziZa*>3IrtSn1`>&$Yu z{vG!0xla>yZyN6z+l?K@yRBNuRnx5R_Q{v)C7O1Id7#;Tu33|)Rok1H#? zb?RRiBTScXefs@l{?Yjd^;DE2>fD@)^y%BOEgNd5@wy%cFAU#QK`=+BQoj+0m9q6p z!ZGWQ%DJV6$@(~PE<5yA1}&r-E3SV>KKSz6*ggp6| zxs5C#w_6uwkw4E8?I@3gtHy%Hbr1c7%7l2nZSR0>32fW-URZRAXIw_Zn>rY4>(O$n z+@?H!=#W($G?J}G>Ot+h#fvRJ8eL|}6C;UlODFXpm3^5uss0zur+y(bZm8eY-vry} zrPSuuqs_VF%Z@?Fy^ZK7I*HEcx7=;*4KS!B)@$M1^welS?4)^`{9EYy{id|GdQ3_S zHNabsR%aaAzyHv|x8FW!%rgq)b~#O!$!*3!Y4ww{W@bO!Au-rX)4YNca|_kj?7|L- zP3f{}Vu!*U85$lPWO-5f$8gz6_QJkIC*y5nFIJXsm&rBCS=c6v(9K^kiuA6se$HVO zWY~a#MFoW&^E!0)ZXqrQv`FqZ^ZjYYoWlz0WuEPlo)7tAX`IDx zyziVIqr#~tIj2(0r1rr#BFc|fs*ah}%wsGjRGrKV>t=_3erWZEC%0YvawmR3;#MJ> zt(+ZNyL;J+(H~s==xyV;ab}5e(VUglanHqL{YC~o+Of;li`j)a$$Kc{FP_nq}j$L@(4$=wQ;bkFIxetCYs zxD2lr!A-rr)xIlQLMF^f`qyYHUSv6;@r%tqJVH1c^`tuE@%j4kc}CGOBN0Q+Cs)yl z7hJ7RaCSm&vw5idQ%EP6tP*ycmyb88FTu_Wu5>gx3@t%zwREW+RK=m!KRLbqpyF}} zpP1Zeylnhkx-Blro!PWid<%blIC@Heapmi8WPtKB{KD93T)>y$2PuYCF}^D9&^$14 z@aT0TDSz7y$6V;i79bew@y~8}qaTu|W=PY3S=Lk6tfv+#2Nuhv@`at2Cl#3=ZM4!q zExWaeGP6Xg7s}AUhiUVXBR8jiC=lzup+%^5_R&KQRA zI{q2P;KfSqdKro)*j#p(kvrw-7jIU`%6^f?IyFj`^lNFX8LM@uKf>9L!zTVW>SoHi zM4Q;5e)t$|I+v*%WTLT$EVkJ3;I8Y)w!v`(rb=axablnK+CDkoNSLpDzX`0icwKSX zXDpIGEwl!0wzg9rdfu{G>0o4)l_}ZE7K}i{B@_$mkJfbbX`1#fk=zQ&t)F1Iv3tyO zT0>DnVj4MIdAO5>CyXw$m6MxgKiOxw+&0^Iz8OO z)YFtUnzP$(qt)(W@p_Z}UMqiqw zpMqe=mh5w$&~O5^(JKv8-nJ(F`n|F7t(_g_&KUCOcM%b1tzUgQ{{5oy^0IZk;y++wj(_S1 zYwtnpNA(IW9Q0%ncuoY*dC=Sa*n$q*xqT)j4U%n8t!PtEGMC=01+$t(!+^x z?$}CsD`92vC8-CVIsM@7w+^>+4eR*8qM=<%`*&{L z(v#*8l&@BS@(tnsh+=h2_GFzSU4RUAqzlk&PZq);O#NC#tDoODF5{Q^Y0`JXx2472 zPfc7lYx*O*$NH!PA%nCEQ2C@Ji<^oTkeOg=3z4 zVAvC53gsg!40FPZ#oroMseW7hVgd^DO0jjEzgJe4r~i0ToFG2Bfx9)BB8gu&?r^HG1YVlb-Y69A^{X8&{2UP`H|) zAVMrRJ4YW>-idlTQW^U3tDE2To$7LW@AS#Lw_J#eM#V)l-ujd$ka!p48mYn(*lv=NS)40hBk z#DU(1^3yk<{6e7t;oRBXdp>OaYuNAM(X55e#n@KOTd__NxtnIawRfepYHrs-e)z^${QbU_{kn~qp`T%g{ehrCy|lRcPfNI- zP%irG;4PSI>h8TQOsrH>w67J8vLFQ;8)9>*6y)~V^1JtpYx3|U>$+LSxksyw#l^+) zlV~|2m#W7SEa#S${boIarSpuT#sxjXawOcqUX{{N7qlaaH6^zNl!A&Jln#zUzEWIV zRz~UEdQ6Y7*Plyw^p7OG8zx`$L;s**pSBP0Y)Uj;Hnc0cK*9kWRd1ot*SFK!s?koL zj$IQU?aQ9qChgt5(mHSUeFH~~o^4$}`~CqV;XX}b-oO6I@(uE%W+6UGabQGRTWf4{ z@+xMpX05WUUlgllV;}zT47Eb}+p*D$tF4%IZ~M^KUwCNnqahKQm1TyT64&+doEUE{ zBBx?1t~_H?yTzx41zYy2>6Q=BXQ(bVK*l@!jGg;G2ugh>x>272um7db5Ho-1GU)9e zsOcep=rPXuLjyl9JmX>?C_1H`H;%7)2Ws}&j8JbdTVO@u{X{Y|^BmFn|XLpoJ&LvcFB^A*-dH~rZ# zURG=!d&ekVk2S8`_h;j`{1DuJ?Rk%}TOn;w%Ll)-eg&@%eZ|q!oW&Z*eJ8)f)GvQ> z^$}~{iVcdE_S(#_2duk_wN&HXK?6_jHlWp`)x9%eoT~*!E;MrdDPkyeqXeWMD+bi^v}_*W<)SD)O?_jc;xczGj*kdv z>Eoky4U@4`XZ6a<%?pW+eX)G|t6|~BjVGS$+Ns_B0nzDe7VLVhh5Dk|l>B7>*wlz< z|6q5QW`S+PV%w(1xp{>2%^BJzqiwXir>jqsCVGb_V(oG#WAAng&cg?h6_j4Bg`*UI zFf#|Wm1!|F;J45|ShY$%LVF_dS-JNs%U#zV{&J1g%~ckge0(EA)z{1LdWbz`*3t!C z1`k_5cmCc(E&8`_s(xyTi_MO0>TO1*D(lP(urE*JJJ@Kfp5#x zyRpJBb>KNz-s&`T+@o{lxDxBHZCYUdjYvzpx_V z$BliEu*_PhtjE%DfPI{za^!WP*#qhML%YVxOg6JG1!bhWbJf{Q21T0vQgPA|t3$2d zKaVev3uhUJZhUj;pT@z-%CK3r*JehC-pcc=zaWFV_!_sg7;CnYPZ{B`#3;`Ah_bJ2 zfHgD*=Zro`QzhCh{ijlai-(D^WXl?%1!jw~;(ad2F`yv@Dd1=31)dGik>5>!ptb z27D!Z_w4p)w1$B^@ohGtY~@2kKZ-e=oAVXD;H*WwI_=&k-MEa4UFsLcss&&s#t zF35Qc488~6+|Vkq#-_7+bPCRHM+`<~oRCvxwhXp@H@{5Vw{Q8kx8|4WQ|lGY;5H~= zqR`Iad1?#sXoHb-oXKwVr!$K%NoPd)+Lv3j<7qeU)1emZ?nuvR(|?(c<#C4{H;qE& z-TC!9F34sF7R{gXoZ7*%K^^g*IjOm6Sy=^xwIbOmI{L~-%YJ^z_+^LD^TvzsO5eTP zcQ2~nbDuI{M3+J1droN6rs?z(yQr@(LV0_Fr#3iOhI)kN=-|j<32PN|+h!Ig)17** z$s7s8y?qoV_8Reu$_O-@c2wS+g5^i}=JoF$Hg+3zQ|jlJxvzO<<>u`*ozj*rTTnjb z8P781$AZl4^bVO*dW;;EoYW>ct#71H6Gdt6qHm3iJhE%vme8=1Z=U(Ob!*xEx#h2} z-mqiZ)AMG}n>(YvJ}{>B`0jH%=QNwJ@eSorP)hQktU=+Ce#sqDdJgOz2)PQN7u^TB zJo)^bT}Q=2-#&QaN1SMwIHlCg^8Q!W#Yzc`mBJ>zvTiXtEA5_sx=eacQg2v7<{H=K zVwij5j0w&<+=6-NH`rO|JYFJ=jp1C0A^^wKu=2WHSXi!`F*-KXqrDon3d=X0HVl*g zGS@h4T%7)E#Wd5xXO=#Pj{=N5)z1N|Wa_O<0`W_)kMF;-&cxtm*zh2>CM$AQBMndLb=r(a86Woy!%dFjP zN$_=OWqLbkzOc&#`0K5d^bB8G!IQO5-t73&$nRkC_`>)VCu`o5BjnIwr>B$!FL-ii z&D7IFhn^lH-#tC$k>=snJpn0Fb`A|$GB;c;O-nOw{PZ83y)TiYBDxo;!+O zVhBosn{rD&am8nx!nx0>j$Kdu2ExzjMf0Y$6N&_FT5qsb`8D`pKkzqGjJArpZ|C1& z2-ssB-~Z;?H82`_p}mK${XT#AL%n+K?-ldV#7V;+npiU8zQO(aJsM&CBp~9E{{8Y2 z!X6wsOnIwi+b4(l#P(F1g`Rx*^!f9rUp^Tc^=kRSrS5e5q-a@if|y z<%DL~GV~vy;|Gaxxo*BD57E>sKy_{EefB(^|H3(ilPO7}*N!Fybh73_9Ia_8au@Q*91z^&lHUOPOw zsB!KN^?>ttj(W(A#ZfjHqJ*d+T8Q4OEFdf}EGVRz zKb46aQgf%&>=j3+`8YL4=^%!GLzUm1mE$xOy-^3N30gwXWXA_NVyyp4@{je2Nz)3I zQG=rH&qxl6_lZr!SM5i1?yle8yoqOKTUj*4H!P%yXGY?fiG1!-T7EW)7k;B2Cc`vpVu_k7ojc>q?~aXdZvS{1#fwy& zOr`oo#+W0mTXy^~`GXH86K5~IbO&FL=DMmV2(yack2v|tsr?JSg29zS4F`NFVOp3D z&XhzgQTOCO&YFoLZS+hN(I>Zw`ytINJkcTKgTj;h1owoqSM3GsXnSbR=$W2e z#GdFxjw0qB>}B?HY2w>3aXD6w8Y|1k8Geqlm&bG= zx9XS33h0NU-8kMv<1Ah=b1Xa}v2A!nrx6k1dP&;|{IyN&6dsPOY}v4-rXoLIto;NG z0g*AL$d>78;VHa-;p30c|*mCE%cNkBh$1Qx=j?$ zAo{yTnIogZ-J@EXy_#quD%?v6kM_QC6$e9cI+PBEzSYz#5S`>|a;{gnS$epr6WsJi zBIE?DJre7#rTj)`3o#_`4GJu3{-p2PXm88a8<;5E!@Z%ynY~+vx9r_(;83%-_79>5 zB6hY6kn*8iPu(n&TJ>#J+-gp%npXNl;vt8f9gBHdoZ{pK49n0~(^H|yr;??P3;;zZ zPRQBn?Bj~ZiQGPOCwJ<2|44IOn^_&(w6f%#po9JOqqM|v<8GDxr{AMK-r-*sCM3uX znWwd%>er&?r0rMRuUH!8pbd){$JuGJUwe({*5%=cyL21zLSA8EUYCapshm(}x#E-b zEvX~Da{evCXmAsvcJSxCj3W2<&#hTaCb;697W72>6O8634E)xj$=APsZYgdufm5PK z9e?gUwNqjgT_{^Y3or^~$RPD~al*7qtkZ+U>*iIW#2hA;DyiZG2Imc+#Tu4+xPK1u zdn&ucFt|sQomgE2iFu$~paq~cpbntdLGwY|9PV7i{S?%b(r}X2Q!D`E^Yml38~Qh* z#1tkbnZ}9|{WH))To>W`mMBqULFu*voT)F-`-u{lWHAcew8*qbOwu1gJh&zk?#)1c zgN488peRI|S6woNo4!+c=-q8s^hIJgVdyLVk|osh{AwnV6(zh-}=;(5h^=Oy@+n zRw07PuVsh<_!XQ`c1jm=9c9U7k1|^2D5ueSknK9f0bj#GCtP5oQBR3k+IM!Isq85X z_dW%^OX*;zWEiMO6LLOI{$wMqb*P_%xQ;~lQuSRi0?!{Y9}!C(R77RZ90o8fgwid86F#Mdm7m zqb{f(8k4ff_D`;hMfgGFBH_d3@2CgzHzuy%Ga{erqA^ija9xuNxw-D|a!Gc||4&_N zqo{L|pW6t^hxnv&`YV^(Ge7rdF17C%+q=}}sePf0(e`XsxMSdc0{0=v?FqMp%E9TH z#vtD=xJDnLc1rz(+A0zC7sS28Rnu@i67{$b?l3V}St$~z9x2beUDGx6FX~UYM|DeO ze7EZwET)>TARK*=`oY~U^-Jm-f9j&oa=*FDb>y4zKXs|UQ=g+Y#`Wyz_uTi;{~NoG z{++FVW6PznhuVbG<#EW_22jVQvA5%Jn?pTw8CdY!nuWG>T>Yc93d3+kqo zqaO0O{C!0MjT>fROLdkd(s&Z-J?hdQ{iYP{=Mm%sKAdA2m)RCEP+4iqc9hQ$XE~uv zh9RAJ(*`jMdypmij~L^6qfI;H)GE;*9E9;;f&LWQM5Ty9zyC@ZE-t9oLED5c`Q3jP zC2lW?64$|EluH%*^an`KO=P=aOmUqdip(1@-Z}aR0y0I^uqDS3je1 zhWfhc_?`X2QEna$c{tjgQy%n%?8ZDh`;}|9eLSM_b@JPg2gV|lb-pva!M&@`s8j9by@^R4v3w)d(1P@C6Y6Zz_%MzYhqW+$HWc-~7u*p%Dj zt?7`MrbVO7e8p%}qIgXE5p!Y{#+Iq}XSHE)cVb?t5YMB$X^br(LYehcBkgmh>MnYy z8$=J~2lTBC_IZ>00L`DRkk&%DaiW07lmSSutz!&VFqaaIL0TA3m}*3U3epaXZcNR@ zL?zyqO?^-O4*5CyNW=X58`8RfG@SD=jraHC`C}-L86fH#GekN1!%q!_G`Sw;iXJ4d zo(&p=_x=6DKKB!^B)>Dh`6l{H7nHvRZFm~S+vBL4PLQ(|*Se96i`TI-*m5Ne@=ziSmfOtY2A%cE(mh=E} zq1SxQ0YtpaU#`dktJV6wmWsCWSERR7WT-`sbk9JixQo=U#Tg+i zJA|;pZf`ka_gg-N3+>5r4B^lqE$_nZ1ovAI&NEUx>pr+&fI5N@kK-Od_&g9^v0-}( zVKBa1p8-8+52LRq8_3UE3G#DLfZescg7_EUr~D{AY?N4G=CekE@Cc8eGfOeo59$bI zx*O%!6YhMJ>j~bJTOc{=7Q=#hEce@5dz>A9T{XBVC&9ht_7ClF3) zu0lIICxT6RVy>wgdT68w;O9sm!+i?VUd1!}knU6BK9eE5$kiu{-nbX9Ss}Y~taHq{ zr2DJ8Y~8edVw~Ph973O3qpijKjkr!8Xzb(XNKYi5NT;N^6KPPn>03o1;tq1o~Ef8yRP+nc6j%qLlR=D29e_2VU)a@~=>kdHWX zkq^>yv5KaeMNHs0RF8PhMCpJJ4r^3*oF~;CrMXFzQr&T!MB(omjyV`)dQjwpkeUQF6V+jWh{AiBd(t)6AKgRw zP+4)^?MD8cMPFK<;2jY?@n)htb20Q25cGu{(+H8HJqSX4(|<6Qd5Dgb7n4=QasHGR z<`^3DK|Wk3hmh~L$SVeKhax^Gf8?d-BF(1oel# zL<;hb(hH%pWFzl<@wk=*_Y+)Sx&0jYoS^j*!>GJT*M(bzJX6dqk?#TIhq}@Rn_&i;e8#bth%i+S9i z>Y3Uu)gQGns%L$Hc+yk}8VXu2%JmxYq#4&{{Qk`43CxkhL<{{eu1AVt=62#){VnmN zOO}{s`bxAg;hy>5;z@lyC=zk%#58j}+|$Ts4Z@I?zRrH%^bW#tPoEBY-yUWjjIdYH zb{|FF6z?UtV-eO}Jd5|U6lwiHRidA%KXi~7(ND`mxva+;zZ&70p!OoqCD0KMaZS1K z_Xee4&b<$Awe7Ti4(%cZV^2J;vyj#tq}2gw?ZI__+@o=FAZRGUT7wqhnGR@!xTkFd z4M6+>aFM>=1bOU({{V=d*)EEd)1nA-I^XBDt1omV^a)xMQQzbK_nr8`yj-j`zaV$2 z8*MjrciT_uF6c6DqMN$iPMS${*B%qyq*ZiNblWnl+q*+V2IBGB{ciX6S|0WQ(af>74|TY%tS>;fzS}kb$=co-&f^c-snaE! z8kd*D{ll8)&UJoh!8WD2!$5g)!|OWcoxjF}*FCxXc%>E^CFG zix2$WFcy&>`4@zBQWNua(ZqG9aCOCdrd{*kpMqzP3s0A$uxmm8w3F@MYNYKS@aKYp zK?+FM;*du$`1?kcz>&pSu4;x$nupgLh|}<8~+HTv}U!;PRSv&%N3e z-r4QKYpprLh1Od%o+AE2(5v(u%C$Kt9Bs)0*9R2B1ltb!+8F3aF0@8N+^0cR^o+CY z8(doR5IO3E*H-9f<`Kx7)^!8Wj%W`7>pybuRYvAFVK1X~;6=Dt2huvtzGh_kc=HC& zva4*wo(%jFdu7mXd4EQ}h=7xzd;IZU4E6*Nm)85(8(%7zKKeZ7FyTah8I355y7w zfA&1-Or#%?-UAy5`StF!Ph-33Qi}O?GxX#8=~`@qo;=v)Ut*-o!(ya)5!=Hb!MnhR zp^xXAXzhJd3^r{Rg($m!VtmhMyDaM2xt7SH<;rD_| z`5pwl2BLc))fM*~eAE4gYs!P3B^PA-4KD7p>v-0AkJBYS?j=9T{Gy#?WBDmvq({#< zWxL~f;+5#GbUFTfJmVyK9)6Dd3fv`*^ypdQ-;qXx>&W*`-nFyBRf`m(wIO0Ak^X{6 zWx6WP>5T||C7np$gX0d3_Iu@EW4>OD{Yu0o(t}|Ka?)6F!L$`b`-UK;0CCQWH`Sep z=PTaSzr_1;K}hd&BIp8%rjJCTYbo4DdHhfPu-l#^`k%(9JR9geJlB{S-}~SCzd>3c zbG4oD1MYJ~6y_wC4!8XjM%T(a2x~5uU@v+y1d#n`U?eBs} zt#P`Wa36$kNHS3xu*bayng`n2m|$mpLqBIHguh{qmjgkE;lBx216>7m#`WLe4uyLe zZYQ{VoY!g{&f_!_+i*=b!2`J7t(=Fw{cEuuV^b-WDaNh6piQ`b)OM{6 zgPiW4`RRTsWD@#$8T#j>BF_KG_y0<^{~PZ8pI*QJO}_sd>iExPr18W-jdj;XdaYB3 zmIcr+L9E+0y3gwgtSOxFoY!}_6ra`|PM7kUd^;`D-I-`TQ|TZI3ur`iukrOg{H)K% zBOX1Ab%Y#j+NBHusmP1gM5948PQou+gSvs5+o?fkzehRn+QG3dX^_*gzM*vv-zV8X z@{FCF<=Qy@9rr0citk*b(DikD7`t?RFLLC=ah&m;VNTxZI^X<7LtT}cFFNIuShvVr z-2a7$<`Rz(>>XfTz-t3uNANm_)(5oSA(zqxHSp>Tce;*yPMPiT|1ifko>OTKrFqw3 z+i$SlJ8jEXu@0YzwLk5XlbwW!Y=oBR!LUQX9%1@a3|3)VR!`W*nrn zj4yOA#`BBC7SLSK2GCg01f0{LGb$$>E}aMY4Rpjo2U1%%k;VM78$m^z)agXV3zH9U^a*3;B1Jus3DZCC`4w# zABFhO12b)_fLXTfz#PUNw)5~0VSIo?hS@eDWH|e47!NTXA(T;+j*O=GNT2*M>~F_+ zGw4~_p8c7OoR>VuF~8uL|DbR^i7}bt>nZF{Wq%s`)7d|f{gVhyGmKAwvkBcUQ95py z8NUNYL*iDzR*Y>JQy6pj?tJzyV_eSo0^||abodqR>CM-A7B?-DX=?AJ5~%}Ea&hF#!AL2#%jh59DgI@CdQW; zH#5G%xP@^mr}i4-HpcCYyBK#f?qS@^xQ}r^<5AA*T~4Q#{qM2Aj{V2j|0&1(jFDPP ztoV}g0-^L`^kMX43}9r=C37X2ANdo)+i*#?;c{!kCD{h8{XD{{e%o-3Bp}YyA^~?F z28N=IC7>j?i?%4?alk0{x3ZmpKZUV9%DFB24q*<5bY~pEIMntD!iU>t0n7Q>3dTyt zD#mKY`5b>4<8sCq7*{Z^WL(9#n)6!2xR!ApV-4Tk%J>@NHpcCYyBK#f?qS@^xQ}r^ zN}#QHo4Gx}_zvSi#zV~i5ys;j|1{$TLg~*Kz?ejw$Ygp7<#|FRVuX1B*dFDdh;gO~ zFbnmYh_adm9FBYw#cIC0hH)+9I>s7~bBN;{A;j2%)MOIfMfykqBR~LfHZU1=Hw);) zNWCDLdqE1}K48Q0&fH^i;_C*)eSvuEUI{FTUY~YZMjGGu=X57s93gZ^W{hTt@X}X{~ zO-G#)W>Gq(8K{MH(`;Zn@U|C7ytM;wF2w(>4?h~Lle)^Vyx+6c;T?W@( z2I}s4_%o1W2I}r%U>;+4#sQ3j(XTV`l@fZYoa0w8Rx(yGRx@s}y@xm(`Ke9pf0=PJ z<136?`0lHWTWxC*|26h+WB+!>UA8w7zMI4MuzxS(KF0kVeuD8s#tVd~LBeq27Bxsn z^ICh9QWu~%N~1kWiTqRo?YRWnqXdq?pMV-~59!EX!C1*y#aIo@L`kj!dLxBQlqC5> zZRjURhcF7GaVAE*^S~|~r#oXlhYVo5YS*N-qng*9X{wF$z5^3*|;3-7$h? z;j5bGfdfz)Sz-`+Xcpd`v>iAcy(|l*NAW8dD;cX8s~IWnei1ynw_)6 zR?h1+#%+w-8F%sB-Hdw}_cHEd+|T$n^K*dl9ma!vsYxJ6%kT@&*rw24M{1ag0YgZim{q;KF6fik}asUWD9C7*@9Y2wxHIM zEvU6*i{p%^3Av_nP$M@*4)P5H`mjILro!KXF$%pYhdIgNks$~5(gz__FFB|e@(*P! z=a?0Ym5f!4)r`bpj@ZC{8X0oLCdQW;H#5G%xW$%(yIVQU*BG}kZfD%ZxSMeg<6g#n zjQbhiW<0?74&y;al08R|>^W$w;2bp)3rvRpK8z3Nfj+<o zj3hl!Q!7Lt+&wP_aQs1tA0`IDA0{4vzX{L>IE?+n*#98MACA(#E{3C=uZwbCQB&{jRc}-ES)0(23*A(SCttrZNT2qwkw5BN6 zX-!eC)0(23*A(TvrYPq%MLDl2%H3#9QNhwxuyhqHT?I>5!O~T*bQLUJ1xr`K(p9i@ z6)ar^OIN|tRj_mwEL{alSHaR%uyhqHT?I>5!O~T*bQLUJ1xr`K(p9i@6)ar^OIN|t zRj_mwEL{alSHaR%uyhqHT?I>5!O~T-bd@Y!B}-Sy(p9o_l`LH)OIOL#RkC!IEL|l_ zSIN>@fxj2NYf3Sf zVBR?oB%OZ=%7n0-v4XLZv5K*pk=BDtAlG@Z6sgSu(wbr^YgS8Hvs#Amr^PbPWf|_0 zpVD8(Yl`K3cRAl(&Ucsd-Q|4u1-|2yDRwaO1`_2 z@2=##EBWq9zPpO=uHw6^_%8G~aJ7o>uEyOiVl|K0t8th7q${pwiB_|&xSDmv)hM4M z2q#@}wIE$_wIE$_wIE$_4X3k)(^ErvzF6Y%jvA;bk=e@YdM{@oX%QKXC0@rj?-Dk>8#^))^R%PIGuHz z&N@zK9jCL7(^<#qtmAZQSZAm~I$@%Qb%q+Gqry)*Lk-e-7)aVn4eJawtTWWG&QQZT zLk;T;HOPfxlFm?rTnI^Ls6j4-q%+j8&QQavi5k`!Y6R&FHG*`88bLZkjUb(&hINJ- ztRwosPdY=5Af2H`kj_wpbp#>l3^jsuh8jUSLk+%9N=Q0GjUb(&Mv%@>BS>ecVSTBF zb%q+&8ERN(sF9>ItVcO)2a?5UJ<4Ib*ojg-FLp8RX57QLmvJBCe#S$r2^?Zg;4tdt zyf}>TRpJPTAK~z$JW?G+%UmUn@L`y?M|q?=$|KcL9;uG|XIc``>5(N%o&)|7rH0 zX8%X*|A>3aM~)C0Z*htiDSXV~A9MJ}JPx1dkc)ixqQg&lUF2EmB1-AJxXANPJ<9n3 zQO|a>dOX_%ezKd@Bjzk1+0E+NZdNbIZdNbIZdNbIZdQ+UC=S_J>QUN2lrU10WH+lv z`nZd72mq4Z%*J`yI4>LLW#hbToR^LBvTFef3*NeFWi!kmOKCn3y9 z2y@bmIcdh6w50Ya={>H!fM}mUSl(nyvb+Idd6N+wCxYYP;{}Kl!EquuP6WrnE{5?5 ztW>bh0b!j3Qu(*y@^6Lt^m+JUodb5UJq*lagmn&nSm%JS&H-Va1Hw87gmn%G>l_f) zIUuZaK&-)mSc3zx1_xq31!6u0Vm<}JItPSx4!D&O);ajMF>Ytv#R%&h!uK%lW!%RI z>m0&iodd!;2ZVJFpY4Ek4hZWU5Y{;$taCC6rPKw8H8l_#7m!LIiAx}fG!yt?odZJS z0z%^gLgNBL;{rnCl4R#R1@ysN`C-WvPXhDAAYeD~FtEEA4D2D!1AB5vKKpx%FA&mC z%mVgj9KcTv6we~0fMX8g@WEm=LWYQ+fkVafzy}27I81B?J}6!X4(E`E#9MeDF@2gR z!|f7sA=}qYAhaeREG}1M2!b5So%QMnoAmfeHBa z-xyKO{tCuQ#wx~Y#;0vzrb+1gdx6-u1!CV8h<#fi_HBXKw>3>d&qWA&ZkTC0r4K~< zK%@^u`aq-)MEXFa52W;;;`mQ-{HI{i%tS~QV>V+BBc<~cr}Gr2^AxA^6sPl)c-r^` zcWWpnq|d~!REg&~;Q4tV_P>CX+8ppq{s(O5fx{SUD1`Z+1OE4--C%?P!YT;F=;3yW zEKxvMqJXeOxo1-xAkB}?zb^1Jrt8=OPs1-sa8yCX`vNtPJ`J=9-*-Y({9;&`u$PWs z>k9L;pndoiOLI^W=tsP{_IYfZ=L+GD9FYvGsLBl~vx9NHzg7JLtE_~z}c{RI;uT|#?5xNEY z^@xMlG>EV@LbQZGd?>zMiR(zjjhcyf?IE9-G<*{a>BfPdI6M<~Lx}hs5crBe4#IT; z?zhEtBH||23Xz0olfg$a?xi5VR6Li~USN|&h<4yLBUgy_#rQc5!ZP;>ku^<-Y^0gf zQi%H|3vqvI&~+g?To$6E1;y+kL|4Sm^9JGhZW;)AcQ14h^6c@n5IvE9FQl1&Q;6Qk zqtAFD`Xa1fkr4fdgU$;vz#oKr1CdTaa}anhK>R`bgcw{2LcT*j5@Kk3&@>R9d7wK8 zVZ#bQlR?WsyM%afD5w~OydPW-LK+Vu-b4L_7=g4#tN|h3h?AhpAd3(q{Xy}dE}-E; z6ymxN*M+z)r0dBb@Km@-h=-dB@kkUX2UGwW52^&M5#mwsRJ07V4O9y{54s`5V;&$p zGwONJ7SLhP=b-CCJnjN&32F}lkB^TQVss&B8VK=6BmQW_AC35<5q}JL8H@bJBEPY_ zKqo<$K^7s#9RQsLT@_-y25JsU1LcE?Kr=zhK-)mIp!1*`LOkICiUQ?;3P6baWEaqI z&}7iFpiQ6yptGQ>0zdHwH3y}E@iSSR% z0TqD8gDOF5K)XOEL6?P?ln*KfA-zf4K(!#GHwo#LB2Fpdlv;$C;tz@kbpZ_rO$I$H z#MIWH2`OZSVvyksBGVDgccKRf5(CQI6~K zkA$c|SOuQ1)Ih^Qc)qGoh-zF{uLNzus|)=>kP+gFry=jtSB035>u1`75NAOY=ztK< z#)FXNLJv?s5W=3z0U_>l79kcr3&OL{?-F8h7tnCfWFeN|`6b9_X>(Am5X-uQE(@_7 z&n-u$FSGqiMIq<_=qw0nt(*h8A;gPAK?qyb8ieOo;ofS*U5&6c;APD|A=bu& z)_}+lKG!t`<${KSib2S0-Fgu2ucP}v3QSZW#H&dHbq68MnrWctL0dqFL7#)J3$fk> z)DqMl)DJWoGzYX2gt+SwcRk{+zbV8^O+iTWrS72PLTnfgnhbgtv;H8x4Z{#_8N$?d-&eH~+IC-eTdg%~{UfxtyKUM(`%{Y$LI@#*5JCt;2qA=| zs4S+ER5TQe5W??u?(<%&kI(n>{r-|yq|>|Ezu@AH1Y&!6jk&UJS09)3kN0i*!* z!xQl73HbK}`r(OI(9YPCHVA?YPyosSWS^V^n!#$&hF|MpAQ|A^Q%Ikh#n{u(`}9i2 zozI1wyj>}BYD z8M9Q1`6?KwfXg*H(@N z(78+p(D_a`(9GDoxc}}Rd@K@vzqg#R@`lZ;Fu(uNS zSEYf)jC}|lA42vcq#wclYUoHd7IJH$W9??fKK200KHkk(OA%OzuhW9= zbi`=7$ERvW;d&q_f9KtFzl`|BaQ9_1ULdjoWA9KhJ;ko|laW1D6$ z_C*e3o0GwE#=b<|FBdVk1u|RU+tvgCxotfF{QoKiOa(2BeLWVmGPWIM+hJ?_TmZk@ zkZ&sh(A|c*-=u20qXC8pL=%Wd%zZeWdM2nnG^PV5EOwX z0Qo;q_J;>%gJ!UlXu;=6lK|}Rg^j(C-wWM;rhoyU2$X_pU@nmNR)Zb*zB3)b_rFpB zWdDNie?jK2gDU@lk)mVlLvb9^-{PX;}}MzDi%F^zF; zG^hnLz&x-RtOjk2!#vj);4`in0QXF!W)4`yxK#x9GLBCUb2|c1=1c{f8F$A4=ydlm z9>8^AIpYbb0A&gAv&$^T4;lbk81Fg*KzCQz?FzeH+Zaz|U^@PENFrzekUw|<5Cv7iCW z1jwH_5EL+ek`9sp?wya*c!Ej@zFiNY_Ny%F|aoVW#=XX*fYNjE_wMqrqIT5TMTa z$e+KM@e82m0_eG52jh6x;TOV>aqwdt>W`}gQvvReL%m}7Sq$CdGr$7IOA-L=mCOUs zRk9kiF^;gnOA|p5K(@31j02D@odF91HkU3ZH!Mv`DL(w8R}oYknt;)GLF4Izj6TMSHX{~ zb;4`lB}*<9$q5Aydj zGX5&s`YP_d3i&0_@fz~4A^+ME#$WfqEXLo^K?Xqi8}M~0Y%Im~(nVk!<8RJq{H-*A z_PmYsZPb{o(W`mUszv>L&>vH)0KI*-X`|mFXt3ey%D;R*S z6}Yz|2aE&IyHMht%San;{f!n zgg)$3`AW#Ggua!~w+i}J1p)M}g1%MIw`v-g1De5duo>)O{KG`h0}KSCK`od8=7Ggv zHE3h}BL)OyfqP|0m!x1f?1#$ ztOo6jf0hW+Kmn))vjFUU278~u-e>KMuZO+$u(y677zdgF=FyZaw5SKyCx% zHb8CzzaU1U$nMlZ5*Q00w-a(ZA-5B9J0Z7o8`#VE z_sIZ#`+Woy0myzo1Iz=9!D`UP_zw(V?)?DS9|nTapcc#o(E9^qe}L={kZp%-JM^}v z0m!yPwjHwV(Az!_K(-yS?K=Q`*ag{Lklh8@T?L>VOapU3GguDb?=H0K$3zeW86XGD z`hUO@=s=(R2>m~G1L%vN&<{UN2e7?60l=@_O#nXQJ)8gB%J?sk{beTOzd|1G(EL}l z?N`X}fsc4+{xA8RG5$vq7zdicO8niZJb?UO*w~9U?OphP&!5oy=RnZH_+RkpFX;Vi z595E&WrC%E(VzjydfW4&o0QZx&F>#mkkGjb`GQAV9m0fzD&g0qPuwwjH;b zi6DH!d$Tz6jx_Aqh6Krj=uGLe!3P%j1dQreg}5&09L^TcKV z*^^N3qyX}cbx%(M(04lSpAMa;PY2L@`VuC3LRZhZO!Q)40B8b>Ksys@IRJ8LZA_%2 zemd@@FJ&SGdm-El&1d-1e=r)Lj)!uu2%y~C%|vh1>0Jq$0rGt^z*Ml2iN3hkcQ!zI z2I^<5W};sTfPBA2O!Q9z3&1ia&hP;0oq_8CL4fN4txTK=AI_W(;L};%0Q8)l2qIu1 z69apIA^`iDD9fD3L>7F=S`79wk&S#d>_$*0G7i9AWDgVm08k2+fsJ4{6H)jz2<3yu zf@xqbK;1!*&lw1CKW8@B%tUS~SPpPKm;uxqjC(`i&k)!cvV)1dG%yG3Wg*>i$m8raB0A#@Zr0N5Q~2~Y<=YZXN^z-}f+pw0+fk7x$lm>8K1 z1_G3iLOVyzVq$a=fUYs)0Q8(YkBRew0Qb&Aow3k2wiYY_o0&M@25A8G&Tj$>Kr0g$ zB!E0H6Rc+9LdaZ*>kIcXF>U~WpE!pQ;}(Gyu$zhEBv8)8c=$6OevXI!k_-TQ^ym}f~08n1Nhlv`L*A##zfbyCa0Qp*! z*P^@@dTODkb|rxP#VEfx57dIWU^!@KqAnRk0Lts;0F>83PkkCF1t_bBjt2BWLk56c z1MD?yW}-0(lBCwH($ta(U^2z03HdqRFGtm?T@T+MWSO{8~ zn34bn0N9#>`ct6yl4LL%K<6b(z+NUUg^!oQ&ZYA}8xvDg!3===Q=$8^6o5LHH38VX ztOc|)aXIu~-UCDc>R&z;%mJ`70QIlI zy=yYSEYQxxb*TXU%z*s$dzrWac5aA(aRB;nfc_g=z-}gP>;Z7^#!4^)Gy~|oaSszS zlfXbQ7U15@`Cv8J!Ng6_d6NgA^QNf)I&WGAVE^Vs0G&6Z&MlC;1-fs6y;;zE>og{A zgI~8b0qDBD2SC~F8=07mI$ynhBE1jkeGveg z_ra(8mV%8;+;4*vkjKOW@O$14CLT^;0zWeqkHU`ysQW|{6AN`Fo`ErX3^tC@Ib9zgmo133V?-d)PXd&!^(!1jBsOe_xq*o?Cn=}G{- z%i-VqkbNJ1zdssOf*Am^?=J`2m{?(hRDk;{aDN5vufY8kxW5ATaSkLt!2J(!|APiF z2P^??Osq@*8K4xPeC0xbdMi;6=RIOo3djM_y9)PLq3x?$0sQ)~2gn0WU_Laa@u+vfwV83NCfWCDoUx)H_C|?Kr>y`t^e*!(9 z!2Tz50Q7&-3ZVZ}lz$5SpEd#L{}kn)qP!L5twmr4fP8Bk6Q6Yhqrp_L0JJcH^AWM$ z1La^YK>ZCm$N*>$&OgM4jZADz2GECd4zY0|SPtOt=cxaA3djMF{~Y%}hrQ2R!Codd z^#Jg1QxkxHn^3-KHxpkZg8`r%%mj-8^le7@W|VJ6`R3VRIe`3^(DUV3Fb6>Ym#qN$ zx1f9r^lxbb(7y%cTTs3gCX;u$V2_R$JU>sP?@F$T$Er5(W5X@y-AO$RB zS^@*3K{M03;JQlzK>0yP4_XP}W7kvwU0r8^rJ$W@iKw4g1f~PnON8!&lRyMCfcc<> zX@}^*18C17bHH){orgl_p<_W4m<^f%>?OhPBjgW#_Wr*ot%+%AElf*a#I#TZz`syC)57yWE7QCTun_EET5q(a4`li#gK=Op(=t4O zy8TkYET;9x{r;$bMg!9ZbOX&yJ2MDScGfh2Hk>_&X#*3$K&EA;0MySa0=SnATM^vz zb|8m^KK$3|atoGc5{C^j+rF6|%0`E`Pg6aGmy4Fx$OV>KC@1kpb zFFSvou1yx;Tj|=y-`YBqt^@2CQB2oeoZAn3jIIx2-f@r6bs|eR4yS-|Zw_X9Fn}n; zbqD#^fx6}_nFr}wFq;peYYpWi=~~D2Wpr)edOls7>~Q`8UE8cXj#ZV;0P8PKr0Xt+ zo`ly6RelgFKkf{=PGrf)t*7gQnH}UT8{gzs%cih8R>8_xIcs1+)`OL>Q;>#O8vYC8 zYCI%@EDJIXtRB>{7%OH~EET1>tQzt?ah1s`@m~<%x6q-hKAwxAP7HM>;a`07KXX|G zR~JFUNY)6664)(7EUt?ME2@LFjpHjTN`j>|RmBz6FmRx!!{hC!U=wgdRUaO!t3WObZq=}f zxTvYYzyHHp|3k5najW%cb4|QQLg>Sg{3!g$SY3TZO?5ETGlbm!+Wz4v`MJML5Y3PZ z<&XyPuNu;hhE1rcMt3!!6Ipy(G+-e5<13GPVF=XVO~SzRMBN&sbr_sjTwh&$7<)o* z3_4kPLql!yEVx}OIf!`?Cd{yE*`)Ra>x27kxn z-%8Y;jHxOo-+?Xr-%cqxIo*FV(Sw+(atas2(*8dG^YL-iqxzNdCKr zd;d09(1R)GiR=YA2jpW|hdCd_C``b={~WLV!-H&DLA(#EFp=x=U&nM-y36DDViao1 z;#TC`lp#avnSc^C^2(YTVKv+2{RVg;Lq~NyRMp0{$+;;*NDZ_$;GPU9lCrp@3_L3M zb+n)XGhNQD{hy0sNJ+UW%zvf5LxYr7zN_FAgJwB9SN@1o>TKp%`??Pxl~Cn)vW7m(d2l4RKd=FZ$b8|tT_SwP>24NIXT{P z<|vDD0hBGNiMP8Ra^ta-#?V``zm-gf9XXF>du5dD7$MnmITPiWs2PS|(ThjDqPQj5 zXX7Cw7wgV3=p3nzK9#oq840RUQ|gtoOtz!5w>qAc&K}!82JBx?woYyc)JVxVf8bnG zy&>Bp_5au7DcdRQs<3sr8|wr~Xr286D-ON%=3W z%RZOSaz{jyzRTxLKA$SaDNki|mGQM>%sc0C=axu5=c=C@p+)98TO{ks=vs#Mch2rI z$jR1}Q<<#M5kqC`lqXVN_3Xd)kG%7r+tfMQss)`hOtv%#fBxw~$LRcfPY$&Aul>^5 z;*N2sk3SP~+@&SilKn?oJ`Eka9Tg{o@xHG{|H=5$(ceKxsS?>{H8a(dpdz#EpN^*~ zhAY)m`;Wln_*^TE_jLDvvo3arUNzPoz1&eFh}hk+)4(4o-}hXqsE`M1avpZ9GjeXJ zwMji~)rbb_dFXiVCc#d{el6>;7h_HF5tl8J<5r9R)G8*Qe!1Gn-j$K2vu`_m?kM@^ zs-Q+hu3f?S6D<2r`Y1h?v**BPpmV;c*8RH}F2|%1wdI`NzlZ-_uXgTNWdC-KVP`MO zR{baM51el@##YArt~frDa{ZT2o$LoWujF1(J$v%SMS3S|?7t4n6+u2*6Y;N%V9pei?U((0=*(!4aZd!SEKNXR~WyS zi?Sg0bA`Aw60d*}ltxg}9TM`6yx%?kG>*b`5su@A;j8zgE~TRoa#Hsglt|t3K=;HJfza5l#?~GQ8EH~c|8baS!6FC`lVedKNJ*^ zr$s35w0fXdQnPG@@@yz_h0vcvK4(IAZd{-AU)qnx_2$QG$$GNqq^Fsn0RI-kYA!U4 zKrNY*r6Z6QKyEl{DL-WYNpJHZn-3j@@pKUGOApjYD39=`#8G!lTw)OXDvEm{Ey>nN zN$FJ)?q{M$WPNFMNW4^eCi_H=vh+pTQCj4Cl(enHCC5$nR9@W5aP+K?v66nN5?No)D>?JC(Sptyr{=xv z?+#hj3vzt&<0E?x##xPs(kI_j_iu&NH7Y(5o#UZKKzbm4}zzZ64YvXZR#cj3Y?RfuF>wM=PN3A{k z?>}X4bgYw|t4K$T9)y)ez759Wz1AVuSt@%~zWvBGtMe^R>g-sP|M{LQpE`AjCgt|u z{dVj=)GkuJ8_6|M`7d`wa-XjDf^yHN-fh+1Lhi)XTeaN%t2fh*w-)&}DA(fy-}ma_ zqg?x?7s^)0n%}8QzH7;oBDq_T*6R0pBdw|4{7-A_zrG>LH&gi@QU^VgOK_`{W+Gf4uJg`_KlI$ep^HQ|cr@mPtEhaho`WjK&Y+M~doC~lBPt`jOMacJB_YK&J1 z4zHQeFc~A%{gk*Tb+OvIn$pISSX@nM1ti_hhI9p7 zrRM*OY1u}oMW4YSbzR)hlUFY#p7!x#o{ec$M$gt_DzE7ng$F5CWdrNj!N7yH3QVW zV10Qp8Z|yfy#_aMYA=gA+gVeMc~KXvs=@Q}@0uNKm{J>?Pz*zO9;8zTbV{(Qc#70t zRa06qp+Ziy;>re0JzPL(acOD1fD65WlcUk3>+Hzdg z#b;=736#{!8nTDtbL?L&sTo(QI;^-d*s0)Ol#quVzI1AYi`A7=f)xi$b@W1Ath%^L zjhMWs527>W*mOK1G0eM|YQW^0y3+b!_kCfayRnuZbHR8E|I^6U*Hp?UJ6MaMlM|#kh|w#9x_Wwsai?TraT!7@ zp2g~#_;i(m|MQ8}F|=`02wM1oRIGA>bSlRWMu+7W1&0rd7LCd*^ng9U}dM&?HR zNU(e6aOAtE21n%<gGk;8QNN#>4HRz8nDD;O94-P8~<_;~$ z%k@!~o1dLGB9fawD42zM`NN8WdAUP#i=eb#)qZqb<3 zU^KTVU+RoPX=bn>v#=;PdqiGlVX$CCVZpHBK6FH&Ha|B%S_mutP#=weqU>P>V+wNz z|A?w>OP1(547fdR?!PRMpVBS6^HSW2m)HDp(pTu0%BojCjZo38iHlA zr?B23V$_xO3}RCze^~y%`>ANJ_<8(9>}h)eb-LAry`DUstwq^^=Y0S9XQ;gcUQ_vQGu#DDX@z+e<|NNM=&g~3dG z7Qz zCH~jUPR0+lPQhQTIt{NKr=t^k;WG#6`1y92dH5N3AAF-`2EOC3KfaA`0RHmBS?p|l z{zJZmX2*{3{yr5?=OG^E9`DWj;JY$2ct3oyW((WO&)@_2nfxq%HXq0{c^1#+5$^LS zAH;KbE^B7b^1*xv&*MXRJ|D&l_&L0g562g~>}A{7SG^;}dupFXt8PRelkl$SZjj`((0Kg1vA^Z6tEQT`ZTz#r#N@F)2~{uF--JAl)uT};&1b1{2l%-e~&Nc@ADP>1HO{4 z;ve#l_-ej}ujL=}7QT*u!awD${4>6uZ{QpG=X?|Yf^X(u@-2KT-^Rbuoxop#88nhhKT}kjwlqvMUfaGMv75lv=}4K73Ybu;(T#|xKNA}#bUfD z5v3v~CWtaoE-J)DVxp)NRiawdh+1*6s1x;~K{Sdh#ZBU7af_HGZWXtQ+r?~ghqzPRCFY2`#XaI)*2=yV zbH#n)e(`{qCms|JiHF$+wvm0#HnY#z7h=A6L_8`U6AQ%S;tBDjSSX$nPm5Gy@LVO@ridEu6 z@sU_9)`+#@W6>hkiBH6*qE&n*){6~dqxf8G5?_eT;!CkbY!%zYSK@22U9^dB#JA!* zu|w<>--{nayVxau6hDdG;%D)T_*Lu?zlq<)A7ZcgQ~V|HrT-e&gr;e_W@x5nX}0EQ zt`^V|v@Y5~T30PmJ6JnJJ5)>34$}_Tj?j{|BiRGmQQFa3H|-ehSnW71s2#6$*G|w< zv=g#gYB6nsR;HC}71~AGM6FV*(yFx@tya5OtJCVW2CY$>q)pbE zv?K3Q+lr|6gHm+DjX%k<0jEA(mlmHJis)%tY(8vR=RI(>$Iy?%p! zqdrr=NxxaYMW3bLs^6yHuFux*(C^gm(&y-R>-XsQ>T~t`^!xP(^m+P&`a}A|`h5Kn z{ZaifeS!YC{)GOdzEFQke_DS=Z`PmHpVOb$7wIqPFX}Jpi}jcFSM*o)CHian>-rn| zQvFT+E&XkMnf{LcuKu3BTz_9*p?{#S)K}>r>L2N=^)>oh{bRjFU#EYff2z0YpXuxM z4f;m?bA6Nkg}zz;Qs1I))wk(i>0j&H^)~$*{agJzeTTkN|6cz=Z`XI}Kk7f}yY-*- zU-Vz~J^F9@@A@D5Uj0w~Fa2+W8Qc(tX6S}tn1*H8hGV!!z(_E<7zY_$jYQ*M;}GLe zBgr_-INUhGNH&f%jxvrmx*5k9#~Q~OLF0I%yK#b%Vw`B4WSngDFitT}HBK{9jnj>u zMlU1HNH;=8*zkR`Wt5$1B^3`vy8Kifkvj0Wn>!>!#ASFAS1`fH3l0) zj67qgk#7t$3XF4%LSwj5WQ;II8l#NS#u(#V<2+-malUbZaiKBJC^p6$B}S|^NmN0M~%mf1;*pX6ULLqLgOjpY2z8A*?87?&UoHfWV~R!XuM=B zHeNPfF=@d}ORP));Gz zkBt^%o$-nBsnKeDW~?_h7#oexjZMZE#%AM7V~erX*k*iXd~Iwu+Kg|EZ;kJa9mY=M zd*cVA-PmRPX#8aCHhwmKF@81n7{3|68-EykjX#aQjK580a#NU^shfsrnwDvsj_H~K zGr{a)9%Obk6U~FoL(D_XB=a!yaPtT=**wxb$~@ZaW*%c6YaV9?&Ew7P<_Ttsd7^oe zd9vBVJjFcKJk3lsPd9s-z05Q--3*yw(=&UUeayaQhS|^TZ=PWeFwZp4GS4;#nwe&n znQcZ)-;A1r%p5b<9Bd9T^UR@UzB$Y+FwZdy&EaN|Il>%ijxtA^W6X2S^USg4`Q`=Y zh2}W3*c@+`n5AaSoM4ujkvY+~#;b>=7L zr)I19nYrHFU~V)&H#eDIn48Tn%`N6ubDQ~<`L(&-Y%{-MGtFS7&a zb+r<$gRMiXL#-t1FzayZ2rJn-(mKjI+UjN%%qpR*^Nr8flHPMq6X7bFK5NvDW$41=fYuIIGwi zZ{iN(Wa2RJ!D_T7S(B|MYl?M=b*VMgy3D%V zy26@fU1?oqU2RRbuCcDQuCr!X*IPGOH(E2To2;9yTdY~ut=4VU?bdAT4(m?qE^Cf; zw{?$ouQk`Y&${1wz?#SASPxncu?5z{)_m&`>rv}5c8|4y-OYZm9=D#bp0pNPPgzg1 zN33V8X6spYoAsRaytT-B!Fthp$y#i^Y`tQ=%H~>2tkmBx( z^{(}vwcL8&T48;_Zn0Lf+3XH$mGz*R`q}!$`qkQF z{bv1c{bB93{%~ZXiu^y+fDWq`x5(7d#ZhzeYt&wJ_~;1h_NR8M{h7Vq-e7OEKesp8U)Y=NFYPV%R(qTMmHoB7-EOnLvA?yyvv=4#?eFa$ z>~?#X{iFSpz1#lT{>A>)-edn}|8D1e^q? zi*u0E)k$;?b`Eh4b&{OJoWq?XoMh)n=P2iBr<-$(bF6cm6LgMux;rO0Db9(`NzTbm z59bu;ROd7&)j8ei>GX2aoOCDTgdNZ6?euZ_IvGwsr@wQCGr&31ImSx&YS zaeOE0403XuTxYN|#L07pI{D5pr@%SKDRhQAMa~Fkq%+DH?Tm5Gb=_Db6L%rOs66 zGUsyV3TK*grE`^YwKLth#<|wH&Y9s{@7&QbGJmEa)EOef7o_3ybnw@8z z=bY!AMa~P(i_S~VV&`S&73WoFiSwHCy7Pv!)Opi+%X!;b=Dg#)>%8YIciwkaI3GAG zomI|<&PUE_XN|Mg`PgZ3);XUzpE|A1XU=+OgR{~3+}Y%O;cRxkbhbEKoo&un&ezU% zr_K4s`PTW)+2QPTzIT3b+MQj_kIqldZs%v`7w1=JkMo=JyYq*$*ZI@=%lR9h-{-Dy zHCJ~H*K{q{b{*Gs18#!b#XZRF>L$7eyN9@kx=HR~?&0ncZnAr%dz5>$+s!@3J=Q(W z4Z6p>-Q5%16!%2;B==;uhkJ^9s(YH7>YncQbbGmJZn_(C!>;G{cKf(}-3+&%+uuFI z9pIknp5>nH4st5{Ex%F;? z+vrYmC%aAV6!#MMQg^C*nR~f=g*(l?(!I*P+MVuR<6i4t=gx4icW-cSbZ5FZxi`DF zxU<|_-P_#T-P!IP?w#&k?i}}S_a66NcdmP%d%ydDJI{U4eaL;-o$o&4KI%T^E^r@r zpKzaa7rIZmPrJ{!&F-`AbMEu*BKHONMfW9lvHP<7iub~i|<-YAM zbKh~_b>DNByYIUz+z;H9?ke{~_ak?;yT)DXe(bim>)cP=Pu*7cGk3ka!QJS7?rw6w za5uYOx?9|>?l$);_iJ~%+lJqid(-{K{nq`?-Qn(ZzjuFd+udF6kM2+IZue*R7x!0p zkNcbZyZeW`*ZtG|%l$jR0z4oBT0jpN0W)9)?0^$+1A#z7piAJOK-WNG;NZX^fkOjH zfx`la2aX6N2aXIJ6*xN3EpSZW*uZgtVBq*b_rM8(l)#CBlL99PdIU}hoEkVSkQz8W z&@<30kQPV}gaYA!7w8@66X+Yr2=oi|51bJg5I8e%R^aTwz(8goE07(C1pGiWFes1{ z$PEk*3<=~p^%EM(@#EH5wUt>_TvAt4Z56B3%p6}An-nvPWQGKkMHNW-SD494P# z>+h@W#`axWKDiN7sp%_?v3L>~)agi|tn=C(v`>Lsw(l}w5PtYtRjiy%DBCX+$my&b zDDS-1bH*3f>E-yx%x$QsERC7?5j_$sms(OmEy-0asZd>)OFmbqROAj86&D2tcj^sX z)OnpSWIsm|CLWL}!v{C2EAeyUiV`!gxCEbyFe~FpLf-yzmHTDPJk>#!@kGx<>-9?f zW9F;+)vA8}epM2x_sf|1s(!WV;OgSq8hj$71`|f}tIM=lb(uAc8js)nix1;4)%cot z(q&kAV|7_^U1L=xe)!a-X8)X7sC=kXJ{0a}Hlc36j9I9Bs8h*sRjWRp1crBZU7)`6 zI-zJk1qluNWy~U_rXil_MRG_Rg(~N+Xo|ltxwBkL>p&`~ApnKeF48 z?DiwO{m5=VvfGdB_9MIf$ZkKf+mGz_BfI^g#xVRq6XzH5U*$t4wKM1XaCu(N+WZft0K3Vt4x=+@9vhI_0pR7m8dX%h3$$FHmN6C7WS|6p>N6Buq zpPMNohI*Kb_gz|Xf!u=>hkd|p5X_&`nPb-We$Rc%U@7ojxeMJP>q5lT~D zgwm83p)}=1C{2w)C{1}2N>jZMN>jZMN>jZMN>jZMN>jZMN>jZMN>jZMN+EuZ|d6G_+)5&s(EQiQ)h%AN3Qiv>tsHGul zX^2`HBK;xKAEK6qsHGvY7b1IMvKJuy~)4c;{uQ&PEoBZoT_WO|iK4iZS+3!R4`;h%UWWNvD??d+cko`VnzYp2( zL-zZS{XS&B583Za_WP3kzGS~I+3!pC`;z^>WWO)j?@RXklKsA9zc1PEOZNMc{k~+s zFWIN%Hk3j3Gsu1h+0P*R8Du|$>}Qbu46>g=_A|(S2HDRb`x#_EgY0LJeOhiqwA_aJ zk$qZrL$vIMXxR`3+@}U0Q}ivywbYyq)AA9f zn$sGvRdg%!Fyt2-Bhw zPFK%NI9)w6VOm7Ow1|Xh5ed^G5)OqD5VYgJ3eedoT3N!hvV>`63De3Frj;d3D@&MG zmN2a>VOm+jw6cV0WeL;D5~h_UOe;&6R+ccWEMZz%!nCr4!)lgn*L zD+zSu-Qs;6kPzFiB{m#T&6e$mUnMoF`yEx|g+{!-J|5ymnQW9%8mnw5wn&$L32tce zCO&V8CP`(+#CVe`<4sb1kd-Z}8%0xvRioOa)s@$n_)vXSak>#tv<9?|>}$1XR|$YS z20ox!R-7Q!cDU8`U))R}oock`W<2A@E5|RD8<8|K?q<3@LN!$_4q*y<;fSZhcDfm_ z*Kv>LHN78%>HQ!~?+0OeKM2$NL73hT!W1~e^nMVg02-zM8m1k4n0D-8+Odae#~!8~ zdzg0YVcM~WqvQ|m+`~}{Hc<+8QMEvaqZDkS6l|hufeJ^}bLG)q-AhyL^k}c{(O%u7 zy}Cys*Q1c@QONaZukO)a-J`v_N5R&kVCzw^^(feS6l^^TwjKprkAkg7!PcW->rt@v zDA;-wY&{CL9tB&Ef~`lv)}vtSQLyzW*m@LfJqorS1zRtqHYi?5#UGF2tVeOyqd4nP zob@QqdK70pinAWYS&!nZM{(ApIO|cI^(fAI6lXn(vmV7+kK(LHan_?a>rtHbD9(Bm zXFZCu9>rOY;;ct;)}uJ(PeSqYbY|8(xn#ydG_MJ=)-Uw88aggX_@-*P{)tM;ly^Hn<*ba6Q`K zdbGjyXoKs~2G^qvu16bOFN@|2ZEQW-xO%j4_2~S_qw^z=&W}7gFY;((>(Tj;M;lu& zo8lX7a6Q`KdbGjyDAs#)9^}z^kVhL{kIsWUiuWGHdynG1NAcdHc<)iX_bA?b6z@HX z_a4Q2k2cI6ZJ0gUFnhFN_GrWG(T3Th4YNlZW{*yUJUS8b=tRh)6CsaIggiPC@@ReW zXnpZ$eer00@o0VVXnpZ$eer00@o0VV)cTU1rsfyY_ct9qvajZ6dYYP_NU8m5ej-opSLd7QX=?rk72Xgel-jT6AM(_GHUE&O_N)1aJhflV zKjf+XYJY<~wO{RT(j#i$f>ik%QTvhfh}u6ORqcwXeFO5UzanZsfV}Fjh+41HBWk@y zs@fA#>vVcVtooGJA0uj=Mqc$}M6J)rlRs*G zPLHVd87bLS>of9XSFO*;lU=nwBTshK`iwl;RqHeIWLK@v$WwdO`kWq7>oZa{ei5}k zBd^9UqSj~R)%Zo!`i#69zld6&kyqmvQR_4EYWyN<{Y{Uk^%p6%N3Fl<5p@uTl-i*V zzS1M=z$!hW)#|5sF(8idzwiTM>#|5sF(8idzwiTM>#| z5sF(8idzwiTM>#|5sF(8idzwiTM>#|5sF(8idzwiTM>#|5sF(8idzwiR}qR=5sFt4 zidPYeR}qR=5sFv7+TW-9YJZPZ%^zRw?~zyi?W_Gg@@oG0YJZQs>UW=>CtvOFQLe_% zSNnV9)$`=5{XOz({`zWvpYE&uJyNo-_V>t>eYL+wp6t_e>Z|=d%GLbw)&3rNvaj~{ z$di3~o_%_reYL+&_tpL$DcM*1d*sQ!+TSBj_SOC#d1}Af-y^S{A7Ab7kyrE1r+DF0 zobV}5_!K96iW5G?37_JGPjSMhIN?*A@F`CC6eoO&6F$WWU+w49eTo-8#S5R}g-`Lq zr+DF0yznVr_!KXEiWfe`3!mbJPw~R1c;QpL@F^bn6c2og2R_9EpW=Z}@xZ5e;8Q&C zDIWL~4}6LTKE(rH?bp+NwO>c7o?~C_*VBD4fpW>)banz?c>Qfx`DUSLSM}3N;KE+X=;;2t?)TcP=Qylea|L0RY^(mhE z6iFQHt(SitbU0?oo>FQHt(SitbU0?oo>FQHt(SitbU0 z?oo>FQQ8eg)#*)ol%jo|DVj$qnnx*`M`<@0rQKju{dhJ# zs(w6+R6UJRiuO^8_EC!VQHu6aiuO^8_EC!VQHu6aiuO^8_EC!VQHu6aiuO^8_EC!V zQHu6aiuO^8_EC!VQHu6aiuO_U{d&awGynDvGXS{pHyJx(6#=B>{d&awGynDvGXS{pHyJx(6#=B>{d&awG zC_F>q84Ax(c*gr@ynn{~XS{!g!ZQ?}q3{faXDB>F;Ta0gPAfq-JwaKVW zMr|@`lTn+D+GNxwqc$0}$wVJA(T7a*ArpPbL>n^EhKxF8)F~5f$V3}5QHD&EArocD zL>V$shD?+p6J^M#Tt?+GDwl~eWTFh2C_^U7kcl#6q70cRLng|Qi85rO3Yn-vMkh1+ zn9;|KKIUD0B$|+kCS;-sIo_6(Io_7|f~Mv*zNZa!dfJRzPn%h=r_H$aw3!8a+E9_F z4V8J?_$f~tD)Y3V22UF*^R%G`Pa7)pw4nx18!D^jLPtF<+vnEK@A!^YzWS<00{=)S zn+=nEv66p$W;pr8j=$fm*F|so7A{=FZL0YxUm@);lYNcus_)LWIko-d`W`c`4iWTK zTNExt&}|AABIq`EoiE2$pE~RB`8@ZyL&%k{_u?^Pa^dT~sD_XqU;o7&LI!*t7}Xmx z;5OA8GT=7V7Vh0`sx92R+vFGS-Pe=RY~kMBrkTQ>yG=8NJ9nG%g*$hf{KB2PO@86d z-6p?SZR6|K$S>Tx+jNs~?{1TSxOcb7Kis?9{dv}}s!>#*zIqEOm zy4%!WxOHDg*J+*H*<6oC3ZLkU>iAOlKDVO}m-O+HK3>vyJ+#<--$Q+o2D?>d%-lVV zK3)d9xy|*#VpSOo=4p(LlI~X0-O6B|s-zQ@bfPktrz(SaJdJXf!8~rq!6Jk;Zqs{%WZb67f@G>PNXF9`>Sd6O+f-SQjN38P z%f;>l4=}iNW@|P2LEwyE6yv=NoN+tGdl@+6Hbah~TL#WlB}2FjoN=3>&|jGH#l@Rz zzTe&E>b7t07}*8g_+`{Z(2d*FMbM4g)J4#Z+tfwSjoZ{k&`nha-FQk}1l_nzUBo*P zx2cPu9Jj;ml|eafQw>2mZc`0GIc`%8OF8P&b*Jtb(Ied0*_dqV*bkfjapS7Gi`+2k zUJ~^Y?_MeoK4ViaK|}sI^%6AXHuVzkUfiZ$f{NUxUV@4$4^GB?gNodyd4h`E##03q zxlR5-MQ)RSP?6i@A5`Qv`3DubP5$xjr7Gjyi>I_pP?FoUOGFdg=J|t`+@@WEmfWUY zf|lH-U4oX}rd@I#b2O;|WMw$M`joH1^50smtppr61sw2*hDWh3ZSVJWSoOZE?O2jk zA0F7+IqP0@WxJ^|mU>q#>Gm|L&b@h@FLh$YZ@;;=bI6TW5L z#=7rkw|;45*!F`9^{-x5hK2v3uwe|wDq;s!gm(p z+=~;vsfxL{+f+%+#ogBN)hBk=F8hXjm(H#>PweH}ac8qVRX=`h)c>t+k9oDniOAV> zVso|rxg1yT8gVt(M4MM2NCkpaF~h7XP=p1)ZbzT1KoMW?+pd2+G+f;n?rg;^Q)enZ zdVFWNy|yuYnvZEkJTyyx{f@LI9-5`U{(1C1mi|^19=gIqS9oZa{`&caNq?}7)%v$; z^&YR0D}I^-%Fk*Zv7M(x^D!s%ZZ&`4ln3VO ze@!+zSJodipYTESC}mco%xaWbjWVlIoF>0%R4!QgHn)D=W>0){5u!$ zq#E%-@8WeC=Y0ONTSg#LflMvC^##6q?ZyQ$sub$fvMGb@xqvdn3nI@VoTNqw(MMAZ zD~%AM+f5PDJ2#+y6@FFtRU?MzU!Vl=tX544I(u$F379`A^CyiUqK{)r5J5z@n-X;2 zxj{q`{Y3a_jVPkq(W?~CqIedaZ%UwhZa@h@Y6Ynkq*jnxaXpIbQIJ|eY6Ynkq*jnx zL28Y#Vx~M;cihEZd|;3 zXJ5z|-|`i09PHk?d93>DUe9sLo1AO*^kCpzfpZ1U6*yPmT!C{1&J{RU;9P-o1{o@I0}rB$EO z4$tj9PuE0G)b(U@JI)Wc{g-Bg)uQ=-|KMVzwZhBcR{&lCcm?1UfL8!s0eA)A6@XU&UIBOo z;1z&Z0A2xj1>hBcR{&lCc#Xy3wU2C`r-Q(B=F`}glWMcUzH{&88-{G{1od|2^S*Pw zTLLiMStwh3jA*?Ma?(LgI>ts2qm3B}Z&Tz{C9}KDn^vh z;5B28X7PsCuM0geaLvFq1J?{(GjPqAwHdQEgVqdMGic4AHG|d+S~H@L#;nblwHdHx zz?uPT2CNydW_T`(H@=m@Y6hzrtY!=)gVhXHvv}j{-wVfR%mNKmGf>SyH3QWQR5MV` z7+c2JGRBsHY6hwqsAiy=focY-8K`EUn#Fp+%9w>3vruCeYRp1i;-Y^NIyFM4M(ETC zof@H2i}gQ#-HZU?R#p;E&;7@<-lRBD7ujZmo(Dm6l-MyS*Xl^UT^ zBUEbm2g5%Y{=x7M28|gsX3&@c2nLNAG-lA4L1PAu88l|lm_cI(jTtm%(3lY_HC{0o zG-lA45h^uaF&M8H3>q_DF&M8Hj8_Z>j~TBRj8_cC{NCU(V}5VU?~PXt#{Axx-y1|` z5Sc+_29X&=W)PV{WCoELL}n0~L1aeU)tJ>Ae%b&s1IP>@Gl0whG6TpAAT#FkM#$Be z&l~f3gU1XWGkDD4F(c$^gj@|CGkDD4F@whp9y55%h_xEARwLGG#99p=GkDD4F@whp z9y55%h_xEAR)fb39y55%;4vfCYQ$QNSgR3hHNeb>wHna_gUk#vGsw&!GlR?wGBe1` z;tjKhjqv}(R1GRKsLY@;gUSplGpNkaWrNBLDl@3epfV$-YQ$6xBs28f&~pRH3?ws< z%s?^&$qXbj^xx2bL;nr^H}v1oe?$Kb{WtXA(0@b!4gELt-_UVdOQZ}#hTGxb5Uhg$7veaTqkaXoEjubwu9>uD2v@U)3J`4XtOj$c~1-Msnm zG``0#E!>Xp@k@n)dDZ?{4NTk`zfllBGzv)i4GU`O(JCR=}^6Nx?oye~f z`E??{PUP2#{5p|er^&Co+??w!H|M&`&AIL}=bEx~mz%P5mz%P5mz%P9ETMjs?#Xg& zF#Kq2>UUt7?J0`IdJnDQx9UwAi-+s2P})m3wyi9d>OCnZyc^E>ZX_qpu57IqO&1+o z_MH%#Ei5M<*|T}!`11OW{}sOGCj$rB%khN2hN?GwI#}PO>e#M5?w`jkPOQbbw7h$+ zw*99q|Ic3P@1Ec98!Mjhmr(69n=4HmbA9`bcU|rM@BfVCzh~sFpWRiwHITP@t)JZ` z|1~K;{mI?MPY3doyXDQ(@}F1aKgQ+yxcvA>v&D}q`O&PrQOUoL;%BIVyi$$#=gqD84(A z?+oPI*QSbZAD3@E)h@nuT>k1Y`O9hfixcwAXO9-&9LYDnK3#m{cKQ0WeC_qA;%mp{ zb-(WQDS5ruddy5QudAVJ@GAXaTaq~^RM_Vtq<>fb9UtYgbeEGV(^!f4Pr9<*kul1rIz4(B9>4odX zmqzl!^QVg!uFDHoThBjtymf16H$k|)u%t%&7^2tw}C_XuoPn?iH9?9vE{Ly3bhgakeM)Ld1@_Qrs-I4sx zb@}a)oEpe)&dP68^6`%yEIxikK6X%keX-Y4IA1EHZCXZD9XJn>}hi4=o zmXq&l7bkC(<)xWo`JycKr;DW-=`W5K{b^b3jTMXI(i@XrU5}?)zj93;YTZ{n^lS2w z2WN|qJSGo*xLrIrD-ZTsA8yM7>2UGDX-RgdNQcD^Nq15@BhiJ~LPxSNKT|Bs%6!!> z=4YfT$BL>gRkTkzCUf^6Ddv{t{u8$p_aBk_-)x;Y+AdDqA}6l4?i(8v_g#|@-8)-+ z=rOt1AL8CwxwqH)pcnmv1Np!`bHxW1s;~PQ*x`{_0~B#GLrXrrtcZayQk%r+1cWji!wViQ_RlFY_BylBZvLE!`J<< z0{LGB8Tp?Fnl7gMa?s0v@S05dxv7y%`VA(J$YifIF_LjN#(Q>A+I~&@ii{29!2UzU zfmzvqNcQ>P1=)AS|MJLvMN#?RAe#0g@tgXd(l?)yn?~Y)KWp&Ji#Ol<3;XY;U)Yk> K1-t#GoBj`&Wgve5 literal 0 HcmV?d00001 diff --git a/Server/system/fonts/LICENSE b/Server/system/fonts/LICENSE new file mode 100644 index 0000000..254e2cc --- /dev/null +++ b/Server/system/fonts/LICENSE @@ -0,0 +1,99 @@ +Fonts are (c) Bitstream (see below). DejaVu changes are in public domain. +Glyphs imported from Arev fonts are (c) Tavmjong Bah (see below) + +Bitstream Vera Fonts Copyright +------------------------------ + +Copyright (c) 2003 by Bitstream, Inc. All Rights Reserved. Bitstream Vera is +a trademark of Bitstream, Inc. + +Permission is hereby granted, free of charge, to any person obtaining a copy +of the fonts accompanying this license ("Fonts") and associated +documentation files (the "Font Software"), to reproduce and distribute the +Font Software, including without limitation the rights to use, copy, merge, +publish, distribute, and/or sell copies of the Font Software, and to permit +persons to whom the Font Software is furnished to do so, subject to the +following conditions: + +The above copyright and trademark notices and this permission notice shall +be included in all copies of one or more of the Font Software typefaces. + +The Font Software may be modified, altered, or added to, and in particular +the designs of glyphs or characters in the Fonts may be modified and +additional glyphs or characters may be added to the Fonts, only if the fonts +are renamed to names not containing either the words "Bitstream" or the word +"Vera". + +This License becomes null and void to the extent applicable to Fonts or Font +Software that has been modified and is distributed under the "Bitstream +Vera" names. + +The Font Software may be sold as part of a larger software package but no +copy of one or more of the Font Software typefaces may be sold by itself. + +THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS +OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF COPYRIGHT, PATENT, +TRADEMARK, OR OTHER RIGHT. IN NO EVENT SHALL BITSTREAM OR THE GNOME +FOUNDATION BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, INCLUDING +ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL DAMAGES, +WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF +THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM OTHER DEALINGS IN THE +FONT SOFTWARE. + +Except as contained in this notice, the names of Gnome, the Gnome +Foundation, and Bitstream Inc., shall not be used in advertising or +otherwise to promote the sale, use or other dealings in this Font Software +without prior written authorization from the Gnome Foundation or Bitstream +Inc., respectively. For further information, contact: fonts at gnome dot +org. + +Arev Fonts Copyright +------------------------------ + +Copyright (c) 2006 by Tavmjong Bah. All Rights Reserved. + +Permission is hereby granted, free of charge, to any person obtaining +a copy of the fonts accompanying this license ("Fonts") and +associated documentation files (the "Font Software"), to reproduce +and distribute the modifications to the Bitstream Vera Font Software, +including without limitation the rights to use, copy, merge, publish, +distribute, and/or sell copies of the Font Software, and to permit +persons to whom the Font Software is furnished to do so, subject to +the following conditions: + +The above copyright and trademark notices and this permission notice +shall be included in all copies of one or more of the Font Software +typefaces. + +The Font Software may be modified, altered, or added to, and in +particular the designs of glyphs or characters in the Fonts may be +modified and additional glyphs or characters may be added to the +Fonts, only if the fonts are renamed to names not containing either +the words "Tavmjong Bah" or the word "Arev". + +This License becomes null and void to the extent applicable to Fonts +or Font Software that has been modified and is distributed under the +"Tavmjong Bah Arev" names. + +The Font Software may be sold as part of a larger software package but +no copy of one or more of the Font Software typefaces may be sold by +itself. + +THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, +EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF +MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT +OF COPYRIGHT, PATENT, TRADEMARK, OR OTHER RIGHT. IN NO EVENT SHALL +TAVMJONG BAH BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, +INCLUDING ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL +DAMAGES, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING +FROM, OUT OF THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM +OTHER DEALINGS IN THE FONT SOFTWARE. + +Except as contained in this notice, the name of Tavmjong Bah shall not +be used in advertising or otherwise to promote the sale, use or other +dealings in this Font Software without prior written authorization +from Tavmjong Bah. For further information, contact: tavmjong @ free +. fr. + +$Id: LICENSE 2133 2007-11-28 02:46:28Z lechimp $ diff --git a/Server/system/helpers/arr.php b/Server/system/helpers/arr.php new file mode 100644 index 0000000..9570c4b --- /dev/null +++ b/Server/system/helpers/arr.php @@ -0,0 +1,312 @@ + $value) + { + $value = ($keep_keys === TRUE) ? $value : array_values($value); + foreach ($value as $k => $v) + { + $new_array[$k][$key] = $v; + } + } + + return $new_array; + } + + /** + * Removes a key from an array and returns the value. + * + * @param string key to return + * @param array array to work on + * @return mixed value of the requested array key + */ + public static function remove($key, & $array) + { + if ( ! array_key_exists($key, $array)) + return NULL; + + $val = $array[$key]; + unset($array[$key]); + + return $val; + } + + + /** + * Extract one or more keys from an array. Each key given after the first + * argument (the array) will be extracted. Keys that do not exist in the + * search array will be NULL in the extracted data. + * + * @param array array to search + * @param string key name + * @return array + */ + public static function extract(array $search, $keys) + { + // Get the keys, removing the $search array + $keys = array_slice(func_get_args(), 1); + + $found = array(); + foreach ($keys as $key) + { + if (isset($search[$key])) + { + $found[$key] = $search[$key]; + } + else + { + $found[$key] = NULL; + } + } + + return $found; + } + + /** + * Because PHP does not have this function. + * + * @param array array to unshift + * @param string key to unshift + * @param mixed value to unshift + * @return array + */ + public static function unshift_assoc( array & $array, $key, $val) + { + $array = array_reverse($array, TRUE); + $array[$key] = $val; + $array = array_reverse($array, TRUE); + + return $array; + } + + /** + * Because PHP does not have this function, and array_walk_recursive creates + * references in arrays and is not truly recursive. + * + * @param mixed callback to apply to each member of the array + * @param array array to map to + * @return array + */ + public static function map_recursive($callback, array $array) + { + foreach ($array as $key => $val) + { + // Map the callback to the key + $array[$key] = is_array($val) ? arr::map_recursive($callback, $val) : call_user_func($callback, $val); + } + + return $array; + } + + /** + * @param mixed $needle the value to search for + * @param array $haystack an array of values to search in + * @param boolean $sort sort the array now + * @return integer|FALSE the index of the match or FALSE when not found + */ + public static function binary_search($needle, $haystack, $sort = FALSE) + { + if ($sort) + { + sort($haystack); + } + + $high = count($haystack) - 1; + $low = 0; + + while ($low <= $high) + { + $mid = ($low + $high) >> 1; + + if ($haystack[$mid] < $needle) + { + $low = $mid + 1; + } + elseif ($haystack[$mid] > $needle) + { + $high = $mid - 1; + } + else + { + return $mid; + } + } + + return FALSE; + } + + + /** + * Emulates array_merge_recursive, but appends numeric keys and replaces + * associative keys, instead of appending all keys. + * + * @param array any number of arrays + * @return array + */ + public static function merge() + { + $total = func_num_args(); + + $result = array(); + for ($i = 0; $i < $total; $i++) + { + foreach (func_get_arg($i) as $key => $val) + { + if (isset($result[$key])) + { + if (is_array($val)) + { + // Arrays are merged recursively + $result[$key] = arr::merge($result[$key], $val); + } + elseif (is_int($key)) + { + // Indexed arrays are appended + array_push($result, $val); + } + else + { + // Associative arrays are replaced + $result[$key] = $val; + } + } + else + { + // New values are added + $result[$key] = $val; + } + } + } + + return $result; + } + + /** + * Overwrites an array with values from input array(s). + * Non-existing keys will not be appended! + * + * @param array key array + * @param array input array(s) that will overwrite key array values + * @return array + */ + public static function overwrite($array1, $array2) + { + foreach (array_intersect_key($array2, $array1) as $key => $value) + { + $array1[$key] = $value; + } + + if (func_num_args() > 2) + { + foreach (array_slice(func_get_args(), 2) as $array2) + { + foreach (array_intersect_key($array2, $array1) as $key => $value) + { + $array1[$key] = $value; + } + } + } + + return $array1; + } + + /** + * Fill an array with a range of numbers. + * + * @param integer stepping + * @param integer ending number + * @return array + */ + public static function range($step = 10, $max = 100) + { + if ($step < 1) + return array(); + + $array = array(); + for ($i = $step; $i <= $max; $i += $step) + { + $array[$i] = $i; + } + + return $array; + } + + /** + * Recursively convert an array to an object. + * + * @param array array to convert + * @return object + */ + public static function to_object(array $array, $class = 'stdClass') + { + $object = new $class; + + foreach ($array as $key => $value) + { + if (is_array($value)) + { + // Convert the array to an object + $value = arr::to_object($value, $class); + } + + // Add the value to the object + $object->{$key} = $value; + } + + return $object; + } + +} // End arr diff --git a/Server/system/helpers/cookie.php b/Server/system/helpers/cookie.php new file mode 100644 index 0000000..901b6d8 --- /dev/null +++ b/Server/system/helpers/cookie.php @@ -0,0 +1,84 @@ +cookie($name, $default, $xss_clean); + } + + /** + * Nullify and unset a cookie. + * + * @param string cookie name + * @param string URL path + * @param string URL domain + * @return boolean + */ + public static function delete($name, $path = NULL, $domain = NULL) + { + if ( ! isset($_COOKIE[$name])) + return FALSE; + + // Delete the cookie from globals + unset($_COOKIE[$name]); + + // Sets the cookie value to an empty string, and the expiration to 24 hours ago + return cookie::set($name, '', -86400, $path, $domain, FALSE, FALSE); + } + +} // End cookie \ No newline at end of file diff --git a/Server/system/helpers/date.php b/Server/system/helpers/date.php new file mode 100644 index 0000000..7d5a9ab --- /dev/null +++ b/Server/system/helpers/date.php @@ -0,0 +1,405 @@ +> 1); + } + + /** + * Converts a DOS timestamp to UNIX format. + * + * @param integer DOS timestamp + * @return integer + */ + public static function dos2unix($timestamp = FALSE) + { + $sec = 2 * ($timestamp & 0x1f); + $min = ($timestamp >> 5) & 0x3f; + $hrs = ($timestamp >> 11) & 0x1f; + $day = ($timestamp >> 16) & 0x1f; + $mon = ($timestamp >> 21) & 0x0f; + $year = ($timestamp >> 25) & 0x7f; + + return mktime($hrs, $min, $sec, $mon, $day, $year + 1980); + } + + /** + * Returns the offset (in seconds) between two time zones. + * @see http://php.net/timezones + * + * @param string timezone that to find the offset of + * @param string|boolean timezone used as the baseline + * @return integer + */ + public static function offset($remote, $local = TRUE) + { + static $offsets; + + // Default values + $remote = (string) $remote; + $local = ($local === TRUE) ? date_default_timezone_get() : (string) $local; + + // Cache key name + $cache = $remote.$local; + + if (empty($offsets[$cache])) + { + // Create timezone objects + $remote = new DateTimeZone($remote); + $local = new DateTimeZone($local); + + // Create date objects from timezones + $time_there = new DateTime('now', $remote); + $time_here = new DateTime('now', $local); + + // Find the offset + $offsets[$cache] = $remote->getOffset($time_there) - $local->getOffset($time_here); + } + + return $offsets[$cache]; + } + + /** + * Number of seconds in a minute, incrementing by a step. + * + * @param integer amount to increment each step by, 1 to 30 + * @param integer start value + * @param integer end value + * @return array A mirrored (foo => foo) array from 1-60. + */ + public static function seconds($step = 1, $start = 0, $end = 60) + { + // Always integer + $step = (int) $step; + + $seconds = array(); + + for ($i = $start; $i < $end; $i += $step) + { + $seconds[$i] = ($i < 10) ? '0'.$i : $i; + } + + return $seconds; + } + + /** + * Number of minutes in an hour, incrementing by a step. + * + * @param integer amount to increment each step by, 1 to 30 + * @return array A mirrored (foo => foo) array from 1-60. + */ + public static function minutes($step = 5) + { + // Because there are the same number of minutes as seconds in this set, + // we choose to re-use seconds(), rather than creating an entirely new + // function. Shhhh, it's cheating! ;) There are several more of these + // in the following methods. + return date::seconds($step); + } + + /** + * Number of hours in a day. + * + * @param integer amount to increment each step by + * @param boolean use 24-hour time + * @param integer the hour to start at + * @return array A mirrored (foo => foo) array from start-12 or start-23. + */ + public static function hours($step = 1, $long = FALSE, $start = NULL) + { + // Default values + $step = (int) $step; + $long = (bool) $long; + $hours = array(); + + // Set the default start if none was specified. + if ($start === NULL) + { + $start = ($long === FALSE) ? 1 : 0; + } + + $hours = array(); + + // 24-hour time has 24 hours, instead of 12 + $size = ($long === TRUE) ? 23 : 12; + + for ($i = $start; $i <= $size; $i += $step) + { + $hours[$i] = $i; + } + + return $hours; + } + + /** + * Returns AM or PM, based on a given hour. + * + * @param integer number of the hour + * @return string + */ + public static function ampm($hour) + { + // Always integer + $hour = (int) $hour; + + return ($hour > 11) ? 'PM' : 'AM'; + } + + /** + * Adjusts a non-24-hour number into a 24-hour number. + * + * @param integer hour to adjust + * @param string AM or PM + * @return string + */ + public static function adjust($hour, $ampm) + { + $hour = (int) $hour; + $ampm = strtolower($ampm); + + switch ($ampm) + { + case 'am': + if ($hour == 12) + $hour = 0; + break; + case 'pm': + if ($hour < 12) + $hour += 12; + break; + } + + return sprintf('%02s', $hour); + } + + /** + * Number of days in month. + * + * @param integer number of month + * @param integer number of year to check month, defaults to the current year + * @return array A mirrored (foo => foo) array of the days. + */ + public static function days($month, $year = FALSE) + { + static $months; + + // Always integers + $month = (int) $month; + $year = (int) $year; + + // Use the current year by default + $year = ($year == FALSE) ? date('Y') : $year; + + // We use caching for months, because time functions are used + if (empty($months[$year][$month])) + { + $months[$year][$month] = array(); + + // Use date to find the number of days in the given month + $total = date('t', mktime(1, 0, 0, $month, 1, $year)) + 1; + + for ($i = 1; $i < $total; $i++) + { + $months[$year][$month][$i] = $i; + } + } + + return $months[$year][$month]; + } + + /** + * Number of months in a year + * + * @return array A mirrored (foo => foo) array from 1-12. + */ + public static function months() + { + return date::hours(); + } + + /** + * Returns an array of years between a starting and ending year. + * Uses the current year +/- 5 as the max/min. + * + * @param integer starting year + * @param integer ending year + * @return array + */ + public static function years($start = FALSE, $end = FALSE) + { + // Default values + $start = ($start === FALSE) ? date('Y') - 5 : (int) $start; + $end = ($end === FALSE) ? date('Y') + 5 : (int) $end; + + $years = array(); + + // Add one, so that "less than" works + $end += 1; + + for ($i = $start; $i < $end; $i++) + { + $years[$i] = $i; + } + + return $years; + } + + /** + * Returns time difference between two timestamps, in human readable format. + * + * @param integer timestamp + * @param integer timestamp, defaults to the current time + * @param string formatting string + * @return string|array + */ + public static function timespan($time1, $time2 = NULL, $output = 'years,months,weeks,days,hours,minutes,seconds') + { + // Array with the output formats + $output = preg_split('/[^a-z]+/', strtolower((string) $output)); + + // Invalid output + if (empty($output)) + return FALSE; + + // Make the output values into keys + extract(array_flip($output), EXTR_SKIP); + + // Default values + $time1 = max(0, (int) $time1); + $time2 = empty($time2) ? time() : max(0, (int) $time2); + + // Calculate timespan (seconds) + $timespan = abs($time1 - $time2); + + // All values found using Google Calculator. + // Years and months do not match the formula exactly, due to leap years. + + // Years ago, 60 * 60 * 24 * 365 + isset($years) and $timespan -= 31556926 * ($years = (int) floor($timespan / 31556926)); + + // Months ago, 60 * 60 * 24 * 30 + isset($months) and $timespan -= 2629744 * ($months = (int) floor($timespan / 2629743.83)); + + // Weeks ago, 60 * 60 * 24 * 7 + isset($weeks) and $timespan -= 604800 * ($weeks = (int) floor($timespan / 604800)); + + // Days ago, 60 * 60 * 24 + isset($days) and $timespan -= 86400 * ($days = (int) floor($timespan / 86400)); + + // Hours ago, 60 * 60 + isset($hours) and $timespan -= 3600 * ($hours = (int) floor($timespan / 3600)); + + // Minutes ago, 60 + isset($minutes) and $timespan -= 60 * ($minutes = (int) floor($timespan / 60)); + + // Seconds ago, 1 + isset($seconds) and $seconds = $timespan; + + // Remove the variables that cannot be accessed + unset($timespan, $time1, $time2); + + // Deny access to these variables + $deny = array_flip(array('deny', 'key', 'difference', 'output')); + + // Return the difference + $difference = array(); + foreach ($output as $key) + { + if (isset($$key) AND ! isset($deny[$key])) + { + // Add requested key to the output + $difference[$key] = $$key; + } + } + + // Invalid output formats string + if (empty($difference)) + return FALSE; + + // If only one output format was asked, don't put it in an array + if (count($difference) === 1) + return current($difference); + + // Return array + return $difference; + } + + /** + * Returns time difference between two timestamps, in the format: + * N year, N months, N weeks, N days, N hours, N minutes, and N seconds ago + * + * @param integer timestamp + * @param integer timestamp, defaults to the current time + * @param string formatting string + * @return string + */ + public static function timespan_string($time1, $time2 = NULL, $output = 'years,months,weeks,days,hours,minutes,seconds') + { + if ($difference = date::timespan($time1, $time2, $output) AND is_array($difference)) + { + // Determine the key of the last item in the array + $last = end($difference); + $last = key($difference); + + $span = array(); + foreach ($difference as $name => $amount) + { + if ($amount === 0) + { + // Skip empty amounts + continue; + } + + // Add the amount to the span + $span[] = ($name === $last ? ' and ' : ', ').$amount.' '.($amount === 1 ? inflector::singular($name) : $name); + } + + // If the difference is less than 60 seconds, remove the preceding and. + if (count($span) === 1) + { + $span[0] = ltrim($span[0], 'and '); + } + + // Replace difference by making the span into a string + $difference = trim(implode('', $span), ','); + } + elseif (is_int($difference)) + { + // Single-value return + $difference = $difference.' '.($difference === 1 ? inflector::singular($output) : $output); + } + + return $difference; + } + +} // End date \ No newline at end of file diff --git a/Server/system/helpers/download.php b/Server/system/helpers/download.php new file mode 100644 index 0000000..49fed42 --- /dev/null +++ b/Server/system/helpers/download.php @@ -0,0 +1,105 @@ +setUsername($config['options']['username']); + empty($config['options']['password']) or $connection->setPassword($config['options']['password']); + + if ( ! empty($config['options']['auth'])) + { + // Get the class name and params + list ($class, $params) = arr::callback_string($config['options']['auth']); + + if ($class === 'PopB4Smtp') + { + // Load the PopB4Smtp class manually, due to its odd filename + require Kohana::find_file('vendor', 'swift/Swift/Authenticator/$PopB4Smtp$'); + } + + // Prepare the class name for auto-loading + $class = 'Swift_Authenticator_'.$class; + + // Attach the authenticator + $connection->attachAuthenticator(($params === NULL) ? new $class : new $class($params[0])); + } + + // Set the timeout to 5 seconds + $connection->setTimeout(empty($config['options']['timeout']) ? 5 : (int) $config['options']['timeout']); + break; + case 'sendmail': + // Create a sendmail connection + $connection = new Swift_Connection_Sendmail + ( + empty($config['options']) ? Swift_Connection_Sendmail::AUTO_DETECT : $config['options'] + ); + + // Set the timeout to 5 seconds + $connection->setTimeout(5); + break; + default: + // Use the native connection + $connection = new Swift_Connection_NativeMail($config['options']); + break; + } + + // Create the SwiftMailer instance + return email::$mail = new Swift($connection); + } + + /** + * Send an email message. + * + * @param string|array recipient email (and name), or an array of To, Cc, Bcc names + * @param string|array sender email (and name) + * @param string message subject + * @param string message body + * @param boolean send email as HTML + * @return integer number of emails sent + */ + public static function send($to, $from, $subject, $message, $html = FALSE) + { + // Connect to SwiftMailer + (email::$mail === NULL) and email::connect(); + + // Determine the message type + $html = ($html === TRUE) ? 'text/html' : 'text/plain'; + + // Create the message + $message = new Swift_Message($subject, $message, $html, '8bit', 'utf-8'); + + if (is_string($to)) + { + // Single recipient + $recipients = new Swift_Address($to); + } + elseif (is_array($to)) + { + if (isset($to[0]) AND isset($to[1])) + { + // Create To: address set + $to = array('to' => $to); + } + + // Create a list of recipients + $recipients = new Swift_RecipientList; + + foreach ($to as $method => $set) + { + if ( ! in_array($method, array('to', 'cc', 'bcc'))) + { + // Use To: by default + $method = 'to'; + } + + // Create method name + $method = 'add'.ucfirst($method); + + if (is_array($set)) + { + // Add a recipient with name + $recipients->$method($set[0], $set[1]); + } + else + { + // Add a recipient without name + $recipients->$method($set); + } + } + } + + if (is_string($from)) + { + // From without a name + $from = new Swift_Address($from); + } + elseif (is_array($from)) + { + // From with a name + $from = new Swift_Address($from[0], $from[1]); + } + + return email::$mail->send($message, $recipients, $from); + } + +} // End email \ No newline at end of file diff --git a/Server/system/helpers/expires.php b/Server/system/helpers/expires.php new file mode 100644 index 0000000..c43cc0c --- /dev/null +++ b/Server/system/helpers/expires.php @@ -0,0 +1,111 @@ + 0) + { + // Re-send headers + header('Last-Modified: '.gmdate('D, d M Y H:i:s T', $mod_time)); + header('Expires: '.gmdate('D, d M Y H:i:s T', time() + $mod_time_diff)); + header('Cache-Control: max-age='.$mod_time_diff); + header('Status: 304 Not Modified', TRUE, 304); + + // Prevent any output + Event::add('system.display', array('expires', 'prevent_output')); + + // Exit to prevent other output + exit; + } + } + + return FALSE; + } + + /** + * Check headers already created to not step on download or Img_lib's feet + * + * @return boolean + */ + public static function check_headers() + { + foreach (headers_list() as $header) + { + if ((session_cache_limiter() == '' AND stripos($header, 'Last-Modified:') === 0) + OR stripos($header, 'Expires:') === 0) + { + return FALSE; + } + } + + return TRUE; + } + + /** + * Prevent any output from being displayed. Executed during system.display. + * + * @return void + */ + public static function prevent_output() + { + Kohana::$output = ''; + } + +} // End expires \ No newline at end of file diff --git a/Server/system/helpers/feed.php b/Server/system/helpers/feed.php new file mode 100644 index 0000000..74bb2f6 --- /dev/null +++ b/Server/system/helpers/feed.php @@ -0,0 +1,122 @@ +channel) ? $feed->xpath('//item') : $feed->entry; + + $i = 0; + $items = array(); + + foreach ($feed as $item) + { + if ($limit > 0 AND $i++ === $limit) + break; + + $items[] = (array) $item; + } + + return $items; + } + + /** + * Creates a feed from the given parameters. + * + * @param array feed information + * @param array items to add to the feed + * @param string define which format to use + * @param string define which encoding to use + * @return string + */ + public static function create($info, $items, $format = 'rss2', $encoding = 'UTF-8') + { + $info += array('title' => 'Generated Feed', 'link' => '', 'generator' => 'KohanaPHP'); + + $feed = ''; + $feed = simplexml_load_string($feed); + + foreach ($info as $name => $value) + { + if (($name === 'pubDate' OR $name === 'lastBuildDate') AND (is_int($value) OR ctype_digit($value))) + { + // Convert timestamps to RFC 822 formatted dates + $value = date(DATE_RFC822, $value); + } + elseif (($name === 'link' OR $name === 'docs') AND strpos($value, '://') === FALSE) + { + // Convert URIs to URLs + $value = url::site($value, 'http'); + } + + // Add the info to the channel + $feed->channel->addChild($name, $value); + } + + foreach ($items as $item) + { + // Add the item to the channel + $row = $feed->channel->addChild('item'); + + foreach ($item as $name => $value) + { + if ($name === 'pubDate' AND (is_int($value) OR ctype_digit($value))) + { + // Convert timestamps to RFC 822 formatted dates + $value = date(DATE_RFC822, $value); + } + elseif (($name === 'link' OR $name === 'guid') AND strpos($value, '://') === FALSE) + { + // Convert URIs to URLs + $value = url::site($value, 'http'); + } + + // Add the info to the row + $row->addChild($name, $value); + } + } + + return $feed->asXML(); + } + +} // End feed \ No newline at end of file diff --git a/Server/system/helpers/file.php b/Server/system/helpers/file.php new file mode 100644 index 0000000..b1b7174 --- /dev/null +++ b/Server/system/helpers/file.php @@ -0,0 +1,186 @@ +'."\n"; + + // Add hidden fields immediate after opening tag + empty($hidden) or $form .= form::hidden($hidden); + + return $form; + } + + /** + * Generates an opening HTML form tag that can be used for uploading files. + * + * @param string form action attribute + * @param array extra attributes + * @param array hidden fields to be created immediately after the form tag + * @return string + */ + public static function open_multipart($action = NULL, $attr = array(), $hidden = array()) + { + // Set multi-part form type + $attr['enctype'] = 'multipart/form-data'; + + return form::open($action, $attr, $hidden); + } + + /** + * Generates a fieldset opening tag. + * + * @param array html attributes + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function open_fieldset($data = NULL, $extra = '') + { + return ''."\n"; + } + + /** + * Generates a fieldset closing tag. + * + * @return string + */ + public static function close_fieldset() + { + return ''."\n"; + } + + /** + * Generates a legend tag for use with a fieldset. + * + * @param string legend text + * @param array HTML attributes + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function legend($text = '', $data = NULL, $extra = '') + { + return ''.$text.''."\n"; + } + + /** + * Generates hidden form fields. + * You can pass a simple key/value string or an associative array with multiple values. + * + * @param string|array input name (string) or key/value pairs (array) + * @param string input value, if using an input name + * @return string + */ + public static function hidden($data, $value = '') + { + if ( ! is_array($data)) + { + $data = array + ( + $data => $value + ); + } + + $input = ''; + foreach ($data as $name => $value) + { + $attr = array + ( + 'type' => 'hidden', + 'name' => $name, + 'value' => $value + ); + + $input .= form::input($attr)."\n"; + } + + return $input; + } + + /** + * Creates an HTML form input tag. Defaults to a text type. + * + * @param string|array input name or an array of HTML attributes + * @param string input value, when using a name + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function input($data, $value = '', $extra = '') + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + + // Type and value are required attributes + $data += array + ( + 'type' => 'text', + 'value' => $value + ); + + return ''; + } + + /** + * Creates a HTML form password input tag. + * + * @param string|array input name or an array of HTML attributes + * @param string input value, when using a name + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function password($data, $value = '', $extra = '') + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + + $data['type'] = 'password'; + + return form::input($data, $value, $extra); + } + + /** + * Creates an HTML form upload input tag. + * + * @param string|array input name or an array of HTML attributes + * @param string input value, when using a name + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function upload($data, $value = '', $extra = '') + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + + $data['type'] = 'file'; + + return form::input($data, $value, $extra); + } + + /** + * Creates an HTML form textarea tag. + * + * @param string|array input name or an array of HTML attributes + * @param string input value, when using a name + * @param string a string to be attached to the end of the attributes + * @param boolean encode existing entities + * @return string + */ + public static function textarea($data, $value = '', $extra = '', $double_encode = TRUE) + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + + // Use the value from $data if possible, or use $value + $value = isset($data['value']) ? $data['value'] : $value; + + // Value is not part of the attributes + unset($data['value']); + + return ''.html::specialchars($value, $double_encode).''; + } + + /** + * Creates an HTML form select tag, or "dropdown menu". + * + * @param string|array input name or an array of HTML attributes + * @param array select options, when using a name + * @param string|array option key(s) that should be selected by default + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function dropdown($data, $options = NULL, $selected = NULL, $extra = '') + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + else + { + if (isset($data['options'])) + { + // Use data options + $options = $data['options']; + } + + if (isset($data['selected'])) + { + // Use data selected + $selected = $data['selected']; + } + } + + if (is_array($selected)) + { + // Multi-select box + $data['multiple'] = 'multiple'; + } + else + { + // Single selection (but converted to an array) + $selected = array($selected); + } + + $input = ''."\n"; + foreach ((array) $options as $key => $val) + { + // Key should always be a string + $key = (string) $key; + + if (is_array($val)) + { + $input .= ''."\n"; + foreach ($val as $inner_key => $inner_val) + { + // Inner key should always be a string + $inner_key = (string) $inner_key; + + $sel = in_array($inner_key, $selected) ? ' selected="selected"' : ''; + $input .= ''."\n"; + } + $input .= ''."\n"; + } + else + { + $sel = in_array($key, $selected) ? ' selected="selected"' : ''; + $input .= ''."\n"; + } + } + $input .= ''; + + return $input; + } + + /** + * Creates an HTML form checkbox input tag. + * + * @param string|array input name or an array of HTML attributes + * @param string input value, when using a name + * @param boolean make the checkbox checked by default + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function checkbox($data, $value = '', $checked = FALSE, $extra = '') + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + + $data['type'] = 'checkbox'; + + if ($checked == TRUE OR (isset($data['checked']) AND $data['checked'] == TRUE)) + { + $data['checked'] = 'checked'; + } + else + { + unset($data['checked']); + } + + return form::input($data, $value, $extra); + } + + /** + * Creates an HTML form radio input tag. + * + * @param string|array input name or an array of HTML attributes + * @param string input value, when using a name + * @param boolean make the radio selected by default + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function radio($data = '', $value = '', $checked = FALSE, $extra = '') + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + + $data['type'] = 'radio'; + + if ($checked == TRUE OR (isset($data['checked']) AND $data['checked'] == TRUE)) + { + $data['checked'] = 'checked'; + } + else + { + unset($data['checked']); + } + + return form::input($data, $value, $extra); + } + + /** + * Creates an HTML form submit input tag. + * + * @param string|array input name or an array of HTML attributes + * @param string input value, when using a name + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function submit($data = '', $value = '', $extra = '') + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + + if (empty($data['name'])) + { + // Remove the name if it is empty + unset($data['name']); + } + + $data['type'] = 'submit'; + + return form::input($data, $value, $extra); + } + + /** + * Creates an HTML form button input tag. + * + * @param string|array input name or an array of HTML attributes + * @param string input value, when using a name + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function button($data = '', $value = '', $extra = '') + { + if ( ! is_array($data)) + { + $data = array('name' => $data); + } + + if (empty($data['name'])) + { + // Remove the name if it is empty + unset($data['name']); + } + + if (isset($data['value']) AND empty($value)) + { + $value = arr::remove('value', $data); + } + + return ''.$value.''; + } + + /** + * Closes an open form tag. + * + * @param string string to be attached after the closing tag + * @return string + */ + public static function close($extra = '') + { + return ''."\n".$extra; + } + + /** + * Creates an HTML form label tag. + * + * @param string|array label "for" name or an array of HTML attributes + * @param string label text or HTML + * @param string a string to be attached to the end of the attributes + * @return string + */ + public static function label($data = '', $text = NULL, $extra = '') + { + if ( ! is_array($data)) + { + if (is_string($data)) + { + // Specify the input this label is for + $data = array('for' => $data); + } + else + { + // No input specified + $data = array(); + } + } + + if ($text === NULL AND isset($data['for'])) + { + // Make the text the human-readable input name + $text = ucwords(inflector::humanize($data['for'])); + } + + return ''.$text.''; + } + + /** + * Sorts a key/value array of HTML attributes, putting form attributes first, + * and returns an attribute string. + * + * @param array HTML attributes array + * @return string + */ + public static function attributes($attr, $type = NULL) + { + if (empty($attr)) + return ''; + + if (isset($attr['name']) AND empty($attr['id']) AND strpos($attr['name'], '[') === FALSE) + { + if ($type === NULL AND ! empty($attr['type'])) + { + // Set the type by the attributes + $type = $attr['type']; + } + + switch ($type) + { + case 'text': + case 'textarea': + case 'password': + case 'select': + case 'checkbox': + case 'file': + case 'image': + case 'button': + case 'submit': + // Only specific types of inputs use name to id matching + $attr['id'] = $attr['name']; + break; + } + } + + $order = array + ( + 'action', + 'method', + 'type', + 'id', + 'name', + 'value', + 'src', + 'size', + 'maxlength', + 'rows', + 'cols', + 'accept', + 'tabindex', + 'accesskey', + 'align', + 'alt', + 'title', + 'class', + 'style', + 'selected', + 'checked', + 'readonly', + 'disabled' + ); + + $sorted = array(); + foreach ($order as $key) + { + if (isset($attr[$key])) + { + // Move the attribute to the sorted array + $sorted[$key] = $attr[$key]; + + // Remove the attribute from unsorted array + unset($attr[$key]); + } + } + + // Combine the sorted and unsorted attributes and create an HTML string + return html::attributes(array_merge($sorted, $attr)); + } + +} // End form \ No newline at end of file diff --git a/Server/system/helpers/format.php b/Server/system/helpers/format.php new file mode 100644 index 0000000..fb8a029 --- /dev/null +++ b/Server/system/helpers/format.php @@ -0,0 +1,66 @@ +=')) + { + $str = htmlspecialchars($str, ENT_QUOTES, 'UTF-8', FALSE); + } + else + { + $str = preg_replace('/&(?!(?:#\d++|[a-z]++);)/ui', '&', $str); + $str = str_replace(array('<', '>', '\'', '"'), array('<', '>', ''', '"'), $str); + } + } + + return $str; + } + + /** + * Perform a html::specialchars() with additional URL specific encoding. + * + * @param string string to convert + * @param boolean encode existing entities + * @return string + */ + public static function specialurlencode($str, $double_encode = TRUE) + { + return str_replace(' ', '%20', html::specialchars($str, $double_encode)); + } + + /** + * Create HTML link anchors. + * + * @param string URL or URI string + * @param string link text + * @param array HTML anchor attributes + * @param string non-default protocol, eg: https + * @param boolean option to escape the title that is output + * @return string + */ + public static function anchor($uri, $title = NULL, $attributes = NULL, $protocol = NULL, $escape_title = FALSE) + { + if ($uri === '') + { + $site_url = url::base(FALSE); + } + elseif (strpos($uri, '#') === 0) + { + // This is an id target link, not a URL + $site_url = $uri; + } + elseif (strpos($uri, '://') === FALSE) + { + $site_url = url::site($uri, $protocol); + } + else + { + if (html::$windowed_urls === TRUE AND empty($attributes['target'])) + { + $attributes['target'] = '_blank'; + } + + $site_url = $uri; + } + + return + // Parsed URL + '' + // Title empty? Use the parsed URL + .($escape_title ? html::specialchars((($title === NULL) ? $site_url : $title), FALSE) : (($title === NULL) ? $site_url : $title)).''; + } + + /** + * Creates an HTML anchor to a file. + * + * @param string name of file to link to + * @param string link text + * @param array HTML anchor attributes + * @param string non-default protocol, eg: ftp + * @return string + */ + public static function file_anchor($file, $title = NULL, $attributes = NULL, $protocol = NULL) + { + return + // Base URL + URI = full URL + '' + // Title empty? Use the filename part of the URI + .(($title === NULL) ? end(explode('/', $file)) : $title) .''; + } + + /** + * Similar to anchor, but with the protocol parameter first. + * + * @param string link protocol + * @param string URI or URL to link to + * @param string link text + * @param array HTML anchor attributes + * @return string + */ + public static function panchor($protocol, $uri, $title = NULL, $attributes = FALSE) + { + return html::anchor($uri, $title, $attributes, $protocol); + } + + /** + * Create an array of anchors from an array of link/title pairs. + * + * @param array link/title pairs + * @return array + */ + public static function anchor_array(array $array) + { + $anchors = array(); + foreach ($array as $link => $title) + { + // Create list of anchors + $anchors[] = html::anchor($link, $title); + } + return $anchors; + } + + /** + * Generates an obfuscated version of an email address. + * + * @param string email address + * @return string + */ + public static function email($email) + { + $safe = ''; + foreach (str_split($email) as $letter) + { + switch (($letter === '@') ? rand(1, 2) : rand(1, 3)) + { + // HTML entity code + case 1: $safe .= '&#'.ord($letter).';'; break; + // Hex character code + case 2: $safe .= '&#x'.dechex(ord($letter)).';'; break; + // Raw (no) encoding + case 3: $safe .= $letter; + } + } + + return $safe; + } + + /** + * Creates an email anchor. + * + * @param string email address to send to + * @param string link text + * @param array HTML anchor attributes + * @return string + */ + public static function mailto($email, $title = NULL, $attributes = NULL) + { + if (empty($email)) + return $title; + + // Remove the subject or other parameters that do not need to be encoded + if (strpos($email, '?') !== FALSE) + { + // Extract the parameters from the email address + list ($email, $params) = explode('?', $email, 2); + + // Make the params into a query string, replacing spaces + $params = '?'.str_replace(' ', '%20', $params); + } + else + { + // No parameters + $params = ''; + } + + // Obfuscate email address + $safe = html::email($email); + + // Title defaults to the encoded email address + empty($title) and $title = $safe; + + // Parse attributes + empty($attributes) or $attributes = html::attributes($attributes); + + // Encoded start of the href="" is a static encoded version of 'mailto:' + return ''.$title.''; + } + + /** + * Generate a "breadcrumb" list of anchors representing the URI. + * + * @param array segments to use as breadcrumbs, defaults to using Router::$segments + * @return string + */ + public static function breadcrumb($segments = NULL) + { + empty($segments) and $segments = Router::$segments; + + $array = array(); + while ($segment = array_pop($segments)) + { + $array[] = html::anchor + ( + // Complete URI for the URL + implode('/', $segments).'/'.$segment, + // Title for the current segment + ucwords(inflector::humanize($segment)) + ); + } + + // Retrun the array of all the segments + return array_reverse($array); + } + + /** + * Creates a meta tag. + * + * @param string|array tag name, or an array of tags + * @param string tag "content" value + * @return string + */ + public static function meta($tag, $value = NULL) + { + if (is_array($tag)) + { + $tags = array(); + foreach ($tag as $t => $v) + { + // Build each tag and add it to the array + $tags[] = html::meta($t, $v); + } + + // Return all of the tags as a string + return implode("\n", $tags); + } + + // Set the meta attribute value + $attr = in_array(strtolower($tag), Kohana::config('http.meta_equiv')) ? 'http-equiv' : 'name'; + + return ''; + } + + /** + * Creates a stylesheet link. + * + * @param string|array filename, or array of filenames to match to array of medias + * @param string|array media type of stylesheet, or array to match filenames + * @param boolean include the index_page in the link + * @return string + */ + public static function stylesheet($style, $media = FALSE, $index = FALSE) + { + return html::link($style, 'stylesheet', 'text/css', '.css', $media, $index); + } + + /** + * Creates a link tag. + * + * @param string|array filename + * @param string|array relationship + * @param string|array mimetype + * @param string specifies suffix of the file + * @param string|array specifies on what device the document will be displayed + * @param boolean include the index_page in the link + * @return string + */ + public static function link($href, $rel, $type, $suffix = FALSE, $media = FALSE, $index = FALSE) + { + $compiled = ''; + + if (is_array($href)) + { + foreach ($href as $_href) + { + $_rel = is_array($rel) ? array_shift($rel) : $rel; + $_type = is_array($type) ? array_shift($type) : $type; + $_media = is_array($media) ? array_shift($media) : $media; + + $compiled .= html::link($_href, $_rel, $_type, $suffix, $_media, $index); + } + } + else + { + if (strpos($href, '://') === FALSE) + { + // Make the URL absolute + $href = url::base($index).$href; + } + + $length = strlen($suffix); + + if ( $length > 0 AND substr_compare($href, $suffix, -$length, $length, FALSE) !== 0) + { + // Add the defined suffix + $href .= $suffix; + } + + $attr = array + ( + 'rel' => $rel, + 'type' => $type, + 'href' => $href, + ); + + if ( ! empty($media)) + { + // Add the media type to the attributes + $attr['media'] = $media; + } + + $compiled = ''; + } + + return $compiled."\n"; + } + + /** + * Creates a script link. + * + * @param string|array filename + * @param boolean include the index_page in the link + * @return string + */ + public static function script($script, $index = FALSE) + { + $compiled = ''; + + if (is_array($script)) + { + foreach ($script as $name) + { + $compiled .= html::script($name, $index); + } + } + else + { + if (strpos($script, '://') === FALSE) + { + // Add the suffix only when it's not already present + $script = url::base((bool) $index).$script; + } + + if (substr_compare($script, '.js', -3, 3, FALSE) !== 0) + { + // Add the javascript suffix + $script .= '.js'; + } + + $compiled = ''; + } + + return $compiled."\n"; + } + + /** + * Creates a image link. + * + * @param string image source, or an array of attributes + * @param string|array image alt attribute, or an array of attributes + * @param boolean include the index_page in the link + * @return string + */ + public static function image($src = NULL, $alt = NULL, $index = FALSE) + { + // Create attribute list + $attributes = is_array($src) ? $src : array('src' => $src); + + if (is_array($alt)) + { + $attributes += $alt; + } + elseif ( ! empty($alt)) + { + // Add alt to attributes + $attributes['alt'] = $alt; + } + + if (strpos($attributes['src'], '://') === FALSE) + { + // Make the src attribute into an absolute URL + $attributes['src'] = url::base($index).$attributes['src']; + } + + return ''; + } + + /** + * Compiles an array of HTML attributes into an attribute string. + * + * @param string|array array of attributes + * @return string + */ + public static function attributes($attrs) + { + if (empty($attrs)) + return ''; + + if (is_string($attrs)) + return ' '.$attrs; + + $compiled = ''; + foreach ($attrs as $key => $val) + { + $compiled .= ' '.$key.'="'.html::specialchars($val).'"'; + } + + return $compiled; + } + +} // End html diff --git a/Server/system/helpers/inflector.php b/Server/system/helpers/inflector.php new file mode 100644 index 0000000..1e4fee2 --- /dev/null +++ b/Server/system/helpers/inflector.php @@ -0,0 +1,193 @@ + 1) + return $str; + + // Cache key name + $key = 'singular_'.$str.$count; + + if (isset(inflector::$cache[$key])) + return inflector::$cache[$key]; + + if (inflector::uncountable($str)) + return inflector::$cache[$key] = $str; + + if (empty(inflector::$irregular)) + { + // Cache irregular words + inflector::$irregular = Kohana::config('inflector.irregular'); + } + + if ($irregular = array_search($str, inflector::$irregular)) + { + $str = $irregular; + } + elseif (preg_match('/[sxz]es$/', $str) OR preg_match('/[^aeioudgkprt]hes$/', $str)) + { + // Remove "es" + $str = substr($str, 0, -2); + } + elseif (preg_match('/[^aeiou]ies$/', $str)) + { + $str = substr($str, 0, -3).'y'; + } + elseif (substr($str, -1) === 's' AND substr($str, -2) !== 'ss') + { + $str = substr($str, 0, -1); + } + + return inflector::$cache[$key] = $str; + } + + /** + * Makes a singular word plural. + * + * @param string word to pluralize + * @return string + */ + public static function plural($str, $count = NULL) + { + // Remove garbage + $str = strtolower(trim($str)); + + if (is_string($count)) + { + // Convert to integer when using a digit string + $count = (int) $count; + } + + // Do nothing with singular + if ($count === 1) + return $str; + + // Cache key name + $key = 'plural_'.$str.$count; + + if (isset(inflector::$cache[$key])) + return inflector::$cache[$key]; + + if (inflector::uncountable($str)) + return inflector::$cache[$key] = $str; + + if (empty(inflector::$irregular)) + { + // Cache irregular words + inflector::$irregular = Kohana::config('inflector.irregular'); + } + + if (isset(inflector::$irregular[$str])) + { + $str = inflector::$irregular[$str]; + } + elseif (preg_match('/[sxz]$/', $str) OR preg_match('/[^aeioudgkprt]h$/', $str)) + { + $str .= 'es'; + } + elseif (preg_match('/[^aeiou]y$/', $str)) + { + // Change "y" to "ies" + $str = substr_replace($str, 'ies', -1); + } + else + { + $str .= 's'; + } + + // Set the cache and return + return inflector::$cache[$key] = $str; + } + + /** + * Makes a phrase camel case. + * + * @param string phrase to camelize + * @return string + */ + public static function camelize($str) + { + $str = 'x'.strtolower(trim($str)); + $str = ucwords(preg_replace('/[\s_]+/', ' ', $str)); + + return substr(str_replace(' ', '', $str), 1); + } + + /** + * Makes a phrase underscored instead of spaced. + * + * @param string phrase to underscore + * @return string + */ + public static function underscore($str) + { + return preg_replace('/\s+/', '_', trim($str)); + } + + /** + * Makes an underscored or dashed phrase human-reable. + * + * @param string phrase to make human-reable + * @return string + */ + public static function humanize($str) + { + return preg_replace('/[_-]+/', ' ', trim($str)); + } + +} // End inflector \ No newline at end of file diff --git a/Server/system/helpers/num.php b/Server/system/helpers/num.php new file mode 100644 index 0000000..3eb5d5a --- /dev/null +++ b/Server/system/helpers/num.php @@ -0,0 +1,26 @@ + 0); + } + + /** + * Compare the q values for given array of content types and return the one with the highest value. + * If items are found to have the same q value, the first one encountered in the given array wins. + * If all items in the given array have a q value of 0, FALSE is returned. + * + * @param array content types + * @param boolean set to TRUE to disable wildcard checking + * @return mixed string mime type with highest q value, FALSE if none of the given types are accepted + */ + public static function preferred_accept($types, $explicit_check = FALSE) + { + // Initialize + $mime_types = array(); + $max_q = 0; + $preferred = FALSE; + + // Load q values for all given content types + foreach (array_unique($types) as $type) + { + $mime_types[$type] = request::accepts_at_quality($type, $explicit_check); + } + + // Look for the highest q value + foreach ($mime_types as $type => $q) + { + if ($q > $max_q) + { + $max_q = $q; + $preferred = $type; + } + } + + return $preferred; + } + + /** + * Returns quality factor at which the client accepts content type. + * + * @param string content type (e.g. "image/jpg", "jpg") + * @param boolean set to TRUE to disable wildcard checking + * @return integer|float + */ + public static function accepts_at_quality($type = NULL, $explicit_check = FALSE) + { + request::parse_accept_header(); + + // Normalize type + $type = strtolower((string) $type); + + // General content type (e.g. "jpg") + if (strpos($type, '/') === FALSE) + { + // Don't accept anything by default + $q = 0; + + // Look up relevant mime types + foreach ((array) Kohana::config('mimes.'.$type) as $type) + { + $q2 = request::accepts_at_quality($type, $explicit_check); + $q = ($q2 > $q) ? $q2 : $q; + } + + return $q; + } + + // Content type with subtype given (e.g. "image/jpg") + $type = explode('/', $type, 2); + + // Exact match + if (isset(request::$accept_types[$type[0]][$type[1]])) + return request::$accept_types[$type[0]][$type[1]]; + + // Wildcard match (if not checking explicitly) + if ($explicit_check === FALSE AND isset(request::$accept_types[$type[0]]['*'])) + return request::$accept_types[$type[0]]['*']; + + // Catch-all wildcard match (if not checking explicitly) + if ($explicit_check === FALSE AND isset(request::$accept_types['*']['*'])) + return request::$accept_types['*']['*']; + + // Content type not accepted + return 0; + } + + /** + * Parses client's HTTP Accept request header, and builds array structure representing it. + * + * @return void + */ + protected static function parse_accept_header() + { + // Run this function just once + if (request::$accept_types !== NULL) + return; + + // Initialize accept_types array + request::$accept_types = array(); + + // No HTTP Accept header found + if (empty($_SERVER['HTTP_ACCEPT'])) + { + // Accept everything + request::$accept_types['*']['*'] = 1; + return; + } + + // Remove linebreaks and parse the HTTP Accept header + foreach (explode(',', str_replace(array("\r", "\n"), '', $_SERVER['HTTP_ACCEPT'])) as $accept_entry) + { + // Explode each entry in content type and possible quality factor + $accept_entry = explode(';', trim($accept_entry), 2); + + // Explode each content type (e.g. "text/html") + $type = explode('/', $accept_entry[0], 2); + + // Skip invalid content types + if ( ! isset($type[1])) + continue; + + // Assume a default quality factor of 1 if no custom q value found + $q = (isset($accept_entry[1]) AND preg_match('~\bq\s*+=\s*+([.0-9]+)~', $accept_entry[1], $match)) ? (float) $match[1] : 1; + + // Populate accept_types array + if ( ! isset(request::$accept_types[$type[0]][$type[1]]) OR $q > request::$accept_types[$type[0]][$type[1]]) + { + request::$accept_types[$type[0]][$type[1]] = $q; + } + } + } + +} // End request \ No newline at end of file diff --git a/Server/system/helpers/security.php b/Server/system/helpers/security.php new file mode 100644 index 0000000..cd48d2e --- /dev/null +++ b/Server/system/helpers/security.php @@ -0,0 +1,47 @@ +xss_clean($str); + } + + /** + * Remove image tags from a string. + * + * @param string string to sanitize + * @return string + */ + public static function strip_image_tags($str) + { + return preg_replace('#\s]*)["\']?[^>]*)?>#is', '$1', $str); + } + + /** + * Remove PHP tags from a string. + * + * @param string string to sanitize + * @return string + */ + public static function encode_php_tags($str) + { + return str_replace(array(''), array('<?', '?>'), $str); + } + +} // End security \ No newline at end of file diff --git a/Server/system/helpers/text.php b/Server/system/helpers/text.php new file mode 100644 index 0000000..d0e573e --- /dev/null +++ b/Server/system/helpers/text.php @@ -0,0 +1,410 @@ + 1) + { + if (ctype_alpha($str)) + { + // Add a random digit + $str[mt_rand(0, $length - 1)] = chr(mt_rand(48, 57)); + } + elseif (ctype_digit($str)) + { + // Add a random letter + $str[mt_rand(0, $length - 1)] = chr(mt_rand(65, 90)); + } + } + + return $str; + } + + /** + * Reduces multiple slashes in a string to single slashes. + * + * @param string string to reduce slashes of + * @return string + */ + public static function reduce_slashes($str) + { + return preg_replace('#(? $badword) + { + $badwords[$key] = str_replace('\*', '\S*?', preg_quote((string) $badword)); + } + + $regex = '('.implode('|', $badwords).')'; + + if ($replace_partial_words == TRUE) + { + // Just using \b isn't sufficient when we need to replace a badword that already contains word boundaries itself + $regex = '(?<=\b|\s|^)'.$regex.'(?=\b|\s|$)'; + } + + $regex = '!'.$regex.'!ui'; + + if (utf8::strlen($replacement) == 1) + { + $regex .= 'e'; + return preg_replace($regex, 'str_repeat($replacement, utf8::strlen(\'$1\'))', $str); + } + + return preg_replace($regex, $replacement, $str); + } + + /** + * Finds the text that is similar between a set of words. + * + * @param array words to find similar text of + * @return string + */ + public static function similar(array $words) + { + // First word is the word to match against + $word = current($words); + + for ($i = 0, $max = strlen($word); $i < $max; ++$i) + { + foreach ($words as $w) + { + // Once a difference is found, break out of the loops + if ( ! isset($w[$i]) OR $w[$i] !== $word[$i]) + break 2; + } + } + + // Return the similar text + return substr($word, 0, $i); + } + + /** + * Converts text email addresses and anchors into links. + * + * @param string text to auto link + * @return string + */ + public static function auto_link($text) + { + // Auto link emails first to prevent problems with "www.domain.com@example.com" + return text::auto_link_urls(text::auto_link_emails($text)); + } + + /** + * Converts text anchors into links. + * + * @param string text to auto link + * @return string + */ + public static function auto_link_urls($text) + { + // Finds all http/https/ftp/ftps links that are not part of an existing html anchor + if (preg_match_all('~\b(?)(?:ht|f)tps?://\S+(?:/|\b)~i', $text, $matches)) + { + foreach ($matches[0] as $match) + { + // Replace each link with an anchor + $text = str_replace($match, html::anchor($match), $text); + } + } + + // Find all naked www.links.com (without http://) + if (preg_match_all('~\b(?|58;)(?!\.)[-+_a-z0-9.]++(? and
    markup to text. Basically nl2br() on steroids. + * + * @param string subject + * @return string + */ + public static function auto_p($str) + { + // Trim whitespace + if (($str = trim($str)) === '') + return ''; + + // Standardize newlines + $str = str_replace(array("\r\n", "\r"), "\n", $str); + + // Trim whitespace on each line + $str = preg_replace('~^[ \t]+~m', '', $str); + $str = preg_replace('~[ \t]+$~m', '', $str); + + // The following regexes only need to be executed if the string contains html + if ($html_found = (strpos($str, '<') !== FALSE)) + { + // Elements that should not be surrounded by p tags + $no_p = '(?:p|div|h[1-6r]|ul|ol|li|blockquote|d[dlt]|pre|t[dhr]|t(?:able|body|foot|head)|c(?:aption|olgroup)|form|s(?:elect|tyle)|a(?:ddress|rea)|ma(?:p|th))'; + + // Put at least two linebreaks before and after $no_p elements + $str = preg_replace('~^<'.$no_p.'[^>]*+>~im', "\n$0", $str); + $str = preg_replace('~$~im', "$0\n", $str); + } + + // Do the

    magic! + $str = '

    '.trim($str).'

    '; + $str = preg_replace('~\n{2,}~', "

    \n\n

    ", $str); + + // The following regexes only need to be executed if the string contains html + if ($html_found !== FALSE) + { + // Remove p tags around $no_p elements + $str = preg_replace('~

    (?=]*+>)~i', '', $str); + $str = preg_replace('~(]*+>)

    ~i', '$1', $str); + } + + // Convert single linebreaks to
    + $str = preg_replace('~(?\n", $str); + + return $str; + } + + /** + * Returns human readable sizes. + * @see Based on original functions written by: + * @see Aidan Lister: http://aidanlister.com/repos/v/function.size_readable.php + * @see Quentin Zervaas: http://www.phpriot.com/d/code/strings/filesize-format/ + * + * @param integer size in bytes + * @param string a definitive unit + * @param string the return string format + * @param boolean whether to use SI prefixes or IEC + * @return string + */ + public static function bytes($bytes, $force_unit = NULL, $format = NULL, $si = TRUE) + { + // Format string + $format = ($format === NULL) ? '%01.2f %s' : (string) $format; + + // IEC prefixes (binary) + if ($si == FALSE OR strpos($force_unit, 'i') !== FALSE) + { + $units = array('B', 'KiB', 'MiB', 'GiB', 'TiB', 'PiB'); + $mod = 1024; + } + // SI prefixes (decimal) + else + { + $units = array('B', 'kB', 'MB', 'GB', 'TB', 'PB'); + $mod = 1000; + } + + // Determine unit to use + if (($power = array_search((string) $force_unit, $units)) === FALSE) + { + $power = ($bytes > 0) ? floor(log($bytes, $mod)) : 0; + } + + return sprintf($format, $bytes / pow($mod, $power), $units[$power]); + } + + /** + * Prevents widow words by inserting a non-breaking space between the last two words. + * @see http://www.shauninman.com/archive/2006/08/22/widont_wordpress_plugin + * + * @param string string to remove widows from + * @return string + */ + public static function widont($str) + { + $str = rtrim($str); + $space = strrpos($str, ' '); + + if ($space !== FALSE) + { + $str = substr($str, 0, $space).' '.substr($str, $space + 1); + } + + return $str; + } + +} // End text \ No newline at end of file diff --git a/Server/system/helpers/upload.php b/Server/system/helpers/upload.php new file mode 100644 index 0000000..422e9e8 --- /dev/null +++ b/Server/system/helpers/upload.php @@ -0,0 +1,162 @@ + 'Refresh', + '300' => 'Multiple Choices', + '301' => 'Moved Permanently', + '302' => 'Found', + '303' => 'See Other', + '304' => 'Not Modified', + '305' => 'Use Proxy', + '307' => 'Temporary Redirect' + ); + + // Validate the method and default to 302 + $method = isset($codes[$method]) ? (string) $method : '302'; + + if ($method === '300') + { + $uri = (array) $uri; + + $output = '
      '; + foreach ($uri as $link) + { + $output .= '
    • '.html::anchor($link).'
      • '; + } + $output .= '
    '; + + // The first URI will be used for the Location header + $uri = $uri[0]; + } + else + { + $output = '

    '.html::anchor($uri).'

    '; + } + + // Run the redirect event + Event::run('system.redirect', $uri); + + if (strpos($uri, '://') === FALSE) + { + // HTTP headers expect absolute URLs + $uri = url::site($uri, request::protocol()); + } + + if ($method === 'refresh') + { + header('Refresh: 0; url='.$uri); + } + else + { + header('HTTP/1.1 '.$method.' '.$codes[$method]); + header('Location: '.$uri); + } + + // We are about to exit, so run the send_headers event + Event::run('system.send_headers'); + + exit('

    '.$method.' - '.$codes[$method].'

    '.$output); + } + +} // End url \ No newline at end of file diff --git a/Server/system/helpers/valid.php b/Server/system/helpers/valid.php new file mode 100644 index 0000000..8a3583b --- /dev/null +++ b/Server/system/helpers/valid.php @@ -0,0 +1,338 @@ += 0; $i -= 2) + { + // Add up every 2nd digit, starting from the right + $checksum += $number[$i]; + } + + for ($i = $length - 2; $i >= 0; $i -= 2) + { + // Add up every 2nd digit doubled, starting from the right + $double = $number[$i] * 2; + + // Subtract 9 from the double where value is greater than 10 + $checksum += ($double >= 10) ? $double - 9 : $double; + } + + // If the checksum is a multiple of 10, the number is valid + return ($checksum % 10 === 0); + } + + /** + * Checks if a phone number is valid. + * + * @param string phone number to check + * @return boolean + */ + public static function phone($number, $lengths = NULL) + { + if ( ! is_array($lengths)) + { + $lengths = array(7,10,11); + } + + // Remove all non-digit characters from the number + $number = preg_replace('/\D+/', '', $number); + + // Check if the number is within range + return in_array(strlen($number), $lengths); + } + + /** + * Tests if a string is a valid date string. + * + * @param string date to check + * @return boolean + */ + public static function date($str) + { + return (strtotime($str) !== FALSE); + } + + /** + * Checks whether a string consists of alphabetical characters only. + * + * @param string input string + * @param boolean trigger UTF-8 compatibility + * @return boolean + */ + public static function alpha($str, $utf8 = FALSE) + { + return ($utf8 === TRUE) + ? (bool) preg_match('/^\pL++$/uD', (string) $str) + : ctype_alpha((string) $str); + } + + /** + * Checks whether a string consists of alphabetical characters and numbers only. + * + * @param string input string + * @param boolean trigger UTF-8 compatibility + * @return boolean + */ + public static function alpha_numeric($str, $utf8 = FALSE) + { + return ($utf8 === TRUE) + ? (bool) preg_match('/^[\pL\pN]++$/uD', (string) $str) + : ctype_alnum((string) $str); + } + + /** + * Checks whether a string consists of alphabetical characters, numbers, underscores and dashes only. + * + * @param string input string + * @param boolean trigger UTF-8 compatibility + * @return boolean + */ + public static function alpha_dash($str, $utf8 = FALSE) + { + return ($utf8 === TRUE) + ? (bool) preg_match('/^[-\pL\pN_]++$/uD', (string) $str) + : (bool) preg_match('/^[-a-z0-9_]++$/iD', (string) $str); + } + + /** + * Checks whether a string consists of digits only (no dots or dashes). + * + * @param string input string + * @param boolean trigger UTF-8 compatibility + * @return boolean + */ + public static function digit($str, $utf8 = FALSE) + { + return ($utf8 === TRUE) + ? (bool) preg_match('/^\pN++$/uD', (string) $str) + : ctype_digit((string) $str); + } + + /** + * Checks whether a string is a valid number (negative and decimal numbers allowed). + * + * @see Uses locale conversion to allow decimal point to be locale specific. + * @see http://www.php.net/manual/en/function.localeconv.php + * + * @param string input string + * @return boolean + */ + public static function numeric($str) + { + // Use localeconv to set the decimal_point value: Usually a comma or period. + $locale = localeconv(); + return (bool) preg_match('/^-?[0-9'.$locale['decimal_point'].']++$/D', (string) $str); + } + + /** + * Checks whether a string is a valid text. Letters, numbers, whitespace, + * dashes, periods, and underscores are allowed. + * + * @param string text to check + * @return boolean + */ + public static function standard_text($str) + { + // pL matches letters + // pN matches numbers + // pZ matches whitespace + // pPc matches underscores + // pPd matches dashes + // pPo matches normal puncuation + return (bool) preg_match('/^[\pL\pN\pZ\p{Pc}\p{Pd}\p{Po}]++$/uD', (string) $str); + } + + /** + * Checks if a string is a proper decimal format. The format array can be + * used to specify a decimal length, or a number and decimal length, eg: + * array(2) would force the number to have 2 decimal places, array(4,2) + * would force the number to have 4 digits and 2 decimal places. + * + * @param string input string + * @param array decimal format: y or x,y + * @return boolean + */ + public static function decimal($str, $format = NULL) + { + // Create the pattern + $pattern = '/^[0-9]%s\.[0-9]%s$/'; + + if ( ! empty($format)) + { + if (count($format) > 1) + { + // Use the format for number and decimal length + $pattern = sprintf($pattern, '{'.$format[0].'}', '{'.$format[1].'}'); + } + elseif (count($format) > 0) + { + // Use the format as decimal length + $pattern = sprintf($pattern, '+', '{'.$format[0].'}'); + } + } + else + { + // No format + $pattern = sprintf($pattern, '+', '+'); + } + + return (bool) preg_match($pattern, (string) $str); + } + +} // End valid \ No newline at end of file diff --git a/Server/system/i18n/en_US/cache.php b/Server/system/i18n/en_US/cache.php new file mode 100644 index 0000000..bef0279 --- /dev/null +++ b/Server/system/i18n/en_US/cache.php @@ -0,0 +1,10 @@ + 'The %s group is not defined in your configuration.', + 'extension_not_loaded' => 'The %s PHP extension must be loaded to use this driver.', + 'unwritable' => 'The configured storage location, %s, is not writable.', + 'resources' => 'Caching of resources is impossible, because resources cannot be serialized.', + 'driver_error' => '%s', +); \ No newline at end of file diff --git a/Server/system/i18n/en_US/calendar.php b/Server/system/i18n/en_US/calendar.php new file mode 100644 index 0000000..21dad22 --- /dev/null +++ b/Server/system/i18n/en_US/calendar.php @@ -0,0 +1,59 @@ + 'Su', + 'mo' => 'Mo', + 'tu' => 'Tu', + 'we' => 'We', + 'th' => 'Th', + 'fr' => 'Fr', + 'sa' => 'Sa', + + // Short day names + 'sun' => 'Sun', + 'mon' => 'Mon', + 'tue' => 'Tue', + 'wed' => 'Wed', + 'thu' => 'Thu', + 'fri' => 'Fri', + 'sat' => 'Sat', + + // Long day names + 'sunday' => 'Sunday', + 'monday' => 'Monday', + 'tuesday' => 'Tuesday', + 'wednesday' => 'Wednesday', + 'thursday' => 'Thursday', + 'friday' => 'Friday', + 'saturday' => 'Saturday', + + // Short month names + 'jan' => 'Jan', + 'feb' => 'Feb', + 'mar' => 'Mar', + 'apr' => 'Apr', + 'may' => 'May', + 'jun' => 'Jun', + 'jul' => 'Jul', + 'aug' => 'Aug', + 'sep' => 'Sep', + 'oct' => 'Oct', + 'nov' => 'Nov', + 'dec' => 'Dec', + + // Long month names + 'january' => 'January', + 'february' => 'February', + 'march' => 'March', + 'april' => 'April', + 'mayl' => 'May', + 'june' => 'June', + 'july' => 'July', + 'august' => 'August', + 'september' => 'September', + 'october' => 'October', + 'november' => 'November', + 'december' => 'December' +); \ No newline at end of file diff --git a/Server/system/i18n/en_US/captcha.php b/Server/system/i18n/en_US/captcha.php new file mode 100644 index 0000000..6040471 --- /dev/null +++ b/Server/system/i18n/en_US/captcha.php @@ -0,0 +1,33 @@ + 'The specified file, %s, was not found. Please verify that files exist by using file_exists() before using them.', + 'requires_GD2' => 'The Captcha library requires GD2 with FreeType support. Please see http://php.net/gd_info for more information.', + + // Words of varying length for the Captcha_Word_Driver to pick from + // Note: use only alphanumeric characters + 'words' => array + ( + 'cd', 'tv', 'it', 'to', 'be', 'or', + 'sun', 'car', 'dog', 'bed', 'kid', 'egg', + 'bike', 'tree', 'bath', 'roof', 'road', 'hair', + 'hello', 'world', 'earth', 'beard', 'chess', 'water', + 'barber', 'bakery', 'banana', 'market', 'purple', 'writer', + 'america', 'release', 'playing', 'working', 'foreign', 'general', + 'aircraft', 'computer', 'laughter', 'alphabet', 'kangaroo', 'spelling', + 'architect', 'president', 'cockroach', 'encounter', 'terrorism', 'cylinders', + ), + + // Riddles for the Captcha_Riddle_Driver to pick from + // Note: use only alphanumeric characters + 'riddles' => array + ( + array('Do you hate spam? (yes or no)', 'yes'), + array('Are you a robot? (yes or no)', 'no'), + array('Fire is... (hot or cold)', 'hot'), + array('The season after fall is...', 'winter'), + array('Which day of the week is it today?', strftime('%A')), + array('Which month of the year are we in?', strftime('%B')), + ), +); diff --git a/Server/system/i18n/en_US/core.php b/Server/system/i18n/en_US/core.php new file mode 100644 index 0000000..9711b7c --- /dev/null +++ b/Server/system/i18n/en_US/core.php @@ -0,0 +1,34 @@ + 'There can be only one instance of Kohana per page request', + 'uncaught_exception' => 'Uncaught %s: %s in file %s on line %s', + 'invalid_method' => 'Invalid method %s called in %s', + 'invalid_property' => 'The %s property does not exist in the %s class.', + 'log_dir_unwritable' => 'The log directory is not writable: %s', + 'resource_not_found' => 'The requested %s, %s, could not be found', + 'invalid_filetype' => 'The requested filetype, .%s, is not allowed in your view configuration file', + 'view_set_filename' => 'You must set the the view filename before calling render', + 'no_default_route' => 'Please set a default route in config/routes.php', + 'no_controller' => 'Kohana was not able to determine a controller to process this request: %s', + 'page_not_found' => 'The page you requested, %s, could not be found.', + 'stats_footer' => 'Loaded in {execution_time} seconds, using {memory_usage} of memory. Generated by Kohana v{kohana_version}.', + 'error_file_line' => '%s [%s]:', + 'stack_trace' => 'Stack Trace', + 'generic_error' => 'Unable to Complete Request', + 'errors_disabled' => 'You can go to the home page or try again.', + + // Drivers + 'driver_implements' => 'The %s driver for the %s library must implement the %s interface', + 'driver_not_found' => 'The %s driver for the %s library could not be found', + + // Resource names + 'config' => 'config file', + 'controller' => 'controller', + 'helper' => 'helper', + 'library' => 'library', + 'driver' => 'driver', + 'model' => 'model', + 'view' => 'view', +); diff --git a/Server/system/i18n/en_US/database.php b/Server/system/i18n/en_US/database.php new file mode 100644 index 0000000..172e5c9 --- /dev/null +++ b/Server/system/i18n/en_US/database.php @@ -0,0 +1,15 @@ + 'The %s group is not defined in your configuration.', + 'error' => 'There was an SQL error: %s', + 'connection' => 'There was an error connecting to the database: %s', + 'invalid_dsn' => 'The DSN you supplied is not valid: %s', + 'must_use_set' => 'You must set a SET clause for your query.', + 'must_use_where' => 'You must set a WHERE clause for your query.', + 'must_use_table' => 'You must set a database table for your query.', + 'table_not_found' => 'Table %s does not exist in your database.', + 'not_implemented' => 'The method you called, %s, is not supported by this driver.', + 'result_read_only' => 'Query results are read only.' +); \ No newline at end of file diff --git a/Server/system/i18n/en_US/encrypt.php b/Server/system/i18n/en_US/encrypt.php new file mode 100644 index 0000000..9afd620 --- /dev/null +++ b/Server/system/i18n/en_US/encrypt.php @@ -0,0 +1,8 @@ + 'The %s group is not defined in your configuration.', + 'requires_mcrypt' => 'To use the Encrypt library, mcrypt must be enabled in your PHP installation', + 'no_encryption_key' => 'To use the Encrypt library, you must set an encryption key in your config file' +); diff --git a/Server/system/i18n/en_US/errors.php b/Server/system/i18n/en_US/errors.php new file mode 100644 index 0000000..83341a2 --- /dev/null +++ b/Server/system/i18n/en_US/errors.php @@ -0,0 +1,16 @@ + array( 1, 'Framework Error', 'Please check the Kohana documentation for information about the following error.'), + E_PAGE_NOT_FOUND => array( 1, 'Page Not Found', 'The requested page was not found. It may have moved, been deleted, or archived.'), + E_DATABASE_ERROR => array( 1, 'Database Error', 'A database error occurred while performing the requested procedure. Please review the database error below for more information.'), + E_RECOVERABLE_ERROR => array( 1, 'Recoverable Error', 'An error was detected which prevented the loading of this page. If this problem persists, please contact the website administrator.'), + E_ERROR => array( 1, 'Fatal Error', ''), + E_USER_ERROR => array( 1, 'Fatal Error', ''), + E_PARSE => array( 1, 'Syntax Error', ''), + E_WARNING => array( 1, 'Warning Message', ''), + E_USER_WARNING => array( 1, 'Warning Message', ''), + E_STRICT => array( 2, 'Strict Mode Error', ''), + E_NOTICE => array( 2, 'Runtime Message', ''), +); \ No newline at end of file diff --git a/Server/system/i18n/en_US/event.php b/Server/system/i18n/en_US/event.php new file mode 100644 index 0000000..282a0a2 --- /dev/null +++ b/Server/system/i18n/en_US/event.php @@ -0,0 +1,7 @@ + 'Attempt to attach invalid subject %s to %s failed: Subjects must extend the Event_Subject class', + 'invalid_observer' => 'Attempt to attach invalid observer %s to %s failed: Observers must extend the Event_Observer class', +); diff --git a/Server/system/i18n/en_US/image.php b/Server/system/i18n/en_US/image.php new file mode 100644 index 0000000..9f18493 --- /dev/null +++ b/Server/system/i18n/en_US/image.php @@ -0,0 +1,33 @@ + 'The Image library requires the getimagesize() PHP function, which is not available in your installation.', + 'unsupported_method' => 'Your configured driver does not support the %s image transformation.', + 'file_not_found' => 'The specified image, %s, was not found. Please verify that images exist by using file_exists() before manipulating them.', + 'type_not_allowed' => 'The specified image, %s, is not an allowed image type.', + 'invalid_width' => 'The width you specified, %s, is not valid.', + 'invalid_height' => 'The height you specified, %s, is not valid.', + 'invalid_dimensions' => 'The dimensions specified for %s are not valid.', + 'invalid_master' => 'The master dimension specified is not valid.', + 'invalid_flip' => 'The flip direction specified is not valid.', + 'directory_unwritable' => 'The specified directory, %s, is not writable.', + + // ImageMagick specific messages + 'imagemagick' => array + ( + 'not_found' => 'The ImageMagick directory specified does not contain a required program, %s.', + ), + + // GraphicsMagick specific messages + 'graphicsmagick' => array + ( + 'not_found' => 'The GraphicsMagick directory specified does not contain a required program, %s.', + ), + + // GD specific messages + 'gd' => array + ( + 'requires_v2' => 'The Image library requires GD2. Please see http://php.net/gd_info for more information.', + ), +); diff --git a/Server/system/i18n/en_US/orm.php b/Server/system/i18n/en_US/orm.php new file mode 100644 index 0000000..3c5720b --- /dev/null +++ b/Server/system/i18n/en_US/orm.php @@ -0,0 +1,3 @@ + 'The %s group is not defined in your pagination configuration.', + 'page' => 'page', + 'pages' => 'pages', + 'item' => 'item', + 'items' => 'items', + 'of' => 'of', + 'first' => 'first', + 'last' => 'last', + 'previous' => 'previous', + 'next' => 'next', +); diff --git a/Server/system/i18n/en_US/profiler.php b/Server/system/i18n/en_US/profiler.php new file mode 100644 index 0000000..a39c2f5 --- /dev/null +++ b/Server/system/i18n/en_US/profiler.php @@ -0,0 +1,15 @@ + 'Benchmarks', + 'post_data' => 'Post Data', + 'no_post' => 'No post data', + 'session_data' => 'Session Data', + 'no_session' => 'No session data', + 'queries' => 'Database Queries', + 'no_queries' => 'No queries', + 'no_database' => 'Database not loaded', + 'cookie_data' => 'Cookie Data', + 'no_cookie' => 'No cookie data', +); diff --git a/Server/system/i18n/en_US/session.php b/Server/system/i18n/en_US/session.php new file mode 100644 index 0000000..ee781c6 --- /dev/null +++ b/Server/system/i18n/en_US/session.php @@ -0,0 +1,6 @@ + 'The session_name, %s, is invalid. It must contain only alphanumeric characters and underscores. Also at least one letter must be present.', +); \ No newline at end of file diff --git a/Server/system/i18n/en_US/swift.php b/Server/system/i18n/en_US/swift.php new file mode 100644 index 0000000..249c4a8 --- /dev/null +++ b/Server/system/i18n/en_US/swift.php @@ -0,0 +1,6 @@ + 'An error occurred while sending the email message.' +); \ No newline at end of file diff --git a/Server/system/i18n/en_US/upload.php b/Server/system/i18n/en_US/upload.php new file mode 100644 index 0000000..7f6e216 --- /dev/null +++ b/Server/system/i18n/en_US/upload.php @@ -0,0 +1,6 @@ + 'The upload destination folder, %s, does not appear to be writable.', +); \ No newline at end of file diff --git a/Server/system/i18n/en_US/validation.php b/Server/system/i18n/en_US/validation.php new file mode 100644 index 0000000..d98e548 --- /dev/null +++ b/Server/system/i18n/en_US/validation.php @@ -0,0 +1,41 @@ + 'Invalid validation rule used: %s', + 'i18n_array' => 'The %s i18n key must be an array to be used with the in_lang rule', + 'not_callable' => 'Callback %s used for Validation is not callable', + + // General errors + 'unknown_error' => 'Unknown validation error while validating the %s field.', + 'required' => 'The %s field is required.', + 'min_length' => 'The %s field must be at least %d characters long.', + 'max_length' => 'The %s field must be %d characters or fewer.', + 'exact_length' => 'The %s field must be exactly %d characters.', + 'in_array' => 'The %s field must be selected from the options listed.', + 'matches' => 'The %s field must match the %s field.', + 'valid_url' => 'The %s field must contain a valid URL.', + 'valid_email' => 'The %s field must contain a valid email address.', + 'valid_ip' => 'The %s field must contain a valid IP address.', + 'valid_type' => 'The %s field must only contain %s characters.', + 'range' => 'The %s field must be between specified ranges.', + 'regex' => 'The %s field does not match accepted input.', + 'depends_on' => 'The %s field depends on the %s field.', + + // Upload errors + 'user_aborted' => 'The %s file was aborted during upload.', + 'invalid_type' => 'The %s file is not an allowed file type.', + 'max_size' => 'The %s file you uploaded was too large. The maximum size allowed is %s.', + 'max_width' => 'The %s file you uploaded was too big. The maximum allowed width is %spx.', + 'max_height' => 'The %s file you uploaded was too big. The maximum allowed height is %spx.', + 'min_width' => 'The %s file you uploaded was too small. The minimum allowed width is %spx.', + 'min_height' => 'The %s file you uploaded was too small. The minimum allowed height is %spx.', + + // Field types + 'alpha' => 'alphabetical', + 'alpha_numeric' => 'alphabetical and numeric', + 'alpha_dash' => 'alphabetical, dash, and underscore', + 'digit' => 'digit', + 'numeric' => 'numeric', +); diff --git a/Server/system/libraries/Cache.php b/Server/system/libraries/Cache.php new file mode 100644 index 0000000..8a02a90 --- /dev/null +++ b/Server/system/libraries/Cache.php @@ -0,0 +1,208 @@ +config = $config; + + // Set driver name + $driver = 'Cache_'.ucfirst($this->config['driver']).'_Driver'; + + // Load the driver + if ( ! Kohana::auto_load($driver)) + throw new Kohana_Exception('core.driver_not_found', $this->config['driver'], get_class($this)); + + // Initialize the driver + $this->driver = new $driver($this->config['params']); + + // Validate the driver + if ( ! ($this->driver instanceof Cache_Driver)) + throw new Kohana_Exception('core.driver_implements', $this->config['driver'], get_class($this), 'Cache_Driver'); + + Kohana::log('debug', 'Cache Library initialized'); + + if (Cache::$loaded !== TRUE) + { + $this->config['requests'] = (int) $this->config['requests']; + + if ($this->config['requests'] > 0 AND mt_rand(1, $this->config['requests']) === 1) + { + // Do garbage collection + $this->driver->delete_expired(); + + Kohana::log('debug', 'Cache: Expired caches deleted.'); + } + + // Cache has been loaded once + Cache::$loaded = TRUE; + } + } + + /** + * Fetches a cache by id. NULL is returned when a cache item is not found. + * + * @param string cache id + * @return mixed cached data or NULL + */ + public function get($id) + { + // Sanitize the ID + $id = $this->sanitize_id($id); + + return $this->driver->get($id); + } + + /** + * Fetches all of the caches for a given tag. An empty array will be + * returned when no matching caches are found. + * + * @param string cache tag + * @return array all cache items matching the tag + */ + public function find($tag) + { + return $this->driver->find($tag); + } + + /** + * Set a cache item by id. Tags may also be added and a custom lifetime + * can be set. Non-string data is automatically serialized. + * + * @param string unique cache id + * @param mixed data to cache + * @param array|string tags for this item + * @param integer number of seconds until the cache expires + * @return boolean + */ + function set($id, $data, $tags = NULL, $lifetime = NULL) + { + if (is_resource($data)) + throw new Kohana_Exception('cache.resources'); + + // Sanitize the ID + $id = $this->sanitize_id($id); + + if ($lifetime === NULL) + { + // Get the default lifetime + $lifetime = $this->config['lifetime']; + } + + return $this->driver->set($id, $data, (array) $tags, $lifetime); + } + + /** + * Delete a cache item by id. + * + * @param string cache id + * @return boolean + */ + public function delete($id) + { + // Sanitize the ID + $id = $this->sanitize_id($id); + + return $this->driver->delete($id); + } + + /** + * Delete all cache items with a given tag. + * + * @param string cache tag name + * @return boolean + */ + public function delete_tag($tag) + { + return $this->driver->delete($tag, TRUE); + } + + /** + * Delete ALL cache items items. + * + * @return boolean + */ + public function delete_all() + { + return $this->driver->delete(TRUE); + } + + /** + * Replaces troublesome characters with underscores. + * + * @param string cache id + * @return string + */ + protected function sanitize_id($id) + { + // Change slashes and spaces to underscores + return str_replace(array('/', '\\', ' '), '_', $id); + } + +} // End Cache diff --git a/Server/system/libraries/Calendar.php b/Server/system/libraries/Calendar.php new file mode 100644 index 0000000..193a6fb --- /dev/null +++ b/Server/system/libraries/Calendar.php @@ -0,0 +1,362 @@ + 3) ? '%A' : '%a'; + + // Days of the week + $days = array('Sunday', 'Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday'); + + if (Calendar::$start_monday === TRUE) + { + // Push Sunday to the end of the days + array_push($days, array_shift($days)); + } + + if (strpos(Kohana::config('locale.language.0'), 'en') !== 0) + { + // This is a bit awkward, but it works properly and is reliable + foreach ($days as $i => $day) + { + // Convert the English names to i18n names + $days[$i] = strftime($format, strtotime($day)); + } + } + + if (is_int($length) OR ctype_digit($length)) + { + foreach ($days as $i => $day) + { + // Shorten the days to the expected length + $days[$i] = utf8::substr($day, 0, $length); + } + } + + return $days; + } + + /** + * Create a new Calendar instance. A month and year can be specified. + * By default, the current month and year are used. + * + * @param integer month number + * @param integer year number + * @return object + */ + public static function factory($month = NULL, $year = NULL) + { + return new Calendar($month, $year); + } + + /** + * Create a new Calendar instance. A month and year can be specified. + * By default, the current month and year are used. + * + * @param integer month number + * @param integer year number + * @return void + */ + public function __construct($month = NULL, $year = NULL) + { + empty($month) and $month = date('n'); // Current month + empty($year) and $year = date('Y'); // Current year + + // Set the month and year + $this->month = (int) $month; + $this->year = (int) $year; + + if (Calendar::$start_monday === TRUE) + { + // Week starts on Monday + $this->week_start = 1; + } + } + + /** + * Allows fetching the current month and year. + * + * @param string key to get + * @return mixed + */ + public function __get($key) + { + if ($key === 'month' OR $key === 'year') + { + return $this->$key; + } + } + + /** + * Calendar_Event factory method. + * + * @param string unique name for the event + * @return object Calendar_Event + */ + public function event($name = NULL) + { + return new Calendar_Event($this); + } + + /** + * Calendar_Event factory method. + * + * @chainable + * @param string standard event type + * @return object + */ + public function standard($name) + { + switch ($name) + { + case 'today': + // Add an event for the current day + $this->attach($this->event()->condition('timestamp', strtotime('today'))->add_class('today')); + break; + case 'prev-next': + // Add an event for padding days + $this->attach($this->event()->condition('current', FALSE)->add_class('prev-next')); + break; + case 'holidays': + // Base event + $event = $this->event()->condition('current', TRUE)->add_class('holiday'); + + // Attach New Years + $holiday = clone $event; + $this->attach($holiday->condition('month', 1)->condition('day', 1)); + + // Attach Valentine's Day + $holiday = clone $event; + $this->attach($holiday->condition('month', 2)->condition('day', 14)); + + // Attach St. Patrick's Day + $holiday = clone $event; + $this->attach($holiday->condition('month', 3)->condition('day', 17)); + + // Attach Easter + $holiday = clone $event; + $this->attach($holiday->condition('easter', TRUE)); + + // Attach Memorial Day + $holiday = clone $event; + $this->attach($holiday->condition('month', 5)->condition('day_of_week', 1)->condition('last_occurrence', TRUE)); + + // Attach Independance Day + $holiday = clone $event; + $this->attach($holiday->condition('month', 7)->condition('day', 4)); + + // Attach Labor Day + $holiday = clone $event; + $this->attach($holiday->condition('month', 9)->condition('day_of_week', 1)->condition('occurrence', 1)); + + // Attach Halloween + $holiday = clone $event; + $this->attach($holiday->condition('month', 10)->condition('day', 31)); + + // Attach Thanksgiving + $holiday = clone $event; + $this->attach($holiday->condition('month', 11)->condition('day_of_week', 4)->condition('occurrence', 4)); + + // Attach Christmas + $holiday = clone $event; + $this->attach($holiday->condition('month', 12)->condition('day', 25)); + break; + case 'weekends': + // Weekend events + $this->attach($this->event()->condition('weekend', TRUE)->add_class('weekend')); + break; + } + + return $this; + } + + /** + * Returns an array for use with a view. The array contains an array for + * each week. Each week contains 7 arrays, with a day number and status: + * TRUE if the day is in the month, FALSE if it is padding. + * + * @return array + */ + public function weeks() + { + // First day of the month as a timestamp + $first = mktime(1, 0, 0, $this->month, 1, $this->year); + + // Total number of days in this month + $total = (int) date('t', $first); + + // Last day of the month as a timestamp + $last = mktime(1, 0, 0, $this->month, $total, $this->year); + + // Make the month and week empty arrays + $month = $week = array(); + + // Number of days added. When this reaches 7, start a new week + $days = 0; + $week_number = 1; + + if (($w = (int) date('w', $first) - $this->week_start) < 0) + { + $w = 6; + } + + if ($w > 0) + { + // Number of days in the previous month + $n = (int) date('t', mktime(1, 0, 0, $this->month - 1, 1, $this->year)); + + // i = number of day, t = number of days to pad + for ($i = $n - $w + 1, $t = $w; $t > 0; $t--, $i++) + { + // Notify the listeners + $this->notify(array($this->month - 1, $i, $this->year, $week_number, FALSE)); + + // Add previous month padding days + $week[] = array($i, FALSE, $this->observed_data); + $days++; + } + } + + // i = number of day + for ($i = 1; $i <= $total; $i++) + { + if ($days % 7 === 0) + { + // Start a new week + $month[] = $week; + $week = array(); + + $week_number++; + } + + // Notify the listeners + $this->notify(array($this->month, $i, $this->year, $week_number, TRUE)); + + // Add days to this month + $week[] = array($i, TRUE, $this->observed_data); + $days++; + } + + if (($w = (int) date('w', $last) - $this->week_start) < 0) + { + $w = 6; + } + + if ($w >= 0) + { + // i = number of day, t = number of days to pad + for ($i = 1, $t = 6 - $w; $t > 0; $t--, $i++) + { + // Notify the listeners + $this->notify(array($this->month + 1, $i, $this->year, $week_number, FALSE)); + + // Add next month padding days + $week[] = array($i, FALSE, $this->observed_data); + } + } + + if ( ! empty($week)) + { + // Append the remaining days + $month[] = $week; + } + + return $month; + } + + /** + * Adds new data from an observer. All event data contains and array of CSS + * classes and an array of output messages. + * + * @param array observer data. + * @return void + */ + public function add_data(array $data) + { + // Add new classes + $this->observed_data['classes'] += $data['classes']; + + if ( ! empty($data['output'])) + { + // Only add output if it's not empty + $this->observed_data['output'][] = $data['output']; + } + } + + /** + * Resets the observed data and sends a notify to all attached events. + * + * @param array UNIX timestamp + * @return void + */ + public function notify($data) + { + // Reset observed data + $this->observed_data = array + ( + 'classes' => array(), + 'output' => array(), + ); + + // Send a notify + parent::notify($data); + } + + /** + * Convert the calendar to HTML using the kohana_calendar view. + * + * @return string + */ + public function render() + { + $view = new View('kohana_calendar', array + ( + 'month' => $this->month, + 'year' => $this->year, + 'weeks' => $this->weeks(), + )); + + return $view->render(); + } + + /** + * Magically convert this object to a string, the rendered calendar. + * + * @return string + */ + public function __toString() + { + return $this->render(); + } + +} // End Calendar \ No newline at end of file diff --git a/Server/system/libraries/Calendar_Event.php b/Server/system/libraries/Calendar_Event.php new file mode 100644 index 0000000..ba9b5ad --- /dev/null +++ b/Server/system/libraries/Calendar_Event.php @@ -0,0 +1,307 @@ +conditions[$key]); + } + else + { + if ($key === 'callback') + { + // Do nothing + } + elseif (in_array($key, $this->booleans)) + { + // Make the value boolean + $value = (bool) $value; + } + else + { + // Make the value an int + $value = (int) $value; + } + + $this->conditions[$key] = $value; + } + + return $this; + } + + /** + * Add a CSS class for this event. This can be called multiple times. + * + * @chainable + * @param string CSS class name + * @return object + */ + public function add_class($class) + { + $this->classes[$class] = $class; + + return $this; + } + + /** + * Remove a CSS class for this event. This can be called multiple times. + * + * @chainable + * @param string CSS class name + * @return object + */ + public function remove_class($class) + { + unset($this->classes[$class]); + + return $this; + } + + /** + * Set HTML output for this event. + * + * @chainable + * @param string HTML output + * @return object + */ + public function output($str) + { + $this->output = $str; + + return $this; + } + + /** + * Add a CSS class for this event. This can be called multiple times. + * + * @chainable + * @param string CSS class name + * @return object + */ + public function notify($data) + { + // Split the date and current status + list ($month, $day, $year, $week, $current) = $data; + + // Get a timestamp for the day + $timestamp = mktime(0, 0, 0, $month, $day, $year); + + // Date conditionals + $condition = array + ( + 'timestamp' => (int) $timestamp, + 'day' => (int) date('j', $timestamp), + 'week' => (int) $week, + 'month' => (int) date('n', $timestamp), + 'year' => (int) date('Y', $timestamp), + 'day_of_week' => (int) date('w', $timestamp), + 'current' => (bool) $current, + ); + + // Tested conditions + $tested = array(); + + foreach ($condition as $key => $value) + { + // Timestamps need to be handled carefully + if($key === 'timestamp' AND isset($this->conditions['timestamp'])) + { + // This adds 23 hours, 59 minutes and 59 seconds to today's timestamp, as 24 hours + // is classed as a new day + $next_day = $timestamp + 86399; + + if($this->conditions['timestamp'] < $timestamp OR $this->conditions['timestamp'] > $next_day) + return FALSE; + } + // Test basic conditions first + elseif (isset($this->conditions[$key]) AND $this->conditions[$key] !== $value) + return FALSE; + + // Condition has been tested + $tested[$key] = TRUE; + } + + if (isset($this->conditions['weekend'])) + { + // Weekday vs Weekend + $condition['weekend'] = ($condition['day_of_week'] === 0 OR $condition['day_of_week'] === 6); + } + + if (isset($this->conditions['first_day'])) + { + // First day of month + $condition['first_day'] = ($condition['day'] === 1); + } + + if (isset($this->conditions['last_day'])) + { + // Last day of month + $condition['last_day'] = ($condition['day'] === (int) date('t', $timestamp)); + } + + if (isset($this->conditions['occurrence'])) + { + // Get the occurance of the current day + $condition['occurrence'] = $this->day_occurrence($timestamp); + } + + if (isset($this->conditions['last_occurrence'])) + { + // Test if the next occurance of this date is next month + $condition['last_occurrence'] = ((int) date('n', $timestamp + 604800) !== $condition['month']); + } + + if (isset($this->conditions['easter'])) + { + if ($condition['month'] === 3 OR $condition['month'] === 4) + { + // This algorithm is from Practical Astronomy With Your Calculator, 2nd Edition by Peter + // Duffett-Smith. It was originally from Butcher's Ecclesiastical Calendar, published in + // 1876. This algorithm has also been published in the 1922 book General Astronomy by + // Spencer Jones; in The Journal of the British Astronomical Association (Vol.88, page + // 91, December 1977); and in Astronomical Algorithms (1991) by Jean Meeus. + + $a = $condition['year'] % 19; + $b = (int) ($condition['year'] / 100); + $c = $condition['year'] % 100; + $d = (int) ($b / 4); + $e = $b % 4; + $f = (int) (($b + 8) / 25); + $g = (int) (($b - $f + 1) / 3); + $h = (19 * $a + $b - $d - $g + 15) % 30; + $i = (int) ($c / 4); + $k = $c % 4; + $l = (32 + 2 * $e + 2 * $i - $h - $k) % 7; + $m = (int) (($a + 11 * $h + 22 * $l) / 451); + $p = ($h + $l - 7 * $m + 114) % 31; + + $month = (int) (($h + $l - 7 * $m + 114) / 31); + $day = $p + 1; + + $condition['easter'] = ($condition['month'] === $month AND $condition['day'] === $day); + } + else + { + // Easter can only happen in March or April + $condition['easter'] = FALSE; + } + } + + if (isset($this->conditions['callback'])) + { + // Use a callback to determine validity + $condition['callback'] = call_user_func($this->conditions['callback'], $condition, $this); + } + + $conditions = array_diff_key($this->conditions, $tested); + + foreach ($conditions as $key => $value) + { + if ($key === 'callback') + { + // Callbacks are tested on a TRUE/FALSE basis + $value = TRUE; + } + + // Test advanced conditions + if ($condition[$key] !== $value) + return FALSE; + } + + $this->caller->add_data(array + ( + 'classes' => $this->classes, + 'output' => $this->output, + )); + } + + /** + * Find the week day occurrence for a specific timestamp. The occurrence is + * relative to the current month. For example, the second Saturday of any + * given month will return "2" as the occurrence. This is used in combination + * with the "occurrence" condition. + * + * @param integer UNIX timestamp + * @return integer + */ + protected function day_occurrence($timestamp) + { + // Get the current month for the timestamp + $month = date('m', $timestamp); + + // Default occurrence is one + $occurrence = 1; + + // Reduce the timestamp by one week for each loop. This has the added + // benefit of preventing an infinite loop. + while ($timestamp -= 604800) + { + if (date('m', $timestamp) !== $month) + { + // Once the timestamp has gone into the previous month, the + // proper occurrence has been found. + return $occurrence; + } + + // Increment the occurrence + $occurrence++; + } + } + +} // End Calendar Event diff --git a/Server/system/libraries/Captcha.php b/Server/system/libraries/Captcha.php new file mode 100644 index 0000000..f5f2b46 --- /dev/null +++ b/Server/system/libraries/Captcha.php @@ -0,0 +1,279 @@ + 'basic', + 'width' => 150, + 'height' => 50, + 'complexity' => 4, + 'background' => '', + 'fontpath' => '', + 'fonts' => array(), + 'promote' => FALSE, + ); + + /** + * Singleton instance of Captcha. + * + * @return object + */ + public static function instance() + { + // Create the instance if it does not exist + empty(Captcha::$instance) and new Captcha; + + return Captcha::$instance; + } + + /** + * Constructs and returns a new Captcha object. + * + * @param string config group name + * @return object + */ + public static function factory($group = NULL) + { + return new Captcha($group); + } + + /** + * Constructs a new Captcha object. + * + * @throws Kohana_Exception + * @param string config group name + * @return void + */ + public function __construct($group = NULL) + { + // Create a singleton instance once + empty(Captcha::$instance) and Captcha::$instance = $this; + + // No config group name given + if ( ! is_string($group)) + { + $group = 'default'; + } + + // Load and validate config group + if ( ! is_array($config = Kohana::config('captcha.'.$group))) + throw new Kohana_Exception('captcha.undefined_group', $group); + + // All captcha config groups inherit default config group + if ($group !== 'default') + { + // Load and validate default config group + if ( ! is_array($default = Kohana::config('captcha.default'))) + throw new Kohana_Exception('captcha.undefined_group', 'default'); + + // Merge config group with default config group + $config += $default; + } + + // Assign config values to the object + foreach ($config as $key => $value) + { + if (array_key_exists($key, Captcha::$config)) + { + Captcha::$config[$key] = $value; + } + } + + // Store the config group name as well, so the drivers can access it + Captcha::$config['group'] = $group; + + // If using a background image, check if it exists + if ( ! empty($config['background'])) + { + Captcha::$config['background'] = str_replace('\\', '/', realpath($config['background'])); + + if ( ! is_file(Captcha::$config['background'])) + throw new Kohana_Exception('captcha.file_not_found', Captcha::$config['background']); + } + + // If using any fonts, check if they exist + if ( ! empty($config['fonts'])) + { + Captcha::$config['fontpath'] = str_replace('\\', '/', realpath($config['fontpath'])).'/'; + + foreach ($config['fonts'] as $font) + { + if ( ! is_file(Captcha::$config['fontpath'].$font)) + throw new Kohana_Exception('captcha.file_not_found', Captcha::$config['fontpath'].$font); + } + } + + // Set driver name + $driver = 'Captcha_'.ucfirst($config['style']).'_Driver'; + + // Load the driver + if ( ! Kohana::auto_load($driver)) + throw new Kohana_Exception('core.driver_not_found', $config['style'], get_class($this)); + + // Initialize the driver + $this->driver = new $driver; + + // Validate the driver + if ( ! ($this->driver instanceof Captcha_Driver)) + throw new Kohana_Exception('core.driver_implements', $config['style'], get_class($this), 'Captcha_Driver'); + + Kohana::log('debug', 'Captcha Library initialized'); + } + + /** + * Validates a Captcha response and updates response counter. + * + * @param string captcha response + * @return boolean + */ + public static function valid($response) + { + // Maximum one count per page load + static $counted; + + // User has been promoted, always TRUE and don't count anymore + if (Captcha::instance()->promoted()) + return TRUE; + + // Challenge result + $result = (bool) Captcha::instance()->driver->valid($response); + + // Increment response counter + if ($counted !== TRUE) + { + $counted = TRUE; + + // Valid response + if ($result === TRUE) + { + Captcha::instance()->valid_count(Session::instance()->get('captcha_valid_count') + 1); + } + // Invalid response + else + { + Captcha::instance()->invalid_count(Session::instance()->get('captcha_invalid_count') + 1); + } + } + + return $result; + } + + /** + * Gets or sets the number of valid Captcha responses for this session. + * + * @param integer new counter value + * @param boolean trigger invalid counter (for internal use only) + * @return integer counter value + */ + public function valid_count($new_count = NULL, $invalid = FALSE) + { + // Pick the right session to use + $session = ($invalid === TRUE) ? 'captcha_invalid_count' : 'captcha_valid_count'; + + // Update counter + if ($new_count !== NULL) + { + $new_count = (int) $new_count; + + // Reset counter = delete session + if ($new_count < 1) + { + Session::instance()->delete($session); + } + // Set counter to new value + else + { + Session::instance()->set($session, (int) $new_count); + } + + // Return new count + return (int) $new_count; + } + + // Return current count + return (int) Session::instance()->get($session); + } + + /** + * Gets or sets the number of invalid Captcha responses for this session. + * + * @param integer new counter value + * @return integer counter value + */ + public function invalid_count($new_count = NULL) + { + return $this->valid_count($new_count, TRUE); + } + + /** + * Resets the Captcha response counters and removes the count sessions. + * + * @return void + */ + public function reset_count() + { + $this->valid_count(0); + $this->valid_count(0, TRUE); + } + + /** + * Checks whether user has been promoted after having given enough valid responses. + * + * @param integer valid response count threshold + * @return boolean + */ + public function promoted($threshold = NULL) + { + // Promotion has been disabled + if (Captcha::$config['promote'] === FALSE) + return FALSE; + + // Use the config threshold + if ($threshold === NULL) + { + $threshold = Captcha::$config['promote']; + } + + // Compare the valid response count to the threshold + return ($this->valid_count() >= $threshold); + } + + /** + * Returns or outputs the Captcha challenge. + * + * @param boolean TRUE to output html, e.g. + * @return mixed html string or void + */ + public function render($html = TRUE) + { + return $this->driver->render($html); + } + + /** + * Magically outputs the Captcha challenge. + * + * @return mixed + */ + public function __toString() + { + return $this->render(); + } + +} // End Captcha Class \ No newline at end of file diff --git a/Server/system/libraries/Controller.php b/Server/system/libraries/Controller.php new file mode 100644 index 0000000..2f64c21 --- /dev/null +++ b/Server/system/libraries/Controller.php @@ -0,0 +1,86 @@ +uri = URI::instance(); + + // Input should always be available + $this->input = Input::instance(); + } + + /** + * Handles methods that do not exist. + * + * @param string method name + * @param array arguments + * @return void + */ + public function __call($method, $args) + { + // Default to showing a 404 page + Event::run('system.404'); + } + + /** + * Includes a View within the controller scope. + * + * @param string view filename + * @param array array of view variables + * @return string + */ + public function _kohana_load_view($kohana_view_filename, $kohana_input_data) + { + if ($kohana_view_filename == '') + return; + + // Buffering on + ob_start(); + + // Import the view variables to local namespace + extract($kohana_input_data, EXTR_SKIP); + + // Views are straight HTML pages with embedded PHP, so importing them + // this way insures that $this can be accessed as if the user was in + // the controller, which gives the easiest access to libraries in views + try + { + include $kohana_view_filename; + } + catch (Exception $e) + { + ob_end_clean(); + throw $e; + } + + // Fetch the output and close the buffer + return ob_get_clean(); + } + +} // End Controller Class \ No newline at end of file diff --git a/Server/system/libraries/Database.php b/Server/system/libraries/Database.php new file mode 100644 index 0000000..6267f63 --- /dev/null +++ b/Server/system/libraries/Database.php @@ -0,0 +1,1444 @@ + TRUE, + 'persistent' => FALSE, + 'connection' => '', + 'character_set' => 'utf8', + 'table_prefix' => '', + 'object' => TRUE, + 'cache' => FALSE, + 'escape' => TRUE, + ); + + // Database driver object + protected $driver; + protected $link; + + // Un-compiled parts of the SQL query + protected $select = array(); + protected $set = array(); + protected $from = array(); + protected $join = array(); + protected $where = array(); + protected $orderby = array(); + protected $order = array(); + protected $groupby = array(); + protected $having = array(); + protected $distinct = FALSE; + protected $limit = FALSE; + protected $offset = FALSE; + protected $last_query = ''; + + // Stack of queries for push/pop + protected $query_history = array(); + + /** + * Returns a singleton instance of Database. + * + * @param mixed configuration array or DSN + * @return Database_Core + */ + public static function & instance($name = 'default', $config = NULL) + { + if ( ! isset(Database::$instances[$name])) + { + // Create a new instance + Database::$instances[$name] = new Database($config === NULL ? $name : $config); + } + + return Database::$instances[$name]; + } + + /** + * Returns the name of a given database instance. + * + * @param Database instance of Database + * @return string + */ + public static function instance_name(Database $db) + { + return array_search($db, Database::$instances, TRUE); + } + + /** + * Sets up the database configuration, loads the Database_Driver. + * + * @throws Kohana_Database_Exception + */ + public function __construct($config = array()) + { + if (empty($config)) + { + // Load the default group + $config = Kohana::config('database.default'); + } + elseif (is_array($config) AND count($config) > 0) + { + if ( ! array_key_exists('connection', $config)) + { + $config = array('connection' => $config); + } + } + elseif (is_string($config)) + { + // The config is a DSN string + if (strpos($config, '://') !== FALSE) + { + $config = array('connection' => $config); + } + // The config is a group name + else + { + $name = $config; + + // Test the config group name + if (($config = Kohana::config('database.'.$config)) === NULL) + throw new Kohana_Database_Exception('database.undefined_group', $name); + } + } + + // Merge the default config with the passed config + $this->config = array_merge($this->config, $config); + + if (is_string($this->config['connection'])) + { + // Make sure the connection is valid + if (strpos($this->config['connection'], '://') === FALSE) + throw new Kohana_Database_Exception('database.invalid_dsn', $this->config['connection']); + + // Parse the DSN, creating an array to hold the connection parameters + $db = array + ( + 'type' => FALSE, + 'user' => FALSE, + 'pass' => FALSE, + 'host' => FALSE, + 'port' => FALSE, + 'socket' => FALSE, + 'database' => FALSE + ); + + // Get the protocol and arguments + list ($db['type'], $connection) = explode('://', $this->config['connection'], 2); + + if (strpos($connection, '@') !== FALSE) + { + // Get the username and password + list ($db['pass'], $connection) = explode('@', $connection, 2); + // Check if a password is supplied + $logindata = explode(':', $db['pass'], 2); + $db['pass'] = (count($logindata) > 1) ? $logindata[1] : ''; + $db['user'] = $logindata[0]; + + // Prepare for finding the database + $connection = explode('/', $connection); + + // Find the database name + $db['database'] = array_pop($connection); + + // Reset connection string + $connection = implode('/', $connection); + + // Find the socket + if (preg_match('/^unix\([^)]++\)/', $connection)) + { + // This one is a little hairy: we explode based on the end of + // the socket, removing the 'unix(' from the connection string + list ($db['socket'], $connection) = explode(')', substr($connection, 5), 2); + } + elseif (strpos($connection, ':') !== FALSE) + { + // Fetch the host and port name + list ($db['host'], $db['port']) = explode(':', $connection, 2); + } + else + { + $db['host'] = $connection; + } + } + else + { + // File connection + $connection = explode('/', $connection); + + // Find database file name + $db['database'] = array_pop($connection); + + // Find database directory name + $db['socket'] = implode('/', $connection).'/'; + } + + // Reset the connection array to the database config + $this->config['connection'] = $db; + } + // Set driver name + $driver = 'Database_'.ucfirst($this->config['connection']['type']).'_Driver'; + + // Load the driver + if ( ! Kohana::auto_load($driver)) + throw new Kohana_Database_Exception('core.driver_not_found', $this->config['connection']['type'], get_class($this)); + + // Initialize the driver + $this->driver = new $driver($this->config); + + // Validate the driver + if ( ! ($this->driver instanceof Database_Driver)) + throw new Kohana_Database_Exception('core.driver_implements', $this->config['connection']['type'], get_class($this), 'Database_Driver'); + + Kohana::log('debug', 'Database Library initialized'); + } + + /** + * Simple connect method to get the database queries up and running. + * + * @return void + */ + public function connect() + { + // A link can be a resource or an object + if ( ! is_resource($this->link) AND ! is_object($this->link)) + { + $this->link = $this->driver->connect(); + if ( ! is_resource($this->link) AND ! is_object($this->link)) + throw new Kohana_Database_Exception('database.connection', $this->driver->show_error()); + + // Clear password after successful connect + $this->config['connection']['pass'] = NULL; + } + } + + /** + * Runs a query into the driver and returns the result. + * + * @param string SQL query to execute + * @return Database_Result + */ + public function query($sql = '') + { + if ($sql == '') return FALSE; + + // No link? Connect! + $this->link or $this->connect(); + + // Start the benchmark + $start = microtime(TRUE); + + if (func_num_args() > 1) //if we have more than one argument ($sql) + { + $argv = func_get_args(); + $binds = (is_array(next($argv))) ? current($argv) : array_slice($argv, 1); + } + + // Compile binds if needed + if (isset($binds)) + { + $sql = $this->compile_binds($sql, $binds); + } + + // Fetch the result + $result = $this->driver->query($this->last_query = $sql); + + // Stop the benchmark + $stop = microtime(TRUE); + + if ($this->config['benchmark'] == TRUE) + { + // Benchmark the query + Database::$benchmarks[] = array('query' => $sql, 'time' => $stop - $start, 'rows' => count($result)); + } + + return $result; + } + + /** + * Selects the column names for a database query. + * + * @param string string or array of column names to select + * @return Database_Core This Database object. + */ + public function select($sql = '*') + { + if (func_num_args() > 1) + { + $sql = func_get_args(); + } + elseif (is_string($sql)) + { + $sql = explode(',', $sql); + } + else + { + $sql = (array) $sql; + } + + foreach ($sql as $val) + { + if (($val = trim($val)) === '') continue; + + if (strpos($val, '(') === FALSE AND $val !== '*') + { + if (preg_match('/^DISTINCT\s++(.+)$/i', $val, $matches)) + { + // Only prepend with table prefix if table name is specified + $val = (strpos($matches[1], '.') !== FALSE) ? $this->config['table_prefix'].$matches[1] : $matches[1]; + + $this->distinct = TRUE; + } + else + { + $val = (strpos($val, '.') !== FALSE) ? $this->config['table_prefix'].$val : $val; + } + + $val = $this->driver->escape_column($val); + } + + $this->select[] = $val; + } + + return $this; + } + + /** + * Selects the from table(s) for a database query. + * + * @param string string or array of tables to select + * @return Database_Core This Database object. + */ + public function from($sql) + { + if (func_num_args() > 1) + { + $sql = func_get_args(); + } + elseif (is_string($sql)) + { + $sql = explode(',', $sql); + } + else + { + $sql = array($sql); + } + + foreach ($sql as $val) + { + if (is_string($val)) + { + if (($val = trim($val)) === '') continue; + + // TODO: Temporary solution, this should be moved to database driver (AS is checked for twice) + if (stripos($val, ' AS ') !== FALSE) + { + $val = str_ireplace(' AS ', ' AS ', $val); + + list($table, $alias) = explode(' AS ', $val); + + // Attach prefix to both sides of the AS + $val = $this->config['table_prefix'].$table.' AS '.$this->config['table_prefix'].$alias; + } + else + { + $val = $this->config['table_prefix'].$val; + } + } + + $this->from[] = $val; + } + + return $this; + } + + /** + * Generates the JOIN portion of the query. + * + * @param string table name + * @param string|array where key or array of key => value pairs + * @param string where value + * @param string type of join + * @return Database_Core This Database object. + */ + public function join($table, $key, $value = NULL, $type = '') + { + $join = array(); + + if ( ! empty($type)) + { + $type = strtoupper(trim($type)); + + if ( ! in_array($type, array('LEFT', 'RIGHT', 'OUTER', 'INNER', 'LEFT OUTER', 'RIGHT OUTER'), TRUE)) + { + $type = ''; + } + else + { + $type .= ' '; + } + } + + $cond = array(); + $keys = is_array($key) ? $key : array($key => $value); + foreach ($keys as $key => $value) + { + $key = (strpos($key, '.') !== FALSE) ? $this->config['table_prefix'].$key : $key; + + if (is_string($value)) + { + // Only escape if it's a string + $value = $this->driver->escape_column($this->config['table_prefix'].$value); + } + + $cond[] = $this->driver->where($key, $value, 'AND ', count($cond), FALSE); + } + + if ( ! is_array($this->join)) + { + $this->join = array(); + } + + if ( ! is_array($table)) + { + $table = array($table); + } + + foreach ($table as $t) + { + if (is_string($t)) + { + // TODO: Temporary solution, this should be moved to database driver (AS is checked for twice) + if (stripos($t, ' AS ') !== FALSE) + { + $t = str_ireplace(' AS ', ' AS ', $t); + + list($table, $alias) = explode(' AS ', $t); + + // Attach prefix to both sides of the AS + $t = $this->config['table_prefix'].$table.' AS '.$this->config['table_prefix'].$alias; + } + else + { + $t = $this->config['table_prefix'].$t; + } + } + + $join['tables'][] = $this->driver->escape_column($t); + } + + $join['conditions'] = '('.trim(implode(' ', $cond)).')'; + $join['type'] = $type; + + $this->join[] = $join; + + return $this; + } + + + /** + * Selects the where(s) for a database query. + * + * @param string|array key name or array of key => value pairs + * @param string value to match with key + * @param boolean disable quoting of WHERE clause + * @return Database_Core This Database object. + */ + public function where($key, $value = NULL, $quote = TRUE) + { + $quote = (func_num_args() < 2 AND ! is_array($key)) ? -1 : $quote; + if (is_object($key)) + { + $keys = array((string) $key => ''); + } + elseif ( ! is_array($key)) + { + $keys = array($key => $value); + } + else + { + $keys = $key; + } + + foreach ($keys as $key => $value) + { + $key = (strpos($key, '.') !== FALSE) ? $this->config['table_prefix'].$key : $key; + $this->where[] = $this->driver->where($key, $value, 'AND ', count($this->where), $quote); + } + + return $this; + } + + /** + * Selects the or where(s) for a database query. + * + * @param string|array key name or array of key => value pairs + * @param string value to match with key + * @param boolean disable quoting of WHERE clause + * @return Database_Core This Database object. + */ + public function orwhere($key, $value = NULL, $quote = TRUE) + { + $quote = (func_num_args() < 2 AND ! is_array($key)) ? -1 : $quote; + if (is_object($key)) + { + $keys = array((string) $key => ''); + } + elseif ( ! is_array($key)) + { + $keys = array($key => $value); + } + else + { + $keys = $key; + } + + foreach ($keys as $key => $value) + { + $key = (strpos($key, '.') !== FALSE) ? $this->config['table_prefix'].$key : $key; + $this->where[] = $this->driver->where($key, $value, 'OR ', count($this->where), $quote); + } + + return $this; + } + + /** + * Selects the like(s) for a database query. + * + * @param string|array field name or array of field => match pairs + * @param string like value to match with field + * @param boolean automatically add starting and ending wildcards + * @return Database_Core This Database object. + */ + public function like($field, $match = '', $auto = TRUE) + { + $fields = is_array($field) ? $field : array($field => $match); + + foreach ($fields as $field => $match) + { + $field = (strpos($field, '.') !== FALSE) ? $this->config['table_prefix'].$field : $field; + $this->where[] = $this->driver->like($field, $match, $auto, 'AND ', count($this->where)); + } + + return $this; + } + + /** + * Selects the or like(s) for a database query. + * + * @param string|array field name or array of field => match pairs + * @param string like value to match with field + * @param boolean automatically add starting and ending wildcards + * @return Database_Core This Database object. + */ + public function orlike($field, $match = '', $auto = TRUE) + { + $fields = is_array($field) ? $field : array($field => $match); + + foreach ($fields as $field => $match) + { + $field = (strpos($field, '.') !== FALSE) ? $this->config['table_prefix'].$field : $field; + $this->where[] = $this->driver->like($field, $match, $auto, 'OR ', count($this->where)); + } + + return $this; + } + + /** + * Selects the not like(s) for a database query. + * + * @param string|array field name or array of field => match pairs + * @param string like value to match with field + * @param boolean automatically add starting and ending wildcards + * @return Database_Core This Database object. + */ + public function notlike($field, $match = '', $auto = TRUE) + { + $fields = is_array($field) ? $field : array($field => $match); + + foreach ($fields as $field => $match) + { + $field = (strpos($field, '.') !== FALSE) ? $this->config['table_prefix'].$field : $field; + $this->where[] = $this->driver->notlike($field, $match, $auto, 'AND ', count($this->where)); + } + + return $this; + } + + /** + * Selects the or not like(s) for a database query. + * + * @param string|array field name or array of field => match pairs + * @param string like value to match with field + * @return Database_Core This Database object. + */ + public function ornotlike($field, $match = '', $auto = TRUE) + { + $fields = is_array($field) ? $field : array($field => $match); + + foreach ($fields as $field => $match) + { + $field = (strpos($field, '.') !== FALSE) ? $this->config['table_prefix'].$field : $field; + $this->where[] = $this->driver->notlike($field, $match, $auto, 'OR ', count($this->where)); + } + + return $this; + } + + /** + * Selects the like(s) for a database query. + * + * @param string|array field name or array of field => match pairs + * @param string like value to match with field + * @return Database_Core This Database object. + */ + public function regex($field, $match = '') + { + $fields = is_array($field) ? $field : array($field => $match); + + foreach ($fields as $field => $match) + { + $field = (strpos($field, '.') !== FALSE) ? $this->config['table_prefix'].$field : $field; + $this->where[] = $this->driver->regex($field, $match, 'AND ', count($this->where)); + } + + return $this; + } + + /** + * Selects the or like(s) for a database query. + * + * @param string|array field name or array of field => match pairs + * @param string like value to match with field + * @return Database_Core This Database object. + */ + public function orregex($field, $match = '') + { + $fields = is_array($field) ? $field : array($field => $match); + + foreach ($fields as $field => $match) + { + $field = (strpos($field, '.') !== FALSE) ? $this->config['table_prefix'].$field : $field; + $this->where[] = $this->driver->regex($field, $match, 'OR ', count($this->where)); + } + + return $this; + } + + /** + * Selects the not regex(s) for a database query. + * + * @param string|array field name or array of field => match pairs + * @param string regex value to match with field + * @return Database_Core This Database object. + */ + public function notregex($field, $match = '') + { + $fields = is_array($field) ? $field : array($field => $match); + + foreach ($fields as $field => $match) + { + $field = (strpos($field, '.') !== FALSE) ? $this->config['table_prefix'].$field : $field; + $this->where[] = $this->driver->notregex($field, $match, 'AND ', count($this->where)); + } + + return $this; + } + + /** + * Selects the or not regex(s) for a database query. + * + * @param string|array field name or array of field => match pairs + * @param string regex value to match with field + * @return Database_Core This Database object. + */ + public function ornotregex($field, $match = '') + { + $fields = is_array($field) ? $field : array($field => $match); + + foreach ($fields as $field => $match) + { + $field = (strpos($field, '.') !== FALSE) ? $this->config['table_prefix'].$field : $field; + $this->where[] = $this->driver->notregex($field, $match, 'OR ', count($this->where)); + } + + return $this; + } + + /** + * Chooses the column to group by in a select query. + * + * @param string column name to group by + * @return Database_Core This Database object. + */ + public function groupby($by) + { + if ( ! is_array($by)) + { + $by = explode(',', (string) $by); + } + + foreach ($by as $val) + { + $val = trim($val); + + if ($val != '') + { + // Add the table prefix if we are using table.column names + if(strpos($val, '.')) + { + $val = $this->config['table_prefix'].$val; + } + + $this->groupby[] = $this->driver->escape_column($val); + } + } + + return $this; + } + + /** + * Selects the having(s) for a database query. + * + * @param string|array key name or array of key => value pairs + * @param string value to match with key + * @param boolean disable quoting of WHERE clause + * @return Database_Core This Database object. + */ + public function having($key, $value = '', $quote = TRUE) + { + $this->having[] = $this->driver->where($key, $value, 'AND', count($this->having), TRUE); + return $this; + } + + /** + * Selects the or having(s) for a database query. + * + * @param string|array key name or array of key => value pairs + * @param string value to match with key + * @param boolean disable quoting of WHERE clause + * @return Database_Core This Database object. + */ + public function orhaving($key, $value = '', $quote = TRUE) + { + $this->having[] = $this->driver->where($key, $value, 'OR', count($this->having), TRUE); + return $this; + } + + /** + * Chooses which column(s) to order the select query by. + * + * @param string|array column(s) to order on, can be an array, single column, or comma seperated list of columns + * @param string direction of the order + * @return Database_Core This Database object. + */ + public function orderby($orderby, $direction = NULL) + { + if ( ! is_array($orderby)) + { + $orderby = array($orderby => $direction); + } + + foreach ($orderby as $column => $direction) + { + $direction = strtoupper(trim($direction)); + + // Add a direction if the provided one isn't valid + if ( ! in_array($direction, array('ASC', 'DESC', 'RAND()', 'RANDOM()', 'NULL'))) + { + $direction = 'ASC'; + } + + // Add the table prefix if a table.column was passed + if (strpos($column, '.')) + { + $column = $this->config['table_prefix'].$column; + } + + $this->orderby[] = $this->driver->escape_column($column).' '.$direction; + } + + return $this; + } + + /** + * Selects the limit section of a query. + * + * @param integer number of rows to limit result to + * @param integer offset in result to start returning rows from + * @return Database_Core This Database object. + */ + public function limit($limit, $offset = NULL) + { + $this->limit = (int) $limit; + + if ($offset !== NULL OR ! is_int($this->offset)) + { + $this->offset($offset); + } + + return $this; + } + + /** + * Sets the offset portion of a query. + * + * @param integer offset value + * @return Database_Core This Database object. + */ + public function offset($value) + { + $this->offset = (int) $value; + + return $this; + } + + /** + * Allows key/value pairs to be set for inserting or updating. + * + * @param string|array key name or array of key => value pairs + * @param string value to match with key + * @return Database_Core This Database object. + */ + public function set($key, $value = '') + { + if ( ! is_array($key)) + { + $key = array($key => $value); + } + + foreach ($key as $k => $v) + { + // Add a table prefix if the column includes the table. + if (strpos($k, '.')) + $k = $this->config['table_prefix'].$k; + + $this->set[$k] = $this->driver->escape($v); + } + + return $this; + } + + /** + * Compiles the select statement based on the other functions called and runs the query. + * + * @param string table name + * @param string limit clause + * @param string offset clause + * @return Database_Result + */ + public function get($table = '', $limit = NULL, $offset = NULL) + { + if ($table != '') + { + $this->from($table); + } + + if ( ! is_null($limit)) + { + $this->limit($limit, $offset); + } + + $sql = $this->driver->compile_select(get_object_vars($this)); + + $this->reset_select(); + + $result = $this->query($sql); + + $this->last_query = $sql; + + return $result; + } + + /** + * Compiles the select statement based on the other functions called and runs the query. + * + * @param string table name + * @param array where clause + * @param string limit clause + * @param string offset clause + * @return Database_Core This Database object. + */ + public function getwhere($table = '', $where = NULL, $limit = NULL, $offset = NULL) + { + if ($table != '') + { + $this->from($table); + } + + if ( ! is_null($where)) + { + $this->where($where); + } + + if ( ! is_null($limit)) + { + $this->limit($limit, $offset); + } + + $sql = $this->driver->compile_select(get_object_vars($this)); + + $this->reset_select(); + + $result = $this->query($sql); + + return $result; + } + + /** + * Compiles the select statement based on the other functions called and returns the query string. + * + * @param string table name + * @param string limit clause + * @param string offset clause + * @return string sql string + */ + public function compile($table = '', $limit = NULL, $offset = NULL) + { + if ($table != '') + { + $this->from($table); + } + + if ( ! is_null($limit)) + { + $this->limit($limit, $offset); + } + + $sql = $this->driver->compile_select(get_object_vars($this)); + + $this->reset_select(); + + return $sql; + } + + /** + * Compiles an insert string and runs the query. + * + * @param string table name + * @param array array of key/value pairs to insert + * @return Database_Result Query result + */ + public function insert($table = '', $set = NULL) + { + if ( ! is_null($set)) + { + $this->set($set); + } + + if ($this->set == NULL) + throw new Kohana_Database_Exception('database.must_use_set'); + + if ($table == '') + { + if ( ! isset($this->from[0])) + throw new Kohana_Database_Exception('database.must_use_table'); + + $table = $this->from[0]; + } + + // If caching is enabled, clear the cache before inserting + ($this->config['cache'] === TRUE) and $this->clear_cache(); + + $sql = $this->driver->insert($this->config['table_prefix'].$table, array_keys($this->set), array_values($this->set)); + + $this->reset_write(); + + return $this->query($sql); + } + + /** + * Adds an "IN" condition to the where clause + * + * @param string Name of the column being examined + * @param mixed An array or string to match against + * @param bool Generate a NOT IN clause instead + * @return Database_Core This Database object. + */ + public function in($field, $values, $not = FALSE) + { + if (is_array($values)) + { + $escaped_values = array(); + foreach ($values as $v) + { + if (is_numeric($v)) + { + $escaped_values[] = $v; + } + else + { + $escaped_values[] = "'".$this->driver->escape_str($v)."'"; + } + } + $values = implode(",", $escaped_values); + } + + $where = $this->driver->escape_column(((strpos($field,'.') !== FALSE) ? $this->config['table_prefix'] : ''). $field).' '.($not === TRUE ? 'NOT ' : '').'IN ('.$values.')'; + $this->where[] = $this->driver->where($where, '', 'AND ', count($this->where), -1); + + return $this; + } + + /** + * Adds a "NOT IN" condition to the where clause + * + * @param string Name of the column being examined + * @param mixed An array or string to match against + * @return Database_Core This Database object. + */ + public function notin($field, $values) + { + return $this->in($field, $values, TRUE); + } + + /** + * Compiles a merge string and runs the query. + * + * @param string table name + * @param array array of key/value pairs to merge + * @return Database_Result Query result + */ + public function merge($table = '', $set = NULL) + { + if ( ! is_null($set)) + { + $this->set($set); + } + + if ($this->set == NULL) + throw new Kohana_Database_Exception('database.must_use_set'); + + if ($table == '') + { + if ( ! isset($this->from[0])) + throw new Kohana_Database_Exception('database.must_use_table'); + + $table = $this->from[0]; + } + + $sql = $this->driver->merge($this->config['table_prefix'].$table, array_keys($this->set), array_values($this->set)); + + $this->reset_write(); + return $this->query($sql); + } + + /** + * Compiles an update string and runs the query. + * + * @param string table name + * @param array associative array of update values + * @param array where clause + * @return Database_Result Query result + */ + public function update($table = '', $set = NULL, $where = NULL) + { + if ( is_array($set)) + { + $this->set($set); + } + + if ( ! is_null($where)) + { + $this->where($where); + } + + if ($this->set == FALSE) + throw new Kohana_Database_Exception('database.must_use_set'); + + if ($table == '') + { + if ( ! isset($this->from[0])) + throw new Kohana_Database_Exception('database.must_use_table'); + + $table = $this->from[0]; + } + + $sql = $this->driver->update($this->config['table_prefix'].$table, $this->set, $this->where); + + $this->reset_write(); + return $this->query($sql); + } + + /** + * Compiles a delete string and runs the query. + * + * @param string table name + * @param array where clause + * @return Database_Result Query result + */ + public function delete($table = '', $where = NULL) + { + if ($table == '') + { + if ( ! isset($this->from[0])) + throw new Kohana_Database_Exception('database.must_use_table'); + + $table = $this->from[0]; + } + else + { + $table = $this->config['table_prefix'].$table; + } + + if (! is_null($where)) + { + $this->where($where); + } + + if (count($this->where) < 1) + throw new Kohana_Database_Exception('database.must_use_where'); + + $sql = $this->driver->delete($table, $this->where); + + $this->reset_write(); + return $this->query($sql); + } + + /** + * Returns the last query run. + * + * @return string SQL + */ + public function last_query() + { + return $this->last_query; + } + + /** + * Count query records. + * + * @param string table name + * @param array where clause + * @return integer + */ + public function count_records($table = FALSE, $where = NULL) + { + if (count($this->from) < 1) + { + if ($table == FALSE) + throw new Kohana_Database_Exception('database.must_use_table'); + + $this->from($table); + } + + if ($where !== NULL) + { + $this->where($where); + } + + $query = $this->select('COUNT(*) AS '.$this->escape_column('records_found'))->get()->result(TRUE); + + return (int) $query->current()->records_found; + } + + /** + * Resets all private select variables. + * + * @return void + */ + protected function reset_select() + { + $this->select = array(); + $this->from = array(); + $this->join = array(); + $this->where = array(); + $this->orderby = array(); + $this->groupby = array(); + $this->having = array(); + $this->distinct = FALSE; + $this->limit = FALSE; + $this->offset = FALSE; + } + + /** + * Resets all private insert and update variables. + * + * @return void + */ + protected function reset_write() + { + $this->set = array(); + $this->from = array(); + $this->where = array(); + } + + /** + * Lists all the tables in the current database. + * + * @return array + */ + public function list_tables() + { + $this->link or $this->connect(); + + return $this->driver->list_tables(); + } + + /** + * See if a table exists in the database. + * + * @param string table name + * @param boolean True to attach table prefix + * @return boolean + */ + public function table_exists($table_name, $prefix = TRUE) + { + if ($prefix) + return in_array($this->config['table_prefix'].$table_name, $this->list_tables()); + else + return in_array($table_name, $this->list_tables()); + } + + /** + * Combine a SQL statement with the bind values. Used for safe queries. + * + * @param string query to bind to the values + * @param array array of values to bind to the query + * @return string + */ + public function compile_binds($sql, $binds) + { + foreach ((array) $binds as $val) + { + // If the SQL contains no more bind marks ("?"), we're done. + if (($next_bind_pos = strpos($sql, '?')) === FALSE) + break; + + // Properly escape the bind value. + $val = $this->driver->escape($val); + + // Temporarily replace possible bind marks ("?"), in the bind value itself, with a placeholder. + $val = str_replace('?', '{%B%}', $val); + + // Replace the first bind mark ("?") with its corresponding value. + $sql = substr($sql, 0, $next_bind_pos).$val.substr($sql, $next_bind_pos + 1); + } + + // Restore placeholders. + return str_replace('{%B%}', '?', $sql); + } + + /** + * Get the field data for a database table, along with the field's attributes. + * + * @param string table name + * @return array + */ + public function field_data($table = '') + { + $this->link or $this->connect(); + + return $this->driver->field_data($this->config['table_prefix'].$table); + } + + /** + * Get the field data for a database table, along with the field's attributes. + * + * @param string table name + * @return array + */ + public function list_fields($table = '') + { + $this->link or $this->connect(); + + return $this->driver->list_fields($this->config['table_prefix'].$table); + } + + /** + * Escapes a value for a query. + * + * @param mixed value to escape + * @return string + */ + public function escape($value) + { + return $this->driver->escape($value); + } + + /** + * Escapes a string for a query. + * + * @param string string to escape + * @return string + */ + public function escape_str($str) + { + return $this->driver->escape_str($str); + } + + /** + * Escapes a table name for a query. + * + * @param string string to escape + * @return string + */ + public function escape_table($table) + { + return $this->driver->escape_table($table); + } + + /** + * Escapes a column name for a query. + * + * @param string string to escape + * @return string + */ + public function escape_column($table) + { + return $this->driver->escape_column($table); + } + + /** + * Returns table prefix of current configuration. + * + * @return string + */ + public function table_prefix() + { + return $this->config['table_prefix']; + } + + /** + * Clears the query cache. + * + * @param string|TRUE clear cache by SQL statement or TRUE for last query + * @return Database_Core This Database object. + */ + public function clear_cache($sql = NULL) + { + if ($sql === TRUE) + { + $this->driver->clear_cache($this->last_query); + } + elseif (is_string($sql)) + { + $this->driver->clear_cache($sql); + } + else + { + $this->driver->clear_cache(); + } + + return $this; + } + + /** + * Pushes existing query space onto the query stack. Use push + * and pop to prevent queries from clashing before they are + * executed + * + * @return Database_Core This Databaes object + */ + public function push() + { + array_push($this->query_history, array( + $this->select, + $this->from, + $this->join, + $this->where, + $this->orderby, + $this->order, + $this->groupby, + $this->having, + $this->distinct, + $this->limit, + $this->offset + )); + + $this->reset_select(); + + return $this; + } + + /** + * Pops from query stack into the current query space. + * + * @return Database_Core This Databaes object + */ + public function pop() + { + if (count($this->query_history) == 0) + { + // No history + return $this; + } + + list( + $this->select, + $this->from, + $this->join, + $this->where, + $this->orderby, + $this->order, + $this->groupby, + $this->having, + $this->distinct, + $this->limit, + $this->offset + ) = array_pop($this->query_history); + + return $this; + } + + /** + * Count the number of records in the last query, without LIMIT or OFFSET applied. + * + * @return integer + */ + public function count_last_query() + { + if ($sql = $this->last_query()) + { + if (stripos($sql, 'LIMIT') !== FALSE) + { + // Remove LIMIT from the SQL + $sql = preg_replace('/\sLIMIT\s+[^a-z]+/i', ' ', $sql); + } + + if (stripos($sql, 'OFFSET') !== FALSE) + { + // Remove OFFSET from the SQL + $sql = preg_replace('/\sOFFSET\s+\d+/i', '', $sql); + } + + // Get the total rows from the last query executed + $result = $this->query + ( + 'SELECT COUNT(*) AS '.$this->escape_column('total_rows').' '. + 'FROM ('.trim($sql).') AS '.$this->escape_table('counted_results') + ); + + // Return the total number of rows from the query + return (int) $result->current()->total_rows; + } + + return FALSE; + } + +} // End Database Class + + +/** + * Sets the code for a Database exception. + */ +class Kohana_Database_Exception extends Kohana_Exception { + + protected $code = E_DATABASE_ERROR; + +} // End Kohana Database Exception diff --git a/Server/system/libraries/Database_Expression.php b/Server/system/libraries/Database_Expression.php new file mode 100644 index 0000000..940a636 --- /dev/null +++ b/Server/system/libraries/Database_Expression.php @@ -0,0 +1,26 @@ +expression = $expression; + } + + public function __toString() + { + return (string) $this->expression; + } + +} // End Database Expr Class \ No newline at end of file diff --git a/Server/system/libraries/Encrypt.php b/Server/system/libraries/Encrypt.php new file mode 100644 index 0000000..3d564f9 --- /dev/null +++ b/Server/system/libraries/Encrypt.php @@ -0,0 +1,164 @@ + $size) + { + // Shorten the key to the maximum size + $config['key'] = substr($config['key'], 0, $size); + } + + // Find the initialization vector size + $config['iv_size'] = mcrypt_get_iv_size($config['cipher'], $config['mode']); + + // Cache the config in the object + $this->config = $config; + + Kohana::log('debug', 'Encrypt Library initialized'); + } + + /** + * Encrypts a string and returns an encrypted string that can be decoded. + * + * @param string data to be encrypted + * @return string encrypted data + */ + public function encode($data) + { + // Set the rand type if it has not already been set + if (Encrypt::$rand === NULL) + { + if (KOHANA_IS_WIN) + { + // Windows only supports the system random number generator + Encrypt::$rand = MCRYPT_RAND; + } + else + { + if (defined('MCRYPT_DEV_URANDOM')) + { + // Use /dev/urandom + Encrypt::$rand = MCRYPT_DEV_URANDOM; + } + elseif (defined('MCRYPT_DEV_RANDOM')) + { + // Use /dev/random + Encrypt::$rand = MCRYPT_DEV_RANDOM; + } + else + { + // Use the system random number generator + Encrypt::$rand = MCRYPT_RAND; + } + } + } + + if (Encrypt::$rand === MCRYPT_RAND) + { + // The system random number generator must always be seeded each + // time it is used, or it will not produce true random results + mt_srand(); + } + + // Create a random initialization vector of the proper size for the current cipher + $iv = mcrypt_create_iv($this->config['iv_size'], Encrypt::$rand); + + // Encrypt the data using the configured options and generated iv + $data = mcrypt_encrypt($this->config['cipher'], $this->config['key'], $data, $this->config['mode'], $iv); + + // Use base64 encoding to convert to a string + return base64_encode($iv.$data); + } + + /** + * Decrypts an encoded string back to its original value. + * + * @param string encoded string to be decrypted + * @return string decrypted data + */ + public function decode($data) + { + // Convert the data back to binary + $data = base64_decode($data); + + // Extract the initialization vector from the data + $iv = substr($data, 0, $this->config['iv_size']); + + // Remove the iv from the data + $data = substr($data, $this->config['iv_size']); + + // Return the decrypted data, trimming the \0 padding bytes from the end of the data + return rtrim(mcrypt_decrypt($this->config['cipher'], $this->config['key'], $data, $this->config['mode'], $iv), "\0"); + } + +} // End Encrypt diff --git a/Server/system/libraries/Event_Observer.php b/Server/system/libraries/Event_Observer.php new file mode 100644 index 0000000..086c8a2 --- /dev/null +++ b/Server/system/libraries/Event_Observer.php @@ -0,0 +1,70 @@ +update($caller); + } + + /** + * Updates the observer subject with a new caller. + * + * @chainable + * @param object Event_Subject + * @return object + */ + public function update(SplSubject $caller) + { + if ( ! ($caller instanceof Event_Subject)) + throw new Kohana_Exception('event.invalid_subject', get_class($caller), get_class($this)); + + // Update the caller + $this->caller = $caller; + + return $this; + } + + /** + * Detaches this observer from the subject. + * + * @chainable + * @return object + */ + public function remove() + { + // Detach this observer from the caller + $this->caller->detach($this); + + return $this; + } + + /** + * Notify the observer of a new message. This function must be defined in + * all observers and must take exactly one parameter of any type. + * + * @param mixed message string, object, or array + * @return void + */ + abstract public function notify($message); + +} // End Event Observer \ No newline at end of file diff --git a/Server/system/libraries/Event_Subject.php b/Server/system/libraries/Event_Subject.php new file mode 100644 index 0000000..d1ccc54 --- /dev/null +++ b/Server/system/libraries/Event_Subject.php @@ -0,0 +1,67 @@ +listeners[spl_object_hash($obj)] = $obj; + + return $this; + } + + /** + * Detach an observer from the object. + * + * @chainable + * @param object Event_Observer + * @return object + */ + public function detach(SplObserver $obj) + { + // Remove the listener + unset($this->listeners[spl_object_hash($obj)]); + + return $this; + } + + /** + * Notify all attached observers of a new message. + * + * @chainable + * @param mixed message string, object, or array + * @return object + */ + public function notify($message) + { + foreach ($this->listeners as $obj) + { + $obj->notify($message); + } + + return $this; + } + +} // End Event Subject \ No newline at end of file diff --git a/Server/system/libraries/Image.php b/Server/system/libraries/Image.php new file mode 100644 index 0000000..2de0658 --- /dev/null +++ b/Server/system/libraries/Image.php @@ -0,0 +1,431 @@ + 'gif', + IMAGETYPE_JPEG => 'jpg', + IMAGETYPE_PNG => 'png', + IMAGETYPE_TIFF_II => 'tiff', + IMAGETYPE_TIFF_MM => 'tiff', + ); + + // Driver instance + protected $driver; + + // Driver actions + protected $actions = array(); + + // Reference to the current image filename + protected $image = ''; + + /** + * Creates a new Image instance and returns it. + * + * @param string filename of image + * @param array non-default configurations + * @return object + */ + public static function factory($image, $config = NULL) + { + return new Image($image, $config); + } + + /** + * Creates a new image editor instance. + * + * @throws Kohana_Exception + * @param string filename of image + * @param array non-default configurations + * @return void + */ + public function __construct($image, $config = NULL) + { + static $check; + + // Make the check exactly once + ($check === NULL) and $check = function_exists('getimagesize'); + + if ($check === FALSE) + throw new Kohana_Exception('image.getimagesize_missing'); + + // Check to make sure the image exists + if ( ! is_file($image)) + throw new Kohana_Exception('image.file_not_found', $image); + + // Disable error reporting, to prevent PHP warnings + $ER = error_reporting(0); + + // Fetch the image size and mime type + $image_info = getimagesize($image); + + // Turn on error reporting again + error_reporting($ER); + + // Make sure that the image is readable and valid + if ( ! is_array($image_info) OR count($image_info) < 3) + throw new Kohana_Exception('image.file_unreadable', $image); + + // Check to make sure the image type is allowed + if ( ! isset(Image::$allowed_types[$image_info[2]])) + throw new Kohana_Exception('image.type_not_allowed', $image); + + // Image has been validated, load it + $this->image = array + ( + 'file' => str_replace('\\', '/', realpath($image)), + 'width' => $image_info[0], + 'height' => $image_info[1], + 'type' => $image_info[2], + 'ext' => Image::$allowed_types[$image_info[2]], + 'mime' => $image_info['mime'] + ); + + // Load configuration + $this->config = (array) $config + Kohana::config('image'); + + // Set driver class name + $driver = 'Image_'.ucfirst($this->config['driver']).'_Driver'; + + // Load the driver + if ( ! Kohana::auto_load($driver)) + throw new Kohana_Exception('core.driver_not_found', $this->config['driver'], get_class($this)); + + // Initialize the driver + $this->driver = new $driver($this->config['params']); + + // Validate the driver + if ( ! ($this->driver instanceof Image_Driver)) + throw new Kohana_Exception('core.driver_implements', $this->config['driver'], get_class($this), 'Image_Driver'); + } + + /** + * Handles retrieval of pre-save image properties + * + * @param string property name + * @return mixed + */ + public function __get($property) + { + if (isset($this->image[$property])) + { + return $this->image[$property]; + } + else + { + throw new Kohana_Exception('core.invalid_property', $property, get_class($this)); + } + } + + /** + * Resize an image to a specific width and height. By default, Kohana will + * maintain the aspect ratio using the width as the master dimension. If you + * wish to use height as master dim, set $image->master_dim = Image::HEIGHT + * This method is chainable. + * + * @throws Kohana_Exception + * @param integer width + * @param integer height + * @param integer one of: Image::NONE, Image::AUTO, Image::WIDTH, Image::HEIGHT + * @return object + */ + public function resize($width, $height, $master = NULL) + { + if ( ! $this->valid_size('width', $width)) + throw new Kohana_Exception('image.invalid_width', $width); + + if ( ! $this->valid_size('height', $height)) + throw new Kohana_Exception('image.invalid_height', $height); + + if (empty($width) AND empty($height)) + throw new Kohana_Exception('image.invalid_dimensions', __FUNCTION__); + + if ($master === NULL) + { + // Maintain the aspect ratio by default + $master = Image::AUTO; + } + elseif ( ! $this->valid_size('master', $master)) + throw new Kohana_Exception('image.invalid_master'); + + $this->actions['resize'] = array + ( + 'width' => $width, + 'height' => $height, + 'master' => $master, + ); + + return $this; + } + + /** + * Crop an image to a specific width and height. You may also set the top + * and left offset. + * This method is chainable. + * + * @throws Kohana_Exception + * @param integer width + * @param integer height + * @param integer top offset, pixel value or one of: top, center, bottom + * @param integer left offset, pixel value or one of: left, center, right + * @return object + */ + public function crop($width, $height, $top = 'center', $left = 'center') + { + if ( ! $this->valid_size('width', $width)) + throw new Kohana_Exception('image.invalid_width', $width); + + if ( ! $this->valid_size('height', $height)) + throw new Kohana_Exception('image.invalid_height', $height); + + if ( ! $this->valid_size('top', $top)) + throw new Kohana_Exception('image.invalid_top', $top); + + if ( ! $this->valid_size('left', $left)) + throw new Kohana_Exception('image.invalid_left', $left); + + if (empty($width) AND empty($height)) + throw new Kohana_Exception('image.invalid_dimensions', __FUNCTION__); + + $this->actions['crop'] = array + ( + 'width' => $width, + 'height' => $height, + 'top' => $top, + 'left' => $left, + ); + + return $this; + } + + /** + * Allows rotation of an image by 180 degrees clockwise or counter clockwise. + * + * @param integer degrees + * @return object + */ + public function rotate($degrees) + { + $degrees = (int) $degrees; + + if ($degrees > 180) + { + do + { + // Keep subtracting full circles until the degrees have normalized + $degrees -= 360; + } + while($degrees > 180); + } + + if ($degrees < -180) + { + do + { + // Keep adding full circles until the degrees have normalized + $degrees += 360; + } + while($degrees < -180); + } + + $this->actions['rotate'] = $degrees; + + return $this; + } + + /** + * Flip an image horizontally or vertically. + * + * @throws Kohana_Exception + * @param integer direction + * @return object + */ + public function flip($direction) + { + if ($direction !== Image::HORIZONTAL AND $direction !== Image::VERTICAL) + throw new Kohana_Exception('image.invalid_flip'); + + $this->actions['flip'] = $direction; + + return $this; + } + + /** + * Change the quality of an image. + * + * @param integer quality as a percentage + * @return object + */ + public function quality($amount) + { + $this->actions['quality'] = max(1, min($amount, 100)); + + return $this; + } + + /** + * Sharpen an image. + * + * @param integer amount to sharpen, usually ~20 is ideal + * @return object + */ + public function sharpen($amount) + { + $this->actions['sharpen'] = max(1, min($amount, 100)); + + return $this; + } + + /** + * Save the image to a new image or overwrite this image. + * + * @throws Kohana_Exception + * @param string new image filename + * @param integer permissions for new image + * @param boolean keep or discard image process actions + * @return object + */ + public function save($new_image = FALSE, $chmod = 0644, $keep_actions = FALSE) + { + // If no new image is defined, use the current image + empty($new_image) and $new_image = $this->image['file']; + + // Separate the directory and filename + $dir = pathinfo($new_image, PATHINFO_DIRNAME); + $file = pathinfo($new_image, PATHINFO_BASENAME); + + // Normalize the path + $dir = str_replace('\\', '/', realpath($dir)).'/'; + + if ( ! is_writable($dir)) + throw new Kohana_Exception('image.directory_unwritable', $dir); + + if ($status = $this->driver->process($this->image, $this->actions, $dir, $file)) + { + if ($chmod !== FALSE) + { + // Set permissions + chmod($new_image, $chmod); + } + } + + // Reset actions. Subsequent save() or render() will not apply previous actions. + if ($keep_actions === FALSE) + $this->actions = array(); + + return $status; + } + + /** + * Output the image to the browser. + * + * @param boolean keep or discard image process actions + * @return object + */ + public function render($keep_actions = FALSE) + { + $new_image = $this->image['file']; + + // Separate the directory and filename + $dir = pathinfo($new_image, PATHINFO_DIRNAME); + $file = pathinfo($new_image, PATHINFO_BASENAME); + + // Normalize the path + $dir = str_replace('\\', '/', realpath($dir)).'/'; + + // Process the image with the driver + $status = $this->driver->process($this->image, $this->actions, $dir, $file, $render = TRUE); + + // Reset actions. Subsequent save() or render() will not apply previous actions. + if ($keep_actions === FALSE) + $this->actions = array(); + + return $status; + } + + /** + * Sanitize a given value type. + * + * @param string type of property + * @param mixed property value + * @return boolean + */ + protected function valid_size($type, & $value) + { + if (is_null($value)) + return TRUE; + + if ( ! is_scalar($value)) + return FALSE; + + switch ($type) + { + case 'width': + case 'height': + if (is_string($value) AND ! ctype_digit($value)) + { + // Only numbers and percent signs + if ( ! preg_match('/^[0-9]++%$/D', $value)) + return FALSE; + } + else + { + $value = (int) $value; + } + break; + case 'top': + if (is_string($value) AND ! ctype_digit($value)) + { + if ( ! in_array($value, array('top', 'bottom', 'center'))) + return FALSE; + } + else + { + $value = (int) $value; + } + break; + case 'left': + if (is_string($value) AND ! ctype_digit($value)) + { + if ( ! in_array($value, array('left', 'right', 'center'))) + return FALSE; + } + else + { + $value = (int) $value; + } + break; + case 'master': + if ($value !== Image::NONE AND + $value !== Image::AUTO AND + $value !== Image::WIDTH AND + $value !== Image::HEIGHT) + return FALSE; + break; + } + + return TRUE; + } + +} // End Image \ No newline at end of file diff --git a/Server/system/libraries/Input.php b/Server/system/libraries/Input.php new file mode 100644 index 0000000..0e23c80 --- /dev/null +++ b/Server/system/libraries/Input.php @@ -0,0 +1,452 @@ +use_xss_clean = (bool) Kohana::config('core.global_xss_filtering'); + + if (Input::$instance === NULL) + { + // magic_quotes_runtime is enabled + if (get_magic_quotes_runtime()) + { + set_magic_quotes_runtime(0); + Kohana::log('debug', 'Disable magic_quotes_runtime! It is evil and deprecated: http://php.net/magic_quotes'); + } + + // magic_quotes_gpc is enabled + if (get_magic_quotes_gpc()) + { + $this->magic_quotes_gpc = TRUE; + Kohana::log('debug', 'Disable magic_quotes_gpc! It is evil and deprecated: http://php.net/magic_quotes'); + } + + // register_globals is enabled + if (ini_get('register_globals')) + { + if (isset($_REQUEST['GLOBALS'])) + { + // Prevent GLOBALS override attacks + exit('Global variable overload attack.'); + } + + // Destroy the REQUEST global + $_REQUEST = array(); + + // These globals are standard and should not be removed + $preserve = array('GLOBALS', '_REQUEST', '_GET', '_POST', '_FILES', '_COOKIE', '_SERVER', '_ENV', '_SESSION'); + + // This loop has the same effect as disabling register_globals + foreach (array_diff(array_keys($GLOBALS), $preserve) as $key) + { + global $$key; + $$key = NULL; + + // Unset the global variable + unset($GLOBALS[$key], $$key); + } + + // Warn the developer about register globals + Kohana::log('debug', 'Disable register_globals! It is evil and deprecated: http://php.net/register_globals'); + } + + if (is_array($_GET)) + { + foreach ($_GET as $key => $val) + { + // Sanitize $_GET + $_GET[$this->clean_input_keys($key)] = $this->clean_input_data($val); + } + } + else + { + $_GET = array(); + } + + if (is_array($_POST)) + { + foreach ($_POST as $key => $val) + { + // Sanitize $_POST + $_POST[$this->clean_input_keys($key)] = $this->clean_input_data($val); + } + } + else + { + $_POST = array(); + } + + if (is_array($_COOKIE)) + { + foreach ($_COOKIE as $key => $val) + { + // Ignore special attributes in RFC2109 compliant cookies + if ($key == '$Version' OR $key == '$Path' OR $key == '$Domain') + continue; + + // Sanitize $_COOKIE + $_COOKIE[$this->clean_input_keys($key)] = $this->clean_input_data($val); + } + } + else + { + $_COOKIE = array(); + } + + // Create a singleton + Input::$instance = $this; + + Kohana::log('debug', 'Global GET, POST and COOKIE data sanitized'); + } + } + + /** + * Fetch an item from the $_GET array. + * + * @param string key to find + * @param mixed default value + * @param boolean XSS clean the value + * @return mixed + */ + public function get($key = array(), $default = NULL, $xss_clean = FALSE) + { + return $this->search_array($_GET, $key, $default, $xss_clean); + } + + /** + * Fetch an item from the $_POST array. + * + * @param string key to find + * @param mixed default value + * @param boolean XSS clean the value + * @return mixed + */ + public function post($key = array(), $default = NULL, $xss_clean = FALSE) + { + return $this->search_array($_POST, $key, $default, $xss_clean); + } + + /** + * Fetch an item from the $_COOKIE array. + * + * @param string key to find + * @param mixed default value + * @param boolean XSS clean the value + * @return mixed + */ + public function cookie($key = array(), $default = NULL, $xss_clean = FALSE) + { + return $this->search_array($_COOKIE, $key, $default, $xss_clean); + } + + /** + * Fetch an item from the $_SERVER array. + * + * @param string key to find + * @param mixed default value + * @param boolean XSS clean the value + * @return mixed + */ + public function server($key = array(), $default = NULL, $xss_clean = FALSE) + { + return $this->search_array($_SERVER, $key, $default, $xss_clean); + } + + /** + * Fetch an item from a global array. + * + * @param array array to search + * @param string key to find + * @param mixed default value + * @param boolean XSS clean the value + * @return mixed + */ + protected function search_array($array, $key, $default = NULL, $xss_clean = FALSE) + { + if ($key === array()) + return $array; + + if ( ! isset($array[$key])) + return $default; + + // Get the value + $value = $array[$key]; + + if ($this->use_xss_clean === FALSE AND $xss_clean === TRUE) + { + // XSS clean the value + $value = $this->xss_clean($value); + } + + return $value; + } + + /** + * Fetch the IP Address. + * + * @return string + */ + public function ip_address() + { + if ($this->ip_address !== NULL) + return $this->ip_address; + + // Server keys that could contain the client IP address + $keys = array('HTTP_X_FORWARDED_FOR', 'HTTP_CLIENT_IP', 'REMOTE_ADDR'); + + foreach ($keys as $key) + { + if ($ip = $this->server($key)) + { + $this->ip_address = $ip; + + // An IP address has been found + break; + } + } + + if ($comma = strrpos($this->ip_address, ',') !== FALSE) + { + $this->ip_address = substr($this->ip_address, $comma + 1); + } + + if ( ! valid::ip($this->ip_address)) + { + // Use an empty IP + $this->ip_address = '0.0.0.0'; + } + + return $this->ip_address; + } + + /** + * Clean cross site scripting exploits from string. + * HTMLPurifier may be used if installed, otherwise defaults to built in method. + * Note - This function should only be used to deal with data upon submission. + * It's not something that should be used for general runtime processing + * since it requires a fair amount of processing overhead. + * + * @param string data to clean + * @param string xss_clean method to use ('htmlpurifier' or defaults to built-in method) + * @return string + */ + public function xss_clean($data, $tool = NULL) + { + if ($tool === NULL) + { + // Use the default tool + $tool = Kohana::config('core.global_xss_filtering'); + } + + if (is_array($data)) + { + foreach ($data as $key => $val) + { + $data[$key] = $this->xss_clean($val, $tool); + } + + return $data; + } + + // Do not clean empty strings + if (trim($data) === '') + return $data; + + if ($tool === TRUE) + { + // NOTE: This is necessary because switch is NOT type-sensative! + $tool = 'default'; + } + + switch ($tool) + { + case 'htmlpurifier': + /** + * @todo License should go here, http://htmlpurifier.org/ + */ + if ( ! class_exists('HTMLPurifier_Config', FALSE)) + { + // Load HTMLPurifier + require Kohana::find_file('vendor', 'htmlpurifier/HTMLPurifier.auto', TRUE); + require 'HTMLPurifier.func.php'; + } + + // Set configuration + $config = HTMLPurifier_Config::createDefault(); + $config->set('HTML', 'TidyLevel', 'none'); // Only XSS cleaning now + + // Run HTMLPurifier + $data = HTMLPurifier($data, $config); + break; + default: + // http://svn.bitflux.ch/repos/public/popoon/trunk/classes/externalinput.php + // +----------------------------------------------------------------------+ + // | Copyright (c) 2001-2006 Bitflux GmbH | + // +----------------------------------------------------------------------+ + // | Licensed under the Apache License, Version 2.0 (the "License"); | + // | you may not use this file except in compliance with the License. | + // | You may obtain a copy of the License at | + // | http://www.apache.org/licenses/LICENSE-2.0 | + // | Unless required by applicable law or agreed to in writing, software | + // | distributed under the License is distributed on an "AS IS" BASIS, | + // | WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or | + // | implied. See the License for the specific language governing | + // | permissions and limitations under the License. | + // +----------------------------------------------------------------------+ + // | Author: Christian Stocker | + // +----------------------------------------------------------------------+ + // + // Kohana Modifications: + // * Changed double quotes to single quotes, changed indenting and spacing + // * Removed magic_quotes stuff + // * Increased regex readability: + // * Used delimeters that aren't found in the pattern + // * Removed all unneeded escapes + // * Deleted U modifiers and swapped greediness where needed + // * Increased regex speed: + // * Made capturing parentheses non-capturing where possible + // * Removed parentheses where possible + // * Split up alternation alternatives + // * Made some quantifiers possessive + + // Fix &entity\n; + $data = str_replace(array('&','<','>'), array('&amp;','&lt;','&gt;'), $data); + $data = preg_replace('/(&#*\w+)[\x00-\x20]+;/u', '$1;', $data); + $data = preg_replace('/(&#x*[0-9A-F]+);*/iu', '$1;', $data); + $data = html_entity_decode($data, ENT_COMPAT, 'UTF-8'); + + // Remove any attribute starting with "on" or xmlns + $data = preg_replace('#(<[^>]+?[\x00-\x20"\'])(?:on|xmlns)[^>]*+>#iu', '$1>', $data); + + // Remove javascript: and vbscript: protocols + $data = preg_replace('#([a-z]*)[\x00-\x20]*=[\x00-\x20]*([`\'"]*)[\x00-\x20]*j[\x00-\x20]*a[\x00-\x20]*v[\x00-\x20]*a[\x00-\x20]*s[\x00-\x20]*c[\x00-\x20]*r[\x00-\x20]*i[\x00-\x20]*p[\x00-\x20]*t[\x00-\x20]*:#iu', '$1=$2nojavascript...', $data); + $data = preg_replace('#([a-z]*)[\x00-\x20]*=([\'"]*)[\x00-\x20]*v[\x00-\x20]*b[\x00-\x20]*s[\x00-\x20]*c[\x00-\x20]*r[\x00-\x20]*i[\x00-\x20]*p[\x00-\x20]*t[\x00-\x20]*:#iu', '$1=$2novbscript...', $data); + $data = preg_replace('#([a-z]*)[\x00-\x20]*=([\'"]*)[\x00-\x20]*-moz-binding[\x00-\x20]*:#u', '$1=$2nomozbinding...', $data); + + // Only works in IE: + $data = preg_replace('#(<[^>]+?)style[\x00-\x20]*=[\x00-\x20]*[`\'"]*.*?expression[\x00-\x20]*\([^>]*+>#i', '$1>', $data); + $data = preg_replace('#(<[^>]+?)style[\x00-\x20]*=[\x00-\x20]*[`\'"]*.*?behaviour[\x00-\x20]*\([^>]*+>#i', '$1>', $data); + $data = preg_replace('#(<[^>]+?)style[\x00-\x20]*=[\x00-\x20]*[`\'"]*.*?s[\x00-\x20]*c[\x00-\x20]*r[\x00-\x20]*i[\x00-\x20]*p[\x00-\x20]*t[\x00-\x20]*:*[^>]*+>#iu', '$1>', $data); + + // Remove namespaced elements (we do not need them) + $data = preg_replace('#]*+>#i', '', $data); + + do + { + // Remove really unwanted tags + $old_data = $data; + $data = preg_replace('#]*+>#i', '', $data); + } + while ($old_data !== $data); + break; + } + + return $data; + } + + /** + * This is a helper method. It enforces W3C specifications for allowed + * key name strings, to prevent malicious exploitation. + * + * @param string string to clean + * @return string + */ + public function clean_input_keys($str) + { + $chars = PCRE_UNICODE_PROPERTIES ? '\pL' : 'a-zA-Z'; + + if ( ! preg_match('#^['.$chars.'0-9:_.-]++$#uD', $str)) + { + exit('Disallowed key characters in global data.'); + } + + return $str; + } + + /** + * This is a helper method. It escapes data and forces all newline + * characters to "\n". + * + * @param unknown_type string to clean + * @return string + */ + public function clean_input_data($str) + { + if (is_array($str)) + { + $new_array = array(); + foreach ($str as $key => $val) + { + // Recursion! + $new_array[$this->clean_input_keys($key)] = $this->clean_input_data($val); + } + return $new_array; + } + + if ($this->magic_quotes_gpc === TRUE) + { + // Remove annoying magic quotes + $str = stripslashes($str); + } + + if ($this->use_xss_clean === TRUE) + { + $str = $this->xss_clean($str); + } + + if (strpos($str, "\r") !== FALSE) + { + // Standardize newlines + $str = str_replace(array("\r\n", "\r"), "\n", $str); + } + + return $str; + } + +} // End Input Class diff --git a/Server/system/libraries/Model.php b/Server/system/libraries/Model.php new file mode 100644 index 0000000..0c9fd8d --- /dev/null +++ b/Server/system/libraries/Model.php @@ -0,0 +1,31 @@ +db)) + { + // Load the default database + $this->db = Database::instance($this->db); + } + } + +} // End Model \ No newline at end of file diff --git a/Server/system/libraries/ORM.php b/Server/system/libraries/ORM.php new file mode 100644 index 0000000..c104860 --- /dev/null +++ b/Server/system/libraries/ORM.php @@ -0,0 +1,1431 @@ +object_name = strtolower(substr(get_class($this), 0, -6)); + $this->object_plural = inflector::plural($this->object_name); + + if (!isset($this->sorting)) + { + // Default sorting + $this->sorting = array($this->primary_key => 'asc'); + } + + // Initialize database + $this->__initialize(); + + // Clear the object + $this->clear(); + + if (is_object($id)) + { + // Load an object + $this->load_values((array) $id); + } + elseif (!empty($id)) + { + // Find an object + $this->find($id); + } + } + + /** + * Prepares the model database connection, determines the table name, + * and loads column information. + * + * @return void + */ + public function __initialize() + { + if ( ! is_object($this->db)) + { + // Get database instance + $this->db = Database::instance($this->db); + } + + if (empty($this->table_name)) + { + // Table name is the same as the object name + $this->table_name = $this->object_name; + + if ($this->table_names_plural === TRUE) + { + // Make the table name plural + $this->table_name = inflector::plural($this->table_name); + } + } + + if (is_array($this->ignored_columns)) + { + // Make the ignored columns mirrored = mirrored + $this->ignored_columns = array_combine($this->ignored_columns, $this->ignored_columns); + } + + // Load column information + $this->reload_columns(); + } + + /** + * Allows serialization of only the object data and state, to prevent + * "stale" objects being unserialized, which also requires less memory. + * + * @return array + */ + public function __sleep() + { + // Store only information about the object + return array('object_name', 'object', 'changed', 'loaded', 'saved', 'sorting'); + } + + /** + * Prepares the database connection and reloads the object. + * + * @return void + */ + public function __wakeup() + { + // Initialize database + $this->__initialize(); + + if ($this->reload_on_wakeup === TRUE) + { + // Reload the object + $this->reload(); + } + } + + /** + * Handles pass-through to database methods. Calls to query methods + * (query, get, insert, update) are not allowed. Query builder methods + * are chainable. + * + * @param string method name + * @param array method arguments + * @return mixed + */ + public function __call($method, array $args) + { + if (method_exists($this->db, $method)) + { + if (in_array($method, array('query', 'get', 'insert', 'update', 'delete'))) + throw new Kohana_Exception('orm.query_methods_not_allowed'); + + // Method has been applied to the database + $this->db_applied[$method] = $method; + + // Number of arguments passed + $num_args = count($args); + + if ($method === 'select' AND $num_args > 3) + { + // Call select() manually to avoid call_user_func_array + $this->db->select($args); + } + else + { + // We use switch here to manually call the database methods. This is + // done for speed: call_user_func_array can take over 300% longer to + // make calls. Most database methods are 4 arguments or less, so this + // avoids almost any calls to call_user_func_array. + + switch ($num_args) + { + case 0: + if (in_array($method, array('open_paren', 'close_paren', 'enable_cache', 'disable_cache'))) + { + // Should return ORM, not Database + $this->db->$method(); + } + else + { + // Support for things like reset_select, reset_write, list_tables + return $this->db->$method(); + } + break; + case 1: + $this->db->$method($args[0]); + break; + case 2: + $this->db->$method($args[0], $args[1]); + break; + case 3: + $this->db->$method($args[0], $args[1], $args[2]); + break; + case 4: + $this->db->$method($args[0], $args[1], $args[2], $args[3]); + break; + default: + // Here comes the snail... + call_user_func_array(array($this->db, $method), $args); + break; + } + } + + return $this; + } + else + { + throw new Kohana_Exception('core.invalid_method', $method, get_class($this)); + } + } + + /** + * Handles retrieval of all model values, relationships, and metadata. + * + * @param string column name + * @return mixed + */ + public function __get($column) + { + if (array_key_exists($column, $this->object)) + { + return $this->object[$column]; + } + elseif (isset($this->related[$column])) + { + return $this->related[$column]; + } + elseif ($column === 'primary_key_value') + { + return $this->object[$this->primary_key]; + } + elseif ($model = $this->related_object($column)) + { + // This handles the has_one and belongs_to relationships + + if (in_array($model->object_name, $this->belongs_to) OR ! array_key_exists($this->foreign_key($column), $model->object)) + { + // Foreign key lies in this table (this model belongs_to target model) OR an invalid has_one relationship + $where = array($model->table_name.'.'.$model->primary_key => $this->object[$this->foreign_key($column)]); + } + else + { + // Foreign key lies in the target table (this model has_one target model) + $where = array($this->foreign_key($column, $model->table_name) => $this->primary_key_value); + } + + // one<>alias:one relationship + return $this->related[$column] = $model->find($where); + } + elseif (isset($this->has_many[$column])) + { + // Load the "middle" model + $through = ORM::factory(inflector::singular($this->has_many[$column])); + + // Load the "end" model + $model = ORM::factory(inflector::singular($column)); + + // Join ON target model's primary key set to 'through' model's foreign key + // User-defined foreign keys must be defined in the 'through' model + $join_table = $through->table_name; + $join_col1 = $through->foreign_key($model->object_name, $join_table); + $join_col2 = $model->table_name.'.'.$model->primary_key; + + // one<>alias:many relationship + return $this->related[$column] = $model + ->join($join_table, $join_col1, $join_col2) + ->where($through->foreign_key($this->object_name, $join_table), $this->object[$this->primary_key]) + ->find_all(); + } + elseif (in_array($column, $this->has_many)) + { + // one<>many relationship + $model = ORM::factory(inflector::singular($column)); + return $this->related[$column] = $model + ->where($this->foreign_key($column, $model->table_name), $this->object[$this->primary_key]) + ->find_all(); + } + elseif (in_array($column, $this->has_and_belongs_to_many)) + { + // Load the remote model, always singular + $model = ORM::factory(inflector::singular($column)); + + if ($this->has($model, TRUE)) + { + // many<>many relationship + return $this->related[$column] = $model + ->in($model->table_name.'.'.$model->primary_key, $this->changed_relations[$column]) + ->find_all(); + } + else + { + // empty many<>many relationship + return $this->related[$column] = $model + ->where($model->table_name.'.'.$model->primary_key, NULL) + ->find_all(); + } + } + elseif (isset($this->ignored_columns[$column])) + { + return NULL; + } + elseif (in_array($column, array + ( + 'object_name', 'object_plural', // Object + 'primary_key', 'primary_val', 'table_name', 'table_columns', // Table + 'loaded', 'saved', // Status + 'has_one', 'belongs_to', 'has_many', 'has_and_belongs_to_many', 'load_with' // Relationships + ))) + { + // Model meta information + return $this->$column; + } + else + { + throw new Kohana_Exception('core.invalid_property', $column, get_class($this)); + } + } + + /** + * Handles setting of all model values, and tracks changes between values. + * + * @param string column name + * @param mixed column value + * @return void + */ + public function __set($column, $value) + { + if (isset($this->ignored_columns[$column])) + { + return NULL; + } + elseif (isset($this->object[$column]) OR array_key_exists($column, $this->object)) + { + if (isset($this->table_columns[$column])) + { + // Data has changed + $this->changed[$column] = $column; + + // Object is no longer saved + $this->saved = FALSE; + } + + $this->object[$column] = $this->load_type($column, $value); + } + elseif (in_array($column, $this->has_and_belongs_to_many) AND is_array($value)) + { + // Load relations + $model = ORM::factory(inflector::singular($column)); + + if ( ! isset($this->object_relations[$column])) + { + // Load relations + $this->has($model); + } + + // Change the relationships + $this->changed_relations[$column] = $value; + + if (isset($this->related[$column])) + { + // Force a reload of the relationships + unset($this->related[$column]); + } + } + else + { + throw new Kohana_Exception('core.invalid_property', $column, get_class($this)); + } + } + + /** + * Checks if object data is set. + * + * @param string column name + * @return boolean + */ + public function __isset($column) + { + return (isset($this->object[$column]) OR isset($this->related[$column])); + } + + /** + * Unsets object data. + * + * @param string column name + * @return void + */ + public function __unset($column) + { + unset($this->object[$column], $this->changed[$column], $this->related[$column]); + } + + /** + * Displays the primary key of a model when it is converted to a string. + * + * @return string + */ + public function __toString() + { + return (string) $this->object[$this->primary_key]; + } + + /** + * Returns the values of this object as an array. + * + * @return array + */ + public function as_array() + { + $object = array(); + + foreach ($this->object as $key => $val) + { + // Reconstruct the array (calls __get) + $object[$key] = $this->$key; + } + + return $object; + } + + /** + * Binds another one-to-one object to this model. One-to-one objects + * can be nested using 'object1:object2' syntax + * + * @param string $target_path + * @return void + */ + public function with($target_path) + { + if (isset($this->with_applied[$target_path])) + { + // Don't join anything already joined + return $this; + } + + // Split object parts + $objects = explode(':', $target_path); + $target = $this; + foreach ($objects as $object) + { + // Go down the line of objects to find the given target + $parent = $target; + $target = $parent->related_object($object); + + if ( ! $target) + { + // Can't find related object + return $this; + } + } + + $target_name = $object; + + // Pop-off top object to get the parent object (user:photo:tag becomes user:photo - the parent table prefix) + array_pop($objects); + $parent_path = implode(':', $objects); + + if (empty($parent_path)) + { + // Use this table name itself for the parent object + $parent_path = $this->table_name; + } + else + { + if( ! isset($this->with_applied[$parent_path])) + { + // If the parent object hasn't been joined yet, do it first (otherwise LEFT JOINs fail) + $this->with($parent_path); + } + } + + // Add to with_applied to prevent duplicate joins + $this->with_applied[$target_path] = TRUE; + + // Use the keys of the empty object to determine the columns + $select = array_keys($target->object); + foreach ($select as $i => $column) + { + // Add the prefix so that load_result can determine the relationship + $select[$i] = $target_path.'.'.$column.' AS '.$target_path.':'.$column; + } + + + // Select all of the prefixed keys in the object + $this->db->select($select); + + if (in_array($target->object_name, $parent->belongs_to) OR ! isset($target->object[$parent->foreign_key($target_name)])) + { + // Parent belongs_to target, use target's primary key as join column + $join_col1 = $target->foreign_key(TRUE, $target_path); + $join_col2 = $parent->foreign_key($target_name, $parent_path); + } + else + { + // Parent has_one target, use parent's primary key as join column + $join_col2 = $parent->foreign_key(TRUE, $parent_path); + $join_col1 = $parent->foreign_key($target_name, $target_path); + } + + // This allows for models to use different table prefixes (sharing the same database) + $join_table = new Database_Expression($target->db->table_prefix().$target->table_name.' AS '.$this->db->table_prefix().$target_path); + + // Join the related object into the result + $this->db->join($join_table, $join_col1, $join_col2, 'LEFT'); + + return $this; + } + + /** + * Finds and loads a single database row into the object. + * + * @chainable + * @param mixed primary key or an array of clauses + * @return ORM + */ + public function find($id = NULL) + { + if ($id !== NULL) + { + if (is_array($id)) + { + // Search for all clauses + $this->db->where($id); + } + else + { + // Search for a specific column + $this->db->where($this->table_name.'.'.$this->unique_key($id), $id); + } + } + + return $this->load_result(); + } + + /** + * Finds multiple database rows and returns an iterator of the rows found. + * + * @chainable + * @param integer SQL limit + * @param integer SQL offset + * @return ORM_Iterator + */ + public function find_all($limit = NULL, $offset = NULL) + { + if ($limit !== NULL AND ! isset($this->db_applied['limit'])) + { + // Set limit + $this->limit($limit); + } + + if ($offset !== NULL AND ! isset($this->db_applied['offset'])) + { + // Set offset + $this->offset($offset); + } + + return $this->load_result(TRUE); + } + + /** + * Creates a key/value array from all of the objects available. Uses find_all + * to find the objects. + * + * @param string key column + * @param string value column + * @return array + */ + public function select_list($key = NULL, $val = NULL) + { + if ($key === NULL) + { + $key = $this->primary_key; + } + + if ($val === NULL) + { + $val = $this->primary_val; + } + + // Return a select list from the results + return $this->select($key, $val)->find_all()->select_list($key, $val); + } + + /** + * Validates the current object. This method should generally be called + * via the model, after the $_POST Validation object has been created. + * + * @param object Validation array + * @return boolean + */ + public function validate(Validation $array, $save = FALSE) + { + $safe_array = $array->safe_array(); + + if ( ! $array->submitted()) + { + foreach ($safe_array as $key => $value) + { + // Get the value from this object + $value = $this->$key; + + if (is_object($value) AND $value instanceof ORM_Iterator) + { + // Convert the value to an array of primary keys + $value = $value->primary_key_array(); + } + + // Pre-fill data + $array[$key] = $value; + } + } + + // Validate the array + if ($status = $array->validate()) + { + // Grab only set fields (excludes missing data, unlike safe_array) + $fields = $array->as_array(); + + foreach ($fields as $key => $value) + { + if (isset($safe_array[$key])) + { + // Set new data, ignoring any missing fields or fields without rules + $this->$key = $value; + } + } + + if ($save === TRUE OR is_string($save)) + { + // Save this object + $this->save(); + + if (is_string($save)) + { + // Redirect to the saved page + url::redirect($save); + } + } + } + + // Return validation status + return $status; + } + + /** + * Saves the current object. + * + * @chainable + * @return ORM + */ + public function save() + { + if ( ! empty($this->changed)) + { + $data = array(); + foreach ($this->changed as $column) + { + // Compile changed data + $data[$column] = $this->object[$column]; + } + + if ($this->loaded === TRUE) + { + $query = $this->db + ->where($this->primary_key, $this->object[$this->primary_key]) + ->update($this->table_name, $data); + + // Object has been saved + $this->saved = TRUE; + } + else + { + $query = $this->db + ->insert($this->table_name, $data); + + if ($query->count() > 0) + { + if (empty($this->object[$this->primary_key])) + { + // Load the insert id as the primary key + $this->object[$this->primary_key] = $query->insert_id(); + } + + // Object is now loaded and saved + $this->loaded = $this->saved = TRUE; + } + } + + if ($this->saved === TRUE) + { + // All changes have been saved + $this->changed = array(); + } + } + + if ($this->saved === TRUE AND ! empty($this->changed_relations)) + { + foreach ($this->changed_relations as $column => $values) + { + // All values that were added + $added = array_diff($values, $this->object_relations[$column]); + + // All values that were saved + $removed = array_diff($this->object_relations[$column], $values); + + if (empty($added) AND empty($removed)) + { + // No need to bother + continue; + } + + // Clear related columns + unset($this->related[$column]); + + // Load the model + $model = ORM::factory(inflector::singular($column)); + + if (($join_table = array_search($column, $this->has_and_belongs_to_many)) === FALSE) + continue; + + if (is_int($join_table)) + { + // No "through" table, load the default JOIN table + $join_table = $model->join_table($this->table_name); + } + + // Foreign keys for the join table + $object_fk = $this->foreign_key(NULL); + $related_fk = $model->foreign_key(NULL); + + if ( ! empty($added)) + { + foreach ($added as $id) + { + // Insert the new relationship + $this->db->insert($join_table, array + ( + $object_fk => $this->object[$this->primary_key], + $related_fk => $id, + )); + } + } + + if ( ! empty($removed)) + { + $this->db + ->where($object_fk, $this->object[$this->primary_key]) + ->in($related_fk, $removed) + ->delete($join_table); + } + + // Clear all relations for this column + unset($this->object_relations[$column], $this->changed_relations[$column]); + } + } + + return $this; + } + + /** + * Deletes the current object from the database. This does NOT destroy + * relationships that have been created with other objects. + * + * @chainable + * @return ORM + */ + public function delete($id = NULL) + { + if ($id === NULL AND $this->loaded) + { + // Use the the primary key value + $id = $this->object[$this->primary_key]; + } + + // Delete this object + $this->db->where($this->primary_key, $id)->delete($this->table_name); + + return $this->clear(); + } + + /** + * Delete all objects in the associated table. This does NOT destroy + * relationships that have been created with other objects. + * + * @chainable + * @param array ids to delete + * @return ORM + */ + public function delete_all($ids = NULL) + { + if (is_array($ids)) + { + // Delete only given ids + $this->db->in($this->primary_key, $ids); + } + elseif (is_null($ids)) + { + // Delete all records + $this->db->where('1=1'); + } + else + { + // Do nothing - safeguard + return $this; + } + + // Delete all objects + $this->db->delete($this->table_name); + + return $this->clear(); + } + + /** + * Unloads the current object and clears the status. + * + * @chainable + * @return ORM + */ + public function clear() + { + // Create an array with all the columns set to NULL + $columns = array_keys($this->table_columns); + $values = array_combine($columns, array_fill(0, count($columns), NULL)); + + // Replace the current object with an empty one + $this->load_values($values); + + return $this; + } + + /** + * Reloads the current object from the database. + * + * @chainable + * @return ORM + */ + public function reload() + { + return $this->find($this->object[$this->primary_key]); + } + + /** + * Reload column definitions. + * + * @chainable + * @param boolean force reloading + * @return ORM + */ + public function reload_columns($force = FALSE) + { + if ($force === TRUE OR empty($this->table_columns)) + { + if (isset(ORM::$column_cache[$this->object_name])) + { + // Use cached column information + $this->table_columns = ORM::$column_cache[$this->object_name]; + } + else + { + // Load table columns + ORM::$column_cache[$this->object_name] = $this->table_columns = $this->list_fields(); + } + } + + return $this; + } + + /** + * Tests if this object has a relationship to a different model. + * + * @param object related ORM model + * @param boolean check for any relations to given model + * @return boolean + */ + public function has(ORM $model, $any = FALSE) + { + // Determine plural or singular relation name + $related = ($model->table_names_plural === TRUE) ? $model->object_plural : $model->object_name; + + if (($join_table = array_search($related, $this->has_and_belongs_to_many)) === FALSE) + return FALSE; + + if (is_int($join_table)) + { + // No "through" table, load the default JOIN table + $join_table = $model->join_table($this->table_name); + } + + if ( ! isset($this->object_relations[$related])) + { + // Load the object relationships + $this->changed_relations[$related] = $this->object_relations[$related] = $this->load_relations($join_table, $model); + } + + if ( ! $model->empty_primary_key()) + { + // Check if a specific object exists + return in_array($model->primary_key_value, $this->changed_relations[$related]); + } + elseif ($any) + { + // Check if any relations to given model exist + return ! empty($this->changed_relations[$related]); + } + else + { + return FALSE; + } + } + + /** + * Adds a new relationship to between this model and another. + * + * @param object related ORM model + * @return boolean + */ + public function add(ORM $model) + { + if ($this->has($model)) + return TRUE; + + // Get the faked column name + $column = $model->object_plural; + + // Add the new relation to the update + $this->changed_relations[$column][] = $model->primary_key_value; + + if (isset($this->related[$column])) + { + // Force a reload of the relationships + unset($this->related[$column]); + } + + return TRUE; + } + + /** + * Adds a new relationship to between this model and another. + * + * @param object related ORM model + * @return boolean + */ + public function remove(ORM $model) + { + if ( ! $this->has($model)) + return FALSE; + + // Get the faked column name + $column = $model->object_plural; + + if (($key = array_search($model->primary_key_value, $this->changed_relations[$column])) === FALSE) + return FALSE; + + // Remove the relationship + unset($this->changed_relations[$column][$key]); + + if (isset($this->related[$column])) + { + // Force a reload of the relationships + unset($this->related[$column]); + } + + return TRUE; + } + + /** + * Count the number of records in the table. + * + * @return integer + */ + public function count_all() + { + // Return the total number of records in a table + return $this->db->count_records($this->table_name); + } + + /** + * Proxy method to Database list_fields. + * + * @param string table name or NULL to use this table + * @return array + */ + public function list_fields($table = NULL) + { + if ($table === NULL) + { + $table = $this->table_name; + } + + // Proxy to database + return $this->db->list_fields($table); + } + + /** + * Proxy method to Database field_data. + * + * @param string table name + * @return array + */ + public function field_data($table) + { + // Proxy to database + return $this->db->field_data($table); + } + + /** + * Proxy method to Database field_data. + * + * @chainable + * @param string SQL query to clear + * @return ORM + */ + public function clear_cache($sql = NULL) + { + // Proxy to database + $this->db->clear_cache($sql); + + ORM::$column_cache = array(); + + return $this; + } + + /** + * Returns the unique key for a specific value. This method is expected + * to be overloaded in models if the model has other unique columns. + * + * @param mixed unique value + * @return string + */ + public function unique_key($id) + { + return $this->primary_key; + } + + /** + * Determines the name of a foreign key for a specific table. + * + * @param string related table name + * @param string prefix table name (used for JOINs) + * @return string + */ + public function foreign_key($table = NULL, $prefix_table = NULL) + { + if ($table === TRUE) + { + if (is_string($prefix_table)) + { + // Use prefix table name and this table's PK + return $prefix_table.'.'.$this->primary_key; + } + else + { + // Return the name of this table's PK + return $this->table_name.'.'.$this->primary_key; + } + } + + if (is_string($prefix_table)) + { + // Add a period for prefix_table.column support + $prefix_table .= '.'; + } + + if (isset($this->foreign_key[$table])) + { + // Use the defined foreign key name, no magic here! + $foreign_key = $this->foreign_key[$table]; + } + else + { + if ( ! is_string($table) OR ! array_key_exists($table.'_'.$this->primary_key, $this->object)) + { + // Use this table + $table = $this->table_name; + + if (strpos($table, '.') !== FALSE) + { + // Hack around support for PostgreSQL schemas + list ($schema, $table) = explode('.', $table, 2); + } + + if ($this->table_names_plural === TRUE) + { + // Make the key name singular + $table = inflector::singular($table); + } + } + + $foreign_key = $table.'_'.$this->primary_key; + } + + return $prefix_table.$foreign_key; + } + + /** + * This uses alphabetical comparison to choose the name of the table. + * + * Example: The joining table of users and roles would be roles_users, + * because "r" comes before "u". Joining products and categories would + * result in categories_products, because "c" comes before "p". + * + * Example: zoo > zebra > robber > ocean > angel > aardvark + * + * @param string table name + * @return string + */ + public function join_table($table) + { + if ($this->table_name > $table) + { + $table = $table.'_'.$this->table_name; + } + else + { + $table = $this->table_name.'_'.$table; + } + + return $table; + } + + /** + * Returns an ORM model for the given object name; + * + * @param string object name + * @return ORM + */ + protected function related_object($object) + { + if (isset($this->has_one[$object])) + { + $object = ORM::factory($this->has_one[$object]); + } + elseif (isset($this->belongs_to[$object])) + { + $object = ORM::factory($this->belongs_to[$object]); + } + elseif (in_array($object, $this->has_one) OR in_array($object, $this->belongs_to)) + { + $object = ORM::factory($object); + } + else + { + return FALSE; + } + + return $object; + } + + /** + * Loads an array of values into into the current object. + * + * @chainable + * @param array values to load + * @return ORM + */ + public function load_values(array $values) + { + if (array_key_exists($this->primary_key, $values)) + { + // Replace the object and reset the object status + $this->object = $this->changed = $this->related = array(); + + // Set the loaded and saved object status based on the primary key + $this->loaded = $this->saved = ($values[$this->primary_key] !== NULL); + } + + // Related objects + $related = array(); + + foreach ($values as $column => $value) + { + if (strpos($column, ':') === FALSE) + { + if (isset($this->table_columns[$column])) + { + // The type of the value can be determined, convert the value + $value = $this->load_type($column, $value); + } + + $this->object[$column] = $value; + } + else + { + list ($prefix, $column) = explode(':', $column, 2); + + $related[$prefix][$column] = $value; + } + } + + if ( ! empty($related)) + { + foreach ($related as $object => $values) + { + // Load the related objects with the values in the result + $this->related[$object] = $this->related_object($object)->load_values($values); + } + } + + return $this; + } + + /** + * Loads a value according to the types defined by the column metadata. + * + * @param string column name + * @param mixed value to load + * @return mixed + */ + protected function load_type($column, $value) + { + $type = gettype($value); + if ($type == 'object' OR $type == 'array' OR ! isset($this->table_columns[$column])) + return $value; + + // Load column data + $column = $this->table_columns[$column]; + + if ($value === NULL AND ! empty($column['null'])) + return $value; + + if ( ! empty($column['binary']) AND ! empty($column['exact']) AND (int) $column['length'] === 1) + { + // Use boolean for BINARY(1) fields + $column['type'] = 'boolean'; + } + + switch ($column['type']) + { + case 'int': + if ($value === '' AND ! empty($column['null'])) + { + // Forms will only submit strings, so empty integer values must be null + $value = NULL; + } + elseif ((float) $value > PHP_INT_MAX) + { + // This number cannot be represented by a PHP integer, so we convert it to a string + $value = (string) $value; + } + else + { + $value = (int) $value; + } + break; + case 'float': + $value = (float) $value; + break; + case 'boolean': + $value = (bool) $value; + break; + case 'string': + $value = (string) $value; + break; + } + + return $value; + } + + /** + * Loads a database result, either as a new object for this model, or as + * an iterator for multiple rows. + * + * @chainable + * @param boolean return an iterator or load a single row + * @return ORM for single rows + * @return ORM_Iterator for multiple rows + */ + protected function load_result($array = FALSE) + { + if ($array === FALSE) + { + // Only fetch 1 record + $this->db->limit(1); + } + + if ( ! isset($this->db_applied['select'])) + { + // Select all columns by default + $this->db->select($this->table_name.'.*'); + } + + if ( ! empty($this->load_with)) + { + foreach ($this->load_with as $alias => $object) + { + // Join each object into the results + if (is_string($alias)) + { + // Use alias + $this->with($alias); + } + else + { + // Use object + $this->with($object); + } + } + } + + if ( ! isset($this->db_applied['orderby']) AND ! empty($this->sorting)) + { + $sorting = array(); + foreach ($this->sorting as $column => $direction) + { + if (strpos($column, '.') === FALSE) + { + // Keeps sorting working properly when using JOINs on + // tables with columns of the same name + $column = $this->table_name.'.'.$column; + } + + $sorting[$column] = $direction; + } + + // Apply the user-defined sorting + $this->db->orderby($sorting); + } + + // Load the result + $result = $this->db->get($this->table_name); + + if ($array === TRUE) + { + // Return an iterated result + return new ORM_Iterator($this, $result); + } + + if ($result->count() === 1) + { + // Load object values + $this->load_values($result->result(FALSE)->current()); + } + else + { + // Clear the object, nothing was found + $this->clear(); + } + + return $this; + } + + /** + * Return an array of all the primary keys of the related table. + * + * @param string table name + * @param object ORM model to find relations of + * @return array + */ + protected function load_relations($table, ORM $model) + { + // Save the current query chain (otherwise the next call will clash) + $this->db->push(); + + $query = $this->db + ->select($model->foreign_key(NULL).' AS id') + ->from($table) + ->where($this->foreign_key(NULL, $table), $this->object[$this->primary_key]) + ->get() + ->result(TRUE); + + $this->db->pop(); + + $relations = array(); + foreach ($query as $row) + { + $relations[] = $row->id; + } + + return $relations; + } + + /** + * Returns whether or not primary key is empty + * + * @return bool + */ + protected function empty_primary_key() + { + return (empty($this->object[$this->primary_key]) AND $this->object[$this->primary_key] !== '0'); + } + +} // End ORM diff --git a/Server/system/libraries/ORM_Iterator.php b/Server/system/libraries/ORM_Iterator.php new file mode 100644 index 0000000..41aa806 --- /dev/null +++ b/Server/system/libraries/ORM_Iterator.php @@ -0,0 +1,228 @@ +class_name = get_class($model); + $this->primary_key = $model->primary_key; + $this->primary_val = $model->primary_val; + + // Database result + $this->result = $result->result(TRUE); + } + + /** + * Returns an array of the results as ORM objects. + * + * @return array + */ + public function as_array() + { + $array = array(); + + if ($results = $this->result->result_array()) + { + // Import class name + $class = $this->class_name; + + foreach ($results as $obj) + { + $array[] = new $class($obj); + } + } + + return $array; + } + + /** + * Return an array of all of the primary keys for this object. + * + * @return array + */ + public function primary_key_array() + { + $ids = array(); + foreach ($this->result as $row) + { + $ids[] = $row->{$this->primary_key}; + } + return $ids; + } + + /** + * Create a key/value array from the results. + * + * @param string key column + * @param string value column + * @return array + */ + public function select_list($key = NULL, $val = NULL) + { + if ($key === NULL) + { + // Use the default key + $key = $this->primary_key; + } + + if ($val === NULL) + { + // Use the default value + $val = $this->primary_val; + } + + $array = array(); + foreach ($this->result->result_array() as $row) + { + $array[$row->$key] = $row->$val; + } + return $array; + } + + /** + * Return a range of offsets. + * + * @param integer start + * @param integer end + * @return array + */ + public function range($start, $end) + { + // Array of objects + $array = array(); + + if ($this->result->offsetExists($start)) + { + // Import the class name + $class = $this->class_name; + + // Set the end offset + $end = $this->result->offsetExists($end) ? $end : $this->count(); + + for ($i = $start; $i < $end; $i++) + { + // Insert each object in the range + $array[] = new $class($this->result->offsetGet($i)); + } + } + + return $array; + } + + /** + * Countable: count + */ + public function count() + { + return $this->result->count(); + } + + /** + * Iterator: current + */ + public function current() + { + if ($row = $this->result->current()) + { + // Import class name + $class = $this->class_name; + + $row = new $class($row); + } + + return $row; + } + + /** + * Iterator: key + */ + public function key() + { + return $this->result->key(); + } + + /** + * Iterator: next + */ + public function next() + { + return $this->result->next(); + } + + /** + * Iterator: rewind + */ + public function rewind() + { + $this->result->rewind(); + } + + /** + * Iterator: valid + */ + public function valid() + { + return $this->result->valid(); + } + + /** + * ArrayAccess: offsetExists + */ + public function offsetExists($offset) + { + return $this->result->offsetExists($offset); + } + + /** + * ArrayAccess: offsetGet + */ + public function offsetGet($offset) + { + if ($this->result->offsetExists($offset)) + { + // Import class name + $class = $this->class_name; + + return new $class($this->result->offsetGet($offset)); + } + } + + /** + * ArrayAccess: offsetSet + * + * @throws Kohana_Database_Exception + */ + public function offsetSet($offset, $value) + { + throw new Kohana_Database_Exception('database.result_read_only'); + } + + /** + * ArrayAccess: offsetUnset + * + * @throws Kohana_Database_Exception + */ + public function offsetUnset($offset) + { + throw new Kohana_Database_Exception('database.result_read_only'); + } + +} // End ORM Iterator \ No newline at end of file diff --git a/Server/system/libraries/ORM_Tree.php b/Server/system/libraries/ORM_Tree.php new file mode 100644 index 0000000..cdb09fd --- /dev/null +++ b/Server/system/libraries/ORM_Tree.php @@ -0,0 +1,76 @@ +related[$column])) + { + // Load child model + $model = ORM::factory(inflector::singular($this->ORM_Tree_children)); + + if (array_key_exists($this->ORM_Tree_parent_key, $this->object)) + { + // Find children of this parent + $model->where($model->primary_key, $this->object[$this->ORM_Tree_parent_key])->find(); + } + + $this->related[$column] = $model; + } + + return $this->related[$column]; + } + elseif ($column === 'children') + { + if (empty($this->related[$column])) + { + $model = ORM::factory(inflector::singular($this->ORM_Tree_children)); + + if ($this->ORM_Tree_children === $this->table_name) + { + // Load children within this table + $this->related[$column] = $model + ->where($this->ORM_Tree_parent_key, $this->object[$this->primary_key]) + ->find_all(); + } + else + { + // Find first selection of children + $this->related[$column] = $model + ->where($this->foreign_key(), $this->object[$this->primary_key]) + ->where($this->ORM_Tree_parent_key, NULL) + ->find_all(); + } + } + + return $this->related[$column]; + } + + return parent::__get($column); + } + +} // End ORM Tree \ No newline at end of file diff --git a/Server/system/libraries/ORM_Versioned.php b/Server/system/libraries/ORM_Versioned.php new file mode 100644 index 0000000..7c3ee5d --- /dev/null +++ b/Server/system/libraries/ORM_Versioned.php @@ -0,0 +1,143 @@ +last_version = 1 + ($this->last_version === NULL ? $this->object['version'] : $this->last_version); + $this->__set('version', $this->last_version); + + parent::save(); + + if ($this->saved) + { + $data = array(); + foreach ($this->object as $key => $value) + { + if ($key === 'id') + continue; + + $data[$key] = $value; + } + $data[$this->foreign_key()] = $this->id; + + $this->db->insert($this->table_name.'_versions', $data); + } + + return $this; + } + + /** + * Loads previous version from current object + * + * @chainable + * @return ORM + */ + public function previous() + { + if ( ! $this->loaded) + return $this; + + $this->last_version = ($this->last_version === NULL) ? $this->object['version'] : $this->last_version; + $version = $this->last_version - 1; + + $query = $this->db + ->where($this->foreign_key(), $this->object[$this->primary_key]) + ->where('version', $version) + ->limit(1) + ->get($this->table_name.'_versions'); + + if ($query->count()) + { + $this->load_values($query->result(FALSE)->current()); + } + + return $this; + } + + /** + * Restores the object with data from stored version + * + * @param integer version number you want to restore + * @return ORM + */ + public function restore($version) + { + if ( ! $this->loaded) + return $this; + + $query = $this->db + ->where($this->foreign_key(), $this->object[$this->primary_key]) + ->where('version', $version) + ->limit(1) + ->get($this->table_name.'_versions'); + + if ($query->count()) + { + $row = $query->result(FALSE)->current(); + + foreach ($row as $key => $value) + { + if ($key === $this->primary_key OR $key === $this->foreign_key()) + { + // Do not overwrite the primary key + continue; + } + + if ($key === 'version') + { + // Always use the current version + $value = $this->version; + } + + $this->__set($key, $value); + } + + $this->save(); + } + + return $this; + } + + /** + * Overloads ORM::delete() to delete all versioned entries of current object + * and the object itself + * + * @param integer id of the object you want to delete + * @return ORM + */ + public function delete($id = NULL) + { + if ($id === NULL) + { + // Use the current object id + $id = $this->object[$this->primary_key]; + } + + if ($status = parent::delete($id)) + { + $this->db->where($this->foreign_key(), $id)->delete($this->table_name.'_versions'); + } + + return $status; + } + +} \ No newline at end of file diff --git a/Server/system/libraries/Pagination.php b/Server/system/libraries/Pagination.php new file mode 100644 index 0000000..a8f7bb1 --- /dev/null +++ b/Server/system/libraries/Pagination.php @@ -0,0 +1,236 @@ +initialize($config); + + Kohana::log('debug', 'Pagination Library initialized'); + } + + /** + * Sets config values. + * + * @throws Kohana_Exception + * @param array configuration settings + * @return void + */ + public function initialize($config = array()) + { + // Load config group + if (isset($config['group'])) + { + // Load and validate config group + if ( ! is_array($group_config = Kohana::config('pagination.'.$config['group']))) + throw new Kohana_Exception('pagination.undefined_group', $config['group']); + + // All pagination config groups inherit default config group + if ($config['group'] !== 'default') + { + // Load and validate default config group + if ( ! is_array($default_config = Kohana::config('pagination.default'))) + throw new Kohana_Exception('pagination.undefined_group', 'default'); + + // Merge config group with default config group + $group_config += $default_config; + } + + // Merge custom config items with config group + $config += $group_config; + } + + // Assign config values to the object + foreach ($config as $key => $value) + { + if (property_exists($this, $key)) + { + $this->$key = $value; + } + } + + // Clean view directory + $this->directory = trim($this->directory, '/').'/'; + + // Build generic URL with page in query string + if ($this->query_string !== '') + { + // Extract current page + $this->current_page = isset($_GET[$this->query_string]) ? (int) $_GET[$this->query_string] : 1; + + // Insert {page} placeholder + $_GET[$this->query_string] = '{page}'; + + // Create full URL + $base_url = ($this->base_url === '') ? Router::$current_uri : $this->base_url; + $this->url = url::site($base_url).'?'.str_replace('%7Bpage%7D', '{page}', http_build_query($_GET)); + + // Reset page number + $_GET[$this->query_string] = $this->current_page; + } + + // Build generic URL with page as URI segment + else + { + // Use current URI if no base_url set + $this->url = ($this->base_url === '') ? Router::$segments : explode('/', trim($this->base_url, '/')); + + // Convert uri 'label' to corresponding integer if needed + if (is_string($this->uri_segment)) + { + if (($key = array_search($this->uri_segment, $this->url)) === FALSE) + { + // If uri 'label' is not found, auto add it to base_url + $this->url[] = $this->uri_segment; + $this->uri_segment = count($this->url) + 1; + } + else + { + $this->uri_segment = $key + 2; + } + } + + // Insert {page} placeholder + $this->url[$this->uri_segment - 1] = '{page}'; + + // Create full URL + $this->url = url::site(implode('/', $this->url)).Router::$query_string; + + // Extract current page + $this->current_page = URI::instance()->segment($this->uri_segment); + } + + // Core pagination values + $this->total_items = (int) max(0, $this->total_items); + $this->items_per_page = (int) max(1, $this->items_per_page); + $this->total_pages = (int) ceil($this->total_items / $this->items_per_page); + $this->current_page = (int) min(max(1, $this->current_page), max(1, $this->total_pages)); + $this->current_first_item = (int) min((($this->current_page - 1) * $this->items_per_page) + 1, $this->total_items); + $this->current_last_item = (int) min($this->current_first_item + $this->items_per_page - 1, $this->total_items); + + // If there is no first/last/previous/next page, relative to the + // current page, value is set to FALSE. Valid page number otherwise. + $this->first_page = ($this->current_page === 1) ? FALSE : 1; + $this->last_page = ($this->current_page >= $this->total_pages) ? FALSE : $this->total_pages; + $this->previous_page = ($this->current_page > 1) ? $this->current_page - 1 : FALSE; + $this->next_page = ($this->current_page < $this->total_pages) ? $this->current_page + 1 : FALSE; + + // SQL values + $this->sql_offset = (int) ($this->current_page - 1) * $this->items_per_page; + $this->sql_limit = sprintf(' LIMIT %d OFFSET %d ', $this->items_per_page, $this->sql_offset); + } + + /** + * Generates the HTML for the chosen pagination style. + * + * @param string pagination style + * @return string pagination html + */ + public function render($style = NULL) + { + // Hide single page pagination + if ($this->auto_hide === TRUE AND $this->total_pages <= 1) + return ''; + + if ($style === NULL) + { + // Use default style + $style = $this->style; + } + + // Return rendered pagination view + return View::factory($this->directory.$style, get_object_vars($this))->render(); + } + + /** + * Magically converts Pagination object to string. + * + * @return string pagination html + */ + public function __toString() + { + return $this->render(); + } + + /** + * Magically gets a pagination variable. + * + * @param string variable key + * @return mixed variable value if the key is found + * @return void if the key is not found + */ + public function __get($key) + { + if (isset($this->$key)) + return $this->$key; + } + + /** + * Adds a secondary interface for accessing properties, e.g. $pagination->total_pages(). + * Note that $pagination->total_pages is the recommended way to access properties. + * + * @param string function name + * @return string + */ + public function __call($func, $args = NULL) + { + return $this->__get($func); + } + +} // End Pagination Class \ No newline at end of file diff --git a/Server/system/libraries/Profiler.php b/Server/system/libraries/Profiler.php new file mode 100644 index 0000000..9da053f --- /dev/null +++ b/Server/system/libraries/Profiler.php @@ -0,0 +1,271 @@ +show OR (is_array($this->show) AND ! in_array($args[0], $this->show))) + return FALSE; + + // Class name + $class = 'Profiler_'.ucfirst($method); + + $class = new $class(); + + $this->profiles[$args[0]] = $class; + + return $class; + } + + /** + * Disables the profiler for this page only. + * Best used when profiler is autoloaded. + * + * @return void + */ + public function disable() + { + // Removes itself from the event queue + Event::clear('system.display', array($this, 'render')); + } + + /** + * Render the profiler. Output is added to the bottom of the page by default. + * + * @param boolean return the output if TRUE + * @return void|string + */ + public function render($return = FALSE) + { + $start = microtime(TRUE); + + $get = isset($_GET['profiler']) ? explode(',', $_GET['profiler']) : array(); + $this->show = empty($get) ? Kohana::config('profiler.show') : $get; + + Event::run('profiler.run', $this); + + $styles = ''; + foreach ($this->profiles as $profile) + { + $styles .= $profile->styles(); + } + + // Don't display if there's no profiles + if (empty($this->profiles)) + return; + + // Load the profiler view + $data = array + ( + 'profiles' => $this->profiles, + 'styles' => $styles, + 'execution_time' => microtime(TRUE) - $start + ); + $view = new View('kohana_profiler', $data); + + // Return rendered view if $return is TRUE + if ($return === TRUE) + return $view->render(); + + // Add profiler data to the output + if (stripos(Kohana::$output, '') !== FALSE) + { + // Closing body tag was found, insert the profiler data before it + Kohana::$output = str_ireplace('', $view->render().'', Kohana::$output); + } + else + { + // Append the profiler data to the output + Kohana::$output .= $view->render(); + } + } + + /** + * Benchmark times and memory usage from the Benchmark library. + * + * @return void + */ + public function benchmarks() + { + if ( ! $table = $this->table('benchmarks')) + return; + + $table->add_column(); + $table->add_column('kp-column kp-data'); + $table->add_column('kp-column kp-data'); + $table->add_column('kp-column kp-data'); + $table->add_row(array('Benchmarks', 'Time', 'Count', 'Memory'), 'kp-title', 'background-color: #FFE0E0'); + + $benchmarks = Benchmark::get(TRUE); + + // Moves the first benchmark (total execution time) to the end of the array + $benchmarks = array_slice($benchmarks, 1) + array_slice($benchmarks, 0, 1); + + text::alternate(); + foreach ($benchmarks as $name => $benchmark) + { + // Clean unique id from system benchmark names + $name = ucwords(str_replace(array('_', '-'), ' ', str_replace(SYSTEM_BENCHMARK.'_', '', $name))); + + $data = array($name, number_format($benchmark['time'], 3), $benchmark['count'], number_format($benchmark['memory'] / 1024 / 1024, 2).'MB'); + $class = text::alternate('', 'kp-altrow'); + + if ($name == 'Total Execution') + $class = 'kp-totalrow'; + + $table->add_row($data, $class); + } + } + + /** + * Database query benchmarks. + * + * @return void + */ + public function database() + { + if ( ! $table = $this->table('database')) + return; + + $table->add_column(); + $table->add_column('kp-column kp-data'); + $table->add_column('kp-column kp-data'); + $table->add_row(array('Queries', 'Time', 'Rows'), 'kp-title', 'background-color: #E0FFE0'); + + $queries = Database::$benchmarks; + + text::alternate(); + $total_time = $total_rows = 0; + foreach ($queries as $query) + { + $data = array($query['query'], number_format($query['time'], 3), $query['rows']); + $class = text::alternate('', 'kp-altrow'); + $table->add_row($data, $class); + $total_time += $query['time']; + $total_rows += $query['rows']; + } + + $data = array('Total: ' . count($queries), number_format($total_time, 3), $total_rows); + $table->add_row($data, 'kp-totalrow'); + } + + /** + * Session data. + * + * @return void + */ + public function session() + { + if (empty($_SESSION)) return; + + if ( ! $table = $this->table('session')) + return; + + $table->add_column('kp-name'); + $table->add_column(); + $table->add_row(array('Session', 'Value'), 'kp-title', 'background-color: #CCE8FB'); + + text::alternate(); + foreach($_SESSION as $name => $value) + { + if (is_object($value)) + { + $value = get_class($value).' [object]'; + } + + $data = array($name, $value); + $class = text::alternate('', 'kp-altrow'); + $table->add_row($data, $class); + } + } + + /** + * POST data. + * + * @return void + */ + public function post() + { + if (empty($_POST)) return; + + if ( ! $table = $this->table('post')) + return; + + $table->add_column('kp-name'); + $table->add_column(); + $table->add_row(array('POST', 'Value'), 'kp-title', 'background-color: #E0E0FF'); + + text::alternate(); + foreach($_POST as $name => $value) + { + $data = array($name, $value); + $class = text::alternate('', 'kp-altrow'); + $table->add_row($data, $class); + } + } + + /** + * Cookie data. + * + * @return void + */ + public function cookies() + { + if (empty($_COOKIE)) return; + + if ( ! $table = $this->table('cookies')) + return; + + $table->add_column('kp-name'); + $table->add_column(); + $table->add_row(array('Cookies', 'Value'), 'kp-title', 'background-color: #FFF4D7'); + + text::alternate(); + foreach($_COOKIE as $name => $value) + { + $data = array($name, $value); + $class = text::alternate('', 'kp-altrow'); + $table->add_row($data, $class); + } + } +} \ No newline at end of file diff --git a/Server/system/libraries/Profiler_Table.php b/Server/system/libraries/Profiler_Table.php new file mode 100644 index 0000000..a0058a5 --- /dev/null +++ b/Server/system/libraries/Profiler_Table.php @@ -0,0 +1,69 @@ +columns[] = array('class' => $class, 'style' => $style); + } + + /** + * Add row to table. + * + * @param array data to go in table cells + * @param string CSS class + * @param string CSS style + */ + public function add_row($data, $class = '', $style = '') + { + $this->rows[] = array('data' => $data, 'class' => $class, 'style' => $style); + } + + /** + * Render table. + * + * @return string + */ + public function render() + { + $data['rows'] = $this->rows; + $data['columns'] = $this->columns; + return View::factory('kohana_profiler_table', $data)->render(); + } +} \ No newline at end of file diff --git a/Server/system/libraries/Router.php b/Server/system/libraries/Router.php new file mode 100644 index 0000000..ef0e1e4 --- /dev/null +++ b/Server/system/libraries/Router.php @@ -0,0 +1,304 @@ + 1) + { + // Custom routing + Router::$rsegments = Router::routed_uri(Router::$current_uri); + } + + // The routed URI is now complete + Router::$routed_uri = Router::$rsegments; + + // Routed segments will never be empty + Router::$rsegments = explode('/', Router::$rsegments); + + // Prepare to find the controller + $controller_path = ''; + $method_segment = NULL; + + // Paths to search + $paths = Kohana::include_paths(); + + foreach (Router::$rsegments as $key => $segment) + { + // Add the segment to the search path + $controller_path .= $segment; + + $found = FALSE; + foreach ($paths as $dir) + { + // Search within controllers only + $dir .= 'controllers/'; + + if (is_dir($dir.$controller_path) OR is_file($dir.$controller_path.EXT)) + { + // Valid path + $found = TRUE; + + // The controller must be a file that exists with the search path + if ($c = str_replace('\\', '/', realpath($dir.$controller_path.EXT)) + AND is_file($c) AND strpos($c, $dir) === 0) + { + // Set controller name + Router::$controller = $segment; + + // Change controller path + Router::$controller_path = $c; + + // Set the method segment + $method_segment = $key + 1; + + // Stop searching + break; + } + } + } + + if ($found === FALSE) + { + // Maximum depth has been reached, stop searching + break; + } + + // Add another slash + $controller_path .= '/'; + } + + if ($method_segment !== NULL AND isset(Router::$rsegments[$method_segment])) + { + // Set method + Router::$method = Router::$rsegments[$method_segment]; + + if (isset(Router::$rsegments[$method_segment + 1])) + { + // Set arguments + Router::$arguments = array_slice(Router::$rsegments, $method_segment + 1); + } + } + + // Last chance to set routing before a 404 is triggered + Event::run('system.post_routing'); + + if (Router::$controller === NULL) + { + // No controller was found, so no page can be rendered + Event::run('system.404'); + } + } + + /** + * Attempts to determine the current URI using CLI, GET, PATH_INFO, ORIG_PATH_INFO, or PHP_SELF. + * + * @return void + */ + public static function find_uri() + { + if (PHP_SAPI === 'cli') + { + // Command line requires a bit of hacking + if (isset($_SERVER['argv'][1])) + { + Router::$current_uri = $_SERVER['argv'][1]; + + // Remove GET string from segments + if (($query = strpos(Router::$current_uri, '?')) !== FALSE) + { + list (Router::$current_uri, $query) = explode('?', Router::$current_uri, 2); + + // Parse the query string into $_GET + parse_str($query, $_GET); + + // Convert $_GET to UTF-8 + $_GET = utf8::clean($_GET); + } + } + } + elseif (isset($_GET['kohana_uri'])) + { + // Use the URI defined in the query string + Router::$current_uri = $_GET['kohana_uri']; + + // Remove the URI from $_GET + unset($_GET['kohana_uri']); + + // Remove the URI from $_SERVER['QUERY_STRING'] + $_SERVER['QUERY_STRING'] = preg_replace('~\bkohana_uri\b[^&]*+&?~', '', $_SERVER['QUERY_STRING']); + } + elseif (isset($_SERVER['PATH_INFO']) AND $_SERVER['PATH_INFO']) + { + Router::$current_uri = $_SERVER['PATH_INFO']; + } + elseif (isset($_SERVER['ORIG_PATH_INFO']) AND $_SERVER['ORIG_PATH_INFO']) + { + Router::$current_uri = $_SERVER['ORIG_PATH_INFO']; + } + elseif (isset($_SERVER['PHP_SELF']) AND $_SERVER['PHP_SELF']) + { + Router::$current_uri = $_SERVER['PHP_SELF']; + } + + if (($strpos_fc = strpos(Router::$current_uri, KOHANA)) !== FALSE) + { + // Remove the front controller from the current uri + Router::$current_uri = (string) substr(Router::$current_uri, $strpos_fc + strlen(KOHANA)); + } + + // Remove slashes from the start and end of the URI + Router::$current_uri = trim(Router::$current_uri, '/'); + + if (Router::$current_uri !== '') + { + if ($suffix = Kohana::config('core.url_suffix') AND strpos(Router::$current_uri, $suffix) !== FALSE) + { + // Remove the URL suffix + Router::$current_uri = preg_replace('#'.preg_quote($suffix).'$#u', '', Router::$current_uri); + + // Set the URL suffix + Router::$url_suffix = $suffix; + } + + // Reduce multiple slashes into single slashes + Router::$current_uri = preg_replace('#//+#', '/', Router::$current_uri); + } + } + + /** + * Generates routed URI from given URI. + * + * @param string URI to convert + * @return string Routed uri + */ + public static function routed_uri($uri) + { + if (Router::$routes === NULL) + { + // Load routes + Router::$routes = Kohana::config('routes'); + } + + // Prepare variables + $routed_uri = $uri = trim($uri, '/'); + + if (isset(Router::$routes[$uri])) + { + // Literal match, no need for regex + $routed_uri = Router::$routes[$uri]; + } + else + { + // Loop through the routes and see if anything matches + foreach (Router::$routes as $key => $val) + { + if ($key === '_default') continue; + + // Trim slashes + $key = trim($key, '/'); + $val = trim($val, '/'); + + if (preg_match('#^'.$key.'$#u', $uri)) + { + if (strpos($val, '$') !== FALSE) + { + // Use regex routing + $routed_uri = preg_replace('#^'.$key.'$#u', $val, $uri); + } + else + { + // Standard routing + $routed_uri = $val; + } + + // A valid route has been found + break; + } + } + } + + if (isset(Router::$routes[$routed_uri])) + { + // Check for double routing (without regex) + $routed_uri = Router::$routes[$routed_uri]; + } + + return trim($routed_uri, '/'); + } + +} // End Router \ No newline at end of file diff --git a/Server/system/libraries/Session.php b/Server/system/libraries/Session.php new file mode 100644 index 0000000..e03f5df --- /dev/null +++ b/Server/system/libraries/Session.php @@ -0,0 +1,458 @@ +input = Input::instance(); + + // This part only needs to be run once + if (Session::$instance === NULL) + { + // Load config + Session::$config = Kohana::config('session'); + + // Makes a mirrored array, eg: foo=foo + Session::$protect = array_combine(Session::$protect, Session::$protect); + + // Configure garbage collection + ini_set('session.gc_probability', (int) Session::$config['gc_probability']); + ini_set('session.gc_divisor', 100); + ini_set('session.gc_maxlifetime', (Session::$config['expiration'] == 0) ? 86400 : Session::$config['expiration']); + + // Create a new session + $this->create(); + + if (Session::$config['regenerate'] > 0 AND ($_SESSION['total_hits'] % Session::$config['regenerate']) === 0) + { + // Regenerate session id and update session cookie + $this->regenerate(); + } + else + { + // Always update session cookie to keep the session alive + cookie::set(Session::$config['name'], $_SESSION['session_id'], Session::$config['expiration']); + } + + // Close the session just before sending the headers, so that + // the session cookie(s) can be written. + Event::add('system.send_headers', array($this, 'write_close')); + + // Make sure that sessions are closed before exiting + register_shutdown_function(array($this, 'write_close')); + + // Singleton instance + Session::$instance = $this; + } + + Kohana::log('debug', 'Session Library initialized'); + } + + /** + * Get the session id. + * + * @return string + */ + public function id() + { + return $_SESSION['session_id']; + } + + /** + * Create a new session. + * + * @param array variables to set after creation + * @return void + */ + public function create($vars = NULL) + { + // Destroy any current sessions + $this->destroy(); + + if (Session::$config['driver'] !== 'native') + { + // Set driver name + $driver = 'Session_'.ucfirst(Session::$config['driver']).'_Driver'; + + // Load the driver + if ( ! Kohana::auto_load($driver)) + throw new Kohana_Exception('core.driver_not_found', Session::$config['driver'], get_class($this)); + + // Initialize the driver + Session::$driver = new $driver(); + + // Validate the driver + if ( ! (Session::$driver instanceof Session_Driver)) + throw new Kohana_Exception('core.driver_implements', Session::$config['driver'], get_class($this), 'Session_Driver'); + + // Register non-native driver as the session handler + session_set_save_handler + ( + array(Session::$driver, 'open'), + array(Session::$driver, 'close'), + array(Session::$driver, 'read'), + array(Session::$driver, 'write'), + array(Session::$driver, 'destroy'), + array(Session::$driver, 'gc') + ); + } + + // Validate the session name + if ( ! preg_match('~^(?=.*[a-z])[a-z0-9_]++$~iD', Session::$config['name'])) + throw new Kohana_Exception('session.invalid_session_name', Session::$config['name']); + + // Name the session, this will also be the name of the cookie + session_name(Session::$config['name']); + + // Set the session cookie parameters + session_set_cookie_params + ( + Session::$config['expiration'], + Kohana::config('cookie.path'), + Kohana::config('cookie.domain'), + Kohana::config('cookie.secure'), + Kohana::config('cookie.httponly') + ); + + // Start the session! + session_start(); + + // Put session_id in the session variable + $_SESSION['session_id'] = session_id(); + + // Set defaults + if ( ! isset($_SESSION['_kf_flash_'])) + { + $_SESSION['total_hits'] = 0; + $_SESSION['_kf_flash_'] = array(); + + $_SESSION['user_agent'] = Kohana::$user_agent; + $_SESSION['ip_address'] = $this->input->ip_address(); + } + + // Set up flash variables + Session::$flash =& $_SESSION['_kf_flash_']; + + // Increase total hits + $_SESSION['total_hits'] += 1; + + // Validate data only on hits after one + if ($_SESSION['total_hits'] > 1) + { + // Validate the session + foreach (Session::$config['validate'] as $valid) + { + switch ($valid) + { + // Check user agent for consistency + case 'user_agent': + if ($_SESSION[$valid] !== Kohana::$user_agent) + return $this->create(); + break; + + // Check ip address for consistency + case 'ip_address': + if ($_SESSION[$valid] !== $this->input->$valid()) + return $this->create(); + break; + + // Check expiration time to prevent users from manually modifying it + case 'expiration': + if (time() - $_SESSION['last_activity'] > ini_get('session.gc_maxlifetime')) + return $this->create(); + break; + } + } + } + + // Expire flash keys + $this->expire_flash(); + + // Update last activity + $_SESSION['last_activity'] = time(); + + // Set the new data + Session::set($vars); + } + + /** + * Regenerates the global session id. + * + * @return void + */ + public function regenerate() + { + if (Session::$config['driver'] === 'native') + { + // Generate a new session id + // Note: also sets a new session cookie with the updated id + session_regenerate_id(TRUE); + + // Update session with new id + $_SESSION['session_id'] = session_id(); + } + else + { + // Pass the regenerating off to the driver in case it wants to do anything special + $_SESSION['session_id'] = Session::$driver->regenerate(); + } + + // Get the session name + $name = session_name(); + + if (isset($_COOKIE[$name])) + { + // Change the cookie value to match the new session id to prevent "lag" + $_COOKIE[$name] = $_SESSION['session_id']; + } + } + + /** + * Destroys the current session. + * + * @return void + */ + public function destroy() + { + if (session_id() !== '') + { + // Get the session name + $name = session_name(); + + // Destroy the session + session_destroy(); + + // Re-initialize the array + $_SESSION = array(); + + // Delete the session cookie + cookie::delete($name); + } + } + + /** + * Runs the system.session_write event, then calls session_write_close. + * + * @return void + */ + public function write_close() + { + static $run; + + if ($run === NULL) + { + $run = TRUE; + + // Run the events that depend on the session being open + Event::run('system.session_write'); + + // Expire flash keys + $this->expire_flash(); + + // Close the session + session_write_close(); + } + } + + /** + * Set a session variable. + * + * @param string|array key, or array of values + * @param mixed value (if keys is not an array) + * @return void + */ + public function set($keys, $val = FALSE) + { + if (empty($keys)) + return FALSE; + + if ( ! is_array($keys)) + { + $keys = array($keys => $val); + } + + foreach ($keys as $key => $val) + { + if (isset(Session::$protect[$key])) + continue; + + // Set the key + $_SESSION[$key] = $val; + } + } + + /** + * Set a flash variable. + * + * @param string|array key, or array of values + * @param mixed value (if keys is not an array) + * @return void + */ + public function set_flash($keys, $val = FALSE) + { + if (empty($keys)) + return FALSE; + + if ( ! is_array($keys)) + { + $keys = array($keys => $val); + } + + foreach ($keys as $key => $val) + { + if ($key == FALSE) + continue; + + Session::$flash[$key] = 'new'; + Session::set($key, $val); + } + } + + /** + * Freshen one, multiple or all flash variables. + * + * @param string variable key(s) + * @return void + */ + public function keep_flash($keys = NULL) + { + $keys = ($keys === NULL) ? array_keys(Session::$flash) : func_get_args(); + + foreach ($keys as $key) + { + if (isset(Session::$flash[$key])) + { + Session::$flash[$key] = 'new'; + } + } + } + + /** + * Expires old flash data and removes it from the session. + * + * @return void + */ + public function expire_flash() + { + static $run; + + // Method can only be run once + if ($run === TRUE) + return; + + if ( ! empty(Session::$flash)) + { + foreach (Session::$flash as $key => $state) + { + if ($state === 'old') + { + // Flash has expired + unset(Session::$flash[$key], $_SESSION[$key]); + } + else + { + // Flash will expire + Session::$flash[$key] = 'old'; + } + } + } + + // Method has been run + $run = TRUE; + } + + /** + * Get a variable. Access to sub-arrays is supported with key.subkey. + * + * @param string variable key + * @param mixed default value returned if variable does not exist + * @return mixed Variable data if key specified, otherwise array containing all session data. + */ + public function get($key = FALSE, $default = FALSE) + { + if (empty($key)) + return $_SESSION; + + $result = isset($_SESSION[$key]) ? $_SESSION[$key] : Kohana::key_string($_SESSION, $key); + + return ($result === NULL) ? $default : $result; + } + + /** + * Get a variable, and delete it. + * + * @param string variable key + * @param mixed default value returned if variable does not exist + * @return mixed + */ + public function get_once($key, $default = FALSE) + { + $return = Session::get($key, $default); + Session::delete($key); + + return $return; + } + + /** + * Delete one or more variables. + * + * @param string variable key(s) + * @return void + */ + public function delete($keys) + { + $args = func_get_args(); + + foreach ($args as $key) + { + if (isset(Session::$protect[$key])) + continue; + + // Unset the key + unset($_SESSION[$key]); + } + } + +} // End Session Class diff --git a/Server/system/libraries/Tagcloud.php b/Server/system/libraries/Tagcloud.php new file mode 100644 index 0000000..8fd7bfc --- /dev/null +++ b/Server/system/libraries/Tagcloud.php @@ -0,0 +1,130 @@ + 'tag'); + public $shuffle = FALSE; + + // Tag elements, biggest and smallest values + protected $elements; + protected $biggest; + protected $smallest; + + /** + * Construct a new tagcloud. The elements must be passed in as an array, + * with each entry in the array having a "title" ,"link", and "count" key. + * Font sizes will be applied via the "style" attribute as a percentage. + * + * @param array elements of the tagcloud + * @param integer minimum font size + * @param integer maximum font size + * @return void + */ + public function __construct(array $elements, $min_size = NULL, $max_size = NULL, $shuffle = FALSE) + { + $this->elements = $elements; + + if($shuffle !== FALSE) + { + $this->shuffle = TRUE; + } + + $counts = array(); + foreach ($elements as $data) + { + $counts[] = $data['count']; + } + + // Find the biggest and smallest values of the elements + $this->biggest = max($counts); + $this->smallest = min($counts); + + if ($min_size !== NULL) + { + $this->min_size = $min_size; + } + + if ($max_size !== NULL) + { + $this->max_size = $max_size; + } + } + + /** + * Magic __toString method. Returns all of the links as a single string. + * + * @return string + */ + public function __toString() + { + return implode("\n", $this->render()); + } + + /** + * Renders the elements of the tagcloud into an array of links. + * + * @return array + */ + public function render() + { + if ($this->shuffle === TRUE) + { + shuffle($this->elements); + } + + // Minimum values must be 1 to prevent divide by zero errors + $range = max($this->biggest - $this->smallest, 1); + $scale = max($this->max_size - $this->min_size, 1); + + // Import the attributes locally to prevent overwrites + $attr = $this->attributes; + + $output = array(); + foreach ($this->elements as $data) + { + if (strpos($data['title'], ' ') !== FALSE) + { + // Replace spaces with non-breaking spaces to prevent line wrapping + // in the middle of a link + $data['title'] = str_replace(' ', ' ', $data['title']); + } + + // Determine the size based on the min/max scale and the smallest/biggest range + $size = ((($data['count'] - $this->smallest) * $scale) / $range) + $this->min_size; + + $attr['style'] = 'font-size: '.round($size, 0).'%'; + + $output[] = html::anchor($data['link'], $data['title'], $attr)."\n"; + } + + return $output; + } + +} // End Tagcloud \ No newline at end of file diff --git a/Server/system/libraries/URI.php b/Server/system/libraries/URI.php new file mode 100644 index 0000000..d9ccdcf --- /dev/null +++ b/Server/system/libraries/URI.php @@ -0,0 +1,279 @@ +build_array(URI::$segments, $offset, $associative); + } + + /** + * Returns an array containing all the re-routed URI segments. + * + * @param integer rsegment offset + * @param boolean return an associative array + * @return array + */ + public function rsegment_array($offset = 0, $associative = FALSE) + { + return $this->build_array(URI::$rsegments, $offset, $associative); + } + + /** + * Returns an array containing all the URI arguments. + * + * @param integer segment offset + * @param boolean return an associative array + * @return array + */ + public function argument_array($offset = 0, $associative = FALSE) + { + return $this->build_array(URI::$arguments, $offset, $associative); + } + + /** + * Creates a simple or associative array from an array and an offset. + * Used as a helper for (r)segment_array and argument_array. + * + * @param array array to rebuild + * @param integer offset to start from + * @param boolean create an associative array + * @return array + */ + public function build_array($array, $offset = 0, $associative = FALSE) + { + // Prevent the keys from being improperly indexed + array_unshift($array, 0); + + // Slice the array, preserving the keys + $array = array_slice($array, $offset + 1, count($array) - 1, TRUE); + + if ($associative === FALSE) + return $array; + + $associative = array(); + $pairs = array_chunk($array, 2); + + foreach ($pairs as $pair) + { + // Add the key/value pair to the associative array + $associative[$pair[0]] = isset($pair[1]) ? $pair[1] : ''; + } + + return $associative; + } + + /** + * Returns the complete URI as a string. + * + * @return string + */ + public function string() + { + return URI::$current_uri; + } + + /** + * Magic method for converting an object to a string. + * + * @return string + */ + public function __toString() + { + return URI::$current_uri; + } + + /** + * Returns the total number of URI segments. + * + * @return integer + */ + public function total_segments() + { + return count(URI::$segments); + } + + /** + * Returns the total number of re-routed URI segments. + * + * @return integer + */ + public function total_rsegments() + { + return count(URI::$rsegments); + } + + /** + * Returns the total number of URI arguments. + * + * @return integer + */ + public function total_arguments() + { + return count(URI::$arguments); + } + + /** + * Returns the last URI segment. + * + * @param mixed default value returned if segment does not exist + * @return string + */ + public function last_segment($default = FALSE) + { + if (($end = $this->total_segments()) < 1) + return $default; + + return URI::$segments[$end - 1]; + } + + /** + * Returns the last re-routed URI segment. + * + * @param mixed default value returned if segment does not exist + * @return string + */ + public function last_rsegment($default = FALSE) + { + if (($end = $this->total_segments()) < 1) + return $default; + + return URI::$rsegments[$end - 1]; + } + + /** + * Returns the path to the current controller (not including the actual + * controller), as a web path. + * + * @param boolean return a full url, or only the path specifically + * @return string + */ + public function controller_path($full = TRUE) + { + return ($full) ? url::site(URI::$controller_path) : URI::$controller_path; + } + + /** + * Returns the current controller, as a web path. + * + * @param boolean return a full url, or only the controller specifically + * @return string + */ + public function controller($full = TRUE) + { + return ($full) ? url::site(URI::$controller_path.URI::$controller) : URI::$controller; + } + + /** + * Returns the current method, as a web path. + * + * @param boolean return a full url, or only the method specifically + * @return string + */ + public function method($full = TRUE) + { + return ($full) ? url::site(URI::$controller_path.URI::$controller.'/'.URI::$method) : URI::$method; + } + +} // End URI Class diff --git a/Server/system/libraries/Validation.php b/Server/system/libraries/Validation.php new file mode 100644 index 0000000..5a48bfc --- /dev/null +++ b/Server/system/libraries/Validation.php @@ -0,0 +1,826 @@ +submitted = ! empty($array); + + parent::__construct($array, ArrayObject::ARRAY_AS_PROPS | ArrayObject::STD_PROP_LIST); + } + + /** + * Magic clone method, clears errors and messages. + * + * @return void + */ + public function __clone() + { + $this->errors = array(); + $this->messages = array(); + } + + /** + * Create a copy of the current validation rules and change the array. + * + * @chainable + * @param array new array to validate + * @return Validation + */ + public function copy(array $array) + { + $copy = clone $this; + + $copy->exchangeArray($array); + + return $copy; + } + + /** + * Test if the data has been submitted. + * + * @return boolean + */ + public function submitted($value = NULL) + { + if (is_bool($value)) + { + $this->submitted = $value; + } + + return $this->submitted; + } + + /** + * Returns an array of all the field names that have filters, rules, or callbacks. + * + * @return array + */ + public function field_names() + { + // All the fields that are being validated + $fields = array_keys(array_merge + ( + $this->pre_filters, + $this->rules, + $this->callbacks, + $this->post_filters + )); + + // Remove wildcard fields + $fields = array_diff($fields, array('*')); + + return $fields; + } + + /** + * Returns the array values of the current object. + * + * @return array + */ + public function as_array() + { + return $this->getArrayCopy(); + } + + /** + * Returns the ArrayObject values, removing all inputs without rules. + * To choose specific inputs, list the field name as arguments. + * + * @param boolean return only fields with filters, rules, and callbacks + * @return array + */ + public function safe_array() + { + // Load choices + $choices = func_get_args(); + $choices = empty($choices) ? NULL : array_combine($choices, $choices); + + // Get field names + $fields = $this->field_names(); + + $safe = array(); + foreach ($fields as $field) + { + if ($choices === NULL OR isset($choices[$field])) + { + if (isset($this[$field])) + { + $value = $this[$field]; + + if (is_object($value)) + { + // Convert the value back into an array + $value = $value->getArrayCopy(); + } + } + else + { + // Even if the field is not in this array, it must be set + $value = NULL; + } + + // Add the field to the array + $safe[$field] = $value; + } + } + + return $safe; + } + + /** + * Add additional rules that will forced, even for empty fields. All arguments + * passed will be appended to the list. + * + * @chainable + * @param string rule name + * @return object + */ + public function allow_empty_rules($rules) + { + // Any number of args are supported + $rules = func_get_args(); + + // Merge the allowed rules + $this->empty_rules = array_merge($this->empty_rules, $rules); + + return $this; + } + + /** + * Converts a filter, rule, or callback into a fully-qualified callback array. + * + * @return mixed + */ + protected function callback($callback) + { + if (is_string($callback)) + { + if (strpos($callback, '::') !== FALSE) + { + $callback = explode('::', $callback); + } + elseif (function_exists($callback)) + { + // No need to check if the callback is a method + $callback = $callback; + } + elseif (method_exists($this, $callback)) + { + // The callback exists in Validation + $callback = array($this, $callback); + } + elseif (method_exists('valid', $callback)) + { + // The callback exists in valid:: + $callback = array('valid', $callback); + } + } + + if ( ! is_callable($callback, FALSE)) + { + if (is_array($callback)) + { + if (is_object($callback[0])) + { + // Object instance syntax + $name = get_class($callback[0]).'->'.$callback[1]; + } + else + { + // Static class syntax + $name = $callback[0].'::'.$callback[1]; + } + } + else + { + // Function syntax + $name = $callback; + } + + throw new Kohana_Exception('validation.not_callable', $name); + } + + return $callback; + } + + /** + * Add a pre-filter to one or more inputs. Pre-filters are applied before + * rules or callbacks are executed. + * + * @chainable + * @param callback filter + * @param string fields to apply filter to, use TRUE for all fields + * @return object + */ + public function pre_filter($filter, $field = TRUE) + { + if ($field === TRUE OR $field === '*') + { + // Use wildcard + $fields = array('*'); + } + else + { + // Add the filter to specific inputs + $fields = func_get_args(); + $fields = array_slice($fields, 1); + } + + // Convert to a proper callback + $filter = $this->callback($filter); + + foreach ($fields as $field) + { + // Add the filter to specified field + $this->pre_filters[$field][] = $filter; + } + + return $this; + } + + /** + * Add a post-filter to one or more inputs. Post-filters are applied after + * rules and callbacks have been executed. + * + * @chainable + * @param callback filter + * @param string fields to apply filter to, use TRUE for all fields + * @return object + */ + public function post_filter($filter, $field = TRUE) + { + if ($field === TRUE) + { + // Use wildcard + $fields = array('*'); + } + else + { + // Add the filter to specific inputs + $fields = func_get_args(); + $fields = array_slice($fields, 1); + } + + // Convert to a proper callback + $filter = $this->callback($filter); + + foreach ($fields as $field) + { + // Add the filter to specified field + $this->post_filters[$field][] = $filter; + } + + return $this; + } + + /** + * Add rules to a field. Validation rules may only return TRUE or FALSE and + * can not manipulate the value of a field. + * + * @chainable + * @param string field name + * @param callback rules (one or more arguments) + * @return object + */ + public function add_rules($field, $rules) + { + // Get the rules + $rules = func_get_args(); + $rules = array_slice($rules, 1); + + if ($field === TRUE) + { + // Use wildcard + $field = '*'; + } + + foreach ($rules as $rule) + { + // Arguments for rule + $args = NULL; + + if (is_string($rule)) + { + if (preg_match('/^([^\[]++)\[(.+)\]$/', $rule, $matches)) + { + // Split the rule into the function and args + $rule = $matches[1]; + $args = preg_split('/(?array_fields[$field] = $field; + } + + // Convert to a proper callback + $rule = $this->callback($rule); + + // Add the rule, with args, to the field + $this->rules[$field][] = array($rule, $args); + } + + return $this; + } + + /** + * Add callbacks to a field. Callbacks must accept the Validation object + * and the input name. Callback returns are not processed. + * + * @chainable + * @param string field name + * @param callbacks callbacks (unlimited number) + * @return object + */ + public function add_callbacks($field, $callbacks) + { + // Get all callbacks as an array + $callbacks = func_get_args(); + $callbacks = array_slice($callbacks, 1); + + if ($field === TRUE) + { + // Use wildcard + $field = '*'; + } + + foreach ($callbacks as $callback) + { + // Convert to a proper callback + $callback = $this->callback($callback); + + // Add the callback to specified field + $this->callbacks[$field][] = $callback; + } + + return $this; + } + + /** + * Validate by processing pre-filters, rules, callbacks, and post-filters. + * All fields that have filters, rules, or callbacks will be initialized if + * they are undefined. Validation will only be run if there is data already + * in the array. + * + * @param object Validation object, used only for recursion + * @param object name of field for errors + * @return bool + */ + public function validate($object = NULL, $field_name = NULL) + { + if ($object === NULL) + { + // Use the current object + $object = $this; + } + + // Get all field names + $fields = $this->field_names(); + + // Copy the array from the object, to optimize multiple sets + $array = $this->getArrayCopy(); + + foreach ($fields as $field) + { + if ($field === '*') + { + // Ignore wildcard + continue; + } + + if ( ! isset($array[$field])) + { + if (isset($this->array_fields[$field])) + { + // This field must be an array + $array[$field] = array(); + } + else + { + $array[$field] = NULL; + } + } + } + + // Swap the array back into the object + $this->exchangeArray($array); + + // Get all defined field names + $fields = array_keys($array); + + foreach ($this->pre_filters as $field => $callbacks) + { + foreach ($callbacks as $callback) + { + if ($field === '*') + { + foreach ($fields as $f) + { + $this[$f] = is_array($this[$f]) ? array_map($callback, $this[$f]) : call_user_func($callback, $this[$f]); + } + } + else + { + $this[$field] = is_array($this[$field]) ? array_map($callback, $this[$field]) : call_user_func($callback, $this[$field]); + } + } + } + + if ($this->submitted === FALSE) + return FALSE; + + foreach ($this->rules as $field => $callbacks) + { + foreach ($callbacks as $callback) + { + // Separate the callback and arguments + list ($callback, $args) = $callback; + + // Function or method name of the rule + $rule = is_array($callback) ? $callback[1] : $callback; + + if ($field === '*') + { + foreach ($fields as $f) + { + // Note that continue, instead of break, is used when + // applying rules using a wildcard, so that all fields + // will be validated. + + if (isset($this->errors[$f])) + { + // Prevent other rules from being evaluated if an error has occurred + continue; + } + + if (empty($this[$f]) AND ! in_array($rule, $this->empty_rules)) + { + // This rule does not need to be processed on empty fields + continue; + } + + if ($args === NULL) + { + if ( ! call_user_func($callback, $this[$f])) + { + $this->errors[$f] = $rule; + + // Stop validating this field when an error is found + continue; + } + } + else + { + if ( ! call_user_func($callback, $this[$f], $args)) + { + $this->errors[$f] = $rule; + + // Stop validating this field when an error is found + continue; + } + } + } + } + else + { + if (isset($this->errors[$field])) + { + // Prevent other rules from being evaluated if an error has occurred + break; + } + + if ( ! in_array($rule, $this->empty_rules) AND ! $this->required($this[$field])) + { + // This rule does not need to be processed on empty fields + continue; + } + + if ($args === NULL) + { + if ( ! call_user_func($callback, $this[$field])) + { + $this->errors[$field] = $rule; + + // Stop validating this field when an error is found + break; + } + } + else + { + if ( ! call_user_func($callback, $this[$field], $args)) + { + $this->errors[$field] = $rule; + + // Stop validating this field when an error is found + break; + } + } + } + } + } + + foreach ($this->callbacks as $field => $callbacks) + { + foreach ($callbacks as $callback) + { + if ($field === '*') + { + foreach ($fields as $f) + { + // Note that continue, instead of break, is used when + // applying rules using a wildcard, so that all fields + // will be validated. + + if (isset($this->errors[$f])) + { + // Stop validating this field when an error is found + continue; + } + + call_user_func($callback, $this, $f); + } + } + else + { + if (isset($this->errors[$field])) + { + // Stop validating this field when an error is found + break; + } + + call_user_func($callback, $this, $field); + } + } + } + + foreach ($this->post_filters as $field => $callbacks) + { + foreach ($callbacks as $callback) + { + if ($field === '*') + { + foreach ($fields as $f) + { + $this[$f] = is_array($this[$f]) ? array_map($callback, $this[$f]) : call_user_func($callback, $this[$f]); + } + } + else + { + $this[$field] = is_array($this[$field]) ? array_map($callback, $this[$field]) : call_user_func($callback, $this[$field]); + } + } + } + + // Return TRUE if there are no errors + return $this->errors === array(); + } + + /** + * Add an error to an input. + * + * @chainable + * @param string input name + * @param string unique error name + * @return object + */ + public function add_error($field, $name) + { + $this->errors[$field] = $name; + + return $this; + } + + /** + * Sets or returns the message for an input. + * + * @chainable + * @param string input key + * @param string message to set + * @return string|object + */ + public function message($input = NULL, $message = NULL) + { + if ($message === NULL) + { + if ($input === NULL) + { + $messages = array(); + $keys = array_keys($this->messages); + + foreach ($keys as $input) + { + $messages[] = $this->message($input); + } + + return implode("\n", $messages); + } + + // Return nothing if no message exists + if (empty($this->messages[$input])) + return ''; + + // Return the HTML message string + return $this->messages[$input]; + } + else + { + $this->messages[$input] = $message; + } + + return $this; + } + + /** + * Return the errors array. + * + * @param boolean load errors from a lang file + * @return array + */ + public function errors($file = NULL) + { + if ($file === NULL) + { + return $this->errors; + } + else + { + + $errors = array(); + foreach ($this->errors as $input => $error) + { + // Key for this input error + $key = "$file.$input.$error"; + + if (($errors[$input] = Kohana::lang($key)) === $key) + { + // Get the default error message + $errors[$input] = Kohana::lang("$file.$input.default"); + } + } + + return $errors; + } + } + + /** + * Rule: required. Generates an error if the field has an empty value. + * + * @param mixed input value + * @return bool + */ + public function required($str) + { + if (is_object($str) AND $str instanceof ArrayObject) + { + // Get the array from the ArrayObject + $str = $str->getArrayCopy(); + } + + if (is_array($str)) + { + return ! empty($str); + } + else + { + return ! ($str === '' OR $str === NULL OR $str === FALSE); + } + } + + /** + * Rule: matches. Generates an error if the field does not match one or more + * other fields. + * + * @param mixed input value + * @param array input names to match against + * @return bool + */ + public function matches($str, array $inputs) + { + foreach ($inputs as $key) + { + if ($str !== (isset($this[$key]) ? $this[$key] : NULL)) + return FALSE; + } + + return TRUE; + } + + /** + * Rule: length. Generates an error if the field is too long or too short. + * + * @param mixed input value + * @param array minimum, maximum, or exact length to match + * @return bool + */ + public function length($str, array $length) + { + if ( ! is_string($str)) + return FALSE; + + $size = utf8::strlen($str); + $status = FALSE; + + if (count($length) > 1) + { + list ($min, $max) = $length; + + if ($size >= $min AND $size <= $max) + { + $status = TRUE; + } + } + else + { + $status = ($size === (int) $length[0]); + } + + return $status; + } + + /** + * Rule: depends_on. Generates an error if the field does not depend on one + * or more other fields. + * + * @param mixed field name + * @param array field names to check dependency + * @return bool + */ + public function depends_on($field, array $fields) + { + foreach ($fields as $depends_on) + { + if ( ! isset($this[$depends_on]) OR $this[$depends_on] == NULL) + return FALSE; + } + + return TRUE; + } + + /** + * Rule: chars. Generates an error if the field contains characters outside of the list. + * + * @param string field value + * @param array allowed characters + * @return bool + */ + public function chars($value, array $chars) + { + return ! preg_match('![^'.implode('', $chars).']!u', $value); + } + +} // End Validation diff --git a/Server/system/libraries/View.php b/Server/system/libraries/View.php new file mode 100644 index 0000000..2b8471c --- /dev/null +++ b/Server/system/libraries/View.php @@ -0,0 +1,309 @@ +set_filename($name, $type); + } + + if (is_array($data) AND ! empty($data)) + { + // Preload data using array_merge, to allow user extensions + $this->kohana_local_data = array_merge($this->kohana_local_data, $data); + } + } + + /** + * Magic method access to test for view property + * + * @param string View property to test for + * @return boolean + */ + public function __isset($key = NULL) + { + return $this->is_set($key); + } + + /** + * Sets the view filename. + * + * @chainable + * @param string view filename + * @param string view file type + * @return object + */ + public function set_filename($name, $type = NULL) + { + if ($type == NULL) + { + // Load the filename and set the content type + $this->kohana_filename = Kohana::find_file('views', $name, TRUE); + $this->kohana_filetype = EXT; + } + else + { + // Check if the filetype is allowed by the configuration + if ( ! in_array($type, Kohana::config('view.allowed_filetypes'))) + throw new Kohana_Exception('core.invalid_filetype', $type); + + // Load the filename and set the content type + $this->kohana_filename = Kohana::find_file('views', $name, TRUE, $type); + $this->kohana_filetype = Kohana::config('mimes.'.$type); + + if ($this->kohana_filetype == NULL) + { + // Use the specified type + $this->kohana_filetype = $type; + } + } + + return $this; + } + + /** + * Sets a view variable. + * + * @param string|array name of variable or an array of variables + * @param mixed value when using a named variable + * @return object + */ + public function set($name, $value = NULL) + { + if (is_array($name)) + { + foreach ($name as $key => $value) + { + $this->__set($key, $value); + } + } + else + { + $this->__set($name, $value); + } + + return $this; + } + + /** + * Checks for a property existence in the view locally or globally. Unlike the built in __isset(), + * this method can take an array of properties to test simultaneously. + * + * @param string $key property name to test for + * @param array $key array of property names to test for + * @return boolean property test result + * @return array associative array of keys and boolean test result + */ + public function is_set( $key = FALSE ) + { + // Setup result; + $result = FALSE; + + // If key is an array + if (is_array($key)) + { + // Set the result to an array + $result = array(); + + // Foreach key + foreach ($key as $property) + { + // Set the result to an associative array + $result[$property] = (array_key_exists($property, $this->kohana_local_data) OR array_key_exists($property, View::$kohana_global_data)) ? TRUE : FALSE; + } + } + else + { + // Otherwise just check one property + $result = (array_key_exists($key, $this->kohana_local_data) OR array_key_exists($key, View::$kohana_global_data)) ? TRUE : FALSE; + } + + // Return the result + return $result; + } + + /** + * Sets a bound variable by reference. + * + * @param string name of variable + * @param mixed variable to assign by reference + * @return object + */ + public function bind($name, & $var) + { + $this->kohana_local_data[$name] =& $var; + + return $this; + } + + /** + * Sets a view global variable. + * + * @param string|array name of variable or an array of variables + * @param mixed value when using a named variable + * @return void + */ + public static function set_global($name, $value = NULL) + { + if (is_array($name)) + { + foreach ($name as $key => $value) + { + View::$kohana_global_data[$key] = $value; + } + } + else + { + View::$kohana_global_data[$name] = $value; + } + } + + /** + * Magically sets a view variable. + * + * @param string variable key + * @param string variable value + * @return void + */ + public function __set($key, $value) + { + $this->kohana_local_data[$key] = $value; + } + + /** + * Magically gets a view variable. + * + * @param string variable key + * @return mixed variable value if the key is found + * @return void if the key is not found + */ + public function &__get($key) + { + if (isset($this->kohana_local_data[$key])) + return $this->kohana_local_data[$key]; + + if (isset(View::$kohana_global_data[$key])) + return View::$kohana_global_data[$key]; + + if (isset($this->$key)) + return $this->$key; + } + + /** + * Magically converts view object to string. + * + * @return string + */ + public function __toString() + { + try + { + return $this->render(); + } + catch (Exception $e) + { + // Display the exception using its internal __toString method + return (string) $e; + } + } + + /** + * Renders a view. + * + * @param boolean set to TRUE to echo the output instead of returning it + * @param callback special renderer to pass the output through + * @return string if print is FALSE + * @return void if print is TRUE + */ + public function render($print = FALSE, $renderer = FALSE) + { + if (empty($this->kohana_filename)) + throw new Kohana_Exception('core.view_set_filename'); + + if (is_string($this->kohana_filetype)) + { + // Merge global and local data, local overrides global with the same name + $data = array_merge(View::$kohana_global_data, $this->kohana_local_data); + + // Load the view in the controller for access to $this + $output = Kohana::$instance->_kohana_load_view($this->kohana_filename, $data); + + if ($renderer !== FALSE AND is_callable($renderer, TRUE)) + { + // Pass the output through the user defined renderer + $output = call_user_func($renderer, $output); + } + + if ($print === TRUE) + { + // Display the output + echo $output; + return; + } + } + else + { + // Set the content type and size + header('Content-Type: '.$this->kohana_filetype[0]); + + if ($print === TRUE) + { + if ($file = fopen($this->kohana_filename, 'rb')) + { + // Display the output + fpassthru($file); + fclose($file); + } + return; + } + + // Fetch the file contents + $output = file_get_contents($this->kohana_filename); + } + + return $output; + } +} // End View \ No newline at end of file diff --git a/Server/system/libraries/drivers/Cache.php b/Server/system/libraries/drivers/Cache.php new file mode 100644 index 0000000..7c5e3c3 --- /dev/null +++ b/Server/system/libraries/drivers/Cache.php @@ -0,0 +1,40 @@ +directory = $directory; + } + + /** + * Finds an array of files matching the given id or tag. + * + * @param string cache id or tag + * @param bool search for tags + * @return array of filenames matching the id or tag + */ + public function exists($id, $tag = FALSE) + { + if ($id === TRUE) + { + // Find all the files + return glob($this->directory.'*~*~*'); + } + elseif ($tag === TRUE) + { + // Find all the files that have the tag name + $paths = glob($this->directory.'*~*'.$id.'*~*'); + + // Find all tags matching the given tag + $files = array(); + foreach ($paths as $path) + { + // Split the files + $tags = explode('~', basename($path)); + + // Find valid tags + if (count($tags) !== 3 OR empty($tags[1])) + continue; + + // Split the tags by plus signs, used to separate tags + $tags = explode('+', $tags[1]); + + if (in_array($tag, $tags)) + { + // Add the file to the array, it has the requested tag + $files[] = $path; + } + } + + return $files; + } + else + { + // Find the file matching the given id + return glob($this->directory.$id.'~*'); + } + } + + /** + * Sets a cache item to the given data, tags, and lifetime. + * + * @param string cache id to set + * @param string data in the cache + * @param array cache tags + * @param integer lifetime + * @return bool + */ + public function set($id, $data, array $tags = NULL, $lifetime) + { + // Remove old cache files + $this->delete($id); + + // Cache File driver expects unix timestamp + if ($lifetime !== 0) + { + $lifetime += time(); + } + + if ( ! empty($tags)) + { + // Convert the tags into a string list + $tags = implode('+', $tags); + } + + // Write out a serialized cache + return (bool) file_put_contents($this->directory.$id.'~'.$tags.'~'.$lifetime, serialize($data)); + } + + /** + * Finds an array of ids for a given tag. + * + * @param string tag name + * @return array of ids that match the tag + */ + public function find($tag) + { + // An array will always be returned + $result = array(); + + if ($paths = $this->exists($tag, TRUE)) + { + // Length of directory name + $offset = strlen($this->directory); + + // Find all the files with the given tag + foreach ($paths as $path) + { + // Get the id from the filename + list($id, $junk) = explode('~', basename($path), 2); + + if (($data = $this->get($id)) !== FALSE) + { + // Add the result to the array + $result[$id] = $data; + } + } + } + + return $result; + } + + /** + * Fetches a cache item. This will delete the item if it is expired or if + * the hash does not match the stored hash. + * + * @param string cache id + * @return mixed|NULL + */ + public function get($id) + { + if ($file = $this->exists($id)) + { + // Use the first file + $file = current($file); + + // Validate that the cache has not expired + if ($this->expired($file)) + { + // Remove this cache, it has expired + $this->delete($id); + } + else + { + // Turn off errors while reading the file + $ER = error_reporting(0); + + if (($data = file_get_contents($file)) !== FALSE) + { + // Unserialize the data + $data = unserialize($data); + } + else + { + // Delete the data + unset($data); + } + + // Turn errors back on + error_reporting($ER); + } + } + + // Return NULL if there is no data + return isset($data) ? $data : NULL; + } + + /** + * Deletes a cache item by id or tag + * + * @param string cache id or tag, or TRUE for "all items" + * @param boolean use tags + * @return boolean + */ + public function delete($id, $tag = FALSE) + { + $files = $this->exists($id, $tag); + + if (empty($files)) + return FALSE; + + // Disable all error reporting while deleting + $ER = error_reporting(0); + + foreach ($files as $file) + { + // Remove the cache file + if ( ! unlink($file)) + Kohana::log('error', 'Cache: Unable to delete cache file: '.$file); + } + + // Turn on error reporting again + error_reporting($ER); + + return TRUE; + } + + /** + * Deletes all cache files that are older than the current time. + * + * @return void + */ + public function delete_expired() + { + if ($files = $this->exists(TRUE)) + { + // Disable all error reporting while deleting + $ER = error_reporting(0); + + foreach ($files as $file) + { + if ($this->expired($file)) + { + // The cache file has already expired, delete it + if ( ! unlink($file)) + Kohana::log('error', 'Cache: Unable to delete cache file: '.$file); + } + } + + // Turn on error reporting again + error_reporting($ER); + } + } + + /** + * Check if a cache file has expired by filename. + * + * @param string filename + * @return bool + */ + protected function expired($file) + { + // Get the expiration time + $expires = (int) substr($file, strrpos($file, '~') + 1); + + // Expirations of 0 are "never expire" + return ($expires !== 0 AND $expires <= time()); + } + +} // End Cache File Driver \ No newline at end of file diff --git a/Server/system/libraries/drivers/Cache/Memcache.php b/Server/system/libraries/drivers/Cache/Memcache.php new file mode 100644 index 0000000..d801de9 --- /dev/null +++ b/Server/system/libraries/drivers/Cache/Memcache.php @@ -0,0 +1,191 @@ +backend = new Memcache; + $this->flags = Kohana::config('cache_memcache.compression') ? MEMCACHE_COMPRESSED : FALSE; + + $servers = Kohana::config('cache_memcache.servers'); + + foreach ($servers as $server) + { + // Make sure all required keys are set + $server += array('host' => '127.0.0.1', 'port' => 11211, 'persistent' => FALSE); + + // Add the server to the pool + $this->backend->addServer($server['host'], $server['port'], (bool) $server['persistent']) + or Kohana::log('error', 'Cache: Connection failed: '.$server['host']); + } + + // Load tags + self::$tags = $this->backend->get(self::TAGS_KEY); + + if ( ! is_array(self::$tags)) + { + // Create a new tags array + self::$tags = array(); + + // Tags have been created + self::$tags_changed = TRUE; + } + } + + public function __destruct() + { + if (self::$tags_changed === TRUE) + { + // Save the tags + $this->backend->set(self::TAGS_KEY, self::$tags, $this->flags, 0); + + // Tags are now unchanged + self::$tags_changed = FALSE; + } + } + + public function find($tag) + { + if (isset(self::$tags[$tag]) AND $results = $this->backend->get(self::$tags[$tag])) + { + // Return all the found caches + return $results; + } + else + { + // No matching tags + return array(); + } + } + + public function get($id) + { + return (($return = $this->backend->get($id)) === FALSE) ? NULL : $return; + } + + public function set($id, $data, array $tags = NULL, $lifetime) + { + if ( ! empty($tags)) + { + // Tags will be changed + self::$tags_changed = TRUE; + + foreach ($tags as $tag) + { + // Add the id to each tag + self::$tags[$tag][$id] = $id; + } + } + + if ($lifetime !== 0) + { + // Memcache driver expects unix timestamp + $lifetime += time(); + } + + // Set a new value + return $this->backend->set($id, $data, $this->flags, $lifetime); + } + + public function delete($id, $tag = FALSE) + { + // Tags will be changed + self::$tags_changed = TRUE; + + if ($id === TRUE) + { + if ($status = $this->backend->flush()) + { + // Remove all tags, all items have been deleted + self::$tags = array(); + + // We must sleep after flushing, or overwriting will not work! + // @see http://php.net/manual/en/function.memcache-flush.php#81420 + sleep(1); + } + + return $status; + } + elseif ($tag === TRUE) + { + if (isset(self::$tags[$id])) + { + foreach (self::$tags[$id] as $_id) + { + // Delete each id in the tag + $this->backend->delete($_id); + } + + // Delete the tag + unset(self::$tags[$id]); + } + + return TRUE; + } + else + { + foreach (self::$tags as $tag => $_ids) + { + if (isset(self::$tags[$tag][$id])) + { + // Remove the id from the tags + unset(self::$tags[$tag][$id]); + } + } + + return $this->backend->delete($id); + } + } + + public function delete_expired() + { + // Tags will be changed + self::$tags_changed = TRUE; + + foreach (self::$tags as $tag => $_ids) + { + foreach ($_ids as $id) + { + if ( ! $this->backend->get($id)) + { + // This id has disappeared, delete it from the tags + unset(self::$tags[$tag][$id]); + } + } + + if (empty(self::$tags[$tag])) + { + // The tag no longer has any valid ids + unset(self::$tags[$tag]); + } + } + + // Memcache handles garbage collection internally + return TRUE; + } + +} // End Cache Memcache Driver diff --git a/Server/system/libraries/drivers/Cache/Sqlite.php b/Server/system/libraries/drivers/Cache/Sqlite.php new file mode 100644 index 0000000..9458d85 --- /dev/null +++ b/Server/system/libraries/drivers/Cache/Sqlite.php @@ -0,0 +1,257 @@ +db = new SQLiteDatabase($filename, '0666', $error); + + // Throw an exception if there's an error + if ( ! empty($error)) + throw new Kohana_Exception('cache.driver_error', sqlite_error_string($error)); + + $query = "SELECT name FROM sqlite_master WHERE type = 'table' AND name = 'caches'"; + $tables = $this->db->query($query, SQLITE_BOTH, $error); + + // Throw an exception if there's an error + if ( ! empty($error)) + throw new Kohana_Exception('cache.driver_error', sqlite_error_string($error)); + + if ($tables->numRows() == 0) + { + Kohana::log('error', 'Cache: Initializing new SQLite cache database'); + + // Issue a CREATE TABLE command + $this->db->unbufferedQuery(Kohana::config('cache_sqlite.schema')); + } + } + + /** + * Checks if a cache id is already set. + * + * @param string cache id + * @return boolean + */ + public function exists($id) + { + // Find the id that matches + $query = "SELECT id FROM caches WHERE id = '$id'"; + + return ($this->db->query($query)->numRows() > 0); + } + + /** + * Sets a cache item to the given data, tags, and lifetime. + * + * @param string cache id to set + * @param string data in the cache + * @param array cache tags + * @param integer lifetime + * @return bool + */ + public function set($id, $data, array $tags = NULL, $lifetime) + { + // Serialize and escape the data + $data = sqlite_escape_string(serialize($data)); + + if ( ! empty($tags)) + { + // Escape the tags, adding brackets so the tag can be explicitly matched + $tags = sqlite_escape_string('<'.implode('>,<', $tags).'>'); + } + + // Cache Sqlite driver expects unix timestamp + if ($lifetime !== 0) + { + $lifetime += time(); + } + + $query = $this->exists($id) + ? "UPDATE caches SET tags = '$tags', expiration = '$lifetime', cache = '$data' WHERE id = '$id'" + : "INSERT INTO caches VALUES('$id', '$tags', '$lifetime', '$data')"; + + // Run the query + $this->db->unbufferedQuery($query, SQLITE_BOTH, $error); + + if ( ! empty($error)) + { + self::log_error($error); + return FALSE; + } + else + { + return TRUE; + } + } + + /** + * Finds an array of ids for a given tag. + * + * @param string tag name + * @return array of ids that match the tag + */ + public function find($tag) + { + $query = "SELECT id,cache FROM caches WHERE tags LIKE '%<{$tag}>%'"; + $query = $this->db->query($query, SQLITE_BOTH, $error); + + // An array will always be returned + $result = array(); + + if ( ! empty($error)) + { + self::log_error($error); + } + elseif ($query->numRows() > 0) + { + // Disable notices for unserializing + $ER = error_reporting(~E_NOTICE); + + while ($row = $query->fetchObject()) + { + // Add each cache to the array + $result[$row->id] = unserialize($row->cache); + } + + // Turn notices back on + error_reporting($ER); + } + + return $result; + } + + /** + * Fetches a cache item. This will delete the item if it is expired or if + * the hash does not match the stored hash. + * + * @param string cache id + * @return mixed|NULL + */ + public function get($id) + { + $query = "SELECT id, expiration, cache FROM caches WHERE id = '$id' LIMIT 0, 1"; + $query = $this->db->query($query, SQLITE_BOTH, $error); + + if ( ! empty($error)) + { + self::log_error($error); + } + elseif ($cache = $query->fetchObject()) + { + // Make sure the expiration is valid and that the hash matches + if ($cache->expiration != 0 AND $cache->expiration <= time()) + { + // Cache is not valid, delete it now + $this->delete($cache->id); + } + else + { + // Disable notices for unserializing + $ER = error_reporting(~E_NOTICE); + + // Return the valid cache data + $data = $cache->cache; + + // Turn notices back on + error_reporting($ER); + } + } + + // No valid cache found + return NULL; + } + + /** + * Deletes a cache item by id or tag + * + * @param string cache id or tag, or TRUE for "all items" + * @param bool delete a tag + * @return bool + */ + public function delete($id, $tag = FALSE) + { + if ($id === TRUE) + { + // Delete all caches + $where = '1'; + } + elseif ($tag === TRUE) + { + // Delete by tag + $where = "tags LIKE '%<{$id}>%'"; + } + else + { + // Delete by id + $where = "id = '$id'"; + } + + $this->db->unbufferedQuery('DELETE FROM caches WHERE '.$where, SQLITE_BOTH, $error); + + if ( ! empty($error)) + { + self::log_error($error); + return FALSE; + } + else + { + return TRUE; + } + } + + /** + * Deletes all cache files that are older than the current time. + */ + public function delete_expired() + { + // Delete all expired caches + $query = 'DELETE FROM caches WHERE expiration != 0 AND expiration <= '.time(); + + $this->db->unbufferedQuery($query); + + return TRUE; + } + +} // End Cache SQLite Driver \ No newline at end of file diff --git a/Server/system/libraries/drivers/Cache/Xcache.php b/Server/system/libraries/drivers/Cache/Xcache.php new file mode 100644 index 0000000..6254bbb --- /dev/null +++ b/Server/system/libraries/drivers/Cache/Xcache.php @@ -0,0 +1,119 @@ +auth(); + $result = TRUE; + for ($i = 0, $max = xcache_count(XC_TYPE_VAR); $i < $max; $i++) + { + if (xcache_clear_cache(XC_TYPE_VAR, $i) !== NULL) + { + $result = FALSE; + break; + } + } + + // Undo the login + $this->auth(TRUE); + return $result; + } + + return TRUE; + } + + public function delete_expired() + { + return TRUE; + } + + private function auth($reverse = FALSE) + { + static $backup = array(); + + $keys = array('PHP_AUTH_USER', 'PHP_AUTH_PW'); + + foreach ($keys as $key) + { + if ($reverse) + { + if (isset($backup[$key])) + { + $_SERVER[$key] = $backup[$key]; + unset($backup[$key]); + } + else + { + unset($_SERVER[$key]); + } + } + else + { + $value = getenv($key); + + if ( ! empty($value)) + { + $backup[$key] = $value; + } + + $_SERVER[$key] = Kohana::config('cache_xcache.'.$key); + } + } + } + +} // End Cache Xcache Driver diff --git a/Server/system/libraries/drivers/Captcha.php b/Server/system/libraries/drivers/Captcha.php new file mode 100644 index 0000000..a4343e1 --- /dev/null +++ b/Server/system/libraries/drivers/Captcha.php @@ -0,0 +1,227 @@ +response = $this->generate_challenge(); + + // Store the correct Captcha response in a session + Event::add('system.post_controller', array($this, 'update_response_session')); + } + + /** + * Generate a new Captcha challenge. + * + * @return string the challenge answer + */ + abstract public function generate_challenge(); + + /** + * Output the Captcha challenge. + * + * @param boolean html output + * @return mixed the rendered Captcha (e.g. an image, riddle, etc.) + */ + abstract public function render($html); + + /** + * Stores the response for the current Captcha challenge in a session so it is available + * on the next page load for Captcha::valid(). This method is called after controller + * execution (in the system.post_controller event) in order not to overwrite itself too soon. + * + * @return void + */ + public function update_response_session() + { + Session::instance()->set('captcha_response', sha1(strtoupper($this->response))); + } + + /** + * Validates a Captcha response from a user. + * + * @param string captcha response + * @return boolean + */ + public function valid($response) + { + return (sha1(strtoupper($response)) === Session::instance()->get('captcha_response')); + } + + /** + * Returns the image type. + * + * @param string filename + * @return string|FALSE image type ("png", "gif" or "jpeg") + */ + public function image_type($filename) + { + switch (strtolower(substr(strrchr($filename, '.'), 1))) + { + case 'png': + return 'png'; + + case 'gif': + return 'gif'; + + case 'jpg': + case 'jpeg': + // Return "jpeg" and not "jpg" because of the GD2 function names + return 'jpeg'; + + default: + return FALSE; + } + } + + /** + * Creates an image resource with the dimensions specified in config. + * If a background image is supplied, the image dimensions are used. + * + * @throws Kohana_Exception if no GD2 support + * @param string path to the background image file + * @return void + */ + public function image_create($background = NULL) + { + // Check for GD2 support + if ( ! function_exists('imagegd2')) + throw new Kohana_Exception('captcha.requires_GD2'); + + // Create a new image (black) + $this->image = imagecreatetruecolor(Captcha::$config['width'], Captcha::$config['height']); + + // Use a background image + if ( ! empty($background)) + { + // Create the image using the right function for the filetype + $function = 'imagecreatefrom'.$this->image_type($background); + $this->background_image = $function($background); + + // Resize the image if needed + if (imagesx($this->background_image) !== Captcha::$config['width'] + OR imagesy($this->background_image) !== Captcha::$config['height']) + { + imagecopyresampled + ( + $this->image, $this->background_image, 0, 0, 0, 0, + Captcha::$config['width'], Captcha::$config['height'], + imagesx($this->background_image), imagesy($this->background_image) + ); + } + + // Free up resources + imagedestroy($this->background_image); + } + } + + /** + * Fills the background with a gradient. + * + * @param resource gd image color identifier for start color + * @param resource gd image color identifier for end color + * @param string direction: 'horizontal' or 'vertical', 'random' by default + * @return void + */ + public function image_gradient($color1, $color2, $direction = NULL) + { + $directions = array('horizontal', 'vertical'); + + // Pick a random direction if needed + if ( ! in_array($direction, $directions)) + { + $direction = $directions[array_rand($directions)]; + + // Switch colors + if (mt_rand(0, 1) === 1) + { + $temp = $color1; + $color1 = $color2; + $color2 = $temp; + } + } + + // Extract RGB values + $color1 = imagecolorsforindex($this->image, $color1); + $color2 = imagecolorsforindex($this->image, $color2); + + // Preparations for the gradient loop + $steps = ($direction === 'horizontal') ? Captcha::$config['width'] : Captcha::$config['height']; + + $r1 = ($color1['red'] - $color2['red']) / $steps; + $g1 = ($color1['green'] - $color2['green']) / $steps; + $b1 = ($color1['blue'] - $color2['blue']) / $steps; + + if ($direction === 'horizontal') + { + $x1 =& $i; + $y1 = 0; + $x2 =& $i; + $y2 = Captcha::$config['height']; + } + else + { + $x1 = 0; + $y1 =& $i; + $x2 = Captcha::$config['width']; + $y2 =& $i; + } + + // Execute the gradient loop + for ($i = 0; $i <= $steps; $i++) + { + $r2 = $color1['red'] - floor($i * $r1); + $g2 = $color1['green'] - floor($i * $g1); + $b2 = $color1['blue'] - floor($i * $b1); + $color = imagecolorallocate($this->image, $r2, $g2, $b2); + + imageline($this->image, $x1, $y1, $x2, $y2, $color); + } + } + + /** + * Returns the img html element or outputs the image to the browser. + * + * @param boolean html output + * @return mixed html string or void + */ + public function image_render($html) + { + // Output html element + if ($html) + return 'Captcha'; + + // Send the correct HTTP header + header('Content-Type: image/'.$this->image_type); + + // Pick the correct output function + $function = 'image'.$this->image_type; + $function($this->image); + + // Free up resources + imagedestroy($this->image); + } + +} // End Captcha Driver \ No newline at end of file diff --git a/Server/system/libraries/drivers/Captcha/Alpha.php b/Server/system/libraries/drivers/Captcha/Alpha.php new file mode 100644 index 0000000..2779580 --- /dev/null +++ b/Server/system/libraries/drivers/Captcha/Alpha.php @@ -0,0 +1,92 @@ +image + $this->image_create(Captcha::$config['background']); + + // Add a random gradient + if (empty(Captcha::$config['background'])) + { + $color1 = imagecolorallocate($this->image, mt_rand(0, 100), mt_rand(0, 100), mt_rand(0, 100)); + $color2 = imagecolorallocate($this->image, mt_rand(0, 100), mt_rand(0, 100), mt_rand(0, 100)); + $this->image_gradient($color1, $color2); + } + + // Add a few random circles + for ($i = 0, $count = mt_rand(10, Captcha::$config['complexity'] * 3); $i < $count; $i++) + { + $color = imagecolorallocatealpha($this->image, mt_rand(0, 255), mt_rand(0, 255), mt_rand(0, 255), mt_rand(80, 120)); + $size = mt_rand(5, Captcha::$config['height'] / 3); + imagefilledellipse($this->image, mt_rand(0, Captcha::$config['width']), mt_rand(0, Captcha::$config['height']), $size, $size, $color); + } + + // Calculate character font-size and spacing + $default_size = min(Captcha::$config['width'], Captcha::$config['height'] * 2) / strlen($this->response); + $spacing = (int) (Captcha::$config['width'] * 0.9 / strlen($this->response)); + + // Background alphabetic character attributes + $color_limit = mt_rand(96, 160); + $chars = 'ABEFGJKLPQRTVY'; + + // Draw each Captcha character with varying attributes + for ($i = 0, $strlen = strlen($this->response); $i < $strlen; $i++) + { + // Use different fonts if available + $font = Captcha::$config['fontpath'].Captcha::$config['fonts'][array_rand(Captcha::$config['fonts'])]; + + $angle = mt_rand(-40, 20); + // Scale the character size on image height + $size = $default_size / 10 * mt_rand(8, 12); + $box = imageftbbox($size, $angle, $font, $this->response[$i]); + + // Calculate character starting coordinates + $x = $spacing / 4 + $i * $spacing; + $y = Captcha::$config['height'] / 2 + ($box[2] - $box[5]) / 4; + + // Draw captcha text character + // Allocate random color, size and rotation attributes to text + $color = imagecolorallocate($this->image, mt_rand(150, 255), mt_rand(200, 255), mt_rand(0, 255)); + + // Write text character to image + imagefttext($this->image, $size, $angle, $x, $y, $color, $font, $this->response[$i]); + + // Draw "ghost" alphabetic character + $text_color = imagecolorallocatealpha($this->image, mt_rand($color_limit + 8, 255), mt_rand($color_limit + 8, 255), mt_rand($color_limit + 8, 255), mt_rand(70, 120)); + $char = $chars[mt_rand(0, 14)]; + imagettftext($this->image, $size * 2, mt_rand(-45, 45), ($x - (mt_rand(5, 10))), ($y + (mt_rand(5, 10))), $text_color, $font, $char); + } + + // Output + return $this->image_render($html); + } + +} // End Captcha Alpha Driver Class \ No newline at end of file diff --git a/Server/system/libraries/drivers/Captcha/Basic.php b/Server/system/libraries/drivers/Captcha/Basic.php new file mode 100644 index 0000000..d212e72 --- /dev/null +++ b/Server/system/libraries/drivers/Captcha/Basic.php @@ -0,0 +1,81 @@ +image + $this->image_create(Captcha::$config['background']); + + // Add a random gradient + if (empty(Captcha::$config['background'])) + { + $color1 = imagecolorallocate($this->image, mt_rand(200, 255), mt_rand(200, 255), mt_rand(150, 255)); + $color2 = imagecolorallocate($this->image, mt_rand(200, 255), mt_rand(200, 255), mt_rand(150, 255)); + $this->image_gradient($color1, $color2); + } + + // Add a few random lines + for ($i = 0, $count = mt_rand(5, Captcha::$config['complexity'] * 4); $i < $count; $i++) + { + $color = imagecolorallocatealpha($this->image, mt_rand(0, 255), mt_rand(0, 255), mt_rand(100, 255), mt_rand(50, 120)); + imageline($this->image, mt_rand(0, Captcha::$config['width']), 0, mt_rand(0, Captcha::$config['width']), Captcha::$config['height'], $color); + } + + // Calculate character font-size and spacing + $default_size = min(Captcha::$config['width'], Captcha::$config['height'] * 2) / (strlen($this->response) + 1); + $spacing = (int) (Captcha::$config['width'] * 0.9 / strlen($this->response)); + + // Draw each Captcha character with varying attributes + for ($i = 0, $strlen = strlen($this->response); $i < $strlen; $i++) + { + // Use different fonts if available + $font = Captcha::$config['fontpath'].Captcha::$config['fonts'][array_rand(Captcha::$config['fonts'])]; + + // Allocate random color, size and rotation attributes to text + $color = imagecolorallocate($this->image, mt_rand(0, 150), mt_rand(0, 150), mt_rand(0, 150)); + $angle = mt_rand(-40, 20); + + // Scale the character size on image height + $size = $default_size / 10 * mt_rand(8, 12); + $box = imageftbbox($size, $angle, $font, $this->response[$i]); + + // Calculate character starting coordinates + $x = $spacing / 4 + $i * $spacing; + $y = Captcha::$config['height'] / 2 + ($box[2] - $box[5]) / 4; + + // Write text character to image + imagefttext($this->image, $size, $angle, $x, $y, $color, $font, $this->response[$i]); + } + + // Output + return $this->image_render($html); + } + +} // End Captcha Basic Driver Class \ No newline at end of file diff --git a/Server/system/libraries/drivers/Captcha/Black.php b/Server/system/libraries/drivers/Captcha/Black.php new file mode 100644 index 0000000..6a2e222 --- /dev/null +++ b/Server/system/libraries/drivers/Captcha/Black.php @@ -0,0 +1,72 @@ +image_create(Captcha::$config['background']); + + // Add random white/gray arcs, amount depends on complexity setting + $count = (Captcha::$config['width'] + Captcha::$config['height']) / 2; + $count = $count / 5 * min(10, Captcha::$config['complexity']); + for ($i = 0; $i < $count; $i++) + { + imagesetthickness($this->image, mt_rand(1, 2)); + $color = imagecolorallocatealpha($this->image, 255, 255, 255, mt_rand(0, 120)); + imagearc($this->image, mt_rand(-Captcha::$config['width'], Captcha::$config['width']), mt_rand(-Captcha::$config['height'], Captcha::$config['height']), mt_rand(-Captcha::$config['width'], Captcha::$config['width']), mt_rand(-Captcha::$config['height'], Captcha::$config['height']), mt_rand(0, 360), mt_rand(0, 360), $color); + } + + // Use different fonts if available + $font = Captcha::$config['fontpath'].Captcha::$config['fonts'][array_rand(Captcha::$config['fonts'])]; + + // Draw the character's white shadows + $size = (int) min(Captcha::$config['height'] / 2, Captcha::$config['width'] * 0.8 / strlen($this->response)); + $angle = mt_rand(-15 + strlen($this->response), 15 - strlen($this->response)); + $x = mt_rand(1, Captcha::$config['width'] * 0.9 - $size * strlen($this->response)); + $y = ((Captcha::$config['height'] - $size) / 2) + $size; + $color = imagecolorallocate($this->image, 255, 255, 255); + imagefttext($this->image, $size, $angle, $x + 1, $y + 1, $color, $font, $this->response); + + // Add more shadows for lower complexities + (Captcha::$config['complexity'] < 10) and imagefttext($this->image, $size, $angle, $x - 1, $y - 1, $color, $font , $this->response); + (Captcha::$config['complexity'] < 8) and imagefttext($this->image, $size, $angle, $x - 2, $y + 2, $color, $font , $this->response); + (Captcha::$config['complexity'] < 6) and imagefttext($this->image, $size, $angle, $x + 2, $y - 2, $color, $font , $this->response); + (Captcha::$config['complexity'] < 4) and imagefttext($this->image, $size, $angle, $x + 3, $y + 3, $color, $font , $this->response); + (Captcha::$config['complexity'] < 2) and imagefttext($this->image, $size, $angle, $x - 3, $y - 3, $color, $font , $this->response); + + // Finally draw the foreground characters + $color = imagecolorallocate($this->image, 0, 0, 0); + imagefttext($this->image, $size, $angle, $x, $y, $color, $font, $this->response); + + // Output + return $this->image_render($html); + } + +} // End Captcha Black Driver Class \ No newline at end of file diff --git a/Server/system/libraries/drivers/Captcha/Math.php b/Server/system/libraries/drivers/Captcha/Math.php new file mode 100644 index 0000000..4ac2024 --- /dev/null +++ b/Server/system/libraries/drivers/Captcha/Math.php @@ -0,0 +1,61 @@ +math_exercice = implode(' + ', $numbers).' = '; + + // Return the answer + return array_sum($numbers); + } + + /** + * Outputs the Captcha riddle. + * + * @param boolean html output + * @return mixed + */ + public function render($html) + { + return $this->math_exercice; + } + +} // End Captcha Math Driver Class \ No newline at end of file diff --git a/Server/system/libraries/drivers/Captcha/Riddle.php b/Server/system/libraries/drivers/Captcha/Riddle.php new file mode 100644 index 0000000..765eeaa --- /dev/null +++ b/Server/system/libraries/drivers/Captcha/Riddle.php @@ -0,0 +1,47 @@ +riddle = $riddle[0]; + + // Return the answer + return $riddle[1]; + } + + /** + * Outputs the Captcha riddle. + * + * @param boolean html output + * @return mixed + */ + public function render($html) + { + return $this->riddle; + } + +} // End Captcha Riddle Driver Class \ No newline at end of file diff --git a/Server/system/libraries/drivers/Captcha/Word.php b/Server/system/libraries/drivers/Captcha/Word.php new file mode 100644 index 0000000..856bd9b --- /dev/null +++ b/Server/system/libraries/drivers/Captcha/Word.php @@ -0,0 +1,37 @@ +escape_table($table).' WHERE '.implode(' ', $where); + } + + /** + * Builds an UPDATE query. + * + * @param string table name + * @param array key => value pairs + * @param array where clause + * @return string + */ + public function update($table, $values, $where) + { + foreach ($values as $key => $val) + { + $valstr[] = $this->escape_column($key).' = '.$val; + } + return 'UPDATE '.$this->escape_table($table).' SET '.implode(', ', $valstr).' WHERE '.implode(' ',$where); + } + + /** + * Set the charset using 'SET NAMES '. + * + * @param string character set to use + */ + public function set_charset($charset) + { + throw new Kohana_Database_Exception('database.not_implemented', __FUNCTION__); + } + + /** + * Wrap the tablename in backticks, has support for: table.field syntax. + * + * @param string table name + * @return string + */ + abstract public function escape_table($table); + + /** + * Escape a column/field name, has support for special commands. + * + * @param string column name + * @return string + */ + abstract public function escape_column($column); + + /** + * Builds a WHERE portion of a query. + * + * @param mixed key + * @param string value + * @param string type + * @param int number of where clauses + * @param boolean escape the value + * @return string + */ + public function where($key, $value, $type, $num_wheres, $quote) + { + $prefix = ($num_wheres == 0) ? '' : $type; + + if ($quote === -1) + { + $value = ''; + } + else + { + if ($value === NULL) + { + if ( ! $this->has_operator($key)) + { + $key .= ' IS'; + } + + $value = ' NULL'; + } + elseif (is_bool($value)) + { + if ( ! $this->has_operator($key)) + { + $key .= ' ='; + } + + $value = ($value == TRUE) ? ' 1' : ' 0'; + } + else + { + if ( ! $this->has_operator($key) AND ! empty($key)) + { + $key = $this->escape_column($key).' ='; + } + else + { + preg_match('/^(.+?)([<>!=]+|\bIS(?:\s+NULL))\s*$/i', $key, $matches); + if (isset($matches[1]) AND isset($matches[2])) + { + $key = $this->escape_column(trim($matches[1])).' '.trim($matches[2]); + } + } + + $value = ' '.(($quote == TRUE) ? $this->escape($value) : $value); + } + } + + return $prefix.$key.$value; + } + + /** + * Builds a LIKE portion of a query. + * + * @param mixed field name + * @param string value to match with field + * @param boolean add wildcards before and after the match + * @param string clause type (AND or OR) + * @param int number of likes + * @return string + */ + public function like($field, $match, $auto, $type, $num_likes) + { + $prefix = ($num_likes == 0) ? '' : $type; + + $match = $this->escape_str($match); + + if ($auto === TRUE) + { + // Add the start and end quotes + $match = '%'.str_replace('%', '\\%', $match).'%'; + } + + return $prefix.' '.$this->escape_column($field).' LIKE \''.$match . '\''; + } + + /** + * Builds a NOT LIKE portion of a query. + * + * @param mixed field name + * @param string value to match with field + * @param string clause type (AND or OR) + * @param int number of likes + * @return string + */ + public function notlike($field, $match, $auto, $type, $num_likes) + { + $prefix = ($num_likes == 0) ? '' : $type; + + $match = $this->escape_str($match); + + if ($auto === TRUE) + { + // Add the start and end quotes + $match = '%'.$match.'%'; + } + + return $prefix.' '.$this->escape_column($field).' NOT LIKE \''.$match.'\''; + } + + /** + * Builds a REGEX portion of a query. + * + * @param string field name + * @param string value to match with field + * @param string clause type (AND or OR) + * @param integer number of regexes + * @return string + */ + public function regex($field, $match, $type, $num_regexs) + { + throw new Kohana_Database_Exception('database.not_implemented', __FUNCTION__); + } + + /** + * Builds a NOT REGEX portion of a query. + * + * @param string field name + * @param string value to match with field + * @param string clause type (AND or OR) + * @param integer number of regexes + * @return string + */ + public function notregex($field, $match, $type, $num_regexs) + { + throw new Kohana_Database_Exception('database.not_implemented', __FUNCTION__); + } + + /** + * Builds an INSERT query. + * + * @param string table name + * @param array keys + * @param array values + * @return string + */ + public function insert($table, $keys, $values) + { + // Escape the column names + foreach ($keys as $key => $value) + { + $keys[$key] = $this->escape_column($value); + } + return 'INSERT INTO '.$this->escape_table($table).' ('.implode(', ', $keys).') VALUES ('.implode(', ', $values).')'; + } + + /** + * Builds a MERGE portion of a query. + * + * @param string table name + * @param array keys + * @param array values + * @return string + */ + public function merge($table, $keys, $values) + { + throw new Kohana_Database_Exception('database.not_implemented', __FUNCTION__); + } + + /** + * Builds a LIMIT portion of a query. + * + * @param integer limit + * @param integer offset + * @return string + */ + abstract public function limit($limit, $offset = 0); + + /** + * Creates a prepared statement. + * + * @param string SQL query + * @return Database_Stmt + */ + public function stmt_prepare($sql = '') + { + throw new Kohana_Database_Exception('database.not_implemented', __FUNCTION__); + } + + /** + * Compiles the SELECT statement. + * Generates a query string based on which functions were used. + * Should not be called directly, the get() function calls it. + * + * @param array select query values + * @return string + */ + abstract public function compile_select($database); + + /** + * Determines if the string has an arithmetic operator in it. + * + * @param string string to check + * @return boolean + */ + public function has_operator($str) + { + return (bool) preg_match('/[<>!=]|\sIS(?:\s+NOT\s+)?\b|BETWEEN/i', trim($str)); + } + + /** + * Escapes any input value. + * + * @param mixed value to escape + * @return string + */ + public function escape($value) + { + if ( ! $this->db_config['escape']) + return $value; + + switch (gettype($value)) + { + case 'string': + $value = '\''.$this->escape_str($value).'\''; + break; + case 'boolean': + $value = (int) $value; + break; + case 'double': + // Convert to non-locale aware float to prevent possible commas + $value = sprintf('%F', $value); + break; + default: + $value = ($value === NULL) ? 'NULL' : $value; + break; + } + + return (string) $value; + } + + /** + * Escapes a string for a query. + * + * @param mixed value to escape + * @return string + */ + abstract public function escape_str($str); + + /** + * Lists all tables in the database. + * + * @return array + */ + abstract public function list_tables(); + + /** + * Lists all fields in a table. + * + * @param string table name + * @return array + */ + abstract function list_fields($table); + + /** + * Returns the last database error. + * + * @return string + */ + abstract public function show_error(); + + /** + * Returns field data about a table. + * + * @param string table name + * @return array + */ + abstract public function field_data($table); + + /** + * Fetches SQL type information about a field, in a generic format. + * + * @param string field datatype + * @return array + */ + protected function sql_type($str) + { + static $sql_types; + + if ($sql_types === NULL) + { + // Load SQL data types + $sql_types = Kohana::config('sql_types'); + } + + $str = strtolower(trim($str)); + + if (($open = strpos($str, '(')) !== FALSE) + { + // Find closing bracket + $close = strpos($str, ')', $open) - 1; + + // Find the type without the size + $type = substr($str, 0, $open); + } + else + { + // No length + $type = $str; + } + + empty($sql_types[$type]) and exit + ( + 'Unknown field type: '.$type.'. '. + 'Please report this: http://trac.kohanaphp.com/newticket' + ); + + // Fetch the field definition + $field = $sql_types[$type]; + + switch ($field['type']) + { + case 'string': + case 'float': + if (isset($close)) + { + // Add the length to the field info + $field['length'] = substr($str, $open + 1, $close - $open); + } + break; + case 'int': + // Add unsigned value + $field['unsigned'] = (strpos($str, 'unsigned') !== FALSE); + break; + } + + return $field; + } + + /** + * Clears the internal query cache. + * + * @param string SQL query + */ + public function clear_cache($sql = NULL) + { + if (empty($sql)) + { + $this->query_cache = array(); + } + else + { + unset($this->query_cache[$this->query_hash($sql)]); + } + + Kohana::log('debug', 'Database cache cleared: '.get_class($this)); + } + + /** + * Creates a hash for an SQL query string. Replaces newlines with spaces, + * trims, and hashes. + * + * @param string SQL query + * @return string + */ + protected function query_hash($sql) + { + return sha1(str_replace("\n", ' ', trim($sql))); + } + +} // End Database Driver Interface + +/** + * Database_Result + * + */ +abstract class Database_Result implements ArrayAccess, Iterator, Countable { + + // Result resource, insert id, and SQL + protected $result; + protected $insert_id; + protected $sql; + + // Current and total rows + protected $current_row = 0; + protected $total_rows = 0; + + // Fetch function and return type + protected $fetch_type; + protected $return_type; + + /** + * Returns the SQL used to fetch the result. + * + * @return string + */ + public function sql() + { + return $this->sql; + } + + /** + * Returns the insert id from the result. + * + * @return mixed + */ + public function insert_id() + { + return $this->insert_id; + } + + /** + * Prepares the query result. + * + * @param boolean return rows as objects + * @param mixed type + * @return Database_Result + */ + abstract function result($object = TRUE, $type = FALSE); + + /** + * Builds an array of query results. + * + * @param boolean return rows as objects + * @param mixed type + * @return array + */ + abstract function result_array($object = NULL, $type = FALSE); + + /** + * Gets the fields of an already run query. + * + * @return array + */ + abstract public function list_fields(); + + /** + * Seek to an offset in the results. + * + * @return boolean + */ + abstract public function seek($offset); + + /** + * Countable: count + */ + public function count() + { + return $this->total_rows; + } + + /** + * ArrayAccess: offsetExists + */ + public function offsetExists($offset) + { + if ($this->total_rows > 0) + { + $min = 0; + $max = $this->total_rows - 1; + + return ! ($offset < $min OR $offset > $max); + } + + return FALSE; + } + + /** + * ArrayAccess: offsetGet + */ + public function offsetGet($offset) + { + if ( ! $this->seek($offset)) + return FALSE; + + // Return the row by calling the defined fetching callback + return call_user_func($this->fetch_type, $this->result, $this->return_type); + } + + /** + * ArrayAccess: offsetSet + * + * @throws Kohana_Database_Exception + */ + final public function offsetSet($offset, $value) + { + throw new Kohana_Database_Exception('database.result_read_only'); + } + + /** + * ArrayAccess: offsetUnset + * + * @throws Kohana_Database_Exception + */ + final public function offsetUnset($offset) + { + throw new Kohana_Database_Exception('database.result_read_only'); + } + + /** + * Iterator: current + */ + public function current() + { + return $this->offsetGet($this->current_row); + } + + /** + * Iterator: key + */ + public function key() + { + return $this->current_row; + } + + /** + * Iterator: next + */ + public function next() + { + ++$this->current_row; + return $this; + } + + /** + * Iterator: prev + */ + public function prev() + { + --$this->current_row; + return $this; + } + + /** + * Iterator: rewind + */ + public function rewind() + { + $this->current_row = 0; + return $this; + } + + /** + * Iterator: valid + */ + public function valid() + { + return $this->offsetExists($this->current_row); + } + +} // End Database Result Interface diff --git a/Server/system/libraries/drivers/Database/Mssql.php b/Server/system/libraries/drivers/Database/Mssql.php new file mode 100644 index 0000000..8b5ed50 --- /dev/null +++ b/Server/system/libraries/drivers/Database/Mssql.php @@ -0,0 +1,462 @@ +db_config = $config; + + Kohana::log('debug', 'MSSQL Database Driver Initialized'); + } + + /** + * Closes the database connection. + */ + public function __destruct() + { + is_resource($this->link) and mssql_close($this->link); + } + + /** + * Make the connection + * + * @return return connection + */ + public function connect() + { + // Check if link already exists + if (is_resource($this->link)) + return $this->link; + + // Import the connect variables + extract($this->db_config['connection']); + + // Persistent connections enabled? + $connect = ($this->db_config['persistent'] == TRUE) ? 'mssql_pconnect' : 'mssql_connect'; + + // Build the connection info + $host = isset($host) ? $host : $socket; + + // Windows uses a comma instead of a colon + $port = (isset($port) AND is_string($port)) ? (KOHANA_IS_WIN ? ',' : ':').$port : ''; + + // Make the connection and select the database + if (($this->link = $connect($host.$port, $user, $pass, TRUE)) AND mssql_select_db($database, $this->link)) + { + /* This is being removed so I can use it, will need to come up with a more elegant workaround in the future... + * + if ($charset = $this->db_config['character_set']) + { + $this->set_charset($charset); + } + */ + + // Clear password after successful connect + $this->db_config['connection']['pass'] = NULL; + + return $this->link; + } + + return FALSE; + } + + public function query($sql) + { + // Only cache if it's turned on, and only cache if it's not a write statement + if ($this->db_config['cache'] AND ! preg_match('#\b(?:INSERT|UPDATE|REPLACE|SET)\b#i', $sql)) + { + $hash = $this->query_hash($sql); + + if ( ! isset($this->query_cache[$hash])) + { + // Set the cached object + $this->query_cache[$hash] = new Mssql_Result(mssql_query($sql, $this->link), $this->link, $this->db_config['object'], $sql); + } + else + { + // Rewind cached result + $this->query_cache[$hash]->rewind(); + } + + // Return the cached query + return $this->query_cache[$hash]; + } + + return new Mssql_Result(mssql_query($sql, $this->link), $this->link, $this->db_config['object'], $sql); + } + + public function escape_table($table) + { + if (stripos($table, ' AS ') !== FALSE) + { + // Force 'AS' to uppercase + $table = str_ireplace(' AS ', ' AS ', $table); + + // Runs escape_table on both sides of an AS statement + $table = array_map(array($this, __FUNCTION__), explode(' AS ', $table)); + + // Re-create the AS statement + return implode(' AS ', $table); + } + return '['.str_replace('.', '[.]', $table).']'; + } + + public function escape_column($column) + { + if (!$this->db_config['escape']) + return $column; + + if ($column == '*') + return $column; + + // This matches any functions we support to SELECT. + if ( preg_match('/(avg|count|sum|max|min)\(\s*(.*)\s*\)(\s*as\s*(.+)?)?/i', $column, $matches)) + { + if ( count($matches) == 3) + { + return $matches[1].'('.$this->escape_column($matches[2]).')'; + } + else if ( count($matches) == 5) + { + return $matches[1].'('.$this->escape_column($matches[2]).') AS '.$this->escape_column($matches[2]); + } + } + + // This matches any modifiers we support to SELECT. + if ( ! preg_match('/\b(?:rand|all|distinct(?:row)?|high_priority|sql_(?:small_result|b(?:ig_result|uffer_result)|no_cache|ca(?:che|lc_found_rows)))\s/i', $column)) + { + if (stripos($column, ' AS ') !== FALSE) + { + // Force 'AS' to uppercase + $column = str_ireplace(' AS ', ' AS ', $column); + + // Runs escape_column on both sides of an AS statement + $column = array_map(array($this, __FUNCTION__), explode(' AS ', $column)); + + // Re-create the AS statement + return implode(' AS ', $column); + } + + return preg_replace('/[^.*]+/', '[$0]', $column); + } + + $parts = explode(' ', $column); + $column = ''; + + for ($i = 0, $c = count($parts); $i < $c; $i++) + { + // The column is always last + if ($i == ($c - 1)) + { + $column .= preg_replace('/[^.*]+/', '[$0]', $parts[$i]); + } + else // otherwise, it's a modifier + { + $column .= $parts[$i].' '; + } + } + return $column; + } + + /** + * Limit in SQL Server 2000 only uses the keyword + * 'TOP'; 2007 may have an offset keyword, but + * I am unsure - for pagination style limit,offset + * functionality, a fancy query needs to be built. + * + * @param unknown_type $limit + * @return unknown + */ + public function limit($limit, $offset=null) + { + return 'TOP '.$limit; + } + + public function compile_select($database) + { + $sql = ($database['distinct'] == TRUE) ? 'SELECT DISTINCT ' : 'SELECT '; + $sql .= (count($database['select']) > 0) ? implode(', ', $database['select']) : '*'; + + if (count($database['from']) > 0) + { + // Escape the tables + $froms = array(); + foreach ($database['from'] as $from) + $froms[] = $this->escape_column($from); + $sql .= "\nFROM "; + $sql .= implode(', ', $froms); + } + + if (count($database['join']) > 0) + { + foreach($database['join'] AS $join) + { + $sql .= "\n".$join['type'].'JOIN '.implode(', ', $join['tables']).' ON '.$join['conditions']; + } + } + + if (count($database['where']) > 0) + { + $sql .= "\nWHERE "; + } + + $sql .= implode("\n", $database['where']); + + if (count($database['groupby']) > 0) + { + $sql .= "\nGROUP BY "; + $sql .= implode(', ', $database['groupby']); + } + + if (count($database['having']) > 0) + { + $sql .= "\nHAVING "; + $sql .= implode("\n", $database['having']); + } + + if (count($database['orderby']) > 0) + { + $sql .= "\nORDER BY "; + $sql .= implode(', ', $database['orderby']); + } + + if (is_numeric($database['limit'])) + { + $sql .= "\n"; + $sql .= $this->limit($database['limit']); + } + + return $sql; + } + + public function escape_str($str) + { + if (!$this->db_config['escape']) + return $str; + + is_resource($this->link) or $this->connect(); + //mssql_real_escape_string($str, $this->link); <-- this function doesn't exist + + $characters = array('/\x00/', '/\x1a/', '/\n/', '/\r/', '/\\\/', '/\'/'); + $replace = array('\\\x00', '\\x1a', '\\n', '\\r', '\\\\', "''"); + return preg_replace($characters, $replace, $str); + } + + public function list_tables() + { + $sql = 'SHOW TABLES FROM ['.$this->db_config['connection']['database'].']'; + $result = $this->query($sql)->result(FALSE, MSSQL_ASSOC); + + $retval = array(); + foreach ($result as $row) + { + $retval[] = current($row); + } + + return $retval; + } + + public function show_error() + { + return mssql_get_last_message($this->link); + } + + public function list_fields($table) + { + $result = array(); + + foreach ($this->field_data($table) as $row) + { + // Make an associative array + $result[$row->Field] = $this->sql_type($row->Type); + } + + return $result; + } + + public function field_data($table) + { + $query = $this->query("SELECT COLUMN_NAME AS Field, DATA_TYPE as Type FROM INFORMATION_SCHEMA.Columns WHERE TABLE_NAME = '".$this->escape_table($table)."'", $this->link); + + return $query->result_array(TRUE); + } +} + +/** + * MSSQL Result + */ +class Mssql_Result extends Database_Result { + + // Fetch function and return type + protected $fetch_type = 'mssql_fetch_object'; + protected $return_type = MSSQL_ASSOC; + + /** + * Sets up the result variables. + * + * @param resource query result + * @param resource database link + * @param boolean return objects or arrays + * @param string SQL query that was run + */ + public function __construct($result, $link, $object = TRUE, $sql) + { + $this->result = $result; + + // If the query is a resource, it was a SELECT, SHOW, DESCRIBE, EXPLAIN query + if (is_resource($result)) + { + $this->current_row = 0; + $this->total_rows = mssql_num_rows($this->result); + $this->fetch_type = ($object === TRUE) ? 'mssql_fetch_object' : 'mssql_fetch_array'; + } + elseif (is_bool($result)) + { + if ($result == FALSE) + { + // SQL error + throw new Kohana_Database_Exception('database.error', mssql_get_last_message($link).' - '.$sql); + } + else + { + // Its an DELETE, INSERT, REPLACE, or UPDATE querys + $last_id = mssql_query('SELECT @@IDENTITY AS last_id', $link); + $result = mssql_fetch_assoc($last_id); + $this->insert_id = $result['last_id']; + $this->total_rows = mssql_rows_affected($link); + } + } + + // Set result type + $this->result($object); + + // Store the SQL + $this->sql = $sql; + } + + /** + * Destruct, the cleanup crew! + */ + public function __destruct() + { + if (is_resource($this->result)) + { + mssql_free_result($this->result); + } + } + + public function result($object = TRUE, $type = MSSQL_ASSOC) + { + $this->fetch_type = ((bool) $object) ? 'mssql_fetch_object' : 'mssql_fetch_array'; + + // This check has to be outside the previous statement, because we do not + // know the state of fetch_type when $object = NULL + // NOTE - The class set by $type must be defined before fetching the result, + // autoloading is disabled to save a lot of stupid overhead. + if ($this->fetch_type == 'mssql_fetch_object') + { + $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $this->return_type = $type; + } + + return $this; + } + + public function as_array($object = NULL, $type = MSSQL_ASSOC) + { + return $this->result_array($object, $type); + } + + public function result_array($object = NULL, $type = MSSQL_ASSOC) + { + $rows = array(); + + if (is_string($object)) + { + $fetch = $object; + } + elseif (is_bool($object)) + { + if ($object === TRUE) + { + $fetch = 'mssql_fetch_object'; + + // NOTE - The class set by $type must be defined before fetching the result, + // autoloading is disabled to save a lot of stupid overhead. + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $fetch = 'mssql_fetch_array'; + } + } + else + { + // Use the default config values + $fetch = $this->fetch_type; + + if ($fetch == 'mssql_fetch_object') + { + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + } + + if (mssql_num_rows($this->result)) + { + // Reset the pointer location to make sure things work properly + mssql_data_seek($this->result, 0); + + while ($row = $fetch($this->result, $type)) + { + $rows[] = $row; + } + } + + return isset($rows) ? $rows : array(); + } + + public function list_fields() + { + $field_names = array(); + while ($field = mssql_fetch_field($this->result)) + { + $field_names[] = $field->name; + } + + return $field_names; + } + + public function seek($offset) + { + if ( ! $this->offsetExists($offset)) + return FALSE; + + return mssql_data_seek($this->result, $offset); + } + +} // End mssql_Result Class diff --git a/Server/system/libraries/drivers/Database/Mysql.php b/Server/system/libraries/drivers/Database/Mysql.php new file mode 100644 index 0000000..d5222f5 --- /dev/null +++ b/Server/system/libraries/drivers/Database/Mysql.php @@ -0,0 +1,496 @@ +db_config = $config; + + Kohana::log('debug', 'MySQL Database Driver Initialized'); + } + + /** + * Closes the database connection. + */ + public function __destruct() + { + is_resource($this->link) and mysql_close($this->link); + } + + public function connect() + { + // Check if link already exists + if (is_resource($this->link)) + return $this->link; + + // Import the connect variables + extract($this->db_config['connection']); + + // Persistent connections enabled? + $connect = ($this->db_config['persistent'] == TRUE) ? 'mysql_pconnect' : 'mysql_connect'; + + // Build the connection info + $host = isset($host) ? $host : $socket; + $port = isset($port) ? ':'.$port : ''; + + // Make the connection and select the database + if (($this->link = $connect($host.$port, $user, $pass, TRUE)) AND mysql_select_db($database, $this->link)) + { + if ($charset = $this->db_config['character_set']) + { + $this->set_charset($charset); + } + + // Clear password after successful connect + $this->db_config['connection']['pass'] = NULL; + + return $this->link; + } + + return FALSE; + } + + public function query($sql) + { + // Only cache if it's turned on, and only cache if it's not a write statement + if ($this->db_config['cache'] AND ! preg_match('#\b(?:INSERT|UPDATE|REPLACE|SET|DELETE|TRUNCATE)\b#i', $sql)) + { + $hash = $this->query_hash($sql); + + if ( ! isset($this->query_cache[$hash])) + { + // Set the cached object + $this->query_cache[$hash] = new Mysql_Result(mysql_query($sql, $this->link), $this->link, $this->db_config['object'], $sql); + } + else + { + // Rewind cached result + $this->query_cache[$hash]->rewind(); + } + + // Return the cached query + return $this->query_cache[$hash]; + } + + return new Mysql_Result(mysql_query($sql, $this->link), $this->link, $this->db_config['object'], $sql); + } + + public function set_charset($charset) + { + $this->query('SET NAMES '.$this->escape_str($charset)); + } + + public function escape_table($table) + { + if (!$this->db_config['escape']) + return $table; + + if (stripos($table, ' AS ') !== FALSE) + { + // Force 'AS' to uppercase + $table = str_ireplace(' AS ', ' AS ', $table); + + // Runs escape_table on both sides of an AS statement + $table = array_map(array($this, __FUNCTION__), explode(' AS ', $table)); + + // Re-create the AS statement + return implode(' AS ', $table); + } + return '`'.str_replace('.', '`.`', $table).'`'; + } + + public function escape_column($column) + { + if (!$this->db_config['escape']) + return $column; + + if ($column == '*') + return $column; + + // This matches any functions we support to SELECT. + if ( preg_match('/(avg|count|sum|max|min)\(\s*(.*)\s*\)(\s*as\s*(.+)?)?/i', $column, $matches)) + { + if ( count($matches) == 3) + { + return $matches[1].'('.$this->escape_column($matches[2]).')'; + } + else if ( count($matches) == 5) + { + return $matches[1].'('.$this->escape_column($matches[2]).') AS '.$this->escape_column($matches[2]); + } + } + + // This matches any modifiers we support to SELECT. + if ( ! preg_match('/\b(?:rand|all|distinct(?:row)?|high_priority|sql_(?:small_result|b(?:ig_result|uffer_result)|no_cache|ca(?:che|lc_found_rows)))\s/i', $column)) + { + if (stripos($column, ' AS ') !== FALSE) + { + // Force 'AS' to uppercase + $column = str_ireplace(' AS ', ' AS ', $column); + + // Runs escape_column on both sides of an AS statement + $column = array_map(array($this, __FUNCTION__), explode(' AS ', $column)); + + // Re-create the AS statement + return implode(' AS ', $column); + } + + return preg_replace('/[^.*]+/', '`$0`', $column); + } + + $parts = explode(' ', $column); + $column = ''; + + for ($i = 0, $c = count($parts); $i < $c; $i++) + { + // The column is always last + if ($i == ($c - 1)) + { + $column .= preg_replace('/[^.*]+/', '`$0`', $parts[$i]); + } + else // otherwise, it's a modifier + { + $column .= $parts[$i].' '; + } + } + return $column; + } + + public function regex($field, $match, $type, $num_regexs) + { + $prefix = ($num_regexs == 0) ? '' : $type; + + return $prefix.' '.$this->escape_column($field).' REGEXP \''.$this->escape_str($match).'\''; + } + + public function notregex($field, $match, $type, $num_regexs) + { + $prefix = $num_regexs == 0 ? '' : $type; + + return $prefix.' '.$this->escape_column($field).' NOT REGEXP \''.$this->escape_str($match) . '\''; + } + + public function merge($table, $keys, $values) + { + // Escape the column names + foreach ($keys as $key => $value) + { + $keys[$key] = $this->escape_column($value); + } + return 'REPLACE INTO '.$this->escape_table($table).' ('.implode(', ', $keys).') VALUES ('.implode(', ', $values).')'; + } + + public function limit($limit, $offset = 0) + { + return 'LIMIT '.$offset.', '.$limit; + } + + public function compile_select($database) + { + $sql = ($database['distinct'] == TRUE) ? 'SELECT DISTINCT ' : 'SELECT '; + $sql .= (count($database['select']) > 0) ? implode(', ', $database['select']) : '*'; + + if (count($database['from']) > 0) + { + // Escape the tables + $froms = array(); + foreach ($database['from'] as $from) + { + $froms[] = $this->escape_column($from); + } + $sql .= "\nFROM ("; + $sql .= implode(', ', $froms).")"; + } + + if (count($database['join']) > 0) + { + foreach($database['join'] AS $join) + { + $sql .= "\n".$join['type'].'JOIN '.implode(', ', $join['tables']).' ON '.$join['conditions']; + } + } + + if (count($database['where']) > 0) + { + $sql .= "\nWHERE "; + } + + $sql .= implode("\n", $database['where']); + + if (count($database['groupby']) > 0) + { + $sql .= "\nGROUP BY "; + $sql .= implode(', ', $database['groupby']); + } + + if (count($database['having']) > 0) + { + $sql .= "\nHAVING "; + $sql .= implode("\n", $database['having']); + } + + if (count($database['orderby']) > 0) + { + $sql .= "\nORDER BY "; + $sql .= implode(', ', $database['orderby']); + } + + if (is_numeric($database['limit'])) + { + $sql .= "\n"; + $sql .= $this->limit($database['limit'], $database['offset']); + } + + return $sql; + } + + public function escape_str($str) + { + if (!$this->db_config['escape']) + return $str; + + is_resource($this->link) or $this->connect(); + + return mysql_real_escape_string($str, $this->link); + } + + public function list_tables() + { + $tables = array(); + + if ($query = $this->query('SHOW TABLES FROM '.$this->escape_table($this->db_config['connection']['database']))) + { + foreach ($query->result(FALSE) as $row) + { + $tables[] = current($row); + } + } + + return $tables; + } + + public function show_error() + { + return mysql_error($this->link); + } + + public function list_fields($table) + { + $result = NULL; + + foreach ($this->field_data($table) as $row) + { + // Make an associative array + $result[$row->Field] = $this->sql_type($row->Type); + + if ($row->Key === 'PRI' AND $row->Extra === 'auto_increment') + { + // For sequenced (AUTO_INCREMENT) tables + $result[$row->Field]['sequenced'] = TRUE; + } + + if ($row->Null === 'YES') + { + // Set NULL status + $result[$row->Field]['null'] = TRUE; + } + } + + if (!isset($result)) + throw new Kohana_Database_Exception('database.table_not_found', $table); + + return $result; + } + + public function field_data($table) + { + $result = $this->query('SHOW COLUMNS FROM '.$this->escape_table($table)); + + return $result->result_array(TRUE); + } + +} // End Database_Mysql_Driver Class + +/** + * MySQL Result + */ +class Mysql_Result extends Database_Result { + + // Fetch function and return type + protected $fetch_type = 'mysql_fetch_object'; + protected $return_type = MYSQL_ASSOC; + + /** + * Sets up the result variables. + * + * @param resource query result + * @param resource database link + * @param boolean return objects or arrays + * @param string SQL query that was run + */ + public function __construct($result, $link, $object = TRUE, $sql) + { + $this->result = $result; + + // If the query is a resource, it was a SELECT, SHOW, DESCRIBE, EXPLAIN query + if (is_resource($result)) + { + $this->current_row = 0; + $this->total_rows = mysql_num_rows($this->result); + $this->fetch_type = ($object === TRUE) ? 'mysql_fetch_object' : 'mysql_fetch_array'; + } + elseif (is_bool($result)) + { + if ($result == FALSE) + { + // SQL error + throw new Kohana_Database_Exception('database.error', mysql_error($link).' - '.$sql); + } + else + { + // Its an DELETE, INSERT, REPLACE, or UPDATE query + $this->insert_id = mysql_insert_id($link); + $this->total_rows = mysql_affected_rows($link); + } + } + + // Set result type + $this->result($object); + + // Store the SQL + $this->sql = $sql; + } + + /** + * Destruct, the cleanup crew! + */ + public function __destruct() + { + if (is_resource($this->result)) + { + mysql_free_result($this->result); + } + } + + public function result($object = TRUE, $type = MYSQL_ASSOC) + { + $this->fetch_type = ((bool) $object) ? 'mysql_fetch_object' : 'mysql_fetch_array'; + + // This check has to be outside the previous statement, because we do not + // know the state of fetch_type when $object = NULL + // NOTE - The class set by $type must be defined before fetching the result, + // autoloading is disabled to save a lot of stupid overhead. + if ($this->fetch_type == 'mysql_fetch_object' AND $object === TRUE) + { + $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $this->return_type = $type; + } + + return $this; + } + + public function as_array($object = NULL, $type = MYSQL_ASSOC) + { + return $this->result_array($object, $type); + } + + public function result_array($object = NULL, $type = MYSQL_ASSOC) + { + $rows = array(); + + if (is_string($object)) + { + $fetch = $object; + } + elseif (is_bool($object)) + { + if ($object === TRUE) + { + $fetch = 'mysql_fetch_object'; + + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $fetch = 'mysql_fetch_array'; + } + } + else + { + // Use the default config values + $fetch = $this->fetch_type; + + if ($fetch == 'mysql_fetch_object') + { + $type = (is_string($this->return_type) AND Kohana::auto_load($this->return_type)) ? $this->return_type : 'stdClass'; + } + } + + if (mysql_num_rows($this->result)) + { + // Reset the pointer location to make sure things work properly + mysql_data_seek($this->result, 0); + + while ($row = $fetch($this->result, $type)) + { + $rows[] = $row; + } + } + + return isset($rows) ? $rows : array(); + } + + public function list_fields() + { + $field_names = array(); + while ($field = mysql_fetch_field($this->result)) + { + $field_names[] = $field->name; + } + + return $field_names; + } + + public function seek($offset) + { + if ($this->offsetExists($offset) AND mysql_data_seek($this->result, $offset)) + { + // Set the current row to the offset + $this->current_row = $offset; + + return TRUE; + } + else + { + return FALSE; + } + } + +} // End Mysql_Result Class diff --git a/Server/system/libraries/drivers/Database/Mysqli.php b/Server/system/libraries/drivers/Database/Mysqli.php new file mode 100644 index 0000000..0dd9f05 --- /dev/null +++ b/Server/system/libraries/drivers/Database/Mysqli.php @@ -0,0 +1,358 @@ +db_config = $config; + + Kohana::log('debug', 'MySQLi Database Driver Initialized'); + } + + /** + * Closes the database connection. + */ + public function __destruct() + { + is_object($this->link) and $this->link->close(); + } + + public function connect() + { + // Check if link already exists + if (is_object($this->link)) + return $this->link; + + // Import the connect variables + extract($this->db_config['connection']); + + // Build the connection info + $host = isset($host) ? $host : $socket; + + // Make the connection and select the database + if ($this->link = new mysqli($host, $user, $pass, $database, $port)) + { + if ($charset = $this->db_config['character_set']) + { + $this->set_charset($charset); + } + + // Clear password after successful connect + $this->db_config['connection']['pass'] = NULL; + + return $this->link; + } + + return FALSE; + } + + public function query($sql) + { + // Only cache if it's turned on, and only cache if it's not a write statement + if ($this->db_config['cache'] AND ! preg_match('#\b(?:INSERT|UPDATE|REPLACE|SET|DELETE|TRUNCATE)\b#i', $sql)) + { + $hash = $this->query_hash($sql); + + if ( ! isset($this->query_cache[$hash])) + { + // Set the cached object + $this->query_cache[$hash] = new Kohana_Mysqli_Result($this->link, $this->db_config['object'], $sql); + } + else + { + // Rewind cached result + $this->query_cache[$hash]->rewind(); + } + + // Return the cached query + return $this->query_cache[$hash]; + } + + return new Kohana_Mysqli_Result($this->link, $this->db_config['object'], $sql); + } + + public function set_charset($charset) + { + if ($this->link->set_charset($charset) === FALSE) + throw new Kohana_Database_Exception('database.error', $this->show_error()); + } + + public function escape_str($str) + { + if (!$this->db_config['escape']) + return $str; + + is_object($this->link) or $this->connect(); + + return $this->link->real_escape_string($str); + } + + public function show_error() + { + return $this->link->error; + } + +} // End Database_Mysqli_Driver Class + +/** + * MySQLi Result + */ +class Kohana_Mysqli_Result extends Database_Result { + + // Database connection + protected $link; + + // Data fetching types + protected $fetch_type = 'mysqli_fetch_object'; + protected $return_type = MYSQLI_ASSOC; + + /** + * Sets up the result variables. + * + * @param object database link + * @param boolean return objects or arrays + * @param string SQL query that was run + */ + public function __construct($link, $object = TRUE, $sql) + { + $this->link = $link; + + if ( ! $this->link->multi_query($sql)) + { + // SQL error + throw new Kohana_Database_Exception('database.error', $this->link->error.' - '.$sql); + } + else + { + $this->result = $this->link->store_result(); + + // If the query is an object, it was a SELECT, SHOW, DESCRIBE, EXPLAIN query + if (is_object($this->result)) + { + $this->current_row = 0; + $this->total_rows = $this->result->num_rows; + $this->fetch_type = ($object === TRUE) ? 'fetch_object' : 'fetch_array'; + } + elseif ($this->link->error) + { + // SQL error + throw new Kohana_Database_Exception('database.error', $this->link->error.' - '.$sql); + } + else + { + // Its an DELETE, INSERT, REPLACE, or UPDATE query + $this->insert_id = $this->link->insert_id; + $this->total_rows = $this->link->affected_rows; + } + } + + // Set result type + $this->result($object); + + // Store the SQL + $this->sql = $sql; + } + + /** + * Magic __destruct function, frees the result. + */ + public function __destruct() + { + if (is_object($this->result)) + { + $this->result->free_result(); + + // this is kinda useless, but needs to be done to avoid the "Commands out of sync; you + // can't run this command now" error. Basically, we get all results after the first one + // (the one we actually need) and free them. + if (is_resource($this->link) AND $this->link->more_results()) + { + do + { + if ($result = $this->link->store_result()) + { + $result->free_result(); + } + } while ($this->link->next_result()); + } + } + } + + public function result($object = TRUE, $type = MYSQLI_ASSOC) + { + $this->fetch_type = ((bool) $object) ? 'fetch_object' : 'fetch_array'; + + // This check has to be outside the previous statement, because we do not + // know the state of fetch_type when $object = NULL + // NOTE - The class set by $type must be defined before fetching the result, + // autoloading is disabled to save a lot of stupid overhead. + if ($this->fetch_type == 'fetch_object') + { + $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $this->return_type = $type; + } + + return $this; + } + + public function as_array($object = NULL, $type = MYSQLI_ASSOC) + { + return $this->result_array($object, $type); + } + + public function result_array($object = NULL, $type = MYSQLI_ASSOC) + { + $rows = array(); + + if (is_string($object)) + { + $fetch = $object; + } + elseif (is_bool($object)) + { + if ($object === TRUE) + { + $fetch = 'fetch_object'; + + // NOTE - The class set by $type must be defined before fetching the result, + // autoloading is disabled to save a lot of stupid overhead. + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $fetch = 'fetch_array'; + } + } + else + { + // Use the default config values + $fetch = $this->fetch_type; + + if ($fetch == 'fetch_object') + { + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + } + + if ($this->result->num_rows) + { + // Reset the pointer location to make sure things work properly + $this->result->data_seek(0); + + while ($row = $this->result->$fetch($type)) + { + $rows[] = $row; + } + } + + return isset($rows) ? $rows : array(); + } + + public function list_fields() + { + $field_names = array(); + while ($field = $this->result->fetch_field()) + { + $field_names[] = $field->name; + } + + return $field_names; + } + + public function seek($offset) + { + if ($this->offsetExists($offset) AND $this->result->data_seek($offset)) + { + // Set the current row to the offset + $this->current_row = $offset; + + return TRUE; + } + + return FALSE; + } + + public function offsetGet($offset) + { + if ( ! $this->seek($offset)) + return FALSE; + + // Return the row + $fetch = $this->fetch_type; + return $this->result->$fetch($this->return_type); + } + +} // End Mysqli_Result Class + +/** + * MySQLi Prepared Statement (experimental) + */ +class Kohana_Mysqli_Statement { + + protected $link = NULL; + protected $stmt; + protected $var_names = array(); + protected $var_values = array(); + + public function __construct($sql, $link) + { + $this->link = $link; + + $this->stmt = $this->link->prepare($sql); + + return $this; + } + + public function __destruct() + { + $this->stmt->close(); + } + + // Sets the bind parameters + public function bind_params($param_types, $params) + { + $this->var_names = array_keys($params); + $this->var_values = array_values($params); + call_user_func_array(array($this->stmt, 'bind_param'), array_merge($param_types, $var_names)); + + return $this; + } + + public function bind_result($params) + { + call_user_func_array(array($this->stmt, 'bind_result'), $params); + } + + // Runs the statement + public function execute() + { + foreach ($this->var_names as $key => $name) + { + $$name = $this->var_values[$key]; + } + $this->stmt->execute(); + return $this->stmt; + } +} diff --git a/Server/system/libraries/drivers/Database/Pdosqlite.php b/Server/system/libraries/drivers/Database/Pdosqlite.php new file mode 100644 index 0000000..c2d1bb2 --- /dev/null +++ b/Server/system/libraries/drivers/Database/Pdosqlite.php @@ -0,0 +1,486 @@ + + */ + +class Database_Pdosqlite_Driver extends Database_Driver { + + // Database connection link + protected $link; + protected $db_config; + + /* + * Constructor: __construct + * Sets up the config for the class. + * + * Parameters: + * config - database configuration + * + */ + public function __construct($config) + { + $this->db_config = $config; + + Kohana::log('debug', 'PDO:Sqlite Database Driver Initialized'); + } + + public function connect() + { + // Import the connect variables + extract($this->db_config['connection']); + + try + { + $this->link = new PDO('sqlite:'.$socket.$database, $user, $pass, + array(PDO::ATTR_PERSISTENT => $this->db_config['persistent'])); + + $this->link->setAttribute(PDO::ATTR_CASE, PDO::CASE_NATURAL); + //$this->link->query('PRAGMA count_changes=1;'); + + if ($charset = $this->db_config['character_set']) + { + $this->set_charset($charset); + } + } + catch (PDOException $e) + { + throw new Kohana_Database_Exception('database.error', $e->getMessage()); + } + + // Clear password after successful connect + $this->db_config['connection']['pass'] = NULL; + + return $this->link; + } + + public function query($sql) + { + try + { + $sth = $this->link->prepare($sql); + } + catch (PDOException $e) + { + throw new Kohana_Database_Exception('database.error', $e->getMessage()); + } + return new Pdosqlite_Result($sth, $this->link, $this->db_config['object'], $sql); + } + + public function set_charset($charset) + { + $this->link->query('PRAGMA encoding = '.$this->escape_str($charset)); + } + + public function escape_table($table) + { + if ( ! $this->db_config['escape']) + return $table; + + return '`'.str_replace('.', '`.`', $table).'`'; + } + + public function escape_column($column) + { + if ( ! $this->db_config['escape']) + return $column; + + if ($column == '*') + return $column; + + // This matches any functions we support to SELECT. + if ( preg_match('/(avg|count|sum|max|min)\(\s*(.*)\s*\)(\s*as\s*(.+)?)?/i', $column, $matches)) + { + if ( count($matches) == 3) + { + return $matches[1].'('.$this->escape_column($matches[2]).')'; + } + else if ( count($matches) == 5) + { + return $matches[1].'('.$this->escape_column($matches[2]).') AS '.$this->escape_column($matches[2]); + } + } + + // This matches any modifiers we support to SELECT. + if ( ! preg_match('/\b(?:rand|all|distinct(?:row)?|high_priority|sql_(?:small_result|b(?:ig_result|uffer_result)|no_cache|ca(?:che|lc_found_rows)))\s/i', $column)) + { + if (stripos($column, ' AS ') !== FALSE) + { + // Force 'AS' to uppercase + $column = str_ireplace(' AS ', ' AS ', $column); + + // Runs escape_column on both sides of an AS statement + $column = array_map(array($this, __FUNCTION__), explode(' AS ', $column)); + + // Re-create the AS statement + return implode(' AS ', $column); + } + + return preg_replace('/[^.*]+/', '`$0`', $column); + } + + $parts = explode(' ', $column); + $column = ''; + + for ($i = 0, $c = count($parts); $i < $c; $i++) + { + // The column is always last + if ($i == ($c - 1)) + { + $column .= preg_replace('/[^.*]+/', '`$0`', $parts[$i]); + } + else // otherwise, it's a modifier + { + $column .= $parts[$i].' '; + } + } + return $column; + } + + public function limit($limit, $offset = 0) + { + return 'LIMIT '.$offset.', '.$limit; + } + + public function compile_select($database) + { + $sql = ($database['distinct'] == TRUE) ? 'SELECT DISTINCT ' : 'SELECT '; + $sql .= (count($database['select']) > 0) ? implode(', ', $database['select']) : '*'; + + if (count($database['from']) > 0) + { + $sql .= "\nFROM "; + $sql .= implode(', ', $database['from']); + } + + if (count($database['join']) > 0) + { + foreach($database['join'] AS $join) + { + $sql .= "\n".$join['type'].'JOIN '.implode(', ', $join['tables']).' ON '.$join['conditions']; + } + } + + if (count($database['where']) > 0) + { + $sql .= "\nWHERE "; + } + + $sql .= implode("\n", $database['where']); + + if (count($database['groupby']) > 0) + { + $sql .= "\nGROUP BY "; + $sql .= implode(', ', $database['groupby']); + } + + if (count($database['having']) > 0) + { + $sql .= "\nHAVING "; + $sql .= implode("\n", $database['having']); + } + + if (count($database['orderby']) > 0) + { + $sql .= "\nORDER BY "; + $sql .= implode(', ', $database['orderby']); + } + + if (is_numeric($database['limit'])) + { + $sql .= "\n"; + $sql .= $this->limit($database['limit'], $database['offset']); + } + + return $sql; + } + + public function escape_str($str) + { + if ( ! $this->db_config['escape']) + return $str; + + if (function_exists('sqlite_escape_string')) + { + $res = sqlite_escape_string($str); + } + else + { + $res = str_replace("'", "''", $str); + } + return $res; + } + + public function list_tables() + { + $sql = "SELECT `name` FROM `sqlite_master` WHERE `type`='table' ORDER BY `name`;"; + try + { + $result = $this->query($sql)->result(FALSE, PDO::FETCH_ASSOC); + $tables = array(); + foreach ($result as $row) + { + $tables[] = current($row); + } + } + catch (PDOException $e) + { + throw new Kohana_Database_Exception('database.error', $e->getMessage()); + } + return $tables; + } + + public function show_error() + { + $err = $this->link->errorInfo(); + return isset($err[2]) ? $err[2] : 'Unknown error!'; + } + + public function list_fields($table, $query = FALSE) + { + static $tables; + if (is_object($query)) + { + if (empty($tables[$table])) + { + $tables[$table] = array(); + + foreach ($query->result() as $row) + { + $tables[$table][] = $row->name; + } + } + + return $tables[$table]; + } + else + { + $result = $this->link->query( 'PRAGMA table_info('.$this->escape_table($table).')' ); + + foreach ($result as $row) + { + $tables[$table][$row['name']] = $this->sql_type($row['type']); + } + + return $tables[$table]; + } + } + + public function field_data($table) + { + Kohana::log('error', 'This method is under developing'); + } + /** + * Version number query string + * + * @access public + * @return string + */ + function version() + { + return $this->link->getAttribute(constant("PDO::ATTR_SERVER_VERSION")); + } + +} // End Database_PdoSqlite_Driver Class + +/* + * PDO-sqlite Result + */ +class Pdosqlite_Result extends Database_Result { + + // Data fetching types + protected $fetch_type = PDO::FETCH_OBJ; + protected $return_type = PDO::FETCH_ASSOC; + + /** + * Sets up the result variables. + * + * @param resource query result + * @param resource database link + * @param boolean return objects or arrays + * @param string SQL query that was run + */ + public function __construct($result, $link, $object = TRUE, $sql) + { + if (is_object($result) OR $result = $link->prepare($sql)) + { + // run the query. Return true if success, false otherwise + if( ! $result->execute()) + { + // Throw Kohana Exception with error message. See PDOStatement errorInfo() method + $arr_infos = $result->errorInfo(); + throw new Kohana_Database_Exception('database.error', $arr_infos[2]); + } + + if (preg_match('/^SELECT|PRAGMA|EXPLAIN/i', $sql)) + { + $this->result = $result; + $this->current_row = 0; + + $this->total_rows = $this->sqlite_row_count(); + + $this->fetch_type = ($object === TRUE) ? PDO::FETCH_OBJ : PDO::FETCH_ASSOC; + } + elseif (preg_match('/^DELETE|INSERT|UPDATE/i', $sql)) + { + $this->insert_id = $link->lastInsertId(); + + $this->total_rows = $result->rowCount(); + } + } + else + { + // SQL error + throw new Kohana_Database_Exception('database.error', $link->errorInfo().' - '.$sql); + } + + // Set result type + $this->result($object); + + // Store the SQL + $this->sql = $sql; + } + + private function sqlite_row_count() + { + $count = 0; + while ($this->result->fetch()) + { + $count++; + } + + // The query must be re-fetched now. + $this->result->execute(); + + return $count; + } + + /* + * Destructor: __destruct + * Magic __destruct function, frees the result. + */ + public function __destruct() + { + if (is_object($this->result)) + { + $this->result->closeCursor(); + $this->result = NULL; + } + } + + public function result($object = TRUE, $type = PDO::FETCH_BOTH) + { + $this->fetch_type = (bool) $object ? PDO::FETCH_OBJ : PDO::FETCH_BOTH; + + if ($this->fetch_type == PDO::FETCH_OBJ) + { + $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $this->return_type = $type; + } + + return $this; + } + + public function as_array($object = NULL, $type = PDO::FETCH_ASSOC) + { + return $this->result_array($object, $type); + } + + public function result_array($object = NULL, $type = PDO::FETCH_ASSOC) + { + $rows = array(); + + if (is_string($object)) + { + $fetch = $object; + } + elseif (is_bool($object)) + { + if ($object === TRUE) + { + $fetch = PDO::FETCH_OBJ; + + // NOTE - The class set by $type must be defined before fetching the result, + // autoloading is disabled to save a lot of stupid overhead. + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $fetch = PDO::FETCH_OBJ; + } + } + else + { + // Use the default config values + $fetch = $this->fetch_type; + + if ($fetch == PDO::FETCH_OBJ) + { + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + } + try + { + while ($row = $this->result->fetch($fetch)) + { + $rows[] = $row; + } + } + catch(PDOException $e) + { + throw new Kohana_Database_Exception('database.error', $e->getMessage()); + return FALSE; + } + return $rows; + } + + public function list_fields() + { + $field_names = array(); + for ($i = 0, $max = $this->result->columnCount(); $i < $max; $i++) + { + $info = $this->result->getColumnMeta($i); + $field_names[] = $info['name']; + } + return $field_names; + } + + public function seek($offset) + { + // To request a scrollable cursor for your PDOStatement object, you must + // set the PDO::ATTR_CURSOR attribute to PDO::CURSOR_SCROLL when you + // prepare the statement. + Kohana::log('error', get_class($this).' does not support scrollable cursors, '.__FUNCTION__.' call ignored'); + + return FALSE; + } + + public function offsetGet($offset) + { + try + { + return $this->result->fetch($this->fetch_type, PDO::FETCH_ORI_ABS, $offset); + } + catch(PDOException $e) + { + throw new Kohana_Database_Exception('database.error', $e->getMessage()); + } + } + + public function rewind() + { + // Same problem that seek() has, see above. + return $this->seek(0); + } + +} // End PdoSqlite_Result Class \ No newline at end of file diff --git a/Server/system/libraries/drivers/Database/Pgsql.php b/Server/system/libraries/drivers/Database/Pgsql.php new file mode 100644 index 0000000..c53c843 --- /dev/null +++ b/Server/system/libraries/drivers/Database/Pgsql.php @@ -0,0 +1,538 @@ +db_config = $config; + + Kohana::log('debug', 'PgSQL Database Driver Initialized'); + } + + public function connect() + { + // Check if link already exists + if (is_resource($this->link)) + return $this->link; + + // Import the connect variables + extract($this->db_config['connection']); + + // Persistent connections enabled? + $connect = ($this->db_config['persistent'] == TRUE) ? 'pg_pconnect' : 'pg_connect'; + + // Build the connection info + $port = isset($port) ? 'port=\''.$port.'\'' : ''; + $host = isset($host) ? 'host=\''.$host.'\' '.$port : ''; // if no host, connect with the socket + + $connection_string = $host.' dbname=\''.$database.'\' user=\''.$user.'\' password=\''.$pass.'\''; + // Make the connection and select the database + if ($this->link = $connect($connection_string)) + { + if ($charset = $this->db_config['character_set']) + { + echo $this->set_charset($charset); + } + + // Clear password after successful connect + $this->db_config['connection']['pass'] = NULL; + + return $this->link; + } + + return FALSE; + } + + public function query($sql) + { + // Only cache if it's turned on, and only cache if it's not a write statement + if ($this->db_config['cache'] AND ! preg_match('#\b(?:INSERT|UPDATE|SET)\b#i', $sql)) + { + $hash = $this->query_hash($sql); + + if ( ! isset($this->query_cache[$hash])) + { + // Set the cached object + $this->query_cache[$hash] = new Pgsql_Result(pg_query($this->link, $sql), $this->link, $this->db_config['object'], $sql); + } + else + { + // Rewind cached result + $this->query_cache[$hash]->rewind(); + } + + return $this->query_cache[$hash]; + } + + // Suppress warning triggered when a database error occurs (e.g., a constraint violation) + return new Pgsql_Result(@pg_query($this->link, $sql), $this->link, $this->db_config['object'], $sql); + } + + public function set_charset($charset) + { + $this->query('SET client_encoding TO '.pg_escape_string($this->link, $charset)); + } + + public function escape_table($table) + { + if (!$this->db_config['escape']) + return $table; + + return '"'.str_replace('.', '"."', $table).'"'; + } + + public function escape_column($column) + { + if (!$this->db_config['escape']) + return $column; + + if ($column == '*') + return $column; + + // This matches any functions we support to SELECT. + if ( preg_match('/(avg|count|sum|max|min)\(\s*(.*)\s*\)(\s*as\s*(.+)?)?/i', $column, $matches)) + { + if ( count($matches) == 3) + { + return $matches[1].'('.$this->escape_column($matches[2]).')'; + } + else if ( count($matches) == 5) + { + return $matches[1].'('.$this->escape_column($matches[2]).') AS '.$this->escape_column($matches[2]); + } + } + + // This matches any modifiers we support to SELECT. + if ( ! preg_match('/\b(?:all|distinct)\s/i', $column)) + { + if (stripos($column, ' AS ') !== FALSE) + { + // Force 'AS' to uppercase + $column = str_ireplace(' AS ', ' AS ', $column); + + // Runs escape_column on both sides of an AS statement + $column = array_map(array($this, __FUNCTION__), explode(' AS ', $column)); + + // Re-create the AS statement + return implode(' AS ', $column); + } + + return preg_replace('/[^.*]+/', '"$0"', $column); + } + + $parts = explode(' ', $column); + $column = ''; + + for ($i = 0, $c = count($parts); $i < $c; $i++) + { + // The column is always last + if ($i == ($c - 1)) + { + $column .= preg_replace('/[^.*]+/', '"$0"', $parts[$i]); + } + else // otherwise, it's a modifier + { + $column .= $parts[$i].' '; + } + } + return $column; + } + + public function regex($field, $match, $type, $num_regexs) + { + $prefix = ($num_regexs == 0) ? '' : $type; + + return $prefix.' '.$this->escape_column($field).' ~* \''.$this->escape_str($match).'\''; + } + + public function notregex($field, $match, $type, $num_regexs) + { + $prefix = $num_regexs == 0 ? '' : $type; + + return $prefix.' '.$this->escape_column($field).' !~* \''.$this->escape_str($match) . '\''; + } + + public function limit($limit, $offset = 0) + { + return 'LIMIT '.$limit.' OFFSET '.$offset; + } + + public function compile_select($database) + { + $sql = ($database['distinct'] == TRUE) ? 'SELECT DISTINCT ' : 'SELECT '; + $sql .= (count($database['select']) > 0) ? implode(', ', $database['select']) : '*'; + + if (count($database['from']) > 0) + { + $sql .= "\nFROM "; + $sql .= implode(', ', $database['from']); + } + + if (count($database['join']) > 0) + { + foreach($database['join'] AS $join) + { + $sql .= "\n".$join['type'].'JOIN '.implode(', ', $join['tables']).' ON '.$join['conditions']; + } + } + + if (count($database['where']) > 0) + { + $sql .= "\nWHERE "; + } + + $sql .= implode("\n", $database['where']); + + if (count($database['groupby']) > 0) + { + $sql .= "\nGROUP BY "; + $sql .= implode(', ', $database['groupby']); + } + + if (count($database['having']) > 0) + { + $sql .= "\nHAVING "; + $sql .= implode("\n", $database['having']); + } + + if (count($database['orderby']) > 0) + { + $sql .= "\nORDER BY "; + $sql .= implode(', ', $database['orderby']); + } + + if (is_numeric($database['limit'])) + { + $sql .= "\n"; + $sql .= $this->limit($database['limit'], $database['offset']); + } + + return $sql; + } + + public function escape_str($str) + { + if (!$this->db_config['escape']) + return $str; + + is_resource($this->link) or $this->connect(); + + return pg_escape_string($this->link, $str); + } + + public function list_tables() + { + $sql = 'SELECT table_schema || \'.\' || table_name FROM information_schema.tables WHERE table_schema NOT IN (\'pg_catalog\', \'information_schema\')'; + $result = $this->query($sql)->result(FALSE, PGSQL_ASSOC); + + $retval = array(); + foreach ($result as $row) + { + $retval[] = current($row); + } + + return $retval; + } + + public function show_error() + { + return pg_last_error($this->link); + } + + public function list_fields($table) + { + $result = NULL; + + foreach ($this->field_data($table) as $row) + { + // Make an associative array + $result[$row->column_name] = $this->sql_type($row->data_type); + + if (!strncmp($row->column_default, 'nextval(', 8)) + { + $result[$row->column_name]['sequenced'] = TRUE; + } + + if ($row->is_nullable === 'YES') + { + $result[$row->column_name]['null'] = TRUE; + } + } + + if (!isset($result)) + throw new Kohana_Database_Exception('database.table_not_found', $table); + + return $result; + } + + public function field_data($table) + { + // http://www.postgresql.org/docs/8.3/static/infoschema-columns.html + $result = $this->query(' + SELECT column_name, column_default, is_nullable, data_type, udt_name, + character_maximum_length, numeric_precision, numeric_precision_radix, numeric_scale + FROM information_schema.columns + WHERE table_name = \''. $this->escape_str($table) .'\' + ORDER BY ordinal_position + '); + + return $result->result_array(TRUE); + } + +} // End Database_Pgsql_Driver Class + +/** + * PostgreSQL Result + */ +class Pgsql_Result extends Database_Result { + + // Data fetching types + protected $fetch_type = 'pgsql_fetch_object'; + protected $return_type = PGSQL_ASSOC; + + /** + * Sets up the result variables. + * + * @param resource query result + * @param resource database link + * @param boolean return objects or arrays + * @param string SQL query that was run + */ + public function __construct($result, $link, $object = TRUE, $sql) + { + $this->link = $link; + $this->result = $result; + + // If the query is a resource, it was a SELECT, SHOW, DESCRIBE, EXPLAIN query + if (is_resource($result)) + { + // Its an DELETE, INSERT, REPLACE, or UPDATE query + if (preg_match('/^(?:delete|insert|replace|update)\b/iD', trim($sql), $matches)) + { + $this->insert_id = (strtolower($matches[0]) == 'insert') ? $this->insert_id() : FALSE; + $this->total_rows = pg_affected_rows($this->result); + } + else + { + $this->current_row = 0; + $this->total_rows = pg_num_rows($this->result); + $this->fetch_type = ($object === TRUE) ? 'pg_fetch_object' : 'pg_fetch_array'; + } + } + else + { + throw new Kohana_Database_Exception('database.error', pg_last_error().' - '.$sql); + } + + // Set result type + $this->result($object); + + // Store the SQL + $this->sql = $sql; + } + + /** + * Magic __destruct function, frees the result. + */ + public function __destruct() + { + if (is_resource($this->result)) + { + pg_free_result($this->result); + } + } + + public function result($object = TRUE, $type = PGSQL_ASSOC) + { + $this->fetch_type = ((bool) $object) ? 'pg_fetch_object' : 'pg_fetch_array'; + + // This check has to be outside the previous statement, because we do not + // know the state of fetch_type when $object = NULL + // NOTE - The class set by $type must be defined before fetching the result, + // autoloading is disabled to save a lot of stupid overhead. + if ($this->fetch_type == 'pg_fetch_object') + { + $this->return_type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $this->return_type = $type; + } + + return $this; + } + + public function as_array($object = NULL, $type = PGSQL_ASSOC) + { + return $this->result_array($object, $type); + } + + public function result_array($object = NULL, $type = PGSQL_ASSOC) + { + $rows = array(); + + if (is_string($object)) + { + $fetch = $object; + } + elseif (is_bool($object)) + { + if ($object === TRUE) + { + $fetch = 'pg_fetch_object'; + + // NOTE - The class set by $type must be defined before fetching the result, + // autoloading is disabled to save a lot of stupid overhead. + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + else + { + $fetch = 'pg_fetch_array'; + } + } + else + { + // Use the default config values + $fetch = $this->fetch_type; + + if ($fetch == 'pg_fetch_object') + { + $type = (is_string($type) AND Kohana::auto_load($type)) ? $type : 'stdClass'; + } + } + + if ($this->total_rows) + { + pg_result_seek($this->result, 0); + + while ($row = $fetch($this->result, NULL, $type)) + { + $rows[] = $row; + } + } + + return $rows; + } + + public function insert_id() + { + if ($this->insert_id === NULL) + { + $query = 'SELECT LASTVAL() AS insert_id'; + + // Disable error reporting for this, just to silence errors on + // tables that have no serial column. + $ER = error_reporting(0); + + $result = pg_query($this->link, $query); + $insert_id = pg_fetch_array($result, NULL, PGSQL_ASSOC); + + $this->insert_id = $insert_id['insert_id']; + + // Reset error reporting + error_reporting($ER); + } + + return $this->insert_id; + } + + public function seek($offset) + { + if ($this->offsetExists($offset) AND pg_result_seek($this->result, $offset)) + { + // Set the current row to the offset + $this->current_row = $offset; + + return TRUE; + } + + return FALSE; + } + + public function list_fields() + { + $field_names = array(); + + $fields = pg_num_fields($this->result); + for ($i = 0; $i < $fields; ++$i) + { + $field_names[] = pg_field_name($this->result, $i); + } + + return $field_names; + } + + /** + * ArrayAccess: offsetGet + */ + public function offsetGet($offset) + { + if ( ! $this->seek($offset)) + return FALSE; + + // Return the row by calling the defined fetching callback + $fetch = $this->fetch_type; + return $fetch($this->result, NULL, $this->return_type); + } + +} // End Pgsql_Result Class + +/** + * PostgreSQL Prepared Statement (experimental) + */ +class Kohana_Pgsql_Statement { + + protected $link = NULL; + protected $stmt; + + public function __construct($sql, $link) + { + $this->link = $link; + + $this->stmt = $this->link->prepare($sql); + + return $this; + } + + public function __destruct() + { + $this->stmt->close(); + } + + // Sets the bind parameters + public function bind_params() + { + $argv = func_get_args(); + return $this; + } + + // sets the statement values to the bound parameters + public function set_vals() + { + return $this; + } + + // Runs the statement + public function execute() + { + return $this; + } +} diff --git a/Server/system/libraries/drivers/Image.php b/Server/system/libraries/drivers/Image.php new file mode 100644 index 0000000..5c4ab1b --- /dev/null +++ b/Server/system/libraries/drivers/Image.php @@ -0,0 +1,149 @@ + $args) + { + if ( ! $this->$func($args)) + return FALSE; + } + + return TRUE; + } + + /** + * Sanitize and normalize a geometry array based on the temporary image + * width and height. Valid properties are: width, height, top, left. + * + * @param array geometry properties + * @return void + */ + protected function sanitize_geometry( & $geometry) + { + list($width, $height) = $this->properties(); + + // Turn off error reporting + $reporting = error_reporting(0); + + // Width and height cannot exceed current image size + $geometry['width'] = min($geometry['width'], $width); + $geometry['height'] = min($geometry['height'], $height); + + // Set standard coordinates if given, otherwise use pixel values + if ($geometry['top'] === 'center') + { + $geometry['top'] = floor(($height / 2) - ($geometry['height'] / 2)); + } + elseif ($geometry['top'] === 'top') + { + $geometry['top'] = 0; + } + elseif ($geometry['top'] === 'bottom') + { + $geometry['top'] = $height - $geometry['height']; + } + + // Set standard coordinates if given, otherwise use pixel values + if ($geometry['left'] === 'center') + { + $geometry['left'] = floor(($width / 2) - ($geometry['width'] / 2)); + } + elseif ($geometry['left'] === 'left') + { + $geometry['left'] = 0; + } + elseif ($geometry['left'] === 'right') + { + $geometry['left'] = $width - $geometry['height']; + } + + // Restore error reporting + error_reporting($reporting); + } + + /** + * Return the current width and height of the temporary image. This is mainly + * needed for sanitizing the geometry. + * + * @return array width, height + */ + abstract protected function properties(); + + /** + * Process an image with a set of actions. + * + * @param string image filename + * @param array actions to execute + * @param string destination directory path + * @param string destination filename + * @return boolean + */ + abstract public function process($image, $actions, $dir, $file); + + /** + * Flip an image. Valid directions are horizontal and vertical. + * + * @param integer direction to flip + * @return boolean + */ + abstract function flip($direction); + + /** + * Crop an image. Valid properties are: width, height, top, left. + * + * @param array new properties + * @return boolean + */ + abstract function crop($properties); + + /** + * Resize an image. Valid properties are: width, height, and master. + * + * @param array new properties + * @return boolean + */ + abstract public function resize($properties); + + /** + * Rotate an image. Valid amounts are -180 to 180. + * + * @param integer amount to rotate + * @return boolean + */ + abstract public function rotate($amount); + + /** + * Sharpen and image. Valid amounts are 1 to 100. + * + * @param integer amount to sharpen + * @return boolean + */ + abstract public function sharpen($amount); + +} // End Image Driver \ No newline at end of file diff --git a/Server/system/libraries/drivers/Image/GD.php b/Server/system/libraries/drivers/Image/GD.php new file mode 100644 index 0000000..b3610b3 --- /dev/null +++ b/Server/system/libraries/drivers/Image/GD.php @@ -0,0 +1,379 @@ +image = $image; + + // Create the GD image resource + $this->tmp_image = $create($image['file']); + + // Get the quality setting from the actions + $quality = arr::remove('quality', $actions); + + if ($status = $this->execute($actions)) + { + // Prevent the alpha from being lost + imagealphablending($this->tmp_image, TRUE); + imagesavealpha($this->tmp_image, TRUE); + + switch ($save) + { + case 'imagejpeg': + // Default the quality to 95 + ($quality === NULL) and $quality = 95; + break; + case 'imagegif': + // Remove the quality setting, GIF doesn't use it + unset($quality); + break; + case 'imagepng': + // Always use a compression level of 9 for PNGs. This does not + // affect quality, it only increases the level of compression! + $quality = 9; + break; + } + + if ($render === FALSE) + { + // Set the status to the save return value, saving with the quality requested + $status = isset($quality) ? $save($this->tmp_image, $dir.$file, $quality) : $save($this->tmp_image, $dir.$file); + } + else + { + // Output the image directly to the browser + switch ($save) + { + case 'imagejpeg': + header('Content-Type: image/jpeg'); + break; + case 'imagegif': + header('Content-Type: image/gif'); + break; + case 'imagepng': + header('Content-Type: image/png'); + break; + } + + $status = isset($quality) ? $save($this->tmp_image, NULL, $quality) : $save($this->tmp_image); + } + + // Destroy the temporary image + imagedestroy($this->tmp_image); + } + + return $status; + } + + public function flip($direction) + { + // Get the current width and height + $width = imagesx($this->tmp_image); + $height = imagesy($this->tmp_image); + + // Create the flipped image + $flipped = $this->imagecreatetransparent($width, $height); + + if ($direction === Image::HORIZONTAL) + { + for ($x = 0; $x < $width; $x++) + { + $status = imagecopy($flipped, $this->tmp_image, $x, 0, $width - $x - 1, 0, 1, $height); + } + } + elseif ($direction === Image::VERTICAL) + { + for ($y = 0; $y < $height; $y++) + { + $status = imagecopy($flipped, $this->tmp_image, 0, $y, 0, $height - $y - 1, $width, 1); + } + } + else + { + // Do nothing + return TRUE; + } + + if ($status === TRUE) + { + // Swap the new image for the old one + imagedestroy($this->tmp_image); + $this->tmp_image = $flipped; + } + + return $status; + } + + public function crop($properties) + { + // Sanitize the cropping settings + $this->sanitize_geometry($properties); + + // Get the current width and height + $width = imagesx($this->tmp_image); + $height = imagesy($this->tmp_image); + + // Create the temporary image to copy to + $img = $this->imagecreatetransparent($properties['width'], $properties['height']); + + // Execute the crop + if ($status = imagecopyresampled($img, $this->tmp_image, 0, 0, $properties['left'], $properties['top'], $width, $height, $width, $height)) + { + // Swap the new image for the old one + imagedestroy($this->tmp_image); + $this->tmp_image = $img; + } + + return $status; + } + + public function resize($properties) + { + // Get the current width and height + $width = imagesx($this->tmp_image); + $height = imagesy($this->tmp_image); + + if (substr($properties['width'], -1) === '%') + { + // Recalculate the percentage to a pixel size + $properties['width'] = round($width * (substr($properties['width'], 0, -1) / 100)); + } + + if (substr($properties['height'], -1) === '%') + { + // Recalculate the percentage to a pixel size + $properties['height'] = round($height * (substr($properties['height'], 0, -1) / 100)); + } + + // Recalculate the width and height, if they are missing + empty($properties['width']) and $properties['width'] = round($width * $properties['height'] / $height); + empty($properties['height']) and $properties['height'] = round($height * $properties['width'] / $width); + + if ($properties['master'] === Image::AUTO) + { + // Change an automatic master dim to the correct type + $properties['master'] = (($width / $properties['width']) > ($height / $properties['height'])) ? Image::WIDTH : Image::HEIGHT; + } + + if (empty($properties['height']) OR $properties['master'] === Image::WIDTH) + { + // Recalculate the height based on the width + $properties['height'] = round($height * $properties['width'] / $width); + } + + if (empty($properties['width']) OR $properties['master'] === Image::HEIGHT) + { + // Recalculate the width based on the height + $properties['width'] = round($width * $properties['height'] / $height); + } + + // Test if we can do a resize without resampling to speed up the final resize + if ($properties['width'] > $width / 2 AND $properties['height'] > $height / 2) + { + // Presize width and height + $pre_width = $width; + $pre_height = $height; + + // The maximum reduction is 10% greater than the final size + $max_reduction_width = round($properties['width'] * 1.1); + $max_reduction_height = round($properties['height'] * 1.1); + + // Reduce the size using an O(2n) algorithm, until it reaches the maximum reduction + while ($pre_width / 2 > $max_reduction_width AND $pre_height / 2 > $max_reduction_height) + { + $pre_width /= 2; + $pre_height /= 2; + } + + // Create the temporary image to copy to + $img = $this->imagecreatetransparent($pre_width, $pre_height); + + if ($status = imagecopyresized($img, $this->tmp_image, 0, 0, 0, 0, $pre_width, $pre_height, $width, $height)) + { + // Swap the new image for the old one + imagedestroy($this->tmp_image); + $this->tmp_image = $img; + } + + // Set the width and height to the presize + $width = $pre_width; + $height = $pre_height; + } + + // Create the temporary image to copy to + $img = $this->imagecreatetransparent($properties['width'], $properties['height']); + + // Execute the resize + if ($status = imagecopyresampled($img, $this->tmp_image, 0, 0, 0, 0, $properties['width'], $properties['height'], $width, $height)) + { + // Swap the new image for the old one + imagedestroy($this->tmp_image); + $this->tmp_image = $img; + } + + return $status; + } + + public function rotate($amount) + { + // Use current image to rotate + $img = $this->tmp_image; + + // White, with an alpha of 0 + $transparent = imagecolorallocatealpha($img, 255, 255, 255, 127); + + // Rotate, setting the transparent color + $img = imagerotate($img, 360 - $amount, $transparent, -1); + + // Fill the background with the transparent "color" + imagecolortransparent($img, $transparent); + + // Merge the images + if ($status = imagecopymerge($this->tmp_image, $img, 0, 0, 0, 0, imagesx($this->tmp_image), imagesy($this->tmp_image), 100)) + { + // Prevent the alpha from being lost + imagealphablending($img, TRUE); + imagesavealpha($img, TRUE); + + // Swap the new image for the old one + imagedestroy($this->tmp_image); + $this->tmp_image = $img; + } + + return $status; + } + + public function sharpen($amount) + { + // Make sure that the sharpening function is available + if ( ! function_exists('imageconvolution')) + throw new Kohana_Exception('image.unsupported_method', __FUNCTION__); + + // Amount should be in the range of 18-10 + $amount = round(abs(-18 + ($amount * 0.08)), 2); + + // Gaussian blur matrix + $matrix = array + ( + array(-1, -1, -1), + array(-1, $amount, -1), + array(-1, -1, -1), + ); + + // Perform the sharpen + return imageconvolution($this->tmp_image, $matrix, $amount - 8, 0); + } + + protected function properties() + { + return array(imagesx($this->tmp_image), imagesy($this->tmp_image)); + } + + /** + * Returns an image with a transparent background. Used for rotating to + * prevent unfilled backgrounds. + * + * @param integer image width + * @param integer image height + * @return resource + */ + protected function imagecreatetransparent($width, $height) + { + if (self::$blank_png === NULL) + { + // Decode the blank PNG if it has not been done already + self::$blank_png = imagecreatefromstring(base64_decode + ( + 'iVBORw0KGgoAAAANSUhEUgAAACgAAAAoCAYAAACM/rhtAAAABGdBTUEAAK/INwWK6QAAABl0RVh0U29'. + 'mdHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAADqSURBVHjaYvz//z/DYAYAAcTEMMgBQAANegcCBN'. + 'CgdyBAAA16BwIE0KB3IEAADXoHAgTQoHcgQAANegcCBNCgdyBAAA16BwIE0KB3IEAADXoHAgTQoHcgQ'. + 'AANegcCBNCgdyBAAA16BwIE0KB3IEAADXoHAgTQoHcgQAANegcCBNCgdyBAAA16BwIE0KB3IEAADXoH'. + 'AgTQoHcgQAANegcCBNCgdyBAAA16BwIE0KB3IEAADXoHAgTQoHcgQAANegcCBNCgdyBAAA16BwIE0KB'. + '3IEAADXoHAgTQoHcgQAANegcCBNCgdyBAgAEAMpcDTTQWJVEAAAAASUVORK5CYII=' + )); + + // Set the blank PNG width and height + self::$blank_png_width = imagesx(self::$blank_png); + self::$blank_png_height = imagesy(self::$blank_png); + } + + $img = imagecreatetruecolor($width, $height); + + // Resize the blank image + imagecopyresized($img, self::$blank_png, 0, 0, 0, 0, $width, $height, self::$blank_png_width, self::$blank_png_height); + + // Prevent the alpha from being lost + imagealphablending($img, FALSE); + imagesavealpha($img, TRUE); + + return $img; + } + +} // End Image GD Driver \ No newline at end of file diff --git a/Server/system/libraries/drivers/Image/GraphicsMagick.php b/Server/system/libraries/drivers/Image/GraphicsMagick.php new file mode 100644 index 0000000..8840eb8 --- /dev/null +++ b/Server/system/libraries/drivers/Image/GraphicsMagick.php @@ -0,0 +1,211 @@ +ext = (PHP_SHLIB_SUFFIX === 'dll') ? '.exe' : ''; + + // Check to make sure the provided path is correct + if ( ! is_file(realpath($config['directory']).'/gm'.$this->ext)) + throw new Kohana_Exception('image.graphicsmagick.not_found', 'gm'.$this->ext); + + + // Set the installation directory + $this->dir = str_replace('\\', '/', realpath($config['directory'])).'/'; + } + + /** + * Creates a temporary image and executes the given actions. By creating a + * temporary copy of the image before manipulating it, this process is atomic. + */ + public function process($image, $actions, $dir, $file, $render = FALSE) + { + // We only need the filename + $image = $image['file']; + + // Unique temporary filename + $this->tmp_image = $dir.'k2img--'.sha1(time().$dir.$file).substr($file, strrpos($file, '.')); + + // Copy the image to the temporary file + copy($image, $this->tmp_image); + + // Quality change is done last + $quality = (int) arr::remove('quality', $actions); + + // Use 95 for the default quality + empty($quality) and $quality = 95; + + // All calls to these will need to be escaped, so do it now + $this->cmd_image = escapeshellarg($this->tmp_image); + $this->new_image = ($render)? $this->cmd_image : escapeshellarg($dir.$file); + + if ($status = $this->execute($actions)) + { + // Use convert to change the image into its final version. This is + // done to allow the file type to change correctly, and to handle + // the quality conversion in the most effective way possible. + if ($error = exec(escapeshellcmd($this->dir.'gm'.$this->ext.' convert').' -quality '.$quality.'% '.$this->cmd_image.' '.$this->new_image)) + { + $this->errors[] = $error; + } + else + { + // Output the image directly to the browser + if ($render !== FALSE) + { + $contents = file_get_contents($this->tmp_image); + switch (substr($file, strrpos($file, '.') + 1)) + { + case 'jpg': + case 'jpeg': + header('Content-Type: image/jpeg'); + break; + case 'gif': + header('Content-Type: image/gif'); + break; + case 'png': + header('Content-Type: image/png'); + break; + } + echo $contents; + } + } + } + + // Remove the temporary image + unlink($this->tmp_image); + $this->tmp_image = ''; + + return $status; + } + + public function crop($prop) + { + // Sanitize and normalize the properties into geometry + $this->sanitize_geometry($prop); + + // Set the IM geometry based on the properties + $geometry = escapeshellarg($prop['width'].'x'.$prop['height'].'+'.$prop['left'].'+'.$prop['top']); + + if ($error = exec(escapeshellcmd($this->dir.'gm'.$this->ext.' convert').' -crop '.$geometry.' '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + public function flip($dir) + { + // Convert the direction into a GM command + $dir = ($dir === Image::HORIZONTAL) ? '-flop' : '-flip'; + + if ($error = exec(escapeshellcmd($this->dir.'gm'.$this->ext.' convert').' '.$dir.' '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + public function resize($prop) + { + switch ($prop['master']) + { + case Image::WIDTH: // Wx + $dim = escapeshellarg($prop['width'].'x'); + break; + case Image::HEIGHT: // xH + $dim = escapeshellarg('x'.$prop['height']); + break; + case Image::AUTO: // WxH + $dim = escapeshellarg($prop['width'].'x'.$prop['height']); + break; + case Image::NONE: // WxH! + $dim = escapeshellarg($prop['width'].'x'.$prop['height'].'!'); + break; + } + + // Use "convert" to change the width and height + if ($error = exec(escapeshellcmd($this->dir.'gm'.$this->ext.' convert').' -resize '.$dim.' '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + public function rotate($amt) + { + if ($error = exec(escapeshellcmd($this->dir.'gm'.$this->ext.' convert').' -rotate '.escapeshellarg($amt).' -background transparent '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + public function sharpen($amount) + { + // Set the sigma, radius, and amount. The amount formula allows a nice + // spread between 1 and 100 without pixelizing the image badly. + $sigma = 0.5; + $radius = $sigma * 2; + $amount = round(($amount / 80) * 3.14, 2); + + // Convert the amount to an GM command + $sharpen = escapeshellarg($radius.'x'.$sigma.'+'.$amount.'+0'); + + if ($error = exec(escapeshellcmd($this->dir.'gm'.$this->ext.' convert').' -unsharp '.$sharpen.' '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + protected function properties() + { + return array_slice(getimagesize($this->tmp_image), 0, 2, FALSE); + } + +} // End Image GraphicsMagick Driver \ No newline at end of file diff --git a/Server/system/libraries/drivers/Image/ImageMagick.php b/Server/system/libraries/drivers/Image/ImageMagick.php new file mode 100644 index 0000000..5a86663 --- /dev/null +++ b/Server/system/libraries/drivers/Image/ImageMagick.php @@ -0,0 +1,212 @@ +ext = (PHP_SHLIB_SUFFIX === 'dll') ? '.exe' : ''; + + // Check to make sure the provided path is correct + if ( ! is_file(realpath($config['directory']).'/convert'.$this->ext)) + throw new Kohana_Exception('image.imagemagick.not_found', 'convert'.$this->ext); + + // Set the installation directory + $this->dir = str_replace('\\', '/', realpath($config['directory'])).'/'; + } + + /** + * Creates a temporary image and executes the given actions. By creating a + * temporary copy of the image before manipulating it, this process is atomic. + */ + public function process($image, $actions, $dir, $file, $render = FALSE) + { + // We only need the filename + $image = $image['file']; + + // Unique temporary filename + $this->tmp_image = $dir.'k2img--'.sha1(time().$dir.$file).substr($file, strrpos($file, '.')); + + // Copy the image to the temporary file + copy($image, $this->tmp_image); + + // Quality change is done last + $quality = (int) arr::remove('quality', $actions); + + // Use 95 for the default quality + empty($quality) and $quality = 95; + + // All calls to these will need to be escaped, so do it now + $this->cmd_image = escapeshellarg($this->tmp_image); + $this->new_image = ($render)? $this->cmd_image : escapeshellarg($dir.$file); + + if ($status = $this->execute($actions)) + { + // Use convert to change the image into its final version. This is + // done to allow the file type to change correctly, and to handle + // the quality conversion in the most effective way possible. + if ($error = exec(escapeshellcmd($this->dir.'convert'.$this->ext).' -quality '.$quality.'% '.$this->cmd_image.' '.$this->new_image)) + { + $this->errors[] = $error; + } + else + { + // Output the image directly to the browser + if ($render !== FALSE) + { + $contents = file_get_contents($this->tmp_image); + switch (substr($file, strrpos($file, '.') + 1)) + { + case 'jpg': + case 'jpeg': + header('Content-Type: image/jpeg'); + break; + case 'gif': + header('Content-Type: image/gif'); + break; + case 'png': + header('Content-Type: image/png'); + break; + } + echo $contents; + } + } + } + + // Remove the temporary image + unlink($this->tmp_image); + $this->tmp_image = ''; + + return $status; + } + + public function crop($prop) + { + // Sanitize and normalize the properties into geometry + $this->sanitize_geometry($prop); + + // Set the IM geometry based on the properties + $geometry = escapeshellarg($prop['width'].'x'.$prop['height'].'+'.$prop['left'].'+'.$prop['top']); + + if ($error = exec(escapeshellcmd($this->dir.'convert'.$this->ext).' -crop '.$geometry.' '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + public function flip($dir) + { + // Convert the direction into a IM command + $dir = ($dir === Image::HORIZONTAL) ? '-flop' : '-flip'; + + if ($error = exec(escapeshellcmd($this->dir.'convert'.$this->ext).' '.$dir.' '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + public function resize($prop) + { + switch ($prop['master']) + { + case Image::WIDTH: // Wx + $dim = escapeshellarg($prop['width'].'x'); + break; + case Image::HEIGHT: // xH + $dim = escapeshellarg('x'.$prop['height']); + break; + case Image::AUTO: // WxH + $dim = escapeshellarg($prop['width'].'x'.$prop['height']); + break; + case Image::NONE: // WxH! + $dim = escapeshellarg($prop['width'].'x'.$prop['height'].'!'); + break; + } + + // Use "convert" to change the width and height + if ($error = exec(escapeshellcmd($this->dir.'convert'.$this->ext).' -resize '.$dim.' '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + public function rotate($amt) + { + if ($error = exec(escapeshellcmd($this->dir.'convert'.$this->ext).' -rotate '.escapeshellarg($amt).' -background transparent '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + public function sharpen($amount) + { + // Set the sigma, radius, and amount. The amount formula allows a nice + // spread between 1 and 100 without pixelizing the image badly. + $sigma = 0.5; + $radius = $sigma * 2; + $amount = round(($amount / 80) * 3.14, 2); + + // Convert the amount to an IM command + $sharpen = escapeshellarg($radius.'x'.$sigma.'+'.$amount.'+0'); + + if ($error = exec(escapeshellcmd($this->dir.'convert'.$this->ext).' -unsharp '.$sharpen.' '.$this->cmd_image.' '.$this->cmd_image)) + { + $this->errors[] = $error; + return FALSE; + } + + return TRUE; + } + + protected function properties() + { + return array_slice(getimagesize($this->tmp_image), 0, 2, FALSE); + } + +} // End Image ImageMagick Driver \ No newline at end of file diff --git a/Server/system/libraries/drivers/Session.php b/Server/system/libraries/drivers/Session.php new file mode 100644 index 0000000..fb58c8d --- /dev/null +++ b/Server/system/libraries/drivers/Session.php @@ -0,0 +1,70 @@ + 'apc', + * 'requests' => 10000 + * ); + * Lifetime does not need to be set as it is + * overridden by the session expiration setting. + * + * $Id: Cache.php 3769 2008-12-15 00:48:56Z zombor $ + * + * @package Core + * @author Kohana Team + * @copyright (c) 2007-2008 Kohana Team + * @license http://kohanaphp.com/license.html + */ +class Session_Cache_Driver implements Session_Driver { + + protected $cache; + protected $encrypt; + + public function __construct() + { + // Load Encrypt library + if (Kohana::config('session.encryption')) + { + $this->encrypt = new Encrypt; + } + + Kohana::log('debug', 'Session Cache Driver Initialized'); + } + + public function open($path, $name) + { + $config = Kohana::config('session.storage'); + + if (empty($config)) + { + // Load the default group + $config = Kohana::config('cache.default'); + } + elseif (is_string($config)) + { + $name = $config; + + // Test the config group name + if (($config = Kohana::config('cache.'.$config)) === NULL) + throw new Kohana_Exception('cache.undefined_group', $name); + } + + $config['lifetime'] = (Kohana::config('session.expiration') == 0) ? 86400 : Kohana::config('session.expiration'); + $this->cache = new Cache($config); + + return is_object($this->cache); + } + + public function close() + { + return TRUE; + } + + public function read($id) + { + $id = 'session_'.$id; + if ($data = $this->cache->get($id)) + { + return Kohana::config('session.encryption') ? $this->encrypt->decode($data) : $data; + } + + // Return value must be string, NOT a boolean + return ''; + } + + public function write($id, $data) + { + $id = 'session_'.$id; + $data = Kohana::config('session.encryption') ? $this->encrypt->encode($data) : $data; + + return $this->cache->set($id, $data); + } + + public function destroy($id) + { + $id = 'session_'.$id; + return $this->cache->delete($id); + } + + public function regenerate() + { + session_regenerate_id(TRUE); + + // Return new session id + return session_id(); + } + + public function gc($maxlifetime) + { + // Just return, caches are automatically cleaned up + return TRUE; + } + +} // End Session Cache Driver diff --git a/Server/system/libraries/drivers/Session/Cookie.php b/Server/system/libraries/drivers/Session/Cookie.php new file mode 100644 index 0000000..7b79106 --- /dev/null +++ b/Server/system/libraries/drivers/Session/Cookie.php @@ -0,0 +1,80 @@ +cookie_name = Kohana::config('session.name').'_data'; + + if (Kohana::config('session.encryption')) + { + $this->encrypt = Encrypt::instance(); + } + + Kohana::log('debug', 'Session Cookie Driver Initialized'); + } + + public function open($path, $name) + { + return TRUE; + } + + public function close() + { + return TRUE; + } + + public function read($id) + { + $data = (string) cookie::get($this->cookie_name); + + if ($data == '') + return $data; + + return empty($this->encrypt) ? base64_decode($data) : $this->encrypt->decode($data); + } + + public function write($id, $data) + { + $data = empty($this->encrypt) ? base64_encode($data) : $this->encrypt->encode($data); + + if (strlen($data) > 4048) + { + Kohana::log('error', 'Session ('.$id.') data exceeds the 4KB limit, ignoring write.'); + return FALSE; + } + + return cookie::set($this->cookie_name, $data, Kohana::config('session.expiration')); + } + + public function destroy($id) + { + return cookie::delete($this->cookie_name); + } + + public function regenerate() + { + session_regenerate_id(TRUE); + + // Return new id + return session_id(); + } + + public function gc($maxlifetime) + { + return TRUE; + } + +} // End Session Cookie Driver Class \ No newline at end of file diff --git a/Server/system/libraries/drivers/Session/Database.php b/Server/system/libraries/drivers/Session/Database.php new file mode 100644 index 0000000..b4144ff --- /dev/null +++ b/Server/system/libraries/drivers/Session/Database.php @@ -0,0 +1,163 @@ +encrypt = Encrypt::instance(); + } + + if (is_array($config['storage'])) + { + if ( ! empty($config['storage']['group'])) + { + // Set the group name + $this->db = $config['storage']['group']; + } + + if ( ! empty($config['storage']['table'])) + { + // Set the table name + $this->table = $config['storage']['table']; + } + } + + // Load database + $this->db = Database::instance($this->db); + + Kohana::log('debug', 'Session Database Driver Initialized'); + } + + public function open($path, $name) + { + return TRUE; + } + + public function close() + { + return TRUE; + } + + public function read($id) + { + // Load the session + $query = $this->db->from($this->table)->where('session_id', $id)->limit(1)->get()->result(TRUE); + + if ($query->count() === 0) + { + // No current session + $this->session_id = NULL; + + return ''; + } + + // Set the current session id + $this->session_id = $id; + + // Load the data + $data = $query->current()->data; + + return ($this->encrypt === NULL) ? base64_decode($data) : $this->encrypt->decode($data); + } + + public function write($id, $data) + { + $data = array + ( + 'session_id' => $id, + 'last_activity' => time(), + 'data' => ($this->encrypt === NULL) ? base64_encode($data) : $this->encrypt->encode($data) + ); + + if ($this->session_id === NULL) + { + // Insert a new session + $query = $this->db->insert($this->table, $data); + } + elseif ($id === $this->session_id) + { + // Do not update the session_id + unset($data['session_id']); + + // Update the existing session + $query = $this->db->update($this->table, $data, array('session_id' => $id)); + } + else + { + // Update the session and id + $query = $this->db->update($this->table, $data, array('session_id' => $this->session_id)); + + // Set the new session id + $this->session_id = $id; + } + + return (bool) $query->count(); + } + + public function destroy($id) + { + // Delete the requested session + $this->db->delete($this->table, array('session_id' => $id)); + + // Session id is no longer valid + $this->session_id = NULL; + + return TRUE; + } + + public function regenerate() + { + // Generate a new session id + session_regenerate_id(); + + // Return new session id + return session_id(); + } + + public function gc($maxlifetime) + { + // Delete all expired sessions + $query = $this->db->delete($this->table, array('last_activity <' => time() - $maxlifetime)); + + Kohana::log('debug', 'Session garbage collected: '.$query->count().' row(s) deleted.'); + + return TRUE; + } + +} // End Session Database Driver diff --git a/Server/system/views/kohana/template.php b/Server/system/views/kohana/template.php new file mode 100644 index 0000000..b090fd8 --- /dev/null +++ b/Server/system/views/kohana/template.php @@ -0,0 +1,36 @@ + + + + + + + + <?php echo html::specialchars($title) ?> + + + + + + +

    + + +

    + Rendered in {execution_time} seconds, using {memory_usage} of memory
    + Copyright ©2007–2008 Kohana Team +

    + + + \ No newline at end of file diff --git a/Server/system/views/kohana_calendar.php b/Server/system/views/kohana_calendar.php new file mode 100644 index 0000000..39545e2 --- /dev/null +++ b/Server/system/views/kohana_calendar.php @@ -0,0 +1,52 @@ + date('n', $prev), 'year' => date('Y', $prev)))); +$next = Router::$current_uri.'?'.http_build_query(array_merge($qs, array('month' => date('n', $next), 'year' => date('Y', $next)))); + +?> + + + + + + + + + + + + + +
  • '.implode('
  • ', $data['output']).'
    • '; +} +else +{ + $classes = array(); + $output = ''; +} + +?> + + + + +
    diff --git a/Server/system/views/kohana_error_disabled.php b/Server/system/views/kohana_error_disabled.php new file mode 100644 index 0000000..cd91132 --- /dev/null +++ b/Server/system/views/kohana_error_disabled.php @@ -0,0 +1,17 @@ + + + + + + +<?php echo $error ?> + + +
    +

    +

    +
    + + \ No newline at end of file diff --git a/Server/system/views/kohana_error_page.php b/Server/system/views/kohana_error_page.php new file mode 100644 index 0000000..944064c --- /dev/null +++ b/Server/system/views/kohana_error_page.php @@ -0,0 +1,27 @@ + + + + + + +<?php echo $error ?> + + + +
    +

    +

    + +

    + +

    + +

    + + +

    +
    + + \ No newline at end of file diff --git a/Server/system/views/kohana_errors.css b/Server/system/views/kohana_errors.css new file mode 100644 index 0000000..1341f57 --- /dev/null +++ b/Server/system/views/kohana_errors.css @@ -0,0 +1,21 @@ +div#framework_error { background:#fff; border:solid 1px #ccc; font-family:sans-serif; color:#111; font-size:14px; line-height:130%; } +div#framework_error h3 { color:#fff; font-size:16px; padding:8px 6px; margin:0 0 8px; background:#f15a00; text-align:center; } +div#framework_error a { color:#228; text-decoration:none; } +div#framework_error a:hover { text-decoration:underline; } +div#framework_error strong { color:#900; } +div#framework_error p { margin:0; padding:4px 6px 10px; } +div#framework_error tt, +div#framework_error pre, +div#framework_error code { font-family:monospace; padding:2px 4px; font-size:12px; color:#333; + white-space:pre-wrap; /* CSS 2.1 */ + white-space:-moz-pre-wrap; /* For Mozilla */ + word-wrap:break-word; /* For IE5.5+ */ +} +div#framework_error tt { font-style:italic; } +div#framework_error tt:before { content:">"; color:#aaa; } +div#framework_error code tt:before { content:""; } +div#framework_error pre, +div#framework_error code { background:#eaeee5; border:solid 0 #D6D8D1; border-width:0 1px 1px 0; } +div#framework_error .block { display:block; text-align:left; } +div#framework_error .stats { padding:4px; background: #eee; border-top:solid 1px #ccc; text-align:center; font-size:10px; color:#888; } +div#framework_error .backtrace { margin:0; padding:0 6px; list-style:none; line-height:12px; } \ No newline at end of file diff --git a/Server/system/views/kohana_profiler.php b/Server/system/views/kohana_profiler.php new file mode 100644 index 0000000..da77a66 --- /dev/null +++ b/Server/system/views/kohana_profiler.php @@ -0,0 +1,37 @@ + + +
    +render(); +} +?> +

    Profiler executed in s

    +
    \ No newline at end of file diff --git a/Server/system/views/kohana_profiler_table.css b/Server/system/views/kohana_profiler_table.css new file mode 100644 index 0000000..41a1c9a --- /dev/null +++ b/Server/system/views/kohana_profiler_table.css @@ -0,0 +1,53 @@ +#kohana-profiler .kp-table +{ + font-size: 1.0em; + color: #4D6171; + width: 100%; + border-collapse: collapse; + border-top: 1px solid #E5EFF8; + border-right: 1px solid #E5EFF8; + border-left: 1px solid #E5EFF8; + margin-bottom: 10px; +} +#kohana-profiler .kp-table td +{ + background-color: #FFFFFF; + border-bottom: 1px solid #E5EFF8; + padding: 3px; + vertical-align: top; +} +#kohana-profiler .kp-table .kp-title td +{ + font-weight: bold; + background-color: inherit; +} +#kohana-profiler .kp-table .kp-altrow td +{ + background-color: #F7FBFF; +} +#kohana-profiler .kp-table .kp-totalrow td +{ + background-color: #FAFAFA; + border-top: 1px solid #D2DCE5; + font-weight: bold; +} +#kohana-profiler .kp-table .kp-column +{ + width: 100px; + border-left: 1px solid #E5EFF8; + text-align: center; +} +#kohana-profiler .kp-table .kp-data, #kohana-profiler .kp-table .kp-name +{ + background-color: #FAFAFB; + vertical-align: top; +} +#kohana-profiler .kp-table .kp-name +{ + width: 200px; + border-right: 1px solid #E5EFF8; +} +#kohana-profiler .kp-table .kp-altrow .kp-data, #kohana-profiler .kp-table .kp-altrow .kp-name +{ + background-color: #F6F8FB; +} \ No newline at end of file diff --git a/Server/system/views/kohana_profiler_table.php b/Server/system/views/kohana_profiler_table.php new file mode 100644 index 0000000..b6b4653 --- /dev/null +++ b/Server/system/views/kohana_profiler_table.php @@ -0,0 +1,25 @@ + + + + > + $column) + { + $class = empty($column['class']) ? '' : ' class="'.$column['class'].'"'; + $style = empty($column['style']) ? '' : ' style="'.$column['style'].'"'; + $value = $row['data'][$index]; + $value = (is_array($value) OR is_object($value)) ? '
    '.html::specialchars(print_r($value, TRUE)).'
    ' : html::specialchars($value); + echo '', $value, ''; + } + ?> + + +
    \ No newline at end of file diff --git a/Server/system/views/pagination/classic.php b/Server/system/views/pagination/classic.php new file mode 100644 index 0000000..5272c2c --- /dev/null +++ b/Server/system/views/pagination/classic.php @@ -0,0 +1,39 @@ + Last › + */ +?> + +

    + + + ‹  + + + + < + + + + + + + + + + + + + + + + > + + + +  › + + +

    \ No newline at end of file diff --git a/Server/system/views/pagination/digg.php b/Server/system/views/pagination/digg.php new file mode 100644 index 0000000..0e065a6 --- /dev/null +++ b/Server/system/views/pagination/digg.php @@ -0,0 +1,83 @@ + + +

    + + + «  + + «  + + + + + + + + + + + + + + + + + + + + + + + + … + + + + $total_pages - 8): /* « Previous 1 2 … 17 18 19 20 21 22 23 24 25 26 Next » */ ?> + + 1 + 2 + … + + + + + + + + + + + + 1 + 2 + … + + + + + + + + + + … + + + + + + + +  » + +  » + + +

    \ No newline at end of file diff --git a/Server/system/views/pagination/extended.php b/Server/system/views/pagination/extended.php new file mode 100644 index 0000000..2427a4e --- /dev/null +++ b/Server/system/views/pagination/extended.php @@ -0,0 +1,27 @@ + + +

    + + + «  + + «  + + + | + + | – + + | +  » + +  » + + +

    \ No newline at end of file diff --git a/Server/system/views/pagination/punbb.php b/Server/system/views/pagination/punbb.php new file mode 100644 index 0000000..6599831 --- /dev/null +++ b/Server/system/views/pagination/punbb.php @@ -0,0 +1,37 @@ + + +

    + + : + + 3): ?> + 1 + + + + + + + $total_pages) continue ?> + + + + + + + + + + + + + + + +

    \ No newline at end of file -- 1.7.9.5