From 1589ec3dda68376036e9de93f940509acea5d59a Mon Sep 17 00:00:00 2001 From: paul Date: Thu, 23 Nov 2006 21:02:26 +0000 Subject: [PATCH] Updated PEAR libraries to latest stable versions, changed the format in the repo so they are already extracted and dont need to be installed, only copied. Part of #2020. --- campcaster/src/tools/pear/etc/Makefile.in | 10 +- campcaster/src/tools/pear/src/Archive/Tar.php | 1762 ++++++++++++++ .../src/tools/pear/src/Archive_Tar-1.3.1.tgz | Bin 15102 -> 0 bytes .../src/tools/pear/src/Calendar-0.5.2.tgz | Bin 60164 -> 0 bytes .../src/tools/pear/src/Calendar/Calendar.php | 685 ++++++ .../src/tools/pear/src/Calendar/Day.php | 197 ++ .../src/tools/pear/src/Calendar/Decorator.php | 558 +++++ .../pear/src/Calendar/Decorator/Textual.php | 169 ++ .../tools/pear/src/Calendar/Decorator/Uri.php | 151 ++ .../pear/src/Calendar/Decorator/Weekday.php | 148 ++ .../pear/src/Calendar/Decorator/Wrapper.php | 90 + .../pear/src/Calendar/Engine/Interface.php | 293 +++ .../pear/src/Calendar/Engine/PearDate.php | 407 ++++ .../tools/pear/src/Calendar/Engine/UnixTS.php | 365 +++ .../src/tools/pear/src/Calendar/Factory.php | 145 ++ .../src/tools/pear/src/Calendar/Hour.php | 113 + .../src/tools/pear/src/Calendar/Minute.php | 114 + .../src/tools/pear/src/Calendar/Month.php | 114 + .../pear/src/Calendar/Month/Weekdays.php | 189 ++ .../tools/pear/src/Calendar/Month/Weeks.php | 139 ++ .../src/tools/pear/src/Calendar/Second.php | 98 + .../tools/pear/src/Calendar/Table/Helper.php | 280 +++ .../tools/pear/src/Calendar/Util/Textual.php | 239 ++ .../src/tools/pear/src/Calendar/Util/Uri.php | 169 ++ .../src/tools/pear/src/Calendar/Validator.php | 335 +++ .../src/tools/pear/src/Calendar/Week.php | 394 +++ .../src/tools/pear/src/Calendar/Year.php | 113 + .../src/tools/pear/src/Calendar/docs/Readme | 3 + .../pear/src/Calendar/docs/examples/1.php | 92 + .../pear/src/Calendar/docs/examples/1.phps | 92 + .../pear/src/Calendar/docs/examples/10.php | 93 + .../pear/src/Calendar/docs/examples/10.phps | 93 + .../pear/src/Calendar/docs/examples/11.php | 109 + .../pear/src/Calendar/docs/examples/11.phps | 109 + .../pear/src/Calendar/docs/examples/12.php | 116 + .../pear/src/Calendar/docs/examples/12.phps | 116 + .../pear/src/Calendar/docs/examples/13.php | 99 + .../pear/src/Calendar/docs/examples/13.phps | 99 + .../pear/src/Calendar/docs/examples/14.php | 141 ++ .../pear/src/Calendar/docs/examples/14.phps | 141 ++ .../pear/src/Calendar/docs/examples/15.php | 58 + .../pear/src/Calendar/docs/examples/15.phps | 58 + .../pear/src/Calendar/docs/examples/16.php | 31 + .../pear/src/Calendar/docs/examples/16.phps | 31 + .../pear/src/Calendar/docs/examples/17.php | 71 + .../pear/src/Calendar/docs/examples/17.phps | 71 + .../pear/src/Calendar/docs/examples/18.php | 36 + .../pear/src/Calendar/docs/examples/18.phps | 36 + .../pear/src/Calendar/docs/examples/19.php | 24 + .../pear/src/Calendar/docs/examples/19.phps | 24 + .../pear/src/Calendar/docs/examples/2.php | 142 ++ .../pear/src/Calendar/docs/examples/2.phps | 142 ++ .../pear/src/Calendar/docs/examples/20.php | 240 ++ .../pear/src/Calendar/docs/examples/20.phps | 240 ++ .../pear/src/Calendar/docs/examples/21.php | 139 ++ .../pear/src/Calendar/docs/examples/21.phps | 139 ++ .../pear/src/Calendar/docs/examples/22.php | 46 + .../pear/src/Calendar/docs/examples/22.phps | 46 + .../pear/src/Calendar/docs/examples/23.php | 66 + .../pear/src/Calendar/docs/examples/23.phps | 66 + .../pear/src/Calendar/docs/examples/3.php | 134 + .../pear/src/Calendar/docs/examples/3.phps | 134 + .../pear/src/Calendar/docs/examples/4.php | 49 + .../pear/src/Calendar/docs/examples/4.phps | 49 + .../pear/src/Calendar/docs/examples/5.php | 132 + .../pear/src/Calendar/docs/examples/5.phps | 132 + .../pear/src/Calendar/docs/examples/6.php | 210 ++ .../pear/src/Calendar/docs/examples/6.phps | 210 ++ .../pear/src/Calendar/docs/examples/7.php | 92 + .../pear/src/Calendar/docs/examples/7.phps | 92 + .../pear/src/Calendar/docs/examples/8.php | 70 + .../pear/src/Calendar/docs/examples/8.phps | 70 + .../pear/src/Calendar/docs/examples/9.php | 16 + .../pear/src/Calendar/docs/examples/9.phps | 16 + .../src/Calendar/docs/examples/index.html | 50 + .../src/tools/pear/src/Calendar/tests/README | 7 + .../pear/src/Calendar/tests/all_tests.php | 34 + .../Calendar/tests/calendar_engine_tests.php | 20 + .../src/Calendar/tests/calendar_include.php | 28 + .../Calendar/tests/calendar_tabular_tests.php | 22 + .../pear/src/Calendar/tests/calendar_test.php | 115 + .../src/Calendar/tests/calendar_tests.php | 25 + .../pear/src/Calendar/tests/day_test.php | 107 + .../src/Calendar/tests/decorator_test.php | 268 ++ .../src/Calendar/tests/decorator_tests.php | 21 + .../Calendar/tests/decorator_textual_test.php | 174 ++ .../src/Calendar/tests/decorator_uri_test.php | 37 + .../pear/src/Calendar/tests/helper_test.php | 83 + .../pear/src/Calendar/tests/hour_test.php | 98 + .../pear/src/Calendar/tests/minute_test.php | 99 + .../pear/src/Calendar/tests/month_test.php | 119 + .../Calendar/tests/month_weekdays_test.php | 130 + .../src/Calendar/tests/month_weeks_test.php | 125 + .../Calendar/tests/peardate_engine_test.php | 124 + .../pear/src/Calendar/tests/second_test.php | 34 + .../src/Calendar/tests/simple_include.php | 10 + .../src/Calendar/tests/table_helper_tests.php | 19 + .../src/Calendar/tests/unixts_engine_test.php | 104 + .../pear/src/Calendar/tests/util_tests.php | 20 + .../src/Calendar/tests/util_textual_test.php | 191 ++ .../pear/src/Calendar/tests/util_uri_test.php | 54 + .../Calendar/tests/validator_error_test.php | 34 + .../src/Calendar/tests/validator_tests.php | 20 + .../Calendar/tests/validator_unit_test.php | 210 ++ .../Calendar/tests/week_firstday_0_test.php | 241 ++ .../pear/src/Calendar/tests/week_test.php | 241 ++ .../pear/src/Calendar/tests/year_test.php | 142 ++ .../src/tools/pear/src/Console/Getopt.php | 251 ++ .../src/tools/pear/src/Console_Getopt-1.2.tgz | Bin 3370 -> 0 bytes campcaster/src/tools/pear/src/DB-1.7.6.tgz | Bin 124807 -> 0 bytes campcaster/src/tools/pear/src/DB.php | 1388 +++++++++++ campcaster/src/tools/pear/src/DB/common.php | 2157 ++++++++++++++++ campcaster/src/tools/pear/src/DB/dbase.php | 510 ++++ campcaster/src/tools/pear/src/DB/fbsql.php | 770 ++++++ campcaster/src/tools/pear/src/DB/ibase.php | 1071 ++++++++ campcaster/src/tools/pear/src/DB/ifx.php | 681 ++++++ campcaster/src/tools/pear/src/DB/msql.php | 810 ++++++ campcaster/src/tools/pear/src/DB/mssql.php | 914 +++++++ campcaster/src/tools/pear/src/DB/mysql.php | 1034 ++++++++ campcaster/src/tools/pear/src/DB/mysqli.php | 1076 ++++++++ campcaster/src/tools/pear/src/DB/oci8.php | 1117 +++++++++ campcaster/src/tools/pear/src/DB/odbc.php | 883 +++++++ campcaster/src/tools/pear/src/DB/pgsql.php | 1097 +++++++++ campcaster/src/tools/pear/src/DB/sqlite.php | 942 +++++++ campcaster/src/tools/pear/src/DB/storage.php | 504 ++++ campcaster/src/tools/pear/src/DB/sybase.php | 907 +++++++ campcaster/src/tools/pear/src/File-1.2.0.tgz | Bin 15450 -> 0 bytes campcaster/src/tools/pear/src/File.php | 534 ++++ campcaster/src/tools/pear/src/File/CSV.php | 514 ++++ campcaster/src/tools/pear/src/File/Find.php | 484 ++++ campcaster/src/tools/pear/src/File/Util.php | 457 ++++ .../src/tools/pear/src/File_Find-1.2.1.tgz | Bin 6809 -> 0 bytes campcaster/src/tools/pear/src/HTML/Common.php | 470 ++++ .../src/tools/pear/src/HTML/QuickForm.php | 2007 +++++++++++++++ .../pear/src/HTML/QuickForm/Renderer.php | 150 ++ .../src/HTML/QuickForm/Renderer/Array.php | 319 +++ .../HTML/QuickForm/Renderer/ArraySmarty.php | 381 +++ .../src/HTML/QuickForm/Renderer/Default.php | 474 ++++ .../src/HTML/QuickForm/Renderer/ITDynamic.php | 287 +++ .../src/HTML/QuickForm/Renderer/ITStatic.php | 490 ++++ .../src/HTML/QuickForm/Renderer/Object.php | 432 ++++ .../HTML/QuickForm/Renderer/ObjectFlexy.php | 264 ++ .../src/HTML/QuickForm/Renderer/QuickHtml.php | 203 ++ .../tools/pear/src/HTML/QuickForm/Rule.php | 67 + .../pear/src/HTML/QuickForm/Rule/Callback.php | 113 + .../pear/src/HTML/QuickForm/Rule/Compare.php | 95 + .../pear/src/HTML/QuickForm/Rule/Email.php | 61 + .../pear/src/HTML/QuickForm/Rule/Range.php | 64 + .../pear/src/HTML/QuickForm/Rule/Regex.php | 89 + .../pear/src/HTML/QuickForm/Rule/Required.php | 52 + .../pear/src/HTML/QuickForm/RuleRegistry.php | 336 +++ .../pear/src/HTML/QuickForm/advcheckbox.php | 277 +++ .../pear/src/HTML/QuickForm/autocomplete.php | 249 ++ .../tools/pear/src/HTML/QuickForm/button.php | 73 + .../pear/src/HTML/QuickForm/checkbox.php | 268 ++ .../tools/pear/src/HTML/QuickForm/date.php | 496 ++++ .../tools/pear/src/HTML/QuickForm/element.php | 485 ++++ .../tools/pear/src/HTML/QuickForm/file.php | 349 +++ .../tools/pear/src/HTML/QuickForm/group.php | 579 +++++ .../tools/pear/src/HTML/QuickForm/header.php | 65 + .../tools/pear/src/HTML/QuickForm/hidden.php | 87 + .../pear/src/HTML/QuickForm/hiddenselect.php | 111 + .../pear/src/HTML/QuickForm/hierselect.php | 578 +++++ .../tools/pear/src/HTML/QuickForm/html.php | 67 + .../tools/pear/src/HTML/QuickForm/image.php | 119 + .../tools/pear/src/HTML/QuickForm/input.php | 202 ++ .../tools/pear/src/HTML/QuickForm/link.php | 192 ++ .../pear/src/HTML/QuickForm/password.php | 108 + .../tools/pear/src/HTML/QuickForm/radio.php | 244 ++ .../tools/pear/src/HTML/QuickForm/reset.php | 72 + .../tools/pear/src/HTML/QuickForm/select.php | 604 +++++ .../tools/pear/src/HTML/QuickForm/static.php | 193 ++ .../tools/pear/src/HTML/QuickForm/submit.php | 82 + .../tools/pear/src/HTML/QuickForm/text.php | 91 + .../pear/src/HTML/QuickForm/textarea.php | 222 ++ .../tools/pear/src/HTML/QuickForm/xbutton.php | 145 ++ .../src/tools/pear/src/HTML_Common-1.2.1.tgz | Bin 3637 -> 0 bytes .../pear/src/HTML_QuickForm-3.2.4pl1.tgz | Bin 93144 -> 0 bytes .../tools/pear/src/HTML_QuickForm-3.2.5.tgz | Bin 97612 -> 0 bytes campcaster/src/tools/pear/src/OS/Guess.php | 345 +++ campcaster/src/tools/pear/src/PEAR-1.3.5.tgz | Bin 108423 -> 0 bytes campcaster/src/tools/pear/src/PEAR.php | 1101 +++++++++ .../src/tools/pear/src/PEAR/Autoloader.php | 223 ++ .../src/tools/pear/src/PEAR/Builder.php | 455 ++++ .../src/tools/pear/src/PEAR/ChannelFile.php | 1615 ++++++++++++ .../pear/src/PEAR/ChannelFile/Parser.php | 73 + .../src/tools/pear/src/PEAR/Command.php | 412 ++++ .../src/tools/pear/src/PEAR/Command/Auth.php | 186 ++ .../src/tools/pear/src/PEAR/Command/Auth.xml | 25 + .../src/tools/pear/src/PEAR/Command/Build.php | 104 + .../src/tools/pear/src/PEAR/Command/Build.xml | 10 + .../tools/pear/src/PEAR/Command/Channels.php | 780 ++++++ .../tools/pear/src/PEAR/Command/Channels.xml | 93 + .../tools/pear/src/PEAR/Command/Common.php | 279 +++ .../tools/pear/src/PEAR/Command/Config.php | 418 ++++ .../tools/pear/src/PEAR/Command/Config.xml | 92 + .../tools/pear/src/PEAR/Command/Install.php | 773 ++++++ .../tools/pear/src/PEAR/Command/Install.xml | 254 ++ .../tools/pear/src/PEAR/Command/Mirror.php | 153 ++ .../tools/pear/src/PEAR/Command/Mirror.xml | 18 + .../tools/pear/src/PEAR/Command/Package.php | 1164 +++++++++ .../tools/pear/src/PEAR/Command/Package.xml | 194 ++ .../tools/pear/src/PEAR/Command/Pickle.php | 376 +++ .../tools/pear/src/PEAR/Command/Pickle.xml | 40 + .../tools/pear/src/PEAR/Command/Registry.php | 997 ++++++++ .../tools/pear/src/PEAR/Command/Registry.xml | 54 + .../tools/pear/src/PEAR/Command/Remote.php | 670 +++++ .../tools/pear/src/PEAR/Command/Remote.xml | 92 + .../src/tools/pear/src/PEAR/Command/Test.php | 275 +++ .../src/tools/pear/src/PEAR/Command/Test.xml | 40 + campcaster/src/tools/pear/src/PEAR/Common.php | 1129 +++++++++ campcaster/src/tools/pear/src/PEAR/Config.php | 2098 ++++++++++++++++ .../src/tools/pear/src/PEAR/Dependency.php | 495 ++++ .../src/tools/pear/src/PEAR/Dependency2.php | 1202 +++++++++ .../src/tools/pear/src/PEAR/DependencyDB.php | 675 +++++ .../src/tools/pear/src/PEAR/Downloader.php | 1547 ++++++++++++ .../pear/src/PEAR/Downloader/Package.php | 1723 +++++++++++++ .../src/tools/pear/src/PEAR/ErrorStack.php | 970 ++++++++ .../src/tools/pear/src/PEAR/Exception.php | 376 +++ .../src/tools/pear/src/PEAR/Frontend.php | 186 ++ .../src/tools/pear/src/PEAR/Frontend/CLI.php | 742 ++++++ .../src/tools/pear/src/PEAR/Installer.php | 1592 ++++++++++++ .../tools/pear/src/PEAR/Installer/Role.php | 248 ++ .../pear/src/PEAR/Installer/Role/Common.php | 180 ++ .../pear/src/PEAR/Installer/Role/Data.php | 34 + .../pear/src/PEAR/Installer/Role/Data.xml | 13 + .../pear/src/PEAR/Installer/Role/Doc.php | 34 + .../pear/src/PEAR/Installer/Role/Doc.xml | 13 + .../pear/src/PEAR/Installer/Role/Ext.php | 34 + .../pear/src/PEAR/Installer/Role/Ext.xml | 11 + .../pear/src/PEAR/Installer/Role/Php.php | 34 + .../pear/src/PEAR/Installer/Role/Php.xml | 13 + .../pear/src/PEAR/Installer/Role/Script.php | 34 + .../pear/src/PEAR/Installer/Role/Script.xml | 13 + .../pear/src/PEAR/Installer/Role/Src.php | 40 + .../pear/src/PEAR/Installer/Role/Src.xml | 11 + .../pear/src/PEAR/Installer/Role/Test.php | 34 + .../pear/src/PEAR/Installer/Role/Test.xml | 13 + .../src/tools/pear/src/PEAR/PackageFile.php | 441 ++++ .../src/PEAR/PackageFile/Generator/v1.php | 1269 ++++++++++ .../src/PEAR/PackageFile/Generator/v2.php | 1533 ++++++++++++ .../pear/src/PEAR/PackageFile/Parser/v1.php | 461 ++++ .../pear/src/PEAR/PackageFile/Parser/v2.php | 115 + .../tools/pear/src/PEAR/PackageFile/v1.php | 1600 ++++++++++++ .../tools/pear/src/PEAR/PackageFile/v2.php | 2008 +++++++++++++++ .../src/PEAR/PackageFile/v2/Validator.php | 1999 +++++++++++++++ .../tools/pear/src/PEAR/PackageFile/v2/rw.php | 1557 ++++++++++++ .../src/tools/pear/src/PEAR/Packager.php | 202 ++ campcaster/src/tools/pear/src/PEAR/REST.php | 397 +++ .../src/tools/pear/src/PEAR/REST/10.php | 624 +++++ .../src/tools/pear/src/PEAR/REST/11.php | 209 ++ .../src/tools/pear/src/PEAR/Registry.php | 2161 +++++++++++++++++ campcaster/src/tools/pear/src/PEAR/Remote.php | 519 ++++ .../src/tools/pear/src/PEAR/RunTest.php | 409 ++++ .../src/tools/pear/src/PEAR/Task/Common.php | 208 ++ .../pear/src/PEAR/Task/Postinstallscript.php | 329 +++ .../src/PEAR/Task/Postinstallscript/rw.php | 176 ++ .../src/tools/pear/src/PEAR/Task/Replace.php | 182 ++ .../tools/pear/src/PEAR/Task/Replace/rw.php | 67 + .../src/tools/pear/src/PEAR/Task/Unixeol.php | 83 + .../tools/pear/src/PEAR/Task/Unixeol/rw.php | 62 + .../tools/pear/src/PEAR/Task/Windowseol.php | 83 + .../pear/src/PEAR/Task/Windowseol/rw.php | 62 + .../src/tools/pear/src/PEAR/Validate.php | 630 +++++ .../tools/pear/src/PEAR/Validator/PECL.php | 62 + .../src/tools/pear/src/PEAR/XMLParser.php | 261 ++ campcaster/src/tools/pear/src/System.php | 587 +++++ campcaster/src/tools/pear/src/VERSIONS.txt | 17 + .../src/tools/pear/src/XML/Beautifier.php | 340 +++ .../pear/src/XML/Beautifier/Renderer.php | 188 ++ .../src/XML/Beautifier/Renderer/Plain.php | 258 ++ .../pear/src/XML/Beautifier/Tokenizer.php | 372 +++ campcaster/src/tools/pear/src/XML/Parser.php | 684 ++++++ .../src/tools/pear/src/XML/Parser/Simple.php | 297 +++ campcaster/src/tools/pear/src/XML/RPC.php | 2077 ++++++++++++++++ .../src/tools/pear/src/XML/RPC/Dump.php | 187 ++ .../src/tools/pear/src/XML/RPC/Server.php | 685 ++++++ .../src/tools/pear/src/XML/Serializer.php | 1025 ++++++++ .../src/tools/pear/src/XML/Unserializer.php | 856 +++++++ campcaster/src/tools/pear/src/XML/Util.php | 743 ++++++ .../src/tools/pear/src/XML_Beautifier-1.1.tgz | Bin 9854 -> 0 bytes .../src/tools/pear/src/XML_Parser-1.2.6.tgz | Bin 12944 -> 0 bytes .../src/tools/pear/src/XML_RPC-1.4.4.tgz | Bin 24447 -> 0 bytes .../src/tools/pear/src/XML_RPC-1.5.0.tgz | Bin 31619 -> 0 bytes .../tools/pear/src/XML_Serializer-0.15.0.tgz | Bin 17218 -> 0 bytes .../src/tools/pear/src/XML_Util-1.1.1.tgz | Bin 8358 -> 0 bytes .../src/tools/pear/src/data/PEAR/package.dtd | 103 + .../tools/pear/src/data/PEAR/template.spec | 72 + .../pear/src/data/XML_Serializer/doc/todo.txt | 25 + .../src/docs/Archive_Tar/docs/Archive_Tar.txt | 461 ++++ .../tools/pear/src/docs/Calendar/docs/Readme | 3 + .../src/docs/Calendar/docs/examples/1.php | 92 + .../src/docs/Calendar/docs/examples/1.phps | 92 + .../src/docs/Calendar/docs/examples/10.php | 93 + .../src/docs/Calendar/docs/examples/10.phps | 93 + .../src/docs/Calendar/docs/examples/11.php | 109 + .../src/docs/Calendar/docs/examples/11.phps | 109 + .../src/docs/Calendar/docs/examples/12.php | 116 + .../src/docs/Calendar/docs/examples/12.phps | 116 + .../src/docs/Calendar/docs/examples/13.php | 99 + .../src/docs/Calendar/docs/examples/13.phps | 99 + .../src/docs/Calendar/docs/examples/14.php | 141 ++ .../src/docs/Calendar/docs/examples/14.phps | 141 ++ .../src/docs/Calendar/docs/examples/15.php | 58 + .../src/docs/Calendar/docs/examples/15.phps | 58 + .../src/docs/Calendar/docs/examples/16.php | 31 + .../src/docs/Calendar/docs/examples/16.phps | 31 + .../src/docs/Calendar/docs/examples/17.php | 71 + .../src/docs/Calendar/docs/examples/17.phps | 71 + .../src/docs/Calendar/docs/examples/18.php | 36 + .../src/docs/Calendar/docs/examples/18.phps | 36 + .../src/docs/Calendar/docs/examples/19.php | 24 + .../src/docs/Calendar/docs/examples/19.phps | 24 + .../src/docs/Calendar/docs/examples/2.php | 142 ++ .../src/docs/Calendar/docs/examples/2.phps | 142 ++ .../src/docs/Calendar/docs/examples/20.php | 240 ++ .../src/docs/Calendar/docs/examples/20.phps | 240 ++ .../src/docs/Calendar/docs/examples/21.php | 139 ++ .../src/docs/Calendar/docs/examples/21.phps | 139 ++ .../src/docs/Calendar/docs/examples/22.php | 46 + .../src/docs/Calendar/docs/examples/22.phps | 46 + .../src/docs/Calendar/docs/examples/23.php | 66 + .../src/docs/Calendar/docs/examples/23.phps | 66 + .../src/docs/Calendar/docs/examples/3.php | 134 + .../src/docs/Calendar/docs/examples/3.phps | 134 + .../src/docs/Calendar/docs/examples/4.php | 49 + .../src/docs/Calendar/docs/examples/4.phps | 49 + .../src/docs/Calendar/docs/examples/5.php | 132 + .../src/docs/Calendar/docs/examples/5.phps | 132 + .../src/docs/Calendar/docs/examples/6.php | 210 ++ .../src/docs/Calendar/docs/examples/6.phps | 210 ++ .../src/docs/Calendar/docs/examples/7.php | 92 + .../src/docs/Calendar/docs/examples/7.phps | 92 + .../src/docs/Calendar/docs/examples/8.php | 70 + .../src/docs/Calendar/docs/examples/8.phps | 70 + .../src/docs/Calendar/docs/examples/9.php | 16 + .../src/docs/Calendar/docs/examples/9.phps | 16 + .../docs/Calendar/docs/examples/index.html | 49 + .../src/tools/pear/src/docs/DB/doc/IDEAS | 90 + .../tools/pear/src/docs/DB/doc/MAINTAINERS | 16 + .../src/tools/pear/src/docs/DB/doc/STATUS | 93 + .../src/tools/pear/src/docs/DB/doc/TESTERS | 156 ++ .../src/docs/HTML_QuickForm/docs/elements.php | 154 ++ .../src/docs/HTML_QuickForm/docs/filters.php | 61 + .../src/docs/HTML_QuickForm/docs/formrule.php | 101 + .../src/docs/HTML_QuickForm/docs/groups.php | 95 + .../docs/renderers/FlexyDynamic_example.php | 112 + .../docs/renderers/FlexyStatic_example.php | 148 ++ .../docs/renderers/ITDynamic_example.php | 96 + .../docs/renderers/ITDynamic_example2.php | 119 + .../docs/renderers/ITStatic_example.php | 111 + .../docs/renderers/QuickHtml_example.php | 146 ++ .../docs/renderers/SmartyDynamic_example.php | 108 + .../docs/renderers/SmartyStatic_example.php | 137 ++ .../docs/renderers/multiple-labels.php | 46 + .../renderers/templates/flexy-dynamic.html | 129 + .../renderers/templates/flexy-static.html | 154 ++ .../docs/renderers/templates/html.html | 4 + .../renderers/templates/it-dynamic-2.html | 110 + .../docs/renderers/templates/it-dynamic.html | 127 + .../docs/renderers/templates/it-static.html | 102 + .../docs/renderers/templates/label.html | 4 + .../templates/smarty-dynamic-fancygroup.tpl | 28 + .../templates/smarty-dynamic-green.tpl | 9 + .../renderers/templates/smarty-dynamic.tpl | 134 + .../renderers/templates/smarty-static.tpl | 156 ++ .../templates/styles/fancygroup.html | 30 + .../renderers/templates/styles/green.html | 10 + .../HTML_QuickForm/docs/rules-builtin.php | 87 + .../docs/HTML_QuickForm/docs/rules-custom.php | 107 + .../docs/XML_Beautifier/examples/example1.php | 31 + .../docs/XML_Beautifier/examples/example2.php | 30 + .../docs/XML_Beautifier/examples/example3.php | 36 + .../docs/XML_Beautifier/examples/example4.php | 33 + .../docs/XML_Beautifier/examples/example5.php | 37 + .../docs/XML_Beautifier/examples/example6.php | 29 + .../src/docs/XML_Beautifier/examples/test.xml | 46 + .../XML_Parser/examples/xml_parser_file.php | 54 + .../XML_Parser/examples/xml_parser_file.xml | 5 + .../examples/xml_parser_handler.php | 50 + .../examples/xml_parser_simple1.php | 50 + .../examples/xml_parser_simple1.xml | 9 + .../examples/xml_parser_simple2.php | 59 + .../examples/xml_parser_simple2.xml | 5 + .../examples/xml_parser_simple_handler.php | 56 + .../docs/XML_Serializer/examples/example.xml | 6 + .../examples/serializeAndEncode.php | 52 + .../examples/serializeAndReturn.php | 27 + .../examples/serializeArrayWithObjects.php | 47 + .../examples/serializeEmptyArray.php | 27 + .../examples/serializeIndexedArray.php | 60 + .../examples/serializeObject.php | 43 + .../XML_Serializer/examples/serializeRDF.php | 64 + .../examples/serializeWithAttributes.php | 48 + .../examples/serializeWithAttributes2.php | 47 + .../examples/serializeWithDtd.php | 33 + .../serializeWithIndentedAttributes.php | 51 + .../examples/serializeWithNamespace.php | 50 + .../examples/serializeWithTagMap.php | 81 + .../examples/unserializeAnyXML.php | 81 + .../examples/unserializeClassNames.php | 57 + .../examples/unserializeEncoded.php | 40 + .../examples/unserializeEnum.php | 61 + .../examples/unserializeObject.php | 58 + .../examples/unserializeRDF.php | 93 + .../examples/unserializeWithAttributes.php | 33 + .../src/docs/XML_Util/examples/example.php | 228 ++ .../src/docs/XML_Util/examples/example2.php | 95 + campcaster/src/tools/pear/src/package.dtd | 103 + campcaster/src/tools/pear/src/pearcmd.php | 437 ++++ campcaster/src/tools/pear/src/peclcmd.php | 45 + .../src/tools/pear/src/scripts/pear.bat | 115 + campcaster/src/tools/pear/src/scripts/pear.sh | 28 + .../src/tools/pear/src/scripts/pearcmd.php | 437 ++++ .../src/tools/pear/src/scripts/peardev.bat | 115 + .../src/tools/pear/src/scripts/peardev.sh | 28 + .../src/tools/pear/src/scripts/pecl.bat | 115 + campcaster/src/tools/pear/src/scripts/pecl.sh | 28 + .../src/tools/pear/src/scripts/peclcmd.php | 45 + campcaster/src/tools/pear/src/template.spec | 72 + .../pear/src/tests/Calendar/tests/README | 7 + .../src/tests/Calendar/tests/all_tests.php | 34 + .../Calendar/tests/calendar_engine_tests.php | 20 + .../tests/Calendar/tests/calendar_include.php | 28 + .../Calendar/tests/calendar_tabular_tests.php | 21 + .../tests/Calendar/tests/calendar_test.php | 115 + .../tests/Calendar/tests/calendar_tests.php | 25 + .../src/tests/Calendar/tests/day_test.php | 107 + .../tests/Calendar/tests/decorator_test.php | 268 ++ .../tests/Calendar/tests/decorator_tests.php | 21 + .../Calendar/tests/decorator_textual_test.php | 174 ++ .../Calendar/tests/decorator_uri_test.php | 37 + .../src/tests/Calendar/tests/helper_test.php | 83 + .../src/tests/Calendar/tests/hour_test.php | 98 + .../src/tests/Calendar/tests/minute_test.php | 99 + .../src/tests/Calendar/tests/month_test.php | 119 + .../Calendar/tests/month_weekdays_test.php | 130 + .../tests/Calendar/tests/month_weeks_test.php | 125 + .../Calendar/tests/peardate_engine_test.php | 124 + .../src/tests/Calendar/tests/second_test.php | 34 + .../tests/Calendar/tests/simple_include.php | 10 + .../Calendar/tests/table_helper_tests.php | 19 + .../Calendar/tests/unixts_engine_test.php | 104 + .../src/tests/Calendar/tests/util_tests.php | 20 + .../Calendar/tests/util_textual_test.php | 191 ++ .../tests/Calendar/tests/util_uri_test.php | 54 + .../Calendar/tests/validator_error_test.php | 34 + .../tests/Calendar/tests/validator_tests.php | 20 + .../Calendar/tests/validator_unit_test.php | 210 ++ .../src/tests/Calendar/tests/week_test.php | 214 ++ .../src/tests/Calendar/tests/year_test.php | 142 ++ .../pear/src/tests/DB/tests/db_error.phpt | 79 + .../pear/src/tests/DB/tests/db_error2.phpt | 92 + .../pear/src/tests/DB/tests/db_factory.phpt | 53 + .../pear/src/tests/DB/tests/db_ismanip.phpt | 57 + .../pear/src/tests/DB/tests/db_parsedsn.phpt | 480 ++++ .../src/tests/DB/tests/driver/01connect.phpt | 76 + .../src/tests/DB/tests/driver/02fetch.phpt | 40 + .../tests/DB/tests/driver/03simplequery.phpt | 13 + .../src/tests/DB/tests/driver/04numcols.phpt | 16 + .../tests/DB/tests/driver/05sequences.phpt | 28 + .../src/tests/DB/tests/driver/06prepexec.phpt | 50 + .../tests/DB/tests/driver/08affectedrows.phpt | 62 + .../src/tests/DB/tests/driver/09numrows.phpt | 22 + .../src/tests/DB/tests/driver/10errormap.phpt | 37 + .../tests/DB/tests/driver/11transactions.phpt | 26 + .../src/tests/DB/tests/driver/13limit.phpt | 54 + .../DB/tests/driver/14fetchmode_object.phpt | 24 + .../src/tests/DB/tests/driver/15quote.phpt | 273 +++ .../tests/DB/tests/driver/16tableinfo.phpt | 1340 ++++++++++ .../src/tests/DB/tests/driver/17query.phpt | 140 ++ .../pear/src/tests/DB/tests/driver/18get.phpt | 661 +++++ .../tests/DB/tests/driver/19getlistof.phpt | 208 ++ .../src/tests/DB/tests/driver/connect.inc | 46 + .../src/tests/DB/tests/driver/mktable.inc | 161 ++ .../tests/DB/tests/driver/multiconnect.php | 83 + .../pear/src/tests/DB/tests/driver/run.cvs | 40 + .../src/tests/DB/tests/driver/setup.inc.cvs | 115 + .../pear/src/tests/DB/tests/driver/skipif.inc | 37 + .../tools/pear/src/tests/DB/tests/errors.inc | 466 ++++ .../src/tests/DB/tests/fetchmode_object.inc | 111 + .../pear/src/tests/DB/tests/fetchmodes.inc | 170 ++ .../tools/pear/src/tests/DB/tests/include.inc | 62 + .../tools/pear/src/tests/DB/tests/limit.inc | 86 + .../tools/pear/src/tests/DB/tests/numcols.inc | 67 + .../tools/pear/src/tests/DB/tests/numrows.inc | 110 + .../tools/pear/src/tests/DB/tests/prepexe.inc | 241 ++ .../src/tools/pear/src/tests/DB/tests/run.cvs | 40 + .../pear/src/tests/DB/tests/sequences.inc | 129 + .../pear/src/tests/DB/tests/simplequery.inc | 76 + .../tools/pear/src/tests/DB/tests/skipif.inc | 30 + .../pear/src/tests/DB/tests/transactions.inc | 101 + .../pear/src/tests/File/tests/CSV/001.csv | 4 + .../pear/src/tests/File/tests/CSV/001.phpt | 73 + .../pear/src/tests/File/tests/CSV/002.csv | 4 + .../pear/src/tests/File/tests/CSV/002.phpt | 73 + .../pear/src/tests/File/tests/CSV/003.csv | 4 + .../pear/src/tests/File/tests/CSV/003.phpt | 66 + .../pear/src/tests/File/tests/CSV/004.csv | 4 + .../pear/src/tests/File/tests/CSV/004.phpt | 66 + .../pear/src/tests/File/tests/CSV/005.csv | 1 + .../pear/src/tests/File/tests/CSV/005.phpt | 84 + .../pear/src/tests/File/tests/CSV/tests.txt | 12 + .../pear/src/tests/File/tests/FileTest.php | 226 ++ .../pear/src/tests/File/tests/parser.php | 31 + .../tools/pear/src/tests/File/tests/test.csv | 18 + .../src/tests/File_Find/tests/01glob.phpt | 46 + .../src/tests/File_Find/tests/02maptree.phpt | 97 + .../File_Find/tests/03maptreemultiple.phpt | 91 + .../src/tests/File_Find/tests/04search.phpt | 53 + .../File_Find/tests/05search_inside.phpt | 63 + .../src/tests/File_Find/tests/bug2773.phpt | 58 + .../pear/src/tests/File_Find/tests/setup.php | 46 + .../pear/src/tests/XML_Parser/tests/001.phpt | 49 + .../pear/src/tests/XML_Parser/tests/002.phpt | 52 + .../pear/src/tests/XML_Parser/tests/003.phpt | 55 + .../pear/src/tests/XML_Parser/tests/004.phpt | 26 + .../pear/src/tests/XML_Parser/tests/005.phpt | 75 + .../pear/src/tests/XML_Parser/tests/test2.xml | 2 + .../pear/src/tests/XML_Parser/tests/test3.xml | 2 + .../pear/src/tests/XML_RPC/tests/allgot.inc | 58 + .../XML_RPC/tests/empty-value-struct.php | 90 + .../src/tests/XML_RPC/tests/empty-value.php | 88 + .../src/tests/XML_RPC/tests/extra-lines.php | 109 + .../src/tests/XML_RPC/tests/protoport.php | 437 ++++ .../src/tests/XML_RPC/tests/test_Dump.php | 50 + .../pear/src/tests/XML_RPC/tests/types.php | 132 + 527 files changed, 118553 insertions(+), 7 deletions(-) create mode 100644 campcaster/src/tools/pear/src/Archive/Tar.php delete mode 100644 campcaster/src/tools/pear/src/Archive_Tar-1.3.1.tgz delete mode 100644 campcaster/src/tools/pear/src/Calendar-0.5.2.tgz create mode 100644 campcaster/src/tools/pear/src/Calendar/Calendar.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Day.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Decorator.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Decorator/Textual.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Decorator/Uri.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Decorator/Weekday.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Decorator/Wrapper.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Engine/Interface.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Engine/PearDate.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Engine/UnixTS.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Factory.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Hour.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Minute.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Month.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Month/Weekdays.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Month/Weeks.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Second.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Table/Helper.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Util/Textual.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Util/Uri.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Validator.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Week.php create mode 100644 campcaster/src/tools/pear/src/Calendar/Year.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/Readme create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/1.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/1.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/10.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/10.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/11.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/11.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/12.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/12.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/13.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/13.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/14.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/14.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/15.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/15.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/16.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/16.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/17.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/17.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/18.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/18.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/19.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/19.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/2.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/2.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/20.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/20.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/21.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/21.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/22.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/22.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/23.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/23.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/3.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/3.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/4.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/4.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/5.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/5.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/6.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/6.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/7.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/7.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/8.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/8.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/9.php create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/9.phps create mode 100644 campcaster/src/tools/pear/src/Calendar/docs/examples/index.html create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/README create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/all_tests.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/calendar_engine_tests.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/calendar_include.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/calendar_tabular_tests.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/calendar_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/calendar_tests.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/day_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/decorator_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/decorator_tests.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/decorator_textual_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/decorator_uri_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/helper_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/hour_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/minute_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/month_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/month_weekdays_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/month_weeks_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/peardate_engine_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/second_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/simple_include.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/table_helper_tests.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/unixts_engine_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/util_tests.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/util_textual_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/util_uri_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/validator_error_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/validator_tests.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/validator_unit_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/week_firstday_0_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/week_test.php create mode 100644 campcaster/src/tools/pear/src/Calendar/tests/year_test.php create mode 100644 campcaster/src/tools/pear/src/Console/Getopt.php delete mode 100644 campcaster/src/tools/pear/src/Console_Getopt-1.2.tgz delete mode 100644 campcaster/src/tools/pear/src/DB-1.7.6.tgz create mode 100644 campcaster/src/tools/pear/src/DB.php create mode 100644 campcaster/src/tools/pear/src/DB/common.php create mode 100644 campcaster/src/tools/pear/src/DB/dbase.php create mode 100644 campcaster/src/tools/pear/src/DB/fbsql.php create mode 100644 campcaster/src/tools/pear/src/DB/ibase.php create mode 100644 campcaster/src/tools/pear/src/DB/ifx.php create mode 100644 campcaster/src/tools/pear/src/DB/msql.php create mode 100644 campcaster/src/tools/pear/src/DB/mssql.php create mode 100644 campcaster/src/tools/pear/src/DB/mysql.php create mode 100644 campcaster/src/tools/pear/src/DB/mysqli.php create mode 100644 campcaster/src/tools/pear/src/DB/oci8.php create mode 100644 campcaster/src/tools/pear/src/DB/odbc.php create mode 100644 campcaster/src/tools/pear/src/DB/pgsql.php create mode 100644 campcaster/src/tools/pear/src/DB/sqlite.php create mode 100644 campcaster/src/tools/pear/src/DB/storage.php create mode 100644 campcaster/src/tools/pear/src/DB/sybase.php delete mode 100644 campcaster/src/tools/pear/src/File-1.2.0.tgz create mode 100644 campcaster/src/tools/pear/src/File.php create mode 100644 campcaster/src/tools/pear/src/File/CSV.php create mode 100644 campcaster/src/tools/pear/src/File/Find.php create mode 100644 campcaster/src/tools/pear/src/File/Util.php delete mode 100644 campcaster/src/tools/pear/src/File_Find-1.2.1.tgz create mode 100644 campcaster/src/tools/pear/src/HTML/Common.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer/Array.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer/ArraySmarty.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer/Default.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer/ITDynamic.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer/ITStatic.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer/Object.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer/ObjectFlexy.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Renderer/QuickHtml.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Rule.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Rule/Callback.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Rule/Compare.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Rule/Email.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Rule/Range.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Rule/Regex.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/Rule/Required.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/RuleRegistry.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/advcheckbox.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/autocomplete.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/button.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/checkbox.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/date.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/element.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/file.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/group.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/header.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/hidden.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/hiddenselect.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/hierselect.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/html.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/image.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/input.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/link.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/password.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/radio.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/reset.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/select.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/static.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/submit.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/text.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/textarea.php create mode 100644 campcaster/src/tools/pear/src/HTML/QuickForm/xbutton.php delete mode 100644 campcaster/src/tools/pear/src/HTML_Common-1.2.1.tgz delete mode 100644 campcaster/src/tools/pear/src/HTML_QuickForm-3.2.4pl1.tgz delete mode 100644 campcaster/src/tools/pear/src/HTML_QuickForm-3.2.5.tgz create mode 100644 campcaster/src/tools/pear/src/OS/Guess.php delete mode 100644 campcaster/src/tools/pear/src/PEAR-1.3.5.tgz create mode 100644 campcaster/src/tools/pear/src/PEAR.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Autoloader.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Builder.php create mode 100644 campcaster/src/tools/pear/src/PEAR/ChannelFile.php create mode 100644 campcaster/src/tools/pear/src/PEAR/ChannelFile/Parser.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Auth.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Auth.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Build.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Build.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Channels.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Channels.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Common.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Config.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Config.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Install.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Install.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Mirror.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Mirror.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Package.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Package.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Pickle.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Pickle.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Registry.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Registry.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Remote.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Remote.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Test.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Command/Test.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Common.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Config.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Dependency.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Dependency2.php create mode 100644 campcaster/src/tools/pear/src/PEAR/DependencyDB.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Downloader.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Downloader/Package.php create mode 100644 campcaster/src/tools/pear/src/PEAR/ErrorStack.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Exception.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Frontend.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Frontend/CLI.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Common.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Data.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Data.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Doc.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Doc.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Ext.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Ext.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Php.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Php.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Script.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Script.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Src.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Src.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Test.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Installer/Role/Test.xml create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile.php create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile/Generator/v1.php create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile/Generator/v2.php create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile/Parser/v1.php create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile/Parser/v2.php create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile/v1.php create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile/v2.php create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile/v2/Validator.php create mode 100644 campcaster/src/tools/pear/src/PEAR/PackageFile/v2/rw.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Packager.php create mode 100644 campcaster/src/tools/pear/src/PEAR/REST.php create mode 100644 campcaster/src/tools/pear/src/PEAR/REST/10.php create mode 100644 campcaster/src/tools/pear/src/PEAR/REST/11.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Registry.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Remote.php create mode 100644 campcaster/src/tools/pear/src/PEAR/RunTest.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Common.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Postinstallscript.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Postinstallscript/rw.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Replace.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Replace/rw.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Unixeol.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Unixeol/rw.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Windowseol.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Task/Windowseol/rw.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Validate.php create mode 100644 campcaster/src/tools/pear/src/PEAR/Validator/PECL.php create mode 100644 campcaster/src/tools/pear/src/PEAR/XMLParser.php create mode 100644 campcaster/src/tools/pear/src/System.php create mode 100644 campcaster/src/tools/pear/src/VERSIONS.txt create mode 100644 campcaster/src/tools/pear/src/XML/Beautifier.php create mode 100644 campcaster/src/tools/pear/src/XML/Beautifier/Renderer.php create mode 100644 campcaster/src/tools/pear/src/XML/Beautifier/Renderer/Plain.php create mode 100644 campcaster/src/tools/pear/src/XML/Beautifier/Tokenizer.php create mode 100644 campcaster/src/tools/pear/src/XML/Parser.php create mode 100644 campcaster/src/tools/pear/src/XML/Parser/Simple.php create mode 100644 campcaster/src/tools/pear/src/XML/RPC.php create mode 100644 campcaster/src/tools/pear/src/XML/RPC/Dump.php create mode 100644 campcaster/src/tools/pear/src/XML/RPC/Server.php create mode 100644 campcaster/src/tools/pear/src/XML/Serializer.php create mode 100644 campcaster/src/tools/pear/src/XML/Unserializer.php create mode 100644 campcaster/src/tools/pear/src/XML/Util.php delete mode 100644 campcaster/src/tools/pear/src/XML_Beautifier-1.1.tgz delete mode 100644 campcaster/src/tools/pear/src/XML_Parser-1.2.6.tgz delete mode 100644 campcaster/src/tools/pear/src/XML_RPC-1.4.4.tgz delete mode 100644 campcaster/src/tools/pear/src/XML_RPC-1.5.0.tgz delete mode 100644 campcaster/src/tools/pear/src/XML_Serializer-0.15.0.tgz delete mode 100644 campcaster/src/tools/pear/src/XML_Util-1.1.1.tgz create mode 100644 campcaster/src/tools/pear/src/data/PEAR/package.dtd create mode 100644 campcaster/src/tools/pear/src/data/PEAR/template.spec create mode 100644 campcaster/src/tools/pear/src/data/XML_Serializer/doc/todo.txt create mode 100644 campcaster/src/tools/pear/src/docs/Archive_Tar/docs/Archive_Tar.txt create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/Readme create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/1.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/1.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/10.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/10.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/11.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/11.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/12.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/12.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/13.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/13.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/14.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/14.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/15.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/15.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/16.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/16.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/17.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/17.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/18.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/18.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/19.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/19.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/2.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/2.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/20.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/20.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/21.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/21.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/22.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/22.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/23.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/23.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/3.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/3.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/4.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/4.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/5.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/5.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/6.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/6.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/7.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/7.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/8.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/8.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/9.php create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/9.phps create mode 100644 campcaster/src/tools/pear/src/docs/Calendar/docs/examples/index.html create mode 100644 campcaster/src/tools/pear/src/docs/DB/doc/IDEAS create mode 100644 campcaster/src/tools/pear/src/docs/DB/doc/MAINTAINERS create mode 100644 campcaster/src/tools/pear/src/docs/DB/doc/STATUS create mode 100644 campcaster/src/tools/pear/src/docs/DB/doc/TESTERS create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/elements.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/filters.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/formrule.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/groups.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/FlexyDynamic_example.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/FlexyStatic_example.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITDynamic_example.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITDynamic_example2.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITStatic_example.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/QuickHtml_example.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/SmartyDynamic_example.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/SmartyStatic_example.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/multiple-labels.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/flexy-dynamic.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/flexy-static.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/html.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-dynamic-2.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-dynamic.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-static.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/label.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic-fancygroup.tpl create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic-green.tpl create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic.tpl create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-static.tpl create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/styles/fancygroup.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/styles/green.html create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/rules-builtin.php create mode 100644 campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/rules-custom.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example1.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example2.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example3.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example4.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example5.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example6.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/test.xml create mode 100644 campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_file.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_file.xml create mode 100644 campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_handler.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple1.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple1.xml create mode 100644 campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple2.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple2.xml create mode 100644 campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple_handler.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/example.xml create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeAndEncode.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeAndReturn.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeArrayWithObjects.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeEmptyArray.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeIndexedArray.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeObject.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeRDF.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithAttributes.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithAttributes2.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithDtd.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithIndentedAttributes.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithNamespace.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithTagMap.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeAnyXML.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeClassNames.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeEncoded.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeEnum.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeObject.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeRDF.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeWithAttributes.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Util/examples/example.php create mode 100644 campcaster/src/tools/pear/src/docs/XML_Util/examples/example2.php create mode 100644 campcaster/src/tools/pear/src/package.dtd create mode 100644 campcaster/src/tools/pear/src/pearcmd.php create mode 100644 campcaster/src/tools/pear/src/peclcmd.php create mode 100644 campcaster/src/tools/pear/src/scripts/pear.bat create mode 100644 campcaster/src/tools/pear/src/scripts/pear.sh create mode 100644 campcaster/src/tools/pear/src/scripts/pearcmd.php create mode 100644 campcaster/src/tools/pear/src/scripts/peardev.bat create mode 100644 campcaster/src/tools/pear/src/scripts/peardev.sh create mode 100644 campcaster/src/tools/pear/src/scripts/pecl.bat create mode 100644 campcaster/src/tools/pear/src/scripts/pecl.sh create mode 100644 campcaster/src/tools/pear/src/scripts/peclcmd.php create mode 100644 campcaster/src/tools/pear/src/template.spec create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/README create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/all_tests.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_engine_tests.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_include.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_tabular_tests.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_tests.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/day_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_tests.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_textual_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_uri_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/helper_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/hour_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/minute_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/month_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/month_weekdays_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/month_weeks_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/peardate_engine_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/second_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/simple_include.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/table_helper_tests.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/unixts_engine_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/util_tests.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/util_textual_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/util_uri_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/validator_error_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/validator_tests.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/validator_unit_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/week_test.php create mode 100644 campcaster/src/tools/pear/src/tests/Calendar/tests/year_test.php create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/db_error.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/db_error2.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/db_factory.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/db_ismanip.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/db_parsedsn.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/01connect.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/02fetch.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/03simplequery.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/04numcols.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/05sequences.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/06prepexec.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/08affectedrows.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/09numrows.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/10errormap.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/11transactions.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/13limit.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/14fetchmode_object.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/15quote.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/16tableinfo.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/17query.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/18get.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/19getlistof.phpt create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/connect.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/mktable.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/multiconnect.php create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/run.cvs create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/setup.inc.cvs create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/driver/skipif.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/errors.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/fetchmode_object.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/fetchmodes.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/include.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/limit.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/numcols.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/numrows.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/prepexe.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/run.cvs create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/sequences.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/simplequery.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/skipif.inc create mode 100644 campcaster/src/tools/pear/src/tests/DB/tests/transactions.inc create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/001.csv create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/001.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/002.csv create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/002.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/003.csv create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/003.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/004.csv create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/004.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/005.csv create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/005.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/CSV/tests.txt create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/FileTest.php create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/parser.php create mode 100644 campcaster/src/tools/pear/src/tests/File/tests/test.csv create mode 100644 campcaster/src/tools/pear/src/tests/File_Find/tests/01glob.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File_Find/tests/02maptree.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File_Find/tests/03maptreemultiple.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File_Find/tests/04search.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File_Find/tests/05search_inside.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File_Find/tests/bug2773.phpt create mode 100644 campcaster/src/tools/pear/src/tests/File_Find/tests/setup.php create mode 100644 campcaster/src/tools/pear/src/tests/XML_Parser/tests/001.phpt create mode 100644 campcaster/src/tools/pear/src/tests/XML_Parser/tests/002.phpt create mode 100644 campcaster/src/tools/pear/src/tests/XML_Parser/tests/003.phpt create mode 100644 campcaster/src/tools/pear/src/tests/XML_Parser/tests/004.phpt create mode 100644 campcaster/src/tools/pear/src/tests/XML_Parser/tests/005.phpt create mode 100644 campcaster/src/tools/pear/src/tests/XML_Parser/tests/test2.xml create mode 100644 campcaster/src/tools/pear/src/tests/XML_Parser/tests/test3.xml create mode 100644 campcaster/src/tools/pear/src/tests/XML_RPC/tests/allgot.inc create mode 100644 campcaster/src/tools/pear/src/tests/XML_RPC/tests/empty-value-struct.php create mode 100644 campcaster/src/tools/pear/src/tests/XML_RPC/tests/empty-value.php create mode 100644 campcaster/src/tools/pear/src/tests/XML_RPC/tests/extra-lines.php create mode 100644 campcaster/src/tools/pear/src/tests/XML_RPC/tests/protoport.php create mode 100644 campcaster/src/tools/pear/src/tests/XML_RPC/tests/test_Dump.php create mode 100644 campcaster/src/tools/pear/src/tests/XML_RPC/tests/types.php diff --git a/campcaster/src/tools/pear/etc/Makefile.in b/campcaster/src/tools/pear/etc/Makefile.in index 8a09f8814..7dfc8586b 100644 --- a/campcaster/src/tools/pear/etc/Makefile.in +++ b/campcaster/src/tools/pear/etc/Makefile.in @@ -53,20 +53,16 @@ INSTALL_DIR = @prefix@ #------------------------------------------------------------------------------- # Targets #------------------------------------------------------------------------------- -.PHONY: all install copy_files clean distclean +.PHONY: all install clean distclean all: -install: copy_files - ${INSTALL_DIR}/usr/lib/pear/bin/install.sh -d ${INSTALL_DIR} - -copy_files: +install: ${MKDIR} ${INSTALL_DIR}/usr/lib/pear/bin ${MKDIR} ${INSTALL_DIR}/usr/lib/pear/etc ${MKDIR} ${INSTALL_DIR}/usr/lib/pear/src - cp -pP ${BASE_DIR}/../pear/bin/install.sh ${INSTALL_DIR}/usr/lib/pear/bin cp -pP ${BASE_DIR}/../pear/etc/pear.conf.template ${INSTALL_DIR}/usr/lib/pear/etc - cp -pP ${BASE_DIR}/../pear/src/*.tgz ${INSTALL_DIR}/usr/lib/pear/src + cp -R ${BASE_DIR}/../pear/src/* ${INSTALL_DIR}/usr/lib/pear/src clean: diff --git a/campcaster/src/tools/pear/src/Archive/Tar.php b/campcaster/src/tools/pear/src/Archive/Tar.php new file mode 100644 index 000000000..53d767d08 --- /dev/null +++ b/campcaster/src/tools/pear/src/Archive/Tar.php @@ -0,0 +1,1762 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Tar.php,v 1.29 2005/03/17 21:02:31 vblavet Exp $ + +require_once 'PEAR.php'; + + +define ('ARCHIVE_TAR_ATT_SEPARATOR', 90001); + +/** +* Creates a (compressed) Tar archive +* +* @author Vincent Blavet +* @version $Revision: 1.29 $ +* @package Archive +*/ +class Archive_Tar extends PEAR +{ + /** + * @var string Name of the Tar + */ + var $_tarname=''; + + /** + * @var boolean if true, the Tar file will be gzipped + */ + var $_compress=false; + + /** + * @var string Type of compression : 'none', 'gz' or 'bz2' + */ + var $_compress_type='none'; + + /** + * @var string Explode separator + */ + var $_separator=' '; + + /** + * @var file descriptor + */ + var $_file=0; + + /** + * @var string Local Tar name of a remote Tar (http:// or ftp://) + */ + var $_temp_tarname=''; + + // {{{ constructor + /** + * Archive_Tar Class constructor. This flavour of the constructor only + * declare a new Archive_Tar object, identifying it by the name of the + * tar file. + * If the compress argument is set the tar will be read or created as a + * gzip or bz2 compressed TAR file. + * + * @param string $p_tarname The name of the tar archive to create + * @param string $p_compress can be null, 'gz' or 'bz2'. This + * parameter indicates if gzip or bz2 compression + * is required. For compatibility reason the + * boolean value 'true' means 'gz'. + * @access public + */ + function Archive_Tar($p_tarname, $p_compress = null) + { + $this->PEAR(); + $this->_compress = false; + $this->_compress_type = 'none'; + if (($p_compress === null) || ($p_compress == '')) { + if (@file_exists($p_tarname)) { + if ($fp = @fopen($p_tarname, "rb")) { + // look for gzip magic cookie + $data = fread($fp, 2); + fclose($fp); + if ($data == "\37\213") { + $this->_compress = true; + $this->_compress_type = 'gz'; + // No sure it's enought for a magic code .... + } elseif ($data == "BZ") { + $this->_compress = true; + $this->_compress_type = 'bz2'; + } + } + } else { + // probably a remote file or some file accessible + // through a stream interface + if (substr($p_tarname, -2) == 'gz') { + $this->_compress = true; + $this->_compress_type = 'gz'; + } elseif ((substr($p_tarname, -3) == 'bz2') || + (substr($p_tarname, -2) == 'bz')) { + $this->_compress = true; + $this->_compress_type = 'bz2'; + } + } + } else { + if (($p_compress === true) || ($p_compress == 'gz')) { + $this->_compress = true; + $this->_compress_type = 'gz'; + } else if ($p_compress == 'bz2') { + $this->_compress = true; + $this->_compress_type = 'bz2'; + } else { + die("Unsupported compression type '$p_compress'\n". + "Supported types are 'gz' and 'bz2'.\n"); + return false; + } + } + $this->_tarname = $p_tarname; + if ($this->_compress) { // assert zlib or bz2 extension support + if ($this->_compress_type == 'gz') + $extname = 'zlib'; + else if ($this->_compress_type == 'bz2') + $extname = 'bz2'; + + if (!extension_loaded($extname)) { + PEAR::loadExtension($extname); + } + if (!extension_loaded($extname)) { + die("The extension '$extname' couldn't be found.\n". + "Please make sure your version of PHP was built ". + "with '$extname' support.\n"); + return false; + } + } + } + // }}} + + // {{{ destructor + function _Archive_Tar() + { + $this->_close(); + // ----- Look for a local copy to delete + if ($this->_temp_tarname != '') + @unlink($this->_temp_tarname); + $this->_PEAR(); + } + // }}} + + // {{{ create() + /** + * This method creates the archive file and add the files / directories + * that are listed in $p_filelist. + * If a file with the same name exist and is writable, it is replaced + * by the new tar. + * The method return false and a PEAR error text. + * The $p_filelist parameter can be an array of string, each string + * representing a filename or a directory name with their path if + * needed. It can also be a single string with names separated by a + * single blank. + * For each directory added in the archive, the files and + * sub-directories are also added. + * See also createModify() method for more details. + * + * @param array $p_filelist An array of filenames and directory names, or a + * single string with names separated by a single + * blank space. + * @return true on success, false on error. + * @see createModify() + * @access public + */ + function create($p_filelist) + { + return $this->createModify($p_filelist, '', ''); + } + // }}} + + // {{{ add() + /** + * This method add the files / directories that are listed in $p_filelist in + * the archive. If the archive does not exist it is created. + * The method return false and a PEAR error text. + * The files and directories listed are only added at the end of the archive, + * even if a file with the same name is already archived. + * See also createModify() method for more details. + * + * @param array $p_filelist An array of filenames and directory names, or a + * single string with names separated by a single + * blank space. + * @return true on success, false on error. + * @see createModify() + * @access public + */ + function add($p_filelist) + { + return $this->addModify($p_filelist, '', ''); + } + // }}} + + // {{{ extract() + function extract($p_path='') + { + return $this->extractModify($p_path, ''); + } + // }}} + + // {{{ listContent() + function listContent() + { + $v_list_detail = array(); + + if ($this->_openRead()) { + if (!$this->_extractList('', $v_list_detail, "list", '', '')) { + unset($v_list_detail); + $v_list_detail = 0; + } + $this->_close(); + } + + return $v_list_detail; + } + // }}} + + // {{{ createModify() + /** + * This method creates the archive file and add the files / directories + * that are listed in $p_filelist. + * If the file already exists and is writable, it is replaced by the + * new tar. It is a create and not an add. If the file exists and is + * read-only or is a directory it is not replaced. The method return + * false and a PEAR error text. + * The $p_filelist parameter can be an array of string, each string + * representing a filename or a directory name with their path if + * needed. It can also be a single string with names separated by a + * single blank. + * The path indicated in $p_remove_dir will be removed from the + * memorized path of each file / directory listed when this path + * exists. By default nothing is removed (empty path '') + * The path indicated in $p_add_dir will be added at the beginning of + * the memorized path of each file / directory listed. However it can + * be set to empty ''. The adding of a path is done after the removing + * of path. + * The path add/remove ability enables the user to prepare an archive + * for extraction in a different path than the origin files are. + * See also addModify() method for file adding properties. + * + * @param array $p_filelist An array of filenames and directory names, + * or a single string with names separated by + * a single blank space. + * @param string $p_add_dir A string which contains a path to be added + * to the memorized path of each element in + * the list. + * @param string $p_remove_dir A string which contains a path to be + * removed from the memorized path of each + * element in the list, when relevant. + * @return boolean true on success, false on error. + * @access public + * @see addModify() + */ + function createModify($p_filelist, $p_add_dir, $p_remove_dir='') + { + $v_result = true; + + if (!$this->_openWrite()) + return false; + + if ($p_filelist != '') { + if (is_array($p_filelist)) + $v_list = $p_filelist; + elseif (is_string($p_filelist)) + $v_list = explode($this->_separator, $p_filelist); + else { + $this->_cleanFile(); + $this->_error('Invalid file list'); + return false; + } + + $v_result = $this->_addList($v_list, $p_add_dir, $p_remove_dir); + } + + if ($v_result) { + $this->_writeFooter(); + $this->_close(); + } else + $this->_cleanFile(); + + return $v_result; + } + // }}} + + // {{{ addModify() + /** + * This method add the files / directories listed in $p_filelist at the + * end of the existing archive. If the archive does not yet exists it + * is created. + * The $p_filelist parameter can be an array of string, each string + * representing a filename or a directory name with their path if + * needed. It can also be a single string with names separated by a + * single blank. + * The path indicated in $p_remove_dir will be removed from the + * memorized path of each file / directory listed when this path + * exists. By default nothing is removed (empty path '') + * The path indicated in $p_add_dir will be added at the beginning of + * the memorized path of each file / directory listed. However it can + * be set to empty ''. The adding of a path is done after the removing + * of path. + * The path add/remove ability enables the user to prepare an archive + * for extraction in a different path than the origin files are. + * If a file/dir is already in the archive it will only be added at the + * end of the archive. There is no update of the existing archived + * file/dir. However while extracting the archive, the last file will + * replace the first one. This results in a none optimization of the + * archive size. + * If a file/dir does not exist the file/dir is ignored. However an + * error text is send to PEAR error. + * If a file/dir is not readable the file/dir is ignored. However an + * error text is send to PEAR error. + * + * @param array $p_filelist An array of filenames and directory + * names, or a single string with names + * separated by a single blank space. + * @param string $p_add_dir A string which contains a path to be + * added to the memorized path of each + * element in the list. + * @param string $p_remove_dir A string which contains a path to be + * removed from the memorized path of + * each element in the list, when + * relevant. + * @return true on success, false on error. + * @access public + */ + function addModify($p_filelist, $p_add_dir, $p_remove_dir='') + { + $v_result = true; + + if (!$this->_isArchive()) + $v_result = $this->createModify($p_filelist, $p_add_dir, + $p_remove_dir); + else { + if (is_array($p_filelist)) + $v_list = $p_filelist; + elseif (is_string($p_filelist)) + $v_list = explode($this->_separator, $p_filelist); + else { + $this->_error('Invalid file list'); + return false; + } + + $v_result = $this->_append($v_list, $p_add_dir, $p_remove_dir); + } + + return $v_result; + } + // }}} + + // {{{ addString() + /** + * This method add a single string as a file at the + * end of the existing archive. If the archive does not yet exists it + * is created. + * + * @param string $p_filename A string which contains the full + * filename path that will be associated + * with the string. + * @param string $p_string The content of the file added in + * the archive. + * @return true on success, false on error. + * @access public + */ + function addString($p_filename, $p_string) + { + $v_result = true; + + if (!$this->_isArchive()) { + if (!$this->_openWrite()) { + return false; + } + $this->_close(); + } + + if (!$this->_openAppend()) + return false; + + // Need to check the get back to the temporary file ? .... + $v_result = $this->_addString($p_filename, $p_string); + + $this->_writeFooter(); + + $this->_close(); + + return $v_result; + } + // }}} + + // {{{ extractModify() + /** + * This method extract all the content of the archive in the directory + * indicated by $p_path. When relevant the memorized path of the + * files/dir can be modified by removing the $p_remove_path path at the + * beginning of the file/dir path. + * While extracting a file, if the directory path does not exists it is + * created. + * While extracting a file, if the file already exists it is replaced + * without looking for last modification date. + * While extracting a file, if the file already exists and is write + * protected, the extraction is aborted. + * While extracting a file, if a directory with the same name already + * exists, the extraction is aborted. + * While extracting a directory, if a file with the same name already + * exists, the extraction is aborted. + * While extracting a file/directory if the destination directory exist + * and is write protected, or does not exist but can not be created, + * the extraction is aborted. + * If after extraction an extracted file does not show the correct + * stored file size, the extraction is aborted. + * When the extraction is aborted, a PEAR error text is set and false + * is returned. However the result can be a partial extraction that may + * need to be manually cleaned. + * + * @param string $p_path The path of the directory where the + * files/dir need to by extracted. + * @param string $p_remove_path Part of the memorized path that can be + * removed if present at the beginning of + * the file/dir path. + * @return boolean true on success, false on error. + * @access public + * @see extractList() + */ + function extractModify($p_path, $p_remove_path) + { + $v_result = true; + $v_list_detail = array(); + + if ($v_result = $this->_openRead()) { + $v_result = $this->_extractList($p_path, $v_list_detail, + "complete", 0, $p_remove_path); + $this->_close(); + } + + return $v_result; + } + // }}} + + // {{{ extractInString() + /** + * This method extract from the archive one file identified by $p_filename. + * The return value is a string with the file content, or NULL on error. + * @param string $p_filename The path of the file to extract in a string. + * @return a string with the file content or NULL. + * @access public + */ + function extractInString($p_filename) + { + if ($this->_openRead()) { + $v_result = $this->_extractInString($p_filename); + $this->_close(); + } else { + $v_result = NULL; + } + + return $v_result; + } + // }}} + + // {{{ extractList() + /** + * This method extract from the archive only the files indicated in the + * $p_filelist. These files are extracted in the current directory or + * in the directory indicated by the optional $p_path parameter. + * If indicated the $p_remove_path can be used in the same way as it is + * used in extractModify() method. + * @param array $p_filelist An array of filenames and directory names, + * or a single string with names separated + * by a single blank space. + * @param string $p_path The path of the directory where the + * files/dir need to by extracted. + * @param string $p_remove_path Part of the memorized path that can be + * removed if present at the beginning of + * the file/dir path. + * @return true on success, false on error. + * @access public + * @see extractModify() + */ + function extractList($p_filelist, $p_path='', $p_remove_path='') + { + $v_result = true; + $v_list_detail = array(); + + if (is_array($p_filelist)) + $v_list = $p_filelist; + elseif (is_string($p_filelist)) + $v_list = explode($this->_separator, $p_filelist); + else { + $this->_error('Invalid string list'); + return false; + } + + if ($v_result = $this->_openRead()) { + $v_result = $this->_extractList($p_path, $v_list_detail, "partial", + $v_list, $p_remove_path); + $this->_close(); + } + + return $v_result; + } + // }}} + + // {{{ setAttribute() + /** + * This method set specific attributes of the archive. It uses a variable + * list of parameters, in the format attribute code + attribute values : + * $arch->setAttribute(ARCHIVE_TAR_ATT_SEPARATOR, ','); + * @param mixed $argv variable list of attributes and values + * @return true on success, false on error. + * @access public + */ + function setAttribute() + { + $v_result = true; + + // ----- Get the number of variable list of arguments + if (($v_size = func_num_args()) == 0) { + return true; + } + + // ----- Get the arguments + $v_att_list = &func_get_args(); + + // ----- Read the attributes + $i=0; + while ($i<$v_size) { + + // ----- Look for next option + switch ($v_att_list[$i]) { + // ----- Look for options that request a string value + case ARCHIVE_TAR_ATT_SEPARATOR : + // ----- Check the number of parameters + if (($i+1) >= $v_size) { + $this->_error('Invalid number of parameters for ' + .'attribute ARCHIVE_TAR_ATT_SEPARATOR'); + return false; + } + + // ----- Get the value + $this->_separator = $v_att_list[$i+1]; + $i++; + break; + + default : + $this->_error('Unknow attribute code '.$v_att_list[$i].''); + return false; + } + + // ----- Next attribute + $i++; + } + + return $v_result; + } + // }}} + + // {{{ _error() + function _error($p_message) + { + // ----- To be completed + $this->raiseError($p_message); + } + // }}} + + // {{{ _warning() + function _warning($p_message) + { + // ----- To be completed + $this->raiseError($p_message); + } + // }}} + + // {{{ _isArchive() + function _isArchive($p_filename=NULL) + { + if ($p_filename == NULL) { + $p_filename = $this->_tarname; + } + clearstatcache(); + return @is_file($p_filename); + } + // }}} + + // {{{ _openWrite() + function _openWrite() + { + if ($this->_compress_type == 'gz') + $this->_file = @gzopen($this->_tarname, "wb9"); + else if ($this->_compress_type == 'bz2') + $this->_file = @bzopen($this->_tarname, "wb"); + else if ($this->_compress_type == 'none') + $this->_file = @fopen($this->_tarname, "wb"); + else + $this->_error('Unknown or missing compression type (' + .$this->_compress_type.')'); + + if ($this->_file == 0) { + $this->_error('Unable to open in write mode \'' + .$this->_tarname.'\''); + return false; + } + + return true; + } + // }}} + + // {{{ _openRead() + function _openRead() + { + if (strtolower(substr($this->_tarname, 0, 7)) == 'http://') { + + // ----- Look if a local copy need to be done + if ($this->_temp_tarname == '') { + $this->_temp_tarname = uniqid('tar').'.tmp'; + if (!$v_file_from = @fopen($this->_tarname, 'rb')) { + $this->_error('Unable to open in read mode \'' + .$this->_tarname.'\''); + $this->_temp_tarname = ''; + return false; + } + if (!$v_file_to = @fopen($this->_temp_tarname, 'wb')) { + $this->_error('Unable to open in write mode \'' + .$this->_temp_tarname.'\''); + $this->_temp_tarname = ''; + return false; + } + while ($v_data = @fread($v_file_from, 1024)) + @fwrite($v_file_to, $v_data); + @fclose($v_file_from); + @fclose($v_file_to); + } + + // ----- File to open if the local copy + $v_filename = $this->_temp_tarname; + + } else + // ----- File to open if the normal Tar file + $v_filename = $this->_tarname; + + if ($this->_compress_type == 'gz') + $this->_file = @gzopen($v_filename, "rb"); + else if ($this->_compress_type == 'bz2') + $this->_file = @bzopen($v_filename, "rb"); + else if ($this->_compress_type == 'none') + $this->_file = @fopen($v_filename, "rb"); + else + $this->_error('Unknown or missing compression type (' + .$this->_compress_type.')'); + + if ($this->_file == 0) { + $this->_error('Unable to open in read mode \''.$v_filename.'\''); + return false; + } + + return true; + } + // }}} + + // {{{ _openReadWrite() + function _openReadWrite() + { + if ($this->_compress_type == 'gz') + $this->_file = @gzopen($this->_tarname, "r+b"); + else if ($this->_compress_type == 'bz2') + $this->_file = @bzopen($this->_tarname, "r+b"); + else if ($this->_compress_type == 'none') + $this->_file = @fopen($this->_tarname, "r+b"); + else + $this->_error('Unknown or missing compression type (' + .$this->_compress_type.')'); + + if ($this->_file == 0) { + $this->_error('Unable to open in read/write mode \'' + .$this->_tarname.'\''); + return false; + } + + return true; + } + // }}} + + // {{{ _close() + function _close() + { + //if (isset($this->_file)) { + if (is_resource($this->_file)) { + if ($this->_compress_type == 'gz') + @gzclose($this->_file); + else if ($this->_compress_type == 'bz2') + @bzclose($this->_file); + else if ($this->_compress_type == 'none') + @fclose($this->_file); + else + $this->_error('Unknown or missing compression type (' + .$this->_compress_type.')'); + + $this->_file = 0; + } + + // ----- Look if a local copy need to be erase + // Note that it might be interesting to keep the url for a time : ToDo + if ($this->_temp_tarname != '') { + @unlink($this->_temp_tarname); + $this->_temp_tarname = ''; + } + + return true; + } + // }}} + + // {{{ _cleanFile() + function _cleanFile() + { + $this->_close(); + + // ----- Look for a local copy + if ($this->_temp_tarname != '') { + // ----- Remove the local copy but not the remote tarname + @unlink($this->_temp_tarname); + $this->_temp_tarname = ''; + } else { + // ----- Remove the local tarname file + @unlink($this->_tarname); + } + $this->_tarname = ''; + + return true; + } + // }}} + + // {{{ _writeBlock() + function _writeBlock($p_binary_data, $p_len=null) + { + if (is_resource($this->_file)) { + if ($p_len === null) { + if ($this->_compress_type == 'gz') + @gzputs($this->_file, $p_binary_data); + else if ($this->_compress_type == 'bz2') + @bzwrite($this->_file, $p_binary_data); + else if ($this->_compress_type == 'none') + @fputs($this->_file, $p_binary_data); + else + $this->_error('Unknown or missing compression type (' + .$this->_compress_type.')'); + } else { + if ($this->_compress_type == 'gz') + @gzputs($this->_file, $p_binary_data, $p_len); + else if ($this->_compress_type == 'bz2') + @bzwrite($this->_file, $p_binary_data, $p_len); + else if ($this->_compress_type == 'none') + @fputs($this->_file, $p_binary_data, $p_len); + else + $this->_error('Unknown or missing compression type (' + .$this->_compress_type.')'); + + } + } + return true; + } + // }}} + + // {{{ _readBlock() + function _readBlock() + { + $v_block = null; + if (is_resource($this->_file)) { + if ($this->_compress_type == 'gz') + $v_block = @gzread($this->_file, 512); + else if ($this->_compress_type == 'bz2') + $v_block = @bzread($this->_file, 512); + else if ($this->_compress_type == 'none') + $v_block = @fread($this->_file, 512); + else + $this->_error('Unknown or missing compression type (' + .$this->_compress_type.')'); + } + return $v_block; + } + // }}} + + // {{{ _jumpBlock() + function _jumpBlock($p_len=null) + { + if (is_resource($this->_file)) { + if ($p_len === null) + $p_len = 1; + + if ($this->_compress_type == 'gz') { + @gzseek($this->_file, @gztell($this->_file)+($p_len*512)); + } + else if ($this->_compress_type == 'bz2') { + // ----- Replace missing bztell() and bzseek() + for ($i=0; $i<$p_len; $i++) + $this->_readBlock(); + } else if ($this->_compress_type == 'none') + @fseek($this->_file, @ftell($this->_file)+($p_len*512)); + else + $this->_error('Unknown or missing compression type (' + .$this->_compress_type.')'); + + } + return true; + } + // }}} + + // {{{ _writeFooter() + function _writeFooter() + { + if (is_resource($this->_file)) { + // ----- Write the last 0 filled block for end of archive + $v_binary_data = pack("a512", ''); + $this->_writeBlock($v_binary_data); + } + return true; + } + // }}} + + // {{{ _addList() + function _addList($p_list, $p_add_dir, $p_remove_dir) + { + $v_result=true; + $v_header = array(); + + // ----- Remove potential windows directory separator + $p_add_dir = $this->_translateWinPath($p_add_dir); + $p_remove_dir = $this->_translateWinPath($p_remove_dir, false); + + if (!$this->_file) { + $this->_error('Invalid file descriptor'); + return false; + } + + if (sizeof($p_list) == 0) + return true; + + foreach ($p_list as $v_filename) { + if (!$v_result) { + break; + } + + // ----- Skip the current tar name + if ($v_filename == $this->_tarname) + continue; + + if ($v_filename == '') + continue; + + if (!file_exists($v_filename)) { + $this->_warning("File '$v_filename' does not exist"); + continue; + } + + // ----- Add the file or directory header + if (!$this->_addFile($v_filename, $v_header, $p_add_dir, $p_remove_dir)) + return false; + + if (@is_dir($v_filename)) { + if (!($p_hdir = opendir($v_filename))) { + $this->_warning("Directory '$v_filename' can not be read"); + continue; + } + while (false !== ($p_hitem = readdir($p_hdir))) { + if (($p_hitem != '.') && ($p_hitem != '..')) { + if ($v_filename != ".") + $p_temp_list[0] = $v_filename.'/'.$p_hitem; + else + $p_temp_list[0] = $p_hitem; + + $v_result = $this->_addList($p_temp_list, + $p_add_dir, + $p_remove_dir); + } + } + + unset($p_temp_list); + unset($p_hdir); + unset($p_hitem); + } + } + + return $v_result; + } + // }}} + + // {{{ _addFile() + function _addFile($p_filename, &$p_header, $p_add_dir, $p_remove_dir) + { + if (!$this->_file) { + $this->_error('Invalid file descriptor'); + return false; + } + + if ($p_filename == '') { + $this->_error('Invalid file name'); + return false; + } + + // ----- Calculate the stored filename + $p_filename = $this->_translateWinPath($p_filename, false);; + $v_stored_filename = $p_filename; + if (strcmp($p_filename, $p_remove_dir) == 0) { + return true; + } + if ($p_remove_dir != '') { + if (substr($p_remove_dir, -1) != '/') + $p_remove_dir .= '/'; + + if (substr($p_filename, 0, strlen($p_remove_dir)) == $p_remove_dir) + $v_stored_filename = substr($p_filename, strlen($p_remove_dir)); + } + $v_stored_filename = $this->_translateWinPath($v_stored_filename); + if ($p_add_dir != '') { + if (substr($p_add_dir, -1) == '/') + $v_stored_filename = $p_add_dir.$v_stored_filename; + else + $v_stored_filename = $p_add_dir.'/'.$v_stored_filename; + } + + $v_stored_filename = $this->_pathReduction($v_stored_filename); + + if ($this->_isArchive($p_filename)) { + if (($v_file = @fopen($p_filename, "rb")) == 0) { + $this->_warning("Unable to open file '".$p_filename + ."' in binary read mode"); + return true; + } + + if (!$this->_writeHeader($p_filename, $v_stored_filename)) + return false; + + while (($v_buffer = fread($v_file, 512)) != '') { + $v_binary_data = pack("a512", "$v_buffer"); + $this->_writeBlock($v_binary_data); + } + + fclose($v_file); + + } else { + // ----- Only header for dir + if (!$this->_writeHeader($p_filename, $v_stored_filename)) + return false; + } + + return true; + } + // }}} + + // {{{ _addString() + function _addString($p_filename, $p_string) + { + if (!$this->_file) { + $this->_error('Invalid file descriptor'); + return false; + } + + if ($p_filename == '') { + $this->_error('Invalid file name'); + return false; + } + + // ----- Calculate the stored filename + $p_filename = $this->_translateWinPath($p_filename, false);; + + if (!$this->_writeHeaderBlock($p_filename, strlen($p_string), + 0, 0, "", 0, 0)) + return false; + + $i=0; + while (($v_buffer = substr($p_string, (($i++)*512), 512)) != '') { + $v_binary_data = pack("a512", $v_buffer); + $this->_writeBlock($v_binary_data); + } + + return true; + } + // }}} + + // {{{ _writeHeader() + function _writeHeader($p_filename, $p_stored_filename) + { + if ($p_stored_filename == '') + $p_stored_filename = $p_filename; + $v_reduce_filename = $this->_pathReduction($p_stored_filename); + + if (strlen($v_reduce_filename) > 99) { + if (!$this->_writeLongHeader($v_reduce_filename)) + return false; + } + + $v_info = stat($p_filename); + $v_uid = sprintf("%6s ", DecOct($v_info[4])); + $v_gid = sprintf("%6s ", DecOct($v_info[5])); + $v_perms = sprintf("%6s ", DecOct(fileperms($p_filename))); + + $v_mtime = sprintf("%11s", DecOct(filemtime($p_filename))); + + if (@is_dir($p_filename)) { + $v_typeflag = "5"; + $v_size = sprintf("%11s ", DecOct(0)); + } else { + $v_typeflag = ''; + clearstatcache(); + $v_size = sprintf("%11s ", DecOct(filesize($p_filename))); + } + + $v_linkname = ''; + + $v_magic = ''; + + $v_version = ''; + + $v_uname = ''; + + $v_gname = ''; + + $v_devmajor = ''; + + $v_devminor = ''; + + $v_prefix = ''; + + $v_binary_data_first = pack("a100a8a8a8a12A12", + $v_reduce_filename, $v_perms, $v_uid, + $v_gid, $v_size, $v_mtime); + $v_binary_data_last = pack("a1a100a6a2a32a32a8a8a155a12", + $v_typeflag, $v_linkname, $v_magic, + $v_version, $v_uname, $v_gname, + $v_devmajor, $v_devminor, $v_prefix, ''); + + // ----- Calculate the checksum + $v_checksum = 0; + // ..... First part of the header + for ($i=0; $i<148; $i++) + $v_checksum += ord(substr($v_binary_data_first,$i,1)); + // ..... Ignore the checksum value and replace it by ' ' (space) + for ($i=148; $i<156; $i++) + $v_checksum += ord(' '); + // ..... Last part of the header + for ($i=156, $j=0; $i<512; $i++, $j++) + $v_checksum += ord(substr($v_binary_data_last,$j,1)); + + // ----- Write the first 148 bytes of the header in the archive + $this->_writeBlock($v_binary_data_first, 148); + + // ----- Write the calculated checksum + $v_checksum = sprintf("%6s ", DecOct($v_checksum)); + $v_binary_data = pack("a8", $v_checksum); + $this->_writeBlock($v_binary_data, 8); + + // ----- Write the last 356 bytes of the header in the archive + $this->_writeBlock($v_binary_data_last, 356); + + return true; + } + // }}} + + // {{{ _writeHeaderBlock() + function _writeHeaderBlock($p_filename, $p_size, $p_mtime=0, $p_perms=0, + $p_type='', $p_uid=0, $p_gid=0) + { + $p_filename = $this->_pathReduction($p_filename); + + if (strlen($p_filename) > 99) { + if (!$this->_writeLongHeader($p_filename)) + return false; + } + + if ($p_type == "5") { + $v_size = sprintf("%11s ", DecOct(0)); + } else { + $v_size = sprintf("%11s ", DecOct($p_size)); + } + + $v_uid = sprintf("%6s ", DecOct($p_uid)); + $v_gid = sprintf("%6s ", DecOct($p_gid)); + $v_perms = sprintf("%6s ", DecOct($p_perms)); + + $v_mtime = sprintf("%11s", DecOct($p_mtime)); + + $v_linkname = ''; + + $v_magic = ''; + + $v_version = ''; + + $v_uname = ''; + + $v_gname = ''; + + $v_devmajor = ''; + + $v_devminor = ''; + + $v_prefix = ''; + + $v_binary_data_first = pack("a100a8a8a8a12A12", + $p_filename, $v_perms, $v_uid, $v_gid, + $v_size, $v_mtime); + $v_binary_data_last = pack("a1a100a6a2a32a32a8a8a155a12", + $p_type, $v_linkname, $v_magic, + $v_version, $v_uname, $v_gname, + $v_devmajor, $v_devminor, $v_prefix, ''); + + // ----- Calculate the checksum + $v_checksum = 0; + // ..... First part of the header + for ($i=0; $i<148; $i++) + $v_checksum += ord(substr($v_binary_data_first,$i,1)); + // ..... Ignore the checksum value and replace it by ' ' (space) + for ($i=148; $i<156; $i++) + $v_checksum += ord(' '); + // ..... Last part of the header + for ($i=156, $j=0; $i<512; $i++, $j++) + $v_checksum += ord(substr($v_binary_data_last,$j,1)); + + // ----- Write the first 148 bytes of the header in the archive + $this->_writeBlock($v_binary_data_first, 148); + + // ----- Write the calculated checksum + $v_checksum = sprintf("%6s ", DecOct($v_checksum)); + $v_binary_data = pack("a8", $v_checksum); + $this->_writeBlock($v_binary_data, 8); + + // ----- Write the last 356 bytes of the header in the archive + $this->_writeBlock($v_binary_data_last, 356); + + return true; + } + // }}} + + // {{{ _writeLongHeader() + function _writeLongHeader($p_filename) + { + $v_size = sprintf("%11s ", DecOct(strlen($p_filename))); + + $v_typeflag = 'L'; + + $v_linkname = ''; + + $v_magic = ''; + + $v_version = ''; + + $v_uname = ''; + + $v_gname = ''; + + $v_devmajor = ''; + + $v_devminor = ''; + + $v_prefix = ''; + + $v_binary_data_first = pack("a100a8a8a8a12A12", + '././@LongLink', 0, 0, 0, $v_size, 0); + $v_binary_data_last = pack("a1a100a6a2a32a32a8a8a155a12", + $v_typeflag, $v_linkname, $v_magic, + $v_version, $v_uname, $v_gname, + $v_devmajor, $v_devminor, $v_prefix, ''); + + // ----- Calculate the checksum + $v_checksum = 0; + // ..... First part of the header + for ($i=0; $i<148; $i++) + $v_checksum += ord(substr($v_binary_data_first,$i,1)); + // ..... Ignore the checksum value and replace it by ' ' (space) + for ($i=148; $i<156; $i++) + $v_checksum += ord(' '); + // ..... Last part of the header + for ($i=156, $j=0; $i<512; $i++, $j++) + $v_checksum += ord(substr($v_binary_data_last,$j,1)); + + // ----- Write the first 148 bytes of the header in the archive + $this->_writeBlock($v_binary_data_first, 148); + + // ----- Write the calculated checksum + $v_checksum = sprintf("%6s ", DecOct($v_checksum)); + $v_binary_data = pack("a8", $v_checksum); + $this->_writeBlock($v_binary_data, 8); + + // ----- Write the last 356 bytes of the header in the archive + $this->_writeBlock($v_binary_data_last, 356); + + // ----- Write the filename as content of the block + $i=0; + while (($v_buffer = substr($p_filename, (($i++)*512), 512)) != '') { + $v_binary_data = pack("a512", "$v_buffer"); + $this->_writeBlock($v_binary_data); + } + + return true; + } + // }}} + + // {{{ _readHeader() + function _readHeader($v_binary_data, &$v_header) + { + if (strlen($v_binary_data)==0) { + $v_header['filename'] = ''; + return true; + } + + if (strlen($v_binary_data) != 512) { + $v_header['filename'] = ''; + $this->_error('Invalid block size : '.strlen($v_binary_data)); + return false; + } + + // ----- Calculate the checksum + $v_checksum = 0; + // ..... First part of the header + for ($i=0; $i<148; $i++) + $v_checksum+=ord(substr($v_binary_data,$i,1)); + // ..... Ignore the checksum value and replace it by ' ' (space) + for ($i=148; $i<156; $i++) + $v_checksum += ord(' '); + // ..... Last part of the header + for ($i=156; $i<512; $i++) + $v_checksum+=ord(substr($v_binary_data,$i,1)); + + $v_data = unpack("a100filename/a8mode/a8uid/a8gid/a12size/a12mtime/" + ."a8checksum/a1typeflag/a100link/a6magic/a2version/" + ."a32uname/a32gname/a8devmajor/a8devminor", + $v_binary_data); + + // ----- Extract the checksum + $v_header['checksum'] = OctDec(trim($v_data['checksum'])); + if ($v_header['checksum'] != $v_checksum) { + $v_header['filename'] = ''; + + // ----- Look for last block (empty block) + if (($v_checksum == 256) && ($v_header['checksum'] == 0)) + return true; + + $this->_error('Invalid checksum for file "'.$v_data['filename'] + .'" : '.$v_checksum.' calculated, ' + .$v_header['checksum'].' expected'); + return false; + } + + // ----- Extract the properties + $v_header['filename'] = trim($v_data['filename']); + $v_header['mode'] = OctDec(trim($v_data['mode'])); + $v_header['uid'] = OctDec(trim($v_data['uid'])); + $v_header['gid'] = OctDec(trim($v_data['gid'])); + $v_header['size'] = OctDec(trim($v_data['size'])); + $v_header['mtime'] = OctDec(trim($v_data['mtime'])); + if (($v_header['typeflag'] = $v_data['typeflag']) == "5") { + $v_header['size'] = 0; + } + /* ----- All these fields are removed form the header because + they do not carry interesting info + $v_header[link] = trim($v_data[link]); + $v_header[magic] = trim($v_data[magic]); + $v_header[version] = trim($v_data[version]); + $v_header[uname] = trim($v_data[uname]); + $v_header[gname] = trim($v_data[gname]); + $v_header[devmajor] = trim($v_data[devmajor]); + $v_header[devminor] = trim($v_data[devminor]); + */ + + return true; + } + // }}} + + // {{{ _readLongHeader() + function _readLongHeader(&$v_header) + { + $v_filename = ''; + $n = floor($v_header['size']/512); + for ($i=0; $i<$n; $i++) { + $v_content = $this->_readBlock(); + $v_filename .= $v_content; + } + if (($v_header['size'] % 512) != 0) { + $v_content = $this->_readBlock(); + $v_filename .= $v_content; + } + + // ----- Read the next header + $v_binary_data = $this->_readBlock(); + + if (!$this->_readHeader($v_binary_data, $v_header)) + return false; + + $v_header['filename'] = $v_filename; + + return true; + } + // }}} + + // {{{ _extractInString() + /** + * This method extract from the archive one file identified by $p_filename. + * The return value is a string with the file content, or NULL on error. + * @param string $p_filename The path of the file to extract in a string. + * @return a string with the file content or NULL. + * @access private + */ + function _extractInString($p_filename) + { + $v_result_str = ""; + + While (strlen($v_binary_data = $this->_readBlock()) != 0) + { + if (!$this->_readHeader($v_binary_data, $v_header)) + return NULL; + + if ($v_header['filename'] == '') + continue; + + // ----- Look for long filename + if ($v_header['typeflag'] == 'L') { + if (!$this->_readLongHeader($v_header)) + return NULL; + } + + if ($v_header['filename'] == $p_filename) { + if ($v_header['typeflag'] == "5") { + $this->_error('Unable to extract in string a directory ' + .'entry {'.$v_header['filename'].'}'); + return NULL; + } else { + $n = floor($v_header['size']/512); + for ($i=0; $i<$n; $i++) { + $v_result_str .= $this->_readBlock(); + } + if (($v_header['size'] % 512) != 0) { + $v_content = $this->_readBlock(); + $v_result_str .= substr($v_content, 0, + ($v_header['size'] % 512)); + } + return $v_result_str; + } + } else { + $this->_jumpBlock(ceil(($v_header['size']/512))); + } + } + + return NULL; + } + // }}} + + // {{{ _extractList() + function _extractList($p_path, &$p_list_detail, $p_mode, + $p_file_list, $p_remove_path) + { + $v_result=true; + $v_nb = 0; + $v_extract_all = true; + $v_listing = false; + + $p_path = $this->_translateWinPath($p_path, false); + if ($p_path == '' || (substr($p_path, 0, 1) != '/' + && substr($p_path, 0, 3) != "../" && !strpos($p_path, ':'))) { + $p_path = "./".$p_path; + } + $p_remove_path = $this->_translateWinPath($p_remove_path); + + // ----- Look for path to remove format (should end by /) + if (($p_remove_path != '') && (substr($p_remove_path, -1) != '/')) + $p_remove_path .= '/'; + $p_remove_path_size = strlen($p_remove_path); + + switch ($p_mode) { + case "complete" : + $v_extract_all = TRUE; + $v_listing = FALSE; + break; + case "partial" : + $v_extract_all = FALSE; + $v_listing = FALSE; + break; + case "list" : + $v_extract_all = FALSE; + $v_listing = TRUE; + break; + default : + $this->_error('Invalid extract mode ('.$p_mode.')'); + return false; + } + + clearstatcache(); + + while (strlen($v_binary_data = $this->_readBlock()) != 0) + { + $v_extract_file = FALSE; + $v_extraction_stopped = 0; + + if (!$this->_readHeader($v_binary_data, $v_header)) + return false; + + if ($v_header['filename'] == '') { + continue; + } + + // ----- Look for long filename + if ($v_header['typeflag'] == 'L') { + if (!$this->_readLongHeader($v_header)) + return false; + } + + if ((!$v_extract_all) && (is_array($p_file_list))) { + // ----- By default no unzip if the file is not found + $v_extract_file = false; + + for ($i=0; $i strlen($p_file_list[$i])) + && (substr($v_header['filename'], 0, strlen($p_file_list[$i])) + == $p_file_list[$i])) { + $v_extract_file = TRUE; + break; + } + } + + // ----- It is a file, so compare the file names + elseif ($p_file_list[$i] == $v_header['filename']) { + $v_extract_file = TRUE; + break; + } + } + } else { + $v_extract_file = TRUE; + } + + // ----- Look if this file need to be extracted + if (($v_extract_file) && (!$v_listing)) + { + if (($p_remove_path != '') + && (substr($v_header['filename'], 0, $p_remove_path_size) + == $p_remove_path)) + $v_header['filename'] = substr($v_header['filename'], + $p_remove_path_size); + if (($p_path != './') && ($p_path != '/')) { + while (substr($p_path, -1) == '/') + $p_path = substr($p_path, 0, strlen($p_path)-1); + + if (substr($v_header['filename'], 0, 1) == '/') + $v_header['filename'] = $p_path.$v_header['filename']; + else + $v_header['filename'] = $p_path.'/'.$v_header['filename']; + } + if (file_exists($v_header['filename'])) { + if ( (@is_dir($v_header['filename'])) + && ($v_header['typeflag'] == '')) { + $this->_error('File '.$v_header['filename'] + .' already exists as a directory'); + return false; + } + if ( ($this->_isArchive($v_header['filename'])) + && ($v_header['typeflag'] == "5")) { + $this->_error('Directory '.$v_header['filename'] + .' already exists as a file'); + return false; + } + if (!is_writeable($v_header['filename'])) { + $this->_error('File '.$v_header['filename'] + .' already exists and is write protected'); + return false; + } + if (filemtime($v_header['filename']) > $v_header['mtime']) { + // To be completed : An error or silent no replace ? + } + } + + // ----- Check the directory availability and create it if necessary + elseif (($v_result + = $this->_dirCheck(($v_header['typeflag'] == "5" + ?$v_header['filename'] + :dirname($v_header['filename'])))) != 1) { + $this->_error('Unable to create path for '.$v_header['filename']); + return false; + } + + if ($v_extract_file) { + if ($v_header['typeflag'] == "5") { + if (!@file_exists($v_header['filename'])) { + if (!@mkdir($v_header['filename'], 0777)) { + $this->_error('Unable to create directory {' + .$v_header['filename'].'}'); + return false; + } + } + } else { + if (($v_dest_file = @fopen($v_header['filename'], "wb")) == 0) { + $this->_error('Error while opening {'.$v_header['filename'] + .'} in write binary mode'); + return false; + } else { + $n = floor($v_header['size']/512); + for ($i=0; $i<$n; $i++) { + $v_content = $this->_readBlock(); + fwrite($v_dest_file, $v_content, 512); + } + if (($v_header['size'] % 512) != 0) { + $v_content = $this->_readBlock(); + fwrite($v_dest_file, $v_content, ($v_header['size'] % 512)); + } + + @fclose($v_dest_file); + + // ----- Change the file mode, mtime + @touch($v_header['filename'], $v_header['mtime']); + // To be completed + //chmod($v_header[filename], DecOct($v_header[mode])); + } + + // ----- Check the file size + clearstatcache(); + if (filesize($v_header['filename']) != $v_header['size']) { + $this->_error('Extracted file '.$v_header['filename'] + .' does not have the correct file size \'' + .filesize($v_header['filename']) + .'\' ('.$v_header['size'] + .' expected). Archive may be corrupted.'); + return false; + } + } + } else { + $this->_jumpBlock(ceil(($v_header['size']/512))); + } + } else { + $this->_jumpBlock(ceil(($v_header['size']/512))); + } + + /* TBC : Seems to be unused ... + if ($this->_compress) + $v_end_of_file = @gzeof($this->_file); + else + $v_end_of_file = @feof($this->_file); + */ + + if ($v_listing || $v_extract_file || $v_extraction_stopped) { + // ----- Log extracted files + if (($v_file_dir = dirname($v_header['filename'])) + == $v_header['filename']) + $v_file_dir = ''; + if ((substr($v_header['filename'], 0, 1) == '/') && ($v_file_dir == '')) + $v_file_dir = '/'; + + $p_list_detail[$v_nb++] = $v_header; + } + } + + return true; + } + // }}} + + // {{{ _openAppend() + function _openAppend() + { + if (filesize($this->_tarname) == 0) + return $this->_openWrite(); + + if ($this->_compress) { + $this->_close(); + + if (!@rename($this->_tarname, $this->_tarname.".tmp")) { + $this->_error('Error while renaming \''.$this->_tarname + .'\' to temporary file \''.$this->_tarname + .'.tmp\''); + return false; + } + + if ($this->_compress_type == 'gz') + $v_temp_tar = @gzopen($this->_tarname.".tmp", "rb"); + elseif ($this->_compress_type == 'bz2') + $v_temp_tar = @bzopen($this->_tarname.".tmp", "rb"); + + if ($v_temp_tar == 0) { + $this->_error('Unable to open file \''.$this->_tarname + .'.tmp\' in binary read mode'); + @rename($this->_tarname.".tmp", $this->_tarname); + return false; + } + + if (!$this->_openWrite()) { + @rename($this->_tarname.".tmp", $this->_tarname); + return false; + } + + if ($this->_compress_type == 'gz') { + $v_buffer = @gzread($v_temp_tar, 512); + + // ----- Read the following blocks but not the last one + if (!@gzeof($v_temp_tar)) { + do{ + $v_binary_data = pack("a512", $v_buffer); + $this->_writeBlock($v_binary_data); + $v_buffer = @gzread($v_temp_tar, 512); + + } while (!@gzeof($v_temp_tar)); + } + + @gzclose($v_temp_tar); + } + elseif ($this->_compress_type == 'bz2') { + $v_buffered_lines = array(); + $v_buffered_lines[] = @bzread($v_temp_tar, 512); + + // ----- Read the following blocks but not the last one + while (strlen($v_buffered_lines[] + = @bzread($v_temp_tar, 512)) > 0) { + $v_binary_data = pack("a512", + array_shift($v_buffered_lines)); + $this->_writeBlock($v_binary_data); + } + + @bzclose($v_temp_tar); + } + + if (!@unlink($this->_tarname.".tmp")) { + $this->_error('Error while deleting temporary file \'' + .$this->_tarname.'.tmp\''); + } + + } else { + // ----- For not compressed tar, just add files before the last + // 512 bytes block + if (!$this->_openReadWrite()) + return false; + + clearstatcache(); + $v_size = filesize($this->_tarname); + fseek($this->_file, $v_size-512); + } + + return true; + } + // }}} + + // {{{ _append() + function _append($p_filelist, $p_add_dir='', $p_remove_dir='') + { + if (!$this->_openAppend()) + return false; + + if ($this->_addList($p_filelist, $p_add_dir, $p_remove_dir)) + $this->_writeFooter(); + + $this->_close(); + + return true; + } + // }}} + + // {{{ _dirCheck() + + /** + * Check if a directory exists and create it (including parent + * dirs) if not. + * + * @param string $p_dir directory to check + * + * @return bool TRUE if the directory exists or was created + */ + function _dirCheck($p_dir) + { + if ((@is_dir($p_dir)) || ($p_dir == '')) + return true; + + $p_parent_dir = dirname($p_dir); + + if (($p_parent_dir != $p_dir) && + ($p_parent_dir != '') && + (!$this->_dirCheck($p_parent_dir))) + return false; + + if (!@mkdir($p_dir, 0777)) { + $this->_error("Unable to create directory '$p_dir'"); + return false; + } + + return true; + } + + // }}} + + // {{{ _pathReduction() + + /** + * Compress path by changing for example "/dir/foo/../bar" to "/dir/bar", + * rand emove double slashes. + * + * @param string $p_dir path to reduce + * + * @return string reduced path + * + * @access private + * + */ + function _pathReduction($p_dir) + { + $v_result = ''; + + // ----- Look for not empty path + if ($p_dir != '') { + // ----- Explode path by directory names + $v_list = explode('/', $p_dir); + + // ----- Study directories from last to first + for ($i=sizeof($v_list)-1; $i>=0; $i--) { + // ----- Look for current path + if ($v_list[$i] == ".") { + // ----- Ignore this directory + // Should be the first $i=0, but no check is done + } + else if ($v_list[$i] == "..") { + // ----- Ignore it and ignore the $i-1 + $i--; + } + else if ( ($v_list[$i] == '') + && ($i!=(sizeof($v_list)-1)) + && ($i!=0)) { + // ----- Ignore only the double '//' in path, + // but not the first and last / + } else { + $v_result = $v_list[$i].($i!=(sizeof($v_list)-1)?'/' + .$v_result:''); + } + } + } + $v_result = strtr($v_result, '\\', '/'); + return $v_result; + } + + // }}} + + // {{{ _translateWinPath() + function _translateWinPath($p_path, $p_remove_disk_letter=true) + { + if (OS_WINDOWS) { + // ----- Look for potential disk letter + if ( ($p_remove_disk_letter) + && (($v_position = strpos($p_path, ':')) != false)) { + $p_path = substr($p_path, $v_position+1); + } + // ----- Change potential windows directory separator + if ((strpos($p_path, '\\') > 0) || (substr($p_path, 0,1) == '\\')) { + $p_path = strtr($p_path, '\\', '/'); + } + } + return $p_path; + } + // }}} + +} +?> diff --git a/campcaster/src/tools/pear/src/Archive_Tar-1.3.1.tgz b/campcaster/src/tools/pear/src/Archive_Tar-1.3.1.tgz deleted file mode 100644 index a65a8ff99e8bb9c9442d8cd86ad2c58972585c00..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 15102 zcmV6gTdf8gTY`Kjo(JIxcB>F z{+EySGaL*K4i4B~82${L|1x%W|IUC72YbVV{kwxZ`}^?dU~m66`^(kO$Nzcw4U9ZH zjq@VO(xcX}H)ydq9cPmyogKBFzy4|W-n~2bcZV(Z&7*4%Z+!RD(>MQm`HU^O*s$0C zdj00v-&yOVESHD<{xXj8-tuJGOXIRXDJOmL-7eM(^9JZ6h1g-RB2TC(vxDvF1F`3ZhLiHmWbEK8{W(VLT` z;NP%io}DJ}j-5p5WDdP!*_4%{%7P^+d-=o5-nHi?D^|;8mX}a4kE0U4?6P@M@L%HJ z%RCz6?+mJ8(FFO#%1qbPyY{zt$x>Frp#A7HO6JiB2v4Ti2vAV4@+4;O=E(?aj8kL= z8?BOgxeJ73`L%f#P2x$9efw^YjkCovj|=(+tD6^@tUjKwv!pzs+D7oHu1r+$uy3*h z*|Ug}w1oe|2;kq=6aD}mtqS<#bTp4nc?=yXY{FA?&L}mPFZ!oyCJJ{bH z-i1-Z2mIYU0lq;sC@C-a?+^R(A^)T(@pJe$2o(r_sSBrB85fV9W_ccuVR%+E_J8*8 z-MIrypcnijH5JP9Wqj14`O#v?rlXcI1zW7|FECxDW0WUPnZrYxH1T$2VLEMBP)y71 z3ghH{nx!yv%8PXQ@1QfM=UaFDg2i8#IcTB_aql7&h$^0^mq5o07?15LDB|)-2?UH* zrUar|#xYhioE8zB*+(tV0WCIyS(~IVjpp-7k{`ADEw-54fi>l*btk$XPxpp<&w>4{+ z?7cA2w|9~5dm9t|WHM1}`83N}21{+uig+32Q3-#Sz*Aa&3&1up0~Y6m3`VQjwZH1l zZr`V2xKI1or@hVl^fhyP_3ghcm~pN81*jP6mzbjjJF->DRs{i|cmZDm0uyNJkS$_( zKPi|}O*W-779$~;_wSQL0>goZ&ek2dAMV5+$>811=hdprb|-O(Fl7dS zxeZX3WM^w4Z?7YAurZN8C+Q?RD{wMTliv?P*kk1RS(L*V0BSlR!=ZrXiA7u;Z%_VS zE%|%9!_DXU_j$Ge`jRq<<~Y3?U2ac|UFmd_`lVqE3(!wS#-V8V}hc6O%Rh@ubu{o?@| zI=!Z%@dtZ8W#`!nmXHa9<$}RN5`$u65v+yFa}S%iOD~VvD&_sjjLNbR`g#~Hp}}r; z*^(9_m_}F=wkm3IC=(4z7ZeOEI|JhZ5F5Iph-yJ)vRK5E1eVPCdGAxm8Q`*$EI(wn zhY!|&uRHJ2r<9&v_IJI5ATBUcsSTQ+#fRGxMa_MU$UFm zuU)^E$NyacjyOibS^MR)C$F%I_5*x({n{j+CTYxe+D~3R{o(mPpB=w>^6L1>n>WX= zpS^tY>dBj*UbVaI{$MZ|cBn-E>#whah4hqwHdr{ID}?D3PdZ4S1cUGue)u>do&sMQ zGL;I+8O?6Kicb^#^^o`YCcTyul|4~y0h73^+gQ`NM;Pod?DX|(@2?YLq8{Kc*baPD zkS)f31Pek=3n(i->GS{McQ=pAC?_98n={W>*(l3k5~S$tF7p-W9#I`vCTGcf&PFj| z{$)JzwIR8AG>zs(9BfAr{pNg0M4MjnL)K2SG=^bo&)&5e@V-5Ix7V&~?3mn3yx6)X zL9XW6B-V)3SFw6|)Mnuti6_!U@2?0yIU1~^=|wgMkdJIm#VAIg@D`|m@ZpY7tjLQg z{nqggFWB+kG48YX@81KDQ)q5AR+JjVm_qlI#L)P<$JehZ$UQ7!QpSuASeDMuWmS_H zWC&)DJ;{~M-MPywl!}xAwY|_9dpgycN)o`IeEbw*Z<$%c?Ea z(pzi_(T?VN*J9fdaZJn$p(*j_CL*KVN2oz}a0PIln-xfn75ap<41A~bjAGc7?d({@ z90_vRAAd0C4QsbM9g{*?!($Y?#qZAmk%(D@|>T|s?(c%Z3DYAw5gHPoIz_+&wiM%6J zdvS!$EznidXdL^+8w@1)&=Tz3y$;PF7{ee-H)H39Vxq^_OWr;w4~GG#es}~~ZTCj+ z+MSQxzksN?GNJ$Ui-%YBAw7Q8Hw*Qwd9OAYF+nm-M~4tTL?4F`4{O77Ym&q}t$(CC zB*cWmRAbwqz5Pqt3aFmeYgGjnE65fm{D6ir2M|!&rts6`b+Nsk5lyVNxtu5BahTB7`Jdir{`w*3gF!9~|2Vj5y0Q zQqc3*#GXNPdCW17Ng`BC4iK>I1lEcGc8zH-XL*iB!6cr?W$d3VrYXm65N5Qy_jr}g zlk}~(fDh(c__vM|+*FZWHB3aZ0r|$T_=v~BNi&B-03KGS+>Zt8t4*LJR<;YdFi}5Y zr~@dhBt-=xV;@X&FOrT25hqt5Lx?K`l%-emEKg{Ms*46C*)PjE01N4%P&Ou5q`;(} z?o%wgWQr2+22Dp6=Q#!nfJ9oQ3~~*-OW1Dk?l(*&Lw<_y)>KAp=3yt= z78WvC{Xqo6XkjFX-4$XAPe?p<4F#~$=Hf<%wwU||534Fq5GfRk)tFJP3n~l$-$dnr zG_27#H7aF|E`dL_(oyo-lb$50ye1jcgxd^Ut8gVEyhfLxE!51gC>I1H?dU)gGfQl? z;2uO~5!sbB#-}kkXv4aZ0*%pDKbM8CX4{uH+feQ|m})A_blZ6*qPHZKiVpc4s>QYC zNP&$YDOSv>EZ39_BVxBgiszk)woZ@ngJUk50KG}xb~+aLHenQc#$KVz%I|TzA-^+X zS9g$~c0*m(!oOOI*IqQeN{bkHXqEI~)=DP^^~gR9F+Z5ymIGwf-Wc!M^849QpW3~a zT8w)|*P%TD^E5KzXb+(gYDCciss(j@L{qS5HE1=Yfm$@#B^3>di)zvujZ?sPs5uqA z>OvtaxCvhr+CCU@EqSC1M*th4f>`kK;n5ZzKC$vFTsHS(o#wyQwJ4#2^^a6y->Vmbt zkK$R9ru-z6iBLA{PmleOodF)mQ4V2%l)V%4{jiL2n%iwImEy<~Z7_103&1`pyqNN^ zQ^9CMj^JDTvN~u`SD&+nMPg?trqBznA@E!e5&%-TB;cRwopmuAvRoa>!qZVH3FdSf z=eVUuZKwck;0f?c0;xQ%!Wq3hT3Cjw5#H@(4huqFf=X(RYVfByvRQ*e@Q3DKquJA- zvdEfPF2doR5{(!F$vdT5KS@Bq#u*)lDx_ePnG)Fsbl@4fu<*une%=qU`1-0&_yQ5` zhM^srb)!M6u6hY{r9n-)v#Kjyu68ic^)yP$3Ivs#rCY*KAJ*jH)R+^s7M~ASYI*6} zO!wkLz#XvKpyE{iavPG}FfrNBuz&-WaeP{iH_w4|#+>91F(0B!ierumOoDYqr<%d86yLBv44chr&CZn(YV@j-B@N^fa0$JS?At zu)Vnh)d8Z$5X;6uLI^aAuGdIS5V+Fd%Bm}aDjPz`7k{5+uu4^WUxSc|r=hP+Zu)>U zC#jhOqY;3vb7T0u7aS}on4*0GgjfjKt@CJ{$E8HINhxazcsH(a=N0a}!kvw9r`nt7 zBdZOEo9!7#{?Is(`RELWXI`u64BgFRZd$U{5|8ABroM8wOKSAs045@vR;4|t`0VEq zOm!98Y0P0XWrecJ;S(4u5eCS$V!_#lkx(pKmdPS{7nNeK&*+)tLIIK$V4dT7mHJV# zHJPPZZVH?hHf=of_&?wxjJvk0!(+wG^=Kjj-!HvIzga=6&*r8@1I&p(hHEvbBpX)c zb+I-uF+>M9HZvNM#ivfKsnM_|4@R%=(#J44nwcFLj_DDO)2tE{uu*CZwu{&) z9-sK9G)9s_?C)2M5f9pJWGlgV{q?WwxEw^rp%AM-wO#XREtVzNpOcFiEZZ3f^2GdF z1Hska7_%p6RRi{K>rADtsk&W>T)udrvdOwsXt5@vC zUp$I`%y*w8Yo+^;z;#0cOdR+5)aYw#ZmWQK-r+_%Q@(1TJ8O5>OplLG4>XJ7TDupv zhFqlL37`Cp9Zwh$9&^kwK8eR~X=rCKhei?p!I6laK7)PZgog**CiTN(Q4#Wi)PQ)XVPr71>()KnK7*U{dqee}q zktftekYamOwro>1)U6M%xy&}Dc**T#AwDrK=wf)(OKM1&)&|o}Zf6yfdbHwBG<-6W z5i66f>HVoE8|`QE(-@ycDsDvNe$lNKC)t_M1(ZQa`Ql2ntNF+15NO7+I1PW+t?r}C zqkzaBQs@TC;i}Ly?YZNLw6pYbqT`ctt{5#6AX!A`rgu{8kS(Hg1-kE?kw1AIgc2G~ ztvt%9mAPu;jQl^OnAU<0t^X8Z=X!M3ZlrOFUP8Ae8IHE4?sNWZu$2a)EIh$}-(#bl zK)?3==o@EdKu~DwED!``^K~Pj)jYn*gDGlaoqV60J=C<@aZinG*%qFez)1F1mklc2 ze{jKIrcE)6PEFPbwJ5)f#3|^{~9N6A9BShqNG+pK_(hAk*ij)=L43NIC!b zj~6dIvgpoD%gS=q1XYSocF_&;#k%HBt;JDKsHAfd^wOg;8B|ca4cBRZ zgmM$ZYAIJXwQXpk2VKkq!o|W%X~RT=1hvkhb98=KP+5NDSSW&Xy)QSMr$J4d`P#3L z#HAvMkKmKBki?oW9A`DQJj)^`+g)0ldcHRX7fpQ4>-@|c`Is-_U-l|-zh7BMtJkv} za6x_eOu&n^gb~texSwEnvp);^GIKYtS>4b$E0*yX{SPpmMWLdy0sb7*(^7_}(JED{vki9kD@WHVF0{=J2#VuqNCIyyGzwm!YTSNII6NgEdW-GPe=txvj1~4`Lz>B z*x^*mYZRyDFuPBT(PdI6k|`s*094K9Wj$} z>yn{3+TPbBaiUEcwW3seZLK51spL8}Sy^hfF@igkL3s^~h}mJC#{7ucLUC*OYbYH^ za_g4o)hLgnw-0>8$*{D;dRheY|B=2;volxywtJ4u_S!*4ZnC|rnD!&i8P%w>=Gi^I z=t3uY>YiH@k74-*)L%q1kHM>`eM5dj={1>Dc5(73DdJ~teNAXPi}KX)eQ4_Bi_c7- zv18~`s9zb@{1KYq0oQ@yAvxlUiy3OPCI-ml@sqnI2Ed7CR^+#VqCu4 zvp}u-OS_gH!HZt|m-bfHP8Dpem2PeX`GnhihXv=GWo@ z38y3h$K>7%%Wyj%t;v-YloCpNX$i?TQc}~|c6+nPEKmA5ixoh7l@Ughz>Tx5x#5{J zL3S8zeg>XMi{bQGX8|j#cI2^4)M!+`{;M*x zzxfcDhTkXVAaK)OPe`+fsM%em4dz;kw0fkcw#^hB0&|tYxIx37HZN-pJ~d)}C`ac< zTYfLt(gsWKx|aSF%dVwRdq$r>_3~N+AS`jQmXe&2y3NZ zQ+)#j)_4+ZISV{*syyWK& z^SMa#SSEld4%wURyR30`M^^xw=67rgNG~=Y)k*2rxzIU54OsuTNMXVmmszlYM>20?kTtEUTGn z$D<^T@^i90Xj2l<(vdGe|0Y^lxc#6iBftK8pIy1B<|f^}Tw&UMqkSUW=t$K#+FqHH zIv2*;Wj7g8@TlUq?4+-tg_&^9-Ln` zRA-2S1KO~6LI@(wO9tkO~3kxYh{IV;yoKW6KlPAR#h-aWf8}3oe_km zWjvqTq}~#geU0N=@g{CA!Bt`mWX1DXNKqJZa`;}>LfcB9) zb-K?`8NNkpn+fuG>f`BjBbI*7Idf43Z5?>@0#5toR#Qa@3pvkpQj`J0Z@gcV>nKVZ z!;f5B>14Dj(+eofDZJrtrxn3?w9LG?o&%j?-kbiMc9lQyIIKYY)IzS3Vvl zab!hc!Q&GU{W$lAl)6UFGQ;x)c)aRNTpR7VBU)9hbBP!Z`aDXDc~r(fC+W+mJlWA- zX|~xZJL(JT4@Fp=NxyZ3n8e4Hp1K?c`es09{JlQ24|by%_moZLFo}pbPbE%%3lLLE z1tJS#1ij&}_AC=O!pYZkU{GMgM~&|5x5?5vO;C!v3@hQYX4Hmj#oDdoS(GI8Wbbfl zsoaebEO^7ZVa?!5IPIJWoN3YCQrjrgc1~GV?k6#*sOQ}iBP$%8-c%EU&#SrK)wVz>*Gspl5ag%WqdXB)biD}`z|Zxx@vQ=PY&ZJb}lh1Po;jECc% zZC0_#$^&R`fcy~QponoZ9_uE`d0#r=%lC9CbVb36$G-ZCIS+d^*Lb;t3VD-AXK=5B(LP(>!u86o?lM%G#{^UofnB<)WLIeO$x*ZdLV*kzW@j(`r)-(Rp}Czf1oJy@nTuY z`C*KkZ$Hl$_Wr?PvH^B{o^ks+MHBGs4m(t$-}c#uMzuZq$YUw$dUdA;U5qTB^J_`X zm4{Y+kEB{krOHrW8~z5W9P*D)aIh<1cOE#rmXLHkqt)a@E*}NB91tK;wpV?>-n?5= zC9M_VYK{3+%R4+_^eUdLNLvLMXR)r5H^>a3^)OPdkJcr(PP9qjsE7wyIJ@9fal6$s zstg>p>b2UqXU@$t9SY)sApQd?l{LxI#$*HjKnmSa3{{490u5H7n}RuHSgtU)slLAV z)bOu$0y}BzOxl*J*TaVm>{}0e?1(eVkKpnDE0zBf9*!24=#<0gPr~#N2H3z-w^J5a z0AQmmURTTfy$VGKB+PyBsCbv;*Ux}zDKiU?0qBe6!yJa1?!sy-%R4uMf4jTqV&H^(!k4Q z9#50sy{`h4; zZnb#4tTt4jY@WqxVR1x0bixUt3e4!)W8c$AE{*Iau7lRzIvn1<=iN6no4R$xvV5X! zMvv%pZzkPgr{g2&Ic2K1IwVq2;r^yf;-8e5#H9`Y>`+3PPL*Ck>BHfjgQgTieO{Vg zL=AZaZNbR>CU^zFg13y%w&xfMa`)zMf?*yp(3^aGUP8}-J4XHqVL{lpI0SOB`Y?_d zG^}_n31cafleGdFUI67so$&nDQ~MrAZ>r3L4SLpP>w83sWdF{=CG(Vq73=L>IDFAW z?REIkgX zLf}w9Y8mDLpr#6XE(6xAsY480EgY$br!-!hK~oyo4PmJirj3E9l*nqqE11;~W-aUR zl^AXZXMF~I#V6Ahwz|SrSJ>(bTYX{J$^Z_2Xca&fz7%9@mUIuesjhvdx8p_oYGvGR zWo-BQz5Zhyx);E)c2~Hn2ZoDbaOGRLTK}%rzpM4{&$Iq{M^%{PQQ=;5Lowp(GC>CR z=Cs+-ba(CooAVoO&0pluFoqh0uz>N-6@#x-1Zyx|l-U0=X+Am{_*ld%`cGShk^bt- z(-TZ9+N5P19~`KyTMulF^Fs#&f(~H?_BXywE`~3B(YkdMRKS1Y#mZi$>^3)Lj*TC= zc37nv{7G@_NB1y{3I4N6Ch+eW{(HEGB8UGamqx$k#biBD_L3&}R-&>#R*$Hx9~}@L z>qmP6f$@q6Y(e4uy%ncme{Uv8k?2eOirA~AAR4QxD33rt6W1mL#aT{B`I06itaPy6 z?UZ@4kcqd{Y5r2DVh z7t)EQ2rct$8RumZ7hWN<#?h7@{mOw&vMkQKu<-G>oj_Tbtl^^cGE{O_S8`TY5_Lkj zD1RF&OM0ZHv;1{snwcUi^-EhEdf+AX(@t=2q0)hYKT$^iYk3xj-(pBNro{6JzcNK# z(wyZB6LXH@akMHZY!sfJvq?rrRK`(GH>Kz_F&LxbV-D)diulk&KQl?GRtoT^{t`m{ zR?5id{!*l!D`ogoe~Fp5#H^--RQQ!b>P5I5t`6RE^ujEMx$iFoVe4F4&igQQwKEMG z5b!3tk*4!3%Xcc$+P99sJBO0xfn>*NCasdAHK&qIf_g_rN&f+ZDsk+8IO@IO247z` z5uS6TA_G4q%C|99#VYa>;0@`lu}So}b}F(|iOCGC5JqPoY#sY}b;sE!x#KKPP9t@Z zX}^-`eUn?x)Il(ez{Rk>mW8PJeV~5R(l5SZ%IPY?d-}k<>a$8x2)}SQJ%Z~6 zw;5hb>qKmO+A}c#dGqV9oOV=mu)l7PYtL*1yKjY9__Gs*dQycgYm+z{6GC1QZ=4wp zrPXPJ$iwUR?Vh(Az4nK|oeUuc)g@%wY;CJazTsQv0*6p(hV_ot=Hm#Q8{KNPtB}%k z?OW3aZQ?7fI#_>-Hc0pe3~&#yB1QFyt3xs%8K869jN@d!6A*@QA{d_&(h$Zb3#LC4 zhW8?_uSDJibrTmx)__444(<|@-+uv@wIFyCXu!jCWLPHfw;=2ouT;0LU=r7S;gmme zkcYeuu>ODx@1sg`VT5S$!l=pFAAgu<7Qg=%bWD&yygu) z6&ZW;>L1UlR|Rr8`~Jy`*ZQTM5QMiO@2aye392+=SF}Yt`0WK7u{vtE;koH3;OvqM zFr`l3p}Y(DtDCRT<9SjF%5&O+zc{-XA~a1-$ry2j*5-_U54sSK9W9sfM5v*UX&)y5$>-s-2kVjKMksO%1liAg0lMZQ;ya=q4Rhe$-HGyb-ngDebm~}Qjm?2lT;#@{t zsB0gkA&JV-;}_S{sVaCF6m3Tn>AUqh%3p2jd0#C~&I4aHRFAe6jMv`7*Ur#6Dms*& z$pvQt`|G(FE`AWa$SC1klX}~z^tH`G=`59Z?1zF!IZ^o%=%9RS}TvK^a zb&ym6FL}kGSQW zs%>;#co+*{m#Rm9sk`3m>x4<_VZV|tNv?(t&J3p0&}h;FP4(;~&OjwK*-V1`ug&D) zcm44O{dV`7WFG746sbIF>-}JlgOdZzGjBZyM9{i4Qi1sjX*qFr9GykC-C1{E1<$qS z@0WK2kwtS{uFrWUwgTgGjFqVAmY}0LWw$+POD@C!^!TjffRP35qHMr27vR7R7<7si zLhn;EdHD$A3Fa86XntYIGSAA5wt79iGR|#>AVGBt(+5wSyE54!dm_Bv=w2?cMuKcI z1m&A1P7conx*GIEr%^JGM#(%W&xtW(U{y)MEzq+xMi+Ku!Y{dQ>$}S>jjnA9XoDKu zsg+&7dl7%W2@f#;IfNGQVMvU)DKl(-osH-^seHQH*Dqrixa{3t?B6$bQ2X4vG@TxA ztbWbHi?=}q42#pGMh<93%aBuVnXSerA<_3N zVGq`=VD9_z2{djrAnX6t3=@~(DM040oo4q#>ZOf(i0o{fjYO{CJl}|a0l#rnjsL01 z5+~=rH2Oq(xW<@;P>V_kd=iQ4e8yRhT2=Q^-#`jKy)~WCAGUvKlcUk?k@1C!fa~;_ z0IF;eo%6xX^VJew_1eLlb!$M=hc!pAx8LjeP?y|o>v~Od|7-T<+oyocUdQpG5Z3)F zT@^6Oy-$M)wnx?C_Iz%8pI}%WY7iVxo=g}Yz4w|CtY*XTUuDUK5kgnH0R_l zwYT~HL%VRdZiz@8-o6_PbAg%4l_tz~O#7VWh{0&S z1WWVyV!F6HaPe~uQ2XFx$);CQ;Q>c+i(L59Rl&aMWxJM-cGEkloTf*cH*JfRp}Taw zAqZZ7U1|NOxns_U&zG;&JEQ@jRXwe_XK!1nxZ#Rz53covbzdW$g2>W1WEzX*ST`Lug(unjnmqX1WWKym`rFH5CXzawZd5&A4cpvE>4nZS*5ZQ63DG2*)LL~Mk3|I75*zvw}lat80=iSySIW1YOf?# zcVGtqf<^qA3tztnYUrehm?XIAhyw823NP%L2w)C&%2b|eL;)o7pbq{6LoNx^+Ze0BA&$s)eS5;rq-1W~F}!gr^csAbo22wenmM**}go{L><_X;eTolRdUaHO_r zLy;mTe(yBgkqAL>ShH2$jAmOsH9&qt{;J)Aj(Q`HA+WE7dxvh@){bRk zH%D(;>?G-UzM9~S!~le}RCPc>Fhy`vBP*quu3M-aCO|t+w}p;vq@h|)^mCMDa|#it z#+3*n#;WH56eBndeqk{a0P~A5Fv?O;?J-`%hcId97y0B`=u3G)j&Ivt z6}WLEc!f5!-D34i9^mMFb)&LhWR>ew6in^?Qfg0Q$>rO>iDB#WR?X%`n^)9sZL{g) zodR`}z|O|#p9w<8^IfXZIf!MH&QNCQM#0}BbiA@wABgTxv#j6i^+!?O!p`xB_*a*y z`f{8;JZN>2t&j}`EDk4e(Qu0Bz*o#E9Go7a5dUgo##I^L`VP$K_m!Da$zAE4F6OOL z&iUwS&>vmDMrWe!$S)D76uPFxI`X@mV;rX(9xY0h2q+ax3Y5jX*iO687mUi>vl@9_ zt|q$b1Qu;Nltr)-#)8tiIIE=CrI8VNyy4F75Vva{@y(mvT`%~la!FpwSB;Kye2g-l z3vVI|VNe}ICX+5Cg+J`iD)X90R*%dCIk*ee6+oM-Yux6ac!9R(w1U1@)uny|@?i<0 z@B*Dd0vJ0Cz+qtdgUv`2$1+Uv2vAr^lf0S9jia5)Xm`{mfcj|AY23FAuSB7>jcbZ_ zzfZ0a3W*9`}V3k91>p*0`?R8coDWlA?Nco|Zzs8;jMLuSA>(C-OP0n)4#VXvNb6;AJ#9jZ#F? zn#}Sf!jI$WHhmVd{l#(OZ zS~mI(0~2sEA8)y8Qs%nd2$> zm(QNOI)3)*)laXEU%q<&;~NQ<{nQz0{3L1^{CdDy;_(Ss zyx+@%JcoESqXvvR?x@#lKOE(c^zBHzAnWm5c}_8W7%sw->bqs=DHdWotsW}Gofd$m z*EkQqXa8a+hshym*jATS3w6No2sDK@W~C(zm(^d_wE`MF%4f8?751WIs<$7> zRy4}|opPUeOW;@hHHK*$%IxOS2v(5l5S89)J_j-VPTY)$x|j}!nrq!tT8LoE0N`6; zhkHB+3vll=TjesDiSYqhWmwH5hE)uvbL47Qp`5!iKg&7gkfP*;l=uec2d|fwponK& zBmd8H*_`NvWFgwspp)q(7C1}hb9t9KF0R7KNk;~-o*AAngy*Aod*+Hv3pTa|Yt9pM zbok8#oQcR?rZ0G;N2m~F+fqst(NI(od`LIF17*nkF6}!b9khGc!;KT)weJg96cZ5= z4;?9Bppud*qBR(O4q!m>k*Ss^FIikt64^;Ij&M%}6rYa;AOar$Ndb-icLf4JLB6~) z)8!oc@DU&0p1EXSY`r};hN!OW>>X$=vL&I09{_g%m(H^Mtr)`RX@Uk6>QN05de*d& ztES$b@J$di3lT3-So(oB+z?6OUYCpkEm+_5ka2W{2nnVLHUxc3Qf9O)fR=F#HhgRZ z{l#5zNL8H0n27m=l_1N2OFeZiQuvjz26Tm>Bu!v+&Bm-ouo7&0ms~C&HTGdx(K1#g zTknxr2qtl>k8mkk%$zq2F_SnFF%q!>d-aTF(HANhbePTnr>IVXrnTSLA@ zJELT>{;7|X4HID%D{_^K+#6aiRX9_y`~sfkfHWp5=O1;PhO2LMOo-Fj zNu2VXCb@^j$Fygs#(*ynDi^BB9lbe-6QG`SF?AH(@HawYuGL2IEJ^7wST>cOpUpba zW1tw~Q^c7x6j%$iLa;m&yO^yO7dGJx$}oU})5`b7STsfXAsvBT6jB1;(Q$CQe^5zZ z9y8W}w5-+Hca)Ne_tmY(vfk)3t1jei!G=A2EixEbmpH%4x zh)_I_x!J}UtaYe8!x~axPC(y2U5zYz2o^Hx zWdU`)@HIo}N9!?q4Gi}~Zy}xpnP8ZNKT@$!bX(zNDNE`s>p8#^fu9q;C!j(idsiU$ z3grGT2f5FuLSQjglT1lr*gCoyRULAij82E`&fHW}68e~n+nz^R7!a>ESBnjmZ9Dtt)nAUVT~S)qeo#{rdS) zvVo$m45UB7nEfv^YeK+UfokJ0RK?NW3)Nuz&F#a4a)xCB5aK6X%eYII57ZAYAImjMTg7Dn`M^tHOK~a21-LWgK4R*=lxTuht~} z!m8APh0BLTG$!dJWIU(_mj@qKSAsOL-V zT6I}`oj_;Lwad;U#0|H@p=9+cF7m8#fo!6%+*znn=YCxGnSUaxAUeP8LCSRnY^%w7 z&&`gg)NY=l$i@jxMa5R*GBw34Xjeqo+ZUY6&AJLayByQx^jLE4h<#NNcJqF%2ln?3 zL(MBE(Nu9QJ#Cr;0EJ4NCU{(jq=dr`Zd40qa8|WtxT=yw8PIB6YO~g%D=!m~^T6S| z5mIX%QYTSTu04KxA9=?>5M}ewNG4`;SDd3)L7;{cEGdkXaH1V~V$?t$`03BCLrLBs zP&q?S1bDD6_gz@aGcIAGN~HldUB9TgL%q{Of1i>6Okoj1V+t;v>rP)xgfC$uOUg|% zP3iK=)Rxf_chd8Or$zSbOS`=1XV8sh!!Am>F)@*OoSrVqbcy)0=pt^v6LQT zew5d~bb&jJl|nbY-8N>|e&&xN@#`w}MM&8JQCJHOc(y9pJj>q7d;(>^|jdb8RSs&@S2cp@7`9iNP3@Zh8?cW7#8MQ1p9pp9?PPi*J8Rm~MA z;xL*>T+2~CIb~D|+Xnm*`?%h3y47eoc{l+XLRwa=N<7rgba88MyE5IFxP8oQjgZeG zI+tdbu#Xo}x&nQ5PC1QIPHu21aj&B_B(`>0anhoxHO6r-i&kC&@v;R+-%%$-FO^L{ z^&Ybqrm1fi&#%`my4>~q>^WXLp3>g8T-x~b; G*eUCx;<8h3z=W_~=#y%fwzi7Z zF6e~(UYxMxXj#vXk_P)Q>`@Fm6y09QmuBy3q9Du@r?mD*JotSUr*Uqach!O-sHVMA z+-Br+!(EcmXqPsZv|bz-Rt=qS!tSeRB5)mYBMh7;zwRdJUzJ>Y| zPB47oOtN|ltZh)yzK9JbcwyUMt_-zp`b2|tYEf13z>-4iDC!!q<04a7UO)Op9Lb(g zVblWA_{7{;mq1TwTgMJou0~#|@X8lr(JL~X=W2ab$umr;(jMqao#H(|EKjG$BdL~v zt@u`-kOg-9NXRCgR3w+;1I$u%1Qklq9X-o9UnF$OtzbK1ofTd{d{wCYcDyVeMunmj zVv$VDH#7cbmS?M_^NLR7!aJER&?1Ho(Zb6Y6&On{Z-*v+gO5#cXsTrfdxSHc!_UXG!RpPdzhz!ENXa#Y7IKu14g0VT g88&wP+Epg1tDn#D^Zx(<0RR630BLZ{D*#Xd0JTb)UjP6A diff --git a/campcaster/src/tools/pear/src/Calendar-0.5.2.tgz b/campcaster/src/tools/pear/src/Calendar-0.5.2.tgz deleted file mode 100644 index ceb090404ccf56807edf9e6de49411162ab925ba..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 60164 zcmV)%K#jj2iwFP!000003+%mVa~rp^0D8YZSLHt-x;iEmQ{1%Kw5Y_fvd&5V`|EBj1I%C+l0!*$X37i60UC`)qtR$|HzrQ+vvc9rzYGWe zv#O`nZ0_#vvj1WDG$a4BtyXh;hqan5__NjCX*S`v-S$?Ctqh;?37`ERVdUABJN3Qs zsJqsxH`kau>W%x}=%Ty!^7!rM~+^G{l zWoOifFBP9X{P%1eJpK2~o!;<|2*1W0HuK#n^F~nN-08Wj2Q9mf?+tF)nfn0S4%m3a zg7E}^kX%g-L51|VmnzB?V<;9CK3 zjKHoh-Ki_EcCXw~Ah7mEK$D?^WMiKH;LOE}m+qinfAHXC5E8KOou31QQGodNW&>VB zz#Cn7Bi9!Y5$C>p?#!U49Nd}XyMWv1!H1Feg}UMg&Ts-FJ4T>b3aO z=WeiTFSx{!a|S@okwe2j!=YjCj-I{mbPk=seQ*D&CP60vlztg_LoXnV zeI!u?jXHY^g{Dk&w@zd_&R zE1G7%I@9S5dm-M-nMdzk05_0ze}aiUaRMZ(U+;~F`wjkD7M_j=?!mxy`uh#~$PsEp zF-k=7-!pGAwjuZmm~r%^fKO)QaH+y#J|p={Zy9-!o?#xB-euE0QpmGBDJ?)7bA%U7)=$iwg;R z(5&y&+xrdqmA`~J?jE$8&F#(R9evqgc@tF-}wJOBxW&ta~f%`Vvg zw)UPp<|5(Rbw5L$0SZBoDtehGPj))cyyyQ8WojV4+$;WR1QG&2L1mDG&`sum?CAv{ zm_RgwjDZr@fUOb>?Ar06k$_c$OK0?%I{UBj<;d?{Ixa{p6wepKFRTxs`tF8?1yE}0 zf(Re6D`zkRxiK9Nl|VQ}Bsv|5A}uJRQ*U%S9FKxafO6pmuf5S9u=@HyG7bokY(3d) z;=+N$G6Cs}QqtFPdp7Fdu;)|YBE-e%_n{Ik4A3tSj}D45B>wC16}$ny_j(b`4&C0E zM&b0s)FZ?!uTFrDGiLxTBEzTx9|CU>uSUPh8r7el<9NVa0|YkMCL`hRgPcV*?*hpgG!&{IHPy{-}ML+b3bEUTSqQE9zf%)X%NDtlMa@;3!4P6-8sWZhD z1(ysT*cq7%@u(tu+`xM!{}Ev&>jn3NV4%q&=Ak?B)x?J{v_^E-K+djV^WC)zcP-SF zw(BsN*BZ78pD#p(OUGYhV_F~__Q2c?R*b!*p zQsj+*xd)*COuK7xnAR9dxbQn_eHw1_f_XtA<7P=Hf4EB{@)~DU5ilA!Q~S=1Ul_1u zAt8(Vn8d zpi(K;ANR7sKq3F1?_m!zbeDx9)t`UD9@+g;M;)^;kgX!Rsi3tBg|<~FwCzHn?Gy@a zw@_$%g+hB=D6}VqLTfdP1y}5BXcaphTE)(XR>I#@rAKKcm>ak zR>2daRq)Jc6+AUs1<#FE!IPs^@a$+6JUv4}_Xs68&Ji5#Vh^1gh zd-Uw^_0jTh;O!}WN?yI^0Vl27r`)=|642hLH<Ad<0gh)yf*X?cyhwm})=@aTYjF^>62L`5 zMeiv*_148{F_3*aq9_s|opKf{oXKJ4RAc&rrv3~Ml#7Q~v=kw*#R`zw$omrb#k13u zJgho(r_(}Ze+aq20SkcwL4pFYMFCJCxEt4^J?uC1Gy468=H|2CyL3hu?qGZ&iW)9J z5htKl#0kiB1KQba@91tosg6L&u0WbI&j{59fN(t>!&~wQ!uL-9Uo$_bZV1m2!W_Mr0IOh3 z4nNKaa3iiHFQ@v02c}<0!}R4!8P?Q6ZEd!n6g#NT$U_L7gSd~;COIo@a&J(dd}myz zcga4Y57nROukyVqQa^2zO(WQ8VZnXcJjfioDr|H@F%4K{aZYY3CBg7H!yMa3$qL&f( zg}afAL~cgsa7qU1CixFt9s96(y;k3QL^ND_HPtaHIRO!3*veF8KyXFBo-U z?$}D@j^^f8b4A?Y8=_jd!qA8#xsY_6h*M+--;nY&O6T4bMp?`)npYrno8-CJ=aPYx zbtD^i{R7E;Ge!oRP02x>gC|(h{}W^uIa&%Q(CP+(L+3xxA{Z^%3zItPk{cy;`*D$^ zenHd`*rcGm-_SIQeHpxQ@Zhe4RLW;%kDPUzYD8+uK`P zTMWMJl<{A;^X&f!BmLcj#t-bu8+OQd-Tg8Fxd*#(27movJn3#T|I#}TuDyP6+1>82 z9~w}D{<24#g*=Z4*q;o<8~cq5Mz+lseEwVoX3xiyo2hqk8L(<^gSDPK+1mtR-DW4C z$RXChOvkgyonUqXYBuvh%|-8Z+IP8uQVe=9}I8lQ~z8H=r;m+Die2E-ty|JDv{u zo4`-*=Cyls2%uDNIjZJ8og&BsBuvGyif|+RWC(%b3SWsOk zA`rub2y20*HypZs4_5oZO|<7L;j?EmP^zbXhv@-hY(F77>>zyr)DsQv0#%2?V`MZJ zG6w~8(XU=`5Cc|ZHwobS%YKLHD`D-5wd!q#yXr=Bx6$5)6{^!}cXpZrwWBW+wl3=b z@WXcx*bnR{IbS3o{;Qmg3%5bSH*AJB(|#B_C@iutTXEiwF(7g3_T6*Xe)dIW@0?Y? z7e7@i&!4?IdUN>f{ptI+Z%-;48|=T|kz&XTMBl@nTsBpyAHIBl^!()Q`#(;PkKR3d z{|r8EJpJy$Upjuz$7uEf1)GOla;PfgQpJRdFdRU5=DX>59=-YH<(s24OhpO6mHV4l zVpttgm5^#=9b%+9`=a$2)DOo;r?20>Ir+6x3pucbpp%Q9{(f}y{~kX3;~46+a}+)1 zu(zTUup?HMig1G~qQ)F{3|q~Ci!+8SjiVlgJ%g+mI6ieMj7-8!DUN{Ja&edX z)6m<0|7?0db@tB=-him;>^II1_&PxF*bsNsXJ`x)`zt_YZR%clK7d%$qi=Z^%$EE* zt(#)hXBg>=5)RGfRb&14FFM6071eBQ?> zL=mL)-2=gRe0=cvK^mpFX)h#ypn9oF{v<|>@7AM(B{?!aIYIyyr0GqAe>j&0s)raC z$Z@Z3@OJ`pe309{9$OcK&;{Na`0i7!01N<3*=mI18#)ktFbm@~jzwcX!x?s^?68(u=UqVuB6AKatoM#cY^R}PF>+N0&VN9e8+kyOf%hL7 zTkQE%q`JYzQw0j(`3!{;) zisT-ZU<@Nx*~o{?*?0__#E~5#0XJNy;|EaRHnL-(901| zc;g#NY}g3qg&5+<()p6@cbdqy7yS@3{b%HOD;#1&+Z)b6^XqJ~H`R4Ky#!&}tihCk zk1hDWFaE!T|M7QE{Ewx04FOHFSbo|HQeHBQyv3?UT!6mLLF^rc$fvCag$4ij73QJsCTH(?}mhj>w z_;9KceyA5&77KHa%V*!&4QTgao{%b~69PF-8Mbzttqn|GF&Q|Ny@F2F!x=fj2}(OG zwHreAAKO^+Pk4tQqVU7EV;hmHv1eh_+1bGBC2^@Z$|ZQ!^}vtwUUY;NHvlcM*2x%k z396ei>hW5n1te5ctPrn;2mkg;iaX+!aLrA^P;!g~Lwc1^Pw`Q_9$(z_dRFdI8%>Ry zNR$(Ah|^3;xYOVXz&JD2*$Z;F0P(Isg#a`OADQr4Ix8A^o}3GJ>@hylxX;3Dx%lcr z=c_nV$-PNPJM1Wsj><;_Sjd1igRg2DyVR_8kR@v7NY~5(OdTOP|Fg9NQshuU*oe+# zp$Tx46mAG8g_zoB$z{8sxqK|ps;=|)x(o!2n>eX8U4&Oiqs9q9!qvu*h7x~e1c{L* zN*2+-h=!E2i=MA~n8j2QjkGR3BcBpKOl?)=POHKy7sq;mQISq$@iE{tR!NWx&8wzr zkvN$Wn7%9|gp+D!$>F4WnW8um)of{;R5gb{Hmat|WW^8;83KX9$32gyAS8u0nNj$x zACgmxrX>t8o1E}TB6 z88OB`gdZ$yw+hg<5>+Awa zG~~XX&d9%pV*j3bz0dKPN+@M*nWIyc*ZmC}tgiDfxJR!^64k^U#N8st&ay8QhJ7Gz zFh*Zo;7wjTKBKw89jR`ytIMTRv}Co_^MOjK%o*1dK^srw<&%#C#F$&#NH(!+Dd%jb z4+1@<4y%nXw|M+~qiuk+aaaWZkb`rdXh`BwwH%H8m8Q-Jv%5T0H1Zvj+9vHX<`I=} zxmR#rhKUbxyBkwh-Pr8rlBCCvH;wGd(pZJbLP;ZIRhiXrQKis0U!Y&2bBj6+9Eb-} zerSZUsf-$1RWPq`l#6(-;i=>K?h%H_L>IQuW0@L71z2KNsgbRwMleo~-oJnQ{`BPi z%U^yudLNPhM|gVt{`Ae;lb6qrYB8YIjf&2Pf>`<~Uv73#$~pJAmzG2x)IhsWYSB8r zD;q8&ibRasYR5`%vFIT)V`3H>xtB8GxHfXi37uPmW0O)2rUD|9QVX4$1{V|n(#?6< zjXHaa3z5SC^CRxQVOStDm9$0IL)RQRjKM>oH#9 z%ew1PQAZuBhrK)3WXhByFsE`%6tr!`I7Pb@@luugmk^cu@S)<&3&&PhDaPsT#|r5Y zl~20dW-gK}R*meo$xSA3jo_R_26};A#l-i6f#8>zWvLfGVu0TZ*@Y0HpTX`T)9@o& zO`8k9xPczomB{xz)qP)jHPTryEHVmC*xxwwX=g`yZ7tq^Y_1prUT-`bB@SzXsY!+w zNfQyBOOdt>|I=Y^Ep((gg9iG37?6bPv@vNT#y{?*gJPbM1E|ka^24gEYQ;~RI~{R! zy`bQa8*juxczgz`!)kuSp!S>!m#RgKhP5^i6zp6USJSm8?VLTTJf}DKHZ!$v8uav2 z0?jPC*{U)Ar^)}=qy;aoZ@VjqMMd9n2Y!tiaObqKD2I-_8J4YOh6V91c34(3C<_b; zM*iK=kZdnAB#3vhL-J@vGv(1@Ger|*R!@!q2xy|MxqeU1c z4VU!{eo;Ah7o)bbtdv{nfE7Jl1awiEcNfF6yR5`p>F_+d$MZ>(h8Fj=6%SjhxvWk{ zXKG80nsu|1?)b4e_h15=IfhdD87(Rp?_dC1%gV(&8NdRE4;@Vwn|CBE?_kK5+D9SM zcQRy;?&F-(gs08Pchw`g)Yc0z=bi<(Kl?P79Vtt54k}`tV^o#%<)WhWE{1cdZ5v{J z4~Da_!9-xo2-dG|01@kZFo2Kl;e6D0?ADlxRhv|n7PQh6>(+7% z<=C2p&g={C_3vc7mzKo$e!PnsZ4NDYbTj4j-3;(j<{YvY-1h-~bRQ?QCdi{9ZntB5 zU0RS!zu0>_?vYrN@H8od2YAPF@PHO+w5U+m$NtuaercKhwGDkC1D_*eDMP^D%|u^X zz<+I{{pgk^I{f+ZK<598Xmv zE=EA`@9rQIcOx-uM5FG0un<#gs8UNw zs=4u$!EF8DYXsoeyvSQ#2tE{9tci5^ivv#r%PH6hN%%655rFExhrZ!)Yz$~P)(ASx z6oVs_%%=tyB+Va!dLDAnlpzJei&6Njf=$#hXbpH8v5TJ_;3AR4AyFRY%fFeHc=I`h zWBT#HM2f`ax(cy3uHblcLsE>f3K)vQK?+eL(Tevg!<6ZwZi|4**h90Qc*3ZpJvAo+ z>?V1w|BkSrng_%JDaIC;H*Dj8wDM(_eT5Zu((hqZOX zl_JC~1e8zO5OeBV^P^Uz_)p>i`B>7zn(IeeWgBDU>GP^Oyj*XK?rK6OlLOjwlVH(q zF495E9MI$kZ%IgwTCa*OQn$jX{pjlh@^J7XO9dqJ|b>_j62d~`Z zK`JdpMpodzd@>RM$fpw3M`bRM>INv5Q=sg{$n(V|gdJ9?3r#6!Y5@5pr3i?(TCuI$ z31Qzh`h}t3_@7m&j%`9s-MA){Y$sH)EhjeCj6hk+bpZ)`R<030WR_$wLOs^gE*V(^ z7Rswi+V*;m+-<{1xx`d${Yb%t%xssDVo8bEylA_LdDr|%No$%ljgu4kUu{Hi2ZFl~ z+&46FL8rlDg0~GS2^+?VT-t|68lQz17@>-}d&J<^6BB@|5R)IWa5G z|H|{f^8Bx$^S{*`*~!JrxJvDDqqWOg?N0kiXXh~!$S!(fH-8J|ft`6^_gDY71Za)3x0U_Sk`G$f;r6CZvMd5shL>H8q%OK`$Y|uj~Z*Y__<8GPIlE-P+xRl1WoPt?s ziN*Wd<>9G7Lyj*0nsA6}(8{oCtok^Wx3R(_)x{e~IaU?4ZJ5NJ^LRDN@gfbfN=qt! zh!3?qCRJIEu@OC^W;`(}&L$0V{C0bJ;fRYg==Dy>NpU;>Fu@vUbO9WTH6!OVTEqSUXZi$m8@v zXg}F7OC(*4Lnna#%aK@@Oypl{FRL*`b&xpP)pf7idWzPPBqb($S(MC z-TMS6B-&VH4h!A!*|cj%?nV?j3`I6pcEFlRC|J|C+5rpZ#Y-vD#QpPVKHBPrb<)OW zh5dep^mJ`j^!2X7@L*<8rsj>~Gyc(fZ=^tBlXkME8(^WUL#*8wL4vb6ni!+~k?6V|vCn;%^XZL#?A4e3J#BGKRn1+|^y3XOf72n$>LOe0DT zb6>;>T4dkMFmcRA=)A!f7kPdBq83Eq^C0~Kq@5t)UNfs%5v%4gEoxj42FG(Y44r6v z5Z$AjB-Y{Z95Pc*U0P(&*e2Imt0Q^L_GE*d&)`&?VW^w$zMO1dZM+2Ce>swq*R+ou zhVPQobtalg_PaXpxojkHm+_Qf@X|z*`+}aL?Idvv!^4Nh@I5idFJX|B87i5jK zQvomF;I9+0i~xJ(q`{)MiJ&ar+ywn^ZLqT0e;RrKMFDMO_Y>$q(rNE4>jSn}E2SmKv;+}Qf+aV& zS+ES_&O9b1l332!Yyj9}!mOqJ%jSwb&9Fi#=bF1SN71f|tWlvhuD!;GELN5MU@GlX z`21ysaD%z_Wm6LF(UC#YF)?W{>9Cdo2VM!qubCl!)=NmTIl7vZE{kQ;$*>i;#TPR}Ui=i&JxPhk@ zWm27gqYQ8K%fjgNo`xGWf}dS9I#w;^XrGHkY%fh9&(1;DwZd=%oWZZ1>1WUzZCB7{ zS!v%*Dc02&bA#57Gs2lzd+Iuav@?PwOtyA9#rR|0<*!2Pyf(OGrca}_w8%HPD0ewi%DX7aCE_nxAZbj0|r=5N<*=cRBzgI(H!mTG+0wr^Jmy%tc<)kX`v5#A(Vk6WbKF6Za=TMpNHNO{r#Cq!xJ3^7hi_je*L*V@lC;-P z@+{&3b4e-BW`wvYa7q#r2@^X}JYar(yL`x;HItctx#W~_#e`WK@^xZOr7%2mFT4@O zp5R87(k=+~vnIGfLE#}JhAtt|DQ1R6ma;gT^k4qY63%EX&i7f4_nA)j$qx6$Gho+b zKVrKs^*GOov3B+qW3gE2M^yy7+1mINo^shaspx~H#Pgq`4uAe9^ZcjP+KQe3w06q# zpIdp#^PilUmFGX@`A>QN^Y_XBt=7QRo+OpWNZ)-0$4Ftq=T)5<&39n5s?#D$>zvDb z8B20KoYef4`!DlumnSI2ouGWv$0zsq?8L~#8u1->rR(?`(hg7+Gm0DgejQdgpQGn7 ztV$Z3UUKt*Oipv0Q5dL}hZK1aDdx@FyFQu?xtL2cU2yic+AA;#qVjW>z___AYDeim z>gKfB=)@^JVZuh-jW~z*eL9v_hx~pmiKH@Hgy}e}dG$6L6q*9+6zz_cxi-c-3gwn= z{lUW?i}(opCkINi{m42x5}V>;!r;Jr?mg( z#H_UcmiFJ${`>c`|0>(;PTV#N9||!4&euX|{Y^32l93|A_1_7WcK$au?mw{5WE$V0 zhRJ0yx2&|$!Z$xqSgGsvVlMVE4}NZP&2ZqqGxvMLdp_=8UyLc3h@C5w#eK8>9tSY- zxW`X;r^(pr?hNZ_e$z0w%2_cI+sC=kF;IcYb>)p`#h`=0mP2O*178R#2q+Pi4`}N- zyOGw5M6*vu>k-Rm%w{jdhPKw#Iw;a(5r3Ux=uHd*N zyJX7I3O;%+-9@eTHhaBhoEGyU!DNhYj{|2K*okj}DW%_hFxlpvIaY3@_eYA*Is5bI zUiHUn!9FB?m#;-CYzgGBqu)jLVdQ|J9ntSAv)If5A<(Kjomk1I-z_y=tYc(7 zui@WFU`B*O2*ZZWJQHmJZ1T^@JY1ZMlasi49;(bUT^FHB?s51SEvt;xPq) z>7oH|Vm7L?ZRZA{WCj^nli0;)RrL9q!ruNekIc;t6RVn0yPCI<3?S7HX|=;(wPTA9 z)lz|w_*fVtH5yWO2T9TMQ@=Std`)T&{ zE`1`zS`m}%%XvPCw0d|!t=lDkk(jWLaxeK71YuIUTf~;>1E%uA+ycGLbQ5(ey`;+O8L+UFk5A=Ry(y)2oK^K1tqkmFKJMbjs5>2ewpQZ|Ko?Frc+Z1(LG5~T_6 zv~Dlg4i`>yOM?Qe2gAhxQKlt zOQAeBxPMDwM6D0ktejf?qx-JaOVTeW%;vAI2{TpsHiVgK>?;;#i}hgvVHT&R=FDU( zJdaR&Pk^~x^RoQs!ql3&6;2iX%^7%oyeI^7V$v7${47f948OZ^K-QZiIrWgij1wLn zwnHz2{R~gNL}I*lKD+2g&vP!KcbX%FJ=(Lwv(H$U7O^d!d!v3BhZySsdFl!icEt9S zX3CZc0L+)ER!7wGY-&GYVD&MzJlerqaM_}es_jTfRr^V2`^mCF zTZ^<23EPsM{RvtBYxc}X$be=XOfV*Jmw*wUrljwYwL$k?jf6m@_0*znTY_**RXrp2 z22oLAUm``#nTtpw-fmyZ&>s)l$P;)Y`)LgqNW$dwXmsI?QUgYEwSAO7W+DsjQkkA` z5%S$DP~yqaNe|T+IYXP-$JV&vE1|cIfY8gw+V)|z#qqT7PUX@Odi~Q9pk+5+5-05F z+jHS6BK#dQ@#8*;JZm!TSEJ-A1Sy%mEe)$Tv*DRLm4PA@s2EA{eMNJ3E`HSV2cZ!x zqhWU#Ow7v#!mQ&oO2r^W4tUB-u9+3qlVK6y_E8~7=8~W_Q+!52rp59o)~0Zt7FhsZ zQ`FP^rV4vl%EM5Q<%r^uJ9jBpDLhmYgwb+GW(n@PM-tH3keg9D-Q*}8JwC@UdP*Ax zpP0$M-ytS>yui)Unf~Br@rYM0J_+u8k<+e(;G@t@Ff`a$Umu3DpqlD^t}%aTIgzpr zBc=Oz*^S+^y%;w_yVXgF{n#-7E?(H3sdEhO90R+^prTtTA#Moa5aMu>@|KIfFeXyI z2<>KyE@(09TP$WYkp!GB`G?xwTLqdQ$+4|(uo-a+56UKJeK8}WN3vG9vJ0AL>H_Ur z9dbG85^JVStoVw3I&`NOZdKw_Q}7p>FRu%`A|pC`lLWB2+{d~ZiD<}mrG5Sxl{$$G zj+V@l)cyz0b6(3$J(T zi|i^+WZSeP`iE*K9ZI4@VZnJCfw7{)Wz%MGjMX8$Vss)t2#2<8|V00FOD;ZCN2g*S!?Ai8|Ra|t@WnFjEBMVul-|Kgf*G=wny>NrV1 zQEQVWD5GDE1_V^CMnwH)Ya=}zUFVIgWKpK~ead)c$5Su!yYR3W zSK;x~O7FtMZsp2wbJ6AviNmo z0(#c{WmMJ%TFWmLtCS}aEzWH+oA6Ik56M>i`>o^&E zGXFdwh4UT@4LaY;D>S6`oFg;kk|QF*mNSNg@cH|kk3{VMQco?kjdc4z+uLe4qxS#3 z)*dSqhw`yMrTsrAW~KeVwEvg(|9fr!my6e`4gltbU!DLYp8$-An)(^QYi~5;R=dRy z0dzAPo&qQXe%y|wp98@EJC?J68rzx-LqK6d9V|(fOikY=?4?=qJN*}3_U~Rc{+6b3?lZ?q(w{7t5E@bZJILB_28NU2AX6_cWc{!THx@#!hkoMRRw|K;nL1xd(^m!nK0jAetYyDS=(7g3KurrMDJrTliJ=oP$T zIv0;}X*()yM`^aBR1C#(89`Clj25>#$+fGrI^CZqV*d%nZh>uN*nf7~TdkP=r?t%r z#GrhVp3?r46SLC(Q`&z@`_H|$|AdRzs_Z}Ww@})DQtUsRoZOJX4H#z!Z(w3{_8Vsh z(iX(}W16G1RbXShjLR^ozyzVZSRky1E^sK+z==ABftz~$zB@v?iXFt853gP&4|d!X zB6iO6nnHNBugVk>mheTNvBb7QA<-%#cd#+@2K=?`v~pQSsA}34@+}PR_0)ro5Ld)@ ziej9tm>XNpco=|4oS&mhej zC$j%j*ESZp1<$TfFirj&R!iiG?=hqFp@bCsRwd17U z`A)B{ZgLYDV=$;&?nP;GoVj8e%9AAo2oM|@H$C&^&3G4XpaxNF8TmNtY5OTlzbZzW z>oRBR3etQR=4m9*sTFG8-^`tP&*a4dE=~xaj#;n5X>ty-Z#LBrsAKoA<+_WE15dx2 z%@*sTjh}4IxQPtbTR!62b?I@$^7$ErT&LaHbt{*EB_7xM4F2KQK#=`KTkL{U70ML8tC(%Gu^{m{9oM9$UaD?A(3Ym%`< z`+*xfD#pz=)Zh4JOW~2Sz!Hy?>7(^X`Fk-;|K(-=O1NHKwHCddN(`UnqfBo=HB$!~ z8^*jDG{huhJ#p(jG>Mk0Vnr+~-Es4V`g5}VZm9PlcvH9r9v>;=2F!j5I_zD{7qVpx8i#OOosFLK( zv9dnW;$Nqx=k8-(zmZh_wBO&d6oV$-{xwYEQ1iAwUY1z2mB5R`RSc9AcxY6;4Q|Bd z{FgNAswopUJ|9=etm!nkb8hWh+?$r-)r2b?`$?P{ySFl(Py4GFBU*^b?0*Yfy5dXr z_#G81WaujhMQl4&Q#PKu>3G<&#c7>;2j2_7o&Hm^~hUMQrFVpdYc5grRnl z5VdHBG%3K8twzXd(ME@QHXC^XtCAxT4`!h_6)wp(Fcc0(01dl%6yW-r6&Y={elYb$ z7x7U~Htu3`R)g+uI6`QdC4@5Cwcm%B*eH#DQme)ckVCUznDV5OSXj^=9S~N~po6f~9^$MQm*7b3LpFXNz1Zwrl zr%KrG(w*-fKhgUiLDWxg*Z*(3*=n|9{(oC#{^whHO8>u{n3ev2rT<^)|97wb|BS_J zWw$^s(g>HBq7?xFvkZ)G)ID_EpN-#v_?+%5LA6kGD+-<7$T{kUZb7>qv9&&j2Nguk$HD9Ja@YlYJq}1V%4xJm-p;(yHsd_~<{`;LwOA~63;*en-S{pie!%YSD0hJ9^ z66(}{P=mitISfFO;Dz;_j;vi#m)w(QjaETupy=~ftsK(%m$>kZm*Ht|_`kWXeB2S0 z*Nu+LTKbRG^+VMZPs5|X)eliAQP3=y%wX5OcI*U#)Os!+Tt}x4Im+dZJ=2J9F|Zt4 z9M0I8i<-RP2UoKeufR=EGc_1qf;!KLmh7H#Ap8{K@L6J=xzi6vXleJj)H`>uSE}~e z4a`Q^RexcMS8JF^XW;aZwzT-FJ``uRmrz)RcLdcTk7p>inE)$t~RKIAWt1FmMA60=L%E^pzlsd_~=8;-4kJ< zgSB%AK>4ZP-peqFBq4c`a+)PoM5?fbkgjK=mY@ zndco#>Ivste%KSv_9_ew)a93dA-hYlp^C(bk>Kr}VcsIga$>^aq>FK;`G?i4oSRO< zUbh&bgds4vnUJ~F2mrvXnPd!VLuGP{C4&=Sq+a%s)H2ZFD})4n3Y9MW#@ncT${aW@ zr|Ax9Emp(jk~$R4*3$y`>s~kRj=;WDfk13LKJjH{xuW>6}tC1&Ig22 zPCZ630mY7^mUvv1yle}R|j=I13Rirs7j-c`qTx&Kjy}!{5PV*2~RJ0K{S+fvr6++#w z`Qp@k1Wsb!Wcu>vmJ$}<#(k_g#RCD$DN3vB5BErm8&Le@unr(vE<< zmFQ6XQqQU#-4KSVFW(J1GR2XI0_GW!c-f6Q%uYsedGd%It?{}&g6uT|VKuFZQTMq^ z799eR8AZgJ)a7nBz%BKy~3oPRDa8N!j zF~g5W73f2p$(Pv8WoIz5_lc^cb?X;5pgxRd!!w&bMa?`Pm=uOhoPptfW(t!}!3p~w zAMp7dWYTjc#pNv(Pv2PpzC+xo8E(e3$%OyOb*3hd{9rdXo>BfaSqoP*W2Qt5b#*!n z?ICZ_d7;m>We``YRy@eL(-Gdtg)IO{;ljxhT-3;A^TdG+1LV^J#6^2)MRN7%A&aFV z$k#EmT0V>J)IE1$y7pXUy%y6tYLpGP`gPnEozKEqfYMtPKf&|T(_gvK0|h9)NvD`p zSf$z5*k$qNPhY~+J9m0Em%&tZh=?h}-shoYo>2L?6^Jak@NF`6ue|ZhkAzVh#u~%4 z6Eoac%{8G#=TnS|XmF942HUuVENU1>+<9zg{FE;r`JxaOBBFO!#M@eicq*1~Vd6z0 zEI_=G`z5#|;%zTOJj8oB;zc1WJAETj=C?vcB4N@gp^c9ADa?abmzu){h(#yyU662R z*(tmv@nRqroy2!RyxnD|@RG!ffmn7D8z$YaY7V3QNGIgz)Ek`=Pgv-g$KWA>&SUY2 zB4SuR5<;K!>$~0^J$oO$*asi{z0;XGp6@1xx;=MB=&wh642g$v5G8a+^q0DsxE)rh z$Dx2WcS_s3C_Of6thKdOBTP<@-oJnQ{`BPi%U^yudT+Uh=jimq@zML!H*Zf~K0nfu zYljXhosJ^aMrH0;uepTk9kBG$GPQ7KmO$rW<|ra}#mo|qd(6y=R4Zg=TIBA4nU`MU z3TI{sbRK4oB2qGQA~P#etyD5=N{5m0=T>;S)m(PhZ*%RdLZp|XT?D|gdjvD1(d`g$DMJ%t&XcMvv%}XREIMuPf^wFW6Zvk4xWKmDG}bLi!#Ip(XLB_5)$JJUmY&V>VytCmvk7C-*?czyTzWPyOTajc zWoGl;5OFCZ8{)kz5#um4B9@swzWOJU|ATuuG|;*{a?58l=(k$Vpit=DD!`m`9JP;{tsi-qSPEaA~nb3Mr#*Vl}`Ifr}dZ# zj2F!SvS2et4iJ%p*i+VbuiU|Sg7wq-Y)Qdr$x@-YV@|n0rX^X$yXp7}<^lSb4&C0RGXjhdouTs? zCd6!t_g_!xelDDOQritZ`$1&|+-F0FrvjlKQWV|<8U>}4+>Al`p^K@i9(rJ(+)O+? zm!f1VDAd-Zb9(QB+8*&GN3A1C9LGrg%XBN!Hk%b&PC@7(J} zau!6l4Mv`VNKCC+Gk^GNMy5<^>bdeymqE?OMj*pCcr+WjQ|KFAV$CmWb8MTF<@>0v z%C0IW%#8)R%tvyW?(!SCSKeRV4Daxh#d|9}r55il=IB{@XR#69)z;49eLW0=^B3tU zMFy?BtJI3<>k?ed?c+;uF^`H`Jsb0Oc!#&PmtbUJL|nYf;wJl*cUiQ&#OzeaH*ikR2lU_eW?s(MBdLcQ650*i6kuG_{VS^9@%k|btW zLK8D~5J{6$Yb24M!!jlVY}vV_s%1Dzf%i6kETlaHt z4(gw?3F=D&ZwMO~0Era$`TozigH$M%#Ge zjeWDdAo}Xw!Tb|fi#Y_%m-tysMq9K7A*lj>`4oZK25rl#=ay)yaA;bK_RP58?Z%Qt zXO2!{_&e_+&oD2u{A5bv8JlZp*x9UprYsWM2|}Alv!FoZ zjKUo;Y;Dw(+GAcAy?T-nQXJ2PsD|`< zql68=!EwD`7@Z8Mb4%0-U-A4l(P>^4X`wo-#WoSPHKARB#MOltzf^GjT+G>SYhh9& za=t<5qA6Ph`TS++x47_+b7rh7&8|N~{A;Y$sDHp;*H3oGb&+CkOU8a&m=2q-wCo0hNF0IRb^i7u7MRG@qFm#LO{Vz2zuXRh@2GjFM^<;&NSA4o zE;l-&azd{c-MQ(PQrf!Hm`xv(o>k^#3XSf9|#aPq=E4SI*;A zIR7lthT-}1j=QXA*FebQFw7Il&K#LEPcR_eeY2tE_a`UxA0o*_d{&*20}WKE_-yzY z-)Pk~>S;Zk%hiWd02JQv6f4CahyYn!f?hkHU7!2@IKmhgo*GK`9v5$uM%N&5QmAV0 zPo{3TQ4)#u)pz!>`H6K8LJK%IfY-DFEh-S2zu6Pxb(>zx(?hmvyxgLf>g15MwvE@@ z9CUbWh^K~nfgLKKof)$29izZ56@ZE%$?|>-2Bf z=h67u>MWIUNlrpC(IR}J@DaUT7gJ5;z}2z?P)djIJ)iFQ=H))}|3BGsCHHwI=AZb@ zR)4S&`xpC_c?>pERY0R9|+R@UKVz`rT%-w$?WxU-7T>KDs^J_wSI|sB9=?M*Z=%PqrQO`{P>^bXcX__-~K>1^aII1k{HaCKoF2 z!E`eAtFUK3eS2JEmET{!scf)rw=3?O_>rU4VTg9#*!4XAga%2ZS76ajfm(lC?fJ1^ z(ot|8X?d&efh0q?og;aviTn4qbiq;BO2rqc-CT>*ZM!ZmID+Jl&_s*G?n2`iabEmd z#_(~jF}yc^mAB?nsSzr5xhcIYV@_HNayfum9h>hhz~*0<3+VlF|D++rW{*H%cUe^x z1T}>FMY!Yq1SsVQX|w0-`E zFxDWDPQAgt?o_4uWq}p@6 zLA4sKXpkBaHJaLB4HM_cV@G2H2}+$aF={l}uTJkXw9-V+S0cSfXIdD$?+joYscza6 zV=V>~p{5G82 zVX1A^+O@6Pc5SD&yTMvO9PV4auuPuEmtCVMH{8LR->R{8jcwJ~c8%@S*lzATeyM)% zx4Pevn1s|^Yy-5IL%K%P*8Ez7>7#D%-);GsYdvXiFJKZ&@jchOv)f#(J4?8dYdzat zz}T1WUS34s3h@#G)dXYZ}T1AMVo3?J}UW2Y}J)j~)-ZKEh--pC~zs*nj|As=!}GwdYv8%L%VQ(7Kt z$PDJyKj7JX{d)88kp22==k@E(@$p6)o#yf*mvp>aPx3qPXQl*>?Aho>!&6WkLE5|Yre2b`i2714)wd!U?%3^mS>ZsfF6DiF8&tk)5A7wX%+b$B9$wTe*|24z25HdyUElIa)sf%eVu;93O2n}yg~2X2@owfude;0x!vFVN3+fUVfar+{j+Adpg8(uqi@lG1tMu& zd+c&Y>E3uc#q9#k9+9-F3R{`;*?_h$u=TiP;|b;mrVXSRN8idv#M>;ByVKYktEX{z z^6N!-JTL2N{PYk<q^F1_t`%BLq*wT$Tqv|d@vs4^2{1+ zw;7M=1YX*NfBzAlh(v~5G;n~mEiF9CZs8x@bl{#H`%4Xb&koxo?7b}Py#(wpHS7~x z$in{8j(uOl{t{rfw_~s`3HwXHUY#b|8#ut)mKGjmw*c5D0f)&~eTqZ4&sy;R&E_Tw zf=As}TZf}c9iSsU6npdti*1TxVZqQN4dBJFrJfLw*ek+xxVafY-tNJ|3!^tu`>Ey4 zO&pAkYB>S;vNKo24}!k!h@Zt0FlI;atUes4jK{gXcpQCCkV`Oq zTY)lr3lTPNpiDAxg%eXtXutWWTZXXAN1?xc2#aV^V?Av7?K!X551EfO8fWgcGj(fW zVb&kJ{-^@8WjuhjDLf#Gk1(PxlLWz*LWiy zkimZPE=E9f0f@Yw#OrG1`LkC?Zw{ZmKYjo9?MWqcf8qtA?`y0go2}FjU%o$je)9JH zAE(Dh@1DJX1|M<%_m_?<1->Xu`%>AUh?V3h7^Bg8Md>KkGMHz(#{6{yR$BS4adY%KFg6XUmqydd??L|Zk zEPNatAgG49C>q6{eva;;lH064T$eB7+a*8)M!D08SFeV(a+#i_od>$mY71k=$Qh#3 z9=DKqqrUqEO}jAzhj8T7?vN9aMF5NM=iI*Jzv_78)`IJC4LE5EC8lgJ9$h3Doib?1 ze&X>#Ni?M<-(VlA>l~wQ1zW2mZab|E-RZ;u%}vuiZoVUnq>ZZ0#i&Zt_%>-O%&J9D z)dnixVZ2q!Noj^5bl!O83m%phYCbQ3WGZ|y8oahTX67*GlnB_5*OKv;By|K9KYoye zs1-;1ubkvam!e1>fweM{<5BU~PIv4>QFM>MS{dDym=PxjB;LQ;5y0LYa#>t}s8Nts zM*VMs=t!Mnh;Beyt*H4XC@=hL3KBPkP~LLUJma_P;n(rBkEg+W$1JU3itY+pg#LB* z7V{8jK{u)wBqC3R?}%Tsy$Fwp&<>>v;41)(w-sD_u!loT)ZlS__u3l__(?UoQ}b)y zZf(=RX{B(Hys9+sIax(OlayMLU1HEOS>{_j{YpIl`7rfv=l<(!I+_jKXR_T3)r@ajf2!I_s^!Raj^U$5A}8N1D^ff zxbJc_)+vC3GH`{b7tReiSk^!_tFiVL>A_GGTkW!kk;3Yv1YTDWoK_t3YXmQ*&IKiS zt5(o?6IqCM6!-zu?}{kz_AbYw(uEtmo4Qw3ipyb#ok!}>~ISSk#VpU*<+#va4e&!-YPFY?@9#$$z2fEM8Z6^ZC%q(%v2M% zbXtZyu+o#VV>jU2^bhY}vU9;%(JiI1w>1jlL^A_$llH-}YSti_9QAVTx?{CW$JhKw zlH=zB6}fY2Y%hN`_WE;jg)!r~%RcuuWzzkWN&izO98f7Q40)m&5jT8SZk0N6{$!+o zNoOJ7Me?9b7X&(UgKO6vDas_VR9KO+9yJOg+pz>&T~{qw0+AG1P`XM)x-6`d*7x%C0vXc}Z4PqYSRUQrP9WD8(xjLn*T2 ze-&gxOy?pKuaHcpZ_$?eH9m>SJ$3Qkkt`?pCR)i>5818QX%o`?G=XBrGC7ILxS+;lBeH=_NE>7h z>~c0sIh*Vmdc+1-8*iRPJd%PZ)4NO=ldkPUFHN-}Z&sk4%7)x%QwnF{q!sHq(nr52 zLU{;I!~13yFegcwAl#x9P8Q>vmbXY6F1UpW>sJ&K6(d_#ve?A?Xj{>;B>eCiBav!6 zFtdGgsTxC~cO+B&$iy6nQsz-MxQ$x)1J5g@|3V@$xfz~68o{EC(yiiK+daX&H2?M+ zj${>ApbDm*BGT57gf*sD&*Ug+bNfmdN?&9aWhgl!Neq>n1)?R$m=^n$Ti0SgN5=U6 za0J;FzY=ypT$g1B;r(06m%_N|8MWuzlwL#WOI+Y>E4R)u%BoG7Xd@RrSouz`&B?+2 z8&vZ-)wW2^f0L$s=*)#*{fxsAe%Xww1ln-$TybI9gVcm^s$A}zamlKQhg?glT@K(cWflGR<$d1!jv{|L1R_wEZXA{u7+DuaU^)*EjQE ztJ}Nu27TZ-o?3K_p_3~}d?QA-*u*yi=sTk#mHrCt^+Jv4Qn{QxPJ10C6AyguI`t7m~S}a1|SJ3PvmlB|A#Ks zMW%kGCw>3dZtm^w$^5Uat?eC*|J~Y!_vN$tr`-SL#H`%^mHWSP|M&OV|3y=?wj-%o zF+1y%qVvDzYNXr)Chh@`DPba;1p_beTz^HWSr^|S>KSNk5u&Wj0xBNy-dA_RR{+mS z_n`8RGh{nJIQ&AGhhGUIe*3u+-9UX$uueh2K6Sr%exUG>*?xS>jql-sG(ooO-s^&# zwkz!UwZ&c+uXy(MyL5-M_vlf)B|5eS5W~-Sh>bVu@IM&Ohmam>%D zmh8z#@!?ZV0FGAmVOHSQROC6b-C5kjc}bM-#9x}t&p=g#EsD6z5HACYwujFdY>qx# ze&-G0sLtO|J8whLd#L%4eO&i&x5dAuZ>)HQGT-b{^ViYmuVc<%$C$s*Zgc+j`PFyH zv$x4-@9w;lw}m%FdXL%(^Ow7L+|le6jf*KoewfA2Tzex6&srQPIcNKZ$Ax9a_QOlv z?=FvViiMWPj++_(Zeumi6$F|k5F)9JWiOPYQL=DQi{;!|zV*SC@>|)k4irY!jZb%# zLit-A?MN2odobFX7hM6Py+rorZ*|Bc37qf2kSmM|8S>>4M;pnT-t!Hs&)yw9d*A6C zS}yVaR=LDTGd%~72#qU&L(;A!pz2cJiirO-AK>1RS^mNexU*^1z2{t`Nb$12ue7n>xnujP8FT4`=ie&R8ClQoRQhH`V3gALZ8>~8ph%%}r`TrD{`k$VR z{7>7h-7x=uYY+23HOu_}xAfdY|DUCw(*LLQ|H%MW`v1(&XMZpMA3Z&PE1I5vtFyCo z?x(pMi1__{;A!rakINES=nKpQuW~ZyP4mt(&q5nDQ8F>#JM6%o%AD^hPa(7w zyF#@q){dWy*?1OAW*`G)M(#CCNKoaj({yPd#rGj;2$kyb5ufev}8Np)X9bmWj8{Ppf z(oSdz`Q_+Dk;a!g3Ji6EL7}`4V3GR(=8GbWr036{|37XL;h88bmkKPF^S`_{;#jE89eIh>{Ajgf8bn?#)n#h=TM{BRVHxVVfL+*VhE>@R zHGnhMR9VnsN{UO3W=2ggI#Zlm=%ovqp%;;|`9_ch7L@?3QK?h8_}PkSGySiq_E*yJ zikTLOHUl7gxe{ey#o!#6t8{0@k$k=6zpD}1d3oqb8gH#*Av3X6H>GuF7z z!~8QsiHvi?NQh2xuU$(q%*JL(_h-p|ALqE(u zi8eQEI*9OaCtN}4Y=_tu4|m`fON6&G7$7KdvK;4>2;z0ieNOVB)m-YuwE5bIR)uf% zO1F{@A5XgfOPKvtwL6*{WKf!T94pK5lWHnYBzpPW#S=OI>yLYWGA2m932m*HUK zcP$WFPo6yC71!9n8C`VO+|e2q@2GDC1SA)pgs}a<3kL21_cvCXjw8Xu`wjk@O8UVK z9^T$e-0m9sn>KpBzecal#{C*E&htLNB!j9)Uvw6s^o|wwx;mu-0=f< zx?%0+Ht*)PrJLIs-NZA&$Xr5Q=E@m(ee#gBHn_tZ+_5yclhk0O6>mgs%M<+zcjVH! zr$b(^)>e0UtGkv~cjK)(V#shD@FaI_0wNU}SyPsm8oR#qU~7vGCzLs4#NA}i##qhg z&IMTg_t&qi2<>r%_AChP*%0zQ6jJQ??X!2G#pu|bg7mBj*5Xv664^L;K@@Blt(tKYz;o)4L-3n_$1yS7f3?OLK)??9*?-E6`vfw8w|!c zB68kT(Md_jE%LQ~v0+1_)f57`X_LrJOV>v_8a!L2WiqQ{T21^8$9?boMx0bzk&&x| zb$PI?4^9v`JVA>CjOpAA#!i2YRmpldb^X~O@VP)g{255-PH#5IiCHrm+60jecL!7E z@B<6pjL4G{`m1>(-|O=o(GY#R2IKL>%I+<(WVCE+M$58jpz{_IJm6MMKJ46s-QIwZ z*DagCZrLO@=1qi|N)!f>9oXr@4PK}300#`BP%^mc!%k2&VB7y;@wJ06ybBw)%ixv} z!Y!K=ZrQ}Jz7CFe5vve(%i5R_(k+{mZdt^1LSr)3ZhB)vK(}lX zx@8g3NsWnn=u#VN3n|>TN#V9d3LDA?mx6`}^e3=LlTjXIpohYm2lEKgF-1A$U<{7S zVDXyXFro+QRTkugRBqd(a@(f0OL5XppObN=meT0LJ_Ut#F742e%oL6z{CG%E0t4&6 zaYcs9?LK#xbNf~))RtPkRjs#(=*Zx^mJUQ_UV6JW$=$X{?!4`a`4w%u!8d3Pxg%`g z9xuz*o@)PT6%z)MVgK3P+7kAk=1yy?jrQNx?%oz#zTxu8d{q3$58pk&9O`~=>XD~U zhrPqITwg7PxJM^lNa6oB9X+Mq z2A&^O*I_>O@VL=Bb+5r|A}NY^}l z|C7wRs1hPJo@=)73d_o*SgF?=@TX$H{a!@eo&Iuk^09JL`Gih8>I-xO-GiUn$`19i zLn`~&TClGdA=vF74AFV@`FnvFFtw;Hyo5B8e%*{>b1<5z0y zJ@N`UksdCvG;nYN+IJ5qBDkdiMhiT@aQbC{W;$?4RE zokI_XUrhyAi*fw1Te7AYyfvx4|8or*IXyml|J%{~kCk`7zJt%NUI53f{fMlGC{X=6 z(W1Wg&$R=NRp|8vxYCZG!`7H=hE$0vFxEdn9R@8Wc44GqqO++OU;I@#-iT=MzYJd6 zKRY-Xk3S=qS4|e!d1=+DAwL8NvS$>G*ti+u9& zZ8JAw>$?_a?w$$kbJ&aE(Y%)Eol^Yp<8w?EvBrHE-2NI>P=UD!zS9x9H$SdHt`vn2 zwTwbcT;ZK_Gp!LqCOb>3$y%6`d?&G}8mn433bl~Fvff6>C0v=)O!Gu~5(wf#I7xVY z@4?9_qk~1LfXH2dK3XcMjB*+Pgm-f6B&;y)bA`7f!svf-gJ|w<#}8QmUm+BmE>!vP zrdz3trVK5x0$O0?jZ_6IpbAD_9g6t&^*2$Z!&J5*(ol}VZPJl?lZe!tWTf6$kopmi z3BHFlA3fr@10WBHF&zNO=VQCxWG7Px_NF`zl)M0?GoR*U4EO>_QvpHT zH$fg=z$!U#&jV3gjcESblu?LRk5tRGQDQQRF) z0_A8KjzAzrAj8M8eZZwT9W&UZb|_at713hR4Vep|+r+8FcBHCw*Q8cMJT15kKcarb zw=P`ry#8_`onQ>vlW52p0*<-u#12$$mXiT3&Tgx_CipO0;y8yqxO z;KUYqorG;DWW+{T=@QhDHAL#4qct(IYK>IMDa8>h544j$nmj><7;G#iHg4FW6z9e& zCN(pO8c!`F%Ik=QTSRTSrhT{;ibw%hVLW`eRkw>uGloe%LVyA$hV)D*%w?)7ECp&( z>Aq3=&`4||I`{n2MORcj4s%g?LSF*US7Z&#(rvE<3k?DMZ8e@_k%qIf57Sz3u~In> zVz|^Rz%hOJeJvdNbhK!$Y5`t6DWi_s5thh<7lE1sDSHA)1vWfnuLvteB>}i|kkEi( zeGq_gMyZm2iS92TkMI6t_^iFPQ5yl0-ti!sQ)T|LTTx0a0fE`)v7H zjT=Wkn+z&bbDL%Ex4A`m=w(}4cz*08PleJrP#OnHhw5NHAL5z12ddosC#6m}VWwZ5f!;Dv;YE zklz}RZV7;ncs}_FRVjW6)QCRgiix;{LOV{E`)pZ$BWz8b>T_ET3tKR1hQ0PDFwwxw@)EwB6)CXk^c6DX5Z8vGH`Jrh+Qz2u34|+6tEU!6@wo_x?%U|8L*Q{(oy{ zuN~k2m-m0%%9FDHH^S0H?4T9|&(#()7<<_reuY&qo!`CQ;?LuEVLD2$cGEtZchml_ zgbJ2O4_@KdgbJ2`4_?7bs9=fv;1#6X%=!mPq!+zhAns4j?CuXW4gH#iSxsw{x1?Le z-&2q|zs3?2IK;u+M{gRxsy(#%bJPR0V!{$Gpp}jZOZtFDe%G8p>D-0C@%-O#8b;6c zDrjn>3HrUX*_(>h`frr@kOP4k@*AJbs!*O&wA`1;kA&2CPc}8N<_xX_t zcUtYPL5FdpgoD|E#`nDu=GYID0j*Ig@b22p8l$_pFj#l%320{GrVMW7OsP0j6}==- zs+?dhmo}#j95z1A#%-}j#7RTf$9zD(%sK+N1k>?AyMKs&1KEyuKZuZ6DQSOu_UgmY z>B-x-$FHBgdS%Hp6D#=Y+52CP!c0Mw@W2eSRTG0p?uzsRlh6#omOM>k_r*auRsY+$ z4gIgx+}Ul$^uMhgwtU0olli3ReNcOPuIE{O;|srW&hnX}U2lG&HJY zXve%z->8zIAM-+&MwJW=nHTbmDj7O5FXS6l;#x94pOM)c=@`bAy>X%Q8E!SCMfAgj z6f*6gM%w1})Pu1KGU*@}FEoeD?#-we^id1a62WE3dcR_Ynl{EYZSZQ^sMIua*L12r z)l7Zgi$*o2+O%E@omrN$YR#c#5H*6|!Y%T-0}8Xyp_yJfj981S(#-BoRZY~WBe4HU zx2Z-@^kPa%+b8Vxd*=s}8*HIQGgxH5t;%VwBa}wWBwS@cba z7iN9}uIAQ?XV#BO%con}V426{^h4GgjC-Gv$ujnFRqIZUZJ2wx$=KI6b2+whkru)= zMF7Sl&FG5|Z7 z{HjC&^bcFh(@63N2&0ZU240phqDpF&%0CRe^opgCig`~FM`4*FsPdYJD;KXj=iA^?J@5Q{OMyZQZn%cvx(QIy#AQ__`-8W0Z6R|$qNdG z1}NgbW`v?PjTabRJ-FfN!M$@&9tBX-Sh|5Vd3th63dnO2*6a1smiU!;nJ;)?t?l(6 zF6L7%HvJD5OH!Az;rQ;s|85rf{BOi^#xVkRLbKV!hs^k;+pSy=2O9IBna-Uu;2xlh zI|?>WU~TM>uWsXN)URJVlRDOjSAMUhs|>0CNf@>(DBxP}kffdFEXl?EArVJi0h| zC*{yPE{E8Ac`pG81!xO>hp8wmxKPnyi~tyah2rt0rBoN-m}98ca6?;8wyc@eZ)C1Y%9#+fWIltRT#w*cXWn= zsQFRG-=X@+X@9{Spg7-}L`W`tQ?c}msmrtbeIIiJH2^mvttzE5($!G0jd01FF4lIg zP>m_a(buXcC+gGhmfv2ePsfo@Q4i}}HjotW>u{G5bw$oIntxdUWcmo_@-)ue>X6?s zXJj>KGrQC9EF77Cj?_fVNRtL4q#I0UE={BxV5qz^ z4lbc3%3g_AqG0+=*qEx?qgMq^u4AxcmeEfx7I{YSfDEjks zeC=b{^kgu*@L)$CYk4?0<7Mi@@qha673$P$2iBh>YVu6t|)b9!5i}oXzzzyp%eliZoRf0q43GDhi&>1GCwW6_64n znDCIqTwQou6>n65mJj4ty6yN&8a zS{kO}zr?1Xd}SjYE*44eyU;+jF|-y!-GC2#N+D83(;?w*kUq&m@vI7pi9_D3ihCk( zjN+_}Q(0^~txT;|{o`MdY@K*4j=O$tTD6_D zCI}?s{MF!roJX02mcZ(%Nz3o0ZW50QRjvGHI5;Nyuv1xbGJow~;7ucy$jiI|pmAXJ zuEl*lnv_!vj%CD=I5eGJU>^Ref(s(-IbGRpP}QD2bX^G!b)x(tHJNXudSA;o6en9O zt+|bE^58isJ#Vx<)tpU|M#MoC=I2IapK6uB5eZ?`r{8}|+239}ld7r-2-}w!?am3h=4gf&BUi(1@B5?w z@59mY$?5B(lV9H+Rz7WXyA^bV4^<@9GXC#@j9dTZ|7Y*ryV^LC#^LAhoRjY`(PB&N z3eXj7Fl33riJza1c@2(FPLjhJqyc6vX|ywv3A>NK``cB0@9Cb4kOWRNPHdRzuCBh< zz23b0;qcAbuhpN<&rdJjAAUsB`HQ2&^FwM5q3<=#uq2BtJPMOuq-Ky?>%$v$WRG5- zy?n>Vg<)3rD(QY#RF57m(d3;bU51v=-@iWjk(y1&*(IX{dGLBu&e55vUH>=#{^R9?Qy#w?5YVBV^&-9*Yn2>Y4q?Au#g*~JY&~SAP zydqD1WC%n^q%ELO#qD(V^8M@6^NW+ix5xDUMe62a9FZ%G*G3vb0R<+s5|mbI8V`WZ zXZpmdA|t2&vW7NAt<5Tx3gR8HEE`dRC^V-M2Y74M0DmQp4~kLa05SnUdAMvbgh6l` zM}OSCgfYOR09b}+x#VOOTVaH-?;@NrZWX#* z2;B^9OpWn%+NJ9|ie z$ip<`tguP1KqMe`p&mSG0lq|;^xyNP(0^Wcr<>CMG*c`q_i8|Wk`wH19Z5E8)$4%O`xuV;(QTs89?2xWLUnER$)We8?>+g!d*U*NqT1t! zp8WsG+5gSPTn>Po{on02n~eY4ZnwK#-2dIx{$I+IvH$yO{$HQ`+KXaP8DKcrIQkrt zjnB@AXgYxl4elu)GvorWNQsEgB;d&;gh*fz@}CC*LwX8wg$9HYfJiiCBYqBj`i(aU z;9ieNt3WJ}v*C^~Ul+IFD>$l7F1&t3Jr6fnEO>z_VMPPROZq&7txpaYfOiv4So|5% zMMhLWZsS2h#cBwVAAaa|$U4ilMhWv)ya@(l07!eE>a*x1%W8)npiB;MmpWLUry`u_~sIObzL(qKcQFSg)zvf;@ls z{yFwze`u)C*vBnH->0`z;|dv#+y)uOXd^GO#d*RF<_2>7jQsC5H(aEWeLQIe1En zI2zK!!#=92y{u@oV8>+=nerW14BNDh!+W#ivTUKXglUQHv4#W+d22{1Xs#joNi%s| zj(Cda1NTLqaX;~<$7;kX}j-p$SixrJym7-#tflBZy z{fny8rlyOF5t)X)WPw(oyKgcgLSWU6s!wp)E2g8gpwYK@mzY(zr-F($hfg?2xFeUm2ny zLP{M20yT<9n(*E@zz=Y%s+gK^t~s1_-6&Hv3N`9~QOPqJd=>{5T}pv$!hr=Uwvbe@ zBWSWiNQ(=k$G@jRj3BRByi*8oOIfT48mpbWJNFJ>o_{!e^X3=t!`U&Rj*j0SuY;Y} zzd@&2kzFD5@$t)Zod*89{PorQcW?ENeV9V|>LWnbO9U{#m`vkf->aI}J(BmE6~+4b z@Z`t^;DxLY_oZ5YuOh~U8Qg)iWICYxn~n%jr84+0>3)p)R!nM%L?9oNcgQe;WkY6b%wZ<}UFjfj<;R=x(UZW(L@o(da55XA#-fAR1!f zX2L$q_3Ke@vk3fd27E%zB;*%rBnVQl$dA$SxKECg9@$(;m8sy?Qv(cQICNju4+$?E zS%VY_0B@pbOcrV!O|NNcjS8O=kIqO%(|fX60+nY>cnWDN=!|_#I!XEqf2gRO?L91y z1K6Jqhj&!rl_`;-CLvz0>BlG0#jhHQ|$Dk9m2W)U5C@}8$29i^^~g=;fmj> z39M{JF*T9=IbRRdZ=D=QvgZbHcc9iq+8UfPWPBEI9+vAV9Y-#-EzAnqU{y{zT{30g z3h;@S2fx5VJ?q^B{po;4sk1mdA9=LNbmZS8^W+WsT{znRT8D* zQprx1n&n~6*2xVm!nTzRIm?Z0hdk7{Qi6v;RTt*Ft1FPV(}fg`26re>fRB_P#CFKV z@(ja~;cqYYz2>vo+}#ntE<;Xpg4G02udl@F1`An!{MG3Zt?wf$Clgpp%xS;fuG9u@ z-sLrBEQUO(m~onV?+TZEMweLfq{3r&NGOmP6)Wf1V6ZZ2FaGht`He!K;5wm_NjUK9 zbc=!Zg5J$$GM6DFa`rBRJszqd7O??@90e#C;eg5t{5crozsQr#|F@RG|95s8oizWy z(*G{y$@KpPOWr|1?g?-|`|HJ3EuN+6+ixgDPXYP%-O2e+7iZ^(=f~B$cuV*{_T}U8 z@&7wI{N+sTfv%@-E^X+=gR^y5K7H|7qZ{&Zz)8SJ6&VSPYnmGXQUe>E$MsYtNg~*_g9Ti8Q7602a z!ahA~&?-`j6U38{&^H_YAiO4XgA89hdS8` z{%l@j*F|Wi>2F+ygh~FiX8>vM8ZWlZ7tdYIQ0lZ)Yt2?Ruxv2Gqgy4Z0Rxma(?#`L z1-Bld+f`_yg1!P}VIG3(l?-oXm<1rw&u7&FnGMD~%+r}}O*Ue8J1!d93Z8r=W!?(< z;s9nX_=IXE;7_@kaBj?h0$ zpfH{@hm}qLx0j;-+ujlOpPj~b3+eyumH*#To-F%saJcak50$`m?{Yd}VlLmD8ItzxfIU zUf~%gcBwKknZ_Cl=qH`f(>@Lc0l87W`|i7k=2%b~dq!{SNn{(c6dyu|h;SmO z)x|P6g^Z&>X;IWJ>Y25mC8fi2Yrz|}APof6Y*|Z&YDt<6hTEgax`Q)ia3!_?Bc4I!)Gj}@FL`D@-yp?a72OkpY9;;jqsGy=w%DglSzzp#r^#cpD z07HNetvCq(Q9nv<$5C{PIeP&?!U&+raIN~}7w?JhJqf%g=hbxzMEXSoSK8duaixB( zuc_fqG_v5xlnz%|FysY2w1y^kc7@!n!6*qo2bDU%?5Wics3hbpCzE*EBiAe;32yw) zNOYi!2=F-*C0DUqCtD5E7>`*jMI~p*69hFyrYN5oN@4fdE?KgEFpmp*VpobZnQ>>Jg z?)qXq^$`$&Nl%YTwzd^DAaRN~001K(=IyWJ_;EqpHOCV{W$4$c>Rhg~9vSO-oJ~-* zpHh$kd!#;1Jvy7JHdUFDVd}R-)%I4X3r6Tgx5-xShav29B6!G2z;JQJ_Lme=fv%j+ z^DPR(IdZAj=&A|O(!qwb$;!}ZUa#=1{!MR*O@FDtAsL%(z#u-KViY(78uV%q6CZAe zzKP;fY6pxuV1A`+-W6iX=1=1sQKNV;OBfiw*9=36_L3p{VqXGAkbj^Mgyb0pYhrs9}5Y%&j>v=Q?+!`_nwWi1wr! z2&`Ck6YG`v?)y2K1Ix9rgZ5hDbkdRr!~%w-f;^jaF0aLPi%~QEbWwIezg}MASEfa3 z+&rJ#4i7mbV~~5D)zb+iD0ta^30^b|L|d~WupK~xt~Jo*_Ychuqo6?Z!;%8R@PY~j zC2Eg^7H>;n^mO)QVwMp9Mvs~=cipE2`>R2J&WkY9zHr$6>L8v*d!9H1M0Du(hUIzI z2kT5y-fit}iG5*59cE#%!j@vNKKas$Jhmwbs)$q(7M`t=c(0B+Ui5lJ%fUj@R2sHL zRf}CH*x#IaB z#F(a7TD~$isFt(-sF#{^-v&SP7dxR@%EJurM3Z#~p`gTXt+8pAp%z@cVwNIYTpRnA zfUPLAWAKUR2j?bW$eNW94*y?}IV^AXudg&`L8iy6Z%6MO(*=!hfNQ2#fJ@_|_&-2P z*N3ak(;+Vxz}E$Ji%EiqIB$&pP|*LN?*bX)1f}`?OFAc;5Yb(_vsGMbSDVLuJ&9jK znu)<7LCS}0({^$C38aT&5%wmcF44129ttj=2aF23%zB(!P$@CYm4pYnrFdBJ*>YJ4 z4JsZM$}r@87aQx@e$RWf6li7BP-niz-w@<7!Ap%u}j9$tH*Y4y-$ zm)NT8B#o9InnE0gyHV4KIZ^%Yau zxBy5H+=~Ot4g>Ytq9sNh`nyC`Bpuwu>ur*~*jzUF`VgoMy0emnoY%y{@?!V*_G)Ax z@xV=!89)9h&w*`I&Rr_=OB5*83bRIs{H(G4c4L(A+6HYo+vGMtBazn1TaB*t#5S|d z0|Q{Z==*On51=_M$^|%(9qsfzQI)$^V)>3-`t%ADqGKpchj+jhUgZ%~u|fW9JZ<)U zW3QK#pWk^XXA?A*W|@fYVJKsVRG zZ$AomFze^Y^Ea)~l7_bvzGBK3l8YYT@de^Atalx>BUw_$s^W1Oer(NO__K;BHugI>>g^BH@v4asiLFnnG}nM4XbP zpZ+>qFSpS_rZ8upsh|$QX3(^*3wmqEYH~#W<^t!J&p_jMKpjTK4MRm%;sO^evqK6h zld4-K3d`}kURsGIG;BKnwPHpm;+lS^=vo;ypj1$ z=L0ft=ZgTDzdmk?xsT2OvGs`V!?240*c6Z%qyX%)-9+;MWMN3xLm!y;pfHFJm)@Py z{AxxT0-1gPmCJr8k`)Y8h6dmSG``8djxRzird35r!99z0 zBNOWW=5w$#yC_W4oV8%?0dM9Np53C3g50!nOkVbEL`N zRHdv}vNWy6j6T{%qw|J+1VXwwT1}i}#_a`xDut5BdE@!*5XmcD!51giTmi_Xw42Cl z_xGR|sX(7H<6_3l;6ycxsimP4|3u60H-(24e6WTY9f>ei+OYi;L}CIw5R~}&4A2as zB6=q$GXe<3s z0Eie_yB5&_zO?Hj;Exr~wxLfOxtQ zKhs(E#u3M5zpUC4Ar(;Yf-aiqkO8Ur+Fn&gR0y2&JCNtK&^TJ-g!uxH_X)};6+bSc zk|He=PL$u0_9a?|R$*5Zs=_yJa&Pd(Hhjn~I9m@%i24RUabg<1@B0z)g2qMewoz{e z*QIGBWb0-Zvm@;on~K3SNC8kCO(Gv;t*P}>Nj{}#0zq~Hy$f$u4<22s=UokQ-9{Nt z{@)>ys3AS3)Dg#j>iV#m6gRVJCbsgD3#L%SZ!qu_YsGAz7P^gu55;{dsj-%t*_K-R znX6kcuGwF@ns0}DV7w5GOp02fB56;?O`DXNC2jI$k#SS378ylU(R?+kAoW6Db&ExK)|l6;JZ)F{!fza|tEC?j zV|qin`38K?+HC0_cuxeZ(!ke3V_Pxp;$z(|^i`4iCC2f>vLT?MfQQ=F3hUG-1o}*? z-bH?&OPv#m+aipZmbQYnSj%(bWum1A5@s1A_+-aV)w7oO&Ez}oO6~?ph8dW7`tRx` z1$q02*)hfhRuaWnq{ZYT*7HFl>GSnL#?<42P{8T~xu@kb9b|PIqX;&%QH`8p@F)jW zvSXqr)nykc&S+^FySquSz?pA%3#0ucZetYb7+Wp>ql8660WEUjV3>Ed?Yw5aK&p=b zf9+F|{-#r{Ca-vcwo)IqTwWctM-u|mvlVZ=R_XnMIMRFQYg*2NUR3S8cFz4*#{(l) z=trIt$k`EnJg^S!v;YDZL7FR;dF9&MlRWhC&M z>j2u9hvH9C)m!wWIa7E@C&35U93!t7XCD?%V2|pc+2b5~LblbJ8@4a3OMpvVW2r&Y zh4Uyk@~B^yBrZGcoY++XXjf z@TSKekh(RQhxs#KxoEbSh&2}0lERitfarmXJ^VX%y_t^za5m-hw zCDmg%xR3q0zNkv4Cx5)uC&Pw+D;nY>U6TcmwWBkIQ_w|5I*H-WsGO&VE4Q1Q@(IJc zf!kKkrcZg}G2UD1L)#J&Hb~N~KYpzySTA3@%It9vt~2?-KJg=5aTbe6P9csTWZ_qi zs+0ZF&92vS+aEfa%~2ksz~<)R=iCT46H-Qci=vvsI%ZgjJ4* z0~Uo@ld#AdD?<@6Gt!_Y9te6THm>nk{5>(`4{EmLQ$r&ftu$`R2^ybjyuF)IgV&XY zfS~M;k*gnXf@>eQFXIV;w$MiuWW&fvoWm`C3dJOjf2(aESYbv;3{_oz4Hz@g>4wms>!mJS)< zY}VO0c*&>wrk8S$HVY8vESq=28VXt(En}FHJ!cfN*9lWFyc>!e&Pqcq7fGXwElLnx z$Pi*;4oZ#KternpE48>S3);w?s_(02y%laaz&=3YT0 z44DdbH~vb4qF>U0S(Bjm4gPawXmtzssc^utpV;!Zp_zq_4onOrI|W`UDkFi}47nDs z7$bW*OTn^Mz_n@KOlh7d_}yqk#eZdNyuZjUq)X2KP_D{Ma@!qL8c^WgQ0Qnw^QxSA z{$;;!xT(e*kT-E3<3@PU>h2%}cZ*Syxb71*7ZPiN!4ng42*f_q%?uSu>B_ei!?TJg z#0)_5Pe`YyMJpUrM^udyDL_Jz9fs1wnrO^s^)<%Bfz3u=fqeG!l7&hH`Q~0T{-E21 zAFwt76`Wfuw2S-%(NkyZ1t_g(ntCV^Ow5SeW?amaM8P=oG7mIqKw+h;DL3ab1U3}E zT}|Cue~zOnrFk)hI0j8OcsDu>(y4TV9>g!l???IcBWa zt=7>=9((xy4$bxtv5AU26)3hSDRLEn>)%JF?an_UCEAaIPb?J`S~~%KVgejo-;E}( zQP;$;hoO!oSqY?xjsYK4OOPHx)emLH!Qh}i%B%LE)>=`HWO2xms>EM;qm;;Lmc+t| z&QhScS3XAYwO_wveW1f#qv^AF4AhI506o+l0{@P!mg^a2&tG{)d^95d60>cpMdS#3 zcnsDParV6WQ_%H3JM8yfHBo=9TC?NQi2|zkd+CnSdA>7?fP2|acHDz~KpjrxFrMJ4 z+txvPj#TIfFJwa1e@|)IY}JwvXvrG0iG@Bf{JkHc$E%wLR*S7D?xQ0Zod(uGJf|Q{ zP71qDVZ`7**2Jk{KGqt6D#|;0;=`=K!IbrXFO5KQ-C46aN+FAUH9atv3i5JnvKaA| zq7Uj;A#3|NwY%dn0MJJ%ha0y0%iay{Z=uGm^UEfNZz0$J)k!4^0CL|Y1gQYyGCx}a zTW-M|cOgDJYJVIE^@3|1h}AuFFfp!;Fn=`UJbyJbVlFYN<^qkobKQGtyx4jw99{v@ z!^$(D2qZS60yisi-RQY?{bzr)>z(;*nA&Knn80mgJ273}rnB{ZLou`ovK32~4VQi= zuJAQxD*>tdx|5XvcFTU;43jDoI_wH^A=>q8btwwVaWE;DmUz`&2(WFw_0?GeJ1Lm5 zL8yHh5rNvDIPVItY#1X(s^AFk|BMF9baKs`QY~CXj~?XZn-Li7@|fBJ#LXEIx6~Qr zOwt!*O&84Y5wn4&E!0|}Y( z7ZrA|veYTC3>^A-JV*4V1(${=45mF8=ONl_0woBe zhfh>lLEl85a=XaynrkrRcE_xWD6&K!Mi0)jXjjj$YQ)sL1-gc zPGZYC@lK`r(Sb^KkWkRg--6n!)#?U9gGSH>;0FTokx`DAh?bzLBvoI-Ot(w;(@}K= zOf_Yeb!TfOV%9rW&$%K?k~oEQc*f7GCshQ)IoTHa;&$f_{P{6;1dl6py3&`_azT<+)?ze!ul&F1KjqUds0^ z`lpF3WNn@z>+*}uMAR6$L2zMZ1+_tDH|5ZFF3SL^z$6Bgny%xD-CBUfxVbE+?B+HY7*;ZC*7 z0)K81ZyBydNh_xk6^fBA!rbh4G~)pbW1(d(E2Q|b@6lI*o4!uvozQB#l(A+jZC2s` zK22P4>Ie5Ou$I)BX2ZW>z<@zyVR5#V4hda!F>J`kGTKz8r@F#m-fGU8kxvj&uCY2C zJk#-01Fl&3i2LxvG_C6RDwFo)>mNjr&o?qHEiGi=Q4%rm$?K4Oc~LsQ;3;&Zw++~) ztU!SEb2CiA^jb1r2bs4Wa;gw;0vq2`Ew0@5S~uU*Rr%~K+wTeM)P$i2QvspwM9pMD zLu#2-p(rln^80{{fmoQaR@qc2AZx|Y$8ED^KY5Oe;D6EIR}0Jub>9PiZ|!) zrtL&u<|b)`Z_{XE8&Xl?ye*Pr0q>guKeH2)gIXEIE~d%SRCnL|YR{2=lk? z{BG=S0H{wSngEc8kU&zk<-Qq+ylAL0h$IjV^5q%Aupdf@cKQ>;;?-z<HW_KSm3H}L+ z{sSof`wM>75I~OG%07akY z8lQ>%07~}xzx(mMyG?jX20%rMupdiVh~p`X2ZJw68VBB-pA~A=p0QcO^hU1vxRUfK z7KF(r8-SxS{kz9JbRP%hIu5TnnEb+k;hR8JabdT71rCW(Ov!(Vo-Ple9RWT%{Z%zA z742#VJTJWBeZ^oljCT0ocuu??LY}|e%)go~fHjv5?y8nMxoB-bExXjB_!VvhdxOSj z>)>U&bMWLhZ(^IH9k9v zE{SMHIFWJ*X=WoSR=Bc|PWM3d?i!7`fx3tESD8j`oF)c_;&b%>en1*g8XJ8OS&dge z^{!yb7p?q2Uog;5(r0p&IG`VxcjHn3`K`wAJnwT?oK{JhS5?RGfv4 z9$H}7NLPt3(C}3C{9d5hNnY8{HU8tyQ?RZOHx%4-QG*d-i7TTKUDFt48D7@16}Q~9 zKmO=|B`eI?(q=BcNtedPHEUd$EzFT?oQZ!Ri31_AuLlWT65B?0Nr!#Lfdd!NBmHkV zlEM2Q*`4m=n2J4->_+Yn*w4|!;rnuZd9|0xj?|juCDPwmxtlro!bk8BfLr!xEb=Bm z$_9bARYj)bi{r}E$u{jt3o()YsOO6PsMk2ZWs~;vsgD3OCQ$}{cOr;#3wSa>F_;qG zPViEQHYxZzTY|&+3B$Ywnfdtpa^8(qOYHWEqhwI|6k})5`3p-7D=6fS@5@G-oa$|* ztXc4QylP4>h{sV!WGJHmJHay36~k{y0Y+9;#B*9`YiwZwFnyfm>)*SUbG#9wcmz*M(X$B&T?RdO$HmhAL9 zsaSmSJRXki8{XEuoq5-le>0=)W&#t#_vjW_`T&ch4UMhT;N-N`IXN0pC}3~|SLZAQ zcQ0k=%Ujs2b!yAXcJ!pDA|}P+CVx#JvKJm9Bag1hFcwc)@>0=j_}q|-X2Hq9$PZ7R zls^*B78Y*aX&Nn~HE?EiUEZM?*naF&DN3^}G4~A4P#9oVcpQ=j0Zq6I!JR z^D^(}sTT;st@Pd6jrOMJS^C4G*|4d->80Kqj{y+6Cpf}T<1pP0{P}Re(|oh-G=3&L zU9q-1L;x37@VjhCChsUC_=!RvmV$J&gmEXl=WeY5lfOtaH(ZZms1BBY_uTzw=D=Xy zAdAp|L>Qu1cYjC_QYTK0h&`1t72q|Nr0sx=`Y3WKBV-#Jn;PSAz3}9>C>X2YRbQ@5 z8BU}3+!>6b-+_Ct&zZe{rykxii8%|g;*Y=#8%yPQuBN|zo?JNOF%aQN;L3wYr(k>S zWv@qcnwGcTxzBC4-w$NU42Ga9dS1U{_kgB+P!FdwGovS7DkM_lI1?r^#_nz(mpfkw zw-tX}0cMX)QOToqk4%}cZ*2Zp!74f=Hbsyv(VjaQ?=Vkh;$w*fQ1GEg=*iAfn!wh!cv}SM43Z6 z-{_g;fw-%PIcgrN!5L}Bilkz!MVb6gLk5O;96{uLYAKq;!XeYEC0$OFGi`e#098nT zE=QLZ0NpD?lQ5ZJOHMhz(UK;&@D6z8#lD8g+=MxIY6UAWmA8pVx1P*MnLiL@q!cSf z4vWAydB=^*b-JwO$&KPLk%=NUYblq1SHYV*_1P(&;%DvC60JNV3yvZ~3#zV{l*~~7 zrxt83jTO^_&clhx=iSuhN$$hN>?1i0MNa}cUe}YN9byroZOqoI4s^Hyh1tL|W8yq# zllI$~(L$+n{#JQr%9gYq*>RvKp46C7(R@#|W09?(2V3b+%M|aj|9NMMorPAKTcT@Y zl?rRMDK^SqGy)}C=JyPPp1=6OlgRqb2ghc6i~Yuk-?Kawi{EN1gIq`1CGb&au_~{9 z7{`12+G8L63(Hmu%NOmgD(_9xjg=+fo)OuEgz8s^jZ1KlpCJ&Ufn4ZOe-r#s41s0H z`l#?CPBtY(4;D1zBCvife+!7$I@62f9GOQtj&X9GEBnF)UiL$SA*dGBbL~9}GI5%m zJbKpWAlQgYVRa|mW@GUtGL-B$o+uTgJHp+Gx&HM2wqus2pLB1u8LD9$VRjSWrt~;A z0)3tXD9^tjZ+7w7lB7ousB*}}(PBR(UO9=X=%^-lL;=u{pgaHW$GUN}MSR`ZeFO(j zyS*QT@U|#+*?0(~YlQ~lOEn1)ep{qZ8$9Ov++v%bPxwDI*GCajnpDl62ZZap)Zi73 z+oyxsi+t6T?fjr(-iJ=KD9$Efj-8%*_N)D3Y*0sDSeQaT?`GW5QkI}XrcG>PT#Zzz zq6i;Heb$wlg<^3C@f!%5j7OyGn{UatnHlGuFV3HTXRot=Z?>;$ay}`A00*9CHwbbj zRWXf3-&29F=JwH6DpaRo7SdMpVIzvQ$N>XH86JZcO#W~fz|7>M7(%y?KsSh_xC;*Z zR6m|K)986?WAi@D47ua-RXW;_gT|MrihG8qvB4yMgsoL@RD}|iPU)2<=G6IxOc@o7 zp^nQi=mwI!#`|DvA9U>8vmCjdiVUGhxscJNZxv>_?$SB zijZwEkS0vYC83#8k(VpzA3$(&6XARB(NUZTWgB8|kr z>|uO&f@ftghRBo68bRGNUwwu_jR4x9(qbZw^Xu?(Uc+>VCG)ZjyQf|6$G~GRIG8k5u(SKq9l-I)3Y>~(@S~()$S^Ooj3wxxKtRY> z@JYs=S}ogF+lMa>r9)rYWV6w}yM&pwYN5<%%q|+SmnZ#j+}c&DrmVC7DQ2mZ_G&0* z;i_>CEOnlijD*W6!z{#j9MRs&$a)8eq504?|D1P|*TA=9olo%i&;9K|i(*ojx(zT@ zeQYCoOYWxZNeCRzl`V*b7FUAgZA1flMwtk^#HN<|WWnp*@eQ5d`FUeA$|R6l^cW>) zprsvI@MA%5g?FuQJ`R4!kh}G_;eQ7Yx!d?EzIr=5wE@IkWbwk2x3=OlZOw!`|4#rN z=4=l4xwVQT5Oh7z>yrFLvPeX*m$EQnx&3pJ3a!^J^tk@#e$l#bo~QLy)?|7J-%uKE zt)u&cT^^>sOm6_Q$#6hp_oBoD;Md1&F*gn11{(y(rOq#%!o28m0Vp;Sv~74zgdQj6 zi=zy=?-IRzuUpc!v3|WQju3$+VhM#DxRfv3Lubh=`ry<72@Z9+JF7*?zMSWub(inD z>RJH2!wFpBtpAJL&CfUqFGE|>FWuQq`Qu;apHLQJB@cnj?%GE~tH}>NDwsC@vwS`h z<0|&3_dS(0AsAqIwbi~~_e)|S{6WGSATTPMvS#!@=nGFT2d9^(^o?GT&F>N9_5ruQ zMZ{?G`hvd%EQ(9+fKI(i?x9Ny`z%$1flsuatKwvi_rkjcXY9ck?ST2<{SlY=XX#f_ACLTD(*<{8Sruc`1sIerZ+XK_F#!2s&+dMZ`Uf4rA9=beee6=g2VFjspr>_Br2S~cw0&<5m~y3MVp zZ!gJsK)40E2H&0>^I;swEiE(yllcfE3}T3R-k*rEEA`_N%%cbMb>a+NZ?@pOmHho9 zj!^v+%fkgB$n6gVo0&GFR0K3?i(yRD4PW)o|4b#HObfRy7cWwfumhoNtZSc-kA~ka zT1SIGt{^eRM$t1MfEJuR__rRrapZFk!8*0X5~ekuxb&ZRLkfMIGO3!xn8Iu2b+o)4 zPI=Be<$P{)+M@Eyo?r7R0lp5;zKx8jphRW>*Uo9v2|#Uk1fU~{(g^Uf{P_b!HDeCv zG4c6R6tRp%!uL6M73Z8{6^(LS?S=|B0u=YmyKFWuF$SG^z7ItM zkL5m;7|T5c{pV*pNoYZ}oPA*W;7ki>9q<5{mRO3v=cV)BBOAUo+rmjq}6o-}RP4o>A%4w~z7ldw1B@s}W z)O`pO9d47*>{*IJL%o$%JT>Oc`(q}_n2!F`V6|A_hrXDOnyd?2K`)|g8NoxN-LJ$c z&S?wXCz{^3;oYIlLS9F5ANcIcB$o4~Nqtu;ao`Fi5n8U2IIJv^F>LR{;EA*nVE)1x zr4bqC08QRidB;>Km65^3B=_KYoH>R6r7(^Br`W2^L<+~s#zlb#J*~MTUT)NYp{B1b z^yt;LuzfA&7pI`)SV&d6u4yX|MC=gA%INbU`EeQzCQ)L3Rs#Eg==;A<7V6;*1q88` z8EE&ymc)sq`!Uc?G_QuY-eacM-YZkeWI*9M@s8T;ey+wVAHiIsV3_M}E0opIPW~)z z*OSSu8IZ&_+?O1%w%)fHA0AP;6YTi=SVD=ru+)rk0u}o- zL<30}t1pu5b=i3W`CKP)HF=f{7tGh|^(%8(<-G=3lL&=~kqsR=l_0bz4yJ{e2ToZw zK1%Y_FCi9T@p2>nJkdLG)NNeIS6~|zbS2ao*3iZpT$2jXe9kCU5@*!)aE6mPU0}qvk}{lkL692gFd@?azI0jz1Jj z^LHNy&UFv(?58Zh8h!=w^7^>fEcW@P_V#!HuB*T65tXR)yurpi!hw!46D{yAJyjk$ z#O{3>3)J}tbMV@My5gSpdXz72REF9Z0{_INNJBdLE+PY0C_@0qw_+K0A}nsErk;cw zm%jq{D3dCAYuU#LvqHG0#yq+s8sVQWYy*KZ3j_+rHp#ciZbJv4w&0uBr+_|~aCE>A zX-WR!2n*3}O0R{s`|zCq#qi&m_LD115Be001`~k6cw^)ucp0}}AkF+$&V;_{Vd*CT z7kWMUPP`XPY86KUyeoqiJuVnsc*ZJIt+3~~KaX8*?jgq}m3JQnEl2zpJi9(tf>OeF z4-q}Nu{-q09_V9n?>2^}3k4i24WCBQ!TegyMA)}<&Q09_#EHLgXpU2@f(9F){tqWm znes&iBpoKMv?D)_kvpj{*+qtj%w1gx_$yA=k4h?EO&a6_rmVoJ22F! zD#sz2MEmX!tAFw|RS87`-^qpldv)TV`12;vHNsMdxK^N2NYpII%%B5L@xfSdOR$Cj zZq)>JsZ`0O7BKJK{Vt|@nOS#c9v}W3l`}@@38}5qad*P@^+q^Nns{h2$eE6>gAi5< zWiqIGvt)s?HqH9DVk7s|I#+wX$XZJRu~~clRa_{Jn&d4*+4+E%t26k$OGjM6{4N4G z%x(OA;2J`^dX51H)92N2&#D(&X6GM}HIp$5*}4p%^QUC>Eq&t2*j_H4f+ug`BV!P& zaL%jNf5{tt)16%-QNwYR=*+T8H#&O>v!^IhIm&LA2+-gtg@#9XxNxczSHpa~9K8ys zsM?guOwf=%**1)Gx^tcD(#K3e!ZX_@b)!P8LnLf|afLwOqPUrIC#fgAYHo zV;A`+;m7^m>ni{s|J$MDnO{xGukrWD{=6>MM#Lo^H4Tx*8rm6sM9<<4%tiy;AU{1q za*Y&)YaRn;ii=h^SYgFr@IdJ`4GGIrG9MhIYv*>X0GeLtA&pc3M^{1P$XK<^X|w7X zn;-1o)LZqy@0@#rsyCPZUaZQ6m~2z1<+}` zbSqny>TE{Fdhccul^n-q6d>_y-IC<&<0H|G%UJ8%$fYjTq0`acPFv^L${j2s1YABg{0K{ z_J8mjN?1DnLu}}A+zEBVHOq-jrMO%T32Sm8OB6|PE~T52I`0dg4@ED9gHtcyeJ$?_ zg;FF{?3z|yEWr6`1M<9I_^WrLOH%{u*k|Jul@gbEMjDq4LHI+Y*@5%eA=NTJy5&~w zS@56QQ?fS>Eh0QB`+=yJUc`E2zWBb4X2J2#Y+<~VIvlm6fp9>=D#FYpoy+L(-C$Rb z-<_A9QZJR2_?N1Y8#Yd7H$y=8OX}oYWp{Ldh>4%IpFtK3fiToAh-?MoBj^lt`~Jdk zz$z$Id$Xc~);ps?Lyy=YW5itN89kmj9-YL-ywoP;&RX;Ri}KN6Fz<<-ZkylldcG4! zuQ^2$0wy(lb;bEG{GoEuhdHpE)=kzFHWk#ws$8ik`LhsNaS^|9b!;Z zWVM*zjDp%Jz*hPA3u;_VIwfBb4rT;fC{W~+3dD7jC&_t7M3o)N8mG00K z$M7F~j3UlLG<++ER=>>%^8<*<#~as%AE=s@P*z_us9eS;hnH8flOXfM#ixUJmg)TZ zr>`sar!Q`nx6)m%OBd(k54gee-{8jo3AjN6FlziS^*1#RK*Z9AcPJktZE*^s9j@Sl zAfKic>RaP+qxUmYoxJSy=1m!wn27@CNK_ANDKn4?6{K2l11dss%Y3|!w!np>+X4>x zE3J%MnwxxKw8VS`i9QessJpbn6!~|i=tv4OXdS_VfYPg-Ufe7zFgU&3JwzZ$SH#x^ zvB2;0d4gpPxwxs#d*Sv*eY`n-=4HAP2#x}m^tt>}(Y+i#AiVmuP6G~POB%S9oUy~c z(^;|k)0gg!quve5kMCSLkW+5J&9lqKcVT0~k0hSj z7m%Bn&G!UJ0bjR-H|+?uqspOUr7$o690{LlDt?D@5b|R4Iq$p+KenSp=mW(!KR0rH z2^uM`E$?oR8YueLuVgp{H|t5?6_ef%wN1ooS%9U3qR~H<3JQM2o+CqhsM+CZ7=1jE z>1x_7dVo=o7Uk~i z$`sM4I&wA{sy8{$pXKUb17KGp8mz+%prVoRDGYp=fiAxX^h$xCBojfzZ3^5BLG4Kl zB}@6C&=CTVoS~m_z~)isvNzuCg-^PU&;6F<8LfrpFi8j1269k1<*Fy|gXi^R-YySA&TP-jlxcT% zCF2kVX=D?~9VY@!kd-K+Xmqyz{VQ2yRp~HY-nYC0!MU=Wi0-Udm1*S*WXrH{Cd}CN zFqUKc4{TG%`RI$vTXNa^Un{z#QUKow?;$$9G=N?mhC>L-G%rA|09q6Ye>47r`V^G} z=kni|Pi{!dNSPZ;IHYDHBx#tsmUQ13gt+1-ZR_+F;(VSSS^ISBjvXv_e647$mM0Cp zjHV(dWaIrxnHt?6g6NbX?5u#vrH3GGV#t;ZViCOc)bsG@JZ1+y^>Szm#X~9DKo5P9 zr6%;tWDh#YftKL?xup#e*2CiK27DoO4P8 ze+4N7G17ehrniM)O=(u*t$7S%A;p<2Iq_opX3d#;=xvVr%$=4k%}xQ>*53Eh9=Sih z>FtJ*xxyNM2Bj(1&TjwZ{%6B-2Pb>ZjYQIB&Qv;yjn9&b%e(ULQ4*JtKU;7W7o*8E z+yAlf0NTK^Bv2x3JX$1vXAG^zv&RE=yAP9Tj!o}pnF zYwq&Rbj7U(C+=a{smwBuKS`~4UfzxR{b`lPbbw!oN4JmQ11TX`nn_ccU+=A`2S(m( zD#@vmR%}3odd5l08oqvODB=|VhPpR@>56hdw$L-@9+*~oDS+xiO;4LqF)WJZCYq6N z>I+RNi0s4qYn@{?K&wI?To6ehwZ%O5@R=zkec^_MCk*NLsTx^v-X3Od{nsn+83{mO#r@G@riaOTzj}I|tS7m^Zt6bLg#U<=rwA=dVUIi z6{jHF-vaCa)~o+nb;)VmY8LOY5*x`tbb*5E;-oo)*`X|$^^f=q7VO?$C71nDb(pJN zr}3HB^OnE|JDcubyL@!%OM#~eHA*CLybVm8>aS%^;B28lU*mK_(1y;Ehi1IArbqhx z0i@`WkbjTZ+o2CJ!Y?vD5H!+8u~3EP_i49UjJR~HpM4V ztp_4(ix}@6u4oo+<~4w?RIh&b;D|8{+r5CdSm{1*-O2m3B1mh=U^dvWTzhyLh?oWNF~P%&!UdI#_BqAgVvv$`=OOj zdyGOO{JIA%#x2!^v=@AW084TZFc)9+#zIsv)JI6!Uo+~v@qvK=#>xiu2cnwscakmb zn1~toUhSxHXaZ}mJ+=(Ryxpo%E)dtq2^Az(q1oK3$q&&342 zelbr__7#ZBLmm3Jm!;TYRb+ehB23!#FG(tl^Cu5cTkd)*_is`6$EC7s@%jZOGKVyX zun6Rp@|{X%7g)Kh*U$Atm~}ExD5!bTxtCw??|&|sK4bKQ3^1=6Eon>%oI4PwFwFm0 zixjP|wQ7oEnR1P6`1dg&oBuUe#(aCuvMWegB@Fx?d*Ays#re108zD5QWpkJ6!KY%M z4`H%dKx@Kd`m9+`JZJ%#hwz6gZjrY(2s~Om{2?Jt4iLK7&uj-Wk zw2~ac;9*os8B`}k2#YafvdwsEC#0Inu#(UD)VsedMzW@=s&q;xg^B2iq9jr9wYmf~6Kr<$Yo%nE=t6$Q|2 z5)Rlnb8|f1Iv@9pIPopQTQcW@GZZ{GQpPf+d`c^9`#nTe?`Ak=C_5FtL^72krYJ#T zF-@GFDTq??08-XBWE?Dpxfe#kP+n^HvCxCF#I1r< z5GWP&YV3s$&7iant2Ry#0QtET7_|!aXwd;t9+~ntLFxJTcMS~1TX~+#%fmppjM-<; zX~R2NN+7ZqAitBnn3FwFiMY{8i_m5MetA-!Nf)2e?s(9oQ`+hz(FO(Z2EoAWn^*pn zlFF&B1Zc+XP}lGt;s*pUYi^*#w~Ek`_-_()XA-Le0pk+zv83Nq%#7vnDay9x!m^5q zg?0XO5AnyQq|5D6M!y;)Q2hs?IQON6HIp07>Z%Th{2GnCfcWg^CWw{t3C+ExvtinX z?r=1L6r5YiHc4K|5|U=<`>Czyn7gSFP0Wher=87|M1#3%STtUqhrA3UC-QuX z8Cz_Md$Vu9e4oh%`RW}fO?1s_JvZC-z9|$1swsm=%`V#E`pEVVBwdS$o$^*iy0v#Z zQ3lYQiVFB!`m=a@=AXU1+aZI0ZRP~b{CdQV`{UbCW-H!5jd4p?Yx$;b%QfU+u0mr{%5FtbpG`CH3___CU$|L1sv#|i*Y6>Sr& zyZLyzJv_Nv*&I%NYZrrGZKG{U8y6u4az7U~H0A+P?lZOlV0gdAnjBlrZfJ!QuO06l zRy)(BM>@5%T3cH)K^vAm>U~+)FGU8c!K8HfRfrsW-;SMgN0dmV2eMrwhkgrN=dE+f z`ErpLU4Ru<$)F)0nK@7eG(3dhMWrrYfN7WaV83?D9hM3NX%Oafu>XF5+&i491kYT} z-2PYgGVU1~?vm)7;-DdrJr^{8Qb$OZx#RV~b{?wcniXh}#_R$f_d@kAP&d;RDJ%q| z-#*{RDA0cu@yEul`i*bpOU@(mAwqlZ>)+TUU}5);5Z4%R;}i$5jlZunyF)wyw01SG ze(A_%zP+2(wy)p!Ra#fxSy#4SvF2R4baqz9xH_`J>&FrR7@t?91IIL3y9eV)7GUk~ z=~bkIY|66;bF=lj0Co=d?}ww3_#!J!eh3zhQhg|6S~$v)Z>fs{Hg~h!o;nJ3OW`Ip z#qp}`ZT<4doFXDYIav-w?Tis)X+)uc{hZqn+%RLY`d}cnLEyOTk4GX_EeyX3G^-^i z>b3amkkxA~!$s}aZU$RZeNdK^Wdm82OCYlM_t8aa2JZhVu^)EgIeXMGbMaq(&TyYsCwyr2+F9A z?t0Dr5glAS`j-ArDYwxkU?yEmGjH77{~CiBShIRd)wOl;dF+TO215jTPHNm?2BR&v zs?_mW#RS5|Zd-|$$3ia{GyuSHYZT{NUP$pCr((|q14tvAvHYwOeS#?te{ZgkM59Iy zYX27gptYcg2yi&o5)-3Ka|W+6{QE7DbNQgR9{XZW8Vj(Be9f)ScENn?y^=LT2e?zm zUVN&V62yMTOhB+{b#7g4nGPC*PL9lfnu!w0WcIYCz-&``T`8tU@NAm)H)zLa=_wZZ z&eFr&MMUo7#FU_p{!ORx5`7I&@I@}n8%Cmo(qf;cRVp`!?=MBCm7{N~UPV$knz%v7 zS5<{ayFL+7FmiTtTMuYfyd#s6o=&l}kS`%%52I5Oi%!<9$VosZ?aeW*)v9abg!#2! zw43M+C>=6pZjK)Xuy#^^+je$#08;PUt^rF^dV1b~E6Wk@ZLvRbWxb5Yf z^LVS~p=X|_X8P~y{{GR9_N2o73mLORAJ8uwBY2U>74mz?sqSTSWKDmC zPLnaZJ#S-?+l+lIW6y5il5bs!Ww%tyq*v$iPe|JhuzkaMUet+X4UG%`&p!neajJ?- z*O%aSueWx%zu01IURFOszPUZS4EHHc+s`wp@oPvWB6DKXwI~Jhw)xeO+sg&m4in>8 z7SUUz(a(7!#qc?8j)-I8=4`s40w%L;_5Lytn0N-NCY+aTF2*7(xPmQQsxte0Cc%Ul z6S{`kAMLg>=6|EbbgBOgj#~)ATuX$|+6G0g5$BaJP(bC_5kZA)HMtGjd4O9YdHMRo zBsL-Q-8mjzqhK=8zh&!4z#MJk9QfMrNQfJ1u+gY=O4HH9JSZ=F3t z#Kuko`<2-S4z2EN zaP+lc#+I+HQZGawF;mRYzFbhVndHqx;V>nbd@ee_)SCi%+D#P3iaod#TOPx*L|2_$ zusLe;I);Q`^O>NZ$$(i%A00h%S^Oq;`1Dc-y$sUHO~HtNSjIhS%Zl)DpwFP9+7ri^l5>9Vngk^_a%o!+ zG{W9afGLo@{z1IG0%*5h?s<2{jgMd=J}>44FmxQ`rE;)M<5DJ$WTH$V6^%{n$(Gdw zt{UN|`Xs`UaG}`xVgI`A1goT%}`k zeyDw2dH_u%`uALIE_hX?Cc&Ds*dER`sFPu;6VKA0;c45(&dxl!&@Fy2GS^TYTe{M% z30K~*rgU-DxX_N&&3i1lf6Y~nXylcOk`n^9HK)S`LAJ(j$A$Mk$3lZNX#=sSp}@2%{_ z492H9_9kR5HqH&&n>jjdd~8$}HGBAz3T4r)?X{fnuHOsOWlNG3^yVpBC>D4j#s@w> zI?-N938)XKHfF9AN{r0-DU~ZlYFW;~0Sqjm9R}CTSBR9hv0%nRPGGEmV4ss&jF(E@ ziqbzL!;`h$vL8pzmy;tg))l!Ywz+I}0!Gfp_3gGk>wb9#sYsYwQ!b%}j+vgV*OS2k zwRP-cOLu988E@tqyiJ@K`Dw?9fFv1F)3+J)y3p5TQP zu9{}Df6=7bE(p3;X$=EqiXxFkFi|Vz&NYuV$pX5~7cQ)8lCAHmvJK8ioxa6dS-^yig+KHDzC*<0A2X-{KriCHyHF^p3>H^^G!w7gbN+5qAQFa@h=!fjt-FYWN12UkF9 zdV>HfM24myNFDrVb$&p9;a!>013!WlzezFXKb-li1)V}|L z>`~cDi7lHSvk{dcT;`mBK!4MM?MEU&&^!+N=334H$(h=3mnhoxIn);$r(`x3KgQ4UTN|%#cl9) z)y*-}L%00vIfV^y@~7R_*FzFf+oezele*}*VwSk#xIH4JsG7%?9LFTKt&)G=t0Z=x zcvNIVK~oHgJ(EJ1`XB4t6`=_n;BvUYzf`3G!(x{Q62(Vj!OF)EPdG!+Bdf{W-^rWS zw|*P5*=GW|e@kz&_9n(m=Ga>|dv*AGP4DZ0ox?est#^FlJ>UkVZ1cQK?&3`y5|lu@ zv-I|}`3hM-7m3-xZI>I%)25@oz z-lc_&x5ANZv9dUjCm!(!uLTvsw|#P8&2@-18q zQdl!e%+e}ng^b+35xG;&^RUI&0Vb0DUQd*~$^`1CV8E(*z8#Ram(BxC8q_KW_Bakm zdqXM_Ed7-lxa!SthHcLYy5RWT`1!~hbJ1oVvo%VKUq(n?F_Rlp{JT`isIwX;uD3le zwEZ-Exu?4p9y$Os1@YbNv{&M}m&!_XqH|iVLIfUe7vh8E7XTi^5q++d*yA|H;6#K* ztbeLKCsLs9kaLuZt0}nGYw{b;$Ml2UF@3H)#J(|F0e}F-?n(OwV|_pfw@{SCDqHXS z1Ul7#aZRb=#9C-(=!fl(4M==$#yRT=O1JPN;g;$`3n7;LDTWwvrCWMvan@S~a5W>| z6Hj909a+DvfDWp=kmX0-_TKq zU%HjZlGt6!stKHOZBFO8~$5jf_XK3z|GdNFXdjAR+7@wy~>KUL3! zT1J~EOqLY~K7zx7>Di{QkdROO$r;mBe_=}?za-u;fFq#Uc8*WTW7}`gi>}`*LQt03 zrTa8NY5RjzVGUCo)4F3sj^iW_3F){a*YQ|O6H4Cg49uY~<9_(jM!v^J?E5QhVg$EQ zzotS0$WI&0@)4gX#{Rv&%_#%?#Pim7)&J)FW?KKxBx-6t}ELb)Wq#z`&>w}_KT!0-bW^;0qfO!r2G7m`>E zbMk~3hQ>N1S>&p;uOmHxir2697f0rI{By2Ap8M*zn-=x3-0DGI9^>{2oAz9rc>P-# z9kxyCQ*z~9@&f@}=GCii9Y`Eg?gJA4)@cVfT-A@&@BU@`qX+_6cP2J;>nEhGohp3| zi#~+6A~=vdZ`eEVOZn^9j)<+pctrXa_@Me))b!UclIH|%@QLq!^8Ya@>mfbLp#j{g zZ~uDV?8BX1CB)d=4J4)c`iBgqZlL$%50(no?T5ViYKs`h7)~w)>H6+442Kww%IYEv zd%F_sJVI0MOv_G~%XfHvLw6S%h(p)A$AYvmWNUcyGv z*28(K9~9&Wj~tR6E_giQTeVT+eZ2nIJXXr>ZDvPWK?Wr5Y)1Xzt=s(5uJqIJk>?X+ zoPUtZKaWG>SAttw?CMy*r}fTZ?}0wT>L@LDa;Jm+YbKL>ux{9le9-S2^)Oz`CD z2BDh2yWhaWx#C~Q%}3ySIZ@Bpf#P{sD~2Q979JYO4}aPY`RMTYj{`?eX-@gu)PGhk zwx9w(iL0tqY_U_Y=S zmB$`P-5jBtOqkimXr(`USTq|7nLEBECkhO;)qHI9o9DGUVe+K)$&RA&FhZ@%w44(2I|-X?}k}#s`u)yKq*{?X|LVw z>rPqErjXWpnBl191!!;_q)bW65UF$-M0N@N$A~j)HxY*8vChN>{F*twr8~7ZOw1{R zdG*{pm*zV}ff4}1&yi1oD8x%}Vr2NlgEivWHKpw58V)2SyG8JNc4#t8lR4P^z*+j1 zr3I!QU`5wF#9-^Xylb@v?)+2#Ns-7go`S}OXe8sh0#gPIMQ?vQ;uI=E=4G|>MjA8{ z#mGJY4aw+-0l%xl72!KlA$3t0%G|~?VUY0i=B>)?57@H3x6b8e+EvDLz5vve=m{kw zefKp-IEHE$S^297$p%g~(B@lB7dp${`d;^NUAhvuE$cF`c2V;O{)zd7D0hG-u)b9LBq|Mtw=rFkdYF9kiC0j0InWXYbLF*Fg8suJ6EJSX%%!d4hohyhdctX_ACoz(($iG483W1Xewjn-xQK9Hjp|4&1 zAM0@0?`GWSFi+kaPiEbr%9>?{gY|z!OJ*3ozrmtrCAsRTt_C_3FE7D?M`obRg29XQ zENpbAX6Jpizk?3py2kmk8^)6NnN%ODP&E}5HFzWg0yI);@9IWDgP}_ASQatJ#U8qN z3LGC)8r;Am3&rY{QB5+goSI(Yldx2z4Pm z2_urm(I3t4>v%nJ;SZBj0|k5LT#=eo3+z55dYtIkw#ax1X(X-v(&Q z{n0gClP41(s92rjLl34h`3;mJMV}C8t6UAO~@q;sOT8xtSHfa&q@7!?Kw0L5|@^M_C>iG7CZLa=UVJLeNBQv%U zvuY)y?uc>SBZRNBvrB&1wjfEocXKGYKg1omc!xx;LKu*eg;-jHRcfws}B+V9V!5F(41yU>p3e9pS>uAhExZs}91`H{_KL+M{^9?Q>;hCv<*`h!& zQJlW0I~MmiyUga=Wv_sc&N5v+nU3Ac*E0o40)%oYcUxiEeL&b!x4aLew<_-omtvhLHO3({HeeP zDLs+(uM7u7emL}~;M^E_mudow5Bk#PrOP5t54-ztRJ{F5U~LJ`V7SK z^SrVr8dP1(|PaKbO?m22Qe3z|;!dv-(T5p1D ziC|li94&%#fx~zN%M1=pd!wDkgNIHw5z%8gy~dygLU(XzWtDsY_{!8Cz5#sSJ@HTO zZGHmM{@=f07!;cc%lZP#2$1{G0ARb!XL{ClLtK5Isj(197W~YES~_Hwes>cNXL9X1 zMlz@CKCv^1;g_rp1f2ZUK z4etO38AfXbQE1pMZneC$E^jsUcHncooMkG^{6l;l>>n>o&5D-cyrh%BsD7qlXGkb3 zE|Et`-CK@`Et9b_S&4eokDY~m;pa*}&WnV<9}za{$|$LwoL>wRkH$;e$3pXU*z9Ma zjJ~b|RchGc?|Xn5Y<9)Y+mI9nY2AjUU6DSS=KI9Vt2#j1J69dqhmH^4^^_f^kyt}- zMF`njhFtl|Tr)QIGWnSi4SW4K9vsz>x2pb1=)6tm>mPJ?MccSA481{1){n>!Kz=qv zumIusm*+(r69!nCFII-z@4)F83lP3FI>M1;r17vI9ul)EF9DGYnt|7t`dh{aELMB@ zKA$g{@E#9%)ereyMm|`qMPl6w)*AwAx5i3&&Bwm`zWQXw6DtpR3i)tE7rFXrzyOJ< zR@vzQjFvB}oUJphPq20@^WT~cE$n|a8|7?4dFILviw5>G`B$n6oyw4lOq~Y(Nb91{ zRZi)$_?pFw)#R&R*!4SS2&Rrx^SxM2YapYlVpYqW0B8sBsKTZ)+_(JtG$yN*BN7`S>R=b);AdtYdcJBYL_RM{+ z??mqd6IfxGTdK9?BmK`;IsU>JgUM#!$olt(fFb??i`g>GE?mege{B3@NyCZ@(jPM% zSm@=toI6dty{)4h^8vy=HiDs&S+3z!4JR3TLyc+KT0=P^Wpmv5HJKh0MGgog0^ak8 zKqk@t@SI-gs%X(e4C@Mxw3!vUzNw0&%K$zBVFya!M|jmdFr4*Ww$D; z<^Pjv=akfH2u?J7fx9w}&iK%lxRrEHQrQ$MEMiWg=oY>yzC1waU$Gs{_&}WXnNM|` z)nh-WNYX-ZV_dN(X?3wJmCOk#rx&XGlt$td4(n3$H*ze+Lg6f$stbD&L(Px%qLZyg z#fVZ0PgcX!Z}RRO802A_&Vnmiu-PR$L2r=)m|dgJEkMb~@sY-J zf3_`uuwmWV8#1roc!rWf(B8h-^FFfYvoMK|-95y$<%QlB$IL2_)RQr4cTdOI26Otf4KAeIr9d)bU4>4wHUPGSmVe8JT zKVS=oHCF)6J?4r!6t+a+(|Wc66fxy*KlYZbN>oZ@nGmvgG= z+1(efaL4)}XtP_7FvejdQ(6~i+MP4X3VS%k>6K_(Msx)Wt&T6r<-uwPVBNDuBcQkE z_=;w69PkwpZp{~Sa7rz3^V=-{j8iTr>gJDvhl_)S7s{#F+Z z4$3d3TynRZN0xYHf3vemOfr2F%KcjiZf2+hTTsBClv=?Ahv3#l_2 z1*u5u8M$DiL8I!B0^jh*FK$Njh(k=rALCA0wZ@|)(0}bi- zse9V8x+avNh1*kbJm(p-vQh{sS4UHr>*@2;AsLmVOIZb zgZ!E-M9M8(fqzUdAMP#N-Iu<^Y-Q`}~1h%d_G!p{h?oMSHa>GR=DB zK-0{nRusMTJrTj3to})|KR>9o&vTliWG&P=K(ZPh7`G0${GXp7mvB&><`CW*r4`AL z=|Cf@ajyAXrpF}>XZLWozZ>g25;mRwk^CY`f;OGA|G-O@CqOx1j#S+NwOO@W3dWuD zZPTdV1FnN-n)76fj*lRXMRnTY{@VTBHlt6)aCFiZhp|%{ZYG(oT$J!RJLnxr)@fhQ zmSqmM6u)RUfR{#qq0Uh&L?-pgq+NKn_vP8{r55Q^n}Mk1-^GVe_s zCpMti^Kx!Tyf!OENpY+eZMoshL3v{ox7mBVIz4DXd9K5d{W%Bc_(7~Nm8`MG(?D&Y zJ2wDz%5I*-j2LY6y_$e$v2-Tt3~GH{j7s-8GMeUj=H<6zZZ-B%=!?iaZgD`}rVUej z=iEuHg9#`G;>>Qjn1K>yQY%~da)X%%z6ETF3qww)S|3c?)+YsGVDm?ftHzPvR!?iT zK^%MBr=Z46`Ko+@hR5Y)dvPfFl(%T^x(f8t8idSKZggf-?oyR|5xxx_c>;?J3LI~^ zUz8x{?^V4&L)sv6H$#Ga7>Fm&tFCsXjAJJGp0Dw(;)m9shtEa%^F$ujue)oX%Hkz( zZW`pX!bSMA4z%Op zSKJt|PN1hyQ@$Jb-ZFI(OwgnIAxFaz0PyYBn#DjmH{F$4aEBLw!u7^m!!=*Q_0s=> z^Y};l-hj_hc9xsC)v)Xf1IN()u5%VoY$KJW&es<70fu8f%06u>ysR6952@c7bitiv zmb=l-EGTt)ejG!z#7^OLz!iL75CvP$B_3Uwb^6zg&B)h9+nK8*KXsSe(rON+3y>ChxNQk-WkGbeNtl=WX}#aOn7h< z`_3u>^o$1iSDd|4mODNV0=>)^= z=Y?cM@3?TtqW8|tVUQu(wGV?ReG#f4n_h?_n-+DCM0JK1YJjWbB(Sla7~ z{;H(1kE>So`2a7E;S`o4NNbC6HVV z%iz=Tzg7N3KK~UBpL4Y&i5Fj8ov>YZRO91Vqp109cFrpAm<*YiU@?UJVnPG9O|4ek z5x%`49Zl){F^QQ~)Ud_frApiZ!OtMzGr`i>v2y0uZ0^4T=Dj{$p-&!Ycgy%#j7lw2 zsbBM1|0t9p8Wn506d_7=n%@;mcP?WK_*L1*_)2FFs<~K0!_-{(fXW#V4ob(6o9|!b z=T`A=1}C+Vp}hdINpfKrw5RSj5>1s=AaW`5(|$HK2m?J2TfE*utX?JkB}=~L2t f%cxLOyx51X&PQqB;NW1ecW{eAiO+D~P~iR#vQU+u diff --git a/campcaster/src/tools/pear/src/Calendar/Calendar.php b/campcaster/src/tools/pear/src/Calendar/Calendar.php new file mode 100644 index 000000000..e1025ddaa --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Calendar.php @@ -0,0 +1,685 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Calendar.php,v 1.3 2005/10/22 10:07:11 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Calendar.php,v 1.3 2005/10/22 10:07:11 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Constant which defines the calculation engine to use + */ +if (!defined('CALENDAR_ENGINE')) { + define('CALENDAR_ENGINE', 'UnixTS'); +} + +/** + * Define Calendar Month states + */ +define('CALENDAR_USE_MONTH', 1); +define('CALENDAR_USE_MONTH_WEEKDAYS', 2); +define('CALENDAR_USE_MONTH_WEEKS', 3); + +/** + * Contains a factory method to return a Singleton instance of a class + * implementing the Calendar_Engine_Interface.
+ * Note: this class must be modified to "register" alternative + * Calendar_Engines. The engine used can be controlled with the constant + * CALENDAR_ENGINE + * @see Calendar_Engine_Interface + * @package Calendar + * @access protected + */ +class Calendar_Engine_Factory +{ + /** + * Returns an instance of the engine + * @return object instance of a calendar calculation engine + * @access protected + */ + function & getEngine() + { + static $engine = false; + switch (CALENDAR_ENGINE) { + case 'PearDate': + $class = 'Calendar_Engine_PearDate'; + break; + case 'UnixTS': + default: + $class = 'Calendar_Engine_UnixTS'; + break; + } + if (!$engine) { + if (!class_exists($class)) { + require_once CALENDAR_ROOT.'Engine'.DIRECTORY_SEPARATOR.CALENDAR_ENGINE.'.php'; + } + $engine = new $class; + } + return $engine; + } +} + +/** + * Base class for Calendar API. This class should not be instantiated + * directly. + * @abstract + * @package Calendar + */ +class Calendar +{ + /** + * Instance of class implementing calendar engine interface + * @var object + * @access private + */ + var $cE; + + /** + * Instance of Calendar_Validator (lazy initialized when isValid() or + * getValidor() is called + * @var Calendar_Validator + * @access private + */ + var $validator; + + /** + * Year for this calendar object e.g. 2003 + * @access private + * @var int + */ + var $year; + + /** + * Month for this calendar object e.g. 9 + * @access private + * @var int + */ + var $month; + + /** + * Day of month for this calendar object e.g. 23 + * @access private + * @var int + */ + var $day; + + /** + * Hour of day for this calendar object e.g. 13 + * @access private + * @var int + */ + var $hour; + + /** + * Minute of hour this calendar object e.g. 46 + * @access private + * @var int + */ + var $minute; + + /** + * Second of minute this calendar object e.g. 34 + * @access private + * @var int + */ + var $second; + + /** + * Marks this calendar object as selected (e.g. 'today') + * @access private + * @var boolean + */ + var $selected = false; + + /** + * Collection of child calendar objects created from subclasses + * of Calendar. Type depends on the object which created them. + * @access private + * @var array + */ + var $children = array(); + + /** + * Constructs the Calendar + * @param int year + * @param int month + * @param int day + * @param int hour + * @param int minute + * @param int second + * @access protected + */ + function Calendar($y = 2000, $m = 1, $d = 1, $h = 0, $i = 0, $s = 0) + { + static $cE = null; + if (!isset($cE)) { + $cE = & Calendar_Engine_Factory::getEngine(); + } + $this->cE = & $cE; + $this->year = (int)$y; + $this->month = (int)$m; + $this->day = (int)$d; + $this->hour = (int)$h; + $this->minute = (int)$i; + $this->second = (int)$s; + } + + /** + * Defines the calendar by a timestamp (Unix or ISO-8601), replacing values + * passed to the constructor + * @param int|string Unix or ISO-8601 timestamp + * @return void + * @access public + */ + function setTimestamp($ts) + { + $this->year = $this->cE->stampToYear($ts); + $this->month = $this->cE->stampToMonth($ts); + $this->day = $this->cE->stampToDay($ts); + $this->hour = $this->cE->stampToHour($ts); + $this->minute = $this->cE->stampToMinute($ts); + $this->second = $this->cE->stampToSecond($ts); + } + + /** + * Returns a timestamp from the current date / time values. Format of + * timestamp depends on Calendar_Engine implementation being used + * @return int|string timestamp + * @access public + */ + function getTimestamp() + { + return $this->cE->dateToStamp( + $this->year, $this->month, $this->day, + $this->hour, $this->minute, $this->second); + } + + /** + * Defines calendar object as selected (e.g. for today) + * @param boolean state whether Calendar subclass + * @return void + * @access public + */ + function setSelected($state = true) + { + $this->selected = $state; + } + + /** + * True if the calendar subclass object is selected (e.g. today) + * @return boolean + * @access public + */ + function isSelected() + { + return $this->selected; + } + + /** + * Adjusts the date (helper method) + * @return void + * @access public + */ + function adjust() + { + $stamp = $this->getTimeStamp(); + $this->year = $this->cE->stampToYear($stamp); + $this->month = $this->cE->stampToMonth($stamp); + $this->day = $this->cE->stampToDay($stamp); + $this->hour = $this->cE->stampToHour($stamp); + $this->minute = $this->cE->stampToMinute($stamp); + $this->second = $this->cE->stampToSecond($stamp); + } + + /** + * Returns the date as an associative array (helper method) + * @param mixed timestamp (leave empty for current timestamp) + * @return array + * @access public + */ + function toArray($stamp=null) + { + if (is_null($stamp)) { + $stamp = $this->getTimeStamp(); + } + return array( + 'year' => $this->cE->stampToYear($stamp), + 'month' => $this->cE->stampToMonth($stamp), + 'day' => $this->cE->stampToDay($stamp), + 'hour' => $this->cE->stampToHour($stamp), + 'minute' => $this->cE->stampToMinute($stamp), + 'second' => $this->cE->stampToSecond($stamp) + ); + } + + /** + * Returns the value as an associative array (helper method) + * @param string type of date object that return value represents + * @param string $format ['int' | 'array' | 'timestamp' | 'object'] + * @param mixed timestamp (depending on Calendar engine being used) + * @param int integer default value (i.e. give me the answer quick) + * @return mixed + * @access private + */ + function returnValue($returnType, $format, $stamp, $default) + { + switch (strtolower($format)) { + case 'int': + return $default; + case 'array': + return $this->toArray($stamp); + break; + case 'object': + require_once CALENDAR_ROOT.'Factory.php'; + return Calendar_Factory::createByTimestamp($returnType,$stamp); + break; + case 'timestamp': + default: + return $stamp; + break; + } + } + + /** + * Abstract method for building the children of a calendar object. + * Implemented by Calendar subclasses + * @param array containing Calendar objects to select (optional) + * @return boolean + * @access public + * @abstract + */ + function build($sDates = array()) + { + require_once 'PEAR.php'; + PEAR::raiseError( + 'Calendar::build is abstract', null, PEAR_ERROR_TRIGGER, + E_USER_NOTICE, 'Calendar::build()'); + return false; + } + + /** + * Abstract method for selected data objects called from build + * @param array + * @return boolean + * @access public + * @abstract + */ + function setSelection($sDates) + { + require_once 'PEAR.php'; + PEAR::raiseError( + 'Calendar::setSelection is abstract', null, PEAR_ERROR_TRIGGER, + E_USER_NOTICE, 'Calendar::setSelection()'); + return false; + } + + /** + * Iterator method for fetching child Calendar subclass objects + * (e.g. a minute from an hour object). On reaching the end of + * the collection, returns false and resets the collection for + * further iteratations. + * @return mixed either an object subclass of Calendar or false + * @access public + */ + function fetch() + { + $child = each($this->children); + if ($child) { + return $child['value']; + } else { + reset($this->children); + return false; + } + } + + /** + * Fetches all child from the current collection of children + * @return array + * @access public + */ + function fetchAll() + { + return $this->children; + } + + /** + * Get the number Calendar subclass objects stored in the internal + * collection. + * @return int + * @access public + */ + function size() + { + return count($this->children); + } + + /** + * Determine whether this date is valid, with the bounds determined by + * the Calendar_Engine. The call is passed on to + * Calendar_Validator::isValid + * @return boolean + * @access public + */ + function isValid() + { + $validator = & $this->getValidator(); + return $validator->isValid(); + } + + /** + * Returns an instance of Calendar_Validator + * @return Calendar_Validator + * @access public + */ + function & getValidator() + { + if (!isset($this->validator)) { + require_once CALENDAR_ROOT.'Validator.php'; + $this->validator = & new Calendar_Validator($this); + } + return $this->validator; + } + + /** + * Returns a reference to the current Calendar_Engine being used. Useful + * for Calendar_Table_Helper and Calendar_Validator + * @return object implementing Calendar_Engine_Inteface + * @access protected + */ + function & getEngine() + { + return $this->cE; + } + + /** + * Set the CALENDAR_FIRST_DAY_OF_WEEK constant to the $firstDay value + * if the constant is not set yet. + * @throws E_USER_WARNING this method throws a WARNING if the + * CALENDAR_FIRST_DAY_OF_WEEK constant is already defined and + * the $firstDay parameter is set to a different value + * @param integer $firstDay first day of the week (0=sunday, 1=monday, ...) + * @return integer + * @access protected + */ + function defineFirstDayOfWeek($firstDay = null) + { + if (defined('CALENDAR_FIRST_DAY_OF_WEEK')) { + if (!is_null($firstDay) && ($firstDay != CALENDAR_FIRST_DAY_OF_WEEK)) { + $msg = 'CALENDAR_FIRST_DAY_OF_WEEK constant already defined.' + .' The $firstDay parameter will be ignored.'; + trigger_error($msg, E_USER_WARNING); + } + return CALENDAR_FIRST_DAY_OF_WEEK; + } + if (is_null($firstDay)) { + $firstDay = $this->cE->getFirstDayOfWeek( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay() + ); + } + define ('CALENDAR_FIRST_DAY_OF_WEEK', $firstDay); + return CALENDAR_FIRST_DAY_OF_WEEK; + } + + /** + * Returns the value for the previous year + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 2002 or timestamp + * @access public + */ + function prevYear($format = 'int') + { + $ts = $this->cE->dateToStamp($this->year-1, 1, 1, 0, 0, 0); + return $this->returnValue('Year', $format, $ts, $this->year-1); + } + + /** + * Returns the value for this year + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 2003 or timestamp + * @access public + */ + function thisYear($format = 'int') + { + $ts = $this->cE->dateToStamp($this->year, 1, 1, 0, 0, 0); + return $this->returnValue('Year', $format, $ts, $this->year); + } + + /** + * Returns the value for next year + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 2004 or timestamp + * @access public + */ + function nextYear($format = 'int') + { + $ts = $this->cE->dateToStamp($this->year+1, 1, 1, 0, 0, 0); + return $this->returnValue('Year', $format, $ts, $this->year+1); + } + + /** + * Returns the value for the previous month + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 4 or Unix timestamp + * @access public + */ + function prevMonth($format = 'int') + { + $ts = $this->cE->dateToStamp($this->year, $this->month-1, 1, 0, 0, 0); + return $this->returnValue('Month', $format, $ts, $this->cE->stampToMonth($ts)); + } + + /** + * Returns the value for this month + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 5 or timestamp + * @access public + */ + function thisMonth($format = 'int') + { + $ts = $this->cE->dateToStamp($this->year, $this->month, 1, 0, 0, 0); + return $this->returnValue('Month', $format, $ts, $this->month); + } + + /** + * Returns the value for next month + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 6 or timestamp + * @access public + */ + function nextMonth($format = 'int') + { + $ts = $this->cE->dateToStamp($this->year, $this->month+1, 1, 0, 0, 0); + return $this->returnValue('Month', $format, $ts, $this->cE->stampToMonth($ts)); + } + + /** + * Returns the value for the previous day + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 10 or timestamp + * @access public + */ + function prevDay($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day-1, 0, 0, 0); + return $this->returnValue('Day', $format, $ts, $this->cE->stampToDay($ts)); + } + + /** + * Returns the value for this day + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 11 or timestamp + * @access public + */ + function thisDay($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, 0, 0, 0); + return $this->returnValue('Day', $format, $ts, $this->day); + } + + /** + * Returns the value for the next day + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 12 or timestamp + * @access public + */ + function nextDay($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day+1, 0, 0, 0); + return $this->returnValue('Day', $format, $ts, $this->cE->stampToDay($ts)); + } + + /** + * Returns the value for the previous hour + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 13 or timestamp + * @access public + */ + function prevHour($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, $this->hour-1, 0, 0); + return $this->returnValue('Hour', $format, $ts, $this->cE->stampToHour($ts)); + } + + /** + * Returns the value for this hour + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 14 or timestamp + * @access public + */ + function thisHour($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, $this->hour, 0, 0); + return $this->returnValue('Hour', $format, $ts, $this->hour); + } + + /** + * Returns the value for the next hour + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 14 or timestamp + * @access public + */ + function nextHour($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, $this->hour+1, 0, 0); + return $this->returnValue('Hour', $format, $ts, $this->cE->stampToHour($ts)); + } + + /** + * Returns the value for the previous minute + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 23 or timestamp + * @access public + */ + function prevMinute($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, + $this->hour, $this->minute-1, 0); + return $this->returnValue('Minute', $format, $ts, $this->cE->stampToMinute($ts)); + } + + /** + * Returns the value for this minute + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 24 or timestamp + * @access public + */ + function thisMinute($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, + $this->hour, $this->minute, 0); + return $this->returnValue('Minute', $format, $ts, $this->minute); + } + + /** + * Returns the value for the next minute + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 25 or timestamp + * @access public + */ + function nextMinute($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, + $this->hour, $this->minute+1, 0); + return $this->returnValue('Minute', $format, $ts, $this->cE->stampToMinute($ts)); + } + + /** + * Returns the value for the previous second + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 43 or timestamp + * @access public + */ + function prevSecond($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, + $this->hour, $this->minute, $this->second-1); + return $this->returnValue('Second', $format, $ts, $this->cE->stampToSecond($ts)); + } + + /** + * Returns the value for this second + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 44 or timestamp + * @access public + */ + function thisSecond($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, + $this->hour, $this->minute, $this->second); + return $this->returnValue('Second', $format, $ts, $this->second); + } + + /** + * Returns the value for the next second + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 45 or timestamp + * @access public + */ + function nextSecond($format = 'int') + { + $ts = $this->cE->dateToStamp( + $this->year, $this->month, $this->day, + $this->hour, $this->minute, $this->second+1); + return $this->returnValue('Second', $format, $ts, $this->cE->stampToSecond($ts)); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Day.php b/campcaster/src/tools/pear/src/Calendar/Day.php new file mode 100644 index 000000000..ffa382fd9 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Day.php @@ -0,0 +1,197 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Day.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Day.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Represents a Day and builds Hours. + * + * require_once 'Calendar'.DIRECTORY_SEPARATOR.'Day.php'; + * $Day = & new Calendar_Day(2003, 10, 21); // Oct 21st 2003 + * while ($Hour = & $Day->fetch()) { + * echo $Hour->thisHour().'
'; + * } + * + * @package Calendar + * @access public + */ +class Calendar_Day extends Calendar +{ + /** + * Marks the Day at the beginning of a week + * @access private + * @var boolean + */ + var $first = false; + + /** + * Marks the Day at the end of a week + * @access private + * @var boolean + */ + var $last = false; + + + /** + * Used for tabular calendars + * @access private + * @var boolean + */ + var $empty = false; + + /** + * Constructs Calendar_Day + * @param int year e.g. 2003 + * @param int month e.g. 8 + * @param int day e.g. 15 + * @access public + */ + function Calendar_Day($y, $m, $d) + { + Calendar::Calendar($y, $m, $d); + } + + /** + * Builds the Hours of the Day + * @param array (optional) Caledar_Hour objects representing selected dates + * @return boolean + * @access public + */ + function build($sDates = array()) + { + require_once CALENDAR_ROOT.'Hour.php'; + + $hID = $this->cE->getHoursInDay($this->year, $this->month, $this->day); + for ($i=0; $i < $hID; $i++) { + $this->children[$i]= + new Calendar_Hour($this->year, $this->month, $this->day, $i); + } + if (count($sDates) > 0) { + $this->setSelection($sDates); + } + return true; + } + + /** + * Called from build() + * @param array + * @return void + * @access private + */ + function setSelection($sDates) + { + foreach ($sDates as $sDate) { + if ($this->year == $sDate->thisYear() + && $this->month == $sDate->thisMonth() + && $this->day == $sDate->thisDay()) + { + $key = (int)$sDate->thisHour(); + if (isset($this->children[$key])) { + $sDate->setSelected(); + $this->children[$key] = $sDate; + } + } + } + } + + /** + * Defines Day object as first in a week + * Only used by Calendar_Month_Weekdays::build() + * @param boolean state + * @return void + * @access private + */ + function setFirst ($state = true) + { + $this->first = $state; + } + + /** + * Defines Day object as last in a week + * Used only following Calendar_Month_Weekdays::build() + * @param boolean state + * @return void + * @access private + */ + function setLast($state = true) + { + $this->last = $state; + } + + /** + * Returns true if Day object is first in a Week + * Only relevant when Day is created by Calendar_Month_Weekdays::build() + * @return boolean + * @access public + */ + function isFirst() { + return $this->first; + } + + /** + * Returns true if Day object is last in a Week + * Only relevant when Day is created by Calendar_Month_Weekdays::build() + * @return boolean + * @access public + */ + function isLast() + { + return $this->last; + } + + /** + * Defines Day object as empty + * Only used by Calendar_Month_Weekdays::build() + * @param boolean state + * @return void + * @access private + */ + function setEmpty ($state = true) + { + $this->empty = $state; + } + + /** + * @return boolean + * @access public + */ + function isEmpty() + { + return $this->empty; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Decorator.php b/campcaster/src/tools/pear/src/Calendar/Decorator.php new file mode 100644 index 000000000..8f409b8d9 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Decorator.php @@ -0,0 +1,558 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Decorator.php,v 1.3 2005/10/22 10:29:46 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Decorator.php,v 1.3 2005/10/22 10:29:46 quipo Exp $ + */ +/** + * Decorates any calendar class. + * Create a subclass of this class for your own "decoration". + * Used for "selections" + * + * class DayDecorator extends Calendar_Decorator + * { + * function thisDay($format = 'int') + * { +.* $day = parent::thisDay('timestamp'); +.* return date('D', $day); + * } + * } + * $Day = & new Calendar_Day(2003, 10, 25); + * $DayDecorator = & new DayDecorator($Day); + * echo $DayDecorator->thisDay(); // Outputs "Sat" + * + * @abstract + * @package Calendar + */ +class Calendar_Decorator +{ + /** + * Subclass of Calendar being decorated + * @var object + * @access private + */ + var $calendar; + + /** + * Constructs the Calendar_Decorator + * @param object subclass to Calendar to decorate + */ + function Calendar_Decorator(& $calendar) + { + $this->calendar = & $calendar; + } + + /** + * Defines the calendar by a Unix timestamp, replacing values + * passed to the constructor + * @param int Unix timestamp + * @return void + * @access public + */ + function setTimestamp($ts) + { + $this->calendar->setTimestamp($ts); + } + + /** + * Returns a timestamp from the current date / time values. Format of + * timestamp depends on Calendar_Engine implementation being used + * @return int timestamp + * @access public + */ + function getTimestamp() + { + return $this->calendar->getTimeStamp(); + } + + /** + * Defines calendar object as selected (e.g. for today) + * @param boolean state whether Calendar subclass + * @return void + * @access public + */ + function setSelected($state = true) + { + $this->calendar->setSelected($state = true); + } + + /** + * True if the calendar subclass object is selected (e.g. today) + * @return boolean + * @access public + */ + function isSelected() + { + return $this->calendar->isSelected(); + } + + /** + * Adjusts the date (helper method) + * @return void + * @access public + */ + function adjust() + { + $this->calendar->adjust(); + } + + /** + * Returns the date as an associative array (helper method) + * @param mixed timestamp (leave empty for current timestamp) + * @return array + * @access public + */ + function toArray($stamp=null) + { + return $this->calendar->toArray($stamp); + } + + /** + * Returns the value as an associative array (helper method) + * @param string type of date object that return value represents + * @param string $format ['int' | 'array' | 'timestamp' | 'object'] + * @param mixed timestamp (depending on Calendar engine being used) + * @param int integer default value (i.e. give me the answer quick) + * @return mixed + * @access private + */ + function returnValue($returnType, $format, $stamp, $default) + { + return $this->calendar->returnValue($returnType, $format, $stamp, $default); + } + + /** + * Defines Day object as first in a week + * Only used by Calendar_Month_Weekdays::build() + * @param boolean state + * @return void + * @access private + */ + function setFirst ($state = true) + { + if ( method_exists($this->calendar,'setFirst') ) { + $this->calendar->setFirst($state); + } + } + + /** + * Defines Day object as last in a week + * Used only following Calendar_Month_Weekdays::build() + * @param boolean state + * @return void + * @access private + */ + function setLast($state = true) + { + if ( method_exists($this->calendar,'setLast') ) { + $this->calendar->setLast($state); + } + } + + /** + * Returns true if Day object is first in a Week + * Only relevant when Day is created by Calendar_Month_Weekdays::build() + * @return boolean + * @access public + */ + function isFirst() { + if ( method_exists($this->calendar,'isFirst') ) { + return $this->calendar->isFirst(); + } + } + + /** + * Returns true if Day object is last in a Week + * Only relevant when Day is created by Calendar_Month_Weekdays::build() + * @return boolean + * @access public + */ + function isLast() + { + if ( method_exists($this->calendar,'isLast') ) { + return $this->calendar->isLast(); + } + } + + /** + * Defines Day object as empty + * Only used by Calendar_Month_Weekdays::build() + * @param boolean state + * @return void + * @access private + */ + function setEmpty ($state = true) + { + if ( method_exists($this->calendar,'setEmpty') ) { + $this->calendar->setEmpty($state); + } + } + + /** + * @return boolean + * @access public + */ + function isEmpty() + { + if ( method_exists($this->calendar,'isEmpty') ) { + return $this->calendar->isEmpty(); + } + } + + /** + * Build the children + * @param array containing Calendar objects to select (optional) + * @return boolean + * @access public + * @abstract + */ + function build($sDates = array()) + { + $this->calendar->build($sDates); + } + + /** + * Iterator method for fetching child Calendar subclass objects + * (e.g. a minute from an hour object). On reaching the end of + * the collection, returns false and resets the collection for + * further iteratations. + * @return mixed either an object subclass of Calendar or false + * @access public + */ + function fetch() + { + return $this->calendar->fetch(); + } + + /** + * Fetches all child from the current collection of children + * @return array + * @access public + */ + function fetchAll() + { + return $this->calendar->fetchAll(); + } + + /** + * Get the number Calendar subclass objects stored in the internal + * collection. + * @return int + * @access public + */ + function size() + { + return $this->calendar->size(); + } + + /** + * Determine whether this date is valid, with the bounds determined by + * the Calendar_Engine. The call is passed on to + * Calendar_Validator::isValid + * @return boolean + * @access public + */ + function isValid() + { + return $this->calendar->isValid(); + } + + /** + * Returns an instance of Calendar_Validator + * @return Calendar_Validator + * @access public + */ + function & getValidator() + { + $validator = $this->calendar->getValidator(); + return $validator; + } + + /** + * Returns a reference to the current Calendar_Engine being used. Useful + * for Calendar_Table_Helper and Calendar_Validator + * @return object implementing Calendar_Engine_Inteface + * @access private + */ + function & getEngine() + { + return $this->calendar->getEngine(); + } + + /** + * Returns the value for the previous year + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 2002 or timestamp + * @access public + */ + function prevYear($format = 'int') + { + return $this->calendar->prevYear($format); + } + + /** + * Returns the value for this year + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 2003 or timestamp + * @access public + */ + function thisYear($format = 'int') + { + return $this->calendar->thisYear($format); + } + + /** + * Returns the value for next year + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 2004 or timestamp + * @access public + */ + function nextYear($format = 'int') + { + return $this->calendar->nextYear($format); + } + + /** + * Returns the value for the previous month + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 4 or Unix timestamp + * @access public + */ + function prevMonth($format = 'int') + { + return $this->calendar->prevMonth($format); + } + + /** + * Returns the value for this month + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 5 or timestamp + * @access public + */ + function thisMonth($format = 'int') + { + return $this->calendar->thisMonth($format); + } + + /** + * Returns the value for next month + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 6 or timestamp + * @access public + */ + function nextMonth($format = 'int') + { + return $this->calendar->nextMonth($format); + } + + /** + * Returns the value for the previous week + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 4 or Unix timestamp + * @access public + */ + function prevWeek($format = 'n_in_month') + { + if ( method_exists($this->calendar,'prevWeek') ) { + return $this->calendar->prevWeek($format); + } else { + require_once 'PEAR.php'; + PEAR::raiseError( + 'Cannot call prevWeek on Calendar object of type: '. + get_class($this->calendar), 133, PEAR_ERROR_TRIGGER, + E_USER_NOTICE, 'Calendar_Decorator::prevWeek()'); + return false; + } + } + + /** + * Returns the value for this week + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 5 or timestamp + * @access public + */ + function thisWeek($format = 'n_in_month') + { + if ( method_exists($this->calendar,'thisWeek') ) { + return $this->calendar->thisWeek($format); + } else { + require_once 'PEAR.php'; + PEAR::raiseError( + 'Cannot call thisWeek on Calendar object of type: '. + get_class($this->calendar), 133, PEAR_ERROR_TRIGGER, + E_USER_NOTICE, 'Calendar_Decorator::thisWeek()'); + return false; + } + } + + /** + * Returns the value for next week + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 6 or timestamp + * @access public + */ + function nextWeek($format = 'n_in_month') + { + if ( method_exists($this->calendar,'nextWeek') ) { + return $this->calendar->nextWeek($format); + } else { + require_once 'PEAR.php'; + PEAR::raiseError( + 'Cannot call thisWeek on Calendar object of type: '. + get_class($this->calendar), 133, PEAR_ERROR_TRIGGER, + E_USER_NOTICE, 'Calendar_Decorator::nextWeek()'); + return false; + } + } + + /** + * Returns the value for the previous day + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 10 or timestamp + * @access public + */ + function prevDay($format = 'int') { + return $this->calendar->prevDay($format); + } + + /** + * Returns the value for this day + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 11 or timestamp + * @access public + */ + function thisDay($format = 'int') + { + return $this->calendar->thisDay($format); + } + + /** + * Returns the value for the next day + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 12 or timestamp + * @access public + */ + function nextDay($format = 'int') + { + return $this->calendar->nextDay($format); + } + + /** + * Returns the value for the previous hour + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 13 or timestamp + * @access public + */ + function prevHour($format = 'int') + { + return $this->calendar->prevHour($format); + } + + /** + * Returns the value for this hour + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 14 or timestamp + * @access public + */ + function thisHour($format = 'int') + { + return $this->calendar->thisHour($format); + } + + /** + * Returns the value for the next hour + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 14 or timestamp + * @access public + */ + function nextHour($format = 'int') + { + return $this->calendar->nextHour($format); + } + + /** + * Returns the value for the previous minute + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 23 or timestamp + * @access public + */ + function prevMinute($format = 'int') + { + return $this->calendar->prevMinute($format); + } + + /** + * Returns the value for this minute + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 24 or timestamp + * @access public + */ + function thisMinute($format = 'int') + { + return $this->calendar->thisMinute($format); + } + + /** + * Returns the value for the next minute + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 25 or timestamp + * @access public + */ + function nextMinute($format = 'int') + { + return $this->calendar->nextMinute($format); + } + + /** + * Returns the value for the previous second + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 43 or timestamp + * @access public + */ + function prevSecond($format = 'int') + { + return $this->calendar->prevSecond($format); + } + + /** + * Returns the value for this second + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 44 or timestamp + * @access public + */ + function thisSecond($format = 'int') + { + return $this->calendar->thisSecond($format); + } + + /** + * Returns the value for the next second + * @param string return value format ['int' | 'timestamp' | 'object' | 'array'] + * @return int e.g. 45 or timestamp + * @access public + */ + function nextSecond($format = 'int') + { + return $this->calendar->nextSecond($format); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Decorator/Textual.php b/campcaster/src/tools/pear/src/Calendar/Decorator/Textual.php new file mode 100644 index 000000000..08ada8a3b --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Decorator/Textual.php @@ -0,0 +1,169 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Textual.php,v 1.3 2004/08/16 13:02:44 hfuecks Exp $ +// +/** + * @package Calendar + * @version $Id: Textual.php,v 1.3 2004/08/16 13:02:44 hfuecks Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar decorator base class + */ +require_once CALENDAR_ROOT.'Decorator.php'; + +/** + * Load the Uri utility + */ +require_once CALENDAR_ROOT.'Util'.DIRECTORY_SEPARATOR.'Textual.php'; + +/** + * Decorator to help with fetching textual representations of months and + * days of the week. + * Note: for performance you should prefer Calendar_Util_Textual unless you + * have a specific need to use a decorator + * @package Calendar + * @access public + */ +class Calendar_Decorator_Textual extends Calendar_Decorator +{ + /** + * Constructs Calendar_Decorator_Textual + * @param object subclass of Calendar + * @access public + */ + function Calendar_Decorator_Textual(&$Calendar) + { + parent::Calendar_Decorator($Calendar); + } + + /** + * Returns an array of 12 month names (first index = 1) + * @param string (optional) format of returned months (one,two,short or long) + * @return array + * @access public + * @static + */ + function monthNames($format='long') + { + return Calendar_Util_Textual::monthNames($format); + } + + /** + * Returns an array of 7 week day names (first index = 0) + * @param string (optional) format of returned days (one,two,short or long) + * @return array + * @access public + * @static + */ + function weekdayNames($format='long') + { + return Calendar_Util_Textual::weekdayNames($format); + } + + /** + * Returns textual representation of the previous month of the decorated calendar object + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + */ + function prevMonthName($format='long') + { + return Calendar_Util_Textual::prevMonthName($this->calendar,$format); + } + + /** + * Returns textual representation of the month of the decorated calendar object + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + */ + function thisMonthName($format='long') + { + return Calendar_Util_Textual::thisMonthName($this->calendar,$format); + } + + /** + * Returns textual representation of the next month of the decorated calendar object + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + */ + function nextMonthName($format='long') + { + return Calendar_Util_Textual::nextMonthName($this->calendar,$format); + } + + /** + * Returns textual representation of the previous day of week of the decorated calendar object + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + */ + function prevDayName($format='long') + { + return Calendar_Util_Textual::prevDayName($this->calendar,$format); + } + + /** + * Returns textual representation of the day of week of the decorated calendar object + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + */ + function thisDayName($format='long') + { + return Calendar_Util_Textual::thisDayName($this->calendar,$format); + } + + /** + * Returns textual representation of the next day of week of the decorated calendar object + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + */ + function nextDayName($format='long') + { + return Calendar_Util_Textual::nextDayName($this->calendar,$format); + } + + /** + * Returns the days of the week using the order defined in the decorated + * calendar object. Only useful for Calendar_Month_Weekdays, Calendar_Month_Weeks + * and Calendar_Week. Otherwise the returned array will begin on Sunday + * @param string (optional) format of returned months (one,two,short or long) + * @return array ordered array of week day names + * @access public + */ + function orderedWeekdays($format='long') + { + return Calendar_Util_Textual::orderedWeekdays($this->calendar,$format); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Decorator/Uri.php b/campcaster/src/tools/pear/src/Calendar/Decorator/Uri.php new file mode 100644 index 000000000..9a73e6eb4 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Decorator/Uri.php @@ -0,0 +1,151 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Uri.php,v 1.3 2004/08/16 09:04:20 hfuecks Exp $ +// +/** + * @package Calendar + * @version $Id: Uri.php,v 1.3 2004/08/16 09:04:20 hfuecks Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar decorator base class + */ +require_once CALENDAR_ROOT.'Decorator.php'; + +/** + * Load the Uri utility + */ +require_once CALENDAR_ROOT.'Util'.DIRECTORY_SEPARATOR.'Uri.php'; + +/** + * Decorator to help with building HTML links for navigating the calendar
+ * Note: for performance you should prefer Calendar_Util_Uri unless you + * have a specific need to use a decorator + * + * $Day = new Calendar_Day(2003, 10, 23); + * $Uri = & new Calendar_Decorator_Uri($Day); + * $Uri->setFragments('year', 'month', 'day'); + * echo $Uri->getPrev(); // Displays year=2003&month=10&day=22 + * + * @see Calendar_Util_Uri + * @package Calendar + * @access public + */ +class Calendar_Decorator_Uri extends Calendar_Decorator +{ + + /** + * @var Calendar_Util_Uri + * @access private + */ + var $Uri; + + /** + * Constructs Calendar_Decorator_Uri + * @param object subclass of Calendar + * @access public + */ + function Calendar_Decorator_Uri(&$Calendar) + { + parent::Calendar_Decorator($Calendar); + } + + /** + * Sets the URI fragment names + * @param string URI fragment for year + * @param string (optional) URI fragment for month + * @param string (optional) URI fragment for day + * @param string (optional) URI fragment for hour + * @param string (optional) URI fragment for minute + * @param string (optional) URI fragment for second + * @return void + * @access public + */ + function setFragments($y, $m=null, $d=null, $h=null, $i=null, $s=null) { + $this->Uri = & new Calendar_Util_Uri($y, $m, $d, $h, $i, $s); + } + + /** + * Sets the separator string between fragments + * @param string separator e.g. / + * @return void + * @access public + */ + function setSeparator($separator) + { + $this->Uri->separator = $separator; + } + + /** + * Puts Uri decorator into "scalar mode" - URI variable names are not + * returned + * @param boolean (optional) + * @return void + * @access public + */ + function setScalar($state=true) + { + $this->Uri->scalar = $state; + } + + /** + * Gets the URI string for the previous calendar unit + * @param string calendar unit to fetch uri for (year,month,week or day etc) + * @return string + * @access public + */ + function prev($method) + { + return $this->Uri->prev($this, $method); + } + + /** + * Gets the URI string for the current calendar unit + * @param string calendar unit to fetch uri for (year,month,week or day etc) + * @return string + * @access public + */ + function this($method) + { + return $this->Uri->this($this, $method); + } + + /** + * Gets the URI string for the next calendar unit + * @param string calendar unit to fetch uri for (year,month,week or day etc) + * @return string + * @access public + */ + function next($method) + { + return $this->Uri->next($this, $method); + } + +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Decorator/Weekday.php b/campcaster/src/tools/pear/src/Calendar/Decorator/Weekday.php new file mode 100644 index 000000000..922ab1398 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Decorator/Weekday.php @@ -0,0 +1,148 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Weekday.php,v 1.3 2004/08/16 12:25:15 hfuecks Exp $ +// +/** + * @package Calendar + * @version $Id: Weekday.php,v 1.3 2004/08/16 12:25:15 hfuecks Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar decorator base class + */ +require_once CALENDAR_ROOT.'Decorator.php'; + +/** + * Load a Calendar_Day + */ +require_once CALENDAR_ROOT.'Day.php'; +/** + * Decorator for fetching the day of the week + * + * $Day = new Calendar_Day(2003, 10, 23); + * $Weekday = & new Calendar_Decorator_Weekday($Day); + * $Weekday->setFirstDay(0); // Set first day of week to Sunday (default Mon) + * echo $Weekday->thisWeekDay(); // Displays 5 - fifth day of week relative to Sun + * + * @package Calendar + * @access public + */ +class Calendar_Decorator_Weekday extends Calendar_Decorator +{ + /** + * First day of week + * @var int (default = 1 for Monday) + * @access private + */ + var $firstDay = 1; + + /** + * Constructs Calendar_Decorator_Weekday + * @param object subclass of Calendar + * @access public + */ + function Calendar_Decorator_Weekday(& $Calendar) + { + parent::Calendar_Decorator($Calendar); + } + + /** + * Sets the first day of the week (0 = Sunday, 1 = Monday (default) etc) + * @param int first day of week + * @return void + * @access public + */ + function setFirstDay($firstDay) { + $this->firstDay = (int)$firstDay; + } + + /** + * Returns the previous weekday + * @param string (default = 'int') return value format + * @return int numeric day of week or timestamp + * @access public + */ + function prevWeekDay($format = 'int') + { + $ts = $this->calendar->prevDay('timestamp'); + $Day = new Calendar_Day(2000,1,1); + $Day->setTimeStamp($ts); + $day = $this->calendar->cE->getDayOfWeek($Day->thisYear(),$Day->thisMonth(),$Day->thisDay()); + $day = $this->adjustWeekScale($day); + return $this->returnValue('Day', $format, $ts, $day); + } + + /** + * Returns the current weekday + * @param string (default = 'int') return value format + * @return int numeric day of week or timestamp + * @access public + */ + function thisWeekDay($format = 'int') + { + $ts = $this->calendar->thisDay('timestamp'); + $day = $this->calendar->cE->getDayOfWeek($this->calendar->year,$this->calendar->month,$this->calendar->day); + $day = $this->adjustWeekScale($day); + return $this->returnValue('Day', $format, $ts, $day); + } + + /** + * Returns the next weekday + * @param string (default = 'int') return value format + * @return int numeric day of week or timestamp + * @access public + */ + function nextWeekDay($format = 'int') + { + $ts = $this->calendar->nextDay('timestamp'); + $Day = new Calendar_Day(2000,1,1); + $Day->setTimeStamp($ts); + $day = $this->calendar->cE->getDayOfWeek($Day->thisYear(),$Day->thisMonth(),$Day->thisDay()); + $day = $this->adjustWeekScale($day); + return $this->returnValue('Day', $format, $ts, $day); + } + + /** + * Adjusts the day of the week relative to the first day of the week + * @param int day of week calendar from Calendar_Engine + * @return int day of week adjusted to first day + * @access private + */ + function adjustWeekScale($dayOfWeek) { + $dayOfWeek = $dayOfWeek - $this->firstDay; + if ( $dayOfWeek >= 0 ) { + return $dayOfWeek; + } else { + return $this->calendar->cE->getDaysInWeek( + $this->calendar->year,$this->calendar->month,$this->calendar->day + ) + $dayOfWeek; + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Decorator/Wrapper.php b/campcaster/src/tools/pear/src/Calendar/Decorator/Wrapper.php new file mode 100644 index 000000000..13eaf7860 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Decorator/Wrapper.php @@ -0,0 +1,90 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Wrapper.php,v 1.2 2005/11/03 20:35:03 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Wrapper.php,v 1.2 2005/11/03 20:35:03 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar decorator base class + */ +require_once CALENDAR_ROOT.'Decorator.php'; + +/** + * Decorator to help with wrapping built children in another decorator + * @package Calendar + * @access public + */ +class Calendar_Decorator_Wrapper extends Calendar_Decorator +{ + /** + * Constructs Calendar_Decorator_Wrapper + * @param object subclass of Calendar + * @access public + */ + function Calendar_Decorator_Wrapper(&$Calendar) + { + parent::Calendar_Decorator($Calendar); + } + + /** + * Wraps objects returned from fetch in the named Decorator class + * @param string name of Decorator class to wrap with + * @return object instance of named decorator + * @access public + */ + function & fetch($decorator) + { + $Calendar = parent::fetch(); + if ($Calendar) { + $ret =& new $decorator($Calendar); + } else { + $ret = false; + } + return $ret; + } + + /** + * Wraps the returned calendar objects from fetchAll in the named decorator + * @param string name of Decorator class to wrap with + * @return array + * @access public + */ + function fetchAll($decorator) + { + $children = parent::fetchAll(); + foreach ($children as $key => $Calendar) { + $children[$key] = & new $decorator($Calendar); + } + return $children; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Engine/Interface.php b/campcaster/src/tools/pear/src/Calendar/Engine/Interface.php new file mode 100644 index 000000000..4c59e10da --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Engine/Interface.php @@ -0,0 +1,293 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Interface.php,v 1.5 2004/08/16 12:29:18 hfuecks Exp $ +// +/** + * @package Calendar + * @version $Id: Interface.php,v 1.5 2004/08/16 12:29:18 hfuecks Exp $ + */ +/** + * The methods the classes implementing the Calendar_Engine must implement. + * Note this class is not used but simply to help development + * @package Calendar + * @access protected + */ +class Calendar_Engine_Interface +{ + /** + * Provides a mechansim to make sure parsing of timestamps + * into human dates is only performed once per timestamp. + * Typically called "internally" by methods like stampToYear. + * Return value can vary, depending on the specific implementation + * @param int timestamp (depending on implementation) + * @return mixed + * @access protected + */ + function stampCollection($stamp) + { + } + + /** + * Returns a numeric year given a timestamp + * @param int timestamp (depending on implementation) + * @return int year (e.g. 2003) + * @access protected + */ + function stampToYear($stamp) + { + } + + /** + * Returns a numeric month given a timestamp + * @param int timestamp (depending on implementation) + * @return int month (e.g. 9) + * @access protected + */ + function stampToMonth($stamp) + { + } + + /** + * Returns a numeric day given a timestamp + * @param int timestamp (depending on implementation) + * @return int day (e.g. 15) + * @access protected + */ + function stampToDay($stamp) + { + } + + /** + * Returns a numeric hour given a timestamp + * @param int timestamp (depending on implementation) + * @return int hour (e.g. 13) + * @access protected + */ + function stampToHour($stamp) + { + } + + /** + * Returns a numeric minute given a timestamp + * @param int timestamp (depending on implementation) + * @return int minute (e.g. 34) + * @access protected + */ + function stampToMinute($stamp) + { + } + + /** + * Returns a numeric second given a timestamp + * @param int timestamp (depending on implementation) + * @return int second (e.g. 51) + * @access protected + */ + function stampToSecond($stamp) + { + } + + /** + * Returns a timestamp. Can be worth "caching" generated + * timestamps in a static variable, identified by the + * params this method accepts, to timestamp will only + * be calculated once. + * @param int year (e.g. 2003) + * @param int month (e.g. 9) + * @param int day (e.g. 13) + * @param int hour (e.g. 13) + * @param int minute (e.g. 34) + * @param int second (e.g. 53) + * @return int (depends on implementation) + * @access protected + */ + function dateToStamp($y,$m,$d,$h,$i,$s) + { + } + + /** + * The upper limit on years that the Calendar Engine can work with + * @return int (e.g. 2037) + * @access protected + */ + function getMaxYears() + { + } + + /** + * The lower limit on years that the Calendar Engine can work with + * @return int (e.g 1902) + * @access protected + */ + function getMinYears() + { + } + + /** + * Returns the number of months in a year + * @param int (optional) year to get months for + * @return int (e.g. 12) + * @access protected + */ + function getMonthsInYear($y=null) + { + } + + /** + * Returns the number of days in a month, given year and month + * @param int year (e.g. 2003) + * @param int month (e.g. 9) + * @return int days in month + * @access protected + */ + function getDaysInMonth($y, $m) + { + } + + /** + * Returns numeric representation of the day of the week in a month, + * given year and month + * @param int year (e.g. 2003) + * @param int month (e.g. 9) + * @return int + * @access protected + */ + function getFirstDayInMonth ($y, $m) + { + } + + /** + * Returns the number of days in a week + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int (e.g. 7) + * @access protected + */ + function getDaysInWeek($y=NULL, $m=NULL, $d=NULL) + { + } + + /** + * Returns the number of the week in the year (ISO-8601), given a date + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int week number + * @access protected + */ + function getWeekNInYear($y, $m, $d) + { + } + + /** + * Returns the number of the week in the month, given a date + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @param int first day of the week (default: 1 - monday) + * @return int week number + * @access protected + */ + function getWeekNInMonth($y, $m, $d, $firstDay=1) + { + } + + /** + * Returns the number of weeks in the month + * @param int year (2003) + * @param int month (9) + * @param int first day of the week (default: 1 - monday) + * @return int weeks number + * @access protected + */ + function getWeeksInMonth($y, $m) + { + } + + /** + * Returns the number of the day of the week (0=sunday, 1=monday...) + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int weekday number + * @access protected + */ + function getDayOfWeek($y, $m, $d) + { + } + + /** + * Returns the numeric values of the days of the week. + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return array list of numeric values of days in week, beginning 0 + * @access protected + */ + function getWeekDays($y=NULL, $m=NULL, $d=NULL) + { + } + + /** + * Returns the default first day of the week as an integer. Must be a + * member of the array returned from getWeekDays + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int (e.g. 1 for Monday) + * @see getWeekDays + * @access protected + */ + function getFirstDayOfWeek($y=NULL, $m=NULL, $d=NULL) + { + } + + /** + * Returns the number of hours in a day
+ * @param int (optional) day to get hours for + * @return int (e.g. 24) + * @access protected + */ + function getHoursInDay($y=null,$m=null,$d=null) + { + } + + /** + * Returns the number of minutes in an hour + * @param int (optional) hour to get minutes for + * @return int + * @access protected + */ + function getMinutesInHour($y=null,$m=null,$d=null,$h=null) + { + } + + /** + * Returns the number of seconds in a minutes + * @param int (optional) minute to get seconds for + * @return int + * @access protected + */ + function getSecondsInMinute($y=null,$m=null,$d=null,$h=null,$i=null) + { + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Engine/PearDate.php b/campcaster/src/tools/pear/src/Calendar/Engine/PearDate.php new file mode 100644 index 000000000..22270c761 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Engine/PearDate.php @@ -0,0 +1,407 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: PearDate.php,v 1.8 2004/08/20 20:00:55 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: PearDate.php,v 1.8 2004/08/20 20:00:55 quipo Exp $ + */ +/** + * Load PEAR::Date class + */ +require_once 'Date.php'; + +/** + * Performs calendar calculations based on the PEAR::Date class + * Timestamps are in the ISO-8601 format (YYYY-MM-DD HH:MM:SS) + * @package Calendar + * @access protected + */ +class Calendar_Engine_PearDate /* implements Calendar_Engine_Interface */ +{ + /** + * Makes sure a given timestamp is only ever parsed once + * Uses a static variable to prevent date() being used twice + * for a date which is already known + * @param mixed Any timestamp format recognized by Pear::Date + * @return object Pear::Date object + * @access protected + */ + function stampCollection($stamp) + { + static $stamps = array(); + if (!isset($stamps[$stamp])) { + $stamps[$stamp] = new Date($stamp); + } + return $stamps[$stamp]; + } + + /** + * Returns a numeric year given a iso-8601 datetime + * @param string iso-8601 datetime (YYYY-MM-DD HH:MM:SS) + * @return int year (e.g. 2003) + * @access protected + */ + function stampToYear($stamp) + { + $date = Calendar_Engine_PearDate::stampCollection($stamp); + return (int)$date->year; + } + + /** + * Returns a numeric month given a iso-8601 datetime + * @param string iso-8601 datetime (YYYY-MM-DD HH:MM:SS) + * @return int month (e.g. 9) + * @access protected + */ + function stampToMonth($stamp) + { + $date = Calendar_Engine_PearDate::stampCollection($stamp); + return (int)$date->month; + } + + /** + * Returns a numeric day given a iso-8601 datetime + * @param string iso-8601 datetime (YYYY-MM-DD HH:MM:SS) + * @return int day (e.g. 15) + * @access protected + */ + function stampToDay($stamp) + { + $date = Calendar_Engine_PearDate::stampCollection($stamp); + return (int)$date->day; + } + + /** + * Returns a numeric hour given a iso-8601 datetime + * @param string iso-8601 datetime (YYYY-MM-DD HH:MM:SS) + * @return int hour (e.g. 13) + * @access protected + */ + function stampToHour($stamp) + { + $date = Calendar_Engine_PearDate::stampCollection($stamp); + return (int)$date->hour; + } + + /** + * Returns a numeric minute given a iso-8601 datetime + * @param string iso-8601 datetime (YYYY-MM-DD HH:MM:SS) + * @return int minute (e.g. 34) + * @access protected + */ + function stampToMinute($stamp) + { + $date = Calendar_Engine_PearDate::stampCollection($stamp); + return (int)$date->minute; + } + + /** + * Returns a numeric second given a iso-8601 datetime + * @param string iso-8601 datetime (YYYY-MM-DD HH:MM:SS) + * @return int second (e.g. 51) + * @access protected + */ + function stampToSecond($stamp) + { + $date = Calendar_Engine_PearDate::stampCollection($stamp); + return (int)$date->second; + } + + /** + * Returns a iso-8601 datetime + * @param int year (2003) + * @param int month (9) + * @param int day (13) + * @param int hour (13) + * @param int minute (34) + * @param int second (53) + * @return string iso-8601 datetime + * @access protected + */ + function dateToStamp($y, $m, $d, $h=0, $i=0, $s=0) + { + $r = array(); + Calendar_Engine_PearDate::adjustDate($y, $m, $d, $h, $i, $s); + $key = $y.$m.$d.$h.$i.$s; + if (!isset($r[$key])) { + $r[$key] = sprintf("%04d-%02d-%02d %02d:%02d:%02d", + $y, $m, $d, $h, $i, $s); + } + return $r[$key]; + } + + /** + * Set the correct date values (useful for math operations on dates) + * @param int year (2003) + * @param int month (9) + * @param int day (13) + * @param int hour (13) + * @param int minute (34) + * @param int second (53) + * @access protected + */ + function adjustDate(&$y, &$m, &$d, &$h, &$i, &$s) + { + if ($s < 0) { + $m -= floor($s / 60); + $s = -$s % 60; + } + if ($s > 60) { + $m += floor($s / 60); + $s %= 60; + } + if ($i < 0) { + $h -= floor($i / 60); + $i = -$i % 60; + } + if ($i > 60) { + $h += floor($i / 60); + $i %= 60; + } + if ($h < 0) { + $d -= floor($h / 24); + $h = -$h % 24; + } + if ($h > 24) { + $d += floor($h / 24); + $h %= 24; + } + for(; $m < 1; $y--, $m+=12); + for(; $m > 12; $y++, $m-=12); + + while ($d < 1) { + if ($m > 1) { + $m--; + } else { + $m = 12; + $y--; + } + $d += Date_Calc::daysInMonth($m, $y); + } + for ($max_days = Date_Calc::daysInMonth($m, $y); $d > $max_days; ) { + $d -= $max_days; + if ($m < 12) { + $m++; + } else { + $m = 1; + $y++; + } + } + } + + /** + * The upper limit on years that the Calendar Engine can work with + * @return int 9999 + * @access protected + */ + function getMaxYears() + { + return 9999; + } + + /** + * The lower limit on years that the Calendar Engine can work with + * @return int 0 + * @access protected + */ + function getMinYears() + { + return 0; + } + + /** + * Returns the number of months in a year + * @return int (12) + * @access protected + */ + function getMonthsInYear($y=null) + { + return 12; + } + + /** + * Returns the number of days in a month, given year and month + * @param int year (2003) + * @param int month (9) + * @return int days in month + * @access protected + */ + function getDaysInMonth($y, $m) + { + return (int)Date_Calc::daysInMonth($m, $y); + } + + /** + * Returns numeric representation of the day of the week in a month, + * given year and month + * @param int year (2003) + * @param int month (9) + * @return int from 0 to 7 + * @access protected + */ + function getFirstDayInMonth($y, $m) + { + return (int)Date_Calc::dayOfWeek(1, $m, $y); + } + + /** + * Returns the number of days in a week + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int (7) + * @access protected + */ + function getDaysInWeek($y=NULL, $m=NULL, $d=NULL) + { + return 7; + } + + /** + * Returns the number of the week in the year (ISO-8601), given a date + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int week number + * @access protected + */ + function getWeekNInYear($y, $m, $d) + { + return Date_Calc::weekOfYear($d, $m, $y); //beware, Date_Calc doesn't follow ISO-8601 standard! + } + + /** + * Returns the number of the week in the month, given a date + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @param int first day of the week (default: monday) + * @return int week number + * @access protected + */ + function getWeekNInMonth($y, $m, $d, $firstDay=1) + { + $weekEnd = ($firstDay == 0) ? $this->getDaysInWeek()-1 : $firstDay-1; + $end_of_week = (int)Date_Calc::nextDayOfWeek($weekEnd, 1, $m, $y, '%e', true); + $w = 1; + while ($d > $end_of_week) { + ++$w; + $end_of_week += $this->getDaysInWeek(); + } + return $w; + } + + /** + * Returns the number of weeks in the month + * @param int year (2003) + * @param int month (9) + * @param int first day of the week (default: monday) + * @return int weeks number + * @access protected + */ + function getWeeksInMonth($y, $m, $firstDay=1) + { + $FDOM = Date_Calc::firstOfMonthWeekday($m, $y); + if ($FDOM == 0) { + $FDOM = $this->getDaysInWeek(); + } + if ($FDOM > $firstDay) { + $daysInTheFirstWeek = $this->getDaysInWeek() - $FDOM + $firstDay; + $weeks = 1; + } else { + $daysInTheFirstWeek = $firstDay - $FDOM; + $weeks = 0; + } + $daysInTheFirstWeek %= $this->getDaysInWeek(); + return (int)(ceil(($this->getDaysInMonth($y, $m) - $daysInTheFirstWeek) / + $this->getDaysInWeek()) + $weeks); + } + + /** + * Returns the number of the day of the week (0=sunday, 1=monday...) + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int weekday number + * @access protected + */ + function getDayOfWeek($y, $m, $d) + { + return Date_Calc::dayOfWeek($d, $m, $y); + } + + /** + * Returns a list of integer days of the week beginning 0 + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return array (0, 1, 2, 3, 4, 5, 6) 1 = Monday + * @access protected + */ + function getWeekDays($y=NULL, $m=NULL, $d=NULL) + { + return array(0, 1, 2, 3, 4, 5, 6); + } + + /** + * Returns the default first day of the week + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int (default 1 = Monday) + * @access protected + */ + function getFirstDayOfWeek($y=NULL, $m=NULL, $d=NULL) + { + return 1; + } + + /** + * Returns the number of hours in a day + * @return int (24) + * @access protected + */ + function getHoursInDay($y=null,$m=null,$d=null) + { + return 24; + } + + /** + * Returns the number of minutes in an hour + * @return int (60) + * @access protected + */ + function getMinutesInHour($y=null,$m=null,$d=null,$h=null) + { + return 60; + } + + /** + * Returns the number of seconds in a minutes + * @return int (60) + * @access protected + */ + function getSecondsInMinute($y=null,$m=null,$d=null,$h=null,$i=null) + { + return 60; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Engine/UnixTS.php b/campcaster/src/tools/pear/src/Calendar/Engine/UnixTS.php new file mode 100644 index 000000000..5fb40e480 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Engine/UnixTS.php @@ -0,0 +1,365 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: UnixTS.php,v 1.9 2004/08/20 20:00:55 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: UnixTS.php,v 1.9 2004/08/20 20:00:55 quipo Exp $ + */ +/** + * Performs calendar calculations based on the PHP date() function and + * Unix timestamps (using PHP's mktime() function). + * @package Calendar + * @access protected + */ +class Calendar_Engine_UnixTS /* implements Calendar_Engine_Interface */ +{ + /** + * Makes sure a given timestamp is only ever parsed once + * 
+     * array (
+     *  [0] => year (e.g 2003),
+     *  [1] => month (e.g 9),
+     *  [2] => day (e.g 6),
+     *  [3] => hour (e.g 14),
+     *  [4] => minute (e.g 34),
+     *  [5] => second (e.g 45),
+     *  [6] => num days in month (e.g. 31),
+     *  [7] => week in year (e.g. 50),
+     *  [8] => day in week (e.g. 0 for Sunday)
+     * )
+     *
+ * Uses a static variable to prevent date() being used twice + * for a date which is already known + * @param int Unix timestamp + * @return array + * @access protected + */ + function stampCollection($stamp) + { + static $stamps = array(); + if ( !isset($stamps[$stamp]) ) { + $date = @date('Y n j H i s t W w',$stamp); + $stamps[$stamp] = sscanf($date, "%d %d %d %d %d %d %d %d %d"); + } + return $stamps[$stamp]; + } + + /** + * Returns a numeric year given a timestamp + * @param int Unix timestamp + * @return int year (e.g. 2003) + * @access protected + */ + function stampToYear($stamp) + { + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return (int)$date[0]; + } + + /** + * Returns a numeric month given a timestamp + * @param int Unix timestamp + * @return int month (e.g. 9) + * @access protected + */ + function stampToMonth($stamp) + { + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return (int)$date[1]; + } + + /** + * Returns a numeric day given a timestamp + * @param int Unix timestamp + * @return int day (e.g. 15) + * @access protected + */ + function stampToDay($stamp) + { + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return (int)$date[2]; + } + + /** + * Returns a numeric hour given a timestamp + * @param int Unix timestamp + * @return int hour (e.g. 13) + * @access protected + */ + function stampToHour($stamp) + { + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return (int)$date[3]; + } + + /** + * Returns a numeric minute given a timestamp + * @param int Unix timestamp + * @return int minute (e.g. 34) + * @access protected + */ + function stampToMinute($stamp) + { + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return (int)$date[4]; + } + + /** + * Returns a numeric second given a timestamp + * @param int Unix timestamp + * @return int second (e.g. 51) + * @access protected + */ + function stampToSecond($stamp) + { + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return (int)$date[5]; + } + + /** + * Returns a timestamp + * @param int year (2003) + * @param int month (9) + * @param int day (13) + * @param int hour (13) + * @param int minute (34) + * @param int second (53) + * @return int Unix timestamp + * @access protected + */ + function dateToStamp($y, $m, $d, $h=0, $i=0, $s=0) + { + static $dates = array(); + if ( !isset($dates[$y][$m][$d][$h][$i][$s]) ) { + $dates[$y][$m][$d][$h][$i][$s] = @mktime($h, $i, $s, $m, $d, $y); + } + return $dates[$y][$m][$d][$h][$i][$s]; + } + + /** + * The upper limit on years that the Calendar Engine can work with + * @return int (2037) + * @access protected + */ + function getMaxYears() + { + return 2037; + } + + /** + * The lower limit on years that the Calendar Engine can work with + * @return int (1970 if it's Windows and 1902 for all other OSs) + * @access protected + */ + function getMinYears() + { + return $min = strpos(PHP_OS, 'WIN') === false ? 1902 : 1970; + } + + /** + * Returns the number of months in a year + * @return int (12) + * @access protected + */ + function getMonthsInYear($y=null) + { + return 12; + } + + /** + * Returns the number of days in a month, given year and month + * @param int year (2003) + * @param int month (9) + * @return int days in month + * @access protected + */ + function getDaysInMonth($y, $m) + { + $stamp = Calendar_Engine_UnixTS::dateToStamp($y,$m,1); + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return $date[6]; + } + + /** + * Returns numeric representation of the day of the week in a month, + * given year and month + * @param int year (2003) + * @param int month (9) + * @return int from 0 to 6 + * @access protected + */ + function getFirstDayInMonth($y, $m) + { + $stamp = Calendar_Engine_UnixTS::dateToStamp($y,$m,1); + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return $date[8]; + } + + /** + * Returns the number of days in a week + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int (7) + * @access protected + */ + function getDaysInWeek($y=NULL, $m=NULL, $d=NULL) + { + return 7; + } + + /** + * Returns the number of the week in the year (ISO-8601), given a date + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int week number + * @access protected + */ + function getWeekNInYear($y, $m, $d) + { + $stamp = Calendar_Engine_UnixTS::dateToStamp($y,$m,$d); + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return $date[7]; + } + + /** + * Returns the number of the week in the month, given a date + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @param int first day of the week (default: monday) + * @return int week number + * @access protected + */ + function getWeekNInMonth($y, $m, $d, $firstDay=1) + { + $weekEnd = ($firstDay == 0) ? $this->getDaysInWeek()-1 : $firstDay-1; + $end_of_week = 1; + while (@date('w', @mktime(0, 0, 0, $m, $end_of_week, $y)) != $weekEnd) { + ++$end_of_week; //find first weekend of the month + } + $w = 1; + while ($d > $end_of_week) { + ++$w; + $end_of_week += $this->getDaysInWeek(); + } + return $w; + } + + /** + * Returns the number of weeks in the month + * @param int year (2003) + * @param int month (9) + * @param int first day of the week (default: monday) + * @return int weeks number + * @access protected + */ + function getWeeksInMonth($y, $m, $firstDay=1) + { + $FDOM = $this->getFirstDayInMonth($y, $m); + if ($FDOM == 0) { + $FDOM = $this->getDaysInWeek(); + } + if ($FDOM > $firstDay) { + $daysInTheFirstWeek = $this->getDaysInWeek() - $FDOM + $firstDay; + $weeks = 1; + } else { + $daysInTheFirstWeek = $firstDay - $FDOM; + $weeks = 0; + } + $daysInTheFirstWeek %= $this->getDaysInWeek(); + return (int)(ceil(($this->getDaysInMonth($y, $m) - $daysInTheFirstWeek) / + $this->getDaysInWeek()) + $weeks); + } + + /** + * Returns the number of the day of the week (0=sunday, 1=monday...) + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int weekday number + * @access protected + */ + function getDayOfWeek($y, $m, $d) + { + $stamp = Calendar_Engine_UnixTS::dateToStamp($y,$m,$d); + $date = Calendar_Engine_UnixTS::stampCollection($stamp); + return $date[8]; + } + + /** + * Returns a list of integer days of the week beginning 0 + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return array (0,1,2,3,4,5,6) 1 = Monday + * @access protected + */ + function getWeekDays($y=NULL, $m=NULL, $d=NULL) + { + return array(0, 1, 2, 3, 4, 5, 6); + } + + /** + * Returns the default first day of the week + * @param int year (2003) + * @param int month (9) + * @param int day (4) + * @return int (default 1 = Monday) + * @access protected + */ + function getFirstDayOfWeek($y=NULL, $m=NULL, $d=NULL) + { + return 1; + } + + /** + * Returns the number of hours in a day + * @return int (24) + * @access protected + */ + function getHoursInDay($y=null,$m=null,$d=null) + { + return 24; + } + + /** + * Returns the number of minutes in an hour + * @return int (60) + * @access protected + */ + function getMinutesInHour($y=null,$m=null,$d=null,$h=null) + { + return 60; + } + + /** + * Returns the number of seconds in a minutes + * @return int (60) + * @access protected + */ + function getSecondsInMinute($y=null,$m=null,$d=null,$h=null,$i=null) + { + return 60; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Factory.php b/campcaster/src/tools/pear/src/Calendar/Factory.php new file mode 100644 index 000000000..db6bd80b8 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Factory.php @@ -0,0 +1,145 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Factory.php,v 1.3 2005/10/22 10:08:47 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Factory.php,v 1.3 2005/10/22 10:08:47 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Contains a factory method to return a Singleton instance of a class + * implementing the Calendar_Engine_Interface.
+ * For Month objects, to control type of month returned, use CALENDAR_MONTH_STATE + * constact e.g.; + * + * require_once 'Calendar/Factory.php'; + * define ('CALENDAR_MONTH_STATE',CALENDAR_USE_MONTH_WEEKDAYS); // Use Calendar_Month_Weekdays + * // define ('CALENDAR_MONTH_STATE',CALENDAR_USE_MONTH_WEEKS); // Use Calendar_Month_Weeks + * // define ('CALENDAR_MONTH_STATE',CALENDAR_USE_MONTH); // Use Calendar_Month + * + * It defaults to building Calendar_Month objects.
+ * Use the constract CALENDAR_FIRST_DAY_OF_WEEK to control the first day of the week + * for Month or Week objects (e.g. 0 = Sunday, 6 = Saturday) + * @package Calendar + * @access protected + */ +class Calendar_Factory +{ + /** + * Creates a calendar object given the type and units + * @param string class of calendar object to create + * @param int year + * @param int month + * @param int day + * @param int hour + * @param int minute + * @param int second + * @return object subclass of Calendar + * @access public + * @static + */ + function create($type, $y = 2000, $m = 1, $d = 1, $h = 0, $i = 0, $s = 0) + { + $firstDay = defined('CALENDAR_FIRST_DAY_OF_WEEK') ? CALENDAR_FIRST_DAY_OF_WEEK : 1; + switch ($type) { + case 'Day': + require_once CALENDAR_ROOT.'Day.php'; + return new Calendar_Day($y,$m,$d); + case 'Month': + // Set default state for which month type to build + if (!defined('CALENDAR_MONTH_STATE')) { + define('CALENDAR_MONTH_STATE', CALENDAR_USE_MONTH); + } + switch (CALENDAR_MONTH_STATE) { + case CALENDAR_USE_MONTH_WEEKDAYS: + require_once CALENDAR_ROOT.'Month/Weekdays.php'; + $class = 'Calendar_Month_Weekdays'; + break; + case CALENDAR_USE_MONTH_WEEKS: + require_once CALENDAR_ROOT.'Month/Weeks.php'; + $class = 'Calendar_Month_Weeks'; + break; + case CALENDAR_USE_MONTH: + default: + require_once CALENDAR_ROOT.'Month.php'; + $class = 'Calendar_Month'; + break; + } + return new $class($y, $m, $firstDay); + case 'Week': + require_once CALENDAR_ROOT.'Week.php'; + return new Calendar_Week($y, $m, $d, $firstDay); + case 'Hour': + require_once CALENDAR_ROOT.'Hour.php'; + return new Calendar_Hour($y, $m, $d, $h); + case 'Minute': + require_once CALENDAR_ROOT.'Minute.php'; + return new Calendar_Minute($y, $m, $d, $h, $i); + case 'Second': + require_once CALENDAR_ROOT.'Second.php'; + return new Calendar_Second($y,$m,$d,$h,$i,$s); + case 'Year': + require_once CALENDAR_ROOT.'Year.php'; + return new Calendar_Year($y); + default: + require_once 'PEAR.php'; + PEAR::raiseError( + 'Calendar_Factory::create() unrecognised type: '.$type, null, PEAR_ERROR_TRIGGER, + E_USER_NOTICE, 'Calendar_Factory::create()'); + return false; + } + } + /** + * Creates an instance of a calendar object, given a type and timestamp + * @param string type of object to create + * @param mixed timestamp (depending on Calendar engine being used) + * @return object subclass of Calendar + * @access public + * @static + */ + function & createByTimestamp($type, $stamp) + { + $cE = & Calendar_Engine_Factory::getEngine(); + $y = $cE->stampToYear($stamp); + $m = $cE->stampToMonth($stamp); + $d = $cE->stampToDay($stamp); + $h = $cE->stampToHour($stamp); + $i = $cE->stampToMinute($stamp); + $s = $cE->stampToSecond($stamp); + $cal = Calendar_Factory::create($type, $y, $m, $d, $h, $i, $s); + return $cal; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Hour.php b/campcaster/src/tools/pear/src/Calendar/Hour.php new file mode 100644 index 000000000..02bc77855 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Hour.php @@ -0,0 +1,113 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Hour.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Hour.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Represents an Hour and builds Minutes + * + * require_once 'Calendar'.DIRECTORY_SEPARATOR.'Hour.php'; + * $Hour = & new Calendar_Hour(2003, 10, 21, 15); // Oct 21st 2003, 3pm + * $Hour->build(); // Build Calendar_Minute objects + * while ($Minute = & $Hour->fetch()) { + * echo $Minute->thisMinute().'
'; + * } + * + * @package Calendar + * @access public + */ +class Calendar_Hour extends Calendar +{ + /** + * Constructs Calendar_Hour + * @param int year e.g. 2003 + * @param int month e.g. 5 + * @param int day e.g. 11 + * @param int hour e.g. 13 + * @access public + */ + function Calendar_Hour($y, $m, $d, $h) + { + Calendar::Calendar($y, $m, $d, $h); + } + + /** + * Builds the Minutes in the Hour + * @param array (optional) Calendar_Minute objects representing selected dates + * @return boolean + * @access public + */ + function build($sDates=array()) + { + require_once CALENDAR_ROOT.'Minute.php'; + $mIH = $this->cE->getMinutesInHour($this->year, $this->month, $this->day, + $this->hour); + for ($i=0; $i < $mIH; $i++) { + $this->children[$i]= + new Calendar_Minute($this->year, $this->month, $this->day, + $this->hour, $i); + } + if (count($sDates) > 0) { + $this->setSelection($sDates); + } + return true; + } + + /** + * Called from build() + * @param array + * @return void + * @access private + */ + function setSelection($sDates) + { + foreach ($sDates as $sDate) { + if ($this->year == $sDate->thisYear() + && $this->month == $sDate->thisMonth() + && $this->day == $sDate->thisDay() + && $this->hour == $sDate->thisHour()) + { + $key = (int)$sDate->thisMinute(); + if (isset($this->children[$key])) { + $sDate->setSelected(); + $this->children[$key] = $sDate; + } + } + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Minute.php b/campcaster/src/tools/pear/src/Calendar/Minute.php new file mode 100644 index 000000000..a7e0f3337 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Minute.php @@ -0,0 +1,114 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Minute.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Minute.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Represents a Minute and builds Seconds + * + * require_once 'Calendar'.DIRECTORY_SEPARATOR.'Minute.php'; + * $Minute = & new Calendar_Minute(2003, 10, 21, 15, 31); // Oct 21st 2003, 3:31pm + * $Minute->build(); // Build Calendar_Second objects + * while ($Second = & $Minute->fetch()) { + * echo $Second->thisSecond().'
'; + * } + * + * @package Calendar + * @access public + */ +class Calendar_Minute extends Calendar +{ + /** + * Constructs Minute + * @param int year e.g. 2003 + * @param int month e.g. 5 + * @param int day e.g. 11 + * @param int hour e.g. 13 + * @param int minute e.g. 31 + * @access public + */ + function Calendar_Minute($y, $m, $d, $h, $i) + { + Calendar::Calendar($y, $m, $d, $h, $i); + } + + /** + * Builds the Calendar_Second objects + * @param array (optional) Calendar_Second objects representing selected dates + * @return boolean + * @access public + */ + function build($sDates=array()) + { + require_once CALENDAR_ROOT.'Second.php'; + $sIM = $this->cE->getSecondsInMinute($this->year, $this->month, + $this->day, $this->hour, $this->minute); + for ($i=0; $i < $sIM; $i++) { + $this->children[$i] = new Calendar_Second($this->year, $this->month, + $this->day, $this->hour, $this->minute, $i); + } + if (count($sDates) > 0) { + $this->setSelection($sDates); + } + return true; + } + + /** + * Called from build() + * @param array + * @return void + * @access private + */ + function setSelection($sDates) + { + foreach ($sDates as $sDate) { + if ($this->year == $sDate->thisYear() + && $this->month == $sDate->thisMonth() + && $this->day == $sDate->thisDay() + && $this->hour == $sDate->thisHour() + && $this->minute == $sDate->thisMinute()) + { + $key = (int)$sDate->thisSecond(); + if (isset($this->children[$key])) { + $sDate->setSelected(); + $this->children[$key] = $sDate; + } + } + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Month.php b/campcaster/src/tools/pear/src/Calendar/Month.php new file mode 100644 index 000000000..60c68315e --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Month.php @@ -0,0 +1,114 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Month.php,v 1.3 2005/10/22 10:10:26 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Month.php,v 1.3 2005/10/22 10:10:26 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Represents a Month and builds Days + * + * require_once 'Calendar/Month.php'; + * $Month = & new Calendar_Month(2003, 10); // Oct 2003 + * $Month->build(); // Build Calendar_Day objects + * while ($Day = & $Month->fetch()) { + * echo $Day->thisDay().'
'; + * } + * + * @package Calendar + * @access public + */ +class Calendar_Month extends Calendar +{ + /** + * Constructs Calendar_Month + * @param int $y year e.g. 2003 + * @param int $m month e.g. 5 + * @param int $firstDay first day of the week [optional] + * @access public + */ + function Calendar_Month($y, $m, $firstDay=null) + { + Calendar::Calendar($y, $m); + $this->firstDay = $this->defineFirstDayOfWeek($firstDay); + } + + /** + * Builds Day objects for this Month. Creates as many Calendar_Day objects + * as there are days in the month + * @param array (optional) Calendar_Day objects representing selected dates + * @return boolean + * @access public + */ + function build($sDates=array()) + { + require_once CALENDAR_ROOT.'Day.php'; + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $this->children[$i] = new Calendar_Day($this->year, $this->month, $i); + } + if (count($sDates) > 0) { + $this->setSelection($sDates); + } + return true; + } + + /** + * Called from build() + * @param array + * @return void + * @access private + */ + function setSelection($sDates) + { + foreach ($sDates as $sDate) { + if ($this->year == $sDate->thisYear() + && $this->month == $sDate->thisMonth() + ) { + $key = $sDate->thisDay(); + if (isset($this->children[$key])) { + $sDate->setSelected(); + $class = strtolower(get_class($sDate)); + if ($class == 'calendar_day' || $class == 'calendar_decorator') { + $sDate->setFirst($this->children[$key]->isFirst()); + $sDate->setLast($this->children[$key]->isLast()); + } + $this->children[$key] = $sDate; + } + } + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Month/Weekdays.php b/campcaster/src/tools/pear/src/Calendar/Month/Weekdays.php new file mode 100644 index 000000000..a6c5ada6a --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Month/Weekdays.php @@ -0,0 +1,189 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Weekdays.php,v 1.4 2005/10/22 10:28:49 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Weekdays.php,v 1.4 2005/10/22 10:28:49 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Load base month + */ +require_once CALENDAR_ROOT.'Month.php'; + +/** + * Represents a Month and builds Days in tabular form
+ * + * require_once 'Calendar/Month/Weekdays.php'; + * $Month = & new Calendar_Month_Weekdays(2003, 10); // Oct 2003 + * $Month->build(); // Build Calendar_Day objects + * while ($Day = & $Month->fetch()) { + * if ($Day->isFirst()) { + * echo ''; + * } + * if ($Day->isEmpty()) { + * echo ' '; + * } else { + * echo ''.$Day->thisDay().''; + * } + * if ($Day->isLast()) { + * echo ''; + * } + * } + * + * @package Calendar + * @access public + */ +class Calendar_Month_Weekdays extends Calendar_Month +{ + /** + * Instance of Calendar_Table_Helper + * @var Calendar_Table_Helper + * @access private + */ + var $tableHelper; + + /** + * First day of the week + * @access private + * @var string + */ + var $firstDay; + + /** + * Constructs Calendar_Month_Weekdays + * @param int year e.g. 2003 + * @param int month e.g. 5 + * @param int (optional) first day of week (e.g. 0 for Sunday, 2 for Tuesday etc.) + * @access public + */ + function Calendar_Month_Weekdays($y, $m, $firstDay=null) + { + Calendar_Month::Calendar_Month($y, $m, $firstDay); + } + + /** + * Builds Day objects in tabular form, to allow display of calendar month + * with empty cells if the first day of the week does not fall on the first + * day of the month. + * @see Calendar_Day::isEmpty() + * @see Calendar_Day_Base::isFirst() + * @see Calendar_Day_Base::isLast() + * @param array (optional) Calendar_Day objects representing selected dates + * @return boolean + * @access public + */ + function build($sDates=array()) + { + require_once CALENDAR_ROOT.'Table/Helper.php'; + $this->tableHelper = & new Calendar_Table_Helper($this, $this->firstDay); + Calendar_Month::build($sDates); + $this->buildEmptyDaysBefore(); + $this->shiftDays(); + $this->buildEmptyDaysAfter(); + $this->setWeekMarkers(); + return true; + } + + /** + * Prepends empty days before the real days in the month + * @return void + * @access private + */ + function buildEmptyDaysBefore() + { + $eBefore = $this->tableHelper->getEmptyDaysBefore(); + for ($i=0; $i < $eBefore; $i++) { + $stamp = $this->cE->dateToStamp($this->year, $this->month, -$i); + $Day = new Calendar_Day( + $this->cE->stampToYear($stamp), + $this->cE->stampToMonth($stamp), + $this->cE->stampToDay($stamp)); + $Day->setEmpty(); + $Day->adjust(); + array_unshift($this->children, $Day); + } + } + + /** + * Shifts the array of children forward, if necessary + * @return void + * @access private + */ + function shiftDays() + { + if (isset ($this->children[0])) { + array_unshift($this->children, null); + unset($this->children[0]); + } + } + + /** + * Appends empty days after the real days in the month + * @return void + * @access private + */ + function buildEmptyDaysAfter() + { + $eAfter = $this->tableHelper->getEmptyDaysAfter(); + $sDOM = $this->tableHelper->getNumTableDaysInMonth(); + for ($i = 1; $i <= $sDOM-$eAfter; $i++) { + $Day = new Calendar_Day($this->year, $this->month+1, $i); + $Day->setEmpty(); + $Day->adjust(); + array_push($this->children, $Day); + } + } + + /** + * Sets the "markers" for the beginning and of a of week, in the + * built Calendar_Day children + * @return void + * @access private + */ + function setWeekMarkers() + { + $dIW = $this->cE->getDaysInWeek( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay() + ); + $sDOM = $this->tableHelper->getNumTableDaysInMonth(); + for ($i=1; $i <= $sDOM; $i+= $dIW) { + $this->children[$i]->setFirst(); + $this->children[$i+($dIW-1)]->setLast(); + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Month/Weeks.php b/campcaster/src/tools/pear/src/Calendar/Month/Weeks.php new file mode 100644 index 000000000..0a5007a96 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Month/Weeks.php @@ -0,0 +1,139 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Weeks.php,v 1.3 2005/10/22 10:28:49 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Weeks.php,v 1.3 2005/10/22 10:28:49 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Load base month + */ +require_once CALENDAR_ROOT.'Month.php'; + +/** + * Represents a Month and builds Weeks + * + * require_once 'Calendar'.DIRECTORY_SEPARATOR.'Month'.DIRECTORY_SEPARATOR.'Weeks.php'; + * $Month = & new Calendar_Month_Weeks(2003, 10); // Oct 2003 + * $Month->build(); // Build Calendar_Day objects + * while ($Week = & $Month->fetch()) { + * echo $Week->thisWeek().'
'; + * } + * + * @package Calendar + * @access public + */ +class Calendar_Month_Weeks extends Calendar_Month +{ + /** + * Instance of Calendar_Table_Helper + * @var Calendar_Table_Helper + * @access private + */ + var $tableHelper; + + /** + * First day of the week + * @access private + * @var string + */ + var $firstDay; + + /** + * Constructs Calendar_Month_Weeks + * @param int year e.g. 2003 + * @param int month e.g. 5 + * @param int (optional) first day of week (e.g. 0 for Sunday, 2 for Tuesday etc.) + * @access public + */ + function Calendar_Month_Weeks($y, $m, $firstDay=null) + { + Calendar_Month::Calendar_Month($y, $m, $firstDay); + } + + /** + * Builds Calendar_Week objects for the Month. Note that Calendar_Week + * builds Calendar_Day object in tabular form (with Calendar_Day->empty) + * @param array (optional) Calendar_Week objects representing selected dates + * @return boolean + * @access public + */ + function build($sDates=array()) + { + require_once CALENDAR_ROOT.'Table/Helper.php'; + $this->tableHelper = & new Calendar_Table_Helper($this, $this->firstDay); + require_once CALENDAR_ROOT.'Week.php'; + $numWeeks = $this->tableHelper->getNumWeeks(); + for ($i=1, $d=1; $i<=$numWeeks; $i++, + $d+=$this->cE->getDaysInWeek( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay()) ) { + $this->children[$i] = new Calendar_Week( + $this->year, $this->month, $d, $this->tableHelper->getFirstDay()); + } + //used to set empty days + $this->children[1]->setFirst(true); + $this->children[$numWeeks]->setLast(true); + + // Handle selected weeks here + if (count($sDates) > 0) { + $this->setSelection($sDates); + } + return true; + } + + /** + * Called from build() + * @param array + * @return void + * @access private + */ + function setSelection($sDates) + { + foreach ($sDates as $sDate) { + if ($this->year == $sDate->thisYear() + && $this->month == $sDate->thisMonth()) + { + $key = $sDate->thisWeek('n_in_month'); + if (isset($this->children[$key])) { + $this->children[$key]->setSelected(); + } + } + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Second.php b/campcaster/src/tools/pear/src/Calendar/Second.php new file mode 100644 index 000000000..ccdd19363 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Second.php @@ -0,0 +1,98 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Second.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Second.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Represents a Second
+ * Note: Seconds do not build other objects + * so related methods are overridden to return NULL + * @package Calendar + */ +class Calendar_Second extends Calendar +{ + /** + * Constructs Second + * @param int year e.g. 2003 + * @param int month e.g. 5 + * @param int day e.g. 11 + * @param int hour e.g. 13 + * @param int minute e.g. 31 + * @param int second e.g. 45 + */ + function Calendar_Second($y, $m, $d, $h, $i, $s) + { + Calendar::Calendar($y, $m, $d, $h, $i, $s); + } + + /** + * Overwrite build + * @return NULL + */ + function build() + { + return null; + } + + /** + * Overwrite fetch + * @return NULL + */ + function fetch() + { + return null; + } + + /** + * Overwrite fetchAll + * @return NULL + */ + function fetchAll() + { + return null; + } + + /** + * Overwrite size + * @return NULL + */ + function size() + { + return null; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Table/Helper.php b/campcaster/src/tools/pear/src/Calendar/Table/Helper.php new file mode 100644 index 000000000..0c6c9ab36 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Table/Helper.php @@ -0,0 +1,280 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Helper.php,v 1.5 2005/10/22 09:51:53 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Helper.php,v 1.5 2005/10/22 09:51:53 quipo Exp $ + */ + +/** + * Used by Calendar_Month_Weekdays, Calendar_Month_Weeks and Calendar_Week to + * help with building the calendar in tabular form + * @package Calendar + * @access protected + */ +class Calendar_Table_Helper +{ + /** + * Instance of the Calendar object being helped. + * @var object + * @access private + */ + var $calendar; + + /** + * Instance of the Calendar_Engine + * @var object + * @access private + */ + var $cE; + + /** + * First day of the week + * @access private + * @var string + */ + var $firstDay; + + /** + * The seven days of the week named + * @access private + * @var array + */ + var $weekDays; + + /** + * Days of the week ordered with $firstDay at the beginning + * @access private + * @var array + */ + var $daysOfWeek = array(); + + /** + * Days of the month built from days of the week + * @access private + * @var array + */ + var $daysOfMonth = array(); + + /** + * Number of weeks in month + * @var int + * @access private + */ + var $numWeeks = null; + + /** + * Number of emtpy days before real days begin in month + * @var int + * @access private + */ + var $emptyBefore = 0; + + /** + * Constructs Calendar_Table_Helper + * @param object Calendar_Month_Weekdays, Calendar_Month_Weeks, Calendar_Week + * @param int (optional) first day of the week e.g. 1 for Monday + * @access protected + */ + function Calendar_Table_Helper(& $calendar, $firstDay=null) + { + $this->calendar = & $calendar; + $this->cE = & $calendar->getEngine(); + if (is_null($firstDay)) { + $firstDay = $this->cE->getFirstDayOfWeek( + $this->calendar->thisYear(), + $this->calendar->thisMonth(), + $this->calendar->thisDay() + ); + } + $this->firstDay = $firstDay; + $this->setFirstDay(); + $this->setDaysOfMonth(); + } + + /** + * Constructs $this->daysOfWeek based on $this->firstDay + * @return void + * @access private + */ + function setFirstDay() + { + $weekDays = $this->cE->getWeekDays( + $this->calendar->thisYear(), + $this->calendar->thisMonth(), + $this->calendar->thisDay() + ); + $endDays = array(); + $tmpDays = array(); + $begin = false; + foreach ($weekDays as $day) { + if ($begin) { + $endDays[] = $day; + } else if ($day === $this->firstDay) { + $begin = true; + $endDays[] = $day; + } else { + $tmpDays[] = $day; + } + } + $this->daysOfWeek = array_merge($endDays, $tmpDays); + } + + /** + * Constructs $this->daysOfMonth + * @return void + * @access private + */ + function setDaysOfMonth() + { + $this->daysOfMonth = $this->daysOfWeek; + $daysInMonth = $this->cE->getDaysInMonth( + $this->calendar->thisYear(), $this->calendar->thisMonth()); + $firstDayInMonth = $this->cE->getFirstDayInMonth( + $this->calendar->thisYear(), $this->calendar->thisMonth()); + $this->emptyBefore=0; + foreach ($this->daysOfMonth as $dayOfWeek) { + if ($firstDayInMonth == $dayOfWeek) { + break; + } + $this->emptyBefore++; + } + $this->numWeeks = ceil( + ($daysInMonth + $this->emptyBefore) + / + $this->cE->getDaysInWeek( + $this->calendar->thisYear(), + $this->calendar->thisMonth(), + $this->calendar->thisDay() + ) + ); + for ($i=1; $i < $this->numWeeks; $i++) { + $this->daysOfMonth = + array_merge($this->daysOfMonth, $this->daysOfWeek); + } + } + + /** + * Returns the first day of the month + * @see Calendar_Engine_Interface::getFirstDayOfWeek() + * @return int + * @access protected + */ + function getFirstDay() + { + return $this->firstDay; + } + + /** + * Returns the order array of days in a week + * @return int + * @access protected + */ + function getDaysOfWeek() + { + return $this->daysOfWeek; + } + + /** + * Returns the number of tabular weeks in a month + * @return int + * @access protected + */ + function getNumWeeks() + { + return $this->numWeeks; + } + + /** + * Returns the number of real days + empty days + * @return int + * @access protected + */ + function getNumTableDaysInMonth() + { + return count($this->daysOfMonth); + } + + /** + * Returns the number of empty days before the real days begin + * @return int + * @access protected + */ + function getEmptyDaysBefore() + { + return $this->emptyBefore; + } + + /** + * Returns the index of the last real day in the month + * @todo Potential performance optimization with static + * @return int + * @access protected + */ + function getEmptyDaysAfter() + { + // Causes bug when displaying more than one month +// static $index; +// if (!isset($index)) { + $index = $this->getEmptyDaysBefore() + $this->cE->getDaysInMonth( + $this->calendar->thisYear(), $this->calendar->thisMonth()); +// } + return $index; + } + + /** + * Returns the index of the last real day in the month, relative to the + * beginning of the tabular week it is part of + * @return int + * @access protected + */ + function getEmptyDaysAfterOffset() + { + $eAfter = $this->getEmptyDaysAfter(); + return $eAfter - ( + $this->cE->getDaysInWeek( + $this->calendar->thisYear(), + $this->calendar->thisMonth(), + $this->calendar->thisDay() + ) * ($this->numWeeks-1) ); + } + + /** + * Returns the timestamp of the first day of the current week + */ + function getWeekStart($y, $m, $d, $firstDay=1) + { + $dow = $this->cE->getDayOfWeek($y, $m, $d); + if ($dow > $firstDay) { + $d -= ($dow - $firstDay); + } + if ($dow < $firstDay) { + $d -= ( + $this->cE->getDaysInWeek( + $this->calendar->thisYear(), + $this->calendar->thisMonth(), + $this->calendar->thisDay() + ) - $firstDay + $dow); + } + return $this->cE->dateToStamp($y, $m, $d); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Util/Textual.php b/campcaster/src/tools/pear/src/Calendar/Util/Textual.php new file mode 100644 index 000000000..cb293a7ae --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Util/Textual.php @@ -0,0 +1,239 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Textual.php,v 1.2 2004/08/16 13:13:09 hfuecks Exp $ +// +/** + * @package Calendar + * @version $Id: Textual.php,v 1.2 2004/08/16 13:13:09 hfuecks Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar decorator base class + */ +require_once CALENDAR_ROOT.'Decorator.php'; + +/** + * Static utlities to help with fetching textual representations of months and + * days of the week. + * @package Calendar + * @access public + */ +class Calendar_Util_Textual +{ + + /** + * Returns an array of 12 month names (first index = 1) + * @param string (optional) format of returned months (one,two,short or long) + * @return array + * @access public + * @static + */ + function monthNames($format='long') + { + $formats = array('one'=>'%b', 'two'=>'%b', 'short'=>'%b', 'long'=>'%B'); + if (!array_key_exists($format,$formats)) { + $format = 'long'; + } + $months = array(); + for ($i=1; $i<=12; $i++) { + $stamp = mktime(0, 0, 0, $i, 1, 2003); + $month = strftime($formats[$format], $stamp); + switch($format) { + case 'one': + $month = substr($month, 0, 1); + break; + case 'two': + $month = substr($month, 0, 2); + break; + } + $months[$i] = $month; + } + return $months; + } + + /** + * Returns an array of 7 week day names (first index = 0) + * @param string (optional) format of returned days (one,two,short or long) + * @return array + * @access public + * @static + */ + function weekdayNames($format='long') + { + $formats = array('one'=>'%a', 'two'=>'%a', 'short'=>'%a', 'long'=>'%A'); + if (!array_key_exists($format,$formats)) { + $format = 'long'; + } + $days = array(); + for ($i=0; $i<=6; $i++) { + $stamp = mktime(0, 0, 0, 11, $i+2, 2003); + $day = strftime($formats[$format], $stamp); + switch($format) { + case 'one': + $day = substr($day, 0, 1); + break; + case 'two': + $day = substr($day, 0, 2); + break; + } + $days[$i] = $day; + } + return $days; + } + + /** + * Returns textual representation of the previous month of the decorated calendar object + * @param object subclass of Calendar e.g. Calendar_Month + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + * @static + */ + function prevMonthName($Calendar, $format='long') + { + $months = Calendar_Util_Textual::monthNames($format); + return $months[$Calendar->prevMonth()]; + } + + /** + * Returns textual representation of the month of the decorated calendar object + * @param object subclass of Calendar e.g. Calendar_Month + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + * @static + */ + function thisMonthName($Calendar, $format='long') + { + $months = Calendar_Util_Textual::monthNames($format); + return $months[$Calendar->thisMonth()]; + } + + /** + * Returns textual representation of the next month of the decorated calendar object + * @param object subclass of Calendar e.g. Calendar_Month + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + * @static + */ + function nextMonthName($Calendar, $format='long') + { + $months = Calendar_Util_Textual::monthNames($format); + return $months[$Calendar->nextMonth()]; + } + + /** + * Returns textual representation of the previous day of week of the decorated calendar object + * Note: Requires PEAR::Date + * @param object subclass of Calendar e.g. Calendar_Month + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + * @static + */ + function prevDayName($Calendar, $format='long') + { + $days = Calendar_Util_Textual::weekdayNames($format); + $stamp = $Calendar->prevDay('timestamp'); + $cE = $Calendar->getEngine(); + require_once 'Date/Calc.php'; + $day = Date_Calc::dayOfWeek($cE->stampToDay($stamp), + $cE->stampToMonth($stamp), $cE->stampToYear($stamp)); + return $days[$day]; + } + + /** + * Returns textual representation of the day of week of the decorated calendar object + * Note: Requires PEAR::Date + * @param object subclass of Calendar e.g. Calendar_Month + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + * @static + */ + function thisDayName($Calendar, $format='long') + { + $days = Calendar_Util_Textual::weekdayNames($format); + require_once 'Date/Calc.php'; + $day = Date_Calc::dayOfWeek($Calendar->thisDay(), $Calendar->thisMonth(), $Calendar->thisYear()); + return $days[$day]; + } + + /** + * Returns textual representation of the next day of week of the decorated calendar object + * @param object subclass of Calendar e.g. Calendar_Month + * @param string (optional) format of returned months (one,two,short or long) + * @return string + * @access public + * @static + */ + function nextDayName($Calendar, $format='long') + { + $days = Calendar_Util_Textual::weekdayNames($format); + $stamp = $Calendar->nextDay('timestamp'); + $cE = $Calendar->getEngine(); + require_once 'Date/Calc.php'; + $day = Date_Calc::dayOfWeek($cE->stampToDay($stamp), + $cE->stampToMonth($stamp), $cE->stampToYear($stamp)); + return $days[$day]; + } + + /** + * Returns the days of the week using the order defined in the decorated + * calendar object. Only useful for Calendar_Month_Weekdays, Calendar_Month_Weeks + * and Calendar_Week. Otherwise the returned array will begin on Sunday + * @param object subclass of Calendar e.g. Calendar_Month + * @param string (optional) format of returned months (one,two,short or long) + * @return array ordered array of week day names + * @access public + * @static + */ + function orderedWeekdays($Calendar, $format='long') + { + $days = Calendar_Util_Textual::weekdayNames($format); + + // Not so good - need methods to access this information perhaps... + if (isset($Calendar->tableHelper)) { + $ordereddays = $Calendar->tableHelper->daysOfWeek; + } else { + $ordereddays = array(0, 1, 2, 3, 4, 5, 6); + } + + $ordereddays = array_flip($ordereddays); + $i = 0; + $returndays = array(); + foreach ($ordereddays as $key => $value) { + $returndays[$i] = $days[$key]; + $i++; + } + return $returndays; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Util/Uri.php b/campcaster/src/tools/pear/src/Calendar/Util/Uri.php new file mode 100644 index 000000000..05086dd34 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Util/Uri.php @@ -0,0 +1,169 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Uri.php,v 1.1 2004/08/16 09:03:55 hfuecks Exp $ +// +/** + * @package Calendar + * @version $Id: Uri.php,v 1.1 2004/08/16 09:03:55 hfuecks Exp $ + */ + +/** + * Utility to help building HTML links for navigating the calendar
+ * + * $Day = new Calendar_Day(2003, 10, 23); + * $Uri = & new Calendar_Util_Uri('year', 'month', 'day'); + * echo $Uri->prev($Day,'month'); // Displays year=2003&month=10 + * echo $Uri->prev($Day,'day'); // Displays year=2003&month=10&day=22 + * $Uri->seperator = '/'; + * $Uri->scalar = true; + * echo $Uri->prev($Day,'month'); // Displays 2003/10 + * echo $Uri->prev($Day,'day'); // Displays 2003/10/22 + * + * @package Calendar + * @access public + */ +class Calendar_Util_Uri +{ + /** + * Uri fragments for year, month, day etc. + * @var array + * @access private + */ + var $uris = array(); + + /** + * String to separate fragments with. + * Set to just & for HTML. + * For a scalar URL you might use / as the seperator + * @var string (default XHTML &) + * @access public + */ + var $separator = '&'; + + /** + * To output a "scalar" string - variable names omitted. + * Used for urls like index.php/2004/8/12 + * @var boolean (default false) + * @access public + */ + var $scalar = false; + + /** + * Constructs Calendar_Decorator_Uri + * The term "fragment" means name of a calendar GET variables in the URL + * @param string URI fragment for year + * @param string (optional) URI fragment for month + * @param string (optional) URI fragment for day + * @param string (optional) URI fragment for hour + * @param string (optional) URI fragment for minute + * @param string (optional) URI fragment for second + * @access public + */ + function Calendar_Util_Uri($y, $m=null, $d=null, $h=null, $i=null, $s=null) + { + $this->setFragments($y, $m, $d, $h, $i, $s); + } + + /** + * Sets the URI fragment names + * @param string URI fragment for year + * @param string (optional) URI fragment for month + * @param string (optional) URI fragment for day + * @param string (optional) URI fragment for hour + * @param string (optional) URI fragment for minute + * @param string (optional) URI fragment for second + * @return void + * @access public + */ + function setFragments($y, $m=null, $d=null, $h=null, $i=null, $s=null) { + if (!is_null($y)) $this->uris['Year'] = $y; + if (!is_null($m)) $this->uris['Month'] = $m; + if (!is_null($d)) $this->uris['Day'] = $d; + if (!is_null($h)) $this->uris['Hour'] = $h; + if (!is_null($i)) $this->uris['Minute'] = $i; + if (!is_null($s)) $this->uris['Second'] = $s; + } + + /** + * Gets the URI string for the previous calendar unit + * @param object subclassed from Calendar e.g. Calendar_Month + * @param string calendar unit ( must be year, month, week, day, hour, minute or second) + * @return string + * @access public + */ + function prev($Calendar, $unit) + { + $method = 'prev'.$unit; + $stamp = $Calendar->{$method}('timestamp'); + return $this->buildUriString($Calendar, $method, $stamp); + } + + /** + * Gets the URI string for the current calendar unit + * @param object subclassed from Calendar e.g. Calendar_Month + * @param string calendar unit ( must be year, month, week, day, hour, minute or second) + * @return string + * @access public + */ + function this($Calendar, $unit) + { + $method = 'this'.$unit; + $stamp = $Calendar->{$method}('timestamp'); + return $this->buildUriString($Calendar, $method, $stamp); + } + + /** + * Gets the URI string for the next calendar unit + * @param object subclassed from Calendar e.g. Calendar_Month + * @param string calendar unit ( must be year, month, week, day, hour, minute or second) + * @return string + * @access public + */ + function next($Calendar, $unit) + { + $method = 'next'.$unit; + $stamp = $Calendar->{$method}('timestamp'); + return $this->buildUriString($Calendar, $method, $stamp); + } + + /** + * Build the URI string + * @param string method substring + * @param int timestamp + * @return string build uri string + * @access private + */ + function buildUriString($Calendar, $method, $stamp) + { + $uriString = ''; + $cE = & $Calendar->getEngine(); + $separator = ''; + foreach ($this->uris as $unit => $uri) { + $call = 'stampTo'.$unit; + $uriString .= $separator; + if (!$this->scalar) $uriString .= $uri.'='; + $uriString .= $cE->{$call}($stamp); + $separator = $this->separator; + } + return $uriString; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Validator.php b/campcaster/src/tools/pear/src/Calendar/Validator.php new file mode 100644 index 000000000..3cdd73db3 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Validator.php @@ -0,0 +1,335 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Validator.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Validator.php,v 1.1 2004/05/24 22:25:42 quipo Exp $ + */ + +/** + * Validation Error Messages + */ +if (!defined('CALENDAR_VALUE_TOOSMALL')) { + define('CALENDAR_VALUE_TOOSMALL', 'Too small: min = '); +} +if (!defined('CALENDAR_VALUE_TOOLARGE')) { + define('CALENDAR_VALUE_TOOLARGE', 'Too large: max = '); +} + +/** + * Used to validate any given Calendar date object. Instances of this class + * can be obtained from any data object using the getValidator method + * @see Calendar::getValidator() + * @package Calendar + * @access public + */ +class Calendar_Validator +{ + /** + * Instance of the Calendar date object to validate + * @var object + * @access private + */ + var $calendar; + + /** + * Instance of the Calendar_Engine + * @var object + * @access private + */ + var $cE; + + /** + * Array of errors for validation failures + * @var array + * @access private + */ + var $errors = array(); + + /** + * Constructs Calendar_Validator + * @param object subclass of Calendar + * @access public + */ + function Calendar_Validator(& $calendar) + { + $this->calendar = & $calendar; + $this->cE = & $calendar->getEngine(); + } + + /** + * Calls all the other isValidXXX() methods in the validator + * @return boolean + * @access public + */ + function isValid() + { + $checks = array('isValidYear', 'isValidMonth', 'isValidDay', + 'isValidHour', 'isValidMinute', 'isValidSecond'); + $valid = true; + foreach ($checks as $check) { + if (!$this->{$check}()) { + $valid = false; + } + } + return $valid; + } + + /** + * Check whether this is a valid year + * @return boolean + * @access public + */ + function isValidYear() + { + $y = $this->calendar->thisYear(); + $min = $this->cE->getMinYears(); + if ($min > $y) { + $this->errors[] = new Calendar_Validation_Error( + 'Year', $y, CALENDAR_VALUE_TOOSMALL.$min); + return false; + } + $max = $this->cE->getMaxYears(); + if ($y > $max) { + $this->errors[] = new Calendar_Validation_Error( + 'Year', $y, CALENDAR_VALUE_TOOLARGE.$max); + return false; + } + return true; + } + + /** + * Check whether this is a valid month + * @return boolean + * @access public + */ + function isValidMonth() + { + $m = $this->calendar->thisMonth(); + $min = 1; + if ($min > $m) { + $this->errors[] = new Calendar_Validation_Error( + 'Month', $m, CALENDAR_VALUE_TOOSMALL.$min); + return false; + } + $max = $this->cE->getMonthsInYear($this->calendar->thisYear()); + if ($m > $max) { + $this->errors[] = new Calendar_Validation_Error( + 'Month', $m, CALENDAR_VALUE_TOOLARGE.$max); + return false; + } + return true; + } + + /** + * Check whether this is a valid day + * @return boolean + * @access public + */ + function isValidDay() + { + $d = $this->calendar->thisDay(); + $min = 1; + if ($min > $d) { + $this->errors[] = new Calendar_Validation_Error( + 'Day', $d, CALENDAR_VALUE_TOOSMALL.$min); + return false; + } + $max = $this->cE->getDaysInMonth( + $this->calendar->thisYear(), $this->calendar->thisMonth()); + if ($d > $max) { + $this->errors[] = new Calendar_Validation_Error( + 'Day', $d, CALENDAR_VALUE_TOOLARGE.$max); + return false; + } + return true; + } + + /** + * Check whether this is a valid hour + * @return boolean + * @access public + */ + function isValidHour() + { + $h = $this->calendar->thisHour(); + $min = 0; + if ($min > $h) { + $this->errors[] = new Calendar_Validation_Error( + 'Hour', $h, CALENDAR_VALUE_TOOSMALL.$min); + return false; + } + $max = ($this->cE->getHoursInDay($this->calendar->thisDay())-1); + if ($h > $max) { + $this->errors[] = new Calendar_Validation_Error( + 'Hour', $h, CALENDAR_VALUE_TOOLARGE.$max); + return false; + } + return true; + } + + /** + * Check whether this is a valid minute + * @return boolean + * @access public + */ + function isValidMinute() + { + $i = $this->calendar->thisMinute(); + $min = 0; + if ($min > $i) { + $this->errors[] = new Calendar_Validation_Error( + 'Minute', $i, CALENDAR_VALUE_TOOSMALL.$min); + return false; + } + $max = ($this->cE->getMinutesInHour($this->calendar->thisHour())-1); + if ($i > $max) { + $this->errors[] = new Calendar_Validation_Error( + 'Minute', $i, CALENDAR_VALUE_TOOLARGE.$max); + return false; + } + return true; + } + + /** + * Check whether this is a valid second + * @return boolean + * @access public + */ + function isValidSecond() + { + $s = $this->calendar->thisSecond(); + $min = 0; + if ($min > $s) { + $this->errors[] = new Calendar_Validation_Error( + 'Second', $s, CALENDAR_VALUE_TOOSMALL.$min); + return false; + } + $max = ($this->cE->getSecondsInMinute($this->calendar->thisMinute())-1); + if ($s > $max) { + $this->errors[] = new Calendar_Validation_Error( + 'Second', $s, CALENDAR_VALUE_TOOLARGE.$max); + return false; + } + return true; + } + + /** + * Iterates over any validation errors + * @return mixed either Calendar_Validation_Error or false + * @access public + */ + function fetch() + { + $error = each ($this->errors); + if ($error) { + return $error['value']; + } else { + reset($this->errors); + return false; + } + } +} + +/** + * For Validation Error messages + * @see Calendar::fetch() + * @package Calendar + * @access public + */ +class Calendar_Validation_Error +{ + /** + * Date unit (e.g. month,hour,second) which failed test + * @var string + * @access private + */ + var $unit; + + /** + * Value of unit which failed test + * @var int + * @access private + */ + var $value; + + /** + * Validation error message + * @var string + * @access private + */ + var $message; + + /** + * Constructs Calendar_Validation_Error + * @param string Date unit (e.g. month,hour,second) + * @param int Value of unit which failed test + * @param string Validation error message + * @access protected + */ + function Calendar_Validation_Error($unit,$value,$message) + { + $this->unit = $unit; + $this->value = $value; + $this->message = $message; + } + + /** + * Returns the Date unit + * @return string + * @access public + */ + function getUnit() + { + return $this->unit; + } + + /** + * Returns the value of the unit + * @return int + * @access public + */ + function getValue() + { + return $this->value; + } + + /** + * Returns the validation error message + * @return string + * @access public + */ + function getMessage() + { + return $this->message; + } + + /** + * Returns a string containing the unit, value and error message + * @return string + * @access public + */ + function toString () + { + return $this->unit.' = '.$this->value.' ['.$this->message.']'; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Week.php b/campcaster/src/tools/pear/src/Calendar/Week.php new file mode 100644 index 000000000..33f60276d --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Week.php @@ -0,0 +1,394 @@ + | +// | Lorenzo Alberton | +// +----------------------------------------------------------------------+ +// +// $Id: Week.php,v 1.7 2005/10/22 10:26:49 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Week.php,v 1.7 2005/10/22 10:26:49 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Represents a Week and builds Days in tabular format
+ * + * require_once 'Calendar'.DIRECTORY_SEPARATOR.'Week.php'; + * $Week = & new Calendar_Week(2003, 10, 1); Oct 2003, 1st tabular week + * echo ''; + * while ($Day = & $Week->fetch()) { + * if ($Day->isEmpty()) { + * echo ' '; + * } else { + * echo ''.$Day->thisDay().''; + * } + * } + * echo ''; + * + * @package Calendar + * @access public + */ +class Calendar_Week extends Calendar +{ + /** + * Instance of Calendar_Table_Helper + * @var Calendar_Table_Helper + * @access private + */ + var $tableHelper; + + /** + * Stores the timestamp of the first day of this week + * @access private + * @var object + */ + var $thisWeek; + + /** + * Stores the timestamp of first day of previous week + * @access private + * @var object + */ + var $prevWeek; + + /** + * Stores the timestamp of first day of next week + * @access private + * @var object + */ + var $nextWeek; + + /** + * Used by build() to set empty days + * @access private + * @var boolean + */ + var $firstWeek = false; + + /** + * Used by build() to set empty days + * @access private + * @var boolean + */ + var $lastWeek = false; + + /** + * First day of the week (0=sunday, 1=monday...) + * @access private + * @var boolean + */ + var $firstDay = 1; + + /** + * Constructs Week + * @param int year e.g. 2003 + * @param int month e.g. 5 + * @param int a day of the desired week + * @param int (optional) first day of week (e.g. 0 for Sunday, 2 for Tuesday etc.) + * @access public + */ + function Calendar_Week($y, $m, $d, $firstDay=null) + { + require_once CALENDAR_ROOT.'Table/Helper.php'; + Calendar::Calendar($y, $m, $d); + $this->firstDay = $this->defineFirstDayOfWeek($firstDay); + $this->tableHelper = & new Calendar_Table_Helper($this, $this->firstDay); + $this->thisWeek = $this->tableHelper->getWeekStart($y, $m, $d, $this->firstDay); + $this->prevWeek = $this->tableHelper->getWeekStart($y, $m, $d - $this->cE->getDaysInWeek( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay()), $this->firstDay); + $this->nextWeek = $this->tableHelper->getWeekStart($y, $m, $d + $this->cE->getDaysInWeek( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay()), $this->firstDay); + } + + /** + * Defines the calendar by a timestamp (Unix or ISO-8601), replacing values + * passed to the constructor + * @param int|string Unix or ISO-8601 timestamp + * @return void + * @access public + */ + function setTimestamp($ts) + { + parent::setTimestamp($ts); + $this->thisWeek = $this->tableHelper->getWeekStart( + $this->year, $this->month, $this->day, $this->firstDay + ); + $this->prevWeek = $this->tableHelper->getWeekStart( + $this->year, $this->month, $this->day - $this->cE->getDaysInWeek( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay()), $this->firstDay + ); + $this->nextWeek = $this->tableHelper->getWeekStart( + $this->year, $this->month, $this->day + $this->cE->getDaysInWeek( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay()), $this->firstDay + ); + } + + /** + * Builds Calendar_Day objects for this Week + * @param array (optional) Calendar_Day objects representing selected dates + * @return boolean + * @access public + */ + function build($sDates = array()) + { + require_once CALENDAR_ROOT.'Day.php'; + $year = $this->cE->stampToYear($this->thisWeek); + $month = $this->cE->stampToMonth($this->thisWeek); + $day = $this->cE->stampToDay($this->thisWeek); + $end = $this->cE->getDaysInWeek( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay() + ); + + for ($i=1; $i <= $end; $i++) { + $stamp = $this->cE->dateToStamp($year, $month, $day++); + $this->children[$i] = new Calendar_Day( + $this->cE->stampToYear($stamp), + $this->cE->stampToMonth($stamp), + $this->cE->stampToDay($stamp)); + } + + //set empty days (@see Calendar_Month_Weeks::build()) + if ($this->firstWeek) { + $eBefore = $this->tableHelper->getEmptyDaysBefore(); + for ($i=1; $i <= $eBefore; $i++) { + $this->children[$i]->setEmpty(); + } + } + if ($this->lastWeek) { + $eAfter = $this->tableHelper->getEmptyDaysAfterOffset(); + for ($i = $eAfter+1; $i <= $end; $i++) { + $this->children[$i]->setEmpty(); + } + } + + if (count($sDates) > 0) { + $this->setSelection($sDates); + } + return true; + } + + /** + * @param boolean + * @return void + * @access private + */ + function setFirst($state=true) + { + $this->firstWeek = $state; + } + + /** + * @param boolean + * @return void + * @access private + */ + function setLast($state=true) + { + $this->lastWeek = $state; + } + + /** + * Called from build() + * @param array + * @return void + * @access private + */ + function setSelection($sDates) + { + foreach ($sDates as $sDate) { + foreach ($this->children as $key => $child) { + if ($child->thisDay() == $sDate->thisDay() && + $child->thisMonth() == $sDate->thisMonth() && + $child->thisYear() == $sDate->thisYear() + ) { + $this->children[$key] = $sDate; + $this->children[$key]->setSelected(); + } + } + } + reset($this->children); + } + + /** + * Gets the value of the previous week, according to the requested format + * + * @param string $format ['timestamp' | 'n_in_month' | 'n_in_year' | 'array'] + * @return mixed + * @access public + */ + function prevWeek($format = 'n_in_month') + { + switch (strtolower($format)) { + case 'int': + case 'n_in_month': + return ($this->firstWeek) ? null : $this->thisWeek('n_in_month') -1; + break; + case 'n_in_year': + return $this->cE->getWeekNInYear( + $this->cE->stampToYear($this->prevWeek), + $this->cE->stampToMonth($this->prevWeek), + $this->cE->stampToDay($this->prevWeek)); + break; + case 'array': + return $this->toArray($this->prevWeek); + break; + case 'object': + require_once CALENDAR_ROOT.'Factory.php'; + return Calendar_Factory::createByTimestamp('Week', $this->prevWeek); + break; + case 'timestamp': + default: + return $this->prevWeek; + break; + } + } + + /** + * Gets the value of the current week, according to the requested format + * + * @param string $format ['timestamp' | 'n_in_month' | 'n_in_year' | 'array'] + * @return mixed + * @access public + */ + function thisWeek($format = 'n_in_month') + { + switch (strtolower($format)) { + case 'int': + case 'n_in_month': + if ($this->firstWeek) { + return 1; + } + if ($this->lastWeek) { + return $this->cE->getWeeksInMonth( + $this->thisYear(), + $this->thisMonth(), + $this->firstDay); + } + return $this->cE->getWeekNInMonth( + $this->thisYear(), + $this->thisMonth(), + $this->thisDay(), + $this->firstDay); + break; + case 'n_in_year': + return $this->cE->getWeekNInYear( + $this->cE->stampToYear($this->thisWeek), + $this->cE->stampToMonth($this->thisWeek), + $this->cE->stampToDay($this->thisWeek)); + break; + case 'array': + return $this->toArray($this->thisWeek); + break; + case 'object': + require_once CALENDAR_ROOT.'Factory.php'; + return Calendar_Factory::createByTimestamp('Week', $this->thisWeek); + break; + case 'timestamp': + default: + return $this->thisWeek; + break; + } + } + + /** + * Gets the value of the following week, according to the requested format + * + * @param string $format ['timestamp' | 'n_in_month' | 'n_in_year' | 'array'] + * @return mixed + * @access public + */ + function nextWeek($format = 'n_in_month') + { + switch (strtolower($format)) { + case 'int': + case 'n_in_month': + return ($this->lastWeek) ? null : $this->thisWeek('n_in_month') +1; + break; + case 'n_in_year': + return $this->cE->getWeekNInYear( + $this->cE->stampToYear($this->nextWeek), + $this->cE->stampToMonth($this->nextWeek), + $this->cE->stampToDay($this->nextWeek)); + break; + case 'array': + return $this->toArray($this->nextWeek); + break; + case 'object': + require_once CALENDAR_ROOT.'Factory.php'; + return Calendar_Factory::createByTimestamp('Week', $this->nextWeek); + break; + case 'timestamp': + default: + return $this->nextWeek; + break; + } + } + + /** + * Returns the instance of Calendar_Table_Helper. + * Called from Calendar_Validator::isValidWeek + * @return Calendar_Table_Helper + * @access protected + */ + function & getHelper() + { + return $this->tableHelper; + } + + /** + * Makes sure theres a value for $this->day + * @return void + * @access private + */ + function findFirstDay() + { + if (!count($this->children) > 0) { + $this->build(); + foreach ($this->children as $Day) { + if (!$Day->isEmpty()) { + $this->day = $Day->thisDay(); + break; + } + } + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/Year.php b/campcaster/src/tools/pear/src/Calendar/Year.php new file mode 100644 index 000000000..097db98d3 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/Year.php @@ -0,0 +1,113 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Year.php,v 1.4 2005/10/22 10:25:39 quipo Exp $ +// +/** + * @package Calendar + * @version $Id: Year.php,v 1.4 2005/10/22 10:25:39 quipo Exp $ + */ + +/** + * Allows Calendar include path to be redefined + * @ignore + */ +if (!defined('CALENDAR_ROOT')) { + define('CALENDAR_ROOT', 'Calendar'.DIRECTORY_SEPARATOR); +} + +/** + * Load Calendar base class + */ +require_once CALENDAR_ROOT.'Calendar.php'; + +/** + * Represents a Year and builds Months
+ * + * require_once 'Calendar'.DIRECTORY_SEPARATOR.'Year.php'; + * $Year = & new Calendar_Year(2003, 10, 21); // 21st Oct 2003 + * $Year->build(); // Build Calendar_Month objects + * while ($Month = & $Year->fetch()) { + * echo $Month->thisMonth().'
'; + * } + * + * @package Calendar + * @access public + */ +class Calendar_Year extends Calendar +{ + /** + * Constructs Calendar_Year + * @param int year e.g. 2003 + * @access public + */ + function Calendar_Year($y) + { + Calendar::Calendar($y); + } + + /** + * Builds the Months of the Year.
+ * Note: by defining the constant CALENDAR_MONTH_STATE you can + * control what class of Calendar_Month is built e.g.; + * + * require_once 'Calendar/Calendar_Year.php'; + * define ('CALENDAR_MONTH_STATE',CALENDAR_USE_MONTH_WEEKDAYS); // Use Calendar_Month_Weekdays + * // define ('CALENDAR_MONTH_STATE',CALENDAR_USE_MONTH_WEEKS); // Use Calendar_Month_Weeks + * // define ('CALENDAR_MONTH_STATE',CALENDAR_USE_MONTH); // Use Calendar_Month + * + * It defaults to building Calendar_Month objects. + * @param array (optional) array of Calendar_Month objects representing selected dates + * @param int (optional) first day of week (e.g. 0 for Sunday, 2 for Tuesday etc.) + * @return boolean + * @access public + */ + function build($sDates = array(), $firstDay = null) + { + require_once CALENDAR_ROOT.'Factory.php'; + $this->firstDay = $this->defineFirstDayOfWeek($firstDay); + $monthsInYear = $this->cE->getMonthsInYear($this->thisYear()); + for ($i=1; $i <= $monthsInYear; $i++) { + $this->children[$i] = Calendar_Factory::create('Month', $this->year, $i); + } + if (count($sDates) > 0) { + $this->setSelection($sDates); + } + return true; + } + + /** + * Called from build() + * @param array + * @return void + * @access private + */ + function setSelection($sDates) { + foreach ($sDates as $sDate) { + if ($this->year == $sDate->thisYear()) { + $key = $sDate->thisMonth(); + if (isset($this->children[$key])) { + $sDate->setSelected(); + $this->children[$key] = $sDate; + } + } + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/Readme b/campcaster/src/tools/pear/src/Calendar/docs/Readme new file mode 100644 index 000000000..bba1ed66d --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/Readme @@ -0,0 +1,3 @@ +Readme + +See the PEAR manual at http://pear.php.net/manual/en/package.datetime.calendar.php for details. \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/1.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/1.php new file mode 100644 index 000000000..8c53b6ee1 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/1.php @@ -0,0 +1,92 @@ +' ); +echo ( 'The time is now: '.date('Y M d H:i:s',$c->getTimestamp()).'
' ); + +$i = 1; +echo ( '

First Iteration

' ); +echo ( '

The first iteration is more "expensive", the calendar data + structures having to be built.

' ); +$start = getmicrotime(); +$c->build(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); + +$i = 1; +echo ( '

Second Iteration

' ); +echo ( '

This second iteration is faster, the data structures + being re-used

' ); +$start = getmicrotime(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/1.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/1.phps new file mode 100644 index 000000000..8c53b6ee1 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/1.phps @@ -0,0 +1,92 @@ +' ); +echo ( 'The time is now: '.date('Y M d H:i:s',$c->getTimestamp()).'
' ); + +$i = 1; +echo ( '

First Iteration

' ); +echo ( '

The first iteration is more "expensive", the calendar data + structures having to be built.

' ); +$start = getmicrotime(); +$c->build(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); + +$i = 1; +echo ( '

Second Iteration

' ); +echo ( '

This second iteration is faster, the data structures + being re-used

' ); +$start = getmicrotime(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/10.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/10.php new file mode 100644 index 000000000..ebe1c0a99 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/10.php @@ -0,0 +1,93 @@ +build(); +?> + + + + + A Simple Decorator + + +

A Simple Decorator

+ + +fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "" ); + } else { + echo ( "" ); + } + if ( $Day->isLast() ) { + echo ( "\n\n" ); + } +} +?> + + + + + +
thisMonth() ); ?>
 ".$Day->thisDay()."
Prev Next
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/10.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/10.phps new file mode 100644 index 000000000..ebe1c0a99 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/10.phps @@ -0,0 +1,93 @@ +build(); +?> + + + + + A Simple Decorator + + +

A Simple Decorator

+ + +fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "" ); + } else { + echo ( "" ); + } + if ( $Day->isLast() ) { + echo ( "\n\n" ); + } +} +?> + + + + + +
thisMonth() ); ?>
 ".$Day->thisDay()."
Prev Next
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/11.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/11.php new file mode 100644 index 000000000..4f604d5aa --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/11.php @@ -0,0 +1,109 @@ +entry = $entry; + } + function getEntry() { + return $this->entry; + } +} + +// Create a day to view the hours for +$Day = & new Calendar_Day(2003,10,24); + +// A sample query to get the data for today (NOT ACTUALLY USED HERE) +$sql = " + SELECT + * + FROM + diary + WHERE + eventtime >= '".$Day->thisDay(TRUE)."' + AND + eventtime < '".$Day->nextDay(TRUE)."';"; + +// An array simulating data from a database +$result = array ( + array('eventtime'=>mktime(9,0,0,10,24,2003),'entry'=>'Meeting with sales team'), + array('eventtime'=>mktime(11,0,0,10,24,2003),'entry'=>'Conference call with Widget Inc.'), + array('eventtime'=>mktime(15,0,0,10,24,2003),'entry'=>'Presentation to board of directors') + ); + +// An array to place selected hours in +$selection = array(); + +// Loop through the "database result" +foreach ( $result as $row ) { + $Hour = new Calendar_Hour(2000,1,1,1); // Create Hour with dummy values + $Hour->setTimeStamp($row['eventtime']); // Set the real time with setTimeStamp + + // Create the decorator, passing it the Hour + $DiaryEvent = new DiaryEvent($Hour); + + // Attach the payload + $DiaryEvent->setEntry($row['entry']); + + // Add the decorator to the selection + $selection[] = $DiaryEvent; +} + +// Build the hours in that day, passing the selection +$Day->build($selection); +?> + + + + Passing a Selection Payload with a Decorator + + +

Passing a Selection "Payload" using a Decorator

+ + + + + + +fetch() ) { + + $hour = $Hour->thisHour(); + $minute = $Hour->thisMinute(); + + // Office hours only... + if ( $hour >= 8 && $hour <= 18 ) { + echo ( "\n" ); + echo ( "\n" ); + + // If the hour is selected, call the decorator method... + if ( $Hour->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + echo ( "\n" ); + } +} +?> +
Your Schedule for thisDay(TRUE)) ); ?>
TimeEntry
$hour:$minute".$Hour->getEntry()." 
+

The query to fetch this data, with help from PEAR::Calendar, might be;

+
+
+
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/11.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/11.phps new file mode 100644 index 000000000..4f604d5aa --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/11.phps @@ -0,0 +1,109 @@ +entry = $entry; + } + function getEntry() { + return $this->entry; + } +} + +// Create a day to view the hours for +$Day = & new Calendar_Day(2003,10,24); + +// A sample query to get the data for today (NOT ACTUALLY USED HERE) +$sql = " + SELECT + * + FROM + diary + WHERE + eventtime >= '".$Day->thisDay(TRUE)."' + AND + eventtime < '".$Day->nextDay(TRUE)."';"; + +// An array simulating data from a database +$result = array ( + array('eventtime'=>mktime(9,0,0,10,24,2003),'entry'=>'Meeting with sales team'), + array('eventtime'=>mktime(11,0,0,10,24,2003),'entry'=>'Conference call with Widget Inc.'), + array('eventtime'=>mktime(15,0,0,10,24,2003),'entry'=>'Presentation to board of directors') + ); + +// An array to place selected hours in +$selection = array(); + +// Loop through the "database result" +foreach ( $result as $row ) { + $Hour = new Calendar_Hour(2000,1,1,1); // Create Hour with dummy values + $Hour->setTimeStamp($row['eventtime']); // Set the real time with setTimeStamp + + // Create the decorator, passing it the Hour + $DiaryEvent = new DiaryEvent($Hour); + + // Attach the payload + $DiaryEvent->setEntry($row['entry']); + + // Add the decorator to the selection + $selection[] = $DiaryEvent; +} + +// Build the hours in that day, passing the selection +$Day->build($selection); +?> + + + + Passing a Selection Payload with a Decorator + + +

Passing a Selection "Payload" using a Decorator

+ + + + + + +fetch() ) { + + $hour = $Hour->thisHour(); + $minute = $Hour->thisMinute(); + + // Office hours only... + if ( $hour >= 8 && $hour <= 18 ) { + echo ( "\n" ); + echo ( "\n" ); + + // If the hour is selected, call the decorator method... + if ( $Hour->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + echo ( "\n" ); + } +} +?> +
Your Schedule for thisDay(TRUE)) ); ?>
TimeEntry
$hour:$minute".$Hour->getEntry()." 
+

The query to fetch this data, with help from PEAR::Calendar, might be;

+
+
+
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/12.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/12.php new file mode 100644 index 000000000..a322e77bb --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/12.php @@ -0,0 +1,116 @@ +build(); +?> + + + + <?php echo ( $Year->thisYear() ); ?> + + + + + +fetch() ) { + + switch ( $i ) { + case 0: + echo ( "\n" ); + break; + case 3: + case 6: + case 9: + echo ( "\n\n" ); + break; + case 12: + echo ( "\n" ); + break; + } + + echo ( "\n" ); + + $i++; +} +?> +
+thisYear() ); ?> + + +
\n\n" ); + echo ( "" ); + echo ( "\n\n" ); + $Month->build(); + while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } + } + echo ( "
".date('F',$Month->thisMonth(TRUE))."
MTWTFSS
 ".$Day->thisDay()."
\n
+

Took:

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/12.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/12.phps new file mode 100644 index 000000000..a322e77bb --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/12.phps @@ -0,0 +1,116 @@ +build(); +?> + + + + <?php echo ( $Year->thisYear() ); ?> + + + + + +fetch() ) { + + switch ( $i ) { + case 0: + echo ( "\n" ); + break; + case 3: + case 6: + case 9: + echo ( "\n\n" ); + break; + case 12: + echo ( "\n" ); + break; + } + + echo ( "\n" ); + + $i++; +} +?> +
+thisYear() ); ?> + + +
\n\n" ); + echo ( "" ); + echo ( "\n\n" ); + $Month->build(); + while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } + } + echo ( "
".date('F',$Month->thisMonth(TRUE))."
MTWTFSS
 ".$Day->thisDay()."
\n
+

Took:

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/13.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/13.php new file mode 100644 index 000000000..8cb29a5b6 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/13.php @@ -0,0 +1,99 @@ +getTimestamp()); + +echo ( '

Using PEAR::Date engine

' ); +echo ( 'Viewing: '.@$_GET['view'].'
' ); +echo ( 'The time is now: '.$date->format('%Y %a %e %T').'
' ); + +$i = 1; +echo ( '

First Iteration

' ); +echo ( '

The first iteration is more "expensive", the calendar data + structures having to be built.

' ); +$start = getmicrotime(); +$c->build(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); + +$i = 1; +echo ( '

Second Iteration

' ); +echo ( '

This second iteration is faster, the data structures + being re-used

' ); +$start = getmicrotime(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/13.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/13.phps new file mode 100644 index 000000000..8cb29a5b6 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/13.phps @@ -0,0 +1,99 @@ +getTimestamp()); + +echo ( '

Using PEAR::Date engine

' ); +echo ( 'Viewing: '.@$_GET['view'].'
' ); +echo ( 'The time is now: '.$date->format('%Y %a %e %T').'
' ); + +$i = 1; +echo ( '

First Iteration

' ); +echo ( '

The first iteration is more "expensive", the calendar data + structures having to be built.

' ); +$start = getmicrotime(); +$c->build(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); + +$i = 1; +echo ( '

Second Iteration

' ); +echo ( '

This second iteration is faster, the data structures + being re-used

' ); +$start = getmicrotime(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/14.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/14.php new file mode 100644 index 000000000..4ec9571e8 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/14.php @@ -0,0 +1,141 @@ +build($selectedDays); + +// Construct strings for next/previous links +$PMonth = $month->prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); + +$thisDate = new Date($month->thisMonth('timestamp')); +?> + + + + Calendar using PEAR::Date Engine + + + + + +

Calendar using PEAR::Date Engine

+ + + + + + + + + + + +fetch()) { + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$day->thisYear(). + '&m='.$day->thisMonth(). + '&d='.$day->thisDay(); + + // isFirst() to find start of week + if ($day->isFirst()) + echo "\n"; + + if ($day->isSelected()) { + echo ''."\n"; + } else if ($day->isEmpty()) { + echo ''."\n"; + } else { + echo ''."\n"; + } + + // isLast() to find end of week + if ($day->isLast()) { + echo "\n"; + } +} +?> + + + + + +
+format('%B %Y'); ?> +
MTWTFSS
'.$day->thisDay().' '.$day->thisDay().'
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

'; +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/14.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/14.phps new file mode 100644 index 000000000..4ec9571e8 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/14.phps @@ -0,0 +1,141 @@ +build($selectedDays); + +// Construct strings for next/previous links +$PMonth = $month->prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); + +$thisDate = new Date($month->thisMonth('timestamp')); +?> + + + + Calendar using PEAR::Date Engine + + + + + +

Calendar using PEAR::Date Engine

+ + + + + + + + + + + +fetch()) { + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$day->thisYear(). + '&m='.$day->thisMonth(). + '&d='.$day->thisDay(); + + // isFirst() to find start of week + if ($day->isFirst()) + echo "\n"; + + if ($day->isSelected()) { + echo ''."\n"; + } else if ($day->isEmpty()) { + echo ''."\n"; + } else { + echo ''."\n"; + } + + // isLast() to find end of week + if ($day->isLast()) { + echo "\n"; + } +} +?> + + + + + +
+format('%B %Y'); ?> +
MTWTFSS
'.$day->thisDay().' '.$day->thisDay().'
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

'; +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/15.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/15.php new file mode 100644 index 000000000..35c5e5b1c --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/15.php @@ -0,0 +1,58 @@ +getValidator(); +if (!$Validator->isValidWeek()) { + die ('Please enter a valid week!'); +} +*/ +?> + + + + Paging Weeks + + +

Paging Weeks

+

Week: thisWeek().' '.date('F Y',$Week->thisMonth(true)); ?>

+build(); +while ($Day = $Week->fetch()) { + echo '

'.date('jS F',$Day->thisDay(true))."

\n"; +} +$days = $Week->fetchAll(); + +$prevWeek = $Week->prevWeek('array'); +$prevWeekLink = $_SERVER['PHP_SELF']. + '?y='.$prevWeek['year']. + '&m='.$prevWeek['month']. + '&d='.$prevWeek['day']; + +$nextWeek = $Week->nextWeek('array'); +$nextWeekLink = $_SERVER['PHP_SELF']. + '?y='.$nextWeek['year']. + '&m='.$nextWeek['month']. + '&d='.$nextWeek['day']; +?> +

<< | >>

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/15.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/15.phps new file mode 100644 index 000000000..35c5e5b1c --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/15.phps @@ -0,0 +1,58 @@ +getValidator(); +if (!$Validator->isValidWeek()) { + die ('Please enter a valid week!'); +} +*/ +?> + + + + Paging Weeks + + +

Paging Weeks

+

Week: thisWeek().' '.date('F Y',$Week->thisMonth(true)); ?>

+build(); +while ($Day = $Week->fetch()) { + echo '

'.date('jS F',$Day->thisDay(true))."

\n"; +} +$days = $Week->fetchAll(); + +$prevWeek = $Week->prevWeek('array'); +$prevWeekLink = $_SERVER['PHP_SELF']. + '?y='.$prevWeek['year']. + '&m='.$prevWeek['month']. + '&d='.$prevWeek['day']; + +$nextWeek = $Week->nextWeek('array'); +$nextWeekLink = $_SERVER['PHP_SELF']. + '?y='.$nextWeek['year']. + '&m='.$nextWeek['month']. + '&d='.$nextWeek['day']; +?> +

<< | >>

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/16.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/16.php new file mode 100644 index 000000000..5b75dfb7c --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/16.php @@ -0,0 +1,31 @@ +The current month is ' + .$Calendar->thisMonth().' of year '.$Calendar->thisYear().'

'); + +$Uri = & new Calendar_Decorator_Uri($Calendar); +$Uri->setFragments('jahr','monat'); +// $Uri->setSeperator('/'); // Default is & +// $Uri->setScalar(); // Omit variable names +echo ( "
Previous Uri:\t".$Uri->prev('month')."\n" );
+echo ( "This Uri:\t".$Uri->this('month')."\n" );
+echo ( "Next Uri:\t".$Uri->next('month')."\n
" ); +?> +

+Prev : +Next +

\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/16.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/16.phps new file mode 100644 index 000000000..5b75dfb7c --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/16.phps @@ -0,0 +1,31 @@ +The current month is ' + .$Calendar->thisMonth().' of year '.$Calendar->thisYear().'

'); + +$Uri = & new Calendar_Decorator_Uri($Calendar); +$Uri->setFragments('jahr','monat'); +// $Uri->setSeperator('/'); // Default is & +// $Uri->setScalar(); // Omit variable names +echo ( "
Previous Uri:\t".$Uri->prev('month')."\n" );
+echo ( "This Uri:\t".$Uri->this('month')."\n" );
+echo ( "Next Uri:\t".$Uri->next('month')."\n
" ); +?> +

+Prev : +Next +

\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/17.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/17.php new file mode 100644 index 000000000..32373528b --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/17.php @@ -0,0 +1,71 @@ +Calling: Calendar_Decorator_Textual::monthNames('long');
";
+print_r(Calendar_Decorator_Textual::monthNames('long'));
+echo '
'; + +echo "
Calling: Calendar_Decorator_Textual::weekdayNames('two');
";
+print_r(Calendar_Decorator_Textual::weekdayNames('two'));
+echo '
'; + +echo "
Creating: new Calendar_Day(date('Y'), date('n'), date('d'));
"; +$Calendar = new Calendar_Day(date('Y'), date('n'), date('d')); + +// Decorate +$Textual = & new Calendar_Decorator_Textual($Calendar); + +echo '
Previous month is: '.$Textual->prevMonthName('two').'
'; +echo 'This month is: '.$Textual->thisMonthName('short').'
'; +echo 'Next month is: '.$Textual->nextMonthName().'
'; +echo 'Previous day is: '.$Textual->prevDayName().'
'; +echo 'This day is: '.$Textual->thisDayName('short').'
'; +echo 'Next day is: '.$Textual->nextDayName('one').'
'; + +echo "Creating: new Calendar_Month_Weekdays(date('Y'), date('n'), 6); - Saturday is first day of week
"; +$Calendar = new Calendar_Month_Weekdays(date('Y'), date('n'), 6); + +// Decorate +$Textual = & new Calendar_Decorator_Textual($Calendar); +?> +

Rendering calendar....

+ + + +orderedWeekdays('short'); +foreach ($dayheaders as $dayheader) { + echo ''; +} +?> + +build(); +while ($Day = $Calendar->fetch()) { + if ($Day->isFirst()) { + echo "\n"; + } + if ($Day->isEmpty()) { + echo ''; + } else { + echo ''; + } + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
thisMonthName().' '.$Textual->thisYear(); ?>
'.$dayheader.'
 '.$Day->thisDay().'
\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/17.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/17.phps new file mode 100644 index 000000000..32373528b --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/17.phps @@ -0,0 +1,71 @@ +Calling: Calendar_Decorator_Textual::monthNames('long');
";
+print_r(Calendar_Decorator_Textual::monthNames('long'));
+echo '
'; + +echo "
Calling: Calendar_Decorator_Textual::weekdayNames('two');
";
+print_r(Calendar_Decorator_Textual::weekdayNames('two'));
+echo '
'; + +echo "
Creating: new Calendar_Day(date('Y'), date('n'), date('d'));
"; +$Calendar = new Calendar_Day(date('Y'), date('n'), date('d')); + +// Decorate +$Textual = & new Calendar_Decorator_Textual($Calendar); + +echo '
Previous month is: '.$Textual->prevMonthName('two').'
'; +echo 'This month is: '.$Textual->thisMonthName('short').'
'; +echo 'Next month is: '.$Textual->nextMonthName().'
'; +echo 'Previous day is: '.$Textual->prevDayName().'
'; +echo 'This day is: '.$Textual->thisDayName('short').'
'; +echo 'Next day is: '.$Textual->nextDayName('one').'
'; + +echo "Creating: new Calendar_Month_Weekdays(date('Y'), date('n'), 6); - Saturday is first day of week
"; +$Calendar = new Calendar_Month_Weekdays(date('Y'), date('n'), 6); + +// Decorate +$Textual = & new Calendar_Decorator_Textual($Calendar); +?> +

Rendering calendar....

+ + + +orderedWeekdays('short'); +foreach ($dayheaders as $dayheader) { + echo ''; +} +?> + +build(); +while ($Day = $Calendar->fetch()) { + if ($Day->isFirst()) { + echo "\n"; + } + if ($Day->isEmpty()) { + echo ''; + } else { + echo ''; + } + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
thisMonthName().' '.$Textual->thisYear(); ?>
'.$dayheader.'
 '.$Day->thisDay().'
\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/18.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/18.php new file mode 100644 index 000000000..150b0603a --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/18.php @@ -0,0 +1,36 @@ +'.parent::thisDay().''; + } +} + +$Month = new Calendar_Month(date('Y'), date('n')); + +$Wrapper = & new Calendar_Decorator_Wrapper($Month); +$Wrapper->build(); + +echo '

The Wrapper decorator

'; +echo 'Day numbers are rendered in bold

'; +while ($DecoratedDay = $Wrapper->fetch('MyBoldDecorator')) { + echo $DecoratedDay->thisDay().'
'; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/18.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/18.phps new file mode 100644 index 000000000..150b0603a --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/18.phps @@ -0,0 +1,36 @@ +'.parent::thisDay().''; + } +} + +$Month = new Calendar_Month(date('Y'), date('n')); + +$Wrapper = & new Calendar_Decorator_Wrapper($Month); +$Wrapper->build(); + +echo '

The Wrapper decorator

'; +echo 'Day numbers are rendered in bold

'; +while ($DecoratedDay = $Wrapper->fetch('MyBoldDecorator')) { + echo $DecoratedDay->thisDay().'
'; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/19.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/19.php new file mode 100644 index 000000000..7ba8d85a6 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/19.php @@ -0,0 +1,24 @@ +setFirstDay(0); // Make Sunday first Day + +echo 'Yesterday: '.$WeekDay->prevWeekDay().'
'; +echo 'Today: '.$WeekDay->thisWeekDay().'
'; +echo 'Tomorrow: '.$WeekDay->nextWeekDay().'
'; + +$WeekDay->build(); +echo 'Hours today:
'; +while ( $Hour = $WeekDay->fetch() ) { + echo $Hour->thisHour().'
'; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/19.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/19.phps new file mode 100644 index 000000000..7ba8d85a6 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/19.phps @@ -0,0 +1,24 @@ +setFirstDay(0); // Make Sunday first Day + +echo 'Yesterday: '.$WeekDay->prevWeekDay().'
'; +echo 'Today: '.$WeekDay->thisWeekDay().'
'; +echo 'Tomorrow: '.$WeekDay->nextWeekDay().'
'; + +$WeekDay->build(); +echo 'Hours today:
'; +while ( $Hour = $WeekDay->fetch() ) { + echo $Hour->thisHour().'
'; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/2.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/2.php new file mode 100644 index 000000000..0b487dae4 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/2.php @@ -0,0 +1,142 @@ +build(); + +// Construct strings for next/previous links +$PMonth = $Month->prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $Month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); +?> + + + + Calendar + + + + +

Build with Calendar_Month_Weeks::build() then Calendar_Week::build()

+ + + + + + + + + + + +fetch()) { + echo "\n"; + // Build the days in the week, passing the selected days + $Week->build($selectedDays); + while ($Day = $Week->fetch()) { + + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$Day->thisYear(). + '&m='.$Day->thisMonth(). + '&d='.$Day->thisDay(); + + // Check to see if day is selected + if ($Day->isSelected()) { + echo ''."\n"; + // Check to see if day is empty + } else if ($Day->isEmpty()) { + echo ''."\n"; + } else { + echo ''."\n"; + } + } + echo ''."\n"; +} +?> + + + + + +
+getTimeStamp()); ?> +
MTWTFSS
'.$Day->thisDay().''.$Day->thisDay().''.$Day->thisDay().'
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

'; +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/2.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/2.phps new file mode 100644 index 000000000..0b487dae4 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/2.phps @@ -0,0 +1,142 @@ +build(); + +// Construct strings for next/previous links +$PMonth = $Month->prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $Month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); +?> + + + + Calendar + + + + +

Build with Calendar_Month_Weeks::build() then Calendar_Week::build()

+ + + + + + + + + + + +fetch()) { + echo "\n"; + // Build the days in the week, passing the selected days + $Week->build($selectedDays); + while ($Day = $Week->fetch()) { + + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$Day->thisYear(). + '&m='.$Day->thisMonth(). + '&d='.$Day->thisDay(); + + // Check to see if day is selected + if ($Day->isSelected()) { + echo ''."\n"; + // Check to see if day is empty + } else if ($Day->isEmpty()) { + echo ''."\n"; + } else { + echo ''."\n"; + } + } + echo ''."\n"; +} +?> + + + + + +
+getTimeStamp()); ?> +
MTWTFSS
'.$Day->thisDay().''.$Day->thisDay().''.$Day->thisDay().'
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

'; +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/20.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/20.php new file mode 100644 index 000000000..a6cb0bb49 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/20.php @@ -0,0 +1,240 @@ +entries[] = $entry; + } + + function getEntry() { + $entry = each($this->entries); + if ($entry) { + return $entry['value']; + } else { + reset($this->entries); + return false; + } + } +} + +class MonthPayload_Decorator extends Calendar_Decorator +{ + //Calendar engine + var $cE; + var $tableHelper; + + var $year; + var $month; + var $firstDay = false; + + function build($events=array()) + { + require_once CALENDAR_ROOT . 'Day.php'; + require_once CALENDAR_ROOT . 'Table/Helper.php'; + + $this->tableHelper = & new Calendar_Table_Helper($this, $this->firstDay); + $this->cE = & $this->getEngine(); + $this->year = $this->thisYear(); + $this->month = $this->thisMonth(); + + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $Day = new Calendar_Day(2000,1,1); // Create Day with dummy values + $Day->setTimeStamp($this->cE->dateToStamp($this->year, $this->month, $i)); + $this->children[$i] = new DiaryEvent($Day); + } + if (count($events) > 0) { + $this->setSelection($events); + } + Calendar_Month_Weekdays::buildEmptyDaysBefore(); + Calendar_Month_Weekdays::shiftDays(); + Calendar_Month_Weekdays::buildEmptyDaysAfter(); + Calendar_Month_Weekdays::setWeekMarkers(); + return true; + } + + function setSelection($events) + { + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $stamp1 = $this->cE->dateToStamp($this->year, $this->month, $i); + $stamp2 = $this->cE->dateToStamp($this->year, $this->month, $i+1); + foreach ($events as $event) { + if (($stamp1 >= $event['start'] && $stamp1 < $event['end']) || + ($stamp2 >= $event['start'] && $stamp2 < $event['end']) || + ($stamp1 <= $event['start'] && $stamp2 > $event['end']) + ) { + $this->children[$i]->addEntry($event); + $this->children[$i]->setSelected(); + } + } + } + } + + function fetch() + { + $child = each($this->children); + if ($child) { + return $child['value']; + } else { + reset($this->children); + return false; + } + } +} + +// Calendar instance used to get the dates in the preferred format: +// you can switch Calendar Engine and the example still works +$cal = new Calendar; + +$events = array(); +//add some events +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 1, 10), + 'end' => $cal->cE->dateToStamp(2004, 6, 1, 12), + 'desc' => 'Important meeting' +); +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 1, 21), + 'end' => $cal->cE->dateToStamp(2004, 6, 1, 23, 59), + 'desc' => 'Dinner with the boss' +); +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 5), + 'end' => $cal->cE->dateToStamp(2004, 6, 10, 23, 59), + 'desc' => 'Holidays!' +); + + + +$Month = & new Calendar_Month_Weekdays(2004, 6); +$MonthDecorator = new MonthPayload_Decorator($Month); +$MonthDecorator->build($events); + +?> + + + + Calendar + + + + + +

Sample Calendar Payload Decorator (using engine)

+ + + + + + + + + + + +fetch()) { + + if ($Day->isFirst()) { + echo "\n"; + } + + echo ''; + + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
+ thisMonth().' / '.$MonthDecorator->thisYear(); ?> +
MondayTuesdayWednesdayThursdayFridaySaturdaySunday
'; + echo '
'.$Day->thisDay().'
'; + + if ($Day->isEmpty()) { + echo ' '; + } else { + echo '
    '; + while ($entry = $Day->getEntry()) { + echo '
  • '.$entry['desc'].'
    • '; + //you can print the time range as well + } + echo '
'; + } + echo '
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/20.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/20.phps new file mode 100644 index 000000000..a6cb0bb49 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/20.phps @@ -0,0 +1,240 @@ +entries[] = $entry; + } + + function getEntry() { + $entry = each($this->entries); + if ($entry) { + return $entry['value']; + } else { + reset($this->entries); + return false; + } + } +} + +class MonthPayload_Decorator extends Calendar_Decorator +{ + //Calendar engine + var $cE; + var $tableHelper; + + var $year; + var $month; + var $firstDay = false; + + function build($events=array()) + { + require_once CALENDAR_ROOT . 'Day.php'; + require_once CALENDAR_ROOT . 'Table/Helper.php'; + + $this->tableHelper = & new Calendar_Table_Helper($this, $this->firstDay); + $this->cE = & $this->getEngine(); + $this->year = $this->thisYear(); + $this->month = $this->thisMonth(); + + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $Day = new Calendar_Day(2000,1,1); // Create Day with dummy values + $Day->setTimeStamp($this->cE->dateToStamp($this->year, $this->month, $i)); + $this->children[$i] = new DiaryEvent($Day); + } + if (count($events) > 0) { + $this->setSelection($events); + } + Calendar_Month_Weekdays::buildEmptyDaysBefore(); + Calendar_Month_Weekdays::shiftDays(); + Calendar_Month_Weekdays::buildEmptyDaysAfter(); + Calendar_Month_Weekdays::setWeekMarkers(); + return true; + } + + function setSelection($events) + { + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $stamp1 = $this->cE->dateToStamp($this->year, $this->month, $i); + $stamp2 = $this->cE->dateToStamp($this->year, $this->month, $i+1); + foreach ($events as $event) { + if (($stamp1 >= $event['start'] && $stamp1 < $event['end']) || + ($stamp2 >= $event['start'] && $stamp2 < $event['end']) || + ($stamp1 <= $event['start'] && $stamp2 > $event['end']) + ) { + $this->children[$i]->addEntry($event); + $this->children[$i]->setSelected(); + } + } + } + } + + function fetch() + { + $child = each($this->children); + if ($child) { + return $child['value']; + } else { + reset($this->children); + return false; + } + } +} + +// Calendar instance used to get the dates in the preferred format: +// you can switch Calendar Engine and the example still works +$cal = new Calendar; + +$events = array(); +//add some events +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 1, 10), + 'end' => $cal->cE->dateToStamp(2004, 6, 1, 12), + 'desc' => 'Important meeting' +); +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 1, 21), + 'end' => $cal->cE->dateToStamp(2004, 6, 1, 23, 59), + 'desc' => 'Dinner with the boss' +); +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 5), + 'end' => $cal->cE->dateToStamp(2004, 6, 10, 23, 59), + 'desc' => 'Holidays!' +); + + + +$Month = & new Calendar_Month_Weekdays(2004, 6); +$MonthDecorator = new MonthPayload_Decorator($Month); +$MonthDecorator->build($events); + +?> + + + + Calendar + + + + + +

Sample Calendar Payload Decorator (using engine)

+ + + + + + + + + + + +fetch()) { + + if ($Day->isFirst()) { + echo "\n"; + } + + echo ''; + + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
+ thisMonth().' / '.$MonthDecorator->thisYear(); ?> +
MondayTuesdayWednesdayThursdayFridaySaturdaySunday
'; + echo '
'.$Day->thisDay().'
'; + + if ($Day->isEmpty()) { + echo ' '; + } else { + echo '
    '; + while ($entry = $Day->getEntry()) { + echo '
  • '.$entry['desc'].'
    • '; + //you can print the time range as well + } + echo '
'; + } + echo '
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/21.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/21.php new file mode 100644 index 000000000..5dbd21b99 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/21.php @@ -0,0 +1,139 @@ +build(); +?> + + + + <?php echo $Year->thisYear(); ?> + + + + + +fetch()) { + + switch ($i) { + case 0: + echo "\n"; + break; + case 3: + case 6: + case 9: + echo "\n\n"; + break; + case 12: + echo "\n"; + break; + } + + echo "\n"; + + $i++; +} +?> +
+thisYear(); ?> + + + +
\n\n"; + echo ''; + echo ''."\n"; + echo "\n\n"; + $Month->build(); + while ($Week = $Month->fetch()) { + echo "\n"; + echo '\n"; + $Week->build(); + + while ($Day = $Week->fetch()) { + if ($Day->isEmpty()) { + echo "\n"; + } else { + echo "\n"; + } + } + } + echo "
'.date('F', $Month->thisMonth(TRUE)).'
WeekMTWTFSS
'.$Week->thisWeek($_GET['week_type'])." ".$Day->thisDay()."
\n
+

Took:

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/21.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/21.phps new file mode 100644 index 000000000..5dbd21b99 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/21.phps @@ -0,0 +1,139 @@ +build(); +?> + + + + <?php echo $Year->thisYear(); ?> + + + + + +fetch()) { + + switch ($i) { + case 0: + echo "\n"; + break; + case 3: + case 6: + case 9: + echo "\n\n"; + break; + case 12: + echo "\n"; + break; + } + + echo "\n"; + + $i++; +} +?> +
+thisYear(); ?> + + + +
\n\n"; + echo ''; + echo ''."\n"; + echo "\n\n"; + $Month->build(); + while ($Week = $Month->fetch()) { + echo "\n"; + echo '\n"; + $Week->build(); + + while ($Day = $Week->fetch()) { + if ($Day->isEmpty()) { + echo "\n"; + } else { + echo "\n"; + } + } + } + echo "
'.date('F', $Month->thisMonth(TRUE)).'
WeekMTWTFSS
'.$Week->thisWeek($_GET['week_type'])." ".$Day->thisDay()."
\n
+

Took:

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/22.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/22.php new file mode 100644 index 000000000..55f726374 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/22.php @@ -0,0 +1,46 @@ +The current month is ' + .$Calendar->thisMonth().' of year '.$Calendar->thisYear().'

'); + +$Uri = & new Calendar_Util_Uri('jahr','monat'); +$Uri->setFragments('jahr','monat'); + +echo "\"Vector\" URIs
";
+echo ( "Previous Uri:\t".htmlentities($Uri->prev($Calendar, 'month'))."\n" );
+echo ( "This Uri:\t".htmlentities($Uri->this($Calendar,  'month'))."\n" );
+echo ( "Next Uri:\t".htmlentities($Uri->next($Calendar, 'month'))."\n" );
+echo "
"; + +// Switch to scalar URIs +$Uri->separator = '/'; // Default is & +$Uri->scalar = true; // Omit variable names + +echo "\"Scalar\" URIs
";
+echo ( "Previous Uri:\t".$Uri->prev($Calendar, 'month')."\n" );
+echo ( "This Uri:\t".$Uri->this($Calendar,  'month')."\n" );
+echo ( "Next Uri:\t".$Uri->next($Calendar, 'month')."\n" );
+echo "
"; + +// Restore the vector URIs +$Uri->separator = '&'; +$Uri->scalar = false; +?> +

+Prev : +Next +

\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/22.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/22.phps new file mode 100644 index 000000000..55f726374 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/22.phps @@ -0,0 +1,46 @@ +The current month is ' + .$Calendar->thisMonth().' of year '.$Calendar->thisYear().'

'); + +$Uri = & new Calendar_Util_Uri('jahr','monat'); +$Uri->setFragments('jahr','monat'); + +echo "\"Vector\" URIs
";
+echo ( "Previous Uri:\t".htmlentities($Uri->prev($Calendar, 'month'))."\n" );
+echo ( "This Uri:\t".htmlentities($Uri->this($Calendar,  'month'))."\n" );
+echo ( "Next Uri:\t".htmlentities($Uri->next($Calendar, 'month'))."\n" );
+echo "
"; + +// Switch to scalar URIs +$Uri->separator = '/'; // Default is & +$Uri->scalar = true; // Omit variable names + +echo "\"Scalar\" URIs
";
+echo ( "Previous Uri:\t".$Uri->prev($Calendar, 'month')."\n" );
+echo ( "This Uri:\t".$Uri->this($Calendar,  'month')."\n" );
+echo ( "Next Uri:\t".$Uri->next($Calendar, 'month')."\n" );
+echo "
"; + +// Restore the vector URIs +$Uri->separator = '&'; +$Uri->scalar = false; +?> +

+Prev : +Next +

\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/23.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/23.php new file mode 100644 index 000000000..6fb453fbc --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/23.php @@ -0,0 +1,66 @@ +Calling: Calendar_Util_Textual::monthNames('long');
";
+print_r(Calendar_Util_Textual::monthNames('long'));
+echo '
'; + +echo "
Calling: Calendar_Util_Textual::weekdayNames('two');
";
+print_r(Calendar_Util_Textual::weekdayNames('two'));
+echo '
'; + +echo "
Creating: new Calendar_Day(date('Y'), date('n'), date('d'));
"; +$Calendar = new Calendar_Day(date('Y'), date('n'), date('d')); + +echo '
Previous month is: '.Calendar_Util_Textual::prevMonthName($Calendar,'two').'
'; +echo 'This month is: '.Calendar_Util_Textual::thisMonthName($Calendar,'short').'
'; +echo 'Next month is: '.Calendar_Util_Textual::nextMonthName($Calendar).'
'; +echo 'Previous day is: '.Calendar_Util_Textual::prevDayName($Calendar).'
'; +echo 'This day is: '.Calendar_Util_Textual::thisDayName($Calendar,'short').'
'; +echo 'Next day is: '.Calendar_Util_Textual::nextDayName($Calendar,'one').'
'; + +echo "Creating: new Calendar_Month_Weekdays(date('Y'), date('n'), 6); - Saturday is first day of week
"; +$Calendar = new Calendar_Month_Weekdays(date('Y'), date('n'), 6); + +?> +

Rendering calendar....

+ + + +'.$dayheader.''; +} +?> + +build(); +while ($Day = $Calendar->fetch()) { + if ($Day->isFirst()) { + echo "\n"; + } + if ($Day->isEmpty()) { + echo ''; + } else { + echo ''; + } + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
thisYear(); ?>
 '.$Day->thisDay().'
\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/23.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/23.phps new file mode 100644 index 000000000..6fb453fbc --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/23.phps @@ -0,0 +1,66 @@ +Calling: Calendar_Util_Textual::monthNames('long');
";
+print_r(Calendar_Util_Textual::monthNames('long'));
+echo '
'; + +echo "
Calling: Calendar_Util_Textual::weekdayNames('two');
";
+print_r(Calendar_Util_Textual::weekdayNames('two'));
+echo '
'; + +echo "
Creating: new Calendar_Day(date('Y'), date('n'), date('d'));
"; +$Calendar = new Calendar_Day(date('Y'), date('n'), date('d')); + +echo '
Previous month is: '.Calendar_Util_Textual::prevMonthName($Calendar,'two').'
'; +echo 'This month is: '.Calendar_Util_Textual::thisMonthName($Calendar,'short').'
'; +echo 'Next month is: '.Calendar_Util_Textual::nextMonthName($Calendar).'
'; +echo 'Previous day is: '.Calendar_Util_Textual::prevDayName($Calendar).'
'; +echo 'This day is: '.Calendar_Util_Textual::thisDayName($Calendar,'short').'
'; +echo 'Next day is: '.Calendar_Util_Textual::nextDayName($Calendar,'one').'
'; + +echo "Creating: new Calendar_Month_Weekdays(date('Y'), date('n'), 6); - Saturday is first day of week
"; +$Calendar = new Calendar_Month_Weekdays(date('Y'), date('n'), 6); + +?> +

Rendering calendar....

+ + + +'.$dayheader.''; +} +?> + +build(); +while ($Day = $Calendar->fetch()) { + if ($Day->isFirst()) { + echo "\n"; + } + if ($Day->isEmpty()) { + echo ''; + } else { + echo ''; + } + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
thisYear(); ?>
 '.$Day->thisDay().'
\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/3.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/3.php new file mode 100644 index 000000000..7dd1d805d --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/3.php @@ -0,0 +1,134 @@ +prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $Month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); +?> + + + + Calendar + + + + + +build($selectedDays); +?> +

Built with Calendar_Month_Weekday::build()

+ + + + + + + + + + + +fetch() ) { + + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$Day->thisYear(). + '&m='.$Day->thisMonth(). + '&d='.$Day->thisDay(); + + // isFirst() to find start of week + if ( $Day->isFirst() ) + echo ( "\n" ); + + if ( $Day->isSelected() ) { + echo ( "\n" ); + } else if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + + // isLast() to find end of week + if ( $Day->isLast() ) + echo ( "\n" ); +} +?> + + + + + +
+getTimeStamp())); ?> +
MTWTFSS
".$Day->thisDay()." ".$Day->thisDay()."
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

' ); +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/3.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/3.phps new file mode 100644 index 000000000..7dd1d805d --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/3.phps @@ -0,0 +1,134 @@ +prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $Month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); +?> + + + + Calendar + + + + + +build($selectedDays); +?> +

Built with Calendar_Month_Weekday::build()

+ + + + + + + + + + + +fetch() ) { + + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$Day->thisYear(). + '&m='.$Day->thisMonth(). + '&d='.$Day->thisDay(); + + // isFirst() to find start of week + if ( $Day->isFirst() ) + echo ( "\n" ); + + if ( $Day->isSelected() ) { + echo ( "\n" ); + } else if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + + // isLast() to find end of week + if ( $Day->isLast() ) + echo ( "\n" ); +} +?> + + + + + +
+getTimeStamp())); ?> +
MTWTFSS
".$Day->thisDay()." ".$Day->thisDay()."
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

' ); +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/4.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/4.php new file mode 100644 index 000000000..71e2844cf --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/4.php @@ -0,0 +1,49 @@ +Result: '.$Unit->thisYear().'-'.$Unit->thisMonth().'-'.$Unit->thisDay(). + ' '.$Unit->thisHour().':'.$Unit->thisMinute().':'.$Unit->thisSecond(); +if ($Unit->isValid()) { + echo ' is valid!

'; +} else { + $V= & $Unit->getValidator(); + echo ' is invalid:

'; + while ($error = $V->fetch()) { + echo $error->toString() .'
'; + } +} +?> +

Enter a date / time to validate:

+
+Year:
+Month:
+Day:
+Hour:
+Minute:
+Second:
+ +
+

Note: Error messages can be controlled with the constants CALENDAR_VALUE_TOOSMALL and CALENDAR_VALUE_TOOLARGE - see Calendar_Validator.php

+ +Took: '.(getmicrotime()-$start).' seconds

'; ?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/4.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/4.phps new file mode 100644 index 000000000..71e2844cf --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/4.phps @@ -0,0 +1,49 @@ +Result: '.$Unit->thisYear().'-'.$Unit->thisMonth().'-'.$Unit->thisDay(). + ' '.$Unit->thisHour().':'.$Unit->thisMinute().':'.$Unit->thisSecond(); +if ($Unit->isValid()) { + echo ' is valid!

'; +} else { + $V= & $Unit->getValidator(); + echo ' is invalid:

'; + while ($error = $V->fetch()) { + echo $error->toString() .'
'; + } +} +?> +

Enter a date / time to validate:

+
+Year:
+Month:
+Day:
+Hour:
+Minute:
+Second:
+ +
+

Note: Error messages can be controlled with the constants CALENDAR_VALUE_TOOSMALL and CALENDAR_VALUE_TOOLARGE - see Calendar_Validator.php

+ +Took: '.(getmicrotime()-$start).' seconds

'; ?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/5.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/5.php new file mode 100644 index 000000000..db6f1087f --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/5.php @@ -0,0 +1,132 @@ + + + + + Select and Update + + +

Select and Update

+isValid() ) { + $V= & $Second->getValidator(); + echo ('

Validation failed:

' ); + while ( $error = $V->fetch() ) { + echo ( $error->toString() .'
' ); + } + } else { + echo ('

Validation success.

' ); + echo ( '

New timestamp is: '.$Second->getTimeStamp().' which could be used to update a database, for example'); + } +} else { +$Year = new Calendar_Year($_POST['y']); +$Month = new Calendar_Month($_POST['y'],$_POST['m']); +$Day = new Calendar_Day($_POST['y'],$_POST['m'],$_POST['d']); +$Hour = new Calendar_Hour($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h']); +$Minute = new Calendar_Minute($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h'],$_POST['i']); +$Second = new Calendar_Second($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h'],$_POST['i'],$_POST['s']); +?> +

Set the alarm clock

+
+Year:   +Month:  +Day:  +Hour:  +Minute:  +Second:  +
+ +Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/5.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/5.phps new file mode 100644 index 000000000..db6f1087f --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/5.phps @@ -0,0 +1,132 @@ + + + + + Select and Update + + +

Select and Update

+isValid() ) { + $V= & $Second->getValidator(); + echo ('

Validation failed:

' ); + while ( $error = $V->fetch() ) { + echo ( $error->toString() .'
' ); + } + } else { + echo ('

Validation success.

' ); + echo ( '

New timestamp is: '.$Second->getTimeStamp().' which could be used to update a database, for example'); + } +} else { +$Year = new Calendar_Year($_POST['y']); +$Month = new Calendar_Month($_POST['y'],$_POST['m']); +$Day = new Calendar_Day($_POST['y'],$_POST['m'],$_POST['d']); +$Hour = new Calendar_Hour($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h']); +$Minute = new Calendar_Minute($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h'],$_POST['i']); +$Second = new Calendar_Second($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h'],$_POST['i'],$_POST['s']); +?> +

Set the alarm clock

+ +Year:   +Month:  +Day:  +Hour:  +Minute:  +Second:  +
+ +Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/6.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/6.php new file mode 100644 index 000000000..77d9caba3 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/6.php @@ -0,0 +1,210 @@ +' ); +?> + + +Personal Planner Rendered with WML + +

Viewing getTimeStamp()) ); ?>

+

+ +Back to Month View +"/> + +

+ +build(); + while ( $Hour = & $Day->fetch() ) { + echo ( "\n" ); + echo ( "\n" ); + echo ( "\n" ); + } +?> +
".date('g a',$Hour->getTimeStamp())."Free time!
+ +

getTimeStamp()) ); ?>

+ + + + +build($selection); +while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else if ( $Day->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } +} +?> + + + + + +
MTWTFSS
".$Day->thisDay()."\nthisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&mime=wml\" />\n".$Day->thisDay()."\nthisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&mime=wml\" />
+ +<< +"/> + + + +>> +"/> + +
+ + +

Back to HTML

+Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + + + + + HTML (+WML) Personal Planner + + +

Personal Planner Rendered with HTML

+

To view in WML, click here or place a ?mime=wml at the end of any URL. +Note that Opera supports WML natively and Mozilla / Firefox has the WMLBrowser +plugin: wmlbrowser.mozdev.org

+ +

Viewing getTimeStamp()) ); ?>

+

+ +Back to Month View +

+ +build(); + while ( $Hour = & $Day->fetch() ) { + echo ( "\n" ); + echo ( "\n" ); + echo ( "\n" ); + } +?> +
".date('g a',$Hour->getTimeStamp())."Free time!
+ +

getTimeStamp()) ); ?>

+ + + + +build($selection); +while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else if ( $Day->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } +} +?> + + + + + +
MTWTFSS
thisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&wml\">".$Day->thisDay()."thisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "\">".$Day->thisDay()."
+ +<< + +>> +
+ + + + +Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/6.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/6.phps new file mode 100644 index 000000000..77d9caba3 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/6.phps @@ -0,0 +1,210 @@ +' ); +?> + + +Personal Planner Rendered with WML + +

Viewing getTimeStamp()) ); ?>

+

+ +Back to Month View +"/> + +

+ +build(); + while ( $Hour = & $Day->fetch() ) { + echo ( "\n" ); + echo ( "\n" ); + echo ( "\n" ); + } +?> +
".date('g a',$Hour->getTimeStamp())."Free time!
+ +

getTimeStamp()) ); ?>

+ + + + +build($selection); +while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else if ( $Day->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } +} +?> + + + + + +
MTWTFSS
".$Day->thisDay()."\nthisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&mime=wml\" />\n".$Day->thisDay()."\nthisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&mime=wml\" />
+ +<< +"/> + + + +>> +"/> + +
+ + +

Back to HTML

+Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + + + + + HTML (+WML) Personal Planner + + +

Personal Planner Rendered with HTML

+

To view in WML, click here or place a ?mime=wml at the end of any URL. +Note that Opera supports WML natively and Mozilla / Firefox has the WMLBrowser +plugin: wmlbrowser.mozdev.org

+ +

Viewing getTimeStamp()) ); ?>

+

+ +Back to Month View +

+ +build(); + while ( $Hour = & $Day->fetch() ) { + echo ( "\n" ); + echo ( "\n" ); + echo ( "\n" ); + } +?> +
".date('g a',$Hour->getTimeStamp())."Free time!
+ +

getTimeStamp()) ); ?>

+ + + + +build($selection); +while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else if ( $Day->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } +} +?> + + + + + +
MTWTFSS
thisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&wml\">".$Day->thisDay()."thisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "\">".$Day->thisDay()."
+ +<< + +>> +
+ + + + +Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/7.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/7.php new file mode 100644 index 000000000..5d527ffdf --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/7.php @@ -0,0 +1,92 @@ +__dispatch_map['getMonth'] = + array('in' => array('year' => 'int', 'month'=>'int'), + 'out' => array('month' => '{urn:PEAR_SOAP_Calendar}Month'), + ); + $this->__typedef['Month'] = array ( + 'monthname' => 'string', + 'days' => '{urn:PEAR_SOAP_Calendar}MonthDays' + ); + $this->__typedef['MonthDays'] = array (array ('{urn:PEAR_SOAP_Calendar}Day')); + $this->__typedef['Day'] = array ( + 'isFirst' => 'int', + 'isLast' => 'int', + 'isEmpty' => 'int', + 'day' => 'int' ); + } + + function __dispatch($methodname) + { + if (isset($this->__dispatch_map[$methodname])) + return $this->__dispatch_map[$methodname]; + return NULL; + } + + function getMonth($year, $month) + { + require_once(CALENDAR_ROOT.'Month'.DIRECTORY_SEPARATOR.'Weekdays.php'); + $Month = & new Calendar_Month_Weekdays($year,$month); + if (!$Month->isValid()) { + $V = & $Month->getValidator(); + $errorMsg = ''; + while ($error = $V->fetch()) { + $errorMsg .= $error->toString()."\n"; + } + return new SOAP_Fault($errorMsg, 'Client'); + } else { + $monthname = date('F Y', $Month->getTimeStamp()); + $days = array(); + $Month->build(); + while ($Day = & $Month->fetch()) { + $day = array( + 'isFirst' => (int)$Day->isFirst(), + 'isLast' => (int)$Day->isLast(), + 'isEmpty' => (int)$Day->isEmpty(), + 'day' => (int)$Day->thisDay(), + ); + $days[] = $day; + } + return array('monthname' => $monthname, 'days' => $days); + } + } +} + +$server = new SOAP_Server(); +$server->_auto_translation = true; +$calendar = new Calendar_Server(); +$server->addObjectMap($calendar, 'urn:PEAR_SOAP_Calendar'); + +if (strtoupper($_SERVER['REQUEST_METHOD'])=='POST') { + $server->service($GLOBALS['HTTP_RAW_POST_DATA']); +} else { + require_once 'SOAP'.DIRECTORY_SEPARATOR.'Disco.php'; + $disco = new SOAP_DISCO_Server($server, "PEAR_SOAP_Calendar"); + if (isset($_SERVER['QUERY_STRING']) && + strcasecmp($_SERVER['QUERY_STRING'], 'wsdl')==0) { + header("Content-type: text/xml"); + echo $disco->getWSDL(); + } else { + echo 'This is a PEAR::SOAP Calendar Server. For client try here
'; + echo 'For WSDL try here'; + } + exit; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/7.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/7.phps new file mode 100644 index 000000000..5d527ffdf --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/7.phps @@ -0,0 +1,92 @@ +__dispatch_map['getMonth'] = + array('in' => array('year' => 'int', 'month'=>'int'), + 'out' => array('month' => '{urn:PEAR_SOAP_Calendar}Month'), + ); + $this->__typedef['Month'] = array ( + 'monthname' => 'string', + 'days' => '{urn:PEAR_SOAP_Calendar}MonthDays' + ); + $this->__typedef['MonthDays'] = array (array ('{urn:PEAR_SOAP_Calendar}Day')); + $this->__typedef['Day'] = array ( + 'isFirst' => 'int', + 'isLast' => 'int', + 'isEmpty' => 'int', + 'day' => 'int' ); + } + + function __dispatch($methodname) + { + if (isset($this->__dispatch_map[$methodname])) + return $this->__dispatch_map[$methodname]; + return NULL; + } + + function getMonth($year, $month) + { + require_once(CALENDAR_ROOT.'Month'.DIRECTORY_SEPARATOR.'Weekdays.php'); + $Month = & new Calendar_Month_Weekdays($year,$month); + if (!$Month->isValid()) { + $V = & $Month->getValidator(); + $errorMsg = ''; + while ($error = $V->fetch()) { + $errorMsg .= $error->toString()."\n"; + } + return new SOAP_Fault($errorMsg, 'Client'); + } else { + $monthname = date('F Y', $Month->getTimeStamp()); + $days = array(); + $Month->build(); + while ($Day = & $Month->fetch()) { + $day = array( + 'isFirst' => (int)$Day->isFirst(), + 'isLast' => (int)$Day->isLast(), + 'isEmpty' => (int)$Day->isEmpty(), + 'day' => (int)$Day->thisDay(), + ); + $days[] = $day; + } + return array('monthname' => $monthname, 'days' => $days); + } + } +} + +$server = new SOAP_Server(); +$server->_auto_translation = true; +$calendar = new Calendar_Server(); +$server->addObjectMap($calendar, 'urn:PEAR_SOAP_Calendar'); + +if (strtoupper($_SERVER['REQUEST_METHOD'])=='POST') { + $server->service($GLOBALS['HTTP_RAW_POST_DATA']); +} else { + require_once 'SOAP'.DIRECTORY_SEPARATOR.'Disco.php'; + $disco = new SOAP_DISCO_Server($server, "PEAR_SOAP_Calendar"); + if (isset($_SERVER['QUERY_STRING']) && + strcasecmp($_SERVER['QUERY_STRING'], 'wsdl')==0) { + header("Content-type: text/xml"); + echo $disco->getWSDL(); + } else { + echo 'This is a PEAR::SOAP Calendar Server. For client try here
'; + echo 'For WSDL try here'; + } + exit; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/8.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/8.php new file mode 100644 index 000000000..ada622ce7 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/8.php @@ -0,0 +1,70 @@ +") ) { + die('PHP 5 has problems with PEAR::SOAP Client (8.0RC3) + - remove @ before include below to see why'); +} + +if (!@include('SOAP'.DIRECTORY_SEPARATOR.'Client.php')) { + die('You must have PEAR::SOAP installed'); +} + +// Just to save manaul modification... +$basePath = explode('/', $_SERVER['SCRIPT_NAME']); +array_pop($basePath); +$basePath = implode('/', $basePath); +$url = 'http://'.$_SERVER['SERVER_NAME'].$basePath.'/7.php?wsdl'; + +if (!isset($_GET['y'])) $_GET['y'] = date('Y'); +if (!isset($_GET['m'])) $_GET['m'] = date('n'); + +$wsdl = new SOAP_WSDL ($url); + +echo ( '
'.$wsdl->generateProxyCode().'
' ); + +$calendarClient = $wsdl->getProxy(); + +$month = $calendarClient->getMonth((int)$_GET['y'],(int)$_GET['m']); + +if ( PEAR::isError($month) ) { + die ( $month->toString() ); +} +?> + + + + Calendar over the Wire + + +

Calendar Over the Wire (featuring PEAR::SOAP)

+ + + + + +days as $day ) { + + if ( $day->isFirst === 1 ) + echo ( "\n" ); + if ( $day->isEmpty === 1 ) { + echo ( "" ); + } else { + echo ( "" ); + } + if ( $day->isLast === 1 ) + echo ( "\n" ); +} +?> + +
monthname );?>
MTWTFSS
".$day->day."
+

Enter Year and Month to View:

+ +Year:   +Month:   + + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/8.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/8.phps new file mode 100644 index 000000000..ada622ce7 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/8.phps @@ -0,0 +1,70 @@ +") ) { + die('PHP 5 has problems with PEAR::SOAP Client (8.0RC3) + - remove @ before include below to see why'); +} + +if (!@include('SOAP'.DIRECTORY_SEPARATOR.'Client.php')) { + die('You must have PEAR::SOAP installed'); +} + +// Just to save manaul modification... +$basePath = explode('/', $_SERVER['SCRIPT_NAME']); +array_pop($basePath); +$basePath = implode('/', $basePath); +$url = 'http://'.$_SERVER['SERVER_NAME'].$basePath.'/7.php?wsdl'; + +if (!isset($_GET['y'])) $_GET['y'] = date('Y'); +if (!isset($_GET['m'])) $_GET['m'] = date('n'); + +$wsdl = new SOAP_WSDL ($url); + +echo ( '
'.$wsdl->generateProxyCode().'
' ); + +$calendarClient = $wsdl->getProxy(); + +$month = $calendarClient->getMonth((int)$_GET['y'],(int)$_GET['m']); + +if ( PEAR::isError($month) ) { + die ( $month->toString() ); +} +?> + + + + Calendar over the Wire + + +

Calendar Over the Wire (featuring PEAR::SOAP)

+ + + + + +days as $day ) { + + if ( $day->isFirst === 1 ) + echo ( "\n" ); + if ( $day->isEmpty === 1 ) { + echo ( "" ); + } else { + echo ( "" ); + } + if ( $day->isLast === 1 ) + echo ( "\n" ); +} +?> + +
monthname );?>
MTWTFSS
".$day->day."
+

Enter Year and Month to View:

+
+Year:   +Month:   + +
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/9.php b/campcaster/src/tools/pear/src/Calendar/docs/examples/9.php new file mode 100644 index 000000000..01cfa7e8c --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/9.php @@ -0,0 +1,16 @@ +getTimeStamp())); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/9.phps b/campcaster/src/tools/pear/src/Calendar/docs/examples/9.phps new file mode 100644 index 000000000..01cfa7e8c --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/9.phps @@ -0,0 +1,16 @@ +getTimeStamp())); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/docs/examples/index.html b/campcaster/src/tools/pear/src/Calendar/docs/examples/index.html new file mode 100644 index 000000000..ace67856a --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/docs/examples/index.html @@ -0,0 +1,50 @@ + + + + PEAR::Calendar Examples + + + + +

PEAR::Calendar Examples

+

$Id: index.html,v 1.6 2004/08/17 09:10:53 hfuecks Exp $

+
    +
  • 1.php [src] - shows basic usage, passing all the way down from Calendar_Year to Calendar_Second - more of a quick test it's working
    • +
  • 2.php [src] - shows how to build a tabular month using Calendar_Month_Weeks, Calendar_Week, Calendar_Day as well as selecting some dates.
    • +
  • 3.php [src] - shows how to build a tabular month using Calendar_Month_Weekdays and Calendar_Day, as well as selecting some dates (this method is faster).
    • +
  • 4.php [src] - shows how to use PEAR::Calendar for validation.
    • +
  • 5.php [src] - shows PEAR::Calendar in use to help generate a form.
    • +
  • 6.php [src] - a month and day "planner" calendar, which can be rendered both as HTML and WML.
    • +
  • 7.php [src] - a simple SOAP Calendar Server, using PEAR::SOAP and PEAR::Calendar
    • +
  • 8.php [src] - a WSDL SOAP client for the SOAP Calendar Server
    • +
  • 9.php [src] - quick example of i18n with setlocale (not working on SF)
    • +
  • 10.php [src] - an example of extending Calendar_Decorator to modify output
    • +
  • 11.php [src] - attaching a "payload" (e.g. results of a DB query) to a calendar using Calendar_Decorator to allow the payload to be available inside the main loop.
    • +
  • 12.php [src] - a complete year with months.
    • +
  • 13.php [src] - same as 1.php but using Calendar_Engine_PearDate, (see PEAR::Date).
    • +
  • 14.php [src] - same as 3.php but using Calendar_Engine_PearDate
    • +
  • 15.php [src] - paging through weeks
    • +
  • 16.php [src] - example of Calendar_Decorator_Uri. Note you should prefer Calendar_Util_Uri (see below) in most cases, for performance
    • +
  • 17.php [src] - example of Calendar_Decorator_Textual. Note you should prefer Calendar_Util_Textual (see below) in most cases, for performance
    • +
  • 18.php [src] - example of Calendar_Decorator_Wrapper.
    • +
  • 19.php [src] - example of Calendar_Decorator_Weekday.
    • +
  • 20.php [src] - shows how to attach a "payload" spanning multiple days, with more than one entry per day
    • +
  • 21.php [src] - same as 12.php but using Calendar_Month_Weeks instead of Calendar_Month_Weekdays to allow the week in the year or week in the month to be displayed.
    • +
  • 22.php [src] - demonstrates use of Calendar_Util_Uri.
    • +
  • 23.php [src] - demonstrates use of Calendar_Util_Textual.
    • +
  • 24.php [src] - Calendar_Decorator_Weekday combined with Calendar_Decorator_Wrapper to decorate days in the month.
    • +
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/README b/campcaster/src/tools/pear/src/Calendar/tests/README new file mode 100644 index 000000000..ecc755b12 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/README @@ -0,0 +1,7 @@ +These tests require Simple Test: http://www.lastcraft.com/simple_test.php + +Ideally they would use PEAR::PHPUnit but the current version has bugs and +lacks alot of the functionality (e.g. Mock Objects) which Simple Test +provides. + +Modifying the simple_include.php script for your simple test install dir \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/all_tests.php b/campcaster/src/tools/pear/src/Calendar/tests/all_tests.php new file mode 100644 index 000000000..4a8a91d83 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/all_tests.php @@ -0,0 +1,34 @@ +GroupTest('All PEAR::Calendar Tests'); + $this->AddTestCase(new CalendarTests()); + $this->AddTestCase(new CalendarTabularTests()); + $this->AddTestCase(new ValidatorTests()); + $this->AddTestCase(new CalendarEngineTests()); + $this->AddTestCase(new TableHelperTests()); + $this->AddTestCase(new DecoratorTests()); + $this->AddTestCase(new UtilTests()); + } +} + +$test = &new AllTests(); +$test->run(new HtmlReporter()); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/calendar_engine_tests.php b/campcaster/src/tools/pear/src/Calendar/tests/calendar_engine_tests.php new file mode 100644 index 000000000..df5c682ba --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/calendar_engine_tests.php @@ -0,0 +1,20 @@ +GroupTest('Calendar Engine Tests'); + $this->addTestFile('peardate_engine_test.php'); + $this->addTestFile('unixts_engine_test.php'); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new CalendarEngineTests(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/calendar_include.php b/campcaster/src/tools/pear/src/Calendar/tests/calendar_include.php new file mode 100644 index 000000000..5bdaa37c4 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/calendar_include.php @@ -0,0 +1,28 @@ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/calendar_tabular_tests.php b/campcaster/src/tools/pear/src/Calendar/tests/calendar_tabular_tests.php new file mode 100644 index 000000000..ab503f0d1 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/calendar_tabular_tests.php @@ -0,0 +1,22 @@ +GroupTest('Calendar Tabular Tests'); + $this->addTestFile('month_weekdays_test.php'); + $this->addTestFile('month_weeks_test.php'); + $this->addTestFile('week_test.php'); + //$this->addTestFile('week_firstday_0_test.php'); //switch with the above + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new CalendarTabularTests(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/calendar_test.php b/campcaster/src/tools/pear/src/Calendar/tests/calendar_test.php new file mode 100644 index 000000000..4e903855e --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/calendar_test.php @@ -0,0 +1,115 @@ +UnitTestCase($name); + } + function setUp() { + $this->cal = new Calendar(2003,10,25,13,32,43); + } + function tearDown() { + unset($this->cal); + } + function testPrevYear () { + $this->assertEqual(2002,$this->cal->prevYear()); + } + function testPrevYear_Array () { + $this->assertEqual( + array( + 'year' => 2002, + 'month' => 1, + 'day' => 1, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevYear('array')); + } + function testThisYear () { + $this->assertEqual(2003,$this->cal->thisYear()); + } + function testNextYear () { + $this->assertEqual(2004,$this->cal->nextYear()); + } + function testPrevMonth () { + $this->assertEqual(9,$this->cal->prevMonth()); + } + function testPrevMonth_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 9, + 'day' => 1, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevMonth('array')); + } + function testThisMonth () { + $this->assertEqual(10,$this->cal->thisMonth()); + } + function testNextMonth () { + $this->assertEqual(11,$this->cal->nextMonth()); + } + function testPrevDay () { + $this->assertEqual(24,$this->cal->prevDay()); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 10, + 'day' => 24, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testThisDay () { + $this->assertEqual(25,$this->cal->thisDay()); + } + function testNextDay () { + $this->assertEqual(26,$this->cal->nextDay()); + } + function testPrevHour () { + $this->assertEqual(12,$this->cal->prevHour()); + } + function testThisHour () { + $this->assertEqual(13,$this->cal->thisHour()); + } + function testNextHour () { + $this->assertEqual(14,$this->cal->nextHour()); + } + function testPrevMinute () { + $this->assertEqual(31,$this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(32,$this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(33,$this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(42,$this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(43,$this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(44,$this->cal->nextSecond()); + } + function testSetTimeStamp() { + $stamp = mktime(13,32,43,10,25,2003); + $this->cal->setTimeStamp($stamp); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } + function testGetTimeStamp() { + $stamp = mktime(13,32,43,10,25,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/calendar_tests.php b/campcaster/src/tools/pear/src/Calendar/tests/calendar_tests.php new file mode 100644 index 000000000..ee54cf09f --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/calendar_tests.php @@ -0,0 +1,25 @@ +GroupTest('Calendar Tests'); + $this->addTestFile('calendar_test.php'); + $this->addTestFile('year_test.php'); + $this->addTestFile('month_test.php'); + $this->addTestFile('day_test.php'); + $this->addTestFile('hour_test.php'); + $this->addTestFile('minute_test.php'); + $this->addTestFile('second_test.php'); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new CalendarTests(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/day_test.php b/campcaster/src/tools/pear/src/Calendar/tests/day_test.php new file mode 100644 index 000000000..e9a13493c --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/day_test.php @@ -0,0 +1,107 @@ +UnitTestCase('Test of Day'); + } + function setUp() { + $this->cal = new Calendar_Day(2003,10,25); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 10, + 'day' => 24, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testPrevHour () { + $this->assertEqual(23,$this->cal->prevHour()); + } + function testThisHour () { + $this->assertEqual(0,$this->cal->thisHour()); + } + function testNextHour () { + $this->assertEqual(1,$this->cal->nextHour()); + } + function testPrevMinute () { + $this->assertEqual(59,$this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(0,$this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(1,$this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(59,$this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0,$this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(1,$this->cal->nextSecond()); + } + function testGetTimeStamp() { + $stamp = mktime(0,0,0,10,25,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } +} + +class TestOfDayBuild extends TestOfDay { + function TestOfDayBuild() { + $this->UnitTestCase('Test of Day::build()'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(24,$this->cal->size()); + } + function testFetch() { + $this->cal->build(); + $i=0; + while ( $Child = $this->cal->fetch() ) { + $i++; + } + $this->assertEqual(24,$i); + } + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 0; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } + function testSelection() { + require_once(CALENDAR_ROOT . 'Hour.php'); + $selection = array(new Calendar_Hour(2003,10,25,13)); + $this->cal->build($selection); + $i = 0; + while ( $Child = $this->cal->fetch() ) { + if ( $i == 13 ) + break; + $i++; + } + $this->assertTrue($Child->isSelected()); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfDay(); + $test->run(new HtmlReporter()); + $test = &new TestOfDayBuild(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/decorator_test.php b/campcaster/src/tools/pear/src/Calendar/tests/decorator_test.php new file mode 100644 index 000000000..c2cbe2693 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/decorator_test.php @@ -0,0 +1,268 @@ +UnitTestCase('Test of Calendar_Decorator'); + } + function setUp() { + $this->mockengine = new Mock_Calendar_Engine($this); + $this->mockcal = new Mock_Calendar_Second($this); + $this->mockcal->setReturnValue('prevYear',2002); + $this->mockcal->setReturnValue('thisYear',2003); + $this->mockcal->setReturnValue('nextYear',2004); + $this->mockcal->setReturnValue('prevMonth',9); + $this->mockcal->setReturnValue('thisMonth',10); + $this->mockcal->setReturnValue('nextMonth',11); + $this->mockcal->setReturnValue('prevDay',14); + $this->mockcal->setReturnValue('thisDay',15); + $this->mockcal->setReturnValue('nextDay',16); + $this->mockcal->setReturnValue('prevHour',12); + $this->mockcal->setReturnValue('thisHour',13); + $this->mockcal->setReturnValue('nextHour',14); + $this->mockcal->setReturnValue('prevMinute',29); + $this->mockcal->setReturnValue('thisMinute',30); + $this->mockcal->setReturnValue('nextMinute',31); + $this->mockcal->setReturnValue('prevSecond',44); + $this->mockcal->setReturnValue('thisSecond',45); + $this->mockcal->setReturnValue('nextSecond',46); + $this->mockcal->setReturnValue('getEngine',$this->mockengine); + $this->mockcal->setReturnValue('getTimestamp',12345); + + } + function tearDown() { + unset ( $this->engine ); + unset ( $this->mockcal ); + } + function testPrevYear() { + $this->mockcal->expectOnce('prevYear',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(2002,$Decorator->prevYear()); + } + function testThisYear() { + $this->mockcal->expectOnce('thisYear',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(2003,$Decorator->thisYear()); + } + function testNextYear() { + $this->mockcal->expectOnce('nextYear',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(2004,$Decorator->nextYear()); + } + function testPrevMonth() { + $this->mockcal->expectOnce('prevMonth',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(9,$Decorator->prevMonth()); + } + function testThisMonth() { + $this->mockcal->expectOnce('thisMonth',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(10,$Decorator->thisMonth()); + } + function testNextMonth() { + $this->mockcal->expectOnce('nextMonth',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(11,$Decorator->nextMonth()); + } + function testPrevWeek() { + $mockweek = & new Mock_Calendar_Week($this); + $mockweek->setReturnValue('prevWeek',1); + $mockweek->expectOnce('prevWeek',array('n_in_month')); + $Decorator =& new Calendar_Decorator($mockweek); + $this->assertEqual(1,$Decorator->prevWeek()); + } + function testThisWeek() { + $mockweek = & new Mock_Calendar_Week($this); + $mockweek->setReturnValue('thisWeek',2); + $mockweek->expectOnce('thisWeek',array('n_in_month')); + $Decorator =& new Calendar_Decorator($mockweek); + $this->assertEqual(2,$Decorator->thisWeek()); + } + function testNextWeek() { + $mockweek = & new Mock_Calendar_Week($this); + $mockweek->setReturnValue('nextWeek',3); + $mockweek->expectOnce('nextWeek',array('n_in_month')); + $Decorator =& new Calendar_Decorator($mockweek); + $this->assertEqual(3,$Decorator->nextWeek()); + } + function testPrevDay() { + $this->mockcal->expectOnce('prevDay',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(14,$Decorator->prevDay()); + } + function testThisDay() { + $this->mockcal->expectOnce('thisDay',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(15,$Decorator->thisDay()); + } + function testNextDay() { + $this->mockcal->expectOnce('nextDay',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(16,$Decorator->nextDay()); + } + function testPrevHour() { + $this->mockcal->expectOnce('prevHour',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(12,$Decorator->prevHour()); + } + function testThisHour() { + $this->mockcal->expectOnce('thisHour',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(13,$Decorator->thisHour()); + } + function testNextHour() { + $this->mockcal->expectOnce('nextHour',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(14,$Decorator->nextHour()); + } + function testPrevMinute() { + $this->mockcal->expectOnce('prevMinute',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(29,$Decorator->prevMinute()); + } + function testThisMinute() { + $this->mockcal->expectOnce('thisMinute',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(30,$Decorator->thisMinute()); + } + function testNextMinute() { + $this->mockcal->expectOnce('nextMinute',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(31,$Decorator->nextMinute()); + } + function testPrevSecond() { + $this->mockcal->expectOnce('prevSecond',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(44,$Decorator->prevSecond()); + } + function testThisSecond() { + $this->mockcal->expectOnce('thisSecond',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(45,$Decorator->thisSecond()); + } + function testNextSecond() { + $this->mockcal->expectOnce('nextSecond',array('int')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(46,$Decorator->nextSecond()); + } + function testGetEngine() { + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertIsA($Decorator->getEngine(),'Mock_Calendar_Engine'); + } + function testSetTimestamp() { + $this->mockcal->expectOnce('setTimestamp',array('12345')); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->setTimestamp('12345'); + } + function testGetTimestamp() { + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual(12345,$Decorator->getTimestamp()); + } + function testSetSelected() { + $this->mockcal->expectOnce('setSelected',array(true)); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->setSelected(); + } + function testIsSelected() { + $this->mockcal->setReturnValue('isSelected',true); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertTrue($Decorator->isSelected()); + } + function testAdjust() { + $this->mockcal->expectOnce('adjust',array()); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->adjust(); + } + function testToArray() { + $this->mockcal->expectOnce('toArray',array(12345)); + $testArray = array('foo'=>'bar'); + $this->mockcal->setReturnValue('toArray',$testArray); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual($testArray,$Decorator->toArray(12345)); + } + function testReturnValue() { + $this->mockcal->expectOnce('returnValue',array('a','b','c','d')); + $this->mockcal->setReturnValue('returnValue','foo'); + $Decorator =& new Calendar_Decorator($this->mockcal); + $this->assertEqual('foo',$Decorator->returnValue('a','b','c','d')); + } + function testSetFirst() { + $mockday = & new Mock_Calendar_Day($this); + $mockday->expectOnce('setFirst',array(true)); + $Decorator =& new Calendar_Decorator($mockday); + $Decorator->setFirst(); + } + function testSetLast() { + $mockday = & new Mock_Calendar_Day($this); + $mockday->expectOnce('setLast',array(true)); + $Decorator =& new Calendar_Decorator($mockday); + $Decorator->setLast(); + } + function testIsFirst() { + $mockday = & new Mock_Calendar_Day($this); + $mockday->setReturnValue('isFirst',TRUE); + $Decorator =& new Calendar_Decorator($mockday); + $this->assertTrue($Decorator->isFirst()); + } + function testIsLast() { + $mockday = & new Mock_Calendar_Day($this); + $mockday->setReturnValue('isLast',TRUE); + $Decorator =& new Calendar_Decorator($mockday); + $this->assertTrue($Decorator->isLast()); + } + function testSetEmpty() { + $mockday = & new Mock_Calendar_Day($this); + $mockday->expectOnce('setEmpty',array(true)); + $Decorator =& new Calendar_Decorator($mockday); + $Decorator->setEmpty(); + } + function testIsEmpty() { + $mockday = & new Mock_Calendar_Day($this); + $mockday->setReturnValue('isEmpty',TRUE); + $Decorator =& new Calendar_Decorator($mockday); + $this->assertTrue($Decorator->isEmpty()); + } + function testBuild() { + $testArray=array('foo'=>'bar'); + $this->mockcal->expectOnce('build',array($testArray)); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->build($testArray); + } + function testFetch() { + $this->mockcal->expectOnce('fetch',array()); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->fetch(); + } + function testFetchAll() { + $this->mockcal->expectOnce('fetchAll',array()); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->fetchAll(); + } + function testSize() { + $this->mockcal->expectOnce('size',array()); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->size(); + } + function testIsValid() { + $this->mockcal->expectOnce('isValid',array()); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->isValid(); + } + function testGetValidator() { + $this->mockcal->expectOnce('getValidator',array()); + $Decorator =& new Calendar_Decorator($this->mockcal); + $Decorator->getValidator(); + } +} +?> diff --git a/campcaster/src/tools/pear/src/Calendar/tests/decorator_tests.php b/campcaster/src/tools/pear/src/Calendar/tests/decorator_tests.php new file mode 100644 index 000000000..1891d52ee --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/decorator_tests.php @@ -0,0 +1,21 @@ +GroupTest('Decorator Tests'); + $this->addTestFile('decorator_test.php'); + $this->addTestFile('decorator_textual_test.php'); + $this->addTestFile('decorator_uri_test.php'); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new DecoratorTests(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/decorator_textual_test.php b/campcaster/src/tools/pear/src/Calendar/tests/decorator_textual_test.php new file mode 100644 index 000000000..962a12f86 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/decorator_textual_test.php @@ -0,0 +1,174 @@ +UnitTestCase('Test of Calendar_Decorator_Textual'); + } + function testMonthNamesLong() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $monthNames = array( + 1=>'January', + 2=>'February', + 3=>'March', + 4=>'April', + 5=>'May', + 6=>'June', + 7=>'July', + 8=>'August', + 9=>'September', + 10=>'October', + 11=>'November', + 12=>'December', + ); + $this->assertEqual($monthNames,$Textual->monthNames()); + } + function testMonthNamesShort() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $monthNames = array( + 1=>'Jan', + 2=>'Feb', + 3=>'Mar', + 4=>'Apr', + 5=>'May', + 6=>'Jun', + 7=>'Jul', + 8=>'Aug', + 9=>'Sep', + 10=>'Oct', + 11=>'Nov', + 12=>'Dec', + ); + $this->assertEqual($monthNames,$Textual->monthNames('short')); + } + function testMonthNamesTwo() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $monthNames = array( + 1=>'Ja', + 2=>'Fe', + 3=>'Ma', + 4=>'Ap', + 5=>'Ma', + 6=>'Ju', + 7=>'Ju', + 8=>'Au', + 9=>'Se', + 10=>'Oc', + 11=>'No', + 12=>'De', + ); + $this->assertEqual($monthNames,$Textual->monthNames('two')); + } + function testMonthNamesOne() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $monthNames = array( + 1=>'J', + 2=>'F', + 3=>'M', + 4=>'A', + 5=>'M', + 6=>'J', + 7=>'J', + 8=>'A', + 9=>'S', + 10=>'O', + 11=>'N', + 12=>'D', + ); + $this->assertEqual($monthNames,$Textual->monthNames('one')); + } + function testWeekdayNamesLong() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $weekdayNames = array( + 0=>'Sunday', + 1=>'Monday', + 2=>'Tuesday', + 3=>'Wednesday', + 4=>'Thursday', + 5=>'Friday', + 6=>'Saturday', + ); + $this->assertEqual($weekdayNames,$Textual->weekdayNames()); + } + function testWeekdayNamesShort() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $weekdayNames = array( + 0=>'Sun', + 1=>'Mon', + 2=>'Tue', + 3=>'Wed', + 4=>'Thu', + 5=>'Fri', + 6=>'Sat', + ); + $this->assertEqual($weekdayNames,$Textual->weekdayNames('short')); + } + function testWeekdayNamesTwo() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $weekdayNames = array( + 0=>'Su', + 1=>'Mo', + 2=>'Tu', + 3=>'We', + 4=>'Th', + 5=>'Fr', + 6=>'Sa', + ); + $this->assertEqual($weekdayNames,$Textual->weekdayNames('two')); + } + function testWeekdayNamesOne() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $weekdayNames = array( + 0=>'S', + 1=>'M', + 2=>'T', + 3=>'W', + 4=>'T', + 5=>'F', + 6=>'S', + ); + $this->assertEqual($weekdayNames,$Textual->weekdayNames('one')); + } + function testPrevMonthNameShort() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $this->assertEqual('Sep',$Textual->prevMonthName('short')); + } + function testThisMonthNameShort() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $this->assertEqual('Oct',$Textual->thisMonthName('short')); + } + function testNextMonthNameShort() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $this->assertEqual('Nov',$Textual->nextMonthName('short')); + } + function testThisDayNameShort() { + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $this->assertEqual('Wed',$Textual->thisDayName('short')); + } + function testOrderedWeekdaysShort() { + $weekdayNames = array( + 0=>'Sun', + 1=>'Mon', + 2=>'Tue', + 3=>'Wed', + 4=>'Thu', + 5=>'Fri', + 6=>'Sat', + ); + $Textual = new Calendar_Decorator_Textual($this->mockcal); + $this->assertEqual($weekdayNames,$Textual->orderedWeekdays('short')); + } + +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfDecoratorTextual(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/decorator_uri_test.php b/campcaster/src/tools/pear/src/Calendar/tests/decorator_uri_test.php new file mode 100644 index 000000000..b09c1b789 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/decorator_uri_test.php @@ -0,0 +1,37 @@ +UnitTestCase('Test of Calendar_Decorator_Uri'); + } + function testFragments() { + $Uri = new Calendar_Decorator_Uri($this->mockcal); + $Uri->setFragments('year','month','day','hour','minute','second'); + $this->assertEqual('year=&month=&day=&hour=&minute=&second=',$Uri->this('second')); + } + function testScalarFragments() { + $Uri = new Calendar_Decorator_Uri($this->mockcal); + $Uri->setFragments('year','month','day','hour','minute','second'); + $Uri->setScalar(); + $this->assertEqual('&&&&&',$Uri->this('second')); + } + function testSetSeperator() { + $Uri = new Calendar_Decorator_Uri($this->mockcal); + $Uri->setFragments('year','month','day','hour','minute','second'); + $Uri->setSeparator('/'); + $this->assertEqual('year=/month=/day=/hour=/minute=/second=',$Uri->this('second')); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfDecoratorUri(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/helper_test.php b/campcaster/src/tools/pear/src/Calendar/tests/helper_test.php new file mode 100644 index 000000000..0aa9daa11 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/helper_test.php @@ -0,0 +1,83 @@ +UnitTestCase('Test of Calendar_Table_Helper'); + } + function setUp() { + $this->mockengine = new Mock_Calendar_Engine($this); + $this->mockengine->setReturnValue('getMinYears',1970); + $this->mockengine->setReturnValue('getMaxYears',2037); + $this->mockengine->setReturnValue('getMonthsInYear',12); + $this->mockengine->setReturnValue('getDaysInMonth',31); + $this->mockengine->setReturnValue('getHoursInDay',24); + $this->mockengine->setReturnValue('getMinutesInHour',60); + $this->mockengine->setReturnValue('getSecondsInMinute',60); + $this->mockengine->setReturnValue('getWeekDays',array(0,1,2,3,4,5,6)); + $this->mockengine->setReturnValue('getDaysInWeek',7); + $this->mockengine->setReturnValue('getFirstDayOfWeek',1); + $this->mockengine->setReturnValue('getFirstDayInMonth',3); + $this->mockcal = new Mock_Calendar_Second($this); + $this->mockcal->setReturnValue('thisYear',2003); + $this->mockcal->setReturnValue('thisMonth',10); + $this->mockcal->setReturnValue('thisDay',15); + $this->mockcal->setReturnValue('thisHour',13); + $this->mockcal->setReturnValue('thisMinute',30); + $this->mockcal->setReturnValue('thisSecond',45); + $this->mockcal->setReturnValue('getEngine',$this->mockengine); + } + function testGetFirstDay() { + for ( $i = 0; $i <= 7; $i++ ) { + $Helper = & new Calendar_Table_Helper($this->mockcal,$i); + $this->assertEqual($Helper->getFirstDay(),$i); + } + } + function testGetDaysOfWeekMonday() { + $Helper = & new Calendar_Table_Helper($this->mockcal); + $this->assertEqual($Helper->getDaysOfWeek(),array(1,2,3,4,5,6,0)); + } + function testGetDaysOfWeekSunday() { + $Helper = & new Calendar_Table_Helper($this->mockcal,0); + $this->assertEqual($Helper->getDaysOfWeek(),array(0,1,2,3,4,5,6)); + } + function testGetDaysOfWeekThursday() { + $Helper = & new Calendar_Table_Helper($this->mockcal,4); + $this->assertEqual($Helper->getDaysOfWeek(),array(4,5,6,0,1,2,3)); + } + function testGetNumWeeks() { + $Helper = & new Calendar_Table_Helper($this->mockcal); + $this->assertEqual($Helper->getNumWeeks(),5); + } + function testGetNumTableDaysInMonth() { + $Helper = & new Calendar_Table_Helper($this->mockcal); + $this->assertEqual($Helper->getNumTableDaysInMonth(),35); + } + function testGetEmptyDaysBefore() { + $Helper = & new Calendar_Table_Helper($this->mockcal); + $this->assertEqual($Helper->getEmptyDaysBefore(),2); + } + function testGetEmptyDaysAfter() { + $Helper = & new Calendar_Table_Helper($this->mockcal); + $this->assertEqual($Helper->getEmptyDaysAfter(),33); + } + function testGetEmptyDaysAfterOffset() { + $Helper = & new Calendar_Table_Helper($this->mockcal); + $this->assertEqual($Helper->getEmptyDaysAfterOffset(),5); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfTableHelper(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/hour_test.php b/campcaster/src/tools/pear/src/Calendar/tests/hour_test.php new file mode 100644 index 000000000..090efce51 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/hour_test.php @@ -0,0 +1,98 @@ +UnitTestCase('Test of Hour'); + } + function setUp() { + $this->cal = new Calendar_Hour(2003,10,25,13); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 10, + 'day' => 24, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testPrevMinute () { + $this->assertEqual(59,$this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(0,$this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(1,$this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(59,$this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0,$this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(1,$this->cal->nextSecond()); + } + function testGetTimeStamp() { + $stamp = mktime(13,0,0,10,25,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } +} + +class TestOfHourBuild extends TestOfHour { + function TestOfHourBuild() { + $this->UnitTestCase('Test of Hour::build()'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(60,$this->cal->size()); + } + function testFetch() { + $this->cal->build(); + $i=0; + while ( $Child = $this->cal->fetch() ) { + $i++; + } + $this->assertEqual(60,$i); + } + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 0; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } + function testSelection() { + require_once(CALENDAR_ROOT . 'Minute.php'); + $selection = array(new Calendar_Minute(2003,10,25,13,32)); + $this->cal->build($selection); + $i = 0; + while ( $Child = $this->cal->fetch() ) { + if ( $i == 32 ) + break; + $i++; + } + $this->assertTrue($Child->isSelected()); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfHour(); + $test->run(new HtmlReporter()); + $test = &new TestOfHourBuild(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/minute_test.php b/campcaster/src/tools/pear/src/Calendar/tests/minute_test.php new file mode 100644 index 000000000..252690134 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/minute_test.php @@ -0,0 +1,99 @@ +UnitTestCase('Test of Minute'); + } + function setUp() { + $this->cal = new Calendar_Minute(2003,10,25,13,32); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 10, + 'day' => 24, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testPrevSecond () { + $this->assertEqual(59,$this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0,$this->cal->thisSecond()); + } + function testThisSecond_Timestamp () { + $this->assertEqual($this->cal->cE->dateToStamp( + 2003, 10, 25, 13, 32, 0), + $this->cal->thisSecond('timestamp')); + } + function testNextSecond () { + $this->assertEqual(1,$this->cal->nextSecond()); + } + function testNextSecond_Timestamp () { + $this->assertEqual($this->cal->cE->dateToStamp( + 2003, 10, 25, 13, 32, 1), + $this->cal->nextSecond('timestamp')); + } + function testGetTimeStamp() { + $stamp = mktime(13,32,0,10,25,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } +} + +class TestOfMinuteBuild extends TestOfMinute { + function TestOfMinuteBuild() { + $this->UnitTestCase('Test of Minute::build()'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(60,$this->cal->size()); + } + function testFetch() { + $this->cal->build(); + $i=0; + while ( $Child = $this->cal->fetch() ) { + $i++; + } + $this->assertEqual(60,$i); + } + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 0; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } + function testSelection() { + require_once(CALENDAR_ROOT . 'Second.php'); + $selection = array(new Calendar_Second(2003,10,25,13,32,43)); + $this->cal->build($selection); + $i = 0; + while ( $Child = $this->cal->fetch() ) { + if ( $i == 43 ) + break; + $i++; + } + $this->assertTrue($Child->isSelected()); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfMinute(); + $test->run(new HtmlReporter()); + $test = &new TestOfMinuteBuild(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/month_test.php b/campcaster/src/tools/pear/src/Calendar/tests/month_test.php new file mode 100644 index 000000000..d633a99c2 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/month_test.php @@ -0,0 +1,119 @@ +UnitTestCase('Test of Month'); + } + function setUp() { + $this->cal = new Calendar_Month(2003,10); + } + function testPrevMonth_Object() { + $this->assertEqual(new Calendar_Month(2003, 9), $this->cal->prevMonth('object')); + } + function testPrevDay () { + $this->assertEqual(30,$this->cal->prevDay()); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 9, + 'day' => 30, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testThisDay () { + $this->assertEqual(1,$this->cal->thisDay()); + } + function testNextDay () { + $this->assertEqual(2,$this->cal->nextDay()); + } + function testPrevHour () { + $this->assertEqual(23,$this->cal->prevHour()); + } + function testThisHour () { + $this->assertEqual(0,$this->cal->thisHour()); + } + function testNextHour () { + $this->assertEqual(1,$this->cal->nextHour()); + } + function testPrevMinute () { + $this->assertEqual(59,$this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(0,$this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(1,$this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(59,$this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0,$this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(1,$this->cal->nextSecond()); + } + function testGetTimeStamp() { + $stamp = mktime(0,0,0,10,1,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } +} + +class TestOfMonthBuild extends TestOfMonth { + function TestOfMonthBuild() { + $this->UnitTestCase('Test of Month::build()'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(31,$this->cal->size()); + } + function testFetch() { + $this->cal->build(); + $i=0; + while ( $Child = $this->cal->fetch() ) { + $i++; + } + $this->assertEqual(31,$i); + } + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } + function testSelection() { + require_once(CALENDAR_ROOT . 'Day.php'); + $selection = array(new Calendar_Day(2003,10,25)); + $this->cal->build($selection); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + if ( $i == 25 ) + break; + $i++; + } + $this->assertTrue($Child->isSelected()); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfMonth(); + $test->run(new HtmlReporter()); + $test = &new TestOfMonthBuild(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/month_weekdays_test.php b/campcaster/src/tools/pear/src/Calendar/tests/month_weekdays_test.php new file mode 100644 index 000000000..70b21dd58 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/month_weekdays_test.php @@ -0,0 +1,130 @@ +UnitTestCase('Test of Month Weekdays'); + } + function setUp() { + $this->cal = new Calendar_Month_Weekdays(2003,10); + } + function testPrevDay () { + $this->assertEqual(30,$this->cal->prevDay()); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 9, + 'day' => 30, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testThisDay () { + $this->assertEqual(1,$this->cal->thisDay()); + } + function testNextDay () { + $this->assertEqual(2,$this->cal->nextDay()); + } + function testPrevHour () { + $this->assertEqual(23,$this->cal->prevHour()); + } + function testThisHour () { + $this->assertEqual(0,$this->cal->thisHour()); + } + function testNextHour () { + $this->assertEqual(1,$this->cal->nextHour()); + } + function testPrevMinute () { + $this->assertEqual(59,$this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(0,$this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(1,$this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(59,$this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0,$this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(1,$this->cal->nextSecond()); + } + function testGetTimeStamp() { + $stamp = mktime(0,0,0,10,1,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } +} + +class TestOfMonthWeekdaysBuild extends TestOfMonthWeekdays { + function TestOfMonthWeekdaysBuild() { + $this->UnitTestCase('Test of Month_Weekdays::build()'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(35,$this->cal->size()); + } + function testFetch() { + $this->cal->build(); + $i=0; + while ( $Child = $this->cal->fetch() ) { + $i++; + } + $this->assertEqual(35,$i); + } + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } + function testSelection() { + require_once(CALENDAR_ROOT . 'Day.php'); + $selection = array(new Calendar_Day(2003,10,25)); + $this->cal->build($selection); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + if ( $i == 27 ) + break; + $i++; + } + $this->assertTrue($Child->isSelected()); + } + function testEmptyCount() { + $this->cal->build(); + $empty = 0; + while ( $Child = $this->cal->fetch() ) { + if ( $Child->isEmpty() ) + $empty++; + } + $this->assertEqual(4,$empty); + } + function testEmptyDaysBefore_AfterAdjust() { + $this->cal = new Calendar_Month_Weekdays(2004,0); + $this->cal->build(); + $this->assertEqual(0,$this->cal->tableHelper->getEmptyDaysBefore()); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfMonthWeekdays(); + $test->run(new HtmlReporter()); + $test = &new TestOfMonthWeekdaysBuild(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/month_weeks_test.php b/campcaster/src/tools/pear/src/Calendar/tests/month_weeks_test.php new file mode 100644 index 000000000..075528da0 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/month_weeks_test.php @@ -0,0 +1,125 @@ +UnitTestCase('Test of Month Weeks'); + } + function setUp() { + $this->cal = new Calendar_Month_Weeks(2003,10); + } + function testPrevDay () { + $this->assertEqual(30,$this->cal->prevDay()); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 9, + 'day' => 30, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testThisDay () { + $this->assertEqual(1,$this->cal->thisDay()); + } + function testNextDay () { + $this->assertEqual(2,$this->cal->nextDay()); + } + function testPrevHour () { + $this->assertEqual(23,$this->cal->prevHour()); + } + function testThisHour () { + $this->assertEqual(0,$this->cal->thisHour()); + } + function testNextHour () { + $this->assertEqual(1,$this->cal->nextHour()); + } + function testPrevMinute () { + $this->assertEqual(59,$this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(0,$this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(1,$this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(59,$this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0,$this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(1,$this->cal->nextSecond()); + } + function testGetTimeStamp() { + $stamp = mktime(0,0,0,10,1,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } +} + +class TestOfMonthWeeksBuild extends TestOfMonthWeeks { + function TestOfMonthWeeksBuild() { + $this->UnitTestCase('Test of Month_Weeks::build()'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(5,$this->cal->size()); + } + + function testFetch() { + $this->cal->build(); + $i=0; + while ( $Child = $this->cal->fetch() ) { + $i++; + } + $this->assertEqual(5,$i); + } +/* Recusive dependency issue with SimpleTest + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } +*/ + function testSelection() { + require_once(CALENDAR_ROOT . 'Week.php'); + $selection = array(new Calendar_Week(2003, 10, 12)); + $this->cal->build($selection); + $i = 1; + while ($Child = $this->cal->fetch()) { + if ($i == 2) { + break; //12-10-2003 is the 2nd day of the week + } + $i++; + } + $this->assertTrue($Child->isSelected()); + } + function testEmptyDaysBefore_AfterAdjust() { + $this->cal = new Calendar_Month_Weeks(2004,0); + $this->cal->build(); + $this->assertEqual(0,$this->cal->tableHelper->getEmptyDaysBefore()); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfMonthWeeks(); + $test->run(new HtmlReporter()); + $test = &new TestOfMonthWeeksBuild(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/peardate_engine_test.php b/campcaster/src/tools/pear/src/Calendar/tests/peardate_engine_test.php new file mode 100644 index 000000000..291f3f8ce --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/peardate_engine_test.php @@ -0,0 +1,124 @@ +UnitTestCase('Test of Calendar_Engine_PearDate'); + } + function setUp() { + $this->engine = new Calendar_Engine_PearDate(); + } + function testGetSecondsInMinute() { + $this->assertEqual($this->engine->getSecondsInMinute(),60); + } + function testGetMinutesInHour() { + $this->assertEqual($this->engine->getMinutesInHour(),60); + } + function testGetHoursInDay() { + $this->assertEqual($this->engine->getHoursInDay(),24); + } + function testGetFirstDayOfWeek() { + $this->assertEqual($this->engine->getFirstDayOfWeek(),1); + } + function testGetWeekDays() { + $this->assertEqual($this->engine->getWeekDays(),array(0,1,2,3,4,5,6)); + } + function testGetDaysInWeek() { + $this->assertEqual($this->engine->getDaysInWeek(),7); + } + function testGetWeekNInYear() { + $this->assertEqual($this->engine->getWeekNInYear(2003, 11, 3), 45); + } + function testGetWeekNInMonth() { + $this->assertEqual($this->engine->getWeekNInMonth(2003, 11, 3), 2); + } + function testGetWeeksInMonth0() { + $this->assertEqual($this->engine->getWeeksInMonth(2003, 11, 0), 6); //week starts on sunday + } + function testGetWeeksInMonth1() { + $this->assertEqual($this->engine->getWeeksInMonth(2003, 11, 1), 5); //week starts on monday + } + function testGetWeeksInMonth2() { + $this->assertEqual($this->engine->getWeeksInMonth(2003, 2, 6), 4); //week starts on saturday + } + function testGetWeeksInMonth3() { + // Unusual cases that can cause fails (shows up with example 21.php) + $this->assertEqual($this->engine->getWeeksInMonth(2004,2,1),5); + $this->assertEqual($this->engine->getWeeksInMonth(2004,8,1),6); + } + function testGetDayOfWeek() { + $this->assertEqual($this->engine->getDayOfWeek(2003, 11, 18), 2); + } + function testGetFirstDayInMonth() { + $this->assertEqual($this->engine->getFirstDayInMonth(2003,10),3); + } + function testGetDaysInMonth() { + $this->assertEqual($this->engine->getDaysInMonth(2003,10),31); + } + function testGetMinYears() { + $this->assertEqual($this->engine->getMinYears(),0); + } + function testGetMaxYears() { + $this->assertEqual($this->engine->getMaxYears(),9999); + } + function testDateToStamp() { + $stamp = '2003-10-15 13:30:45'; + $this->assertEqual($this->engine->dateToStamp(2003,10,15,13,30,45),$stamp); + } + function testStampToSecond() { + $stamp = '2003-10-15 13:30:45'; + $this->assertEqual($this->engine->stampToSecond($stamp),45); + } + function testStampToMinute() { + $stamp = '2003-10-15 13:30:45'; + $this->assertEqual($this->engine->stampToMinute($stamp),30); + } + function testStampToHour() { + $stamp = '2003-10-15 13:30:45'; + $this->assertEqual($this->engine->stampToHour($stamp),13); + } + function testStampToDay() { + $stamp = '2003-10-15 13:30:45'; + $this->assertEqual($this->engine->stampToDay($stamp),15); + } + function testStampToMonth() { + $stamp = '2003-10-15 13:30:45'; + $this->assertEqual($this->engine->stampToMonth($stamp),10); + } + function testStampToYear() { + $stamp = '2003-10-15 13:30:45'; + $this->assertEqual($this->engine->stampToYear($stamp),2003); + } + function testAdjustDate() { + $stamp = '2004-01-01 13:30:45'; + $y = $this->engine->stampToYear($stamp); + $m = $this->engine->stampToMonth($stamp); + $d = $this->engine->stampToDay($stamp); + + //the first day of the month should be thursday + $this->assertEqual($this->engine->getDayOfWeek($y, $m, $d), 4); + + $m--; // 2004-00-01 => 2003-12-01 + $this->engine->adjustDate($y, $m, $d, $dummy, $dummy, $dummy); + + $this->assertEqual($y, 2003); + $this->assertEqual($m, 12); + $this->assertEqual($d, 1); + + // get last day and check if it's wednesday + $d = $this->engine->getDaysInMonth($y, $m); + + $this->assertEqual($this->engine->getDayOfWeek($y, $m, $d), 3); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfPearDateEngine(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/second_test.php b/campcaster/src/tools/pear/src/Calendar/tests/second_test.php new file mode 100644 index 000000000..a9847562b --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/second_test.php @@ -0,0 +1,34 @@ +UnitTestCase('Test of Second'); + } + function setUp() { + $this->cal = new Calendar_Second(2003,10,25,13,32,43); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 10, + 'day' => 24, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfSecond(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/simple_include.php b/campcaster/src/tools/pear/src/Calendar/tests/simple_include.php new file mode 100644 index 000000000..72a074ef1 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/simple_include.php @@ -0,0 +1,10 @@ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/table_helper_tests.php b/campcaster/src/tools/pear/src/Calendar/tests/table_helper_tests.php new file mode 100644 index 000000000..1c3699e9a --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/table_helper_tests.php @@ -0,0 +1,19 @@ +GroupTest('Table Helper Tests'); + $this->addTestFile('helper_test.php'); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TableHelperTests(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/unixts_engine_test.php b/campcaster/src/tools/pear/src/Calendar/tests/unixts_engine_test.php new file mode 100644 index 000000000..e29a1c891 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/unixts_engine_test.php @@ -0,0 +1,104 @@ +UnitTestCase('Test of Calendar_Engine_UnixTs'); + } + function setUp() { + $this->engine = new Calendar_Engine_UnixTs(); + } + function testGetSecondsInMinute() { + $this->assertEqual($this->engine->getSecondsInMinute(),60); + } + function testGetMinutesInHour() { + $this->assertEqual($this->engine->getMinutesInHour(),60); + } + function testGetHoursInDay() { + $this->assertEqual($this->engine->getHoursInDay(),24); + } + function testGetFirstDayOfWeek() { + $this->assertEqual($this->engine->getFirstDayOfWeek(),1); + } + function testGetWeekDays() { + $this->assertEqual($this->engine->getWeekDays(),array(0,1,2,3,4,5,6)); + } + function testGetDaysInWeek() { + $this->assertEqual($this->engine->getDaysInWeek(),7); + } + function testGetWeekNInYear() { + $this->assertEqual($this->engine->getWeekNInYear(2003, 11, 3), 45); + } + function testGetWeekNInMonth() { + $this->assertEqual($this->engine->getWeekNInMonth(2003, 11, 3), 2); + } + function testGetWeeksInMonth0() { + $this->assertEqual($this->engine->getWeeksInMonth(2003, 11, 0), 6); //week starts on sunday + } + function testGetWeeksInMonth1() { + $this->assertEqual($this->engine->getWeeksInMonth(2003, 11, 1), 5); //week starts on monday + } + function testGetWeeksInMonth2() { + $this->assertEqual($this->engine->getWeeksInMonth(2003, 2, 6), 4); //week starts on saturday + } + function testGetWeeksInMonth3() { + // Unusual cases that can cause fails (shows up with example 21.php) + $this->assertEqual($this->engine->getWeeksInMonth(2004,2,1),5); + $this->assertEqual($this->engine->getWeeksInMonth(2004,8,1),6); + } + function testGetDayOfWeek() { + $this->assertEqual($this->engine->getDayOfWeek(2003, 11, 18), 2); + } + function testGetFirstDayInMonth() { + $this->assertEqual($this->engine->getFirstDayInMonth(2003,10),3); + } + function testGetDaysInMonth() { + $this->assertEqual($this->engine->getDaysInMonth(2003,10),31); + } + function testGetMinYears() { + $test = strpos(PHP_OS, 'WIN') >= 0 ? 1970 : 1902; + $this->assertEqual($this->engine->getMinYears(),$test); + } + function testGetMaxYears() { + $this->assertEqual($this->engine->getMaxYears(),2037); + } + function testDateToStamp() { + $stamp = mktime(0,0,0,10,15,2003); + $this->assertEqual($this->engine->dateToStamp(2003,10,15,0,0,0),$stamp); + } + function testStampToSecond() { + $stamp = mktime(13,30,45,10,15,2003); + $this->assertEqual($this->engine->stampToSecond($stamp),45); + } + function testStampToMinute() { + $stamp = mktime(13,30,45,10,15,2003); + $this->assertEqual($this->engine->stampToMinute($stamp),30); + } + function testStampToHour() { + $stamp = mktime(13,30,45,10,15,2003); + $this->assertEqual($this->engine->stampToHour($stamp),13); + } + function testStampToDay() { + $stamp = mktime(13,30,45,10,15,2003); + $this->assertEqual($this->engine->stampToDay($stamp),15); + } + function testStampToMonth() { + $stamp = mktime(13,30,45,10,15,2003); + $this->assertEqual($this->engine->stampToMonth($stamp),10); + } + function testStampToYear() { + $stamp = mktime(13,30,45,10,15,2003); + $this->assertEqual($this->engine->stampToYear($stamp),2003); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfUnixTsEngine(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/util_tests.php b/campcaster/src/tools/pear/src/Calendar/tests/util_tests.php new file mode 100644 index 000000000..7cdfc5ab9 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/util_tests.php @@ -0,0 +1,20 @@ +GroupTest('Util Tests'); + $this->addTestFile('util_uri_test.php'); + $this->addTestFile('util_textual_test.php'); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new UtilTests(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/util_textual_test.php b/campcaster/src/tools/pear/src/Calendar/tests/util_textual_test.php new file mode 100644 index 000000000..133b281e6 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/util_textual_test.php @@ -0,0 +1,191 @@ +UnitTestCase('Test of Calendar_Util_Textual'); + } + function setUp() { + $this->mockengine = new Mock_Calendar_Engine($this); + $this->mockcal = new Mock_Calendar_Second($this); + $this->mockcal->setReturnValue('prevYear',2002); + $this->mockcal->setReturnValue('thisYear',2003); + $this->mockcal->setReturnValue('nextYear',2004); + $this->mockcal->setReturnValue('prevMonth',9); + $this->mockcal->setReturnValue('thisMonth',10); + $this->mockcal->setReturnValue('nextMonth',11); + $this->mockcal->setReturnValue('prevDay',14); + $this->mockcal->setReturnValue('thisDay',15); + $this->mockcal->setReturnValue('nextDay',16); + $this->mockcal->setReturnValue('prevHour',12); + $this->mockcal->setReturnValue('thisHour',13); + $this->mockcal->setReturnValue('nextHour',14); + $this->mockcal->setReturnValue('prevMinute',29); + $this->mockcal->setReturnValue('thisMinute',30); + $this->mockcal->setReturnValue('nextMinute',31); + $this->mockcal->setReturnValue('prevSecond',44); + $this->mockcal->setReturnValue('thisSecond',45); + $this->mockcal->setReturnValue('nextSecond',46); + $this->mockcal->setReturnValue('getEngine',$this->mockengine); + $this->mockcal->setReturnValue('getTimestamp',12345); + } + function tearDown() { + unset ( $this->engine ); + unset ( $this->mockcal ); + } + function testMonthNamesLong() { + $monthNames = array( + 1=>'January', + 2=>'February', + 3=>'March', + 4=>'April', + 5=>'May', + 6=>'June', + 7=>'July', + 8=>'August', + 9=>'September', + 10=>'October', + 11=>'November', + 12=>'December', + ); + $this->assertEqual($monthNames,Calendar_Util_Textual::monthNames()); + } + function testMonthNamesShort() { + $monthNames = array( + 1=>'Jan', + 2=>'Feb', + 3=>'Mar', + 4=>'Apr', + 5=>'May', + 6=>'Jun', + 7=>'Jul', + 8=>'Aug', + 9=>'Sep', + 10=>'Oct', + 11=>'Nov', + 12=>'Dec', + ); + $this->assertEqual($monthNames,Calendar_Util_Textual::monthNames('short')); + } + function testMonthNamesTwo() { + $monthNames = array( + 1=>'Ja', + 2=>'Fe', + 3=>'Ma', + 4=>'Ap', + 5=>'Ma', + 6=>'Ju', + 7=>'Ju', + 8=>'Au', + 9=>'Se', + 10=>'Oc', + 11=>'No', + 12=>'De', + ); + $this->assertEqual($monthNames,Calendar_Util_Textual::monthNames('two')); + } + function testMonthNamesOne() { + $monthNames = array( + 1=>'J', + 2=>'F', + 3=>'M', + 4=>'A', + 5=>'M', + 6=>'J', + 7=>'J', + 8=>'A', + 9=>'S', + 10=>'O', + 11=>'N', + 12=>'D', + ); + $this->assertEqual($monthNames,Calendar_Util_Textual::monthNames('one')); + } + function testWeekdayNamesLong() { + $weekdayNames = array( + 0=>'Sunday', + 1=>'Monday', + 2=>'Tuesday', + 3=>'Wednesday', + 4=>'Thursday', + 5=>'Friday', + 6=>'Saturday', + ); + $this->assertEqual($weekdayNames,Calendar_Util_Textual::weekdayNames()); + } + function testWeekdayNamesShort() { + $weekdayNames = array( + 0=>'Sun', + 1=>'Mon', + 2=>'Tue', + 3=>'Wed', + 4=>'Thu', + 5=>'Fri', + 6=>'Sat', + ); + $this->assertEqual($weekdayNames,Calendar_Util_Textual::weekdayNames('short')); + } + function testWeekdayNamesTwo() { + $weekdayNames = array( + 0=>'Su', + 1=>'Mo', + 2=>'Tu', + 3=>'We', + 4=>'Th', + 5=>'Fr', + 6=>'Sa', + ); + $this->assertEqual($weekdayNames,Calendar_Util_Textual::weekdayNames('two')); + } + function testWeekdayNamesOne() { + $weekdayNames = array( + 0=>'S', + 1=>'M', + 2=>'T', + 3=>'W', + 4=>'T', + 5=>'F', + 6=>'S', + ); + $this->assertEqual($weekdayNames,Calendar_Util_Textual::weekdayNames('one')); + } + function testPrevMonthNameShort() { + $this->assertEqual('Sep',Calendar_Util_Textual::prevMonthName($this->mockcal,'short')); + } + function testThisMonthNameShort() { + $this->assertEqual('Oct',Calendar_Util_Textual::thisMonthName($this->mockcal,'short')); + } + function testNextMonthNameShort() { + $this->assertEqual('Nov',Calendar_Util_Textual::nextMonthName($this->mockcal,'short')); + } + function testThisDayNameShort() { + $this->assertEqual('Wed',Calendar_Util_Textual::thisDayName($this->mockcal,'short')); + } + function testOrderedWeekdaysShort() { + $weekdayNames = array( + 0=>'Sun', + 1=>'Mon', + 2=>'Tue', + 3=>'Wed', + 4=>'Thu', + 5=>'Fri', + 6=>'Sat', + ); + $this->assertEqual($weekdayNames,Calendar_Util_Textual::orderedWeekdays($this->mockcal,'short')); + } + +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfUtilTextual(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/util_uri_test.php b/campcaster/src/tools/pear/src/Calendar/tests/util_uri_test.php new file mode 100644 index 000000000..3a3721ad5 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/util_uri_test.php @@ -0,0 +1,54 @@ +UnitTestCase('Test of Calendar_Util_Uri'); + } + + function setUp() { + $this->MockCal = & new Mock_Calendar_Day($this); + $this->MockCal->setReturnValue('getEngine',new Mock_Calendar_Engine($this)); + } + + function testFragments() { + $Uri = new Calendar_Util_Uri('y','m','d','h','m','s'); + $Uri->setFragments('year','month','day','hour','minute','second'); + $this->assertEqual( + 'year=&month=&day=&hour=&minute=&second=', + $Uri->this($this->MockCal, 'second') + ); + } + function testScalarFragments() { + $Uri = new Calendar_Util_Uri('year','month','day','hour','minute','second'); + $Uri->scalar = true; + $this->assertEqual( + '&&&&&', + $Uri->this($this->MockCal, 'second') + ); + } + function testSetSeperator() { + $Uri = new Calendar_Util_Uri('year','month','day','hour','minute','second'); + $Uri->separator = '/'; + $this->assertEqual( + 'year=/month=/day=/hour=/minute=/second=', + $Uri->this($this->MockCal, 'second') + ); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfUtilUri(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/validator_error_test.php b/campcaster/src/tools/pear/src/Calendar/tests/validator_error_test.php new file mode 100644 index 000000000..fc409bf45 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/validator_error_test.php @@ -0,0 +1,34 @@ +UnitTestCase('Test of Validation Error'); + } + function setUp() { + $this->vError = new Calendar_Validation_Error('foo',20,'bar'); + } + function testGetUnit() { + $this->assertEqual($this->vError->getUnit(),'foo'); + } + function testGetValue() { + $this->assertEqual($this->vError->getValue(),20); + } + function testGetMessage() { + $this->assertEqual($this->vError->getMessage(),'bar'); + } + function testToString() { + $this->assertEqual($this->vError->toString(),'foo = 20 [bar]'); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfValidationError(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/validator_tests.php b/campcaster/src/tools/pear/src/Calendar/tests/validator_tests.php new file mode 100644 index 000000000..657af3958 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/validator_tests.php @@ -0,0 +1,20 @@ +GroupTest('Validator Tests'); + $this->addTestFile('validator_unit_test.php'); + $this->addTestFile('validator_error_test.php'); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new ValidatorTests(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/validator_unit_test.php b/campcaster/src/tools/pear/src/Calendar/tests/validator_unit_test.php new file mode 100644 index 000000000..1f4abf1bb --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/validator_unit_test.php @@ -0,0 +1,210 @@ +UnitTestCase('Test of Validator'); + } + function setUp() { + $this->mockengine = new Mock_Calendar_Engine($this); + $this->mockengine->setReturnValue('getMinYears',1970); + $this->mockengine->setReturnValue('getMaxYears',2037); + $this->mockengine->setReturnValue('getMonthsInYear',12); + $this->mockengine->setReturnValue('getDaysInMonth',30); + $this->mockengine->setReturnValue('getHoursInDay',24); + $this->mockengine->setReturnValue('getMinutesInHour',60); + $this->mockengine->setReturnValue('getSecondsInMinute',60); + $this->mockcal = new Mock_Calendar_Second($this); + $this->mockcal->setReturnValue('getEngine',$this->mockengine); + } + function tearDown() { + unset ($this->mockengine); + unset ($this->mocksecond); + } + function testIsValidYear() { + $this->mockcal->setReturnValue('thisYear',2000); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertTrue($Validator->isValidYear()); + } + function testIsValidYearTooSmall() { + $this->mockcal->setReturnValue('thisYear',1969); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidYear()); + } + function testIsValidYearTooLarge() { + $this->mockcal->setReturnValue('thisYear',2038); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidYear()); + } + function testIsValidMonth() { + $this->mockcal->setReturnValue('thisMonth',10); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertTrue($Validator->isValidMonth()); + } + function testIsValidMonthTooSmall() { + $this->mockcal->setReturnValue('thisMonth',0); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidMonth()); + } + function testIsValidMonthTooLarge() { + $this->mockcal->setReturnValue('thisMonth',13); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidMonth()); + } + function testIsValidDay() { + $this->mockcal->setReturnValue('thisDay',10); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertTrue($Validator->isValidDay()); + } + function testIsValidDayTooSmall() { + $this->mockcal->setReturnValue('thisDay',0); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidDay()); + } + function testIsValidDayTooLarge() { + $this->mockcal->setReturnValue('thisDay',31); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidDay()); + } + function testIsValidHour() { + $this->mockcal->setReturnValue('thisHour',10); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertTrue($Validator->isValidHour()); + } + function testIsValidHourTooSmall() { + $this->mockcal->setReturnValue('thisHour',-1); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidHour()); + } + function testIsValidHourTooLarge() { + $this->mockcal->setReturnValue('thisHour',24); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidHour()); + } + function testIsValidMinute() { + $this->mockcal->setReturnValue('thisMinute',30); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertTrue($Validator->isValidMinute()); + } + function testIsValidMinuteTooSmall() { + $this->mockcal->setReturnValue('thisMinute',-1); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidMinute()); + } + function testIsValidMinuteTooLarge() { + $this->mockcal->setReturnValue('thisMinute',60); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidMinute()); + } + function testIsValidSecond() { + $this->mockcal->setReturnValue('thisSecond',30); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertTrue($Validator->isValidSecond()); + } + function testIsValidSecondTooSmall() { + $this->mockcal->setReturnValue('thisSecond',-1); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidSecond()); + } + function testIsValidSecondTooLarge() { + $this->mockcal->setReturnValue('thisSecond',60); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValidSecond()); + } + function testIsValid() { + $this->mockcal->setReturnValue('thisYear',2000); + $this->mockcal->setReturnValue('thisMonth',5); + $this->mockcal->setReturnValue('thisDay',15); + $this->mockcal->setReturnValue('thisHour',13); + $this->mockcal->setReturnValue('thisMinute',30); + $this->mockcal->setReturnValue('thisSecond',40); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertTrue($Validator->isValid()); + } + function testIsValidAllWrong() { + $this->mockcal->setReturnValue('thisYear',2038); + $this->mockcal->setReturnValue('thisMonth',13); + $this->mockcal->setReturnValue('thisDay',31); + $this->mockcal->day = 31; + $this->mockcal->setReturnValue('thisHour',24); + $this->mockcal->setReturnValue('thisMinute',60); + $this->mockcal->setReturnValue('thisSecond',60); + $Validator = & new Calendar_Validator($this->mockcal); + $this->assertFalse($Validator->isValid()); + $i = 0; + while ( $Validator->fetch() ) { + $i++; + } + $this->assertEqual($i,6); + } +} + +class TestOfValidatorLive extends UnitTestCase { + function TestOfValidatorLive() { + $this->UnitTestCase('Test of Validator Live'); + } + function testYear() { + $Unit = new Calendar_Year(2038); + $Validator = & $Unit->getValidator(); + $this->assertFalse($Validator->isValidYear()); + } + function testMonth() { + $Unit = new Calendar_Month(2000,13); + $Validator = & $Unit->getValidator(); + $this->assertFalse($Validator->isValidMonth()); + } +/* + function testWeek() { + $Unit = new Calendar_Week(2000,12,7); + $Validator = & $Unit->getValidator(); + $this->assertFalse($Validator->isValidWeek()); + } +*/ + function testDay() { + $Unit = new Calendar_Day(2000,12,32); + $Validator = & $Unit->getValidator(); + $this->assertFalse($Validator->isValidDay()); + } + function testHour() { + $Unit = new Calendar_Hour(2000,12,20,24); + $Validator = & $Unit->getValidator(); + $this->assertFalse($Validator->isValidHour()); + } + function testMinute() { + $Unit = new Calendar_Minute(2000,12,20,23,60); + $Validator = & $Unit->getValidator(); + $this->assertFalse($Validator->isValidMinute()); + } + function testSecond() { + $Unit = new Calendar_Second(2000,12,20,23,59,60); + $Validator = & $Unit->getValidator(); + $this->assertFalse($Validator->isValidSecond()); + } + function testAllBad() { + $Unit = new Calendar_Second(2000,13,32,24,60,60); + $this->assertFalse($Unit->isValid()); + $Validator = & $Unit->getValidator(); + $i = 0; + while ( $Validator->fetch() ) { + $i++; + } + $this->assertEqual($i,5); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfValidator(); + $test->run(new HtmlReporter()); + $test = &new TestOfValidatorLive(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/week_firstday_0_test.php b/campcaster/src/tools/pear/src/Calendar/tests/week_firstday_0_test.php new file mode 100644 index 000000000..fe140b383 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/week_firstday_0_test.php @@ -0,0 +1,241 @@ +UnitTestCase('Test of Week - Week Starting on Sunday'); + } + function setUp() { + $this->cal = Calendar_Factory::create('Week', 2003, 10, 9); + //print_r($this->cal); + } + function testPrevDay () { + $this->assertEqual(8, $this->cal->prevDay()); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 10, + 'day' => 8, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testThisDay () { + $this->assertEqual(9, $this->cal->thisDay()); + } + function testNextDay () { + $this->assertEqual(10, $this->cal->nextDay()); + } + function testPrevHour () { + $this->assertEqual(23, $this->cal->prevHour()); + } + function testThisHour () { + $this->assertEqual(0, $this->cal->thisHour()); + } + function testNextHour () { + $this->assertEqual(1, $this->cal->nextHour()); + } + function testPrevMinute () { + $this->assertEqual(59, $this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(0, $this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(1, $this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(59, $this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0, $this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(1, $this->cal->nextSecond()); + } + function testGetTimeStamp() { + $stamp = mktime(0,0,0,10,9,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } + function testNewTimeStamp() { + $stamp = mktime(0,0,0,7,28,2004); + $this->cal->setTimestamp($stamp); + $this->assertEqual('29 2004', date('W Y', $this->cal->prevWeek(true))); + $this->assertEqual('30 2004', date('W Y', $this->cal->thisWeek(true))); + $this->assertEqual('31 2004', date('W Y', $this->cal->nextWeek(true))); + } + function testPrevWeekInMonth() { + $this->assertEqual(1, $this->cal->prevWeek()); + $stamp = mktime(0,0,0,2,3,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(0, $this->cal->prevWeek()); + } + function testThisWeekInMonth() { + $this->assertEqual(2, $this->cal->thisWeek()); + $stamp = mktime(0,0,0,2,3,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(1, $this->cal->thisWeek()); + $stamp = mktime(0,0,0,1,1,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(1, $this->cal->thisWeek()); + $stamp = mktime(0,0,0,1,3,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(2, $this->cal->thisWeek()); + } + function testNextWeekInMonth() { + $this->assertEqual(3, $this->cal->nextWeek()); + $stamp = mktime(0,0,0,2,3,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(2, $this->cal->nextWeek()); + } + function testPrevWeekInYear() { + $this->assertEqual(date('W', $this->cal->prevWeek('timestamp')), $this->cal->prevWeek('n_in_year')); + $stamp = mktime(0,0,0,1,1,2004); + $this->cal->setTimestamp($stamp); + $this->assertEqual(date('W', $this->cal->nextWeek('timestamp')), $this->cal->nextWeek('n_in_year')); + } + function testThisWeekInYear() { + $this->assertEqual(date('W', $this->cal->thisWeek('timestamp')), $this->cal->thisWeek('n_in_year')); + $stamp = mktime(0,0,0,1,1,2004); + $this->cal->setTimestamp($stamp); + $this->assertEqual(date('W', $this->cal->thisWeek('timestamp')), $this->cal->thisWeek('n_in_year')); + } + function testFirstWeekInYear() { + $stamp = mktime(0,0,0,1,4,2004); + $this->cal->setTimestamp($stamp); + $this->assertEqual(1, $this->cal->thisWeek('n_in_year')); + } + function testNextWeekInYear() { + $this->assertEqual(date('W', $this->cal->nextWeek('timestamp')), $this->cal->nextWeek('n_in_year')); + } + function testPrevWeekArray() { + $testArray = array( + 'year'=>2003, + 'month'=>9, + 'day'=>28, + 'hour'=>0, + 'minute'=>0, + 'second'=>0 + ); + $this->assertEqual($testArray, $this->cal->prevWeek('array')); + } + function testThisWeekArray() { + $testArray = array( + 'year'=>2003, + 'month'=>10, + 'day'=>5, + 'hour'=>0, + 'minute'=>0, + 'second'=>0 + ); + $this->assertEqual($testArray, $this->cal->thisWeek('array')); + } + function testNextWeekArray() { + $testArray = array( + 'year'=>2003, + 'month'=>10, + 'day'=>12, + 'hour'=>0, + 'minute'=>0, + 'second'=>0 + ); + $this->assertEqual($testArray, $this->cal->nextWeek('array')); + } + function testPrevWeekObject() { + $testWeek = Calendar_Factory::create('Week', 2003,9,28); + $Week = $this->cal->prevWeek('object'); + $this->assertEqual($testWeek->getTimeStamp(),$Week->getTimeStamp()); + } + function testThisWeekObject() { + $testWeek = Calendar_Factory::create('Week', 2003,10,5); + $Week = $this->cal->thisWeek('object'); + $this->assertEqual($testWeek->getTimeStamp(),$Week->getTimeStamp()); + } + function testNextWeekObject() { + $testWeek = Calendar_Factory::create('Week', 2003,10,12); + $Week = $this->cal->nextWeek('object'); + $this->assertEqual($testWeek->getTimeStamp(),$Week->getTimeStamp()); + } +} + +class TestOfWeek_firstday_0_Build extends TestOfWeek_firstday_0 { + function TestOfWeek_firstday_0_Build() { + $this->UnitTestCase('Test of Week::build() - FirstDay = Sunday'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(7, $this->cal->size()); + } + + function testFetch() { + $this->cal->build(); + $i=0; + while ($Child = $this->cal->fetch()) { + $i++; + } + $this->assertEqual(7, $i); + } + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } + + function testSelection() { + require_once(CALENDAR_ROOT . 'Day.php'); + $selection = array(Calendar_Factory::create('Day', 2003, 10, 6)); + $this->cal->build($selection); + $i = 1; + while ($Child = $this->cal->fetch()) { + if ($i == 2) { + break; //06-10-2003 is the 2nd day of the week + } + $i++; + } + $this->assertTrue($Child->isSelected()); + } + function testSelectionCornerCase() { + require_once(CALENDAR_ROOT . 'Day.php'); + $selectedDays = array( + Calendar_Factory::create('Day', 2003, 12, 28), + Calendar_Factory::create('Day', 2003, 12, 29), + Calendar_Factory::create('Day', 2003, 12, 30), + Calendar_Factory::create('Day', 2003, 12, 31), + Calendar_Factory::create('Day', 2004, 01, 01), + Calendar_Factory::create('Day', 2004, 01, 02), + Calendar_Factory::create('Day', 2004, 01, 03) + ); + $this->cal = Calendar_Factory::create('Week', 2003, 12, 31, 0); + $this->cal->build($selectedDays); + while ($Day = $this->cal->fetch()) { + $this->assertTrue($Day->isSelected()); + } + $this->cal = Calendar_Factory::create('Week', 2004, 1, 1, 0); + $this->cal->build($selectedDays); + while ($Day = $this->cal->fetch()) { + $this->assertTrue($Day->isSelected()); + } + } +} +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfWeek_firstday_0(); + $test->run(new HtmlReporter()); + $test = &new TestOfWeek_firstday_0_Build(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/week_test.php b/campcaster/src/tools/pear/src/Calendar/tests/week_test.php new file mode 100644 index 000000000..3e76df5b9 --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/week_test.php @@ -0,0 +1,241 @@ +UnitTestCase('Test of Week'); + } + function setUp() { + $this->cal = Calendar_Factory::create('Week', 2003, 10, 9); + //print_r($this->cal); + } + function testPrevDay () { + $this->assertEqual(8, $this->cal->prevDay()); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2003, + 'month' => 10, + 'day' => 8, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testThisDay () { + $this->assertEqual(9, $this->cal->thisDay()); + } + function testNextDay () { + $this->assertEqual(10, $this->cal->nextDay()); + } + function testPrevHour () { + $this->assertEqual(23, $this->cal->prevHour()); + } + function testThisHour () { + $this->assertEqual(0, $this->cal->thisHour()); + } + function testNextHour () { + $this->assertEqual(1, $this->cal->nextHour()); + } + function testPrevMinute () { + $this->assertEqual(59, $this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(0, $this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(1, $this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(59, $this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0, $this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(1, $this->cal->nextSecond()); + } + function testGetTimeStamp() { + $stamp = mktime(0,0,0,10,9,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } + function testNewTimeStamp() { + $stamp = mktime(0,0,0,7,28,2004); + $this->cal->setTimestamp($stamp); + $this->assertEqual('30 2004', date('W Y', $this->cal->prevWeek(true))); + $this->assertEqual('31 2004', date('W Y', $this->cal->thisWeek(true))); + $this->assertEqual('32 2004', date('W Y', $this->cal->nextWeek(true))); + } + function testPrevWeekInMonth() { + $this->assertEqual(1, $this->cal->prevWeek()); + $stamp = mktime(0,0,0,2,3,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(0, $this->cal->prevWeek()); + } + function testThisWeekInMonth() { + $this->assertEqual(2, $this->cal->thisWeek()); + $stamp = mktime(0,0,0,2,3,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(1, $this->cal->thisWeek()); + $stamp = mktime(0,0,0,1,1,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(1, $this->cal->thisWeek()); + $stamp = mktime(0,0,0,1,3,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(2, $this->cal->thisWeek()); + } + function testNextWeekInMonth() { + $this->assertEqual(3, $this->cal->nextWeek()); + $stamp = mktime(0,0,0,2,3,2005); + $this->cal->setTimestamp($stamp); + $this->assertEqual(2, $this->cal->nextWeek()); + } + function testPrevWeekInYear() { + $this->assertEqual(date('W', $this->cal->prevWeek('timestamp')), $this->cal->prevWeek('n_in_year')); + $stamp = mktime(0,0,0,1,1,2004); + $this->cal->setTimestamp($stamp); + $this->assertEqual(date('W', $this->cal->nextWeek('timestamp')), $this->cal->nextWeek('n_in_year')); + } + function testThisWeekInYear() { + $this->assertEqual(date('W', $this->cal->thisWeek('timestamp')), $this->cal->thisWeek('n_in_year')); + $stamp = mktime(0,0,0,1,1,2004); + $this->cal->setTimestamp($stamp); + $this->assertEqual(date('W', $this->cal->thisWeek('timestamp')), $this->cal->thisWeek('n_in_year')); + } + function testFirstWeekInYear() { + $stamp = mktime(0,0,0,1,4,2004); + $this->cal->setTimestamp($stamp); + $this->assertEqual(1, $this->cal->thisWeek('n_in_year')); + } + function testNextWeekInYear() { + $this->assertEqual(date('W', $this->cal->nextWeek('timestamp')), $this->cal->nextWeek('n_in_year')); + } + function testPrevWeekArray() { + $testArray = array( + 'year'=>2003, + 'month'=>9, + 'day'=>29, + 'hour'=>0, + 'minute'=>0, + 'second'=>0 + ); + $this->assertEqual($testArray, $this->cal->prevWeek('array')); + } + function testThisWeekArray() { + $testArray = array( + 'year'=>2003, + 'month'=>10, + 'day'=>6, + 'hour'=>0, + 'minute'=>0, + 'second'=>0 + ); + $this->assertEqual($testArray, $this->cal->thisWeek('array')); + } + function testNextWeekArray() { + $testArray = array( + 'year'=>2003, + 'month'=>10, + 'day'=>13, + 'hour'=>0, + 'minute'=>0, + 'second'=>0 + ); + $this->assertEqual($testArray, $this->cal->nextWeek('array')); + } + function testPrevWeekObject() { + $testWeek = Calendar_Factory::create('Week', 2003, 9, 29); //week starts on monday + $Week = $this->cal->prevWeek('object'); + $this->assertEqual($testWeek->getTimeStamp(), $Week->getTimeStamp()); + } + function testThisWeekObject() { + $testWeek = Calendar_Factory::create('Week', 2003, 10, 6); //week starts on monday + $Week = $this->cal->thisWeek('object'); + $this->assertEqual($testWeek->getTimeStamp(), $Week->getTimeStamp()); + } + function testNextWeekObject() { + $testWeek = Calendar_Factory::create('Week', 2003, 10, 13); //week starts on monday + $Week = $this->cal->nextWeek('object'); + $this->assertEqual($testWeek->getTimeStamp(), $Week->getTimeStamp()); + } +} + +class TestOfWeekBuild extends TestOfWeek { + function TestOfWeekBuild() { + $this->UnitTestCase('Test of Week::build()'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(7, $this->cal->size()); + } + + function testFetch() { + $this->cal->build(); + $i=0; + while ($Child = $this->cal->fetch()) { + $i++; + } + $this->assertEqual(7, $i); + } + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } + + function testSelection() { + require_once(CALENDAR_ROOT . 'Day.php'); + $selection = array(Calendar_Factory::create('Day', 2003, 10, 7)); + $this->cal->build($selection); + $i = 1; + while ($Child = $this->cal->fetch()) { + if ($i == 2) { + break; //07-10-2003 is the 2nd day of the week (starting on monday) + } + $i++; + } + $this->assertTrue($Child->isSelected()); + } + function testSelectionCornerCase() { + require_once(CALENDAR_ROOT . 'Day.php'); + $selectedDays = array( + Calendar_Factory::create('Day', 2003, 12, 29), + Calendar_Factory::create('Day', 2003, 12, 30), + Calendar_Factory::create('Day', 2003, 12, 31), + Calendar_Factory::create('Day', 2004, 01, 01), + Calendar_Factory::create('Day', 2004, 01, 02), + Calendar_Factory::create('Day', 2004, 01, 03), + Calendar_Factory::create('Day', 2004, 01, 04) + ); + $this->cal = Calendar_Factory::create('Week', 2003, 12, 31, 0); + $this->cal->build($selectedDays); + while ($Day = $this->cal->fetch()) { + $this->assertTrue($Day->isSelected()); + } + $this->cal = Calendar_Factory::create('Week', 2004, 1, 1, 0); + $this->cal->build($selectedDays); + while ($Day = $this->cal->fetch()) { + $this->assertTrue($Day->isSelected()); + } + } +} +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfWeek(); + $test->run(new HtmlReporter()); + $test = &new TestOfWeekBuild(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Calendar/tests/year_test.php b/campcaster/src/tools/pear/src/Calendar/tests/year_test.php new file mode 100644 index 000000000..f1814d3dc --- /dev/null +++ b/campcaster/src/tools/pear/src/Calendar/tests/year_test.php @@ -0,0 +1,142 @@ +UnitTestCase('Test of Year'); + } + function setUp() { + $this->cal = new Calendar_Year(2003); + } + function testPrevYear_Object() { + $this->assertEqual(new Calendar_Year(2002), $this->cal->prevYear('object')); + } + function testThisYear_Object() { + $this->assertEqual(new Calendar_Year(2003), $this->cal->thisYear('object')); + } + function testPrevMonth () { + $this->assertEqual(12,$this->cal->prevMonth()); + } + function testPrevMonth_Array () { + $this->assertEqual( + array( + 'year' => 2002, + 'month' => 12, + 'day' => 1, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevMonth('array')); + } + function testThisMonth () { + $this->assertEqual(1,$this->cal->thisMonth()); + } + function testNextMonth () { + $this->assertEqual(2,$this->cal->nextMonth()); + } + function testPrevDay () { + $this->assertEqual(31,$this->cal->prevDay()); + } + function testPrevDay_Array () { + $this->assertEqual( + array( + 'year' => 2002, + 'month' => 12, + 'day' => 31, + 'hour' => 0, + 'minute' => 0, + 'second' => 0), + $this->cal->prevDay('array')); + } + function testThisDay () { + $this->assertEqual(1,$this->cal->thisDay()); + } + function testNextDay () { + $this->assertEqual(2,$this->cal->nextDay()); + } + function testPrevHour () { + $this->assertEqual(23,$this->cal->prevHour()); + } + function testThisHour () { + $this->assertEqual(0,$this->cal->thisHour()); + } + function testNextHour () { + $this->assertEqual(1,$this->cal->nextHour()); + } + function testPrevMinute () { + $this->assertEqual(59,$this->cal->prevMinute()); + } + function testThisMinute () { + $this->assertEqual(0,$this->cal->thisMinute()); + } + function testNextMinute () { + $this->assertEqual(1,$this->cal->nextMinute()); + } + function testPrevSecond () { + $this->assertEqual(59,$this->cal->prevSecond()); + } + function testThisSecond () { + $this->assertEqual(0,$this->cal->thisSecond()); + } + function testNextSecond () { + $this->assertEqual(1,$this->cal->nextSecond()); + } + function testGetTimeStamp() { + $stamp = mktime(0,0,0,1,1,2003); + $this->assertEqual($stamp,$this->cal->getTimeStamp()); + } +} + +class TestOfYearBuild extends TestOfYear { + function TestOfYearBuild() { + $this->UnitTestCase('Test of Year::build()'); + } + function testSize() { + $this->cal->build(); + $this->assertEqual(12,$this->cal->size()); + } + function testFetch() { + $this->cal->build(); + $i=0; + while ( $Child = $this->cal->fetch() ) { + $i++; + } + $this->assertEqual(12,$i); + } + function testFetchAll() { + $this->cal->build(); + $children = array(); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + $children[$i]=$Child; + $i++; + } + $this->assertEqual($children,$this->cal->fetchAll()); + } + function testSelection() { + require_once(CALENDAR_ROOT . 'Month.php'); + $selection = array(new Calendar_Month(2003,10)); + $this->cal->build($selection); + $i = 1; + while ( $Child = $this->cal->fetch() ) { + if ( $i == 10 ) + break; + $i++; + } + $this->assertTrue($Child->isSelected()); + } +} + +if (!defined('TEST_RUNNING')) { + define('TEST_RUNNING', true); + $test = &new TestOfYear(); + $test->run(new HtmlReporter()); + $test = &new TestOfYearBuild(); + $test->run(new HtmlReporter()); +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/Console/Getopt.php b/campcaster/src/tools/pear/src/Console/Getopt.php new file mode 100644 index 000000000..7966d1acd --- /dev/null +++ b/campcaster/src/tools/pear/src/Console/Getopt.php @@ -0,0 +1,251 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Getopt.php,v 1.21.4.7 2003/12/05 21:57:01 andrei Exp $ + +require_once 'PEAR.php'; + +/** + * Command-line options parsing class. + * + * @author Andrei Zmievski + * + */ +class Console_Getopt { + /** + * Parses the command-line options. + * + * The first parameter to this function should be the list of command-line + * arguments without the leading reference to the running program. + * + * The second parameter is a string of allowed short options. Each of the + * option letters can be followed by a colon ':' to specify that the option + * requires an argument, or a double colon '::' to specify that the option + * takes an optional argument. + * + * The third argument is an optional array of allowed long options. The + * leading '--' should not be included in the option name. Options that + * require an argument should be followed by '=', and options that take an + * option argument should be followed by '=='. + * + * The return value is an array of two elements: the list of parsed + * options and the list of non-option command-line arguments. Each entry in + * the list of parsed options is a pair of elements - the first one + * specifies the option, and the second one specifies the option argument, + * if there was one. + * + * Long and short options can be mixed. + * + * Most of the semantics of this function are based on GNU getopt_long(). + * + * @param array $args an array of command-line arguments + * @param string $short_options specifies the list of allowed short options + * @param array $long_options specifies the list of allowed long options + * + * @return array two-element array containing the list of parsed options and + * the non-option arguments + * + * @access public + * + */ + function getopt2($args, $short_options, $long_options = null) + { + return Console_Getopt::doGetopt(2, $args, $short_options, $long_options); + } + + /** + * This function expects $args to start with the script name (POSIX-style). + * Preserved for backwards compatibility. + * @see getopt2() + */ + function getopt($args, $short_options, $long_options = null) + { + return Console_Getopt::doGetopt(1, $args, $short_options, $long_options); + } + + /** + * The actual implementation of the argument parsing code. + */ + function doGetopt($version, $args, $short_options, $long_options = null) + { + // in case you pass directly readPHPArgv() as the first arg + if (PEAR::isError($args)) { + return $args; + } + if (empty($args)) { + return array(array(), array()); + } + $opts = array(); + $non_opts = array(); + + settype($args, 'array'); + + if ($long_options) { + sort($long_options); + } + + /* + * Preserve backwards compatibility with callers that relied on + * erroneous POSIX fix. + */ + if ($version < 2) { + if (isset($args[0]{0}) && $args[0]{0} != '-') { + array_shift($args); + } + } + + reset($args); + while (list($i, $arg) = each($args)) { + + /* The special element '--' means explicit end of + options. Treat the rest of the arguments as non-options + and end the loop. */ + if ($arg == '--') { + $non_opts = array_merge($non_opts, array_slice($args, $i + 1)); + break; + } + + if ($arg{0} != '-' || (strlen($arg) > 1 && $arg{1} == '-' && !$long_options)) { + $non_opts = array_merge($non_opts, array_slice($args, $i)); + break; + } elseif (strlen($arg) > 1 && $arg{1} == '-') { + $error = Console_Getopt::_parseLongOption(substr($arg, 2), $long_options, $opts, $args); + if (PEAR::isError($error)) + return $error; + } else { + $error = Console_Getopt::_parseShortOption(substr($arg, 1), $short_options, $opts, $args); + if (PEAR::isError($error)) + return $error; + } + } + + return array($opts, $non_opts); + } + + /** + * @access private + * + */ + function _parseShortOption($arg, $short_options, &$opts, &$args) + { + for ($i = 0; $i < strlen($arg); $i++) { + $opt = $arg{$i}; + $opt_arg = null; + + /* Try to find the short option in the specifier string. */ + if (($spec = strstr($short_options, $opt)) === false || $arg{$i} == ':') + { + return PEAR::raiseError("Console_Getopt: unrecognized option -- $opt"); + } + + if (strlen($spec) > 1 && $spec{1} == ':') { + if (strlen($spec) > 2 && $spec{2} == ':') { + if ($i + 1 < strlen($arg)) { + /* Option takes an optional argument. Use the remainder of + the arg string if there is anything left. */ + $opts[] = array($opt, substr($arg, $i + 1)); + break; + } + } else { + /* Option requires an argument. Use the remainder of the arg + string if there is anything left. */ + if ($i + 1 < strlen($arg)) { + $opts[] = array($opt, substr($arg, $i + 1)); + break; + } else if (list(, $opt_arg) = each($args)) + /* Else use the next argument. */; + else + return PEAR::raiseError("Console_Getopt: option requires an argument -- $opt"); + } + } + + $opts[] = array($opt, $opt_arg); + } + } + + /** + * @access private + * + */ + function _parseLongOption($arg, $long_options, &$opts, &$args) + { + @list($opt, $opt_arg) = explode('=', $arg); + $opt_len = strlen($opt); + + for ($i = 0; $i < count($long_options); $i++) { + $long_opt = $long_options[$i]; + $opt_start = substr($long_opt, 0, $opt_len); + + /* Option doesn't match. Go on to the next one. */ + if ($opt_start != $opt) + continue; + + $opt_rest = substr($long_opt, $opt_len); + + /* Check that the options uniquely matches one of the allowed + options. */ + if ($opt_rest != '' && $opt{0} != '=' && + $i + 1 < count($long_options) && + $opt == substr($long_options[$i+1], 0, $opt_len)) { + return PEAR::raiseError("Console_Getopt: option --$opt is ambiguous"); + } + + if (substr($long_opt, -1) == '=') { + if (substr($long_opt, -2) != '==') { + /* Long option requires an argument. + Take the next argument if one wasn't specified. */; + if (!strlen($opt_arg) && !(list(, $opt_arg) = each($args))) { + return PEAR::raiseError("Console_Getopt: option --$opt requires an argument"); + } + } + } else if ($opt_arg) { + return PEAR::raiseError("Console_Getopt: option --$opt doesn't allow an argument"); + } + + $opts[] = array('--' . $opt, $opt_arg); + return; + } + + return PEAR::raiseError("Console_Getopt: unrecognized option --$opt"); + } + + /** + * Safely read the $argv PHP array across different PHP configurations. + * Will take care on register_globals and register_argc_argv ini directives + * + * @access public + * @return mixed the $argv PHP array or PEAR error if not registered + */ + function readPHPArgv() + { + global $argv; + if (!is_array($argv)) { + if (!@is_array($_SERVER['argv'])) { + if (!@is_array($GLOBALS['HTTP_SERVER_VARS']['argv'])) { + return PEAR::raiseError("Console_Getopt: Could not read cmd args (register_argc_argv=Off?)"); + } + return $GLOBALS['HTTP_SERVER_VARS']['argv']; + } + return $_SERVER['argv']; + } + return $argv; + } + +} + +?> diff --git a/campcaster/src/tools/pear/src/Console_Getopt-1.2.tgz b/campcaster/src/tools/pear/src/Console_Getopt-1.2.tgz deleted file mode 100644 index 2cfa63f02a42733101ea741ee7f29793295923b0..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3370 zcmV+_4b}1=iwFP!000001MFIRZxcxp-@o%IiYUT%usya(0yuVn<#H?%yF?_rcY6p~ zke?PxC{TX&=alGhT){@zVi|FEhv#oI6$qvB4x98&IMc_w)Cq^$t94z92#e*~(CG)u*UgHA% z?Yk{c`T}qX(m+^kMu7ipIQ!`g4lMqtII+sC zY~(G9##M}+$8rik+LxEYuVgC1`K>IuVkx{}LCV_9SN@%aI0yyaB{Iu3bWXbM-oP?1 zYRa`^ankE_9=5u@R=11lp#e4LNk{ldgfQ@0eI8h5P%VjKT8=-*9?q#ZHRA`dh)(_~ zuOJR!5egK|QoxTdU?t-jAch$mw&w*aaDp%tP7Gr)vzIbRLYM?0_+kYl(Fi5S#1!F0 z7%U}%2;%F7816cr9Ywo9vK{UgjbRt8>OGUhcL;yg+xmS4?A{mdzw>rC_(J|e#4#%E zc{p8WG$zs$o{ZuYUo-#&s^Kmoa2Mw8A^L;iuI;*=M~}O9*Re%s{Lr;0hvM;JuRDHh zKRG;boYJY5I+a}5t~txfABM=y&^T~rwm(HkPxaCQQVUq^l(3pZYp>No|N1bG)@@)+ z;dst-pwHYX0?R5I%_hb=Z8DQBoE^4$N0pq7MQm5|b@t}`)xSZ(2CZSfKuGdv4djA-asuy(h;qiV=9N zyR!Asf%=K1=Fvlx(Z z|2XkoPq-?pjp+bWuSuUt@IkL%y*T~l{ItnAFRm%lvX_|lb7B(DP&CsSZ(IeT=e7_) zqO}rZz~h))Kp8Vd&?NNwWqExBT~w}CtF)%n7qA|VI_>x>Zr>6UAK}#mu7dqG<$Eu)%Rt5q|4CigZb zm+g3oi<`CY*7BoDsts>6vgtASex6JZ=HHH;k1Z~T7JJblOnbHWl z#1>?s9P;?fVYe)p^jzC<1csUgIx*=KCoTS+Dp2#U4sNtVr$D2CuCp4VUsA55pl z80x0BU%l6a+fZ*DGsT;oazMN&AP#F2OmHKO9`eeujSAHXD}t4~@$BTF&W)&66kmHH z1tXm4?ybvh*)is~D?4|NW`^9oZQ*z=2!^`?tASAlf zQK#8X;HJK$gqxJBJzZzqj=2q2$D|HpltalfrMnBtlUzwnbnhB+?caKXT7sEN#S>E+ z=mhJO&h`5;It{}hRJv$1a_8j4%#+9I%uRugm@ne%?fcn+>*{Btsb3q7DvEn}dFAMa zW?i;y5AAux3v!d`ELP*xBR8kP(=)~^U6$2R$yKIf z`1ld(m;rdguPX(dK-a+GL-$7UU!#$GMf88o8{PIcsPIV8B|gn@C3|E>A@WuZ4kOML zD8Ezrd_79Wcm&gLq7jwcZ&Udq?W-$zuW+J#bfdAhlpf-oKmRW06g{dg(`{75 zmcQ&a)!rc&2@ER+FdM^gnw*7lX~(7{sE)GhB2ls^%i+F0{l1b!DY{acgN_PC-Z>^K z96%n0H1yy>8FfSuH!w8!J__D!grLYQV3N z&~b?VUc(h(McB$eI!>9oEv;I)xWC525(hmoiPw;je;DcS-ly3Ty*HuYDK-Zh^HjKK z^W3bBZuDeDNmX@|s%2yZv5CDq%jZtIt`_Lml&F#)F~=!WGxZR8|!>yxWuSD*~2k6bw^j zn=MV~G*ez1>%mOhw;PDauf;I8V`tWemjSiBbQ_%UNR7A3Y&ts}Q&$$j8d#_kB>hAj zuft@-X?`W&TbO<^6V7G1QypOplYb@xi)y}w;BH~+kyJx#W8tysYRn%c<(zEOkjc`A zG_sxm8V^;a>&gwBi>wPk>-s_WeNlx~-tKd)z18AV$@R|1a++WTdz&D?rlMB2!2x=> zIk>Oy!Qz+2SG`GV_;uEItd2dKJl_R%>DRm{@j_r&*^F|Now=L6D=~jBXV}UmP`&jj zKff&;-BD3h5~%XZN^#pqasey5!B>Nn@gwSQMYpi~iIBmqgEnl892tw1?Vc}8d-GAR z6rJ|r+@1*CxMQG^+L!#*y8g31Ck(j5H{q`nW1d16I6*@T?cCR#`|vO6dFp#5hrVlI ztWObLA{o@I+h=cjLfJAM1EMyqS@D-Eo? z=jH1+KR$nb{;u}Z#l@K>F#7HJ+w}S>EJ%dVU4V@p404vU7#zUa&Fl5@ zj5H&dV@adTjEp&P{`*sx?w+2Rp3%iloZVy2*%+k0R##V5*LCI$-#Is4?ZagJm*4BB zQLlHqUGW!zKlRMNqTT5>yP{EVHoKihqtordXWeG6A^!69=lB14@(fO1y!XP$52gnj zjaq#}c++9v`qP_(jg!ms?cLqZ-gaX{JbU`!$v4O6M^`_;>Wdkpjkx^z@~Zz*Y~052 zY=38G<~d<)b~~$0y?Dos-5uF(8^?wIs#|(K`Dti;+OE}|26hoorq0BBdi?y!4*dcj zMDxkS3GbgCJFzoxB2OF+qBwMhG4vIu&b=2t*->qvx$8y4(4XPAFpTgc;RsiCb&RfK z>?&qq@ZQJW??3ofI8$+cz8%H)V^91t_riN|`04~cp9LWd;E(vllj=8 zJ>n3mpIosUOe?X7<}=)s@MD-W_TPKsds-1}Y(9=fF!*n8$Sd%i;jIJ)d^roIk*6U7 zVDiEc8UX@%xS+^`mQ&b>UV{EG_MI^R*cH=Yx@~+E26q6{czBC@bO46lc#QuJ=Hqwz z3mAog67ff#i~S;O=R{F3^l1;m2}9>Ts)`_Vy%5^)-vUpAHiS#W`Nsal*D!$304Jsq zqeWzXOgr?aJT=18pT=G|a)to|rf-GqU z7b}V$;J3qIG8=n<5V05GK7II=mPyF&J)mt2Z=LClr_lQD7Vy>q(8G$3p96lHI3LUy zG=OVBEf6a1{(}cXj0Vv!;@CU%_?p=mw9Y0Ix9tLBqhsW)JlKtAH|u&_f3?eBg;{Aavna5jW^s58z(oDT+2NAAjrA zfD-MPqzL|=IItG@ADkonY5t9WiYKtD@M#ncp6t+X^cfMs%hjJ^(ovG>&V;A#gmq>=PD&byPI*uIWo@FBO3t6%~b?x)&MwIlpC zyAtT~Jz&=m7E%Kkea6MO&eZqD!`y<7>2q-uOyB!J2EzQBWY1y%jXlR*bvfe*$j5DN zHK+4;0G_`&w|BrOxkc`<@Z;|XzyQ6eJMmoKu|w+C8<&G=Cyh)`LJu|)aa+k(pEhc} zTKCD0`V+qb;^IAR*6W?^dV9Ok02IX!@SCweglptIMeIH0-=FNL53vDU3TPS;O$3G; ztB%tEhzy+lWD-n~hraMX@a+tSgK;o?7XjP2fy;!n>iGHfi~iNoUtgXd_pe`^p1gY1 zKduS!e10R^^=1!lSl|zLagHz>|#8L!?K7=bhME`4OntM^tdSMM2l@e7ofUV?nKR`2r}f43A~5lc1D%0RVc zr=}tH_vIyDxu5Gt>vkm(cjaCrjh=wiw{p+vd~y_wqjmaSfatr%{#Hj{*_CMi2}pNK z;sJ?;pN0oC#2R=Y`>lfqvTH<_^v4ox$ZpsFbhP)^M0p9{y2ygq6=R_sgKkuy?Gtkd&oCALldR;AUG zPbSrq^(ggZZ9+X+l1>+PUFSw}&o%Cq?6}4ik&9jRO6qQ_(GBjl9?eO>dg3mPcb@_A z*2TO}K)p}Fy-z^C^|9|0&~IJ*TNeQt1J~dQ8WYy)wmM%>OI`D_tZ`fJKmE4cuX$VU z*S{_IpKx35*S{_IYu}dp^>54lnz!YC&D(On{%yHm@3!2pdt2^5<+j|fd0YI?a9#X$ z?~DHl7smgT8{>b%mGRfVGyW%B8h_neK<)-5Kt>&W+)oYup#vagE!O^nAs3e|P1Lu6kW`x7DsEcaz=;t9Fyl z49nuHI~aZ|t^xbBsr%$`wJjNQgTXkILdaJ%` z-EY--oeQq|u5rV4*EO!VUh=B9#^|^jI;oE9A)^W6<*_jiLg&U?+eJk7Cl`YGY>j^Y zH1Z1RU~aYKJNSurhsIdv?#Pa7-5uF?y}KhjuXT51-*xVe>blO|QA=L=?j#*o#D3Xv z&AX${HVkH$(zSUFlnOlu7<;Dw$RB%SKZ@Ct4F3}7?I#`2@Xn$an=>A}et594vmqvK zCz?+VHaw?SZ}qzEmecGFdv3!U)JMCGU2ilTj9MMfOICoc`5QDoItb3j&d?L1Fn}?> zmp=H{(o^mG4G{+i8}hFW<5OVrn}qR>kOT}-tN$Gyk^rGw0C>mhOtg^g!w|t z+-=o&_x1*zLDTbE@Mzd;IrSkdbkNvs4;!79u}pGd`9jMCgzR+(joz?X-}45;-fpkm z@p?|D)f^68ceiUS)Bl3dgiABnt2>R>U^Lw8?AG1ZUZ*{D+ReJV+Z)!+L-$7?zSIpG z0sI>9f9jQVsSmfl(o%pafYBq+u!%nm7_J*VG-fn%b<97Di z&Tv>C_J*ldez|3~c3ZpduG{Mjy>4^ZgWJ?-58T0SueZ17_4ZQBy#I2`+^Yl4X#!S` z8ofcYvDb0B4Q~iEY7gjoqwZyw>3^YhxPo4;5c&jc8878V9#-O&0#OE4zFG>9wM$_en@9lZJyI$8F)Q3%wlpCIh z>vx8&j?-+r-C=Hc8IZEv=)3q-7a(A!C}Pl-1TT=JDHO$0B_@4N#o#vuHkX4X`JVT+rwZw@^8vXTza8h;AV|3 zyaL=Iyj#3_XSCaF?+x0`PP2|UpI#_M4lj3r&cK7GIY@Ev{OOGVth+!chK)AB!`U4Ux*j~|cfFyv*K2h>IL-8^DmZ;PSnQ5^y_Pos$=hq} z0TLs>+v~bRr(1X7mkcaegGVt$%Z)xjN(2-F$@$u z-tEzz*U1o53fSJMH>75CNty~I-|2a~@Z2526TRWVgVO1`Zg%fsmNMuHXL37k< zd97Z|f(X=Vw>kwU(n&7EaxB^fSAqXWY3&_2P_0o3jdMm-=aAYj@jX{6}M zau6Fe-A)sp0K0AzUM!7H4+Ku2Fzo@z?z;^;CO2BlE|wyAH@#AhCgfKWOdl?d}5ibKqHPpR7X``X#S^ z&mHudjfMkn5XTz;PXeiSG#WS^c<1#Bh*+ab;XC+BTk`ySfWeN3c;+>_gJBb1R71F! z9cQ##9~9h}MsEcYw%h8qn!WaLuMH#mVwg-(y17@<%uzTYzc@ppz9Jp@V z*{e6<*4LXTJ=fbXBS`*$zy*l42jiphBp59>OS`dKcRDUC-fcG=l+|6dMl|+1aPlCk zT4zyAYZ<=S9km?*3Gh~g6tKfa&uIdW0a*tnqdY+R2F&7t z4A^RSdmvNw26l{{%*U~B@ZQDOyxwfNd-&QLz@39rX}Rzg+v~ZzUASq3mUWh8r8VH` zsKOrA9eg^1yffMZ(&agTPkX(_?#Mbg8ITb|G{qnMHt2XDtb(-Nc0ktdwK{HZcel0I zg=Z2_s@A~HTeH#>&m>KKPj+;sjwdQx*3$=nT>h`)=i8JPWQVPTe|-M8Mgt!B9nAk$ zZv!c8b?cb_tx@lO&HwhtI_IKzBV?;U?k$-Cm) zFqq%mQscWI9J|}FD{uSG8whBc&ZPDF;$$C3k;(1u?(TGMJ2}Tr>$+ZxKg2a5PDbKB zmRkdM8+ z-ZmyM0%T#}{s3^BQ8Nh`9C+~&iqy#fO3@Gs#o*`Yr^|iu@WkC0Oe(AIMWeP`7dSb* zHbGVs_2zz~yI-#hxoXk>FcS~uTBh$f-=(nSN|eyvAy6mx>73Dl@TPxwA;{4Q516x> zVNNslaq?W^ebhOGmz*Dh{EK<_D%cOFsXTrF!|sS*fBh9xCSgjmI8q;&N&9f_|L^iq%MIL51O!C{PX!Xsls=$Oq^ubFnieQ(UTN3$x{hp}8)ETSm zEE!ah++S8XN;q%vw{@^cmQnqd27G@mV)mU<;H_q zLXaxLDL`>>&ne#~9w4O~iTMmhjOIgl7)R9A^+x{G+pNH5&;M4bipJJsJ>2W*yWmc) zKHIo|adCbD?YGSim-o}y`B2i~`ts+qtHXa_zoyaeD)eEkaQE3Q4pZUHXMoUfm&JQ$ zJVyc?V}`t0=wlvC%y>AT`oGMXGJmkob##7qd3AwS7M!nT%y$SRN&CSIiIFM?Jmro zn4{t`&%+S8k<1y0dH#q{t3-deBbf-4P%MtU$t?C<`+Tp@E?>WTb$)Txr!90dlTGK7 z0ZamzICDaf2xA11o^s;A6O|@3+M)b<8;o5{gme;(R^xYy=tvL%2i0 z8Yh@<)YV)lnTe8$qU?+8owOtNSx(M=Iy^n0P3;yykdh#NBK!~mjt*ZPK0oc_RC^2d zbLSw20jmpuEyLZ%$&d;1RmX2bZxXyOn(gZ1_1V#(JgY|CI+;9*&j`cov)3=5_xa8@ ztaDI3NGl|6^9|hhj*QX?UQGnzPMI0b^|Ko*$ebnQVpZ@>;#W@X_q6SIo z*{SEbbomFEhIU-C#Iy6`=a>D{{*gKc^V%N;^D*yT-h14<%sGqf44zX(;~pKJ5i-I3 zmwWG62S%4o4O3dX9$2RU_2UGuiH?;{d3`-xKx zgYkSaEt~7bN&l1&XfJdBIWMus)|js$GfKLH{?wVx0L&qZm<4n6`^VQW&oBCjs)xkZ z>X~Vr1YI#*Bu&CX#|XsPGJ<+KZEOb{o?TC zRDz|QStW|RI$thbW)vhTwI;lph|mx9fQlJYNkEfpN@UsUS9;kH={lj4@6n+h(kD@Qq1rqeZe9!Sn3(=_!H}?(S5|JE7Qo@^0WhefDGr|JgDpCHg_>nfYb#BP!PEeaw+;v`B_3G=w{V z5`9Ro*c9+y9bO#1yuLg-JUzU~2sJ%- z+@oajf>Ulo8-N&VCNO)uPeh*cZj-hWnoXE)Qxa*!l7bDLzdHQ!HFAKaeM187%~0;< zo0WDG-J18C>=`b;78vYq!FoUzJ%ZH;(JI5o0o-k1MtJ9}h)5UG9|5aEif~7n*+=pz zM#4$bpI*1b+F7>`cix;9@fuULhh(u(Fb^*L^KdAiv0}p=j3;_7C zJg*mcA|D*IHdE(_Qss(`Mzggc?&t(Th5@NgY_uA!W~;SPD_R*4mY@0;_`)kaJA$Q{ zutvZ*Gs+$-UKT$5%>=WB1R*xxW8TQY3IoZ63MW;r>ol zJ#_{|j0yVm6y`TS^M0dJ0O4DmE-Pu13MM(fIPPB%b8Rf1L^1*-7E$q#fQ9ErIm}50 z1k{s~G0IwiPkz~G=gtw<_cn1<;E^9A$6C>CSP z+K$6WohubpV6rx6+7}XUBWX&Cr4e8!G@!1jewrWw355S2js4k7fuDpjyc%P`g&RA%Em6@GIwl&s@Au7|914!Gc3uLIx0C|o31B~I+8^xr_ zB8IE#1yC)8+)O|8uQI4*!#J4Q(nsNr5P6ic_egeQ+hiGq(1|5Cx5T4I0)x0;DM6r+ z+|yeYU+qQ>4IqM&wCYng$L0ry(pNwC<2xVa6RpFnN`=6^(ue|hfpb6;P6JO&@gp-u z#eb!?z-;j^ZlU$!8H!`9D6hP{^ry_u1-;Zx&R(1+>mv>SKrXu~{1IS9=t;Dk;J36Y z*JYuL(07gnCQPj-3X<-B&m+{nTsK>FMHUcw}8N>&t*3Y4Q4%RG~CW1#P1gN}ff&GQQP}@=M~bPTO9NyQt1Qe139z za`p4?iM_@&*N1lW)vqfg3c+YZb!cogmvYjnG4|Q{SwF}8NdS{%ANPQ_IwG*bduYt6 zEO?m#;~Gjs7}ddHSmWkyy!cy0KBDjN8*`K#xhh@R>G|LL7e|Me{fyXf!SZV8PZ9}{ zMOKs^cxGO!oV;w3i>r&1ml-hv`2G;(O9Z9bP@?sq0!prjb%NZok&pYQ{VS;gkz7zs z&}Ty?Rp`*=up%L&v|;sB`wH;n9NtNJomcAkUcbCJ|2wMkO`X?E8gB@Ph;}hH6HVB< zLwsC)9HH27As{R(=jPKILiS~uyQbE#uvZD+t@9@szB?+akYYy;E+XN^rz_6 z>kTCyO+04`?NMbu^6m^HM6Dvk-w~tf&BqD;bmdUtcQ0QxbdG7<$DS*qKPpVFugC8%$M>XFlI4EncZA!h*e7j`Kg2PV z5tD>Y z5s6KoHp>zpqo+TG+vfw98G2jfXYphfdc@|Sck-hF0iV)VYeGL4G&I!8sR5(1@sq%2 zgMqWL1ZeW3NKi?D5&2q2>zzRC;nfZf*osH40W* zOH}Jt69aZ=7QZH_eCynbq&86O>loDzfehr zA4%*0j=>)zF~%R@N6O7$3T#qef2|hhYMZ{)DbkgtrwtYsq`H}EoI=A4eXUx3PmEY; z?;g@n>Kdje*z|711}FL6%JgPMhIpuIFd~}fYF;9~O770WF7i!f)=IBQzP;tnv!H+r zc}UEkL@n6}Z>-~wfmPPBqm?~9sL2lftH?xhHUy1ovaJJ{VjOwgjgOOP-bieI<44!D z%T3jKYs+YYKgKZJvNA)giclqA5eH9o17PE-&uv%pR9Vm-r~it7#LHX4@I0DD|N{FQn@>on}C-8I?DqRpgN{siL542DAAvHkr}*Gt(% z$*(H%o-_U;_h$VhDUTe2WxnH_SncXfmR84HKAqOvh<)Ir*D;vu#qN45w2!(Mt z_Y8c(A9=YD7*?=<{}8T}ICw;tE`g>2bTkQ|grG4I*|Gec5Seau9{O15^+4e8+fS2Q zC_7eFxAbc9fRTOr5uX)}k~`VdzMw&RjNfeARLx;E+**Do#buLLOG>&tt>&|*V!;Mi zSClwU!7~)AFU=|qMaqz!x*Q0Af2F-C+4ZyXI5P-h3_!cWi5_>T5a>Qu--Y+C`#sj7 z+|gwxAL~w88l}DdQu9P*=E_#Y-at8z`5fz< z%+=U_q=C)!^2FU!&V%F2vrRjX{gblTIhO9ul}3~r(R7_W`Jta}nTA)Uf|~3!u?&>1 zuwxr2T~$PNOV>`2pQiG{+r~;I;+CD#`HJO-nOu#wu`;Pp^@(SpY9d9oK$5A7^pz+Q zZS0pzU-zx7Y=iC4Faj-73&GC~O3iZPfo}e$f+274S>R-GeQyR#L}CHXSK{QJOAl|os_iJ z6YL5)FD2N0mFvFBb)P2JJp|m>t1-zP(xs~W{6??RysKMVX#`BI4~ESn9(=g{)N$R{ zAY75LB|{g@^+VgopC*VpGyf-6L|8=83m%5iQXIZIQNbq#oL>qumJZVXV&@>KHKcik z9JrFxnp76-D`8sMO&z0!VB$~Fk}?7z<-HU7bP>tVEhC_m3UTaOCVlqgAZP@>^@i^X zAcQ7;QykX?Gg9>?}Y*96?_trvq9cg~G6wu_t31Uy!g7b7`py99h zg7KnwMSzven}eFMvr^Cj%aqv^R6F36Iobh@qWOUNNH9u3?GB_6Rk3zs1-0fps+W-h zThoe?Lwbq%zbxl-g$is1B}ds>5KQ!_ptNE0F>9d#%jiS0{P^?{wYR?*$qJGmMEWR_ z-JJams)D@==z+k-(^}zJnYqlXz(u6y_=ntB(w-j|`@d7yVbKhe!R7l?Qpw zUSXJgM3C4UoSq*Z3yd@P$bl!K_AMOA)%nMx^H)FHyAWhQ5@0_vK#PVx`rF6XXZTMg z&Btb;cXLfa1)G(ffBiH1cH`M*1-huMLg%f2M&IrDAXrGCWI3HY1Qa_=CYJe{)T0aT zMJDR9fQ{)W%Cte9geD{>MmVM&yU=!dlTabW=8C&n*kXEW_?7mDAWgm{!}OgK6+ZW6 zSo zV5k8wqN}ufD*h$uu55!8O|)PD>8g=BjKu9jy!Qhpfy)h}Lpg95BT$5g;V_hK`aGGV zY-Aarm&F#0@*~+&M)#EsVF}y8A&j7)Am*^2vQcF8Qg$K!6!zyY(~}|>^F2925{+^G z#9L~Z%QMRY1VvRX?#%(4x!x?Imkpp|b2Iy&U|v$-1Z7>*5pl-crYeCW?`E^HUyiY6 zkfpJXX^@x~Rg`A=FdXib*^Y8Q(yHu*Ly()0Z3y;YTG*ewPHp|k0paz)8?$PgnNDUwFfvOYQf zq2td8I3TLIu<^d#Dkr4Md($28h1il-H{4)id7Fhn91Mf;cW8n`Q=m4(J!6I0!R{kx zN41eKD->Q5eca+Zy}iWIOS2diNQ*8|o6@fsjatHshqWzZ47LCLWDM#{)5C+3Ofj&N z%O6jLVgN9NxeAF)`vNN|&ZlH}38wmU?2Rc7Hsj%}iq6a*a*NPtDE^9wE-mMBoK5@| zap289@{YHu)yp*-tCzC{N=N$g5(JO%y;gK$H;sY{JJMzz`XDNbsdv(v;s(2v(`NP|lLxq%kNyHH&utgBO=?9@_Bu zPm9R7MI-j{Uz@e>o^AbebF=m>{Im7&BdWn*82GPaGx{*57>6owL(ue1BXhpGX$mF2 zp|;JpD35V3l(qP?MbNX)4U1i7;&i*;vR-s31l#Y6!b~2u?07a|D0+iz?Q3Gnak!Gg zq|So-Sw16byJhi@Q0PXJZqk3RLFA6M^2o*8#TM$BC&#s1aXpUFiZ8eR zec#lKrw~kJ$8VVqGuETX?!hplPG@LgpAl44%qP2Q;FkFZ|v!)%O4 z4&4>#n_Fe7g2r z=&vUK)m&#CR^fH4@Os-M*oLKfo^(B0bP1GWU}U26ql)!?VS)?6V~0-Z6vku6GWG+D z^Ks(orQN)W_Q4nWop-N&xy(%+RM?T!GI7>2DGv~bdb?FLo5T@{Ws*tB2o8}5;IV!e z`mtBoFEv9BNo{^;#W4D9`4|FIE>5dOe=CZ=Wmlgh3Rn3Q=_o{WYv9JHSx5rpb-rWG z>Q$;<9d-UY2K@c!#N$bLbFS)$oJZxEqyqKW>N&@Nu)L#{8pLc==1)b=0?MXfI1pft zC#5nZ{aVWNAn(~gZYs%GcNihRA^X6`8CfHyQ>iLL#N&A$ zEsACk5`fZ9bMnIv{fmNV3iLrHmvYqSD>XlRCbNqsS<@UArQon)yIT-O^%;j|Rl2DI z+GNNdXme0i?(4u@HYZ3c^2L<^I}rWr*Oz@Vq@5h~tLBDSUbKY=`q8zIk850p#eMnK zkG7vCo528oLBE06Cu;em;XF>25o(e1FzvJ|*Ke+Op{gdgu8m|}H1$T}UHw^Bu@V90 z++ap3P0U!xISEV}dKaR#C`>$uxF434kaY5pJfgE<)jEg47*l!z$VQ5}EJ42H*bSLAj+LxHLi4!E8Lus&M-T*{>r`p()meqs=Sbxb(Yh>sIy7JY*dO& zJQjnqX7dF~W2{Go^s>wVm&N>Z@qVP+@U_g#QMkEOyMmpj6BWgQ1U6;zaRgPCOK~q7 z=#9Cl!!>&&DCL7~Ud%8ElL5gB<@qA9p;-Y$$+W(X`&(*a8lY@mkMo(C6$Cgt5Bbfx zOgH77HRqLS71ha5daqY}jqi;@IQ)gABm!$d)$>bD=C-df?F&%8IvvIv%+TadBmvgo zaNc#!vP4*iw@oE7qCw;xc9%iKPuebRr);N^oxwkBVfJ0UVPI82wNq!CgPx4nURa7@`TWi$J5wi2zmDEp$2~^2#D=A3hP3Dwn5~j@s%6>LPGqUB0myVAcq(N2L z0NmaQws;P6?7Z+pZ{UY6Mfpg8=ncw97?4hYUcC2=+{OufBIWeV#{#DUOLi#^M~xH3 zC@H}fB9K44+Hb$vu0{s^KJ{{FB*8*Lc4wrr_Zy3hNdw+#l6j{RrSjR@9(F2zT0Fv& z(^29{Dgb?gnT{Gi<;9a7^S9ZaYGq-v73royqow7PtgFfUz;_FuPdvirBgRX))};c6 z`SGA6A!*})QMRAzcvkhLX%?6L6fn8pBbIhDZ8WDg#x_KgqSh(Cp6{4p`7K?&ozzHUT4_|8a;n1R$@?OMQ&AZ5VynWz9>s<qtSY+*a4(BBkj3zvb890#nC%{ggCZhk79sD~Hb5T8q$_AI(fO+yK5^HYTRq_~AaXvTw5s8kbN_sB>^am(*H z>4}^fGc_38A9!?XIm5_muOFY3*75^C4kN4}THh)lZjwN%dnS@pFEW#-LN;`ZXT4Rm zND+)7M2Tc=cwHMpHVL#2KK6@7kvh81klL+URsq7E^-WPPnI=BCt? zdSK>ed~7pAU%vBaq`9#gd=p6&_sdy$-!K;?Uw}o%Umw;{w;LPbeFsmR&4>PXKzH(s zEwhZKR|Tg4ue@M0B|5U-V%0e4PqulMoXyh%+W~)P5h%9Oj!3_jL0vr!3ZX0U5SnZ* zW$~6dV)70>g{f0YAy9%96{!HISg}N;AV1_h)ygmVajBk5YJ4VmhNXz^MaS0e5&8u(JD>H;FO}+J;FaK zg(&7wBAHF@xkY~$`)!mB@rW|+m@C*M&*H}`-9Lq-PCAc_<)rx4hpD5=FH^xK%7yjg zu#cAz{RzpIll@ZyexmO}*Hu>UW%VXsrT?$e|G$~^&*=Gxh(MA+QfD8!qx05PHH^G- zSR~K2du@Eq$AtKOo)a7`OPPmoJU>zfag44hdL|S-2&}J%MbCua@s*I!xkp*{`Sr2z z^|A2vv9S2DP$tj+nO_i+%9Vu#e1S*8f95M8^+Nbhe;$0!*8u_l&-Xk4bU6yfk>zpl zgEYj%){5vpW&$%E_N;;j2{YCKmds!JiOGhCsGycMmxm2#0(2GiQu4yhXnH7|IwZhUjIZd(h z!e8KXY`!lx)O?H zKm;x3bE+q}9zBvP%{ZCJT+im+hjt~9u-+R3ZW#LkaG55Q_8y6)>wfm!3@7f|Sy>9%VG*(q}xOsj$O7 zx@NH`EA8)8P(G3>LY52F!-jO8u6C*7ZeQa}isMX}dL}vkiu8b~fD}0FUzhhU^-}Jo zbZYY4<$1CpB=IuU(MM%|aMA~qDrM5Ih3*<_xqJq9tlZ4rm&8{P->u8~334M=gL7Q& zvH@QYb_jJ(LF^c7wRuEkSpk8!?|e7D-4|^t2)hjk?GLwu(FjgYe%PO44m_-d`|Rn1 zzkL1qclkMfzKvY13%7JfR$GPp`+4VR)a%`DSNw(0u%7w1S?_i0Ezzhqo1JF6(P{SJ z!(O}I7GDqN5BPcV42~Obzj*IY_R03+eV92@7j8Y?{3s4)2W=7E`lFbL0R9n-V*S-V zUHYWFH?v#mXDmw|Q{=oV%}lHt_>N>Hk!X{1YDa!`dUDi1yX^0Cz<~73ry4%^=bYI( zka5MPfNd%7Hyl;6IHFr9DW)ES@hvdQ8&2qW7ldOM>6*8F=M99k-X&=sUtgRM^;^tF zv1ai|+y`^v`mRbr?@@GsK(;N5CaV=Hev6w%!|+^JI|>F=yWWq}3-tz7;AWl_A|kZo zIXDgVk!w-H0sss;kfnG6yQWpiRrnK-SbUI7#`m>9x=OM5w=YwC^wZ_OczELOi-by6 z--9sRX!QiHV5i>RsrN*qz2EHZw>m;DUGzW9#KSeha@CbOXQUwPL4lX0BRFP^WnzZ_ zPOE_8D2TPxIbF08`^mDEMhXmhH+{aW$rWYcn4cFUg6P~A9GoRv$y^R9tebMy(}1e7 zI^s4Q_Lw5f(EQH##1S_z%9L}0su3mGps;Q#G4BuO&`}3{(N*R@I7l3`lZ*q$<+uWP zC(;C8(fZF3NiH$LO!u*LSozvf)wZzWtQ}oyRsX!9)C*&yg=sF!@8j=IlrDp-qDi$I zh-stxd)_SL&vAWy=e)~$a?n0trfaz%%DP(|k2=A$ z!^k^Hg`pI{mYD7$kR^d$2qp`7F6Ps1QozB2M*ht_l!c$HF?+bA3Vt;K5LHz4(yfEJ z4gi>mVh;%0YZ(TbGOnnBWKT?b;W;^1G+WU2az)f>&-Nn1n8KG)_IfbK1bF~2O6A+B z*OTla+1iR~#%Jee zeWP`9HaHdRg=PkpSE;g{I(tH?@%bFK3PPik&_iN}@ha%~IV12h@s3FhXhG5dm5YT| zP3$`#gHQ`pinluzJZ zD;tzKM}eYNU(v$ zR9+Y91L-M6w4qf?SY+h9Pkbwh1A#bFF&NM0mRTu|ptK-MzoCc&OfzO>CsYy??F+~N zF4<_I%{^hGmISxQlrqotBcl}c%nPuT{G7_{7+b_tVa^o2r=7@5OlllcmP=-ezm=qn z%J$6IzJ9aSK2Cg55PAH#$Xp~#EGG>sC8?*9{MV(8qG{>(%Aa6CBPkm#*D57Jm3EQb zw6skM;P#eV%URwfc)!BU2De3Y3gylDVnT)G0BO!h<$%)fS%V_Yr^bcV&i#u>6Qu|8 z3~AemW6Tbq^PotX1g%G-tn{rxp_7A1=PZ;@OXwu_4d>I^%B;cwSs}?wol$|2LDzYf z7GTQf%D>xcuP->pIJjiHb;&_0D=r5d(AyPhD!y$y3+%p*`pxyCVdxK(*+xAvl@ZZy z0{T>|aB6!Q_AIj)!t&yP!X-9uJnfT+;52jTa_iawT%&!lDGL%DP+d{!F(pei)GXHu z#9>8Z%r5FPd!MaLUDJg;Q7^F~-e?qhTPbrPz#fYnGK$gTxc};+PbJFsQG1ic5LOrc zuIN$f?EwPs5*Sj5A8CWRiAW0|_RBnoy`_NmBeskZ7^IYnku&nf_emKdf11g)<$B~} zjgJyCjaw6krgMpy&KOAnv4O{Hc9(MD2*{Jh?!%FOHZve5P8er&6>!wf%)6wNlE0tt zj(HAp=Q$c6w|0=Yhd>|QI&%T}(_ibqp>Cx=4|+|l6~Jqi`cgj3YJjD#C_5xylSM*36ib@|ux*Qduq zW|*6x`2@YJre5fb(In#CQ%v7{CU7Q7XAQ4nOs}d&f#)$mU_#I0Dffti@%vnAk5@*p zDef;srB4zynl_9MZ{dm#CEbtwL?>_E-M$(4iFNTnoO>rW>FWGnzBgN9dt11iD(dC^ z<&URk7dM#WArflHZX5Y-=dhx&mzpZX8hjx1bDuZd2a$pPew!cTkQ`?1_>nm=G;MJ~ zZs;dZ1asX6;XA-JkQ|1nA)HU$B;{)whKx&T;7p?EmvQQYd)o)T`AIPJcT<16gW;w_ z8`;Wz?hcx%4`(--@p1Gx1;yx|>)T8aqg6su0w6jHFnzsFAOp8X!Wr2ma!Zq{&O$#3 zWxDfhSgTH-sBZ%h&xw={lzqJL3aL@v`wl${+8jnLPh^CCq;wekVyG?TIm|wceNB@} zlBMisW~IFN+lY&~sm1yzZ|y{fooX%l^tsc;Qcp zfuSRXN}Qiv%8Kh)ZVlqEl$@NfsEKY+PR5VI)B0bGccAlb%N7jkq@ORAfw9fzh z{QR_kc=l=Y`?mQTJN2@OFJB&>o}QdtDM9K@?t@BFjS&PCp?oe>??hR+U-hoOk4HLiY)uw`7p?(TW^LJM$Tm z07QOxi%b$Ge5rrgLZf8+)q+A?LkYR#%d;=Ey6)gpNcJgO%+$ zpY1ND5wKW;Qlj5pWRQdNe($?pR1(VT5vh)i>M!!i8qH_uvlwZ&dFkd+ek`())KSPk z?t^(HB!nl&JZAuJ<gugWKZ5jxsN|#gDw;s8hb- zhU>cN%pT~VDWkUDa%+(V_#_-3l|jK1Zv9-b%HrOlyAP7%GNkY z2eVGb%Z*1dR|FgF#jY>n<{<0{ctAFLj`Z zn<-DIE&F0nOS7NpEOS&Np&r5=h-a9p8W2CpUu>?VU>f_GP!P-FgD5!$uA@vvcFU(q z!fZYl?#g_`%I_2t8S6O~;Gz)&vv~KG0G#5rnK`S8GU<%To5-66-Z;2ha46{*B6EE# z@MM<9;YGzOqNm9WI>saR!$-rM6rBjMiN68r;%k8-2#9_AHZz^COqd zTKaR&qD$EUU4Sr=*vT<0jL2aa%#tr_3&0eOKN*uKN+F{9;}Vn7h*PF0*u8eT zl0eRSnYRH)%+Od_H1Oj)pK@8VAa$SQou9zdSJjVXD11zX(8!8cli+>2)xVVKNj;ZA z!gBEShtjCJO=HXzG{x-R+Nd0WbVtM~D|an>QHY@jqY>)+Qt92*>&I4EldjPXa^*C0 zN^-zU_q4=WEQKg4L{4Ihj6|dXsVZ9_mv02m$z^A@S-M*zM|^6_xdid#k;UxamMfll zZmJ|Gof)k6+fAvJtxA&_asmAzjmXBxBq^IUqH0;FPO~06D#yPXCry-DVOhMvN4pE@wks}Kzt8bJG4e739e~`FhlKm*Y4I+ylZPJpQW0f_))NHH-Pw2h86AF>ZpoZcK5;p|vn|Y)EQ4iRIzxMgQ;^_VkaF%d1PY z|LL!e&d)BdE)Gx5u5z=RzLPLHUFh@U=SNEQ$+RmHm1)42o;X-VP$-vcXmskmdcC3Q zN~2RR^oav3@o{IwmDegl{GFee7%etafo8!p8HsaUYJ8i3;K^cVlCSgp^7YYQU!3$$ zk82i4yga#ld3bg7*AxtlKFi&y)6?s#^XvZ0S64q5F?dXJF5mXBJgShZ&5ej4X}-fO z2bp%NrVo4uME4Ay;;7P-7E->5Tt3G|Bufv@N==-fgHg_E2N zRf;=Sx+IkS&3@ULo3)hZI4XunmIG0aY;CBvgiCAk;PQ2t=@|-(Ulz%p;-jz$M9Xfb zRih+Ewz^B+hoLu%|A4&!E{T7wwTrA(U}mW7%(w@8xn};aN@mKv%JSZG)uENMOcxpU z9;WlJ6xV*{cDnqv)o^aax2ufzvftaSf`Ha+JEItLI_m%1w4U}`@f<{oJ2V$-*2kDL zy!AlVPyjX9e3G*yI~30ikUUoDtcb%pluLl>sYQw*I-{7AW|8`5dXtIYlmJYZ++a+= zS^;_mTSYZpWO40-biS0L+8kQBp9(}RtCYhfvQa>>)W$A3pG@U~gC)X~%E-k!-KBu} zxU{cD(VyQwNx~)j=T;;OE!WCl*o?*LKOW}hvv6(5{kCGcm-21cG7BxP0kcvOm_ifI z#(c`bL-JC}%ek>czVt%F&4u*ZP9hbtWaG4emRp&HLHpTyyn@4k5fZ^8RHP2SFjaV( zq<=aoPeVJ~{0})FnL@~NI`zU#ETot8uz}J!tv)astNF9;>I2nT< z2doYa=hI|7wB1E2p*b1yd@krWpH|IqG;(IS4aO){SE-7|^uDSL-au@ zJprmZWMfMP;6(RP>`jVI?6k%74#w&4R&@-~eN!K=zfN|a@zG20K$du@?7I&~!__!#L zb|b*l0~UG}-d9e}F8dc(0v^}rA|8yzrc)Jzsu*sGpAJu7_bIS!i6jR#m!WC zA&cZ}%pzxcwBloz5yrsjREVt13{0BKJ15C@h9SN3^@{i#0u*BoTsChsQBzSAC!)fw=5np^M7#Nas!94;$e9?a4g6+!sa$P~ zN~0zz=5%SD)T1T$W+}QW%RgnZ#5?B~#~|RHEVT4o-7bGd9p`qOm_b2@WET?8j%IZ~^N+(IPJW6Iw#sQMEY3*Vn*28zu{hfDT*s^GH zhUYta;L{&PO?4Vb*&6k0=>As0TuRBh%|$73^4$U{5#^3og_5F?yX;Fi!BYQasoxq((PPGqTLieXn* z5cbVGtw~bqX8caXQNGQSB)?e-O&9PQ4ip1)%mr;JD!GK3cQGA>bre!j_^zN>dMplf z;o|fQotMok%`QAI^`SviZrtUyJhl|mj-?1!NSU*2Ft6JS-1(5HG2XaTu}VbTw7_Ro zv)Etx>6t6c%+MTARf&TM1Px5&L%%ikZ>`E!fz8o^Xr|7?q8zwFJ)_JDlD35F;7C*N zqgE+4d39A@8voNWRYCB7hBvS|qM1(Z(xA)R?16*+nP?6p?|UG24gvl-f=iXB;m}K^ zx^SfLmkE-QGbC$3%^dzYmQD&iAW`FQbWtZ#-P~|JCwcRjq7(OoV^5QN{E?4y8a1`Qz=@R`n%tJmDvBcvCLFFB*WJ_Ea*CkMHa~VYn=p+oQiWwjPlDhZB}{85HGF5>x# z&0flMrquA`+?mGYKsXXUd>SnpO@@t8meq-aJn$D|h?KQ_@zO|&*caq^jQeb)Op_>G zOoQomszz1ux^&$s=$0O6=E+)0s>IWOx?*5yJ7=O^E4FiH%!adaS?`f?qb6}RbGf&2 z3IJemj?iZ#?vE6#YmQd-j@QE#zUFm{f;T;#xLylC#^f53!3|>yF&NeD;6R@C zNA&PbtqU8JEDFC~SVUbJhq)juU&O^V~FtWd0TaMX(uy~8Lbj$Js?`PR}4V{F@z zC%>v+H%HH4_MbRa*=R*CiAA)kgz^!3A7IkEc#Hlp)Pl0>CiUH-KXXdMe7Qy0&iY!m zS(kCrw_Dz3CRfX$0T9@SdGj z$@4J6B4ZMETb2n%!*LK{`k$EYb%8*#h%djCzOy#{ zKF1Mb1m=6J^I(W~T+~zM7?02eiBo5ZK__G!8q|EaTr+X zb>h-vr2R3wC%LQQAb7T%p+ayiY|>9E_v9%LfllXi50)ND=gl*+PodBj)=E=LViIcO z##99*q{h{#S0B06Q>L>|dpc*Wz=XPK;IbKF6;U!5o?>NFImE{zqYJt`UZR63XD)7^ zl_Tws*-W|N?A0@r*@ahc61e{8zUXOtM4^jG^on61SEa(~Ju7oM4%4-g6Bb68;d&!V z{zFzRbitoSnBf%pqDn;|buyT*A(I=nwxZ8@lG>JcxP&o}8v2TE6lAwu^jPBDZ2Kv& z5=)>wX_?Pc7Z%!Zs9&a){f3xL?0)GM&$k6waEdjWicsOubt7?l^77WCU7gOJ>WswX7Gju~>CM;AHHa>$a7P)MOk)~-$jQ})38qL@Q0 zc0zLAr6dSA?q(f{5(NdJF)1|Cre%iX1T(_Oh7;*@IBLX#&~N%H`l`M8GTNJTr7#2W zN%TnH4##!#!7c^l!+N=m>!{*J2ob9ifvOrC3NqmzC?}doD7*4^}?@`<5!mQpTbhIoM8Ov!f7@fY(=SeiCC}|L%}q4e3Y18 zEc|XOt5Ujl6y2O;$CsmRq`!wL>lqju3Z#Phe?<4{a8Eaw==Vbq62Uj+W zbwu#5H1W?%6ZxQ}3yV&Jq>B*2Chk-zhp9j0yl`w} zqw3nE9(aBve4y8gy#KpM%h6|&mbVs3!|ADhvCFl;J$SH^5zA`8G94_uFhtnG_p(CF z$utgNtl+L{twCc3uyH5Y=w{9-4u}0l$=pSYf=1=m@!*d9Iu;S}i{Nf4B8~(bX)uzw zvHM=&=FknkYNKUoAbEJPN=FQKbct;$6S zg-=?(qP{jCuB1^?$*VApr~(U6D@>|f7%D>VdMiL4ubT6bM#?eP5-%xzbY+FRQU_;I zBqZKta=33wwwxZUXsJ1zTI?n9Rebp0B0dtjr@xBWz|KDk<@c!%#KC< zEiy;BI6V#!?YCQB<&i((i_(xSY~sYHx%mB3=8y46-XbktAa)+06X<7nV}2ge{@H2! z|1#okiU6wAJDl>CcxHVXihWBt(hP|==r8RYPF2XcJ?bq+taaO{NpbTzen< zD2{0PRbmla1z!86GSr$jAgM~Sf{S^wZhF+>GTvH@KwJ`J^AliX&PnMDlld0s4Yvni z6mjb`epw(Y_nk20LMQko6t#!w^;*WVrvk{NA9~Ak>3ps)uD_Sl`Z}yc06fZjs%M-^ zr7yQi`f>})ithqB5SN@yrvOvV7~0ETvOJl$fFuvOjOI4hT}aKTYlfLq2U9Hbl$|xB zaMbhaAvkljtc2vH^^%bXqq}M$oAc=yoqDKP8ad<|K;@)qYLti6hS53Ucw3S&Nhkjy zm)X|E;Jl#S>$;aXDF*7rwxN z1rCF+sz^poIIuCfr(ZVo3ih)Fcv4A_PmUSguloPEQkiCq95PFm(-9yc@J}U}dKLb4 zuiftU_S*Gb-KeP=0VE0=wR9uQcV4kJD#)?KwT3yiL*L4ZG~fAd6{GdJT%CkcWlP<^ zq8!or(Em!KA`YJNM$_T_P5uHmm;Rz9zn~2nUu~7{r&g;m$z8aoD&_I{OdFGFv1ogu zqCuZYh9x&E8`G9c8n;r784RiB%fdunw1j?P_zr2TI21=;ZHgq4i4CV_)~ifNlBOU1~Jy z9T_#>r3e$%7HBGx-k(QZv69YWsliCEQLeaHYMhL6Bd@(!b(FM*Bdx+%YOFQPE~$s8 zx(Y?Mm-Lm8T*G*^WbxLHlgk|v@WPNwU1D{TDHm~6dKbw?BO~u&=?~@?R#juBxhDv6 zjG5=e(URyBdE-%Pn_AqbJc32F-}65dYofw`^+i(*cFB-cc|qU>jvaVKODMGR@3Tzq z2=k>^=o5LM2)*{ZL*mr%=|R&|YXIS=3W_r+)mH zx>eal?(B#ZMKHyTq{%=2@ed|ZGxRW)K{u*$q?`8!FFqR*&uzH9oKDU%)>d&U4GMon zm03a3N@NBHDx9#arHrIS9Um1M!Ip0e+7bYW$do3AlqdKG7x7lB5ZBERnHsHptVQa{ z#C%JnGUqDC2?P8mAJONzL(1K(@EqXw z-+_E}>yKjL+&TA#%p`?LnJJ*CH$44(%%>2}rzBBu4in+rI7;NVpCcO;XyUR{|93yj z1qm~XEhvfsjmTrum;6lNO&+0#kNJOb+Qyi-;X{?GT~U+cZU*wb>E zjQ-zQjnu1mBx!E#`NYTc$1hG#UcFj-8ResuyrrjJ6f5mUZT&~_c>L9!^s77RpTV8< ztKQ=?>OHtqS%~!N&O;VWKt_n;$#B|*{-f4Joe4@kvQkCci6u$pP;kVYawOD06-8BD zi-dG&{&?NzkRI>tCyQmvIpP#5d@S#mlC;sQ%Yj%R<|vp<{MeR8dWuF=@_uyvh=14R z&XET|x5zF9l6wDPFbzf{K{|b*U3`M6w8|PEjYglG7*V=_aNaIE_r?U2XpL5Ru5mBh zybacrht4!|*tl3LuEi$dC3jb#4_>0a&G{8pP(FNq+Fw-FaaeRhycG6+Qpv51UHlH& zCNuEREBhUH9|q$wmJzq?{{mB%e#!kCYx^A`01qH|HAfZz9HVqK@uxD3PMY6U{slC9 zE%9VaQcp_nt(@^j_^vm_RCFOGio!Z|t{B{-^}P(l`4z1PWVL;joa6TdwKEz~8mzV8 ztvVxYoFwhRd}gFQ$hs)jO(!>c%*o^k((Qr#XLRxe_Eo6;5m3)S;&+5OJX|h4*!6Vi zoxyvdG&>6I4*h(j1|afft+d2H1nZuONDgSp12zN+Blgscl$dxp7ze|5iO1qJAP=ZP zFb8fC2c(F|jL22*7I=t6zf5IWHrcrniP?NG2KH$b+$*i;mUN_TOWQNj9B=Bbn>arU zf>g>SHw2&#wwNGyv;SABrbEYU=x!wdH+|q$adrm+{>_-(VlZwydWxOUBF@+V3 zQiDil^C=;I3c(zzL^{4i&YK98A{Y@}ot6WPKp^8WL zBXVJX@8ccTByAD3w_f9t1NlAEzi05j6z3Px_yXZSjg@-;zw1><@5>^fjXk~yOVQp1 zq*q!STpHB<15dA%w0*AgOM&u_IX$Dh{WUwE`a_upPsV^yQq<}D;GL(UQ5=4AMOER& z!wevwI}tNGzyS9CV++Zv{^7;`elk6|$p=*1*%KhhMb3>Pa|O3tRjX1#yh&(GRglPu zQ>dyKeBPU|kiuMP7NDjH1bUr%y;fMZ3RoBHXaWUjU#_&!bi_QM^>&rgj%gIq64{wVdF;g=Y zjbtp~=z#y=@4F*-e7(MhsYm8HzEiqiDt?InI@XyXStm?~<#H70(INKzx=%2g^7Y)xT#if|^43QS|BMs=tyU4%@s zxV2!@2+DOcjxIPbgGQ`cXLy2!cmPRXhR`q>&tf}6DNIMV-Gh+fB!PD378BbRf66Q0 zviRW*JW9cV?l#K64G+vL#RJ@)hvH@&44iRx1g?=2s`4P(z)r6KmWA@_ed*xE8x@Zp ziEq5gEWTIowQCt9bWK~kE;P#N67kyjW9exzMJ4BC?cNfLJtIyh&OfR74Fn;!o1uYohYD zvdG|-85EG6pu8_|Otg*AdA(#FEU`Q{vSDZ`I5c@$e014EOIES?{3=RptK`lucW%W6 z!Ek^x0+m&tC6(4#iK3DxtSK$44$v#BAZ27Ow<# z9y-L|j-R70EeJX07vmE%ka-G&BY9H{RCF>(wkxHL? zA1ULQLGWoV;|R4*R~{iA%OVwu-cKs@8V>M6m#!lCN^6&$y(&WpZ$ewW$lU@J(zBVW zm{T}}xvywGKm%DKkJu1}&d($bmb~k!N=K>Vcw_W@TWHB%)bX)Bnbiw)Wh1$euqFjS z5V`LhRBw3xKB|8c(Q}PiA^aC8WG2ty}qfxMZc0m0{Uhe;os0v()YRj;MbIJ3%|{R zfcoCg_)9+w-|XzbiX^wkW6EGML-IH-ER#ywf0rlC*c^Q@oFv}g-y z#cyU8&3e%;>)=|3oljCc=58VyXxVJdp?C0#T@njj@` zC&X+SUlE{7t`A)czLfcIuFxZfufgwz*z{*Hc3=7vA0tNKm`ZO3y42N^xpv@8N0;s z0!X~J;>PDW{DeRj5KyA?#SJoOQn!Cg%pi*@namw(I-t@^PuDCQZ7DoV{z#+%Q=(#O zL^M51vb0Z!BchozMB5Gu)oA1%Cq``~kgQkD3w9c56o!yv4;7Y$!6O*N$cQoU;ycfq z@*^DUVtWc+C1{oH~JFg>SfQF|6 zR^l|dB-)JSjomjlJQ_s5jLi?IDyluRQiWgP{@9Q2E6T=ldGSv zPtX6}zc@O)>}NKtQ>0b3&k`rIkbblnC_&dVZag~+Cz(rBl}470jMcgZfx zW4!WxU%Wm&RWBswTjb+22;$qV(u0NT7?Qv^Z(ffDkR(k$Jl7WE?3n%rA6sOOyw?0+VTA${B>dO>|wF z0>OMwSbO&ri?>D*ksrrYOh}7kmAypu3r;dK=o$LT=7`?{L46J{g|wG^S~Z9-dvg%8 zig7rfGRca)@tA_S!bo#Rn1AF98wTEqsR!EH9W%DmCEB14Ze*C zygs{p{R+jZR7RU5gi&R;hLvpP!r$;ii&^}YN?z$Do&k#%L}L{!K!%tW%yu{qJ;%Mz z<^Ih^BK|Tiuv45maDcallD7D!Q(E_ArKOJb=Hccq`uTt#N4fIhQ_pi{Jc2@745o5Sx{>-?<^{zag2?`U88b#w!`e&`fbResYb&v1a10p5AM?ecrE2M6 zUDtY(tQLB}=WpD~7S{ZYDMW+o5H0ugO#g}WT{gRh4}@qN+i~s(1}=vXP0Q+JFll>e zriG(l*>e&HoB$qe%B%?kl>0|sh%Sd)1*iQ!@Yk$TpWo;sURV~qNt7usHWOz$_X?uS z87iByjn$il2GsdoLiU;9_G{J+2Gp8jnA;g(xv{sapik~LHb2TKhsEJR(%q0r293kS z^C5Q~b<$<0TX?*#w~gcDd+ZN8<8o+x<^#vwt#I5~##esE@E3~zAZ`VyGJNlZK1nV6 z_!)>T+jqVj-|mYx{yp3tplj=PFdD%dM1I(xy4ZN)mcw{DlBo&-^P|-EN~J8uezq)9bcc9ZbjGYjk?zFJFIt|DPw% z;Jgu^LB5{sld;76FoP!};4$KI6bG||Hm3t4w8lSzQLMk(Cp0E1#yVYcrv~{~GIVm{ zrVtWBFVxnuMF895m-Je}xL=S7NHO3($9DPw@IcVem@yj0V_QO-9pVS;xSuAO^}i z^hiM>hQW+85`C*zc*?zL)2PasPkC(th(IU@qPJ&iq28b>X7oaRKt(LD9|cEZAGwzA z<=Rjmbmx&0Xac*YRmoM54B*2Hc#H)U3D)1M#O)Zcpr7W%cZToKL4^Vt=o4oS&*+e~ zP{9N!_fNH-YQW?^h$q9~!}kEjAxvKb0qkkE{joFky)iLFKZ@YPCoX+5REy>wxX2I% zAR!uid%f*uz20FQ1fczZ$;YUf+%OKj_-I55;(#hNghCyB-TrjBFCLz_`$E&p>U+_s zwe|$gzf*7SG~n0PezODrFXX~S|HDi?l*^gEliWovXXZJfUXKLi4nZ-wS}gG^H4{s% zQpp4d=<6h%biZ6#f0af+(bx~Y>;K2z_qVl;YwMoB`zbs;JT;l7kWipgTBfCt&g2e+ z?j+2#x6_krVgo)+;!K>Ba`x_bzglZavSdrP1GJ?y?EOq3(QhqDOG|6LZv=rcF5BlR zGgQcqJ$31l)hL!r82JI2#E2zI>+>d7GnpktePH(*M4nGtJp^ep*%){e^6Zn{UC5x2 zL2iE9mR;`gFJD|i!bphNC@WLy$H}nY`?spqa^K64O=Vht?UHvJ-}v!bwu0|9RVV6) zzp(%MCw&b5SxrdqnD(T5tB~FZA1|{8V<}8Q!?w9kjde;hSA02|dY?!kqYJ9=h+pwf z)~gO_s=NhgRP{!erCQ>j@Ujb|;QV%N|f1F^{zau9zA#|V;; zzKy_isn=d*5>EqG-PhW7_(J`I|8i>sD;1% zie8i&SC+U($gDaHc&dLY5vRZlV_L$g^v~1SxU4N&H7zdg)NE`U=PtA_hbiNQ8 zC~WJY@1l5}&xRhn|9L*DwPwQxbSssRTSxG5Gx3#`jPY7KEL%e%2p6tvv%PJ^uZ9{D4P3Km+rcn838?{3t|ml{eZ=}f znlttB)n`gKko<7AEqMBnZ4sm&X_@1ix74q>F2xV$ICbG9&nMW-c)XN$8jJY6-H{AL zh{1q;dMO^WU?r^)p_hU2Mf+K)fmIY~N=Adrs#9lwQcn7NoqtWmS$q<9Q|m?CGjP3V zPF38+2HKtk^b#)-YCp;yq(@VwEM$BHF~1M89`czb#0@d$(uq(x6v9|WQ`!P<=yHRm z1{&HhLDyIkWiPP{_!(++T!ms2W-d*GZQ=3A$QOqJa2N$HbV0Te&b)zZ?&ZJf1|W2Q zuJ)^=l^VLw&X`>Yt}$s6dhipEWjJ-t*)avf%@-Lgsvw5v-7r2Eqn`{P8)TLYqCnIr z2hbpXP3SB2dn~`e>J8A2VvSLaUnWQ;;!3>ExhCnvFa^6NP0!a@v)90pYArgY0bGOT zrZU3fafLp%u75|8?9zAHW=Y`e71sk~qZa$mX4R=>ncR4)6G*kk{X!Q1X{}`S@9l+BFO<#LLGM^`au&HjIFvUrTXwpV7 z{Zn+Qd|~!a66-%T#t$(j37=zS98*%p=fq=Gl|A#@8Hk$PSoi@V%#R98Sc*Dp47WJ+ zJ#|FfHhI=dm6u&wlSI$wLoc}!7Nj<=O8YDrnF#PqBMnxYhOhyx@Kse1321s1ZM^9= zTAk)m3*Cxd9UZs!E0!o?EQ3}#v^eGRz&?5Birc#T-s1J3T<6m{jJ4|CUR~%6J9+yb zC}bUDzTgVMiIU^~Bpgrqb_qrdN;Zto)KWP51u+TI%iJkEweun+j8e+bW_H&KM_~`5 zG+nh>Y;D(-QPf((AHDQBg{@68degXwE%ANDHk6PIH$ZquTYs8)jpN_~n2v9T@6i`T z!3fvC%tM5>i_qRttJTadYaEj+c;BU`YoVJ}*<|3rw3;{}5xw4Cx-|J1A zP3?-p$K-c(P0=$n`)&ze$=Nl8-5>o?gajAH_B;8${8BvvrGY<~Bq-r&jfnKCZu_{Q zXhc;W?Ve~s7ECp@Q7MZ9D__~U22m{I)RmcidM{7%VDz6Fu->NyV|D)@)d4U8MpEeq z?2tvm25+`BCQap5#dj-AsjMWQu{^0|CIIi@@+PBKXfUddmhr)ZE5WZMR0UblcnxT< z;7$()P$?TqlqYLFS#rqV(d7L0if;GGa|U-S8u^I^kN6Vcay3D%{4_k9O|$@-4tWkz z&D+~bn^6mtH+BK=m9blzdWp#1s*p*kEg8jDbF;{_m^Crr0bcVc&d$g6dwidjVwTU zDhCQ09Sq9Uw`jb=mHDpnp3Tn7CdpRv#sM$d1+@{kYglfI!eb zB^b9IzTrH0P=WyVehH3I&L{aIG5fOx6;1peyhtKqW}Mx|Wj_taIZw>(4(~Lx#(Qd# zF~ATY){vXh;)f`y5Buld=nO+Ydk{{zLX!YRP+{{aS+@R{>$E=fKbhLk1zkVdQd2hH zkhQz*=Aq@Dne`D)@qJ#aW>}QH?oqFC_`3Vn)`ENwR%>(SP>m$zupN2K01Pq82d=r1 z(?+)J+n+UL`_DUTO7JW2!Mh^dZ)Q}i1Q_`B@@W)VA_e&JWGU$uYt<~TKr&*GnS@^C zD+mlV>y8M_9E2P>(xQ-Z*y&QrNDJ-dR}hzfW^A-OLvLcbeUW+$5(281=2sYdr@`P- z(07Pv@I1)n<#43f#YuWdDYj#BD{zQ1DN(05Dg>8;wMAjXthufof%x~==x|^SJ$yjX z7CQ=NJ_ikGVcc~JhasI=FgxtS0Upo~qBFoJ z(O%O{G4jH>V%6SU1^d^JX7I2_9iNR*HvEi(R=NO!NM>4Fe=tK39}#qfsKlJ~m48-o zcI>T{!hud=5L!M6NI+vJi2L4{Ga7(%bl_(It+co>E%Q{U*B9rJ^eBN%gk3Paag4WO z-(Hvi1JMdC2r$>ymF_RXhdZicv?0h z>uLajWunoweNUV_-QSxXhyDM!b=+y}JIxl87pBbft;|xS#U2N;`^h7ck4bRmP5c1_ zU9p4dg2yaKa4;}mnE8JtWU~jpQ=y;2!}vas9MnmibDcf5t+NdHLjnz+g8>2JE{YJ( zX0Fl8Ec+z79Qyj@O!Z02vo0oAGFAfIEHy*zRqV^R%AjoIum4%EhU=)ptA* z?!O`}SLj3|vL;SCtEsGOx*&jqgY)8)9wn4#1?6eNaVM@(1pJe`@}gi^97d|*<&S%1~cJ0;lCxPw!sZCHU_N?h)eg#o=JujnQFPA{llhtbV>qjLwr=xln9?nPkZ zN@d@I?0L-q6*C0)3R?+}b4sX`;sy^@%ceo-Px;FdlT14Yz!go9nbQaCi#<5Izz>A= za~dIvSs^DtIv-ObTq{jA#dD-r@p3GlX%hWhO&AW_eZpFaA{mxC$7V!m`$}%

JQIm=CXA)$N;|>xxQd__J|K&Q0a@h0t?+gAj=p_wkSRCuQlV~(uU;x}T41iY?Z}h=ATy_4KMC@WTa-N;SCofK6x-kah`$YnfJ0~Im z{IbrG03NNeZEXF~c71*O(bk@3n3iL-s;M{v zia^{t906?G?Z6SpYsvyg;I7~Z@HTyEB!P5-F9IZxRB{V&1n_5lod=YWU9ZZcf z1W&XC-S%;7Z?~(Ohu1gjxx=)+m2L=+j3 zID@g-)J!FuNAVN@1>E<}^Xy04OwRy&BYfmm4cP%PoeZ5ayYkVt;pL7J0TAp(H1U;u z%17yZs@Yy_Z#^jpJKE$w=jv`R(OkC0N8%H;xNroPdx&a1%S5#ngtTfi$V#xxnjRPi z3%UnmgdGrJsp(G58=jb&@k+t#N|_+uThoKQ2IH_>AF+zV;=a%W_7xwmZ4cM!x4Cq{ zv?=KE1&KV-fA;*7Y#3s8c1y%VW2xf=bD( zkK_XL8?p5BooOGi`rz81xIRy!Ss#6A#h3$W9;cAyEL;}Ptp~#F$TS7i3_b3ELq4HO zaYf~LIl6^;!qt(b$VZFHsBv0QN@cF)7nFDy`QhoMR_asj6`Q=lxGYiJj6=A z9D1X0EC$HZ8D%RmM!@i)D2itYK26&cSZW~Tjy?w5-;i_Mkg<`^(>TJ<#lnK3ly@AB zxh$=PbB{=^I9rr}K)j!w48p!;@uA~)s6_T@PfEC4fR0Oy4eG|0xPW9pgfLm614u?8 zy$sFe85Uu;i?G{8*zKJTyZy-$cB|^0Fr!TQ3_d6%cRchnN6FMxAsYh3H9~Z$ahO+J zTtxF;y=2M`&wXb?a@GE_;ZN<-i}2fT6@Gg<2?DF?vCr;oJhn*PHINXN<)beEb``i= z`~BHCltk@cJlGN%@O?&F=3W7rBrPY+3P-4-745q?6qYSFncq^H6r`V1lk#TM2>1^} zlL$3NL~#j`cVWy4g;@qrSo#=j5ZZXzaGaK-QFMChkZ#Gtm8M8lOi!B0N2jOrS$Yko zUX7Q{d@>49T=7T@eR)XTphpYk1<_(JR>q5Zw_~*u)AyF$fnUrzjjpqIba>e8qD(Cn zncS?oQ2>`Jr9;d5wmGNH#aa}ZGA`GirVi&`TOihxXfQbO`X7veb3|J9 z%{r*G&Dh1{`vv;K4~f2D-s+cGBjQ9GOCk#l>KG|ukl_aGI3f!ax4?Gz!LS`HvWRo1 z$>Ky!{xoyri>)wA*N{jkw@AM^J;nL7h@~`88iiA22DO;H86ZS5oQ($_4|mT(O4L9; zsDYf&&hzD>62=S0m*Yb&VCPRJobVh98u^@IEujb)Y$@wgmxbPy)ORAyBX2CxmL4f??l zZeQH01HNe@BSzzfigL|1w#)ngd;AfeJqhPS0=QZzQ_%fTpl66MV9^UpDExH-;c-&- zS1Q#Mjd6!p*ZM7y2tHS`aNAP7416U z@)xn=R`Xx%ditt;bm+JMM#1}Gew80bW4(5h*-DPo{rfs4x_B(Qf8QAC#=hf3;y&E> z*$H5BNwmbt@lmTkwH2KVKuS1F^OD`^^e))qpN$)jH7d{=7HyRR)da^wzIoczDO#q{ zS2#=MG%5Do>2O@t&7m07*w{B?q`s@Y*H2;PHi;7xbN-A{`>SPp&C7oScQo6kW!!e= z-n_J}Z;nmND%Ur%RV|ZGxW0+(wHv$LhJy=J+dgugPgYsd6?T|3TiwQQjkeP|>f#GV z)h*2Sy4^h7ZNGK?XuM@5R4Q&pdkkWe@?qHi%F`=VNWk3i;Ij}yH(irO^#3ge*5UPDzrtbpinH^jZU}S-0QkU zRv2=~IDkM3n-|Tl@5jzT6YO;CqA6n2Jk2Ktf^?#Z&wZzbVG5#G9PnE4y@?;^ixicn zKCwiADq}>0(N+ zSXI#_Ccy%pO~K^jkbXt#aqubV&rqzy;+irMgxDRnM*gJ`4u(goM^{p^k;9884u#Js#SD*%r`aKD8_wn~Cn0BZ>za( zKI2Jn)?+FajLeF=_TMY-{*G7PSAHgSc`bB{{VJFK{=3e#>+aF(6>4Y&+^NzYSb5lR zsfOG@JJfMAH)jE^`OUyJwY>1UBQP@|4wq0g;nAkB#9N4eDZnnZGfT!xyMT3uFKTga zStAYJa)Dx5gks4=h=43XY`!}%%gk*w>$x|H{2BS~r8QWBkQ6+iLOWvT4IA{KdEWu8 z1mZDAkt5!Q$!|1_nW#Zg1b4^wG4$B?@r-x8yc1VgFMdv(i4naLp)oMND#Qn7(iZYc zQktU#(VcndRp=*vix|Fa*&q4X2p4B{zzUX)5~5&L(bDM+WvF~vfySz zm0=mcx{=;HV6``&$Y~oem6#M|o=&}ac@8MHiFo=YaBe-y2j^nW6C&RYXj%M6+VI7D zT=J~PR}-#0aW#XYOPJyDhZoJ!3&d6>Zuh*gt7S|33r&HzrFa9Tdx3^Mo+hCfns0bv zY4RO1^nvs7G=wNpEc_%m_dbTWE0!&c>06TkKur8qn|mx@ws#Z0w+M^37=)J{(x1P=NDFfWNe^2Vp$z>4XngqoYfPr~oo} z`7E09LE_IdW_<@a`Gg7kT7#)=1DWw`0CjnPs(MFWaY$3G&FeP0mOY&pY&fTLC7SH) zA&ORZ1oo3N6REro~t565g7lB;Yg8mDj!=IMJXCX+28(HVr~obM$hd4*~;_Irm% z?M82Zx4U~MfJ_BksliVOp-b(Er{5Q-X@XEHykDV7Jxl>zg|J=|0Wg7sJwmnyZfvV-gk1hEY=%~gJVy14QzlXAkBb_yC?FAqZPNYj2 zD4BG;>Wd=TqSDPbxnOJS?JAE>@P084m<}|sJuMKpUYs@Ej)K7F4oGl%;|l|ictdP4 zrjyc9SMaKUiLv+(Aq64vYzVq|!JY9~mnLEGF(_eRP6q>%m47hM9k_+BwpA$=KHLbp z$Kf)esZtv(X`{|4d~D1Q*nl0K+7!O@q~H*x)x4Ogst^Q5U#4UQwjI8g#qPE(j7j)& zEMY?2l$OY=L(zVFasNCRdaJy!dpR#!(^}P(ll}ptY&|#oU%xln4OR%x&>Mf)nbwm( zoZZ%bZhqbk7>^~kVE=Z3TZEqM{&sV7vXY%8UJ;GLjxYi7PPk7E&px*pmvlQSVZ@ra`9Ge7#%9=sbi=`thX{XO`;jw;nYdY?YE&J;}~36v6OE)&BfCt zx(d7T($3%RtK-&Qw|Uh1GE>cV%YNVkc;I3d@@C<6`)IGRf84(Dt;`QjJ#g4A7wh`@ zPGY{>@ZUqkz5UAg@AX=Jb8{n&|6YImc!B?Z$MD|~ngeleim{@bGA+ERz6vM7NjUK{ zz|o3Tm(YhVqREF?f>S#iRbDri_fo4HEwn!aVlA2d!VzWR5PtCc=IR1?{`&`>@35%{ zPi*IR*2Exop2hqF9klzq1D%)KHG+tchZMOp-Kd&hZeEe^WkI%Ltwh7_3 zb1L>z-nE#vrqwTnsGmX0zXG1V9Kq{>>ZcOi2~7Qm_1Z=*%KO9mrVhEjySLZqbb5a_ zj}CUhbfP7#mruG`jIqyBJub$&XQ_TE4aNVk{#ftMVY73%+ui$JOHwaRvYwBx&-V3) z>om0R`yS{QFoO~J&0W$YvON>t8DL&#hz)oae1f-=VSJXu>Vp^@~CWCd6oWPWDI(p<**VE)_>qlJwo$T%gil#TDkkVgbH$)_odg_O2#U}G?VoGS0&nc{ZDQq6snScy zG*l?-vqL);VN~8_NTp!xF9pij+6E zHF<^Hecc3;4d_9lBw-y9Pq;LM*sjE>G8V71)SjgMiQ8a24dD@Y!PfA5rqu3r zyJG;3e7Iq9XD;ogax!C^%mnHughrUAc91vXy=8lHzSyO6OS_s>-? z;0I3s+?#+In^(yneDGtYctb}5x~?T#xR&1!y#a;+==s6TLVSg}N0*t+#1b>f78l&k zFt95*dDxWfQ`s>W09z^NA(&slw%f6Y)z96_MM{pxen0JTd#^B?b$YJ?%+9l!U3D;l?2 zT%SwF_>lZu41q$hv+B6p81=7(@BWvBNGYHHE4DWggIBCzQMM&3;A!Zi+lXN z^1JYFeG#Ta8K2gTq%eFS73ojul6Ezb>*@Qc=mj7 zGLF<@gCmgTJRHFkcbd68QF&rLFh-wPIAL-?n00$Z8O*THw-rg|D0z-0>ht71c7Zsv zK%7}1&ZzeT{Wei>O%S{G4S>)%&JsTpUp3pEu8{uDAI;a)A3Feyx+y8=%1v=vk=GK5npfHT|`{c}0yS(7cT5x79IJ0gWXBJ>Pwn+}p+o)`;IEj|X@wg!{;N5GbZFH0W@@f|W{oL}mF7kGg^K z&VmtI;HX?L7Pg^5_#tqffhVwvmfCD}8tpD1&mTz}AUYCuoR#NQ2mUY3htJk9H^+}f z2b|~RZ(r_GsW?!BCr^0jwM=MIA#dl8nXrHO~CE}Y%t+! zuquF9tHM7n&J^>LC^)UUjy!a<+8*dLNh(PNT>HssXlocAoP{ za`@c^&syj2`_60xs5wh1nJZ&Smp1g1#AVQY<=%g(_`k_LQgszccD16@Q>;PD8`d=X z5R3>Z3XPcYm}&R`U%m4D*-wA}{deWv{pUZuudKPk`dD=y)(fqfuiK5^dY#woX3*Pj z95fH%i0mG>8``TF)J$O=HT7d$csg{I{Bjgr2$QR;K8~~93Cs#`YoY$Isb6MSK7@f{ z>nOdgO8geXcL_Yga|0?u(#CgG*MkS|@d2>+dbhoM*z4@=9_+TC8uOj7Mt*o|sqFq0 zDm!|;`>*516)OAb3Y8r;J9~3gWd%1-1n(Wp()+9hok`wGB6$Fe4(4x|EprnR$ynV< zmAwiRSpq&v6|Q)8!q)DJ{HW^GKI&oo2Wh;XlsUZF0HHMGTGkF&Y|f6DRna57XpdmQspykeIyiLui*C; z{L{Q2C~v4c4o{ap;CAj8u2%hifX{&hIL2-XKkYdD11LUA-#8tPl`2dgn<8keVs>s| z1(;nNL;bu?PF@_I)VVtgOm=K>%7pJZXIyf?m=5DK1}e=k_XZc7-vMcW=N^B(D6q^)lo{Io=>*a?d0Kt;K#7Py}GDkAb|LlNHc*fesC(!oZ9ejC??wn8gm6c`hQI z?*MTsMuGNW)z~|>G5{wL{XZZqfUDqG$QjWuNS=n1OZx!vRzdRFSS-bqr+E&bs}y|m zLA|v0-|oul&lPuhZ7DgXlk|quS}%=_aZ;G;LLqK$5eYi5MT$r#GCm8OjuAK&f)`el z8mf*vIdLsyf&!;?D8qk*hEb1aQdj{*hF&n zvt(~^-n@Ck<0Dyl&r5i=+sE%wnnHvl5RMX2oy=9Oq z8$BFwjZz8rP_rY?(S(9)qvvHI_R;bokr=?FA>wn{&W@XN>5@!7Bw(GNtbXa&8jI#- zc(38ML|^Jz`q-N3d9yI!xVu>FqZv4H{iR*4&$2+(M;pG6WlLilULY5-)Z6H?sjj@I z1v%21o-KoIWnbw%iEUzgvS?q8^$`GK#8+ipgdLqg|C><{ZP>Ui5r{fg(ar;Iutk>p>KIQV1E7^8MOI#WjL_8NXW^nDl=l%43^`6 zIRD}_V%vN2=x?V3)?;U~OznPTc32wE;&U9;-vJH*7=0jemS64KjqY(feW8<~Irnu2 zW8vHVTcg!ugT4H3)``zmr(SWE%24a9Ixb?DxA$KzvmzSp-R@Dlj>Q9Y45ftAfwjdi(y7|stwh?*3 zJmw3r-80f8R%w623j}3c;b~KM-7<}~liTIEA99yPNlb)Ji|y!QMRPhu<_;}(Gs%Gd zSXq-lEB9UPeUTcIrUuWbGngRe2H@+^tLNqaf~4xk9dPb_RNIB;*gvgH<7RiwtL%rF zWz4t2y>pm8sL!zd+{;_J_LyRQC~cmh-n9f!ok5lY_z%^r)f&;{GX#{3sbin z^iH54>UEs9bJTL0t4V1n-R;x|rh;j0P*wz6q^y6th$o`VCsQyD+!oL@;Iue?{kqX! zp$cUSp`;2gN?SFVss|D+>4(m^dbCPbsJ zx$dlt20m8g!(UN)Dh?>l5SyWY3X!L;+s(t>_FLzV##`6?q=mg$-2pgQxfM8WQPj;` zjW}*K|8?9bsz2F#oKoI4rqzW(B(Dy3e{*&_P78ji8fB7F?>AoU9v^gjoulLSUIVi1 z)34@Cuas4QYnNqs1;6Aa-#a>decWyAE0yfguepm}E)uK`R&f5Z=gD5dLT@YWq^fpa zr53P#sb6!Y+BSf8*&XB-E%k4;s8Mb!1*=7z&GRi)F5g9k3y`?^wt;eG3$JZBvO!QA|cLlAM;pB%lx`H9nf(|--zjv}1dx#ZOLlOEeZ<$Ig#y1RBfaCSysJHY^6>qG zN*;trN+y7y-quihL>|7Yzt3^tNaB(6MToDr41kC?j;-tf>_$t0!~jkq?3Y zf!|J}*~tITZ1iCiU5sFr7q-F3c#x_FI_C|*E%1`+ip!L|d(dv|?!WCd-ZVSij;V0q zi;<9f!(i&6&+lyPL!c+C6U>wlcf~|{IGz&x7a+;_v+*EAEM@cw{yL43!&`1tIclw` zCUk@Hl6A%B9xQZF5yj~({rxli4_8>38gmI2l)A%+$81NZ&bz-aoc9kn*to~Gw)rYD zl~0fivC=nkat6y=nbK{X7)cH6L?1(_dK`1^f>P6OWxPlV_9o%$t*u>BE7bB?a*Ra>k{ICkv#O)i<@I5xS;>)RFh%+v4aHV-?9 z$!lIw9(eL%tZC5IUf?K)+1@L8l}>qFleASVKrR})>Pjl z^+|GiZBG`TK?2fw)>0t>ez8Tb$Sp;9!~9GZQ?csEgjwIIWxP?&qA4F5NyL&32;r)t za9g<65NeA*Gl~shndnbd$LlK&WU94!-A?;Bn_N-m>RgE?JA24|n;n7uWU)KW?{Ifd z^x=?)Ucm-F#~94h_j@^h;$ac$iyh0Q(b(@D9<>|2{oU?v#aiE0G0QU7mOfgT*^U7( zA!wOr3X4uIU<}Vl=VRNbg^++iM2#pUY@Bpo4L#;w@A1%}lq@4NLQ*8sBT$XT#(;#Z z@c2Q9BYY+jW1LZ@blA%kn?1fXgt(uEKHEz}gXbLugIRBXT!jE7OOdYU%6Q6+7ohkJ z78e%@5**Ugl1$L7cl6!+iXj&`{PSFt6hC-xNI3{buA`=8ADm6kjcK_S#L})P{mJ)J zcrLNnGSA{_C#sHyYGeD!4wA_~Fu^#)TWhoR>WJLUERKOps4(`?eg95Os%RHVSXhWD zXsr?dEU1>GM6H{DGH-Jf(Fc10qRJ!(2CBELwHLrqK9N{Wpen0Q5u!`V1ebWI($@B8 zlgm_rdJlduuFOjAw{t;s9cUFeU&~4rhzBzD(<-V>QnAHo?SL{D+Vb zMtL@jn7ZI7SAy59gbPWU$AF^vfz?b6C=o_ItJ*7KN|1<~)JANo)Hh3lS!YyAHs%Lx zz>ZFBDrI_7aEQ{1q=YuXFH^EY=pQIvu>k^v51M$C-*0xh&6a$f*WQy!bF(^Utvasx z9h`e>VS$~uoo?e0AN+S}sTV$K>Blg*n5&_z)IXbzzo?0LXOka^wsed&L44}GH63>v z?c~iL{_4GMH~(xNG=6KOYq5f%D3r{}*-}#N# zQLojuwzi!A!hx=({&hCC9zWV}>b3RS=Hso+t@RrFY>R#7{MX{=%l|xk&So6M-1!&| zw=tSE_%!xLJ`-;c@pu}IcQzahJ4b1UKcdsA{AwGe8;>dC=H&E&VsnR6i691=CUhras`E@}YY)KKlG=aXo5M#hedXfp6&(FYGNf)mG^rnnG~ z+fCdW&ZpDy_S)LT#RaUV)lo2A<8`b(>eW`KpQhw2fY@pfc@#~>Z4oH~#{lO-&7l?^ zP;Trrpy|ybb;+b)@0e=L~eZY6hC5Qd&{n^=emYe>z!}rVTM|c;kIZ*pr zZGDaHV71!z#>V!>FAi_E)A%%YmU&}FANZNW8#4~PiEIrY#WftlWMPr+C!9P;e*r>| z7{ncBpW`Ir`trH&2$sMB3VRW}W4dgYr_4|x_>L(HmrzY(xqt;5j##3!K5t|#v+Clc zLU=d;YD7}-0AN?bpN6BPzd`~J1yus5?y?FZ-WKD4&rocErk7*LlY`W)d83$J1mZPz z;bVI9`C3S2te#JYqMb+kM_7d8JjA_`tJ=ZnV^T99vO5Vgq)3izRtST|pXPZm`Wi>z zSga>nPyB6tTlToezkG3p^+HPm+?0fX`f(yb_x`P8u|{Kd`2-R(BL}!V!tk=OGQ5oc z8C0F9AO6Dr>!0+iPB87SRy0mzjjv5%KW5FvQg$4dwahiMS|>blM3{;Cri2zotg{vW zWWDNm976)@uOcJM=(1Eh6dKQ*hV;ELS=T~BWW@&xHXc%>Jwy06WOPTtMGt1o6<}oI z877uznV5P!YKakp&BVtrAtiD|De~q={vFte!wx$;_e7x*(<20&5qO~H^tkEQghLLr z#*ckYFDhE8LCd1qglXchPxuT`oa!dJ^ zu%z|JmZW&C*OETUmWpuAy}hI3R=0Q5>a~yl(sMj<%eXACl$(#r^y|sGJD0D8`|we{ z=9cw8fz(@brGDa;a5iBH*G&ocUy|XWp{L#0DmiA4e%YFPG@jJw&9b?ywhzQe@jVZH-68(7c)|Da7CAcq1 zoPm@Vf;a=z5Fl3|I3ajZRpCLNYxM)nNSSa&Y?THfM6cYY!B9a~)dPt&>TH(QgZ}+O zBCV;;BcW_YmEYIgDO2R86nuce%W-%%@)UD5PY;(MP@Fa;^FxR>3PCc#)j_%~VT5N8 z0}xX<4OaOZLrSyYNcg3PN$GPh8jBasnt8Cw5u<4HdwH$a>AbOabSH4(oAsyB#L(<8 zRukaUP)tbw{Pj-WAyz5`{cm~x0OU~fTLN85RxDsvO8JE_RW_#XJ^IE%J6&}K(HX+~ zz}wC^(1A%)-PuRPe;5XmUe0);^O_*`h-{8zGO>_RqTdki18VpS3Iw;yG$XhKmWXi2Gox@zKe{vqh zQ<)t8h{r+SeeXPX+!q)Knf_v1iz{X&pu?Z6kc&B%kojm;)|e^<-l$|5@CUs@%QBRY zQaQ&LG9Sc&T|^UK$)|j@t@A2~gSjU~ZATNY=Xh`LC3mlF`at~s^j*_ODAq=ZCRs&Zeq2#qH?^PGr>IF z>d0ECU&0twpCX2bQcM>*pBh?|beYJ6zpc;^Vq}{jwq|RWgrnQ&bPpTbc&z`VwyyGA z_jg<);GI5TE@C`S;(Q_r=e?6S8qB6D6KI}e3nd3ONuX|Q6~mSNE>vysVnZw#&6A*^Vd=P57z|$XvQwj z3)e5Z5nGD>Tm}o>Ishtmc{cBSlbJ*8S_-JZ*4xk4CB)k${sxv=6LlPuT}cHA0CUI! zLU&ZIn(~$qMmuQRm`W``Pw0)*P)ps3x9lpuR|aD5v)TqgVehh=;xO1IS2;?J~U&ma`<0KC*V_&713fs+`; zlqocyY+lT`5LeL_6!LjPFm1&7EaWX7o|3rejwAe3oQ#MZnz#yRp&;q&50AV!JpmY& z0-i+^l}h^bMBwL8ApzIC7Vx~gVDhiwb=v_!OEJ7EKH&=z)$5a}YC1sr$e*7_)pW}7 zOtpMJH)Z-%-uDbL2XKafb_l1s2?k#h7n1L(Y6+Bd1Y}T59^%L>0K12@1|Tv4s0S0g z;h%vNf@otL1xQ16zBqe&O{@T3e*L$Fn-`6U8Em;3Vdr>Ot{$UldX~pB(#Sf zU{`8jWWk4H_H`xyc9FLBR0#lskf#CTfE=AYO^&S*cokVrQHV1b506${boL|n)oXsb{6huDB@pD^^ zH{GI$AGRMhK~jl*Dh6LaXlT9a%tpwYI|OqP;;Y1z28Dg<)K*Q^>a0GxI!kE5q~plp zNCz+RH`&?WDkzmx&Y0zznL#S3@5ls@lTtNyWT_s3VNv zV99cC3LHQgbD07Um7W!kCy~g3|?ps?62;E@XVq&SZqZ>7by%;)>g}l{;u;1+aQBS*{nDIAP;s6?XN&9eGv#< zbj)M*)k4BJo`Lo2!keJSC}KO75m^2uLIW7!sSSLGn-ekpKU(2a*|--1x5xq)s~uY)w!ty=Q@*tDvW$7caT z>>cnuNe8aw zCp3U6Zfp)_Y{p$!ImSE-S}bA->Oip=1tdG6br)Y3*=kC`!t(csEXr{i2v^gZW*gYq zire|u!QRn+V+ZKi-@}oXWCG+dc(2XkrgBtR`dUK;E&~i}hJ-DIg-rp%e&2Y6MhwCt z@WCd8$a#ay|0Qq~?e-}ipC-u*bpoG?mIf>`mdA*EufJgH32x8)bd9~s#M{Yv7JI|- zuXMxq36^CR#^>g;pRHl)1!m#`Gx5t}CYA=e-m(E*-*K2ld1WbtOf1l+3U4?Ih{f9l zv3M(x63yPyWpEOgPY1pJ^(coJB`>TJCO)QZ1aV{v|#`?Y*q$vo&H?zh`-dp}J}?Kx9*v-bn~xLF!F8whczbX)f(~AH1GyIJ;O*ai z?w;7+AT*$`d*aU?$}rNEaV?W+TkL|(c9s;=p9(3Mh~KTl6ojVT4p70ImMl;O7pQ_d zs$d!~@Y?_iDk*LOqTr7R{?)a`u9>?hvK_PmKcD{mh=%=o3zb>*TA|Y zim_sjWw(R`NUY|jwe|B7~2?$9>~r88LVST zf|%BPxysAG75}oq;EMteOs2U2`Vg3%)(DNqeTpLnZug$k-FvMpc~M5H041Xy#ztkt zQU8NO`V4Y_*gmcF;v$ol{*I@h7%Z@ z;ue!y6Y#L?8yRMQ_ddb!VoSn(e=mpRD~(6C>bTVesH`CWb|$}#T&@Tl3?@`Z2g6TH z@L+IF-eF=H_Sn)|0mZ2Qf!rEnSA8sIJ6KO)+f`xCa4=a3mTA+W$6!D10mc|Mzeh8Z z=~4+VRkOPV%~>Jt59@B6>2B4joBhwfZ4dGqjKgksJIH#U7yyvaRTw&kG9sLf;g#QY zi=7N7g|KdOjKme3l~ot&v>U%^>Thum)FoCa!ET3BOtVH1T0Q?{B@Jt63bM%G>7l@q zp^|qQm5+AJ1uWl>0?SthZcl!}S4!lErl41%|R+dGuan{ zD>GmlTJZ|RKpFk)vRjSaM=M=m$}6uJ747rA8-fcPDga*#ys#p?um#}Mtp=RBkykG& z>IPoEsG!X2*8(DI0g+V>A}foKWk7|cLmMWPDc8Y=Vkjo7lb0>fDg|M5zYH{!r`*&C zCW>D_Me7dPBIS7v?x|Pwp+-Pl0PQh(lU@=2C^ag^<2>721r)22i=}lHpsWQ1(_9z3 z1qRLn1Bb$+X@SlUg0lee`jJ4qBz_l)ivhsvsR8fn#!OXZP`y~2EQrMhc|@$@uO*E9 zJ^OA5;~Z$pIg+R#Dw`y+t>U(4OnfkRsw7%a-i5XpBXS45s@<4CLb)Yzv=4u+5N&IW&I~0Tz=D%KM2{iepp96v*Ek76v75akuf{pPgyLfcF?J`T&!*CQCjF0pi zdS>;(n(Zti(Xhl->(z+j+3&_aeb6fqYkgK#Rk&=41~TE+tgE$lovu@`IBgzd||hbF@ca% zS5@Z23|$9F1zi=%Ub?BWFx|{NW)006JN?LfGZ@d}a~#j#SyKiOjt@Qo{N1bF=pMIQ zh6qr!r`{K3=&|wag8UB;kN-FC!{;UQOX@fp>vfxMsdAj|-{%xL+%H5dZv(Ecj5cRu zMld@Z6F9@LYYB+`Br zB-3~P3q%N6;ptQ7ZkfK!(FcX`h2u&Ki9yQ(J6l#X`wPauZUW2Db_f{v@p%se?IbCG2v}G8O>O;gl0#rYs-y;1pn&oFoR5Y2Us1O8Ufz^sXSOJ_3x!&@RkHORn#<^Z`{=bQp+zEJ zqMRunB{x22f{Z=7Pw4_Ae>3Ne&VT5&>+9Uw~uj&52@} z?cSUyPLFLUPU(`Nd-*eHa+W%7b&g+yfm$Ayb{NFC?~Q{FdSjS?ukmYKmNed8zaMct z)JTIwO*l73zBlp9&Km!KCW{*5mw->;DJ?EDrs?Voy~*?jXG$BmoN4lWKOT7TIXpQ) zs)G4Q+bb4WwYL+imNw=rSgrDT9$IZ`nsec5Ie=vfj8@e8^k!gfc_lXlY3u04eF2c# z8^@--HYBa;ta}aYS;dS$W**oe%hC8?O!LGpDDkk;CN?~)T2 zJD{XzCp(_Qz+VepqXtirIdl;3?(H=?o!+0#ql4XU^Qcud)$r2u$+racmQuwYF#UZ0 zZLjgB+39wyg%U{=zUh=Hwez;s-F;&%4TG8~6~AJh%m6RivG>RXAiitOuUJph=V|es8x0aXNI{GS))J z71n^~I_fBZPjWNGze1$H)t}+%3iR-k0Qc|ZQl%fYI^FgzyP#sQ5nN7PEk;qx=^OXX6w)0gXTU!I5u+2orc3Jlxr;VAOvuX0r}4a>i9YpFW=BvcRczq ziY`X-fG#KB@cyv>GPl6e!c3*TYBmn`a|>KSk^K+A*9AifBv&a{1rO-Vt)TRTEAKCs z0{>yxKEAH6qd`;(;8Ar=3~*BEcS0UDAhD*X*Lm`4qSodD@k5E<6XgB^YTj8u&0oVH z%_Qmwy;yCQh`Ws&uLOFTf#Zwd;um=F-y2@Mv!5(*$N3$=jODF$8uAxZJv^>(489uB z{N#!#^WPaDy9Bz=c%JHj`0zIAd~u+5082o8ctDDOCK4ljcGj7HI8H@CU^QuoehMxE zB=ZzBLo!*z@xxyQnz_*hhO)2jB%tSxTZlf6#nSz#pioK#p&|Lj%5Fde#R~nE>FQjN z^a`FlHW$CDl*XW^k%MQ*d?b1*oBf>&MNcycbJ$}a!aM?qLnR-W9)Hc~xeN4p!}|K7 zSo7I9hpz@U&)N!z@}wMpD@1v&Y$gG;DfL~nP!#?Bz`{$ASOYS=s@p*id;UqhQlzKB z&k55iKRlfWgg#RhrCdqylQd|L(%2$bZ0%LR>=U1Cwl=QqE58g^R|9^N^c;*XOc8i;_6|JNVY*EiQ|kJx9A*Vi8} z@c-`|{(o8g?*1f#IuNm@gXlIUGJplt{`U&C-(fQj&g{o-Anf*B)J1Uedh&AeLmOk|U{X$|Ys?YqPY(|x9x$cym+fxc2z+kL6 zJR5n6agnD7Wf4xvO^J;W;`L6zaPZTgv`RQ%ra=rLL*X=7{ruTgVA`P>%`a(g-lae0WS-D$iiNKC%0g&D%(lFeJ{o?#sq+%@$kLyDhg`$~z*D zlcC&D7UL6c!8$*Je<-)f5Uj913@mL}9_AuwYSGuqfPS7KH_k!h%L&9vX!k zK|} z=TO4>Ho>3~h&6;urGH-l>NoSQ&0A);gyjx*$v3IFY{l2N7aQ!H77Oj((cxjUTh>II zXBt+CKgyVL=Q87dzMl3!i3Wocum8aab)?S%r)(@Fw}sYbhbOa)VfI zx%spy-b4%7Eo1dEHOv^FU+!^eLG4tq1iu?`c7?tWb%P;kfNTX1$ z%hp>&Klb89bHCB*HoI>*)EbwPCG(+@72@0j>$a0wC6hldpOtSg$qc-Gl;#@U~ox6+g_}q+tM428oQE53Umb;C!xAiBDI9_^g!2P zbK1HAHYfKTOd|W9UBbrTY_;OPXSY%JJ^UB*!8(5L7SabT_=6lReCpQn2U!V($}$M0 zD1`cU(B5Ui?y_T#6Ue?%8n88a9r-*&Wr%|^^h14ebmGmal!$!Dk`66V`yR?-mcAVS z5Y{v|`H;MxtIR|F1WbAk+M#@d7TtN+KHLyP?3Q#nwkW|m6na|a6`*gqwkzdru$Yzg zx)eziGZ>3WLkxrT5@*}Vvya~7S58(1X`ZdY2YiDeNd3!TiV@8h;a~tq(IARGuqmI7 zEl5hy&ek%(b}czdtiAIDv zUwHLTEr=xkGtauK?}YYF7C0i^XVjohWiO<6RP^u|~%j2J8(k*rkC6 z;JGLeBfOdNK(MS>s?u>b!xM-+cwRukftoiNuQ*jq z{m#Wz2olQFoOA_ZFyrulgXnYxi>Wxj!b7jw^&@E!t(6$7wxw2sC_SG9gtIxlgM9B< zGu1WZ8k{w~nkAHv2LsY+G(-IIqx0 zQlbzuuIAb%$2u`s4DGu;u6$J!DmS;#G0V7);6A`hV}%Jt!!BrZwoaez8)>7IksE8I zQet@opVZ}>Bm_i*sHj)?30dXGl;!fj0%%gWspFo`n@L&USMoGix9H_Q>3vph-SvIN z?SiXibexh&l|Q}1M@*U+t4Y(c3a@nN`Y=wHQi>(bXz6UJuXE$#uENwDi8vo)Ku&1C5zk8 z`@6fh*XVS5e>RT}cDv1^mX>rY#dc=mbzsSUDJE^JZ9FkBr|rK~lWf*Xc44z#%)-V} zZIs~7t8LXwR=QPofVVbs$@uEEC+X&M7wW3Y6IjcnIXK$;LmT+|qpk8>g7uB{vh!Zg z%)4oP*Xvuw)4pDRoSSGthPNQYTae*>buv77kGa)Uc$YsU6&}Cn%Ihq@!N|Z8-Leya z2Q}_q+>2Jzfu#nHKh0CLqCs~Nn+F#c+My@}eVWLk&Jbh{rl8je40S*d1!arII(h%N zuAWm6zCWVIH-Zq?zjoWLX6v_YxsQMqid=)yw3Jg4vFTuBAyD?E!j**y0nEy^Rdt;D zgOGKfyJ9)JBXFM@o`fUmT6Opq;MeyKnhkcWCQ-R@UL4HPNCbnkiw$gOV7{Bmi_^v` zTKgu>8J=g8yrN3=WWl9al1mY<%$3SrCpBn&@vi4mvi_LQw>?wdy-~2v|$;F5|W;jA%c9G zlfMihWQNc%Spuf0P#(jBWl3AX`-&+tG?NOY0FDS3A)~V2ayYRdaO}Cx{;DC zAKyqD5x%eXFm`4Vtc=gc{3C!BaB;f@N5o%uvTI+hQXM(N4--)l^%tt1%(YS+qALBd9>P)12B`{U!qu6SZ<>0TjfCcJ`#jKA4D%MK zL0)NVEw~5luwiSM32I`RPz7q8qhT--l%zlzHmbd(>sFz4UFXQF*bV)&x??w?cGznwvl4Q>y`r%q&mPi_kf82$?!k zFTh>~n>37JvLhQ;Mn32Odd6wT*tu>2MkyYtfqFNouWm@7WfjGcXa7CUoGO}?s1>lh zH(;4ok33o`i1)ZJxK@0xukQUyJEVHjRMDZY+g97x#Kqv1-*?NO`f*QZ?q8FN*CsEK zRA7#lZ?hr2>b5F{1HJU^ zqCG$y$#yRQ5F0F=J*oYVholXCt+-{SBTJ6gA4wj_K*fEa{^$3JzTY_bR!>S{Z=1lU z+VMmeVTmr>5?!R3pG@)U$cC(tu43jm7W;PB-QBckmV3LU55fuNY0FTlC~^i}1W#2jPh> z-1CIs{8!FVuss2)coSH*@~btxInoj7Cd+xlLTcYVlkMN9bN58&=~mll?pN|lT7J)} zUq#1Crd6|NDoNW@qcuyZ_0!H=o&c4;6?&A8>@h&sgZK$7e8qM|xmeLuA7KrNP5I*F=6d*#*?po|C(D#`+=Z5K>NzEeaTXx!j`>YZL+)Hge>S3^ho9GHSyf zM%*2RkpT_)b8uu+rTmFR=;FTH%<92m0JYwSDe?tBG}tZU8YdQTSn^se$XG^gOGL*@ zF;>0Y7(Mb%c$;$S-RSrySAtEac9m|h<)1~cLGGxbDOP&>A~RyCm35`XG*2#n6>>>h zB(R1NU@LYlyz2{Ac08Bnur=lJouXg!8sn2j+l?mpCRqes+92CU*xx4sENQQk8ZK$f zxo%!Z=^~K6$YD7zd1A4>L#wt&am0TJN)-4DL^C{h=eaftydfl60Caj0f4t$q?gDQS zmRAaweGlwgn`b0-5b^VWy#d#!gErr1@0@z{I@n{I$vLq~Nd*Ha$?52Akl)Q4+c$lL zAD*pNQoveTH%EFjPvlMPpoJE9m*s20Eza6%c`hA}9!ob(dUE3!l|XtK!Je3oV-EVKHiMcwmn! zSI2v{AJq@y2ejs3nX$H7RvtBZCFrQLyoyV%ba%1|O&FzmM`;w1aU)KbFv74U0SlXM z%T8f-5p-w|r)=ztX&Cz(9(|ubU`Z5dQJeM=1sjN)JE>?q4=X1bt+gLFv1WSQY|M>c z^A~dS7el)j>jIg#B|MVs*1o`;NNC zw}MyaOi4kyi3G`6k71V!`w2($ogE!gc(!e*vah0p*t$S)Job-+mXzD>JP;o&lkwa& zT;$9IhM2+lK;X9cBv?5WrqT~`1!F3-BllQ=D^B(b=}$8`fX-jeLgqL)yhcykQ#(@= zmTE&iKceV17oeTvyyTw}1k$(WHf&uq!W{@GzB9ogq8j!uw&#CqhRt)s%uWPhQi(6p z@vnROlfp5$kLpg~T$QR^`jSXe2OzfkJh0RP@Gqzg#ms#ltWG z7LYFRHUM`i_0C+=1%{Nr=d3Yg{_#}@lyHmurDn@#Oiawv_BhNAa-r`lg=|^AMop*R z^kGZBJRKyYsm7mE{cBv*n9BE|YV$e;)yV}grF<5{#S0Fv1w+%Hmk3QS0uKr46yfMA z&pws#4lKlzt!B|1XVY*5J`IaZwTpFk9-kFZc$9Iw)VzO_4}l)9{i6ikkBh@Z4)e9FoIVEN&N zx}W~DTrYq0$r5)^#p-YT01egTRVZcJJInq(t{e_1@hToQc_1v1UjM@Yq;k@9VohaB zbyt5AArNFPk`)g65XR)e6=MIIgmw44lDRD^cH!NMu>>kP)#mP!Ju^XeVNP zls=^WV9!jFp@0{lsww(@^nc3Jgd!{??Bx9GeHkU7&%_B@vnUP-D65cODgY;|&d_>E zjhuDU)WJ^YN2XCUGs1;n64=(f7?X)2cMoep51kL(Iq#Wf=sdaYTwHd~L2%Xr;-FD#`lRJvlec$0>DEnG%s41UE3G}gUeo-&C#Vd$FZ+74ruAsGBRHJgLHG-u}hRGJr=Xv z7DYuZT0rSfpwn>G)$MWf<1p7qlw}#c{l?B zPGI9>%w0V40w($f;subU@lXR0h2-BZmOvcq7`Qvap-2&F^96DhZKuZ<*>-RQnO!$P zVqbCC8Ydx)^MPt>-lXwArX>OQT#s;tU2+Tv32ws#Ej~6OX+`iV0ai709iVc`BkrF{f>^!(xOWNNZ!XgTc5+i`4G++z zA_8u5oGU)lq&XY7NFshAiVYxEq_AI;t`;Fnaz zDQa;k?HmcCEc+=Yk%E7-@2+b{;D!eI6AhUss(5eu`;Ff%AO0U0wGof;K(@8_Kdne* z+Wx#vh&BM4`^c+*4f)d$*LOv1oKa^uE|q@KxYW+J<*qIQ;|&9}M|^r**%tnjHucJl zRyU-nk_ujW^1-BBr6%1UaW0)G_c4;o#G89}B8V8wNV+}d82&Ev=}?kbg}d=_>`tu~ zmJqsr>_J2%?C8=lAN>IqDjM102r{sL6#|a`>73lP(r9Vw8>`m|3|`Uvu?asA4I~}^ zIz%-=kc+q8t=c)@JP9MYy`wCN1O`YI2{z1VfxmFkFH~4#sf#BP^c(iaZp7^|q>>Rv zq4Gv8-f4A>+0TpWkMoCXV7&x>0Fgou5CDQ|U{++Y)L~AT+eaAG7iIBKpyfh@k8FaH%DvA<# z(kQHFBp|HPf>AM4zWFt*uHnPuVMy!4?U-q<7EQsr@t{)_CL(GgLXgiE;g$H;06DuB zCvK(b3~syKk7MM|$jKr0Jxhq5x-`a_@CmmFG6>!Gsjxje=+Om6&m8_Il9I`1hD=0% zFJjTIjrEjJvK>J4IT1t7jX3^rGcwwqTkRgvgnwxI`NSFn=jqkTv}m^d9_yN#+c{Co;1V$Y-B|9Ei5766&R!^>TRl<8QedT7raFe+afc((k}p> zhoFJ1R;*&6Kmbl}HW6APWpi6$$MXNDoC0u`_)j@i4MH+g-)R#yZO`3{|22d=s$@;3 z0`OXMbWBbj=i{ns*Ro1KLc`0ej)2Z`$c{!MIUI=v9(FA4I$69iVw}=4k&loGllj62 zyu^%D3|t89aP-feP?OVYTbRUk$CYjO=397qv+jq1i`N8-@TZRPzBMB0{jK)p+v?8A z&G%WK55)YXy7?>3iejA5UTnu2S75QD`REf}%KR6=?QVfP%)FiP{JI-HUIzQPy&HZv zHe=+}-#b}zV%w_Y=fEG>V-rFL%N^bxHTwX%guP?Iy0PZC^Kj=HvH|)Imn*%mv`MMJ zlbq$W!s7SdT~u*D7@$TTp>|%aZw!Fz{=Ybplb>uyT29~+xyXL^&)#QHAPOAio*d~I zTdC2=7Q#Qkeg%>(>yi^>xU;dv%>QtrRv0`z5ON?7=6pyVTXqL|+7d7Ma6E5_`?!+* z&@mS1yfm|^!ebCDdLCyi|2#9|>3MRY*n#rx+1;Y^=sD(7yhPq#CFOtA5QLJ~?PDjz z?1J5>XH4~eHAL7zAN-mq>P-R1GX3thC)!@+Q%{k_r{?_pLKKYe{#3~cVm{S>SdaxU z`r-e@g0SwWQ>LhL2=>dB{q7I%23+z2ukQt4W1j3L$F40na7qUixYr^0faocA9}Wxp ze4oEBt+^*;{Wc`o`p(5~%RKi5fR`=fmMyWT-wUta-`O@Q+$VB|OY0jaH;6~^MZJat z*b`v)i5o))5^2z`Ic9SINtgwaZ*VO8&^z?MeultG0}Rn*gLFgi^y#!XDVvrdoK_?c zN%(u$>m>h+6RhIYvS)AL>&zBMYEX#$(_EwE&BL|FG-s#$VN8^Vnz$r%7Ytg);7qDU zYyav7Hg_6rLv>ozLPZU?UsPHZ3aNmY$OgU3fW*XrLkjHUHk9E7Vmm?i_?kw4oT|F# z70&NPks;(_=J{tC@D5RmJfhA$7`xD|qJN15OcqmtM}637k7Hj{MRX;{VBVyGlzF z-ss9UM|s!yP-(7gq_1QuQPdAsPH8G^o|u&!I4dF<7~DRqHs}rnP!^yh!X=6WuXALY zQ7s}`=&TG0({c4snx5y3|=fv|%x( z1e?qUr&T~+-T)A3^i!Pqr%|l|I?F{^)4XI($p%B|zd}aSu-*TA)O+;gw$t9)Vz&(Z z@37ZnL<*brB!d+hs*KD#e*z9%Gd9-tzr2wWvRzeL&Woq%w(LQt-VW7YS6B8KSrtZn zJ>(lAP8n1_KERmaXIoboiwXXa`l?F+Nna+&I5!-=lhZ* z!kx*zm%(i_FBN#tb*_VCh{ZkUUVw)g*+#MkBur>{B=F2SYboY&ns+qsuax{ zn>uc9&=X;#T+$#+m@7W{_T@6hnMu(_qHW^_8WT#>{XINqn-$yB@-_*#D?z{6)w3li z!;(C(1_45G4X8Rfsqv>(TsMk$;dc+y=BsDuYq4u+V~+yG;_D33p6(Qjlf)BrHC60AojqcH4uDBqAi|%ue-Tc zzhpZCjj~DsSi=dB-Z?Kh*8fRlvTz%^C91e1@uUP{`DI||H)ULbpY=R~r136!G={Jf zHS5iliOn^EquGm=?`!I{W_9yp*)`*&hs2!DX6XQV$g-_CRKC%-Je^|_u2`cqsM<_B zyL->t^zh9#3YHMo@iEeFWnUfj&q;TC@NA3`a51vR2OS7If#EsssxdynJbRN>Y#+`mj9zTHvJ+#io&BTvjy8bg3l;3R>urvU z)i2cs9?I??>Tz>C(^@*n23`00=$QL>L!(n@W8XlhVDsv&U*Xy0jR)Rq>~=oI42Ds5 z%c^dTB_l7Kn5EE+?|Ar7?5r$mDdpj?v}m-He>>kbSEqe&M(}89`Vb!hkV$-`&Fn|+ zkd$ELy|17&`AF0=AwefKCHak3l_52j7QkLlV#E5KC`)H<7j#8u zSq`|NVm-fldVHyFK{=A6m*DvD9Xke({UO^jVi@{|%aN&1r1B^zfQ6h>UekWjV4mM? zEv0nBw&fMDj}16{wKWDpo)T(W@?HDjv~JF(H|4_wpbZ1rL5M7~B>*JwDl$pa4@(xt zQU{|FvP~{@6ln8E28%$Q3WU|bq5c&kB-Nb4VsTO_*{p(sq^S z!#~4R3SM8pfPGV2=8b2Ba#B1F*nWp8)qm{~iH8sN_SyeahK3dWHWv(HIR?f zlL(>ix1yp<1po7>Y%yKv4z(hXc2jEo)F)o9GOwHE`t;DpFIfygs<<5j<&H5i{e4G0~*8>>njvR*1_`3C=5f=gZ~omjubR|@5BUyQyHh;b)~$REu*CCTwu znqo&;RB2*#2B>_j`|xAjYvsJWP4i2o>4x8Vki1-u-BbpT9FXzO@`W85T->B5!S!R7FW*H5(vw)0+`w;zfL!n7u zJmf2LHsWtY{Peck>6|HPJrtvtcb?1{-TPH-t@W1~Rga>AuItw@Yj5Zw-#cgi*qB5J zNS`qpUZzEs4@JA`t1un_-80gpGo70%_k9zxswiHA6OogRnML7+-(dhE1rVR>EP)(! z4|ifGlR+*}kt1#H-cchh?m7=6D){nQ0u>3YskBgHthjOaNrWQo*xj*!{cDIv3GJ5* zuaIo*MzItN?R9R8maNaK5p^3p3i|(`{Av)gtHc!5rN9bz=JCqJWr{`OLmi!^B%9{U z51fR!>J=A{4Q}rTR()r-e$hlocaifJFI3M{5!MC)l*$;Xt$oe6icxqXg4UUcS{56@ z4slp4o?$NYPwP(j zZCJFJK#t-7lZfy!8iY0FBvW$(J{1l40h%jAA{SK?Om(UG=MX1HJl~dGq@QF`-)=vB zICD6<$h(l`e?-Zq!Z4h;1%@Q^FcGXPeG-iF9`wHlS?!t-PU1M~`oX@L32F=6c5rx^ zJqIV}1&WN8?Ub9P6XzyA+O-Sg?Nm-*fZ-llz~D95Cj@{1NPvJ&J_G(iQ})t34*98n^iQ@Mn%5is5KHi84iZ#nV5IR{F2w_my zJIG93xq-$tkpalF)24H&tUDYmF=SX6dG5c=+QGRvwNqrZ&!W54rl@&$CX0VP%dVP{W z5g?BEWTh1_)~awaaPgS(cgk>y8H<7jQW-=@-U6n=l#^Q{Iw#)FBFF|NKV=C(e* zZq0k=Hm;mwpPACozO+JE+p^yDMb>rC}#RH_^D#y#J6&mXZd4=eKa})7` zL274lt`OCDsH>QArv?^{*?_^GtD7=S&8_8N?odZcw`|zqqZEy?FnIi?ftTHB0uEpS z&U3E_lk73L=d8zF6R8G&V`oqyn!V>VI@qo|pcZ);#$_!3rNmqf66>%M(JF-o>=KGt@T;G?XX)9F;lf8AiI9b`yJ3fSKX=Y9@dnC%+?WBF!g z*br#QG=#LXJSc;8mo0k?B|6QGY{mo@up*&Ia}R=byr2<0?4RQ$$wO8x`#7ys$Q_0F z%t&lfw>iQI;45j>xd<#GviNHn8q!+BjiMY(@}u`{jRa>ZChCN0ke^LLn#ppw2IqoG zdhukwm^kKPTLgFcDDV;L#2@Ys3d$s){jW+0lK-}tNTN5NiW6p%WwGw8vRL*v&*nK4 z7x<^lXX;TwU%8kdLD5G^(l?)H4^4?g1fv0hFV4ht6+tQN2>{Y8(hP{bJ%4a;WJ!g#vC2E399(4*vone@8c(DWhLdhE8l z`WqK)D?gXY^Bpsd-sjWH_T9na;eP9Rzv=XR9{TrRUVHLFsE8Uc%bNsDL(Iw=*JPtUVFr9zD?yN+hf^zJ0TVw+H~;O$g}5C)emPmi}|L z^@d@pR%eB8h7oNm-!Wr;{K7Bm66}>$Qp*__^E@z|XG=7V>v^$K_nDT(M;w{i9ye%3Qm66N#USFTRu z_5Dk|(6aO5Nyr`JuBT9&nj&-P#cG*9vU8lhk1Gz@-pTNug?vjPR&`nfPy8ee*$DBv zsw5f*si)0rH4!u_exMVUWF|V3Oz`rB5f7mWqy%7QYz7q=_C+97mH_QT0GWW*wFpXh z5MPuOu?61Yl)~i{tV}Vur9HQ6yQDU-?8rr)aC@a6KD?uOVw%drn%YoOhYlGjRCQsV zc03#nJ-jjV2rem=Io@5~hHTk(@vUxIefm9byHv-JXk%aQ^hB}@9Eh~g!11XX8e<3P z6n6`@0j}&dZmmZo3)n&zYf)k@TxCY(Sf%SfSQ-72FPI4#KsrYip{1QLO4-JugORAe zQ>wFPc-K?iT}MdbuJ*yQoDivMSbO-a+%2fKZ+}1{0SI^g`Zdomh0E$IiUR#!$qi0~p<(Hf3j72-sAk%vbBv@oWMlQXL zQ)~QAx7vQB zqs|_V8~g`-<0|c0o)z>PJU803RMCHCP0etDcL!T-EzA8CV5d}9`0F15gNKmTtJwk+ zil+?AFw{|AjXP^wn?J0tH_x?sgBlf4R;Vc+lO2DPc2R+DQ2If8$`f75Tzz|3khp$l z1Pd|nzXwg*k2TR)yrG>Vh;n3q*T`9|^Uw47$#MAH5>BO}q-^e;kJqX$dPnXXygV|7 zj$0Awxb5-M2LS+|xml+&-&6@Lym6--ak>kzJ4aj{BS0sDzu zx}ibXHO>olE!j$}#;j>lWs48vcQt^5@Bt?Q(bdoWg5X`#(lU^`*jZDi2U=g9&pH`e zwP+m+2bTEutRUmZ;>hnxNpeg~Dd*DjYV(Xnb6A54*I3eHLdQlp{5v6#D_CfOb)A#t zN=!NbhM{#m2SE>3`C-B2UyO{hGXpsb2x!=DRdnFfqFg_PRC->Q=&93|#|o8oxCZT0 znr1GVDa0OK)sFRG2B`pnFn~2;=p_*9LqPc*{(~p|+|*ui9brG%mrqJs-~eV$cAIr$ z_v_!nleB+qON(uxTjt*98dHY9LUG`k&H4~W_`}hAyGHa4Gx(RIN@tSxqb0+uJd6{7 zJLNQY6?nIP=hUr$GKqp;cyf;FG}vrc8Y_Yl6zEz8sDL36oyQ}5$+dF)xt?}d$()cQ z^dX(kf9>-Gf8)cZ&Wg{=mhIDXXbZ=Gy57+<=Wk#k-Ef4s9(-sZn7CxCGeXaD zuK%jMDas(AGXMkjmpeg=2$rTy2whjSH62s2oSC63nIwEau>Gcprfz;TX)tyn=&dr^$(aO_mJ3gJcb0btZf?C2$iZ zlz(uo5ENxb;}m^v;J4pCa~oN}`ODYNuH0dLw?vv6L|NT4nNm(z7ji@?reH3z%CQ6wi#&Rt8ypK*-2CJRKY z{q_k#-%Nku8;PFWSEtR~eCyGyyf(638$pT_Kla;t?Zm5JVHQ!DoyD z9Qh$y&<>p~mh7A-0A1hw+)7hG_vqO9IUne)r5!p(``zh)n!m1s2kHG&q^)9=!%8iG zke=kV?F;+!*hv4_#-OP|MOY_+)QGb&}Q{=$?YeFvx6Hafvc)bR(Wart3sBM7qY~|wG6fgB&aAX zYO)Z~xHY-LDGUdd$?PBE3JIemDO2BPFq-pFpf_oaOEF~{8$9QVV2p6jCj1*^IzZIM z!-k|agwq&8{FCnX1tx2)hyEt*=!*RrI{AbrIU~;|FCvLUMos}akj+d4Lw=sOH=^G_ zp}GzDG#X|wFm!j@WD5!3`;eSRuxW+<)TU?LHN$VTWK-It$8Z|~p~={kEX36KJ3~j% zFG6#0NMoz(n0`r~SqZ;nB3@R7%SkUy8D-i}F;#`V_W}o>JntW}-wBDf&;@fiHxU_{ zclLR$+r~1ZiqSN_LftE6YYY5+i?7la_7|tWyZ4vAiH?lQCx07as8bt1zGa|;EQ{q6ql z@dK%nTNYmOdNe&)O@G`M{2|E_+h9Cq1;&D}7#1p~gbRVO-<*(-FMB8Y>7TuXfT&FS z5!>m5eeEVrarq@3wqrYI(P_z8|+zE466@_08B4O|yhPcUtx(^bRu4z7xS{bd?|5_TENS zg@>c#56*z~KKXWNn1DJ}yvs1LXV=#hpyo5&EWB^wut1<%@-HziB4Uz+u#9mUO{b`F zH`{@zNZS^+&=&7Ch2{dm-%xCOg23xWRTylCxSgx~d{w3RV5JEfebJrqnA@oDIo8M0 z+xJ(cct7q%Mn~XW)0f6+DEI*n>5NwMkv%#Pg#Y4eI+MD2CjjcNENkJbRMyH39+p${ zdQ>eTKh6qe1#Kaz14=zSS}`0z_9%5q_x603(5MF=I%QJbL;4L~aj|6p?k*qxf-`LO zh1UJK%`XqOu<*1?__@_fpPBV|Q#vwYv~U8yQP|Hl-?!s=_qn`d>)Uged!_!Ot}U+> zm)5FJ8})0s?wfSlasfzrJ{alWQMgod{Hck&QCp6GdA}=MS`vrHi-O1J_jqJz%gEmO z%`c%D_v%iA$W6X^U+#e*n`|QEh;$goG>I=i#(7{R3VA+qZDbqpY6};>ce_NI| zE?wg_t*o&|U(X8+fWqspMaPw^n8M>VsU1c!By-8U7f3Q*+apAPkntY*GVtawNaW9| z&X3sxa2t64@bD#S1ZF;5UipH*j4hlwclC66`})FFma|5dPUwu>2W?APy?aQ_nAj)7 z6UcDpNLBjJqP^QM$j6m)F8;$EkI4aZ-&hM@PmN^8(B(}k-9O`fU!Hv}q9CBd!*hGTrd+@%$GAFrC76^Wk+$0|in*n>3 z)Njdf6u>5jc*Cgj{rO7zu%f1plK>e?{{o26ppO~dDsvQqasY+7Q#tWKAoU}6a>&5qhG zV&S7VVzeC_M@R;{xiVPro~~%r+|?^A`Gbc>iAqo`-^8?VB_j%!S3zWhQb&WbuE{h% zK*HRM1bwRG4Q)HyzpWOg?{~(A6k~|Sv|KSa&D%jRqADWfIG0P z8t3(SG$BpHrX_DQ-{cI>L@UwyZL^IuGFS>DgGwjm;RCb}8lk6_)n+^B2QL0)iXi_{ z9hwWgy=!3lEzD3X2xy2J#ao}3|6GFrI%i>NVc)b2LnH<<1je!lMG@SsCJYnW+>i=@ zh>oQX_(RH@iqLy)56f)K5jo?e6M~eA8yFp~Ys0n=;}G!UoW|R%;Q$e~J6NP;QJ)oxk_+U@4yPJ%g~xGZHgB*n}fB$gqQA_PD1H+^jQQ>i$L$(@+7AEb`LxG-A>=r9Xr671j< zgHlGLk3l^+Dod9_@PJX?d5@N#*jDQyiHq2l(-tMnCnf9p7IY5x&DUf|&iU5r#r^@E zxnGzY5VWlKy2%a3x8g<}f3=)JOMdaS#cOrr;`#Z-mkp`5T5YlYIghA+fK|P4w#%r< z^Kn$pq_g2PxDtMdqD@?i6GO9Hy?QaH=G4Y)L+b9&-+Q&*371ew+9?)!JZ*~>ZvL;_ z=kLD>`wF^h$Ee?4wWcuqNS52nlcVhbfWt7C^C*C?S-6tH!7 zQ-i$zGcb*A5Fse}4zkfD=t^G*q$=dgu<8Z^!Ly9+**Xg@Lyj;}>m0HfvR*SFX7VkJ zMNDYzB}YA^qro!LTZZ^ytGNWiwvDR3hbt*o>=2B{T3Y37bJV+kU5cZ1v!)cI%*$F)am zEo)J7W)3@d6)-U?qPWSULCc={{&^G!O}%qnoF^f~Y(VjLW0a&x8UKYGPz=_=8&@d@ zJxc|Qgp-_okoGLaT1=P)WRck*^>oI@-a|GF)S6g~ zFp6ho;H{0}+iB$uW=pr4vT4SO4ui-{su1)gn)o&3O-=ID`8Qy&nMKk(?fWtTX)GJ0;A?PEA+9XRgxqMP7o%^?7Sw`B_NUjd z>KWO#xSJw!hNM}8yA|v=v!3R0^}kgp^Jx8Pw97k<*%owQ;)I3#8LX}dPhj1J_+5Qv z930opT>{00IJIsWBfHxY!zZLJ$BjiKW6nd*C`fX2*B{H7iV~V$Y)*=*^RvM80Mw~0 z6o`HJgfYv9FO&!(WsfMad`Cn4veHy5_hzda2zP_Cn0eEQOfbw)q43_v?90v|h!FgC z*KXWf_{%0ZLXv_8j-=>>ErmuJ)FG3)9w2t^M;CYFg@AjtBUJFB6MN_R;ijwV?doWq z)*P}%py!cSx5@2JwyjU+z3yAyEN}Br@QVUZK@NPi*bWlo`xHM(=h65jJYUuCHIXZfFYu zu3ug@wOYk4kQ&`N$JLC(a!4@!hYzq6bPL;||Y$}QU0sR3vL)6+lA z=m6WbiQBccZi$bhV#}~(V%w^3*R#b*laF-Fbc_|s6lmm>*spU9C6)z$Kfn>&C49%! zT73FCtHYq_>qkj}d{kyotV5?)v$>Ug*D_ZQF<~`ObGFe60p$fuUIZjZEM)vE`_yFa zU*i3zOHd##K30l~AsHOnnE4V>W|H9Bda&tm0_h)Xrsk{Gqy$NQ9fVdTK;@Al{{8a? znUM_h2~uO`$rEKSDvmJ2o~W@B&rSE>>~NwZok5O(O^I9htscC!GOP?F23%>IZj^@0 zem}?7x_6ME-8Qg>Je$~Lw=KTyS6gT6*0l{D&ZP}%tg%K+)m-1&TgR;CB^6G7`VZcx z7>W3)q@#gvUE|An-w=iK7>6l&K!~+n@fLb2{DmGb(8#Yhe5e-jRE)z%JGhY2GHc=6 zC|dI^ehH_ni>l!LG!;R8a)ETj^T)oo@xp`nRF*)_4H@i~yia|`eids)g*jUC#=bUe zP^JeBA@R0}n#;QBfWaoId446Ev*rfusT04F*Ddy+1;pEFRO2g*cgljVADbKt(ew)0 z7#ZIOKe4cDxd|{rluKhGqNR%}HwRpZ*~9XKc8$;8F*y>xgk6eMWb}#@NHQC>*I!B; zOh#}Rx9U&BYzE1!%SQ>TbGDzlJG(lq-^K=w3nWM~`YHzDj`dA|zs@rBM{YB9u z!5#P`8yG>hL>+J$yt<$zy0PL~xT)5kS~5|4V-5Y2ep=*0cAjr(4$i61*$z%f(%^6z zu?!#fE+CW$pN6a_RvdKx&E%#}BiWvL8U^5M-T_1!NDo_s>wWB9YZdAZWk0e3{fVSv zn6`Otp(nzMl#jpo&om>rQG>wSu(-TN6o+9sF;L=L*WcSS-~kRq4f%3tgu%&@roHPf z65O=kka5wK2`BH&G@S zT6rx@+HVs%uw{#j6+_<&4?gF0j|DZLv_ZX0sI3pTk_Mty!dUh@kqu z)9Vqv-;~P6hkwvpT_Uobe>n9}LcHlTTSW#{E$rAUaIJL2tZ6~zrI|Wd}!_bzHiDY=kil~*C?FKw1(^}-4bnylPz1a z5dP~hjc*DT6UaezLvIuN8_onhw3#}DFoUaS;r}g{j4sBoX-GJMn=yo88XPBZD2E02 z%01{0ZjU{_JFn)duk2Fc29jAzdM^41S#n8%DVn6@?Z>7j%rL6B%>nZw2>~}VNa!Gy z5HV7;ZR*FeSvxtc-b`K&=dvJN;~i(5cB zTOJbHaPLPEz4d~qfA9a`-uDDPHHGHPs1&s_tk=Rh* zwY2GE7i_oop+7hqaTjTeB|4I%$A&&~q14gS^1Qoz{&=~;zPavd`^vA!8D~E=wfAeD zmpz&C{RrFc$IgFzZrR|@(dF=m-?`2T`znZU6%=zAP?8>OVF~;oGp6#9I#ZjBbCBKe zPd=Ye^sZ4kxGfK%r_9GI-vPLJW$Y0^;jI^W(C!ktb@VRHZ_wi)XmG~fQPh38X5@L# zn);gB+U{RIo<9CoHskX+8z$=sdiF7IQ^t$9_VzxvSk94VvAUT$-q~sCwQRK2FVO7F z397DLq@b6{sOKruX%`s`42+SWL8|9VeSFt&|M7LnmvlU|1=7P5+_bf;`~0{Sw4nq` zSEwYdCeR7{91McoX``kwDWt0%P&Q~@F``AsG!E$K`g6Df${THmf7HW7^|FL(Trp{~ z>ib%^OLWMXny-SsDHiGL@NRlU4y1tX7mym&L%5H2(5L8Xt^$=JwDK;^J!%2Xm32%! zLn$LnKc;tYdc-4)LM6O14DS+isIW2uqgoWwP?lFl3uu%vhzfcJ#vmd|R@h%(rq;g9 zVyFh5Uso#GyGwfbtnt_s{so_P*{g6|cnaOUv6zSLZ6eD=%j@#g66qGjy{;i@ht~37 zB$#ken|AvF_N_V4KbIrNC3WBGQ7o<9+x1bO*UPTx&kaCd?;=qRYvkwDu}kBcgqM(-XkZXioW}udeT^13*9jFCy=!A=%tPFv z_FSJN54%h8$KGHqq|5`Rz>rF<6anWk1%m(q<5I%7emnLzM3uW7Ejgir!5co91F(NL zeJntfnNfzI=EWRtfC!ht9a;{PRW~#;A@*es7c+Qv_&h* zjX8=n%!@^3qT?o75piqvoCjPMWmynH-C~Xb<<3)o*yK*`1cP13Q{_XVP9?2 zQRKZ9dlI+)I*#ztZ>%gIGdPJj?Jf(Yp-|lv^-rZ1MxN@Fc9o5w&|GYVHy0###PgW%kX^h}=vvSR* zH*S_SbMC?0a-;?F323rYV#*HO%PwGO-{l4xpG%vJzv2Q2sH2#KO@jGVQx}9GKN^G( z*Mk#v1_6h4-(~tu%W%NHHX!2X?9GEuRZ53V_~b(r#GyPvdYjWiV3L z?sFVRm|HSTm_dbm?4Zx&4jxCR(8gq-lRn8O2^c3r7H%7#_b=DRe8cYJNBZ)HcQa^17S7Od*r6L!y66CCTMz}pX}ewoOH#LJfZlLoASCjc+j+!UcG!6b zjTn+CzMZ%^vldj^&mCWkYg1ZC$$DdD+y~Ea#pO<2b5te!f>lgJMZ>pDmLx`kfJ?X0$&S$Kl<>QaQt;&67u& z{xE5OBJ@ZjCt&H4IOu|iK+9gQaW%&Ofih_9JwYv_tTiTQla31Y?D9yUr&t530L}76 z9&lPKt%)5BMt&Zp=?4yQWF=mAvB(bRMgFLJazPEI&M_pWQo!6adQC|FR!?Y*u&nSz zbsu-8&83nL+w{AxFY$4nXQeaQ(TDFsdHcwB;2-a*|u%lwr$(C zZ5v&-ZQHhOvkP6Cy7#@9nTYcTGBP6Z?RD0UOmkxHv4m!&>Y7O#!Wq4YWzDNxKoX1RIn4xY4E>4vJJ0=j9 zC>D*^z-}^CB)K}Uw9Luum@ci6EvGWD!yY!jXBiw=jR=~=B*g#s`e%KQ)u@Anhs#Mm z9~9O%716Bxu@+_r{FI`T`H4C9I`j#?U_Q4>m%w?8{?dsSePYu6WHXgRieC>dV`GD{FsI2#k1aR%D%_N#L^ z?}gN2fm73|Q2=P%&$vf}*T>FcLV8oYe!-^O_hLhD|GSxAU(>sH2{8%S9bzW1u-vvX z5!)4JJok~L7fa0CHWM&1tU&T_Vj3TJ{FDkX1BF5=*Zf7XIRSPx& zEI~%Je++=*QA5D3t|=+z4D+3t3_+L+#zldTIm%NwZA=WDHv?FOpmBt84@tsS8=az> zrgC`ZlG_E!7Xc$H!Bt2v)Zc@)Us$K zYb^rZI0IM2`yd>84RJhpjnnXphV#ugs(Lsn^ZQxHKkJeA;xiVL*|zP+aWqdKqc%FL zNRvp6m4OrC#n`xYVd>kqQ#5Sc66SqjqDHudm8AW>+g(HN91LAlWSIy|VHaDN`0xcu zG@-pb-zc&YOwMIo?%mmY?E z6!!{=cc$}CofwQdEbKD5gG!)ByDgV#FU)$D_su9zSw#Nl9+momwDl8{iz&#SObAqf z-EDFlXfG6ev3#T+`)jl|2=U~Odoj7R{r8jvjew12QqR()VfTDTUC|7K1}sVhq7sX- zc~ruAl+_4ASmw&nIv4+@8BP}+?c}%uTa}H+q~)HZiDpq}P8HFJ zKK3@!Oao;CK3X^YU=zAk!^oc@^!Qt4PAz1zM8Y+m_lZXPKQ6n zaVP6C!aH`54xUS_k-0Wj{z_OKK!P1reuni-x@0x5iGrJ{*Z$P7R^a%t#lA30aM%vQ zIJQs$*NXurp{9fe&75(+&N4;OuTalL|1Obp7Mm7;8QDlf{OuqoyUd-X8lM4GIyOa$qhF(- zlk{A7W$mG{{Hud~ddmKf-9Y={spl7Vc~>UuUTrNn(e#Cij^iHq2Xi~HxNu(H`7YwN zQd1%RZp2%OVI*AUC9{!;AA&>s)Z(t@0Z~+B!&^LLV6iis$S|k53&TQ*B$9uWwFmU6 zr~bI9Ge>iVhhciITef~sObT1aj>R%uxe%F*N-I&FN5zW{nPSai+)d1a2bf01n`t7u9 z?L&Wu!97^FML!miKKJV}E+4W^mmeNX8Tqx~@O$^4Z^abSuaAp|1_k`Lp%;kzy5W@V z|AwUB^Z$uR0VfY09$%_XTpX6|W97%zbjL0yCy&PBgZmB=YLCBR@%Vk-OlUQ9HMMm; zn;TyoTv7SFiTM6)&CIR+c)ke9a6q`+Q*vsHha|o|abUrQ5Ck)rFS&F-FpSG3A5l)S zekS6{uc%*9jJ0R(i59a+Mow!JTWIrPsBek+F}KVRc+Ur)_am^p@4dC z)wRNq$u!Ivi-P%kpz(+--TuF<6mm%9P_;jlLvZr)$F$XbV(<%qqdgvV@|EEt8f>&Z zZGdp;urV`NZgB%r^J{kLH!8K}?e)jQ2SjX><@|Q*3+4vu!p+Ug8``vrJ-lFAYxvA> zTm0jfyJ$>e)I|EsHlPmTxc+zP0kqR$PnCANV0+z?L>!+I?TVO5SpFt#R6KwQL43Ii z#zKhbcRAESThD0=U}B#~thkqX!P*A3jfj&w8XRDW59ApE=PKR6lUI`Q(u*nyz%zzJ!ES^!s2;<|6Ovs_kW_%y;;DT zEE4jvB?67F?+^0VH8nN7M2e_|e}FnXjF_(|P_?wM9xt84jnwDo3=J$kVperajE;ssfUDLHFPe)-rnr# zrkZRRta3=dB%!*nI)UJmizHb(G|W^BP)(1}nk1z%S6ECKpRn9pE$)BszL_EMg-eQp;c8dAr;)G z#j*<`lDeh_Onkz^g(I4jYMLF)gvB;t6G?K6k{$htnCKutc{&Zstf=)_P_VJIgn>R; z@ht@=$|nHHrufK=f8VKmc*KP^IFZ=mF;wVny43I_g(0on5(qc8A&5l8z|E}gnFV4d z7YvBuN)|$NA=l)#rP!iIO9=Y4Rft>l8SgX=%)*Z_6-RU?qQn_A%HIL75^%k2pqN6W z%7)0(C{4^5BMRxkv#(qO8SqK-Sph;zF-VWDCL0Vac0q9{F9xSdEK$<7$`tZPjMAn9 zW1#ZNpcY|y%b2z@a24K#4r2**5#Fo9ENzs@vj^W>x2vZG6L7e-Jer!CEy#_Kjl17J{+lme=7r$YR8;PTRlV1J2mhue-sVN#$@mz#a544>nrTxHg{J**)+OG` z2I92~sk#o84b7uPr;b?8vM7rp4z^sD(z9MM|Nt@qBQ-3BPs ztnpXXCu$_$KBXLsDvsUB!RsBa1B+~tGc8LdiW$@K6prH1Uc;MAP9YHEt>yQfR9k!( zTKHV!?PN;$KqQe$M%UI0LAJ)+DIM3m6`ij(JqHa$ryzO#Y(Ve)carp zM-o#mM;7cMTvZ^F#c>FMJbcs?q26Tz5#M-1TmYyYHA}UJbe;@(G0;>8IgUU%9`eso zVVymgunR~qltJbJj@Acw=dTU2Gk!+6;z6d12wB>o1@%hKC>auUl)aXd*gy6Zlc5W0 zaK;|UVjZSsw9@kd%-c~>r+i3b^y>xfH_q%^fUTW{ zq}^CuIa-_gUkM`QmTsWTrwR?9gtgdk_+!Z7hlPwUMk4_cRgX-`T>esrER}#OBNxT0 zeED4F93kqg;}?!VC#c)X(q2Paqx9n_OG~eVuHPbl3C_P}419EKnGchB7>?o(gGUV|*Jjp+m|OhG5r`#!;>_tYHQzow3kZSEDIwPcuFW5bZg-VPnm|C2^aunbeDse0!8nF$H1Ee}}geMFiuOhxO zw9~o1$u6hCYv}~hc=k!&kE#+Bl2oe=FgAPIaw>&t9cNoOn)o-0uyILDK}kHe;enkY zg&-UXcI*!1HIlR$a*DN}RU`*q4rlAUZvzcZqEMl2kbdhB8D<8?jY!j|fgY?6wSkf| zO4lI^<1vZBZ>4F#>itF>4>*RSvI;;#Laud$o#hd^7kdd#_rRfp>bZJw{z!wBJtR+E zlt+K5(Hy(!8Yp6vKQ(G~K_nOKU)2(nzT<`%1;@lU_`_9kq91E{xv|K6=l+QqoDS#P zHEcsTh~`2MG!CAAo|FHT*l@%Ya0)fMAu*+o;o$Rg5mQ#@*~Jc63D!m271QZHirS0o zew4|IIP@c5it;Ngz$TUG>69=+VAbg&_u%A_lQTo67P%o1H?G@~VTpNsUqkkAmo3gW zYw_oxEsxYbN7MX(qE{4p#>Ep@CJ%sS*e4P2XUw{^Tu6v}&+in)fqISs?Iof`Juiw3 zeSizA4gzlAh3__HyiW-np8#Wu%#}3A1|^WAKgqMDus{mI7i1Si;qM60YL@zr5H_I! zOv{vfz<6FL{v$ovQRxbFBI^rIR%QwFo9o4Jd&Cp!Lj|}WC(Co%e;7Sqe0cxTEaLu< ztepg@RiO0#e%m((H*QGuzaM^|hyk!6@Y>cjsQvBSkwal)S9$IFj#-0pFG$t^?LW(n zoaY5qQ6)eXK7Gbb+$;@pS<)PsQW7@0aivx-&xf6|5Hg|=c{&v%6kuZa!(d**nE9c) zLX(GbLJ*+;7EeDvaWmu=xHEBiR{@1A7~d68N!)cGN|!-80K7y-mOe0|^@-b6AV#1X z6#+{MypgymEAv4rwvNAszGiF1zb<8mTlQ^`|9m1d;F(I75V5fDe9g-J#)50RzRqt| zb)bhnpvzyi2m(d8;g(r2guSQJj^v;Qe06Z-h#^i#$gZ}|$ka@eOj z*!`?-wno9BYInwXiH_IC>*J5I)zogZ9>hYix?GT#6ikH7PK88XzC;;KZ$TttXv)p^ zfgv3@7BY-BzAd<^qv!OEMY9d9Qmx8M5NGRh57v8bm)az=JI{;JL!@+mqH3#3@h7K$ z(g~Ri-BjAUjXA$_+L?$gr`rlC8_zlL^b(FlQZf}(T)h6kAv6j&d_l}LUgr%VJmyP^ z_6}D;z&RZPG*^NE2Mo$HHb#wp#c%2~0*KnW!E-Ig1|q)Z(I%)88%ND;U_h7d2y$Df zFq}pB0~aX-MHaHku&RL!qy0JY{1_i8M~B-$(n#@CLgDDnAgr`UI6xX>P7T4&0jw=alAVi){`Rb=*f|kERcR6BwcocslB7lN z({jizDOvMl{Bq%c3R6Z323j=(J%1Vs+B72y7y6ibt8TX;Kz1UA35-BbrQE$|u-XzVL5efGzzj1%4~9-`}#4R{Xg}Wt=H|QRXm!3b1c` zpY^-8->k{q_x^>`N_X@c`8KM;^QGi9|0CpQwl70A9+Je9SgbzABZk==Ers5-Ch+|kSwm0j}F2|d!?w} z0dzNjr!;vb?)j6625^Kd!l~B>(r$?UJFNI@Rt;ls&jC&)o1Sgb=f?Sji{m%l>*gBw z5&cF$>y9xGxR>y$whc?&*u8dlV}JFB{qFjrw!w_O58K$koCf2|{P4|y)i|sT?%WUa z`=VZ`L!PC?N@D@-T6%zsw$#ZgIHR99w2LXVC-L7y{8UbA!7k!>U~c)TJ<6cJ4dXh& zE|D8Js*%VcVpdNsTSxX)eN6dtpw4QOl)5+QL$ZL4q^D9fk@ZPM{vr06x9w zp2^%(p{xaQ-Y(!PHdfBZyZ~=j9w%#7WU16|(^H^#q*la6(e6!3lcR0( ztm$UtD)gxv$9muLSMFeGrFEP=k$pl7Qg!T9%eI64 z^UdmKh?*IPX717?&AZdHN;-7DkEM)_Fl}b~3!-8vb01AAjDBRV@EQC;S|_1Bl-+n% zZEAN#YuONTUfB@oTkbcCh~%4y2HrYlMbjP9IlH^rz=M*9H)3uIRfT&u7=ZY2za-a* zA`O6Y#&x1AhVW&q8>aF&sisi2vEC$%kvlhh>VcBp>7`CA8Mt04*ia4E3s}s!Wg*T>zAd`j8Y~Ab>UuxB@{P2Ehxjt0x?gRn)HZF)>Eju}`3@sK$ z5$)4MZ$L7~qEo<{(87B`Hq>bG9MkZ5Xtd0fF!f16IOVVnX)syqiYT0M(jW$AnFMqZ z6W1fA3WFHmgQX`M|4;N(jxk+t`n#u|Uslm56L^C4q4WC;BxAFTpZ+KtU5@Y^;Fxb= zcBP+;I-3laXlYVkd>RGTMC@IelCClFM<2f$$6}Td-4N^ z-IqFxuvb8ORn>yxa^CL&%wO)OVS&AAqh6qfsg>06tHU5giaR)K7QE=jQ9LdnGmwH+ z;eS$GG(%MKB-~c5+h-EE%wnK)qL2G`+{d4b-a8xo9MA2tmZc_&&25>{4ml}j05@nM zIL3xpnf&KT%`D>H^ue{oUF)_#PU{XICMg*?B6YjI1~U?`7I@6b+bSZGaqrYk-ZMod zU01I{!<-Y*>zG~sSb3tf^gRoQV;o=zrwDUV4sbf1@{&G!T8HvEFLQsPveT!>gH7A; z^Gfm@l;y-<0ey)>HCmAi%*M5B1w-;}V_F=mz>td|mO5%%A#jz(EKV#o zVFW%RSXKD{@dKg3X2Gw{A{~g=j4@saD|qn#6C8#N9I86fsZXkH2SS zUz>TqS1>{Hg^?pZ(4_o5GiCRTZVaiMMZFkOQ_E|XTMs@(4IkVBepO|C1&{Y*>N!|z zc%vVQcP(c0qj5-Q{N2ZSN@ugxCb*-znu2{<%b(GC^)I8oT(*Qq<6vkN7-0FMD6`&4 z6eY6WCCEMi{E9zOKI|QIyPC0H9RLM-B&grG3UlIXuo7QL`x1Gwd>#HTz%5pc|Lm|` zq+@76?4xNLyx?3=hE?@MpqD zvW!zF5;6LQj(`UUwz)4t5N=4K6Tu&G2j&TzEec`zGtNU$YS}@Jy`9fgpGLMp>6L49 zs<(H%1EIgCh4xdbQg$qVhEYS$01q(`h>iA#j-u3Ml1OcZjJNe!B{J6m1K8FD#)^(U zj9l!}?9C_~{2hWQz;Ac^&aIQbdJ4C*o2K42K^Y30=Kc%7SDV>-e!r!wP;;!kC|WAd z9;BRjp^849*;fz8HVs-A4g^GKlyLuf%3iW+?l4gct{IBThxRM^yZ!IH6&MP6t={Mm z4ydEUI-_r7T&~eXti0E!A~c?<0z19^xFr_|RP+D=Aqa=_=tBXv0aTOpD;a;ekamh+ z<})yKv|=AToZB)iq@!sw)H4wTgp*rOHzCfSEs*}M=Wa?i*8pm8d97AO9c}T_C1`Hy z+uJ04NMBfoT)KQ}WE4Y|GR8P@u!BO74^*}YkHhWVW6z|>5JiOTKY2e}n zIrPV;Er8mobXJOVBp+xl>2>&F+E`-)8FrRgRR2zDAK{s_-BE0|8{pte9getM(L5H3 z2H8N>895g3EZsHRjovVXr`;#=^qe2IQ|qLRNYZBtKCKmxDhd@6WVR4B5Bd!<<>b=9 zE%~+0KpiuUy3)cY7T)q|mM%8#e>N|=y`Ek_ri-3eG+)O>9@7hUmRf?YtK!xw)=xM>5o%S z&r-d}*a9`)auEzv#Zf1TAEPltZt7>9^NB2n>3ld2z5`g)I75f1fb%m!7Q{=T&3GA% zP$7MaJyS8+(@*0u8@}&;9aR@Dn{N05u7WU=A&K*m%%W^HgeVnx>8q7y7uCN)Qu;M! zl&)5+>n~JRsg%B~S){3JK3m5G$4}FuLK)ToWh`XsCpD@|D4#>r)`%4`SPb$ti_UAc zSga>b7%ga%l`BB2^481Klrt+7Ppegt&(B<}ic(EvnQK>jbB-h#TAES(>vBHsw;-V? z%`?GaU>dq{_LznW>CboXmil-IH&air@Hfz}_}N~&p8$RlQ4Wsw{#83yt^TzK7`nmF z%G+r)lkyL3!S~LLn1N$`Z}##Oe$obWxBkT*L(@ET2fpRz!-HAY=&w+ULbP!T?M<%+ z@Pnn&;B`LkbSKLd;%!mrD4kiTom((!JLl2_b4X(HFU5+4WeoHR-r3qhS4*^k+ zg53r=dc@G>Z?9pX&s(N|vP?dM0wf_o#wSa4V`x@(@S{tq9IU3v+3JLo`#!@P5NbY% zLNd}+BwOfRSa>7k6X%xak*xO%$(?PC-H3BX$Uj-uOYSa@yS!z}&NX;?fo?6u{Qews zmGW9qpJfajkMj6mLEh1AceP-lDlo#3_>Gjig~ z)JS*Nwsu4QZQos(*SB9JlNYzRZhAkPFfUu+H$*~nejjB$KWG&%uWoL7wnB7R9Pf4I z`wsBm0rJBbXiy$osj7XxO|d=yES;}zwsy2l4Tr1si_h-Tk`|f=n12F|WJBj8`;IDz zx`s#6;$8Jj{NZ~BPBi(W7*ixyi)y?iPwi4hdYu21tz-pzvC%${=}J)II?#>Ik5bVU zwA9heOvw4@iVQu&c@DAAOtllD_WpOiuM(k@R@ni-vSW5r+NW(vDJ9qQXu6%Hf7(OBAiIC5u5WWs2ujxJgdw-0SW*41-F z+WuT^2)aT$>jYn~`gWdr(|T#1J422&6pgr+o`xy0-`Bu1V!z%#^z-)|?EOwoo`1SM zFjmMoFdr-S!BWs!Z_<`T^>8k=;E@wL;I^+wT{g{tT$Tkc>GPZ{ni&bbTi~-k0@-{` zw@v6d{}o6U$pZO_nIZ}EvYAd}@!x+P)Ecxz;xcklG|hlqkBi{|58-GlF2ie-3)}Nm zXo09GgHGMKhOhSufa%T-v&7L?O*CBC{NcX;HkiII=V&D7*si2w8NFj}^dM42uPvuhGE>u-kv6L-h_et`9u;|b;{#2VOmLXUP1M4-6`}631z1nI z2SH_%gr0l@M%^zxp^=u^LNwlSO(@@51Y@lxQYRDy;CcdG(k4C+aKkX2pcpw6 zxb}ncfkBn3~E)u6im+g>M^j^o}(3o`;YNMT$J&EIU-=!G1F4Lnf=g zLk^`A=}^+cOU7QDGKO&0(Za|RVi94(jUW<;=hV0Gkc^ksS)E0tMPYZ9kGf|TBMZPihvkU8;=J# zhD;6d&Scxd7xjzKUu2zF(QGkUGEeOT%LR-yn`AN?;2{s0ZF_~Nu*Rs+HT%i{XzBUl zGb~bYEE^HiCV5&cx_sc05Ret&161Bx#hlTj-RU&{Ba$UUQUq)RTE6;B^^Jq(&(=Sj z4ix+gGxyWGO9qxEiSh|+EapMKcTeAxiGddJggm^ppha`N=WHxSiJf@OC*<|2n@730 z-E7@z0Oz-|nVb@Zr>t;Lqt`z)FYTFCft}9e4va<7bG~tz92Uc85PZK}{2fq_$1!!z$J9I0(~hRX|d~rNgO}M zT+<6t9VvM3@Q^{HQ3oP{GQTIsxF#Rw%}w1!4*diT;x3xYJJ+f!zsoo%Cb+*&NKG&8 zhgvCxyKT0E-N5=I*ZAl!UG3GT-A&81Hetsw82C+JpRIe_X5cOqI#w+O*o~v}kU9T1 zR^j6Z!)DbxoV0LIZQyBPWK*fSh@oGlW7uQY~|1Bxm&+?vv@*M{RO4 zG1bg7adzo8S6kgK(e5NHKW}@Ve9?r8=cQoBd3AW*jAwX{kE6>PQyp+-XW2MX&fGp# zQ0`~-pGIjRn-k&c2Z7nUD^)GVZ9MZ~lo@I(s$;l&*pb1vF2MLOix1Tj#5FeuwyAw9 zmXUIBT@b!{00n z54-WrKA9#rK8{Gc`&|@M)5ot=dgCy2kzKrr`pTCJzRHKx-r<5;#FuHepYE1={%Urn z(%J*J+18jLsCM=bbcxW@O7&U4t;(7KIR86eohh%+|}yb#eZ}A!sfNp-d(@tb;nt%z~Wj+%0l&U zSXT&rdK5b5I{@`>Xv^N{-{lX;>?1?15G4SQ?EEZY0bsx=V2Y2Ar>?@wt4mUD3oKS$ zbN*6GEEwg6(27;+_!iDe$5edTkzEg#tkG4YZzHHyE!Hx``LJ=AwR)fD$!Uy2q&<>d zJeN-XdZb+Kru)B(41BqMg0n$j3(9)J$_l6CS2Q2ZRE3nglZWN21o)quyxX56s%+9d zG%oK{rVj}fZ|rCf=hqaRnI%ovR1MXMb-A+2_E{Ik$XjO_qsQvtvT8Gc-kN8nOZ&AJ$LLbi=4lAXprA$ zlR=GI=yZC=0HumMlgv(R1n+hiY9}XuQ295tlBv}&yVokJYd@lJPg24fxh{_IM z3TVNJSIQ_H>Q!lZ`z2p~YRkwKbff3AOkCNt_9Yi#>z(7_hT7dsViU$rCTUF5`FyR+ z;yF9IVLo*q-brjy$yUGW*{s_c=%>h4_nf|D=kDWZ8k>3zHUEiaUss)Jv@m@~SOc_} zKP79kLOTO+5Fe%)FVTFu^2r^2>8y!Nf2wIa1cVgmvIMH_xkF#l0>Av zEp?E%VW2<9fAVJl%fmIf&Ql!=*IE}HtQ@xg?^gw;w&w)n0pcK-mc=&&jE7>EThID{SmRSM3pS#V3w9*U{{lqbkvCmbll0}yl8pJYGMLU|T$ z(lYpz@8)tgqZp-xX(&-Ki6~%J&usj504vfGUPSokO$;B#d%tFv(39ay(NOy=2BVou zOhOymG;2?A&BLNc3wUe_UKTJP3Dp3ffyB@e#O?q#{h|VNK%%n6Q#Gn(lm0_RKOya-vT@%X37?7o*bhhEvH! zMg<4jq|NDgIb2NsWADe;x~bLF*Wm+C)$FKEkp1FatQc6Om;p-R$q9NUV6_Q-xEWcH zxNkh;bIRLX-4A{w>4YXr2XG1WogIr*V0xh6NH9N-J_|r(##3z1@trXRH7*5=qx9@D ziBb`TO~{oeJM46sEUm#rl;+mi-489uCRR^$tZtjyT~;BSF#RDGQWR6J7+yr(wF$^s zjOE{A6h4KAtRt*58e053y1ki}V}S*W)K}Erkz>Lj8UJPCc z17%qdPWE}lGC9nm9#m6k7Gb7pslaUq7Qqdb=Cr{132p0s$e%j$^=a(g2fLw_>@m)Z z{;qZS^XI1E*u1HWb}1T2!FgbJAHT(ENkL(zfDzQNr?Vz4eDpdDy2D&l{XBWg5HGWb z2ZM>)lNM)$HQ`M#AU0NFg)kpH)JYhEp?DL-o^7aRx8_nNUGyL&3ALqAknLg(=q5)# z?GIB0!V*EHs$i&#uA&zWWYT-V&-2GhNL5$>CM!VziVCftwu9HmEV1&lL7Zvff;1>0 zeYkW@SFD5Y*VlWGDTl~zpS~`E4l$uet&#*6V2y6BIKZkME{Xzj&_D149}Q`h)>!iI zEmHR3;?x*0NwIJvWECVIFD_STtGd$kURrO9ad{jT?v zn%ohRK2m5wz>XOH_;7-Kp?c5QYF`VE)_oI_fraKnCwdKAB|$qffRY^aeR4iz95=m`!Zu{n7BS#^+c_JuIiTL*i_ZGn@jt zZWhTyS$kO0A8=9fJ}Jj}?Z7^!(KTy`G&&B6Pq{D^o65%i)n_Og49$^@y9mH7?iWnW zr{o}Em3vrDc?9jG-su|PZtZzjM(8!)czQznd*2p+8$1x`efaMEJ+FO+ByP@|ZQt$6 zzz)KU)UzU6tSad_aYhjSX{~)T&qUJT#%k#HB||Y3qy`SM10hS@gn}-2j0AI0&n}E( zE)7-QkCfpvO;560*y7_J^;qK~Gku1=n;&k7p9Yf4&!jKsb!!!uE8DiFHCp?1))^~L z{FsW*rQcHREU-fTDpRFp(Q$Bmp5qdK$CLR-u%cTXiscu!{Z)Qaso{79`xF%$daiV3qdor zrCcXA%`TG_jxBMSO4&26b24?zzE|g;TK46a2Se6!g<5e-WoS1~)1i7&s<{y0G;6SZ z;O?O=LtCqnyYwf#-tsLNw z@vpN6kVLQ7^=jlv+rO*#KR9L}{Of;l%xfSrz;(kPw;KMcUmXfQKiqfNQB%?fyT|9- z!DX_6tEuhDLh@KVUR_PZTrQ8tBf;DMB{JD1%GTd!R}mpKwgHP41SCi$%-Cedu;GKR zSvYeG69(}w9#ni=;)Ej6le;WD(ql%eXNP!0?(-$O1FCb{bqI$Tz1roBJwVkH`M^^Y zY$@7+XmI)kQ^&r9n?Lyv>)g1se|a76ociW<1b>)WYDlK?AA06(=}*3V*fR$j3fGKh z(PSf?7yw>FMT+}iKr%jg@*zN))wgd?9}v9=HpH*3FE~2OWa(FzZLEi5HUSl$ctpMznP)8Rks68F*+W61I8>j&u?9cLy1(ROS3kFZ@Ac ze4~^5vWZ?Z!WMi84HAnHs#dzk<)^TKi_7s!Av=>Y=%m(Bi&VMlf zj_m#X{fX^YJ>Pg>$RRlz&+_NSB7I<3mlDrQq6x+U{w%gX3$QC3vO@U(3^s8i^*;n+ zE}gf|8}k;j;u#dn93EVgnx%rxFlo8>6O^NO+mHx zpp0f0omkCy{_l@SQ^9Hh2nfn};F)Nd+CQy_tmG96m1P3C>1~s^hm%Q-A#N2VP0_!| zfmy;!^4C<$-7_kP7*X!$IS+6(R{eH&NZ{R+8&SbX!Z>UH4~&_3 z(EurH0*CbrV@3^F=C4twgnjCMO@Je4RNB+H~cMZ2iRYSbKy{K@$Uon)^HVafXXGrtjU2o| zv~ORV{dK-rZ|rlYj%x|I3{%x#&I(pxtz3QHPPW2#rXe$T=qcd=1w=$Gq>=96nh;NY z)Ctr|QDj2l!3FM+@Zi{>0k}(BgG!kRE zGGV_LMaj~?i?9|=Y^qQ+2Y#mnT_Ez4O3R5QK0pmz2nq+@+$2Iu!f8PceLwcf{tB&O zejS-O%O+Udhp`2FIB#m+8QlS)Cu6agxNM}ElP#sd-qs{9mva<~4(dYYY&yzttdfF# zfo7?HL!*>jx~a02SH7-b(?r5)${df$ss=l@*zw$Q17Jx~gZkLl(t6&??JVG>ZX6Bh|X`zkA( zYE?{Upr;J=+vAP{ezBf+HRz%wuh}h*GO3hz)##$6ns(6}EVQAl)M+Sr3hk+WX<6c~ z>r2KzDK2HuVxW>B>nPXIfW#h@9-2mTLSCgg6-C!=8(~{v#1* zWEpS3>xHCCmYAdns;%oI??W&(#lKb>4&*iW20bwGP@9=UBx{u;=Pt17uC}kJTzqTz zHPo=`mwMDABa?b~tBLmq53R!$HE?a81QWkdm;YE*1pPE}4Opijld>$qxzeB`g)0J`W zIRB$QSveNu&xI`sM%F*&{d3Lx{*T~U5EK<06cI63QAd?iF%s+|*U{Movbm1oK{6~X z(jYjn#QlIivz=kDz1ISV9pjw|9Qb72dReHdX=;R+YJeLP)TA^swTo zone}MzkCY#cvE941D-8PkeD;x9gjjx-go7@UYx`Rqk6Y9Tmz{l77ldy-&SwMi%*Mkd%%fkRqES;6}_uDR?H3K0ycJT3wcf z(LkvQg}WfgNw}Po8$l4&~pR5 z){iUb0J7nT1DS))5nRu(Tvm*oERDwU8V%#H$Gcp7}HyqCA(nV1&D^&}5#6nUS=0m7-1yWwh z1wDz?m;u_UOXUHVwV;wCXgFVpHVNvHL0sgcyrR=lwl$PyL93C=HS)L_IAx6uvaAd~ z_ZgT*Y~k~(OSbw`pg_sLEkH07zZ<2KYw$i0O6wW5$QaD@of&NYBTDJmBm*xNPl%rk z5pPh4xIpeKN{RS5FlFose;Jf^3Z!*U6AM&Ey~f6Rhn@uJrjK9)dIO8Gcr|5~`x{d9 z2g}s*Al!2&Fb8O{D~M>PGX7_2uMz=+F48B6s@%e2V)@|yAku>^za1qv4ie{;eXjln!#Uo($E0F2fB`qJd?qR3XB5kf7wZ5>i@EnM^gT_ zt7?T&@61ZAX`6Zhtjg@siDp%B>^M+!9i?Y&I*h8)DkkT$*EsAnOTQzUW{HLYE9eSZ zdEwP|i(PwxU2BQI)=U`N0#SCc^MMuG2zT-ft89T=sxYHCCU)FC)2=wkJ>^6|ZD2^j z2;2ErO?6)i^f;aEY9}G%8$2N+$-}e!?Kpi8DfWW>C8H36M!lD+z$#9peu>xOPT1n% zAQx}6L_V>-h!toUo&VQ8?&of`QsQK%8ljgL?7I@CPe}}~+oMOd!XJT;O4?=DqpH$H zukY5nwIl4vY|dkn_WNm=CLAFxtF^~vUzPjmS)qNCTraTbCEWXmpQGB@JQui#?yE9c zIayQ1v8bJ^#7y*?L8CAkr`#UueYjSg)QuK( zXfJ#-HT0gVU0YCiM+hBy%%zQS8QYT;TvDu$IyG&`lt)3&q7Yf!%gYC6o|;kFw4aBS zGezciHQ(ptqAkCBdz0?SyJDZ`cP~Hg-#|Gr@yn?D&EnBW&l5*L^uyQhF7`au#jC6* zUPOs6-jw?YBk)dED2XOp@c8GGMUY{Dgl(ofSmR+#`)?QNIyB$7b4Ke2-#|X%IL)qn zk-xqnCHm(>hiTmF(BeVuRVrt?lRqp}?@-6sSzdEXTh|t6^+AftDN3q(cV%|^sk6?% z8!LILWETz)J^Zs!{9Na6feGf#7kmou4{vVnI<~g&k2)IPkwbfl#6DRilL}W<&BPk} zNsC12WZ$9a&lS(aJ}&YGc9?^(sJA&;(QVAXOOQMWQq_pX2i;I@C;Yo{48ukQB&YkG>15YU#s#-bUU5<-finE zx3&nWlPpQQ_5uVR>OPXx!RL9^R8E)p51T9vKsOs8Xg!hki1w!_TkITASn{+LtT^b( z6W;wSLC`POPqlrfa}=S9xDbk20IA)`i7>?sXeSSm-50XS+tt{#fQznoQOHdg(&u+oDQMgC~X;wgZiW* zqX-u?pF7C;I5Tt8kWkhRU}l}~yg0oX5mUbevAw*VE)$nw`}7{;%nKUL63GAA>f}1T zg&n_XNyONM^0YLCLt z49%iHl+n)+!#0(=4H5Gd=P(bCX#i zy))(ZQ!Y(_$;&N@6T5o}Q&breN2-jf|EpO9`79onr#OBanIMsrWQrCCa1IN7mU0r@ z!-+#jYjU(}$%B&&8Wp8)(HT^WTb$6=lJ;pQY6Gt!VUK_uR)yi&AfKi~ItY|{Nb4@Z z!h&1Vmp&fwi zDeQ~@AIXrti&#DYDa452J|`rj?kJ@U;wF`mbyb>Y;PHh5T*@G0G2$KmRZt#kC)SW2 zqE}=#0>{EMR}N!l5L!W?Qeh^emri6C2U7BU8@w9tJJgS+L``r3#EKgpLo(n$#g|d) zu-uQiB$t)owx-3!M9sicB*`cQhAib8SWYBn$kYu(?0+yrth9@1I=k#5lY`Hs+sqpB z*3bS4zUg=&2wwe)MTPS)FV5eTpYrUOe`#jDKgW;7|2Iu1;2(3{1c2rIe-9q5tgRsb z-^$9vCl6O2h|iupT77cE|M%zP|9eABJelD*fG~N-5e1saw~a}9enaZ_S0MFEPJ&m_ z$B#mDcqSBylW&V!Pj6?)t+%$Sxb;@nf|a%PM-SH@t$rPDy~~m6<=FJ*Urn89FpOFM z5;|~`!@5wy2oZ}w7-ku2SA0rO(2bZpFoX(*vL*d8vcH~$d?o5Qk~YO12mYy*v~iaE zfi|u!iO~bKt0@&@^-_fm{n+3u{i(iKEeKrZ&`M^*reF;SWDOYB_=txtD zs{p${;uB6&=o2hQ4a|KC;qOd|hqhW^uQB10#R8?@gZ6cRIYh2IHAD1jg_{sO zjArKatLrCwL-OLbD%Qyh#>9#yz#m5LTqST8ss@}!pJMW5qupV^{t=>x3o^*#+nCGc z*={XmcQ+NU`2^G=u12t*CC3s5)M^^b5jRCY@5+730DHlPi{>N~63s9Jk&r%xB(%vy zmB7Psf%n}^jG378BQijo(CmN@+-Zuc-+QLHV#cq6@agc`g>LE#o_< zX@Kq9(wddq-IVMYPdkMY^g<>R5|@Q?E(_ChO}hwhA+jjmN#tNro4{=|GB*$?=#2c# z;eZ{*T%@O6uoJMLx(NE*fi#>~4?gwDAv(Apfi_D?m0b@luYeW67A1Zm<7E%eX;=pY zMr7;x5toIaxGeLqN^Ka|nHZ-gx@|}^p8~Yz8bNoE#T3%1wQKj=L2E{*qkd*lvkU;W zVrZM@AbH|`$fyhl>ryD4#lj*ezdG9F>q!24^Qh1bDW;>nA6i%ZuDCDcQ<&Y+eXFt* zpG6OR3}i=im@p<@ebezF=)$^luRC&0_? z86w|y3RSqBMa+jKct$b&2>x9t175~|o0CD{90rHyZlmxHb}jA4!Ae{Ku+CPrL^FcT z?sgDXb;Xs{IVf(x9Wmc9Z*n3bq4yn1tPy9 zdL{d}r}bsHkh$o>lbdX9Ag)wg{@~Kqhy+h zQ|VtZ#ZSxotLb8IXb_S-As)ET4nunbIU+R&pN8U#ci9K20RjfU2H)4OJoHRf0vu4p z-Z!EsN#FIv7UOWp0ne)xZmBICSf-L8d2~YCH`$zNQb6E&g&sigyTS|-7~b^MsF+2> z%gJLwXNjy{Z&dM}8zD=K{|0{T!^V={9e%{F^xV%6lb-vL&>>@8m@kT&c7!s`&xs~^ zbtoeu61v)GxR;1As>IuuGo~-vU52=*b(4Gk~`51 z7BI7kkmuL9bfq3$YjONhOmAlDh}OoBb>>cX)2G_IAK2iJ)<(0m5VUHn1?k|j&|GMm z!`BeI(}Kj0yj)q>XDVmmnzt;|7mK70kRuD;So9qX9gXnH2j~9BUix$fRLsIU4|zvNw+6=mO;Fg7y#|+zXaF|XrQK* zVR|u9YN4ep1WPDI8w-vvEje>#ZU$iMeM;srRV7RsC1$h9zcBh;r-$yf*PfaV&))Wz6r-bk(lkF1;-nN8kOfW?0>UyhQfKFSY&DUEipLLNo}eD@r9l*&yE8xr&!qtqbBUsJRksF6 zU$OdNzke+*_CAl%9r1l8pXO`>zkUEDM^RKtHISKoc~F=V>cN;4RigcrZ-w#|E{ia9 zR6jEqew&l{zBW`0h^fzKdZ3HB@*(x4!hbUTXo63Ia5+M6N7He2rg5Fd6JRHam*dZI zeHg3I$2h$He~d|Atpt3<%eyT92HXfh90ZMu4hOD?1E(% zZczq4y2^*y49)|rz-wsBjf0mLP(NW7JF87mg?+28Dkf5i@!6-L)3}gWCu6^gI4|^Vw3$SHmDJL$mxw&S(D`i@ILH{)K}v; zzj3oLv~w9Yizt&`<0drsB}eBuL|zWZ2j?P;iKQ|BtnJ=M2}H)Z^1SyPndc?=HuL~e zj-$`>Rn{Dsf-k^4`IJD-kw;42{O!9`b*QgahJWLzm7H~Y5p3ulxF2b43E(rZOl&;I zrjexxKV1ES>MiWvy?RtDl`uB`7YIgloNIyVMY_NYnB<7FuBB{Y?xJ#Qyx3KP6n-x7 z+QO5I2HdOLY3}T7M0@IGI$P+Z|3-Y`JVajO)1o{>jtYl}JC;o+E(ulFiKLmLnU7Gj z%P|1EcuYJu*%R|9^POMvg5f&9a^}kUH+owvR6@5A{cKzae^>d>##Js(hC7%G;a55s zlB=6(L0?~I{alB-f?b051ATjprev=`Vv~>Y*!P%ax1{p6;Wdx1z!-CtG8gQXD2ZzV6^F z+Z`#hMcb%211J0xho!a9C*wuv<-UgWg}T&(|Jyg)z&_-D=|5;6!Z){kFJ**6z%^K| z0p81|;R~4SS2jJH=5L8?qbNEK6u}-S0~<4zur${d(tVBe+@K4fD&;q>5+T1FTSa`9 zIziL-@eAdAGKo1PUP7chEL>GmPtGm1WnVR|xWoL3t`K?|Y`1sXVj1|nUX*0FZq*iQ zmw487gK-I@Qy71{me&Bj;=4`!Ut!CyS_3x$&^JHV761LuVKTk`@b8NF?1k-<9P34l1-NxUdPGDH8CyZ9}}v_kNm zjPg17`%W^|$8dHND*opW6@NR)f*<13NpccAn@zHp{bbS~#;yM8^L)zPZ&Sv9u z7zNL!^vla=JdTH1l8h1^J#1v!#vpEpPx~Zpzv9DZ9M=5@#2Z&crK?RAgVI-5zUQd) z2g|D~!OH6T+S>ZV@4ik{Is@5UE;xOeGUsB{VerWHAX6)UmeGY$E^J!W*Ru(T`Z8Uk z(5ol#mPpT{KnpYg7i(~CO-8!IQgpj}hhn2x4``d<4GPeZGHx9}FMsUO(&^fE9|LwXsPio3zCP=dw2G{FbwNkA@t8OOGgl?VAaZ`Rxu z*4$T$^EU)|kZBpKjP;kd$U_2%VCh3_q@}Y9QEW3v`^k6Wzk{QGGl-}CmPWIO7+w=5 z*bMCzEtUvN)VT1evr-KnK(tMGRUlV~BaVk(8XT=PgNU6LunCAk5REQsHDz$bWmmPO zAB_prI*BvGS60VPM-C!M$QX{|^BzoH7{rv)a57<`k}`m2Il7F%d;pY&a+HvzsJI~M z1y2lm0Z26!sv@cr@VF4SKgyt)40L==G-AY3Xh?`armB@1={2|)gz?#IC{{FBqxe_a z^e8R{>=Z{AOc`e7i-uyCL_p;Lf7RG-W-@AWfXT9t$rv#|^0o|^FB5yun8o8bf*?=_ z37G7Z`~k3LYLhlN7&9c(V1vvQvomN?s7nE}gOOm&`)BA)K*lbkgnS)YHVlnxyCa1O z`Vi(*G>US&DYT>Un5Wnx-vi$mJn<}Vnf#Fd`z0Q7BXLU)+D1OH+)^g1O!<85fo)Dm z;Q^y1rz0_-%2SAlC_($=jf-`PbaJxX?MgKIxh#d)v)!$pC}BO&&7K%LTb>&3onaE4JLBsav=SDESmRdR5}&_Vz0U8hZ2O>V z(UcI;fO&LBMUKCc?hdk%1%Xj8x@)BdcmBev#68J4|BRWHjC2{!>l}0NF}@J@mVsK% zfw7)n?d-kMi_8RG4`1!=?X)+$q2sHqA2;_mw+`F;Veu<}fv6e>GOQ^;H+S(KdHN$5%wz=PI!K)8;;Oz>(|CerI=c|5sP8!}c$So_-y6cH0Ms zo4ap{qw%)e`TN^;=*p#A;ri;=PWOl0SDy89mS%K!9OY;($({|`K~EA>`OomuNPYqk z0TNHDfI`$SgCBB8+`um7O1mnY=+=B!-HUW?(c$tYs?ZF56rY1J?|0f=oAJX(_}E1u~|Y4Kr4hViV{HoUaqu zJjGRJkenngWY+$vC{8H2(+H0wvEK$u@ky|-@_1!sp^@)L`*Va5RpOxaZO2ff_K$_O zs>VNq1LwK+t962`@wf6{-nv<96}zvv08CGp#r!QJLt%QnJUCj0zP^CEHdY?4tmsk} zdHix3(_L0p3E63 zKjc||gd)d@Ud%@)e+f4E+_)O;V|P|3Y&4BDSRdNbn6V@;J&oEAdCK2LoGTqk{TIBC$`ryU8E}24GNn$$sYX0F;q!Q(vq~aw5}bW zFzJ>?YHAR9-B?x)!k`|i3X!7I?COv?HoS=`B<7lM!6nBciE)s% zasrG9$3&5<=W;d>GSUyib?mepyx%J&8!)7F#YNdV0%Aux4csC))*Kc##k^8mBGO_i z79GMHS|bN#aBMwwjNjtsRdV6tWxt~=zPM0A2qamUyuEd!HAo(#qOUZ>78gLQzm^~yRGHjw->rQ!S za!yrEz9}oasJWdA_6fD7W$~I~di(P%B?OVN$hYz6DYM}@1_t-%R6g*NO(w>CP(d+d z;j|ELw|4%$Ew0=t$tQSar*bS3Rt67;*mT|NC>q%xrste5Fv%lLnvVLCdns3uYldRc z1-^L*OS2pa<^PV*EI&c6pXD3@u#-r*jfiwR`N&hTf&B!$Arls&K(`Kt@#IQ$t4$^) z8a_gaM*oZ=S9A1CMK0;HTBB)FV*0az)kEzEsk{7hKFC9_T+o%rc~YXNS1h>?v~Dbz zK&hKAk03_@6va(~;8&qE?-!iphg)tmv_5kPatslyDGACktz>YBN|njb4)m%rUT;{M z=d(J=%_`}h!1EQhIh=xBJ1}j?`H6~h3XpOS_W{xZ05sxin?_>~EnJI2OB$8D3?u2n zI7^l$3i1O5_k(<47%a)3mLMK&G%@`Kp@QzW*BCC)Ulru2L%^iis4G)qY8jiNuwZck zMe%zD@K~*?MIo%9n1{5)7@=-H!w~oEr{I&s=wJgj=fSc<>p1PC7i5KutkNWY!bfvZ zC9IR=4IC8k6W3D~w33F{l8=~lUwc*Jo0PDjGLt+XV$jK(Lg=LQo0xY$4YR~)F)*n& z!J_y!DIH}(&Nhvy;0(_)M3L$ru!^mAJm6u(Hh<|v+~V7Bsrf|LOYRn@e`BL>%2bF! z6$(5_2!eqvcNbq`#3!$hi|Jt+6S_Vp9oIdvb>2R29Tyj7m~T=}x@&3HD6KR6=pvZX z)05GFN@&5@mrhKQ8b+bXth}(7(He<7^BwZzgD%6-etQjw<21C=u+tv(!?F4$pexL= z!fqX;kWLz$m;q%9;%KlUW)#n5Q|F?K-5aHC~h{ucsZQP@GeRC*6km%)}Z?iU#Iprbl>-*Cbug zGp$KV`t?`~lDqY9vLF$24_}RPrqWhpNYWA$J+oX!UyYMw$&BLKz0^?u4_T8FUn-Nj zCaud$n$g4~eTqgTBRg?vs)~4svxx^9IXbiPfbH^<0=iW=LYkB|<4s-4RrNekB<*4Y zTZCHvBoiN*P&F8B(qqCCUz5O&pQ*ZpbPdYH9baHRW4L0^;h=E$aH09BoS{^QT;xOf znp9m$12~yre>r=Mdu<(+a5+56QY06%dUJx&8H4C`?3|#Cz+nH`AEvECSzSG3b5ae1 z$toeeeIH3Fb1LVM<+=I8^V2f{T=!8ZU_i9j0nEsRM+3ThGHB*QrgL8XPdJHDRIhRx zBikU^yeHg#>NMhuaLD8I*@`Jc(AGYGaNfiK5!$RPkclzX^P=GNg|vMYuTL&oKba?{e=D9_)`w)#Y zLI$coJ@JR1s9}ED{Hb-4s(aRh4ER{&zyePH`O*GGyTk2t&QE{CWsw}rxp{J^2kd=p z6wcK;wEBtRDrB-hrB1+05e%8Rw@kZ#5j9V+%7f_>8}6uY5AlvI#hK`Fp(@fT5Y_ai zi8XbzPieJJ{xfhU+ss*#iO<5b7>AF}v3w>=FGe+ra&qerAygp>vpj)Hq;ty3Kd^{+dggTyi*M!ucrN>BtHF;!%a^7seK0iqaI3u;H z`bG<9u~5A)V4ynAKOqVzpbBM?(EH(z!`(=d+p3oL_V^@A4n^PBcxuvib83?gCAyny z+YxFE;C!=}9&+9fjo!}|p^jkslm6|uB8dpW^Ax%%OVBbnz^Fr%EF%)rjgF_ViDCkR zqVtz}iY6l_3-MfN=9H{_UThobuV!ozhuv2I9b>hpT-jw> zS4y60O#?go-fS{K>$eo=fiu_h9MthzldG9bIy*sD{XN>`yCuQu9`ql(DTx{8h`qx9 zCR73=ocZ(&$U4%TA^+*|pYGs>3c&}rcjIxqBWd(X;ikLx^wzdV!L1Azu34RLsvSwF`lb#wG6#aHOej& z0Fy-;;B(kYRiHaUd-ej!-hwS1>1(?6Z;%8Cdi{przguJ#%UU#4pGk{hRGaXSN+M*4VxvqpXD8-lW%bIhWBVbq`Q|)1$fzoq1&Di>SL`Ya~4iW%6i@ zt%a;3B|rA8OIvz>;=$%^$rSM=N{Kl1Z7Bo`-Nq9a$jH!R=5K6I(BOf(glrgaL$HAz z4}Dy$D|C#Wib#$J>4r`2q|OL)ER)1V`LG6Fu)2?<^0rrgr-Ye~LD zw4pUg!4$#^*XsA<=_M1L*vg5Lo_R}7WyP9naGtWnVuylfPfw})X(vL0m34YV(X7@W zIx3TR#qq?x>JZ&14rKraX&VxK7;ujBQ+_LMgz3B@a!F-IF|6 z^2){23gc;vT%q=b%zlgpPY8;6C5#k~z3LO~7uGyVtRw^91s)4%EgR%@0^q1dn|q7$ zZ9Zjpw0Ig<7Fpl+1N&YIuamO3ByQA}*Accra;II%)8%v2y%RDui3sQD4a-YX{41i9 zEhi$`dU8YBv-q-;P|J}!p9GYmu=U%~AyH3dBPp(Qe%zI)l*{Js&vUE51ROG#Xifw4 z-FI>4kX$Aq35_8fX4r3}B*FtpzfzXP}?c@ zi4gkc=`RC+nk+LScg-AiKl{mt^N7XV`q1eN@0m#>NjbrNuO5x|sHqOj0-_D2D;-E? zB#|n?g(7ezA(VHb?-d!rtH+rc`8^zYSN4ao_smFgHxCslCQ*Ulbv!JWe+X{<9f*ZD z11_H!tj3m#HxZNnmgZF^qxyJdm4iL0Dkl;Ci)t1{`8(f8mt`{>5n%gA7_j`0PV@KH zMf)NNqNWAq+Y8>HMh@&(;50(84o*)l+UNVNlXemuY0D(5E>lw(^5I}$vujY6>Hyan zArr`vZ!A2?Q6**fm+H?DE=1S~Km_VYQtQ%8VTrkO%%e+QA)NIk6(y2rQ5bzx%XQtU zTyS0#H4EVVePmk`kt=_fYpAG%wA7=^<>HT%_Wtil5Z+WapT7H^Q@pUyTt1Pr7wr&f znV8@0oSvZaI1IHoKVE!zBVw$0{!G#0k+dyfqGj5ixPB7S}3X4*q;}o~xY?`CD*112c>r#4jsyAO{9o5hKqESt%sPfOU zgN+U}=Jun<$Ur&2bgc6SFfW0p^k_mY117|En3a%OaZ#?o{(!+SF~E@RX%Qh~%<)5% z(mK+Y6hZD{Ow^>aD}d>{hNyTVY2HAN=gSsTw0Uvw4Y>bwp`|+&+Pbf%jixc`3n2}i z0vlD|q7!(d(G+jmi~J`-N?leDNc)Z`znk@1nL9h*|LJ(2yWPQAFXSZx^2KMFvvcYQuG(i1)^C` zL?~cnXq3Z*^91X>$pEF(^>JkS~%mV4`x8`qp(w;|T{Gr#!->M-e!Qxpg^uF;#z4d6!UPV2=<_6V~ui zIrCj9U(6S?=9pA%gnN_TR3&=shG*e&U|o3$8&BGVa2w;Bc#JHqc6kru*g8XNLRw6b zUzpNS0fwE1+jJpxDA%FvblE}oF9*{OaZ|9e(p*0y&GhX{3wCV>EgmP7ycFiuygJ~M1S(kl&P)iA6yA+B%Vhc4^%JjqZ{A8OR7h!i0k3U zgc1V`RKz9VV?qHMB6pQO#@NyLTm@dRbd_tJygKcio*y>Piz$XYZ}RS>4`l7#8-+VH zD54(D!qt)5BHI$pZkT}8M2hei(sI>elWNY}zRP^ksN9`C6$A(w`tGKFhCJrVmyMJBM>^ny(-MX=)C^LNBUjbFpC+-`ORK_Xiu&A2=;L> z?GB`gGi}(z=EXsY5tC0x%!deO^mm;P322L6NqMtlH06PFV>gmss!W6!Ay?iVWw6}P zeh*qLB|(Y*@RrvY6aHAs7mG=*3z3`c*RTfUjEbYyFHMpElc<}2)PJ12E^_-Phxb`T zS(Xl`r^vcCRDgb^no%dr{tXd!P)Xzf7 zTt^@jfom3J#z+LlE?k~(n8YU8P{p&}15jxVRq%@V^2WBuqJsjfP8u-HBQo@I`Ari# z_R=0)UA`3*+HOWPVY@dQq4`S~K2ZCHmX2t^OkZ>94Ke1ZA(EJj zDNH{crZT~I04SFPB5~&?kPwkfLuBR@AsK;eWI*`?qqJgDkh_fV_0A8Mr!qc7Zx3vT zF=wI>CFGYS+UNTx7yAbotu@64!}kYk9-p0_kM{3!>j2M>boR=gCc%;^s{1T>w-CzJKvkxU z37$(9E869aV;Cesqt@cF49Eq*54Pyp15SXhCsQv8XX_cy$5)-jN z1!ycAP*F)|WGHPl#;z{QIMl?=Bgh`bcC-c_$tA9A3KuhVZ_$&04Rt1*9Z+gx$=d~a zQ}O%p(dPNt!Pdp;{#hiIpjQ$Mi6r+2m>Xpz#JP7PLR*sEmk&W@e5!>T|brnzJKb@Q&H#zkz^yqgv)z(zybmO?M9Myxv!ooXc(r&eA(SXP_`iQxhJ>K zl4KGvDjqv&S*j!kmzk8+itwDFGr(MI7T9t3vUna&laU!tQpl_73 z3B}LRBupIh#^9JYnpAWMGiZtc5g=_5LQYitR(k8m9q5rFfODd{QU4`N7@Ebl2shD0;ybxixOg4PhaRw zXP1}4z$C!exNCZ9?NB&$Hq9p*K@`Xx*;)@u6x&77D(DJFr4D*P^oQRCp3Fs2;DFnl z<{VQ=aoSQ*=rq+w>j&=+iVbP{ER}?7Y`eH~rD&Stf0M(U+D{%Q zX2!&aGQqO+5|k9QEcUUl93MvW%Rg+seEpMwN+n*d;VAtD*lM?bO()LPl|Au_f)@ju zgZ<2*`m766s;IN1g{*Sg4w!X-N>L#K+=k=6y~b>J7Q z5W$7$!HP8YXXwR-aYTGqGB4A%H(uWPsUIw%Y^;QeSnp1JLUip8Xcsx;MbHC!Dc7nY zPjl$PCUt?8u#yaRRJ;Q6u`6KI;=j(_+hPz+J&djLZ^RLL+Aj!XutEC`n% zXa=S3;$Y!Gaxtr_1hyrwo?#a`bTpLIHOS#vA_GVR1#(EK^$^!nWpXZeEVBv}o*d>8 zW_g;^f|eo(X}OMsC1{~6njad5v4Jw*y|DOz&kPkiV zD&+sz9B%gW@UjS(L=-PX1l^Q_nngoTN+Lha!++IE#oVmaH_bc>s0S{mky5`U<^fHn*xM_+Op8APrSCTL)fFaWRI7YK*tZ1Thgget=YK9|WwP+nxE zr6(+bfY5q=6M!VMm;p~elmz}GJa|CkBp&44hcJ<6j3O=&pZFL1idr&V&?lD*dfr~E zsv9t_jV}5JBI>Hkb}ZseX#7V7<&*(v)w5#B_zzQi)m2?B8j()w^DMz*&xk%q+c+VU zKWC#4NKaX&!wz`9P?`vXVoELG&T+zV-S=n1F%k-?t|fA35SgPx8u@=XKqC17i5jpr zzAS!Yt{+IQJUMCd4cV?d%_VqZ;3N-%lS|>*gSABAHt>*hIWoP0ZQvkoQSG5lYh{P% zDeW|}0NUc^Y?MHooDoGuLV1?#tnqc-|Bump9DbYU7ms-VH>=wfVOFY@y1Bbk-KoQ) z-I}?+|3AvlF?u7wFP?6=XJPO7Yg*mVxA+kDfV%eSg%AyKXpJ0ufO&A=JDvwM;XuGA zy&q*vhZn|W7wKKb!hvM+6Ul`6ZJ#j8S5a>*W zhurI|g_juP@NU_{PR7D+&v}x$&u+il%UpPTwM3s~=9-L!?|2F`6<+VuN1*=~?fv%a z)eC^<(|@zFQ{N`~4~5{jg7V)T(_GX4$N1qX7pJd8`{$-FU^v@9_+|g6rm;8g2QDP7 zenT*X(tBZ+Yc&D)h3&0Mb*owx=60jL-KgydxtZY-GZq`!NXAL?S9m?mSSw9WRg0^K^qo zxsC*DQ!#r;p{b!vwAn%A{oFR2k-|w0l2N-**XSJbs6A^;Q8?i3CcPcG5urJAxyaf| z{K^n*Gf&J$7zJcxB&s;o!A~ZSeDVr)P{Jp9u)&WyiKNYu@u~@H>AdMHFZqD@3&8lF zuUQPZvYWjL0xI@xS&x|1)IjfMBQ}9tw`q?j?Y0`u`)gNx8ccTn_(t4+dS&x95kGn)H8k`Ia4c)y} z%q)XL8A}(vb|ttEem_V4*T{c~FN}~zg4iJANs~)RkbnS%+JHXnH3JGV2xJ; z&WxP6N#I6{A&n%s8WDq4En~CpXTzi%%nt>(&HBz&^=^lbSI0lVH}ARRB)Hvw2Hg7! zdiMm_f!N`Ce{fF$9C`=BIj{n7c&Rl)GC_&sY6CJN(fpj@5p-I$QpasE?hhN zl+poj`kR&Nrun4kOF^HME9KptiZAG_!}qG`i!!ly+mUW4$>q~>)fY@2zO0JoMH9f8 zq%;DI?6Y|UG+OaRlDp-)EP(BrzVwm6H-wG4T|{GMG*B)@(v`Cq$v(O$9cCxiU2TB}I?&-QMuzDx4I-OBb_{`VL^NpiiPPk$5bQ-Q0& zH{(c`|H(x|0>Em;7XX?&qO#Md)f#3sA^NDzQN%CbJ++D%$6fZ6BT6ov?V1P-i`v1T{Vz_VJDW(|Z`mMov#|M~3J0iS`%S6Kz-#qz$3wL-+c=VdjI_z_ z8e%LO>)m6S2z>s5Pya{JnAafNpCPWvy->E>o{$)mC0H^Dsy?=DHpD_Dx{S1GPaB}rGeQf+#_5&quyZFw*}?W zQ$xV&_}Rxs2^zZ{4P1+&uEJQkd~koa#KEr@ay^Xi6cDlxKzlQ`0)loqwz9O@ zdGC0X>J}~RI6IMnP~?iDiA5{W@x)OU5j0~ea+*9ea3*2!fN0T!<{Mj3-`9S%Thbm*h1q@&%t5hs&bI){7<^hq8k`404RCsEDx;b zicMN#oqDGx-tv7B0MIl+g-vhL+X~}S^v3i${20RkO@;vMl3p7A%7J~X>^-wDA6`S> ziPkHh7_@*z;Fy9!F4yK^18>W6rSTe*g~>{de1K$>!jiah(YO@Xm0bNZz8^bmVJ4^l zbZn2%KE+a#yhXGH0}2esY~Vt+i_%8X-%G)sqzgRE^K+y?xT?n(0S`I^{duuP_}V&r z$sY_D;;*fJu`f=VzX^R8iq{vdlb-^WjT-Vf51EJO(@LZ$SMGFbQ_!)=;7-_3al^wK=!xhz zXsonaxi`@#_t;BkJR~?z0m5%KMwpuoZCaozUM4M6Wne6bKOI}W8;ok|Bah-U0|cLh zGNEK|I!P`2fCiTpN74BeY&+U_na-hUFrcez-?`Eh(gPxB`^q2S3}-U^z=e%_V!5Rd zP2B+ijx$buFzLntkYx@Xf{7mBu)Ls+cR>?J)7k7hJk&Eh+m}`|8g1!kK$#>EGqBIe z(w%w;)C_lxgDxJoHqVkgcmQX&E;AX1T1ZSu+=+9AMqzZ2FjIg&%6*XoaAjC1IWBnT z&sx_uCN`Hr3sESRLl;LpR&MF6?6N-xPd8GK2`mnIUJV)AsAPm$96H7js3(u9q1GOm z+|gXPo~9>j=i5wOoLAq_Y6PbpXV5>MkK(dwW67WG7P@?ms`NX3k=V7PIun=fA4JIqn zL5k6TzlNs$!t@Wjwmo3sgGei-wRd#B=7+)S7x>G}+9vp+{+;lKpOnJcIfk5rU}_&azQl%f}tnsWBI&`ipasGLh%bnMD+xHMqUhb~)~ z!ek5=^B_&1K+w`c1pu72_6WTSDDXc~zyfpjxM|VpN9t3HC46sx7#jtOVEtjtIk4T? zbUd5#TeJx%_+(PPVgD3ShD!ma!4mX$b7uI5HUgzWRG)|s`TMshC+-dG0YA(tr^gPuekJqdsW{)ci(gu2xe^6pmwCT~Q-7LQ$wt|U zylfn~?v0RT)Y&4}%$9fKjGar|GQ>gH?6a0}Jq&i1wbN-U5oWG8kDxkL@E%V!v+uLl?;(K%sjKTXoD=v+gJ#FacckOpG z^4xLRIG=#1Ah3 z6qfY?ZEcCo?>5E3_uu1RBU)QtskwUO?cqyYmGIaI0@>RtpH7G4tOePI@bA#O!X$m< zzrO+J6aIN`p|>-K=D~QJeftt#^b7fB=K}b(gLXa?l2gmk^sP`uLM+_3--?1t3n5+X z3q`Fk2F=#KM1tmTi58H2;Eh!YWLX`w0FnN|Qxp%7xS?yKPb}xPaYqS3Lt}A#qS3H< ztlCgZqFSjx@l!7axn^XzYz`WhGQuM09p9UV3(3je7*Aj^d_d1o zf5PAJLYGm|#}kZ(k$XFmMH^~Mp%5Y`$|Rd4azHz*h;bZIpN0EO{QmpzZ%4Uj7(6Pv zH=3ROqa)~rXGgbgKE9pN&DM}TQTji;?%I?uFUTn6mCI#naD$Rq*tdShjRMdp1`x#e zhaJ87V(N16fI_iY&ZX3)Ho2MHL*T%N(_bD4fR@rKV90DbD*<)b`t^UB=cn0WEt<^X z{K-@em-IjvXXmYx_6ji*0uH!&EsQ-G zv~FO(w+DNCPzt6_d$}Cx7vS%^1r2C>`V&A0MnQ+YO3FGD+$8zSh0j#jb+4?+j|r=^jNsywU>LuW4T zSzFdvvhMn#_0`<}Ln@m`xc^sc<_`M*R?O{cwO-lTh5Nr*H`n%mkAMHCsXx3p`Ks>! zg$-D&>RxU4u3eFXA;4_~9upJhUuHVU?*yadibcAlgdpy79GzsabS2IVH^MUN#fV2_ zo|uM_Bc%*nGvrs)@)St-Q}iF^>0!THEjG5c&}OiqjJ$r_@>A)C3v*mKET2*W-dO#i zGhzrF>gEKq@%TNVjzKXru^C*u-ZU3`HL-{8)Gp&ol>P%9(FW3Uo+1zHuHs|n(@dQ4oYmH?abEH-SXVtjXjN42!Vt}SXfxVbB8weZC*ib zdi5%eUHA#=Axb>XBB0{)$Z&?9ns#mRG0b48Z@srBTLY)NMT%jV{mUOF?!evyBnIoC zF9H0x<-h#45AE5#=^kJ@D98$Eq%4@^_=Ar%wZ4Dgj_py%wr^!9TKPYg zGMx`nEfGYO3O44k=^~q>NvQe+BVD2GgGdY-Rz=jC1X>v_5`Pn_gdJn?DI2J4@Rv~T zg*>uYehN8;BgJ%izZrT3bAYHX8M4uRl|c&rEO8}|oIi#^M;f(j5J-bN_C|K>9X8Id z>2bfy+6 z-WN8G`RDu6;{$LBqr)!=BUE1!MhaAEHG}m>q7OQOPg#1T4CCHY`AG+u#%3)&$l!5k zhy?sIj8hv)Q6nchyZG3oC3$>7ckaJE)7jlGV~ml0-DgU>{-RA}+vhA-D4(=k{l}qE zGT4N%%7#AWvW<)|e(_k^uR+U!|iElQbaHl#tls*3>z9>n1hqc4@nqNPd_O>9&nN+3^9bEMS_vlAmsC&=CLt_Prffi)U&GN zRt+Zs=RCm7nEzaeSoIkn7K(j|=X+$x!D)Zb<6X+)zM^A&!D*gRI=Q<0$0r|fr2h-X zpCWAi922~eZ>e&8D0to6Bv<@7HzexhbHT~7drf2 zJzUBgQwDw+Lf!|AFe)pEj`XV^V02(#*wn3H%1Gt=1t@D-BYnRqTAST{!SrXEqrY)3 zKd6sGtqhrg_+Rd#UmW!fg^&K{ez&JS)5TMLVNTEgb|>3MQyq+vf>C1%!7waOY#?Tp zx#@=6{RfOqo00;*e`e^edCIDX-Zg|YNkxxUJ!dfjBbV0y2&(3#&qH36sj&?R`c9;JbxyCS*ALvR!nM%|Hmko7UGRj04WvjuDaZqEkG_|LI@tJo(FZ_N z9s(er_yFj;27tZ?0GwD4oJbFxNDrKF4^XoZs*c}-%9kJXs+S*vioLrAe<-+Cjdf92^|DK@B!dgtvY_yDx--_ zs4_hWD#KT;GPL}(8q{W?lwMsv@$1uf4FG))0LZJO4naNgLGXicC*XkwnP?v?= ze|e%I{;LlMQ3+l3uFwG;gSZy*TW`JZ%inEbB4_xOwM%+91q~Gnda5^vETh;+}E7&wsiwit493|L=L= zr-hISIDz3Eek^=TmtCC|z}q{%5_m$DkhR{+YiE5q6fPuklMSx2AEPZ*=QLG)Xj{F3 z<$2H$|K%3ujx^K-s?}($V%X{izmB)Hj<>arxAiFTwzPej%NTeoIiPSn8W-PTq-+u0 zY9*~eiE6)l9T7MN?&#{;1FPAZ4W=Y$q)0+oYxBj#ay(mx%aQ?H6z8b|XBmqkGx-!p zwRJUcyVgMHO=4V;M#HnG)Yi{Pez39@u;>6zg_rvWzm!ByQsP`OwX5M4sLM21E;+9m z8E#5-H3$$h4>Mdi1u=5$i<^#(Fc;~EPpNy>V1V-Fd3}l%j`we=KCvtw7ns(+NC#QA zm8pA?q6wXghmgy~PbgXg3r7)z`O+=dOtMhs(izM`pxF7#E<}c;>QHT;~!cdK73eT`yc!M zPt)Pyb!>%g%)kHFYCC2f@Be0HyHek+nt1<5k-&O#9^r?t<;E5|$9yL^`Kgv9C9gv3 zS>rKmS15zUnlhsX#_^NsGlKlfoa%)O>bX%xokF*7%U4IhSD#!o8=Rw%y~zE%I^K-Q z*wpp2D!yPc2{Np z2-3H{K5sP;icD&Cdwc8Ww32OX)jE~(^ux65CzIz)mxr(_`GJLn#FhkJO$ zwK-V}+=pf(?wgj#Fx*kQtCF!G7|*68FPK1Ny@ zyN?+M2X|$O>mMcUo>;T#wM-Zg%Odbx=J8aWc)_rtQ6TEq zQ`omppYCpA0#M49gh==a#y6&7asUW;F{(ufgD~|3LM;WnPGRQJfLKxT(b~43e6;#R zRH_a5S2rWcN4YDb8+l7gN@XUIvPBr#^7qCeCiNKN$>i`d+q3ln#ArK;y%pD^3mJQSy| z+i;O?=4cuA9dA6aIFTqopzcvpDGsoN3ER|)8Cw%;sJIEZfX42ZoI{7h$f|NaE=Xyn z!NFd!utN@}156C^A^{xa!oS0$I^NV8(a!ggrl53P7q-VpYNSk2-Nx3@<#b- zsJRqDUxsO&hf_RIFclnkBi4!7fLDUYBB@*81M!>KiUi$)VkyT_wzkY$K@)fZ+@>kMm~x z_4x^kDx}aO?}r0FIlXv&@Uv23V-(^6nIwt)Gh+j@Cn`}0QTjqYL4Dl@w#<9!Ud=oV zhZZ8O0H7q2+6ttN>0Rkh+;ONQ_@F~g7O+nxkzaB9?ar&y*C&U5>u{X)?GM}s@79@; zF(+X|T4}*FRQmdzj$=KLHwZUep4edFb99}vTyX#E)39s0gHT3-QLj$c^ z^=D-N*6&us57DBI3|RH2Z0pAMtNL?k!6t248~#2{S^%WIZ=D=Ae;1e5jZGNJ7lXau z#l&FGG~jHa$VRuJM%m&`n#^Wy6fqC`sGPNNYTIvmnNjf)m+hsrqC{)U13x{{L4TaT zZso#E+`%#%cBlD!>!N)@Ygf0$N!`jDBtaeCP^k`EKh51f;f9iSPNtIxK7?A#-?L64IZ2=! z+PdA^LR+!X^d-JUJ{UO(H~^ii5x}Kbp_fjNB!7I|;E{M|Ps=`p%#&M!g$gV{#x=jp zn)$e3{^N`4;Pm98eZCLVN27w*LkljrH})Ooy0#}%(VvasT4_z~Pqn}@OjZUOle#1Y zY;bY%`sk>rQ<*s+UZ1r7_S#=u&kXY3-Tf zx1XEm@O`hk(!tC|4m7ylA^r}TJ>CwH4gXth4sAVs^?L)Ivhcvf!N6sY_s4==(bf9= z$b054$~8+DwRh!$X`ssu_+%1ap<||k=CkL?Btb2|ib-zZ)MmlK&Mvc;MldKZe2QuQn zzWBT^i4ZOxbLM%aPR3?IZ!9K41JG$gw9FDtSw7>gXJdBQ_1UCZbHri4o&Hur;hkrr z)Mt3{wSDtSPSV3@1tRmd^{v=`DRbufK`Q*}4#xRq z_f7sjXq=CJ-SNdzhd&fD|J`s;GTU^#le7mnVP^IOb($#4L4T}ICPL90L6ULs^Zt3E zRt%p<_vdv(;1#pz!_9JcSnH0T=Ec=2VSTq@wZTrx)7{$ z0+d@BTeuv`RwnOBo{o>HiicON=Fy?}hwGqKHu5H2l;ew@JD3eeS+x*Sjw=59w1vzK zKq)9GF=Ey#chf~~nI!m8DY7Pb=S&pY5UXtz6>kG7mUjcp@P~o9SP1SLv zt3|TT!yLs(n%3cqm^PVYndb#PSVmKO(j{>(oV&fLZfpX?>(U0)qp?OSv@)4YH3~S|lFcV3ep>+ahZ0iutkmHwdj~LIUq)is{BRf~P6V|D7h*{(y8D%~-Mc!zS2#Qm^mq*6Wqs+HU3P_O`iW?qr+s z)$;}qpjPt@G?LkkGbKCW!?js$1o7Gx<8}RqEyxj$_UHi z1@-Ix`Ks1bf6q@kr{S3R+O4D|_0Z_!|l~ z@P=aZ1-a)r!|?!p`SKz!1MPIsT&z%_&qcpNB=q`H@q47w-{664Zf;7d4}9yj;I#yN z(yM0s;OFDh!)E97<$vSVTREL=c+=}BznrKsWVN_^i-n=i<_l`(+`TO%fL9TDXg;u3 zkz0aV6WcBnpOInRjct!P{yS`}@fb+llHCdV(Hc!%YN#Yu*_}kBst`Ip$(oN~HJ7ij z_%SYr`9l5(^~c#HU04&^1fVnV(A8u`m3pNay#Tg8Jt;&#uo69tikIYZm<#pN}Fh_lDq4B8)(+XV480N~l0n8(KQ7kTstDQq}s{PRq}-{*T`8$W#ieI!^8vacJC zpQbLAolSNI1I9KU?H(Verk*23k2`|#&1^m3I>L6mjto|u4A_^plu+D4g_4uvscLXa zcKWm7Sh3(r0JFr+A;IBAO|CL*dHzDwt9m$u@B|VSZ1|JuU%%vEpg!&dwwg0=rguVJ z$IedA+xstDN3HfBD7F-Tk3KwapSO;~*D$qxGR(<6Sadr6Wsc14mE?rD-Ze7G5JC_*0Eqt>gUi?d7I5i&OvD+*88r<w5WkG zQYzdmKasZo&;10*4xZ&R1`Ajb&O`J4ksTn_a@Ilvsujwj7+^8Rz-6#2Yd>&hx6ggc|D3BsqtH2%(!JYK&2~1)l^3tSL=ZA3S9DWv3y{d5o z^XvAO8uk9g#p%IUJ?6+$ zi(~QgsuF!?VpCSRwMJ;I5&GmBA&rKSI%xZmtv<<4&`)z3-X}q_Q!M38Cl34;U{syc z3pl2JYn_DCq0+uoKbV6Ap|WBLb|$O_)Co;FBoizMN;hUYJ-Dsc{8tklDnhLXIbqGqKAmr-F`LInKVPx0b@1k~t{;p>ln{5WUibb!$;giDm@ z`Bm(BI00)pdNP)A7E~(O&>l-`W@1|d{1{KTjlj0b_58_gwi+%?XpLVEZvrs}&A;47G@Ng`Yi9d1h?%;5sm+Zzg^n&4v@W z)4|sod{x#~dlfXXdcLP#e_suoT+K5VlO17$u|l2&u27pT!#-*TT@_`}Rf|BU9%Bb# zooqM>!F#nsBgd)3pd{7uJCG|e9QZ>+mb1@h2z&g4iEV}r+1_7&iIdr|3ztkd0|+Ou zh)KfTkRXJt=9_83RSU>%L8;xKhx2ukF>gMu0$egwIKU?C30axt%bT1u442#5<8#U|S*WkruRE<)}mgOzU8bWSG{1r+6)( zsmyHYFg#RGdsEmd#DSF))lA$&eb4c|NBz-Ke&Nq;{Tqi)wAaR*8JaN@qdb3u>iOlFn~`*Ww!zUs%r-D zD`fzs-R;}aruO4Y*~ksbB@xj9+N~DR87h<<{b2tLrLS@K&Kyyk!?8xO3WeeDkVu(D|#&{W&ND|zLRD=QjH zSj2%rFL2>aCr}fu9X6b)JrsK{U;=C)D}!kI6;7B(uioU}fX#Q2BrG2zxmRL_ zO41vcr{~b_&aPUcOSe!=kjmO0oaqB@5eXrIQ*RMu2Nv~W_IydGztD;iN9n??1%J$< zxN_OW*<;c9r8Dso9QXWPl1r4{N4>EZhcniKi*Goj6i7+Vmp*hqT;4Ln*Afph3UJlo zSiTokn#vePHk@>iY#lAWY1y0r@>a6T^$U`AR~|f_+p*5S02a6~mO_0g(g$))y(%u6 z=J5S)JV8@Dd(l`>av#k|XEPs1mn0>|uNNOY+5O&Y~lt3tvtN%m4r#EES!uqC5xs&S^H{y zt@nT2ny@V&^ZswvcY#Hx_+LBQyW2Is|C{Fe{{KbX|0S^|q9zG;hA3b=av}BBvVgTL z;BjOD8tEcgKsE6DFn5GmYi!pW+vdY%0UOidm{#VVfP2??WDN_sEqInIi5xC=_yi}{ z#J+MoxW#q6>)EvL-i|uz=2gfI@BF94tz3=))+I``3ko>Ey5)E9g>sYZiJUvOfH}~w zjCqf&<>6qyyq!46#$ArlHbYjz@Jzjd>(O(%z+@L>oMn|)d=0{ifQ7+}Y)Gf{Yz5as zV1eMec03zQ9oVuV{#M8<7IJlt?FDgi{U0+X-5}=PjB)oVx3!YcavJ@>*+x`&-)d$c z8jNpBKllJ@*#VS#dN;l)ed`0M-)ktl7!{2@2YEnp5)n5g92@>uD-rzO#I_WlEw7MR ztRa3t0SPV0l2CUoctZD_a=DC=e2|AOq~3{4bt&4dA{V{KQlHabA}fm~Ox8vS zg}YO6(?M^m4e<@_tf0@{Jv&_uIt_#bPedRTM3r+322ss4h-&H}YJl>R9LKjA#<6_L zveZG>LW9mb)3BZrB#({b3W_Ac)%bMeQ^S5q3>AT#Iz!uUN0P*_l((8d6ccod!fyL9u5jKAIv*E!L(nS+dG@PPx8eQ z)iL9Bs-ZfV|4Eju#>>{?WsMXmjyi#)G-pHd0Ljx+D+;{BpULSd6p58coQ+z1Hdv^v zH0?eRY&dMknQx!JZswDMjpbkMA6?KZztP;YG{A6yd>C9BbG;~7uHs2&^`z0(W1~$u zj}z@Fv@E1Q2#T>GUj8Av{sGpht8)cTl=w3<{p6n4Tz^4x)yT?BJ>BOu(u3mP&S|8k z5kQIX?V=#t-qwD*^=nh?pP%pl5#fcx$lp%phPId5)v+xt_cLv*@P^J`x^5mfooVt8 z%y+E`Jy2m()zkl_r?~%0#ylzNHei91viQ7+1NWB6v>^rBp%VdSE$`k~cXKcL#h9Iu&DSj$&gZ;d&G@=&$mQG$D9p%wH-Y-gz zV_GjcE)gJVcXs9ZH`O1U{$9;| zx>JcNLEtWj;W=EoN7u_Wbd-Vz+vQ5RUc!gK!r*+sxTkQ(#_N*@n|L%G+~p!_J6M`* zvIQOI)R~@4-~k&$a2Ug~_`{uvk#xjcBfd0*7TZ&hY~i%k6@ z=6+$5zYrs0M)qDxv1+zrwQR-e*@|svE4GtbOc^&4!HyX>My@v>KaqvTY=pwIf_Cbs zhCNT@weS~dIvOCeki*vca)L@QMEtO;2twz`z0>s+%B|XYic(nxW_FsBJ zx189-fNOq?@xMX`0BY`|!OOqda1u>ga4YrPNgv~1Ol%TKQ*4p45Qk15XW7Wh-ZZqC2F;q-v7m%+eX)c z=7Uy=h}&&cRN60JiG6WSV@UZzoei< z2!BM(iXV;$RcgZ-fVcYpz&~iH`JbBNkS>dqEQ$D=hQVD$746yxm!z&-gkWfbyk@Q`>1vHhrJJauLy>D@T{?NIb*MAr}Qt^iAswhmk8 zd;P|i%7RWGwp7eOZ29j?|6s~?e;m!Hir=k`$cPQN2B7(8LTwUuy%8J# zDK@XBK)2o*n4^$}f?eI)Fb%w11P{LB^>pdL1wH|ui1!B8+a?VgYX_4{ayF1ki=6|c~R(96(|BJByP%AFEh!aWhyYNPg~QLlXx$B@8`Lc3;g1R?nZpy2s#`3)yxduWt9T z1YB6GD8Btx$`Rn3?hElv$n)aj^})|{(iM%+5DzG#BiY4b57dau z5)>qD{*oawf_Rm75QvD`Vr$x1A6|l00@~m18#U3e}R&=2xUW8mgAQYZp54tO|J&+DqMh?bafJ^p!obCu}Yh zk${oSLa@I`N~PEz#|!PSu9SYMRfCn8Tod<$uQ;E1_)u6Zfjv8KowQ3vN@lQNq4tnJ zn5woytzci#BIPZc7iQY?-=yq0eO3TDZ1(Yu@>?LN9cet%;X{iO3+|CV=$SG!NTXS) z^a{_a5^+da3!zMJX|_>3h@2G<1tT(%U=MEPRu8YEtbsB%tmHu>KDw!|VzkGK;303x zb#Bc&dlPJCti26OA}!WPH`+*7Hqu?Pk?!6`S8L>($WV|xezTzEO>2*p)ZI<2p@r6B z>xuB@n0fYO)6Z@aUxXOQcmP)c$HN`kM;QGX%5&xPl~{EMly+0vg{sOjh%^3`V%YEw z3UMv|{4Hm_8RD@>SKgbuGQzm)MYl+AZ=)C57s-8Gyk|E0OLU_j?M8oZqp!``_B?{7 z2o`hczLt{cDZaOdaKsXrmq2>)-a+$))2eOcp#@XyB4x!u;JjhkMt2Ns=VDb;s$my) zyaVmv+(>}#IAZi0r*DVzxY+1|SI1p{$*pFGv3%)_03|)Rqm4G5AO^% z&Bf{@K#StP?NqlT@!!nq_FDe)g~)$sMPv;CU8(6SXf5zr3w$0&;1ecWB=UK(js>@l z1-CdBoKD};Bcx?=RM69V>zU@Ijesm5En32Pel*sCrz^9t;q3hM&%k!R5!U!4kY0sptXQ)mD0>TZ?oKTNY; zUGslm2LGq62tMC%XDw9wnPzAutr@{JBlswcV3d9lC;0Reae`a4UvR}xR2FIL;@vo7 zS_-htZt!JqHkptuJz7a#+g6{&IPz4nE#Sdy?@eCsdj6d{2$Av06W_)=D;}^cRIjKc z62Ch3ttQNoY1w4TK3FC0Xk_!I=4HbIoWA2hZ@MIJ#kv9LG97N{m4pHnSzVspeQ$&; z(h|x}<%pf8!(_pV53oNQj^$aYbOH&yCmX?6bw#2wpv;SWNgm^*3mN!6G~I{~p<+0h zcf;&#Tunno#~pLVikM!?S6J*R?lP%bGNS~f1g;Bv?oDRaO4dkiXbGiDyz!4qbJsC( zs;ZB-kpp))bf!uLy)XuuOip3~Sa)P&ipW#`0~^`gtW-D6r|c81Jgm&3ur8-4IEKc0 z)K~+3VS|-Z3FO0Chm;B=Ymd;6ZhGrtSK9nX^{85rZuc1>)k?mH8NgB>d}yZb^PaC3 zMVBoT6USB!#>VdpLDibV%p$BT?sC0^?sBsUcJ!6}>vy=i-0-&%77#RoCI9-cYN5f` z{lQOMzG$ZpUzN}hu&oe~QoG{!TCe=zwY!7fyUqt3*9HIahgV+?RlDQ|{N5fBEcL;M zwjDy&j*qNhCwxC=?B9BD%`90!u7N@AL%Jzy=WC{Vq00$#j_J^w@H|G>OBmn%*Hx!C@H zH=6&&+}T~<{~rJTw=b22E?gmQY(Y7Mm6<+XEL6JU^<8d#m;3ZWeV-O_Jg-kG&%Xeq z&&IKI+9eUm{Ydj2&8rM>CiXvP&cyDxs9MjLx3nbmd6g4h0p>D?FR@Sgh(elfk3HW| z@)8~1WXVr*6h!F1QsbHOhDVZ{Pp$v0Zp-+O)oN{brwR+LYVOw8^#3t_HaF4JWOLIv zeA(g2_iy*c=4R`p1+Su8U=Ma;eHUI|{L(sWy@C>SiiqBI-JA@reE@ zRZtQGadO(82P4gWevXbWtmli2$=CVizx2_?l!Gw^VRX9YD+@o@@L07N-C243BSlhV zRK~Gp`rb&&GszM3@Zto@lPohxwh$?f=@xG6JIb~|rl$IS_C5FMh zL0IpK5s8~6_Pz~ES;Mt}Qn+Ih_d?C^P%SxDOAU57#>}#wJ#nmo^S?Zemc0GW;0<=m ze+Q*w5N8tNj35%JZvK7-*JL2pL@#wh;Xm=GNe(Dh$cmSm#Y@e?rPinQ|MOVu2NtXzsrp?r(TQQbx)BMc$UTsJCc9?a2~h zBBg|pRBYnjHVll*VKzj)S`uA&Q(_SX5+CB*N_fwGx@nr5Rg=nA8^SDMxPcPJvn&Z; z2eCu1YYhRArnfEt!vFl&+w{8L5VaDA2f&u-k6)xtMYbCPW0ZxvN+W9c-Bu^G`dbn> zA6C~HIMX{p_Tw;vXQ$`w{g6d-UOX`@D5*z;+W=Q8V1xbUd3%9=RX* z+raS$&(iw?hq4>(kPoz8CA3Dcsv~voINeF##*i~nuyZR}p6B-bDwgO9__kC#Y}w9m ze2<1~kV1_!90fdpv~U=N)1?PbwU!)xQcL$7e!Tfb<6l$Uuj2fVnQ?!@^Iz0R{x8q} zZIu7iOmm(8^Ru1*no{hm;Q}HS;4wCU%~sdsC*%IFtIX<;ApeE^ukrso82_bOt!%IN z|L5BOGV}LWv-j0nP1^USQ8j=kU2pv5_J1U5&!^S@SIk`%|EX55)Baz_|NEThznc4H zDL}Mbp^3Lpk}0N824fy&Fg9r0qhTn!>qMi~SpT@`dxJ~sAFlI{8>{cwiB7*h5RPQx ze?@V2-(Hk881*bU(#q;JrMp&+>}{7-V8xjiJ@!wGgk_0MVk{FE!m##Cqq|o%(B0oO zdhpwaUmJec8)8lWl~*X`ma%LCtx*0bBOx19D4~;~LZlmi?N-I6u;3T|{UyJ0 zAlL9SXDX9h!ROTMgIak#)tG{0q~>*sb_kOxEodmnVe?l|shY8Om`rJ5Q6n|+k%1Y9 z3`#B(E)_}`^d*huU;n~?_v+An>wU6;7^zu;43%C7^XM2D_{lUm8;#VuU_70q>>z7y zC-wY)VqIPmt}r+FLwSHj=l?D&1h@p&&04*>Q%C)8ty*2%e}A^~U(G${j{i~*|15Dh z%IiQJUv?mltu1kYF|%Ysn2$2CS8?=bl>b&a{zt7|*{1j()#~%h0F&b& zTsjkPD&JK3O_kqNBC2{I`b2zCi!Y$~KS{*8kOZ*ZRNDM*rnS$f77}U(G2%{YyRsl9Cmmk*j2u8p3xI zi;0L*t0JqGv0}UP>h$%=prL15W5Uzr{VBYQs% zPERh{=lj4*S~9K^?Y!{h#LfX{NHR6SzvY4q@cSFPrCLJev|(>|I+E4vQsd@$ikG@cv&nx5)@>XQxu#u9zhM-(K^7pN;?1Lw=Gc z`?6+W_hSM5u!tF>B9c+olA#gfT;>L*>~cmUw@(_w$;^JXEaw>wIvF=YO^QxOPEzj3 z_G9lE@hESq3}wF|ZDvq97T9fG;iMR9@$wkl2e=AAW>7OBeA>K*7Q`P*Xw!2(2nuf& z0GS_pEE|k@amW(GkU^dG{a?}l+Q0#%Ka&4%Wk>3Nf%?}gRr3F>ul2v5jsBxkBhCMp z8UZHy7BAIvDKxLcU|kd zSusq#_oiWL{Wq(Isg1y_8KyP{vu>E$D9mlc)W%`%7^XH7bJsAnv6xScsx}xiI+|+c z(Nwk3RADN#(Ns;Ns?SE%sA{9B){Lq)nrhvsYNM%c8&z#I)g7a%ji$P5RJGAmpBOc5 zG}Y*6YMDn<(?(OP7&UD)HCS5OXlhlzku#}5*pMm&XiKgMb8fq}U`Z^q2G%t5|G@cQ z_g%eZxTuG)0*mf{RWtDaOz62MVn#?&J<84pCmIb82zhe z`{3u})5B)x^yPn}eGMCj_c@L0<_n>sAtXJE09C;d0!)6E22lCSkl-zHb=YFR%O3;S z@hA6cjf#$3+2RzlNovg|4JzL7dP9C0^nd%GGk0n~%Kgu*?Nm$||FdpxZ=?R#+^w$T zKYTX&PjmmZ-u>2=!H;DbY+DmrDGP0bx3=IQIKB{F*ClITsR+Til9;)1Hn1qeOu1}q z$RZsm(xLZz?Cn&b24qZ8f#DbPNA4A3FVDHs^Os%kp9A^o<>~2BbN@uWalA>-L-{sx?-x z=`Z`;UOuIpV|y?`Nh9#?7%N(5;FYx0wfg^0*`KB#%_G0KkHpjFz9Ap>ir5&iuzlpZ;z%J6KjHH{`q!> zIlD*G{IjH-jVh9ERdy&jEu!AV!{$K?)<>aMGK;J3=sWD`o4H-Z?WE;v+!Ac8NK_4% z5xhq#cVpXdVAvB1l<#K{xVFaQyOoV<;gIHygSLJ$hR>V(M~~76rfB-a6N&g7^PWEK zvB1I0bPA0|R>fHRsMUT)8=O1J z7oWufF^5800IZ@&jJa&{%ln3Y=8_xIJ}lhboL}Vt_CUKS*ci@7ohWF{jDm$g(_PZu zc|6mx=Q%%sIl*iBC<)I+849KY?}|TTT*RBuguVO7wfss&`jpdCzlE^P*a#yW5iOsq z!-rAl_|Zx*5W9*PQV6fG#AX}{Q4&ik=VT655{a7qlRH(mBwA=sH23b?q!59x0ba|Q z^Uei>DhkeIRL+uWF0!X6M;?ytP4(TIJl+`s_5KP6B99>n>EQI}_3?=~**|WI)|5jN*Bx9E5PC$=_; zpJ*RGaPmJI_s&4KTU|KSP1An?0IhnFK+<<6)=Xyn}A#RKY)kk{|U9rP-$3r=tGsQsJcO&7b~~ zk43u1M8`1gQa4;Z+jvU^)h@EbhiS8~l(IwH<=GrLt6fGW9<@gf(PGKXv?16W&$X|F33N zF$EmO|J+{de?Fi6x4PghZTPKpF9#N>N3@F~%K5B` zJQ%2(5VA4#wukl6$eEj^gmNt49MKq_!(d-*pr-1^d%lHV_@FJpSRClxwdF+;m2z7R zIke~FiB0)8^E@der&qlGceHWxy@A`M=PZ&Bsa1R@KLmYnbox>N%^LJQzcPAhWvYCL z*T{s*s92a-1A>9+KrjAwgnnqZ?xZh9HVV3pewS+)EHSH$M$~kA$iXK+8unQK|4fWfB@Xh$i3wZeLPOABHlZe20ehs zNhxg08LU0ndIu!xayl z5=vR5PEXY@st=W9*l@xNikj;mV+@{`IwyEh8qdzIUZ~c<9_f{6S{7Ei99UP3)>rsxZUw)SW`L^V za@e`N(OVCGl8|(E-a6ht{{yk)w_Lq<%e|C_aYJvRgnUc+mQnMnbnV^^_EQ=pA~0ty zSbp2}d$(<;4Hh*4)uK3TzS@6%)E0RG>&)+qswQklu5Z3q*6BP!rX0C>J4)@A(gV9Ejm3{ zv^BB@cb?-R5raL$|&Z{ zaQPdJ@~$KE#GB6k;J_C95-o6I1~?>?LB>$iH=)@Ka23allLB4gbB8Yl!Eaz9cAJLzAHcrgUMKAg*hM~^Z{*;^ zx&ToY`9_eySlM;FdlO^E-mzHY&v_kNWz@sD1>pQxZ2hEmjf>u@6AaIfn}E&_*?A>r z&`4tmSwjr)M7zQwbrFK;xp3RSy(IUx9jKxB1zc5Hms%yonDS*xnXGX&y4!dq;XzM4 zmursPsd_+r%)6GHvwj^4?=v0>pk007#Mu0e4@CQeh0J_Eo=ID5_(Mn@kjkx1;F9X| zdc`09L{Uw|$ai~z1vhbS_{zzFCIcYKByEG4cb{^abPJxJ4_xACAEDwAU)YdWMjt~ZHCQPeEUA8nMX7UW4S(y9U{++=foVE%>KY%9 z^f3b!NFYwJ%#*xWLt4)i!t)Jg+$J7O_9X#4rJy`KehJq}r;h{=PM7|yr>D@st&ycU zm9?DkA8Jdk`aSvK4HtPACP;EG28K9+xSXq}CYJUIEzkTnzF=6Rsl3uC!L%Z-{ye`^ z9g;HQG^sGPK|R>>Z&*0HDyKE{oWApdi!>f4>{{EQTmHLZs8ZZ|MWLyTnjh>7D$rwV zgnE=chd2#v5n9L^A%^!=^=)qdV%ft*#YiJ3FagPEj*37cs7^=us)o04h^dX-!qU(4 z;PavjEZ?nm2&A+W1(yGF;S5J?DbmfO;!i%#SCxcz4x_)Awhnm{Ki|VhkXe>Oh|&1m z(--O50($Tu+K_G0u4?3&Mt{ErtWV(l_OmX{>~thxW7jKZy>g;NEv?tFp870F{LGCh zfBnf;49{M`z21ZWi*-`gJ8T`EH2H3&u2ysJRT3CqjKX&deigl1 zeBuj3^4^VK=wp|8w5Q318E6z8-IIH!x^q@DuUgqM7Ji5UA&)rXwnUcv4e6nzX>622 z!`I}o!$9?^^7{#^>hdUtkG|3MaCz3&=|!SiHoi9o?~`cOJ`ztok@R9eb&@xO?}qX=h3Lo<%b4EXn4S-iQbxViuCV8 zcP{>>g@agTwjWGuK2ginOfAn{Z=d4Yw4hD%-WSFC!^eByrnfUSz2GjjZPq>kNm(@H z`;iok?9do4mc+E1zqbq3?d?xRRU*_NiKs-1JSt6bM$^whP_j3>wZ(C1&^~NpTb?^A zk#tn%YGDok^iEg<@;5+h63ZER5#=gC$<7I^oQO^B52?e2rS}O)7-lE=Ec9z$!=I9P z!O|F{wfp1~5Usi6yf4LKl9i2SC6geZ5TWu2?1w@9fGr%Om0Lj=V z0W9^Sy1Kf$x~jU0bC^{g`W6Fcr3bz=X4b6k@2-KHNkVwAnfO8(U2Xph;dJ-J>F$@| zbW5q2zFeWKR?DDVP>FsWtR@o>3e#Db*9?#l5`frkwHhg+Q>1EshO>yGbRL-tkXL{QotcBrJ^YNQGuq?@Vs$VtJ zN!#wLYh*bhz}Ny^r%!eU?(<1^7dat`c6fTxIcL32 zuXoZtV|X$#(Dt{zH7b`LOEbRs>^?C&8;0a=i_q802t;3+c4?*d{l)dCwMXnb11CA{p8c3g zbZb#n$Iw$|rN+`6W!^GdBU71UYpb=sEUtpV>;Ei*&W4>VE11-(&F@=#yALdztkv@M zMES^=nh1+b^$9lacP`Dz3so@c17WODoSxduIs zi%*)NJHfN$q3!MSdaf^PeQnhDcE5iFr=B#|?p(NEr=|VRYGGF{!RLz^AVPX2#IP!c zVrx=ZFN$4hV3cRr9oW4&Vczr>Lx?IN3q-I@B^^OrKmwn~1lPE)=IB2nyDhk(*Q-h@Y253LK^qe8SIp z#dr=wx^Sh*v=uQe2UiYqv@6m~MpAt#)t;#Vk)Opip++#)WF}sod=VCqM?uV)65~}# zj2f5VFd;K$T=p^igfo!&Q^vMuBF^Y68cDk}QwA!|FEnJo$1hkEgJim~*=j~YHIk8_ zT5^XblhLV_sYw|`Bwt#nKoG|0nUcOS#4`j+MfB~Hv*XS`05P{Wta}#1@a0WW%h$$q zrVYKsj8H4-Nk2DKurL+OmQbR|(`3$;5YxwJDTR!pdCJ6e@M)i1n}%h4j?TQ1iREKa ze=owcLvkYu&wrUEB2}I(e#4BO>h4uS!M_H-YUNsPSU_Z9b-9x*3rh=kuVEd2*30$W zpfmuKMz9Yq3rv%MX~54$xxx2QKfcpn-KqU|0xCYH6F*`(gMTj>*2&)>{Q9%$Z+)|0 zJ9^cMN1Zk?^Tlw&$SF=F>A2$ohbcI@4hO{>nW-b3luAasm1zLg92TW;&IS}j%<=8# z`~PU{u*ZfG^!u}*h4LSS8ZpC7mb5u7C@_=nq3`MBT;L2bxg?yE(_YhQIjsO@RS2M~=YsC?=7GU$ zz=M*w5Mmo;mhOm$TZLI62NW3-FrGwkKzAx_!!s`)Cug z^Me0biUDdplhw%FLK6-xp%(1vxX-f+QkLYTApNt^VuO?uAGM$njb{t?v&?3QFC3`r zR+ZQybEo0*d9qaep`g%l4b$Z_kPm&4%o!gwYDrOl2Ps*A^Xhb|vM?Yg{=$#~Cln0) zwO=5P+bmpC5SRiSebFdY5Te_S=V1QoNFV%N0?GKr6xu0%xl^?=-ZZt9Nn1aEevjAx|G4}TED%$FBjBSFQNGMhQEC^ z{7vAHa{?lnkK$nXTbp5izpTtj%Y$|Tn0OPx z5<%BFK{q11?YhVt&8kaNIB#S_1dZMe{x` zCvucH6~;AG%iK_%OmB$|)iXELAiG&&L-}N(l!ls_8)}tUGo_(c=7x4ltfe&cwCFV? z3%_}Pdb)PXEzS119%5EbsG=}C$hpO3J}8!CO3VZ>W;fq8!WFw6`k)q9sX)w2gzWIg z!;`a&q*!8@VA&n&)Rjn8>s($gMWWJQt9y&4YoJUA@nwyy$vr2{cU?RVo}8Xs{EDf- z*}tL>PrDyF=SPRVPH{Pkhr=e8z_Hnmy`zp*A2^>(N-S-AQ`yz4MQEouiALokI52P{^f2FU$xCh3te|DEJsGB#3T)k^Ph+iw`bY zEnP^{MXza$jg%s)<|DBX-x*elsGK^o!d%7J6UAMuUL<>Ae(qc);&Y2Z54IF*^NZA% zn=oIdom-@}T54Yc>9Ydos?k4hbth2eqasMiMTG@~p%tU=FAw=Se!WvG@0E8eh#;@R zkx{Abky}j}5x0CFwQ6;DcbEM|T)YbZW^Av~XtG+hUTyBS_FC{atJU@zb@rFdXZ@d@ z9SkV|gbC!%C%@gMxd);?IXi(DCW?QsYoeHrgnz(bruN`<@8^?uCvTv{^Ory;e*V)V zeKhh&8vbA5kQ%JFPr7S4Q*!t8n0|!;`6o=b?_sgM?fIEcJ=5fr0WjfR8^;zfZ5Q#q z$c{R^(XUJ_L*D^#4;^9I)``((D*cu|p&xMrpsuzm)q172%W92wtJ!YVnW5XT+YVXh z^DWz=c82=IymDNC2n1s^Inh&n3L|h4BC5cS9Q%{ydGP4DXyTP_>!W+m^6+91EO9*A zcx8b81vNkxEGR))SqsB!!*aLbKZ@$x{r;Pi(@wu%1Yy`UQEh4V9eZdptz7YLtXu06 zFK1{{QpUmx(ksi1*q<}Uw(%4U%n>Kf5M!qlwd9kFPvu=7eqV$}5(QVeOhR5VeoEY- zK4L^j4E`DoVDcE(QM+>1kKvf$&Gu8`N=c7l5?9?8jle0(!`VmpZY)7>*a{re@B&XH ziLNvFH;#^NIgH`?MYJLw!{j=^i!Frgp54O!0lb(nVR?df)%3cb9Lw;@6kBVzXAVil zaQ59>IQlp-j@i-~JNrqC{7TbKTmCJ%Ee8(6PLHnlZ5P$60C`i|%1Uoc*stEA4jk6y zo6g12Pj9=&o&I63*FEATVFQc$XU5%g6Rw}=@>$!%PK1%9Rs?}?WKPUBLkIM2-X2%C zcYkItndaQ+_ZoxOG=W+X9pvdq8{2p6O*OnSF(|QNF}S_37rshIuJr<>dJ))`2g1sV zK+>{-^s>b8UlBm!o*D$Ba!0QifY?|9#CRBmXEH*SK5tvDb0=*4J1;JgJkFiFZ6CB} z%_0^49m{>xbnUl4uu1;`-p29$2z*06-4r0RKP60-CjW&%9YSX>eI)vrn+JC*Biw~R z`xHv|>^Pz8+1fyNMT8lC6GT4!4?X2~fQmolCKw}@V1(_;r;puLldytwfFX%O5bd>E z24wHeM>ckI;JZHl{vw`wt0t! z@1!J~+wyzD3tbu-3;m+A7Cyz0cI8YWM!Jx>ZN|u_R0Ve24(b|sPX>YDS>F*1Hh>M$ zn!pPV9&UxWdr~)ezw_A-G3^F$mz5;zfusElNU#>KCzIQDr81aac_?0#ZF5q2X&DEN z+Wu}eYCC)f0-lRtzWeDNYnB`3T8+VjR=HYkmhd3}jPr%JfJ~c2HqRQF_GEM)y`TdS z(q4B92;iqC5FD+^H7yuv^JKp|Q)Zid$DZC^xw>JNRr6%X06k~I^H28tiB7WQu5^Oa zCRf}&&%ZanRCXU_zxjT}yL4tKstOSM5(rKavH;%4Cz0>rV5=(fOEnBtbs2D0rhkv< z*A*cPJ1-~_4t;M#zKcB^1rX%QASV@C;YT2r6m}!E1XG6{kQc#yk8|dIKUiJgUOOw?b?dDz^sQD{WHRT^}EmU@dQ#+~#t!_eH)P}@A-*5v|0q5)nshti+=u%C!(<2Yr(jDm(7|^} z+6@}GudwR7C}U27!!?&BV>{(S6OaGJ#U?Kq4s9MBF9WnK4h&bOtOS;b#%Df2xg4=# zJ+hP$!RFDHnyv5va9de;QsaA44#gaGw3P)4T5@UV94`-05Qc_SRMV4GmHps%oW~@LS^^skyi!pe%<_Vcb;&~u|Jasre60S){SxK(8hytjn0!*FCl|_- z2Cw6@Mto5uzMX>J^Ug1w^Iqo|R?-zL##xnrDZE^zzF~1xE2^Kw-hve^p%3s4PnI21 z`Y3WQlh~2O!k)IWRWz3pfnFZ(DuPS#fUgE>?x^q2n4}O7E!%)fq7dEi(YruVsJIN0!vgGRtU(y?f_N zmZ^{qlJJCPg(9~Egl_C0#8NYB4zC?r!qn_rF1c?9%C)##iZ5QU-nBCw8E{JYWXd~= z1_qyI-gJ1)$S+Uha=f^!xQKL{g3=lyb153)xXCe#gB5hC4YUP1Ein&HKe`**Kk~pJ ziT62s8G09tajcM)brdXp%;0=d1cCL=$#*?hJuYDMiZE*)^_>azK+<2B|eMxlu z+}DJ9hF1@{%!Q(#c-bPl%<=b>#R8u`zkoT?7+LD-uxg&NH<%#+;LBJ`L>PQxY0N$oR9zn5p6f2?A~7Up>6 zEqv`gxat@+BG(HUEWFM5Qeo3;y|64mXaOy7v4wlZ`vOZuT8W4%@p4MBu$akn-4NuJ zjl%HgDm;TQJi{yNsFuf!vHjS2mF~73BpO41dstx{tFK6Md$@TM@qo6v?~@nzzp$kt77g=P^$OJftC@hM@Vqi=3Tb{9T~^^D z@kJwp@piC8ko zT5$vtmA?`Oud5QzDp*sle(P)CTnk%R7F}maBc4M;v6z2|^|(fOA7R}tHJbXGm-o^_ z&w!VD+|4nP>8WJ}qZtp!EN7`F&_@7^xFe9v1hU)eHaN|T)8&*f z88EzpjVP=&h#6W|G%vR~#VaqC$MB*!UE4VFp>w@c8;{eRin0xvE``!qakTot(r6y+ zK8UQE0naNiOr)796Rcx}Jf{o*ApQP-ZMU{pm-qi` ztyTjb)mwY5&HevJy#LRy%IA#&z!Gnpv$WghEatNLoNL|{x@&!C3!YE>;l{j2!?-=s zEt?{=UYjCx4iBoMUbCj~1Tr1~HpMSpml?2Z5n{(<&Lx!`Lwlkh-Np3e-gL0TzYFub zM}1>6xMpPE(q#c}jLS6Y*ruruuNlWRy$kh*jfjxnK2N-Kow0CE7{jq!rwiUtTnCN{ zk5M0^4=0Z6@f-46w3H(;$q0KM#T!!|(<=k7;J4`~z4w#byg%!`e}{4RJIBh+1&Yen zrk^~h8MUXl%4ilfX!#8$mAHfn9$2oCROs?^8~!J}4U(59z2^l|O59V4`#B{nUc^c$ z;|#6u+xR2ty)hWJ^&y4`NGo9s>ItuJuMkZ7nNR|uo0x6>E2+#qp`8DkEmIUR={{NJ z-Iq%xb6^US%-q6x>1SSpGsHBfLYT7V6@Cmdn*&ounwxs2yP>%_n#)2_aRhjHbkynf z`oElXPY*9nx@Xy_Fs0T~q?o0+q{}&FAB0GgD@cl!ackB>wR4I`NjOvS5IxVUu_$rR z--C0~^C~vvuYzsPr$`z1=aKm6(;>nK;;>I)i~sugDuvQArmndm;|&>qxn%4Oug$Su zUf+@Xixm<6L}dM?N)q0^?b!F@4c&e%bUR-qwMGs+k3iQ<(RAyW2LwGfC#H*OFY&e* zDpMVv=*w5G3XQC^NZp}o_s$erSP|Uw1gl#1mB%%~UQnRKY=>T<&l6o9!sKAnNqMH` zmBa2_$G$4b>r3y?_${E$G3&m+IO@LbJmWfJ%ex(+iS;`U3?{-bZPSQE8Xa4op)1O- zfLdb={{W*A-)MA!K7Y2BuVkiLQ8QdnUYOmsP_Zw9Oo)7^QcXUbx~>W1;qG4F#l$aF z!jl4uhc|sb1=|92C8KbOcckWYu)IDGo+^tMqc;G>b2U}_H*sm@<%gm~#bBSk>7Mic zqZ!rJ*iwF1$L3&qMHy#{S(7Tv<{{uCic353P09$Uls{(&YGV4RGH1pg43pIRH!3-c z2w!&meWnWD-$$=LRM?T#gYyt+Q6UE9hw7cJd*)1-j)AqHz&KPO_WtAIQxw!>%+Gnx z;#1y-%4>|B(@fBP#b^=bR&Qjs!kx~v|3{P_ct(cok9UHku# z$LU6E>)PZ0vwE{y754vntF>3d`2V~0+Q$C>5T8i&em?JBG(fx9&oQTu2z~FdCJ8Am z@#^&CsB_lqwD}IIz zPXF-qRKzFhfkcL61f;p;+>%C}W}LgD@HFEz{f1+cBOC1B(^~}DUqc-aH$cndWB_kQ zQ^V}v>J!)wk9%htZ%_;t$1gjIO>f}0k6te*?~%6~?5>{e`4TWj-`5T&45@8`DSAMj zGRG*4<2bM=8&BcQz{HH(7UnHhLD%^1jlL_}Bnyi(|Gur*uCv;JcSg+$H(j1z(3T?Lv5gp!Y`xcIM7DU1(= zoOt>rF3LnQ6m0hYxcy)8wp#oCU#r%3n}Ppdy~_9hjsM?c?Ei4i076Jj!y-1J3)eD9 zPC%KTD$rZl^IZ>)^5~z7nO$I4)JM>&anE=zM!AVSzjaO8agNSAhZh}@uiejZ$y4~~ z7_g}GW9OX0+m!gj0XzEX@O-;jEwbazo5S~~7fb`Trm?f`g<5XNemOj+q99fl)i*}) zrpjNC58(5PfC;~xVNOB9foxVF0XQ~29!R7(Qsu#)!x0>{P=`E#UH|;z{Nyb!3KGZL z9>Y*RxC8V^hsA&yja6Ng-;My0S1nOCKonAB_rbgJ48#I00zmF`9R+(}4s|%lv#zTT zN9bB;dmvP~=f<3~*FZf->Q9T?|EZxkm!&p=BqOI618C zn=PX%uS3oKkgn(sx0{-qH_|Mk+q<(ST>A-+d{rlIo|>>?wSyk%o{^0H7wBQPhSx5| z+f-$O$a^F7z8ZQB0)~zT6%0S8Jf@iykgG2SAoAS&pa6>Yv$pb`TRCIkUJK06;svE= zi;RSub2CDo3ii@417kA#XgYLtf`A>PB)QQ1pjo)BX1z8XevbooV`Mn+9@!z~r5~Cu z?RvgAKq=~<0zxtmcl~ak~qyzkeE;YPWRZ5 z4y&Zf!pm#q7~m_6irH|4J8@qKUws}p55^UmhNSap=o1`N3GGocnQ~;6_=^@9iiwG> zZ-`l;mqi7wez|9=WWr@s!7-@&qAdHecm9A2DHZC zoSQUp3^`{tUa_)z<6qzeL0+lY(%fEiQ1bdUxIh5$dgKjJq-??>*B^@SelF{FXhH%7sESC4lRE zf`#sFYqojU#~D^U*#7!g$xHe}XM77wavLUFJlZanSaKU6-Ml!^io7jFmw}#ZUKm9j zO`gpT2usk7XTmfSnu_5fAA=qc&lucKEszn_na~}e{H*f}NSvMb(oq3|siw8i8H@^usC>pINQ_wCkRyH$_K*HG_M?hjN#)eu@9F#r|oT^ycY zbj}Ok!VAVO9J1$AfFq>KHe+QZO7$hWx#3HA$6vDNq`#t5C0-49L8UvN^)Z~Y+6v#} zrHw(KJ6yuD#er=+djqUp(q`1pH9=XW>KsWx4zc5tOx5~kiLIBdKnQncy3mjBD zeDaX582{P9W?VY$7$E0k%%*#;j68nbM>O=|RsY@L#ZL#rb_KSjD_8%&T7^#NvN?I> z#&7B9^n{t8&Eb@L=U};QlMmWMrCu3cmhg|A;mG1&;E#%UQ=IJ|8axnh6GlPNtz6SX z4?}+-yk|Tpa}SWMcOQd(CGLV4nPnPT0=wvM#ZxmUQ3wE?|v=(~8t8Qu!oiP>+E_QD8s2e@%`t+#b zrHDe_?s|O9$UZLa8*FR1!S#EccZcVP7v1yVfQ_Zl%@qD`<3`x+m6-P7rcOmnPs60^26EZ?(L0fKDc4Z}FyE+3pv^!A-T$B!6C9cz7LK+L2O4)P0fRLo z0wqe)mJQ5%G~&@g$!le58Yy{T(bAXe)6prXUKq&ke8>1z9@oZTylhx+Vg1&{=t+yHuqt zyd5Rx?o16tZr$^yV^cYZ2m}d?DoCUt2d{&Ww4phY(F#T*?)HeQPJ5*y=#_?7&9zs6 z8uc-JeKmW>Csd+D&#z{lhp&^DS(v`@hH+Wrff}M&e-pZKO?`xa&ITC9#wz79{L9qq z%;QL%wDE8kQ0eCC>Vsej0QQF%vt9a@hRr$0uaQ$~{GM4?+$|%nL2mO>q_VFH{>`&c z2;WLY!{=kXE=6%Ya2e|ZYh+DibdS&@5gbFki*QIcASjRvdWTYxI**dEMgB9~l%d8A z7XCRJqb|8)P9zEXj7!w`yATgL!($o0ENWdA9 zbz4Vfcm_XOB~~rYB;_99>m#~DHv4iYU!t4S%v-~ME35iZLvViIOW_P9pg^<}j5832 zB(tYA`~jy^)gaJ0kS||;pMmbksFI&AEb{0IMtnO_3n(>NA}vWwTRcXIY^_q@0%(M! zVkATvSZ><=mTQ`N|l)1i@?sV?JmoT~Qn#NlO&jr&7Vd6z$u) zS0iVrkFFhW5{7OpM?zJ`d?dVxEOUapm2QCOCdE!QzhwC^KW$fHlD_qCY)H>GON<4~? z?1%yj0c3pc$GQ#Tp8HBEE`th*;>KXO%^%_9>&Do!UsZZk``EM3fKMoODZ)_D71o7E zSP_1q)KF{x13u8e;oEno9i^rSHzaEE5JVuG!f>u&b50(d3_Bzc&tnlmchm9szO7Uf zS;L2S1{qS0PtH3>uxb1n-d3>jG7u{=xr6F%v#Aj$`6BiIL3I8H(ErzK^B1=-#hbt@z*t2cn?=sYl`utF!EjnZPHv{=8=!e>aNvDjNr zWQa$O;DCc<4-m#-MFAEF+`!*J+^^e2RoHwspD*U~{{R30|NjF3Zqmq*05}T(Yn^yc diff --git a/campcaster/src/tools/pear/src/DB.php b/campcaster/src/tools/pear/src/DB.php new file mode 100644 index 000000000..9f917ea1e --- /dev/null +++ b/campcaster/src/tools/pear/src/DB.php @@ -0,0 +1,1388 @@ + + * @author Tomas V.V.Cox + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: DB.php,v 1.80 2005/02/16 02:16:00 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the PEAR class so it can be extended from + */ +require_once 'PEAR.php'; + + +// {{{ constants +// {{{ error codes + +/**#@+ + * One of PEAR DB's portable error codes. + * @see DB_common::errorCode(), DB::errorMessage() + * + * {@internal If you add an error code here, make sure you also add a textual + * version of it in DB::errorMessage().}} + */ + +/** + * The code returned by many methods upon success + */ +define('DB_OK', 1); + +/** + * Unkown error + */ +define('DB_ERROR', -1); + +/** + * Syntax error + */ +define('DB_ERROR_SYNTAX', -2); + +/** + * Tried to insert a duplicate value into a primary or unique index + */ +define('DB_ERROR_CONSTRAINT', -3); + +/** + * An identifier in the query refers to a non-existant object + */ +define('DB_ERROR_NOT_FOUND', -4); + +/** + * Tried to create a duplicate object + */ +define('DB_ERROR_ALREADY_EXISTS', -5); + +/** + * The current driver does not support the action you attempted + */ +define('DB_ERROR_UNSUPPORTED', -6); + +/** + * The number of parameters does not match the number of placeholders + */ +define('DB_ERROR_MISMATCH', -7); + +/** + * A literal submitted did not match the data type expected + */ +define('DB_ERROR_INVALID', -8); + +/** + * The current DBMS does not support the action you attempted + */ +define('DB_ERROR_NOT_CAPABLE', -9); + +/** + * A literal submitted was too long so the end of it was removed + */ +define('DB_ERROR_TRUNCATED', -10); + +/** + * A literal number submitted did not match the data type expected + */ +define('DB_ERROR_INVALID_NUMBER', -11); + +/** + * A literal date submitted did not match the data type expected + */ +define('DB_ERROR_INVALID_DATE', -12); + +/** + * Attempt to divide something by zero + */ +define('DB_ERROR_DIVZERO', -13); + +/** + * A database needs to be selected + */ +define('DB_ERROR_NODBSELECTED', -14); + +/** + * Could not create the object requested + */ +define('DB_ERROR_CANNOT_CREATE', -15); + +/** + * Could not drop the database requested because it does not exist + */ +define('DB_ERROR_CANNOT_DROP', -17); + +/** + * An identifier in the query refers to a non-existant table + */ +define('DB_ERROR_NOSUCHTABLE', -18); + +/** + * An identifier in the query refers to a non-existant column + */ +define('DB_ERROR_NOSUCHFIELD', -19); + +/** + * The data submitted to the method was inappropriate + */ +define('DB_ERROR_NEED_MORE_DATA', -20); + +/** + * The attempt to lock the table failed + */ +define('DB_ERROR_NOT_LOCKED', -21); + +/** + * The number of columns doesn't match the number of values + */ +define('DB_ERROR_VALUE_COUNT_ON_ROW', -22); + +/** + * The DSN submitted has problems + */ +define('DB_ERROR_INVALID_DSN', -23); + +/** + * Could not connect to the database + */ +define('DB_ERROR_CONNECT_FAILED', -24); + +/** + * The PHP extension needed for this DBMS could not be found + */ +define('DB_ERROR_EXTENSION_NOT_FOUND',-25); + +/** + * The present user has inadequate permissions to perform the task requestd + */ +define('DB_ERROR_ACCESS_VIOLATION', -26); + +/** + * The database requested does not exist + */ +define('DB_ERROR_NOSUCHDB', -27); + +/** + * Tried to insert a null value into a column that doesn't allow nulls + */ +define('DB_ERROR_CONSTRAINT_NOT_NULL',-29); +/**#@-*/ + + +// }}} +// {{{ prepared statement-related + + +/**#@+ + * Identifiers for the placeholders used in prepared statements. + * @see DB_common::prepare() + */ + +/** + * Indicates a scalar (?) placeholder was used + * + * Quote and escape the value as necessary. + */ +define('DB_PARAM_SCALAR', 1); + +/** + * Indicates an opaque (&) placeholder was used + * + * The value presented is a file name. Extract the contents of that file + * and place them in this column. + */ +define('DB_PARAM_OPAQUE', 2); + +/** + * Indicates a misc (!) placeholder was used + * + * The value should not be quoted or escaped. + */ +define('DB_PARAM_MISC', 3); +/**#@-*/ + + +// }}} +// {{{ binary data-related + + +/**#@+ + * The different ways of returning binary data from queries. + */ + +/** + * Sends the fetched data straight through to output + */ +define('DB_BINMODE_PASSTHRU', 1); + +/** + * Lets you return data as usual + */ +define('DB_BINMODE_RETURN', 2); + +/** + * Converts the data to hex format before returning it + * + * For example the string "123" would become "313233". + */ +define('DB_BINMODE_CONVERT', 3); +/**#@-*/ + + +// }}} +// {{{ fetch modes + + +/**#@+ + * Fetch Modes. + * @see DB_common::setFetchMode() + */ + +/** + * Indicates the current default fetch mode should be used + * @see DB_common::$fetchmode + */ +define('DB_FETCHMODE_DEFAULT', 0); + +/** + * Column data indexed by numbers, ordered from 0 and up + */ +define('DB_FETCHMODE_ORDERED', 1); + +/** + * Column data indexed by column names + */ +define('DB_FETCHMODE_ASSOC', 2); + +/** + * Column data as object properties + */ +define('DB_FETCHMODE_OBJECT', 3); + +/** + * For multi-dimensional results, make the column name the first level + * of the array and put the row number in the second level of the array + * + * This is flipped from the normal behavior, which puts the row numbers + * in the first level of the array and the column names in the second level. + */ +define('DB_FETCHMODE_FLIPPED', 4); +/**#@-*/ + +/**#@+ + * Old fetch modes. Left here for compatibility. + */ +define('DB_GETMODE_ORDERED', DB_FETCHMODE_ORDERED); +define('DB_GETMODE_ASSOC', DB_FETCHMODE_ASSOC); +define('DB_GETMODE_FLIPPED', DB_FETCHMODE_FLIPPED); +/**#@-*/ + + +// }}} +// {{{ tableInfo() && autoPrepare()-related + + +/**#@+ + * The type of information to return from the tableInfo() method. + * + * Bitwised constants, so they can be combined using | + * and removed using ^. + * + * @see DB_common::tableInfo() + * + * {@internal Since the TABLEINFO constants are bitwised, if more of them are + * added in the future, make sure to adjust DB_TABLEINFO_FULL accordingly.}} + */ +define('DB_TABLEINFO_ORDER', 1); +define('DB_TABLEINFO_ORDERTABLE', 2); +define('DB_TABLEINFO_FULL', 3); +/**#@-*/ + + +/**#@+ + * The type of query to create with the automatic query building methods. + * @see DB_common::autoPrepare(), DB_common::autoExecute() + */ +define('DB_AUTOQUERY_INSERT', 1); +define('DB_AUTOQUERY_UPDATE', 2); +/**#@-*/ + + +// }}} +// {{{ portability modes + + +/**#@+ + * Portability Modes. + * + * Bitwised constants, so they can be combined using | + * and removed using ^. + * + * @see DB_common::setOption() + * + * {@internal Since the PORTABILITY constants are bitwised, if more of them are + * added in the future, make sure to adjust DB_PORTABILITY_ALL accordingly.}} + */ + +/** + * Turn off all portability features + */ +define('DB_PORTABILITY_NONE', 0); + +/** + * Convert names of tables and fields to lower case + * when using the get*(), fetch*() and tableInfo() methods + */ +define('DB_PORTABILITY_LOWERCASE', 1); + +/** + * Right trim the data output by get*() and fetch*() + */ +define('DB_PORTABILITY_RTRIM', 2); + +/** + * Force reporting the number of rows deleted + */ +define('DB_PORTABILITY_DELETE_COUNT', 4); + +/** + * Enable hack that makes numRows() work in Oracle + */ +define('DB_PORTABILITY_NUMROWS', 8); + +/** + * Makes certain error messages in certain drivers compatible + * with those from other DBMS's + * + * + mysql, mysqli: change unique/primary key constraints + * DB_ERROR_ALREADY_EXISTS -> DB_ERROR_CONSTRAINT + * + * + odbc(access): MS's ODBC driver reports 'no such field' as code + * 07001, which means 'too few parameters.' When this option is on + * that code gets mapped to DB_ERROR_NOSUCHFIELD. + */ +define('DB_PORTABILITY_ERRORS', 16); + +/** + * Convert null values to empty strings in data output by + * get*() and fetch*() + */ +define('DB_PORTABILITY_NULL_TO_EMPTY', 32); + +/** + * Turn on all portability features + */ +define('DB_PORTABILITY_ALL', 63); +/**#@-*/ + +// }}} + + +// }}} +// {{{ class DB + +/** + * Database independent query interface + * + * The main "DB" class is simply a container class with some static + * methods for creating DB objects as well as some utility functions + * common to all parts of DB. + * + * The object model of DB is as follows (indentation means inheritance): + * 

+ * DB           The main DB class.  This is simply a utility class
+ *              with some "static" methods for creating DB objects as
+ *              well as common utility functions for other DB classes.
+ *
+ * DB_common    The base for each DB implementation.  Provides default
+ * |            implementations (in OO lingo virtual methods) for
+ * |            the actual DB implementations as well as a bunch of
+ * |            query utility functions.
+ * |
+ * +-DB_mysql   The DB implementation for MySQL.  Inherits DB_common.
+ *              When calling DB::factory or DB::connect for MySQL
+ *              connections, the object returned is an instance of this
+ *              class.
+ *
+ * + * @category Database + * @package DB + * @author Stig Bakken + * @author Tomas V.V.Cox + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB +{ + // {{{ &factory() + + /** + * Create a new DB object for the specified database type but don't + * connect to the database + * + * @param string $type the database type (eg "mysql") + * @param array $options an associative array of option names and values + * + * @return object a new DB object. A DB_Error object on failure. + * + * @see DB_common::setOption() + */ + function &factory($type, $options = false) + { + if (!is_array($options)) { + $options = array('persistent' => $options); + } + + if (isset($options['debug']) && $options['debug'] >= 2) { + // expose php errors with sufficient debug level + include_once "DB/{$type}.php"; + } else { + @include_once "DB/{$type}.php"; + } + + $classname = "DB_${type}"; + + if (!class_exists($classname)) { + $tmp = PEAR::raiseError(null, DB_ERROR_NOT_FOUND, null, null, + "Unable to include the DB/{$type}.php" + . " file for '$dsn'", + 'DB_Error', true); + return $tmp; + } + + @$obj =& new $classname; + + foreach ($options as $option => $value) { + $test = $obj->setOption($option, $value); + if (DB::isError($test)) { + return $test; + } + } + + return $obj; + } + + // }}} + // {{{ &connect() + + /** + * Create a new DB object including a connection to the specified database + * + * Example 1. + * + * require_once 'DB.php'; + * + * $dsn = 'pgsql://user:password@host/database'; + * $options = array( + * 'debug' => 2, + * 'portability' => DB_PORTABILITY_ALL, + * ); + * + * $db =& DB::connect($dsn, $options); + * if (PEAR::isError($db)) { + * die($db->getMessage()); + * } + * + * + * @param mixed $dsn the string "data source name" or array in the + * format returned by DB::parseDSN() + * @param array $options an associative array of option names and values + * + * @return object a new DB object. A DB_Error object on failure. + * + * @uses DB_dbase::connect(), DB_fbsql::connect(), DB_ibase::connect(), + * DB_ifx::connect(), DB_msql::connect(), DB_mssql::connect(), + * DB_mysql::connect(), DB_mysqli::connect(), DB_oci8::connect(), + * DB_odbc::connect(), DB_pgsql::connect(), DB_sqlite::connect(), + * DB_sybase::connect() + * + * @uses DB::parseDSN(), DB_common::setOption(), PEAR::isError() + */ + function &connect($dsn, $options = array()) + { + $dsninfo = DB::parseDSN($dsn); + $type = $dsninfo['phptype']; + + if (!is_array($options)) { + /* + * For backwards compatibility. $options used to be boolean, + * indicating whether the connection should be persistent. + */ + $options = array('persistent' => $options); + } + + if (isset($options['debug']) && $options['debug'] >= 2) { + // expose php errors with sufficient debug level + include_once "DB/${type}.php"; + } else { + @include_once "DB/${type}.php"; + } + + $classname = "DB_${type}"; + if (!class_exists($classname)) { + $tmp = PEAR::raiseError(null, DB_ERROR_NOT_FOUND, null, null, + "Unable to include the DB/{$type}.php" + . " file for '$dsn'", + 'DB_Error', true); + return $tmp; + } + + @$obj =& new $classname; + + foreach ($options as $option => $value) { + $test = $obj->setOption($option, $value); + if (DB::isError($test)) { + return $test; + } + } + + $err = $obj->connect($dsninfo, $obj->getOption('persistent')); + if (DB::isError($err)) { + $err->addUserInfo($dsn); + return $err; + } + + return $obj; + } + + // }}} + // {{{ apiVersion() + + /** + * Return the DB API version + * + * @return string the DB API version number + */ + function apiVersion() + { + return '1.7.6'; + } + + // }}} + // {{{ isError() + + /** + * Determines if a variable is a DB_Error object + * + * @param mixed $value the variable to check + * + * @return bool whether $value is DB_Error object + */ + function isError($value) + { + return is_a($value, 'DB_Error'); + } + + // }}} + // {{{ isConnection() + + /** + * Determines if a value is a DB_ object + * + * @param mixed $value the value to test + * + * @return bool whether $value is a DB_ object + */ + function isConnection($value) + { + return (is_object($value) && + is_subclass_of($value, 'db_common') && + method_exists($value, 'simpleQuery')); + } + + // }}} + // {{{ isManip() + + /** + * Tell whether a query is a data manipulation or data definition query + * + * Examples of data manipulation queries are INSERT, UPDATE and DELETE. + * Examples of data definition queries are CREATE, DROP, ALTER, GRANT, + * REVOKE. + * + * @param string $query the query + * + * @return boolean whether $query is a data manipulation query + */ + function isManip($query) + { + $manips = 'INSERT|UPDATE|DELETE|REPLACE|' + . 'CREATE|DROP|' + . 'LOAD DATA|SELECT .* INTO|COPY|' + . 'ALTER|GRANT|REVOKE|' + . 'LOCK|UNLOCK'; + if (preg_match('/^\s*"?(' . $manips . ')\s+/i', $query)) { + return true; + } + return false; + } + + // }}} + // {{{ errorMessage() + + /** + * Return a textual error message for a DB error code + * + * @param integer $value the DB error code + * + * @return string the error message or false if the error code was + * not recognized + */ + function errorMessage($value) + { + static $errorMessages; + if (!isset($errorMessages)) { + $errorMessages = array( + DB_ERROR => 'unknown error', + DB_ERROR_ACCESS_VIOLATION => 'insufficient permissions', + DB_ERROR_ALREADY_EXISTS => 'already exists', + DB_ERROR_CANNOT_CREATE => 'can not create', + DB_ERROR_CANNOT_DROP => 'can not drop', + DB_ERROR_CONNECT_FAILED => 'connect failed', + DB_ERROR_CONSTRAINT => 'constraint violation', + DB_ERROR_CONSTRAINT_NOT_NULL=> 'null value violates not-null constraint', + DB_ERROR_DIVZERO => 'division by zero', + DB_ERROR_EXTENSION_NOT_FOUND=> 'extension not found', + DB_ERROR_INVALID => 'invalid', + DB_ERROR_INVALID_DATE => 'invalid date or time', + DB_ERROR_INVALID_DSN => 'invalid DSN', + DB_ERROR_INVALID_NUMBER => 'invalid number', + DB_ERROR_MISMATCH => 'mismatch', + DB_ERROR_NEED_MORE_DATA => 'insufficient data supplied', + DB_ERROR_NODBSELECTED => 'no database selected', + DB_ERROR_NOSUCHDB => 'no such database', + DB_ERROR_NOSUCHFIELD => 'no such field', + DB_ERROR_NOSUCHTABLE => 'no such table', + DB_ERROR_NOT_CAPABLE => 'DB backend not capable', + DB_ERROR_NOT_FOUND => 'not found', + DB_ERROR_NOT_LOCKED => 'not locked', + DB_ERROR_SYNTAX => 'syntax error', + DB_ERROR_UNSUPPORTED => 'not supported', + DB_ERROR_TRUNCATED => 'truncated', + DB_ERROR_VALUE_COUNT_ON_ROW => 'value count on row', + DB_OK => 'no error', + ); + } + + if (DB::isError($value)) { + $value = $value->getCode(); + } + + return isset($errorMessages[$value]) ? $errorMessages[$value] + : $errorMessages[DB_ERROR]; + } + + // }}} + // {{{ parseDSN() + + /** + * Parse a data source name + * + * Additional keys can be added by appending a URI query string to the + * end of the DSN. + * + * The format of the supplied DSN is in its fullest form: + * + * phptype(dbsyntax)://username:password@protocol+hostspec/database?option=8&another=true + * + * + * Most variations are allowed: + * + * phptype://username:password@protocol+hostspec:110//usr/db_file.db?mode=0644 + * phptype://username:password@hostspec/database_name + * phptype://username:password@hostspec + * phptype://username@hostspec + * phptype://hostspec/database + * phptype://hostspec + * phptype(dbsyntax) + * phptype + * + * + * @param string $dsn Data Source Name to be parsed + * + * @return array an associative array with the following keys: + * + phptype: Database backend used in PHP (mysql, odbc etc.) + * + dbsyntax: Database used with regards to SQL syntax etc. + * + protocol: Communication protocol to use (tcp, unix etc.) + * + hostspec: Host specification (hostname[:port]) + * + database: Database to use on the DBMS server + * + username: User name for login + * + password: Password for login + */ + function parseDSN($dsn) + { + $parsed = array( + 'phptype' => false, + 'dbsyntax' => false, + 'username' => false, + 'password' => false, + 'protocol' => false, + 'hostspec' => false, + 'port' => false, + 'socket' => false, + 'database' => false, + ); + + if (is_array($dsn)) { + $dsn = array_merge($parsed, $dsn); + if (!$dsn['dbsyntax']) { + $dsn['dbsyntax'] = $dsn['phptype']; + } + return $dsn; + } + + // Find phptype and dbsyntax + if (($pos = strpos($dsn, '://')) !== false) { + $str = substr($dsn, 0, $pos); + $dsn = substr($dsn, $pos + 3); + } else { + $str = $dsn; + $dsn = null; + } + + // Get phptype and dbsyntax + // $str => phptype(dbsyntax) + if (preg_match('|^(.+?)\((.*?)\)$|', $str, $arr)) { + $parsed['phptype'] = $arr[1]; + $parsed['dbsyntax'] = !$arr[2] ? $arr[1] : $arr[2]; + } else { + $parsed['phptype'] = $str; + $parsed['dbsyntax'] = $str; + } + + if (!count($dsn)) { + return $parsed; + } + + // Get (if found): username and password + // $dsn => username:password@protocol+hostspec/database + if (($at = strrpos($dsn,'@')) !== false) { + $str = substr($dsn, 0, $at); + $dsn = substr($dsn, $at + 1); + if (($pos = strpos($str, ':')) !== false) { + $parsed['username'] = rawurldecode(substr($str, 0, $pos)); + $parsed['password'] = rawurldecode(substr($str, $pos + 1)); + } else { + $parsed['username'] = rawurldecode($str); + } + } + + // Find protocol and hostspec + + if (preg_match('|^([^(]+)\((.*?)\)/?(.*?)$|', $dsn, $match)) { + // $dsn => proto(proto_opts)/database + $proto = $match[1]; + $proto_opts = $match[2] ? $match[2] : false; + $dsn = $match[3]; + + } else { + // $dsn => protocol+hostspec/database (old format) + if (strpos($dsn, '+') !== false) { + list($proto, $dsn) = explode('+', $dsn, 2); + } + if (strpos($dsn, '/') !== false) { + list($proto_opts, $dsn) = explode('/', $dsn, 2); + } else { + $proto_opts = $dsn; + $dsn = null; + } + } + + // process the different protocol options + $parsed['protocol'] = (!empty($proto)) ? $proto : 'tcp'; + $proto_opts = rawurldecode($proto_opts); + if ($parsed['protocol'] == 'tcp') { + if (strpos($proto_opts, ':') !== false) { + list($parsed['hostspec'], + $parsed['port']) = explode(':', $proto_opts); + } else { + $parsed['hostspec'] = $proto_opts; + } + } elseif ($parsed['protocol'] == 'unix') { + $parsed['socket'] = $proto_opts; + } + + // Get dabase if any + // $dsn => database + if ($dsn) { + if (($pos = strpos($dsn, '?')) === false) { + // /database + $parsed['database'] = rawurldecode($dsn); + } else { + // /database?param1=value1¶m2=value2 + $parsed['database'] = rawurldecode(substr($dsn, 0, $pos)); + $dsn = substr($dsn, $pos + 1); + if (strpos($dsn, '&') !== false) { + $opts = explode('&', $dsn); + } else { // database?param1=value1 + $opts = array($dsn); + } + foreach ($opts as $opt) { + list($key, $value) = explode('=', $opt); + if (!isset($parsed[$key])) { + // don't allow params overwrite + $parsed[$key] = rawurldecode($value); + } + } + } + } + + return $parsed; + } + + // }}} +} + +// }}} +// {{{ class DB_Error + +/** + * DB_Error implements a class for reporting portable database error + * messages + * + * @category Database + * @package DB + * @author Stig Bakken + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_Error extends PEAR_Error +{ + // {{{ constructor + + /** + * DB_Error constructor + * + * @param mixed $code DB error code, or string with error message + * @param int $mode what "error mode" to operate in + * @param int $level what error level to use for $mode & + * PEAR_ERROR_TRIGGER + * @param mixed $debuginfo additional debug info, such as the last query + * + * @see PEAR_Error + */ + function DB_Error($code = DB_ERROR, $mode = PEAR_ERROR_RETURN, + $level = E_USER_NOTICE, $debuginfo = null) + { + if (is_int($code)) { + $this->PEAR_Error('DB Error: ' . DB::errorMessage($code), $code, + $mode, $level, $debuginfo); + } else { + $this->PEAR_Error("DB Error: $code", DB_ERROR, + $mode, $level, $debuginfo); + } + } + + // }}} +} + +// }}} +// {{{ class DB_result + +/** + * This class implements a wrapper for a DB result set + * + * A new instance of this class will be returned by the DB implementation + * after processing a query that returns data. + * + * @category Database + * @package DB + * @author Stig Bakken + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_result +{ + // {{{ properties + + /** + * Should results be freed automatically when there are no more rows? + * @var boolean + * @see DB_common::$options + */ + var $autofree; + + /** + * A reference to the DB_ object + * @var object + */ + var $dbh; + + /** + * The current default fetch mode + * @var integer + * @see DB_common::$fetchmode + */ + var $fetchmode; + + /** + * The name of the class into which results should be fetched when + * DB_FETCHMODE_OBJECT is in effect + * + * @var string + * @see DB_common::$fetchmode_object_class + */ + var $fetchmode_object_class; + + /** + * The number of rows to fetch from a limit query + * @var integer + */ + var $limit_count = null; + + /** + * The row to start fetching from in limit queries + * @var integer + */ + var $limit_from = null; + + /** + * The execute parameters that created this result + * @var array + * @since Property available since Release 1.7.0 + */ + var $parameters; + + /** + * The query string that created this result + * + * Copied here incase it changes in $dbh, which is referenced + * + * @var string + * @since Property available since Release 1.7.0 + */ + var $query; + + /** + * The query result resource id created by PHP + * @var resource + */ + var $result; + + /** + * The present row being dealt with + * @var integer + */ + var $row_counter = null; + + /** + * The prepared statement resource id created by PHP in $dbh + * + * This resource is only available when the result set was created using + * a driver's native execute() method, not PEAR DB's emulated one. + * + * Copied here incase it changes in $dbh, which is referenced + * + * {@internal Mainly here because the InterBase/Firebird API is only + * able to retrieve data from result sets if the statemnt handle is + * still in scope.}} + * + * @var resource + * @since Property available since Release 1.7.0 + */ + var $statement; + + + // }}} + // {{{ constructor + + /** + * This constructor sets the object's properties + * + * @param object &$dbh the DB object reference + * @param resource $result the result resource id + * @param array $options an associative array with result options + * + * @return void + */ + function DB_result(&$dbh, $result, $options = array()) + { + $this->autofree = $dbh->options['autofree']; + $this->dbh = &$dbh; + $this->fetchmode = $dbh->fetchmode; + $this->fetchmode_object_class = $dbh->fetchmode_object_class; + $this->parameters = $dbh->last_parameters; + $this->query = $dbh->last_query; + $this->result = $result; + $this->statement = empty($dbh->last_stmt) ? null : $dbh->last_stmt; + foreach ($options as $key => $value) { + $this->setOption($key, $value); + } + } + + /** + * Set options for the DB_result object + * + * @param string $key the option to set + * @param mixed $value the value to set the option to + * + * @return void + */ + function setOption($key, $value = null) + { + switch ($key) { + case 'limit_from': + $this->limit_from = $value; + break; + case 'limit_count': + $this->limit_count = $value; + } + } + + // }}} + // {{{ fetchRow() + + /** + * Fetch a row of data and return it by reference into an array + * + * The type of array returned can be controlled either by setting this + * method's $fetchmode parameter or by changing the default + * fetch mode setFetchMode() before calling this method. + * + * There are two options for standardizing the information returned + * from databases, ensuring their values are consistent when changing + * DBMS's. These portability options can be turned on when creating a + * new DB object or by using setOption(). + * + * + DB_PORTABILITY_LOWERCASE + * convert names of fields to lower case + * + * + DB_PORTABILITY_RTRIM + * right trim the data + * + * @param int $fetchmode the constant indicating how to format the data + * @param int $rownum the row number to fetch (index starts at 0) + * + * @return mixed an array or object containing the row's data, + * NULL when the end of the result set is reached + * or a DB_Error object on failure. + * + * @see DB_common::setOption(), DB_common::setFetchMode() + */ + function &fetchRow($fetchmode = DB_FETCHMODE_DEFAULT, $rownum = null) + { + if ($fetchmode === DB_FETCHMODE_DEFAULT) { + $fetchmode = $this->fetchmode; + } + if ($fetchmode === DB_FETCHMODE_OBJECT) { + $fetchmode = DB_FETCHMODE_ASSOC; + $object_class = $this->fetchmode_object_class; + } + if ($this->limit_from !== null) { + if ($this->row_counter === null) { + $this->row_counter = $this->limit_from; + // Skip rows + if ($this->dbh->features['limit'] === false) { + $i = 0; + while ($i++ < $this->limit_from) { + $this->dbh->fetchInto($this->result, $arr, $fetchmode); + } + } + } + if ($this->row_counter >= ($this->limit_from + $this->limit_count)) + { + if ($this->autofree) { + $this->free(); + } + $tmp = null; + return $tmp; + } + if ($this->dbh->features['limit'] === 'emulate') { + $rownum = $this->row_counter; + } + $this->row_counter++; + } + $res = $this->dbh->fetchInto($this->result, $arr, $fetchmode, $rownum); + if ($res === DB_OK) { + if (isset($object_class)) { + // The default mode is specified in the + // DB_common::fetchmode_object_class property + if ($object_class == 'stdClass') { + $arr = (object) $arr; + } else { + $arr = &new $object_class($arr); + } + } + return $arr; + } + if ($res == null && $this->autofree) { + $this->free(); + } + return $res; + } + + // }}} + // {{{ fetchInto() + + /** + * Fetch a row of data into an array which is passed by reference + * + * The type of array returned can be controlled either by setting this + * method's $fetchmode parameter or by changing the default + * fetch mode setFetchMode() before calling this method. + * + * There are two options for standardizing the information returned + * from databases, ensuring their values are consistent when changing + * DBMS's. These portability options can be turned on when creating a + * new DB object or by using setOption(). + * + * + DB_PORTABILITY_LOWERCASE + * convert names of fields to lower case + * + * + DB_PORTABILITY_RTRIM + * right trim the data + * + * @param array &$arr the variable where the data should be placed + * @param int $fetchmode the constant indicating how to format the data + * @param int $rownum the row number to fetch (index starts at 0) + * + * @return mixed DB_OK if a row is processed, NULL when the end of the + * result set is reached or a DB_Error object on failure + * + * @see DB_common::setOption(), DB_common::setFetchMode() + */ + function fetchInto(&$arr, $fetchmode = DB_FETCHMODE_DEFAULT, $rownum = null) + { + if ($fetchmode === DB_FETCHMODE_DEFAULT) { + $fetchmode = $this->fetchmode; + } + if ($fetchmode === DB_FETCHMODE_OBJECT) { + $fetchmode = DB_FETCHMODE_ASSOC; + $object_class = $this->fetchmode_object_class; + } + if ($this->limit_from !== null) { + if ($this->row_counter === null) { + $this->row_counter = $this->limit_from; + // Skip rows + if ($this->dbh->features['limit'] === false) { + $i = 0; + while ($i++ < $this->limit_from) { + $this->dbh->fetchInto($this->result, $arr, $fetchmode); + } + } + } + if ($this->row_counter >= ( + $this->limit_from + $this->limit_count)) + { + if ($this->autofree) { + $this->free(); + } + return null; + } + if ($this->dbh->features['limit'] === 'emulate') { + $rownum = $this->row_counter; + } + + $this->row_counter++; + } + $res = $this->dbh->fetchInto($this->result, $arr, $fetchmode, $rownum); + if ($res === DB_OK) { + if (isset($object_class)) { + // default mode specified in the + // DB_common::fetchmode_object_class property + if ($object_class == 'stdClass') { + $arr = (object) $arr; + } else { + $arr = new $object_class($arr); + } + } + return DB_OK; + } + if ($res == null && $this->autofree) { + $this->free(); + } + return $res; + } + + // }}} + // {{{ numCols() + + /** + * Get the the number of columns in a result set + * + * @return int the number of columns. A DB_Error object on failure. + */ + function numCols() + { + return $this->dbh->numCols($this->result); + } + + // }}} + // {{{ numRows() + + /** + * Get the number of rows in a result set + * + * @return int the number of rows. A DB_Error object on failure. + */ + function numRows() + { + if ($this->dbh->features['numrows'] === 'emulate' + && $this->dbh->options['portability'] & DB_PORTABILITY_NUMROWS) + { + if ($this->dbh->features['prepare']) { + $res = $this->dbh->query($this->query, $this->parameters); + } else { + $res = $this->dbh->query($this->query); + } + if (DB::isError($res)) { + return $res; + } + $i = 0; + while ($res->fetchInto($tmp, DB_FETCHMODE_ORDERED)) { + $i++; + } + return $i; + } else { + return $this->dbh->numRows($this->result); + } + } + + // }}} + // {{{ nextResult() + + /** + * Get the next result if a batch of queries was executed + * + * @return bool true if a new result is available or false if not + */ + function nextResult() + { + return $this->dbh->nextResult($this->result); + } + + // }}} + // {{{ free() + + /** + * Frees the resources allocated for this result set + * + * @return bool true on success. A DB_Error object on failure. + */ + function free() + { + $err = $this->dbh->freeResult($this->result); + if (DB::isError($err)) { + return $err; + } + $this->result = false; + $this->statement = false; + return true; + } + + // }}} + // {{{ tableInfo() + + /** + * @see DB_common::tableInfo() + * @deprecated Method deprecated some time before Release 1.2 + */ + function tableInfo($mode = null) + { + if (is_string($mode)) { + return $this->dbh->raiseError(DB_ERROR_NEED_MORE_DATA); + } + return $this->dbh->tableInfo($this, $mode); + } + + // }}} + // {{{ getQuery() + + /** + * Determine the query string that created this result + * + * @return string the query string + * + * @since Method available since Release 1.7.0 + */ + function getQuery() + { + return $this->query; + } + + // }}} + // {{{ getRowCounter() + + /** + * Tells which row number is currently being processed + * + * @return integer the current row being looked at. Starts at 1. + */ + function getRowCounter() + { + return $this->row_counter; + } + + // }}} +} + +// }}} +// {{{ class DB_row + +/** + * PEAR DB Row Object + * + * The object contains a row of data from a result set. Each column's data + * is placed in a property named for the column. + * + * @category Database + * @package DB + * @author Stig Bakken + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + * @see DB_common::setFetchMode() + */ +class DB_row +{ + // {{{ constructor + + /** + * The constructor places a row's data into properties of this object + * + * @param array the array containing the row's data + * + * @return void + */ + function DB_row(&$arr) + { + foreach ($arr as $key => $value) { + $this->$key = &$arr[$key]; + } + } + + // }}} +} + +// }}} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/common.php b/campcaster/src/tools/pear/src/DB/common.php new file mode 100644 index 000000000..7536fbcbd --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/common.php @@ -0,0 +1,2157 @@ + + * @author Tomas V.V. Cox + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: common.php,v 1.137 2005/04/07 14:27:35 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the PEAR class so it can be extended from + */ +require_once 'PEAR.php'; + +/** + * DB_common is the base class from which each database driver class extends + * + * All common methods are declared here. If a given DBMS driver contains + * a particular method, that method will overload the one here. + * + * @category Database + * @package DB + * @author Stig Bakken + * @author Tomas V.V. Cox + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_common extends PEAR +{ + // {{{ properties + + /** + * The current default fetch mode + * @var integer + */ + var $fetchmode = DB_FETCHMODE_ORDERED; + + /** + * The name of the class into which results should be fetched when + * DB_FETCHMODE_OBJECT is in effect + * + * @var string + */ + var $fetchmode_object_class = 'stdClass'; + + /** + * Was a connection present when the object was serialized()? + * @var bool + * @see DB_common::__sleep(), DB_common::__wake() + */ + var $was_connected = null; + + /** + * The most recently executed query + * @var string + */ + var $last_query = ''; + + /** + * Run-time configuration options + * + * The 'optimize' option has been deprecated. Use the 'portability' + * option instead. + * + * @var array + * @see DB_common::setOption() + */ + var $options = array( + 'result_buffering' => 500, + 'persistent' => false, + 'ssl' => false, + 'debug' => 0, + 'seqname_format' => '%s_seq', + 'autofree' => false, + 'portability' => DB_PORTABILITY_NONE, + 'optimize' => 'performance', // Deprecated. Use 'portability'. + ); + + /** + * The parameters from the most recently executed query + * @var array + * @since Property available since Release 1.7.0 + */ + var $last_parameters = array(); + + /** + * The elements from each prepared statement + * @var array + */ + var $prepare_tokens = array(); + + /** + * The data types of the various elements in each prepared statement + * @var array + */ + var $prepare_types = array(); + + /** + * The prepared queries + * @var array + */ + var $prepared_queries = array(); + + + // }}} + // {{{ DB_common + + /** + * This constructor calls $this->PEAR('DB_Error') + * + * @return void + */ + function DB_common() + { + $this->PEAR('DB_Error'); + } + + // }}} + // {{{ __sleep() + + /** + * Automatically indicates which properties should be saved + * when PHP's serialize() function is called + * + * @return array the array of properties names that should be saved + */ + function __sleep() + { + if ($this->connection) { + // Don't disconnect(), people use serialize() for many reasons + $this->was_connected = true; + } else { + $this->was_connected = false; + } + if (isset($this->autocommit)) { + return array('autocommit', + 'dbsyntax', + 'dsn', + 'features', + 'fetchmode', + 'fetchmode_object_class', + 'options', + 'was_connected', + ); + } else { + return array('dbsyntax', + 'dsn', + 'features', + 'fetchmode', + 'fetchmode_object_class', + 'options', + 'was_connected', + ); + } + } + + // }}} + // {{{ __wakeup() + + /** + * Automatically reconnects to the database when PHP's unserialize() + * function is called + * + * The reconnection attempt is only performed if the object was connected + * at the time PHP's serialize() function was run. + * + * @return void + */ + function __wakeup() + { + if ($this->was_connected) { + $this->connect($this->dsn, $this->options); + } + } + + // }}} + // {{{ __toString() + + /** + * Automatic string conversion for PHP 5 + * + * @return string a string describing the current PEAR DB object + * + * @since Method available since Release 1.7.0 + */ + function __toString() + { + $info = strtolower(get_class($this)); + $info .= ': (phptype=' . $this->phptype . + ', dbsyntax=' . $this->dbsyntax . + ')'; + if ($this->connection) { + $info .= ' [connected]'; + } + return $info; + } + + // }}} + // {{{ toString() + + /** + * DEPRECATED: String conversion method + * + * @return string a string describing the current PEAR DB object + * + * @deprecated Method deprecated in Release 1.7.0 + */ + function toString() + { + return $this->__toString(); + } + + // }}} + // {{{ quoteString() + + /** + * DEPRECATED: Quotes a string so it can be safely used within string + * delimiters in a query + * + * @param string $string the string to be quoted + * + * @return string the quoted string + * + * @see DB_common::quoteSmart(), DB_common::escapeSimple() + * @deprecated Method deprecated some time before Release 1.2 + */ + function quoteString($string) + { + $string = $this->quote($string); + if ($string{0} == "'") { + return substr($string, 1, -1); + } + return $string; + } + + // }}} + // {{{ quote() + + /** + * DEPRECATED: Quotes a string so it can be safely used in a query + * + * @param string $string the string to quote + * + * @return string the quoted string or the string NULL + * if the value submitted is null. + * + * @see DB_common::quoteSmart(), DB_common::escapeSimple() + * @deprecated Deprecated in release 1.6.0 + */ + function quote($string = null) + { + return ($string === null) ? 'NULL' + : "'" . str_replace("'", "''", $string) . "'"; + } + + // }}} + // {{{ quoteIdentifier() + + /** + * Quotes a string so it can be safely used as a table or column name + * + * Delimiting style depends on which database driver is being used. + * + * NOTE: just because you CAN use delimited identifiers doesn't mean + * you SHOULD use them. In general, they end up causing way more + * problems than they solve. + * + * Portability is broken by using the following characters inside + * delimited identifiers: + * + backtick (`) -- due to MySQL + * + double quote (") -- due to Oracle + * + brackets ([ or ]) -- due to Access + * + * Delimited identifiers are known to generally work correctly under + * the following drivers: + * + mssql + * + mysql + * + mysqli + * + oci8 + * + odbc(access) + * + odbc(db2) + * + pgsql + * + sqlite + * + sybase (must execute set quoted_identifier on sometime + * prior to use) + * + * InterBase doesn't seem to be able to use delimited identifiers + * via PHP 4. They work fine under PHP 5. + * + * @param string $str the identifier name to be quoted + * + * @return string the quoted identifier + * + * @since Method available since Release 1.6.0 + */ + function quoteIdentifier($str) + { + return '"' . str_replace('"', '""', $str) . '"'; + } + + // }}} + // {{{ quoteSmart() + + /** + * Formats input so it can be safely used in a query + * + * The output depends on the PHP data type of input and the database + * type being used. + * + * @param mixed $in the data to be formatted + * + * @return mixed the formatted data. The format depends on the input's + * PHP type: + *
    + *
  • + * input -> returns + *
    • + *
  • + * null -> the string NULL + *
    • + *
  • + * integer or double -> the unquoted number + *
    • + *
  • + * bool -> output depends on the driver in use + * Most drivers return integers: 1 if + * true or 0 if + * false. + * Some return strings: TRUE if + * true or FALSE if + * false. + * Finally one returns strings: T if + * true or F if + * false. Here is a list of each DBMS, + * the values returned and the suggested column type: + *
      + *
    • + * dbase -> T/F + * (Logical) + *
      • + *
    • + * fbase -> TRUE/FALSE + * (BOOLEAN) + *
      • + *
    • + * ibase -> 1/0 + * (SMALLINT) [1] + *
      • + *
    • + * ifx -> 1/0 + * (SMALLINT) [1] + *
      • + *
    • + * msql -> 1/0 + * (INTEGER) + *
      • + *
    • + * mssql -> 1/0 + * (BIT) + *
      • + *
    • + * mysql -> 1/0 + * (TINYINT(1)) + *
      • + *
    • + * mysqli -> 1/0 + * (TINYINT(1)) + *
      • + *
    • + * oci8 -> 1/0 + * (NUMBER(1)) + *
      • + *
    • + * odbc -> 1/0 + * (SMALLINT) [1] + *
      • + *
    • + * pgsql -> TRUE/FALSE + * (BOOLEAN) + *
      • + *
    • + * sqlite -> 1/0 + * (INTEGER) + *
      • + *
    • + * sybase -> 1/0 + * (TINYINT(1)) + *
      • + *
    + * [1] Accommodate the lowest common denominator because not all + * versions of have BOOLEAN. + *
    • + *
  • + * other (including strings and numeric strings) -> + * the data with single quotes escaped by preceeding + * single quotes, backslashes are escaped by preceeding + * backslashes, then the whole string is encapsulated + * between single quotes + *
    • + *
+ * + * @see DB_common::escapeSimple() + * @since Method available since Release 1.6.0 + */ + function quoteSmart($in) + { + if (is_int($in) || is_double($in)) { + return $in; + } elseif (is_bool($in)) { + return $in ? 1 : 0; + } elseif (is_null($in)) { + return 'NULL'; + } else { + return "'" . $this->escapeSimple($in) . "'"; + } + } + + // }}} + // {{{ escapeSimple() + + /** + * Escapes a string according to the current DBMS's standards + * + * In SQLite, this makes things safe for inserts/updates, but may + * cause problems when performing text comparisons against columns + * containing binary data. See the + * {@link http://php.net/sqlite_escape_string PHP manual} for more info. + * + * @param string $str the string to be escaped + * + * @return string the escaped string + * + * @see DB_common::quoteSmart() + * @since Method available since Release 1.6.0 + */ + function escapeSimple($str) + { + return str_replace("'", "''", $str); + } + + // }}} + // {{{ provides() + + /** + * Tells whether the present driver supports a given feature + * + * @param string $feature the feature you're curious about + * + * @return bool whether this driver supports $feature + */ + function provides($feature) + { + return $this->features[$feature]; + } + + // }}} + // {{{ setFetchMode() + + /** + * Sets the fetch mode that should be used by default for query results + * + * @param integer $fetchmode DB_FETCHMODE_ORDERED, DB_FETCHMODE_ASSOC + * or DB_FETCHMODE_OBJECT + * @param string $object_class the class name of the object to be returned + * by the fetch methods when the + * DB_FETCHMODE_OBJECT mode is selected. + * If no class is specified by default a cast + * to object from the assoc array row will be + * done. There is also the posibility to use + * and extend the 'DB_row' class. + * + * @see DB_FETCHMODE_ORDERED, DB_FETCHMODE_ASSOC, DB_FETCHMODE_OBJECT + */ + function setFetchMode($fetchmode, $object_class = 'stdClass') + { + switch ($fetchmode) { + case DB_FETCHMODE_OBJECT: + $this->fetchmode_object_class = $object_class; + case DB_FETCHMODE_ORDERED: + case DB_FETCHMODE_ASSOC: + $this->fetchmode = $fetchmode; + break; + default: + return $this->raiseError('invalid fetchmode mode'); + } + } + + // }}} + // {{{ setOption() + + /** + * Sets run-time configuration options for PEAR DB + * + * Options, their data types, default values and description: + *
    + *
  • + * autofree boolean = false + *
    should results be freed automatically when there are no + * more rows? + *
  • + * result_buffering integer = 500 + *
    how many rows of the result set should be buffered? + *
    In mysql: mysql_unbuffered_query() is used instead of + * mysql_query() if this value is 0. (Release 1.7.0) + *
    In oci8: this value is passed to ocisetprefetch(). + * (Release 1.7.0) + *
  • + * debug integer = 0 + *
    debug level + *
  • + * persistent boolean = false + *
    should the connection be persistent? + *
  • + * portability integer = DB_PORTABILITY_NONE + *
    portability mode constant (see below) + *
  • + * seqname_format string = %s_seq + *
    the sprintf() format string used on sequence names. This + * format is applied to sequence names passed to + * createSequence(), nextID() and dropSequence(). + *
  • + * ssl boolean = false + *
    use ssl to connect? + *
    • + *
+ * + * ----------------------------------------- + * + * PORTABILITY MODES + * + * These modes are bitwised, so they can be combined using | + * and removed using ^. See the examples section below on how + * to do this. + * + * DB_PORTABILITY_NONE + * turn off all portability features + * + * This mode gets automatically turned on if the deprecated + * optimize option gets set to performance. + * + * + * DB_PORTABILITY_LOWERCASE + * convert names of tables and fields to lower case when using + * get*(), fetch*() and tableInfo() + * + * This mode gets automatically turned on in the following databases + * if the deprecated option optimize gets set to + * portability: + * + oci8 + * + * + * DB_PORTABILITY_RTRIM + * right trim the data output by get*() fetch*() + * + * + * DB_PORTABILITY_DELETE_COUNT + * force reporting the number of rows deleted + * + * Some DBMS's don't count the number of rows deleted when performing + * simple DELETE FROM tablename queries. This portability + * mode tricks such DBMS's into telling the count by adding + * WHERE 1=1 to the end of DELETE queries. + * + * This mode gets automatically turned on in the following databases + * if the deprecated option optimize gets set to + * portability: + * + fbsql + * + mysql + * + mysqli + * + sqlite + * + * + * DB_PORTABILITY_NUMROWS + * enable hack that makes numRows() work in Oracle + * + * This mode gets automatically turned on in the following databases + * if the deprecated option optimize gets set to + * portability: + * + oci8 + * + * + * DB_PORTABILITY_ERRORS + * makes certain error messages in certain drivers compatible + * with those from other DBMS's + * + * + mysql, mysqli: change unique/primary key constraints + * DB_ERROR_ALREADY_EXISTS -> DB_ERROR_CONSTRAINT + * + * + odbc(access): MS's ODBC driver reports 'no such field' as code + * 07001, which means 'too few parameters.' When this option is on + * that code gets mapped to DB_ERROR_NOSUCHFIELD. + * DB_ERROR_MISMATCH -> DB_ERROR_NOSUCHFIELD + * + * DB_PORTABILITY_NULL_TO_EMPTY + * convert null values to empty strings in data output by get*() and + * fetch*(). Needed because Oracle considers empty strings to be null, + * while most other DBMS's know the difference between empty and null. + * + * + * DB_PORTABILITY_ALL + * turn on all portability features + * + * ----------------------------------------- + * + * Example 1. Simple setOption() example + * + * $db->setOption('autofree', true); + * + * + * Example 2. Portability for lowercasing and trimming + * + * $db->setOption('portability', + * DB_PORTABILITY_LOWERCASE | DB_PORTABILITY_RTRIM); + * + * + * Example 3. All portability options except trimming + * + * $db->setOption('portability', + * DB_PORTABILITY_ALL ^ DB_PORTABILITY_RTRIM); + * + * + * @param string $option option name + * @param mixed $value value for the option + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::$options + */ + function setOption($option, $value) + { + if (isset($this->options[$option])) { + $this->options[$option] = $value; + + /* + * Backwards compatibility check for the deprecated 'optimize' + * option. Done here in case settings change after connecting. + */ + if ($option == 'optimize') { + if ($value == 'portability') { + switch ($this->phptype) { + case 'oci8': + $this->options['portability'] = + DB_PORTABILITY_LOWERCASE | + DB_PORTABILITY_NUMROWS; + break; + case 'fbsql': + case 'mysql': + case 'mysqli': + case 'sqlite': + $this->options['portability'] = + DB_PORTABILITY_DELETE_COUNT; + break; + } + } else { + $this->options['portability'] = DB_PORTABILITY_NONE; + } + } + + return DB_OK; + } + return $this->raiseError("unknown option $option"); + } + + // }}} + // {{{ getOption() + + /** + * Returns the value of an option + * + * @param string $option the option name you're curious about + * + * @return mixed the option's value + */ + function getOption($option) + { + if (isset($this->options[$option])) { + return $this->options[$option]; + } + return $this->raiseError("unknown option $option"); + } + + // }}} + // {{{ prepare() + + /** + * Prepares a query for multiple execution with execute() + * + * Creates a query that can be run multiple times. Each time it is run, + * the placeholders, if any, will be replaced by the contents of + * execute()'s $data argument. + * + * Three types of placeholders can be used: + * + ? scalar value (i.e. strings, integers). The system + * will automatically quote and escape the data. + * + ! value is inserted 'as is' + * + & requires a file name. The file's contents get + * inserted into the query (i.e. saving binary + * data in a db) + * + * Example 1. + * + * $sth = $db->prepare('INSERT INTO tbl (a, b, c) VALUES (?, !, &)'); + * $data = array( + * "John's text", + * "'it''s good'", + * 'filename.txt' + * ); + * $res = $db->execute($sth, $data); + * + * + * Use backslashes to escape placeholder characters if you don't want + * them to be interpreted as placeholders: + * 
+     *    "UPDATE foo SET col=? WHERE col='over \& under'"
+     *
+ * + * With some database backends, this is emulated. + * + * {@internal ibase and oci8 have their own prepare() methods.}} + * + * @param string $query the query to be prepared + * + * @return mixed DB statement resource on success. A DB_Error object + * on failure. + * + * @see DB_common::execute() + */ + function prepare($query) + { + $tokens = preg_split('/((?prepare_tokens[] = &$newtokens; + end($this->prepare_tokens); + + $k = key($this->prepare_tokens); + $this->prepare_types[$k] = $types; + $this->prepared_queries[$k] = implode(' ', $newtokens); + + return $k; + } + + // }}} + // {{{ autoPrepare() + + /** + * Automaticaly generates an insert or update query and pass it to prepare() + * + * @param string $table the table name + * @param array $table_fields the array of field names + * @param int $mode a type of query to make: + * DB_AUTOQUERY_INSERT or DB_AUTOQUERY_UPDATE + * @param string $where for update queries: the WHERE clause to + * append to the SQL statement. Don't + * include the "WHERE" keyword. + * + * @return resource the query handle + * + * @uses DB_common::prepare(), DB_common::buildManipSQL() + */ + function autoPrepare($table, $table_fields, $mode = DB_AUTOQUERY_INSERT, + $where = false) + { + $query = $this->buildManipSQL($table, $table_fields, $mode, $where); + if (DB::isError($query)) { + return $query; + } + return $this->prepare($query); + } + + // }}} + // {{{ autoExecute() + + /** + * Automaticaly generates an insert or update query and call prepare() + * and execute() with it + * + * @param string $table the table name + * @param array $fields_values the associative array where $key is a + * field name and $value its value + * @param int $mode a type of query to make: + * DB_AUTOQUERY_INSERT or DB_AUTOQUERY_UPDATE + * @param string $where for update queries: the WHERE clause to + * append to the SQL statement. Don't + * include the "WHERE" keyword. + * + * @return mixed a new DB_result object for successful SELECT queries + * or DB_OK for successul data manipulation queries. + * A DB_Error object on failure. + * + * @uses DB_common::autoPrepare(), DB_common::execute() + */ + function autoExecute($table, $fields_values, $mode = DB_AUTOQUERY_INSERT, + $where = false) + { + $sth = $this->autoPrepare($table, array_keys($fields_values), $mode, + $where); + if (DB::isError($sth)) { + return $sth; + } + $ret =& $this->execute($sth, array_values($fields_values)); + $this->freePrepared($sth); + return $ret; + + } + + // }}} + // {{{ buildManipSQL() + + /** + * Produces an SQL query string for autoPrepare() + * + * Example: + * 
+     * buildManipSQL('table_sql', array('field1', 'field2', 'field3'),
+     *               DB_AUTOQUERY_INSERT);
+     *
+ * + * That returns + * + * INSERT INTO table_sql (field1,field2,field3) VALUES (?,?,?) + * + * + * NOTES: + * - This belongs more to a SQL Builder class, but this is a simple + * facility. + * - Be carefull! If you don't give a $where param with an UPDATE + * query, all the records of the table will be updated! + * + * @param string $table the table name + * @param array $table_fields the array of field names + * @param int $mode a type of query to make: + * DB_AUTOQUERY_INSERT or DB_AUTOQUERY_UPDATE + * @param string $where for update queries: the WHERE clause to + * append to the SQL statement. Don't + * include the "WHERE" keyword. + * + * @return string the sql query for autoPrepare() + */ + function buildManipSQL($table, $table_fields, $mode, $where = false) + { + if (count($table_fields) == 0) { + return $this->raiseError(DB_ERROR_NEED_MORE_DATA); + } + $first = true; + switch ($mode) { + case DB_AUTOQUERY_INSERT: + $values = ''; + $names = ''; + foreach ($table_fields as $value) { + if ($first) { + $first = false; + } else { + $names .= ','; + $values .= ','; + } + $names .= $value; + $values .= '?'; + } + return "INSERT INTO $table ($names) VALUES ($values)"; + case DB_AUTOQUERY_UPDATE: + $set = ''; + foreach ($table_fields as $value) { + if ($first) { + $first = false; + } else { + $set .= ','; + } + $set .= "$value = ?"; + } + $sql = "UPDATE $table SET $set"; + if ($where) { + $sql .= " WHERE $where"; + } + return $sql; + default: + return $this->raiseError(DB_ERROR_SYNTAX); + } + } + + // }}} + // {{{ execute() + + /** + * Executes a DB statement prepared with prepare() + * + * Example 1. + * + * $sth = $db->prepare('INSERT INTO tbl (a, b, c) VALUES (?, !, &)'); + * $data = array( + * "John's text", + * "'it''s good'", + * 'filename.txt' + * ); + * $res =& $db->execute($sth, $data); + * + * + * @param resource $stmt a DB statement resource returned from prepare() + * @param mixed $data array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return mixed a new DB_result object for successful SELECT queries + * or DB_OK for successul data manipulation queries. + * A DB_Error object on failure. + * + * {@internal ibase and oci8 have their own execute() methods.}} + * + * @see DB_common::prepare() + */ + function &execute($stmt, $data = array()) + { + $realquery = $this->executeEmulateQuery($stmt, $data); + if (DB::isError($realquery)) { + return $realquery; + } + $result = $this->simpleQuery($realquery); + + if ($result === DB_OK || DB::isError($result)) { + return $result; + } else { + $tmp =& new DB_result($this, $result); + return $tmp; + } + } + + // }}} + // {{{ executeEmulateQuery() + + /** + * Emulates executing prepared statements if the DBMS not support them + * + * @param resource $stmt a DB statement resource returned from execute() + * @param mixed $data array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return mixed a string containing the real query run when emulating + * prepare/execute. A DB_Error object on failure. + * + * @access protected + * @see DB_common::execute() + */ + function executeEmulateQuery($stmt, $data = array()) + { + $stmt = (int)$stmt; + $data = (array)$data; + $this->last_parameters = $data; + + if (count($this->prepare_types[$stmt]) != count($data)) { + $this->last_query = $this->prepared_queries[$stmt]; + return $this->raiseError(DB_ERROR_MISMATCH); + } + + $realquery = $this->prepare_tokens[$stmt][0]; + + $i = 0; + foreach ($data as $value) { + if ($this->prepare_types[$stmt][$i] == DB_PARAM_SCALAR) { + $realquery .= $this->quoteSmart($value); + } elseif ($this->prepare_types[$stmt][$i] == DB_PARAM_OPAQUE) { + $fp = @fopen($value, 'rb'); + if (!$fp) { + return $this->raiseError(DB_ERROR_ACCESS_VIOLATION); + } + $realquery .= $this->quoteSmart(fread($fp, filesize($value))); + fclose($fp); + } else { + $realquery .= $value; + } + + $realquery .= $this->prepare_tokens[$stmt][++$i]; + } + + return $realquery; + } + + // }}} + // {{{ executeMultiple() + + /** + * Performs several execute() calls on the same statement handle + * + * $data must be an array indexed numerically + * from 0, one execute call is done for every "row" in the array. + * + * If an error occurs during execute(), executeMultiple() does not + * execute the unfinished rows, but rather returns that error. + * + * @param resource $stmt query handle from prepare() + * @param array $data numeric array containing the + * data to insert into the query + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::prepare(), DB_common::execute() + */ + function executeMultiple($stmt, $data) + { + foreach ($data as $value) { + $res =& $this->execute($stmt, $value); + if (DB::isError($res)) { + return $res; + } + } + return DB_OK; + } + + // }}} + // {{{ freePrepared() + + /** + * Frees the internal resources associated with a prepared query + * + * @param resource $stmt the prepared statement's PHP resource + * @param bool $free_resource should the PHP resource be freed too? + * Use false if you need to get data + * from the result set later. + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_common::prepare() + */ + function freePrepared($stmt, $free_resource = true) + { + $stmt = (int)$stmt; + if (isset($this->prepare_tokens[$stmt])) { + unset($this->prepare_tokens[$stmt]); + unset($this->prepare_types[$stmt]); + unset($this->prepared_queries[$stmt]); + return true; + } + return false; + } + + // }}} + // {{{ modifyQuery() + + /** + * Changes a query string for various DBMS specific reasons + * + * It is defined here to ensure all drivers have this method available. + * + * @param string $query the query string to modify + * + * @return string the modified query string + * + * @access protected + * @see DB_mysql::modifyQuery(), DB_oci8::modifyQuery(), + * DB_sqlite::modifyQuery() + */ + function modifyQuery($query) + { + return $query; + } + + // }}} + // {{{ modifyLimitQuery() + + /** + * Adds LIMIT clauses to a query string according to current DBMS standards + * + * It is defined here to assure that all implementations + * have this method defined. + * + * @param string $query the query to modify + * @param int $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return string the query string with LIMIT clauses added + * + * @access protected + */ + function modifyLimitQuery($query, $from, $count, $params = array()) + { + return $query; + } + + // }}} + // {{{ query() + + /** + * Sends a query to the database server + * + * The query string can be either a normal statement to be sent directly + * to the server OR if $params are passed the query can have + * placeholders and it will be passed through prepare() and execute(). + * + * @param string $query the SQL query or the statement to prepare + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return mixed a new DB_result object for successful SELECT queries + * or DB_OK for successul data manipulation queries. + * A DB_Error object on failure. + * + * @see DB_result, DB_common::prepare(), DB_common::execute() + */ + function &query($query, $params = array()) + { + if (sizeof($params) > 0) { + $sth = $this->prepare($query); + if (DB::isError($sth)) { + return $sth; + } + $ret =& $this->execute($sth, $params); + $this->freePrepared($sth, false); + return $ret; + } else { + $this->last_parameters = array(); + $result = $this->simpleQuery($query); + if ($result === DB_OK || DB::isError($result)) { + return $result; + } else { + $tmp =& new DB_result($this, $result); + return $tmp; + } + } + } + + // }}} + // {{{ limitQuery() + + /** + * Generates and executes a LIMIT query + * + * @param string $query the query + * @param intr $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return mixed a new DB_result object for successful SELECT queries + * or DB_OK for successul data manipulation queries. + * A DB_Error object on failure. + */ + function &limitQuery($query, $from, $count, $params = array()) + { + $query = $this->modifyLimitQuery($query, $from, $count, $params); + if (DB::isError($query)){ + return $query; + } + $result =& $this->query($query, $params); + if (is_a($result, 'DB_result')) { + $result->setOption('limit_from', $from); + $result->setOption('limit_count', $count); + } + return $result; + } + + // }}} + // {{{ getOne() + + /** + * Fetches the first column of the first row from a query result + * + * Takes care of doing the query and freeing the results when finished. + * + * @param string $query the SQL query + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return mixed the returned value of the query. + * A DB_Error object on failure. + */ + function &getOne($query, $params = array()) + { + $params = (array)$params; + // modifyLimitQuery() would be nice here, but it causes BC issues + if (sizeof($params) > 0) { + $sth = $this->prepare($query); + if (DB::isError($sth)) { + return $sth; + } + $res =& $this->execute($sth, $params); + $this->freePrepared($sth); + } else { + $res =& $this->query($query); + } + + if (DB::isError($res)) { + return $res; + } + + $err = $res->fetchInto($row, DB_FETCHMODE_ORDERED); + $res->free(); + + if ($err !== DB_OK) { + return $err; + } + + return $row[0]; + } + + // }}} + // {{{ getRow() + + /** + * Fetches the first row of data returned from a query result + * + * Takes care of doing the query and freeing the results when finished. + * + * @param string $query the SQL query + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * @param int $fetchmode the fetch mode to use + * + * @return array the first row of results as an array. + * A DB_Error object on failure. + */ + function &getRow($query, $params = array(), + $fetchmode = DB_FETCHMODE_DEFAULT) + { + // compat check, the params and fetchmode parameters used to + // have the opposite order + if (!is_array($params)) { + if (is_array($fetchmode)) { + if ($params === null) { + $tmp = DB_FETCHMODE_DEFAULT; + } else { + $tmp = $params; + } + $params = $fetchmode; + $fetchmode = $tmp; + } elseif ($params !== null) { + $fetchmode = $params; + $params = array(); + } + } + // modifyLimitQuery() would be nice here, but it causes BC issues + if (sizeof($params) > 0) { + $sth = $this->prepare($query); + if (DB::isError($sth)) { + return $sth; + } + $res =& $this->execute($sth, $params); + $this->freePrepared($sth); + } else { + $res =& $this->query($query); + } + + if (DB::isError($res)) { + return $res; + } + + $err = $res->fetchInto($row, $fetchmode); + + $res->free(); + + if ($err !== DB_OK) { + return $err; + } + + return $row; + } + + // }}} + // {{{ getCol() + + /** + * Fetches a single column from a query result and returns it as an + * indexed array + * + * @param string $query the SQL query + * @param mixed $col which column to return (integer [column number, + * starting at 0] or string [column name]) + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return array the results as an array. A DB_Error object on failure. + * + * @see DB_common::query() + */ + function &getCol($query, $col = 0, $params = array()) + { + $params = (array)$params; + if (sizeof($params) > 0) { + $sth = $this->prepare($query); + + if (DB::isError($sth)) { + return $sth; + } + + $res =& $this->execute($sth, $params); + $this->freePrepared($sth); + } else { + $res =& $this->query($query); + } + + if (DB::isError($res)) { + return $res; + } + + $fetchmode = is_int($col) ? DB_FETCHMODE_ORDERED : DB_FETCHMODE_ASSOC; + + if (!is_array($row = $res->fetchRow($fetchmode))) { + $ret = array(); + } else { + if (!array_key_exists($col, $row)) { + $ret =& $this->raiseError(DB_ERROR_NOSUCHFIELD); + } else { + $ret = array($row[$col]); + while (is_array($row = $res->fetchRow($fetchmode))) { + $ret[] = $row[$col]; + } + } + } + + $res->free(); + + if (DB::isError($row)) { + $ret = $row; + } + + return $ret; + } + + // }}} + // {{{ getAssoc() + + /** + * Fetches an entire query result and returns it as an + * associative array using the first column as the key + * + * If the result set contains more than two columns, the value + * will be an array of the values from column 2-n. If the result + * set contains only two columns, the returned value will be a + * scalar with the value of the second column (unless forced to an + * array with the $force_array parameter). A DB error code is + * returned on errors. If the result set contains fewer than two + * columns, a DB_ERROR_TRUNCATED error is returned. + * + * For example, if the table "mytable" contains: + * + * 
+     *  ID      TEXT       DATE
+     * --------------------------------
+     *  1       'one'      944679408
+     *  2       'two'      944679408
+     *  3       'three'    944679408
+     *
+ * + * Then the call getAssoc('SELECT id,text FROM mytable') returns: + * 
+     *   array(
+     *     '1' => 'one',
+     *     '2' => 'two',
+     *     '3' => 'three',
+     *   )
+     *
+ * + * ...while the call getAssoc('SELECT id,text,date FROM mytable') returns: + * 
+     *   array(
+     *     '1' => array('one', '944679408'),
+     *     '2' => array('two', '944679408'),
+     *     '3' => array('three', '944679408')
+     *   )
+     *
+ * + * If the more than one row occurs with the same value in the + * first column, the last row overwrites all previous ones by + * default. Use the $group parameter if you don't want to + * overwrite like this. Example: + * + * 
+     * getAssoc('SELECT category,id,name FROM mytable', false, null,
+     *          DB_FETCHMODE_ASSOC, true) returns:
+     *
+     *   array(
+     *     '1' => array(array('id' => '4', 'name' => 'number four'),
+     *                  array('id' => '6', 'name' => 'number six')
+     *            ),
+     *     '9' => array(array('id' => '4', 'name' => 'number four'),
+     *                  array('id' => '6', 'name' => 'number six')
+     *            )
+     *   )
+     *
+ * + * Keep in mind that database functions in PHP usually return string + * values for results regardless of the database's internal type. + * + * @param string $query the SQL query + * @param bool $force_array used only when the query returns + * exactly two columns. If true, the values + * of the returned array will be one-element + * arrays instead of scalars. + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of + * items passed must match quantity of + * placeholders in query: meaning 1 + * placeholder for non-array parameters or + * 1 placeholder per array element. + * @param int $fetchmode the fetch mode to use + * @param bool $group if true, the values of the returned array + * is wrapped in another array. If the same + * key value (in the first column) repeats + * itself, the values will be appended to + * this array instead of overwriting the + * existing values. + * + * @return array the associative array containing the query results. + * A DB_Error object on failure. + */ + function &getAssoc($query, $force_array = false, $params = array(), + $fetchmode = DB_FETCHMODE_DEFAULT, $group = false) + { + $params = (array)$params; + if (sizeof($params) > 0) { + $sth = $this->prepare($query); + + if (DB::isError($sth)) { + return $sth; + } + + $res =& $this->execute($sth, $params); + $this->freePrepared($sth); + } else { + $res =& $this->query($query); + } + + if (DB::isError($res)) { + return $res; + } + if ($fetchmode == DB_FETCHMODE_DEFAULT) { + $fetchmode = $this->fetchmode; + } + $cols = $res->numCols(); + + if ($cols < 2) { + $tmp =& $this->raiseError(DB_ERROR_TRUNCATED); + return $tmp; + } + + $results = array(); + + if ($cols > 2 || $force_array) { + // return array values + // XXX this part can be optimized + if ($fetchmode == DB_FETCHMODE_ASSOC) { + while (is_array($row = $res->fetchRow(DB_FETCHMODE_ASSOC))) { + reset($row); + $key = current($row); + unset($row[key($row)]); + if ($group) { + $results[$key][] = $row; + } else { + $results[$key] = $row; + } + } + } elseif ($fetchmode == DB_FETCHMODE_OBJECT) { + while ($row = $res->fetchRow(DB_FETCHMODE_OBJECT)) { + $arr = get_object_vars($row); + $key = current($arr); + if ($group) { + $results[$key][] = $row; + } else { + $results[$key] = $row; + } + } + } else { + while (is_array($row = $res->fetchRow(DB_FETCHMODE_ORDERED))) { + // we shift away the first element to get + // indices running from 0 again + $key = array_shift($row); + if ($group) { + $results[$key][] = $row; + } else { + $results[$key] = $row; + } + } + } + if (DB::isError($row)) { + $results = $row; + } + } else { + // return scalar values + while (is_array($row = $res->fetchRow(DB_FETCHMODE_ORDERED))) { + if ($group) { + $results[$row[0]][] = $row[1]; + } else { + $results[$row[0]] = $row[1]; + } + } + if (DB::isError($row)) { + $results = $row; + } + } + + $res->free(); + + return $results; + } + + // }}} + // {{{ getAll() + + /** + * Fetches all of the rows from a query result + * + * @param string $query the SQL query + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of + * items passed must match quantity of + * placeholders in query: meaning 1 + * placeholder for non-array parameters or + * 1 placeholder per array element. + * @param int $fetchmode the fetch mode to use: + * + DB_FETCHMODE_ORDERED + * + DB_FETCHMODE_ASSOC + * + DB_FETCHMODE_ORDERED | DB_FETCHMODE_FLIPPED + * + DB_FETCHMODE_ASSOC | DB_FETCHMODE_FLIPPED + * + * @return array the nested array. A DB_Error object on failure. + */ + function &getAll($query, $params = array(), + $fetchmode = DB_FETCHMODE_DEFAULT) + { + // compat check, the params and fetchmode parameters used to + // have the opposite order + if (!is_array($params)) { + if (is_array($fetchmode)) { + if ($params === null) { + $tmp = DB_FETCHMODE_DEFAULT; + } else { + $tmp = $params; + } + $params = $fetchmode; + $fetchmode = $tmp; + } elseif ($params !== null) { + $fetchmode = $params; + $params = array(); + } + } + + if (sizeof($params) > 0) { + $sth = $this->prepare($query); + + if (DB::isError($sth)) { + return $sth; + } + + $res =& $this->execute($sth, $params); + $this->freePrepared($sth); + } else { + $res =& $this->query($query); + } + + if ($res === DB_OK || DB::isError($res)) { + return $res; + } + + $results = array(); + while (DB_OK === $res->fetchInto($row, $fetchmode)) { + if ($fetchmode & DB_FETCHMODE_FLIPPED) { + foreach ($row as $key => $val) { + $results[$key][] = $val; + } + } else { + $results[] = $row; + } + } + + $res->free(); + + if (DB::isError($row)) { + $tmp =& $this->raiseError($row); + return $tmp; + } + return $results; + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ numRows() + + /** + * Determines the number of rows in a query result + * + * @param resource $result the query result idenifier produced by PHP + * + * @return int the number of rows. A DB_Error object on failure. + */ + function numRows($result) + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ getSequenceName() + + /** + * Generates the name used inside the database for a sequence + * + * The createSequence() docblock contains notes about storing sequence + * names. + * + * @param string $sqn the sequence's public name + * + * @return string the sequence's name in the backend + * + * @access protected + * @see DB_common::createSequence(), DB_common::dropSequence(), + * DB_common::nextID(), DB_common::setOption() + */ + function getSequenceName($sqn) + { + return sprintf($this->getOption('seqname_format'), + preg_replace('/[^a-z0-9_.]/i', '_', $sqn)); + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::dropSequence(), + * DB_common::getSequenceName() + */ + function nextId($seq_name, $ondemand = true) + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ createSequence() + + /** + * Creates a new sequence + * + * The name of a given sequence is determined by passing the string + * provided in the $seq_name argument through PHP's sprintf() + * function using the value from the seqname_format option as + * the sprintf()'s format argument. + * + * seqname_format is set via setOption(). + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_common::nextID() + */ + function createSequence($seq_name) + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_common::nextID() + */ + function dropSequence($seq_name) + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ raiseError() + + /** + * Communicates an error and invoke error callbacks, etc + * + * Basically a wrapper for PEAR::raiseError without the message string. + * + * @param mixed integer error code, or a PEAR error object (all + * other parameters are ignored if this parameter is + * an object + * @param int error mode, see PEAR_Error docs + * @param mixed if error mode is PEAR_ERROR_TRIGGER, this is the + * error level (E_USER_NOTICE etc). If error mode is + * PEAR_ERROR_CALLBACK, this is the callback function, + * either as a function name, or as an array of an + * object and method name. For other error modes this + * parameter is ignored. + * @param string extra debug information. Defaults to the last + * query and native error code. + * @param mixed native error code, integer or string depending the + * backend + * + * @return object the PEAR_Error object + * + * @see PEAR_Error + */ + function &raiseError($code = DB_ERROR, $mode = null, $options = null, + $userinfo = null, $nativecode = null) + { + // The error is yet a DB error object + if (is_object($code)) { + // because we the static PEAR::raiseError, our global + // handler should be used if it is set + if ($mode === null && !empty($this->_default_error_mode)) { + $mode = $this->_default_error_mode; + $options = $this->_default_error_options; + } + $tmp = PEAR::raiseError($code, null, $mode, $options, + null, null, true); + return $tmp; + } + + if ($userinfo === null) { + $userinfo = $this->last_query; + } + + if ($nativecode) { + $userinfo .= ' [nativecode=' . trim($nativecode) . ']'; + } else { + $userinfo .= ' [DB Error: ' . DB::errorMessage($code) . ']'; + } + + $tmp = PEAR::raiseError(null, $code, $mode, $options, $userinfo, + 'DB_Error', true); + return $tmp; + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code produced by the last query + * + * @return mixed the DBMS' error code. A DB_Error object on failure. + */ + function errorNative() + { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ errorCode() + + /** + * Maps native error codes to DB's portable ones + * + * Uses the $errorcode_map property defined in each driver. + * + * @param string|int $nativecode the error code returned by the DBMS + * + * @return int the portable DB error code. Return DB_ERROR if the + * current driver doesn't have a mapping for the + * $nativecode submitted. + */ + function errorCode($nativecode) + { + if (isset($this->errorcode_map[$nativecode])) { + return $this->errorcode_map[$nativecode]; + } + // Fall back to DB_ERROR if there was no mapping. + return DB_ERROR; + } + + // }}} + // {{{ errorMessage() + + /** + * Maps a DB error code to a textual message + * + * @param integer $dbcode the DB error code + * + * @return string the error message corresponding to the error code + * submitted. FALSE if the error code is unknown. + * + * @see DB::errorMessage() + */ + function errorMessage($dbcode) + { + return DB::errorMessage($this->errorcode_map[$dbcode]); + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * The format of the resulting array depends on which $mode + * you select. The sample output below is based on this query: + * 
+     *    SELECT tblFoo.fldID, tblFoo.fldPhone, tblBar.fldId
+     *    FROM tblFoo
+     *    JOIN tblBar ON tblFoo.fldId = tblBar.fldId
+     *
+ * + *
    + *
  • + * + * null (default) + * 
    +     *   [0] => Array (
+     *       [table] => tblFoo
+     *       [name] => fldId
+     *       [type] => int
+     *       [len] => 11
+     *       [flags] => primary_key not_null
+     *   )
+     *   [1] => Array (
+     *       [table] => tblFoo
+     *       [name] => fldPhone
+     *       [type] => string
+     *       [len] => 20
+     *       [flags] =>
+     *   )
+     *   [2] => Array (
+     *       [table] => tblBar
+     *       [name] => fldId
+     *       [type] => int
+     *       [len] => 11
+     *       [flags] => primary_key not_null
+     *   )
+     *
    + * + *
  • + * + * DB_TABLEINFO_ORDER + * + *

    In addition to the information found in the default output, + * a notation of the number of columns is provided by the + * num_fields element while the order + * element provides an array with the column names as the keys and + * their location index number (corresponding to the keys in the + * the default output) as the values.

    + * + *

    If a result set has identical field names, the last one is + * used.

    + * + * 
    +     *   [num_fields] => 3
+     *   [order] => Array (
+     *       [fldId] => 2
+     *       [fldTrans] => 1
+     *   )
+     *
    + * + *
  • + * + * DB_TABLEINFO_ORDERTABLE + * + *

    Similar to DB_TABLEINFO_ORDER but adds more + * dimensions to the array in which the table names are keys and + * the field names are sub-keys. This is helpful for queries that + * join tables which have identical field names.

    + * + * 
    +     *   [num_fields] => 3
+     *   [ordertable] => Array (
+     *       [tblFoo] => Array (
+     *           [fldId] => 0
+     *           [fldPhone] => 1
+     *       )
+     *       [tblBar] => Array (
+     *           [fldId] => 2
+     *       )
+     *   )
+     *
    + * + *
    • + *
+ * + * The flags element contains a space separated list + * of extra information about the field. This data is inconsistent + * between DBMS's due to the way each DBMS works. + * + primary_key + * + unique_key + * + multiple_key + * + not_null + * + * Most DBMS's only provide the table and flags + * elements if $result is a table name. The following DBMS's + * provide full information from queries: + * + fbsql + * + mysql + * + * If the 'portability' option has DB_PORTABILITY_LOWERCASE + * turned on, the names of tables and fields will be lowercased. + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode either unused or one of the tableInfo modes: + * DB_TABLEINFO_ORDERTABLE, + * DB_TABLEINFO_ORDER or + * DB_TABLEINFO_FULL (which does both). + * These are bitwise, so the first two can be + * combined using |. + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::setOption() + */ + function tableInfo($result, $mode = null) + { + /* + * If the DB_ class has a tableInfo() method, that one + * overrides this one. But, if the driver doesn't have one, + * this method runs and tells users about that fact. + */ + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ getTables() + + /** + * Lists the tables in the current database + * + * @return array the list of tables. A DB_Error object on failure. + * + * @deprecated Method deprecated some time before Release 1.2 + */ + function getTables() + { + return $this->getListOf('tables'); + } + + // }}} + // {{{ getListOf() + + /** + * Lists internal database information + * + * @param string $type type of information being sought. + * Common items being sought are: + * tables, databases, users, views, functions + * Each DBMS's has its own capabilities. + * + * @return array an array listing the items sought. + * A DB DB_Error object on failure. + */ + function getListOf($type) + { + $sql = $this->getSpecialQuery($type); + if ($sql === null) { + $this->last_query = ''; + return $this->raiseError(DB_ERROR_UNSUPPORTED); + } elseif (is_int($sql) || DB::isError($sql)) { + // Previous error + return $this->raiseError($sql); + } elseif (is_array($sql)) { + // Already the result + return $sql; + } + // Launch this query + return $this->getCol($sql); + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + return $this->raiseError(DB_ERROR_UNSUPPORTED); + } + + // }}} + // {{{ _rtrimArrayValues() + + /** + * Right-trims all strings in an array + * + * @param array $array the array to be trimmed (passed by reference) + * + * @return void + * + * @access protected + */ + function _rtrimArrayValues(&$array) + { + foreach ($array as $key => $value) { + if (is_string($value)) { + $array[$key] = rtrim($value); + } + } + } + + // }}} + // {{{ _convertNullArrayValuesToEmpty() + + /** + * Converts all null values in an array to empty strings + * + * @param array $array the array to be de-nullified (passed by reference) + * + * @return void + * + * @access protected + */ + function _convertNullArrayValuesToEmpty(&$array) + { + foreach ($array as $key => $value) { + if (is_null($value)) { + $array[$key] = ''; + } + } + } + + // }}} +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/dbase.php b/campcaster/src/tools/pear/src/DB/dbase.php new file mode 100644 index 000000000..c1d1f1ef1 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/dbase.php @@ -0,0 +1,510 @@ + + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: dbase.php,v 1.39 2005/02/19 23:25:25 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's dbase extension + * for interacting with dBase databases + * + * These methods overload the ones declared in DB_common. + * + * @category Database + * @package DB + * @author Tomas V.V. Cox + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_dbase extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'dbase'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'dbase'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => false, + 'new_link' => false, + 'numrows' => true, + 'pconnect' => false, + 'prepare' => false, + 'ssl' => false, + 'transactions' => false, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * A means of emulating result resources + * @var array + */ + var $res_row = array(); + + /** + * The quantity of results so far + * + * For emulating result resources. + * + * @var integer + */ + var $result = 0; + + /** + * Maps dbase data type id's to human readable strings + * + * The human readable values are based on the output of PHP's + * dbase_get_header_info() function. + * + * @var array + * @since Property available since Release 1.7.0 + */ + var $types = array( + 'C' => 'character', + 'D' => 'date', + 'L' => 'boolean', + 'M' => 'memo', + 'N' => 'number', + ); + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_dbase() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database and create it if it doesn't exist + * + * Don't call this method directly. Use DB::connect() instead. + * + * PEAR DB's dbase driver supports the following extra DSN options: + * + mode An integer specifying the read/write mode to use + * (0 = read only, 1 = write only, 2 = read/write). + * Available since PEAR DB 1.7.0. + * + fields An array of arrays that PHP's dbase_create() function needs + * to create a new database. This information is used if the + * dBase file specified in the "database" segment of the DSN + * does not exist. For more info, see the PHP manual's + * {@link http://php.net/dbase_create dbase_create()} page. + * Available since PEAR DB 1.7.0. + * + * Example of how to connect and establish a new dBase file if necessary: + * + * require_once 'DB.php'; + * + * $dsn = array( + * 'phptype' => 'dbase', + * 'database' => '/path/and/name/of/dbase/file', + * 'mode' => 2, + * 'fields' => array( + * array('a', 'N', 5, 0), + * array('b', 'C', 40), + * array('c', 'C', 255), + * array('d', 'C', 20), + * ), + * ); + * $options = array( + * 'debug' => 2, + * 'portability' => DB_PORTABILITY_ALL, + * ); + * + * $db =& DB::connect($dsn, $options); + * if (PEAR::isError($db)) { + * die($db->getMessage()); + * } + * + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('dbase')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + /* + * Turn track_errors on for entire script since $php_errormsg + * is the only way to find errors from the dbase extension. + */ + ini_set('track_errors', 1); + $php_errormsg = ''; + + if (!file_exists($dsn['database'])) { + $this->dsn['mode'] = 2; + if (empty($dsn['fields']) || !is_array($dsn['fields'])) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + 'the dbase file does not exist and ' + . 'it could not be created because ' + . 'the "fields" element of the DSN ' + . 'is not properly set'); + } + $this->connection = @dbase_create($dsn['database'], + $dsn['fields']); + if (!$this->connection) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + 'the dbase file does not exist and ' + . 'the attempt to create it failed: ' + . $php_errormsg); + } + } else { + if (!isset($this->dsn['mode'])) { + $this->dsn['mode'] = 0; + } + $this->connection = @dbase_open($dsn['database'], + $this->dsn['mode']); + if (!$this->connection) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $php_errormsg); + } + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @dbase_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ &query() + + function &query($query = null) + { + // emulate result resources + $this->res_row[(int)$this->result] = 0; + $tmp =& new DB_result($this, $this->result++); + return $tmp; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum === null) { + $rownum = $this->res_row[(int)$result]++; + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $arr = @dbase_get_record_with_names($this->connection, $rownum); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @dbase_get_record($this->connection, $rownum); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($foo) + { + return @dbase_numfields($this->connection); + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($foo) + { + return @dbase_numrecords($this->connection); + } + + // }}} + // {{{ quoteSmart() + + /** + * Formats input so it can be safely used in a query + * + * @param mixed $in the data to be formatted + * + * @return mixed the formatted data. The format depends on the input's + * PHP type: + * + null = the string NULL + * + boolean = T if true or + * F if false. Use the Logical + * data type. + * + integer or double = the unquoted number + * + other (including strings and numeric strings) = + * the data with single quotes escaped by preceeding + * single quotes then the whole string is encapsulated + * between single quotes + * + * @see DB_common::quoteSmart() + * @since Method available since Release 1.6.0 + */ + function quoteSmart($in) + { + if (is_int($in) || is_double($in)) { + return $in; + } elseif (is_bool($in)) { + return $in ? 'T' : 'F'; + } elseif (is_null($in)) { + return 'NULL'; + } else { + return "'" . $this->escapeSimple($in) . "'"; + } + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about the current database + * + * @param mixed $result THIS IS UNUSED IN DBASE. The current database + * is examined regardless of what is provided here. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + * @since Method available since Release 1.7.0 + */ + function tableInfo($result = null, $mode = null) + { + if (function_exists('dbase_get_header_info')) { + $id = @dbase_get_header_info($this->connection); + if (!$id && $php_errormsg) { + return $this->raiseError(DB_ERROR, + null, null, null, + $php_errormsg); + } + } else { + /* + * This segment for PHP 4 is loosely based on code by + * Hadi Rusiah in the comments on + * the dBase reference page in the PHP manual. + */ + $db = @fopen($this->dsn['database'], 'r'); + if (!$db) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $php_errormsg); + } + + $id = array(); + $i = 0; + + $line = fread($db, 32); + while (!feof($db)) { + $line = fread($db, 32); + if (substr($line, 0, 1) == chr(13)) { + break; + } else { + $pos = strpos(substr($line, 0, 10), chr(0)); + $pos = ($pos == 0 ? 10 : $pos); + $id[$i] = array( + 'name' => substr($line, 0, $pos), + 'type' => $this->types[substr($line, 11, 1)], + 'length' => ord(substr($line, 16, 1)), + 'precision' => ord(substr($line, 17, 1)), + ); + } + $i++; + } + + fclose($db); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $res = array(); + $count = count($id); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $res[$i] = array( + 'table' => $this->dsn['database'], + 'name' => $case_func($id[$i]['name']), + 'type' => $id[$i]['type'], + 'len' => $id[$i]['length'], + 'flags' => '' + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + return $res; + } + + // }}} +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/fbsql.php b/campcaster/src/tools/pear/src/DB/fbsql.php new file mode 100644 index 000000000..7f068d413 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/fbsql.php @@ -0,0 +1,770 @@ + + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: fbsql.php,v 1.82 2005/03/04 23:12:36 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's fbsql extension + * for interacting with FrontBase databases + * + * These methods overload the ones declared in DB_common. + * + * @category Database + * @package DB + * @author Frank M. Kromann + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + * @since Class functional since Release 1.7.0 + */ +class DB_fbsql extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'fbsql'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'fbsql'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'alter', + 'new_link' => false, + 'numrows' => true, + 'pconnect' => true, + 'prepare' => false, + 'ssl' => false, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + 22 => DB_ERROR_SYNTAX, + 85 => DB_ERROR_ALREADY_EXISTS, + 108 => DB_ERROR_SYNTAX, + 116 => DB_ERROR_NOSUCHTABLE, + 124 => DB_ERROR_VALUE_COUNT_ON_ROW, + 215 => DB_ERROR_NOSUCHFIELD, + 217 => DB_ERROR_INVALID_NUMBER, + 226 => DB_ERROR_NOSUCHFIELD, + 231 => DB_ERROR_INVALID, + 239 => DB_ERROR_TRUNCATED, + 251 => DB_ERROR_SYNTAX, + 266 => DB_ERROR_NOT_FOUND, + 357 => DB_ERROR_CONSTRAINT_NOT_NULL, + 358 => DB_ERROR_CONSTRAINT, + 360 => DB_ERROR_CONSTRAINT, + 361 => DB_ERROR_CONSTRAINT, + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_fbsql() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('fbsql')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + $params = array( + $dsn['hostspec'] ? $dsn['hostspec'] : 'localhost', + $dsn['username'] ? $dsn['username'] : null, + $dsn['password'] ? $dsn['password'] : null, + ); + + $connect_function = $persistent ? 'fbsql_pconnect' : 'fbsql_connect'; + + $ini = ini_get('track_errors'); + $php_errormsg = ''; + if ($ini) { + $this->connection = @call_user_func_array($connect_function, + $params); + } else { + ini_set('track_errors', 1); + $this->connection = @call_user_func_array($connect_function, + $params); + ini_set('track_errors', $ini); + } + + if (!$this->connection) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $php_errormsg); + } + + if ($dsn['database']) { + if (!@fbsql_select_db($dsn['database'], $this->connection)) { + return $this->fbsqlRaiseError(); + } + } + + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @fbsql_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $this->last_query = $query; + $query = $this->modifyQuery($query); + $result = @fbsql_query("$query;", $this->connection); + if (!$result) { + return $this->fbsqlRaiseError(); + } + // Determine which queries that should return data, and which + // should return an error code only. + if (DB::isManip($query)) { + return DB_OK; + } + return $result; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal fbsql result pointer to the next available result + * + * @param a valid fbsql result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return @fbsql_next_result($result); + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + if (!@fbsql_data_seek($result, $rownum)) { + return null; + } + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $arr = @fbsql_fetch_array($result, FBSQL_ASSOC); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @fbsql_fetch_row($result); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @fbsql_free_result($result); + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff=false) + { + if ($onoff) { + $this->query("SET COMMIT TRUE"); + } else { + $this->query("SET COMMIT FALSE"); + } + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + @fbsql_commit(); + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + @fbsql_rollback(); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @fbsql_num_fields($result); + if (!$cols) { + return $this->fbsqlRaiseError(); + } + return $cols; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $rows = @fbsql_num_rows($result); + if ($rows === null) { + return $this->fbsqlRaiseError(); + } + return $rows; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (DB::isManip($this->last_query)) { + $result = @fbsql_affected_rows($this->connection); + } else { + $result = 0; + } + return $result; + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_fbsql::createSequence(), DB_fbsql::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + do { + $repeat = 0; + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->query('SELECT UNIQUE FROM ' . $seqname); + $this->popErrorHandling(); + if ($ondemand && DB::isError($result) && + $result->getCode() == DB_ERROR_NOSUCHTABLE) { + $repeat = 1; + $result = $this->createSequence($seq_name); + if (DB::isError($result)) { + return $result; + } + } else { + $repeat = 0; + } + } while ($repeat); + if (DB::isError($result)) { + return $this->fbsqlRaiseError(); + } + $result->fetchInto($tmp, DB_FETCHMODE_ORDERED); + return $tmp[0]; + } + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_fbsql::nextID(), DB_fbsql::dropSequence() + */ + function createSequence($seq_name) + { + $seqname = $this->getSequenceName($seq_name); + $res = $this->query('CREATE TABLE ' . $seqname + . ' (id INTEGER NOT NULL,' + . ' PRIMARY KEY(id))'); + if ($res) { + $res = $this->query('SET UNIQUE = 0 FOR ' . $seqname); + } + return $res; + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_fbsql::nextID(), DB_fbsql::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP TABLE ' . $this->getSequenceName($seq_name) + . ' RESTRICT'); + } + + // }}} + // {{{ modifyLimitQuery() + + /** + * Adds LIMIT clauses to a query string according to current DBMS standards + * + * @param string $query the query to modify + * @param int $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return string the query string with LIMIT clauses added + * + * @access protected + */ + function modifyLimitQuery($query, $from, $count, $params = array()) + { + if (DB::isManip($query)) { + return preg_replace('/^([\s(])*SELECT/i', + "\\1SELECT TOP($count)", $query); + } else { + return preg_replace('/([\s(])*SELECT/i', + "\\1SELECT TOP($from, $count)", $query); + } + } + + // }}} + // {{{ quoteSmart() + + /** + * Formats input so it can be safely used in a query + * + * @param mixed $in the data to be formatted + * + * @return mixed the formatted data. The format depends on the input's + * PHP type: + * + null = the string NULL + * + boolean = string TRUE or FALSE + * + integer or double = the unquoted number + * + other (including strings and numeric strings) = + * the data escaped according to FrontBase's settings + * then encapsulated between single quotes + * + * @see DB_common::quoteSmart() + * @since Method available since Release 1.6.0 + */ + function quoteSmart($in) + { + if (is_int($in) || is_double($in)) { + return $in; + } elseif (is_bool($in)) { + return $in ? 'TRUE' : 'FALSE'; + } elseif (is_null($in)) { + return 'NULL'; + } else { + return "'" . $this->escapeSimple($in) . "'"; + } + } + + // }}} + // {{{ fbsqlRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_fbsql::errorNative(), DB_common::errorCode() + */ + function fbsqlRaiseError($errno = null) + { + if ($errno === null) { + $errno = $this->errorCode(fbsql_errno($this->connection)); + } + return $this->raiseError($errno, null, null, null, + @fbsql_error($this->connection)); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code produced by the last query + * + * @return int the DBMS' error code + */ + function errorNative() + { + return @fbsql_errno($this->connection); + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @fbsql_list_fields($this->dsn['database'], + $result, $this->connection); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->fbsqlRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @fbsql_num_fields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $res[$i] = array( + 'table' => $case_func(@fbsql_field_table($id, $i)), + 'name' => $case_func(@fbsql_field_name($id, $i)), + 'type' => @fbsql_field_type($id, $i), + 'len' => @fbsql_field_len($id, $i), + 'flags' => @fbsql_field_flags($id, $i), + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @fbsql_free_result($id); + } + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return 'SELECT "table_name" FROM information_schema.tables' + . ' t0, information_schema.schemata t1' + . ' WHERE t0.schema_pk=t1.schema_pk AND' + . ' "table_type" = \'BASE TABLE\'' + . ' AND "schema_name" = current_schema'; + case 'views': + return 'SELECT "table_name" FROM information_schema.tables' + . ' t0, information_schema.schemata t1' + . ' WHERE t0.schema_pk=t1.schema_pk AND' + . ' "table_type" = \'VIEW\'' + . ' AND "schema_name" = current_schema'; + case 'users': + return 'SELECT "user_name" from information_schema.users'; + case 'functions': + return 'SELECT "routine_name" FROM' + . ' information_schema.psm_routines' + . ' t0, information_schema.schemata t1' + . ' WHERE t0.schema_pk=t1.schema_pk' + . ' AND "routine_kind"=\'FUNCTION\'' + . ' AND "schema_name" = current_schema'; + case 'procedures': + return 'SELECT "routine_name" FROM' + . ' information_schema.psm_routines' + . ' t0, information_schema.schemata t1' + . ' WHERE t0.schema_pk=t1.schema_pk' + . ' AND "routine_kind"=\'PROCEDURE\'' + . ' AND "schema_name" = current_schema'; + default: + return null; + } + } + + // }}} +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/ibase.php b/campcaster/src/tools/pear/src/DB/ibase.php new file mode 100644 index 000000000..d04354fda --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/ibase.php @@ -0,0 +1,1071 @@ + + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: ibase.php,v 1.109 2005/03/04 23:12:36 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's interbase extension + * for interacting with Interbase and Firebird databases + * + * These methods overload the ones declared in DB_common. + * + * While this class works with PHP 4, PHP's InterBase extension is + * unstable in PHP 4. Use PHP 5. + * + * NOTICE: limitQuery() only works for Firebird. + * + * @category Database + * @package DB + * @author Sterling Hughes + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + * @since Class became stable in Release 1.7.0 + */ +class DB_ibase extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'ibase'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'ibase'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * NOTE: only firebird supports limit. + * + * @var array + */ + var $features = array( + 'limit' => false, + 'new_link' => false, + 'numrows' => 'emulate', + 'pconnect' => true, + 'prepare' => true, + 'ssl' => false, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + -104 => DB_ERROR_SYNTAX, + -150 => DB_ERROR_ACCESS_VIOLATION, + -151 => DB_ERROR_ACCESS_VIOLATION, + -155 => DB_ERROR_NOSUCHTABLE, + -157 => DB_ERROR_NOSUCHFIELD, + -158 => DB_ERROR_VALUE_COUNT_ON_ROW, + -170 => DB_ERROR_MISMATCH, + -171 => DB_ERROR_MISMATCH, + -172 => DB_ERROR_INVALID, + // -204 => // Covers too many errors, need to use regex on msg + -205 => DB_ERROR_NOSUCHFIELD, + -206 => DB_ERROR_NOSUCHFIELD, + -208 => DB_ERROR_INVALID, + -219 => DB_ERROR_NOSUCHTABLE, + -297 => DB_ERROR_CONSTRAINT, + -303 => DB_ERROR_INVALID, + -413 => DB_ERROR_INVALID_NUMBER, + -530 => DB_ERROR_CONSTRAINT, + -551 => DB_ERROR_ACCESS_VIOLATION, + -552 => DB_ERROR_ACCESS_VIOLATION, + // -607 => // Covers too many errors, need to use regex on msg + -625 => DB_ERROR_CONSTRAINT_NOT_NULL, + -803 => DB_ERROR_CONSTRAINT, + -804 => DB_ERROR_VALUE_COUNT_ON_ROW, + -904 => DB_ERROR_CONNECT_FAILED, + -922 => DB_ERROR_NOSUCHDB, + -923 => DB_ERROR_CONNECT_FAILED, + -924 => DB_ERROR_CONNECT_FAILED + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * The number of rows affected by a data manipulation query + * @var integer + * @access private + */ + var $affected = 0; + + /** + * Should data manipulation queries be committed automatically? + * @var bool + * @access private + */ + var $autocommit = true; + + /** + * The prepared statement handle from the most recently executed statement + * + * {@internal Mainly here because the InterBase/Firebird API is only + * able to retrieve data from result sets if the statemnt handle is + * still in scope.}} + * + * @var resource + */ + var $last_stmt; + + /** + * Is the given prepared statement a data manipulation query? + * @var array + * @access private + */ + var $manip_query = array(); + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_ibase() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * PEAR DB's ibase driver supports the following extra DSN options: + * + buffers The number of database buffers to allocate for the + * server-side cache. + * + charset The default character set for a database. + * + dialect The default SQL dialect for any statement + * executed within a connection. Defaults to the + * highest one supported by client libraries. + * Functional only with InterBase 6 and up. + * + role Functional only with InterBase 5 and up. + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('interbase')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + if ($this->dbsyntax == 'firebird') { + $this->features['limit'] = 'alter'; + } + + $params = array( + $dsn['hostspec'] + ? ($dsn['hostspec'] . ':' . $dsn['database']) + : $dsn['database'], + $dsn['username'] ? $dsn['username'] : null, + $dsn['password'] ? $dsn['password'] : null, + isset($dsn['charset']) ? $dsn['charset'] : null, + isset($dsn['buffers']) ? $dsn['buffers'] : null, + isset($dsn['dialect']) ? $dsn['dialect'] : null, + isset($dsn['role']) ? $dsn['role'] : null, + ); + + $connect_function = $persistent ? 'ibase_pconnect' : 'ibase_connect'; + + $this->connection = @call_user_func_array($connect_function, $params); + if (!$this->connection) { + return $this->ibaseRaiseError(DB_ERROR_CONNECT_FAILED); + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @ibase_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $ismanip = DB::isManip($query); + $this->last_query = $query; + $query = $this->modifyQuery($query); + $result = @ibase_query($this->connection, $query); + + if (!$result) { + return $this->ibaseRaiseError(); + } + if ($this->autocommit && $ismanip) { + @ibase_commit($this->connection); + } + if ($ismanip) { + $this->affected = $result; + return DB_OK; + } else { + $this->affected = 0; + return $result; + } + } + + // }}} + // {{{ modifyLimitQuery() + + /** + * Adds LIMIT clauses to a query string according to current DBMS standards + * + * Only works with Firebird. + * + * @param string $query the query to modify + * @param int $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return string the query string with LIMIT clauses added + * + * @access protected + */ + function modifyLimitQuery($query, $from, $count, $params = array()) + { + if ($this->dsn['dbsyntax'] == 'firebird') { + $query = preg_replace('/^([\s(])*SELECT/i', + "SELECT FIRST $count SKIP $from", $query); + } + return $query; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal ibase result pointer to the next available result + * + * @param a valid fbsql result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + return $this->ibaseRaiseError(DB_ERROR_NOT_CAPABLE); + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + if (function_exists('ibase_fetch_assoc')) { + $arr = @ibase_fetch_assoc($result); + } else { + $arr = get_object_vars(ibase_fetch_object($result)); + } + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @ibase_fetch_row($result); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @ibase_free_result($result); + } + + // }}} + // {{{ freeQuery() + + function freeQuery($query) + { + @ibase_free_query($query); + return true; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (is_integer($this->affected)) { + return $this->affected; + } + return $this->ibaseRaiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @ibase_num_fields($result); + if (!$cols) { + return $this->ibaseRaiseError(); + } + return $cols; + } + + // }}} + // {{{ prepare() + + /** + * Prepares a query for multiple execution with execute(). + * + * prepare() requires a generic query as string like + * INSERT INTO numbers VALUES (?, ?, ?) + * . The ? characters are placeholders. + * + * Three types of placeholders can be used: + * + ? a quoted scalar value, i.e. strings, integers + * + ! value is inserted 'as is' + * + & requires a file name. The file's contents get + * inserted into the query (i.e. saving binary + * data in a db) + * + * Use backslashes to escape placeholder characters if you don't want + * them to be interpreted as placeholders. Example: + * "UPDATE foo SET col=? WHERE col='over \& under'" + * + * + * @param string $query query to be prepared + * @return mixed DB statement resource on success. DB_Error on failure. + */ + function prepare($query) + { + $tokens = preg_split('/((? $val) { + switch ($val) { + case '?': + $types[$token++] = DB_PARAM_SCALAR; + break; + case '&': + $types[$token++] = DB_PARAM_OPAQUE; + break; + case '!': + $types[$token++] = DB_PARAM_MISC; + break; + default: + $tokens[$key] = preg_replace('/\\\([&?!])/', "\\1", $val); + $newquery .= $tokens[$key] . '?'; + } + } + + $newquery = substr($newquery, 0, -1); + $this->last_query = $query; + $newquery = $this->modifyQuery($newquery); + $stmt = @ibase_prepare($this->connection, $newquery); + $this->prepare_types[(int)$stmt] = $types; + $this->manip_query[(int)$stmt] = DB::isManip($query); + return $stmt; + } + + // }}} + // {{{ execute() + + /** + * Executes a DB statement prepared with prepare(). + * + * @param resource $stmt a DB statement resource returned from prepare() + * @param mixed $data array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 for non-array items or the + * quantity of elements in the array. + * @return object a new DB_Result or a DB_Error when fail + * @see DB_ibase::prepare() + * @access public + */ + function &execute($stmt, $data = array()) + { + $data = (array)$data; + $this->last_parameters = $data; + + $types =& $this->prepare_types[(int)$stmt]; + if (count($types) != count($data)) { + $tmp =& $this->raiseError(DB_ERROR_MISMATCH); + return $tmp; + } + + $i = 0; + foreach ($data as $key => $value) { + if ($types[$i] == DB_PARAM_MISC) { + /* + * ibase doesn't seem to have the ability to pass a + * parameter along unchanged, so strip off quotes from start + * and end, plus turn two single quotes to one single quote, + * in order to avoid the quotes getting escaped by + * ibase and ending up in the database. + */ + $data[$key] = preg_replace("/^'(.*)'$/", "\\1", $data[$key]); + $data[$key] = str_replace("''", "'", $data[$key]); + } elseif ($types[$i] == DB_PARAM_OPAQUE) { + $fp = @fopen($data[$key], 'rb'); + if (!$fp) { + $tmp =& $this->raiseError(DB_ERROR_ACCESS_VIOLATION); + return $tmp; + } + $data[$key] = fread($fp, filesize($data[$key])); + fclose($fp); + } + $i++; + } + + array_unshift($data, $stmt); + + $res = call_user_func_array('ibase_execute', $data); + if (!$res) { + $tmp =& $this->ibaseRaiseError(); + return $tmp; + } + /* XXX need this? + if ($this->autocommit && $this->manip_query[(int)$stmt]) { + @ibase_commit($this->connection); + }*/ + $this->last_stmt = $stmt; + if ($this->manip_query[(int)$stmt]) { + $tmp = DB_OK; + } else { + $tmp =& new DB_result($this, $res); + } + return $tmp; + } + + /** + * Frees the internal resources associated with a prepared query + * + * @param resource $stmt the prepared statement's PHP resource + * @param bool $free_resource should the PHP resource be freed too? + * Use false if you need to get data + * from the result set later. + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_ibase::prepare() + */ + function freePrepared($stmt, $free_resource = true) + { + if (!is_resource($stmt)) { + return false; + } + if ($free_resource) { + @ibase_free_query($stmt); + } + unset($this->prepare_tokens[(int)$stmt]); + unset($this->prepare_types[(int)$stmt]); + unset($this->manip_query[(int)$stmt]); + return true; + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + $this->autocommit = $onoff ? 1 : 0; + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + return @ibase_commit($this->connection); + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + return @ibase_rollback($this->connection); + } + + // }}} + // {{{ transactionInit() + + function transactionInit($trans_args = 0) + { + return $trans_args + ? @ibase_trans($trans_args, $this->connection) + : @ibase_trans(); + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_ibase::createSequence(), DB_ibase::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $sqn = strtoupper($this->getSequenceName($seq_name)); + $repeat = 0; + do { + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result =& $this->query("SELECT GEN_ID(${sqn}, 1) " + . 'FROM RDB$GENERATORS ' + . "WHERE RDB\$GENERATOR_NAME='${sqn}'"); + $this->popErrorHandling(); + if ($ondemand && DB::isError($result)) { + $repeat = 1; + $result = $this->createSequence($seq_name); + if (DB::isError($result)) { + return $result; + } + } else { + $repeat = 0; + } + } while ($repeat); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $arr = $result->fetchRow(DB_FETCHMODE_ORDERED); + $result->free(); + return $arr[0]; + } + + // }}} + // {{{ createSequence() + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_ibase::nextID(), DB_ibase::dropSequence() + */ + function createSequence($seq_name) + { + $sqn = strtoupper($this->getSequenceName($seq_name)); + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->query("CREATE GENERATOR ${sqn}"); + $this->popErrorHandling(); + + return $result; + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_ibase::nextID(), DB_ibase::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DELETE FROM RDB$GENERATORS ' + . "WHERE RDB\$GENERATOR_NAME='" + . strtoupper($this->getSequenceName($seq_name)) + . "'"); + } + + // }}} + // {{{ _ibaseFieldFlags() + + /** + * Get the column's flags + * + * Supports "primary_key", "unique_key", "not_null", "default", + * "computed" and "blob". + * + * @param string $field_name the name of the field + * @param string $table_name the name of the table + * + * @return string the flags + * + * @access private + */ + function _ibaseFieldFlags($field_name, $table_name) + { + $sql = 'SELECT R.RDB$CONSTRAINT_TYPE CTYPE' + .' FROM RDB$INDEX_SEGMENTS I' + .' JOIN RDB$RELATION_CONSTRAINTS R ON I.RDB$INDEX_NAME=R.RDB$INDEX_NAME' + .' WHERE I.RDB$FIELD_NAME=\'' . $field_name . '\'' + .' AND UPPER(R.RDB$RELATION_NAME)=\'' . strtoupper($table_name) . '\''; + + $result = @ibase_query($this->connection, $sql); + if (!$result) { + return $this->ibaseRaiseError(); + } + + $flags = ''; + if ($obj = @ibase_fetch_object($result)) { + @ibase_free_result($result); + if (isset($obj->CTYPE) && trim($obj->CTYPE) == 'PRIMARY KEY') { + $flags .= 'primary_key '; + } + if (isset($obj->CTYPE) && trim($obj->CTYPE) == 'UNIQUE') { + $flags .= 'unique_key '; + } + } + + $sql = 'SELECT R.RDB$NULL_FLAG AS NFLAG,' + .' R.RDB$DEFAULT_SOURCE AS DSOURCE,' + .' F.RDB$FIELD_TYPE AS FTYPE,' + .' F.RDB$COMPUTED_SOURCE AS CSOURCE' + .' FROM RDB$RELATION_FIELDS R ' + .' JOIN RDB$FIELDS F ON R.RDB$FIELD_SOURCE=F.RDB$FIELD_NAME' + .' WHERE UPPER(R.RDB$RELATION_NAME)=\'' . strtoupper($table_name) . '\'' + .' AND R.RDB$FIELD_NAME=\'' . $field_name . '\''; + + $result = @ibase_query($this->connection, $sql); + if (!$result) { + return $this->ibaseRaiseError(); + } + if ($obj = @ibase_fetch_object($result)) { + @ibase_free_result($result); + if (isset($obj->NFLAG)) { + $flags .= 'not_null '; + } + if (isset($obj->DSOURCE)) { + $flags .= 'default '; + } + if (isset($obj->CSOURCE)) { + $flags .= 'computed '; + } + if (isset($obj->FTYPE) && $obj->FTYPE == 261) { + $flags .= 'blob '; + } + } + + return trim($flags); + } + + // }}} + // {{{ ibaseRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_ibase::errorNative(), DB_ibase::errorCode() + */ + function &ibaseRaiseError($errno = null) + { + if ($errno === null) { + $errno = $this->errorCode($this->errorNative()); + } + $tmp =& $this->raiseError($errno, null, null, null, @ibase_errmsg()); + return $tmp; + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code produced by the last query + * + * @return int the DBMS' error code. NULL if there is no error code. + * + * @since Method available since Release 1.7.0 + */ + function errorNative() + { + if (function_exists('ibase_errcode')) { + return @ibase_errcode(); + } + if (preg_match('/^Dynamic SQL Error SQL error code = ([0-9-]+)/i', + @ibase_errmsg(), $m)) { + return (int)$m[1]; + } + return null; + } + + // }}} + // {{{ errorCode() + + /** + * Maps native error codes to DB's portable ones + * + * @param int $nativecode the error code returned by the DBMS + * + * @return int the portable DB error code. Return DB_ERROR if the + * current driver doesn't have a mapping for the + * $nativecode submitted. + * + * @since Method available since Release 1.7.0 + */ + function errorCode($nativecode = null) + { + if (isset($this->errorcode_map[$nativecode])) { + return $this->errorcode_map[$nativecode]; + } + + static $error_regexps; + if (!isset($error_regexps)) { + $error_regexps = array( + '/generator .* is not defined/' + => DB_ERROR_SYNTAX, // for compat. w ibase_errcode() + '/table.*(not exist|not found|unknown)/i' + => DB_ERROR_NOSUCHTABLE, + '/table .* already exists/i' + => DB_ERROR_ALREADY_EXISTS, + '/unsuccessful metadata update .* failed attempt to store duplicate value/i' + => DB_ERROR_ALREADY_EXISTS, + '/unsuccessful metadata update .* not found/i' + => DB_ERROR_NOT_FOUND, + '/validation error for column .* value "\*\*\* null/i' + => DB_ERROR_CONSTRAINT_NOT_NULL, + '/violation of [\w ]+ constraint/i' + => DB_ERROR_CONSTRAINT, + '/conversion error from string/i' + => DB_ERROR_INVALID_NUMBER, + '/no permission for/i' + => DB_ERROR_ACCESS_VIOLATION, + '/arithmetic exception, numeric overflow, or string truncation/i' + => DB_ERROR_INVALID, + ); + } + + $errormsg = @ibase_errmsg(); + foreach ($error_regexps as $regexp => $code) { + if (preg_match($regexp, $errormsg)) { + return $code; + } + } + return DB_ERROR; + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * NOTE: only supports 'table' and 'flags' if $result + * is a table name. + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @ibase_query($this->connection, + "SELECT * FROM $result WHERE 1=0"); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->ibaseRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @ibase_num_fields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $info = @ibase_field_info($id, $i); + $res[$i] = array( + 'table' => $got_string ? $case_func($result) : '', + 'name' => $case_func($info['name']), + 'type' => $info['type'], + 'len' => $info['length'], + 'flags' => ($got_string) + ? $this->_ibaseFieldFlags($info['name'], $result) + : '', + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @ibase_free_result($id); + } + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return 'SELECT DISTINCT R.RDB$RELATION_NAME FROM ' + . 'RDB$RELATION_FIELDS R WHERE R.RDB$SYSTEM_FLAG=0'; + case 'views': + return 'SELECT DISTINCT RDB$VIEW_NAME from RDB$VIEW_RELATIONS'; + case 'users': + return 'SELECT DISTINCT RDB$USER FROM RDB$USER_PRIVILEGES'; + default: + return null; + } + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/ifx.php b/campcaster/src/tools/pear/src/DB/ifx.php new file mode 100644 index 000000000..97b3b0a5e --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/ifx.php @@ -0,0 +1,681 @@ + + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: ifx.php,v 1.70 2005/02/20 00:44:48 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's ifx extension + * for interacting with Informix databases + * + * These methods overload the ones declared in DB_common. + * + * More info on Informix errors can be found at: + * http://www.informix.com/answers/english/ierrors.htm + * + * TODO: + * - set needed env Informix vars on connect + * - implement native prepare/execute + * + * @category Database + * @package DB + * @author Tomas V.V.Cox + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_ifx extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'ifx'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'ifx'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'emulate', + 'new_link' => false, + 'numrows' => 'emulate', + 'pconnect' => true, + 'prepare' => false, + 'ssl' => false, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + '-201' => DB_ERROR_SYNTAX, + '-206' => DB_ERROR_NOSUCHTABLE, + '-217' => DB_ERROR_NOSUCHFIELD, + '-236' => DB_ERROR_VALUE_COUNT_ON_ROW, + '-239' => DB_ERROR_CONSTRAINT, + '-253' => DB_ERROR_SYNTAX, + '-292' => DB_ERROR_CONSTRAINT_NOT_NULL, + '-310' => DB_ERROR_ALREADY_EXISTS, + '-316' => DB_ERROR_ALREADY_EXISTS, + '-319' => DB_ERROR_NOT_FOUND, + '-329' => DB_ERROR_NODBSELECTED, + '-346' => DB_ERROR_CONSTRAINT, + '-386' => DB_ERROR_CONSTRAINT_NOT_NULL, + '-391' => DB_ERROR_CONSTRAINT_NOT_NULL, + '-554' => DB_ERROR_SYNTAX, + '-691' => DB_ERROR_CONSTRAINT, + '-692' => DB_ERROR_CONSTRAINT, + '-703' => DB_ERROR_CONSTRAINT_NOT_NULL, + '-1204' => DB_ERROR_INVALID_DATE, + '-1205' => DB_ERROR_INVALID_DATE, + '-1206' => DB_ERROR_INVALID_DATE, + '-1209' => DB_ERROR_INVALID_DATE, + '-1210' => DB_ERROR_INVALID_DATE, + '-1212' => DB_ERROR_INVALID_DATE, + '-1213' => DB_ERROR_INVALID_NUMBER, + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * Should data manipulation queries be committed automatically? + * @var bool + * @access private + */ + var $autocommit = true; + + /** + * The quantity of transactions begun + * + * {@internal While this is private, it can't actually be designated + * private in PHP 5 because it is directly accessed in the test suite.}} + * + * @var integer + * @access private + */ + var $transaction_opcount = 0; + + /** + * The number of rows affected by a data manipulation query + * @var integer + * @access private + */ + var $affected = 0; + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_ifx() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('informix') && + !PEAR::loadExtension('Informix')) + { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + $dbhost = $dsn['hostspec'] ? '@' . $dsn['hostspec'] : ''; + $dbname = $dsn['database'] ? $dsn['database'] . $dbhost : ''; + $user = $dsn['username'] ? $dsn['username'] : ''; + $pw = $dsn['password'] ? $dsn['password'] : ''; + + $connect_function = $persistent ? 'ifx_pconnect' : 'ifx_connect'; + + $this->connection = @$connect_function($dbname, $user, $pw); + if (!is_resource($this->connection)) { + return $this->ifxRaiseError(DB_ERROR_CONNECT_FAILED); + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @ifx_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $ismanip = DB::isManip($query); + $this->last_query = $query; + $this->affected = null; + if (preg_match('/(SELECT)/i', $query)) { //TESTME: Use !DB::isManip()? + // the scroll is needed for fetching absolute row numbers + // in a select query result + $result = @ifx_query($query, $this->connection, IFX_SCROLL); + } else { + if (!$this->autocommit && $ismanip) { + if ($this->transaction_opcount == 0) { + $result = @ifx_query('BEGIN WORK', $this->connection); + if (!$result) { + return $this->ifxRaiseError(); + } + } + $this->transaction_opcount++; + } + $result = @ifx_query($query, $this->connection); + } + if (!$result) { + return $this->ifxRaiseError(); + } + $this->affected = @ifx_affected_rows($result); + // Determine which queries should return data, and which + // should return an error code only. + if (preg_match('/(SELECT)/i', $query)) { + return $result; + } + // XXX Testme: free results inside a transaction + // may cause to stop it and commit the work? + + // Result has to be freed even with a insert or update + @ifx_free_result($result); + + return DB_OK; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal ifx result pointer to the next available result + * + * @param a valid fbsql result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (DB::isManip($this->last_query)) { + return $this->affected; + } else { + return 0; + } + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if (($rownum !== null) && ($rownum < 0)) { + return null; + } + if ($rownum === null) { + /* + * Even though fetch_row() should return the next row if + * $rownum is null, it doesn't in all cases. Bug 598. + */ + $rownum = 'NEXT'; + } else { + // Index starts at row 1, unlike most DBMS's starting at 0. + $rownum++; + } + if (!$arr = @ifx_fetch_row($result, $rownum)) { + return null; + } + if ($fetchmode !== DB_FETCHMODE_ASSOC) { + $i=0; + $order = array(); + foreach ($arr as $val) { + $order[$i++] = $val; + } + $arr = $order; + } elseif ($fetchmode == DB_FETCHMODE_ASSOC && + $this->options['portability'] & DB_PORTABILITY_LOWERCASE) + { + $arr = array_change_key_case($arr, CASE_LOWER); + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + if (!$cols = @ifx_num_fields($result)) { + return $this->ifxRaiseError(); + } + return $cols; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @ifx_free_result($result); + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = true) + { + // XXX if $this->transaction_opcount > 0, we should probably + // issue a warning here. + $this->autocommit = $onoff ? true : false; + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + if ($this->transaction_opcount > 0) { + $result = @ifx_query('COMMIT WORK', $this->connection); + $this->transaction_opcount = 0; + if (!$result) { + return $this->ifxRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + if ($this->transaction_opcount > 0) { + $result = @ifx_query('ROLLBACK WORK', $this->connection); + $this->transaction_opcount = 0; + if (!$result) { + return $this->ifxRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ ifxRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_ifx::errorNative(), DB_ifx::errorCode() + */ + function ifxRaiseError($errno = null) + { + if ($errno === null) { + $errno = $this->errorCode(ifx_error()); + } + return $this->raiseError($errno, null, null, null, + $this->errorNative()); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code and message produced by the last query + * + * @return string the DBMS' error code and message + */ + function errorNative() + { + return @ifx_error() . ' ' . @ifx_errormsg(); + } + + // }}} + // {{{ errorCode() + + /** + * Maps native error codes to DB's portable ones. + * + * Requires that the DB implementation's constructor fills + * in the $errorcode_map property. + * + * @param string $nativecode error code returned by the database + * @return int a portable DB error code, or DB_ERROR if this DB + * implementation has no mapping for the given error code. + */ + function errorCode($nativecode) + { + if (ereg('SQLCODE=(.*)]', $nativecode, $match)) { + $code = $match[1]; + if (isset($this->errorcode_map[$code])) { + return $this->errorcode_map[$code]; + } + } + return DB_ERROR; + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * NOTE: only supports 'table' if $result is a table name. + * + * If analyzing a query result and the result has duplicate field names, + * an error will be raised saying + * can't distinguish duplicate field names. + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + * @since Method available since Release 1.6.0 + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @ifx_query("SELECT * FROM $result WHERE 1=0", + $this->connection); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->ifxRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + $flds = @ifx_fieldproperties($id); + $count = @ifx_num_fields($id); + + if (count($flds) != $count) { + return $this->raiseError("can't distinguish duplicate field names"); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $i = 0; + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + foreach ($flds as $key => $value) { + $props = explode(';', $value); + $res[$i] = array( + 'table' => $got_string ? $case_func($result) : '', + 'name' => $case_func($key), + 'type' => $props[0], + 'len' => $props[1], + 'flags' => $props[4] == 'N' ? 'not_null' : '', + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + $i++; + } + + // free the result only if we were called on a table + if ($got_string) { + @ifx_free_result($id); + } + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return 'SELECT tabname FROM systables WHERE tabid >= 100'; + default: + return null; + } + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/msql.php b/campcaster/src/tools/pear/src/DB/msql.php new file mode 100644 index 000000000..2673e36e9 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/msql.php @@ -0,0 +1,810 @@ + + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: msql.php,v 1.57 2005/02/22 07:26:46 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's msql extension + * for interacting with Mini SQL databases + * + * These methods overload the ones declared in DB_common. + * + * PHP's mSQL extension did weird things with NULL values prior to PHP + * 4.3.11 and 5.0.4. Make sure your version of PHP meets or exceeds + * those versions. + * + * @category Database + * @package DB + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + * @since Class not functional until Release 1.7.0 + */ +class DB_msql extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'msql'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'msql'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'emulate', + 'new_link' => false, + 'numrows' => true, + 'pconnect' => true, + 'prepare' => false, + 'ssl' => false, + 'transactions' => false, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * The query result resource created by PHP + * + * Used to make affectedRows() work. Only contains the result for + * data manipulation queries. Contains false for other queries. + * + * @var resource + * @access private + */ + var $_result; + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_msql() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * Example of how to connect: + * + * require_once 'DB.php'; + * + * // $dsn = 'msql://hostname/dbname'; // use a TCP connection + * $dsn = 'msql:///dbname'; // use a socket + * $options = array( + * 'portability' => DB_PORTABILITY_ALL, + * ); + * + * $db =& DB::connect($dsn, $options); + * if (PEAR::isError($db)) { + * die($db->getMessage()); + * } + * + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('msql')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + $params = array(); + if ($dsn['hostspec']) { + $params[] = $dsn['port'] + ? $dsn['hostspec'] . ',' . $dsn['port'] + : $dsn['hostspec']; + } + + $connect_function = $persistent ? 'msql_pconnect' : 'msql_connect'; + + $ini = ini_get('track_errors'); + $php_errormsg = ''; + if ($ini) { + $this->connection = @call_user_func_array($connect_function, + $params); + } else { + ini_set('track_errors', 1); + $this->connection = @call_user_func_array($connect_function, + $params); + ini_set('track_errors', $ini); + } + + if (!$this->connection) { + if (($err = @msql_error()) != '') { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $err); + } else { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $php_errormsg); + } + } + + if (!@msql_select_db($dsn['database'], $this->connection)) { + return $this->msqlRaiseError(); + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @msql_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $this->last_query = $query; + $query = $this->modifyQuery($query); + $result = @msql_query($query, $this->connection); + if (!$result) { + return $this->msqlRaiseError(); + } + // Determine which queries that should return data, and which + // should return an error code only. + if (DB::isManip($query)) { + $this->_result = $result; + return DB_OK; + } else { + $this->_result = false; + return $result; + } + } + + + // }}} + // {{{ nextResult() + + /** + * Move the internal msql result pointer to the next available result + * + * @param a valid fbsql result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * PHP's mSQL extension did weird things with NULL values prior to PHP + * 4.3.11 and 5.0.4. Make sure your version of PHP meets or exceeds + * those versions. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + if (!@msql_data_seek($result, $rownum)) { + return null; + } + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $arr = @msql_fetch_array($result, MSQL_ASSOC); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @msql_fetch_row($result); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @msql_free_result($result); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @msql_num_fields($result); + if (!$cols) { + return $this->msqlRaiseError(); + } + return $cols; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $rows = @msql_num_rows($result); + if ($rows === false) { + return $this->msqlRaiseError(); + } + return $rows; + } + + // }}} + // {{{ affected() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (!$this->_result) { + return 0; + } + return msql_affected_rows($this->_result); + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_msql::createSequence(), DB_msql::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + $repeat = false; + do { + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result =& $this->query("SELECT _seq FROM ${seqname}"); + $this->popErrorHandling(); + if ($ondemand && DB::isError($result) && + $result->getCode() == DB_ERROR_NOSUCHTABLE) { + $repeat = true; + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->createSequence($seq_name); + $this->popErrorHandling(); + if (DB::isError($result)) { + return $this->raiseError($result); + } + } else { + $repeat = false; + } + } while ($repeat); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $arr = $result->fetchRow(DB_FETCHMODE_ORDERED); + $result->free(); + return $arr[0]; + } + + // }}} + // {{{ createSequence() + + /** + * Creates a new sequence + * + * Also creates a new table to associate the sequence with. Uses + * a separate table to ensure portability with other drivers. + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_msql::nextID(), DB_msql::dropSequence() + */ + function createSequence($seq_name) + { + $seqname = $this->getSequenceName($seq_name); + $res = $this->query('CREATE TABLE ' . $seqname + . ' (id INTEGER NOT NULL)'); + if (DB::isError($res)) { + return $res; + } + $res = $this->query("CREATE SEQUENCE ON ${seqname}"); + return $res; + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_msql::nextID(), DB_msql::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP TABLE ' . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ quoteIdentifier() + + /** + * mSQL does not support delimited identifiers + * + * @param string $str the identifier name to be quoted + * + * @return object a DB_Error object + * + * @see DB_common::quoteIdentifier() + * @since Method available since Release 1.7.0 + */ + function quoteIdentifier($str) + { + return $this->raiseError(DB_ERROR_UNSUPPORTED); + } + + // }}} + // {{{ escapeSimple() + + /** + * Escapes a string according to the current DBMS's standards + * + * @param string $str the string to be escaped + * + * @return string the escaped string + * + * @see DB_common::quoteSmart() + * @since Method available since Release 1.7.0 + */ + function escapeSimple($str) + { + return addslashes($str); + } + + // }}} + // {{{ msqlRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_msql::errorNative(), DB_msql::errorCode() + */ + function msqlRaiseError($errno = null) + { + $native = $this->errorNative(); + if ($errno === null) { + $errno = $this->errorCode($native); + } + return $this->raiseError($errno, null, null, null, $native); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error message produced by the last query + * + * @return string the DBMS' error message + */ + function errorNative() + { + return @msql_error(); + } + + // }}} + // {{{ errorCode() + + /** + * Determines PEAR::DB error code from the database's text error message + * + * @param string $errormsg the error message returned from the database + * + * @return integer the error number from a DB_ERROR* constant + */ + function errorCode($errormsg) + { + static $error_regexps; + if (!isset($error_regexps)) { + $error_regexps = array( + '/^Access to database denied/i' + => DB_ERROR_ACCESS_VIOLATION, + '/^Bad index name/i' + => DB_ERROR_ALREADY_EXISTS, + '/^Bad order field/i' + => DB_ERROR_SYNTAX, + '/^Bad type for comparison/i' + => DB_ERROR_SYNTAX, + '/^Can\'t perform LIKE on/i' + => DB_ERROR_SYNTAX, + '/^Can\'t use TEXT fields in LIKE comparison/i' + => DB_ERROR_SYNTAX, + '/^Couldn\'t create temporary table/i' + => DB_ERROR_CANNOT_CREATE, + '/^Error creating table file/i' + => DB_ERROR_CANNOT_CREATE, + '/^Field .* cannot be null$/i' + => DB_ERROR_CONSTRAINT_NOT_NULL, + '/^Index (field|condition) .* cannot be null$/i' + => DB_ERROR_SYNTAX, + '/^Invalid date format/i' + => DB_ERROR_INVALID_DATE, + '/^Invalid time format/i' + => DB_ERROR_INVALID, + '/^Literal value for .* is wrong type$/i' + => DB_ERROR_INVALID_NUMBER, + '/^No Database Selected/i' + => DB_ERROR_NODBSELECTED, + '/^No value specified for field/i' + => DB_ERROR_VALUE_COUNT_ON_ROW, + '/^Non unique value for unique index/i' + => DB_ERROR_CONSTRAINT, + '/^Out of memory for temporary table/i' + => DB_ERROR_CANNOT_CREATE, + '/^Permission denied/i' + => DB_ERROR_ACCESS_VIOLATION, + '/^Reference to un-selected table/i' + => DB_ERROR_SYNTAX, + '/^syntax error/i' + => DB_ERROR_SYNTAX, + '/^Table .* exists$/i' + => DB_ERROR_ALREADY_EXISTS, + '/^Unknown database/i' + => DB_ERROR_NOSUCHDB, + '/^Unknown field/i' + => DB_ERROR_NOSUCHFIELD, + '/^Unknown (index|system variable)/i' + => DB_ERROR_NOT_FOUND, + '/^Unknown table/i' + => DB_ERROR_NOSUCHTABLE, + '/^Unqualified field/i' + => DB_ERROR_SYNTAX, + ); + } + + foreach ($error_regexps as $regexp => $code) { + if (preg_match($regexp, $errormsg)) { + return $code; + } + } + return DB_ERROR; + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::setOption() + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @msql_query("SELECT * FROM $result", + $this->connection); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->raiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @msql_num_fields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $tmp = @msql_fetch_field($id); + + $flags = ''; + if ($tmp->not_null) { + $flags .= 'not_null '; + } + if ($tmp->unique) { + $flags .= 'unique_key '; + } + $flags = trim($flags); + + $res[$i] = array( + 'table' => $case_func($tmp->table), + 'name' => $case_func($tmp->name), + 'type' => $tmp->type, + 'len' => msql_field_len($id, $i), + 'flags' => $flags, + ); + + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @msql_free_result($id); + } + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtain a list of a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return array the array containing the list of objects requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'databases': + $id = @msql_list_dbs($this->connection); + break; + case 'tables': + $id = @msql_list_tables($this->dsn['database'], + $this->connection); + break; + default: + return null; + } + if (!$id) { + return $this->msqlRaiseError(); + } + $out = array(); + while ($row = @msql_fetch_row($id)) { + $out[] = $row[0]; + } + return $out; + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/mssql.php b/campcaster/src/tools/pear/src/DB/mssql.php new file mode 100644 index 000000000..0dc61c022 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/mssql.php @@ -0,0 +1,914 @@ + + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: mssql.php,v 1.83 2005/03/07 18:24:51 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's mssql extension + * for interacting with Microsoft SQL Server databases + * + * These methods overload the ones declared in DB_common. + * + * @category Database + * @package DB + * @author Sterling Hughes + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_mssql extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'mssql'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'mssql'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'emulate', + 'new_link' => false, + 'numrows' => true, + 'pconnect' => true, + 'prepare' => false, + 'ssl' => false, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + // XXX Add here error codes ie: 'S100E' => DB_ERROR_SYNTAX + var $errorcode_map = array( + 110 => DB_ERROR_VALUE_COUNT_ON_ROW, + 155 => DB_ERROR_NOSUCHFIELD, + 170 => DB_ERROR_SYNTAX, + 207 => DB_ERROR_NOSUCHFIELD, + 208 => DB_ERROR_NOSUCHTABLE, + 245 => DB_ERROR_INVALID_NUMBER, + 515 => DB_ERROR_CONSTRAINT_NOT_NULL, + 547 => DB_ERROR_CONSTRAINT, + 1913 => DB_ERROR_ALREADY_EXISTS, + 2627 => DB_ERROR_CONSTRAINT, + 2714 => DB_ERROR_ALREADY_EXISTS, + 3701 => DB_ERROR_NOSUCHTABLE, + 8134 => DB_ERROR_DIVZERO, + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * Should data manipulation queries be committed automatically? + * @var bool + * @access private + */ + var $autocommit = true; + + /** + * The quantity of transactions begun + * + * {@internal While this is private, it can't actually be designated + * private in PHP 5 because it is directly accessed in the test suite.}} + * + * @var integer + * @access private + */ + var $transaction_opcount = 0; + + /** + * The database specified in the DSN + * + * It's a fix to allow calls to different databases in the same script. + * + * @var string + * @access private + */ + var $_db = null; + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_mssql() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('mssql') && !PEAR::loadExtension('sybase') + && !PEAR::loadExtension('sybase_ct')) + { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + $params = array( + $dsn['hostspec'] ? $dsn['hostspec'] : 'localhost', + $dsn['username'] ? $dsn['username'] : null, + $dsn['password'] ? $dsn['password'] : null, + ); + if ($dsn['port']) { + $params[0] .= ((substr(PHP_OS, 0, 3) == 'WIN') ? ',' : ':') + . $dsn['port']; + } + + $connect_function = $persistent ? 'mssql_pconnect' : 'mssql_connect'; + + $this->connection = @call_user_func_array($connect_function, $params); + + if (!$this->connection) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + @mssql_get_last_message()); + } + if ($dsn['database']) { + if (!@mssql_select_db($dsn['database'], $this->connection)) { + return $this->raiseError(DB_ERROR_NODBSELECTED, + null, null, null, + @mssql_get_last_message()); + } + $this->_db = $dsn['database']; + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @mssql_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $ismanip = DB::isManip($query); + $this->last_query = $query; + if (!@mssql_select_db($this->_db, $this->connection)) { + return $this->mssqlRaiseError(DB_ERROR_NODBSELECTED); + } + $query = $this->modifyQuery($query); + if (!$this->autocommit && $ismanip) { + if ($this->transaction_opcount == 0) { + $result = @mssql_query('BEGIN TRAN', $this->connection); + if (!$result) { + return $this->mssqlRaiseError(); + } + } + $this->transaction_opcount++; + } + $result = @mssql_query($query, $this->connection); + if (!$result) { + return $this->mssqlRaiseError(); + } + // Determine which queries that should return data, and which + // should return an error code only. + return $ismanip ? DB_OK : $result; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal mssql result pointer to the next available result + * + * @param a valid fbsql result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return @mssql_next_result($result); + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + if (!@mssql_data_seek($result, $rownum)) { + return null; + } + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $arr = @mssql_fetch_array($result, MSSQL_ASSOC); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @mssql_fetch_row($result); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @mssql_free_result($result); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @mssql_num_fields($result); + if (!$cols) { + return $this->mssqlRaiseError(); + } + return $cols; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $rows = @mssql_num_rows($result); + if ($rows === false) { + return $this->mssqlRaiseError(); + } + return $rows; + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + // XXX if $this->transaction_opcount > 0, we should probably + // issue a warning here. + $this->autocommit = $onoff ? true : false; + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + if ($this->transaction_opcount > 0) { + if (!@mssql_select_db($this->_db, $this->connection)) { + return $this->mssqlRaiseError(DB_ERROR_NODBSELECTED); + } + $result = @mssql_query('COMMIT TRAN', $this->connection); + $this->transaction_opcount = 0; + if (!$result) { + return $this->mssqlRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + if ($this->transaction_opcount > 0) { + if (!@mssql_select_db($this->_db, $this->connection)) { + return $this->mssqlRaiseError(DB_ERROR_NODBSELECTED); + } + $result = @mssql_query('ROLLBACK TRAN', $this->connection); + $this->transaction_opcount = 0; + if (!$result) { + return $this->mssqlRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (DB::isManip($this->last_query)) { + $res = @mssql_query('select @@rowcount', $this->connection); + if (!$res) { + return $this->mssqlRaiseError(); + } + $ar = @mssql_fetch_row($res); + if (!$ar) { + $result = 0; + } else { + @mssql_free_result($res); + $result = $ar[0]; + } + } else { + $result = 0; + } + return $result; + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_mssql::createSequence(), DB_mssql::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + if (!@mssql_select_db($this->_db, $this->connection)) { + return $this->mssqlRaiseError(DB_ERROR_NODBSELECTED); + } + $repeat = 0; + do { + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->query("INSERT INTO $seqname (vapor) VALUES (0)"); + $this->popErrorHandling(); + if ($ondemand && DB::isError($result) && + ($result->getCode() == DB_ERROR || $result->getCode() == DB_ERROR_NOSUCHTABLE)) + { + $repeat = 1; + $result = $this->createSequence($seq_name); + if (DB::isError($result)) { + return $this->raiseError($result); + } + } elseif (!DB::isError($result)) { + $result =& $this->query("SELECT @@IDENTITY FROM $seqname"); + $repeat = 0; + } else { + $repeat = false; + } + } while ($repeat); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $result = $result->fetchRow(DB_FETCHMODE_ORDERED); + return $result[0]; + } + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_mssql::nextID(), DB_mssql::dropSequence() + */ + function createSequence($seq_name) + { + return $this->query('CREATE TABLE ' + . $this->getSequenceName($seq_name) + . ' ([id] [int] IDENTITY (1, 1) NOT NULL,' + . ' [vapor] [int] NULL)'); + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_mssql::nextID(), DB_mssql::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP TABLE ' . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ quoteIdentifier() + + /** + * Quotes a string so it can be safely used as a table or column name + * + * @param string $str identifier name to be quoted + * + * @return string quoted identifier string + * + * @see DB_common::quoteIdentifier() + * @since Method available since Release 1.6.0 + */ + function quoteIdentifier($str) + { + return '[' . str_replace(']', ']]', $str) . ']'; + } + + // }}} + // {{{ mssqlRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_mssql::errorNative(), DB_mssql::errorCode() + */ + function mssqlRaiseError($code = null) + { + $message = @mssql_get_last_message(); + if (!$code) { + $code = $this->errorNative(); + } + return $this->raiseError($this->errorCode($code, $message), + null, null, null, "$code - $message"); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code produced by the last query + * + * @return int the DBMS' error code + */ + function errorNative() + { + $res = @mssql_query('select @@ERROR as ErrorCode', $this->connection); + if (!$res) { + return DB_ERROR; + } + $row = @mssql_fetch_row($res); + return $row[0]; + } + + // }}} + // {{{ errorCode() + + /** + * Determines PEAR::DB error code from mssql's native codes. + * + * If $nativecode isn't known yet, it will be looked up. + * + * @param mixed $nativecode mssql error code, if known + * @return integer an error number from a DB error constant + * @see errorNative() + */ + function errorCode($nativecode = null, $msg = '') + { + if (!$nativecode) { + $nativecode = $this->errorNative(); + } + if (isset($this->errorcode_map[$nativecode])) { + if ($nativecode == 3701 + && preg_match('/Cannot drop the index/i', $msg)) + { + return DB_ERROR_NOT_FOUND; + } + return $this->errorcode_map[$nativecode]; + } else { + return DB_ERROR; + } + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * NOTE: only supports 'table' and 'flags' if $result + * is a table name. + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + if (!@mssql_select_db($this->_db, $this->connection)) { + return $this->mssqlRaiseError(DB_ERROR_NODBSELECTED); + } + $id = @mssql_query("SELECT * FROM $result WHERE 1=0", + $this->connection); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->mssqlRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @mssql_num_fields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $res[$i] = array( + 'table' => $got_string ? $case_func($result) : '', + 'name' => $case_func(@mssql_field_name($id, $i)), + 'type' => @mssql_field_type($id, $i), + 'len' => @mssql_field_length($id, $i), + // We only support flags for table + 'flags' => $got_string + ? $this->_mssql_field_flags($result, + @mssql_field_name($id, $i)) + : '', + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @mssql_free_result($id); + } + return $res; + } + + // }}} + // {{{ _mssql_field_flags() + + /** + * Get a column's flags + * + * Supports "not_null", "primary_key", + * "auto_increment" (mssql identity), "timestamp" (mssql timestamp), + * "unique_key" (mssql unique index, unique check or primary_key) and + * "multiple_key" (multikey index) + * + * mssql timestamp is NOT similar to the mysql timestamp so this is maybe + * not useful at all - is the behaviour of mysql_field_flags that primary + * keys are alway unique? is the interpretation of multiple_key correct? + * + * @param string $table the table name + * @param string $column the field name + * + * @return string the flags + * + * @access private + * @author Joern Barthel + */ + function _mssql_field_flags($table, $column) + { + static $tableName = null; + static $flags = array(); + + if ($table != $tableName) { + + $flags = array(); + $tableName = $table; + + // get unique and primary keys + $res = $this->getAll("EXEC SP_HELPINDEX[$table]", DB_FETCHMODE_ASSOC); + + foreach ($res as $val) { + $keys = explode(', ', $val['index_keys']); + + if (sizeof($keys) > 1) { + foreach ($keys as $key) { + $this->_add_flag($flags[$key], 'multiple_key'); + } + } + + if (strpos($val['index_description'], 'primary key')) { + foreach ($keys as $key) { + $this->_add_flag($flags[$key], 'primary_key'); + } + } elseif (strpos($val['index_description'], 'unique')) { + foreach ($keys as $key) { + $this->_add_flag($flags[$key], 'unique_key'); + } + } + } + + // get auto_increment, not_null and timestamp + $res = $this->getAll("EXEC SP_COLUMNS[$table]", DB_FETCHMODE_ASSOC); + + foreach ($res as $val) { + $val = array_change_key_case($val, CASE_LOWER); + if ($val['nullable'] == '0') { + $this->_add_flag($flags[$val['column_name']], 'not_null'); + } + if (strpos($val['type_name'], 'identity')) { + $this->_add_flag($flags[$val['column_name']], 'auto_increment'); + } + if (strpos($val['type_name'], 'timestamp')) { + $this->_add_flag($flags[$val['column_name']], 'timestamp'); + } + } + } + + if (array_key_exists($column, $flags)) { + return(implode(' ', $flags[$column])); + } + return ''; + } + + // }}} + // {{{ _add_flag() + + /** + * Adds a string to the flags array if the flag is not yet in there + * - if there is no flag present the array is created + * + * @param array &$array the reference to the flag-array + * @param string $value the flag value + * + * @return void + * + * @access private + * @author Joern Barthel + */ + function _add_flag(&$array, $value) + { + if (!is_array($array)) { + $array = array($value); + } elseif (!in_array($value, $array)) { + array_push($array, $value); + } + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return "SELECT name FROM sysobjects WHERE type = 'U'" + . ' ORDER BY name'; + case 'views': + return "SELECT name FROM sysobjects WHERE type = 'V'"; + default: + return null; + } + } + + // }}} +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/mysql.php b/campcaster/src/tools/pear/src/DB/mysql.php new file mode 100644 index 000000000..649481824 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/mysql.php @@ -0,0 +1,1034 @@ + + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: mysql.php,v 1.117 2005/03/29 15:03:26 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's mysql extension + * for interacting with MySQL databases + * + * These methods overload the ones declared in DB_common. + * + * @category Database + * @package DB + * @author Stig Bakken + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_mysql extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'mysql'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'mysql'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'alter', + 'new_link' => '4.2.0', + 'numrows' => true, + 'pconnect' => true, + 'prepare' => false, + 'ssl' => false, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + 1004 => DB_ERROR_CANNOT_CREATE, + 1005 => DB_ERROR_CANNOT_CREATE, + 1006 => DB_ERROR_CANNOT_CREATE, + 1007 => DB_ERROR_ALREADY_EXISTS, + 1008 => DB_ERROR_CANNOT_DROP, + 1022 => DB_ERROR_ALREADY_EXISTS, + 1044 => DB_ERROR_ACCESS_VIOLATION, + 1046 => DB_ERROR_NODBSELECTED, + 1048 => DB_ERROR_CONSTRAINT, + 1049 => DB_ERROR_NOSUCHDB, + 1050 => DB_ERROR_ALREADY_EXISTS, + 1051 => DB_ERROR_NOSUCHTABLE, + 1054 => DB_ERROR_NOSUCHFIELD, + 1061 => DB_ERROR_ALREADY_EXISTS, + 1062 => DB_ERROR_ALREADY_EXISTS, + 1064 => DB_ERROR_SYNTAX, + 1091 => DB_ERROR_NOT_FOUND, + 1100 => DB_ERROR_NOT_LOCKED, + 1136 => DB_ERROR_VALUE_COUNT_ON_ROW, + 1142 => DB_ERROR_ACCESS_VIOLATION, + 1146 => DB_ERROR_NOSUCHTABLE, + 1216 => DB_ERROR_CONSTRAINT, + 1217 => DB_ERROR_CONSTRAINT, + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * Should data manipulation queries be committed automatically? + * @var bool + * @access private + */ + var $autocommit = true; + + /** + * The quantity of transactions begun + * + * {@internal While this is private, it can't actually be designated + * private in PHP 5 because it is directly accessed in the test suite.}} + * + * @var integer + * @access private + */ + var $transaction_opcount = 0; + + /** + * The database specified in the DSN + * + * It's a fix to allow calls to different databases in the same script. + * + * @var string + * @access private + */ + var $_db = ''; + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_mysql() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * PEAR DB's mysql driver supports the following extra DSN options: + * + new_link If set to true, causes subsequent calls to connect() + * to return a new connection link instead of the + * existing one. WARNING: this is not portable to + * other DBMS's. Available since PEAR DB 1.7.0. + * + client_flags Any combination of MYSQL_CLIENT_* constants. + * Only used if PHP is at version 4.3.0 or greater. + * Available since PEAR DB 1.7.0. + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('mysql')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + $params = array(); + if ($dsn['protocol'] && $dsn['protocol'] == 'unix') { + $params[0] = ':' . $dsn['socket']; + } else { + $params[0] = $dsn['hostspec'] ? $dsn['hostspec'] + : 'localhost'; + if ($dsn['port']) { + $params[0] .= ':' . $dsn['port']; + } + } + $params[] = $dsn['username'] ? $dsn['username'] : null; + $params[] = $dsn['password'] ? $dsn['password'] : null; + + if (!$persistent) { + if (isset($dsn['new_link']) + && ($dsn['new_link'] == 'true' || $dsn['new_link'] === true)) + { + $params[] = true; + } else { + $params[] = false; + } + } + if (version_compare(phpversion(), '4.3.0', '>=')) { + $params[] = isset($dsn['client_flags']) + ? $dsn['client_flags'] : null; + } + + $connect_function = $persistent ? 'mysql_pconnect' : 'mysql_connect'; + + $ini = ini_get('track_errors'); + $php_errormsg = ''; + if ($ini) { + $this->connection = @call_user_func_array($connect_function, + $params); + } else { + ini_set('track_errors', 1); + $this->connection = @call_user_func_array($connect_function, + $params); + ini_set('track_errors', $ini); + } + + if (!$this->connection) { + if (($err = @mysql_error()) != '') { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $err); + } else { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $php_errormsg); + } + } + + if ($dsn['database']) { + if (!@mysql_select_db($dsn['database'], $this->connection)) { + return $this->mysqlRaiseError(); + } + $this->_db = $dsn['database']; + } + + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @mysql_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * Generally uses mysql_query(). If you want to use + * mysql_unbuffered_query() set the "result_buffering" option to 0 using + * setOptions(). This option was added in Release 1.7.0. + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $ismanip = DB::isManip($query); + $this->last_query = $query; + $query = $this->modifyQuery($query); + if ($this->_db) { + if (!@mysql_select_db($this->_db, $this->connection)) { + return $this->mysqlRaiseError(DB_ERROR_NODBSELECTED); + } + } + if (!$this->autocommit && $ismanip) { + if ($this->transaction_opcount == 0) { + $result = @mysql_query('SET AUTOCOMMIT=0', $this->connection); + $result = @mysql_query('BEGIN', $this->connection); + if (!$result) { + return $this->mysqlRaiseError(); + } + } + $this->transaction_opcount++; + } + if (!$this->options['result_buffering']) { + $result = @mysql_unbuffered_query($query, $this->connection); + } else { + $result = @mysql_query($query, $this->connection); + } + if (!$result) { + return $this->mysqlRaiseError(); + } + if (is_resource($result)) { + return $result; + } + return DB_OK; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal mysql result pointer to the next available result + * + * This method has not been implemented yet. + * + * @param a valid sql result resource + * + * @return false + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + if (!@mysql_data_seek($result, $rownum)) { + return null; + } + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $arr = @mysql_fetch_array($result, MYSQL_ASSOC); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @mysql_fetch_row($result); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + /* + * Even though this DBMS already trims output, we do this because + * a field might have intentional whitespace at the end that + * gets removed by DB_PORTABILITY_RTRIM under another driver. + */ + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @mysql_free_result($result); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @mysql_num_fields($result); + if (!$cols) { + return $this->mysqlRaiseError(); + } + return $cols; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $rows = @mysql_num_rows($result); + if ($rows === null) { + return $this->mysqlRaiseError(); + } + return $rows; + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + // XXX if $this->transaction_opcount > 0, we should probably + // issue a warning here. + $this->autocommit = $onoff ? true : false; + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + if ($this->transaction_opcount > 0) { + if ($this->_db) { + if (!@mysql_select_db($this->_db, $this->connection)) { + return $this->mysqlRaiseError(DB_ERROR_NODBSELECTED); + } + } + $result = @mysql_query('COMMIT', $this->connection); + $result = @mysql_query('SET AUTOCOMMIT=1', $this->connection); + $this->transaction_opcount = 0; + if (!$result) { + return $this->mysqlRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + if ($this->transaction_opcount > 0) { + if ($this->_db) { + if (!@mysql_select_db($this->_db, $this->connection)) { + return $this->mysqlRaiseError(DB_ERROR_NODBSELECTED); + } + } + $result = @mysql_query('ROLLBACK', $this->connection); + $result = @mysql_query('SET AUTOCOMMIT=1', $this->connection); + $this->transaction_opcount = 0; + if (!$result) { + return $this->mysqlRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (DB::isManip($this->last_query)) { + return @mysql_affected_rows($this->connection); + } else { + return 0; + } + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_mysql::createSequence(), DB_mysql::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + do { + $repeat = 0; + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->query("UPDATE ${seqname} ". + 'SET id=LAST_INSERT_ID(id+1)'); + $this->popErrorHandling(); + if ($result === DB_OK) { + // COMMON CASE + $id = @mysql_insert_id($this->connection); + if ($id != 0) { + return $id; + } + // EMPTY SEQ TABLE + // Sequence table must be empty for some reason, so fill + // it and return 1 and obtain a user-level lock + $result = $this->getOne("SELECT GET_LOCK('${seqname}_lock',10)"); + if (DB::isError($result)) { + return $this->raiseError($result); + } + if ($result == 0) { + // Failed to get the lock + return $this->mysqlRaiseError(DB_ERROR_NOT_LOCKED); + } + + // add the default value + $result = $this->query("REPLACE INTO ${seqname} (id) VALUES (0)"); + if (DB::isError($result)) { + return $this->raiseError($result); + } + + // Release the lock + $result = $this->getOne('SELECT RELEASE_LOCK(' + . "'${seqname}_lock')"); + if (DB::isError($result)) { + return $this->raiseError($result); + } + // We know what the result will be, so no need to try again + return 1; + + } elseif ($ondemand && DB::isError($result) && + $result->getCode() == DB_ERROR_NOSUCHTABLE) + { + // ONDEMAND TABLE CREATION + $result = $this->createSequence($seq_name); + if (DB::isError($result)) { + return $this->raiseError($result); + } else { + $repeat = 1; + } + + } elseif (DB::isError($result) && + $result->getCode() == DB_ERROR_ALREADY_EXISTS) + { + // BACKWARDS COMPAT + // see _BCsequence() comment + $result = $this->_BCsequence($seqname); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $repeat = 1; + } + } while ($repeat); + + return $this->raiseError($result); + } + + // }}} + // {{{ createSequence() + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_mysql::nextID(), DB_mysql::dropSequence() + */ + function createSequence($seq_name) + { + $seqname = $this->getSequenceName($seq_name); + $res = $this->query('CREATE TABLE ' . $seqname + . ' (id INTEGER UNSIGNED AUTO_INCREMENT NOT NULL,' + . ' PRIMARY KEY(id))'); + if (DB::isError($res)) { + return $res; + } + // insert yields value 1, nextId call will generate ID 2 + $res = $this->query("INSERT INTO ${seqname} (id) VALUES (0)"); + if (DB::isError($res)) { + return $res; + } + // so reset to zero + return $this->query("UPDATE ${seqname} SET id = 0"); + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_mysql::nextID(), DB_mysql::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP TABLE ' . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ _BCsequence() + + /** + * Backwards compatibility with old sequence emulation implementation + * (clean up the dupes) + * + * @param string $seqname the sequence name to clean up + * + * @return bool true on success. A DB_Error object on failure. + * + * @access private + */ + function _BCsequence($seqname) + { + // Obtain a user-level lock... this will release any previous + // application locks, but unlike LOCK TABLES, it does not abort + // the current transaction and is much less frequently used. + $result = $this->getOne("SELECT GET_LOCK('${seqname}_lock',10)"); + if (DB::isError($result)) { + return $result; + } + if ($result == 0) { + // Failed to get the lock, can't do the conversion, bail + // with a DB_ERROR_NOT_LOCKED error + return $this->mysqlRaiseError(DB_ERROR_NOT_LOCKED); + } + + $highest_id = $this->getOne("SELECT MAX(id) FROM ${seqname}"); + if (DB::isError($highest_id)) { + return $highest_id; + } + // This should kill all rows except the highest + // We should probably do something if $highest_id isn't + // numeric, but I'm at a loss as how to handle that... + $result = $this->query('DELETE FROM ' . $seqname + . " WHERE id <> $highest_id"); + if (DB::isError($result)) { + return $result; + } + + // If another thread has been waiting for this lock, + // it will go thru the above procedure, but will have no + // real effect + $result = $this->getOne("SELECT RELEASE_LOCK('${seqname}_lock')"); + if (DB::isError($result)) { + return $result; + } + return true; + } + + // }}} + // {{{ quoteIdentifier() + + /** + * Quotes a string so it can be safely used as a table or column name + * + * MySQL can't handle the backtick character (`) in + * table or column names. + * + * @param string $str identifier name to be quoted + * + * @return string quoted identifier string + * + * @see DB_common::quoteIdentifier() + * @since Method available since Release 1.6.0 + */ + function quoteIdentifier($str) + { + return '`' . $str . '`'; + } + + // }}} + // {{{ quote() + + /** + * @deprecated Deprecated in release 1.6.0 + */ + function quote($str) + { + return $this->quoteSmart($str); + } + + // }}} + // {{{ escapeSimple() + + /** + * Escapes a string according to the current DBMS's standards + * + * @param string $str the string to be escaped + * + * @return string the escaped string + * + * @see DB_common::quoteSmart() + * @since Method available since Release 1.6.0 + */ + function escapeSimple($str) + { + if (function_exists('mysql_real_escape_string')) { + return @mysql_real_escape_string($str, $this->connection); + } else { + return @mysql_escape_string($str); + } + } + + // }}} + // {{{ modifyQuery() + + /** + * Changes a query string for various DBMS specific reasons + * + * This little hack lets you know how many rows were deleted + * when running a "DELETE FROM table" query. Only implemented + * if the DB_PORTABILITY_DELETE_COUNT portability option is on. + * + * @param string $query the query string to modify + * + * @return string the modified query string + * + * @access protected + * @see DB_common::setOption() + */ + function modifyQuery($query) + { + if ($this->options['portability'] & DB_PORTABILITY_DELETE_COUNT) { + // "DELETE FROM table" gives 0 affected rows in MySQL. + // This little hack lets you know how many rows were deleted. + if (preg_match('/^\s*DELETE\s+FROM\s+(\S+)\s*$/i', $query)) { + $query = preg_replace('/^\s*DELETE\s+FROM\s+(\S+)\s*$/', + 'DELETE FROM \1 WHERE 1=1', $query); + } + } + return $query; + } + + // }}} + // {{{ modifyLimitQuery() + + /** + * Adds LIMIT clauses to a query string according to current DBMS standards + * + * @param string $query the query to modify + * @param int $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return string the query string with LIMIT clauses added + * + * @access protected + */ + function modifyLimitQuery($query, $from, $count, $params = array()) + { + if (DB::isManip($query)) { + return $query . " LIMIT $count"; + } else { + return $query . " LIMIT $from, $count"; + } + } + + // }}} + // {{{ mysqlRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_mysql::errorNative(), DB_common::errorCode() + */ + function mysqlRaiseError($errno = null) + { + if ($errno === null) { + if ($this->options['portability'] & DB_PORTABILITY_ERRORS) { + $this->errorcode_map[1022] = DB_ERROR_CONSTRAINT; + $this->errorcode_map[1048] = DB_ERROR_CONSTRAINT_NOT_NULL; + $this->errorcode_map[1062] = DB_ERROR_CONSTRAINT; + } else { + // Doing this in case mode changes during runtime. + $this->errorcode_map[1022] = DB_ERROR_ALREADY_EXISTS; + $this->errorcode_map[1048] = DB_ERROR_CONSTRAINT; + $this->errorcode_map[1062] = DB_ERROR_ALREADY_EXISTS; + } + $errno = $this->errorCode(mysql_errno($this->connection)); + } + return $this->raiseError($errno, null, null, null, + @mysql_errno($this->connection) . ' ** ' . + @mysql_error($this->connection)); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code produced by the last query + * + * @return int the DBMS' error code + */ + function errorNative() + { + return @mysql_errno($this->connection); + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @mysql_list_fields($this->dsn['database'], + $result, $this->connection); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->mysqlRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @mysql_num_fields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $res[$i] = array( + 'table' => $case_func(@mysql_field_table($id, $i)), + 'name' => $case_func(@mysql_field_name($id, $i)), + 'type' => @mysql_field_type($id, $i), + 'len' => @mysql_field_len($id, $i), + 'flags' => @mysql_field_flags($id, $i), + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @mysql_free_result($id); + } + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return 'SHOW TABLES'; + case 'users': + return 'SELECT DISTINCT User FROM mysql.user'; + case 'databases': + return 'SHOW DATABASES'; + default: + return null; + } + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/mysqli.php b/campcaster/src/tools/pear/src/DB/mysqli.php new file mode 100644 index 000000000..16e3ec3eb --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/mysqli.php @@ -0,0 +1,1076 @@ + + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: mysqli.php,v 1.69 2005/03/04 23:12:36 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's mysqli extension + * for interacting with MySQL databases + * + * This is for MySQL versions 4.1 and above. Requires PHP 5. + * + * Note that persistent connections no longer exist. + * + * These methods overload the ones declared in DB_common. + * + * @category Database + * @package DB + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + * @since Class functional since Release 1.6.3 + */ +class DB_mysqli extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'mysqli'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'mysqli'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'alter', + 'new_link' => false, + 'numrows' => true, + 'pconnect' => false, + 'prepare' => false, + 'ssl' => true, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + 1004 => DB_ERROR_CANNOT_CREATE, + 1005 => DB_ERROR_CANNOT_CREATE, + 1006 => DB_ERROR_CANNOT_CREATE, + 1007 => DB_ERROR_ALREADY_EXISTS, + 1008 => DB_ERROR_CANNOT_DROP, + 1022 => DB_ERROR_ALREADY_EXISTS, + 1044 => DB_ERROR_ACCESS_VIOLATION, + 1046 => DB_ERROR_NODBSELECTED, + 1048 => DB_ERROR_CONSTRAINT, + 1049 => DB_ERROR_NOSUCHDB, + 1050 => DB_ERROR_ALREADY_EXISTS, + 1051 => DB_ERROR_NOSUCHTABLE, + 1054 => DB_ERROR_NOSUCHFIELD, + 1061 => DB_ERROR_ALREADY_EXISTS, + 1062 => DB_ERROR_ALREADY_EXISTS, + 1064 => DB_ERROR_SYNTAX, + 1091 => DB_ERROR_NOT_FOUND, + 1100 => DB_ERROR_NOT_LOCKED, + 1136 => DB_ERROR_VALUE_COUNT_ON_ROW, + 1142 => DB_ERROR_ACCESS_VIOLATION, + 1146 => DB_ERROR_NOSUCHTABLE, + 1216 => DB_ERROR_CONSTRAINT, + 1217 => DB_ERROR_CONSTRAINT, + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * Should data manipulation queries be committed automatically? + * @var bool + * @access private + */ + var $autocommit = true; + + /** + * The quantity of transactions begun + * + * {@internal While this is private, it can't actually be designated + * private in PHP 5 because it is directly accessed in the test suite.}} + * + * @var integer + * @access private + */ + var $transaction_opcount = 0; + + /** + * The database specified in the DSN + * + * It's a fix to allow calls to different databases in the same script. + * + * @var string + * @access private + */ + var $_db = ''; + + /** + * Array for converting MYSQLI_*_FLAG constants to text values + * @var array + * @access public + * @since Property available since Release 1.6.5 + */ + var $mysqli_flags = array( + MYSQLI_NOT_NULL_FLAG => 'not_null', + MYSQLI_PRI_KEY_FLAG => 'primary_key', + MYSQLI_UNIQUE_KEY_FLAG => 'unique_key', + MYSQLI_MULTIPLE_KEY_FLAG => 'multiple_key', + MYSQLI_BLOB_FLAG => 'blob', + MYSQLI_UNSIGNED_FLAG => 'unsigned', + MYSQLI_ZEROFILL_FLAG => 'zerofill', + MYSQLI_AUTO_INCREMENT_FLAG => 'auto_increment', + MYSQLI_TIMESTAMP_FLAG => 'timestamp', + MYSQLI_SET_FLAG => 'set', + // MYSQLI_NUM_FLAG => 'numeric', // unnecessary + // MYSQLI_PART_KEY_FLAG => 'multiple_key', // duplicatvie + MYSQLI_GROUP_FLAG => 'group_by' + ); + + /** + * Array for converting MYSQLI_TYPE_* constants to text values + * @var array + * @access public + * @since Property available since Release 1.6.5 + */ + var $mysqli_types = array( + MYSQLI_TYPE_DECIMAL => 'decimal', + MYSQLI_TYPE_TINY => 'tinyint', + MYSQLI_TYPE_SHORT => 'int', + MYSQLI_TYPE_LONG => 'int', + MYSQLI_TYPE_FLOAT => 'float', + MYSQLI_TYPE_DOUBLE => 'double', + // MYSQLI_TYPE_NULL => 'DEFAULT NULL', // let flags handle it + MYSQLI_TYPE_TIMESTAMP => 'timestamp', + MYSQLI_TYPE_LONGLONG => 'bigint', + MYSQLI_TYPE_INT24 => 'mediumint', + MYSQLI_TYPE_DATE => 'date', + MYSQLI_TYPE_TIME => 'time', + MYSQLI_TYPE_DATETIME => 'datetime', + MYSQLI_TYPE_YEAR => 'year', + MYSQLI_TYPE_NEWDATE => 'date', + MYSQLI_TYPE_ENUM => 'enum', + MYSQLI_TYPE_SET => 'set', + MYSQLI_TYPE_TINY_BLOB => 'tinyblob', + MYSQLI_TYPE_MEDIUM_BLOB => 'mediumblob', + MYSQLI_TYPE_LONG_BLOB => 'longblob', + MYSQLI_TYPE_BLOB => 'blob', + MYSQLI_TYPE_VAR_STRING => 'varchar', + MYSQLI_TYPE_STRING => 'char', + MYSQLI_TYPE_GEOMETRY => 'geometry', + ); + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_mysqli() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * PEAR DB's mysqli driver supports the following extra DSN options: + * + When the 'ssl' $option passed to DB::connect() is true: + * + key The path to the key file. + * + cert The path to the certificate file. + * + ca The path to the certificate authority file. + * + capath The path to a directory that contains trusted SSL + * CA certificates in pem format. + * + cipher The list of allowable ciphers for SSL encryption. + * + * Example of how to connect using SSL: + * + * require_once 'DB.php'; + * + * $dsn = array( + * 'phptype' => 'mysqli', + * 'username' => 'someuser', + * 'password' => 'apasswd', + * 'hostspec' => 'localhost', + * 'database' => 'thedb', + * 'key' => 'client-key.pem', + * 'cert' => 'client-cert.pem', + * 'ca' => 'cacert.pem', + * 'capath' => '/path/to/ca/dir', + * 'cipher' => 'AES', + * ); + * + * $options = array( + * 'ssl' => true, + * ); + * + * $db =& DB::connect($dsn, $options); + * if (PEAR::isError($db)) { + * die($db->getMessage()); + * } + * + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('mysqli')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + $ini = ini_get('track_errors'); + ini_set('track_errors', 1); + $php_errormsg = ''; + + if ($this->getOption('ssl') === true) { + $init = mysqli_init(); + mysqli_ssl_set( + $init, + empty($dsn['key']) ? null : $dsn['key'], + empty($dsn['cert']) ? null : $dsn['cert'], + empty($dsn['ca']) ? null : $dsn['ca'], + empty($dsn['capath']) ? null : $dsn['capath'], + empty($dsn['cipher']) ? null : $dsn['cipher'] + ); + if ($this->connection = @mysqli_real_connect( + $init, + $dsn['hostspec'], + $dsn['username'], + $dsn['password'], + $dsn['database'], + $dsn['port'], + $dsn['socket'])) + { + $this->connection = $init; + } + } else { + $this->connection = @mysqli_connect( + $dsn['hostspec'], + $dsn['username'], + $dsn['password'], + $dsn['database'], + $dsn['port'], + $dsn['socket'] + ); + } + + ini_set('track_errors', $ini); + + if (!$this->connection) { + if (($err = @mysqli_connect_error()) != '') { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $err); + } else { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $php_errormsg); + } + } + + if ($dsn['database']) { + $this->_db = $dsn['database']; + } + + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @mysqli_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $ismanip = DB::isManip($query); + $this->last_query = $query; + $query = $this->modifyQuery($query); + if ($this->_db) { + if (!@mysqli_select_db($this->connection, $this->_db)) { + return $this->mysqliRaiseError(DB_ERROR_NODBSELECTED); + } + } + if (!$this->autocommit && $ismanip) { + if ($this->transaction_opcount == 0) { + $result = @mysqli_query($this->connection, 'SET AUTOCOMMIT=0'); + $result = @mysqli_query($this->connection, 'BEGIN'); + if (!$result) { + return $this->mysqliRaiseError(); + } + } + $this->transaction_opcount++; + } + $result = @mysqli_query($this->connection, $query); + if (!$result) { + return $this->mysqliRaiseError(); + } + if (is_object($result)) { + return $result; + } + return DB_OK; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal mysql result pointer to the next available result. + * + * This method has not been implemented yet. + * + * @param resource $result a valid sql result resource + * @return false + * @access public + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + if (!@mysqli_data_seek($result, $rownum)) { + return null; + } + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $arr = @mysqli_fetch_array($result, MYSQLI_ASSOC); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @mysqli_fetch_row($result); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + /* + * Even though this DBMS already trims output, we do this because + * a field might have intentional whitespace at the end that + * gets removed by DB_PORTABILITY_RTRIM under another driver. + */ + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @mysqli_free_result($result); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @mysqli_num_fields($result); + if (!$cols) { + return $this->mysqliRaiseError(); + } + return $cols; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $rows = @mysqli_num_rows($result); + if ($rows === null) { + return $this->mysqliRaiseError(); + } + return $rows; + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + // XXX if $this->transaction_opcount > 0, we should probably + // issue a warning here. + $this->autocommit = $onoff ? true : false; + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + if ($this->transaction_opcount > 0) { + if ($this->_db) { + if (!@mysqli_select_db($this->connection, $this->_db)) { + return $this->mysqliRaiseError(DB_ERROR_NODBSELECTED); + } + } + $result = @mysqli_query($this->connection, 'COMMIT'); + $result = @mysqli_query($this->connection, 'SET AUTOCOMMIT=1'); + $this->transaction_opcount = 0; + if (!$result) { + return $this->mysqliRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + if ($this->transaction_opcount > 0) { + if ($this->_db) { + if (!@mysqli_select_db($this->connection, $this->_db)) { + return $this->mysqliRaiseError(DB_ERROR_NODBSELECTED); + } + } + $result = @mysqli_query($this->connection, 'ROLLBACK'); + $result = @mysqli_query($this->connection, 'SET AUTOCOMMIT=1'); + $this->transaction_opcount = 0; + if (!$result) { + return $this->mysqliRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (DB::isManip($this->last_query)) { + return @mysqli_affected_rows($this->connection); + } else { + return 0; + } + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_mysqli::createSequence(), DB_mysqli::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + do { + $repeat = 0; + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->query('UPDATE ' . $seqname + . ' SET id = LAST_INSERT_ID(id + 1)'); + $this->popErrorHandling(); + if ($result === DB_OK) { + // COMMON CASE + $id = @mysqli_insert_id($this->connection); + if ($id != 0) { + return $id; + } + + // EMPTY SEQ TABLE + // Sequence table must be empty for some reason, + // so fill it and return 1 + // Obtain a user-level lock + $result = $this->getOne('SELECT GET_LOCK(' + . "'${seqname}_lock', 10)"); + if (DB::isError($result)) { + return $this->raiseError($result); + } + if ($result == 0) { + return $this->mysqliRaiseError(DB_ERROR_NOT_LOCKED); + } + + // add the default value + $result = $this->query('REPLACE INTO ' . $seqname + . ' (id) VALUES (0)'); + if (DB::isError($result)) { + return $this->raiseError($result); + } + + // Release the lock + $result = $this->getOne('SELECT RELEASE_LOCK(' + . "'${seqname}_lock')"); + if (DB::isError($result)) { + return $this->raiseError($result); + } + // We know what the result will be, so no need to try again + return 1; + + } elseif ($ondemand && DB::isError($result) && + $result->getCode() == DB_ERROR_NOSUCHTABLE) + { + // ONDEMAND TABLE CREATION + $result = $this->createSequence($seq_name); + + // Since createSequence initializes the ID to be 1, + // we do not need to retrieve the ID again (or we will get 2) + if (DB::isError($result)) { + return $this->raiseError($result); + } else { + // First ID of a newly created sequence is 1 + return 1; + } + + } elseif (DB::isError($result) && + $result->getCode() == DB_ERROR_ALREADY_EXISTS) + { + // BACKWARDS COMPAT + // see _BCsequence() comment + $result = $this->_BCsequence($seqname); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $repeat = 1; + } + } while ($repeat); + + return $this->raiseError($result); + } + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_mysqli::nextID(), DB_mysqli::dropSequence() + */ + function createSequence($seq_name) + { + $seqname = $this->getSequenceName($seq_name); + $res = $this->query('CREATE TABLE ' . $seqname + . ' (id INTEGER UNSIGNED AUTO_INCREMENT NOT NULL,' + . ' PRIMARY KEY(id))'); + if (DB::isError($res)) { + return $res; + } + // insert yields value 1, nextId call will generate ID 2 + return $this->query("INSERT INTO ${seqname} (id) VALUES (0)"); + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_mysql::nextID(), DB_mysql::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP TABLE ' . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ _BCsequence() + + /** + * Backwards compatibility with old sequence emulation implementation + * (clean up the dupes) + * + * @param string $seqname the sequence name to clean up + * + * @return bool true on success. A DB_Error object on failure. + * + * @access private + */ + function _BCsequence($seqname) + { + // Obtain a user-level lock... this will release any previous + // application locks, but unlike LOCK TABLES, it does not abort + // the current transaction and is much less frequently used. + $result = $this->getOne("SELECT GET_LOCK('${seqname}_lock',10)"); + if (DB::isError($result)) { + return $result; + } + if ($result == 0) { + // Failed to get the lock, can't do the conversion, bail + // with a DB_ERROR_NOT_LOCKED error + return $this->mysqliRaiseError(DB_ERROR_NOT_LOCKED); + } + + $highest_id = $this->getOne("SELECT MAX(id) FROM ${seqname}"); + if (DB::isError($highest_id)) { + return $highest_id; + } + + // This should kill all rows except the highest + // We should probably do something if $highest_id isn't + // numeric, but I'm at a loss as how to handle that... + $result = $this->query('DELETE FROM ' . $seqname + . " WHERE id <> $highest_id"); + if (DB::isError($result)) { + return $result; + } + + // If another thread has been waiting for this lock, + // it will go thru the above procedure, but will have no + // real effect + $result = $this->getOne("SELECT RELEASE_LOCK('${seqname}_lock')"); + if (DB::isError($result)) { + return $result; + } + return true; + } + + // }}} + // {{{ quoteIdentifier() + + /** + * Quotes a string so it can be safely used as a table or column name + * + * MySQL can't handle the backtick character (`) in + * table or column names. + * + * @param string $str identifier name to be quoted + * + * @return string quoted identifier string + * + * @see DB_common::quoteIdentifier() + * @since Method available since Release 1.6.0 + */ + function quoteIdentifier($str) + { + return '`' . $str . '`'; + } + + // }}} + // {{{ escapeSimple() + + /** + * Escapes a string according to the current DBMS's standards + * + * @param string $str the string to be escaped + * + * @return string the escaped string + * + * @see DB_common::quoteSmart() + * @since Method available since Release 1.6.0 + */ + function escapeSimple($str) + { + return @mysqli_real_escape_string($this->connection, $str); + } + + // }}} + // {{{ modifyLimitQuery() + + /** + * Adds LIMIT clauses to a query string according to current DBMS standards + * + * @param string $query the query to modify + * @param int $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return string the query string with LIMIT clauses added + * + * @access protected + */ + function modifyLimitQuery($query, $from, $count, $params = array()) + { + if (DB::isManip($query)) { + return $query . " LIMIT $count"; + } else { + return $query . " LIMIT $from, $count"; + } + } + + // }}} + // {{{ mysqliRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_mysqli::errorNative(), DB_common::errorCode() + */ + function mysqliRaiseError($errno = null) + { + if ($errno === null) { + if ($this->options['portability'] & DB_PORTABILITY_ERRORS) { + $this->errorcode_map[1022] = DB_ERROR_CONSTRAINT; + $this->errorcode_map[1048] = DB_ERROR_CONSTRAINT_NOT_NULL; + $this->errorcode_map[1062] = DB_ERROR_CONSTRAINT; + } else { + // Doing this in case mode changes during runtime. + $this->errorcode_map[1022] = DB_ERROR_ALREADY_EXISTS; + $this->errorcode_map[1048] = DB_ERROR_CONSTRAINT; + $this->errorcode_map[1062] = DB_ERROR_ALREADY_EXISTS; + } + $errno = $this->errorCode(mysqli_errno($this->connection)); + } + return $this->raiseError($errno, null, null, null, + @mysqli_errno($this->connection) . ' ** ' . + @mysqli_error($this->connection)); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code produced by the last query + * + * @return int the DBMS' error code + */ + function errorNative() + { + return @mysqli_errno($this->connection); + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::setOption() + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @mysqli_query($this->connection, + "SELECT * FROM $result LIMIT 0"); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_a($id, 'mysqli_result')) { + return $this->mysqliRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @mysqli_num_fields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $tmp = @mysqli_fetch_field($id); + + $flags = ''; + foreach ($this->mysqli_flags as $const => $means) { + if ($tmp->flags & $const) { + $flags .= $means . ' '; + } + } + if ($tmp->def) { + $flags .= 'default_' . rawurlencode($tmp->def); + } + $flags = trim($flags); + + $res[$i] = array( + 'table' => $case_func($tmp->table), + 'name' => $case_func($tmp->name), + 'type' => isset($this->mysqli_types[$tmp->type]) + ? $this->mysqli_types[$tmp->type] + : 'unknown', + 'len' => $tmp->max_length, + 'flags' => $flags, + ); + + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @mysqli_free_result($id); + } + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return 'SHOW TABLES'; + case 'users': + return 'SELECT DISTINCT User FROM mysql.user'; + case 'databases': + return 'SHOW DATABASES'; + default: + return null; + } + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/oci8.php b/campcaster/src/tools/pear/src/DB/oci8.php new file mode 100644 index 000000000..38c16a0e1 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/oci8.php @@ -0,0 +1,1117 @@ + + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: oci8.php,v 1.103 2005/04/11 15:10:22 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's oci8 extension + * for interacting with Oracle databases + * + * Definitely works with versions 8 and 9 of Oracle. + * + * These methods overload the ones declared in DB_common. + * + * Be aware... OCIError() only appears to return anything when given a + * statement, so functions return the generic DB_ERROR instead of more + * useful errors that have to do with feedback from the database. + * + * @category Database + * @package DB + * @author James L. Pine + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_oci8 extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'oci8'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'oci8'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'alter', + 'new_link' => '5.0.0', + 'numrows' => 'subquery', + 'pconnect' => true, + 'prepare' => true, + 'ssl' => false, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + 1 => DB_ERROR_CONSTRAINT, + 900 => DB_ERROR_SYNTAX, + 904 => DB_ERROR_NOSUCHFIELD, + 913 => DB_ERROR_VALUE_COUNT_ON_ROW, + 921 => DB_ERROR_SYNTAX, + 923 => DB_ERROR_SYNTAX, + 942 => DB_ERROR_NOSUCHTABLE, + 955 => DB_ERROR_ALREADY_EXISTS, + 1400 => DB_ERROR_CONSTRAINT_NOT_NULL, + 1401 => DB_ERROR_INVALID, + 1407 => DB_ERROR_CONSTRAINT_NOT_NULL, + 1418 => DB_ERROR_NOT_FOUND, + 1476 => DB_ERROR_DIVZERO, + 1722 => DB_ERROR_INVALID_NUMBER, + 2289 => DB_ERROR_NOSUCHTABLE, + 2291 => DB_ERROR_CONSTRAINT, + 2292 => DB_ERROR_CONSTRAINT, + 2449 => DB_ERROR_CONSTRAINT, + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * Should data manipulation queries be committed automatically? + * @var bool + * @access private + */ + var $autocommit = true; + + /** + * Stores the $data passed to execute() in the oci8 driver + * + * Gets reset to array() when simpleQuery() is run. + * + * Needed in case user wants to call numRows() after prepare/execute + * was used. + * + * @var array + * @access private + */ + var $_data = array(); + + /** + * The result or statement handle from the most recently executed query + * @var resource + */ + var $last_stmt; + + /** + * Is the given prepared statement a data manipulation query? + * @var array + * @access private + */ + var $manip_query = array(); + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_oci8() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * If PHP is at version 5.0.0 or greater: + * + Generally, oci_connect() or oci_pconnect() are used. + * + But if the new_link DSN option is set to true, oci_new_connect() + * is used. + * + * When using PHP version 4.x, OCILogon() or OCIPLogon() are used. + * + * PEAR DB's oci8 driver supports the following extra DSN options: + * + charset The character set to be used on the connection. + * Only used if PHP is at version 5.0.0 or greater + * and the Oracle server is at 9.2 or greater. + * Available since PEAR DB 1.7.0. + * + new_link If set to true, causes subsequent calls to + * connect() to return a new connection link + * instead of the existing one. WARNING: this is + * not portable to other DBMS's. + * Available since PEAR DB 1.7.0. + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('oci8')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + if (function_exists('oci_connect')) { + if (isset($dsn['new_link']) + && ($dsn['new_link'] == 'true' || $dsn['new_link'] === true)) + { + $connect_function = 'oci_new_connect'; + } else { + $connect_function = $persistent ? 'oci_pconnect' + : 'oci_connect'; + } + + // Backwards compatibility with DB < 1.7.0 + if (empty($dsn['database']) && !empty($dsn['hostspec'])) { + $db = $dsn['hostspec']; + } else { + $db = $dsn['database']; + } + + $char = empty($dsn['charset']) ? null : $dsn['charset']; + $this->connection = @$connect_function($dsn['username'], + $dsn['password'], + $db, + $char); + $error = OCIError(); + if (!empty($error) && $error['code'] == 12541) { + // Couldn't find TNS listener. Try direct connection. + $this->connection = @$connect_function($dsn['username'], + $dsn['password'], + null, + $char); + } + } else { + $connect_function = $persistent ? 'OCIPLogon' : 'OCILogon'; + if ($dsn['hostspec']) { + $this->connection = @$connect_function($dsn['username'], + $dsn['password'], + $dsn['hostspec']); + } elseif ($dsn['username'] || $dsn['password']) { + $this->connection = @$connect_function($dsn['username'], + $dsn['password']); + } + } + + if (!$this->connection) { + $error = OCIError(); + $error = (is_array($error)) ? $error['message'] : null; + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $error); + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + if (function_exists('oci_close')) { + $ret = @oci_close($this->connection); + } else { + $ret = @OCILogOff($this->connection); + } + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * To determine how many rows of a result set get buffered using + * ocisetprefetch(), see the "result_buffering" option in setOptions(). + * This option was added in Release 1.7.0. + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $this->_data = array(); + $this->last_parameters = array(); + $this->last_query = $query; + $query = $this->modifyQuery($query); + $result = @OCIParse($this->connection, $query); + if (!$result) { + return $this->oci8RaiseError(); + } + if ($this->autocommit) { + $success = @OCIExecute($result,OCI_COMMIT_ON_SUCCESS); + } else { + $success = @OCIExecute($result,OCI_DEFAULT); + } + if (!$success) { + return $this->oci8RaiseError($result); + } + $this->last_stmt = $result; + if (DB::isManip($query)) { + return DB_OK; + } else { + @ocisetprefetch($result, $this->options['result_buffering']); + return $result; + } + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal oracle result pointer to the next available result + * + * @param a valid oci8 result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $moredata = @OCIFetchInto($result,$arr,OCI_ASSOC+OCI_RETURN_NULLS+OCI_RETURN_LOBS); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && + $moredata) + { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $moredata = OCIFetchInto($result,$arr,OCI_RETURN_NULLS+OCI_RETURN_LOBS); + } + if (!$moredata) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @OCIFreeStatement($result); + } + + /** + * Frees the internal resources associated with a prepared query + * + * @param resource $stmt the prepared statement's resource + * @param bool $free_resource should the PHP resource be freed too? + * Use false if you need to get data + * from the result set later. + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_oci8::prepare() + */ + function freePrepared($stmt, $free_resource = true) + { + if (!is_resource($stmt)) { + return false; + } + if ($free_resource) { + @ocifreestatement($stmt); + } + if (isset($this->prepare_types[(int)$stmt])) { + unset($this->prepare_types[(int)$stmt]); + unset($this->manip_query[(int)$stmt]); + } else { + return false; + } + return true; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * Only works if the DB_PORTABILITY_NUMROWS portability option + * is turned on. + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows(), DB_common::setOption() + */ + function numRows($result) + { + // emulate numRows for Oracle. yuck. + if ($this->options['portability'] & DB_PORTABILITY_NUMROWS && + $result === $this->last_stmt) + { + $countquery = 'SELECT COUNT(*) FROM ('.$this->last_query.')'; + $save_query = $this->last_query; + $save_stmt = $this->last_stmt; + + if (count($this->_data)) { + $smt = $this->prepare('SELECT COUNT(*) FROM ('.$this->last_query.')'); + $count = $this->execute($smt, $this->_data); + } else { + $count =& $this->query($countquery); + } + + if (DB::isError($count) || + DB::isError($row = $count->fetchRow(DB_FETCHMODE_ORDERED))) + { + $this->last_query = $save_query; + $this->last_stmt = $save_stmt; + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + return $row[0]; + } + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @OCINumCols($result); + if (!$cols) { + return $this->oci8RaiseError($result); + } + return $cols; + } + + // }}} + // {{{ prepare() + + /** + * Prepares a query for multiple execution with execute(). + * + * With oci8, this is emulated. + * + * prepare() requires a generic query as string like + * INSERT INTO numbers VALUES (?, ?, ?) + * . The ? characters are placeholders. + * + * Three types of placeholders can be used: + * + ? a quoted scalar value, i.e. strings, integers + * + ! value is inserted 'as is' + * + & requires a file name. The file's contents get + * inserted into the query (i.e. saving binary + * data in a db) + * + * Use backslashes to escape placeholder characters if you don't want + * them to be interpreted as placeholders. Example: + * "UPDATE foo SET col=? WHERE col='over \& under'" + * + * + * @param string $query the query to be prepared + * + * @return mixed DB statement resource on success. DB_Error on failure. + * + * @see DB_oci8::execute() + */ + function prepare($query) + { + $tokens = preg_split('/((? $val) { + switch ($val) { + case '?': + $types[$token++] = DB_PARAM_SCALAR; + unset($tokens[$key]); + break; + case '&': + $types[$token++] = DB_PARAM_OPAQUE; + unset($tokens[$key]); + break; + case '!': + $types[$token++] = DB_PARAM_MISC; + unset($tokens[$key]); + break; + default: + $tokens[$key] = preg_replace('/\\\([&?!])/', "\\1", $val); + if ($key != $binds) { + $newquery .= $tokens[$key] . ':bind' . $token; + } else { + $newquery .= $tokens[$key]; + } + } + } + + $this->last_query = $query; + $newquery = $this->modifyQuery($newquery); + if (!$stmt = @OCIParse($this->connection, $newquery)) { + return $this->oci8RaiseError(); + } + $this->prepare_types[(int)$stmt] = $types; + $this->manip_query[(int)$stmt] = DB::isManip($query); + return $stmt; + } + + // }}} + // {{{ execute() + + /** + * Executes a DB statement prepared with prepare(). + * + * To determine how many rows of a result set get buffered using + * ocisetprefetch(), see the "result_buffering" option in setOptions(). + * This option was added in Release 1.7.0. + * + * @param resource $stmt a DB statement resource returned from prepare() + * @param mixed $data array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 for non-array items or the + * quantity of elements in the array. + * + * @return mixed returns an oic8 result resource for successful SELECT + * queries, DB_OK for other successful queries. + * A DB error object is returned on failure. + * + * @see DB_oci8::prepare() + */ + function &execute($stmt, $data = array()) + { + $data = (array)$data; + $this->last_parameters = $data; + $this->_data = $data; + + $types =& $this->prepare_types[(int)$stmt]; + if (count($types) != count($data)) { + $tmp =& $this->raiseError(DB_ERROR_MISMATCH); + return $tmp; + } + + $i = 0; + foreach ($data as $key => $value) { + if ($types[$i] == DB_PARAM_MISC) { + /* + * Oracle doesn't seem to have the ability to pass a + * parameter along unchanged, so strip off quotes from start + * and end, plus turn two single quotes to one single quote, + * in order to avoid the quotes getting escaped by + * Oracle and ending up in the database. + */ + $data[$key] = preg_replace("/^'(.*)'$/", "\\1", $data[$key]); + $data[$key] = str_replace("''", "'", $data[$key]); + } elseif ($types[$i] == DB_PARAM_OPAQUE) { + $fp = @fopen($data[$key], 'rb'); + if (!$fp) { + $tmp =& $this->raiseError(DB_ERROR_ACCESS_VIOLATION); + return $tmp; + } + $data[$key] = fread($fp, filesize($data[$key])); + fclose($fp); + } + if (!@OCIBindByName($stmt, ':bind' . $i, $data[$key], -1)) { + $tmp = $this->oci8RaiseError($stmt); + return $tmp; + } + $i++; + } + if ($this->autocommit) { + $success = @OCIExecute($stmt, OCI_COMMIT_ON_SUCCESS); + } else { + $success = @OCIExecute($stmt, OCI_DEFAULT); + } + if (!$success) { + $tmp = $this->oci8RaiseError($stmt); + return $tmp; + } + $this->last_stmt = $stmt; + if ($this->manip_query[(int)$stmt]) { + $tmp = DB_OK; + } else { + @ocisetprefetch($stmt, $this->options['result_buffering']); + $tmp =& new DB_result($this, $stmt); + } + return $tmp; + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + $this->autocommit = (bool)$onoff;; + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + $result = @OCICommit($this->connection); + if (!$result) { + return $this->oci8RaiseError(); + } + return DB_OK; + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + $result = @OCIRollback($this->connection); + if (!$result) { + return $this->oci8RaiseError(); + } + return DB_OK; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if ($this->last_stmt === false) { + return $this->oci8RaiseError(); + } + $result = @OCIRowCount($this->last_stmt); + if ($result === false) { + return $this->oci8RaiseError($this->last_stmt); + } + return $result; + } + + // }}} + // {{{ modifyQuery() + + /** + * Changes a query string for various DBMS specific reasons + * + * "SELECT 2+2" must be "SELECT 2+2 FROM dual" in Oracle. + * + * @param string $query the query string to modify + * + * @return string the modified query string + * + * @access protected + */ + function modifyQuery($query) + { + if (preg_match('/^\s*SELECT/i', $query) && + !preg_match('/\sFROM\s/i', $query)) { + $query .= ' FROM dual'; + } + return $query; + } + + // }}} + // {{{ modifyLimitQuery() + + /** + * Adds LIMIT clauses to a query string according to current DBMS standards + * + * @param string $query the query to modify + * @param int $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return string the query string with LIMIT clauses added + * + * @access protected + */ + function modifyLimitQuery($query, $from, $count, $params = array()) + { + // Let Oracle return the name of the columns instead of + // coding a "home" SQL parser + + if (count($params)) { + $result = $this->prepare("SELECT * FROM ($query) " + . 'WHERE NULL = NULL'); + $tmp =& $this->execute($result, $params); + } else { + $q_fields = "SELECT * FROM ($query) WHERE NULL = NULL"; + + if (!$result = @OCIParse($this->connection, $q_fields)) { + $this->last_query = $q_fields; + return $this->oci8RaiseError(); + } + if (!@OCIExecute($result, OCI_DEFAULT)) { + $this->last_query = $q_fields; + return $this->oci8RaiseError($result); + } + } + + $ncols = OCINumCols($result); + $cols = array(); + for ( $i = 1; $i <= $ncols; $i++ ) { + $cols[] = '"' . OCIColumnName($result, $i) . '"'; + } + $fields = implode(', ', $cols); + // XXX Test that (tip by John Lim) + //if (preg_match('/^\s*SELECT\s+/is', $query, $match)) { + // // Introduce the FIRST_ROWS Oracle query optimizer + // $query = substr($query, strlen($match[0]), strlen($query)); + // $query = "SELECT /* +FIRST_ROWS */ " . $query; + //} + + // Construct the query + // more at: http://marc.theaimsgroup.com/?l=php-db&m=99831958101212&w=2 + // Perhaps this could be optimized with the use of Unions + $query = "SELECT $fields FROM". + " (SELECT rownum as linenum, $fields FROM". + " ($query)". + ' WHERE rownum <= '. ($from + $count) . + ') WHERE linenum >= ' . ++$from; + return $query; + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_oci8::createSequence(), DB_oci8::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + $repeat = 0; + do { + $this->expectError(DB_ERROR_NOSUCHTABLE); + $result =& $this->query("SELECT ${seqname}.nextval FROM dual"); + $this->popExpect(); + if ($ondemand && DB::isError($result) && + $result->getCode() == DB_ERROR_NOSUCHTABLE) { + $repeat = 1; + $result = $this->createSequence($seq_name); + if (DB::isError($result)) { + return $this->raiseError($result); + } + } else { + $repeat = 0; + } + } while ($repeat); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $arr = $result->fetchRow(DB_FETCHMODE_ORDERED); + return $arr[0]; + } + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_oci8::nextID(), DB_oci8::dropSequence() + */ + function createSequence($seq_name) + { + return $this->query('CREATE SEQUENCE ' + . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_oci8::nextID(), DB_oci8::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP SEQUENCE ' + . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ oci8RaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_oci8::errorNative(), DB_oci8::errorCode() + */ + function oci8RaiseError($errno = null) + { + if ($errno === null) { + $error = @OCIError($this->connection); + return $this->raiseError($this->errorCode($error['code']), + null, null, null, $error['message']); + } elseif (is_resource($errno)) { + $error = @OCIError($errno); + return $this->raiseError($this->errorCode($error['code']), + null, null, null, $error['message']); + } + return $this->raiseError($this->errorCode($errno)); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code produced by the last query + * + * @return int the DBMS' error code. FALSE if the code could not be + * determined + */ + function errorNative() + { + if (is_resource($this->last_stmt)) { + $error = @OCIError($this->last_stmt); + } else { + $error = @OCIError($this->connection); + } + if (is_array($error)) { + return $error['code']; + } + return false; + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * NOTE: only supports 'table' and 'flags' if $result + * is a table name. + * + * NOTE: flags won't contain index information. + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + */ + function tableInfo($result, $mode = null) + { + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $res = array(); + + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $result = strtoupper($result); + $q_fields = 'SELECT column_name, data_type, data_length, ' + . 'nullable ' + . 'FROM user_tab_columns ' + . "WHERE table_name='$result' ORDER BY column_id"; + + $this->last_query = $q_fields; + + if (!$stmt = @OCIParse($this->connection, $q_fields)) { + return $this->oci8RaiseError(DB_ERROR_NEED_MORE_DATA); + } + if (!@OCIExecute($stmt, OCI_DEFAULT)) { + return $this->oci8RaiseError($stmt); + } + + $i = 0; + while (@OCIFetch($stmt)) { + $res[$i] = array( + 'table' => $case_func($result), + 'name' => $case_func(@OCIResult($stmt, 1)), + 'type' => @OCIResult($stmt, 2), + 'len' => @OCIResult($stmt, 3), + 'flags' => (@OCIResult($stmt, 4) == 'N') ? 'not_null' : '', + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + $i++; + } + + if ($mode) { + $res['num_fields'] = $i; + } + @OCIFreeStatement($stmt); + + } else { + if (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $result = $result->result; + } + + $res = array(); + + if ($result === $this->last_stmt) { + $count = @OCINumCols($result); + if ($mode) { + $res['num_fields'] = $count; + } + for ($i = 0; $i < $count; $i++) { + $res[$i] = array( + 'table' => '', + 'name' => $case_func(@OCIColumnName($result, $i+1)), + 'type' => @OCIColumnType($result, $i+1), + 'len' => @OCIColumnSize($result, $i+1), + 'flags' => '', + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + } else { + return $this->raiseError(DB_ERROR_NOT_CAPABLE); + } + } + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return 'SELECT table_name FROM user_tables'; + case 'synonyms': + return 'SELECT synonym_name FROM user_synonyms'; + default: + return null; + } + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/odbc.php b/campcaster/src/tools/pear/src/DB/odbc.php new file mode 100644 index 000000000..36885701f --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/odbc.php @@ -0,0 +1,883 @@ + + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: odbc.php,v 1.78 2005/02/28 01:42:17 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's odbc extension + * for interacting with databases via ODBC connections + * + * These methods overload the ones declared in DB_common. + * + * More info on ODBC errors could be found here: + * http://msdn.microsoft.com/library/default.asp?url=/library/en-us/trblsql/tr_err_odbc_5stz.asp + * + * @category Database + * @package DB + * @author Stig Bakken + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_odbc extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'odbc'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'sql92'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * NOTE: The feature set of the following drivers are different than + * the default: + * + solid: 'transactions' = true + * + navision: 'limit' = false + * + * @var array + */ + var $features = array( + 'limit' => 'emulate', + 'new_link' => false, + 'numrows' => true, + 'pconnect' => true, + 'prepare' => false, + 'ssl' => false, + 'transactions' => false, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + '01004' => DB_ERROR_TRUNCATED, + '07001' => DB_ERROR_MISMATCH, + '21S01' => DB_ERROR_VALUE_COUNT_ON_ROW, + '21S02' => DB_ERROR_MISMATCH, + '22001' => DB_ERROR_INVALID, + '22003' => DB_ERROR_INVALID_NUMBER, + '22005' => DB_ERROR_INVALID_NUMBER, + '22008' => DB_ERROR_INVALID_DATE, + '22012' => DB_ERROR_DIVZERO, + '23000' => DB_ERROR_CONSTRAINT, + '23502' => DB_ERROR_CONSTRAINT_NOT_NULL, + '23503' => DB_ERROR_CONSTRAINT, + '23504' => DB_ERROR_CONSTRAINT, + '23505' => DB_ERROR_CONSTRAINT, + '24000' => DB_ERROR_INVALID, + '34000' => DB_ERROR_INVALID, + '37000' => DB_ERROR_SYNTAX, + '42000' => DB_ERROR_SYNTAX, + '42601' => DB_ERROR_SYNTAX, + 'IM001' => DB_ERROR_UNSUPPORTED, + 'S0000' => DB_ERROR_NOSUCHTABLE, + 'S0001' => DB_ERROR_ALREADY_EXISTS, + 'S0002' => DB_ERROR_NOSUCHTABLE, + 'S0011' => DB_ERROR_ALREADY_EXISTS, + 'S0012' => DB_ERROR_NOT_FOUND, + 'S0021' => DB_ERROR_ALREADY_EXISTS, + 'S0022' => DB_ERROR_NOSUCHFIELD, + 'S1009' => DB_ERROR_INVALID, + 'S1090' => DB_ERROR_INVALID, + 'S1C00' => DB_ERROR_NOT_CAPABLE, + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * The number of rows affected by a data manipulation query + * @var integer + * @access private + */ + var $affected = 0; + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_odbc() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * PEAR DB's odbc driver supports the following extra DSN options: + * + cursor The type of cursor to be used for this connection. + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('odbc')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + switch ($this->dbsyntax) { + case 'access': + case 'db2': + case 'solid': + $this->features['transactions'] = true; + break; + case 'navision': + $this->features['limit'] = false; + } + + /* + * This is hear for backwards compatibility. Should have been using + * 'database' all along, but prior to 1.6.0RC3 'hostspec' was used. + */ + if ($dsn['database']) { + $odbcdsn = $dsn['database']; + } elseif ($dsn['hostspec']) { + $odbcdsn = $dsn['hostspec']; + } else { + $odbcdsn = 'localhost'; + } + + $connect_function = $persistent ? 'odbc_pconnect' : 'odbc_connect'; + + if (empty($dsn['cursor'])) { + $this->connection = @$connect_function($odbcdsn, $dsn['username'], + $dsn['password']); + } else { + $this->connection = @$connect_function($odbcdsn, $dsn['username'], + $dsn['password'], + $dsn['cursor']); + } + + if (!is_resource($this->connection)) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $this->errorNative()); + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $err = @odbc_close($this->connection); + $this->connection = null; + return $err; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $this->last_query = $query; + $query = $this->modifyQuery($query); + $result = @odbc_exec($this->connection, $query); + if (!$result) { + return $this->odbcRaiseError(); // XXX ERRORMSG + } + // Determine which queries that should return data, and which + // should return an error code only. + if (DB::isManip($query)) { + $this->affected = $result; // For affectedRows() + return DB_OK; + } + $this->affected = 0; + return $result; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal odbc result pointer to the next available result + * + * @param a valid fbsql result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return @odbc_next_result($result); + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + $arr = array(); + if ($rownum !== null) { + $rownum++; // ODBC first row is 1 + if (version_compare(phpversion(), '4.2.0', 'ge')) { + $cols = @odbc_fetch_into($result, $arr, $rownum); + } else { + $cols = @odbc_fetch_into($result, $rownum, $arr); + } + } else { + $cols = @odbc_fetch_into($result, $arr); + } + if (!$cols) { + return null; + } + if ($fetchmode !== DB_FETCHMODE_ORDERED) { + for ($i = 0; $i < count($arr); $i++) { + $colName = @odbc_field_name($result, $i+1); + $a[$colName] = $arr[$i]; + } + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $a = array_change_key_case($a, CASE_LOWER); + } + $arr = $a; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @odbc_free_result($result); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @odbc_num_fields($result); + if (!$cols) { + return $this->odbcRaiseError(); + } + return $cols; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (empty($this->affected)) { // In case of SELECT stms + return 0; + } + $nrows = @odbc_num_rows($this->affected); + if ($nrows == -1) { + return $this->odbcRaiseError(); + } + return $nrows; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * Not all ODBC drivers support this functionality. If they don't + * a DB_Error object for DB_ERROR_UNSUPPORTED is returned. + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $nrows = @odbc_num_rows($result); + if ($nrows == -1) { + return $this->odbcRaiseError(DB_ERROR_UNSUPPORTED); + } + if ($nrows === false) { + return $this->odbcRaiseError(); + } + return $nrows; + } + + // }}} + // {{{ quoteIdentifier() + + /** + * Quotes a string so it can be safely used as a table or column name + * + * Use 'mssql' as the dbsyntax in the DB DSN only if you've unchecked + * "Use ANSI quoted identifiers" when setting up the ODBC data source. + * + * @param string $str identifier name to be quoted + * + * @return string quoted identifier string + * + * @see DB_common::quoteIdentifier() + * @since Method available since Release 1.6.0 + */ + function quoteIdentifier($str) + { + switch ($this->dsn['dbsyntax']) { + case 'access': + return '[' . $str . ']'; + case 'mssql': + case 'sybase': + return '[' . str_replace(']', ']]', $str) . ']'; + case 'mysql': + case 'mysqli': + return '`' . $str . '`'; + default: + return '"' . str_replace('"', '""', $str) . '"'; + } + } + + // }}} + // {{{ quote() + + /** + * @deprecated Deprecated in release 1.6.0 + * @internal + */ + function quote($str) + { + return $this->quoteSmart($str); + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_odbc::createSequence(), DB_odbc::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + $repeat = 0; + do { + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->query("update ${seqname} set id = id + 1"); + $this->popErrorHandling(); + if ($ondemand && DB::isError($result) && + $result->getCode() == DB_ERROR_NOSUCHTABLE) { + $repeat = 1; + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->createSequence($seq_name); + $this->popErrorHandling(); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $result = $this->query("insert into ${seqname} (id) values(0)"); + } else { + $repeat = 0; + } + } while ($repeat); + + if (DB::isError($result)) { + return $this->raiseError($result); + } + + $result = $this->query("select id from ${seqname}"); + if (DB::isError($result)) { + return $result; + } + + $row = $result->fetchRow(DB_FETCHMODE_ORDERED); + if (DB::isError($row || !$row)) { + return $row; + } + + return $row[0]; + } + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_odbc::nextID(), DB_odbc::dropSequence() + */ + function createSequence($seq_name) + { + return $this->query('CREATE TABLE ' + . $this->getSequenceName($seq_name) + . ' (id integer NOT NULL,' + . ' PRIMARY KEY(id))'); + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_odbc::nextID(), DB_odbc::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP TABLE ' . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + if (!@odbc_autocommit($this->connection, $onoff)) { + return $this->odbcRaiseError(); + } + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + if (!@odbc_commit($this->connection)) { + return $this->odbcRaiseError(); + } + return DB_OK; + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + if (!@odbc_rollback($this->connection)) { + return $this->odbcRaiseError(); + } + return DB_OK; + } + + // }}} + // {{{ odbcRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_odbc::errorNative(), DB_common::errorCode() + */ + function odbcRaiseError($errno = null) + { + if ($errno === null) { + switch ($this->dbsyntax) { + case 'access': + if ($this->options['portability'] & DB_PORTABILITY_ERRORS) { + $this->errorcode_map['07001'] = DB_ERROR_NOSUCHFIELD; + } else { + // Doing this in case mode changes during runtime. + $this->errorcode_map['07001'] = DB_ERROR_MISMATCH; + } + + $native_code = odbc_error($this->connection); + + // S1000 is for "General Error." Let's be more specific. + if ($native_code == 'S1000') { + $errormsg = odbc_errormsg($this->connection); + static $error_regexps; + if (!isset($error_regexps)) { + $error_regexps = array( + '/includes related records.$/i' => DB_ERROR_CONSTRAINT, + '/cannot contain a Null value/i' => DB_ERROR_CONSTRAINT_NOT_NULL, + ); + } + foreach ($error_regexps as $regexp => $code) { + if (preg_match($regexp, $errormsg)) { + return $this->raiseError($code, + null, null, null, + $native_code . ' ' . $errormsg); + } + } + $errno = DB_ERROR; + } else { + $errno = $this->errorCode($native_code); + } + break; + default: + $errno = $this->errorCode(odbc_error($this->connection)); + } + } + return $this->raiseError($errno, null, null, null, + $this->errorNative()); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error code and message produced by the last query + * + * @return string the DBMS' error code and message + */ + function errorNative() + { + if (!is_resource($this->connection)) { + return @odbc_error() . ' ' . @odbc_errormsg(); + } + return @odbc_error($this->connection) . ' ' . @odbc_errormsg($this->connection); + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + * @since Method available since Release 1.7.0 + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @odbc_exec($this->connection, "SELECT * FROM $result"); + if (!$id) { + return $this->odbcRaiseError(); + } + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->odbcRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @odbc_num_fields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $col = $i + 1; + $res[$i] = array( + 'table' => $got_string ? $case_func($result) : '', + 'name' => $case_func(@odbc_field_name($id, $col)), + 'type' => @odbc_field_type($id, $col), + 'len' => @odbc_field_len($id, $col), + 'flags' => '', + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @odbc_free_result($id); + } + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * Thanks to symbol1@gmail.com and Philippe.Jausions@11abacus.com. + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the list of objects requested + * + * @access protected + * @see DB_common::getListOf() + * @since Method available since Release 1.7.0 + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'databases': + if (!function_exists('odbc_data_source')) { + return null; + } + $res = @odbc_data_source($this->connection, SQL_FETCH_FIRST); + if (is_array($res)) { + $out = array($res['server']); + while($res = @odbc_data_source($this->connection, + SQL_FETCH_NEXT)) + { + $out[] = $res['server']; + } + return $out; + } else { + return $this->odbcRaiseError(); + } + break; + case 'tables': + case 'schema.tables': + $keep = 'TABLE'; + break; + case 'views': + $keep = 'VIEW'; + break; + default: + return null; + } + + /* + * Removing non-conforming items in the while loop rather than + * in the odbc_tables() call because some backends choke on this: + * odbc_tables($this->connection, '', '', '', 'TABLE') + */ + $res = @odbc_tables($this->connection); + if (!$res) { + return $this->odbcRaiseError(); + } + $out = array(); + while ($row = odbc_fetch_array($res)) { + if ($row['TABLE_TYPE'] != $keep) { + continue; + } + if ($type == 'schema.tables') { + $out[] = $row['TABLE_SCHEM'] . '.' . $row['TABLE_NAME']; + } else { + $out[] = $row['TABLE_NAME']; + } + } + return $out; + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/pgsql.php b/campcaster/src/tools/pear/src/DB/pgsql.php new file mode 100644 index 000000000..efaf8daf0 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/pgsql.php @@ -0,0 +1,1097 @@ + + * @author Stig Bakken + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: pgsql.php,v 1.126 2005/03/04 23:12:36 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's pgsql extension + * for interacting with PostgreSQL databases + * + * These methods overload the ones declared in DB_common. + * + * @category Database + * @package DB + * @author Rui Hirokawa + * @author Stig Bakken + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_pgsql extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'pgsql'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'pgsql'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'alter', + 'new_link' => '4.3.0', + 'numrows' => true, + 'pconnect' => true, + 'prepare' => false, + 'ssl' => true, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * Should data manipulation queries be committed automatically? + * @var bool + * @access private + */ + var $autocommit = true; + + /** + * The quantity of transactions begun + * + * {@internal While this is private, it can't actually be designated + * private in PHP 5 because it is directly accessed in the test suite.}} + * + * @var integer + * @access private + */ + var $transaction_opcount = 0; + + /** + * The number of rows affected by a data manipulation query + * @var integer + */ + var $affected = 0; + + /** + * The current row being looked at in fetchInto() + * @var array + * @access private + */ + var $row = array(); + + /** + * The number of rows in a given result set + * @var array + * @access private + */ + var $_num_rows = array(); + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_pgsql() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * PEAR DB's pgsql driver supports the following extra DSN options: + * + connect_timeout How many seconds to wait for a connection to + * be established. Available since PEAR DB 1.7.0. + * + new_link If set to true, causes subsequent calls to + * connect() to return a new connection link + * instead of the existing one. WARNING: this is + * not portable to other DBMS's. Available only + * if PHP is >= 4.3.0 and PEAR DB is >= 1.7.0. + * + options Command line options to be sent to the server. + * Available since PEAR DB 1.6.4. + * + service Specifies a service name in pg_service.conf that + * holds additional connection parameters. + * Available since PEAR DB 1.7.0. + * + sslmode How should SSL be used when connecting? Values: + * disable, allow, prefer or require. + * Available since PEAR DB 1.7.0. + * + tty This was used to specify where to send server + * debug output. Available since PEAR DB 1.6.4. + * + * Example of connecting to a new link via a socket: + * + * require_once 'DB.php'; + * + * $dsn = 'pgsql://user:pass@unix(/tmp)/dbname?new_link=true'; + * $options = array( + * 'portability' => DB_PORTABILITY_ALL, + * ); + * + * $db =& DB::connect($dsn, $options); + * if (PEAR::isError($db)) { + * die($db->getMessage()); + * } + * + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @link http://www.postgresql.org/docs/current/static/libpq.html#LIBPQ-CONNECT + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('pgsql')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + $protocol = $dsn['protocol'] ? $dsn['protocol'] : 'tcp'; + + $params = array(''); + if ($protocol == 'tcp') { + if ($dsn['hostspec']) { + $params[0] .= 'host=' . $dsn['hostspec']; + } + if ($dsn['port']) { + $params[0] .= ' port=' . $dsn['port']; + } + } elseif ($protocol == 'unix') { + // Allow for pg socket in non-standard locations. + if ($dsn['socket']) { + $params[0] .= 'host=' . $dsn['socket']; + } + if ($dsn['port']) { + $params[0] .= ' port=' . $dsn['port']; + } + } + if ($dsn['database']) { + $params[0] .= ' dbname=\'' . addslashes($dsn['database']) . '\''; + } + if ($dsn['username']) { + $params[0] .= ' user=\'' . addslashes($dsn['username']) . '\''; + } + if ($dsn['password']) { + $params[0] .= ' password=\'' . addslashes($dsn['password']) . '\''; + } + if (!empty($dsn['options'])) { + $params[0] .= ' options=' . $dsn['options']; + } + if (!empty($dsn['tty'])) { + $params[0] .= ' tty=' . $dsn['tty']; + } + if (!empty($dsn['connect_timeout'])) { + $params[0] .= ' connect_timeout=' . $dsn['connect_timeout']; + } + if (!empty($dsn['sslmode'])) { + $params[0] .= ' sslmode=' . $dsn['sslmode']; + } + if (!empty($dsn['service'])) { + $params[0] .= ' service=' . $dsn['service']; + } + + if (isset($dsn['new_link']) + && ($dsn['new_link'] == 'true' || $dsn['new_link'] === true)) + { + if (version_compare(phpversion(), '4.3.0', '>=')) { + $params[] = PGSQL_CONNECT_FORCE_NEW; + } + } + + $connect_function = $persistent ? 'pg_pconnect' : 'pg_connect'; + + $ini = ini_get('track_errors'); + $php_errormsg = ''; + if ($ini) { + $this->connection = @call_user_func_array($connect_function, + $params); + } else { + ini_set('track_errors', 1); + $this->connection = @call_user_func_array($connect_function, + $params); + ini_set('track_errors', $ini); + } + + if (!$this->connection) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + $php_errormsg); + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @pg_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $ismanip = DB::isManip($query); + $this->last_query = $query; + $query = $this->modifyQuery($query); + if (!$this->autocommit && $ismanip) { + if ($this->transaction_opcount == 0) { + $result = @pg_exec($this->connection, 'begin;'); + if (!$result) { + return $this->pgsqlRaiseError(); + } + } + $this->transaction_opcount++; + } + $result = @pg_exec($this->connection, $query); + if (!$result) { + return $this->pgsqlRaiseError(); + } + // Determine which queries that should return data, and which + // should return an error code only. + if ($ismanip) { + $this->affected = @pg_affected_rows($result); + return DB_OK; + } elseif (preg_match('/^\s*\(*\s*(SELECT|EXPLAIN|SHOW)\s/si', $query)) { + /* PostgreSQL commands: + ABORT, ALTER, BEGIN, CLOSE, CLUSTER, COMMIT, COPY, + CREATE, DECLARE, DELETE, DROP TABLE, EXPLAIN, FETCH, + GRANT, INSERT, LISTEN, LOAD, LOCK, MOVE, NOTIFY, RESET, + REVOKE, ROLLBACK, SELECT, SELECT INTO, SET, SHOW, + UNLISTEN, UPDATE, VACUUM + */ + $this->row[(int)$result] = 0; // reset the row counter. + $numrows = $this->numRows($result); + if (is_object($numrows)) { + return $numrows; + } + $this->_num_rows[(int)$result] = $numrows; + $this->affected = 0; + return $result; + } else { + $this->affected = 0; + return DB_OK; + } + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal pgsql result pointer to the next available result + * + * @param a valid fbsql result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + $result_int = (int)$result; + $rownum = ($rownum !== null) ? $rownum : $this->row[$result_int]; + if ($rownum >= $this->_num_rows[$result_int]) { + return null; + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $arr = @pg_fetch_array($result, $rownum, PGSQL_ASSOC); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @pg_fetch_row($result, $rownum); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + $this->row[$result_int] = ++$rownum; + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + if (is_resource($result)) { + unset($this->row[(int)$result]); + unset($this->_num_rows[(int)$result]); + $this->affected = 0; + return @pg_freeresult($result); + } + return false; + } + + // }}} + // {{{ quote() + + /** + * @deprecated Deprecated in release 1.6.0 + * @internal + */ + function quote($str) + { + return $this->quoteSmart($str); + } + + // }}} + // {{{ quoteSmart() + + /** + * Formats input so it can be safely used in a query + * + * @param mixed $in the data to be formatted + * + * @return mixed the formatted data. The format depends on the input's + * PHP type: + * + null = the string NULL + * + boolean = string TRUE or FALSE + * + integer or double = the unquoted number + * + other (including strings and numeric strings) = + * the data escaped according to MySQL's settings + * then encapsulated between single quotes + * + * @see DB_common::quoteSmart() + * @since Method available since Release 1.6.0 + */ + function quoteSmart($in) + { + if (is_int($in) || is_double($in)) { + return $in; + } elseif (is_bool($in)) { + return $in ? 'TRUE' : 'FALSE'; + } elseif (is_null($in)) { + return 'NULL'; + } else { + return "'" . $this->escapeSimple($in) . "'"; + } + } + + // }}} + // {{{ escapeSimple() + + /** + * Escapes a string according to the current DBMS's standards + * + * {@internal PostgreSQL treats a backslash as an escape character, + * so they are escaped as well. + * + * Not using pg_escape_string() yet because it requires PostgreSQL + * to be at version 7.2 or greater.}} + * + * @param string $str the string to be escaped + * + * @return string the escaped string + * + * @see DB_common::quoteSmart() + * @since Method available since Release 1.6.0 + */ + function escapeSimple($str) + { + return str_replace("'", "''", str_replace('\\', '\\\\', $str)); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @pg_numfields($result); + if (!$cols) { + return $this->pgsqlRaiseError(); + } + return $cols; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $rows = @pg_numrows($result); + if ($rows === null) { + return $this->pgsqlRaiseError(); + } + return $rows; + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + // XXX if $this->transaction_opcount > 0, we should probably + // issue a warning here. + $this->autocommit = $onoff ? true : false; + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + if ($this->transaction_opcount > 0) { + // (disabled) hack to shut up error messages from libpq.a + //@fclose(@fopen("php://stderr", "w")); + $result = @pg_exec($this->connection, 'end;'); + $this->transaction_opcount = 0; + if (!$result) { + return $this->pgsqlRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + if ($this->transaction_opcount > 0) { + $result = @pg_exec($this->connection, 'abort;'); + $this->transaction_opcount = 0; + if (!$result) { + return $this->pgsqlRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + return $this->affected; + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_pgsql::createSequence(), DB_pgsql::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + $repeat = false; + do { + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result =& $this->query("SELECT NEXTVAL('${seqname}')"); + $this->popErrorHandling(); + if ($ondemand && DB::isError($result) && + $result->getCode() == DB_ERROR_NOSUCHTABLE) { + $repeat = true; + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->createSequence($seq_name); + $this->popErrorHandling(); + if (DB::isError($result)) { + return $this->raiseError($result); + } + } else { + $repeat = false; + } + } while ($repeat); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $arr = $result->fetchRow(DB_FETCHMODE_ORDERED); + $result->free(); + return $arr[0]; + } + + // }}} + // {{{ createSequence() + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_pgsql::nextID(), DB_pgsql::dropSequence() + */ + function createSequence($seq_name) + { + $seqname = $this->getSequenceName($seq_name); + $result = $this->query("CREATE SEQUENCE ${seqname}"); + return $result; + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_pgsql::nextID(), DB_pgsql::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP SEQUENCE ' + . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ modifyLimitQuery() + + /** + * Adds LIMIT clauses to a query string according to current DBMS standards + * + * @param string $query the query to modify + * @param int $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return string the query string with LIMIT clauses added + * + * @access protected + */ + function modifyLimitQuery($query, $from, $count, $params = array()) + { + return "$query LIMIT $count OFFSET $from"; + } + + // }}} + // {{{ pgsqlRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_pgsql::errorNative(), DB_pgsql::errorCode() + */ + function pgsqlRaiseError($errno = null) + { + $native = $this->errorNative(); + if ($errno === null) { + $errno = $this->errorCode($native); + } + return $this->raiseError($errno, null, null, null, $native); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error message produced by the last query + * + * {@internal Error messages are used instead of error codes + * in order to support older versions of PostgreSQL.}} + * + * @return string the DBMS' error message + */ + function errorNative() + { + return @pg_errormessage($this->connection); + } + + // }}} + // {{{ errorCode() + + /** + * Determines PEAR::DB error code from the database's text error message. + * + * @param string $errormsg error message returned from the database + * @return integer an error number from a DB error constant + */ + function errorCode($errormsg) + { + static $error_regexps; + if (!isset($error_regexps)) { + $error_regexps = array( + '/(relation|sequence|table).*does not exist|class .* not found/i' + => DB_ERROR_NOSUCHTABLE, + '/index .* does not exist/' + => DB_ERROR_NOT_FOUND, + '/column .* does not exist/i' + => DB_ERROR_NOSUCHFIELD, + '/relation .* already exists/i' + => DB_ERROR_ALREADY_EXISTS, + '/(divide|division) by zero$/i' + => DB_ERROR_DIVZERO, + '/pg_atoi: error in .*: can\'t parse /i' + => DB_ERROR_INVALID_NUMBER, + '/invalid input syntax for( type)? (integer|numeric)/i' + => DB_ERROR_INVALID_NUMBER, + '/value .* is out of range for type \w*int/i' + => DB_ERROR_INVALID_NUMBER, + '/integer out of range/i' + => DB_ERROR_INVALID_NUMBER, + '/value too long for type character/i' + => DB_ERROR_INVALID, + '/attribute .* not found|relation .* does not have attribute/i' + => DB_ERROR_NOSUCHFIELD, + '/column .* specified in USING clause does not exist in (left|right) table/i' + => DB_ERROR_NOSUCHFIELD, + '/parser: parse error at or near/i' + => DB_ERROR_SYNTAX, + '/syntax error at/' + => DB_ERROR_SYNTAX, + '/column reference .* is ambiguous/i' + => DB_ERROR_SYNTAX, + '/permission denied/' + => DB_ERROR_ACCESS_VIOLATION, + '/violates not-null constraint/' + => DB_ERROR_CONSTRAINT_NOT_NULL, + '/violates [\w ]+ constraint/' + => DB_ERROR_CONSTRAINT, + '/referential integrity violation/' + => DB_ERROR_CONSTRAINT, + '/more expressions than target columns/i' + => DB_ERROR_VALUE_COUNT_ON_ROW, + ); + } + foreach ($error_regexps as $regexp => $code) { + if (preg_match($regexp, $errormsg)) { + return $code; + } + } + // Fall back to DB_ERROR if there was no mapping. + return DB_ERROR; + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * NOTE: only supports 'table' and 'flags' if $result + * is a table name. + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @pg_exec($this->connection, "SELECT * FROM $result LIMIT 0"); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->pgsqlRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @pg_numfields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $res[$i] = array( + 'table' => $got_string ? $case_func($result) : '', + 'name' => $case_func(@pg_fieldname($id, $i)), + 'type' => @pg_fieldtype($id, $i), + 'len' => @pg_fieldsize($id, $i), + 'flags' => $got_string + ? $this->_pgFieldFlags($id, $i, $result) + : '', + ); + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @pg_freeresult($id); + } + return $res; + } + + // }}} + // {{{ _pgFieldFlags() + + /** + * Get a column's flags + * + * Supports "not_null", "default_value", "primary_key", "unique_key" + * and "multiple_key". The default value is passed through + * rawurlencode() in case there are spaces in it. + * + * @param int $resource the PostgreSQL result identifier + * @param int $num_field the field number + * + * @return string the flags + * + * @access private + */ + function _pgFieldFlags($resource, $num_field, $table_name) + { + $field_name = @pg_fieldname($resource, $num_field); + + $result = @pg_exec($this->connection, "SELECT f.attnotnull, f.atthasdef + FROM pg_attribute f, pg_class tab, pg_type typ + WHERE tab.relname = typ.typname + AND typ.typrelid = f.attrelid + AND f.attname = '$field_name' + AND tab.relname = '$table_name'"); + if (@pg_numrows($result) > 0) { + $row = @pg_fetch_row($result, 0); + $flags = ($row[0] == 't') ? 'not_null ' : ''; + + if ($row[1] == 't') { + $result = @pg_exec($this->connection, "SELECT a.adsrc + FROM pg_attribute f, pg_class tab, pg_type typ, pg_attrdef a + WHERE tab.relname = typ.typname AND typ.typrelid = f.attrelid + AND f.attrelid = a.adrelid AND f.attname = '$field_name' + AND tab.relname = '$table_name' AND f.attnum = a.adnum"); + $row = @pg_fetch_row($result, 0); + $num = preg_replace("/'(.*)'::\w+/", "\\1", $row[0]); + $flags .= 'default_' . rawurlencode($num) . ' '; + } + } else { + $flags = ''; + } + $result = @pg_exec($this->connection, "SELECT i.indisunique, i.indisprimary, i.indkey + FROM pg_attribute f, pg_class tab, pg_type typ, pg_index i + WHERE tab.relname = typ.typname + AND typ.typrelid = f.attrelid + AND f.attrelid = i.indrelid + AND f.attname = '$field_name' + AND tab.relname = '$table_name'"); + $count = @pg_numrows($result); + + for ($i = 0; $i < $count ; $i++) { + $row = @pg_fetch_row($result, $i); + $keys = explode(' ', $row[2]); + + if (in_array($num_field + 1, $keys)) { + $flags .= ($row[0] == 't' && $row[1] == 'f') ? 'unique_key ' : ''; + $flags .= ($row[1] == 't') ? 'primary_key ' : ''; + if (count($keys) > 1) + $flags .= 'multiple_key '; + } + } + + return trim($flags); + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return 'SELECT c.relname AS "Name"' + . ' FROM pg_class c, pg_user u' + . ' WHERE c.relowner = u.usesysid' + . " AND c.relkind = 'r'" + . ' AND NOT EXISTS' + . ' (SELECT 1 FROM pg_views' + . ' WHERE viewname = c.relname)' + . " AND c.relname !~ '^(pg_|sql_)'" + . ' UNION' + . ' SELECT c.relname AS "Name"' + . ' FROM pg_class c' + . " WHERE c.relkind = 'r'" + . ' AND NOT EXISTS' + . ' (SELECT 1 FROM pg_views' + . ' WHERE viewname = c.relname)' + . ' AND NOT EXISTS' + . ' (SELECT 1 FROM pg_user' + . ' WHERE usesysid = c.relowner)' + . " AND c.relname !~ '^pg_'"; + case 'schema.tables': + return "SELECT schemaname || '.' || tablename" + . ' AS "Name"' + . ' FROM pg_catalog.pg_tables' + . ' WHERE schemaname NOT IN' + . " ('pg_catalog', 'information_schema', 'pg_toast')"; + case 'views': + // Table cols: viewname | viewowner | definition + return 'SELECT viewname from pg_views WHERE schemaname' + . " NOT IN ('information_schema', 'pg_catalog')"; + case 'users': + // cols: usename |usesysid|usecreatedb|usetrace|usesuper|usecatupd|passwd |valuntil + return 'SELECT usename FROM pg_user'; + case 'databases': + return 'SELECT datname FROM pg_database'; + case 'functions': + case 'procedures': + return 'SELECT proname FROM pg_proc WHERE proowner <> 1'; + default: + return null; + } + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/sqlite.php b/campcaster/src/tools/pear/src/DB/sqlite.php new file mode 100644 index 000000000..392504668 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/sqlite.php @@ -0,0 +1,942 @@ + + * @author Mika Tuupola + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 3.0 + * @version CVS: $Id: sqlite.php,v 1.109 2005/03/10 01:22:48 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's sqlite extension + * for interacting with SQLite databases + * + * These methods overload the ones declared in DB_common. + * + * NOTICE: This driver needs PHP's track_errors ini setting to be on. + * It is automatically turned on when connecting to the database. + * Make sure your scripts don't turn it off. + * + * @category Database + * @package DB + * @author Urs Gehrig + * @author Mika Tuupola + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_sqlite extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'sqlite'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'sqlite'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'alter', + 'new_link' => false, + 'numrows' => true, + 'pconnect' => true, + 'prepare' => false, + 'ssl' => false, + 'transactions' => false, + ); + + /** + * A mapping of native error codes to DB error codes + * + * {@internal Error codes according to sqlite_exec. See the online + * manual at http://sqlite.org/c_interface.html for info. + * This error handling based on sqlite_exec is not yet implemented.}} + * + * @var array + */ + var $errorcode_map = array( + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * SQLite data types + * + * @link http://www.sqlite.org/datatypes.html + * + * @var array + */ + var $keywords = array ( + 'BLOB' => '', + 'BOOLEAN' => '', + 'CHARACTER' => '', + 'CLOB' => '', + 'FLOAT' => '', + 'INTEGER' => '', + 'KEY' => '', + 'NATIONAL' => '', + 'NUMERIC' => '', + 'NVARCHAR' => '', + 'PRIMARY' => '', + 'TEXT' => '', + 'TIMESTAMP' => '', + 'UNIQUE' => '', + 'VARCHAR' => '', + 'VARYING' => '', + ); + + /** + * The most recent error message from $php_errormsg + * @var string + * @access private + */ + var $_lasterror = ''; + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_sqlite() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * PEAR DB's sqlite driver supports the following extra DSN options: + * + mode The permissions for the database file, in four digit + * chmod octal format (eg "0600"). + * + * Example of connecting to a database in read-only mode: + * + * require_once 'DB.php'; + * + * $dsn = 'sqlite:///path/and/name/of/db/file?mode=0400'; + * $options = array( + * 'portability' => DB_PORTABILITY_ALL, + * ); + * + * $db =& DB::connect($dsn, $options); + * if (PEAR::isError($db)) { + * die($db->getMessage()); + * } + * + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('sqlite')) { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + if ($dsn['database']) { + if (!file_exists($dsn['database'])) { + if (!touch($dsn['database'])) { + return $this->sqliteRaiseError(DB_ERROR_NOT_FOUND); + } + if (!isset($dsn['mode']) || + !is_numeric($dsn['mode'])) + { + $mode = 0644; + } else { + $mode = octdec($dsn['mode']); + } + if (!chmod($dsn['database'], $mode)) { + return $this->sqliteRaiseError(DB_ERROR_NOT_FOUND); + } + if (!file_exists($dsn['database'])) { + return $this->sqliteRaiseError(DB_ERROR_NOT_FOUND); + } + } + if (!is_file($dsn['database'])) { + return $this->sqliteRaiseError(DB_ERROR_INVALID); + } + if (!is_readable($dsn['database'])) { + return $this->sqliteRaiseError(DB_ERROR_ACCESS_VIOLATION); + } + } else { + return $this->sqliteRaiseError(DB_ERROR_ACCESS_VIOLATION); + } + + $connect_function = $persistent ? 'sqlite_popen' : 'sqlite_open'; + + // track_errors must remain on for simpleQuery() + ini_set('track_errors', 1); + $php_errormsg = ''; + + if (!$this->connection = @$connect_function($dsn['database'])) { + return $this->raiseError(DB_ERROR_NODBSELECTED, + null, null, null, + $php_errormsg); + } + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @sqlite_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * NOTICE: This method needs PHP's track_errors ini setting to be on. + * It is automatically turned on when connecting to the database. + * Make sure your scripts don't turn it off. + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $ismanip = DB::isManip($query); + $this->last_query = $query; + $query = $this->modifyQuery($query); + + $php_errormsg = ''; + + $result = @sqlite_query($query, $this->connection); + $this->_lasterror = $php_errormsg ? $php_errormsg : ''; + + $this->result = $result; + if (!$this->result) { + return $this->sqliteRaiseError(null); + } + + // sqlite_query() seems to allways return a resource + // so cant use that. Using $ismanip instead + if (!$ismanip) { + $numRows = $this->numRows($result); + if (is_object($numRows)) { + // we've got PEAR_Error + return $numRows; + } + return $result; + } + return DB_OK; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal sqlite result pointer to the next available result + * + * @param resource $result the valid sqlite result resource + * + * @return bool true if a result is available otherwise return false + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + if (!@sqlite_seek($this->result, $rownum)) { + return null; + } + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + $arr = @sqlite_fetch_array($result, SQLITE_ASSOC); + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @sqlite_fetch_array($result, SQLITE_NUM); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + /* + * Even though this DBMS already trims output, we do this because + * a field might have intentional whitespace at the end that + * gets removed by DB_PORTABILITY_RTRIM under another driver. + */ + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult(&$result) + { + // XXX No native free? + if (!is_resource($result)) { + return false; + } + $result = null; + return true; + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @sqlite_num_fields($result); + if (!$cols) { + return $this->sqliteRaiseError(); + } + return $cols; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $rows = @sqlite_num_rows($result); + if ($rows === null) { + return $this->sqliteRaiseError(); + } + return $rows; + } + + // }}} + // {{{ affected() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + return @sqlite_changes($this->connection); + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_sqlite::nextID(), DB_sqlite::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP TABLE ' . $this->getSequenceName($seq_name)); + } + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_sqlite::nextID(), DB_sqlite::dropSequence() + */ + function createSequence($seq_name) + { + $seqname = $this->getSequenceName($seq_name); + $query = 'CREATE TABLE ' . $seqname . + ' (id INTEGER UNSIGNED PRIMARY KEY) '; + $result = $this->query($query); + if (DB::isError($result)) { + return($result); + } + $query = "CREATE TRIGGER ${seqname}_cleanup AFTER INSERT ON $seqname + BEGIN + DELETE FROM $seqname WHERE idquery($query); + if (DB::isError($result)) { + return($result); + } + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_sqlite::createSequence(), DB_sqlite::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + + do { + $repeat = 0; + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->query("INSERT INTO $seqname (id) VALUES (NULL)"); + $this->popErrorHandling(); + if ($result === DB_OK) { + $id = @sqlite_last_insert_rowid($this->connection); + if ($id != 0) { + return $id; + } + } elseif ($ondemand && DB::isError($result) && + $result->getCode() == DB_ERROR_NOSUCHTABLE) + { + $result = $this->createSequence($seq_name); + if (DB::isError($result)) { + return $this->raiseError($result); + } else { + $repeat = 1; + } + } + } while ($repeat); + + return $this->raiseError($result); + } + + // }}} + // {{{ getDbFileStats() + + /** + * Get the file stats for the current database + * + * Possible arguments are dev, ino, mode, nlink, uid, gid, rdev, size, + * atime, mtime, ctime, blksize, blocks or a numeric key between + * 0 and 12. + * + * @param string $arg the array key for stats() + * + * @return mixed an array on an unspecified key, integer on a passed + * arg and false at a stats error + */ + function getDbFileStats($arg = '') + { + $stats = stat($this->dsn['database']); + if ($stats == false) { + return false; + } + if (is_array($stats)) { + if (is_numeric($arg)) { + if (((int)$arg <= 12) & ((int)$arg >= 0)) { + return false; + } + return $stats[$arg ]; + } + if (array_key_exists(trim($arg), $stats)) { + return $stats[$arg ]; + } + } + return $stats; + } + + // }}} + // {{{ escapeSimple() + + /** + * Escapes a string according to the current DBMS's standards + * + * In SQLite, this makes things safe for inserts/updates, but may + * cause problems when performing text comparisons against columns + * containing binary data. See the + * {@link http://php.net/sqlite_escape_string PHP manual} for more info. + * + * @param string $str the string to be escaped + * + * @return string the escaped string + * + * @since Method available since Release 1.6.1 + * @see DB_common::escapeSimple() + */ + function escapeSimple($str) + { + return @sqlite_escape_string($str); + } + + // }}} + // {{{ modifyLimitQuery() + + /** + * Adds LIMIT clauses to a query string according to current DBMS standards + * + * @param string $query the query to modify + * @param int $from the row to start to fetching (0 = the first row) + * @param int $count the numbers of rows to fetch + * @param mixed $params array, string or numeric data to be used in + * execution of the statement. Quantity of items + * passed must match quantity of placeholders in + * query: meaning 1 placeholder for non-array + * parameters or 1 placeholder per array element. + * + * @return string the query string with LIMIT clauses added + * + * @access protected + */ + function modifyLimitQuery($query, $from, $count, $params = array()) + { + return "$query LIMIT $count OFFSET $from"; + } + + // }}} + // {{{ modifyQuery() + + /** + * Changes a query string for various DBMS specific reasons + * + * This little hack lets you know how many rows were deleted + * when running a "DELETE FROM table" query. Only implemented + * if the DB_PORTABILITY_DELETE_COUNT portability option is on. + * + * @param string $query the query string to modify + * + * @return string the modified query string + * + * @access protected + * @see DB_common::setOption() + */ + function modifyQuery($query) + { + if ($this->options['portability'] & DB_PORTABILITY_DELETE_COUNT) { + if (preg_match('/^\s*DELETE\s+FROM\s+(\S+)\s*$/i', $query)) { + $query = preg_replace('/^\s*DELETE\s+FROM\s+(\S+)\s*$/', + 'DELETE FROM \1 WHERE 1=1', $query); + } + } + return $query; + } + + // }}} + // {{{ sqliteRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_sqlite::errorNative(), DB_sqlite::errorCode() + */ + function sqliteRaiseError($errno = null) + { + $native = $this->errorNative(); + if ($errno === null) { + $errno = $this->errorCode($native); + } + + $errorcode = @sqlite_last_error($this->connection); + $userinfo = "$errorcode ** $this->last_query"; + + return $this->raiseError($errno, null, null, $userinfo, $native); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error message produced by the last query + * + * {@internal This is used to retrieve more meaningfull error messages + * because sqlite_last_error() does not provide adequate info.}} + * + * @return string the DBMS' error message + */ + function errorNative() + { + return $this->_lasterror; + } + + // }}} + // {{{ errorCode() + + /** + * Determines PEAR::DB error code from the database's text error message + * + * @param string $errormsg the error message returned from the database + * + * @return integer the DB error number + */ + function errorCode($errormsg) + { + static $error_regexps; + if (!isset($error_regexps)) { + $error_regexps = array( + '/^no such table:/' => DB_ERROR_NOSUCHTABLE, + '/^no such index:/' => DB_ERROR_NOT_FOUND, + '/^(table|index) .* already exists$/' => DB_ERROR_ALREADY_EXISTS, + '/PRIMARY KEY must be unique/i' => DB_ERROR_CONSTRAINT, + '/is not unique/' => DB_ERROR_CONSTRAINT, + '/columns .* are not unique/i' => DB_ERROR_CONSTRAINT, + '/uniqueness constraint failed/' => DB_ERROR_CONSTRAINT, + '/may not be NULL/' => DB_ERROR_CONSTRAINT_NOT_NULL, + '/^no such column:/' => DB_ERROR_NOSUCHFIELD, + '/column not present in both tables/i' => DB_ERROR_NOSUCHFIELD, + '/^near ".*": syntax error$/' => DB_ERROR_SYNTAX, + '/[0-9]+ values for [0-9]+ columns/i' => DB_ERROR_VALUE_COUNT_ON_ROW, + ); + } + foreach ($error_regexps as $regexp => $code) { + if (preg_match($regexp, $errormsg)) { + return $code; + } + } + // Fall back to DB_ERROR if there was no mapping. + return DB_ERROR; + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table + * + * @param string $result a string containing the name of a table + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + * @since Method available since Release 1.7.0 + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + $id = @sqlite_array_query($this->connection, + "PRAGMA table_info('$result');", + SQLITE_ASSOC); + $got_string = true; + } else { + $this->last_query = ''; + return $this->raiseError(DB_ERROR_NOT_CAPABLE, null, null, null, + 'This DBMS can not obtain tableInfo' . + ' from result sets'); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = count($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + if (strpos($id[$i]['type'], '(') !== false) { + $bits = explode('(', $id[$i]['type']); + $type = $bits[0]; + $len = rtrim($bits[1],')'); + } else { + $type = $id[$i]['type']; + $len = 0; + } + + $flags = ''; + if ($id[$i]['pk']) { + $flags .= 'primary_key '; + } + if ($id[$i]['notnull']) { + $flags .= 'not_null '; + } + if ($id[$i]['dflt_value'] !== null) { + $flags .= 'default_' . rawurlencode($id[$i]['dflt_value']); + } + $flags = trim($flags); + + $res[$i] = array( + 'table' => $case_func($result), + 'name' => $case_func($id[$i]['name']), + 'type' => $type, + 'len' => $len, + 'flags' => $flags, + ); + + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + return $res; + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * @param array $args SQLITE DRIVER ONLY: a private array of arguments + * used by the getSpecialQuery(). Do not use + * this directly. + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type, $args = array()) + { + if (!is_array($args)) { + return $this->raiseError('no key specified', null, null, null, + 'Argument has to be an array.'); + } + + switch ($type) { + case 'master': + return 'SELECT * FROM sqlite_master;'; + case 'tables': + return "SELECT name FROM sqlite_master WHERE type='table' " + . 'UNION ALL SELECT name FROM sqlite_temp_master ' + . "WHERE type='table' ORDER BY name;"; + case 'schema': + return 'SELECT sql FROM (SELECT * FROM sqlite_master ' + . 'UNION ALL SELECT * FROM sqlite_temp_master) ' + . "WHERE type!='meta' " + . 'ORDER BY tbl_name, type DESC, name;'; + case 'schemax': + case 'schema_x': + /* + * Use like: + * $res = $db->query($db->getSpecialQuery('schema_x', + * array('table' => 'table3'))); + */ + return 'SELECT sql FROM (SELECT * FROM sqlite_master ' + . 'UNION ALL SELECT * FROM sqlite_temp_master) ' + . "WHERE tbl_name LIKE '{$args['table']}' " + . "AND type!='meta' " + . 'ORDER BY type DESC, name;'; + case 'alter': + /* + * SQLite does not support ALTER TABLE; this is a helper query + * to handle this. 'table' represents the table name, 'rows' + * the news rows to create, 'save' the row(s) to keep _with_ + * the data. + * + * Use like: + * $args = array( + * 'table' => $table, + * 'rows' => "id INTEGER PRIMARY KEY, firstname TEXT, surname TEXT, datetime TEXT", + * 'save' => "NULL, titel, content, datetime" + * ); + * $res = $db->query( $db->getSpecialQuery('alter', $args)); + */ + $rows = strtr($args['rows'], $this->keywords); + + $q = array( + 'BEGIN TRANSACTION', + "CREATE TEMPORARY TABLE {$args['table']}_backup ({$args['rows']})", + "INSERT INTO {$args['table']}_backup SELECT {$args['save']} FROM {$args['table']}", + "DROP TABLE {$args['table']}", + "CREATE TABLE {$args['table']} ({$args['rows']})", + "INSERT INTO {$args['table']} SELECT {$rows} FROM {$args['table']}_backup", + "DROP TABLE {$args['table']}_backup", + 'COMMIT', + ); + + /* + * This is a dirty hack, since the above query will not get + * executed with a single query call so here the query method + * will be called directly and return a select instead. + */ + foreach ($q as $query) { + $this->query($query); + } + return "SELECT * FROM {$args['table']};"; + default: + return null; + } + } + + // }}} +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/storage.php b/campcaster/src/tools/pear/src/DB/storage.php new file mode 100644 index 000000000..738dc582d --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/storage.php @@ -0,0 +1,504 @@ + + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: storage.php,v 1.21 2005/02/02 02:54:51 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB class so it can be extended from + */ +require_once 'DB.php'; + +/** + * Provides an object interface to a table row + * + * It lets you add, delete and change rows using objects rather than SQL + * statements. + * + * @category Database + * @package DB + * @author Stig Bakken + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_storage extends PEAR +{ + // {{{ properties + + /** the name of the table (or view, if the backend database supports + updates in views) we hold data from */ + var $_table = null; + + /** which column(s) in the table contains primary keys, can be a + string for single-column primary keys, or an array of strings + for multiple-column primary keys */ + var $_keycolumn = null; + + /** DB connection handle used for all transactions */ + var $_dbh = null; + + /** an assoc with the names of database fields stored as properties + in this object */ + var $_properties = array(); + + /** an assoc with the names of the properties in this object that + have been changed since they were fetched from the database */ + var $_changes = array(); + + /** flag that decides if data in this object can be changed. + objects that don't have their table's key column in their + property lists will be flagged as read-only. */ + var $_readonly = false; + + /** function or method that implements a validator for fields that + are set, this validator function returns true if the field is + valid, false if not */ + var $_validator = null; + + // }}} + // {{{ constructor + + /** + * Constructor + * + * @param $table string the name of the database table + * + * @param $keycolumn mixed string with name of key column, or array of + * strings if the table has a primary key of more than one column + * + * @param $dbh object database connection object + * + * @param $validator mixed function or method used to validate + * each new value, called with three parameters: the name of the + * field/column that is changing, a reference to the new value and + * a reference to this object + * + */ + function DB_storage($table, $keycolumn, &$dbh, $validator = null) + { + $this->PEAR('DB_Error'); + $this->_table = $table; + $this->_keycolumn = $keycolumn; + $this->_dbh = $dbh; + $this->_readonly = false; + $this->_validator = $validator; + } + + // }}} + // {{{ _makeWhere() + + /** + * Utility method to build a "WHERE" clause to locate ourselves in + * the table. + * + * XXX future improvement: use rowids? + * + * @access private + */ + function _makeWhere($keyval = null) + { + if (is_array($this->_keycolumn)) { + if ($keyval === null) { + for ($i = 0; $i < sizeof($this->_keycolumn); $i++) { + $keyval[] = $this->{$this->_keycolumn[$i]}; + } + } + $whereclause = ''; + for ($i = 0; $i < sizeof($this->_keycolumn); $i++) { + if ($i > 0) { + $whereclause .= ' AND '; + } + $whereclause .= $this->_keycolumn[$i]; + if (is_null($keyval[$i])) { + // there's not much point in having a NULL key, + // but we support it anyway + $whereclause .= ' IS NULL'; + } else { + $whereclause .= ' = ' . $this->_dbh->quote($keyval[$i]); + } + } + } else { + if ($keyval === null) { + $keyval = @$this->{$this->_keycolumn}; + } + $whereclause = $this->_keycolumn; + if (is_null($keyval)) { + // there's not much point in having a NULL key, + // but we support it anyway + $whereclause .= ' IS NULL'; + } else { + $whereclause .= ' = ' . $this->_dbh->quote($keyval); + } + } + return $whereclause; + } + + // }}} + // {{{ setup() + + /** + * Method used to initialize a DB_storage object from the + * configured table. + * + * @param $keyval mixed the key[s] of the row to fetch (string or array) + * + * @return int DB_OK on success, a DB error if not + */ + function setup($keyval) + { + $whereclause = $this->_makeWhere($keyval); + $query = 'SELECT * FROM ' . $this->_table . ' WHERE ' . $whereclause; + $sth = $this->_dbh->query($query); + if (DB::isError($sth)) { + return $sth; + } + $row = $sth->fetchRow(DB_FETCHMODE_ASSOC); + if (DB::isError($row)) { + return $row; + } + if (!$row) { + return $this->raiseError(null, DB_ERROR_NOT_FOUND, null, null, + $query, null, true); + } + foreach ($row as $key => $value) { + $this->_properties[$key] = true; + $this->$key = $value; + } + return DB_OK; + } + + // }}} + // {{{ insert() + + /** + * Create a new (empty) row in the configured table for this + * object. + */ + function insert($newpk) + { + if (is_array($this->_keycolumn)) { + $primarykey = $this->_keycolumn; + } else { + $primarykey = array($this->_keycolumn); + } + settype($newpk, "array"); + for ($i = 0; $i < sizeof($primarykey); $i++) { + $pkvals[] = $this->_dbh->quote($newpk[$i]); + } + + $sth = $this->_dbh->query("INSERT INTO $this->_table (" . + implode(",", $primarykey) . ") VALUES(" . + implode(",", $pkvals) . ")"); + if (DB::isError($sth)) { + return $sth; + } + if (sizeof($newpk) == 1) { + $newpk = $newpk[0]; + } + $this->setup($newpk); + } + + // }}} + // {{{ toString() + + /** + * Output a simple description of this DB_storage object. + * @return string object description + */ + function toString() + { + $info = strtolower(get_class($this)); + $info .= " (table="; + $info .= $this->_table; + $info .= ", keycolumn="; + if (is_array($this->_keycolumn)) { + $info .= "(" . implode(",", $this->_keycolumn) . ")"; + } else { + $info .= $this->_keycolumn; + } + $info .= ", dbh="; + if (is_object($this->_dbh)) { + $info .= $this->_dbh->toString(); + } else { + $info .= "null"; + } + $info .= ")"; + if (sizeof($this->_properties)) { + $info .= " [loaded, key="; + $keyname = $this->_keycolumn; + if (is_array($keyname)) { + $info .= "("; + for ($i = 0; $i < sizeof($keyname); $i++) { + if ($i > 0) { + $info .= ","; + } + $info .= $this->$keyname[$i]; + } + $info .= ")"; + } else { + $info .= $this->$keyname; + } + $info .= "]"; + } + if (sizeof($this->_changes)) { + $info .= " [modified]"; + } + return $info; + } + + // }}} + // {{{ dump() + + /** + * Dump the contents of this object to "standard output". + */ + function dump() + { + foreach ($this->_properties as $prop => $foo) { + print "$prop = "; + print htmlentities($this->$prop); + print "
\n"; + } + } + + // }}} + // {{{ &create() + + /** + * Static method used to create new DB storage objects. + * @param $data assoc. array where the keys are the names + * of properties/columns + * @return object a new instance of DB_storage or a subclass of it + */ + function &create($table, &$data) + { + $classname = strtolower(get_class($this)); + $obj =& new $classname($table); + foreach ($data as $name => $value) { + $obj->_properties[$name] = true; + $obj->$name = &$value; + } + return $obj; + } + + // }}} + // {{{ loadFromQuery() + + /** + * Loads data into this object from the given query. If this + * object already contains table data, changes will be saved and + * the object re-initialized first. + * + * @param $query SQL query + * + * @param $params parameter list in case you want to use + * prepare/execute mode + * + * @return int DB_OK on success, DB_WARNING_READ_ONLY if the + * returned object is read-only (because the object's specified + * key column was not found among the columns returned by $query), + * or another DB error code in case of errors. + */ +// XXX commented out for now +/* + function loadFromQuery($query, $params = null) + { + if (sizeof($this->_properties)) { + if (sizeof($this->_changes)) { + $this->store(); + $this->_changes = array(); + } + $this->_properties = array(); + } + $rowdata = $this->_dbh->getRow($query, DB_FETCHMODE_ASSOC, $params); + if (DB::isError($rowdata)) { + return $rowdata; + } + reset($rowdata); + $found_keycolumn = false; + while (list($key, $value) = each($rowdata)) { + if ($key == $this->_keycolumn) { + $found_keycolumn = true; + } + $this->_properties[$key] = true; + $this->$key = &$value; + unset($value); // have to unset, or all properties will + // refer to the same value + } + if (!$found_keycolumn) { + $this->_readonly = true; + return DB_WARNING_READ_ONLY; + } + return DB_OK; + } + */ + + // }}} + // {{{ set() + + /** + * Modify an attriute value. + */ + function set($property, $newvalue) + { + // only change if $property is known and object is not + // read-only + if ($this->_readonly) { + return $this->raiseError(null, DB_WARNING_READ_ONLY, null, + null, null, null, true); + } + if (@isset($this->_properties[$property])) { + if (empty($this->_validator)) { + $valid = true; + } else { + $valid = @call_user_func($this->_validator, + $this->_table, + $property, + $newvalue, + $this->$property, + $this); + } + if ($valid) { + $this->$property = $newvalue; + if (empty($this->_changes[$property])) { + $this->_changes[$property] = 0; + } else { + $this->_changes[$property]++; + } + } else { + return $this->raiseError(null, DB_ERROR_INVALID, null, + null, "invalid field: $property", + null, true); + } + return true; + } + return $this->raiseError(null, DB_ERROR_NOSUCHFIELD, null, + null, "unknown field: $property", + null, true); + } + + // }}} + // {{{ &get() + + /** + * Fetch an attribute value. + * + * @param string attribute name + * + * @return attribute contents, or null if the attribute name is + * unknown + */ + function &get($property) + { + // only return if $property is known + if (isset($this->_properties[$property])) { + return $this->$property; + } + $tmp = null; + return $tmp; + } + + // }}} + // {{{ _DB_storage() + + /** + * Destructor, calls DB_storage::store() if there are changes + * that are to be kept. + */ + function _DB_storage() + { + if (sizeof($this->_changes)) { + $this->store(); + } + $this->_properties = array(); + $this->_changes = array(); + $this->_table = null; + } + + // }}} + // {{{ store() + + /** + * Stores changes to this object in the database. + * + * @return DB_OK or a DB error + */ + function store() + { + foreach ($this->_changes as $name => $foo) { + $params[] = &$this->$name; + $vars[] = $name . ' = ?'; + } + if ($vars) { + $query = 'UPDATE ' . $this->_table . ' SET ' . + implode(', ', $vars) . ' WHERE ' . + $this->_makeWhere(); + $stmt = $this->_dbh->prepare($query); + $res = $this->_dbh->execute($stmt, $params); + if (DB::isError($res)) { + return $res; + } + $this->_changes = array(); + } + return DB_OK; + } + + // }}} + // {{{ remove() + + /** + * Remove the row represented by this object from the database. + * + * @return mixed DB_OK or a DB error + */ + function remove() + { + if ($this->_readonly) { + return $this->raiseError(null, DB_WARNING_READ_ONLY, null, + null, null, null, true); + } + $query = 'DELETE FROM ' . $this->_table .' WHERE '. + $this->_makeWhere(); + $res = $this->_dbh->query($query); + if (DB::isError($res)) { + return $res; + } + foreach ($this->_properties as $prop => $foo) { + unset($this->$prop); + } + $this->_properties = array(); + $this->_changes = array(); + return DB_OK; + } + + // }}} +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/DB/sybase.php b/campcaster/src/tools/pear/src/DB/sybase.php new file mode 100644 index 000000000..5e6130790 --- /dev/null +++ b/campcaster/src/tools/pear/src/DB/sybase.php @@ -0,0 +1,907 @@ + + * @author Antônio Carlos Venâncio Júnior + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: sybase.php,v 1.78 2005/02/20 00:44:48 danielc Exp $ + * @link http://pear.php.net/package/DB + */ + +/** + * Obtain the DB_common class so it can be extended from + */ +require_once 'DB/common.php'; + +/** + * The methods PEAR DB uses to interact with PHP's sybase extension + * for interacting with Sybase databases + * + * These methods overload the ones declared in DB_common. + * + * WARNING: This driver may fail with multiple connections under the + * same user/pass/host and different databases. + * + * @category Database + * @package DB + * @author Sterling Hughes + * @author Antônio Carlos Venâncio Júnior + * @author Daniel Convissor + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.7.6 + * @link http://pear.php.net/package/DB + */ +class DB_sybase extends DB_common +{ + // {{{ properties + + /** + * The DB driver type (mysql, oci8, odbc, etc.) + * @var string + */ + var $phptype = 'sybase'; + + /** + * The database syntax variant to be used (db2, access, etc.), if any + * @var string + */ + var $dbsyntax = 'sybase'; + + /** + * The capabilities of this DB implementation + * + * The 'new_link' element contains the PHP version that first provided + * new_link support for this DBMS. Contains false if it's unsupported. + * + * Meaning of the 'limit' element: + * + 'emulate' = emulate with fetch row by number + * + 'alter' = alter the query + * + false = skip rows + * + * @var array + */ + var $features = array( + 'limit' => 'emulate', + 'new_link' => false, + 'numrows' => true, + 'pconnect' => true, + 'prepare' => false, + 'ssl' => false, + 'transactions' => true, + ); + + /** + * A mapping of native error codes to DB error codes + * @var array + */ + var $errorcode_map = array( + ); + + /** + * The raw database connection created by PHP + * @var resource + */ + var $connection; + + /** + * The DSN information for connecting to a database + * @var array + */ + var $dsn = array(); + + + /** + * Should data manipulation queries be committed automatically? + * @var bool + * @access private + */ + var $autocommit = true; + + /** + * The quantity of transactions begun + * + * {@internal While this is private, it can't actually be designated + * private in PHP 5 because it is directly accessed in the test suite.}} + * + * @var integer + * @access private + */ + var $transaction_opcount = 0; + + /** + * The database specified in the DSN + * + * It's a fix to allow calls to different databases in the same script. + * + * @var string + * @access private + */ + var $_db = ''; + + + // }}} + // {{{ constructor + + /** + * This constructor calls $this->DB_common() + * + * @return void + */ + function DB_sybase() + { + $this->DB_common(); + } + + // }}} + // {{{ connect() + + /** + * Connect to the database server, log in and open the database + * + * Don't call this method directly. Use DB::connect() instead. + * + * PEAR DB's sybase driver supports the following extra DSN options: + * + appname The application name to use on this connection. + * Available since PEAR DB 1.7.0. + * + charset The character set to use on this connection. + * Available since PEAR DB 1.7.0. + * + * @param array $dsn the data source name + * @param bool $persistent should the connection be persistent? + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function connect($dsn, $persistent = false) + { + if (!PEAR::loadExtension('sybase') && + !PEAR::loadExtension('sybase_ct')) + { + return $this->raiseError(DB_ERROR_EXTENSION_NOT_FOUND); + } + + $this->dsn = $dsn; + if ($dsn['dbsyntax']) { + $this->dbsyntax = $dsn['dbsyntax']; + } + + $dsn['hostspec'] = $dsn['hostspec'] ? $dsn['hostspec'] : 'localhost'; + $dsn['password'] = !empty($dsn['password']) ? $dsn['password'] : false; + $dsn['charset'] = isset($dsn['charset']) ? $dsn['charset'] : false; + $dsn['appname'] = isset($dsn['appname']) ? $dsn['appname'] : false; + + $connect_function = $persistent ? 'sybase_pconnect' : 'sybase_connect'; + + if ($dsn['username']) { + $this->connection = @$connect_function($dsn['hostspec'], + $dsn['username'], + $dsn['password'], + $dsn['charset'], + $dsn['appname']); + } else { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + 'The DSN did not contain a username.'); + } + + if (!$this->connection) { + return $this->raiseError(DB_ERROR_CONNECT_FAILED, + null, null, null, + @sybase_get_last_message()); + } + + if ($dsn['database']) { + if (!@sybase_select_db($dsn['database'], $this->connection)) { + return $this->raiseError(DB_ERROR_NODBSELECTED, + null, null, null, + @sybase_get_last_message()); + } + $this->_db = $dsn['database']; + } + + return DB_OK; + } + + // }}} + // {{{ disconnect() + + /** + * Disconnects from the database server + * + * @return bool TRUE on success, FALSE on failure + */ + function disconnect() + { + $ret = @sybase_close($this->connection); + $this->connection = null; + return $ret; + } + + // }}} + // {{{ simpleQuery() + + /** + * Sends a query to the database server + * + * @param string the SQL query string + * + * @return mixed + a PHP result resrouce for successful SELECT queries + * + the DB_OK constant for other successful queries + * + a DB_Error object on failure + */ + function simpleQuery($query) + { + $ismanip = DB::isManip($query); + $this->last_query = $query; + if (!@sybase_select_db($this->_db, $this->connection)) { + return $this->sybaseRaiseError(DB_ERROR_NODBSELECTED); + } + $query = $this->modifyQuery($query); + if (!$this->autocommit && $ismanip) { + if ($this->transaction_opcount == 0) { + $result = @sybase_query('BEGIN TRANSACTION', $this->connection); + if (!$result) { + return $this->sybaseRaiseError(); + } + } + $this->transaction_opcount++; + } + $result = @sybase_query($query, $this->connection); + if (!$result) { + return $this->sybaseRaiseError(); + } + if (is_resource($result)) { + return $result; + } + // Determine which queries that should return data, and which + // should return an error code only. + return $ismanip ? DB_OK : $result; + } + + // }}} + // {{{ nextResult() + + /** + * Move the internal sybase result pointer to the next available result + * + * @param a valid sybase result resource + * + * @access public + * + * @return true if a result is available otherwise return false + */ + function nextResult($result) + { + return false; + } + + // }}} + // {{{ fetchInto() + + /** + * Places a row from the result set into the given array + * + * Formating of the array and the data therein are configurable. + * See DB_result::fetchInto() for more information. + * + * This method is not meant to be called directly. Use + * DB_result::fetchInto() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result the query result resource + * @param array $arr the referenced array to put the data in + * @param int $fetchmode how the resulting array should be indexed + * @param int $rownum the row number to fetch (0 = first row) + * + * @return mixed DB_OK on success, NULL when the end of a result set is + * reached or on failure + * + * @see DB_result::fetchInto() + */ + function fetchInto($result, &$arr, $fetchmode, $rownum = null) + { + if ($rownum !== null) { + if (!@sybase_data_seek($result, $rownum)) { + return null; + } + } + if ($fetchmode & DB_FETCHMODE_ASSOC) { + if (function_exists('sybase_fetch_assoc')) { + $arr = @sybase_fetch_assoc($result); + } else { + if ($arr = @sybase_fetch_array($result)) { + foreach ($arr as $key => $value) { + if (is_int($key)) { + unset($arr[$key]); + } + } + } + } + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE && $arr) { + $arr = array_change_key_case($arr, CASE_LOWER); + } + } else { + $arr = @sybase_fetch_row($result); + } + if (!$arr) { + return null; + } + if ($this->options['portability'] & DB_PORTABILITY_RTRIM) { + $this->_rtrimArrayValues($arr); + } + if ($this->options['portability'] & DB_PORTABILITY_NULL_TO_EMPTY) { + $this->_convertNullArrayValuesToEmpty($arr); + } + return DB_OK; + } + + // }}} + // {{{ freeResult() + + /** + * Deletes the result set and frees the memory occupied by the result set + * + * This method is not meant to be called directly. Use + * DB_result::free() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return bool TRUE on success, FALSE if $result is invalid + * + * @see DB_result::free() + */ + function freeResult($result) + { + return @sybase_free_result($result); + } + + // }}} + // {{{ numCols() + + /** + * Gets the number of columns in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numCols() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of columns. A DB_Error object on failure. + * + * @see DB_result::numCols() + */ + function numCols($result) + { + $cols = @sybase_num_fields($result); + if (!$cols) { + return $this->sybaseRaiseError(); + } + return $cols; + } + + // }}} + // {{{ numRows() + + /** + * Gets the number of rows in a result set + * + * This method is not meant to be called directly. Use + * DB_result::numRows() instead. It can't be declared "protected" + * because DB_result is a separate object. + * + * @param resource $result PHP's query result resource + * + * @return int the number of rows. A DB_Error object on failure. + * + * @see DB_result::numRows() + */ + function numRows($result) + { + $rows = @sybase_num_rows($result); + if ($rows === false) { + return $this->sybaseRaiseError(); + } + return $rows; + } + + // }}} + // {{{ affectedRows() + + /** + * Determines the number of rows affected by a data maniuplation query + * + * 0 is returned for queries that don't manipulate data. + * + * @return int the number of rows. A DB_Error object on failure. + */ + function affectedRows() + { + if (DB::isManip($this->last_query)) { + $result = @sybase_affected_rows($this->connection); + } else { + $result = 0; + } + return $result; + } + + // }}} + // {{{ nextId() + + /** + * Returns the next free id in a sequence + * + * @param string $seq_name name of the sequence + * @param boolean $ondemand when true, the seqence is automatically + * created if it does not exist + * + * @return int the next id number in the sequence. + * A DB_Error object on failure. + * + * @see DB_common::nextID(), DB_common::getSequenceName(), + * DB_sybase::createSequence(), DB_sybase::dropSequence() + */ + function nextId($seq_name, $ondemand = true) + { + $seqname = $this->getSequenceName($seq_name); + if (!@sybase_select_db($this->_db, $this->connection)) { + return $this->sybaseRaiseError(DB_ERROR_NODBSELECTED); + } + $repeat = 0; + do { + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $result = $this->query("INSERT INTO $seqname (vapor) VALUES (0)"); + $this->popErrorHandling(); + if ($ondemand && DB::isError($result) && + ($result->getCode() == DB_ERROR || $result->getCode() == DB_ERROR_NOSUCHTABLE)) + { + $repeat = 1; + $result = $this->createSequence($seq_name); + if (DB::isError($result)) { + return $this->raiseError($result); + } + } elseif (!DB::isError($result)) { + $result =& $this->query("SELECT @@IDENTITY FROM $seqname"); + $repeat = 0; + } else { + $repeat = false; + } + } while ($repeat); + if (DB::isError($result)) { + return $this->raiseError($result); + } + $result = $result->fetchRow(DB_FETCHMODE_ORDERED); + return $result[0]; + } + + /** + * Creates a new sequence + * + * @param string $seq_name name of the new sequence + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::createSequence(), DB_common::getSequenceName(), + * DB_sybase::nextID(), DB_sybase::dropSequence() + */ + function createSequence($seq_name) + { + return $this->query('CREATE TABLE ' + . $this->getSequenceName($seq_name) + . ' (id numeric(10, 0) IDENTITY NOT NULL,' + . ' vapor int NULL)'); + } + + // }}} + // {{{ dropSequence() + + /** + * Deletes a sequence + * + * @param string $seq_name name of the sequence to be deleted + * + * @return int DB_OK on success. A DB_Error object on failure. + * + * @see DB_common::dropSequence(), DB_common::getSequenceName(), + * DB_sybase::nextID(), DB_sybase::createSequence() + */ + function dropSequence($seq_name) + { + return $this->query('DROP TABLE ' . $this->getSequenceName($seq_name)); + } + + // }}} + // {{{ autoCommit() + + /** + * Enables or disables automatic commits + * + * @param bool $onoff true turns it on, false turns it off + * + * @return int DB_OK on success. A DB_Error object if the driver + * doesn't support auto-committing transactions. + */ + function autoCommit($onoff = false) + { + // XXX if $this->transaction_opcount > 0, we should probably + // issue a warning here. + $this->autocommit = $onoff ? true : false; + return DB_OK; + } + + // }}} + // {{{ commit() + + /** + * Commits the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function commit() + { + if ($this->transaction_opcount > 0) { + if (!@sybase_select_db($this->_db, $this->connection)) { + return $this->sybaseRaiseError(DB_ERROR_NODBSELECTED); + } + $result = @sybase_query('COMMIT', $this->connection); + $this->transaction_opcount = 0; + if (!$result) { + return $this->sybaseRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ rollback() + + /** + * Reverts the current transaction + * + * @return int DB_OK on success. A DB_Error object on failure. + */ + function rollback() + { + if ($this->transaction_opcount > 0) { + if (!@sybase_select_db($this->_db, $this->connection)) { + return $this->sybaseRaiseError(DB_ERROR_NODBSELECTED); + } + $result = @sybase_query('ROLLBACK', $this->connection); + $this->transaction_opcount = 0; + if (!$result) { + return $this->sybaseRaiseError(); + } + } + return DB_OK; + } + + // }}} + // {{{ sybaseRaiseError() + + /** + * Produces a DB_Error object regarding the current problem + * + * @param int $errno if the error is being manually raised pass a + * DB_ERROR* constant here. If this isn't passed + * the error information gathered from the DBMS. + * + * @return object the DB_Error object + * + * @see DB_common::raiseError(), + * DB_sybase::errorNative(), DB_sybase::errorCode() + */ + function sybaseRaiseError($errno = null) + { + $native = $this->errorNative(); + if ($errno === null) { + $errno = $this->errorCode($native); + } + return $this->raiseError($errno, null, null, null, $native); + } + + // }}} + // {{{ errorNative() + + /** + * Gets the DBMS' native error message produced by the last query + * + * @return string the DBMS' error message + */ + function errorNative() + { + return @sybase_get_last_message(); + } + + // }}} + // {{{ errorCode() + + /** + * Determines PEAR::DB error code from the database's text error message. + * + * @param string $errormsg error message returned from the database + * @return integer an error number from a DB error constant + */ + function errorCode($errormsg) + { + static $error_regexps; + if (!isset($error_regexps)) { + $error_regexps = array( + '/Incorrect syntax near/' + => DB_ERROR_SYNTAX, + '/^Unclosed quote before the character string [\"\'].*[\"\']\./' + => DB_ERROR_SYNTAX, + '/Implicit conversion (from datatype|of NUMERIC value)/i' + => DB_ERROR_INVALID_NUMBER, + '/Cannot drop the table [\"\'].+[\"\'], because it doesn\'t exist in the system catalogs\./' + => DB_ERROR_NOSUCHTABLE, + '/Only the owner of object [\"\'].+[\"\'] or a user with System Administrator \(SA\) role can run this command\./' + => DB_ERROR_ACCESS_VIOLATION, + '/^.+ permission denied on object .+, database .+, owner .+/' + => DB_ERROR_ACCESS_VIOLATION, + '/^.* permission denied, database .+, owner .+/' + => DB_ERROR_ACCESS_VIOLATION, + '/[^.*] not found\./' + => DB_ERROR_NOSUCHTABLE, + '/There is already an object named/' + => DB_ERROR_ALREADY_EXISTS, + '/Invalid column name/' + => DB_ERROR_NOSUCHFIELD, + '/does not allow null values/' + => DB_ERROR_CONSTRAINT_NOT_NULL, + '/Command has been aborted/' + => DB_ERROR_CONSTRAINT, + '/^Cannot drop the index .* because it doesn\'t exist/i' + => DB_ERROR_NOT_FOUND, + '/^There is already an index/i' + => DB_ERROR_ALREADY_EXISTS, + '/^There are fewer columns in the INSERT statement than values specified/i' + => DB_ERROR_VALUE_COUNT_ON_ROW, + ); + } + + foreach ($error_regexps as $regexp => $code) { + if (preg_match($regexp, $errormsg)) { + return $code; + } + } + return DB_ERROR; + } + + // }}} + // {{{ tableInfo() + + /** + * Returns information about a table or a result set + * + * NOTE: only supports 'table' and 'flags' if $result + * is a table name. + * + * @param object|string $result DB_result object from a query or a + * string containing the name of a table. + * While this also accepts a query result + * resource identifier, this behavior is + * deprecated. + * @param int $mode a valid tableInfo mode + * + * @return array an associative array with the information requested. + * A DB_Error object on failure. + * + * @see DB_common::tableInfo() + * @since Method available since Release 1.6.0 + */ + function tableInfo($result, $mode = null) + { + if (is_string($result)) { + /* + * Probably received a table name. + * Create a result resource identifier. + */ + if (!@sybase_select_db($this->_db, $this->connection)) { + return $this->sybaseRaiseError(DB_ERROR_NODBSELECTED); + } + $id = @sybase_query("SELECT * FROM $result WHERE 1=0", + $this->connection); + $got_string = true; + } elseif (isset($result->result)) { + /* + * Probably received a result object. + * Extract the result resource identifier. + */ + $id = $result->result; + $got_string = false; + } else { + /* + * Probably received a result resource identifier. + * Copy it. + * Deprecated. Here for compatibility only. + */ + $id = $result; + $got_string = false; + } + + if (!is_resource($id)) { + return $this->sybaseRaiseError(DB_ERROR_NEED_MORE_DATA); + } + + if ($this->options['portability'] & DB_PORTABILITY_LOWERCASE) { + $case_func = 'strtolower'; + } else { + $case_func = 'strval'; + } + + $count = @sybase_num_fields($id); + $res = array(); + + if ($mode) { + $res['num_fields'] = $count; + } + + for ($i = 0; $i < $count; $i++) { + $f = @sybase_fetch_field($id, $i); + // column_source is often blank + $res[$i] = array( + 'table' => $got_string + ? $case_func($result) + : $case_func($f->column_source), + 'name' => $case_func($f->name), + 'type' => $f->type, + 'len' => $f->max_length, + 'flags' => '', + ); + if ($res[$i]['table']) { + $res[$i]['flags'] = $this->_sybase_field_flags( + $res[$i]['table'], $res[$i]['name']); + } + if ($mode & DB_TABLEINFO_ORDER) { + $res['order'][$res[$i]['name']] = $i; + } + if ($mode & DB_TABLEINFO_ORDERTABLE) { + $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i; + } + } + + // free the result only if we were called on a table + if ($got_string) { + @sybase_free_result($id); + } + return $res; + } + + // }}} + // {{{ _sybase_field_flags() + + /** + * Get the flags for a field + * + * Currently supports: + * + unique_key (unique index, unique check or primary_key) + * + multiple_key (multi-key index) + * + * @param string $table the table name + * @param string $column the field name + * + * @return string space delimited string of flags. Empty string if none. + * + * @access private + */ + function _sybase_field_flags($table, $column) + { + static $tableName = null; + static $flags = array(); + + if ($table != $tableName) { + $flags = array(); + $tableName = $table; + + // get unique/primary keys + $res = $this->getAll("sp_helpindex $table", DB_FETCHMODE_ASSOC); + + if (!isset($res[0]['index_description'])) { + return ''; + } + + foreach ($res as $val) { + $keys = explode(', ', trim($val['index_keys'])); + + if (sizeof($keys) > 1) { + foreach ($keys as $key) { + $this->_add_flag($flags[$key], 'multiple_key'); + } + } + + if (strpos($val['index_description'], 'unique')) { + foreach ($keys as $key) { + $this->_add_flag($flags[$key], 'unique_key'); + } + } + } + + } + + if (array_key_exists($column, $flags)) { + return(implode(' ', $flags[$column])); + } + + return ''; + } + + // }}} + // {{{ _add_flag() + + /** + * Adds a string to the flags array if the flag is not yet in there + * - if there is no flag present the array is created + * + * @param array $array reference of flags array to add a value to + * @param mixed $value value to add to the flag array + * + * @return void + * + * @access private + */ + function _add_flag(&$array, $value) + { + if (!is_array($array)) { + $array = array($value); + } elseif (!in_array($value, $array)) { + array_push($array, $value); + } + } + + // }}} + // {{{ getSpecialQuery() + + /** + * Obtains the query string needed for listing a given type of objects + * + * @param string $type the kind of objects you want to retrieve + * + * @return string the SQL query string or null if the driver doesn't + * support the object type requested + * + * @access protected + * @see DB_common::getListOf() + */ + function getSpecialQuery($type) + { + switch ($type) { + case 'tables': + return "SELECT name FROM sysobjects WHERE type = 'U'" + . ' ORDER BY name'; + case 'views': + return "SELECT name FROM sysobjects WHERE type = 'V'"; + default: + return null; + } + } + + // }}} + +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/File-1.2.0.tgz b/campcaster/src/tools/pear/src/File-1.2.0.tgz deleted file mode 100644 index 9046af2ede3c6594832da174c45c018149eac757..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 15450 zcmV-gJf*`QiwFP!000003+#RUd)qdW@ckM;&;1XG))z^sEQ$KCY$Z*_G`F zj_2-`jC!-gYo*!R+w|+R%URvE!-f@F4UujO;X;0yEm@v;>nm?N^`_Z@9PFuUPVHweoQeIk zLAUTKm`|ssfAj3Xn@&BKjo~9RU5i%(qReaqT;yjZX+UVCKYgFW9vcUTy^5)Mg`ItSkc)TDCc% z6i}D&GN`ltN#L=WC}hKNL)#ylBb$vqpIrj36Cf`;IQ@keQ3vcADthodH6a)L1De32 z`izh4={$ft-x*z+zV)<0PxPLMbi&`WpY0nYf*>4xwE@gTX8S?3)YArkO(}eDVn3Sz z8J;%i7RzoV3)kZknv)D3XF!%Ww(Vz8fYj?Pe&l`37Vk~Xfc;YcrOpoUa~cWA^8+-{ z2#}~lt7Z|g>??cX&9DNu!)EGyuruhqLbBTv_RgG4Tpdv`*Lta9&Byb9Wf1wc z6K7<*0N~BfZ=N>f1AYiXOagz0C?NO~zIVOQ4xT+`FPx9IB?Sx)a?}Ig9PXbm5HhSn zm91`k$4twDgfEU>9u7{APtFD>`>&rLzhYC*vRMV&MM(r*cJMZICjEW@eSUO#_%WHGcR+?iN!Kr-JxYw*FDop@e&`<&r)_T2GT%Eu{m z+l)@IKMcIdJX|3!w67UDSN3W|f>Cp_T234;kKEM=JaK|>B?mV>F{iasR+$MkA#74E ze@Lmr0Y=EYsnrElZm-nr8eOwB?2WD6&ZyG{n_+uA?lp(arroi2jJ8?^YNApK=D{29 z_PV=6V>E2pHo)EXfm-A3VRvVDXFTri_J+OD?snHOhC2Wh>fPy%Bv8y1oX<=j z#{8uKkB0VWY>ZllZFEel*BWo{4m-WpsMTpUcXvlSNx=BGJ_@cDg55Pcz0PnnYBq<) zuw!huheNB?gd20T-5GW5Bv>TH8G>F08`Qc zN`eLgpEsKZLJk*#HhQgLbKEn`rZuvyUbkZpTc%-*$2+^D?UB*ZgIK3K#$uVHhYG>v)j}`ZZC&)8x*~cHQH|XY_kXbtz&dM zo!ze4X^!ntr@NyEy$sUZKnwu4-Q2M)YrE5FTDCph8C&*lyWQH^(L(MlhxGP#b9*#u zja$aHVVPrVr)%52;kY**8qhnN+D7awh4iS|24T3{8@F5A=FVscE!TxR%Qg%UAg!?u za(6kTckG>Rv$t!EI@Y+;?2Vhfw$$qdbb;27q@w^#AiN{V> zk;7t@U0>Sh*03j5z)ar;D+K<8_|pD3vqzL#SS}K>%*=?u(PzRxwnq{qE~e_qLAQ{w z&DQM*JG4VnPu3rSpnqw%w>wZ}s7ejB25&7j=zOIboY?=IJ3h1mr<8}jud34FfzBh%&15?~(?@ZS+Z{UwZR%+CwF)6lU9t`?$PaHDx=5EL) z=)rO!n_w1GVHW9eA_)6r#J(~|?C|&{3+A&KurI3|yAxzf6F+(`)r71{@~mAt7njJ# zasIJ=%~=ga49RrCcm(ouH0vYKNDeg^V7?epDKsjvB{t!$TkRq2nR% z%N!_2kyhrF=}b_@Cz_vC0{A; z1Z?h75$GBgUlAmH#uA{$o{N6u$$aWYUf^mCYv^4E%;2)0%^(+4kT6Xa!pwkO+kh|p z0yJ!GAk^5oV3-EL)VMd=^;lqoDPV?BpUU;60}=6Syl)Ml5^LeO4Bi@+1yU?MOV1P<0@suERD15y$}LFPH`KS1U|7LGr*<0j&2 zDulp#`h*D73oxEQ8>7Sw*D~lBc|D~A-DJz?t*fUf!mYJqG+E^Us*n8wMj$HT5DsA9iWSI1Ql}UGgi4WgK%<#&d#GLG||*{u@m6{2g08H1$6Wl z=l!J5r~)k}-$r6|RWdf~xx%xJ(x$buE}f1OBoZVz#^C&oDs{^BdYQ(+^1sVcJgC05 zO0~XvJ#(chXeZsR*7myUd16B`A@&?{Xa}GdIAaF{B$N!53PRu(to@t@-2wHT{n^ZR zEf8nYeY1KsbGrmpvw6$0Fu$768Bki0+(}en9+(&Q>iFlH7##mw4u1LgpVAj55Lpf1 zW_`DitvXw+&U!>pYz~<-5Un67xZ%Q?XzT&)*|iVf0F~A2Qp7u*t>*4}>T(2Hp<_;# zBK^~bVw*mdQ{2xszV%f8N*9W=Et-pKNSEo_%P5ZjX!m;ChKT>z?zMW`@UGVcYjEv& z++W%2>G#m$8;!^8%9-{-M+(tugy9Y(5rcn0=*{*zEVy*W;k9Fhm-yg~!{}3=J#K73 z{>K~aF^!G*i~rDo6dgBU9U4Kq@E$+CJUTdheR|kuXQ);N-rUE?2!|9xFi3}_!NFK1 zvNNYFegkRY7c8{CM3^eXa&rN#ZVrBi=2{2ZTFfhyErvZSP3kg>D0CykZqHj zx}fzBXa!whOblGIeSVN}IEk0$95ipAcgjQn35e%pz{s;qdKu`!o+^PI*<`5*2=-Ks zc;LygB0iZ5jFFT_8xuIiX8Qyvpj3h;1axupu|%r?I}r@YUU(h+a@uE`M^>LnDOkH= zAQpEKhi;?UZnT@s*y*?0{q7D!tl8nm8QT=dxF49fbb(NU+6_VJxW5R$Q9!OC`r`99 z1J8vnQO4H@rTiqyf`qW_u{ocF%$-k%+%qz~fq{yQ9n|~D(*wYqF{?a;#9%^Nl`_RP zJU@J~|MunC;N)=s`RURB9G0t9_B)MsJY8P08Vcx6jfMW)u0GlLoWN&lesreuX%RkT z#|C*=z1shE@bc*O;UcuM>1u4p*o7u)YEXN33HBWt-qPLy;d1HC!LT0UQywxej}QKO zI`|QPa?nsy@NzY!zd}VDdM`TvR6>x$kD|T^fn@!TpYyr_*s?z?M_}`S!e^KC@_65@UdQ7^(S*=#-pfz1*lld4Mmfcm;KqITfKARnEGAmV=Y z4cm4n;SLdws2q9weJW^wGN}Ml;M>piH(i^bu`yAms)*K6D=`!Am}}b> z#iR~xh9;P8)g%niIlIkYJwJem_^m>VFaL$gLh&_Kxjk05dCj!1z%gQ^5V0tS^9 z%0pfg*OqXB|3aMdvg&zsN)rlO9G!ZML2Ds2wi%WELf-J&fJn0PbCF|1N-wfKxeuHi zy_sxNvRxq?b@sEH8O_kp0~dZ#4ql@;2XfnhVsnsA-1q7E$u@u?oh!AFBA8Rf^?dPY zaADKbp@`Y3M3t}c8r1}bdu(h@0z1t?l>Cik+dcLOv7;cMQ|dBre2ml#Z$NHALKMzw zhO*$eh~J3k8tk3pwp%CxN5BqS4(Lp7;Gm~3N`%Aa@#)~*(d*~O?@p@>}M?k+;U4>CzilgRH zTL>Xt-Nb{6z0lIr%t-f^9ng#+f=mG55oWBisq{K={hq-a8;B)Uhkhnef=D!nHpQvO zO1bg(`gfJ@pFX77hyHovywPxgN8)y3j~;2EMP$R21Ku7=^QH-;UZOj3K8@qtDijOF zEYIe1I|Q>Iqf%0MM!h~~-VT9DK4cRwA{|#>vcyXzBi$*V#J8shDWJf8IEbT>xMViG zib?5kLQ1$x&=RjKJ?Sm8LHJ}*1$6?tIQ&JhD&{M3z=7$~^aV6v7@Jr4j3eX6c8Dqq-$jAM?y_6ILtvhWufD*1z z-k)TlE;o=;%Cd&uKaBCyB1(&aT}yC|#d~b#M+?BD=o|IZv=wrjcIEOzj<#GuE)XBQ z(A&U2AR`?6deq=W@Qav6l(7_*KC_LqR(%3h49E&}Ly$A^QZf!V03A8fWZwot{YIS) z=e5E50G%1A9eE!Mv|efAi1+zQ?`!y>ct2pc68xNSUPpRAiQeXgNdha;D2rJ_HD2V2@Lh1Y|nrf}wTM zxWpS`Szb*uXQ9d~aW0qRWY?GYPE_n6R%|#QLz-xo-BJmw_1fjh7$g|4rW5cwBJ3if z;P;}M@(R@VQVDakdo*}sg;=QfI;%KS!$`jCESD^~KWjQX@7JcB0|!=5yDeo58(7J) zFM)Ifva7YE<`V>)f%7lYyqdMhaiEySW|3L^1q1}r^#W?f(fW}pCo+6_gE*ER6m=vb zDtPRXWrk(~jm-59iAEtnqB!0U<})bb@c2c(z)46Os`p-D=g1RA+~t%USTsC`U8#xc z2bGoXK?3)<%j(3TY7L7KNO`;IOH<-{H%oebAf(hReXM)tRL>H`QXxm95D{j_rh_m z>!k+OE72>l+BIoeWPAimXfdmGBGuuS?K`@D^EpxKmcbPuUU}4jWYuO-rJ$K6Xg1;4qQ^YXJ}8goHUlS0GKICHvB! zPxV$=m%>-0>IwBaR#A$T>;uTSw3eM2lhm9>a!ksXZkjfMikk`9@Kr?>;=vA7WGK&) zatdcVuM;z;U$Vh#*y6^*$pNZBrfspJe_r8~lu5iU#j6%CtHEiFIpAy?Ow=opi| ze8DQi8#$d&{Q}*3@hC`r?WGV}((ZsBozjFCjEYoO#sxl3U;+T!AwiLv2*Yll9)Svm zXn!)Mcrg^27`EuM;3f#|DJ_^ny4Km-*GIns)113F32otGD0qODq4kP*yI^FN5-s$^ z;GFbOuFI6bm4u_ooVPsj006`KRrR8cS}rTwh=&S>a-!HC@TOb(qYvzn)sYzBi685{ zB41*Zzmugw(Z{}h?O+g*sYdxoYaIp{KaBl>Yv|Hvf*)0jrBFAOipMqj<|&*(;l-Hx$QGtgXGHPnS(egEcR_IiVYL| zk!iIn&$0Ba5yyn3=zo_9$}bZvGI=gW1y=)H*?)45LAfY?I=0 z5>$jA?UgC9v!%YaNb+w;~enEA4jSmJ(NL5=#$wG-qRNtt;ut(g7- zU0sBdEE8gvBcx-&nrwLmYaB|Jj(E_sUmBU5sw8_z+2~x+_iz#rt8fN*&ZSYKTNbZj7kJ zuPE~j862}EuU>PxLF>YbM+u4S>#9@=>dMvNyTvZ71jvswTO?gm4P?oAAu~&0j!(;? zPH8tq%rG#VJD*I}Sd|3$)tf`z-(x|&l%#9rtPI?hE0f%)WkGckiKT?{fy2L^pjZlp zmH8DnsF^KC36XGRS-)!a^U96t47CaSrJc1 zNW4CNjcdbE)`9HJem^<<S(_|-#-)Icl71c5f_-k z*oFjD!L4LfUy3EZ1yy}{bb2-l!JGVhLFw_8wBv?D~k$hC~opz$N?vxi_By0|`YG@Vs|TL;Id zxT%8U0)Tc^Eb(VjE)IlPl+URXi{|hZHwKQD_SfSD`l(rjyan;Rgx}NpkP`CF-6yD3 zkQo^AhzyiHq%ts4INqRbR>zrC9|hY#JicQk!J^e60h`Vzp@SPZMw$uVUsG%(S!e&x z!%%O&5g3A(hlWIeqKq{;VJ^0qkit`=UtwSgabec)B1&L*CfY;MttOT@O37?9y?6R~ed1A`w9 z`scJkgxK{JRS=mS8au#kyJu>$2=lAw!WXAb8KWy4e<|QH zDXSx6V{?^nRn#dp2zJn=ic^!XP~_?1325ibHA^z>txLE?0jt1Yu8GpA??AHU8%mdB z$$|xpayn&lZYAku2ul=q6`K@0$KR^F;-l)dK7xY$Mo!^^WTSG$&?4jh#e;07WPoVV>Rpo>S zt)X%$5Prp+ig!d?vp}(>V#rPK=n+p$26y~A*E=ASNDTA*1R4mMZJ%_ZP#I|sL?8I}%r?Uc z9r;jaYHNz{RYV3FpsqK)5$oJ(N$l*%fV{_7u08)lAP;GAx5%4dMIo_Q z5ArP#0DHR@9QB4;w)orz#>q(bJmrgv{fra{jJBxhU(E5`DpVeZH8NS^vj{0xK)5aK zD|0e8#jZ#^2sm0w!0SL(sqN#@Z9#mnp+~bi(0b(PbV8biC%5I)vz+lw!e<#-#&pst zna8oqyw2DesQjZ#$G+mR%%C@85%zeD;Sabk0YBo6BSk?AK|fvhrz7Yt&!Q&^>5y5X z0OnEUk+QSv?=k_gK;%TACJVhe9@>-Lu=lar%1Su@W62DU*(MMkw--+`kv#Gd=1~RGCWA$>QTo-V1bT0g@R2~XQs2pS}L=h2HNcZWJ zb_}PhA|U8NU&I7c+1PQcd|<*5bK`!gzlR%pk^TFdW3cr2v^$UJg1kJ2b3I!01aiP@#I z>k!3Jn8#QxqEOnVr-Wk?5DZBGoq*&ia^zq}wrL2*q3GI2-Ptl&2tx>XkVZxkHUr!o z#g~f-gT=UUxQ|#mf-GG~a5*23CmOi7tI8%xM&T2b29Z(kjr93A8)MxtaAM`?AEF1cD;EYpU&3~8x>xk-!P zxdNFa6(_u!24AGoP!p?Z@Wm=UipPYe@icwjuzpQxkM}bBzm0?gw}3G;`Ln*?xaoa6 zz;nim938-%u|IgMu`LloOc?U&<`yWqlIJQMIru3V6i9i9=KuxrfZEju5w5v^DpKn| z$sr{+nQ{$)hz7W&r+v*s+wC;2`PnEolbf-g;4{U*ZXfI$&TyJO zooJo+m^9_lNL4{af9dVKlVT#TdqX;IQIq9F1!PsPkD=lgjcK|?xwj~wI+0;CcBS=3 z-fd7+%khj+85CA}%*0P{^&)DPJ%Uuh@@r_w)R`W^;+p4DDO;hYS|`wfsmRbiRGT)n_Uj99_=d@1&y+&fdbM(SF0R&)2YeC zE)=%KelaI=u&`^?^!#K{B!0L-eset96!kp>g1hI{H?Wwqhe>A5v zu^#EUHGmy4Zj(zP61bTxlsvR)XGF>G^Kdo~;U%Bi zpxsw|dj`fwz@eOmpyr9`k02B&pv0eE9{;%i@|1TWi-$7~fF87y(Mw3mH!-PF#ojr= zrKs33P47%?;3+Er>^|@fXlX;W8sAq?+`IGX3&);Vfp|Fat^I!EHycNph0)v^2o9}o&qBf)5n;j7=KSAO}xHww&=8s^{V+NH=wM6s?GWM>%OIfbltyN_2J;t<3YGRf(VES_<^L zXE*(UH1?R*KN2V>q!k&i7ac54yChvqyrDS}E$P#!Y=f!5$p}*Xf?9+Z&m&W1MTH$I zEZR+uAWC^#)H^`IBNGc%n`~B5Q>q;Qo{m0>Yr)~B?aD@jpNX5O%Aq*kDyoTGb0X^z zO5{{HzyA8GkZ*EFr&BxR=kOv8dGmdrv{i(}dS4#U#B(CDd6Z!wd7_fsl$Q$>Jjm=O z2|;*k9&I8{d|6KtJLs?8NSQr|*-;eE3xq2Uz1J{t`m|>(r1D5M882SLsCL!8U8 z21Q*;nxGSVmOJed7y1gShU}#br9>Baz7MR{}5LH(ZiuaXV>EtrK6xzS&Dcw7p4d?m8dyp~fj_0dICI%ZyCqA_J8~aindu zSD|GGBj1@}yORWRNShZ*Otk7HXE-GY)YruJ@QFRnb7Wse^yy*KzKUm;{N#8TCE=-J zf9$6ZSM@SG!B>+Q3ufXGEBn0C@uBE`!2quq9l|@yYoOaFoely_iPbnzj+YiN-SmY_ z#Yyr+*TEtHd{5CFzQB2nG!VR$nT!M!-S8S)HGJTZ;|7=hN#w*Rt(Pw`pykGOfw`wX31hwbksL*l}|SfO;OFB zB&9^&@xqTDF}ZCt7Z2Pb%n`*870jX&mt+GM2;qX|L#y6^xXp~zIwwbEx#o>UVI62-;wQt~4=;A`$! zBrw8=EJ`RAk7Zsb%i1!OR0}6Uh@wV~Z5c&6zKW=3K%=AC7@E-Xd=Zm&T3Q2gGt`c$wB5g_$DL=!i!{oobf^hoRnOwAVylXvOmP)Kt5l6J z99DjyN+~b6j<1bQRr2_WJivR^Y9hTZHaF(9q-L(60M$}v&=DC(M1D#ekA;axzYL5~ zrtY-LF-erj?8=F1&F>=-`s$uVDp5z0T)DtO_*1~LN?Y8;ti}3jM@`o(vK*1ys_fYw zL8=yp1XJ4IlNq-tpE^cWwE*y&@lL1Q=SE6n7q@MG^p!l%2>yCBOGB$;<3l^^ zS_ndLVpl3UPlSYGELQbxBdT|M?vj{B0 zfB#!zz>RcNCuSfYF4yA{BJ z2+?NJt^&}HMoAf;Gav|^P8tQg$(kvfpr9mDc-$*wn8V|j$+LgoqCSRiEAe@#X(XkV zwg|!0!t4s30Ql+LuWsV1YH=DKjWJ7MeTQC*SgY;JC2tP)3%Yw=Wy|GkYCIKdc?~ZM zHKihE%)G=A_oUJH3#WIaLXJAX}KL^d-Mg;0*PU3?%kKg+>5({pL99p({^ zodiMhQ;QPB4yRO(DCl9v!pK0;m|2w+X&+`9I}1ikgwJgM(wqfx^hP$?0$vFZA3@VV zQg+NJefm9FfzS2FzpK2YJj)cH-j*bXWq>cT5yt`O#JqoO85mwC8xNt?*y-WnUk3+o z)5~P=$~u=b4x6;69P{HamPTOdLIl~e0dEvlVBeBtTm4|t8r76hjE$j7kOUZHUTad{T zuM<*Loh8p4mQL}+8GG78vLlhokzcny#wV+9tB|cx;Jy1J%eqa@RY{vf zIm=g^+nYo(=L}yF$P`5r$+1ap2e;5aDv+tCH67e7CLR%BRl zzcJK4%?W7pFNHs;HMd7k4Qg3D7ff_doWV}_x0*69ADAwSPhb~kt`}}6uABv#mW0nm zXtY>&f$`D&NcG5mq)4K4Rc_m`qK+;V5_B3Rx-IqClF4ilxb-b(<;CXMYTR zQ$5szOoZUln@=np%PC-w$6?p?wq_hpSZr~o;>D%7A_PwDnX-hvK=S=C#xNb3x$NgI zhtrFq1F9Cbb9A7xIQmn6>?dx=6(h!n%<>aFVXTjTYKgPP)wI%8hws!%s_DhPcIw2U zY7d{!2WqT7*5PibLDr{1nNmC%6M>CML&ZaHAap6V9^>Mw_)cja5hY_h6 z$O?cfq!y>|j3>@aLQYeYH(-=WROEwwBQyM_Wo3yj&z_RY_`AmlM)W;Skaqs15dSU_ z;-OBM5>!l-l-y@%EATDEeSYAF8u&w_I36Aa-0Q|hGRd(n7h`d0A~C3^rSn8c3fBcP zF~mAi)V-}F>fTLQq&A8zeL@OV-ix~YR;@o)9`IZ2|6W+bOa(KAC6ARVeJTQX9&CPk8)S)=0Qv_e;OBIAibLXg ziHa%4_x4K8whIUCJ5*K8As*%w`Zv;Zr0U)!9-~@{mn=!&Rvi6{N6UWy>{~BNzrViP zrR@IzJt_?X1CYw^?IEyylHMXJ8W&`-(UF`-~T~wiyfIR zjysynEqj3P(eQ|r>%@mzd`5P;UZ;ZwS*cIJ(1g?+fGt+w^HuMSL$UN6WLj5SV7tb-oPueLHS!QH0f=*R2DBqP(JO!NTxU*1`6eFc*6nC`8gve1odkk zT=HP2CmWlle?bAD(V;!~0v#{h9SdLZ1``qC0Ar+A1b*7-69NSM2(;?2p? z>$4gwU7J20L)mBl6`;!;XeCJ#8}d2_0;Ck7Tk&M>GAj>gDCBM;W$24@3U3nqD4tn$ z){75fGv9H;fgigDaf6&I(;rxKJj+6)=WcYICcPhOzWJ4r|M<5)3a-{z#v=LOY#X@c zPj|c9Z8v+{_@>qEu{C0Ff8||cBa-R0%tP0;kTHyv@x-R0D-_y>p{Kr z0B_nGPCzTCjR)eUC2!jDrn7;oH(HRDep?SPGu^iNPlx|>`Omfl*@|ICKwA;iR)-LR zDz=RW@~#!#MToT{DD4=v2uhnH2RS;%19{hq?%L5^C%WrO$ejpsCxYCGYu))%Z)$db zEq!I=KfXYp%^EF$V)@@P-~y3vY&W}|ZqMj|{D&a{(%)ZS{^I&SXvNI6ZHv!sv57bO z;0OV`VcBEHwJT-5N&NA_Urz@=;!jx|09a!}cTR78_4Avzt`jcY{VLuyhg^lU|0t-g zBKrVe9^hh3v7b&fg(h=UHpR&mW%;I@IYSP2NZNXq2FY_K&l^z}qGP&Knm)`N?kg9N z2cdEfjxYl-Fa&4+l5r+@u$XdNY8tIJs64%$-4afBG@I2r4|jok#k&(7h9wJ9_QOr% z`V!k|J(z0HyCqIgz}r~{8_^P>ZTio>Yj?p?Z+R%EG(pOwoQ5AmoXX*lQq81^^+>z( zEXS^t4osK!0HU>U2(`~j^+ZTe4t%h4@eC6@YXm;M;=909s?~&-SjSIsl~W|)6(r9d zZAzxN`_KZTli>oT>ilHaxr$2Ejs4oeO8(1l7;#j?YR$qkFH`iI zfUZuaBB(qI>hPCAg|MkJ|-b4ohGj?e=vA?bXkEYe2`F!Of(FN`sSi) z@PR51!lK;ecx)*b;89d}E--H0aW;oHVRXugR_rLK={x!4PEeVUS)OCd#+`Dv?v%TIr`(-8>a* zP0BACdvJefaJeIjzEe{4@E+3@rl2>m-3yu(PplP8MZoFmz%wQUN(yhe zjByb)?jhYn`lgWdgB=Z4Ut*|R*>AD@0II9eaPCYjI+Z$8DG?Z>Iry#|cvHKa-0kD} z(aGV#+40HW2B(K__D}ZV_Nyl-U)zpvmFs^5Tr>&lWeOeAp;wHu$`sgOxQ1Gu6tBxD z+DtT)ph}IGUMu7O3%d&yBYR8CB;v&5e0~Z(I5RrZUAK7W_!Q6WdVc)wG#gp3v8Y7a z$gYZDmk;{q=kjYNaQyb5)(EVjgQVXDS_gU__>BNGaGTCr(Uj0grC7%M9)vW`PiJ^S zcBY&2L#BB-YPup%wmiWZ{(z2BQXfkN%pt&ISsEESou%>M35yU>=Lrx(5ob zUoG}P0dLyjD6c^Ni9jz2?>R8mb7T!YMCCK_puA5t$_j!X`4KqU@$>3(1r&>V6ISLb zEee;GxC)pRi(1$yIiM{;uLSf(z7`&GoE73e9>%uEVnVa;WU}H8&cW7Xt4JS}NoFewQ0S(2|P@;1uXyD4>M!mr+z677;mq(y(TPVLv z6BEc8pXvKZghK$#xm&>#YSs9N(>cwJ#32dKP+e{_4qnAn%{{%EW&ioc_{i zHVur<3D;D{g81K-(Z%?$R&%?(-D&gnADx!L)>QiaRdj7_ogJQ@ZEbDHaDTpFlOnEw z4f^bbvZ9q?fNE-A(yc8tv;lxPNwmR_T9hnAXDznGQH!mHvBM0bZ|wHlZAJ$~inA8Q z0ism)*z@T`&aM3A4%PH`IT@Zkfib=8M6Tl~BZi~k3f?Wfx?+PCIIt3b-KX7uqBRd< zb%RJk-!?XBXLx0)v|OLz+siJ_AQ1cjb;v|3Dnt>eYNT+$v{1_T&!AZje|-ZsF}5tn zc7rxT+~7`(_k4xMZ?v$6zu`-apD}K6zo+19dQsY_ZfsCtNf1r?x*s2x4p-7eB9agb zF=NX}el!vvTgi{D#K(5>V>|J&6T1kwx*#AgjajP*vsMviEj?x#gj%;ls9l6mTaVCE zc(iYaM@NsxD#cg7wV=Ddv{&x_b7nywXE2sarzN-Ge-OB3! z_v^pE%2llYw^I85ly4@rl>XoP!|VU8d;R}j|Nj#DzxD9e$@CUkb`hWW?>i=N=XZ8Pk`~T})#rl7{&)zw% zwaJT%IW{zuQ~tUGc^9c`~Lq`u44VK+m|P6<*R?)Sp93q z>fbIiTK!hL-`e^1>Rd`S}vx+zj7x`OhiqVV1&Wc zoK?!Q@o;IqP}}bn`#+Up4^01ORPC3#a>xH~t^ePz|M@D{ZT-J1xPOKBcNypJx2DGb zy-VBw=?=G1Sx*^@{J%z1?f*S|W3=0BJ%!(2g;!SX-`LAs;@Cqn3Km}ns8QP%W3Ta$ zKG0*=KtW zGH`Q!1&h^yUE}%jP^C6gBQuI}a1wM_;78h`u_j` Q0RR630EUUH+5k=g0F-?Zg8%>k diff --git a/campcaster/src/tools/pear/src/File.php b/campcaster/src/tools/pear/src/File.php new file mode 100644 index 000000000..b474ccfce --- /dev/null +++ b/campcaster/src/tools/pear/src/File.php @@ -0,0 +1,534 @@ + + * @author Tal Peer + * @author Michael Wallner + * @copyright 2002-2005 The Authors + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: File.php,v 1.31 2005/07/21 07:53:09 mike Exp $ + * @link http://pear.php.net/package/File + */ + +/** + * Requires PEAR + */ +require_once 'PEAR.php'; + +/** + * The default number of bytes for reading + */ +if (!defined('FILE_DEFAULT_READSIZE')) { + define('FILE_DEFAULT_READSIZE', 1024, true); +} + +/** + * The maximum number of bytes for reading lines + */ +if (!defined('FILE_MAX_LINE_READSIZE')) { + define('FILE_MAX_LINE_READSIZE', 40960, true); +} + +/** + * Whether file locks should block + */ +if (!defined('FILE_LOCKS_BLOCK')) { + define('FILE_LOCKS_BLOCK', true, true); +} + +/** + * Mode to use for reading from files + */ +define('FILE_MODE_READ', 'rb', true); + +/** + * Mode to use for truncating files, then writing + */ +define('FILE_MODE_WRITE', 'wb', true); + +/** + * Mode to use for appending to files + */ +define('FILE_MODE_APPEND', 'ab', true); + +/** + * Use this when a shared (read) lock is required + */ +define('FILE_LOCK_SHARED', LOCK_SH | (FILE_LOCKS_BLOCK ? 0 : LOCK_NB), true); + +/** + * Use this when an exclusive (write) lock is required + */ +define('FILE_LOCK_EXCLUSIVE', LOCK_EX | (FILE_LOCKS_BLOCK ? 0 : LOCK_NB), true); + +/** + * Class for handling files + * + * A class with common functions for writing, + * reading and handling files and directories + * + * @author Richard Heyes + * @author Tal Peer + * @author Michael Wallner + * @access public + * @package File + * + * @static + */ +class File extends PEAR +{ + /** + * Destructor + * + * Unlocks any locked file pointers and closes all filepointers + * + * @access private + */ + function _File() + { + File::closeAll(); + } + + /** + * Handles file pointers. If a file pointer needs to be opened, + * it will be. If it already exists (based on filename and mode) + * then the existing one will be returned. + * + * @access private + * @param string $filename Filename to be used + * @param string $mode Mode to open the file in + * @param mixed $lock Type of lock to use + * @return mixed PEAR_Error on error or file pointer resource on success + */ + function &_getFilePointer($filename, $mode, $lock = false) + { + $filePointers = &PEAR::getStaticProperty('File', 'filePointers'); + + // Win32 is case-insensitive + if (OS_WINDOWS) { + $filename = strToLower($filename); + } + + // check if file pointer already exists + if ( !isset($filePointers[$filename][$mode]) || + !is_resource($filePointers[$filename][$mode])) { + + // check if we can open the file in the desired mode + switch ($mode) + { + case FILE_MODE_READ: + if ( !preg_match('/^.+(? $modes) { + foreach (array_keys($modes) as $mode) { + if (is_resource($filePointers[$fname][$mode])) { + @fclose($filePointers[$fname][$mode]); + } + unset($filePointers[$fname][$mode]); + } + } + } + } + + /** + * This closes an open file pointer + * + * @access public + * @param string $filename The filename that was opened + * @param string $mode Mode the file was opened in + * @return mixed PEAR Error on error, true otherwise + */ + function close($filename, $mode) + { + $filePointers = &PEAR::getStaticProperty('File', 'filePointers'); + + if (OS_WINDOWS) { + $filename = strToLower($filename); + } + if (!isset($filePointers[$filename][$mode])) { + return true; + } + + $fp = $filePointers[$filename][$mode]; + unset($filePointers[$filename][$mode]); + + if (is_resource($fp)) { + // unlock file + @flock($fp, LOCK_UN); + // close file + if (!@fclose($fp)) { + return PEAR::raiseError("Cannot close file: $filename"); + } + } + + return true; + } + + /** + * This unlocks a locked file pointer. + * + * @access public + * @param string $filename The filename that was opened + * @param string $mode Mode the file was opened in + * @return mixed PEAR Error on error, true otherwise + */ + function unlock($filename, $mode) + { + if (PEAR::isError($fp = &File::_getFilePointer($filename, $mode))) { + return $fp; + } + if (!@flock($fp, LOCK_UN)) { + return PEAR::raiseError("Cacnnot unlock file: $filename"); + } + return true; + } + + /** + * @deprecated + */ + function stripTrailingSeparators($path, $separator = DIRECTORY_SEPARATOR) + { + return rtrim($path, $separator); + } + + /** + * @deprecated + */ + function stripLeadingSeparators($path, $separator = DIRECTORY_SEPARATOR) + { + return ltrim($path, $separator); + } + + /** + * @deprecated Use File_Util::buildPath() instead. + */ + function buildPath($parts, $separator = DIRECTORY_SEPARATOR) + { + require_once 'File/Util.php'; + return File_Util::buildPath($parts, $separator); + } + + /** + * @deprecated Use File_Util::skipRoot() instead. + */ + function skipRoot($path) + { + require_once 'File/Util.php'; + return File_Util::skipRoot($path); + } + + /** + * @deprecated Use File_Util::tmpDir() instead. + */ + function getTempDir() + { + require_once 'File/Util.php'; + return File_Util::tmpDir(); + } + + /** + * @deprecated Use File_Util::tmpFile() instead. + */ + function getTempFile($dirname = null) + { + require_once 'File/Util.php'; + return File_Util::tmpFile($dirname); + } + + /** + * @deprecated Use File_Util::isAbsolute() instead. + */ + function isAbsolute($path) + { + require_once 'File/Util.php'; + return File_Util::isAbsolute($path); + } + + /** + * @deprecated Use File_Util::relativePath() instead. + */ + function relativePath($path, $root, $separator = DIRECTORY_SEPARATOR) + { + require_once 'File/Util.php'; + return File_Util::relativePath($path, $root, $separator); + } + + /** + * @deprecated Use File_Util::realpath() instead. + */ + function realpath($path, $separator = DIRECTORY_SEPARATOR) + { + require_once 'File/Util.php'; + return File_Util::realpath($path, $separator); + } +} + +PEAR::registerShutdownFunc(array('File', '_File')); + +?> diff --git a/campcaster/src/tools/pear/src/File/CSV.php b/campcaster/src/tools/pear/src/File/CSV.php new file mode 100644 index 000000000..1e154136a --- /dev/null +++ b/campcaster/src/tools/pear/src/File/CSV.php @@ -0,0 +1,514 @@ + + * @author Helgi Þormar + * @copyright 2004-2005 The Authors + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: CSV.php,v 1.24 2005/08/09 08:16:02 dufuz Exp $ + * @link http://pear.php.net/package/File + */ + +require_once 'PEAR.php'; +require_once 'File.php'; + +/** +* File class for handling CSV files (Comma Separated Values), a common format +* for exchanging data. +* +* TODO: +* - Usage example and Doc +* - Use getPointer() in discoverFormat +* - Add a line counter for being able to output better error reports +* - Store the last error in GLOBALS and add File_CSV::getLastError() +* +* Wish: +* - Other methods like readAll(), writeAll(), numFields(), numRows() +* - Try to detect if a CSV has header or not in discoverFormat() +* +* Known Bugs: +* (they has been analyzed but for the moment the impact in the speed for +* properly handle this uncommon cases is too high and won't be supported) +* - A field which is composed only by a single quoted separator (ie -> ;";";) +* is not handled properly +* - When there is exactly one field minus than the expected number and there +* is a field with a separator inside, the parser will throw the "wrong count" error +* +* @author Tomas V.V.Cox +* @author Helgi Þormar +* @package File +*/ +class File_CSV +{ + /** + * This raiseError method works in a different way. It will always return + * false (an error occurred) but it will call PEAR::raiseError() before + * it. If no default PEAR global handler is set, will trigger an error. + * + * @param string $error The error message + * @return bool always false + */ + function raiseError($error) + { + // If a default PEAR Error handler is not set trigger the error + // XXX Add a PEAR::isSetHandler() method? + if ($GLOBALS['_PEAR_default_error_mode'] == PEAR_ERROR_RETURN) { + PEAR::raiseError($error, null, PEAR_ERROR_TRIGGER, E_USER_WARNING); + } else { + PEAR::raiseError($error); + } + return false; + } + + /** + * Checks the configuration given by the user + * + * @access private + * @param string &$error The error will be written here if any + * @param array &$conf The configuration assoc array + * @return string error Returns a error message + */ + function _conf(&$error, &$conf) + { + // check conf + if (!is_array($conf)) { + return $error = 'Invalid configuration'; + } + + if (!isset($conf['fields']) || !is_numeric($conf['fields'])) { + return $error = 'The number of fields must be numeric (the "fields" key)'; + } + + if (isset($conf['sep'])) { + if (strlen($conf['sep']) != 1) { + return $error = 'Separator can only be one char'; + } + } elseif ($conf['fields'] > 1) { + return $error = 'Missing separator (the "sep" key)'; + } + + if (isset($conf['quote'])) { + if (strlen($conf['quote']) != 1) { + return $error = 'The quote char must be one char (the "quote" key)'; + } + } else { + $conf['quote'] = null; + } + + if (!isset($conf['crlf'])) { + $conf['crlf'] = "\n"; + } + + if (!isset($conf['eol2unix'])) { + $conf['eol2unix'] = true; + } + } + + /** + * Return or create the file descriptor associated with a file + * + * @param string $file The name of the file + * @param array &$conf The configuration + * @param string $mode The open node (ex: FILE_MODE_READ or FILE_MODE_WRITE) + * @param boolean $reset if passed as true and resource for the file exists + * than the file pointer will be moved to the beginning + * + * @return mixed A file resource or false + */ + function getPointer($file, &$conf, $mode = FILE_MODE_READ, $reset = false) + { + static $resources = array(); + static $config; + if (isset($resources[$file])) { + $conf = $config; + if ($reset) { + fseek($resources[$file], 0); + } + return $resources[$file]; + } + File_CSV::_conf($error, $conf); + if ($error) { + return File_CSV::raiseError($error); + } + $config = $conf; + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $fp = &File::_getFilePointer($file, $mode); + PEAR::popErrorHandling(); + if (PEAR::isError($fp)) { + return File_CSV::raiseError($fp); + } + $resources[$file] = $fp; + + if ($mode == FILE_MODE_READ && !empty($conf['header'])) { + if (!File_CSV::read($file, $conf)) { + return false; + } + } + return $fp; + } + + /** + * Unquote data + * + * @param string $field The data to unquote + * @param string $quote The quote char + * @return string the unquoted data + */ + function unquote($field, $quote) + { + // Trim first the string. + $field = trim($field); + $quote = trim($quote); + + // Incase null fields (form: ;;) + if (!strlen($field)) { + return $field; + } + + if ($quote && $field{0} == $quote && $field{strlen($field)-1} == $quote) { + return substr($field, 1, -1); + } + return $field; + } + + /** + * Reads a row of data as an array from a CSV file. It's able to + * read memo fields with multiline data. + * + * @param string $file The filename where to write the data + * @param array &$conf The configuration of the dest CSV + * + * @return mixed Array with the data read or false on error/no more data + */ + function readQuoted($file, &$conf) + { + if (!$fp = File_CSV::getPointer($file, $conf, FILE_MODE_READ)) { + return false; + } + + $buff = $c = ''; + $ret = array(); + $i = 1; + $in_quote = false; + $quote = $conf['quote']; + $f = $conf['fields']; + $eol2unix = $conf['eol2unix']; + while (($ch = fgetc($fp)) !== false) { + $prev = $c; + $c = $ch; + // Common case + if ($c != $quote && $c != $conf['sep'] && $c != "\n" && $c != "\r") { + $buff .= $c; + continue; + } + + // Start quote. + if ($quote && $c == $quote && + ($prev == $conf['sep'] || $prev == "\n" || $prev === null || + $prev == "\r" || $prev == '')) + { + $in_quote = true; + } + + if ($in_quote) { + // When ends quote + if ($c == $conf['sep'] && $prev == $conf['quote']) { + $in_quote = false; + } elseif ($c == "\n" || $c == "\r") { + $sub = ($prev == "\r") ? 2 : 1; + if ((strlen($buff) >= $sub) && + ($buff{strlen($buff) - $sub} == $quote)) + { + $in_quote = false; + } + } + } + + if (!$in_quote && ($c == $conf['sep'] || $c == "\n" || $c == "\r") && $prev != '') { + // More fields than expected + if (($c == $conf['sep']) && ((count($ret) + 1) == $f)) { + // Seek the pointer into linebreak character. + while (true) { + $c = fgetc($fp); + if ($c == "\n" || $c == "\r") { + break; + } + } + + // Insert last field value. + $ret[] = File_CSV::unquote($buff, $quote); + return $ret; + } + + // Less fields than expected + if (($c == "\n" || $c == "\r") && ($i != $f)) { + // Insert last field value. + $ret[] = File_CSV::unquote($buff, $quote); + + // Pair the array elements to fields count. + return array_merge($ret, + array_fill(count($ret), + ($f - 1) - (count($ret) - 1), + '') + ); + } + + if ($prev == "\r") { + $buff = substr($buff, 0, -1); + } + + // Convert EOL character to Unix EOL (LF). + if ($eol2unix) { + $buff = preg_replace('/(\r\n|\r)$/', "\n", $buff); + } + + $ret[] = File_CSV::unquote($buff, $quote); + if (count($ret) == $f) { + return $ret; + } + $buff = ''; + $i++; + continue; + } + $buff .= $c; + } + return !feof($fp) ? $ret : false; + } + + /** + * Reads a "row" from a CSV file and return it as an array + * + * @param string $file The CSV file + * @param array &$conf The configuration of the dest CSV + * + * @return mixed Array or false + */ + function read($file, &$conf) + { + if (!$fp = File_CSV::getPointer($file, $conf, FILE_MODE_READ)) { + return false; + } + // The size is limited to 4K + if (!$line = fgets($fp, 4096)) { + return false; + } + + $fields = $conf['fields'] == 1 ? array($line) : explode($conf['sep'], $line); + + if ($conf['quote']) { + $last =& $fields[count($fields) - 1]; + // Fallback to read the line with readQuoted when guess + // that the simple explode won't work right + if (($last{strlen($last) - 1} == "\n" + && $last{0} == $conf['quote'] + && $last{strlen(rtrim($last)) - 1} != $conf['quote']) + || + (count($fields) != $conf['fields']) + // XXX perhaps there is a separator inside a quoted field + //preg_match("|{$conf['quote']}.*{$conf['sep']}.*{$conf['quote']}|U", $line) + ) + { + fseek($fp, -1 * strlen($line), SEEK_CUR); + return File_CSV::readQuoted($file, $conf); + } else { + $last = rtrim($last); + foreach ($fields as $k => $v) { + $fields[$k] = File_CSV::unquote($v, $conf['quote']); + } + } + } + + if (count($fields) != $conf['fields']) { + File_CSV::raiseError("Read wrong fields number count: '". count($fields) . + "' expected ".$conf['fields']); + return true; + } + return $fields; + } + + /** + * Internal use only, will be removed in the future + * + * @param string $str The string to debug + * @access private + */ + function _dbgBuff($str) + { + if (strpos($str, "\r") !== false) { + $str = str_replace("\r", "_r_", $str); + } + if (strpos($str, "\n") !== false) { + $str = str_replace("\n", "_n_", $str); + } + if (strpos($str, "\t") !== false) { + $str = str_replace("\t", "_t_", $str); + } + echo "buff: ($str)\n"; + } + + /** + * Writes a struc (array) in a file as CSV + * + * @param string $file The filename where to write the data + * @param array $fields Ordered array with the data + * @param array &$conf The configuration of the dest CSV + * + * @return bool True on success false otherwise + */ + function write($file, $fields, &$conf) + { + if (!$fp = File_CSV::getPointer($file, $conf, FILE_MODE_WRITE)) { + return false; + } + if (count($fields) != $conf['fields']) { + File_CSV::raiseError("Wrong fields number count: '". count($fields) . + "' expected ".$conf['fields']); + return true; + } + $write = ''; + for ($i = 0; $i < count($fields); $i++) { + if (!is_numeric($fields[$i]) && $conf['quote']) { + $write .= $conf['quote'] . $fields[$i] . $conf['quote']; + } else { + $write .= $fields[$i]; + } + if ($i < (count($fields) - 1)) { + $write .= $conf['sep']; + } else { + $write .= $conf['crlf']; + } + } + if (!fwrite($fp, $write)) { + return File_CSV::raiseError('Can not write to file'); + } + return true; + } + + /** + * Discover the format of a CSV file (the number of fields, the separator + * and if it quote string fields) + * + * @param string the CSV file name + * @param array extra separators that should be checked for. + * @return mixed Assoc array or false + */ + function discoverFormat($file, $extraSeps = array()) + { + if (!$fp = @fopen($file, 'r')) { + return File_CSV::raiseError("Could not open file: $file"); + } + $seps = array("\t", ';', ':', ','); + $seps = array_merge($seps, $extraSeps); + $matches = array(); + + // Set auto detect line ending for Mac EOL support if < PHP 4.3.0. + $phpver = version_compare('4.3.0', phpversion(), '<'); + if ($phpver) { + $oldini = ini_get('auto_detect_line_endings'); + ini_set('auto_detect_line_endings', '1'); + } + + // Take the first 10 lines and store the number of ocurrences + // for each separator in each line + + $lines = file($file); + if (count($lines) > 10) { + $lines = array_slice($lines, 0, 10); + } + + if ($phpver) { + ini_set('auto_detect_line_endings', $oldini); + } + + foreach ($lines as $line) { + foreach ($seps as $sep) { + $matches[$sep][] = substr_count($line, $sep); + } + } + + $final = array(); + // Group the results by amount of equal ocurrences + foreach ($matches as $sep => $res) { + $times = array(); + $times[0] = 0; + foreach ($res as $k => $num) { + if ($num > 0) { + $times[$num] = (isset($times[$num])) ? $times[$num] + 1 : 1; + } + } + arsort($times); + + // Use max fields count. + $fields[$sep] = max(array_flip($times)); + $amount[$sep] = $times[key($times)]; + } + + arsort($amount); + $sep = key($amount); + + $conf['fields'] = $fields[$sep] + 1; + $conf['sep'] = $sep; + + // Test if there are fields with quotes arround in the first 5 lines + $quotes = '"\''; + $quote = null; + if (count($lines) > 5) { + $lines = array_slice($lines, 0, 5); + } + + foreach ($lines as $line) { + if (preg_match("|$sep([$quotes]).*([$quotes])$sep|U", $line, $match)) { + if ($match[1] == $match[2]) { + $quote = $match[1]; + break; + } + } + if (preg_match("|^([$quotes]).*([$quotes])$sep{0,1}|", $line, $match) + || preg_match("|([$quotes]).*([$quotes])$sep\s$|Us", $line, $match)) + { + if ($match[1] == $match[2]) { + $quote = $match[1]; + break; + } + } + } + $conf['quote'] = $quote; + fclose($fp); + // XXX What about trying to discover the "header"? + return $conf; + } + + /** + * Front to call getPointer and moving the resource to the + * beginning of the file + * Reset it if you like. + * + * @param string $file The name of the file + * @param array &$conf The configuration + * @param string $mode The open node (ex: FILE_MODE_READ or FILE_MODE_WRITE) + * + * @return boolean true on success false on failure + */ + function resetPointer($file, &$conf, $mode) + { + if (!File_CSV::getPointer($file, $conf, $mode, true)) { + return false; + } + + return true; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/File/Find.php b/campcaster/src/tools/pear/src/File/Find.php new file mode 100644 index 000000000..8cb148dd9 --- /dev/null +++ b/campcaster/src/tools/pear/src/File/Find.php @@ -0,0 +1,484 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Find.php,v 1.26 2006/02/11 16:28:40 techtonik Exp $ +// + +require_once 'PEAR.php'; + +define('FILE_FIND_VERSION', '@package_version@'); + +// to debug uncomment this string +// define('FILE_FIND_DEBUG', ''); + +/** +* Commonly needed functions searching directory trees +* +* @access public +* @version $Id: Find.php,v 1.26 2006/02/11 16:28:40 techtonik Exp $ +* @package File +* @author Sterling Hughes +*/ +class File_Find +{ + /** + * internal dir-list + * @var array + */ + var $_dirs = array(); + + /** + * found files + * @var array + */ + var $files = array(); + + /** + * found dirs + * @var array + */ + var $directories = array(); + + /** + * Search the current directory to find matches for the + * the specified pattern. + * + * @param string $pattern a string containing the pattern to search + * the directory for. + * + * @param string $dirpath a string containing the directory path + * to search. + * + * @param string $pattern_type a string containing the type of + * pattern matching functions to use (can either be 'php', + * 'perl' or 'shell'). + * + * @return array containing all of the files and directories + * matching the pattern or null if no matches + * + * @author Sterling Hughes + * @access public + * @static + */ + function &glob($pattern, $dirpath, $pattern_type = 'php') + { + $dh = @opendir($dirpath); + + if (!$dh) { + $pe = PEAR::raiseError("Cannot open directory"); + return $pe; + } + + $match_function = File_Find::_determineRegex($pattern, $pattern_type); + $matches = array(); + + // empty string cannot be specified for 'php' and 'perl' pattern + if ($pattern || ($pattern_type != 'php' && $pattern_type != 'perl')) { + while (false !== ($entry = @readdir($dh))) { + if ($match_function($pattern, $entry) && + $entry != '.' && $entry != '..') { + $matches[] = $entry; + } + } + } + + @closedir($dh); + + if (0 == count($matches)) { + $matches = null; + } + + return $matches ; + } + + /** + * Map the directory tree given by the directory_path parameter. + * + * @param string $directory contains the directory path that you + * want to map. + * + * @return array a two element array, the first element containing a list + * of all the directories, the second element containing a list of all the + * files. + * + * @author Sterling Hughes + * @access public + */ + function &maptree($directory) + { + + /* if called statically */ + if (!isset($this) || !is_a($this, "File_Find")) { + $obj = &new File_Find(); + return $obj->maptree($directory); + } + + /* clear the results just in case */ + $this->files = array(); + $this->directories = array(); + + /* consistency rules - strip out trailing slashes */ + $directory = preg_replace('![\\\\/]+$!', '', $directory); + /* use only native system directory delimiters */ + $directory = preg_replace("![\\\\/]+!", DIRECTORY_SEPARATOR, $directory); + + $this->_dirs = array($directory); + + while (count($this->_dirs)) { + $dir = array_pop($this->_dirs); + File_Find::_build($dir); + array_push($this->directories, $dir); + } + + $retval = array($this->directories, $this->files); + return $retval; + + } + + /** + * Map the directory tree given by the directory parameter. + * + * @param string $directory contains the directory path that you + * want to map. + * @param integer $maxrecursion maximun number of folders to recursive + * map + * + * @return array a multidimensional array containing all subdirectories + * and their files. For example: + * + * Array + * ( + * [0] => file_1.php + * [1] => file_2.php + * [subdirname] => Array + * ( + * [0] => file_1.php + * ) + * ) + * + * @author Mika Tuupola + * @access public + * @static + */ + function &mapTreeMultiple($directory, $maxrecursion = 0, $count = 0) + { + $retval = array(); + + $count++; + + $directory .= DIRECTORY_SEPARATOR; + + if (is_readable($directory)) { + $dh = opendir($directory); + while (false !== ($entry = @readdir($dh))) { + if ($entry != '.' && $entry != '..') { + array_push($retval, $entry); + } + } + closedir($dh); + } + + while (list($key, $val) = each($retval)) { + $path = $directory . $val; + $path = str_replace(DIRECTORY_SEPARATOR.DIRECTORY_SEPARATOR, + DIRECTORY_SEPARATOR, $path); + + if (!is_array($val) && is_dir($path)) { + unset($retval[$key]); + if ($maxrecursion == 0 || $count < $maxrecursion) { + $retval[$val] = &File_Find::mapTreeMultiple($path, + $maxrecursion, $count); + } + } + } + + return $retval; + } + + /** + * Search the specified directory tree with the specified pattern. Return + * an array containing all matching files (no directories included). + * + * @param string $pattern the pattern to match every file with. + * + * @param string $directory the directory tree to search in. + * + * @param string $type the type of regular expression support to use, either + * 'php', 'perl' or 'shell'. + * + * @param bool $fullpath whether the regex should be matched against the + * full path or only against the filename + * + * @param string $match can be either 'files', 'dirs' or 'both' to specify + * the kind of list to return + * + * @return array a list of files matching the pattern parameter in the the + * directory path specified by the directory parameter + * + * @author Sterling Hughes + * @access public + * @static + */ + function &search($pattern, $directory, $type = 'php', $fullpath = true, $match = 'files') + { + + $matches = array(); + list ($directories,$files) = File_Find::maptree($directory); + switch($match) { + case 'directories': + $data = $directories; + break; + case 'both': + $data = array_merge($directories, $files); + break; + case 'files': + default: + $data = $files; + } + unset($files, $directories); + + $match_function = File_Find::_determineRegex($pattern, $type); + + reset($data); + // check if empty string given (ok for 'shell' method, but bad for others) + if ($pattern || ($type != 'php' && $type != 'perl')) { + while (list(,$entry) = each($data)) { + if ($match_function($pattern, + $fullpath ? $entry : basename($entry))) { + $matches[] = $entry; + } + } + } + + return $matches; + } + + /** + * Determine whether or not a variable is a PEAR error + * + * @param object PEAR_Error $var the variable to test. + * + * @return boolean returns true if the variable is a PEAR error, otherwise + * it returns false. + * @access public + */ + function isError(&$var) + { + return PEAR::isError($var); + } + + /** + * internal function to build singular directory trees, used by + * File_Find::maptree() + * + * @param string $directory name of the directory to read + * @return void + */ + function _build($directory) + { + + $dh = @opendir($directory); + + if (!$dh) { + $pe = PEAR::raiseError("Cannot open directory"); + return $pe; + } + + while (false !== ($entry = @readdir($dh))) { + if ($entry != '.' && $entry != '..') { + + $entry = $directory.DIRECTORY_SEPARATOR.$entry; + $entry = str_replace(DIRECTORY_SEPARATOR.DIRECTORY_SEPARATOR, + DIRECTORY_SEPARATOR, $entry); + + if (is_dir($entry)) { + array_push($this->_dirs, $entry); + } else { + array_push($this->files, $entry); + } + } + } + + @closedir($dh); + } + + /** + * internal function to determine the type of regular expression to + * use, implemented by File_Find::glob() and File_Find::search() + * + * @param string $type given RegExp type + * @return string kind of function ( "eregi", "ereg" or "preg_match") ; + * + */ + function _determineRegex($pattern, $type) + { + if (!strcasecmp($type, 'shell')) { + $match_function = 'File_Find_match_shell'; + } else if (!strcasecmp($type, 'perl')) { + $match_function = 'preg_match'; + } else if (!strcasecmp(substr($pattern, -2), '/i')) { + $match_function = 'eregi'; + } else { + $match_function = 'ereg'; + } + return $match_function; + } + +} + +/** +* Package method to match via 'shell' pattern. Provided in global +* scope, because they should be called like 'preg_match' and 'eregi' +* and can be easily copied into other packages +* +* @author techtonik +* @return mixed bool on success and PEAR_Error on failure +*/ +function File_Find_match_shell($pattern, $filename) +{ + // {{{ convert pattern to positive and negative regexps + $positive = $pattern; + $negation = substr_count($pattern, "|"); + + if ($negation > 1) { + PEAR::raiseError("Mask string contains errors!"); + return FALSE; + } elseif ($negation) { + list($positive, $negative) = explode("|", $pattern); + if (strlen($negative) == 0) { + PEAR::raiseError("File-mask string contains errors!"); + return FALSE; + } + } + + $positive = _File_Find_match_shell_get_pattern($positive); + if ($negation) { + $negative = _File_Find_match_shell_get_pattern($negative); + } + // }}} convert end + + + if (defined("FILE_FIND_DEBUG")) { + print("Method: $type\nPattern: $pattern\n Converted pattern:"); + print_r($positive); + if (isset($negative)) print_r($negative); + } + + if (!preg_match($positive, $filename)) { + return FALSE; + } else { + if (isset($negative) + && preg_match($negative, $filename)) { + return FALSE; + } else { + return TRUE; + } + } +} + +/** +* function used by File_Find_match_shell to convert 'shell' mask +* into pcre regexp. Some of the rules (see testcases for more): +* escaping all special chars and replacing +* . with \. +* * with .* +* ? with .{1} +* also adding ^ and $ as the pattern matches whole filename +* +* @author techtonik +* @return string pcre regexp for preg_match +*/ +function _File_Find_match_shell_get_pattern($mask) { + // get array of several masks (if any) delimited by comma + // do not touch commas in char class + $premasks = preg_split("|(\[[^\]]+\])|", $mask, -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY ); + if (defined("FILE_FIND_DEBUG")) { + print("\nPremask: "); + print_r($premasks); + } + $pi = 0; + foreach($premasks as $pm) { + if (!isset($masks[$pi])) $masks[$pi] = ""; + if ($pm{0} == '[' && $pm{strlen($pm)-1} == ']') { + // strip commas from character class + $masks[$pi] .= str_replace(",", "", $pm); + } else { + $tarr = explode(",", $pm); + if (sizeof($tarr) == 1) { + $masks[$pi] .= $pm; + } else { + foreach ($tarr as $te) { + $masks[$pi++] .= $te; + $masks[$pi] = ""; + } + unset($masks[$pi--]); + } + } + } + + // if empty string given return *.* pattern + if (strlen($mask) == 0) return "!^.*$!"; + + // convert to preg regexp + $regexmask = implode("|", $masks); + if (defined("FILE_FIND_DEBUG")) { + print("regexMask step one(implode): $regexmask"); + } + $regexmask = addcslashes($regexmask, '^$}!{)(\/.+'); + if (defined("FILE_FIND_DEBUG")) { + print("\nregexMask step two(addcslashes): $regexmask"); + } + $regexmask = preg_replace("!(\*|\?)!", ".$1", $regexmask); + if (defined("FILE_FIND_DEBUG")) { + print("\nregexMask step three(* ? -> .* .?): $regexmask"); + } + // a special case '*.' at the end means that there is no extension + $regexmask = preg_replace("!\.\*\\\.(\||$)!", "[^\.]*$1", $regexmask); + // it is impossible to have dot at the end of filename + $regexmask = preg_replace("!\\\.(\||$)!", "$1", $regexmask); + // and .* at the end also means that there could be nothing at all + // (i.e. no dot at the end also) + $regexmask = preg_replace("!\\\.\.\*(\||$)!", "(\\\\..*)?$1", $regexmask); + if (defined("FILE_FIND_DEBUG")) { + print("\nregexMask step two and half(*.$ \\..*$ .$ -> [^.]*$ .?.* $): $regexmask"); + } + // if no extension supplied - add .* to match partially from filename start + if (strpos($regexmask, "\\.") === FALSE) $regexmask .= ".*"; + + // file mask match whole name - adding restrictions + $regexmask = preg_replace("!(\|)!", '^'."$1".'$', $regexmask); + $regexmask = '^'.$regexmask.'$'; + if (defined("FILE_FIND_DEBUG")) { + print("\nregexMask step three(^ and $ to match whole name): $regexmask"); + } + // wrap regex into ! since all ! are already escaped + $regexmask = "!$regexmask!i"; + if (defined("FILE_FIND_DEBUG")) { + print("\nWrapped regex: $regexmask\n"); + } + return $regexmask; +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/File/Util.php b/campcaster/src/tools/pear/src/File/Util.php new file mode 100644 index 000000000..93b32ef48 --- /dev/null +++ b/campcaster/src/tools/pear/src/File/Util.php @@ -0,0 +1,457 @@ + + * @copyright 2004-2005 Michael Wallner + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Util.php,v 1.21 2005/08/09 07:52:13 mike Exp $ + * @link http://pear.php.net/package/File + */ + +/**#@+ + * Sorting Constants + */ +define('FILE_SORT_NONE', 0); +define('FILE_SORT_REVERSE', 1); +define('FILE_SORT_NAME', 2); +define('FILE_SORT_SIZE', 4); +define('FILE_SORT_DATE', 8); +define('FILE_SORT_RANDOM', 16); +/**#@-*/ + +/**#@+ + * Listing Constants + */ +define('FILE_LIST_FILES', 1); +define('FILE_LIST_DIRS', 2); +define('FILE_LIST_DOTS', 4); +define('FILE_LIST_ALL', FILE_LIST_FILES | FILE_LIST_DIRS | FILE_LIST_DOTS); +/**#@-*/ + +/** + * @ignore + */ +define('FILE_WIN32', defined('OS_WINDOWS') ? OS_WINDOWS : !strncasecmp(PHP_OS, 'win', 3)); + +/** + * File_Util + * + * File and directory utility functions. + * + * @access public + * @static + */ +class File_Util +{ + /** + * Returns a string path built from the array $pathParts. Where a join + * occurs multiple separators are removed. Joins using the optional + * separator, defaulting to the PHP DIRECTORY_SEPARATOR constant. + * + * @static + * @access public + * @param array $parts Array containing the parts to be joined + * @param string $separator The directory seperator + */ + function buildPath($parts, $separator = DIRECTORY_SEPARATOR) + { + $qs = '/^'. preg_quote($separator, '/') .'+$/'; + for ($i = 0, $c = count($parts); $i < $c; $i++) { + if (!strlen($parts[$i]) || preg_match($qs, $parts[$i])) { + unset($parts[$i]); + } elseif (0 == $i) { + $parts[$i] = rtrim($parts[$i], $separator); + } elseif ($c - 1 == $i) { + $parts[$i] = ltrim($parts[$i], $separator); + } else { + $parts[$i] = trim($parts[$i], $separator); + } + } + return implode($separator, $parts); + } + + /** + * Returns a path without leading / or C:\. If this is not + * present the path is returned as is. + * + * @static + * @access public + * @param string $path The path to be processed + * @return string The processed path or the path as is + */ + function skipRoot($path) + { + if (File_Util::isAbsolute($path)) { + if (FILE_WIN32) { + return substr($path, $path{3} == '\\' ? 4 : 3); + } + return ltrim($path, '/'); + } + return $path; + } + + /** + * Returns the temp directory according to either the TMP, TMPDIR, or + * TEMP env variables. If these are not set it will also check for the + * existence of /tmp, %WINDIR%\temp + * + * @static + * @access public + * @return string The system tmp directory + */ + function tmpDir() + { + if (FILE_WIN32) { + if (isset($_ENV['TEMP'])) { + return $_ENV['TEMP']; + } + if (isset($_ENV['TMP'])) { + return $_ENV['TMP']; + } + if (isset($_ENV['windir'])) { + return $_ENV['windir'] . '\\temp'; + } + if (isset($_ENV['SystemRoot'])) { + return $_ENV['SystemRoot'] . '\\temp'; + } + if (isset($_SERVER['TEMP'])) { + return $_SERVER['TEMP']; + } + if (isset($_SERVER['TMP'])) { + return $_SERVER['TMP']; + } + if (isset($_SERVER['windir'])) { + return $_SERVER['windir'] . '\\temp'; + } + if (isset($_SERVER['SystemRoot'])) { + return $_SERVER['SystemRoot'] . '\\temp'; + } + return '\temp'; + } + if (isset($_ENV['TMPDIR'])) { + return $_ENV['TMPDIR']; + } + if (isset($_SERVER['TMPDIR'])) { + return $_SERVER['TMPDIR']; + } + return '/tmp'; + } + + /** + * Returns a temporary filename using tempnam() and File::tmpDir(). + * + * @static + * @access public + * @param string $dirname Optional directory name for the tmp file + * @return string Filename and path of the tmp file + */ + function tmpFile($dirname = null) + { + if (!isset($dirname)) { + $dirname = File_Util::tmpDir(); + } + return tempnam($dirname, 'temp.'); + } + + /** + * Returns boolean based on whether given path is absolute or not. + * + * @static + * @access public + * @param string $path Given path + * @return boolean True if the path is absolute, false if it is not + */ + function isAbsolute($path) + { + if (preg_match('/(?:\/|\\\)\.\.(?=\/|$)/', $path)) { + return false; + } + if (FILE_WIN32) { + return preg_match('/^[a-zA-Z]:(\\\|\/)/', $path); + } + return ($path{0} == '/') || ($path{0} == '~'); + } + + /** + * Get path relative to another path + * + * @static + * @access public + * @return string + * @param string $path + * @param string $root + * @param string $separator + */ + function relativePath($path, $root, $separator = DIRECTORY_SEPARATOR) + { + $path = File_Util::realpath($path, $separator); + $root = File_Util::realpath($root, $separator); + $dirs = explode($separator, $path); + $comp = explode($separator, $root); + + if (FILE_WIN32) { + if (strcasecmp($dirs[0], $comp[0])) { + return $path; + } + unset($dirs[0], $comp[0]); + } + + foreach ($comp as $i => $part) { + if (isset($dirs[$i]) && $part == $dirs[$i]) { + unset($dirs[$i], $comp[$i]); + } else { + break; + } + } + + return str_repeat('..' . $separator, count($comp)) . implode($separator, $dirs); + } + + /** + * Get real path (works with non-existant paths) + * + * @static + * @access public + * @return string + * @param string $path + * @param string $separator + */ + function realPath($path, $separator = DIRECTORY_SEPARATOR) + { + if (!strlen($path)) { + return $separator; + } + + $drive = ''; + if (FILE_WIN32) { + $path = preg_replace('/[\\\\\/]/', $separator, $path); + if (preg_match('/([a-zA-Z]\:)(.*)/', $path, $matches)) { + $drive = $matches[1]; + $path = $matches[2]; + } else { + $cwd = getcwd(); + $drive = substr($cwd, 0, 2); + if ($path{0} !== $separator{0}) { + $path = substr($cwd, 3) . $separator . $path; + } + } + } elseif ($path{0} !== $separator) { + $path = getcwd() . $separator . $path; + } + + $dirStack = array(); + foreach (explode($separator, $path) as $dir) { + if (strlen($dir) && $dir !== '.') { + if ($dir == '..') { + array_pop($dirStack); + } else { + $dirStack[] = $dir; + } + } + } + + return $drive . $separator . implode($separator, $dirStack); + } + + /** + * Check whether path is in root path + * + * @static + * @access public + * @return bool + * @param string $path + * @param string $root + */ + function pathInRoot($path, $root) + { + static $realPaths = array(); + + if (!isset($realPaths[$root])) { + $realPaths[$root] = File_Util::realPath($root); + } + + return false !== strstr(File_Util::realPath($path), $realPaths[$root]); + } + + /** + * List Directory + * + * The final argument, $cb, is a callback that either evaluates to true or + * false and performs a filter operation, or it can also modify the + * directory/file names returned. To achieve the latter effect use as + * follows: + * + * + * name, "\n"; + * } + * ?> + * + * + * @static + * @access public + * @return array + * @param string $path + * @param int $list + * @param int $sort + * @param mixed $cb + */ + function listDir($path, $list = FILE_LIST_ALL, $sort = FILE_SORT_NONE, $cb = null) + { + if (!strlen($path) || !is_dir($path)) { + return null; + } + + $entries = array(); + for ($dir = dir($path); false !== $entry = $dir->read(); ) { + if ($list & FILE_LIST_DOTS || $entry{0} !== '.') { + $isRef = ($entry === '.' || $entry === '..'); + $isDir = $isRef || is_dir($path .'/'. $entry); + if ( ((!$isDir && $list & FILE_LIST_FILES) || + ($isDir && $list & FILE_LIST_DIRS)) && + (!is_callable($cb) || + call_user_func_array($cb, array(&$entry)))) { + $entries[] = (object) array( + 'name' => $entry, + 'size' => $isDir ? null : filesize($path .'/'. $entry), + 'date' => filemtime($path .'/'. $entry), + ); + } + } + } + $dir->close(); + + if ($sort) { + $entries = File_Util::sortFiles($entries, $sort); + } + + return $entries; + } + + /** + * Sort Files + * + * @static + * @access public + * @return array + * @param array $files + * @param int $sort + */ + function sortFiles($files, $sort) + { + if (!$files) { + return array(); + } + + if (!$sort) { + return $files; + } + + if ($sort === 1) { + return array_reverse($files); + } + + if ($sort & FILE_SORT_RANDOM) { + shuffle($files); + return $files; + } + + $names = array(); + $sizes = array(); + $dates = array(); + + if ($sort & FILE_SORT_NAME) { + $r = &$names; + } elseif ($sort & FILE_SORT_DATE) { + $r = &$dates; + } elseif ($sort & FILE_SORT_SIZE) { + $r = &$sizes; + } else { + asort($files, SORT_REGULAR); + return $files; + } + + $sortFlags = array( + FILE_SORT_NAME => SORT_STRING, + FILE_SORT_DATE => SORT_NUMERIC, + FILE_SORT_SIZE => SORT_NUMERIC, + ); + + foreach ($files as $file) { + $names[] = $file->name; + $sizes[] = $file->size; + $dates[] = $file->date; + } + + if ($sort & FILE_SORT_REVERSE) { + arsort($r, $sortFlags[$sort & ~1]); + } else { + asort($r, $sortFlags[$sort]); + } + + $result = array(); + foreach ($r as $i => $f) { + $result[] = $files[$i]; + } + + return $result; + } + + /** + * Switch File Extension + * + * @static + * @access public + * @return string|array + * @param string|array $filename + * @param string $to new file extension + * @param string $from change only files with this extension + * @param bool $reverse change only files not having $from extension + */ + function switchExt($filename, $to, $from = null, $reverse = false) + { + if (is_array($filename)) { + foreach ($filename as $key => $file) { + $filename[$key] = File_Util::switchExt($file, $to, $from); + } + return $filename; + } + + if ($len = strlen($from)) { + $ext = substr($filename, -$len - 1); + $cfn = FILE_WIN32 ? 'strcasecmp' : 'strcmp'; + if (!$reverse == $cfn($ext, '.'. $from)) { + return $filename; + } + return substr($filename, 0, -$len - 1) .'.'. $to; + } + + if ($pos = strpos($filename, '.')) { + return substr($filename, 0, $pos) .'.'. $to; + } + + return $filename .'.'. $to; + } + +} + +?> diff --git a/campcaster/src/tools/pear/src/File_Find-1.2.1.tgz b/campcaster/src/tools/pear/src/File_Find-1.2.1.tgz deleted file mode 100644 index 0e60e25035d1fbd1c8c23d33d5e4ae7a4a2b76e6..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 6809 zcmV;K8fN7miwFP!000001MEF(ciKp@`-JKI> zI6`WS#(=bvu;ZKfzu&5UsU^h2b{=zg&B;uVy1S~ny58MQLdU&yE@<=9bn=&P^|4HI zx7{XxA^0)H-CJ2hU;U$rX)aKbRest)^Kf zbmj)0Kf5?A|9bYiu~#O~k4gtmetP%n?6;FX3Ax0O)89_d`fo{joFw7CVT9C)n&CKX z&S+wIiD!s@4Fn0}<*+O&@ix-lwwt@qpB&7bDLs1aPw3#aKl2U@_6+ai`E=?;H%BkY ztBDiGBpFjOa$JAnCr(27a}30|V-k$W2mr)4aYCo@fgy(i6pzMkiFrOtf3Y{pa6K4_!1c~!VNrU7g1kaDCn*`B~ zpom6way|Bew6QbufU-Kdm;}QiFuM-u+&OUJijq=(9BT)fuIXgLX^SWH8s`_lbR!@r zn2-^WK96YJgy|Xj{NQ=&__GB512)5>{)~_0U>?Ia;8HXJR0jroWDSh#r=o%UeSR^f zv04jgrvPc9M!p!%r^5*y&ZC>A8%z%j-pqPN!Gs=7r~^yMz9Jb$mX2bwlKDIgCe8v? zZ~aS$oXN&KNn+FsCk*K%_WhZUlKGV=qV6~eX8z>@O)qCo5=?H$S=wWPFxm7%Xv-o^ z9=)QIAf(X>!i?;a9z+yo67#-7n~toe-Lwu2`G`#(i1(2V2DxF{@CO71Utr6`cj*iO zoc#Udz>p8v5Tjnf5<9T6phJlqFbhE4j<(5b{}agmaDGAl+S%*b1SDIC<Z=B(KKQ zy=3Z1r(psLlSCkhF}VOmnxU=$qzjS+LX)aB1||kY1^5Co@keCpgl7?@Z|9T54=1!* zV`h-)Iq2Jr%x7R4Je&g1nCfRW0ZqP)5kWulFUct`Nj$u%u{Gi>!mnWzT=^cFr<;%- zmR&SmWo9-G%gSn$iBZ&fG@rSs$P4}V_tARXeH6?!fw|smpw6Vb1K^8r_i=vQ$CbM4 zz`@i>-0>hDgWZ&4(IZU!IN|z+PXv|hung*0CPUC6Sir=YOkj~Ys4|&)9q=88W!mz* z-mvXhLu&3(%W98$wB6hDde(4{4!v$lz|2EuST+{0fIuYc(d>w)raj7HGcA-k zM3>wX-(I`h>5SU$u4Q#>YIi*kk$S^kuSJKZ-OJ&#g|t2dWzQXTJFVSbtJm&0L$lLz z?H0A1R@WPLN4s4+hq5J5PKBI51a-Gg&jr)yv|4+%17?JJ9(7z;Q?HXl-R2td z5R8`9+p}PH)-KG<_T0U$v*(&EyWQ&!hn?(i$Q6W>Bj02DNPYr#B?iHk3t4K9_4a>e0 zsoMks5fY%Mg$M*=NFMZRp2`ExPJQOi&|A6ztT%L-xi`!q3hyYUMO<)sv*23Hl||8Y z14muG6&IMphA=>tnF@bQ1bYQvub^m#oE9YUi?>G-(oM5fwB0&V@0{JjI z?C;}uh)h_J)b91#wfm87LMpb3bO<3^1*8vY;uI6kTsY5sFquHgL24nV>c4!yzaKe% zOj#G087>IeNz8E2#-Km#e{w0yXCS{JXJg2(rvAk^ftjP||LqkSLV$LOq1;U{hfFB~ zreJJ{s6?2@7SxXiP8C_A;ouaAAOp|~wAtXJT6==h{t{BKV4j5Y1amx`gi@shCU=GS zFbBoN0>A6I9Au1;A4Gs0!&JyjJOo8XQJ`xoTFJOcN~Ol)S zcU@eIF{+2~cRSfOUPfj-+-%dTY%wj2~N z`CwhS(PrMjxxjoRVHOwh_a$50yCul979_Wa@ zd#C9g&-}!9CPW}xNz;L$1xW|8`gT-WQ~y&oqrr*=hRj^PU;Ve$+HIM#{%du*Eoj4( zkA8<{=rp&w8=d`U%ozFuY&Lo(AZ zK}bOv%|A!MJp2K4v5+PX<`FnBmU!XgoVzb@gTks1u%I?NxI~aEDs^>@t}oE&u;^qs z$11bOO?rX|WEtL{@xnPGdUO1$|I2B=&MJ4%hh$(mSKxP9=?-8fW8lukn2o&-qKVhI z2G85LrbBF9!>=zy>=j&JU#qPGLBC-SOuLzUN}8L=#20eR13eGIcd&?9J*SxWI1rA7 zHw7GGvvVN8n9ta3fTs#pFvPMQMit8^SO@2TwiY}u0z#w$NR}>vPF8neNg)_zUK*>s zjAlWjKLx+)gVCSdG{3!ky_|y^jP^;cn2%ma6z>JaN8eHI5!}|Xw@;+ssb3LrL~Vj4 zYQwbQ53ySNW_!QWBch~F`kz9wg@a2F#>^p583Y*hRWOQ27?o$Gl1E4Wj8-eJkKgnM zuaAHEY4DH!`_tohzf|g^@x=GU9X^Sa*>PFRq*jbR}|b#2bVCjc>OG&^acDyt#^u%RwClV0C!OU=w((<9c|A zbrW!U;JO0nDc>PPHFxJxgt?oxrU8&Y^LQLhdA$UB%CT&RF{G|P@>xM4K`u5$tD+He zy{XuaAX}mr?%eS=kTjyrk=debR|$`fETs%6S%V1r0<7^;L@6xnrm#q~n@wYYb@!zx zSYt4fAmr2-H?dEuP=FSb_bOUP>a&Cma-Rz7Fkxvj15gP;xGS{<()g|sUt^sH2Q&1M z@^3M-{F+=y0E!@e0Wcew0{}=eXMvP}Jm$^SP>smg2Kkn!cNrm8iOW;0vsWd@>uP1| zxm7si{NgDYS8@Dod1GjL5rp8a{HQ8NOI5%ROtJa|`qi{yY$$`eP?agaa%Sjh5o9Vx zWq_y;7K;Kf()YJ1&Mm$pqh@)i7g`1$g?UZEaKEP)^pie$eaaffEvcfKs>`Rrwv21F{QQwGIXZPx7?2uy`m~hyjspG@SdwN1I%Hln zD|tNn1U`HOvUv9_KW~e;_`;n8F_ja@EvZRhu59bFDxoh-QR5p*d*M>am6Tn1r`rWn z`ql|^mIZyH*nl10WZMSJI5DGwYrWo>36Mg);{qGTqg{xrB#>)o#zN+)6Rx%y4oR*9 z0x2{*;=$h4h1rPWL^bH9h3IY)>r7xObdr3mlk+1eFw9#HLmR9d9U80Vx3M*O<06a5 zDT}26QR{DPqc|-Vq692uLHszTAZnOi)F49qLY}Y^D|=BV+V1wE6b8dTKmwoQHjC<3 zU1Ct6Z{w(dY+ZKw-}($(h}oI*1~~D2lEmbXIWQlBeHUYSZ7z)7#u4`z{8M05M6Xp* zhQyq1u#jkuKpVX3%Syfp7*@8NF$8J2o;oF|d>@i9q89^k5~*5w^5Gml#>btlCm6_9 z>ZFhp#@+UVHo{$2xSy2kC{naJ z1i^;~8rbh|TP0x3CN3a?1BdZRoMj6z>igtR=QD6K(;?R5M-anKJd`?sq8)itFre& z*x3h#nJU!0d(^mKu{h&YaQbXv#BFK$Q!bdyb;=uO3|^{RmlW3*aMoa+)NvIJi)>_e zl`@}8kdt$eXhNDB}w#;Zbpug7uz%$>|V>eV(Z<>bmX zeAAU)Q7qG-rXa-|```lqu4*zs*%~;k5TKP_fbSRciG#ikVz`*eSUeB;K^<0esf&6` zT4Uig7g20kf^UfD%(q66F*0qv9#dAc;o&u8?AnoDo;7-E16t2>u)e|o0KUvFwJh17 zk6b-t&TXt40WMKGs<3s%xEO;#J{vrvRAH=SVsoRH)h@Bd2h3vW7>hKmPT7k3wxXSMkVXdWt_Ipj>V$M5}{misJBtI zkF5gP+^-6F%N*-ZatV~FW`|u8uw&{%2D_+)#a@22tk~>|V^r8}z>o25U5UDi0t6Nm z4}mT#xuNf%V6XXO%q#`2NCrlZm^!~ma_z^;fclAoz(VfkUCLhaB;Qk{K3_2xbY{;2 zvX0BxtM<AF-YAup0mR#A{iJUr%R>Qj+E}$IHV=OsSypLieu-{h5A^p=sVnogCJ@!p$XuJbQtH2h^&&t)#7TocIzb@Lu1!>yY(MFNL#6P}Rz*{KE=tP~@h##F@T5Fg4?La^ z;Ypi&!>$1?!`}!KTYyC*8;z?J1!WnhuZAcYzm+FgPQ;-RarRr~rdPfrS0v4yPxw_j zJVedzB0Cd2Tp>rGwA4;)2~GSa?D9te#`woqSfLQXu*Ty^N5zV4N_8!E|fQ2 z%w-;0ljmj(^7->;tSLZ>pXix?7{or?V?oq2dcikbSVA1esSj1%4pj|7+gIY_m;`XK z8;D&HMN#=nIqz=MQAfnei)1FA(H-wwC%()b-H62%i6^@M5Nm*tJtKt zvLSTELG25`ut@-)v zgrnY9%XB^?uQ-~t(6+C0lEE27MXV4Z1_zyf9>Z@`fX~ll~oeSL9um0TO-$A+VLp} zercPV)XWksmTkn=S}{&%^#cF{PDSX{A}Iw7wkteFdPQ}zcYYacsF0Kn#qdL^%(NR zv;SoC!!Y%PGzKHfgMsi_TiwxDh> zojP)~7qBEe3FcVC#Fm(yNC0m0n_VStlOoDNikbd_kSLop1e6e1Kodf{C4o_<;mHv@B4TjKW+Nu-Jt*Wi9hpXbaSj|nBMvLAQAQ^vo|N@#jCd5h#gGGx&~Bff7vJ(g;Nt**mKQ z11rK18ba7fs{%S0*c53ws}edfU>;p@8mO8!K)&(&*6rt7_1tLgRPL{^Ir@_8psFF< zl*ZhNpz8Vdm-FW}JP=fFZdu4g)%)v_I>w^dcKtbN9D#?aH=nPd78akM+@+rqenNz8 zd`&R#XdsILLYfibFF5(^P#aTqbxAS?=}$^pd=?1+YMwb94q&53{gWm#fYNi;m4vkVEY%w^UCj)W*OMttZY>ZSf2rbebW~>;_I%D z^y-SY=`2?-*LCECV)u|mF*{g0bt#KOcG!g-XM&}?8y=#F3(T3hm3Pv|9lw0l(rPA}Y*EYY}Cx8Dl_meVT`TnQX?U?%C{3d7@ufVXM{_F1AmW4kF*xBtq z-v9i5_di*tj0PqEdpNtO_6INDyuo4vD$xsZFrq3BuT=*FrcQ%evure*>dJ7cR9m>U zJjb}T0#-&Vt|?Hg+^0rXR*zh0iZ3BXYw&#{CBWi05!i1sBwrXfE) zik2OMaM1Zk*7{EVelmD>TF0Ymtr|D*m46=pQpu)`&oKd@v#V<5?Cpuz-4>sHQZWDl z-a&K6tPai5Ava%4FY!%U>om}zFTRCGb|Z}?2)PEs!dsHqT-a*M)?%>upS^T2HX5zw z(79aKWi67{DhMs3y$%U>S&al*1)mCG@Mfd48j8Jq1#H7y1{|8wWmq=aT0YuZKiXbC z+SW!t*i#hSf9*%UzJvX5n{9RfA1puG|J`ou(f)srPor_xKRs(SN(PONppQt0>Nj;4#+SB6BfN=}zXr0!?`)WO?&m4= zX&f=qz`{1SK?4j7dbxFNR*bCrSLB`$!JRGv$hteALO6Eru;s(3YORA-F=jywmLNC0 zq{=OVO>!mDSJvVyJ6$h<9+*Lsw=|BO3tAOMrP27gk5bWSoV+{bU;6(#>A%9S{Mxo)}wIKlOqpEG(E;tnq zKL64xdTD>WpYzb}L8Vuqve%z7>yYhWEp`yGf3}}p&=2#BY_C>vFI)Ahm2_8gSJI8t zS*@Iaz1YoOI!~VCY%~v%cxC&xm-k(O+gZXNo;7Cs?k?}E!v&7k9>wBOEFQ(;Q7kqT zi^s6-TgU%}zkvRY;(xo%fB#X7|J&BC`56EI;P^lNHPt^^DM%0N6_Hx3zK{-Bn~cgO z1$JRduxjA_>oH%s;(}&#Q-@Pvi7nBPGrJOWYg5qeWuV)Ipt*b66nJN&VBwKVk6gMJ zmrDQT{$KxRNWSs!KNI{(bGiTD?$|cg|IAkV(f|J_|F146{i(`-!h;LqDu&z~S+c{D zs|Ic~x^Qs5IH*9h)}jAywZe_+d_T6xw=A(;lhAIK$gWCYRiF0i1he*^N_8%gFC;yW z)n1>tFD-sZ${ua&|6~7O@Q;Fhv;9BF|GT;Tztwrn|9`yym;bI#_TSR^o>77L1@j<4 zzgN=lCold!jreV3_Af&6UqnuwW%|Q%i_-F8dGEJ08Ztvo1L zc|fcZ1X`4`0p`azG$IsHw{{a91|NjF3d5tPH H0Ehqp2hT)H diff --git a/campcaster/src/tools/pear/src/HTML/Common.php b/campcaster/src/tools/pear/src/HTML/Common.php new file mode 100644 index 000000000..f6984ff1c --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/Common.php @@ -0,0 +1,470 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Common.php,v 1.13 2006/10/08 14:10:46 avb Exp $ + +/** + * Base class for all HTML classes + * + * @author Adam Daniel + * @category HTML + * @package HTML_Common + * @version 1.2.3 + * @abstract + */ + +/** + * Base class for all HTML classes + * + * @author Adam Daniel + * @version 1.7 + * @since PHP 4.0.3pl1 + * @abstract + */ +class HTML_Common { + + /** + * Associative array of table attributes + * @var array + * @access private + */ + var $_attributes = array(); + + /** + * Tab offset of the table + * @var int + * @access private + */ + var $_tabOffset = 0; + + /** + * Tab string + * @var string + * @since 1.7 + * @access private + */ + var $_tab = "\11"; + + /** + * Contains the line end string + * @var string + * @since 1.7 + * @access private + */ + var $_lineEnd = "\12"; + + /** + * HTML comment on the object + * @var string + * @since 1.5 + * @access private + */ + var $_comment = ''; + + /** + * Class constructor + * @param mixed $attributes Associative array of table tag attributes + * or HTML attributes name="value" pairs + * @param int $tabOffset Indent offset in tabs + * @access public + */ + function HTML_Common($attributes = null, $tabOffset = 0) + { + $this->setAttributes($attributes); + $this->setTabOffset($tabOffset); + } // end constructor + + /** + * Returns the current API version + * @access public + * @returns double + */ + function apiVersion() + { + return 1.7; + } // end func apiVersion + + /** + * Returns the lineEnd + * + * @since 1.7 + * @access private + * @return string + */ + function _getLineEnd() + { + return $this->_lineEnd; + } // end func getLineEnd + + /** + * Returns a string containing the unit for indenting HTML + * + * @since 1.7 + * @access private + * @return string + */ + function _getTab() + { + return $this->_tab; + } // end func _getTab + + /** + * Returns a string containing the offset for the whole HTML code + * + * @return string + * @access private + */ + function _getTabs() + { + return str_repeat($this->_getTab(), $this->_tabOffset); + } // end func _getTabs + + /** + * Returns an HTML formatted attribute string + * @param array $attributes + * @return string + * @access private + */ + function _getAttrString($attributes) + { + $strAttr = ''; + + if (is_array($attributes)) { + $charset = HTML_Common::charset(); + foreach ($attributes as $key => $value) { + $strAttr .= ' ' . $key . '="' . htmlspecialchars($value, ENT_COMPAT, $charset) . '"'; + } + } + return $strAttr; + } // end func _getAttrString + + /** + * Returns a valid atrributes array from either a string or array + * @param mixed $attributes Either a typical HTML attribute string or an associative array + * @access private + * @return array + */ + function _parseAttributes($attributes) + { + if (is_array($attributes)) { + $ret = array(); + foreach ($attributes as $key => $value) { + if (is_int($key)) { + $key = $value = strtolower($value); + } else { + $key = strtolower($key); + } + $ret[$key] = $value; + } + return $ret; + + } elseif (is_string($attributes)) { + $preg = "/(([A-Za-z_:]|[^\\x00-\\x7F])([A-Za-z0-9_:.-]|[^\\x00-\\x7F])*)" . + "([ \\n\\t\\r]+)?(=([ \\n\\t\\r]+)?(\"[^\"]*\"|'[^']*'|[^ \\n\\t\\r]*))?/"; + if (preg_match_all($preg, $attributes, $regs)) { + for ($counter=0; $counter $value) { + $attr1[$key] = $value; + } + } // end func _updateAtrrArray + + /** + * Removes the given attribute from the given array + * + * @param string $attr Attribute name + * @param array $attributes Attribute array + * @since 1.4 + * @access private + * @return void + */ + function _removeAttr($attr, &$attributes) + { + $attr = strtolower($attr); + if (isset($attributes[$attr])) { + unset($attributes[$attr]); + } + } //end func _removeAttr + + /** + * Returns the value of the given attribute + * + * @param string $attr Attribute name + * @since 1.5 + * @access public + * @return string|null returns null if an attribute does not exist + */ + function getAttribute($attr) + { + $attr = strtolower($attr); + if (isset($this->_attributes[$attr])) { + return $this->_attributes[$attr]; + } + return null; + } //end func getAttribute + + /** + * Sets the value of the attribute + * + * @param string Attribute name + * @param string Attribute value (will be set to $name if omitted) + * @access public + */ + function setAttribute($name, $value = null) + { + $name = strtolower($name); + if (is_null($value)) { + $value = $name; + } + $this->_attributes[$name] = $value; + } // end func setAttribute + + /** + * Sets the HTML attributes + * @param mixed $attributes Either a typical HTML attribute string or an associative array + * @access public + */ + function setAttributes($attributes) + { + $this->_attributes = $this->_parseAttributes($attributes); + } // end func setAttributes + + /** + * Returns the assoc array (default) or string of attributes + * + * @param bool Whether to return the attributes as string + * @since 1.6 + * @access public + * @return mixed attributes + */ + function getAttributes($asString = false) + { + if ($asString) { + return $this->_getAttrString($this->_attributes); + } else { + return $this->_attributes; + } + } //end func getAttributes + + /** + * Updates the passed attributes without changing the other existing attributes + * @param mixed $attributes Either a typical HTML attribute string or an associative array + * @access public + */ + function updateAttributes($attributes) + { + $this->_updateAttrArray($this->_attributes, $this->_parseAttributes($attributes)); + } // end func updateAttributes + + /** + * Removes an attribute + * + * @param string $attr Attribute name + * @since 1.4 + * @access public + * @return void + */ + function removeAttribute($attr) + { + $this->_removeAttr($attr, $this->_attributes); + } //end func removeAttribute + + /** + * Sets the line end style to Windows, Mac, Unix or a custom string. + * + * @param string $style "win", "mac", "unix" or custom string. + * @since 1.7 + * @access public + * @return void + */ + function setLineEnd($style) + { + switch ($style) { + case 'win': + $this->_lineEnd = "\15\12"; + break; + case 'unix': + $this->_lineEnd = "\12"; + break; + case 'mac': + $this->_lineEnd = "\15"; + break; + default: + $this->_lineEnd = $style; + } + } // end func setLineEnd + + /** + * Sets the tab offset + * + * @param int $offset + * @access public + */ + function setTabOffset($offset) + { + $this->_tabOffset = $offset; + } // end func setTabOffset + + /** + * Returns the tabOffset + * + * @since 1.5 + * @access public + * @return int + */ + function getTabOffset() + { + return $this->_tabOffset; + } //end func getTabOffset + + /** + * Sets the string used to indent HTML + * + * @since 1.7 + * @param string $string String used to indent ("\11", "\t", ' ', etc.). + * @access public + * @return void + */ + function setTab($string) + { + $this->_tab = $string; + } // end func setTab + + /** + * Sets the HTML comment to be displayed at the beginning of the HTML string + * + * @param string + * @since 1.4 + * @access public + * @return void + */ + function setComment($comment) + { + $this->_comment = $comment; + } // end func setHtmlComment + + /** + * Returns the HTML comment + * + * @since 1.5 + * @access public + * @return string + */ + function getComment() + { + return $this->_comment; + } //end func getComment + + /** + * Abstract method. Must be extended to return the objects HTML + * + * @access public + * @return string + * @abstract + */ + function toHtml() + { + return ''; + } // end func toHtml + + /** + * Displays the HTML to the screen + * + * @access public + */ + function display() + { + print $this->toHtml(); + } // end func display + + /** + * Sets the charset to use by htmlspecialchars() function + * + * Since this parameter is expected to be global, the function is designed + * to be called statically: + * + * HTML_Common::charset('utf-8'); + * + * or + * + * $charset = HTML_Common::charset(); + * + * + * @param string New charset to use. Omit if just getting the + * current value. Consult the htmlspecialchars() docs + * for a list of supported character sets. + * @return string Current charset + * @access public + * @static + */ + function charset($newCharset = null) + { + static $charset = 'ISO-8859-1'; + + if (!is_null($newCharset)) { + $charset = $newCharset; + } + return $charset; + } // end func charset +} // end class HTML_Common +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm.php b/campcaster/src/tools/pear/src/HTML/QuickForm.php new file mode 100644 index 000000000..dfe57fe98 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm.php @@ -0,0 +1,2007 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: QuickForm.php,v 1.162 2006/10/07 20:12:17 avb Exp $ + +require_once('PEAR.php'); +require_once('HTML/Common.php'); + +$GLOBALS['HTML_QUICKFORM_ELEMENT_TYPES'] = + array( + 'group' =>array('HTML/QuickForm/group.php','HTML_QuickForm_group'), + 'hidden' =>array('HTML/QuickForm/hidden.php','HTML_QuickForm_hidden'), + 'reset' =>array('HTML/QuickForm/reset.php','HTML_QuickForm_reset'), + 'checkbox' =>array('HTML/QuickForm/checkbox.php','HTML_QuickForm_checkbox'), + 'file' =>array('HTML/QuickForm/file.php','HTML_QuickForm_file'), + 'image' =>array('HTML/QuickForm/image.php','HTML_QuickForm_image'), + 'password' =>array('HTML/QuickForm/password.php','HTML_QuickForm_password'), + 'radio' =>array('HTML/QuickForm/radio.php','HTML_QuickForm_radio'), + 'button' =>array('HTML/QuickForm/button.php','HTML_QuickForm_button'), + 'submit' =>array('HTML/QuickForm/submit.php','HTML_QuickForm_submit'), + 'select' =>array('HTML/QuickForm/select.php','HTML_QuickForm_select'), + 'hiddenselect' =>array('HTML/QuickForm/hiddenselect.php','HTML_QuickForm_hiddenselect'), + 'text' =>array('HTML/QuickForm/text.php','HTML_QuickForm_text'), + 'textarea' =>array('HTML/QuickForm/textarea.php','HTML_QuickForm_textarea'), + 'link' =>array('HTML/QuickForm/link.php','HTML_QuickForm_link'), + 'advcheckbox' =>array('HTML/QuickForm/advcheckbox.php','HTML_QuickForm_advcheckbox'), + 'date' =>array('HTML/QuickForm/date.php','HTML_QuickForm_date'), + 'static' =>array('HTML/QuickForm/static.php','HTML_QuickForm_static'), + 'header' =>array('HTML/QuickForm/header.php', 'HTML_QuickForm_header'), + 'html' =>array('HTML/QuickForm/html.php', 'HTML_QuickForm_html'), + 'hierselect' =>array('HTML/QuickForm/hierselect.php', 'HTML_QuickForm_hierselect'), + 'autocomplete' =>array('HTML/QuickForm/autocomplete.php', 'HTML_QuickForm_autocomplete'), + 'xbutton' =>array('HTML/QuickForm/xbutton.php','HTML_QuickForm_xbutton') + ); + +$GLOBALS['_HTML_QuickForm_registered_rules'] = array( + 'required' => array('html_quickform_rule_required', 'HTML/QuickForm/Rule/Required.php'), + 'maxlength' => array('html_quickform_rule_range', 'HTML/QuickForm/Rule/Range.php'), + 'minlength' => array('html_quickform_rule_range', 'HTML/QuickForm/Rule/Range.php'), + 'rangelength' => array('html_quickform_rule_range', 'HTML/QuickForm/Rule/Range.php'), + 'email' => array('html_quickform_rule_email', 'HTML/QuickForm/Rule/Email.php'), + 'regex' => array('html_quickform_rule_regex', 'HTML/QuickForm/Rule/Regex.php'), + 'lettersonly' => array('html_quickform_rule_regex', 'HTML/QuickForm/Rule/Regex.php'), + 'alphanumeric' => array('html_quickform_rule_regex', 'HTML/QuickForm/Rule/Regex.php'), + 'numeric' => array('html_quickform_rule_regex', 'HTML/QuickForm/Rule/Regex.php'), + 'nopunctuation' => array('html_quickform_rule_regex', 'HTML/QuickForm/Rule/Regex.php'), + 'nonzero' => array('html_quickform_rule_regex', 'HTML/QuickForm/Rule/Regex.php'), + 'callback' => array('html_quickform_rule_callback', 'HTML/QuickForm/Rule/Callback.php'), + 'compare' => array('html_quickform_rule_compare', 'HTML/QuickForm/Rule/Compare.php') +); + +// {{{ error codes + +/* + * Error codes for the QuickForm interface, which will be mapped to textual messages + * in the QuickForm::errorMessage() function. If you are to add a new error code, be + * sure to add the textual messages to the QuickForm::errorMessage() function as well + */ + +define('QUICKFORM_OK', 1); +define('QUICKFORM_ERROR', -1); +define('QUICKFORM_INVALID_RULE', -2); +define('QUICKFORM_NONEXIST_ELEMENT', -3); +define('QUICKFORM_INVALID_FILTER', -4); +define('QUICKFORM_UNREGISTERED_ELEMENT', -5); +define('QUICKFORM_INVALID_ELEMENT_NAME', -6); +define('QUICKFORM_INVALID_PROCESS', -7); +define('QUICKFORM_DEPRECATED', -8); +define('QUICKFORM_INVALID_DATASOURCE', -9); + +// }}} + +/** +* Create, validate and process HTML forms +* +* @author Adam Daniel +* @author Bertrand Mansion +* @version 2.0 +* @since PHP 4.0.3pl1 +*/ +class HTML_QuickForm extends HTML_Common { + // {{{ properties + + /** + * Array containing the form fields + * @since 1.0 + * @var array + * @access private + */ + var $_elements = array(); + + /** + * Array containing element name to index map + * @since 1.1 + * @var array + * @access private + */ + var $_elementIndex = array(); + + /** + * Array containing indexes of duplicate elements + * @since 2.10 + * @var array + * @access private + */ + var $_duplicateIndex = array(); + + /** + * Array containing required field IDs + * @since 1.0 + * @var array + * @access private + */ + var $_required = array(); + + /** + * Prefix message in javascript alert if error + * @since 1.0 + * @var string + * @access public + */ + var $_jsPrefix = 'Invalid information entered.'; + + /** + * Postfix message in javascript alert if error + * @since 1.0 + * @var string + * @access public + */ + var $_jsPostfix = 'Please correct these fields.'; + + /** + * Datasource object implementing the informal + * datasource protocol + * @since 3.3 + * @var object + * @access private + */ + var $_datasource; + + /** + * Array of default form values + * @since 2.0 + * @var array + * @access private + */ + var $_defaultValues = array(); + + /** + * Array of constant form values + * @since 2.0 + * @var array + * @access private + */ + var $_constantValues = array(); + + /** + * Array of submitted form values + * @since 1.0 + * @var array + * @access private + */ + var $_submitValues = array(); + + /** + * Array of submitted form files + * @since 1.0 + * @var integer + * @access public + */ + var $_submitFiles = array(); + + /** + * Value for maxfilesize hidden element if form contains file input + * @since 1.0 + * @var integer + * @access public + */ + var $_maxFileSize = 1048576; // 1 Mb = 1048576 + + /** + * Flag to know if all fields are frozen + * @since 1.0 + * @var boolean + * @access private + */ + var $_freezeAll = false; + + /** + * Array containing the form rules + * @since 1.0 + * @var array + * @access private + */ + var $_rules = array(); + + /** + * Form rules, global variety + * @var array + * @access private + */ + var $_formRules = array(); + + /** + * Array containing the validation errors + * @since 1.0 + * @var array + * @access private + */ + var $_errors = array(); + + /** + * Note for required fields in the form + * @var string + * @since 1.0 + * @access private + */ + var $_requiredNote = '* denotes required field'; + + /** + * Whether the form was submitted + * @var boolean + * @access private + */ + var $_flagSubmitted = false; + + // }}} + // {{{ constructor + + /** + * Class constructor + * @param string $formName Form's name. + * @param string $method (optional)Form's method defaults to 'POST' + * @param string $action (optional)Form's action + * @param string $target (optional)Form's target defaults to '_self' + * @param mixed $attributes (optional)Extra attributes for
tag + * @param bool $trackSubmit (optional)Whether to track if the form was submitted by adding a special hidden field + * @access public + */ + function HTML_QuickForm($formName='', $method='post', $action='', $target='', $attributes=null, $trackSubmit = false) + { + HTML_Common::HTML_Common($attributes); + $method = (strtoupper($method) == 'GET') ? 'get' : 'post'; + $action = ($action == '') ? $_SERVER['PHP_SELF'] : $action; + $target = empty($target) ? array() : array('target' => $target); + $attributes = array('action'=>$action, 'method'=>$method, 'name'=>$formName, 'id'=>$formName) + $target; + $this->updateAttributes($attributes); + if (!$trackSubmit || isset($_REQUEST['_qf__' . $formName])) { + if (1 == get_magic_quotes_gpc()) { + $this->_submitValues = $this->_recursiveFilter('stripslashes', 'get' == $method? $_GET: $_POST); + foreach ($_FILES as $keyFirst => $valFirst) { + foreach ($valFirst as $keySecond => $valSecond) { + if ('name' == $keySecond) { + $this->_submitFiles[$keyFirst][$keySecond] = $this->_recursiveFilter('stripslashes', $valSecond); + } else { + $this->_submitFiles[$keyFirst][$keySecond] = $valSecond; + } + } + } + } else { + $this->_submitValues = 'get' == $method? $_GET: $_POST; + $this->_submitFiles = $_FILES; + } + $this->_flagSubmitted = count($this->_submitValues) > 0 || count($this->_submitFiles) > 0; + } + if ($trackSubmit) { + unset($this->_submitValues['_qf__' . $formName]); + $this->addElement('hidden', '_qf__' . $formName, null); + } + if (preg_match('/^([0-9]+)([a-zA-Z]*)$/', ini_get('upload_max_filesize'), $matches)) { + // see http://www.php.net/manual/en/faq.using.php#faq.using.shorthandbytes + switch (strtoupper($matches['2'])) { + case 'G': + $this->_maxFileSize = $matches['1'] * 1073741824; + break; + case 'M': + $this->_maxFileSize = $matches['1'] * 1048576; + break; + case 'K': + $this->_maxFileSize = $matches['1'] * 1024; + break; + default: + $this->_maxFileSize = $matches['1']; + } + } + } // end constructor + + // }}} + // {{{ apiVersion() + + /** + * Returns the current API version + * + * @since 1.0 + * @access public + * @return float + */ + function apiVersion() + { + return 3.2; + } // end func apiVersion + + // }}} + // {{{ registerElementType() + + /** + * Registers a new element type + * + * @param string $typeName Name of element type + * @param string $include Include path for element type + * @param string $className Element class name + * @since 1.0 + * @access public + * @return void + */ + function registerElementType($typeName, $include, $className) + { + $GLOBALS['HTML_QUICKFORM_ELEMENT_TYPES'][strtolower($typeName)] = array($include, $className); + } // end func registerElementType + + // }}} + // {{{ registerRule() + + /** + * Registers a new validation rule + * + * @param string $ruleName Name of validation rule + * @param string $type Either: 'regex', 'function' or 'rule' for an HTML_QuickForm_Rule object + * @param string $data1 Name of function, regular expression or HTML_QuickForm_Rule classname + * @param string $data2 Object parent of above function or HTML_QuickForm_Rule file path + * @since 1.0 + * @access public + * @return void + */ + function registerRule($ruleName, $type, $data1, $data2 = null) + { + include_once('HTML/QuickForm/RuleRegistry.php'); + $registry =& HTML_QuickForm_RuleRegistry::singleton(); + $registry->registerRule($ruleName, $type, $data1, $data2); + } // end func registerRule + + // }}} + // {{{ elementExists() + + /** + * Returns true if element is in the form + * + * @param string $element form name of element to check + * @since 1.0 + * @access public + * @return boolean + */ + function elementExists($element=null) + { + return isset($this->_elementIndex[$element]); + } // end func elementExists + + // }}} + // {{{ setDatasource() + + /** + * Sets a datasource object for this form object + * + * Datasource default and constant values will feed the QuickForm object if + * the datasource implements defaultValues() and constantValues() methods. + * + * @param object $datasource datasource object implementing the informal datasource protocol + * @param mixed $defaultsFilter string or array of filter(s) to apply to default values + * @param mixed $constantsFilter string or array of filter(s) to apply to constants values + * @since 3.3 + * @access public + * @return void + */ + function setDatasource(&$datasource, $defaultsFilter = null, $constantsFilter = null) + { + if (is_object($datasource)) { + $this->_datasource =& $datasource; + if (is_callable(array($datasource, 'defaultValues'))) { + $this->setDefaults($datasource->defaultValues($this), $defaultsFilter); + } + if (is_callable(array($datasource, 'constantValues'))) { + $this->setConstants($datasource->constantValues($this), $constantsFilter); + } + } else { + return PEAR::raiseError(null, QUICKFORM_INVALID_DATASOURCE, null, E_USER_WARNING, "Datasource is not an object in QuickForm::setDatasource()", 'HTML_QuickForm_Error', true); + } + } // end func setDatasource + + // }}} + // {{{ setDefaults() + + /** + * Initializes default form values + * + * @param array $defaultValues values used to fill the form + * @param mixed $filter (optional) filter(s) to apply to all default values + * @since 1.0 + * @access public + * @return void + */ + function setDefaults($defaultValues = null, $filter = null) + { + if (is_array($defaultValues)) { + if (isset($filter)) { + if (is_array($filter) && (2 != count($filter) || !is_callable($filter))) { + foreach ($filter as $val) { + if (!is_callable($val)) { + return PEAR::raiseError(null, QUICKFORM_INVALID_FILTER, null, E_USER_WARNING, "Callback function does not exist in QuickForm::setDefaults()", 'HTML_QuickForm_Error', true); + } else { + $defaultValues = $this->_recursiveFilter($val, $defaultValues); + } + } + } elseif (!is_callable($filter)) { + return PEAR::raiseError(null, QUICKFORM_INVALID_FILTER, null, E_USER_WARNING, "Callback function does not exist in QuickForm::setDefaults()", 'HTML_QuickForm_Error', true); + } else { + $defaultValues = $this->_recursiveFilter($filter, $defaultValues); + } + } + $this->_defaultValues = HTML_QuickForm::arrayMerge($this->_defaultValues, $defaultValues); + foreach (array_keys($this->_elements) as $key) { + $this->_elements[$key]->onQuickFormEvent('updateValue', null, $this); + } + } + } // end func setDefaults + + // }}} + // {{{ setConstants() + + /** + * Initializes constant form values. + * These values won't get overridden by POST or GET vars + * + * @param array $constantValues values used to fill the form + * @param mixed $filter (optional) filter(s) to apply to all default values + * + * @since 2.0 + * @access public + * @return void + */ + function setConstants($constantValues = null, $filter = null) + { + if (is_array($constantValues)) { + if (isset($filter)) { + if (is_array($filter) && (2 != count($filter) || !is_callable($filter))) { + foreach ($filter as $val) { + if (!is_callable($val)) { + return PEAR::raiseError(null, QUICKFORM_INVALID_FILTER, null, E_USER_WARNING, "Callback function does not exist in QuickForm::setConstants()", 'HTML_QuickForm_Error', true); + } else { + $constantValues = $this->_recursiveFilter($val, $constantValues); + } + } + } elseif (!is_callable($filter)) { + return PEAR::raiseError(null, QUICKFORM_INVALID_FILTER, null, E_USER_WARNING, "Callback function does not exist in QuickForm::setConstants()", 'HTML_QuickForm_Error', true); + } else { + $constantValues = $this->_recursiveFilter($filter, $constantValues); + } + } + $this->_constantValues = HTML_QuickForm::arrayMerge($this->_constantValues, $constantValues); + foreach (array_keys($this->_elements) as $key) { + $this->_elements[$key]->onQuickFormEvent('updateValue', null, $this); + } + } + } // end func setConstants + + // }}} + // {{{ setMaxFileSize() + + /** + * Sets the value of MAX_FILE_SIZE hidden element + * + * @param int $bytes Size in bytes + * @since 3.0 + * @access public + * @return void + */ + function setMaxFileSize($bytes = 0) + { + if ($bytes > 0) { + $this->_maxFileSize = $bytes; + } + if (!$this->elementExists('MAX_FILE_SIZE')) { + $this->addElement('hidden', 'MAX_FILE_SIZE', $this->_maxFileSize); + } else { + $el =& $this->getElement('MAX_FILE_SIZE'); + $el->updateAttributes(array('value' => $this->_maxFileSize)); + } + } // end func setMaxFileSize + + // }}} + // {{{ getMaxFileSize() + + /** + * Returns the value of MAX_FILE_SIZE hidden element + * + * @since 3.0 + * @access public + * @return int max file size in bytes + */ + function getMaxFileSize() + { + return $this->_maxFileSize; + } // end func getMaxFileSize + + // }}} + // {{{ &createElement() + + /** + * Creates a new form element of the given type. + * + * This method accepts variable number of parameters, their + * meaning and count depending on $elementType + * + * @param string $elementType type of element to add (text, textarea, file...) + * @since 1.0 + * @access public + * @return object extended class of HTML_element + * @throws HTML_QuickForm_Error + */ + function &createElement($elementType) + { + $args = func_get_args(); + $element =& HTML_QuickForm::_loadElement('createElement', $elementType, array_slice($args, 1)); + return $element; + } // end func createElement + + // }}} + // {{{ _loadElement() + + /** + * Returns a form element of the given type + * + * @param string $event event to send to newly created element ('createElement' or 'addElement') + * @param string $type element type + * @param array $args arguments for event + * @since 2.0 + * @access private + * @return object a new element + * @throws HTML_QuickForm_Error + */ + function &_loadElement($event, $type, $args) + { + $type = strtolower($type); + if (!HTML_QuickForm::isTypeRegistered($type)) { + $error = PEAR::raiseError(null, QUICKFORM_UNREGISTERED_ELEMENT, null, E_USER_WARNING, "Element '$type' does not exist in HTML_QuickForm::_loadElement()", 'HTML_QuickForm_Error', true); + return $error; + } + $className = $GLOBALS['HTML_QUICKFORM_ELEMENT_TYPES'][$type][1]; + $includeFile = $GLOBALS['HTML_QUICKFORM_ELEMENT_TYPES'][$type][0]; + include_once($includeFile); + $elementObject =& new $className(); + for ($i = 0; $i < 5; $i++) { + if (!isset($args[$i])) { + $args[$i] = null; + } + } + $err = $elementObject->onQuickFormEvent($event, $args, $this); + if ($err !== true) { + return $err; + } + return $elementObject; + } // end func _loadElement + + // }}} + // {{{ addElement() + + /** + * Adds an element into the form + * + * If $element is a string representing element type, then this + * method accepts variable number of parameters, their meaning + * and count depending on $element + * + * @param mixed $element element object or type of element to add (text, textarea, file...) + * @since 1.0 + * @return object reference to element + * @access public + * @throws HTML_QuickForm_Error + */ + function &addElement($element) + { + if (is_object($element) && is_subclass_of($element, 'html_quickform_element')) { + $elementObject = &$element; + $elementObject->onQuickFormEvent('updateValue', null, $this); + } else { + $args = func_get_args(); + $elementObject =& $this->_loadElement('addElement', $element, array_slice($args, 1)); + if (PEAR::isError($elementObject)) { + return $elementObject; + } + } + $elementName = $elementObject->getName(); + + // Add the element if it is not an incompatible duplicate + if (!empty($elementName) && isset($this->_elementIndex[$elementName])) { + if ($this->_elements[$this->_elementIndex[$elementName]]->getType() == + $elementObject->getType()) { + $this->_elements[] =& $elementObject; + $elKeys = array_keys($this->_elements); + $this->_duplicateIndex[$elementName][] = end($elKeys); + } else { + $error = PEAR::raiseError(null, QUICKFORM_INVALID_ELEMENT_NAME, null, E_USER_WARNING, "Element '$elementName' already exists in HTML_QuickForm::addElement()", 'HTML_QuickForm_Error', true); + return $error; + } + } else { + $this->_elements[] =& $elementObject; + $elKeys = array_keys($this->_elements); + $this->_elementIndex[$elementName] = end($elKeys); + } + if ($this->_freezeAll) { + $elementObject->freeze(); + } + + return $elementObject; + } // end func addElement + + // }}} + // {{{ insertElementBefore() + + /** + * Inserts a new element right before the other element + * + * Warning: it is not possible to check whether the $element is already + * added to the form, therefore if you want to move the existing form + * element to a new position, you'll have to use removeElement(): + * $form->insertElementBefore($form->removeElement('foo', false), 'bar'); + * + * @access public + * @since 3.2.4 + * @param object HTML_QuickForm_element Element to insert + * @param string Name of the element before which the new one is inserted + * @return object HTML_QuickForm_element reference to inserted element + * @throws HTML_QuickForm_Error + */ + function &insertElementBefore(&$element, $nameAfter) + { + if (!empty($this->_duplicateIndex[$nameAfter])) { + $error = PEAR::raiseError(null, QUICKFORM_INVALID_ELEMENT_NAME, null, E_USER_WARNING, 'Several elements named "' . $nameAfter . '" exist in HTML_QuickForm::insertElementBefore().', 'HTML_QuickForm_Error', true); + return $error; + } elseif (!$this->elementExists($nameAfter)) { + $error = PEAR::raiseError(null, QUICKFORM_NONEXIST_ELEMENT, null, E_USER_WARNING, "Element '$nameAfter' does not exist in HTML_QuickForm::insertElementBefore()", 'HTML_QuickForm_Error', true); + return $error; + } + $elementName = $element->getName(); + $targetIdx = $this->_elementIndex[$nameAfter]; + $duplicate = false; + // Like in addElement(), check that it's not an incompatible duplicate + if (!empty($elementName) && isset($this->_elementIndex[$elementName])) { + if ($this->_elements[$this->_elementIndex[$elementName]]->getType() != $element->getType()) { + $error = PEAR::raiseError(null, QUICKFORM_INVALID_ELEMENT_NAME, null, E_USER_WARNING, "Element '$elementName' already exists in HTML_QuickForm::insertElementBefore()", 'HTML_QuickForm_Error', true); + return $error; + } + $duplicate = true; + } + // Move all the elements after added back one place, reindex _elementIndex and/or _duplicateIndex + $elKeys = array_keys($this->_elements); + for ($i = end($elKeys); $i >= $targetIdx; $i--) { + if (isset($this->_elements[$i])) { + $currentName = $this->_elements[$i]->getName(); + $this->_elements[$i + 1] =& $this->_elements[$i]; + if ($this->_elementIndex[$currentName] == $i) { + $this->_elementIndex[$currentName] = $i + 1; + } else { + $dupIdx = array_search($i, $this->_duplicateIndex[$currentName]); + $this->_duplicateIndex[$currentName][$dupIdx] = $i + 1; + } + unset($this->_elements[$i]); + } + } + // Put the element in place finally + $this->_elements[$targetIdx] =& $element; + if (!$duplicate) { + $this->_elementIndex[$elementName] = $targetIdx; + } else { + $this->_duplicateIndex[$elementName][] = $targetIdx; + } + $element->onQuickFormEvent('updateValue', null, $this); + if ($this->_freezeAll) { + $element->freeze(); + } + // If not done, the elements will appear in reverse order + ksort($this->_elements); + return $element; + } + + // }}} + // {{{ addGroup() + + /** + * Adds an element group + * @param array $elements array of elements composing the group + * @param string $name (optional)group name + * @param string $groupLabel (optional)group label + * @param string $separator (optional)string to separate elements + * @param string $appendName (optional)specify whether the group name should be + * used in the form element name ex: group[element] + * @return object reference to added group of elements + * @since 2.8 + * @access public + * @throws PEAR_Error + */ + function &addGroup($elements, $name=null, $groupLabel='', $separator=null, $appendName = true) + { + static $anonGroups = 1; + + if (0 == strlen($name)) { + $name = 'qf_group_' . $anonGroups++; + $appendName = false; + } + $group =& $this->addElement('group', $name, $groupLabel, $elements, $separator, $appendName); + return $group; + } // end func addGroup + + // }}} + // {{{ &getElement() + + /** + * Returns a reference to the element + * + * @param string $element Element name + * @since 2.0 + * @access public + * @return object reference to element + * @throws HTML_QuickForm_Error + */ + function &getElement($element) + { + if (isset($this->_elementIndex[$element])) { + return $this->_elements[$this->_elementIndex[$element]]; + } else { + $error = PEAR::raiseError(null, QUICKFORM_NONEXIST_ELEMENT, null, E_USER_WARNING, "Element '$element' does not exist in HTML_QuickForm::getElement()", 'HTML_QuickForm_Error', true); + return $error; + } + } // end func getElement + + // }}} + // {{{ &getElementValue() + + /** + * Returns the element's raw value + * + * This returns the value as submitted by the form (not filtered) + * or set via setDefaults() or setConstants() + * + * @param string $element Element name + * @since 2.0 + * @access public + * @return mixed element value + * @throws HTML_QuickForm_Error + */ + function &getElementValue($element) + { + if (!isset($this->_elementIndex[$element])) { + $error = PEAR::raiseError(null, QUICKFORM_NONEXIST_ELEMENT, null, E_USER_WARNING, "Element '$element' does not exist in HTML_QuickForm::getElementValue()", 'HTML_QuickForm_Error', true); + return $error; + } + $value = $this->_elements[$this->_elementIndex[$element]]->getValue(); + if (isset($this->_duplicateIndex[$element])) { + foreach ($this->_duplicateIndex[$element] as $index) { + if (null !== ($v = $this->_elements[$index]->getValue())) { + if (is_array($value)) { + $value[] = $v; + } else { + $value = (null === $value)? $v: array($value, $v); + } + } + } + } + return $value; + } // end func getElementValue + + // }}} + // {{{ getSubmitValue() + + /** + * Returns the elements value after submit and filter + * + * @param string Element name + * @since 2.0 + * @access public + * @return mixed submitted element value or null if not set + */ + function getSubmitValue($elementName) + { + $value = null; + if (isset($this->_submitValues[$elementName]) || isset($this->_submitFiles[$elementName])) { + $value = isset($this->_submitValues[$elementName])? $this->_submitValues[$elementName]: array(); + if (is_array($value) && isset($this->_submitFiles[$elementName])) { + foreach ($this->_submitFiles[$elementName] as $k => $v) { + $value = HTML_QuickForm::arrayMerge($value, $this->_reindexFiles($this->_submitFiles[$elementName][$k], $k)); + } + } + + } elseif ('file' == $this->getElementType($elementName)) { + return $this->getElementValue($elementName); + + } elseif (false !== ($pos = strpos($elementName, '['))) { + $base = str_replace( + array('\\', '\''), array('\\\\', '\\\''), + substr($elementName, 0, $pos) + ); + $idx = "['" . str_replace( + array('\\', '\'', ']', '['), array('\\\\', '\\\'', '', "']['"), + substr($elementName, $pos + 1, -1) + ) . "']"; + if (isset($this->_submitValues[$base])) { + $value = eval("return (isset(\$this->_submitValues['{$base}']{$idx})) ? \$this->_submitValues['{$base}']{$idx} : null;"); + } + + if ((is_array($value) || null === $value) && isset($this->_submitFiles[$base])) { + $props = array('name', 'type', 'size', 'tmp_name', 'error'); + $code = "if (!isset(\$this->_submitFiles['{$base}']['name']{$idx})) {\n" . + " return null;\n" . + "} else {\n" . + " \$v = array();\n"; + foreach ($props as $prop) { + $code .= " \$v = HTML_QuickForm::arrayMerge(\$v, \$this->_reindexFiles(\$this->_submitFiles['{$base}']['{$prop}']{$idx}, '{$prop}'));\n"; + } + $fileValue = eval($code . " return \$v;\n}\n"); + if (null !== $fileValue) { + $value = null === $value? $fileValue: HTML_QuickForm::arrayMerge($value, $fileValue); + } + } + } + + // This is only supposed to work for groups with appendName = false + if (null === $value && 'group' == $this->getElementType($elementName)) { + $group =& $this->getElement($elementName); + $elements =& $group->getElements(); + foreach (array_keys($elements) as $key) { + $name = $group->getElementName($key); + // prevent endless recursion in case of radios and such + if ($name != $elementName) { + if (null !== ($v = $this->getSubmitValue($name))) { + $value[$name] = $v; + } + } + } + } + return $value; + } // end func getSubmitValue + + // }}} + // {{{ _reindexFiles() + + /** + * A helper function to change the indexes in $_FILES array + * + * @param mixed Some value from the $_FILES array + * @param string The key from the $_FILES array that should be appended + * @return array + */ + function _reindexFiles($value, $key) + { + if (!is_array($value)) { + return array($key => $value); + } else { + $ret = array(); + foreach ($value as $k => $v) { + $ret[$k] = $this->_reindexFiles($v, $key); + } + return $ret; + } + } + + // }}} + // {{{ getElementError() + + /** + * Returns error corresponding to validated element + * + * @param string $element Name of form element to check + * @since 1.0 + * @access public + * @return string error message corresponding to checked element + */ + function getElementError($element) + { + if (isset($this->_errors[$element])) { + return $this->_errors[$element]; + } + } // end func getElementError + + // }}} + // {{{ setElementError() + + /** + * Set error message for a form element + * + * @param string $element Name of form element to set error for + * @param string $message Error message, if empty then removes the current error message + * @since 1.0 + * @access public + * @return void + */ + function setElementError($element, $message = null) + { + if (!empty($message)) { + $this->_errors[$element] = $message; + } else { + unset($this->_errors[$element]); + } + } // end func setElementError + + // }}} + // {{{ getElementType() + + /** + * Returns the type of the given element + * + * @param string $element Name of form element + * @since 1.1 + * @access public + * @return string Type of the element, false if the element is not found + */ + function getElementType($element) + { + if (isset($this->_elementIndex[$element])) { + return $this->_elements[$this->_elementIndex[$element]]->getType(); + } + return false; + } // end func getElementType + + // }}} + // {{{ updateElementAttr() + + /** + * Updates Attributes for one or more elements + * + * @param mixed $elements Array of element names/objects or string of elements to be updated + * @param mixed $attrs Array or sting of html attributes + * @since 2.10 + * @access public + * @return void + */ + function updateElementAttr($elements, $attrs) + { + if (is_string($elements)) { + $elements = split('[ ]?,[ ]?', $elements); + } + foreach (array_keys($elements) as $key) { + if (is_object($elements[$key]) && is_a($elements[$key], 'HTML_QuickForm_element')) { + $elements[$key]->updateAttributes($attrs); + } elseif (isset($this->_elementIndex[$elements[$key]])) { + $this->_elements[$this->_elementIndex[$elements[$key]]]->updateAttributes($attrs); + if (isset($this->_duplicateIndex[$elements[$key]])) { + foreach ($this->_duplicateIndex[$elements[$key]] as $index) { + $this->_elements[$index]->updateAttributes($attrs); + } + } + } + } + } // end func updateElementAttr + + // }}} + // {{{ removeElement() + + /** + * Removes an element + * + * The method "unlinks" an element from the form, returning the reference + * to the element object. If several elements named $elementName exist, + * it removes the first one, leaving the others intact. + * + * @param string $elementName The element name + * @param boolean $removeRules True if rules for this element are to be removed too + * @access public + * @since 2.0 + * @return object HTML_QuickForm_element a reference to the removed element + * @throws HTML_QuickForm_Error + */ + function &removeElement($elementName, $removeRules = true) + { + if (!isset($this->_elementIndex[$elementName])) { + $error = PEAR::raiseError(null, QUICKFORM_NONEXIST_ELEMENT, null, E_USER_WARNING, "Element '$elementName' does not exist in HTML_QuickForm::removeElement()", 'HTML_QuickForm_Error', true); + return $error; + } + $el =& $this->_elements[$this->_elementIndex[$elementName]]; + unset($this->_elements[$this->_elementIndex[$elementName]]); + if (empty($this->_duplicateIndex[$elementName])) { + unset($this->_elementIndex[$elementName]); + } else { + $this->_elementIndex[$elementName] = array_shift($this->_duplicateIndex[$elementName]); + } + if ($removeRules) { + unset($this->_rules[$elementName], $this->_errors[$elementName]); + } + return $el; + } // end func removeElement + + // }}} + // {{{ addRule() + + /** + * Adds a validation rule for the given field + * + * If the element is in fact a group, it will be considered as a whole. + * To validate grouped elements as separated entities, + * use addGroupRule instead of addRule. + * + * @param string $element Form element name + * @param string $message Message to display for invalid data + * @param string $type Rule type, use getRegisteredRules() to get types + * @param string $format (optional)Required for extra rule data + * @param string $validation (optional)Where to perform validation: "server", "client" + * @param boolean $reset Client-side validation: reset the form element to its original value if there is an error? + * @param boolean $force Force the rule to be applied, even if the target form element does not exist + * @since 1.0 + * @access public + * @throws HTML_QuickForm_Error + */ + function addRule($element, $message, $type, $format=null, $validation='server', $reset = false, $force = false) + { + if (!$force) { + if (!is_array($element) && !$this->elementExists($element)) { + return PEAR::raiseError(null, QUICKFORM_NONEXIST_ELEMENT, null, E_USER_WARNING, "Element '$element' does not exist in HTML_QuickForm::addRule()", 'HTML_QuickForm_Error', true); + } elseif (is_array($element)) { + foreach ($element as $el) { + if (!$this->elementExists($el)) { + return PEAR::raiseError(null, QUICKFORM_NONEXIST_ELEMENT, null, E_USER_WARNING, "Element '$el' does not exist in HTML_QuickForm::addRule()", 'HTML_QuickForm_Error', true); + } + } + } + } + if (false === ($newName = $this->isRuleRegistered($type, true))) { + return PEAR::raiseError(null, QUICKFORM_INVALID_RULE, null, E_USER_WARNING, "Rule '$type' is not registered in HTML_QuickForm::addRule()", 'HTML_QuickForm_Error', true); + } elseif (is_string($newName)) { + $type = $newName; + } + if (is_array($element)) { + $dependent = $element; + $element = array_shift($dependent); + } else { + $dependent = null; + } + if ($type == 'required' || $type == 'uploadedfile') { + $this->_required[] = $element; + } + if (!isset($this->_rules[$element])) { + $this->_rules[$element] = array(); + } + if ($validation == 'client') { + $this->updateAttributes(array('onsubmit' => 'try { var myValidator = validate_' . $this->_attributes['id'] . '; } catch(e) { return true; } return myValidator(this);')); + } + $this->_rules[$element][] = array( + 'type' => $type, + 'format' => $format, + 'message' => $message, + 'validation' => $validation, + 'reset' => $reset, + 'dependent' => $dependent + ); + } // end func addRule + + // }}} + // {{{ addGroupRule() + + /** + * Adds a validation rule for the given group of elements + * + * Only groups with a name can be assigned a validation rule + * Use addGroupRule when you need to validate elements inside the group. + * Use addRule if you need to validate the group as a whole. In this case, + * the same rule will be applied to all elements in the group. + * Use addRule if you need to validate the group against a function. + * + * @param string $group Form group name + * @param mixed $arg1 Array for multiple elements or error message string for one element + * @param string $type (optional)Rule type use getRegisteredRules() to get types + * @param string $format (optional)Required for extra rule data + * @param int $howmany (optional)How many valid elements should be in the group + * @param string $validation (optional)Where to perform validation: "server", "client" + * @param bool $reset Client-side: whether to reset the element's value to its original state if validation failed. + * @since 2.5 + * @access public + * @throws HTML_QuickForm_Error + */ + function addGroupRule($group, $arg1, $type='', $format=null, $howmany=0, $validation = 'server', $reset = false) + { + if (!$this->elementExists($group)) { + return PEAR::raiseError(null, QUICKFORM_NONEXIST_ELEMENT, null, E_USER_WARNING, "Group '$group' does not exist in HTML_QuickForm::addGroupRule()", 'HTML_QuickForm_Error', true); + } + + $groupObj =& $this->getElement($group); + if (is_array($arg1)) { + $required = 0; + foreach ($arg1 as $elementIndex => $rules) { + $elementName = $groupObj->getElementName($elementIndex); + foreach ($rules as $rule) { + $format = (isset($rule[2])) ? $rule[2] : null; + $validation = (isset($rule[3]) && 'client' == $rule[3])? 'client': 'server'; + $reset = isset($rule[4]) && $rule[4]; + $type = $rule[1]; + if (false === ($newName = $this->isRuleRegistered($type, true))) { + return PEAR::raiseError(null, QUICKFORM_INVALID_RULE, null, E_USER_WARNING, "Rule '$type' is not registered in HTML_QuickForm::addGroupRule()", 'HTML_QuickForm_Error', true); + } elseif (is_string($newName)) { + $type = $newName; + } + + $this->_rules[$elementName][] = array( + 'type' => $type, + 'format' => $format, + 'message' => $rule[0], + 'validation' => $validation, + 'reset' => $reset, + 'group' => $group); + + if ('required' == $type || 'uploadedfile' == $type) { + $groupObj->_required[] = $elementName; + $this->_required[] = $elementName; + $required++; + } + if ('client' == $validation) { + $this->updateAttributes(array('onsubmit' => 'try { var myValidator = validate_' . $this->_attributes['id'] . '; } catch(e) { return true; } return myValidator(this);')); + } + } + } + if ($required > 0 && count($groupObj->getElements()) == $required) { + $this->_required[] = $group; + } + } elseif (is_string($arg1)) { + if (false === ($newName = $this->isRuleRegistered($type, true))) { + return PEAR::raiseError(null, QUICKFORM_INVALID_RULE, null, E_USER_WARNING, "Rule '$type' is not registered in HTML_QuickForm::addGroupRule()", 'HTML_QuickForm_Error', true); + } elseif (is_string($newName)) { + $type = $newName; + } + + // addGroupRule() should also handle 's value for anything + * (because of security implications) we implement file's value as a + * read-only property with a special meaning. + * + * @param mixed Value for file element + * @since 3.0 + * @access public + */ + function setValue($value) + { + return null; + } //end func setValue + + // }}} + // {{{ getValue() + + /** + * Returns information about the uploaded file + * + * @since 3.0 + * @access public + * @return array + */ + function getValue() + { + return $this->_value; + } // end func getValue + + // }}} + // {{{ onQuickFormEvent() + + /** + * Called by HTML_QuickForm whenever form event is made on this element + * + * @param string Name of event + * @param mixed event arguments + * @param object calling object + * @since 1.0 + * @access public + * @return bool + */ + function onQuickFormEvent($event, $arg, &$caller) + { + switch ($event) { + case 'updateValue': + if ($caller->getAttribute('method') == 'get') { + return PEAR::raiseError('Cannot add a file upload field to a GET method form'); + } + $this->_value = $this->_findValue(); + $caller->updateAttributes(array('enctype' => 'multipart/form-data')); + $caller->setMaxFileSize(); + break; + case 'addElement': + $this->onQuickFormEvent('createElement', $arg, $caller); + return $this->onQuickFormEvent('updateValue', null, $caller); + break; + case 'createElement': + $className = get_class($this); + $this->$className($arg[0], $arg[1], $arg[2]); + break; + } + return true; + } // end func onQuickFormEvent + + // }}} + // {{{ moveUploadedFile() + + /** + * Moves an uploaded file into the destination + * + * @param string Destination directory path + * @param string New file name + * @access public + * @return bool Whether the file was moved successfully + */ + function moveUploadedFile($dest, $fileName = '') + { + if ($dest != '' && substr($dest, -1) != '/') { + $dest .= '/'; + } + $fileName = ($fileName != '') ? $fileName : basename($this->_value['name']); + return move_uploaded_file($this->_value['tmp_name'], $dest . $fileName); + } // end func moveUploadedFile + + // }}} + // {{{ isUploadedFile() + + /** + * Checks if the element contains an uploaded file + * + * @access public + * @return bool true if file has been uploaded, false otherwise + */ + function isUploadedFile() + { + return $this->_ruleIsUploadedFile($this->_value); + } // end func isUploadedFile + + // }}} + // {{{ _ruleIsUploadedFile() + + /** + * Checks if the given element contains an uploaded file + * + * @param array Uploaded file info (from $_FILES) + * @access private + * @return bool true if file has been uploaded, false otherwise + */ + function _ruleIsUploadedFile($elementValue) + { + if ((isset($elementValue['error']) && $elementValue['error'] == 0) || + (!empty($elementValue['tmp_name']) && $elementValue['tmp_name'] != 'none')) { + return is_uploaded_file($elementValue['tmp_name']); + } else { + return false; + } + } // end func _ruleIsUploadedFile + + // }}} + // {{{ _ruleCheckMaxFileSize() + + /** + * Checks that the file does not exceed the max file size + * + * @param array Uploaded file info (from $_FILES) + * @param int Max file size + * @access private + * @return bool true if filesize is lower than maxsize, false otherwise + */ + function _ruleCheckMaxFileSize($elementValue, $maxSize) + { + if (!empty($elementValue['error']) && + (UPLOAD_ERR_FORM_SIZE == $elementValue['error'] || UPLOAD_ERR_INI_SIZE == $elementValue['error'])) { + return false; + } + if (!HTML_QuickForm_file::_ruleIsUploadedFile($elementValue)) { + return true; + } + return ($maxSize >= @filesize($elementValue['tmp_name'])); + } // end func _ruleCheckMaxFileSize + + // }}} + // {{{ _ruleCheckMimeType() + + /** + * Checks if the given element contains an uploaded file of the right mime type + * + * @param array Uploaded file info (from $_FILES) + * @param mixed Mime Type (can be an array of allowed types) + * @access private + * @return bool true if mimetype is correct, false otherwise + */ + function _ruleCheckMimeType($elementValue, $mimeType) + { + if (!HTML_QuickForm_file::_ruleIsUploadedFile($elementValue)) { + return true; + } + if (is_array($mimeType)) { + return in_array($elementValue['type'], $mimeType); + } + return $elementValue['type'] == $mimeType; + } // end func _ruleCheckMimeType + + // }}} + // {{{ _ruleCheckFileName() + + /** + * Checks if the given element contains an uploaded file of the filename regex + * + * @param array Uploaded file info (from $_FILES) + * @param string Regular expression + * @access private + * @return bool true if name matches regex, false otherwise + */ + function _ruleCheckFileName($elementValue, $regex) + { + if (!HTML_QuickForm_file::_ruleIsUploadedFile($elementValue)) { + return true; + } + return preg_match($regex, $elementValue['name']); + } // end func _ruleCheckFileName + + // }}} + // {{{ _findValue() + + /** + * Tries to find the element value from the values array + * + * Needs to be redefined here as $_FILES is populated differently from + * other arrays when element name is of the form foo[bar] + * + * @access private + * @return mixed + */ + function _findValue() + { + if (empty($_FILES)) { + return null; + } + $elementName = $this->getName(); + if (isset($_FILES[$elementName])) { + return $_FILES[$elementName]; + } elseif (false !== ($pos = strpos($elementName, '['))) { + $base = str_replace( + array('\\', '\''), array('\\\\', '\\\''), + substr($elementName, 0, $pos) + ); + $idx = "['" . str_replace( + array('\\', '\'', ']', '['), array('\\\\', '\\\'', '', "']['"), + substr($elementName, $pos + 1, -1) + ) . "']"; + $props = array('name', 'type', 'size', 'tmp_name', 'error'); + $code = "if (!isset(\$_FILES['{$base}']['name']{$idx})) {\n" . + " return null;\n" . + "} else {\n" . + " \$value = array();\n"; + foreach ($props as $prop) { + $code .= " \$value['{$prop}'] = \$_FILES['{$base}']['{$prop}']{$idx};\n"; + } + return eval($code . " return \$value;\n}\n"); + } else { + return null; + } + } + + // }}} +} // end class HTML_QuickForm_file +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/group.php b/campcaster/src/tools/pear/src/HTML/QuickForm/group.php new file mode 100644 index 000000000..652f277ce --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/group.php @@ -0,0 +1,579 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: group.php,v 1.38 2006/01/11 17:13:20 mansion Exp $ + +require_once("HTML/QuickForm/element.php"); + +/** + * HTML class for a form element group + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_group extends HTML_QuickForm_element +{ + // {{{ properties + + /** + * Name of the element + * @var string + * @since 1.0 + * @access private + */ + var $_name = ''; + + /** + * Array of grouped elements + * @var array + * @since 1.0 + * @access private + */ + var $_elements = array(); + + /** + * String to separate elements + * @var mixed + * @since 2.5 + * @access private + */ + var $_separator = null; + + /** + * Required elements in this group + * @var array + * @since 2.5 + * @access private + */ + var $_required = array(); + + /** + * Whether to change elements' names to $groupName[$elementName] or leave them as is + * @var bool + * @since 3.0 + * @access private + */ + var $_appendName = true; + + // }}} + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementName (optional)Group name + * @param array $elementLabel (optional)Group label + * @param array $elements (optional)Group elements + * @param mixed $separator (optional)Use a string for one separator, + * use an array to alternate the separators. + * @param bool $appendName (optional)whether to change elements' names to + * the form $groupName[$elementName] or leave + * them as is. + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_group($elementName=null, $elementLabel=null, $elements=null, $separator=null, $appendName = true) + { + $this->HTML_QuickForm_element($elementName, $elementLabel); + $this->_type = 'group'; + if (isset($elements) && is_array($elements)) { + $this->setElements($elements); + } + if (isset($separator)) { + $this->_separator = $separator; + } + if (isset($appendName)) { + $this->_appendName = $appendName; + } + } //end constructor + + // }}} + // {{{ setName() + + /** + * Sets the group name + * + * @param string $name Group name + * @since 1.0 + * @access public + * @return void + */ + function setName($name) + { + $this->_name = $name; + } //end func setName + + // }}} + // {{{ getName() + + /** + * Returns the group name + * + * @since 1.0 + * @access public + * @return string + */ + function getName() + { + return $this->_name; + } //end func getName + + // }}} + // {{{ setValue() + + /** + * Sets values for group's elements + * + * @param mixed Values for group's elements + * @since 1.0 + * @access public + * @return void + */ + function setValue($value) + { + $this->_createElementsIfNotExist(); + foreach (array_keys($this->_elements) as $key) { + if (!$this->_appendName) { + $v = $this->_elements[$key]->_findValue($value); + if (null !== $v) { + $this->_elements[$key]->onQuickFormEvent('setGroupValue', $v, $this); + } + + } else { + $elementName = $this->_elements[$key]->getName(); + $index = strlen($elementName) ? $elementName : $key; + if (is_array($value)) { + if (isset($value[$index])) { + $this->_elements[$key]->onQuickFormEvent('setGroupValue', $value[$index], $this); + } + } elseif (isset($value)) { + $this->_elements[$key]->onQuickFormEvent('setGroupValue', $value, $this); + } + } + } + } //end func setValue + + // }}} + // {{{ getValue() + + /** + * Returns the value of the group + * + * @since 1.0 + * @access public + * @return mixed + */ + function getValue() + { + $value = null; + foreach (array_keys($this->_elements) as $key) { + $element =& $this->_elements[$key]; + switch ($element->getType()) { + case 'radio': + $v = $element->getChecked()? $element->getValue(): null; + break; + case 'checkbox': + $v = $element->getChecked()? true: null; + break; + default: + $v = $element->getValue(); + } + if (null !== $v) { + $elementName = $element->getName(); + if (is_null($elementName)) { + $value = $v; + } else { + if (!is_array($value)) { + $value = is_null($value)? array(): array($value); + } + if ('' === $elementName) { + $value[] = $v; + } else { + $value[$elementName] = $v; + } + } + } + } + return $value; + } // end func getValue + + // }}} + // {{{ setElements() + + /** + * Sets the grouped elements + * + * @param array $elements Array of elements + * @since 1.1 + * @access public + * @return void + */ + function setElements($elements) + { + $this->_elements = array_values($elements); + if ($this->_flagFrozen) { + $this->freeze(); + } + } // end func setElements + + // }}} + // {{{ getElements() + + /** + * Gets the grouped elements + * + * @since 2.4 + * @access public + * @return array + */ + function &getElements() + { + $this->_createElementsIfNotExist(); + return $this->_elements; + } // end func getElements + + // }}} + // {{{ getGroupType() + + /** + * Gets the group type based on its elements + * Will return 'mixed' if elements contained in the group + * are of different types. + * + * @access public + * @return string group elements type + */ + function getGroupType() + { + $this->_createElementsIfNotExist(); + $prevType = ''; + foreach (array_keys($this->_elements) as $key) { + $type = $this->_elements[$key]->getType(); + if ($type != $prevType && $prevType != '') { + return 'mixed'; + } + $prevType = $type; + } + return $type; + } // end func getGroupType + + // }}} + // {{{ toHtml() + + /** + * Returns Html for the group + * + * @since 1.0 + * @access public + * @return string + */ + function toHtml() + { + include_once('HTML/QuickForm/Renderer/Default.php'); + $renderer =& new HTML_QuickForm_Renderer_Default(); + $renderer->setElementTemplate('{element}'); + $this->accept($renderer); + return $renderer->toHtml(); + } //end func toHtml + + // }}} + // {{{ getElementName() + + /** + * Returns the element name inside the group such as found in the html form + * + * @param mixed $index Element name or element index in the group + * @since 3.0 + * @access public + * @return mixed string with element name, false if not found + */ + function getElementName($index) + { + $this->_createElementsIfNotExist(); + $elementName = false; + if (is_int($index) && isset($this->_elements[$index])) { + $elementName = $this->_elements[$index]->getName(); + if (isset($elementName) && $elementName == '') { + $elementName = $index; + } + if ($this->_appendName) { + if (is_null($elementName)) { + $elementName = $this->getName(); + } else { + $elementName = $this->getName().'['.$elementName.']'; + } + } + + } elseif (is_string($index)) { + foreach (array_keys($this->_elements) as $key) { + $elementName = $this->_elements[$key]->getName(); + if ($index == $elementName) { + if ($this->_appendName) { + $elementName = $this->getName().'['.$elementName.']'; + } + break; + } elseif ($this->_appendName && $this->getName().'['.$elementName.']' == $index) { + break; + } + } + } + return $elementName; + } //end func getElementName + + // }}} + // {{{ getFrozenHtml() + + /** + * Returns the value of field without HTML tags + * + * @since 1.3 + * @access public + * @return string + */ + function getFrozenHtml() + { + $flags = array(); + $this->_createElementsIfNotExist(); + foreach (array_keys($this->_elements) as $key) { + if (false === ($flags[$key] = $this->_elements[$key]->isFrozen())) { + $this->_elements[$key]->freeze(); + } + } + $html = $this->toHtml(); + foreach (array_keys($this->_elements) as $key) { + if (!$flags[$key]) { + $this->_elements[$key]->unfreeze(); + } + } + return $html; + } //end func getFrozenHtml + + // }}} + // {{{ onQuickFormEvent() + + /** + * Called by HTML_QuickForm whenever form event is made on this element + * + * @param string $event Name of event + * @param mixed $arg event arguments + * @param object $caller calling object + * @since 1.0 + * @access public + * @return void + */ + function onQuickFormEvent($event, $arg, &$caller) + { + switch ($event) { + case 'updateValue': + $this->_createElementsIfNotExist(); + foreach (array_keys($this->_elements) as $key) { + if ($this->_appendName) { + $elementName = $this->_elements[$key]->getName(); + if (is_null($elementName)) { + $this->_elements[$key]->setName($this->getName()); + } elseif ('' === $elementName) { + $this->_elements[$key]->setName($this->getName() . '[' . $key . ']'); + } else { + $this->_elements[$key]->setName($this->getName() . '[' . $elementName . ']'); + } + } + $this->_elements[$key]->onQuickFormEvent('updateValue', $arg, $caller); + if ($this->_appendName) { + $this->_elements[$key]->setName($elementName); + } + } + break; + + default: + parent::onQuickFormEvent($event, $arg, $caller); + } + return true; + } // end func onQuickFormEvent + + // }}} + // {{{ accept() + + /** + * Accepts a renderer + * + * @param object An HTML_QuickForm_Renderer object + * @param bool Whether a group is required + * @param string An error message associated with a group + * @access public + * @return void + */ + function accept(&$renderer, $required = false, $error = null) + { + $this->_createElementsIfNotExist(); + $renderer->startGroup($this, $required, $error); + $name = $this->getName(); + foreach (array_keys($this->_elements) as $key) { + $element =& $this->_elements[$key]; + + if ($this->_appendName) { + $elementName = $element->getName(); + if (isset($elementName)) { + $element->setName($name . '['. (strlen($elementName)? $elementName: $key) .']'); + } else { + $element->setName($name); + } + } + + $required = !$element->isFrozen() && in_array($element->getName(), $this->_required); + + $element->accept($renderer, $required); + + // restore the element's name + if ($this->_appendName) { + $element->setName($elementName); + } + } + $renderer->finishGroup($this); + } // end func accept + + // }}} + // {{{ exportValue() + + /** + * As usual, to get the group's value we access its elements and call + * their exportValue() methods + */ + function exportValue(&$submitValues, $assoc = false) + { + $value = null; + foreach (array_keys($this->_elements) as $key) { + $elementName = $this->_elements[$key]->getName(); + if ($this->_appendName) { + if (is_null($elementName)) { + $this->_elements[$key]->setName($this->getName()); + } elseif ('' === $elementName) { + $this->_elements[$key]->setName($this->getName() . '[' . $key . ']'); + } else { + $this->_elements[$key]->setName($this->getName() . '[' . $elementName . ']'); + } + } + $v = $this->_elements[$key]->exportValue($submitValues, $assoc); + if ($this->_appendName) { + $this->_elements[$key]->setName($elementName); + } + if (null !== $v) { + // Make $value an array, we will use it like one + if (null === $value) { + $value = array(); + } + if ($assoc) { + // just like HTML_QuickForm::exportValues() + $value = HTML_QuickForm::arrayMerge($value, $v); + } else { + // just like getValue(), but should work OK every time here + if (is_null($elementName)) { + $value = $v; + } elseif ('' === $elementName) { + $value[] = $v; + } else { + $value[$elementName] = $v; + } + } + } + } + // do not pass the value through _prepareValue, we took care of this already + return $value; + } + + // }}} + // {{{ _createElements() + + /** + * Creates the group's elements. + * + * This should be overriden by child classes that need to create their + * elements. The method will be called automatically when needed, calling + * it from the constructor is discouraged as the constructor is usually + * called _twice_ on element creation, first time with _no_ parameters. + * + * @access private + * @abstract + */ + function _createElements() + { + // abstract + } + + // }}} + // {{{ _createElementsIfNotExist() + + /** + * A wrapper around _createElements() + * + * This method calls _createElements() if the group's _elements array + * is empty. It also performs some updates, e.g. freezes the created + * elements if the group is already frozen. + * + * @access private + */ + function _createElementsIfNotExist() + { + if (empty($this->_elements)) { + $this->_createElements(); + if ($this->_flagFrozen) { + $this->freeze(); + } + } + } + + // }}} + // {{{ freeze() + + function freeze() + { + parent::freeze(); + foreach (array_keys($this->_elements) as $key) { + $this->_elements[$key]->freeze(); + } + } + + // }}} + // {{{ unfreeze() + + function unfreeze() + { + parent::unfreeze(); + foreach (array_keys($this->_elements) as $key) { + $this->_elements[$key]->unfreeze(); + } + } + + // }}} + // {{{ setPersistantFreeze() + + function setPersistantFreeze($persistant = false) + { + parent::setPersistantFreeze($persistant); + foreach (array_keys($this->_elements) as $key) { + $this->_elements[$key]->setPersistantFreeze($persistant); + } + } + + // }}} +} //end class HTML_QuickForm_group +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/header.php b/campcaster/src/tools/pear/src/HTML/QuickForm/header.php new file mode 100644 index 000000000..12e0232d5 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/header.php @@ -0,0 +1,65 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: header.php,v 1.1 2003/03/12 11:16:33 avb Exp $ + +require_once 'HTML/QuickForm/static.php'; + +/** + * A pseudo-element used for adding headers to form + * + * @author Alexey Borzov + * @access public + */ +class HTML_QuickForm_header extends HTML_QuickForm_static +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementName Header name + * @param string $text Header text + * @access public + * @return void + */ + function HTML_QuickForm_header($elementName = null, $text = null) + { + $this->HTML_QuickForm_static($elementName, null, $text); + $this->_type = 'header'; + } + + // }}} + // {{{ accept() + + /** + * Accepts a renderer + * + * @param object An HTML_QuickForm_Renderer object + * @access public + * @return void + */ + function accept(&$renderer) + { + $renderer->renderHeader($this); + } // end func accept + + // }}} + +} //end class HTML_QuickForm_header +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/hidden.php b/campcaster/src/tools/pear/src/HTML/QuickForm/hidden.php new file mode 100644 index 000000000..99b105869 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/hidden.php @@ -0,0 +1,87 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: hidden.php,v 1.10 2003/06/18 19:36:20 avb Exp $ + +require_once("HTML/QuickForm/input.php"); + +/** + * HTML class for a hidden type element + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_hidden extends HTML_QuickForm_input +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementName (optional)Input field name attribute + * @param string $value (optional)Input field value + * @param mixed $attributes (optional)Either a typical HTML attribute string + * or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_hidden($elementName=null, $value='', $attributes=null) + { + HTML_QuickForm_input::HTML_QuickForm_input($elementName, null, $attributes); + $this->setType('hidden'); + $this->setValue($value); + } //end constructor + + // }}} + // {{{ freeze() + + /** + * Freeze the element so that only its value is returned + * + * @access public + * @return void + */ + function freeze() + { + return false; + } //end func freeze + + // }}} + // {{{ accept() + + /** + * Accepts a renderer + * + * @param object An HTML_QuickForm_Renderer object + * @access public + * @return void + */ + function accept(&$renderer) + { + $renderer->renderHidden($this); + } // end func accept + + // }}} + +} //end class HTML_QuickForm_hidden +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/hiddenselect.php b/campcaster/src/tools/pear/src/HTML/QuickForm/hiddenselect.php new file mode 100644 index 000000000..c346b9c8e --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/hiddenselect.php @@ -0,0 +1,111 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: hiddenselect.php,v 1.5 2006/10/07 21:18:41 avb Exp $ + +require_once('HTML/QuickForm/select.php'); + +/** + * This class takes the same arguments as a select element, but instead + * of creating a select ring it creates hidden elements for all values + * already selected with setDefault or setConstant. This is useful if + * you have a select ring that you don't want visible, but you need all + * selected values to be passed. + * + * @author Isaac Shepard + * + * @version 1.0 + * @since 2.1 + * @access public + */ +class HTML_QuickForm_hiddenselect extends HTML_QuickForm_select +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string Select name attribute + * @param mixed Label(s) for the select (not used) + * @param mixed Data to be used to populate options + * @param mixed Either a typical HTML attribute string or an associative array (not used) + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_hiddenselect($elementName=null, $elementLabel=null, $options=null, $attributes=null) + { + HTML_QuickForm_element::HTML_QuickForm_element($elementName, $elementLabel, $attributes); + $this->_persistantFreeze = true; + $this->_type = 'hiddenselect'; + if (isset($options)) { + $this->load($options); + } + } //end constructor + + // }}} + // {{{ toHtml() + + /** + * Returns the SELECT in HTML + * + * @since 1.0 + * @access public + * @return string + * @throws + */ + function toHtml() + { + if (empty($this->_values)) { + return ''; + } + + $tabs = $this->_getTabs(); + $name = $this->getPrivateName(); + $strHtml = ''; + + foreach ($this->_values as $key => $val) { + for ($i = 0, $optCount = count($this->_options); $i < $optCount; $i++) { + if ($val == $this->_options[$i]['attr']['value']) { + $strHtml .= $tabs . '_getAttrString(array( + 'type' => 'hidden', + 'name' => $name, + 'value' => $val + )) . " />\n" ; + } + } + } + + return $strHtml; + } //end func toHtml + + // }}} + // {{{ accept() + + /** + * This is essentially a hidden element and should be rendered as one + */ + function accept(&$renderer) + { + $renderer->renderHidden($this); + } + + // }}} +} //end class HTML_QuickForm_hiddenselect +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/hierselect.php b/campcaster/src/tools/pear/src/HTML/QuickForm/hierselect.php new file mode 100644 index 000000000..e1eda2274 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/hierselect.php @@ -0,0 +1,578 @@ + | +// | Bertrand Mansion | +// | Alexey Borzov +// +----------------------------------------------------------------------+ +// +// $Id: hierselect.php,v 1.18 2006/10/07 15:07:48 avb Exp $ + +require_once('HTML/QuickForm/group.php'); +require_once('HTML/QuickForm/select.php'); + +/** + * Class to dynamically create two or more HTML Select elements + * The first select changes the content of the second select and so on. + * This element is considered as a group. Selects will be named + * groupName[0], groupName[1], groupName[2]... + * + * @author Herim Vasquez + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_hierselect extends HTML_QuickForm_group +{ + // {{{ properties + + /** + * Options for all the select elements + * + * Format is a bit more complex as we need to know which options + * are related to the ones in the previous select: + * + * Ex: + * // first select + * $select1[0] = 'Pop'; + * $select1[1] = 'Classical'; + * $select1[2] = 'Funeral doom'; + * + * // second select + * $select2[0][0] = 'Red Hot Chil Peppers'; + * $select2[0][1] = 'The Pixies'; + * $select2[1][0] = 'Wagner'; + * $select2[1][1] = 'Strauss'; + * $select2[2][0] = 'Pantheist'; + * $select2[2][1] = 'Skepticism'; + * + * // If only need two selects + * // - and using the depracated functions + * $sel =& $form->addElement('hierselect', 'cds', 'Choose CD:'); + * $sel->setMainOptions($select1); + * $sel->setSecOptions($select2); + * + * // - and using the new setOptions function + * $sel =& $form->addElement('hierselect', 'cds', 'Choose CD:'); + * $sel->setOptions(array($select1, $select2)); + * + * // If you have a third select with prices for the cds + * $select3[0][0][0] = '15.00$'; + * $select3[0][0][1] = '17.00$'; + * etc + * + * // You can now use + * $sel =& $form->addElement('hierselect', 'cds', 'Choose CD:'); + * $sel->setOptions(array($select1, $select2, $select3)); + * + * @var array + * @access private + */ + var $_options = array(); + + /** + * Number of select elements on this group + * + * @var int + * @access private + */ + var $_nbElements = 0; + + /** + * The javascript used to set and change the options + * + * @var string + * @access private + */ + var $_js = ''; + + // }}} + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementName (optional)Input field name attribute + * @param string $elementLabel (optional)Input field label in form + * @param mixed $attributes (optional)Either a typical HTML attribute string + * or an associative array. Date format is passed along the attributes. + * @param mixed $separator (optional)Use a string for one separator, + * use an array to alternate the separators. + * @access public + * @return void + */ + function HTML_QuickForm_hierselect($elementName=null, $elementLabel=null, $attributes=null, $separator=null) + { + $this->HTML_QuickForm_element($elementName, $elementLabel, $attributes); + $this->_persistantFreeze = true; + if (isset($separator)) { + $this->_separator = $separator; + } + $this->_type = 'hierselect'; + $this->_appendName = true; + } //end constructor + + // }}} + // {{{ setOptions() + + /** + * Initialize the array structure containing the options for each select element. + * Call the functions that actually do the magic. + * + * @param array $options Array of options defining each element + * + * @access public + * @return void + */ + function setOptions($options) + { + $this->_options = $options; + + if (empty($this->_elements)) { + $this->_nbElements = count($this->_options); + $this->_createElements(); + } else { + // setDefaults has probably been called before this function + // check if all elements have been created + $totalNbElements = count($this->_options); + for ($i = $this->_nbElements; $i < $totalNbElements; $i ++) { + $this->_elements[] =& new HTML_QuickForm_select($i, null, array(), $this->getAttributes()); + $this->_nbElements++; + } + } + + $this->_setOptions(); + } // end func setMainOptions + + // }}} + // {{{ setMainOptions() + + /** + * Sets the options for the first select element. Deprecated. setOptions() should be used. + * + * @param array $array Options for the first select element + * + * @access public + * @deprecated Deprecated since release 3.2.2 + * @return void + */ + function setMainOptions($array) + { + $this->_options[0] = $array; + + if (empty($this->_elements)) { + $this->_nbElements = 2; + $this->_createElements(); + } + } // end func setMainOptions + + // }}} + // {{{ setSecOptions() + + /** + * Sets the options for the second select element. Deprecated. setOptions() should be used. + * The main _options array is initialized and the _setOptions function is called. + * + * @param array $array Options for the second select element + * + * @access public + * @deprecated Deprecated since release 3.2.2 + * @return void + */ + function setSecOptions($array) + { + $this->_options[1] = $array; + + if (empty($this->_elements)) { + $this->_nbElements = 2; + $this->_createElements(); + } else { + // setDefaults has probably been called before this function + // check if all elements have been created + $totalNbElements = 2; + for ($i = $this->_nbElements; $i < $totalNbElements; $i ++) { + $this->_elements[] =& new HTML_QuickForm_select($i, null, array(), $this->getAttributes()); + $this->_nbElements++; + } + } + + $this->_setOptions(); + } // end func setSecOptions + + // }}} + // {{{ _setOptions() + + /** + * Sets the options for each select element + * + * @access private + * @return void + */ + function _setOptions() + { + $toLoad = ''; + foreach (array_keys($this->_elements) AS $key) { + $array = eval("return isset(\$this->_options[{$key}]{$toLoad})? \$this->_options[{$key}]{$toLoad}: null;"); + if (is_array($array)) { + $select =& $this->_elements[$key]; + $select->_options = array(); + $select->loadArray($array); + + $value = is_array($v = $select->getValue()) ? $v[0] : key($array); + $toLoad .= '[\'' . str_replace(array('\\', '\''), array('\\\\', '\\\''), $value) . '\']'; + } + } + } // end func _setOptions + + // }}} + // {{{ setValue() + + /** + * Sets values for group's elements + * + * @param array $value An array of 2 or more values, for the first, + * the second, the third etc. select + * + * @access public + * @return void + */ + function setValue($value) + { + // fix for bug #6766. Hope this doesn't break anything more + // after bug #7961. Forgot that _nbElements was used in + // _createElements() called in several places... + $this->_nbElements = max($this->_nbElements, count($value)); + parent::setValue($value); + $this->_setOptions(); + } // end func setValue + + // }}} + // {{{ _createElements() + + /** + * Creates all the elements for the group + * + * @access private + * @return void + */ + function _createElements() + { + for ($i = 0; $i < $this->_nbElements; $i++) { + $this->_elements[] =& new HTML_QuickForm_select($i, null, array(), $this->getAttributes()); + } + } // end func _createElements + + // }}} + // {{{ toHtml() + + function toHtml() + { + $this->_js = ''; + if (!$this->_flagFrozen) { + // set the onchange attribute for each element except last + $keys = array_keys($this->_elements); + $onChange = array(); + for ($i = 0; $i < count($keys) - 1; $i++) { + $select =& $this->_elements[$keys[$i]]; + $onChange[$i] = $select->getAttribute('onchange'); + $select->updateAttributes( + array('onchange' => '_hs_swapOptions(this.form, \'' . $this->_escapeString($this->getName()) . '\', ' . $keys[$i] . ');' . $onChange[$i]) + ); + } + + // create the js function to call + if (!defined('HTML_QUICKFORM_HIERSELECT_EXISTS')) { + $this->_js .= <<_nbElements; $i++) { + $jsParts[] = $this->_convertArrayToJavascript($this->_options[$i]); + } + $this->_js .= "\n_hs_options['" . $this->_escapeString($this->getName()) . "'] = [\n" . + implode(",\n", $jsParts) . + "\n];\n"; + // default value; if we don't actually have any values yet just use + // the first option (for single selects) or empty array (for multiple) + $values = array(); + foreach (array_keys($this->_elements) as $key) { + if (is_array($v = $this->_elements[$key]->getValue())) { + $values[] = count($v) > 1? $v: $v[0]; + } else { + // XXX: accessing the supposedly private _options array + $values[] = $this->_elements[$key]->getMultiple() || empty($this->_elements[$key]->_options[0])? + array(): + $this->_elements[$key]->_options[0]['attr']['value']; + } + } + $this->_js .= "_hs_defaults['" . $this->_escapeString($this->getName()) . "'] = " . + $this->_convertArrayToJavascript($values, false) . ";\n"; + } + include_once('HTML/QuickForm/Renderer/Default.php'); + $renderer =& new HTML_QuickForm_Renderer_Default(); + $renderer->setElementTemplate('{element}'); + parent::accept($renderer); + + if (!empty($onChange)) { + $keys = array_keys($this->_elements); + for ($i = 0; $i < count($keys) - 1; $i++) { + $this->_elements[$keys[$i]]->updateAttributes(array('onchange' => $onChange[$i])); + } + } + return (empty($this->_js)? '': "") . + $renderer->toHtml(); + } // end func toHtml + + // }}} + // {{{ accept() + + function accept(&$renderer, $required = false, $error = null) + { + $renderer->renderElement($this, $required, $error); + } // end func accept + + // }}} + // {{{ onQuickFormEvent() + + function onQuickFormEvent($event, $arg, &$caller) + { + if ('updateValue' == $event) { + // we need to call setValue() so that the secondary option + // matches the main option + return HTML_QuickForm_element::onQuickFormEvent($event, $arg, $caller); + } else { + $ret = parent::onQuickFormEvent($event, $arg, $caller); + // add onreset handler to form to properly reset hierselect (see bug #2970) + if ('addElement' == $event) { + $onReset = $caller->getAttribute('onreset'); + if (strlen($onReset)) { + if (strpos($onReset, '_hs_setupOnReset')) { + $caller->updateAttributes(array('onreset' => str_replace('_hs_setupOnReset(this, [', "_hs_setupOnReset(this, ['" . $this->_escapeString($this->getName()) . "', ", $onReset))); + } else { + $caller->updateAttributes(array('onreset' => "var temp = function() { {$onReset} } ; if (!temp()) { return false; } ; if (typeof _hs_setupOnReset != 'undefined') { return _hs_setupOnReset(this, ['" . $this->_escapeString($this->getName()) . "']); } ")); + } + } else { + $caller->updateAttributes(array('onreset' => "if (typeof _hs_setupOnReset != 'undefined') { return _hs_setupOnReset(this, ['" . $this->_escapeString($this->getName()) . "']); } ")); + } + } + return $ret; + } + } // end func onQuickFormEvent + + // }}} + // {{{ _convertArrayToJavascript() + + /** + * Converts PHP array to its Javascript analog + * + * @access private + * @param array PHP array to convert + * @param bool Generate Javascript object literal (default, works like PHP's associative array) or array literal + * @return string Javascript representation of the value + */ + function _convertArrayToJavascript($array, $assoc = true) + { + if (!is_array($array)) { + return $this->_convertScalarToJavascript($array); + } else { + $items = array(); + foreach ($array as $key => $val) { + $item = $assoc? "'" . $this->_escapeString($key) . "': ": ''; + if (is_array($val)) { + $item .= $this->_convertArrayToJavascript($val, $assoc); + } else { + $item .= $this->_convertScalarToJavascript($val); + } + $items[] = $item; + } + } + $js = implode(', ', $items); + return $assoc? '{ ' . $js . ' }': '[' . $js . ']'; + } + + // }}} + // {{{ _convertScalarToJavascript() + + /** + * Converts PHP's scalar value to its Javascript analog + * + * @access private + * @param mixed PHP value to convert + * @return string Javascript representation of the value + */ + function _convertScalarToJavascript($val) + { + if (is_bool($val)) { + return $val ? 'true' : 'false'; + } elseif (is_int($val) || is_double($val)) { + return $val; + } elseif (is_string($val)) { + return "'" . $this->_escapeString($val) . "'"; + } elseif (is_null($val)) { + return 'null'; + } else { + // don't bother + return '{}'; + } + } + + // }}} + // {{{ _escapeString() + + /** + * Quotes the string so that it can be used in Javascript string constants + * + * @access private + * @param string + * @return string + */ + function _escapeString($str) + { + return strtr($str,array( + "\r" => '\r', + "\n" => '\n', + "\t" => '\t', + "'" => "\\'", + '"' => '\"', + '\\' => '\\\\' + )); + } + + // }}} +} // end class HTML_QuickForm_hierselect +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/html.php b/campcaster/src/tools/pear/src/HTML/QuickForm/html.php new file mode 100644 index 000000000..e0e6a6a8e --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/html.php @@ -0,0 +1,67 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: html.php,v 1.1 2003/03/12 11:16:33 avb Exp $ + +require_once 'HTML/QuickForm/static.php'; + +/** + * A pseudo-element used for adding raw HTML to form + * + * Intended for use with the default renderer only, template-based + * ones may (and probably will) completely ignore this + * + * @author Alexey Borzov + * @access public + */ +class HTML_QuickForm_html extends HTML_QuickForm_static +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string $text raw HTML to add + * @access public + * @return void + */ + function HTML_QuickForm_html($text = null) + { + $this->HTML_QuickForm_static(null, null, $text); + $this->_type = 'html'; + } + + // }}} + // {{{ accept() + + /** + * Accepts a renderer + * + * @param object An HTML_QuickForm_Renderer object + * @access public + * @return void + */ + function accept(&$renderer) + { + $renderer->renderHtml($this); + } // end func accept + + // }}} + +} //end class HTML_QuickForm_header +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/image.php b/campcaster/src/tools/pear/src/HTML/QuickForm/image.php new file mode 100644 index 000000000..c06dbfe75 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/image.php @@ -0,0 +1,119 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: image.php,v 1.4 2003/06/18 19:36:20 avb Exp $ +require_once("HTML/QuickForm/input.php"); + +/** + * HTML class for a image type element + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_image extends HTML_QuickForm_input +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementName (optional)Element name attribute + * @param string $src (optional)Image source + * @param mixed $attributes (optional)Either a typical HTML attribute string + * or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_image($elementName=null, $src='', $attributes=null) + { + HTML_QuickForm_input::HTML_QuickForm_input($elementName, null, $attributes); + $this->setType('image'); + $this->setSource($src); + } // end class constructor + + // }}} + // {{{ setSource() + + /** + * Sets source for image element + * + * @param string $src source for image element + * @since 1.0 + * @access public + * @return void + */ + function setSource($src) + { + $this->updateAttributes(array('src' => $src)); + } // end func setSource + + // }}} + // {{{ setBorder() + + /** + * Sets border size for image element + * + * @param string $border border for image element + * @since 1.0 + * @access public + * @return void + */ + function setBorder($border) + { + $this->updateAttributes(array('border' => $border)); + } // end func setBorder + + // }}} + // {{{ setAlign() + + /** + * Sets alignment for image element + * + * @param string $align alignment for image element + * @since 1.0 + * @access public + * @return void + */ + function setAlign($align) + { + $this->updateAttributes(array('align' => $align)); + } // end func setAlign + + // }}} + // {{{ freeze() + + /** + * Freeze the element so that only its value is returned + * + * @access public + * @return void + */ + function freeze() + { + return false; + } //end func freeze + + // }}} + +} // end class HTML_QuickForm_image +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/input.php b/campcaster/src/tools/pear/src/HTML/QuickForm/input.php new file mode 100644 index 000000000..238ad0dfc --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/input.php @@ -0,0 +1,202 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: input.php,v 1.8 2003/06/18 19:36:20 avb Exp $ + +require_once("HTML/QuickForm/element.php"); + +/** + * Base class for input form elements + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + * @abstract + */ +class HTML_QuickForm_input extends HTML_QuickForm_element +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string Input field name attribute + * @param mixed Label(s) for the input field + * @param mixed Either a typical HTML attribute string or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_input($elementName=null, $elementLabel=null, $attributes=null) + { + $this->HTML_QuickForm_element($elementName, $elementLabel, $attributes); + } //end constructor + + // }}} + // {{{ setType() + + /** + * Sets the element type + * + * @param string $type Element type + * @since 1.0 + * @access public + * @return void + */ + function setType($type) + { + $this->_type = $type; + $this->updateAttributes(array('type'=>$type)); + } // end func setType + + // }}} + // {{{ setName() + + /** + * Sets the input field name + * + * @param string $name Input field name attribute + * @since 1.0 + * @access public + * @return void + */ + function setName($name) + { + $this->updateAttributes(array('name'=>$name)); + } //end func setName + + // }}} + // {{{ getName() + + /** + * Returns the element name + * + * @since 1.0 + * @access public + * @return string + */ + function getName() + { + return $this->getAttribute('name'); + } //end func getName + + // }}} + // {{{ setValue() + + /** + * Sets the value of the form element + * + * @param string $value Default value of the form element + * @since 1.0 + * @access public + * @return void + */ + function setValue($value) + { + $this->updateAttributes(array('value'=>$value)); + } // end func setValue + + // }}} + // {{{ getValue() + + /** + * Returns the value of the form element + * + * @since 1.0 + * @access public + * @return string + */ + function getValue() + { + return $this->getAttribute('value'); + } // end func getValue + + // }}} + // {{{ toHtml() + + /** + * Returns the input field in HTML + * + * @since 1.0 + * @access public + * @return string + */ + function toHtml() + { + if ($this->_flagFrozen) { + return $this->getFrozenHtml(); + } else { + return $this->_getTabs() . '_getAttrString($this->_attributes) . ' />'; + } + } //end func toHtml + + // }}} + // {{{ onQuickFormEvent() + + /** + * Called by HTML_QuickForm whenever form event is made on this element + * + * @param string $event Name of event + * @param mixed $arg event arguments + * @param object $caller calling object + * @since 1.0 + * @access public + * @return void + * @throws + */ + function onQuickFormEvent($event, $arg, &$caller) + { + // do not use submit values for button-type elements + $type = $this->getType(); + if (('updateValue' != $event) || + ('submit' != $type && 'reset' != $type && 'image' != $type && 'button' != $type)) { + parent::onQuickFormEvent($event, $arg, $caller); + } else { + $value = $this->_findValue($caller->_constantValues); + if (null === $value) { + $value = $this->_findValue($caller->_defaultValues); + } + if (null !== $value) { + $this->setValue($value); + } + } + return true; + } // end func onQuickFormEvent + + // }}} + // {{{ exportValue() + + /** + * We don't need values from button-type elements (except submit) and files + */ + function exportValue(&$submitValues, $assoc = false) + { + $type = $this->getType(); + if ('reset' == $type || 'image' == $type || 'button' == $type || 'file' == $type) { + return null; + } else { + return parent::exportValue($submitValues, $assoc); + } + } + + // }}} +} // end class HTML_QuickForm_element +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/link.php b/campcaster/src/tools/pear/src/HTML/QuickForm/link.php new file mode 100644 index 000000000..947f76c32 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/link.php @@ -0,0 +1,192 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// + +require_once 'HTML/QuickForm/static.php'; + +/** + * HTML class for a link type field + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_link extends HTML_QuickForm_static +{ + // {{{ properties + + /** + * Link display text + * @var string + * @since 1.0 + * @access private + */ + var $_text = ""; + + // }}} + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementLabel (optional)Link label + * @param string $href (optional)Link href + * @param string $text (optional)Link display text + * @param mixed $attributes (optional)Either a typical HTML attribute string + * or an associative array + * @since 1.0 + * @access public + * @return void + * @throws + */ + function HTML_QuickForm_link($elementName=null, $elementLabel=null, $href=null, $text=null, $attributes=null) + { + HTML_QuickForm_element::HTML_QuickForm_element($elementName, $elementLabel, $attributes); + $this->_persistantFreeze = false; + $this->_type = 'link'; + $this->setHref($href); + $this->_text = $text; + } //end constructor + + // }}} + // {{{ setName() + + /** + * Sets the input field name + * + * @param string $name Input field name attribute + * @since 1.0 + * @access public + * @return void + * @throws + */ + function setName($name) + { + $this->updateAttributes(array('name'=>$name)); + } //end func setName + + // }}} + // {{{ getName() + + /** + * Returns the element name + * + * @since 1.0 + * @access public + * @return string + * @throws + */ + function getName() + { + return $this->getAttribute('name'); + } //end func getName + + // }}} + // {{{ setValue() + + /** + * Sets value for textarea element + * + * @param string $value Value for password element + * @since 1.0 + * @access public + * @return void + * @throws + */ + function setValue($value) + { + return; + } //end func setValue + + // }}} + // {{{ getValue() + + /** + * Returns the value of the form element + * + * @since 1.0 + * @access public + * @return void + * @throws + */ + function getValue() + { + return; + } // end func getValue + + + // }}} + // {{{ setHref() + + /** + * Sets the links href + * + * @param string $href + * @since 1.0 + * @access public + * @return void + * @throws + */ + function setHref($href) + { + $this->updateAttributes(array('href'=>$href)); + } // end func setHref + + // }}} + // {{{ toHtml() + + /** + * Returns the textarea element in HTML + * + * @since 1.0 + * @access public + * @return string + * @throws + */ + function toHtml() + { + $tabs = $this->_getTabs(); + $html = "$tabs_getAttrString($this->_attributes).">"; + $html .= $this->_text; + $html .= ""; + return $html; + } //end func toHtml + + // }}} + // {{{ getFrozenHtml() + + /** + * Returns the value of field without HTML tags (in this case, value is changed to a mask) + * + * @since 1.0 + * @access public + * @return string + * @throws + */ + function getFrozenHtml() + { + return; + } //end func getFrozenHtml + + // }}} + +} //end class HTML_QuickForm_textarea +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/password.php b/campcaster/src/tools/pear/src/HTML/QuickForm/password.php new file mode 100644 index 000000000..7f5d03212 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/password.php @@ -0,0 +1,108 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: password.php,v 1.6 2004/02/28 22:10:16 avb Exp $ + +require_once("HTML/QuickForm/input.php"); + +/** + * HTML class for a password type field + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.1 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_password extends HTML_QuickForm_input +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementName (optional)Input field name attribute + * @param string $elementLabel (optional)Input field label + * @param mixed $attributes (optional)Either a typical HTML attribute string + * or an associative array + * @since 1.0 + * @access public + * @return void + * @throws + */ + function HTML_QuickForm_password($elementName=null, $elementLabel=null, $attributes=null) + { + HTML_QuickForm_input::HTML_QuickForm_input($elementName, $elementLabel, $attributes); + $this->setType('password'); + } //end constructor + + // }}} + // {{{ setSize() + + /** + * Sets size of password element + * + * @param string $size Size of password field + * @since 1.0 + * @access public + * @return void + */ + function setSize($size) + { + $this->updateAttributes(array('size'=>$size)); + } //end func setSize + + // }}} + // {{{ setMaxlength() + + /** + * Sets maxlength of password element + * + * @param string $maxlength Maximum length of password field + * @since 1.0 + * @access public + * @return void + */ + function setMaxlength($maxlength) + { + $this->updateAttributes(array('maxlength'=>$maxlength)); + } //end func setMaxlength + + // }}} + // {{{ getFrozenHtml() + + /** + * Returns the value of field without HTML tags (in this case, value is changed to a mask) + * + * @since 1.0 + * @access public + * @return string + * @throws + */ + function getFrozenHtml() + { + $value = $this->getValue(); + return ('' != $value? '**********': ' ') . + $this->_getPersistantData(); + } //end func getFrozenHtml + + // }}} + +} //end class HTML_QuickForm_password +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/radio.php b/campcaster/src/tools/pear/src/HTML/QuickForm/radio.php new file mode 100644 index 000000000..7039be9d3 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/radio.php @@ -0,0 +1,244 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: radio.php,v 1.18 2006/10/07 15:18:16 avb Exp $ + +require_once('HTML/QuickForm/input.php'); + +/** + * HTML class for a radio type element + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.1 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_radio extends HTML_QuickForm_input +{ + // {{{ properties + + /** + * Radio display text + * @var string + * @since 1.1 + * @access private + */ + var $_text = ''; + + // }}} + // {{{ constructor + + /** + * Class constructor + * + * @param string Input field name attribute + * @param mixed Label(s) for a field + * @param string Text to display near the radio + * @param string Input field value + * @param mixed Either a typical HTML attribute string or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_radio($elementName=null, $elementLabel=null, $text=null, $value=null, $attributes=null) + { + $this->HTML_QuickForm_element($elementName, $elementLabel, $attributes); + if (isset($value)) { + $this->setValue($value); + } + $this->_persistantFreeze = true; + $this->setType('radio'); + $this->_text = $text; + $this->_generateId(); + } //end constructor + + // }}} + // {{{ setChecked() + + /** + * Sets whether radio button is checked + * + * @param bool $checked Whether the field is checked or not + * @since 1.0 + * @access public + * @return void + */ + function setChecked($checked) + { + if (!$checked) { + $this->removeAttribute('checked'); + } else { + $this->updateAttributes(array('checked'=>'checked')); + } + } //end func setChecked + + // }}} + // {{{ getChecked() + + /** + * Returns whether radio button is checked + * + * @since 1.0 + * @access public + * @return string + */ + function getChecked() + { + return $this->getAttribute('checked'); + } //end func getChecked + + // }}} + // {{{ toHtml() + + /** + * Returns the radio element in HTML + * + * @since 1.0 + * @access public + * @return string + */ + function toHtml() + { + if (0 == strlen($this->_text)) { + $label = ''; + } elseif ($this->_flagFrozen) { + $label = $this->_text; + } else { + $label = ''; + } + return HTML_QuickForm_input::toHtml() . $label; + } //end func toHtml + + // }}} + // {{{ getFrozenHtml() + + /** + * Returns the value of field without HTML tags + * + * @since 1.0 + * @access public + * @return string + */ + function getFrozenHtml() + { + if ($this->getChecked()) { + return '(x)' . + $this->_getPersistantData(); + } else { + return '( )'; + } + } //end func getFrozenHtml + + // }}} + // {{{ setText() + + /** + * Sets the radio text + * + * @param string $text Text to display near the radio button + * @since 1.1 + * @access public + * @return void + */ + function setText($text) + { + $this->_text = $text; + } //end func setText + + // }}} + // {{{ getText() + + /** + * Returns the radio text + * + * @since 1.1 + * @access public + * @return string + */ + function getText() + { + return $this->_text; + } //end func getText + + // }}} + // {{{ onQuickFormEvent() + + /** + * Called by HTML_QuickForm whenever form event is made on this element + * + * @param string $event Name of event + * @param mixed $arg event arguments + * @param object $caller calling object + * @since 1.0 + * @access public + * @return void + */ + function onQuickFormEvent($event, $arg, &$caller) + { + switch ($event) { + case 'updateValue': + // constant values override both default and submitted ones + // default values are overriden by submitted + $value = $this->_findValue($caller->_constantValues); + if (null === $value) { + $value = $this->_findValue($caller->_submitValues); + if (null === $value) { + $value = $this->_findValue($caller->_defaultValues); + } + } + if (!is_null($value) && $value == $this->getValue()) { + $this->setChecked(true); + } else { + $this->setChecked(false); + } + break; + case 'setGroupValue': + if ($arg == $this->getValue()) { + $this->setChecked(true); + } else { + $this->setChecked(false); + } + break; + default: + parent::onQuickFormEvent($event, $arg, $caller); + } + return true; + } // end func onQuickFormLoad + + // }}} + // {{{ exportValue() + + /** + * Returns the value attribute if the radio is checked, null if it is not + */ + function exportValue(&$submitValues, $assoc = false) + { + $value = $this->_findValue($submitValues); + if (null === $value) { + $value = $this->getChecked()? $this->getValue(): null; + } elseif ($value != $this->getValue()) { + $value = null; + } + return $this->_prepareValue($value, $assoc); + } + + // }}} +} //end class HTML_QuickForm_radio +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/reset.php b/campcaster/src/tools/pear/src/HTML/QuickForm/reset.php new file mode 100644 index 000000000..ff0c54c51 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/reset.php @@ -0,0 +1,72 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: reset.php,v 1.4 2003/06/18 19:36:20 avb Exp $ + +require_once("HTML/QuickForm/input.php"); + +/** + * HTML class for a reset type element + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.1 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_reset extends HTML_QuickForm_input +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementName (optional)Input field name attribute + * @param string $value (optional)Input field value + * @param mixed $attributes (optional)Either a typical HTML attribute string + * or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_reset($elementName=null, $value=null, $attributes=null) + { + HTML_QuickForm_input::HTML_QuickForm_input($elementName, null, $attributes); + $this->setValue($value); + $this->setType('reset'); + } //end constructor + + // }}} + // {{{ freeze() + + /** + * Freeze the element so that only its value is returned + * + * @access public + * @return void + */ + function freeze() + { + return false; + } //end func freeze + + // }}} + +} //end class HTML_QuickForm_reset +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/select.php b/campcaster/src/tools/pear/src/HTML/QuickForm/select.php new file mode 100644 index 000000000..076d3c973 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/select.php @@ -0,0 +1,604 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: select.php,v 1.31 2006/06/03 12:03:46 avb Exp $ + +require_once('HTML/QuickForm/element.php'); + +/** + * Class to dynamically create an HTML SELECT + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_select extends HTML_QuickForm_element { + + // {{{ properties + + /** + * Contains the select options + * + * @var array + * @since 1.0 + * @access private + */ + var $_options = array(); + + /** + * Default values of the SELECT + * + * @var string + * @since 1.0 + * @access private + */ + var $_values = null; + + // }}} + // {{{ constructor + + /** + * Class constructor + * + * @param string Select name attribute + * @param mixed Label(s) for the select + * @param mixed Data to be used to populate options + * @param mixed Either a typical HTML attribute string or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_select($elementName=null, $elementLabel=null, $options=null, $attributes=null) + { + HTML_QuickForm_element::HTML_QuickForm_element($elementName, $elementLabel, $attributes); + $this->_persistantFreeze = true; + $this->_type = 'select'; + if (isset($options)) { + $this->load($options); + } + } //end constructor + + // }}} + // {{{ apiVersion() + + /** + * Returns the current API version + * + * @since 1.0 + * @access public + * @return double + */ + function apiVersion() + { + return 2.3; + } //end func apiVersion + + // }}} + // {{{ setSelected() + + /** + * Sets the default values of the select box + * + * @param mixed $values Array or comma delimited string of selected values + * @since 1.0 + * @access public + * @return void + */ + function setSelected($values) + { + if (is_string($values) && $this->getMultiple()) { + $values = split("[ ]?,[ ]?", $values); + } + if (is_array($values)) { + $this->_values = array_values($values); + } else { + $this->_values = array($values); + } + } //end func setSelected + + // }}} + // {{{ getSelected() + + /** + * Returns an array of the selected values + * + * @since 1.0 + * @access public + * @return array of selected values + */ + function getSelected() + { + return $this->_values; + } // end func getSelected + + // }}} + // {{{ setName() + + /** + * Sets the input field name + * + * @param string $name Input field name attribute + * @since 1.0 + * @access public + * @return void + */ + function setName($name) + { + $this->updateAttributes(array('name' => $name)); + } //end func setName + + // }}} + // {{{ getName() + + /** + * Returns the element name + * + * @since 1.0 + * @access public + * @return string + */ + function getName() + { + return $this->getAttribute('name'); + } //end func getName + + // }}} + // {{{ getPrivateName() + + /** + * Returns the element name (possibly with brackets appended) + * + * @since 1.0 + * @access public + * @return string + */ + function getPrivateName() + { + if ($this->getAttribute('multiple')) { + return $this->getName() . '[]'; + } else { + return $this->getName(); + } + } //end func getPrivateName + + // }}} + // {{{ setValue() + + /** + * Sets the value of the form element + * + * @param mixed $values Array or comma delimited string of selected values + * @since 1.0 + * @access public + * @return void + */ + function setValue($value) + { + $this->setSelected($value); + } // end func setValue + + // }}} + // {{{ getValue() + + /** + * Returns an array of the selected values + * + * @since 1.0 + * @access public + * @return array of selected values + */ + function getValue() + { + return $this->_values; + } // end func getValue + + // }}} + // {{{ setSize() + + /** + * Sets the select field size, only applies to 'multiple' selects + * + * @param int $size Size of select field + * @since 1.0 + * @access public + * @return void + */ + function setSize($size) + { + $this->updateAttributes(array('size' => $size)); + } //end func setSize + + // }}} + // {{{ getSize() + + /** + * Returns the select field size + * + * @since 1.0 + * @access public + * @return int + */ + function getSize() + { + return $this->getAttribute('size'); + } //end func getSize + + // }}} + // {{{ setMultiple() + + /** + * Sets the select mutiple attribute + * + * @param bool $multiple Whether the select supports multi-selections + * @since 1.2 + * @access public + * @return void + */ + function setMultiple($multiple) + { + if ($multiple) { + $this->updateAttributes(array('multiple' => 'multiple')); + } else { + $this->removeAttribute('multiple'); + } + } //end func setMultiple + + // }}} + // {{{ getMultiple() + + /** + * Returns the select mutiple attribute + * + * @since 1.2 + * @access public + * @return bool true if multiple select, false otherwise + */ + function getMultiple() + { + return (bool)$this->getAttribute('multiple'); + } //end func getMultiple + + // }}} + // {{{ addOption() + + /** + * Adds a new OPTION to the SELECT + * + * @param string $text Display text for the OPTION + * @param string $value Value for the OPTION + * @param mixed $attributes Either a typical HTML attribute string + * or an associative array + * @since 1.0 + * @access public + * @return void + */ + function addOption($text, $value, $attributes=null) + { + if (null === $attributes) { + $attributes = array('value' => $value); + } else { + $attributes = $this->_parseAttributes($attributes); + if (isset($attributes['selected'])) { + // the 'selected' attribute will be set in toHtml() + $this->_removeAttr('selected', $attributes); + if (is_null($this->_values)) { + $this->_values = array($value); + } elseif (!in_array($value, $this->_values)) { + $this->_values[] = $value; + } + } + $this->_updateAttrArray($attributes, array('value' => $value)); + } + $this->_options[] = array('text' => $text, 'attr' => $attributes); + } // end func addOption + + // }}} + // {{{ loadArray() + + /** + * Loads the options from an associative array + * + * @param array $arr Associative array of options + * @param mixed $values (optional) Array or comma delimited string of selected values + * @since 1.0 + * @access public + * @return PEAR_Error on error or true + * @throws PEAR_Error + */ + function loadArray($arr, $values=null) + { + if (!is_array($arr)) { + return PEAR::raiseError('Argument 1 of HTML_Select::loadArray is not a valid array'); + } + if (isset($values)) { + $this->setSelected($values); + } + foreach ($arr as $key => $val) { + // Warning: new API since release 2.3 + $this->addOption($val, $key); + } + return true; + } // end func loadArray + + // }}} + // {{{ loadDbResult() + + /** + * Loads the options from DB_result object + * + * If no column names are specified the first two columns of the result are + * used as the text and value columns respectively + * @param object $result DB_result object + * @param string $textCol (optional) Name of column to display as the OPTION text + * @param string $valueCol (optional) Name of column to use as the OPTION value + * @param mixed $values (optional) Array or comma delimited string of selected values + * @since 1.0 + * @access public + * @return PEAR_Error on error or true + * @throws PEAR_Error + */ + function loadDbResult(&$result, $textCol=null, $valueCol=null, $values=null) + { + if (!is_object($result) || !is_a($result, 'db_result')) { + return PEAR::raiseError('Argument 1 of HTML_Select::loadDbResult is not a valid DB_result'); + } + if (isset($values)) { + $this->setValue($values); + } + $fetchMode = ($textCol && $valueCol) ? DB_FETCHMODE_ASSOC : DB_FETCHMODE_ORDERED; + while (is_array($row = $result->fetchRow($fetchMode)) ) { + if ($fetchMode == DB_FETCHMODE_ASSOC) { + $this->addOption($row[$textCol], $row[$valueCol]); + } else { + $this->addOption($row[0], $row[1]); + } + } + return true; + } // end func loadDbResult + + // }}} + // {{{ loadQuery() + + /** + * Queries a database and loads the options from the results + * + * @param mixed $conn Either an existing DB connection or a valid dsn + * @param string $sql SQL query string + * @param string $textCol (optional) Name of column to display as the OPTION text + * @param string $valueCol (optional) Name of column to use as the OPTION value + * @param mixed $values (optional) Array or comma delimited string of selected values + * @since 1.1 + * @access public + * @return void + * @throws PEAR_Error + */ + function loadQuery(&$conn, $sql, $textCol=null, $valueCol=null, $values=null) + { + if (is_string($conn)) { + require_once('DB.php'); + $dbConn = &DB::connect($conn, true); + if (DB::isError($dbConn)) { + return $dbConn; + } + } elseif (is_subclass_of($conn, "db_common")) { + $dbConn = &$conn; + } else { + return PEAR::raiseError('Argument 1 of HTML_Select::loadQuery is not a valid type'); + } + $result = $dbConn->query($sql); + if (DB::isError($result)) { + return $result; + } + $this->loadDbResult($result, $textCol, $valueCol, $values); + $result->free(); + if (is_string($conn)) { + $dbConn->disconnect(); + } + return true; + } // end func loadQuery + + // }}} + // {{{ load() + + /** + * Loads options from different types of data sources + * + * This method is a simulated overloaded method. The arguments, other than the + * first are optional and only mean something depending on the type of the first argument. + * If the first argument is an array then all arguments are passed in order to loadArray. + * If the first argument is a db_result then all arguments are passed in order to loadDbResult. + * If the first argument is a string or a DB connection then all arguments are + * passed in order to loadQuery. + * @param mixed $options Options source currently supports assoc array or DB_result + * @param mixed $param1 (optional) See function detail + * @param mixed $param2 (optional) See function detail + * @param mixed $param3 (optional) See function detail + * @param mixed $param4 (optional) See function detail + * @since 1.1 + * @access public + * @return PEAR_Error on error or true + * @throws PEAR_Error + */ + function load(&$options, $param1=null, $param2=null, $param3=null, $param4=null) + { + switch (true) { + case is_array($options): + return $this->loadArray($options, $param1); + break; + case (is_a($options, 'db_result')): + return $this->loadDbResult($options, $param1, $param2, $param3); + break; + case (is_string($options) && !empty($options) || is_subclass_of($options, "db_common")): + return $this->loadQuery($options, $param1, $param2, $param3, $param4); + break; + } + } // end func load + + // }}} + // {{{ toHtml() + + /** + * Returns the SELECT in HTML + * + * @since 1.0 + * @access public + * @return string + */ + function toHtml() + { + if ($this->_flagFrozen) { + return $this->getFrozenHtml(); + } else { + $tabs = $this->_getTabs(); + $strHtml = ''; + + if ($this->getComment() != '') { + $strHtml .= $tabs . '\n"; + } + + if (!$this->getMultiple()) { + $attrString = $this->_getAttrString($this->_attributes); + } else { + $myName = $this->getName(); + $this->setName($myName . '[]'); + $attrString = $this->_getAttrString($this->_attributes); + $this->setName($myName); + } + $strHtml .= $tabs . '\n"; + + foreach ($this->_options as $option) { + if (is_array($this->_values) && in_array((string)$option['attr']['value'], $this->_values)) { + $this->_updateAttrArray($option['attr'], array('selected' => 'selected')); + } + $strHtml .= $tabs . "\t_getAttrString($option['attr']) . '>' . + $option['text'] . "\n"; + } + + return $strHtml . $tabs . ''; + } + } //end func toHtml + + // }}} + // {{{ getFrozenHtml() + + /** + * Returns the value of field without HTML tags + * + * @since 1.0 + * @access public + * @return string + */ + function getFrozenHtml() + { + $value = array(); + if (is_array($this->_values)) { + foreach ($this->_values as $key => $val) { + for ($i = 0, $optCount = count($this->_options); $i < $optCount; $i++) { + if ((string)$val == (string)$this->_options[$i]['attr']['value']) { + $value[$key] = $this->_options[$i]['text']; + break; + } + } + } + } + $html = empty($value)? ' ': join('
', $value); + if ($this->_persistantFreeze) { + $name = $this->getPrivateName(); + // Only use id attribute if doing single hidden input + if (1 == count($value)) { + $id = $this->getAttribute('id'); + $idAttr = isset($id)? array('id' => $id): array(); + } else { + $idAttr = array(); + } + foreach ($value as $key => $item) { + $html .= '_getAttrString(array( + 'type' => 'hidden', + 'name' => $name, + 'value' => $this->_values[$key] + ) + $idAttr) . ' />'; + } + } + return $html; + } //end func getFrozenHtml + + // }}} + // {{{ exportValue() + + /** + * We check the options and return only the values that _could_ have been + * selected. We also return a scalar value if select is not "multiple" + */ + function exportValue(&$submitValues, $assoc = false) + { + $value = $this->_findValue($submitValues); + if (is_null($value)) { + $value = $this->getValue(); + } elseif(!is_array($value)) { + $value = array($value); + } + if (is_array($value) && !empty($this->_options)) { + $cleanValue = null; + foreach ($value as $v) { + for ($i = 0, $optCount = count($this->_options); $i < $optCount; $i++) { + if ($v == $this->_options[$i]['attr']['value']) { + $cleanValue[] = $v; + break; + } + } + } + } else { + $cleanValue = $value; + } + if (is_array($cleanValue) && !$this->getMultiple()) { + return $this->_prepareValue($cleanValue[0], $assoc); + } else { + return $this->_prepareValue($cleanValue, $assoc); + } + } + + // }}} + // {{{ onQuickFormEvent() + + function onQuickFormEvent($event, $arg, &$caller) + { + if ('updateValue' == $event) { + $value = $this->_findValue($caller->_constantValues); + if (null === $value) { + $value = $this->_findValue($caller->_submitValues); + // Fix for bug #4465 & #5269 + // XXX: should we push this to element::onQuickFormEvent()? + if (null === $value && (!$caller->isSubmitted() || !$this->getMultiple())) { + $value = $this->_findValue($caller->_defaultValues); + } + } + if (null !== $value) { + $this->setValue($value); + } + return true; + } else { + return parent::onQuickFormEvent($event, $arg, $caller); + } + } + + // }}} +} //end class HTML_QuickForm_select +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/static.php b/campcaster/src/tools/pear/src/HTML/QuickForm/static.php new file mode 100644 index 000000000..82f9b52be --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/static.php @@ -0,0 +1,193 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: static.php,v 1.6 2003/06/16 13:06:26 avb Exp $ + +require_once("HTML/QuickForm/element.php"); + +/** + * HTML class for static data + * + * @author Wojciech Gdela + * @access public + */ +class HTML_QuickForm_static extends HTML_QuickForm_element { + + // {{{ properties + + /** + * Display text + * @var string + * @access private + */ + var $_text = null; + + // }}} + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementLabel (optional)Label + * @param string $text (optional)Display text + * @access public + * @return void + */ + function HTML_QuickForm_static($elementName=null, $elementLabel=null, $text=null) + { + HTML_QuickForm_element::HTML_QuickForm_element($elementName, $elementLabel); + $this->_persistantFreeze = false; + $this->_type = 'static'; + $this->_text = $text; + } //end constructor + + // }}} + // {{{ setName() + + /** + * Sets the element name + * + * @param string $name Element name + * @access public + * @return void + */ + function setName($name) + { + $this->updateAttributes(array('name'=>$name)); + } //end func setName + + // }}} + // {{{ getName() + + /** + * Returns the element name + * + * @access public + * @return string + */ + function getName() + { + return $this->getAttribute('name'); + } //end func getName + + // }}} + // {{{ setText() + + /** + * Sets the text + * + * @param string $text + * @access public + * @return void + */ + function setText($text) + { + $this->_text = $text; + } // end func setText + + // }}} + // {{{ setValue() + + /** + * Sets the text (uses the standard setValue call to emulate a form element. + * + * @param string $text + * @access public + * @return void + */ + function setValue($text) + { + $this->setText($text); + } // end func setValue + + // }}} + // {{{ toHtml() + + /** + * Returns the static text element in HTML + * + * @access public + * @return string + */ + function toHtml() + { + return $this->_getTabs() . $this->_text; + } //end func toHtml + + // }}} + // {{{ getFrozenHtml() + + /** + * Returns the value of field without HTML tags + * + * @access public + * @return string + */ + function getFrozenHtml() + { + return $this->toHtml(); + } //end func getFrozenHtml + + // }}} + // {{{ onQuickFormEvent() + + /** + * Called by HTML_QuickForm whenever form event is made on this element + * + * @param string $event Name of event + * @param mixed $arg event arguments + * @param object $caller calling object + * @since 1.0 + * @access public + * @return void + * @throws + */ + function onQuickFormEvent($event, $arg, &$caller) + { + switch ($event) { + case 'updateValue': + // do NOT use submitted values for static elements + $value = $this->_findValue($caller->_constantValues); + if (null === $value) { + $value = $this->_findValue($caller->_defaultValues); + } + if (null !== $value) { + $this->setValue($value); + } + break; + default: + parent::onQuickFormEvent($event, $arg, $caller); + } + return true; + } // end func onQuickFormEvent + + // }}} + // {{{ exportValue() + + /** + * We override this here because we don't want any values from static elements + */ + function exportValue(&$submitValues, $assoc = false) + { + return null; + } + + // }}} +} //end class HTML_QuickForm_static +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/submit.php b/campcaster/src/tools/pear/src/HTML/QuickForm/submit.php new file mode 100644 index 000000000..3959f4bc0 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/submit.php @@ -0,0 +1,82 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: submit.php,v 1.4 2003/06/18 19:36:20 avb Exp $ + +require_once("HTML/QuickForm/input.php"); + +/** + * HTML class for a submit type element + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_submit extends HTML_QuickForm_input +{ + // {{{ constructor + + /** + * Class constructor + * + * @param string Input field name attribute + * @param string Input field value + * @param mixed Either a typical HTML attribute string or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_submit($elementName=null, $value=null, $attributes=null) + { + HTML_QuickForm_input::HTML_QuickForm_input($elementName, null, $attributes); + $this->setValue($value); + $this->setType('submit'); + } //end constructor + + // }}} + // {{{ freeze() + + /** + * Freeze the element so that only its value is returned + * + * @access public + * @return void + */ + function freeze() + { + return false; + } //end func freeze + + // }}} + // {{{ exportValue() + + /** + * Only return the value if it is found within $submitValues (i.e. if + * this particular submit button was clicked) + */ + function exportValue(&$submitValues, $assoc = false) + { + return $this->_prepareValue($this->_findValue($submitValues), $assoc); + } + + // }}} +} //end class HTML_QuickForm_submit +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/text.php b/campcaster/src/tools/pear/src/HTML/QuickForm/text.php new file mode 100644 index 000000000..652e73485 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/text.php @@ -0,0 +1,91 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: text.php,v 1.5 2003/06/18 19:36:20 avb Exp $ + +require_once("HTML/QuickForm/input.php"); + +/** + * HTML class for a text field + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_text extends HTML_QuickForm_input +{ + + // {{{ constructor + + /** + * Class constructor + * + * @param string $elementName (optional)Input field name attribute + * @param string $elementLabel (optional)Input field label + * @param mixed $attributes (optional)Either a typical HTML attribute string + * or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_text($elementName=null, $elementLabel=null, $attributes=null) + { + HTML_QuickForm_input::HTML_QuickForm_input($elementName, $elementLabel, $attributes); + $this->_persistantFreeze = true; + $this->setType('text'); + } //end constructor + + // }}} + // {{{ setSize() + + /** + * Sets size of text field + * + * @param string $size Size of text field + * @since 1.3 + * @access public + * @return void + */ + function setSize($size) + { + $this->updateAttributes(array('size'=>$size)); + } //end func setSize + + // }}} + // {{{ setMaxlength() + + /** + * Sets maxlength of text field + * + * @param string $maxlength Maximum length of text field + * @since 1.3 + * @access public + * @return void + */ + function setMaxlength($maxlength) + { + $this->updateAttributes(array('maxlength'=>$maxlength)); + } //end func setMaxlength + + // }}} + +} //end class HTML_QuickForm_text +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/textarea.php b/campcaster/src/tools/pear/src/HTML/QuickForm/textarea.php new file mode 100644 index 000000000..1ab99dd7a --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/textarea.php @@ -0,0 +1,222 @@ + | +// | Bertrand Mansion | +// +----------------------------------------------------------------------+ +// +// $Id: textarea.php,v 1.11 2004/02/28 22:10:16 avb Exp $ + +require_once("HTML/QuickForm/element.php"); + +/** + * HTML class for a textarea type field + * + * @author Adam Daniel + * @author Bertrand Mansion + * @version 1.0 + * @since PHP4.04pl1 + * @access public + */ +class HTML_QuickForm_textarea extends HTML_QuickForm_element +{ + // {{{ properties + + /** + * Field value + * @var string + * @since 1.0 + * @access private + */ + var $_value = null; + + // }}} + // {{{ constructor + + /** + * Class constructor + * + * @param string Input field name attribute + * @param mixed Label(s) for a field + * @param mixed Either a typical HTML attribute string or an associative array + * @since 1.0 + * @access public + * @return void + */ + function HTML_QuickForm_textarea($elementName=null, $elementLabel=null, $attributes=null) + { + HTML_QuickForm_element::HTML_QuickForm_element($elementName, $elementLabel, $attributes); + $this->_persistantFreeze = true; + $this->_type = 'textarea'; + } //end constructor + + // }}} + // {{{ setName() + + /** + * Sets the input field name + * + * @param string $name Input field name attribute + * @since 1.0 + * @access public + * @return void + */ + function setName($name) + { + $this->updateAttributes(array('name'=>$name)); + } //end func setName + + // }}} + // {{{ getName() + + /** + * Returns the element name + * + * @since 1.0 + * @access public + * @return string + */ + function getName() + { + return $this->getAttribute('name'); + } //end func getName + + // }}} + // {{{ setValue() + + /** + * Sets value for textarea element + * + * @param string $value Value for textarea element + * @since 1.0 + * @access public + * @return void + */ + function setValue($value) + { + $this->_value = $value; + } //end func setValue + + // }}} + // {{{ getValue() + + /** + * Returns the value of the form element + * + * @since 1.0 + * @access public + * @return string + */ + function getValue() + { + return $this->_value; + } // end func getValue + + // }}} + // {{{ setWrap() + + /** + * Sets wrap type for textarea element + * + * @param string $wrap Wrap type + * @since 1.0 + * @access public + * @return void + */ + function setWrap($wrap) + { + $this->updateAttributes(array('wrap' => $wrap)); + } //end func setWrap + + // }}} + // {{{ setRows() + + /** + * Sets height in rows for textarea element + * + * @param string $rows Height expressed in rows + * @since 1.0 + * @access public + * @return void + */ + function setRows($rows) + { + $this->updateAttributes(array('rows' => $rows)); + } //end func setRows + + // }}} + // {{{ setCols() + + /** + * Sets width in cols for textarea element + * + * @param string $cols Width expressed in cols + * @since 1.0 + * @access public + * @return void + */ + function setCols($cols) + { + $this->updateAttributes(array('cols' => $cols)); + } //end func setCols + + // }}} + // {{{ toHtml() + + /** + * Returns the textarea element in HTML + * + * @since 1.0 + * @access public + * @return string + */ + function toHtml() + { + if ($this->_flagFrozen) { + return $this->getFrozenHtml(); + } else { + return $this->_getTabs() . + '_getAttrString($this->_attributes) . '>' . + // because we wrap the form later we don't want the text indented + preg_replace("/(\r\n|\n|\r)/", ' ', htmlspecialchars($this->_value)) . + ''; + } + } //end func toHtml + + // }}} + // {{{ getFrozenHtml() + + /** + * Returns the value of field without HTML tags (in this case, value is changed to a mask) + * + * @since 1.0 + * @access public + * @return string + */ + function getFrozenHtml() + { + $value = htmlspecialchars($this->getValue()); + if ($this->getAttribute('wrap') == 'off') { + $html = $this->_getTabs() . '
' . $value."
\n"; + } else { + $html = nl2br($value)."\n"; + } + return $html . $this->_getPersistantData(); + } //end func getFrozenHtml + + // }}} + +} //end class HTML_QuickForm_textarea +?> diff --git a/campcaster/src/tools/pear/src/HTML/QuickForm/xbutton.php b/campcaster/src/tools/pear/src/HTML/QuickForm/xbutton.php new file mode 100644 index 000000000..bdc0cbf88 --- /dev/null +++ b/campcaster/src/tools/pear/src/HTML/QuickForm/xbutton.php @@ -0,0 +1,145 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: xbutton.php,v 1.1 2004/05/18 09:46:46 avb Exp $ + +require_once 'HTML/QuickForm/element.php'; + +/** + * Class for HTML 4.0 tags) + * @param mixed Either a typical HTML attribute string or an associative array + * @access public + */ + function HTML_QuickForm_xbutton($elementName = null, $elementContent = null, $attributes = null) + { + $this->HTML_QuickForm_element($elementName, null, $attributes); + $this->setContent($elementContent); + $this->setPersistantFreeze(false); + $this->_type = 'xbutton'; + } + + + function toHtml() + { + return 'getAttributes(true) . '>' . $this->_content . ''; + } + + + function getFrozenHtml() + { + return $this->toHtml(); + } + + + function freeze() + { + return false; + } + + + function setName($name) + { + $this->updateAttributes(array( + 'name' => $name + )); + } + + + function getName() + { + return $this->getAttribute('name'); + } + + + function setValue($value) + { + $this->updateAttributes(array( + 'value' => $value + )); + } + + + function getValue() + { + return $this->getAttribute('value'); + } + + + /** + * Sets the contents of the button element + * + * @param string Button content (HTML to add between tags) + */ + function setContent($content) + { + $this->_content = $content; + } + + + function onQuickFormEvent($event, $arg, &$caller) + { + if ('updateValue' != $event) { + return parent::onQuickFormEvent($event, $arg, $caller); + } else { + $value = $this->_findValue($caller->_constantValues); + if (null === $value) { + $value = $this->_findValue($caller->_defaultValues); + } + if (null !== $value) { + $this->setValue($value); + } + } + return true; + } + + + /** + * Returns a 'safe' element's value + * + * The value is only returned if the button's type is "submit" and if this + * particlular button was clicked + */ + function exportValue(&$submitValues, $assoc = false) + { + if ('submit' == $this->getAttribute('type')) { + return $this->_prepareValue($this->_findValue($submitValues), $assoc); + } else { + return null; + } + } +} +?> diff --git a/campcaster/src/tools/pear/src/HTML_Common-1.2.1.tgz b/campcaster/src/tools/pear/src/HTML_Common-1.2.1.tgz deleted file mode 100644 index 3726f5bba709e075412b4c83384e2c10e3e8ed7e..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 3637 zcmV-54$AQ#iwFP!000001MC~wa@$5S&-{vBtSTgB-nwa0w&FOkD|YOPoz2!tiV6gW zBy131;Sj|{`S%+LAVShMI?K<_EUt4vlWBV*qn4 zZ*05Mq4D~|yXNun!AY}gz_ZiJU?Hp}J^r);FmTN|JAL)>?VGC?-hA%4gEoIdT|qRT zoBrzb{mZjo`h9H-*a4U@G6M#dV+H|CJRiJp#(bbr;w1}OgSJ9J=*BFte0ve%{HGsh z4Dx6dl?&gywsAPjSvd2?0{<*Tevv;0V>?(l<_b)A3}zVm_9zN*@C=_FpwiSzkAO~%oZ<52@wA~Q@qble*^+vqFS5bfu=Gb&?<_y~WNp*4koQ=&nd@s9| z#&|bFY>oo$K4&b5g4QSZQwup8v_-EP>w6A6b(lFGwE0&-PCH9aDS>m-C37kw@H^&* zK56K!8dE^!NFsPXH|J(x&hJg5{>-I1@EO7cYPhuf({8KR>JHlKQFM|?oc21My=LdI z**!sx(F@V%pgLVd^ZwO)cq6_K+Ulhk5`;7y|Bf8&6HlVY_0YIZl{LbYg=ewN)#_lG zF1X$jjWdjV7tnunb4L3!A;3p>3biwb-LMsW=lOql*L9R7$1G-vy(L^N*wEn4X8=ii zXlUMLK)V=V61f%`X8}yVZ!YYA31Qt2Ug!CK7y?~t4=3WDC`90RC>9Zh9xjkKXy-58 z@x9?cnxl7<34Xb^JRgWb&~R_q7a~aCoB9XAhu$kpANPZmsVf1V*bZ~-AdJHuy#NYy zLt`;p7(C0`E=Co{8QZ=l@RH#$79 z6cJ+n7GYE~xAmzpwkGj%U|}kqGRK?Bp{ZD!j;5JdnvSLi&0a^3rt5-b94^lm3&&<- zECxbr2BQ`HU}tK9B&!$&}qA491%y%F`Jl?6ZYXEtWy~< zVgx3DrTb(Ms8n8n!cC*d&q|3-D+Op=$V&nNh9{rq; zy`4^9W|2CDvfb&X}1FEbVZX zsi=OiZ>UO)rj*LA7N#F)@e`IarX{$g8KApei!dexBBx3@dal3>9gxnkM!|XPaD}{v zs4^UhcKI69_bbyMW4ZUwUhlAXoSWhyitUsuw#Pl|cx%P}VEaL+wA$K4-Jq?7fk9i= z=BJgvd*So7@us{%%$|fxdmPS&`+eALSK4iO()=Rr3E{d0S{TU{0_?** z+wGU9>xH*i`Sx^%f#0e__vGZLL4S|=-;)Ml9PRMGUErG$$i|Pp7cCx}E}mTjFY+x0 zyw;<~h*tuXeq_vtUaJG%gqIjZnp|-V_*9-}M6w%hiSR~<)CQv&mwpdp3iQc?^ z@$%;nFB`mA!7*uE<~1(5DR*ENM;H{vbjD$qp6`sCXhW>IWFzX`pvPO7h2f&#ZZDTh zibgG$g=)#%?p<|yt?(vn-OVO$;q?SoUIb%%jJch%m&JI>$IQN16^Kae3SlJ>xttr6 zX^hJo(GCHX7v&5#U?HlWfJ#A=CY4Cibjj(SO9oM;uw;BmPrDbKW=W%sYmG5hD$H4B zxqbxuI*Y=Y=VM`;Y!JbqcsJI~9y^yA{}l@6y|ixE@MvHsTN(_1xtA3pVZ|0}iCTj#{^M#NP$Bi!Le} z+1Gxn)7o1&T`>y=Sl_h53dK}Gl)jPqXNA{OoN{WoWXP7Q+;pYCsiIg7etvBV4*1CU zt!Y^dC&JZ)eU0WM-?#ZELF`;<+ebqIT&q9L(SmCyoShc$%6~W^x!G+u++yxf?Fiu1 zo#IJFv7eg}Y03ZH=vm=2YL~ zR5&*`PwuH}z+z{EuLccFc(}O9lZYnF-|ZyU$=hqOY?od@SrR=uFTF)H!Z@Fjo!Z{f z{k^u6ay&P3oQ6InI)qpZ{#jA{>`ZV#%C!jb(NE z3*TrK_HRYLPa-&b|5_Ct8~BIkzJ!Od7bO8BBbQ{yxRzyFZgivnWQZnU4R9^t(wkJ* zJ^fQLLk}5`qS{~?6f<`<)pn1Hxs&QrUSGs%f~1twcxS{CL5sc;_mPX$3*|qt@kFo5 z5Fbk#1?=;kxAm-}aTc*Hp||E)dMR$RDOkt9B0%duXn*u<<0Vq%uZpo~dGdgZeP zGsz1Dze*|%T>{1KsS6?~mxMffM3(0m6PR|+nPn;tbt2NHqH$g%_m&7nsSg}D6{WIK z4e`@RJ*QB!Cs4D4D^Zc?@O2HC&*}Nhv}TZssAd2=pVw32HPrH)}jQ$0QNq7nE1%Io^`_%4VMC;Qj*U;PPZGLLCpyUw|cV)hLN`8hsg4 zRA#Ewl#$}6=6!-V$$pS`;+*&wKATdt+OE~k&zk=+n}1yOFK^F(zqq*Rbej10=!eU? z>gqI4uKKNJu79^~Kr6?PQ9Fl=3-{t8ytwc$pVXh#hPgKv2BI=9cQ1_F>iO^0%iSvC z*2e7C>(AOoS`Ne=k$p9%W1}lv9o9G-4c$E&B$;WRVQQ3JYCDz}xgqn1ou{C_5BO(| zL!Ngp>q*a(C#5DtwJDIwB-FWrxy);w16VU=eU1S-n*o${3V@@H03;xk!@S06tHW>z z;*rl>>I{4?bVTy-bIpP^RQ1cWaqC^hw5;_OMQjk!8e6(t13C@pa;l9B!+_gcDDAHr z>zGLiFN34ofM&OZW={8mL?oWeB1kd*{2S%sa>DhAE0doxv3hNpEm9IiE>(9;F-Opa z6}L$|$zwQLcO|(cSBu5TN@X38`6?#)EDNi_sFEg|aOZ^xyRielP$?)(i>ueJp#Gh2BPvtBsaIADrNDav z{Aac-hb*aXG=tE`XO*Aa2I8hz`&N)GZJ<}A{(qz^pI(`&CnoAPt3f_{s_^M;u6YDa zrPV`Wgiwt6g0X@KK^K?;EgmFwB`;sK4qe_`1OzQ4@GYJ#;(`vER<|A&_KU(o(MAV7 zTzhuB)v!JwBzL=1K=^juO34(ngqid;Px%Tr3zS;=Yb0}F-9GP|XJS=Sdq#GVW{>N;4RSXV-r4fxfyZ@7(t6$K$yYeJH(QduiW?+Aoo zEN$0lfH5~M`iKypK?sY{#quvYf+&%_Ci#4>P$w^foUE7wbY5N`i{4Bu;a54UNPo4T zdao-ebx?aC&T6w`M_7e_ep-N; z!}!iYX_}1BYE$FxUP)-DqXI*jAL<9Qa%f4J5TjgMCB*o0esu4;Ho1C{&(;Z_n~&k% zWw_ImWI1!O)};SO>Rz@uHQ(aEu`p;SU*SXH1T}tv0|U%Oh<~d9)dsN8YSmlY$Z%~a zq4PRP$Qm;d4nTv-4P-+Ju5MX~9|FkVfAFG%j~Ov6GhA6q#z3iKx>8|&(L9$Ik^GSi zZHn_RWpYaHk*JX+!lIweNTh51NtfG~bE$Rb+R0CXHu+SJL*1jwm^+iV#pLfjQ z$VrAi=`uM27d|BnsTajW5wQ|MrIOr{$zIs2JUjin?{j}`U)whAzW@LL|NjF3xrP++ H073u&rwJKP diff --git a/campcaster/src/tools/pear/src/HTML_QuickForm-3.2.4pl1.tgz b/campcaster/src/tools/pear/src/HTML_QuickForm-3.2.4pl1.tgz deleted file mode 100644 index 9d70dc89e6804fdaf90fa389d9cd417e6db5f2f2..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 93144 zcmV(>K-j+@iwFP!000001MIzNTjN%?DBNG0U!l;vu}O@9C8UZfsT#3@U8NE!j|{lmGs%X^+~H&6GZUZ+!Zsu(h@JwDy|U+LO3{9-k)NPvg;F?(5Ur z*m$_T9sMPWqDK$if1{|^+kCLui+UTqtp^XbHaB~l@Z-a6`03up^XJEWo_qs4A6+Cx zndaH^4WAc*;!woByrK5oK3n}GF=}`2kX*q4dKH3>NTgor%O@vB#Xz%(;tprzdHV} zS=v8;kr(49>+~Z&Eob9#TwFapI!mH=`+EmFJ8n}wo=K5kq=Tf4#>w<7AC%EBFQR^t z#8a40C%TA7=|KL5rv0QW;qM56VasvZeX_3l!hQi#zep!j7%TOCon8l5F#NP1k49HK zf<*V9L~%BViX5J%fUL?`uGXgc+N?~db(D;f zagt5ptuLbgCLsNMJQ<~NHjPe`EGeL$0sJ;du*I9%I4SZO3^Dx_pNx0}$)_odfxfDh z$+M`KjS_;oH=E{T_^lt6Nda57R>CChmIz~*j;2WgtB7yBg}0M`&XRH(eT*++UOXCu z8WO%ndooI4@IFL@@gjxc%qF8ehJ`F=lSy7o@%N*A8jqs>tb{?OzcQqJ$ZNq%DT6rV zcc>ejVUfXm(*)KAS3b#3(+sw%{qpF)JJDf!I*vQhi&66F3ckU{Pp?)H$h*<(^psXc zt#gML#@aeSVqQYTWkektT@Zc7ahgrx|Dhp%cYfg?;3wG7;^{ahAWzomn|eg}|6Ni{ z3+(i@YNL(?wMhWv=;?_7_;wtR<1!w10T-UE^E1`5$VbW35#Z62b^4P>wC)e7c8u{L z&eCKQ8spv|9!JmRabS4zYVX@5DQ9K(WA^c026%B292{(Jaut1-7r*8g;njmj$N6yh zZNKb}%UQRa-SyBu7J#>*!TlJQfX4^)G%&J{`1o6V`Dy~VS=KJwAh}3J`6MZBIKb&y z85-Wv8Bl;SI_#g#M!yC}2rquSebR>mFdI#~gXHF;v%k}Mc~ZdHi%Zp9n8wqs?q+v; zGU`29SHJLcB&<(2H#WA{dK+t-8*m))2Yxn6`*2K?r|*7v7ro-YpRB7Nxk)+2=I~!Q z^uPtC=H)D(CgsyLpiG~DqW*33!J~&e5fXOAI}A(M**Q(7hqIG$I{i5w&64(Ngmf}G z1=>4_031-PA|9lRbaa-M(IxB`EMt)mW_^I0W)UqI{t+X9Vfu+k2BbGus{MxGEMFT;K^({1*EztD1;y#k0L7pk-wCi!cgS=O zL`S?EV6!`-?+EB1IRzP{xVqD6uJ08^d>dKu0eR=epO+I%G_VDgb zu!j2f>(8LgN!-61cEk`t_yt0AcL4WMkG?x_2XS^s z0s(_dPLsP4s0G|VXK9f%aP&dmZ-xjB%5|;(-4YI)HE$0FCRjAm?#1AcSbpo#kO6b; zWCn9f8<^a6fU!OH*07X4b)Be((9z@MQ;Z7b9YbewdiTIJ{r>|%Z{8*B`&tl9w(lM^ z3kCPK-VFY})@2N$M+y+vM)659y8WrvfR&S@Tu-NK;(uD(?4nM2e;wQxc+p$#1A0l@ zt5;|kXZ_t=4T%_uqB%KyFW3`K9u)wQe1erFr;Z&o5VbL|;Jl0g z(2wXo%A$Ai6y77(5PG4~cm!{!Y6`~Tf0m3U!`TR<4a6^ACW&_Y|E>4n@uSto$sfxg zc6Mgj5RmRyGjn*)U#KD(=NE}A6g158OXzGmD`2^cWC*yH^%I%=@ zaU5=MtujL2=(L#ir+I%96`bnkC|d`+PM0 znj;uKKgHhTQ^d8XW&3tohy*Z$mN9&{EVMF?gH+NE? zqj+?scR8DlMmR6%l+~apm9P(Vb)uv2Dw#%Xn?!7DYtJUm6qY`n!0MD|NeMlqWkl}Q zJcAx!y;`{aX00%w#KfPVyEUH1020iPXDLh%C=$*X$m#TorUS^0Ge;vhv;dUD{odIr6TOazwz3La z1ngPRTYXIHN&E1k$bU^T6xL}9(I^KZRz!S0O9Y6x$Zl*k&Mi6(-}9c}w2i|Sh|6Gv z9^L6Xq{$_os2A$2qwCxQq7@u-9tL^ByIUkg;M4*nlemcCEXlfpZ2on2Qck``a+zI` z6IkZH^4Kg3t#T*tF=yT|NPIDs3hP}r9elo$x zgXkm&(FQ2!1)dv>wVNV=z-R+~wh-+t3XVwP9U^6>JZ8#IBl=r!>#NNg#7_CJP;eP^ zAXEVcGs^qtG-VymM)DStA!IFQI=TUv3UMvz>cIw`Au(#3P&XK=`b~|IduFMEf(F-2 z&>-_gj!|JZsfE7WQ*U$IFu?s1=yXhs(_%ol$uE#8pV2zw%M=Ysv3IhqxNnCE%x#)N zC$Do5FHW<>mm2=|;K9~Tq|6g${ra$B7zGL4_d!bGbt`4z*oug9j~Y4!I?_?@AQ_#Y zlMcp^@`|d(^84;lkk5YBA7OaQ$C85>fudi6lpL+EBQk#W{@L@rqrLak#rpb(4~UmY zDRbiQQ96x2p`>d9Gd+GN@i0B0RJg*^XBelD3;?O;y{>N$Zm1KNo!bVzI%qlJF8aK#3- z`Cv0@TLGPfwxt!}gQqV+ffoRbZ@Wv?b!1mU*0x;&D8l-IhgdHnOO#wav}@Vo`51 zFM_(C>@4k-NC;_QkqP;>q!Jb&nV$5C+KMm<5`2*Yr%IMspBf{tirTEzrHFETLgDEl zv;_2}-d8(7nSnvgPS22ZU{6c1r=&6%nBC~*FuKZT(EtP*I7T)EYy2H*1Eg|^^&nOy z6p-j5jYUD)Q@?5c*j?gCZZejeQ0JW`jDYukjQTUcjSNLTkkQWJK$sX#8fgy71u?wo z(lDQ81Jr;(7r9J91O!qtj*D~T|A42N#ClUK$BJcHLT&Cq2 z(%n&>pPPun(x_KJ{3nEZOMPTF{izMc8gxmsuajAr@sURMIw?*ql^yza#R69KVDM-0 z1)$6*JtyM9z83~@JVqGDaJFWE_7?~ZHo`_RrY=ZifRy!7!X**oJh>_{+A|@sNk$-I z1!*_avjWiwI66&J4+=GU5M@B|MRcthgq|lL-*ZrZ%6wMz9Ua}{(wh~6B3zo)1)(j& zG#L#L`BB0kQNtD`K&lI=vX0mQiY!p0y|^65=GCKFaZa1x_~zjZM7x(jrPkh_j%McV zH+gXh^n7m5DC=aPMHQeg5Kr0z{LS)gZSU~e%a>7kH9pBl#7yWt3mBjfF}q7nt6^k^ zC7|>AQOe@G@q`$?qf2H*?~!3mgz}4N9g)eg*EllWx zI2~gC9>WhyTaQrKiYJrN)eG|R!Vrfsh$sV27*S#)YnNn(Vae%}*ko9QVIv43IBIfL z+2`>iI2Js)5oW(kkNYD~D%z`Sz&SXMxh!!R(e(Diy9d^*Uv0t&s{|cIaGW`EEvxmT z?OxROWH6wEux_n%U@;?p1#@9k1o+=JH(-obkc~OLCq)hdY@WI6fdotm1u$${32P(| zw;$AiI|G8F&{!lVKrB$!0RaPR_h@Uo29Oej&+-hY5-Vp!osph#V>H?%qja32|K3?A z7~N%&E7Kq>1iZr}inJ+?dasTKQxe-&Y|Fe=YFwk<#+FSkiCXiZ$jEV)k4PTF?Ga-a zfrLq|0M0_kZ*Zu)Y`H+Vvk6ihv5z7%2YhBJ(^z9r?O}yB&Wt?~nBWW+!BWa{nq=8w zg_>!JCw91UU=KvWKiX7*oOV{CprB1Qq{5WxX_gLC zV0BZnR}N6x0U{=bzakkDeG(aoglCpF6rqff>~%FQ+$&&B=QE?9V;Ilh&*J`BdVUpW zhL%2`p={p#@@o)6ffGjuASvOSDkTxn2Bik{Hc*Ns>&%EcWQmHY0~8zKFBB!j+NmsQ zA7|OQV~#nQot9|2+M>1m+t$`&-x|y(f-GEH4}gZHnP9A9Fev=`2jMbFi-9>+Ds0I1 zji~m>cXO1?<5Ljrl&Gmsg&u*WXNxEWi0&?$ahAL-u40kviu&mtP$Lbde+myeeO?ksp$|2X!BI&vteFyk-85aX19kXP68JA1S00*psj0Od0 zwB4xf=l2?N9viV3Nny-=p?D1%LSa}p^vf@_`W%BQ-UG5{%TJ~92g{L%MMAOKbqbTc z8!ead;37t&Eb)BYNEoM+MvH@dgC_gF5HaZz=Yg4wV>A%qh$tD9A0nT7A&hU04BN7> zs4Aj@bdrcXluk)?wYI_V$W79DH6P~F4}$z!%C=_?NR%Y@z^E-_oP~rr(Xd&@S{O0+ zBs)X7d(d&(iNuK6;7F6;UuB3*O5p>ns2De(k;4pkBo3>*imTo*0ZBpg>zC(o^gSx) zNPf{I13OqyEI_?!!gJNC6fQz|$J1+5bSBRz!{_^dHjKP(Q)-!_x}VOu>D#a|sc(%z-0& zBNKe7huykr(H6j22GH)?LGpp6Bhpim4d4~v3V8CQvIJ8F!f=s@1__X(zDlh{^FxYy zna=w~dV8?{`t8sA&v9YtMCZi`==AE;BXUTK4wG*IRm+lrh)p9csoRM*F2(q0L%Qk|7-+mfH_w>Iyw9rY?3a`P z*$hZkPz2Gs5lK3ZKZ`|(PGtMq{+{64?GMJ#LD>Y+(l^Nih=*Ci(;Q#Q@lcdZuOo?8 z`vLZ>fDObYtWr+y%F>n)y5%%Ai)nAd(sM%zRV5$gs5nmq3S$2!O&mL9u~&`6O`&|t zS@LPRG$y$?&ysHRj@}WA4Z1A~@+yDED1PI^*mx8lt@ZxkqsXxwRr72|m%$L(Qym15 zGYYnB4%4Dk2Slq9_&^`2pH7~tOP`^I}6iEA)#r|bK0p34Ahd}VP@6zHl zh4-eQ^JQfzBFQr?sp1N(*(#P|g^nhGiUkrNvXhe389L?!iOuOoNmFMR1s6V$74O_J z1$tE>zGkh3LJ=YkMQAajCw(tBlB^rp836SYqR+G-gRJFrE8@#pF=Ag3x*p(N3w2=u z(au;yL3s@a;swZlO^RGlCdW_!&|ukN2(M?!DJM}IFs-GiN7wE&Bsq7k?dkR6fjRUB$x?N2UN_Uh_9(*heR z2}T%AK?M0kp*n+s33di$gmea>dqzJ(im4=Z+8oC7#pkKwN;6=z(6@A{2qT5{q@y}K zWDw|5z*7-NEvCeY?QRnB=q*w1g|-0p*)U*?+=Wdfy{Em3&adff*2;u#=d2C)QRtO8 z9!E@4URR^tbfZI9a>Yu>QlSQ0Dwb^@X?17=RDz9wfCxHzqCBL)T#mW1G^*;$E>hvv zmp@T(R5Cz%hLgq3^nZiSGGjhrUsE_$ccj+fO{3#KFK1C40qp@-Yim!ncszURF4#ymi@)NXmQ4{i( z1DOB%>E*M(zj%A_`uO?&yMz5_dq?}vySJ00HX7xqhie<#_a#TYAkqe?G02IGP>>gy zSd>gbIwJpM89_*=b|T)Ka%~;kM}e3Z<4M7mu~N z$4EcIsWh>bOjCXFPz=r*Wjt@FPux8`{4r08)95>(tLI~wjw26hu@b{YRKT^X@Vbh! zcKMx}!~+o1FFC@EWXke9%(vc>*z&8y<qw)*g_OtaOs6w6L$i$h ztkdH7P^*aLmKCQg;ZdOJ+sk-6lg-9=fas0hAvj3ATX@#%57HV{G2HHMeyL*A)TFhX zq3XRlvYz8nBTk{j49jon>X_~;7#B-AlS-?DwNxS+u{~7XFyab>Wq^80nqAC8G9cl1 z(b`C8sHXeyA#xq()VtQ{QWeq1S`W!L7(z}qLz8U9Je}j8ObuTv$U12I3?3&`!UG3+6Tshnxs&k(-@YQsP!- zB@G;l01~sMV-jcc<3y>z_}RPTzo*YF%S|9e1hJcUE3o0WCe+Om&-PmH(fvp~ z%}#s{KxJgaH(jqDF*#jt+h8rMlpHrjC%Vxy9W{<{;)^&PQ96`)3n<}^KDTR}2ZgjI zAK}`IT94WQIbDTRRNAS;FK$?Kz}CdphxQGGCBf6Em%Kds?{z8>?$;0Ra&>lRyl6^f z_B2JuIwo0lBUm#N+Jn%4_6n`jn^TU<73GT^k)&hcL#!#NvMligA`~%_DJvoS%$4t3 z+ta#SOx^ZhXCy*md=Nz;qlH2E9c{D}VTxW-A{;3gYHUL>(Lz&g9a0nk-SdaeaUcZw zfikR_RXwLfT1`L)iB4i^DQcQG` zt)2?G5y;}lDxC>tbYvKcYwS8UuA#m?gM@ab8AfbJ5`?C-%QM_?HdGyY5B*cH1SmTJf#S>kGaUF!A|i-XoV=W9WTd^I0J zPeR7hjgJq(RN)Z?4rDWIXz4t>BLyNU}gWm zM@2bhXPNCKWbW9Z{)m95!<0NX7ebAfi>OF>AGA&FD!Uqsh-G4)dH>Lav zg)>ptCddqz9MpGujNCcv)`X1^T38h|=#9K!D_&knD+-KF!hK}ijDMGqQBe8f3JyCo`j%(=)2Y;*w4FXAk}Nc(52O15HShR%r%j$>a5`!yO&j(uAE9DP#D`t*zAvnOke|T&(T{PK^nXpx4H5fcmYv3hiW{hV z{qOlj+%HWqs(Sli253F!UEd|8t+2_!k501Pg~afbp4VWHrE!e4KTZ}C*Noim-U+SU zMr|)t0Z*=L(4A6{fQy+zh9aS+NC$~H5fqHW&ZZnJ9)fanv%zM!*X+K+NTB<2Ur}0z zbAcF^2G%qQ)L?Yfq8S|Ux#&|&Y5O^zi*r~uOsy&D$}QeYSJdp=Tw6934j zACvRw`#~~_S3`H9A;HmvkF2ciABo!@{tEk9B&&Ssm{-)tnhuwNAhO^nu58d1OLiN5 z99i^TTtHtVYd(HxH8M)0GnA&*hm}l%N&>n=WMn!dfvCa&s7%_o5mMrAl21EKqOINq z9YaZis3CJCno}B}45#_EpTjx-M>@iA9=c==1BWWPYAV*Ta%5h^w~x{D_>}^;Qua zPD4q4#uI3Q%!LiG+JFiQLeLe=u=bO#5oJt*>Ry1T{VXm}I*7g-CCPawawf7wY7zVo zml%-zNKGfLn{oxqsjU;R<%^|nCIfh4 z?bDBI$rdx-LN-cad>|4ZgFOy+*BY60o}&dSiWEY|Bf9dD!~XzMO7JPeln4@QDokqK z3lw>UJ_czSWg#%v)o0ul=nRCCia$00Vohhq7Sr$*Dsn)#jd8KM+hN+{Ihb~TWj$ZM ze)sm^Xz$I@4rp!{D&2g>XIEK5+~7W=0m(y~*7-7}FXh`*ZHAjvmdq~DK%zt;R0@>= zuR|V95H+T=;zZ@6+2qve-8fLq*0UXyvtkepTtqrjB-CUih?zedZJu~>jT1EGB6lrw z#8tL+>>}(&SVL(DSu(wLWsxnO|Q|K3d zumWq#oV08oER1IX$@lN*$6R$^^9Y2cWpmjV-hXTRRg3p~A2g)c6&L;brU zcv^GSnk|c^N*Na+3^nl?Dfwha#%TOhJWlPs0$9}d$!LW4QsM+(Vp3UtS|Bahp_FaC zM#dMRq;#8nb!3;AcBtKGYflakKwY2Muxk%ZDlUrK(V&NoG^n?>d2iVk7CSO*rZ$F4 zjOuKJv)F-g!aH&|Y9@59CDjlQI5kk|iTYKQ9;G&{0t(jIL{#mYyAv#2Q$~~2clPGXx-TywYwO^(uun4Ozd{M z?vYG0*TZ%z+<8!sJDZrCe}6*rK{CWD&zAgRsi2kuO8RGa$$qE`CZl*Q4im`;CS_DL zQ#u+Ymx?}v+Xed--Yzc9p`oRvX+ZaaZmMu5ceSX2PByMwV*Rf-nHhwJXKp-1-? zsqp4L#Wwe)V+Bsl24f5}sU?ys$6+!WPYRV_9o7{=UXpiW2ouZf~tWD`b zn$y}@`gVa5cT~R2d7IPKQ2&3EZiMdLr*yb-{O;}HQ3wA0e*cK(wQ~I8<*WTeTM}IP z;pphyF|LwCt4UD1%7LV0bY!dAjbh{qT`8aI+=^IcsSbv+tKDhYmz}mu8%}`$&2uHq zj;X-8<0R1$PLv#r5g>S|sh#qf3@pDbov$K2Jwt3CQe5Daz3ChT(2a0`@Wud3Zxz3r zF{50;B8|J+i#gDGFaAs3XF$gjs?o>+k?IzKm%+pt6m$C^KIX)lSRQjP5+EZM2`?(o zFprM0k_3sNB_{X0#>=bi{2NCVE>gq^v>c@u)CraMR0Yb=W}_V9lEF}dB7oWOGc1h^ zr>z*Ty8DKwa3`|!>zzaD1uO46IvzK%?pUzyiE@mq%J#vspa=7Nmd9x(TB@*1hK)v5 zfePuG7CfB3xE$@(Bw4sKD#;8ln9^(*Lc%rgFR5*2f@->oT~Or|Sc6;}^| zTzTXTzEbe)!qPgK)4ZWepK60FmDsW6BgZ~($(tI}tw32g;SzY|1<+D@lnN7OZ3?Hq zYTJFhBVr5IJ4jbE3VfwVGqfbSEAPD=%6BI(6xX2Raz<82dVrfyK(iQG!EMf3LpH=Fr4`-VStGu~xir4arP-2s?9|VdB)1z+ zy1`AjNs-0(R3Hp%1t4L;2_aRLK}0a3=(D9CFlG;p-Vxpdh3EbfWDcyk4oy`Uvb?f` z5tVdUVo^slaUi=5;^(@#T~zVAb(QI6J=1u);z|?H@;pf<=-TR^`^mSKjG|xrS$n8f zjzu@&pRA+3ax5Fk!Xf)A^avyr1)y6rm zFgdz%%yV}G@KiA~ge;~$6ah}q9mN(Fbqj)){@8G)V$`gK@}&+jgPI>Cs@}|38HBKR zxf}q602rwrG)A5|bZ>n<`q#hy#pR4R;GEMNCGlL{#Xx!?`)AO#A_DhCI(C3Lsi;z9 z3pzBABu9&AF#Jy9ATSR{k`vPAd3ALGc#7h4oxqZr&sUI4wbIBE5vmp_{-A211yA3} zTLvQsJ1ULZ`-x+@ya+@1U1it3$t@sVbW4c`YyzShUBfdPt|gzKL58lYtBT86$A`ho zhr$q9Kj?;*3U7ia_C_PssadZR*fNg5VpAr1^=O0fFn5i^Y{p7P>V;vlRV$9H>U$C< zkG0~p=~@T=@t`#qB7xM6L(wV`>p8KGCxwoNwr+;=XCjwpje94xNs$dcGSO$+PQ;I$`M8W#xyo!vKw+qV4Z zsO;_~eq=q8d@0&))TzB(F&mV7*_{K5AC?ZS))yiexf~d1H~KC|F}n_ZMS|;n%hgR6wAbx5%cA#p_lY`D14?%QI&LL@P(?0L7Ua%Pnd}W`*&uuNsA$~7 z`fNG>qQ!7`efa@ob<`MyzzADFaKE|cj9Ywk?LgBGeR;_?_2iK z+t_%xy&e4pmhjO-_unYm>^*qYdldCHdRq@3Y;E=)K8T{;=7a6c=q{%B=V#96$v5bl zTmJ&(;2o|>^l1Xr5RMbM`=|M2cRMQ2(&6+n9Zb)5w|Am1)|Wu!{&MY3K3^iN->5`@ z(h2dhzZ-piyZdoH%O_WC+-~<*quy6vJz7IoFI@?MV`d}fA3rXlX?!z}&R;8M>>~SI}(>0xv)$wZ)}3~ z$%dF0qrn>BP_lNJoZ!-8JRO4G^C`ugSNC5fF`GF8NXee-x@vpf9+lFmYF|C>%n zOI74vKcVzVip~iv5$Cu77o274qDBpi{SYWo)=yAfHw8y3BX?Ln6(H`oq`Plrf+*Ks zCL|$~D;viwV@${6WRS+F!T7Vj2mIQbf$Uh6J0O_GV~m-_J0qUN1Nx))ZIYC;vimXn z*af}n>72FKA3x+hdU7)6zrG#EcY21_g7zk2)K z-mAm+EoQ#Dl-2&L{nz_%j*gH1=iUBc>qE2~Evea)p}oCiFNlOU>F>KwxlzkAa&gcL zcHU_P>)ot&T)3=}w&uY#kwR6#0>X!k;hxPW?{$#z=vx2uv!gJt!821HXOeXu0B6^ zoB&jCkm7jf;~+Jw!9fO5!9mH{odcPhG32O%ev&osgQg7Nxl4h~>Ht&LedW}c8v0FO zb+bC)22KT0oZB_(5yfg&(}@Gg@8*+B4(q!4)I<&yj8zTVl|7CtoK=~+sr@`ojM zSe5EzQ1XshPkte$E{%Ax#wbu_-WI!f#(JMPEew<|plcw@W1hN)O{c`R%l?hc30AOe8)M zyXqJ+KaRh)~O!X+u6suV>}t zpWiJyYA=(~XbJ6nO9P4=Z?}w=`u6WFWk2#hJy^|Z`~8E1w+EqD*23*yzWI6Y)ywC{ z2S2^qcV1iD47Pvs_Rao(zdSrr>a%`lZL1OfiaiY zW9>mBe5K95*?Z0NSbNym{@uabXZweTWyGNs8Bdy|O%dVZ5Zd5TyY)%4Lm=lLG|G{dq^tWLn(F8p zV>1b6&4ar=!7uG-@f!?{LLL_x8H%o_Nf8*Eb8sp{dqFXk4I}$m-*q|W+Y&H&OvSkA zC@o3K69QX`12db^A$gL}}U+~K_dpECJavjs8X+BnLof(n8wV1a=L8?R_j^Di>fsI3h8wU3#mmC;ZqR^=?IK#>^Rrp+Z%zA+J z2ca<0y?7E@Ps#}-Q{6UW#fNMb{=p1e_z82j`CvXZ^PjRe7;_O`o)uVZ2h$1 zo#m&%VkltBo1eU@c`EB1@+XSk*1b!WHG4+Fyxl_0m?9d@`tVw<;2KiVJpDnGY;h5V z?wpq;;?nxGRl4M=fKeshRC*BJ%8MbjtvR42dcFxXH<<%x8W(tRMH3up;tUa;O~b$# zDWxt_V>D&JDzNvd28h)H@%Ra@_EW6BNtvitg-KU)mNppdxw^1@(5LHr_0lQ$fA9{JI+L!ioNV|ERSZeG|1# z(bK*Y@!%~Gf`tG={|T?rJ1fVB`v*VoAG~jYJ`I1rdeQm-Af%lIL(pqiE@*Dc53A8{ zznO=-3gr;A5JZ3`raNv$#!mINJxGIOikP-|6s_H-GM-M<;)&x=>N?F9o^kv^?Iiq^ z4(uORqc2sD_KeQba_uSC!!vif)ocS`XZtf}dtu&bStir=%JISefBm$7c=Wz?{LkU> zaVzQ?g7jf^)!KUnsfSAiqdB(I6pv3Q{dT3fHB?_#R6pzJW~o@wvg^N~)sY%9g z;w`2rXb4U3R2Pk;*!Ox4AKn{4AFi>K){v{Krar%e)C)@GT@Fuo+t6$9N%dFvm)fz` z;M^QsstzwO&j@G4h~>67L;Kx1c=oyTw|$n;84Qdzd>q{#v8le^iIC1) zFnFB5qezovgMdg=k$UV)^D1J`ft3>9=lfD9gHlYP((Gn3Vf3w}q`+r5%44N>dF;^{ zA3ib5E$?r2H@|kLjW1g-)=gcxn^nRZ6$uEe0kz+41i`*Sh!Ys|JPhIjY;#e^EA_At_FzK~d%|EEuuoQUKSc?5 zM>*PoqNsgpQDF-N)>73GywD7sp>Gll_J>Bm9`~olYwl8oj%Ophr1H}QOR-UXg(BD$ zZIOeWwY_a}Z*SQgDg~~wP{>JsVO>R2(-GNy@JRg;$AIueZ)t~jrz4BjQPbIFs_vZw zL0>zl*L5p1wiQ<@$X6dADdc+kUJdYMn7b1sf_d;D+>a2|@dvsOdf4Pk;n6lq^1 z4ciO$UcLSyxCu^Ib-RG6;o6=b*oDJ{?s^zh{1F_akd|`ij7>7syOtBfuA&yKdWP5R zc|i}#@iA2Jq-djpsXZcPy~@dX$kKh2Tgx`cqwlTAxg#Gsg6%?IA15 zd?JaYHUcA^Rz`TP8q+RU^$jEV$H1v#*w~L+6uYB^`{{dSX#z*Zb}!wEl)8BNxwRpk z%4#to?Nn!1Lt#O*Ps?N8!?p#vq6Di$XYD4?))m_UW;YkW7D_kK1`EjAQy1H*^=f5RR_k<}MMvtMpSeRd)hC>>dZ$ni*4wJu(FPSoK_JY9+1V-L zv`i>`s?BK76pzvoRM|iN>2Uwx_#b-*Z(hFnz7s85v`Q)snxedRwKL$JF2!7~2HetM zK<+}$Rj;%Wjdp-F(P&d##i!6OIn6lzH7Ogst^umRr#&*%N3?DJ2yqS;K3Zrt$AfrP_N?J)FWUmI%0vvJ03*C`V6HCPB ze*{~!`U!Bz%{%0fmOxjDWV$|&bV2;dB>&Ac*gAdp%_S?yGlxxjnDYNFpS;x`H8aY^ z_e68bx!bY`tE}|90Izi4nKzREL~f}!x`AE3HgSb@RytFHFCRv)_x_t)oyUhS|IfY` z6oLos*4#hF1$VR6%_MW?AIQA4}1iR5jh^@%er|`7KV&jHka(iDBSI|C_ zmt50q%UQuzooy)W!gb&6gob4s20~|bB^i;iiQly9n)(C#+J7w&Tq1ET7kqIo1;SJZ zG~ZNV?NA-6p3Xy6+t+*}Y`rn^F>=F<*%?#@P}@Vw%4A$r6wraS44LCk7h1p1x!$I( z%UBIjr02@jNTR2%aL%D@bR9H#i?y6=WpVvqye(CpS~V`s{#J|_ah7*c8b=$F%()CtD`jtd)w=4xwB z%y$4)5xyOway#U7_Kug=czSU@6&$5i*^T@-3_oho$I-Mz{5#OKALK2cuP!QfhjL|W zg>MxN)1p3G0nxkhL|xm+PwQl&adsDvZlM8wc;EYAdFCY~09nTkKy6r{oZtc*t{n&< zXeEIbAcG*Tnc3Ln2(cUBpq%zKj5B%?J-~mz{4%89eKwSj}Sf;tHS(9 zy_KXu6NEeLfV{48n`xdesgqoZpg!B(pVq4^%;1s9TX>XpXq9ZTdzWU#>wgT>ttKgOU^!j5!iRE$z2*2K+z{ z%}5wiF(BdA;)5+cXv%8{uY2vGPk_UT02X1s23@vLK+SuOBU`mXgBbi=&Q9pe9_K^- ztP}Z#EE2^CJ#_b}K=ir#ijt3bZU9A0kyFZ$uz|yt25JGW-ZAT zR{w%Vb7PO{vkj`2l(}#|&?My=uif1$cc`uiH(tn+^MUZAVNdM0+!TIymH|yJ^P^DR!6w2cB9bIK2f`F0(&`E}E{BU*Wc0_XpsLiPqfPe4> z20IqD;0x8b1~ElL;yoaoF9)C;L4q+!KviyOBq^YfI~v_Q)p1WHWA> z7mO(7pkjd08jbj(L%CJkyTf8ffKcAV+SAY?$|Lv1)-cZjr#Wp7aQ-ANlvz!!RgksY zasySfSHEiEMF|exDbjMxzL_qMwgN#ZqbkVSCiJq)ToFoLkc^joP>3voO9l#HMV6@> zk|W?KC@%giBG6Rinb2;0ZdmaO#^de{(IFF%auk26q0Rc;DkHiN>e@O4RicQk`ziU( z^kqug(Sw06t>t+!CK?Fb!}3yE6)@lx4m-tyMV zU;n!Vn_J?Vi*Ft}u)!dNn1B^{6<+oJz?dim^G$LKBi){isKj59a3w9bv$Ql zOZ)<+nE4_RnrfczS|D`ZI_r=uu%MrLye>pa1Y+Jkih7Smql zYK1|F6+U%SL&>!im$1rWZO%)+(rf^vr{hv5O3A^}qH)0&_hKe6$e+bP6+?p0d6^eg z+^9OM+^ze)!RARf+$>=6q{}3#rb6w9F>9b=_jG29{+;jgR*5?`5N%Io=G1wyV)yuZ z@Ng2N4S?FcicgYJ5WonZG(#v8{CTR1S{ew_h}>b+Bv9Zm2od)<8|V@?7DOy~GQ4v1 zKQqy&Jj-WzRiU2pLLZ8pw37GS3X;jE9q!`2{QO~YODr=|9-y_$Rr~H{_wnN9S`=O8 z8EF}3HNJ@^qYAT_J?C03dIwblYXijX;Hf`cGanjec}9JqO|)lO0FfqaAU}hB9VHpd z{nc<43w?K^)<1`QBMa9VFtES;(zC%hDT173;1Wn7gRM;YJ=`YiXK23k&3();R!f zK#{-6uBBvr_%Mh2-lM*%{2vQwt2RpAF6+xcstp6G-dkOV#1__qc3H%i99E^8sedW- zr>F#9`4z7;X>Q|MaP(&~Sk+*F_u$Qa7isL>D$Nh>(%D^2I; zv)de?|23#C*monN3}aYG3v8waq#;VjUpLUC8ezP;s3x#~&YKh%Ov-m%`T?#og$T4) zF2V{fzU@q*Hp1LZXQ0(;%pBk*tY%z0w;lg0oyyrz1*oT65)VbQ8W7pf=LXoS@LFWlQV!Kz?xqa9NS z)$S~G#HuFL#RpG|?o*T6*E!FCYtGf$n$&VMr9!CVsIxSP%21E*?3gOE;zNsj>!=c<@O`=U0oub)!JcT`Uq-zSUQV+LP@(y9 zh(y7=_Q^y?Rm=iZ7r6MN1d9)%D(Wgo((UN-jLi$4W;Z7WtS1aH?p#&4;QehpqS-r9QBVMNp^aes5d^%oGUFe|L=ad0v zD@T(YhM-VNauQ*kY04Cv{J{#<3cK2~SbrK+8DaLU<=5*n>KeA9NXkjh;nRR+>hi3? zbqtq&9JMasXq)8kt{$H0m?xob@&*)>dfMQwVV z<=kCA1k`pHi^_F6J9OQhuG{5O_caXNcVI(PgMrV!J-RTC$YNawRT}eygWKLwgQ}(} zg?BO9)$<7PgEFv<)-;ezZ2j$pw7$ zRq&2>kt=AfFJHXrU5s}s!;#xg{4jaNI$CZ?r!qa}-$S}oghHl9NqnKkKxr1J;!R`d zO1o^(Wd3J!$tB|DP3*nCTxF2}3@$wkg5DoX;>Gx8v=`J~n( zvrL#bt9g+Uq)?Yg5QV}k)L3c)8Lr`qby3cP*;1*yb70 zX^subi!UqsLW=Sc%50uvRh0o}fHN+_gDz~ZxrDFaYsYB^02CIuP zmQ~(@lI&u+;`5v4Q2GcOuPGM8IHCeu%>wVXc-LATwILEo+EGhWb7dh%_*0XbdLqiWtc(b#0o7!~ zsV29{RJz}wD@|{&nU!SeUH*DBhc9SRu|z`FKA!=fnwI{micjrolb}w%HlwVzdCbo;0a50B$@r|YGXOI%} zc#sSzxTY?5NxjPIY1zZgWmlD_q*4W?Jvf#GFxbz<~Njg)#9ox^0-TwM-lS z!D}V_u%%lm2I)34tJjK@vr~TXS`x2RW5bs8gV#tSWJ?<9A9TCAB#NfXxoqM1rV2n^ zHjV=FHXB`WBTP7(o?*oYB$a&-n@}Vw%k(ru*}v{4yq|n2{t_!!VXcWQ;c^sOLC}gp zN-Bj(XX<*uSQ{9Ip_n8nOCO0|O0}$hT&m6HyQ)f@4K0k)Xhh6YrQNMj-F`%;F)A_W zBov`-F%3qC$kB&1n5Kj_yBrsYr#*v;Z0bi87|%x2bTYD59hC#eohc(w9u40dw19qN z=^#qe`QM}Hq{g|va+Y6?9sP!88%k@8SH$7BiSmNKP8 zUln`p>r}vNEwtm0) zfx7Zq?B2H~Kj17?eTgi2(isA~1#8~yW+#^ag}6mHv~w;8nhQuC$~_o-E{rqvy* zQ1<8FuTI_Q5ZRw==~uzUujpD1_@$bit2IB@iPqQoEFy+q3tpYb9^D*dMZPB_-uQ5f zQ7)_tTnp+Vdc(B<3X?DZ6{W5{zLwTYnHz|Cp#HjAuYS~swTASD)!}+nrq`P^={c{e zcl?}q^$FiUL({hjtl85A9R7cdy4*aAri)y}StU&OX|#bvU+!HBG0753LlK*icbeio z+)W~IwGrMSDi{92Xm2YbB|`O;c<)gb z*QL=c)_N@R{hCm09`J<5?kX`&2y0o5l4*h$pv=l?K6Xqh@H)Ij;r-*T9*InaOW&KBNsD)$TqTnuC?#{-5YR+a4>2r+7x z^`&NvwR&Epj>Z*1^D_>LZv^RH>3UmS^vs>}!Z>`Sv=-9}(vUkY=OSp$U6}vgJ1`vt zxk+Rr-{~T|jLhlyc<9y=Bv2qh%|w?AP{lRsgGh`PW|H--JpBct;r;R-ri|yjeeyF(oz#hxr z7vfM$)vX)a3<;LM)a}`Uw@iW(BRoOUwRiY>?J6a{_APCFjQjHeREa)x#XRDQ_UpItIzNIL6g%IN~AP^@m+6_M6%}zSK{@ zmeKSw=T^MKbx)%a)`Uli<=qeOEN)HFM`LUponQeMa~f<3eH;TrR91^Vg`86UzP>pF z)5bWs0C_0odhnfGI-{RMNv|j!B+aJDX`-d=fUrFY3EQfy?n)dP=WVD2fz|Xx{mqwC zsQ3q(@qlkE(}^?+iatULinOjTMqrmniU9>q{BvXQ{iF%kz2ntz_dH)s5_lL{4v^SDUetZLVysenfu3}Vs) zt2@Y*ODF3qET|X;EW4J6!oks!f?E7+GRX^*1l!1;bj->NA5?(TT(ho%gqVjpOwDbZ z-uVz8SIVX`y_r$XEYrBXnw1>r8?UONHlflJ)j7PCOS2%pk1Qh+lgbc;AX+Fj(*LWj<-r-1H zV3?Ten2qjtV8sF6e6zJkIF)3|Ns(Nn`K+|Yfms>4+5s$Bhpt)DbHrb90&A*0uFGX! zoF_FI=~aJ|l*UFV>gT4&A@tn9QpJUoVY7;8XKW??Mynt|5Dv zH80oJ2}cJ}c(Zjr3}&<@{{(SxYWZdCdu!PYu&(E}ZkDsS>Q2rkR@e%eqQb??y;OQ@ zCDHlBTjD#O5L#7JwL4K)_Tc+#PYLKZk@aoIzBU;zwImEz_4MXN(W^1?y`G76&r@|! zaOBu>VBgc6RTcR`UL))TCogs8H9+pAUhJ`!X3jX&=L96S^ZBv`$d!OBZ8J?=O#Y(Q zRE@1Z=~4z4h$>@j!a%hE-BHN4vxE0XjFM@dRqiEKAn>j^MsZ^=W}}A$6M9Qgm3-72 zVRq}%l7-l<1jSyL-Fgm=Kc3^Nabt_cIPQEZIG^iMuk~D4JgF)?_!jadm1np8(an6< zwrAJpo!*yl=})_^3YQWvGtb=Fskj^+Gp>*2UUzf1<3*AGnq;@zj3L4JkJ$>Da@|J! zJIX1grP>FJI5yT(s@Zo2Q@86dryonX%rr#T4wGpa{TN@why5a*OruL~s&Ww;$|spE z2DxykhW!ryPCqFy&9CL9j+lQ3e}~?)@uGJfyl5-S6@<~R8?lww4?rijBD9MWWweZqEXq~7!Re7h-4;_tgF0n< zu1;xRAbT_QK)+w97-mvKq~b$uZpwxQh=N- zRFg4C;B;D>jyA4IZ<`-(5~hTUcQA)s*lsrcClIGek&`$>4gn5oWloXhm-Wm`3lp`u zjkwq(=J0(T1rZeAjgK#eTnsx@1~YaD$^NM2s^ge)2zw|{W(wl*lP zMHT}xefL#(90MjtIVXop>8WZ6rx6JkkKeooR;Y_Z=zdXG0OOTg4H|6JsOrRTbuV#6 z_4C3pSd=h z+vlIlO4y^NEc2#vl~&u@sxJC+=*r#nk-s>hf-j55Ee1ys=wkvr zzgV~GBom~jkfG41kB6gl(yjsVdqC#4?Zp1g)pb>u^%YGO3mDf&uDQ=Xcv-h~bDA~i zI%k}{rGBr~%e~b{DnC{tF~~ARDb;e_B#yYEy}IO%LF?8vM9)}5uVa;_8Z&I0uC+-UDz$Z|mSsI& z{N37p&nBaBJ8Z*kHr|TRG0zY~3qXkg@`5oa)$;%hU{owsK6eqMA1IEpLZNCTneY!P zx{RyVJ8~6=S`NNHn0_NX)>**veD0c zA$o=tcO~;_$w7JRR`NZcz#bpSi_%KH$r!EZQn1LlAxYYVUJ3N%VSm1&hF7tks|RaO zfrAuN91`z|wb!>30(34$s8lwxZ6Eou-43E0hWTN8n&U?mHRBo zxXhoxU7GHtIt>?Mu055#&@0|CL+?mG;qzs-XqaYcc~;pYFSwKXsYB!e-#o6cu7c4z zn8B?6;(LHpI~tHXEk*_QWf!x;p~vFb5kzi2jc%X{l`jk|B? zrd_*6?|3vYHm-&;97{Lh(vnK3xJG{=tnn7M4t=Ki4|oqva}*5eoEJ$^;+Dw;NGOPe z1rO0GSJLd51Qk<-4XEXn)QqDiSO^V7^a5}tJw4M^@7&Kxg5*j|elqJpH^RDrn1D-} zw6l^fpa6M>rA%O8#kC&#D$jGq0c4^|W3OvDLcjRp2tIbs_~m({1aN*?2HeHNq$+ z4RuEKN+Y4MNOk4BRUF(tSzE0zWQ&0DG}}SC#m^f2u_jWM0}|%=WI3VU_d!M_y<4ve z+{j0Ze_^Bq0}mGt1ko9_L-hvxE_KBlwir@sH|$$o3~YE6syO0a1R*Xl(4gJl?UDex zh(K**YpZ1=jp^!}{VyQddJi-6FsnSA znuk;WVT+#O!{uLo0bSd9+FI7NI9k6fd#|>jy?zLvmVUaR`!nQ@toT5$Q&O)|jEN2C zRxytcwH9Ji>e(xGcP-ai*hKFe@+CaBX!{R378*1a+`7IqW6ss+E~M}*@B?J+O>Re5 zd6g&FV&Rnlu9<|o0^O2g8)kr?CLgK#g#CfE2HMKJ*d_1wC#XxzRU(43cCfzrBKUdm z>{-#InlzNqrzZN^{?xB$_=)k2T6NZ&Fw-v6-kir~H-G=329xV`8v8TPZ;dJ7NRsCJ zuNNHDobfcRtwy%!0CA1vrR7Pn0Z+ z#hiaxo`N2>{!xp#zbrpRNvT_XbAA2EXYZdq-#glSPc5q9K+BcDykl(FP^fCTJuJpB z^qMXs08~V(8VAU!jqQ@6crl7kQNseAdr#~FV@e=0xf@hiIQg)?1rP4tNk>Ak4K=T z%S;>A){8c*ZTEZa6Wha7)2Qy{_4N-Q>X7)!I-~hhtLjL_8z)z_mX&L&vw<|z`JNaZY+*ZM7R^p_=Iy#tg87@ulwexkkyoL~sZiNi zd(`z7G9f9An~9s&Dv4tya*>5fAMm(|*hKCGtTQ3O zn<#wLq2i2E|B$Pa0OwBV%JX50MGaL=pEb~!y^2Bl!WVUKrOHPXK8}_0fxwlC8tpp# zDTeTpzdb|5iAmqoz=nQ5zT?v^geMcMyYWRE_ejUYJ1+funCmY8mD!L-J&ddNR@5b* zEqdARzvH6aMJ~TEDwJ&E&Hc;4Frs;hbj}(FS%M#6yYT(y)g`ak=jz^UzRBDv4%c3} z2u@sGYQE?M=LGaN7s#?dQl+Y{A`k7{TwPmjD9>}(6v6uj{@97^!PHdDp?+?l5-D;@ zu!YGlKr5R>GnZ7BEw_G|YW-721+6L)Ux%;2vMFGW*Lzt4p90a(iy|o}c{U)|m2*{l ziE)A@Wk_UNzNouR-30m&uUM~yb#e*M4#rTGdKi}p)z78d;PKGQZAF`3qhvJF zfutDyLWwlPA|Jyyjb%#QwJx!SQ<>2{=rQUM)rw2hVWre^SZrhhZQ?Lx6n#JzpLS~P zOO07J*&11x9D4g0RT(SfJvCMH93`Qr{mMzZE1x1eE;3S{`gldTTAOS%db+*Am14K8+;oF}Mp6x487+qE7vx2M6;=p1R>)3JthVyOUOuihl zPGGYb6;w|G_h}KIaDO2QI>i>=qZ zr?XNRkvh>JrJNL4tkct^SXa~{2zr!UBqOTvoR#VHO4-*%wnJsajBVA0z=GP!AUTyFfLa5f}b=$4x%JM?($`;^n z#|QgIKOMYjxF<0}`E0*q&#OKf6-2@mJ2IjCz){ zA|71y&yxQ6N&X2v71!?JFMsK6Y&_iFj{X9ZdGyfz7e1T4-u9!Yx6#|$e)QnsgUv@# z)O)b80nh*Z-2dmvH?XHm>t93{>3E0iZlJ%%*8RkzGcGzi)RpYUxSi=eN5b*RyyT2OszWVA>2mkw+{`*xY z+T7UKp#S#Bmx|N)UIlU9=eXF`#j+qe&$&c2r@a6JP)oT9ODS9chX#5nFd`s7*0_EX zO|XnkW_%?hruVa$I03%K)!IZ4gpOVT{eE)@Bpk06OUuZG6<@?DB_u{Mo8e}sXPh&e z7o))%;83!5nVjI$Is5n<=quC7&ieZ08ELTF`W1f1z)_S zZIBM6$WK2>FB0@3!UhMHNG?uGqFF|>fi=~z@{=jv0g*OMuoF#230}}vCgiN78h8Z6 z9hY?XtxOOV^UH*|`WP0H#w=q@$Kzy>#(1HeKkIwIue}*)Ek(H#?F~Q{c^+peaPcSc zfd1%xn72FKpYK3GEpTC9#~GpLlan$3_3bzw$7MXO2Y1(VL~tuF z2Ro6+-#QmqV{jXf^!7UZulH5d>+NiB?7#_+FHWNUPm^e6X-Tr{!kGy+Jj_a1B60T% z&Rt^uEp{d794&jm)#Vkw(SYtyTZ-tV@8VMGa?_Cn;hUsokoN&E$9#ARFxqg=VtftF zc7VDHW>OMDk)a18CE#t&dJr#m8_*Zu;%{;m^nfU(iM}O+RlvMGX@@hwXZWV`f~cnQ z3U)2`pm3B16ApZ9I4e-F9%D+C13_D>Pyx?cz>~Gu*{{(aOoP?d;P5D6`{B6(_zYiTBRV!xo#>et+U@ue(}xGp(f8AHFskqKo)0DvNJ z%FpH2l@d#6Y7d-RZF?{{Zd#vjV>*O#0Dc73KZ_1#um(>)7VwXv8BdqoNSjE4ZJa=x z$k-);eFtSo>mX=#(`%xhFa2u~)l=e&#HS)LIucl>LwKxs2W<~UwbKsqG8S#;f+tHy zJ=TsJ)Fr+Sjzi^w+TkWnmu}^S1v>4|ibBO7cwH~90;3L0+hMnm2Nff-ofGEdD8R?$ zHol~iJdD{?LP3YUE(GvZe3Fc60gmWtGa$6pShU*!I>HB-!3N;sp}J#0qg55CRW`!J z?s`D?Q}L?+?L<<^kHr3pL)k#w=1RaZJbcQ;r6P(&910lcol*blSFy0p(<@Jg5B;~dUZOi z2D_<Y3}92cML|D4*s_S_r~ZP;DcI>wuxt#)(VpwPoxW_dq`Vq4hYM+;^6 zq+UD4ERo|+t&7Uk+Y%X4&pqo_y@_)Ai+`7kZI+^GsaJB<3@xivoDUGXtHiG8UnKl> z(a!h&mzKL7-PSLy4_#W2U3?Y~2K^E^%2{FpIm8X#`_PG?b!!#h`8xXD4m&j?=q2#f4ywKux-?cK z_lQ@(Bq~YP(jX8Sgt4cnnks2Wi*zT+S$vTy*+T8Qvs2okidUufYHz-gdyeYI01ZbNPHkB~_V->u~LaS-1+k3GQ-cUKdyGt&hnVRm;5kP1M_o zHa^V3XaUDsiHpRwYp7~yG#9_nTB16XELEzus4-I($zYJO0PN9U|Ap%awoU9-kG{GG zx-Q-*KIOE}n$_nEs&;nVY9h6ZypoRws+yGEs9-56X!s*e&2G4-WZ8C0IAEpJ54W97 zFqKg^FWWVNFD(>bRJ{k&k0bHPh*zs#J3R>ZZA*kv??&CI1^?HTX*rN8Wv(dhWVf=i z2;+%VkHtLDWk!-^62W$t6?9tNK&B@Rc$tr}wALe5@vdELvHrB>4v69kF0j-OVks-g zfU-Xxb`UZ9XtkYM*(d6rTr|R=#)cXh+N|zwpJbMu>LlGAnZMSGgy51_4!tNrc0nBc zy`G%%L9r-;p{Wvcu1JA|noAg2Jejc7TaG<%a*A<<(=!2}G+tc!EYH@|cML33VF^_t z>x>8=R)Y(J^s@D2I(_>7(}ySP@Na8JzDM#skW#DY1s)#srBE`^^LQG!=W*~n)0*u* zDls7yh%pIdQ&$rvaR)I|?!CGYiDw)S5{|`7%Xu=atLG2|onb^@18>+ymV(~o7vamy zsvY3GW9kl45kwfX3Ou(;tlg6dqq4+2(GCs26MZft@-d{mOs5>-d=V&jLFc~32bkzb zYo~G?VT=2c7^bugjKD9j3>4zFmbwwEjY&Gsl4|({j*v7KNxu3>fy*dCO+l!Vf-O4gH_B$`3#~Isa^OwW5 zHz^5uk&yI2H5Zvc72g!goP+QR-y8DD>&hfskYD9-?InKI+)l#^jx4G~96+U6lGlcG zLC+_I++s#qKMLJ#rU2{&#B)(sXGMg*tRO$I2le@imyS)Q+i>gI+ahP>(C50$8}AAWez{5zfYFy^xCOS?HmSs&kx4OW!A={*d^uwatx?n1tgE2r_uLmevxMJufOKe zlQI1|IQ=%wFjZ`tchhM#Zp)AVy3I#my%0a4RrXH8{NwDLj1RBlVv6>~Jj>AQkPT{K zy-E9LIS4P&vu^Z%;`6wywp@5zhe@(?+bKHhWg-7C{^zvB$hdV(IfD~=njD`1ZmnOW z2_B8xsQ1q1_RiL(9mnSe@-2ITd>C?ou$D21Pet)@v<_xVUS;uEV)Od!)m8<{ z#jJ_ZE=n^(DogQX6wX#$Md!&C7FIxSm*of-#g2q$yK)oKD2^v7m$(=W`XiGTs#|ax z`)5qCtVPgSQ`)KtAgHN|jNAXTga52JZ()&2G(WjDzU?M>-OsR?rBnRlMSKBV2rwa{ zpLWQA4KQV_+7-9FH-VRzJJIsnBF;|fuXjmY;J=5{BECEUP4H@2-nP3VHTx}tYb&_a zt{NnF4Qka82xl)xO(Yzy>%viRGI$;2;B-($72mXn!Djpk2F1arK19vmhSfU_P@7|Y z{5Qs@rI}kk-@sF4K_Y{r@-guC>YU(o$om5cgR zLyFSgja;%Atn{SlRZaR@4QZ2)>$s_&&`|h*0@n~Ali!XW1JX&|2-NV4UM)`~`pTUFGDdmGy5~RV1$ARc+;&5~#>o z+ES&XY?_4NI!eSMm$8`xj9~R^>vjas20TB2VC7@Um3%#;Z?M_&0ws{$YR9h2fNExN zg^fX5%HHWz)4iXL-adQ#`rWJjqy1wl3~|^B7ZdtO(SA>!JlTJHhyreOlAHqT^a3*- zBn5o358Gja)hFT00ZMgkLg5ZPkY5k+;xFs_el}18AtH&*yA?3@SZkWJ8@sU0)wBnu zGnUjb5WUhBicBP&;^h*d#`xOEcLM`; z-=GQAyhG0_Z}H={Gi{#0Fz?Uk&V=8WoNap+!}&PM-{mER=%{_0$al3WwHvG&TCcc$ z2rNo06NVTOL7kyOzN?TjT7s=pQy~PNt%U5cJL~SxZXUC_~K36epkmgkh+M?FPF+J?T z-v8Qk3eBke#ihkr^#FtppCg9Ks zN&LNLlGG{16bYktCrZKb+@eYg@E$7luz}F4ND%6v3vvTip$P_rY&|Bk9!N*C3Cc0~ zWwp)rhH5jwicmGJwjQZgqhvU(ZS|FE#a@THW?QP+1nu*)NubHL(*%bWX!KAuI?KmN z;Q0gf93&EdMvwIru*yq00SXg90X@<|f;e1}v?^g3_D4cOoZo9>Lhy|D;fxED z#3F*vfGANNrAlM`2$uJy5uV>!CZZ!&K5`C0v=h0_DH;3e zoUw`zT~6=y?<&3TX(TC*;6wO27y-MU(gy2vBK}MnA`Xz;A zqBSuTv{-Hs#eYJT9M%f;Ck)UoGW4HN&*uIM%`h$mYs_#CXSkq@@23pm(9TZiS1%Bt z0)8?7zo&oCP5dzpj^KE=TRiQSVJRgfB!e@f7Rl@UrF)b&GpU4(dOn(Z)2zT@Qzi$aJ}FE z3st~*C1nFjU_&JRGX-ssmXlF@Mea2%wwgeBH>%pvZh9f{w>ExWLQ7gVxZC7^k;=MI z;C!9Rx=3Bu=6(57{jDi-I=9Fw6|lQ6jrg8Ii{nb^Q3DCE8{pkzP`=GhM=Y7J*-!7Q&1d*Qc~B z)S_>mMKik(REyp_5yB~-52z$IpnrCSV}7#b4EW`vqN{#QM}N_P-c1$F%TDjpFD3@s zQR}qHjQcH$UiUyNLaY^{=H0_K^tg5fCkpqjpvB%Jh#bT+S!g&Py~se#D$znZ<{2wS z;c0#|bWi1{Px0O-oqgGNg7aktxK71i-H?c(E5z0X%;83WJK2t z55-2Wq7m4C`zd6-x&*vJoDptQG4Mmpfqud!%GsQD3Edr`69NjZC^uqvp{b*D)(8sf z6oeXg^jX7zI`@q7ejI^7Y0>Rzah3@F{iw!l3El(0_^p)y@hrn^^>g4R< z3_TjOwea8>--^*$fu~O5KfdDk5MB9oC2uxpp9vp;vthrWd`DBNq)}yMcYiu*kBB~oLW%6 zCC`5#?{OBzaH$ghhJbUJVS0RwLLz2BKCwkb1j%-IDIqo8@1)A(1i~a7RV8NCGTnm7}U@B5^5x~In8jXvCL3#=HC>gJ|pc>a217_QQ!&+yuM6*-_PKC zcQrVJHVAdb_g~=q>Kc7_6^IeQI2p^7NBl#MXkb&rXxR7=!iR8p?|f*y-hMC;wsaGU8$F$HVau!G}4;+O_>NwW4TJjUNI8!27?nsdV~bQOoG5D(|`USy^x?9qY!vE>t#5xSY^5^S{aK* zs0^A(v_ge>Mu=MO5;&6t^X=p~Ki|>I+4F_vxI0OV&32bzCh!+c2ah|Yr?H9Hv{G~c zx=;h=k#NMMAT;S-A-km1W{RjYCcF&L04|*%rkLT&EIc=om$q63I7KjFwmAFo$w>s8 zjNCbLlhl6aQs+7QHyOoj^9GqIAK<9AF;yEJD+E!}OZ%`n$k30P^vc`10wyM^BLt`? zEL=u$)?Ww)(FpexY>I>cJmdc(i7`Ms^pBhDY}Udc?S%tJC=nofPLdRy)QS>$8Ab15 zM>@)3k7=o5t^IKV2xr>`{PTK@VXps-`uNw`7-L;$G5oX7mXVb`QMC)fc3XkjF8jcn z=D%3$IseIeNaP=^pG^E_o$+6+zi|e??M`XS<3rKM-1;@dQ9O-~v17Jc**|;d8U2N= z{z~Khbv(dt<5TP^I){H=^f0#f@972n^Em4Hx~9?EU5~@;ig%xh-wcM{8HXYsm~ccK zkSh+!I3ICfMiFe=9Hf;0WMIkH3^w|`B;nIQZS|u`sUg*f;W1A8bNuh)lqQEJrU@OS zNiqsgd9(c2<2ZstDS8`^Mwcle=`mz4$i$bYOuptn_roE+otPAE|DO-h`cC%Inu?fD z1^;&tn?!;0@#4Kn6(1W@g+>&U0OO>K_a3_VSVk8o*@SfQI37atzj0>4$3cDm8X=c> z6D5468c+voH%xkG5pTR7^XB=FC}Ue2{bs$;57tj#ykwohuL-E)LT3;cnK=PEgGk4- zV-Oc{#A)Fo<3AY)Ifua_gP4O657-{VLDA_TizI)bpF{`roA?9!J*R^&nGS#v{IoL} zF|fKP$2;{Yg8C{Y3%1=)Miy_NhhN}7|3-K|VwaC_FfZv%+JG7^!W^LO?qo@b_&y`x zMFtc*pUs_&|N9=kol^_RD0)wo(&4c~p7B%6 zJEE8q+E0cYz8?HRze&pAAKt<5chG;hlW4zjRzuof7~r(Qq_n{#L{0rh)WpCVb67Zd znf|wgGalzUsPQ1qb#Upc05~@O9PmFw*oi)l=nn*5ZaZuQPfe`~IliO*h-b#QPWA~W zf0AhN5@Fs7cc=u;+rP4L1L|S`^gc#7^7S1KiV$l*Mm-Kr)Qj~p3bG8oaq##r24Qw? z6lcIjx$#EA4YQCX@p}&cC_NARd=T(SRB;nlJ~3gD^7E2wL@CL<#6=$w_k9^nLRL{f z8oU!kg?|uTycV>?I^k3ljU*98lTuH)GW5=|$6Xl8(EDkXA>O+bd&7)qKofZd6fyrX zpdSp9MnZ2Xhsh@0)fj!PcUO1dpLN=E@XZOnS?jAeyv(Y6v)ZLME9%XbU52+)thL7a zs!vrK0Beze75@qa4EWcE@ohtl0blmSOM8rwUQAS4H~u;{n&2gW6c7|qqyxHAUP)om z(R~56VuZYlRpTXZVy%Gv6Qhy=$@*rYCl1h>m?!<8$Y^P$IEVg~ifx}5AZS!!;#(u2 zp6JS=wJsm+N#TQ0W9=vPfsa_ux97ugp^sG?v8y(P$r_PCmfAS_1_Dpi2Xo}17o`pk z5>zJnMwBViCJ{4(zenQ{h}X&F9CiXit;<-JUItj5$ki@F9~)tm+G9%~+ax zPxdU=s$^3@d1;$0bet6`x%Y%9pHu-(T?#M=dJ#?6uVg`eLz3A3ZIrK@hzYERI5|yu zFHz3>8S!7dtE`s}=nd=ef_}XLX^DP{e#3rI@AC7ZCuEYeB!=S>^C`jU){5gM5(Dcx zONGF|e}a&iauB5LG!+sL3X+CgCN?HF@$W!SNdv&zcxic@KSVJ`Ke$)=$oVvcAO2RK9!)(&ee%YkwMxY7KdE zeBJWoDEG;ef;c!Fvy&#{NjZl&XrYyvaBkL*cCuJ5>=W9npOTdg%tI%eJ2=MQ!lK?* zdiauz+3b!py-W2*bWB~o(~9y}7x8=bl7TZEX@7FCv{wwe(=ekyXGKr|G)WJ?-d1)L z{(Hbj(d+J<(i;b*-A0oHC%3#AxlyBv=Jda%neIFzAO}8(3vUMMjRC!zJa6kZ6)_x* zQ1enk9nEx$qdxyd+*aCn8*Xe-68A!}v-JTNy&bu~>3>JKziDqEudV*~8wh-%{mnoL zM@{y+e??`)cS?PZ3D#3%ucJeu(d2s_>pBTzvD+PI{I}ZffS*MikW>1|U^z{=P;lzl z^G2Ehc;q$!$ECL4{QXSKC4X>$MuN}$819S^M=xWX`Q|p0+h7cec7)-i9}Uv?ysM0U zvEI1hM0A*qQf`6^`LEfUPi`wKua7&;cK5rjY`RY^8?SCx(fLt57(F|q$$IKiG^fo-37Y91?+hYAO5%mVm7(hh89u$*2V`_Ne%etq zhQM4%6CFV`sh#dOT0qn@t?{2lkBIRxQsBQYIJ6oJQKJ7r2G$Je?Y{&QZ%35cKs}KS z6{&)ogkNS}zUd%F2CeKB;mr(yKhj4AGyRZIk4#vzi{jsM0QAWmf-yzfK&Y&49cJUn zV`$8C$aOWjIdFp%`Hde@zuefAwu%kXMk_!3xGq1e|K$5XZ?-n6sWtWCM=H81D#{OA zRFpn!{?yQZC`Pq;Y>c5RhQhyjhl<=3o27a{~eZ6xHs&$jzv=5sGRB9oSsaUVk$bKkCWs3lE1`+N(3n!s}D^`g=pnX6dfBLmYRLg^rw;&R?p>g)XaJ$ zt(6Fn<@MPFCZE~TO+=$od(dc7pTCzOd6Rr3SVC!g+v4`HmjuA0G1`qDIgnLCSm8(B z2>cjDIrrxSm8`oaPu;OEc(rk|6Aq6<-YtIv!{!i#;$Ld3J`KI-DR-V|=a@WhXu1EM zlO^m5XYQAe8JYEmLvrASD%}%q!h3Rs=y~!Uaq;gQ|Jln1?;8-%i(aV1G6qLAVu1us zoQK>rcg3+pfQ299j2}5f!{OL~j!{yYa{y^Ab2!P={BQKQgQhsZasuA__NR1yLek8j z-FVAtXtH*mkk|(#Gx0GmOjKsLUgN|XFkA(%8SVbcnH24`qBP&1ch$Gg% zu)gviQTCqELF(wXFO1)PQJ}Hex%nX)?|ZhgjXY`Ht&Ue@a*@u3%hF zCE3tVZhuZWnDpCCHsgs-T-%2K0Cx<~yi`mNkahLJ@JCuNy7;WvHIxI_ZOaYEb|JEw zT2uZNHR;qGl;QTYu_=al+wzsE_SiD(u1QA?3n!vjna5V4uIVx|8;>n*Xm4A$m19Vm zvzCStx3kuyURrIvO^%}VEd?W=5ZS!^U?WC;2=!637A4%a=aC0%D|Y9?fv$i8M-4Bo zH;oBi_4J{;L$2xIGHlo7MIMamgj4i$veB%M`zJrr^+v0@u;)eZ$ycc`XGMZ`RI=x@ zPNl+Jmv`YrL`9_nap-?}{71d?QwMtm+R`gU2FwMvTp&OG-QA(K_293i+UZTyMPzq! z6W7&V71C6XnJNOaK9PYmAeKX+n25%TSt{E35(PC$jKHsYdD=Atc~813Y=^hQnt4dd zQj1jN1i_dcMz)vTz>yI|y|p6%EE!olcsWm$Y^!hH!HuK@p-c08fS#-&kOpa&$Cgo_ z84*HEG8JqgUk>^yhH!!avk}Cm7>!^Wj?+_!)uM-%r2wc$gerl%LO@eSP8f(nmVm44 ziY~$^AM`%%* zyTEKlbcJvodLy}-Xrl3!MtyZQ&j#^NY~pAbWv7t`2$Ae{;y|#zzNy*Cg1)N1cyxUq zFFbBPeF2*^nLZ7$b*EI{~Y7U(|rV?%XMa zGR@=DM8iO#mA@9_Pv(qbq6P`Ci%7N66qENl@Y&fVILty`I%N0``}-8K#%5*Wk#V)5 zUEe~YNWYIA(S60kXpTZhK#;waU=Y8LDB?!zvW3AvFyNDarKr7v6Ul+CJ07~13p|d< z!6xK`639!tM(KB&p8GX>=2S&Xl7sI}%HcFa8%~eg?&>rEJe>@;RYdg#p!PpgqSjj(8?afZh~sp)+^`;x z?Zh_f2|ElPl(hOVxZB+hy56RzLGaaAhTty@zqCXy!@+w=@yh`r=|~7T?bhwZi{-`l zt>xC@1&9ITVW6`d0Ju#rN-$FkUMX)g{S{4;covWou%dsAyDl7k-Qb~qrf=p_u)1=#Ep{t!Ohv5MpP*W)W=OxDbEQA3y zqJQE~3iKa@T11g-bYu(WJ7X<_VO!qU5HV6h*qJJVi>5B zfp|x@-U#Ow{QyPW4wC57wjB}@Ny%Kc?1PfC>PaQ@_EKe98ru@0Lxj}SHK{4+==%6W zVl+yqt}>)(JA$3)%KvX%yKr%XMxBlOiRk*#d7?kAbyETY7s4g& zvxmwwJOx{wZj3$3nU)%6zD6*~GAqUBv&{A?`(yI*&MzAnix()?GF|Xnks3-tFH_ z?*8ZQ+1+36#&`3(;oUvU-Dq{ki(S z>iRyc`2Muw`+wB;HP`p6itlIY`?~AwB!eZ@Rwc>id@Kd#Jwu==#2=zW;P+ ze0DBZkyXrIZx!p-%tT$8{TXM&3nqhvamgg2fZx!Zwx=-ttQU@XEO@Tb+%pqm7T7V{!H+SY&Pm8rl8_Q^jKbmh zG9GG%iFSHy&9(agcan^KC3&Z(Oao}n<)*1PLl!7PV4e>~5Zl>bd6EnDxb1QR_slK*WP{`({T_orpZjj@9N?Utm3o9BO< z=YRWZ^S^!TIoq`T4b!%*t?FspR#&!HR<_rF@}+I#`o^PlI7}0vTZklVKLY{uWF|Js zV$ThGcJecN>R`KAt0rEtqTmepu+jctCZ%T&TLp{*gB0+CVWNUZ=3Zm(;p{Jjv{1f8 zY$8LPk&BHmRhoiLngLlid*BipH3MX&5g@`H(gnvLJVn!HL@BNXNHLm0KSqfIuH!Ui+$fm=U?;5ir`U}; zPq86AEs zhWR>x^isx*_ZxyXK3+G!M*D;Mrgcddt3XX?RII_oM*NEi)LRk*|2i(*(~ca ze-)d>F_g4R^KF(cDA^(jyOTnT7N7H&XI2&l6pe~s;Y`tT?NP?cVDIHKAwcqC)6>Dp zAPq-uLNMSnXOY)uQtXZ#Ii9*eWv!ymf^-^Ut^z{!aoA@!w-ryig~b&5zFB!3PPLi4=xO70M@{P zCNg`EY#2>YdHwvZY9-Ki0#>JVOnFp6Sj`KweO>I;fY?HWIImU?HGBaTj^f&_R&YyP zM0yyUvF7sgh>76?$he&grn4=**Or2gAp~l8XWhJ%I?H3GD#>F#i@7V%%T}SQJ)0zX zQe_Jrm^>Er9P{cVUzsOCQMHQU65bEm%xMJc^l{N9r{Kflg4>)R^r7%wNVLUl-lOiy z<~$2qjQhrvOCPFsEAHEln4;19Bv^sqw!3f^_xn+@&?-(bJVGak`%4dlRuK1h7w|xs zb=wJA3*Sns$IJ1q7<>tA}$&6^pcKQ#Z90+)A7_wmjq z(>=imt1~~_df{C3POaa!=)rv8Uh*2G@ZKwfEAHpo{zNM!qWDXT9(^L#C80%KYUT?p zC&$WT@M1h4ffb$=A<{B!VQ5HkqLbsgz)O{&26%#h7d7il5WLQ4fom_d18rkoR%a-m z6)>hjwTl~&Z>w_Hc(l3>?&;{QWGYE7_sk!^Nlq!|J%*Zc5t$5+!Q&bYO}-*ZG0zPT z2#62I!aPc)+&IN{O2h*nA_b3Vgv*IhQ6UisAWbw_?7@eG(+VUUoy1Asrz*V8;s|3F zKp|sE6HAbuuH>hudy6>nvf9~l;l(hO)>IxexNnm%lUMmo7Tw@MccRoLac$q3{;&8_GNt%Fw4bT_8sJT^4sd*xw6qw`E~z*%&eGy6nS(Q^1HA=$Y z|8dQWLEMT6ntE;NrgLx}LUGeH0^>dwT}0xj?1FD)!?4d3g@n$en^+#G1!;80KOHrc z=^VV9;9si9{uuMaxf-7Oy9g`z=+ci>@ncQ=Sa;p~a$G6m_q_W35}*l+ z0@|$6`kmV<8`8ZA$W$%1ShAR{4v2;#d=SxhAs-(PKob!idXPKw7cc3t#?W!eM|_1o*-|OHpVKhFwk8QLPriP@~Co$#^_ z$xC|37(6&niO^8Ov#J=os>-0p4Jr1yS&7T`uHmrlJRzOfUE4f^Lm<4O?kQxaVnct{ zFV5t6ln%oYMAjOB-H8h3%b}6JF^N&g`yTLL zAIC82`>fOk$)JszYH8C1jDkRu)@5t5h19Rt8G}!2Vv*$a(1?>m_=%(xu?{u7VvgPV zo>YHt@rKK^=qe+6Ql-NSP;UukJMn7STIc+twiTeyx(4Zu--V_3vMblsO<8Do^^EcP z55W{#ed1N;;UQiAt%OGQxGVH`Lt}TMpH=hS{ru!vXOcCSxoghv?0ip8_5B}k`k&(R z&;L_(|7Ue$V{6O0|FgEfu@TH{jPu9;%s0gDC$2L|+ud zj-n5&P)=8g)Ml)tVDtUc7N_c~N zLd$gOy?FHW*>6wwg~kk5dkT^E>AsJ!Uyyd|u{79;4JN$XqnUndILB92LldQ=v^t?| zQ{Jblpj`yGJWfD9^D%A-Xpq6mE`L?td>Ot@z4#KA;94k~ z_{=>{JeQOdU?x^f>!)diN0fLRcM%aDBz%6SdB5+Z$6=gT)m_Bv`^i_`Kv4!=ebPJj z!1j8hF`gx%>e7cxs7&fUV?3~fx|!zx31{Ci!%e^#D2nCc;9In%SjmZGB`u~QMQ7nf z%(N~%Rp6ONU^-eC6i7(&lTNTFy+)EW$ipOpGpXz@Q>WOpv7dQhcnrhP79O z2g4`?%XtCIu1)EUbAlYJacvToRCZ^_c}1moWe2|aIZoBJoj9S46nN-*40jY@%E!8# z!mCU+WPRo7+i%^=JJtz|W}Nq2*zus^3-a8m@3GayQ)|{9T7EWpjUHO%K0+8jSNNuw z+Y#LnY%M{wvljc*^0}Ar0ls{)_loICVVp-#;QYVcdK4xYqzt0`(o&~Iz=c=FN5kM> zPhRueh)4>qu+>Gc6oYh~$C<8U8Zk_tND{Hh0Ob&mwTI)uC}u=4x(8t01-+u>3WzIP zWz0iUWL*G!W@j{W*pYOnDRh?ITH(L zxA1SCg4I3NO84U|0)>KY%HinDU+4GelKRvyAv@FU75GwNe2V}s!}tj|abVC9*LgA) zgbQx1RuJ62EptCm{kz>I{C2OvRH$ADzd1d=wVvDR59|p1nboW9;Fu9)f+VB!i-Q(g zZw@Ud2N>#+m?N%zn$$Y`1obM)K;{4mv@Xk9c6+_oL3MgnyPXb zyRIPch}lJowYTA#`yCBt#IFY-8J>k88Aq!9Wg2^c8Tu~S{^2IZ!iY?&v&5RBCDWWw zr+b>&h1X5Z(RLMnPh-YMnqygsCBjQ7uq<96Z3b=K;lN zJ5dI>&QXLw-t0p2#D>jFZJiD$b4YjfXW3q!9ZCsFD&ZW8eyFMoTn_xR|^t5-)) zU%YyLwEyhCPbl!Pb0z%!cc9gH_WQGn3O?F)lA;`g!$!NkUA^S%?Tt1kZwqunu7H1v zSu9y>PL}SRxKhq;92L!qv5PZfat?r_DrXF#S*;|c@WMa>7)j8EV`2#HujPhd;yqgt zeS{^ScH!NpM3VIctjt5}|en}alVHK2YQmRJahvBGq z7UeXE#zZY~YZEm#_ZcZ#L~&F4zh{ z!4I^=l13HCK+PJmGs?iVm?=E9on0a1cY-b&Hr#I9i*RtFJYt>OQD3ht~^Ie?e@f3L5utZv%=-ItAm< zd|tuAAH?SuEC8_07iBT@uOSyhB929inGW`Z*$v0ZSf|SFQGlnRW33k)(S?44)rM=I ztS5NQ9aHs2WsvDHzs%TS8;u~-(?#p9*Sbd)&nPGd5p&-lz6NSztto6;E<*!r%3ATK zy3gG^3zJiYGK#s0W{5?E69~}Mgu#)T@q5ZSJp{Ffjp+w_G}2#4ABu1gGmh|e5y)egnZ0|vVPXh$Pjr%a3~vON9nf&Tb~NB~elNBl*pJ;pfykXPz7(BW zjr;-oz8Enu>NJT0S$bKtTI(6-nqeM1qXwfWOJF5Z3UuCR-f_UHY?h1KgqyHl)*#nL z087(XHH|lImoJEpV;x^tIuRU0?dt{tb>eS1J@P(+z3x2T@imf~SRfSd9mwQAIEI$f zbSD7Db4GQ9Az%9wjBrP;Tr2E98o|CKGJLHXj9(S6XjY-r+pd9it%B=hz1gLVsw5ew z1&&tE8hLsQ2P3@cbQl76BKk%m@pU~3F-kCXqvk-V5#Qfg`VqjT{+1p}9LQkTeA&Z#sG(UFF3N&_K*S*&P{S-8D|(4C$gd z42y;jpwUA!Ad)Xgo)vhnBIsVBi=yML8A^}w`-|nk=MMYn2ji7LaEAhPKjsPhg*WmbO9$Bt z>a<{%5r+FOM@-%sU2`d9r_pt?>G{(nX=&tvlX>1U6>Aan9qiurOrJR!>P`j~!bL`& zL@ufzr+JJm*xC-1#Qr>jR*%0bcC=aBr| zmJ4Y$EEWE`GZX$CDxXJbux*RvS?|^r@lr@3Q;J7o6xW8!eWEp3OEO55OwqsUPLXa% zTyKKtlKYvrP1sBfTk45`%R{9#uzwOKsRqKnrm zMYDK6om|4rJ|&_(jnQP7v<#stBp;K2!G#F<2fs{JWX|T4m+is&kQY^QQnR2Wa)0tt zIafZ?9;FqjgvY5*No=D8M58_i&N33R?*JLKcDHWm6* zp?o}1+kS%#s|>F>WH(T}EFZJ=73L~bFMK-VBrz;dg46!b72zj(M~t3C$Mo67=qA6` zuX^V!4t*^2p$Z>la8OQ1G(IoK)3Hgzxhc+P%GuWC5-w54VDToX$UKdTbb+mTtN@jk z4ysogQP`2nTfZVkP5YRl4FL96rJvNZRW(;R>bmtx$japKiq<-wb zP-LRnPL7Dq1s&Mqn`)=@52cAc3}=njdQDZR{yfhX;YFm2$D@L)iEx~x+`e584#Wyy z#qJUMdatdhX+64a^%|cm5ruCiZGXc>NHm(ES7+9DMjKM}ntrC+l#jlzsw@h=TUa5B~H9(O1uVi%5iBKGROw`Svm%bBBYjm z@o%tKWLE*COvP9wUfrUxGFs|_q=xX#y7)la@)Qrq&fyA^GU|$(xJH^xr2SEvzGu5w z#@!m3z#k4E{P|VE%%=MddE+bD0<*Q*KEltrvB!$lZzU_HE8Ijl$5!t3-dQ~0p(7$5 z%`b^4qcH)%H)GzE>;W&K^YF{K=#L}Z!CBSN$hV9EaG*&L+_|ZYH^z8`jLf6msKBuK zao$VE8PkCvN3*L0N*V(Z#fNu&G`fs?(Gl1Tg~*PhU_!!ja1v*1RpDAeW$GwNj{?-e zqEVFDNb{smg-8WiDD*x%?oMIO;PYQPQ5p5UlW!(wsLF{T)b66acS=8zy4G=5SQ2eC z$`WmjNBiI&k;{gCEn{+ZR52>HwZ4Qa%}i5GMo--Xbd^~=mv4MhsTh7m_3K7T{qB8n zX}n=+$c!;h0Q>zs)$xDM*j^cB(*yv5_&+NvzW6`E`s&&myjfe@?5?e^b}|0X)><&b zQO+OVGmrmM4p%Y$&)wCPm9>&!KQ{x{JpRu-{?B#N7sdbC4)zAohv+K!In6$%7s35w z_U}=8a`Mk!-WlfOPCoVq|G5UZWXvA5CsEc`h}pAtkNvN^8g#qc-OX*brFdfY1h#uF zlbV=Tgig6CV$WW1o=4+;dRHhcV{o6x;643591IZ%6y6lPBOrK>9*L(KaX&cDihOZ& zs5f6A9U6fdN5_u;p{c0O=pRbMGS0v3pdY^wAkuVRC_iE_Y9zqR!`r&YV@@5;iI28r z)8)Y$5Cr!LnLA7a;m?ZFpfy$!qk#ZvRagyf{M>U!N00^dsZ$I3^$VYeCdU@#DhMI; zi-?W+Jv=q!|G3|el53RzH#XPS;my{1cWrB(ePHtc7E=ReILi6sd*w7JB7Mr0lvBI2Q$NZ@b>Q)j8FCQK`%M z4eJ&`>bNp%N76DcWfUkg@ZO01{3+i3({>#x-oIT1m=pC36<}=frWD}1`d`kdu{WAb z3#`!pn678*e;eKIMlkcS&Y$8l*Z<1ln(Kda{co=Sef#>K+TSP*L?b1zaH1p|YiU{_ zE?L_0N8x+!BbcM!AuhIpD^M6vbs_(egK5k}%P8zaJB(P#dyc69vM?$HG54!uZ41Rq zxbmakIT-K=w$Kdsg5(W|WzTj19%TkJ2KLt@5Ng8&RvHcfef*-6@gRs#pc$ahvk;e( z4hr%VTybgA8U>f&R&^2QFz~JY%od>3aBFJ0tDT9}TQOgr!#Vuw*K!2_v(a|<36@HAR;i&Fg}j|F z$(TxfIBnpQaOzo}j`ndl3i)K=5h?pAaxn&^(3VHzuc_;L)K?djH>JrEo@&RK=g8PC zD57=rT;5;E$J>o?xsLGawCI<`UMrvBMTY&W0cAh6==bV=s+BUp&OTah>ud zc|qG3mKGUczfc4WnY9KXk=Yq}KO*reIiLo+56~3j2-X9ka#(9CM8}WPF?z}N;9uF8 zoX~)ky{`(w-*@i#u1Z0Ncu~P@Ta{durv!2GzUBx7L{9Q~ z#9s78L6jO<2T4a7tb{-rlPw~aawHFW)8P>0^1dku)@Z0wdE{0Om$kpT#$T(4osQeU zQ=9a@Y!3)QUOod6UAp@#P1A+v7Be-`GT#6<%%TB?JsPFhE7K)%u{l71@Hidk9F%PfgeM=w z8yKNZp5pZ){n=&I0*dR)ROY_ZzIE{%t`JxljuNX_;^{bvGN#M*({v~cX#f~>Z?&Ses0mj8qqVSo9;$uWo5BIG@=mEO?S&I6peaC!2ZLa0!alp#yF2Y z56a}PHHAE7BKIW{u9GsDvp+k^iOr3F9}kbg{p7^v!7@auGmn;nEY^ac*2+hHEFu|z zMXs1+8F2 zq-RMCmiCytW)c-qi{mU3`H_T7k!k`u9=Mo0gCwy>LVA}{6xm`z)+#D}eG;>W;c46} zWX)Ts)KNm$eBhUbCF5p*=uKbUMef1A{<`0G`tO=bND1@MRh1>Dq$m>z>il738*2oU2p%&nD?%-+ zV=yP}TyIRyG1z<=Uw{bD{O5}reb1UH7+M@cQo$BTRiUCYz)=$yzh?`Fe}32$#Od(%;gsKT&?ny?t-io#-MQ zv==yVq;kBq*YjUc`P1QF9E49xI}1yJlh}w+?FL4xmF?{;_;X2fBNg!-zqb-iO3kSC zRy9L*_J-dzDuBP;o(`E6AYE4A7aK9_v`8;aY8o}9qTVhA4_R^8rndtIvTE4bE+>W# zqlSaGtyYIR>a^b0$}eaBG8d6XgB3fm9vi)|cDNrLEE_v$t0-5#=gBLfd&0!P6t7iz zQg^|_NgF~}UHgUFI+yV`S%9NauVWrx%xnuat~h#jPnW)Bry|$lWjbz6>a7)-Xn|M0 zk@snRY|FkJMxESo0LQdxTG2{$tdZIRs3s=a8~w$0CmwfZbS zLTA#lv?qMhyAw`2g3FnD5s2l2l)D%oF2ew-<`&znl14<&?zw#x^~PBqUqm3Jj^jZ; zx2Kvoq_jurk_*|ttaDjG3UJs20&9sLqTAgWwobEiVa6v3H6_BvZP4Qi&RMaks` z3x;>nM@q*5jb7+ih$nd}8N-g0#o%~U-8_Ti4c~oU%W&xOFmRk+tozZ)L+m= zJqvXrc_~TYvzuGOwABje(Y%?pl4e#}G2YCwvz-xyXCJwa%Pdo~x-A7#Uf^sjrKZ+0 z*(v$zpzep_NIDp#m(XN_sf2=n&)-q^Xw5`D-9ms=pK2m`Cgq1}xoyjzoz@YP_e9x( z?g$KDPBcmWbPJ(OJJbn{QfDt-Aai5?d0(1F!$uFAbRec%I0A_5h)#W}#jl(Um{scl z8f0}u0D#k3VEFm#ZL-i|A3FM$zo;$6DZT>e*Ec>%n*mrz#L*<2@UwF3n zS|VGC3|yY2*K=7%&;0@!U@5niZ`@$xY&vR4pEgh zjiQf3rIt!9Wrft_U#AXBTT&}c9^w47fJ?RV%kW(2EtCxpwOdQ<13h;+VDAMq9r{y^ z5?*LEbx95?FYUC732z$lIh8Xcc$e!muF`vn2a_A4a1!;&U-jt!{_*V5zn{K%_5A3U zXHQ94y2gC=HeNo8fO}c#0uysn6`#7Am^OO zr?c=^jWY0Ga4tz0sl8ozyRg%sPH!||#cNhTiiTR8sDY++xt=JwW@GTM-XSMNHtc}A z#R13Koz_9?PJE|z*gC8`6nJogS&Pj;r~$@7LqI+?1e&37R}xBd=#$_M%=^*Xg*$8@ z9ZL4o1YFL#n{baq&6I)rFTuS4BS8v6+=L`N!^kK0hs(ERwe;* zooiELcjO9AQ`vkJOj?An-O(jKIc&?e4#0X5FN-9&l%1!^c;JDRD9j=6?%aW6KlbM} zt;pJoN6_A#uCYrr!(R2qdZ+8$TI-I!&WJua?@AL>s3A!#quW-E)Twa-_CU{#8W9fe z9zQe{cWXptd4<_yD;4#Rc>T7kE;=T2T)t+C8Qh6zxBlXC=cks#25#r8)rxS9WZ^#7 z^YO+y9nHo152{;h*YkM~~h9e_^RF(j>E;oiN&LsshkJ*x76m9XbS z8-vhrTn2Z3Io+e8&C_^aYZ~vuHGAPdUy*XVNy6YlE_gdfT1B$>+ag=MLqBejN`;mH zo`e#r+L{7`M7wtc&1vU!GU}x|{R*=y!+5Eh8HS_Y8Nc5~2L#1peByj@RVs!nMq8oD z^G?K~Z{Db59_>c-8HHaz$l?|E&zyPPYTW;4j9{AR|26V|ZEe{3zt-pRA8+QF-~TU% zYo7mWe*gdbz5oBk=Ktb*(r3&5m4&1^i1c3~(BLz;T;Jzq;mQ$TOK@kFqAE)L18&|j zorkLrcaIsdPvau2(_hNS0MiT*qWv=yB`L1@AiUNXKfR4;@zZ-jAdu<;UyKX$I-1 zJ$OCFuR#t`J0?UfZ$dP6)A;4%<6tyIF;yZg^9Fo~rhZBgy*G$Y6Ca*K_=xOuLM&qg zL7jH43C}b}ec09R$UDW=GaRXe2>r%P^kla`u- z38g`3(rb-G+AM-68gx8rs;)zU^_71tS547O%OS*W0X6K?QD2MU`7um)8vPiKttD2^0>G2o)mWd`gLE7fLeWtDhbn+pth(gTgL&g+ zSUvS(RnK7cn3mW)3?xCt67F= z3IdVkwyMGFqPQACmV7iv*$^4gQRVW8Nq(C1;aVrU+UUM60u(^jr$EAv6Dg-P!bsK1 zC#o|!GpXn`FUhH*5)`mT#q?W1gfsumhC+f;m1$Fpcyz>PWFJQ&A=CDDs0JxET~{A! zUPAKSV9|v{9v$<_5_f{jvnYu!$e_vwea|!rQ)le#7UoT9@GMamE}p=@x2|h1CRq^ItJ?Ddxk4$L!FMe7qhdUPwrlC zmG>%-T0J2G&6d?KPQPZT|9ZEkbS@HoI8QTUD^#wxe?~leJ>F3h)S9J3C%Iyvy6Akw zse1`6NMJD|Lbex@-tp~4s`G}2iCjcgP}~+QN(Xh8gP`YKLA!tdE$P{KC+OLD32>`d zo{a>ix7md_ebCM^7w^Iq_UiIOB*C@k$4K>_>hmAA*Sx>Z`+wc;R(A`}f7aGl*SFT` z{@>bWFtahvAOABy|0#!Se*QB*|Cyive2eEl6I=@{xbni@NS?g>Ea0m?#qk{6;2;}Z z04&K|`x`XXkMr{ZBw=H1O1;yYbFfma^=2aE7yA|#YUK`u*9H5*R9?r$bbmN}%=1^? zz*!cZXrym70AI`N^Q)7d`cC|RAMVQ4_6-N^*FF}5iP_aIgw{MR^Mxe2kxYJ?`<`A> zTwI0m7vr5XG4U5R);5mVb?uc_9wNbiiYF)Gn>}Z$Cb#*~Q*BgT%W0IK{;KnZkT(D$ zaV92)%^aTjIn*233?xrw0%ZSM4xeg~VcB^Uwd$s@$^(@z=A@|+Mk7(6I2*Fg z63zxZH`jOhYGL8#$wlM;&A1j+0j`BreMgtj`o!_UF-MNIEU)>Lt{P>YgS$nrv1m4T zd9J2ysu+NS$+1}Wez?%7eahBZc(7nM)Y&z*X~*Y<`}ab-N6I+DV-d;lLP1{ zjrG_7ZO&kdNZD3R5kSJzJZQ)Ke6AOQAw%AMpt$K6N-ku&bN+tmbM92ec+DyIGE<{k zgLoK%)+e%gSKEKZ)-<^d80^36>;Cu;D_a{uccr_wzO}KrvAV^kXMJs>8%);O{Au*e z?Z4%4&F#N)`|sTT`z_jkh5x_4zu^^tO<2zB_f}T#t^OFSu5Nc%w!53PuK?7G0U`Ch zFV1+}ovra$DYjo^9Ec_t0&1Cf^#*;G-noUi^K-4ghSqO;S1S8r z!O+rfk#i~5co?+)A)nTE(7K%*=jS`EB}ZxpWfpoV4|*PlqpQu=^&S zYWq(X_TzNw_z!;jPj_Q$ebci4tZlB%?LRm2%3#u7h2d&LpKRb<9)jwIo!KTCzz}zi*r^U5K>h1!ltdX@d(Zl|a$4VV_UJ6? zy^s1nGtVVY5lBpkZn=@k0IQX(Ns(u8kr!3z21y9QTi>!FAYit;U$dP@3|7G8x&eMm zesmK;77f#jNOO@wsQU2=R^WOmt2>C2w$3z)Yz)s)_;zg4X}!1yvH`c_ zlbhsar}ya>+g^7Uv=|5GY{roFx)Zb(9_V2ZkOxA5gnQUVG2DShB<^zyfj?*z+xYAb zSU0w)N{p%6wCk(Sb4|H*e>8f~{;+ia9{aadw435|SJ_Uzgkp3O@J>pZpWpJTO&M&k zjC#uaM7b8BiNdAA8^0A&F8*;QT3>{oEW{OzjB;kVg`|=j1Ts_=jN4D|9^@6-BKA~D z)Q!enLDU>9bI?|770;MY%f~zqhcf$cD6@%uk~1FKI}6(GEXZ)66&RsQwhIi3O|gjZ zA;M5FK`zT;Hb2Md=u9RT1g)RKDnL?e$Ry}$tFMQ?%F)UtnoEE>WDAAL(+4Agr)EHs z+8yeFBplr}?6P*ZWwB7i^QrK*_y%_~-l5}s(2E+WiHQvmG&Kht&TY%z3dJ08G*ftU zoJHaL9S1eD*3byP3EA>_l%9VXuZTU9-^DF|g z(Tz1$TpV{a9Pe2@S@cQ|>T8_;LL8y%%>TI2-73caUzx{$xshjn{#y>${QP%*{yRVa z{ie@<#r{?+|Klv2|FOsK;rKVA{bUlye|TN6Uwk3X|5_Aje}mQMqu-wMf5kCtglCnG zW7a0esMnkk(sNQ;IQGQgn$1%bd_Q^K{7MO+Ztgw&g*?^zU(V>UH<`rmcZ*Y~6Usr?NVz}05gzikI# zEd!kH0!*q49J^mJO#@_lCe!t@h)pMmScPH_&vAGjzachR;aSuh zXK?x(?7e&@C9%SSnV4SsDf<$+DaHWNoM7I-YG=)%#jAQH4r#QU{T|ma^uCkjasGUq zekkD^az!rk%E2BiFj#nOn;M3!?Lj<@!Lvmy$rIkPOwV$it5L@Q2hru280SYhkI2Uh zLE0d7Sp1x!CuYK-@4OiJb$&jGN9~1!;PBxx{AWQJ$%-_rbxV7ZDCk)cYE!`C{Li+d z`4UfXs}Wc2B8_SID_do!rGzGy8L(oa4xPdZbTB;vs*=;K$$tO(JDOR0QqwG|%H>rrMwh;W!I>?|~e{^K;g@ zxU_N;$TA0D;>`3O*AO=3oVn%mBv-YlVesugI4s;ss8_klM_e1iq+zNjOqlu=Y{WIP zrxv&C>q?aR7Ml z{A~ue;=OzYv8`~2s*G+0A4C}e0&c6t$Bc@?$TSs(xBsab!NmT2Q9&K?r!p9vx}T+ zAu=k}x5Ii`LE(O>YN1Lo5aX(#{E|6$P=EEbPdrJ2O2BXdD3`=ST`$vdd5{9#T*kRa zTQ^5!&Z7th20blRh%4^(BXR1%XV~w*K*NXwn|u9!4yP8;W$@zV>t`>12S!~mUOJYK zI}6ccEpCG}?NP(!ZD_7GDp^KpWw(FLtUYQzgE3G|7h+ae1gb52rgyxagxgxh8oq>L z&$FrHu2qO0;A90xBhus-X1UI9+y+7cEH~|`G6yXo@U#w{_d^&(15v1A+SFdgZ0N@k zo^8k0jbsCI4y)o~ZPlL7rfGtG1ZZxXa#huR7Pl$Id#wfU`NxT2>sbya>hj<)5Vs|& zZoim+iDuL`vPaM;6fJw{r!@QoH`F3zyaAv9yg)<0b*fKP--1r)MPWuv=~XV6vP}gH z!~}hj3Bt7++EB!K4<>&uTlfx!L_&LjmmKMYXV0z;B5aM53aO4MPr=WknZ10n_v+|L zma$&prVstda4(dlRkTc1+RfM03;=?pq0`ICZYfJA`^TrML$BN0S;+QY?7Q9CI=OItlY&@qKh9 z7LMIEquxKmEMYUejhi%_G|+rz5&0dgcGg_bXuAk&b{RXFaVTGKZAcD93Yt2dBwlaPT2e~S|5yu3EG_K`f7e2^TrE?JOFQUPfV|8j5l6mv+*yE^iHUAMwl-k-B_ow-AwM+XP zVj-I8SJ+GBDC(iKgE4r%7>yG$$^|XKmx6DQHAx!2&F6PnPM6`nZ2w)(z=$f^yve2D z@4o}&Yi-#{tAET%$ZL*l%;UsZY&IvUb$V8(8|K`6Zt)}<_0FEBeK^}~OVWokGJ(jY z;32^D^vUZ-zdV2O_{q`U{{D+c!M6GG@sp=}fBg1Z^>KLy{%P7t7@KDhacFFJA7IC? z(#y62fsMo-3o6hWjJpm{Tmn{+!LsfT#P|*wUEtqhjE9zp=e@P;Zg)jA*ex_P88a8O zQ6((>-*J?=ge7RRo6jq5T=3R$a+qG4aNi`U%E2AuI3EEgdHgdR z;U^If(~wER?&nDbW6b|I5J=kpzrO|lgVEUzICGZWkY!IADW)lJCR)6W)Uk|nIW=?E zPVb>r2kX_H{~rG=9R2h%i~ZwAK(D*O?Z-cFZ*$UYb1)rI3!q~t8Rx{uc>_*8PFPc^ zhwvt3^0MnJL@EKzRo3x;pys3KcUwD3tBxr6xky zO32rdS0z_6SNT~$?(f)ZJ@C&S_s56%(_mxsMpI_Apsd>F5f2);>9=dTOpj*sbPJf6 zJOOLdVq4;E9nkU6;Q>E*I&6G4Ryfo$8ZlQXCFEaAu9Lf3t775p=sxwepoI{& z=Gg=W9T0sXZB=KY5+0=;LRa_i(YwkuCOD3SS0e*{GrS_&?e`a*ScZKw?uNlrM%6Z5 z78Z_()>(cq#H+GuF@s=*t^qwt#|dc8J^0sNiAy^HD|=rRgun0H@vRdP15bcLy|I z|0p;MFQVW$iW1(K*aADyY&ghM(MlNPy>Jj_B7Ti@*X6dq1>wlHKrMalNTSk@$Gtx4 zWbzc|SKV2mqBW2APw6EuL!Yy_dZDAoTxzJ6riCS5=}JuA}6X#*)==fd_|rOj$4NHCuEw_k;Sc&X!8!Lh+m4^T1Fy`qYU3 zGzv#?Z`$}z{`kM$)$YbR#{XSgTVGjQU4{6+TkO>gM>&6d&piH9Ib8GjPxJUs^Y~BS zbo?i|zhV5RO%(umlWj!XE1TP^{_szB0AMZrQ%MM5>Jm@R-I0I)OyBk5h)LuB>PLex zxE~Eh(ODP`|9PJFK90gpnn1|n!Gj4RF;UmEjKuV~QBu|h=~o*?EwZ7SE?6)IvI+E) zSA0`mSG({O7EIi9`UQT zY(4kGtS{?gJ~ohaB69VDoYY#>iO$WVjaw{A@MhxHgSbK@1o)+6ua?UJ-+vK{RT){Y z$JM|x>qsX6D{rY|-F)VwylXwQGqEC2H>uHmo{Vw!$ryDPH1`aD&isu1H2D3+YdoA& z2^jgYi6-*%i7TdM{4z5uR;4&}Co@C{ZdF52m2|=1%NLu84_lt_C{CvI#3g$}!KXdzkIb8Gne{=i)-2VSf+yCYMc4G+usmm`h1K_OlKF~lXO95EW zm?yI6PnhJdSt`G;Cxrk`$TyONj|Nkgg%93)l(Fw36Q4HTGUXHfiiMIZO>;8G`$@_K z1C$D4xC)@@jzK%_L>*R=H^ha8j46C$@c88GpUw1$4eK&w%a`Hey@&)ob0yX7t5)It zS;(VUIP0q=Da(;FOkT*kiN6!0VTvZ(2$ zc3nE?wIr*PN-5q~tx!qf@u+DPDK&DQ@IvPy^tqf~&2$;X+Q!_k&1UYW&XuwIpgL2A zAC1q$4}&N<9i91bITQsZL8z+C819F7I35ONja?Id)fg2(4KXe20lHNq9-PY#3y3e* zl+mH}88=D)eTkO^P+WK7ozmaFI z|Chrx*Z=4G|6Kq7*7bj}zo8AF+lBSKes5*<-s+FR>gslPWxG4;D`27QmyUtIaeDv` zwEWVUc@SK3-|VU5P}Y0htWu}-UP2T8v5jt_!Sfl;t(8RqmD+Z`#EHyQLcZ#wYe7cW zWIyc6jY&{c39cNqM-Q-#{Vk4%zgMgi%^ecnhRc|njEQg3+oqZF8XkuMIt&p ze7R;E;|LLihB$^Qgk!Ai!7(&nLa&d~ffv7M9|0`%SfMGVVpD=^-kEhrO{0;xhmhLSq2d&%x zXQjKc(^?K704C=63kSWkFw4!LxJzC%NaOVv6{I+5$NU~ITrOQ!-lS}7$tff;Oqo8$ zboBR2Hzq^YiD&Ga1tloBAi5aO|wo}3hd#)|;FuKVe&`;1~9AWb7oorU}N z;EfT*+8u|Hx0(!Ak24|Rbr#Hu1p((wguIrZyp*ck<8TxA91ZS6m_xZ zQOZPbNan@~Tn>PVp}dGXI?*IVU8K}cNQ?uL9yPubShtDX=N(*z)s0i*1u>R;%yYff?OVJJXk^GEv(p4rHcOFo#VK3H%J zrG|mM)?g_9zsP|j&VegNQ^%NX4u`rin^b&Go~HFIE-P5IX7m$vu7R-?O{8+w@@DFnO#dr_w)lOs$&nw5E=w^~v39c?_*u@w4h> zgSSarShK>Qm4_#6;y5k0a?S5T?&z=8mEoN3NQ-OHFch^SSZ(C}tkeQson0U$;smt~ z-WpvW9^n1q;>BSn%};)B7)g}hBiFKym~4QOQa4Jt(d^1G&OwRU*UZ);vTJ;rg{7$4 z{_~2-n^6{J)A|3F>_4k(-C)|G&7T_2mt_C>I{bg<_Mf@^ z=X}<1JK$%_}`B~cWZlPb$ewi;0~|C z2*eFLdrX;Uj4cbv=NK}nczZFP~+hON1jV+dOqP}TD^kC>o(yhn7nyW!T;fx`8G22QQ zPC&V#(BI2UkAduR;L{7x;FsjeaA?XsT9S$|yk~O50OUG$C;PC%> z7Li3YQSLbqBMWWs#hS|J31En_jB&>y!#7AA!rUsv5qm(hpBtXGgG~Wtd%fsy-}o0}N_Z)I-( zyOC#Z|0{=UZvUIx|Gr=QU%vfi-q{y>659S&$@bUn-ec>syScscH6*;x~| z8BOHKg6Yi0H0yBVflc;BIEdjOn~97JF?~Zk!nMdRtY5*B81oA|LlBiu2kCJ*!1i)B z-R~n5&W_p2LK=G&okkycL#(@g#6+`UoG^Mii+g97P)nAjR~giRZdh@l%z*KdgUDva z6yDIm%jeuxFbtw^7x;1PSR&;cjsdWGIu3zdrp5{xPT)-FDMU`?v}ip4c|0C~TR%>7}#* zpbN}d#Aq}g<#hurPY#v$Yv%v#GqOZno!;rHj3oxX*qp8U_4 zRLmCg)ns}=`TdWzwau+9EB@C;cWX14`B>*q@tMp2<#5gA|GE7CUCaNojQ=%_Gr?C8 zOU&LY$v0tDk0;jM*k0eV6ci93L3V_SY~hkTOLo*82~nim9@>IFtLJkS&_EHPwUnH? zhaw+%{W3}hLv0qFL|K&dqMR!|ebQK@xG1iPm|>sf^%ZXzEz)~-xfBNh(R?y<7=SH$ z5P`=hTaabrp_-zBKk_ltlCGA?_cUd?lU`UDq#3J9qNopMcI0hba?RK(hkQ0 zC%s`DB4sNs>C=5|Py?|V>3{HwNwh*{=hMNv>IAmb?iIp$a#ZoBlF5~!{gs#*=o9)Y zL5#wnTL`}`zZd-Ac@o)0*0Fhs`&OJYv7ikf3O=y#5`_2YvJ5ICx`8d-s}8NB4LOn` zy@+)ZV$T}>HO)tqe#T}cgM)rPiHw_$nN%~RMaI}TW3d@`z5s3uGy-Ka-U}lK(G+S& zoq&xGzM_LNkIw;0%ra6QaPEH0h-bt|k%%S=TBx$Oj1V-U`>@{!T(y@JS)PR0G250C z2?nfDq1$z=AwK2POT2;zG)G8|BiTUI@34i!;SmHuAc^+iIL+)aSe z{Dwk*OtkXj`#{G$+d(oy!7n z->o>hZ^p(sN(bp>l(q3yAyx$z+ZA(bvpU9`UKQrYWQMq;cW-N#2oP@3;7+mh-3M&> zVzy$Ra z1Q*+fMzN<7u{N_MIB@ug@)4J@IhU@nm+4y>KE{EC(P$I?YxHkRjAA8vE#w1+g7zX# z4MQ97{-vfXL(Pds3A*fQkTLajSXdrdAsU{KuG$2K>(X4D^akTT58X_~%C6!$dj>uQ zf+zjymTsLD@v@$E-k>U57s`y9p74rJ!h0EIAkOB7VnPO-)A%Av=#U|wn%?*U89#z5 zJE5TS9cd~G*k*vTDbx5EPh>kPzhaL{DT!xLyte2A4?!YC#By-Nv4eQT0ScqZZ4os>a>0KLfo)4PjQwt)Oc=P`gVJLRTzALZH>gLd8bRk z?c2dE*-t?&W#Sq8#JXQG7dQAWhP|^uv;+E!|AH;bJS1mWN0n;OOL#Syf(;Z~(15vf zXQ%M_QwitcbKjO@VS`x;9`fnh7R}a-8|WN`Hg^>pov2t9_D--HJmqA{t#$+oCy8|q zGld&A!>r^o;raO>M$1&G{_;c%zPyY9Gr<76s2yj5>DM%1sdm&UD9ReJ|2J8o3XEUb zpy`0qbs}5iSXB2wH=~Y2JC7Z1zCa8S&^s&@+%ZK-km%Wq7HpRfgW_vONm}>`Y72(% zTb)!HZ$uwj8q_VdN`)`Dy(UOjc$dH7i|Aec3cy%0i}!4F6y;K2#`xzi>_{IETWlwhKM?8ITWZKKm-a$E+Vzy zJ4-KzVRF?f3Y4r<=uVV>j=0mJ&GIHHu(j=jOPTZ%CxqUy;# zh!5@gU8-stw(Fe938jTTm3*adB{T_0x^K*_r2bFU(LZ%qm)+>-0LsE3naTsh*GI|}z;l$fHRaRgpd zcWf?|T5}pDQ3h&_IaW15-7QeG#1xb0G=j53VtP47g#I903P|c|LlE!?u}bXJ{nQXnYR3}7^j)_^_~JqV%1f}{;y64;=Xd!t{+Vw$ zSek8utpkilMwL53>#((Lh#6|z#jOs0JfyV(oa=<|vM1TFBd+Qkv~)mQhpHiZhM zNmMPkrgro{prjLdcc&QSMn*Q`T=p-$t4~kFJ$NQ5ZEr7lWhIE%1acDlZOThb;1Q!( z;sO1JXKb%7%=p zb(xW~QYlNaY6OAJlyq9-wEKv@R3n$3vSr}}xSWj?+Lt8tj!5bqBPo0FOR{=bkE{yV z5KQFVp=2K}9>YF!B<=H3b+P2twkF4BIjbqOY_b%`yuT@7HAZXIW2q`pWImsqege8+ z_L?oHHl_RE6y!R$Gpao2X8pGF1kVVX%*4Rf!C}i`$>Qkp4Q3KKPFAfY%kk1xtQC}I zozb-p3#&t8x+TmE&{(fw#)9Q?smIOB_PqLimTii%yK)+IP@v0{1dpk@*t1;|>WX4M znWZYaYpwm7(RRZf8M5IKqq0sRfGqo4LvA`H-;n!jnRZ$ve^V>26z3JVMQUkv z{gx-HCCG4swkw;q&nFBLk+j6E1T>m&U?ULYQfJD;Sz}HwNPjP+n{;k4K~5f|x~2n)>md@1bxs$qmr*`=6_8YisNF z{ZIBgn0jpUr}~-S|15`Ve*bfR|MUC4|2e}uo3p%2I`#cet*zH*DXS6e_s+(HkHP)X zS^m%UV~BOkc6PSImnJ&9w!5TqyTwbSKhYi1?#jLH2K%|ava-GYBcr>#R)#Y@UbdFv zY!7aL_LyW6$%vOS;h7Q&mKiC&2VY6ekrX2mi@Y~H+V#&EIuo3Y2XOGsZ7JyZ*WpE8 zi1CXpZbNC2`R5-D&8-tm#njR;zxyC)$C%zI3&KGBO8M>k0Q=rkT^qi2j41)9J`Y5=ez! z(TG;2MHQDEV*!?)q&$3dE;lwdb8;vG6UD*sPe)xBkmBR-ymNQoB^~Dx-Qsj~Z2ko^ zjLo$8%u-xv%C{}hL4Fau+_F}c@E4d>@${s!Y6)sQ__2{>6#I8qyKZUx*zY^TD3Zt*4eY>f^BhUCM!k*1pxjjr^0SsaLSgqby-4GLB^yF5Lt#D?$^~< zKDrucm_hazC*)NM{Ezsz=o(80?Wl9wLFo5~VK%y2GP$Ykh%SN*6VGNmSwk|WfwS@8 zY0PXWhdfl_2u6*7i$Ae7Gsv&Pk|gdKFg;1RcKo%ftQJQUmBN$a)R+5WPb>yP%M4cd!g*0{^kCyZk?$~@}%(Y@|RUJ}zh*EF760#$5qdT>j^Bu=t+oT`S11`+`v} zbBU4d&kOkG2udyRF8G+3;>lE7-YOeYKRSsMb3r)AK_NhXqk5iEcr(pdj-%H;8_xb3 zBbU7vTM)YIf{;CmvNQPLK=9=GbcnY>N=^r}RqqX6s&em*sQRV_rTxKmxQslxB z_u^}mV}}*p!*ys){As%C=kYW4+9Kh5wYKn^zDG+By8$3k57 z5s$ao8IX?`I&$z>ldNZ^QhQzVir-Xa3P8rx`!`4S)D6T zL3PG5kBrzbL78^3yvk}&TXeDMuMs26@J^6xV=zrUh64}3CTx~B%|1qXx&>udFik)X z4#JZzH++lUx{_7~ilhL?AO?l%4^`ndv_T}n?6 z75p(MMh9HcLDqvm9RVqP&XiUoM|g*gby(Wi5AMI*8;TRcT<4DZ?1~c+GBa3qGHVX? z2ttM};ea~j9J$EV@hjN@4~tufs|}Y_fGOtbdL0HJ!}2_Ug1bj)z&kXk^hkcNL!m(} zX~H`UbQ?(xq@(5Wklwf?g0gF~nTQVX$=(3=VbgK(e;$zN#9+djiLFFUbZra#Cg@&e zCl-%Zc@AwBT@>FeM$G7sjPg8>!)3%YSe|H5IOlgd78MFk;@W_LtwRMCKk+#*cJO#Fa{dIh#1D2%oP znF7V6Ar*bbIAz4JRCGVtJUt=9I(CJBFPY70nFduMAOqv-f;a^*#D#K`h?iz_c>xx= zQd{o`jZ0TNj+gtkvPq#@T`xH}ZL&whC_9bZywOD>UKj~nrnHOkP{*SfQuI2x^xdG+p&-FiZ|Ic!`=Kh~^|IfMq=a-VR zJvY_u3&VetXKk3mdlTAW!t%+O+-_Jgf?uXYulDZ5wesxsz6r}@KA)t=k@Lv`S&_JE z3PQK;?#U>HEwNF-?~|&kqqak;TFc>+>Z(&VUf1jBN#)6)u7O$NUr9CegSbPeQRNa! z)yTAr74}GH_y_fAx}qI)^N|ppj}j7=9|T^P%Tj-}gJg78)t2UYDeErr*=N|n^PqY_ zQ(4uI%dxL3eG{tzuhU*4{rw!kJ26Q#>cgY}#Em(#u8BFQCT$Cvb%YkqS(r;B$+i!P z)Q_M;U1>GTp#k{NE=RZ0%#vV(P%S!q|IFgrlGWC0!T-;!gtk5jjnfCvtRU9Mp|2NZ z(*H-P^WC=DE-YL%SeFl;vq5)b(p-lVU*?BbTnMKS(5wcq3*{ z)i;$>AKz0dT>Gf3?cfI+h_xpLQF017az!o#VJ87MCjAIVchVZ24?J#b!s|{Upf6MM zmOI^PJ_zVEfS*jrd#=U-aM*dmqW7J*FD&`Q(V^<^m-G^3%(D>Wcyl9Rn-xyBe1X?j z4c|61MQ|SR8wNS6G&7fxF<2n4LYVvaaT?RzGC$4zH_S5Lx4KRCTqm0l zxMeZ6pl*r1IkdHi;F-$WQszQv+99$|I|e-Y_8nv;^!CmASSU(uW1)HU@d{jqrBWVr zXPK8~UQ`AVxN%26g8NuuTuSx_7tRqpKb8;#Uc`$d5{@!KP&Np>2iXP)x(Na_Z_rK0 z9KkwE7Dms7tZpbzShuTHE@N6FqnQF zQ_y(xqTNgAbZaq@$%hZSUiXt(B5Z=msu`vb4P&(VyD7I5`Ic+kkPpffv~M@67KDs* z@=YY!S`2Wn!lq008`_k}7bV~sGgje!#0g|FF;jlQ;Mg*;|EuZ77Yzulj2UhGckJfC z8F@H4It!Usm<-QJAryqFajfX5^qO+b}jA<*4W~@{yN5Z zJYpey$wDq+PDgWV?kmpO86`aY;~eIGqEkyX`6Kj64jGogZt;OsXC&aDvYfNexXkm? z1<&OFvQUj*5rb3X@N&#YrR8XlCClf@L%cW|LQpzzM*T)3qy>)ZldJCpFuG!38-LT( z?&HlJ2b|6Zr<(VylC5}S9=&KYLyMq^@u(9vx>33`-YQyljFyTa3dc^hGRg&`g0iYF zsRq`S4JK76);8F}&mA)SZUlGMVZ89Kl6daqyZlVgM;ixB8jerKHJ_J+iZvna@GbuW z6@&r(=AZ*+0p+Gp%1goHq>$lQ#JvI-RSCrG6#b=C7oWR~B5LGz1 zgtpcuh=lh0I;1BNh(L~{S|n7$)LgH(IMsQbMRZ@ZuSV+wwl5|}24YBedRp>^wz74v zx1NQkganW%{FJ@a}gdm2*=*?^V+h$Q~(NJTz}kIwwdQ*riLPmcKYX zlEg@-LF?j@EOVb_>1=a*Ax0!9svxIzTjf_s|FHQ_Li`+cniQIfs9woFUYq1)EBxlC zcZ3wV#1663qI55KgpP2mE`?pX5 zrFnK1sc5%IU!M_Fz{ZWlYvcQ>^_$rw46m@(Xx0$<6CY^Xmb3&Br`OSg{8lwZG8o2 z;U(^$EB*AstMySNjOw_Nw5p>EbwZP|Ii)528yhNzCkBjX>5Kv52%las`TAo3184*h*HUsW`=bK$18QB1RNwYT@YSEe4>Xk9?hI>j}E8ClkQ>FEN`+emW%AVxU>JOAL@ z%HWC@-dB?Mw%Ke1#o=JBOX81=(HCtXs*$~W1WbJs?e!@ zw7@Q|4Mgt}9-Sn`<|p9?gVh!t$?i1kA+3q0_h;dF1|+WmhdhWXNCb~B0&_OUh{}Z4 zW<#hwOA+_+dPH3MF!_beN!kp4mi{pBVzw*UFzLRhfgPkPm4pLRs6&zOfZP~MC%Vf- zt}y|H^lA;h?Ql{NI!*1Bv6a+(WW#4u6`r3*L~BL4d8I7^xlHGKwQAs8Fl+ggY za{8SAnZy6{F{L`0KLbdC|L47(?H%R+xz&RFAG^D);6}!~ddvs?KX1+L0D5bg9#prM z=>mEaJzI_w=uPx&Ic}i0mgxt2YnhIqx0dM%dTW`kptqLk3wmpr&Y(AeXUlO1y|v7I zAU3dTIhQVd&Tes^(Dhquw+s)@T5fKR`h6(RM7vva%2dw^hxWVPaFCO7@zgJ;`PJA+EH9?Kce!dsK*>TK%vhpB1 zvfrIvuD>`wZn3AQ^ix>-@Y!RtE}Jb91C7a|?pX6|u7chh5>Se} za%sr=B<9O*Ng%!HC7-ve;?={weG^Lu8#8O&(C7J5IYM8tKJE?U_w1iba&f-eo8s}v zjs%8@Y%XB<>?`*(zhdP#u>{oIq^f(H=t}JyrOHAp^;1t0|is*Ac1F}_LcFtEUkdFo%lKggP^n_H(_*O@o$ z+|MxD>rR}Zv=#ohOIh0!ef;_Td_9>(JmC~9j_IQ6nJ_RonyWAISOk;@zcu0bz! z*yY@Ktxn}H)uC0GB;uB-Nge1Nw0l3%5;=G_q~PYuj7;i@jcK;WD?GTIVOhByIOA`O z1a-m$AOkD>UZTesCCBe1YNQ^qhw1YYb$tN64x%0`^G+5i)iWl`Nn??P3`eILhC1II z9Cl|_w&X$Zyh#m@!S+R;)6vK~r;s{GyY&SPNrPLUOO~^t-)3sze1K2TBO1A9{O`R` z6em4*rPyqPHAbYQ5h^X<5wo6yEHfo5+77)nE-xgDK)$LmW-@I)R-rOyB};6oWgKVQ&@ zrH~PS;0TxKXNHZq@24J69!Z878Cr@cJdi}e(mC{ltE2$YoMbgYW+QX&iUk@qm3STs zl^uA(r)(UZM-yRLO)++~tSFhdq~E;@g&a(QTT%;8ElZLmO^q$%j58~CR2i~P;66(t zUOtnzCkbO{LrtercU#oLRTRV~C>U36#0t%5rHJd+%(2a!Gj(?d=^a3}Mw75JcGl7P z1j2Jg%0OXEk+ZoOv+H&5>^e`r2+xKAus?7^WQv)MH>;vTG4ksGc;W@`8Q=zbFR`7y z2L|a%VMEEbueE*WZ^Tk5XK)nUyH#*NWtz>*EtaL;n;fSEGYTYf^i81;L2w0 zP0*Y6#=XhgyY+7}x?Ag||Lwi1-}Uyw0I(TXvO49(92qmB%o38KyDE0b-1BGY)fZoc zLJ&(?0ojT({p!ntb6-G2%;YjgZW#z{>6FL8L5Zy7G98{=##7BR(G}XPN0(6N>Z;P9 zW;2#56N)yKIy{)Stcfay2h%?fw5!Zj5b^-=#+*PM0M`pwce{Q>(Hg< zU8}dfHr@iIcQ@lqq;+*6nMx4*IP=}EjM0u)JJgllB#TQP=kv$8%&{2=DT6sCIKEg} zWq6Odf@RrbDNtG!a^->_$qk(3Wg2daV~(rGGcin*b9faQ|460#@+P9j9L&lR4&C-VQNl`zeYzNzLq*Ln-$mL6Z{c~!DTh!-W4Rzfb8?TmdInd4oSRWJ zN3=!=rFF~TKY&J57{~iOjb_7SBY!drW)u2eN^i61WWq$;Ss#Yeus}%m2RYh2x?tS1t}_w)PFH_?2%4m6G?F{K+}!xl%$w zE_bl!9f+(s&%ylK7VE!Z6u;~5wJn>eT|+*P1v6)}7jVj3Lqk_V1p61UYy|Ck z@OR$vw{`8#!em3%b;U7ReMQ)Z1cHg}G7@=yTpa-E8VRHEFqRs@Y43F6Wx@_XaX zoX0}SmSt@>ncOKeVP{U(vElfTH&<$=GUthag(sry)C<*$W;vKa_b7 z8Rg_5eh`&MN%GEJQ?V3T%aFGO7)I>DXe23MwzaW`uhZCV4?}J56mqq3e2g^bA@H0* zXQAG>;s@x(m#VMz438HVJDe%FwWbWG%eYJ4TKneU*4ppw&F-4@GKt8 z8v!Ce{zGT0v$Ji*f7orec7huk@#@i^RsQe%ey#FraktlS#BfIgalzyHQ3b5N*FQ+c5xBi; zLO1Mb%xc{~V5}{EWL0sXXDPrA^+<_#g+(#f6tMwed^plGFtQ^f5C&D~c9lmXg9(bq z1R0sN7^*tNj_AcjoN741Oc%|D8Kv-;4Kl^p z3mCNRE*rp*hqhpIBiHNO5H~;x{9h<3u0-IXcp7#x+y`pqsD&C<6bQ!v|0@s}Dqp^e zPtL;nlCtH>sEHiUK0stTochz`!#Eg2=sAVHBy^r6ffg4M8+LNhX*pYUw%m?&c?zjy zSr=&4@u)K7&~Nlc;Ii3m13D_h3kZ$=nmy0?37b_LXr1pif)!qAH!@js`6&|wKct<- zRxGwrb61QjI+a`sH{1!;Ue1`GN=+4O7@ zQHQ#$cdF1OS8i#_pgUix+*+B8xYkD$dU@_@oTgg!KgUN9xbuinUWg?`5-rVIo;RY^ zRd&kq`28|yY#-8TL0MTSE5%@no(veGen2O>Zp0q7im zOmBdAaOT5+@V3ikCT1CJtMa+NmRi%QLCsZH^CXTw38;nlrSdMX zBeFi@Haxsnn2?aRn5brEae-d)JjrM$pny1DbsAZ7vvK+w*D4f7{U9M8uqzslRqtV zv_=FadjYGXrrSr}yxGJ|{vtagVIF!IeelA47s62|Sj19_D0+(~sjfzAV4y#JWc#6UnM~t0W*8*GGCzKsgJOf+Nym;?Z(%;kne3 zKNU^qG?_{2lLe&IoV+0G&ftuRo-q?`x!bOyee~NfT~{Wb=J{j!jHT|$0>m!c@icYP z-sIKibu!otqV{G&hiMv(j!9T!e^YRImC?zWV+Umkj@LQBnu!vWSERzpp}M)fk@e-A zWN}=4Dkw9l@XC%M59Y;u%V)a$rH0QR&z$5zTP%_9^5;Ek%I+HO69@K=0DPe%$b=z0 zuIC`&8Jy5ue2gJP=}e@bgS0&({E}VMOj3lp2NbnT!A(Yhy4R=Vq^6pE2_4M9SGc*Wg@qRe+x@`cv{XxxGQ`Q%8m4 zvXQTxF|F?N=nJQFnOnB(p7ly{{?`1|(o)U6)FQ`?x$U30D$w+SDoL%GtC9Z$s(z~e zAte2N^znQY58~#*{obcXR*%lc3&pC&#Ku7T8&_1r+yy}gyf8E zBrzH1NjhaP3giUY5NwRBEW+9A%d5i@AWw)(<|aF&S@sq7rSB}?+}I}!WHkqc3&bW* zRUymRbK_7@Y0)_^(d2YRiy9>=5P{;CItQyoQU{&|ng zKU=$-ov(uScDK{&b~;(+pG7ISH2cpKo5{2OM1LGs2#^Ho$mA8etr23A$J_|a4Y8p# zNY0sn1^L1;-EqK;L^T^x0CGT$zub_rBM=Qdg{p?lC0SJRO9CzbD^KxDnQ>#*O8)}t zYWE{4?N^nA*+@1k0C2OQXz18Umc)|L}$VJSft$b4?6 zXvxrjXhh#*U0JKfc!y``wz%aLPx2v215%@Ua1gXSwn?wUcfeduP+KIcnDZtcWr^!; zf-G`1)gRa*pzV5;=H1;nG|bU}wenTu8JTJ3L80QbG+vErkRL|yW-#b?wbr)LvswLw z#@ktq&uPnDFoxgVwA<6aYg>8`hu(8*Ada^@yr7EZO`;qU2Dco_%*BMdWYcud-2HBr z>Yl#LZMdG1%%&V|GxN_BpMmpbu(>uND`$S6ox4VrVT_e!s-(?1H+k0%OE#xZ*ug~7 z?)NC|dhuVT!EtQ}zt?RDGaEgsHvKnB;0B0NcXJ@i0g;e9~pi^GVcL!4G zsP9hA#p1p%37;48YRI#xFvwD|BZEb}MGX1*FtFOx10|9~S$zXB$lq4$4Y=>-iCL`E z5)&nGg93?(8=X2>TU3vZs=nhM&{4mRW-ALaIM_IJX@GCuy2rZPeLhm`y>+vS{3(3M z<`49eVCS!wxpKxRo4@U}@8xJj@#a3-3hXPh3pGn^9_H5D%@UJ@#w2djBVnVRYcnp3 zi_`*caP&2&uwevA83tvwIDIlnev8JnLMvd}HiD0-$qY*r;XSu%p@AhlSKfY$Z6Z^u zcpJ({zv3+mkK%XTR4j~vU~EQCWqo9sguPki2GUJ#9!+5V^W+~szRh#GnWrPw91CrK z^X{7xZ2>Y={YY_T`{b}unWTc#w3IE=$;`Dv2<3@WX~L9inXQk%6!BPqNV%s)zA3cZ z3?|7l+sLwF_Mm4mwOW`;mDs39CCSrONgONNViq0pJND&)%OEvAU6aA_m6XX0DSQ#F zQeLW$Wyxd(4lO18s`8WonW_XnGH=q5B3rsLX32WNg-(NVxRgh+1$N~*`(&dUElfE~ zn!yo{2N<+1E|saRJIg)UGf&rQ=BJpa60~V&GB)t->jPpEcYL(wi z*Mr;p+%f_@RBQL}sFNrt4 z%BLpR;)h-RvC3j1>id+$>QJ1E^C*$%=w=v?YhJCE^0ibmCr-}H+%H*98Xv+7$H6#7 z6)!jH8yeH|3lHB2jvRcOgUJVx2h(zo9WNt(yh!`NcjM%P;kk%^8@5h_?THzx0l5t5 zl&}NDSd)W6GNG{VXr0JG>J~*1D3a}&4>4QxKJ){7s8t$)G0aZ9k3nt*VbB6zMP1Nn=tGy zOSi| zp*0+EI%8a8s6sMJO2HfRQQi5LOT|bkQyR&j?G*fN8u8Skz7wYIqJTH3Kn@PrLjN5h zo!=pWxk#C4%7I+I@+eM>h$dNLp?lX?A{?K$CCOHcF3lH_Bp0SFk$l6M_cyJ#-R%3d zd2S~qyiD;`jLM^{&yCPW8zTr70h}TF*b9efv*@}BWz71+l%R8}2mu?-`S(hHyJGOIGxl2^vu8x1+uRp-?FBRc` z$zvZLM&cpC+&BOiN7SAsvq>6_-bd*YHVDSVv2UwNF&1;&E|f*eEN+6|ysLv=-bTo4 zd7aCkJ)eI;k!@V!<1tEipls_o6Q0F!WMBO_q|(D`h!F^e!!rPbuxIx_KWb5SfJDx+ zcsLe3V)8-*(vd)UteqQz*NSHVMu40y`_Ui-?F=Nk0e^E!+W`se=@`Y7jq2Q0p30&L z(1x+S3JI@+emqqfP(~L8Y{5e(IFdYT%_8P#?9i5gz*%IT1TgKb6_y!&1xi zmPaW}j_1T>{kBaBU`p1x3J*PGitvJwWXy!8Z!_7pC%Yu_CF-r;+${mc>n={erP%^m%T;y<-onfX6=+uK|0&ApxW z_V&HqogIk(w7uI2ZeqBr$9h)rpYr>)ivP5V|MXXm|MZd}(T{^iBN*`BBpH8uIy(!; z@qconKHXfuWc(*}6k+tI4n%+2+HAKs+0JZtx;tClR(lE2pUP$bJPY4N5O_%#sT@y4 zPIkoyBEW}XN|&(;!m+_vJixfDgJc--8sC(MaKnB-y_monml z>#fQe<|V#U1w2g(Yb5`iKSEStvnl+Ks3)m^Nx1?N;&po_Q~L_mPZFmNWgKH`)DMP3 zw802ROe(s7lW7bqO*-h(DJNCSuK-Bu&V=#V4uquj2c(Ox2z`KN4OVCbSnz~PaQ8{> z?g~3L3Vs%*!7QDH{um)L&K0Z6VFN@T0!c}s4I#_fb4pqV-CAVGw?(O0 znI?Sv&Pc78@2p!{U3kUqod#lis=EokK^OFpB=s>whLn5B(_V{{o-A&-<3v3IpM4z&0j z`?>KnGU}_?ApST@JT^#1ZEd30b!#2-FBJCQ7(= zzrw8qlkBuTThBPhBZu(zKeL3zM*1!0kAjq;&;4%6iN?|Kk; z<3LsOX@L!VVdqz*`po{y2}+{7RTerZ8W)p`?;Ee@VbBaJy>X?STHIV_wJ>-nx_2;g z^x2Mn^E#(xQCN#n%*3Tkz>8p#r|mqvdLKt0$|6>-k3zmpf7TQk`044ok4f>d-){G8 zcL0OAn?&K%5Eu;s!HQ6$vwqq=zv2a~AUi?HEJ6x^w1U+9HcQ3e(fWX<70R#yuYDY+ zP0d_H*5}NV(J}kJ#75bJl13zH*ZNi-X`i~bW{x@F5` zQ=*cJgYraT(F!j$l_<6>?o#t}iQ+<@)MW$AprSH?JVa-LE_ z-4#RpZ7-KJe&!TT$5L-h_<)_3pOcx4$nc0Z`#i*&QnG@v&t zO}JgG_~rn%nTETJA*BRX8NHSH9CeKJWop#s&J*&u#QNpL5phT1xe^rAJCH&g92#Eg zO&ShJ!=uqmP1U7>I+q~ozyWH0akeVS)0RzBrTLdjQ9X>Ab4KPehlsC7NzT!Uc09Z; z;>7K2obYlDV!gS=0YLH@vzXh)tuS^}9KjRgZxmLz2L5=K;S8`aM=_z?7&owz~QhEO^++9vWwr74w7*p~%BE12s zak=3uL6lpH3{v=>J7=FL83VaH3FVJSdvJKt4Db(h_Gwa~e}wNtp@Hb0UfG|y@GCwA z!QK?EmJa9#{G7O zx-|E?K(K|9sDYI+hP5YFL=qvP6b19Pb>o|+5T*C`#iFmt|7b1#L+N}#c{~`!K*lj3 zq7@-tG|TzWb)_vbTBfGeM{x|xHbIB26h+V|rO*gZuD9*uB>C`IvmZdsVo_NmfqTdfKut=k?bJ<0DDgIP`@*Ppb> zSDlX6A-}z#jfj$i9t)9Hgt2v$>x99LC$hHXu*h%|`EF}C;^u=|_YH@>crgPnC)ljX zjlv1GxPVid+^1sHaE+|pYl*!hVd7Q0FkVMNTMSM2#HG)?zO2i6rbyndnM37wDK<(O zW98p+M=S5{;7T(@vwq%_VKSI0_QPt|?v&oH_~vW(Ir*608BOoQOx-z|-sdwYi)2t% zH8XBLTmeoCF%6Kd&dI~rgl%Xkhrqd3_7GSFQ;*_7r|FlQLFK^EA_?A-)s-)=GDnV( zZ30$w+++^?9}Xb@Sapb*Hyk?UtNOqUoUNJ08W&>ZSM4I@Ac3_iWNWXy>6870Lq)NtpqSQoOF~A2ewA+69NV zIO@8{+r6pxE|~6p@>l{*Rdfx0z-a;%6-f7eIwZa0%2USx%%%UVuIFjEjE-AhwHB1f z?<`+wWtct?Eh3cOjIKD)Zx$h?m444oEQJ^sGT7c`^ebLH`<;z)hTWh zsw!-$&f;kW;$+#MK(w1yK24YD3?;$cvFHcWNv={+>NVb5{OxMjlKv51bLhG%GYixc zIOV!sN>YeNlM2Kj8szRCmg<;wgMmMZrbog?O>c#LVyF2LIw$GxefqJivtQij{RwR3 z|IE+a_Wy`;^Em;SZ|H}S*$M59_E2!13-fk3v30}w{2 zcS(gIHS3%)W4k(@l7@r91kYC<0sD!e;@}PgKY`-23xA<`B4pkKqXzSouTfs%Mo@k6 z{MBoWRC`wiKzpt%mjii?Qkb6dDjX?rbBMnR~EGasxZp- zMrkt4g!mZe)0(WyKZ4DXYhlPgFc}ADO>a?I{+jc&aR7-|8AYsB&Mw4DtsiS5jz`9F z8y+EO7Mu(tkAsQj9`fppi3Ar5`iBtC6gY_pUlQl?$Ab}OrfkQx0M&4=h)nN2ehb_= zLfxJZqmKq;<(r{wT0QX9N00vNRA!Pk8?y3jWweXm4*iYu)~zC1Aa~s_hFfjRZHI@e zylv7nD5h%V$oL}S#AL^Iv$7GBIYiZV+bHf3*}oJj-L%j(nZavZ)m%oG9_fbirV(4( zfTQw)#~X#XMX2{pK1h|LC{Gat{5@a5_vKh@Sjf~Sn9JdGRDL30WKA2Sm|&zUKmrN^0;Yq< zXr-Fq-iLlUyR)Q)?NUr^e|HPpMNMp}vPMBjpC}Myad(9|EC@@O^}#b6qji{JK$wvy z#LlGYk7cC7_`&WX16lxY0L_7#n}dXJSr~@}Qw`iUA@#J%r~qvi9kmesg?yoI9|JP_ zr92Z5cBr;~o}?6E2tyP}%TXpRyn#qE|NU=JVEX5c$qHbz?0liU>c+ukuZkwS%Cfo{ zRD0DcD?es-d?yD~nWRsw0V*$YKgs6n8SNXtAUQaXRec(cha=dZKxQ=OQa0UF&^1uN zYG-QZoK4Z_yZD@;H}rETk}EOJEoJXU;I}#nhjEg2gK#{V*U zdJKsI8DZ#BFmB9S13&sNybrP!)O(7marj?*g1*b?>Lk2(L0(J>$KV%P^^(*z6#&6!}D=W zrL3?LML9q~#a07a8Aaoq39Q$P2JZ_-)(U6@2wUO0Lz9fn#Ic!7>RqQoXP@}Fq`9`b zksls*l)z}<^_c`a2^CG#3?TSI34Geu@d**_&0EAWk&u_Be4~>w0Zq5N2DaT%6|%nV*ZwhG7nu@+~=|kQdSo(?7XYI#Lw=$&XyZ=G>ficsMVh zeRqO~mN9CtalQmem1f}X4||9@9fm_baKb+YjK!+TM7;EIXTxSaFA3846)}XaAu!id zG1G-zUT1URTq+Hw370&`yi}S)3II>XB&e(Sy*xDp^1eL%2BXUWbT&RqhU_rnwyFw7 zW*Qd;P5gN!ZNxx!m30qK$shxnS}7T>v-%#Lk!R_7ikSShCk3yX zXv(J|Ru>cNB`OMZ1BgU8hC31q7X$>35@eOknnnvCDWb6^N5c$kk?_Pz16`6yI6jFq zj1lRIGH^uL9sXWOV(QTqmSnlhN>?}wPb}?%AsgL6K_&wr>VT9Q-ITm+-#OK~QMo_E zU^2t!x|@b3J!SL`g{(z7X9WW`rO~;&HkWq`YSvZ`E&|xK9bAN>a^>Z+@^V>uxvacg zR$eYOSGT(ySC^~o(f|IQF7}ugcXtsd%AeEaMZfi2`Ms?CURHiDF6*%JdtoPCE`412 z1$Ir?b7a+uGWNSMBX~a6=a|He^-*8gov0nqvit^aqs z+wE?v6JUquN&>LS<1f3(0Ho17ZWjvr&rsk$00OavE%ya1@qmnP2CV7iEdCAd6j%#z z1$I}eW+kvwG^ChBJd^q`PNy+Qs_!GX>K+r&51|GaU=Zw$QIfpl1}A4c6MEQ>NAVPk zOQi`KmqT5CJ400@TeC((4Hk9O?pj^ZK( zTNH+-uOezb8IPDG3u+Y7Y@H<&V%$;eeFB04gAb%8`WQkkFV_30i{&@PT&0QwIpU>Y zm87bdC&ZK*U${CU@+Es+!cbneQD`R5F-544H-pQ|OHF$B8lFowTgD*IX10C87F9a* z#KIGuxVpO1`!ld?k?l_9*eYA|$=?>l~eLg3RYxx9wwtgV`MN6;MhKFh{CR z0ab@wVAD36-5}-)doYrBVA2OV+alSWU}1RZEcZl9bB6+?%&Z|rNu?jPEyRUDISi*^ zP)p7!p+Y@)Fuvf%FZhM+O3}H1C_YAjI*~xU4$0(TOj%? zy@3jE-&Do>>f4;mp~aQG>Ff{!&Rlc92oz==ed`3FMzma0f9do7lraz!x|!E-0|>a0 zT!1*T3=|0*a{wcqHNRGabf`2A=pKJrX#^R!qgHAJ(t{Wq46VKix3V^vjTrVm`!3=) zo7ivITABeAOu|_>d51@JC`rMvnZNC{2!%$DW<#&(t%4za^&Jb<$z;s*V`&D&3B-_) zl5GJ-vW{ocM!|dxgHpMplwBs80Z=9#w0py04^E@OyMFSq-e8RV)DKvtV$pAq<{}q3 zKsoi$CB-9{sxphBnCogqx-@3fAM8?;`5z1vY-TKAsPiP|mrKI%-_hL#dTe6o0XvJPO`ry%C>Spns{bIHHXQu{>9;gm)-6pjMIn`s6)RS!T7)O7 z^8DqGM?XD#dHCJaSFaCW9zH%g{NeD&!)LE46F?(4Jo@R?;mf0+AH00_^x1a}9DO6G zTAa@z&){4p4Xb8j?Vc!V-ir^oh1LP2mvF>TVt8R5?*1iNY*}&|aq+Y4DjmLj`TXTl zmL+p(a9ZbFnoRb=JW31T5f72QOR3BH5o{3StdrPGcCo-o91e$g5OaGy5{4M>HwZ@~ z&0R})64~w1XY2f3+$&3S#+u6)OWig@i-s|VbKRAl%^~+_rAr=^8kEa|>>1l2QW?Z~ zZqWWk(*~j8hbZ_JP7|<{XT$Oz{kTSaAx=g~KO6?tv^m`PaLw z+n8eQkK!@6)AssTIh*FKl%KtnicWMq`lXwh^e1ijsT)6Vok~2@Lsl)^uvkf(rL4k| zT0jNLzLw`hYE5`y?wzcC&y(4yBM zJP$t2i%aw4k%mK#Q>3qWCKh?!h?PlP29D@?cgmoMy5_#d0bw>uA1zD@0v(w=*hHNu zgG@mNIt4ih-hSgFh zx%SP$+V6c8`@1|P?*C__X!8-t;{aW4sukQc<()a%lqsepvlksCXMwHs?pV436o`q*&8lGia0o>UAzkVFy z_5VG({%^P0{{`(1T>rPX7&7+DUH;GLDp_9m-wk+9;Yj#a1hW*=xATT2hnEH@{Zoi3 zxV_~Y51w|jwU&9`%$htB!^pg9W`))q?IJU0;n6R>71M3{ zq3hAP_*JBF1Fq7(OY>|pTzL2>I1};pFkr_qglnA1%<>`w{fkNTK2Bz-pr9Cj?EgLy z{&HMcsq#^QW|C3GNeT{iOx%d3{FeDH5@F>6B+&&gV{j_W0vv^!MA-Y$X$ajAz}Tzk zY&Jr@QcRQ#X%ph4T(m0QaLs^Pfvx+8Q`D87#3}0)E7&wgY8e`6LbEpG#)Ln7^dq^P zTSf;8HPx;Oxi*)&7)or(l+rY{8d>lY2_Y3Qo2!0AH(HK54j$5%VO_d;!(-_={}Vmx z%=R^*E>o(L=I?>@7p9KIDXpAe;ru7zL=U5~5YRUDeFoaR&ShG8%w^oBF zDW%#g39ks2bq&Msw*Uh02Q^tOBiDd6nWDHDL(w&lKVyMMAQsr?Y|RItT7gJ?^3)Jo z7WHDpNJXg)io}l|5jGO&PJShcv#OHv$`XfY0SG)$jCSdjiur~^%7mqK{_C8Y!Sj&y z>O(jg0-UpRMv%D?9iA9P6vNv7;c)nv?L-PisO^x3=>0ywbXu3>lr$e6vLJ$oVa3d_ zVYKnbJe#7mO+~Y1Lm1`)%hfZBy)5eT@%gkie2&&E-+a<4@e`4I=lx#9laT}~{2C$= zEdPEk{rV=T0BO4XHT`EexvF%7D*v-u51L+uK0IO&f{HLGjQhG2zpttQs9Ly)+Q?KQ zPz6)`$!K?1{>UDt?745*IYr`pBO7srm&Q!5Rj_-weJMM1RlDSnuj&=AqS>?fh4B$| z9(v_aw9r#l{|9t&5-p_uE71Q1yPfSF)c>`&@9pl~gZv-tk4~`kv92EXS?T}s`?b>l zt@M9?UHxA-crc1SMi;@uWb#|`KG+N2_eEC=vwz&A{!bl8sQ%lM>OZzM+q>P?SKZEb zmijNqRR1Y=pO-UQ^8qy!Og|)KOpW2eQsHv~RNyR0Aq3dj8QX5;!Xh0HVwADi`p(cg zpW9!9Dv2S>5Fs$Zj<2TK%>+w%fpfty1JO>IerqfVEttTH`@@_6=rNb#~B70 zD?ao>-K5gFy-3nDhTQ@_FyMina`oH7DklZVxy-Ic|EUIWaa`TsuQt@{F}#P@w~f~) zQ(pSOd`lPG)dQpONEF^P-}1tH`&E1k8ZdJPUTRJsqVGZliE1dER3WBnM%PL$=bI8K z!fLi>61+4@_XR}p_QDD&p62ydDX%KDmnvr{3_fydSVMw#?#+Y;uvg@R$WH ztGu^`u@HZ>B#3(5%tj~}i3zdP=t!usg<4A;n4*S>FG+@ByY^j%lrvUD6tL{zpg$Ov zR04p2x3{gAt~g8^{R!k3AQ!_U(fe9;J!Bp3!&QKYx;#q4DTWLU>jB0am90U{QT4fB zzh6RNovZEj(9`02-)u+zWs9n+F|ig*$QKGYkcm}XzEXOL&ubAuHx7}SZr7g8&ic`$ z#>H{a%m$aT;#FXM1|4vvaG4Zz1=fJ7fvc2L7gTXX8aOu2OKRy#stDGu{<4-ipXMnk z{~rQ3x|sA|DF5&5cF_LkUTbS>yVcqO`G32$8!UOGtH<}Opie{QuXL|36pz zA9)<1^uNue|ITLnD|U8tJMHeyy@2;}Q3D`sLbuSs3(k2hd;1QP*}HoCWv$mNRjz)wUjLRg_NG>=b#~sgHg?{!COYho?YHbdU&Al2BqulJgtQSo{YK72+Unz#SZ`8N+X{x{tCjlJn@ysdxPYu3Nyuh{P|>-F_bPohE1 z+-4j^h-%?*IFY%13U2YKhI|e^0PMSSGKV29{c(aJYuNLeo5u_xbS{bt>1i?>K>(S6 zNeG}g^SM*ZV|hb;Eo*s$r5k2HbMD#C+0HvcwVU##Wm~bqr^uVp%7D#87txC&bRJG? zRs7CoWHPDxy{)Ioy9h6~ArM9~WK`+fs%+Br0EI>s%o?wbW;oR!|5e4zTv^{A_`3j) z*Rn)BZZ4(l+)HNJ9D@}xLgQ>+WUN>P=3&{0hYbRb6etlW#SCZFYO1>GTLkjLp_eP@7^@LAB{OTt!@R zgHyTFU%IV>dE1i9mEA-wXFO~Hn^lnFa{9rRvRSP!YLI)0{kU4L)Ph89Wqtbxeagyz zDEr=w{I|Qcz3a$-J1hC`lRPW=FTYnMYPW}_e(froG*OC9Cli4Vo0EL7r z5={9ww+M)8=EeN|eeF{jv*>)D|JCzwI*le{!Bj5UG2eUXP#s0kW(tvys{xtXZvOjC zxbfSAjsJc7<@%;(c5BoNN9U*Ecy<;|;z8A_2e)ZCRaGr~uxjn!8{hPXz2V(nll^DC z{$Ke*{N3cgvcV?jAT7;8^1$ak`gg6~>}~e$_Ws@b=8N0kuK)eZ{YJ0Ss~+tAzuueP z+smumo+jhpqDf-(l=bCJn+*`}4DW7My*20Z$ak^nW;6&|UAkkz=VeywpHyie?tzx& zT8d7)?rox5Q~G`9xVz`xv1JAWHkudLnAdE}mNC_>-n`D|9ug+p&~MiHoD(_t+eN*A ze=S160#|PiB`d(6=~^vH->iSM#PA|a4!+6ug${IQ;qv#YpTUhPp0+F9M9x!M{-+4M zHxU0X*t)m9ZOQ*T?VX)q`GZ|O&a;yL^ZT`u|5x(=O8)=+-HZxAw4n0tXik&! z3;hDvJaYdd5UEmN>dmwS=y$oWtcHSG>5JZH2~VbW5lxG@3H#M4XS(_;yFPp`C!Os z$>VSwN26db9O57CZ=)!krOjW*zv4Mz*C~0tI89}TrLd_pLuu?P9vnJGg=Y8Y7U~Iw}+Wt`L&~;Y-2dusy?CtFxLDOq{Q*!h_8ShsZ z7hgF*>asUw+z7oywwAxfPq#NVf`^CSJ$)uK-vk>Q2YV@#2iU1{F^cvpgJc9zLB4p> zYTd6K+}+!Rj|W)u@Y!RtUjN_{$8@!~+2@UKPKQo6M$vIbFDSK6eitsW(3R*&e-dn} z?nnTad={^K&0r^wI@D*ZuQzv`jHerE{9DuwzH0p)TIA)g?7?erw9&HvP7c;^NdQA+ z;$Ma(h%Ork+-yW7C4ji9ve?D}6Ulf=2a%?McK2AHw!}RIT$el;;8;RR-hrR`(C8K(C-Y zBX0PcNSCa9ewvJD2k4!iZSc5o3 z)@AxjfB|j;#?`KB#fPj=yUkiWgFhMoeg6Ph-uha-E+`K!5GM2u$JPo7pj!xZ8bhiN zs>xPgW;^`A&;XSAJP9-e8z#XonG7-UH6yto6AdGFAOLg0n+=B|?MSV98ilMZOb-12 zGq`{n$rb?LSc8w?IEe>ldQvYi%sT^sV)myXpY-+#M8rY7ck4|V@?kB3m<S z7$cmr*W>~2u#X)-U@C%;`_r+}@rU9QUmSK!Gs)x~E=eUEF)pK475P@#c?(tR_bVAo zHHp|pq5(vyIY0QtUn`yU&tj^^{xqt+qEG&M@fqW_uv&a}B5|B_ALmgxk;;#g_&CKk z8}T3+H`z~w$mk$webj+sbP7LGr#QWoox)EVLO(#F2;YGw0WD>ul>PCD{qYzHWVNmu zL~8Sj9gMXd>*bH^fQT6*S>u@!i^;?z%x7v9XND< zc=ihvIE%->ut`J$+HN(_I#j-BwKH(SZmT2O>iFB*c(U_OgGGi92!$lY zr{lqd;>l~IKE@wA^^*O-bLe$4#Cv~lS4IKju7h8ybWni5BA5#A2bC9$E4fkF*tHV(RYNrvyykR)GU?4b@hwLPef;$YI`s^HyL&#cfmLu4QqfyLAz$>;9 zPMsnh4vLyrpW1KVY~iP8NjwQ2M`=893T$J6f5yoO6eLd~#uTS!q0ZYkJ6P!F@MIiK zoR7Qs@yF!1a58m1-s4?^kkap?F-`+pK1#5KGj(5oA?rf9(==mSp2kcLcde(RtXA3?NqlmVNVs#~uUy|7*I1b;le_{}{CbJmlSe*|V z44JN*dj5)W2vbO}fHo9NY)zvmI88plXwuoq30uW9I2U2?I1pF_931b!3m`VEz31pG z0e?L>XXUgKAa4+Bf!st13X1m-Y?&+)Dqbrp3M}y(VtD~y@0en0w@XpD98L-=SgT?6 zl7lApdLGzRBMZ3AQ1LW)bmv|biAvBCpa#8cP(qG6E@|V=xSyWi7knqSp9(ev)&3x+ z#N+cB%nfjVk0>U4*}iAbNkex#z&AJ!E>*NYK^vWAw6X29vF%$A9&As{AXr22fvP_{ zu)l>=gyA_q&`1tbyeZW?orFJ-y#%-a``3W zm!ba;A0cX}qs_mG1%{9*nv!05z}0>-1@4kx@%2;-kx0g#4?*MR=K&+63Jyhy z67vALuCOpqTe`S4n-+*$kLDJ)_|o$pSzC+K?S@PXiW??m=VTm_DcNy60uxeUJ|=h$ zQ)2}cE}me?TJ`AY!4E$i9l;=`llY9|6WXSs*2@a^ql+AHr&9B)6KIH1^NE3aDP|?T zG4Wjj@~an?3+xQCfcNn#9xkJ&!44xd;UpZu#BouG6ZS^1;{&bfDTInbLhVP>4-sSJ zzJeuaw=B@e+eqMqCSNsJIiYoWJ%N=}S+F9tJMm7Bx+1RwrS&4HD?x7*%PZMP+#$WO(wd&c$3;I*TIVcwmPLrV08}EJp@}LLY{}uM0 z7gl+te*f1DSe2j9m|P>p1HATU$1?0d zIyfO|9pQJA?hM84oN+U!;Tm4dwWUQzrwtYzJDu+KSIVNJ{H2^8)*704z{poD{lEjh zIaT27DLa+U*>S-OG#Nek?&b66|NJF*_~79$x3vv9$4y_3j@o;sz@f&DsIHIR+ZCq# z5RzwvbzX3J;Je8=ocdB7u~cE>vj$#LgprL2DaDXcf||G;VeAycV8Cj&N@I+soYs{H zV}YeLQ}7_DKf=peF)@m*V!R<#rfz|QQSLvM{sQ?=wR6)}TDu;rUEg7Q8ZU3dY?xsS&XnH)P+#9@3NO(MNb zV9R)O;W50hLg;4xwM;m z^7%jZYQk+JuhB+6|JQDHTA2UqUYl`$yIb36|FzQ&mNmrHlk<4^ztm&^EhPaHj>dxv zT~dpEeQsn^_Wp*R4J($n}H6#KT| z#?FJM@CBNpmUU%{hA4veV9rMx!Ne zkx*FC7X;}UItBZ~l~S)f#leU8a6Bagk%0FJv(jjBYT)r@XUXhDL(SO&{dukRBpfk* zad;6>U{F z3*Rsf+4!Oax{C+uYv2(;Er~})(dFS0 z&Kje^IwFaN+bH+YNSXb7 zFMdyxbM_OA{@A`_zdOAO8axX-W3YKZ`(Nw~m;ggQXE8BFHc{fL>@-QhgA8UX%jQhl zkYK52{5Jd*`~dX?c%NzZBQ)C^8{AlH1IqHC70+f<)Z6#z=fh+~zmMtnlTk8F$z1kV zdh?G6Uu2jmaV>?l*l?$Ze*ue$A9UjudE@WsYdXbN5Z0V=RxZ${+&6tw#=;J8780@- zdB*-lU5;efdcdjm*sC7!YP~9&eZb$p!QT_q2c7FnT!>^L|Ai0Xm* zTGc`3&a+NQ;JQX5W4=k=a%Xv~lVw$t)9+`DRtRQO@3&+?3;S*HZ`bKNnV^)=73Q0q zv|WuMlVRs-AlF_d2Y!Z`i)0t2sSA#v5kNbnd<;s>v^cUG^1v=R!JVC*1+jy(hB|Tx zZn3DxHnVjt+$d^Dw4gInC0lS-FQbW@n0?1OfsuTR{z%EZ>I%EX>QJAOGDlmM*8Xfd zvOn{atN%j-n`>YH7VH1oEnENB+FI%VKFL$8|2wfvNWmw_;|YrDK7}v~D*HZ>JLr=9 zIq{56OGrfVPy}<+4E^EgCI>ZOr+=j3(djtkFWa51?Zy4k^8C((-&i?`3vS?EMN{NW zg@Va;_I(>?~@?;#qsgLBSgAVBh8&pXtd@&4AS#x5QmnZ za4dJHH6%n(Iif1f^#Ke^P7SsrW(RLchpsaz!m$Ny25zWHym_v(?bi9n`;~)vJdBT9 zt;)gOAlJj#t%tK;QI5w{S^UHLt43JDsQxvY^Fy=;iw3#|ygq|+9!N**m$mhH_(tve zd9CktOLrgBNE|3Mf%Ib@@K^yk-=PomPD%TTcu14W{`>T?W_~Ybi?O^I%mxmbk7#1) zV6V@10wLv8G6nw)4_)LZG6s0|x}sB1#Di%AmihA&!ca<5OCdPd_99F1;5U zI|^$Wf$#`6a7Vfk{t5hj@*RHushheRqjgR1bui=<`3s0Dnm8NkIgusKmOdUhwiulc5IMDz5SGn#of(Q7_yeNcTP}s6~ zyeC`@;7SGf`#rh(KV(%l`m=b%q|e3GfCcg2+S@xFEB@Q|*7i#O_emb5{|msIBgFiK z9>dte5k>W4=jAB*p!*pv$5vr)Z}0H=YY5er5uMG5;KofB_AB)7 zocfgGRtr@sI8+H{yb@CQnCXgl3z&oZVy?T0C!=(K32e+)nV zV7j7K*{k?$cE(efa*?LCQ+K9bY74*y1RDu~N82f|d|{2oW2e!0T(VK&m^*Ky+I*^J z#r#snSl;MHyXCg4dF`4l6Qmt<;I)IVaD31wx%%ofnK5i&m^1>T!09R5lx#OMYyjnT z66^%&#aSPMrWp#E1}bQL$_vqmHmO=8X9@c2GO2_B3V-nPX351s%spRokmRAY-kE^v@$k1VLZxA*rlB`-n<Y3EViHkff6PD9}o+hhA3l8vS8F1$S znY_@_Vky8$pry-l;p@q?O0_cnU&xfD!N=5D9>DmXgY=zcgiJQdiwl4Ujo@J;cqA_Z zCZfE7EY*CnVj@abQ>E@2JkTvP(WsV@G_7GJQ7Z%53$@IRg%6g681^)b4Gcl(iTR>T z8v-r#{_?D94V7RmOLc}h)uYlBS}&hLwe;YhgR^strGY<+0)JW+UqGvRdiV%PA%jZ%998Y9eh{IQ(0kRo?_3ZHGrjk!M|I8wik_swFhOnPpt6 zKLMk@(x=5w=c6PXVuTb?En@B7eQYAHc^cz8#6PI?`e9U+g@R??au_A#O> zNjka!<~@xj@0pm1nob}Zz{z{hcYP+r99UetK6bAUxefwX4kjf?JxpJ_^{&r(JTZCI z2F+F}z=+5Su$V#O=xC;KdByuuKyls`(7R0zQLG74cCiX&&Gkv~E%mPyn-$;9r9S88 znhn?@#m0ssE*0eI8_FsXAbVWhyU+Na)mQb+>oA zovlSwzShTN_(c#q6I8XT~9aC2({ znQuntYjMwM5rE{(sV94s%BNa`d*_&K-ekzw9(V;hJl+AgcLvVBY?djCbN6&ij=7kK zZUR~E;5vg50UqjkKuO9zoJOcxhW|uZaGE5LM&|+rss}HgzJBmS@WbKj*M~1(iL4To zsZ2#;7=UNsPg?LT*7;GaI06xm!FK&M=G?{2D_Q9_Uor%0)ROJAnmc-}b&LfjaE=G@ zsbPv`#v8P{OIt<7q5Ro6(De`M+i==0q<%J z$6ceQ>cJ+=3u8mo;24rn|3vV?hmTrg}~F%$Ma|~P5Dj0Bn5d8(z=nIhp_Vj zzScL_M~p?2DU4Uso;B^cH;Ht3mGF@zfDAFdJW-PH}tTVh-$r0=g(j^38a5 z_L4^u7s^!Y6f4rD5?MNGAGKTJHirV61+_Na6J)4`^jhRX&+8peSjXEG8I-GtL?1Z` z1KLXYd{8*#esr$3oGkz0RyM}WHiJl*C^^%EqI5Ew>JwR{KO9FVjOxAT&cE^}A4kT( z&1!t$PGwjRhAj4C)auS0}BG@|GL3JU-0R}>I9I@^~RG(4uA)3GuSV!H1e`X9Aubnf{ zJ^)c*=lvzsm>|YBB_QRHDvat7KNTPvmkYVfG<39iI7`y$yi?GbV-7@@Tg}c6A2>VO zj-!wfXm+$&lOWEn!bx~eF_UF^V;)Z(BIE=VkKY`;HD=B;@q2onC6T!)=$+%_mHhzj%DX zj-hyP#1#akHA1EJKifO4_EtLx+V^(u?FKhH@YRElq5ts)fHpBCcuqOy1!_PwB+rN; z$}KTs(#e>zs1FHkQX|(SUOx+m9*mk4%In+U!zo)6;8ae*F^9E# zGK0V+TK>O96Ao%7ET1snV5#Jc#hB$wv$gVOTb?)DW1JQKuS)w2UEhtO<=0I5c{TE5BhBz)6!C6vKOnHzJ0*<)ypyI1x!X}Fo@s+O!NqS`?Tw@JCK8=+dX011LGCGm?TVe zpR!fL=@D$^5we-=?Bq3Z{S_2Gs=rkQAO1L=P{*5_GDZdK`QOk|D;{~jZ-URv5K9fC z{_KQQdEgzfK0O~9t7djf-jmUCLFtVH-cYTA>jUwo*z7h>r)MJwe3Dg4O`|M|L;z_c zcQ;3o1Q~7gUtE75vu+X3{c1YIoVNGrEyFhyJ_uZ^Do2!!gJd>6pH2CYu`j3q`n|>B zzuYsA{)ec~-0GiV|Ie*0%m4GyN&K{ zcD94|*WJ!mx7}hCD$P{?)G`${_4~eprk<#vjIAg#fEVNo{F@eZvvPm!Z=Otnf78Qj zR`fe+ziJ6gQbFQ>{_3@6b3Niws*rQy{;R1-qPe!t-~3aH4-au$-$HJR>f`8rJc8Vr za5c*$ln?CKaBIxQj6b9r(s0Kv#RFm?qhxB9_7AErqG@y?0e%qV%=JG=KXg7%rf_%wZw8leIeQp#44Up7J1KGwunU$?|WzYqbEH5Rl$+aTj7 z!3CGQJ7$x2$EjBY?&Ce!Jz!dkYJwjQjKeonP$L#Zen( z3E|VuFMgeHTh#XUnskKR-$IbriLO-ubD?Nj1an7&x$T>-`J!jR+-Ic%=b@O(ZyQdb zj-Uq0#~eb5oui`R5s_216&`nJORqEPQ%WV2F@pqVNl+XE`RN2oOqno6x%lueE0H!s z*WqyTrutiaKG&v!^6a1grGKy+yBa$1?L)8!@$_Q8ID}9ErXBwkJ95W6N@#)=4OK*K z)~7}QAi8{wxSHBbe!w-}^s(7&qQdbf`UW}PCgCVX9sQG+@N%vCWCAuvsLwp4V&6rR zGmaonU(>6n({Pj(&Rl84#bJn;g@3}T@Q$uD$;;6s4Nla6DaOg83vGM4+jHV-hNpmuIt* zL6byyEcJ(qkd=4Iq5gWw?PH8^g#L8rj_y+O0^~{_dNTaXp>NC&%IQ&^3Z7!F%;Rf0 zna3MBPNVMLTv$PCVPIj!!-p=JXgM31N_H#Ii(*6?$b449BbX{yFmit{5! zx?f72J?E_j2Ou@Wc95taAQq7dLyn<|q^8>nSf@{nixor069z zkEXuQ(VP3V;i>~l2ToA)Rp5*1s^vKT%DU*1`roIo7d8I-KgITct(`X5|8?$db?)tM zf&b^d))xD|dT#!iTmOsNLWvH#9bk^@XP^ChlpG&_J4l;n>8zQWN?k8@sYrlZo2{?e z|1l1(yS>}pStt@{t^q!>tKqr&&Nf3>b*~w{h8Rm}KG~JZF<0m$EEJkdK zIL^^}rP5luab%fT|H?`Rj<6vLk7*9QQ00%%Eb-4^MA^;5S98oVtnbQ*^3Q8T`KPy^ z1b!9K##Ptgs$r}zT@1!pV%K4Fv(5h4*P5ZYA!Z=E0=D8*;r3$Cb5Zh1OgLehmQivM zBgKfE3n`_PR@F#Jpa$)mCWg|$6gUPr)&F$nPyiL#|8-h+{s#;Lc9X+i zJ^az~zg|Q86Vy5zOzxYVff?9EGMm;hC#;#Hbr_xnkHaxLqJzC~h<~)djTpU2o4<~K z_2zY5PC8hh_Q}Z#+k&jHe`H0{vh_&w7z*aw35wLVORx^~m%mK1E3@VFJ%MPEWO1X>@LNy;?N9d$g4idNl-`WvRF_R9uFk z;xa82gPXBb3_b@-#o&`#Dz1{h{&9>P9o?`=2GeMejED2nL8G3au#C&C3hy9*o@)NM z=V%o)x@a&a624tvj4U1uRNhBzZq8>1=`DXvOUOTiA*4Se5g9^$UiOc^q`{w^{o~32 z@{ec$d9}9oN7rs|bfoL_HPqK771T<*EcMfHJ2nmbkVS>ch;{asDGY3|QY?Q~Pig({ zqR!v{r%?afa{a$|?`^H}KYWr$)BpO-|G=`FhZ#0;#ntf6p{><*uN~68BKah1z!1x4!P~U|L}5-|cnnUeIG(^dYB~ql6Wz06ejHW+yT`n5AT1#F*}(9f%`sesaI< zCF)~cb*w-FT_MZyVdbs8m;(0??ydb<>UCFY-6gAaSKiux5O3|34s_+M{bx~R-lVs7 zu=3VkDJlP8O3Iav@{g&bMCOSnqb*h&&Z(BnQ88*RyYuQ7Nj~yL+4P@u2D|E5W{8fihquNIo<$muQWC#evaraS7wQ zG8oB1#pKHW*Ufdh$raqn&h-yE#%!Dc&Plx}YtPe;*#vK^)LU9yEh z5R<)4D!I1TPlgxlA5A6sV4M((HpmP&dm#bD98>18Lh(dcK#O04R z*)|WZ%$-PJ0;Ql~2tO(D22`4zS9}e*E;fz0dQz5xVvo@Pg5erCXfRwLyx?gcp&VPb zXU|_Bb_2#qvpz%Cu(R`IG6lf|(u;LTashr2;4!`d(!R0v50Amg)`2Jc-U#|LU?Gno zC^XFpFL&0=J08KQBpQT(e&}%rV5ShaqiLW4QPyuhf;3OS6Y=|z^4B^#Qc)-cX}QU@OP&Y^iMc<^+kkF1>jFl_bWTCR)t9W zghJ}?SAfmh_z=Y>r_(NLV>G;9Ie{>-Gcy?E)isvtb%X_`HI=u zFySp~U;zpO&7Vo>#$GQASnn_TDuQO9Cj9i#4Sh0&Nf)MVbrL*|*?I*{E$_1nj=LC+ zlW$PmfeEWFXNYgGCvS0-nO#xvBvO~@hCYH9D7-%7d0|5`^(#LC4~FkSH8Dw5U6;wXb#|Og6IFj2 zo-l%l(ansYRyabWlR#@_^t10@9t3;+0}7J>aUtmV?go3CeJ)U9bTl(Uw~S$R1S|;g z0+*MUfyF7*HNVspRYGKl4hkV;#iY(bW$HE|+#xn%O)4L_;(Ww7R-#FyWuVtTu(uD; z23Lkx6F5-)5RZo#xPuINe&#yORGwPDE*C8Ur)6r#vRHdIFJ^|%rOdTXQhOF%3 zLW1pREoLlfYOk)Y1a()!U0sCAR8(CA#0k+z9&^`Exm1`z>J>PL$`_gZ;P@@u8iRh3 z>Cc)9!vWzl*4BOoh^Q9mv)}L1>U}RLwN2h;+3A24ja&&&Pvk}c2on3V%bOT#T_MoP z)SxqlH_B&8n1;A)OyiVs zgivh1f&x7L4cw$Ass3G;V+Z(D0uGZ`6D>eRWL)X6B(8J_%xK0~C2MPs6!}dUXF$rh zWUT9rP}gD4fMSz*DPT*NIt>Mb*2IE9?}H&Q_@)Guy_;NRyGdH#-&>o#dggsf-v7Kh z3n$Y>6Ts)&e+TzkyH@;waasRS7_W0h)h1T;j5_&s%xt>jgnoX=#PLYT+6E)@MzrPSw2q40l_Dl1~Hp@!~ubMQwCz8UG z!mr`x!>L~75{V*nJzf8E(_+3{a@@9hRRJMh(m z&tmz1xE3QL`A^w60P`t_EOk#|jDSz3?cutb8`1f!!U?Rx3H)Kg3Gn%Lg9@NthAkY~ zMl^!KX_BN6m;b8`!yi!AYNCnRDi*;i7QreO!73KPDi*;i7QreO!73KPDi*;i7QreO z!6%4C@Vn?}=Tnta^B8_WDa;F^5WtYDmuv#pDM)~{Z*#&D99*trz=HqI&Y37Cq6uL6 zOOV`ERbEhg0q_L|UFjxtZZmH50|jO?KBn6ES5^8=2_I^#q z-~JknMi>30-y9^(**inc>p?jch+=yaVo~e{?M}C~)!k_=k`kV6S#iGYuT}TRhY`FO zrByZhI9Bi|g`d;pyrL-d-tCQz;NjtSPoF84Z)4-YJxc^_#|nqf9vj6Kxc-3%lC#<8 zJpq$z*{5*=o@M(L`q%80=rFi?YF)hKD|Y4UG}3(RaeuPu>9!L|XH$(p*7X6#Q5t}<%nd4C_V-lOGqaJ#xup!X08gH@JZYpp#GAZOe!{w z{1SAh^&be!`4$l}ksin4cJL42h%w>;>iw~yfV-j!AAm5G&f~Z9bV;U7!!s@jy%rG@ zFjYDTi61a-)F^(3;TF)jmQrd!YIEIIus|Liki(i}Y*G05F}jVq3X(?$hLqZXeDZiD zL9rg#L_x!`FinKu1rTGRpJ0Fqc5ojbH*;lAE~jhuYzrm8#h@$<+l*;f=d{jdau8ha zFE~uRr0^M1NJdLi4nELiHa(wB6_YODa&Dmh`3AZ#dHzdIebY%yP~1j-{HNgF_HGB` zKi%8v+}qvSM*IJrd%=y5ef6;O|MuhOk6!=s;t?d#MC}I;9u#+uv8shV(_3MZ+h}BB(~~EUG6x{~KobEGDk$C#wn;&E0u0tPW+HHU z%DBES9=G6sg;R3HSRdRI2WyxAIX?O|d>^KRNqjzq4}8Co``wzxeX)|bTaHFaa*nK& zhqV)hERkPwVqPGO34)5@bUKOqGj5tJYwM zA;o?%_FebLbOj3DDPD*jn18pzG;Pa*lY>2m($cB3L(566vGtsu9*B4>)?}&vxSbW0 zLw?0(hGLeG9##&#b&d?_2YpNViX+P5_Gtkyrd`sb2CfdFR-fMx&F$y1|`gwU}a@Kv63PLK^*~9GLndD>1oXO(>PtH5bGMaw*?xyUN$8jG5| zP)r+W?%d?AEtRloo7O*b-_SnOr$@3^-QcU%-|q)vy1xGUYm*!lHNMOh@PgFnkvnnO zK>YY?&a7HcKw=T`tQ2nB_-jlPT`}lNGX%Uw^b3mWs}nGJEHxqVmNYo}Ym?0}!?j6f zs*rV3XdWm~gnNs)irJRrjiqZ(;`k#{8pThXxt(}gg|7pXI;D$%Odf>UH{-><^ zr%=lSTdWaG(OTgK6)z~qO=OpO7d+)2aixTK z(I2rwSW~JEgqlF;2^=-TpGBzm#5i`ud;47SDNWLB9#OwxGwH^A;eNY_~bf1egw0Aq&dS6-Cf9E)l)@)a3;>P=~RzU@&c5HD}1Snvv4{=F0| zna6^SJPJ8Hn4Wb3tVAf?UO+y~y47*4FkO8z8JKuzQe26t7WyURR340t*o zWiT65!?eIF(8g*CShUH@m_Qw7;VGfx0*aTzAqs0(IjTiV)-d#hnTRE{e$E1BiW)ge zNS`p|cH_^bA6!KLr)7;S)kcB+*Y3`}9b5mmv%Av&eUj&!VEwFm+tL`S=X z@fmXp%b!%DlXrL`tOJ%RiHJfDS=JP_{^y{if&eMxUAhI|>D($DE2Rw!9}XZJLqO5p zoYdeZY&&bgIlpcB%ixuj!Q<~J-7EYGy~9+JrQKk16ZyI{%7%}KKegKmO)CtssZ6~4 zp5Koako??qf0-nZmjDH8W0Gx)2^^F67khW|@{$@n8LjFIBt;(2y62IXRTJcQ3FhBiMdqrx>I$-y`{92 zI#S+7QR$|Ru3|qs>dI@-i}ux4Z83iKp}AC!iQJD=R&J)f zNbZTeZfJu#rQkton!$yzzg)nOuD#YXN4f^oj6$dn;a78JdSklR^OT@Huf59)u=sn* zoKg$e^wT;({qegB8t?ykUf6G}XAlm#hx@46{}+?t1b!Kx4TiyHMacvTKZo zKVE!*f5rRN^5caampVO9T(_^oPdVE>P_yZ)?`7+m1@yH00gnoI z)&D5gxa!AJqyGgsd%6BE#>0^~ln8#;C9eO?n{BE3^Fw}DZ-eTYr@zRJ$jO+Kzo3M2 zJUKO}myG0JGSyH;v|4^1aDvyAj`P1}=F3ud|KIu9*uDR+`cv$G@W;{_{~c2wMsbW) zx}KN)0h!0XqIQR`s8EvQFb11Q>h72`GtHKR9Naj}DcHKDwdu1rWkMv_k9+WagPB%NY2c(47#w>7Qi>oAeW;%( zUR^S(ZGSZR*VAj<1k9A#k8P?S@m`*U%}-2Jg?LT?%3-CfXr2ba&{A4HR?Oe5Aj3MA zDA@(7{tksTNBS_|c^)5(FHm~J;DRl5mx<~_ zzgsTEGnsH$r#DRxd2;#S*U+HFG8?#PBe~`)5y{8qwWzx3AIh zM-@!8vs^bu;KBx#$k0zG$uS!P;w@mvK7 z#vL=Us&+%w%qf&0o$i-uS&N{*zQ3MN)onKyp$bviBUSFy@gB!Naw!X@e!?W8{nN8} zKCY90(>j2H$LWH^GF4x~-DPE=>p9Y~+jG?N`i&#L2$DI57l3ToCl9>(eFTrk*deF~ z7_1R!Zt8>Xvcr=%x8Sb$^KuUNF2Fsyh)pYrj$`vm-ZzQX7RE@4X(&-`TWxvzs(`8h zw5XK5_OA`zDYN}acW4Ftrhm&>UEi&iiw|$V#p{;=Dlmhs2AI_NyQ1)q%1XgI3n3xA zKDmoHAY=8&{E}ePz!nU%TdKxti*~cB?7xM$T`eI~_^J43W%X#o4cp0UuT-PTxWYTD z#HH*94N09n5i&)8!*+Q$;_9CFr!IRZ$!T@+Mo6%^yv0i!q&VK(R{i=@q!`}*1_xHP zj5hO|>3sHa%dAaI<4AV2$e(BG(#d}ZfWbNAkc5ArZ z{DEEn_&?AY)kjfn%B!7<>D>u4ro2sU{XaIbb-j*~~Zb zRfZAIwELuwk0PJB0HY4c1PVGwl%|K612Ew0a}!)>__FWBJ8`^t?V!uZk9)SQIgZ(u z?7WY>Q2-IChKG*9(=f)_rxN!NaHNAmfG_8^55JLCV@RSDz47@V#hrG7GHBRGS{B|>Rp(*0udey$j#%(6-@7Ex z*sIu_Q-qaw;Zzc6#c2|@t_1-%8Z#dRN9}eRyd~c9EkXN6LysJvZm=i>pzxH}y{rjw zn0(hapeT2F37W(nCri*bB$4)AI9C)7Fv}I%ybH6M#3NjUHEW+|w=Gv;O##sOk8>fW zW8B|L%;fN;EXL|^LpL2GNgQCRk~0!rIHqKFu|nC(Z<=Iq^<+RMUBtPr2j(2n&~4UQ zW2!S6N|j>N*c~Z3MdRgdZh2%wS*+7f-oo!mM;+Wa(KjSKUgv+(=llbD<&?|0p~snC zn3(5qerTuWv1FIV{{Q#$>2LSVQUKTBKPQvHxrhHen~41n{#ZKt|Ah(wfdAkBFl+!| z)E|ud!$K6Ja(G^jUm4&yrgKvP0HGoPf`$OT1FAd%@I78e>>)r!%E>Pua@41ZW5-;n zrUG-Qn_puNO-|QIJZv6@9KQ0QhLGUD)ZJ=(PWf9i`QyE47^pX7bP^{?0u(evQlUYU zZ2=GJbtw^{jHLDf>kgFPS17-4^|Q=RL7c-SEQ#_*c{`uF((ySwXaNzmn9mSF`%F5R ztKXs(2(mw|5)iDHXogJ*7|<%ibY(TGfYE$BAdWciWfMRj|37q^rjrzG-KWZQ zMl+oNrMZ>~QPW=>Rrs`;BLEPZzrjzhRdJQ-L-Rb^zB+XV$GBBifd=YXq@K|GU{R0N z6DNFKmb>y7u)%(zPNBzk==c~}4s6kZK=te=(~II9w%cH;PzJLQdZH6VPn<|2x)DTA z)MNC-k{RLzq$f_4jb01S197As5W*nzp3d)HXQ1;on!oMS4|lJPB!zNTL|%Y#l|23B z*X7-7h0&A$(K`<2H>u})qoI0IPFu=>a+rt*_n5TY|2IkjT66!;a4;$06lgJ;oR0_R z68{JFk7fU5clbZ=!(iveU-k!MF?dyu&dRfw;v*1RE^;t{jssvPP`@Lv?+ENW0{dJ6 z?ibj{Q=K}F8V|=8^RqZUmM;&+7eet#(|8wn4F|@jZSK0}JOdoT@wtATfJ_bqA_xKb zlEX_-Fi5^E0*8VS1fhI(3$h~!K?uv&q?1PoAaKEaEx&q;=8F>85w8T!*OFI@=WD_1 zer_c1BoT}8Yy0vv$ghDs5+DjF4Hl0B!Tn-rza6h14DQ$ReNepL-lkK?02Kj5rF2npivIW}({k2%JJ=EXhTeLmc-+oqYANThqEZhwE*IL_HDehTNOywyi+-|wO{_W#32kbm_Tmb(0}#c;&^|HWiHIiCMNNWtKE zL_IB6mx~Y6o-sPSuqRhc8>LGhdPv98pfsNUXwx)P0JZafFmdPq`7!=?m;&?Pz-+=6 zik<%&bYo_`HgF$$6vxuGG|&G72IRUgvxDy<{x5{Q|KogIoQ(&C#QzV^3bFUG9}CO> zZeJ-z?uRmRUljeps4~&Y@wglhdB%4{vKWw7qonUl@8p0lW4OyEx#3OrxiXHd3|Tl7 zdZw)$L(1HooV;oIeEi3r8pOLH(#Lz23F=Ob3HP6ed;e|cKe-*IRtePJ|1%gn_@82Q zJpXf;!l!TIx*ihmxUxxA8*^i^u-bJJx+vWskh$)XpFpS0@!L_(!}#$C v!nm0<+^4n#`ieew`A>kBEkv1&;lS$tSdN92{{sL3|NjF3DxD@800apDyl;S3 diff --git a/campcaster/src/tools/pear/src/HTML_QuickForm-3.2.5.tgz b/campcaster/src/tools/pear/src/HTML_QuickForm-3.2.5.tgz deleted file mode 100644 index 5925a82404a1ba80eab1d38b3292b05eb4ef0cd7..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 97612 zcmV(?K-a$?iwFP!000001MI!|d)wBP06IVGuRv74P)aC?`yyLT6;zhv#|yp8c=qHCz35x92q*t$wEufAqWXVXxEed;jr&Kac^nGl?>bDgIGG)7 zH}@OcUN{>kK|H%S+J1fZZf`K?4)>bd-gnQpo_+Q5-HQ+Z{r<$8Gun7(|9$r1XDd)7$4CE<^AA$?@soq5Y_u&pb`8;~>nuX}Gvdg3ODO)ElRvzkv1B zy=#9G2jX{lbR1?G{O%zzd~%xYKRb|P;kW>4oW}D7%$3Hz%c#LEOg|p`lgTa5AXMXr zo<9q`G@J!tY7V}&^$MO_reSut^^Nx?NkeaO>Ce1Y10ME++r34yx6DF%+6yP)G@LEq zt#7>lA|T^rI-kV;Y~fvmvoM8m0{AQl@rk#~X_zKUm}30JA5C}$;gf&P>`lgzwy zISC2s@p6$&;j^)qg()1_UIvRapF|i@JXwS(>>|GL4&Dy`whXg{_u0SpdGlxva!U9b zoyjDI$>$*=j8`#CXE~oFK5S&RoX?YVfuDa!7XHK=FEf}_{5wNRBHjz$N->Eueusv^ z6{a(IZxO=Y;LeA$i+Bb{we$MJf7QLS_+skUy;qa)%Psr`2fw)8MIi4d%Zm%z8M)7O z-WcQP0Eu}E5tk8lOmso?nfmc;0sn^w@o(!B{s2CL15KY#eFF0Afc}zS5&nN4ri&B@ zeIuWd*Mgo20p#TQNC5cr)Svp9Kivmhcy_?w$tTlf5 z*@66%zeK9~ywzxQ_Zow}27FB)@OP7V40kkq{{F}J-p~B|vjh1dKawr*ariIXcwhkw z{qihXgcH6n2W@_ zjNyHl%y=QG6U_B5n&2YkD?a1hz)9{TvoWmT0(N zfwF&r1^HeUU(DhNI2nMLEvF;kSwMGjqWfEWK(6trKedMahPPu38pMGId*{KdgGngK zbQUga8j{3L**-OZge2@CR!_q^i(A3KFRIRifLAz#QQ%nElT zFzD>6hkpzK^=?WYg{k)Rqh~i^5NDSq&vpi_rhfK4aM$k<>u|rAuJfXY!dHz%)GKPJfrK#MvAcpUKZV-F9==gp(DHqu*|O zJGF}%;h?{eGKJ&Z`a^i|uWLLAw{r)!3M7hK4+IOi-;5G~8Xy&UfS-F2@H-?2S?s`& zZl3@|5eN~0oF)j6RK6^P1gRb%U?#G*8y%SIMYuQ-(#a0q=H&!M6A&P0a8V}{6S?~X zATW#M$HjD#e>4VhKTYx0!TkgxPB=*Nts&|mG02SZ2R&H9DI9j3!rv$vdD$gFMOF}_ zV9Pro?i`BQwMLCWS_^5x>G<9&AEi6Gazv*92eKH&ubazo24vtG0r*T*K`f>L{Ro6R z59pQeMQQRoJST373BTKbg_BGv1vxoUyo)0xeZs?V)A6%Zt_rbjmf!%9mPtc%_N{&c zjv@7fIDw12fPK0EA$v|>a&SHKDW-Cvy%BBLQQiPReuEB~r?8xj=@)onjI0Q*lAxGK zw&TSmQ0w1A@9T@jQ?F?e*e;M~ebVF0aC}8bX7h+FH#R_Z46gx?(&Q>Eoh^W;{m6J~ zlIY?XNRLh0+qb4il$GB1gKL`WDEYG198H`bAVGhhg6uJ~^bt+ii7NqFX7nM%f48^{ zao8Z{3(YzXBfp@imJ)b)7-wh8(G=-<09T7u!2FHx4BN0kUKX4gqtf}*|8kC~MQ4U; zGu#un^|%G`HS!Bsn&de_82NBHjjefe{9osEkr@Z&@Ew+K#+9$!sD&v@Z)|FHBl#Td>ElpNb1# z!a~IEBbsOG^*THTe_p_{GgIIISU^mP9;4h6Pf^w8HJZXl52@Sh06s>A8m6M7_dW;AOiDC zCQJq|lIb*=9Uh(o#Xbgk;EV(cc$ui1RE>ec<$%DM5q76Bs_w9*W7J%k@pXFbI($#4 z&qf5T^^a}^B);7i#cBaQ&>D~_%W)zQ*+~F_s}P32)4}m?I7v7)v}3>nFq=^rp<&{j zZ5o>Ym?+fibRB~TDvoRbAd*DJ@?D^L5X*IM{42B=EcjymiYSj)3&%}?hJt)S8yAGI zcz{UMMNk?sh@>?zVL@#&C1ArYbO(J4<$FLWUchxeBseH(4%dX@{hJJ!fkCM?CiI;4_uF5UAP`^f_m88es0`5 zG|bGU&Z)^M;6qiuw_?M;JjwwxYqhvRYBZ+E)k zVAu~E!(n^a4T9ky81;t3M!!4SCbT=+Rw#r7*I3EjMjJFogZ3zDH3t3BFlco;17Mo% zC>XV1=w823812Adog0nphaDKB*Y1wPP6Nc0$oJb})QG~c+Z~Pukz-^7Gd3LBZ#TxB ze$Q`@{q8902mM~V-x;^UajV^r9E)ZFYokG48n(WueujoagB5cq>2@WU~jZPaeI z9P53MZSIao%~2E#qEWZo@AdpmkY?L>odH;BUGs0e?fA&1>= zXFP^IZS~uO=6Ez1v_LRwMuSEOTR!d;ha@7m(U?IP_6MV8FY5W-UZ>shM=ifU8UR9t zqkh|WpwVRr>P5QIprc`DFo?ST*za|NVatz(LD*{chl4@C?+>GvV^ES4HX5`!ZbjiZ zZ1lQApopEZkBHpsciV%Y-R(4*WrH$T+GuEi4`}1}`amDX!(MYZXf^?TTdh$m1j;ya z4K0mK8*X&aYY^?7OdQmfIN9|!NYy+l6e#1eTEfU9n|>>bqHY9>?gbHC+u;b9P;pEU0A*7?NQKekK66GYo(;(Y=*tPUZ>OXqi`62cs3rle9&8g42FH6hr_;uFrbZbvpd@J zgJ!qaA9uPSvcPhI4EDlazt?DufE4-eAwd`SHyXATHd;X9yNz(%Y%~UAxU3*`_i@Mw z#hBu-UmidpYye4*x_wyMs1J0AuIvD?cialb4IqQXQBQ?2VWVOD1AjOGp|=?hQ5GF^ z!&bW!3{ZNC#_iCt*wf{Pa#8@e+G;eSaknu9{B3r+O+ctYztb86c?!GkAy2~#(4x}Y z&5m{qyW9wTK&+tE2K}iu9s@%SI;~N=4Q#f2lMl#Nwb{BGzTX=IA@1~gqfyr%4BG*y z9_`L>6!wR$;i|#eP_~(fIvhrR)bEFbW_vVjb%JiA5sU*6F~Xn;Jhx&B!lba-_76t> zIOsMbAz`asW{!)~)vF+Lj-H{%<<-mnohVD)}K z?2a065@UY=69E|ym}GC|=w!y+jLLNez#d0YrxCV*m^Q~vkmVbrexvIL!**DO0rb(2 zo65JHQM(J;C~>fU(CDBh5#lujBtX96CO!u*02+GTHyS$(fYJ`4jt}B()amvbVcYKm z$!oWx#<@X- z5CNKl90*EcYup%u783>Cfm;%!fltvny_vic_C~`7NV#FROACc%w}w98xgYv|>1G3) z2{$vbjC&xmbo#w;IF6!Gv(apgV8k&>YyDy9(vHQz?4&3kJ4nVW2`uQsVc#DQb0xK1lo^sD;BQutwxC zzRd<44o0I8w1`2c8}xgvLBHt(0S^b=LAMXIy=@N&+nZL(D{G9{Xa(I?H*5|&gZ6Md z>ULoYK5#=g*ioYq+MCJ_f{n)ObcT&C;3*m#I>TnW4Z{F?>Nk5)d(hXWP#Uk`Y`gcc zpu7yapneYqjZV~V58BN(aH>HV4Sm2NZD}@!i@)kIAVG~=<~Z#8>p^r2W(1@ORB_mXLD27yL0v~#p%De0s(G+r@F3G@ zG=o+jG>=xN*@ycy1Vs|G*?!at`UB9unkCav($T~0#dv`90ZrnzhS34>VuRF3VgE*{HxdOw;G+suo>nqx;cvnJdXY#@JHibzX`_x zazeM==|{cJs1-y(A9kc)G6yB9Jjf(QfCat2--yCCs)c>f9l~Cx(F;4h5G2=e$s|}^ zcu2fJw$g#?5Q0V?jiYv}Lq>KGYv4FK1HW=24|poA#uzk3ke35su`q#A)EJHjphC2P zy@MiAG7stL+?)8LaIzVV_5+|$%??Ny?f$S28hUd8Yypt7*&H+sF)}v=8M2Ta#EU%< zyT8}kN2~4qaTGXGvkla<-G}37MS}*gK~ z@@L~)cGWEA_n%g?+a5;aL4?=1-);cD_WQj-y92zw?}KJ`*J)j(VL01pMj$o$7f`_?N%@I(v0Hm@JoDLA2VPo6| z&eQJ>{7$#O#dlM=0-0#W|W<^U9=ANCu=P6z(!v>TvZu4+P>clnn7bV zqAqShc0S#2E9SB?o8RDtSSy>NDxX4SROpDbZohX(@ntd< z&kU|C1c6b2HAmS3z$D_hS|hZ{=ZHy+k&WV6ya>HXlFT_q4ChSYpi4^20|3D-jtXF= z;WSBaz3|H=0H9nnkCHwx_${6-(j-`pDNxO$jl*Aj4h{Z7QBfkUtl7s<#w5dV;R~D^ zK#$U7>Ve6Ny=%8bUpwg`~p{)P{hpW^mZ`o^NJEc{({Ij^WOUyF-nMrI34>F zj0KcS(Ak)m;ba~yCm1I$k`^)MQ6*(GMciZg;?Kn-4iA?z6#%MYn)4f#QgVmbD0py| z+=#3K4DF@lg>i_>&}mAe5ZB8uB1rO|=n!KL9n3tAh2bDk+ELsw&QHKRBp=@bXhzmc zt8b*TJYlx_GpQ3Qvm(ijR?8?`K?Hqr3^D+n`d65JLj#Iwef_s(vUnQ7jah^<{(~N% zc_8^<#YK((%TD^MmmWr#l)&P>`rzWVg^erQmiPz9QLb*$FKJavwd|U z1`=<7;R}e(L5I?f@~eQ``2)@i4Y^_sH%SV2YZNYUSBc)y)~YlLsf^M#>&+9xG#ffT z7M2%}DOQ>@csNgt^H(qeJ&-9}hlg3H_7Txm>_VG>y>RkA8E6jY@QR{%MZEbe@i3Yl z6Kv>yW)yG_xX4UV&a+Lo;RikwT(&0vBB>6h^d4z)hBxY!yz9t_b3l~!NZ*Gb2{Vx_ zLj+E4KsfhP9|Nd)U;XL)>1>qEpCY-O-4aU?Yj1ZcNv$^ZzsMAb8mIM0)QbE`7MhtZ z#^H-B0=<>3Mq8hYkqVhhJ1@Byyxbw@%`psN4MB{gp!Jlbs&IC(xD@jgBX=+@ZZq!K zuHuf3-d^ip${l?qL|#oqQt0a_W8}TgeuJ(MKOm_So((b|IK>1u7wEI=el8Ls$(p_T z<8e4gImR0$AZ`01%@PYCERaB;?4s@#qP;=E5lM2FNct$xnex+&{?u#_TP27c^JSsT ze;7be1(?hv5eZYO)&QvhNQRKL=p>h#NNo^9bsKbtWZ1vTjDe}j&*U6=WR@zZqQjo9 z=%7OC;k|s4h#0BaGSWUzGN98wF;0U4;USB(O5Ep}Of)pIOo=?5g|N0o41>JE^u3E& zSjb`QcH4)ZwCL*n8^eKNi3%8g3{nd3TP8M+-DoKH$f>KWA&^vnjLtFE4CWB?j>^r- zkKH7d;bbhkIzx?3A6Ky`Pe)1-p%ry5QIKI&Sd^kA^#lY56q|K?|+0lH1&S(hYr)t!@JE_WNd@c@88A2J|k;079j*-f#AF z3eRaSFOKkDa=?rfO`ay|c;SM0@dts@TG}ze_l6xTOk!QCEO*~?xs-~n*NHMN;A)F< zG_=jrc;Zj}>2gyR)v9Ds?Y&m(u~^i*S+2azI6T}s&X5q|p%Wk@9~Kr%fU6SWn> zq)Nx%Vts0gyvo~QtuD?~Mjd>MS$crJH2Q8GC^Imq<;5kE4jgF0HARWuk6n~^r5U?fW-PB2ohg(>lDEFZ^ zUZ$8n4toJI+7(;~U0{P|n#^QTf~_c7&L|5Lbdj4FL_i=VQ$M}pMVU{^hZIG-YnbGTbeK>KTihP4_D6ce>DW>{G% z9;1XyBF0sCo1yI}B(X`%K!_Ej-7GFsL?htnv`jTAN>$7jp!g!XmP|se6OivEs6Sb< zOvhnq-fn?YcIQ~6T`86!Jv0o~VMW--YXm{kn25Se4A?+Kv<^5T<~= zKu2XtWrBo{qN|f6<>dunvEYrbFJ>^kWd= z4VAKX07%OVVAoT`nw_7*$pkj|1T@fOvG-<-S-tuMxC#STu)(@Ba9h|eNM*@BVaxLTOey6FD zaMkQVYF&7>I53zIzk-Fzq&@jhtwyUP4WEiGAbYd+0|{8Jz=FACO38MDyX2xegvLU0 z0>lDk9T3p5cl~y!1duA)lgxlBv2w;WaDbli!)UY#C-F31*qQcyoZU^DNYfx}1iT}P zX`nX6HuU0bT20s`BLsHUE>-SPv(YxmB~fdh6d5@#lL^UV`MMUE0M0dh-r`h`*m8kz zm-9g9$RjhyYj)ra}~bm@;Tw6TSf<6gaVW3X&4ODQn08 z+Mv{c-Uh0FDJpFM>Tn?(8UV#c_zgt~VeOQbw9m`gm1U0MDq}6sC8@|*yFJ)-(qk^Y z)NK}Ovt%fL6fVL|7^i{0RjNFYS-3?!k9=2`B9o$~x)o{$hMp}%DL{04)3meXU3%-& zir#=ghXMf{be**?y>KjEG}yJ5*lB=Py%0rGaP!V(R5{sSe^rY18EJ}Uu?w+9J*!MY z&gy9HQ3<6mfwi!hS*9yQnCukkYnY9FWNgJsX#74h4uR#FQ490*)eEmRXf4cj(XqdWM`MGNF{lUSW_)N^-~z=w@}i-UObXjr@M1ybJp5c~ z5;2#dx8vd#Ggl>%+Ih{G!A8`xoOZVNn$29AN`K>ObJCAArE{A|l8g-Aw&6g1j> zZzo@TRg-gHi^WI^eIAQyd%+=V)(zwG3pG)@On48-o-IDgq(4|(dDtWrt8J$+*}Ktl z=?B+78fA&+<3Ykats18|$+u{-9}6NThQxJXTm%&v8XDd zf;0++JQOcTbv2Gb^T-zIyowL=?FT`AFJ{{_N2QAj!;V@1#aTxzAsV)vu@*+mJ)B*l z+#S@d=Y+(FrFxMj!N1ZF8)kwJu%e>ffLadI+>tn}^eXP=rU^(2n%_9P^1UBWIY;ta zQZ_7an#j3oWi1V0`*?{G?`7=$5GO!%{NI01N|i7!-F9;s(um5{$^zr$*7UX7Y_B=! z?z%Qz+s|BX!py6o->sGtDnEXbM6q6YAf^I<;w)Sv=6v8}Z<57`ZbM%cK*EY;c$-kX z#mEU1cxuyl_TTVKjf>o&|B(K4jpN)uysaS3q&&7Rr_)-qLcB`sI0%-ef zC;7m--tmQy4d4~v3V8EG*>9!_gyBLW3PK=9V;QJ}<_9VTrlN?D-kzSkdH3tdOWatx z(MdW2onGF0L=N#polMl`wRd8DyW^GyjeF5)csuO!B{K#`BT!v$b>TSVh3?_53q;>6 zcWCciEyKGtwPkG=5Ud)QW8|QO&T6V~tWt^C+G1J}oRdOx*x;e`L<_i&{K_krqV z|Brv21hZTBHS!79;(S#$k4*3=F1-gH2m-{1%O#L1rwF2SBT+Qa@Mp0IQTI$=+fO0x z-AOQo0kSHHhQ3K2K)lQ%Jk9c@oJT^*%nc->)qaFCOW^=<3yYMKhsqU|bJY2?4`J)2 zri8N1f^<||g#rp<{})9Zxw^7^NVqAaZ+RAeS!_*7E>33QzW1JMd$Yv`-4-c%mA_&X zzxQRVyo&w3=0Eu=ax6#DJX=>mwL zOYcL}@6P}Q;;~_|e?1O?_Xp?@aK83^oLHH6-%;0OA`>) zKsm^gq)yj0CrE5g*GihayC}Hug)DgIs3xuh;v3dlC=|itP=p#YdeZk2Ey>z}oeoe~ znHBvYXpl9WZmEB>OegFMLe~SlYoIP{AleyAC@Ak?AiMyx-@`N!D3f3)0BEr6Fof4< z;e}5XevzyuS&YB$0rJ{O&!oFIV6W+%u zg<&|>J?E0t6t5&%Fia5TLi~)95A^lUt3FP7ww%GO7toj=f_$M+ogmP`&e#|Lb%w;MaV!*6 zDXG)pFrKf!P8nA^14avDiy|3@bSZGj^qMRVYq*<)c=V1a_gY5)=d2kp zM()BPlHRkki_Wjb8`jDM-A-5=9;47J;&?1ENqSwicC+uD!In!_LY4|S*-Wx*^GeH0 z>!1>B1QeB)8G@>}9A~CRReae-Dm?n^7g6>d=@~8-4>SK63?@F}PaF#@3|1x3NR%P3 zmr;UPi!M^g+249?Tk}K=2e}IjUqME)5J+bjt{qbY1qAgu8SQWVLYF@#LNKNXBKT@5 zU4g>azzS8W_(7dxjwi`T)$J#5Ie_`kUtYiX>D9Z_H|H-;-k+YlIR0?*a(^>9s!=IN z_4XQ_$C9I75orU|2ofSA6y!xF7AaGZj>sPwMiA1et%x_PmrmXEQ6T2|cvJAnZ0ge) zePPO6z(~bF;f}!SUM6GJe?~UaC%ZquAw9xbVx) zMR6S_MsGNb{4Ay*b`_<=*8tnn2^>{X=!L7F%+!vZP>e^7bpax~H9nBKK3}%q`ZF9w z+1@BX!ng24;tiUx1*1hrWO4j+q#y278sA8!DZY3n49*H=a^BE9anIr5Uy?Ar@V*DS zdNqaRSn{9}D=}O|23*?;udOI6m*0g>JODBMh9lfarp&I~eCr*FEx(JnoDv3a;J-uG zb{S!KA8A&&k>cw_w*gq9Sw?)U@-O*P%ZTNg5vMG|qd?O)w{bI*P2+n&^wx@t)NDV- zMcSjB$j*N2TN$IKIyy)>LpI~HWIfBH#*IgWm|^%Wb3Ll8S1>M?bS9ZrhfM~Ah(>G= zRX2>d!eAMoo+8c8=P7BB@VU_1NN6ag`-m<#mgAg8S2|rRBl=kDA^8SF$jN4?ldYJi zbNrKTwO|BUJ8hrN>x4=;VXJhtNNh!DjEnWWoh*lMh0HlQrHp47&!R+TCPWnS=&*xx zma!dMRUGI<7~QaO36U0jJ~ui|R@|Z@gzwoKoe!HLKr)&-mjdYR{50{GnfJpIW_5{v z{PoQH9HZti`y$oVR10?IuSpUZ@sx(AJpVeNvI+{qlP%_rWE!NLsMeNt^})N_UV0ca zJ|%^o1#=UJT~36(TyqR+|0L9Nf$y?gkyI7l_~{jFCrb8F>0auHRSNJpxFE**N-$Qk zZccB#*K>-qG%^*Jvm2iRPBC9G3PTDdbzBPv60@a4^z>R`TgC3Lm+#MiieDO*8%Kx; zVmF_be8b>(( zwI5F?9ZJ6il<-j9+da;MLRyndaPL)*u^=R;s~{DH=Vam+KUi|X_Jpku?HdS71W%)0 z^7_Mn9Z>()d~?@*Zk=n*7fp%Gp0LMFf=O2U9_*P8?Lp|j=DOh0n+uN170MSoB1y-> zFR?VX%(BEAh){%)Og8`{;wXII%AU5*oo-G4^^8PFj1QtHWNP-p{LW~VwC}y9L^x6~ zp%$dBV|}Kt9nU^w3rUHYiKaIc53nyP=vhD>h0#ko(T#! zK#0KX872(nbZU@?Rlu!~gLQv9C3hh-yY(F>f>WzWVjnb~?(IU;*SJoj)9RH;j6(jH zC+6BD?>oG)jV(~9&G3*In=!LF6Ju6|lptOal7px?L7K%rIYFp3kY@)n(+Nq(A_cXg z+g{UtT%x`ew*0U6gDoJ-l*2jD_?nTDp1<3NWl?wH0Sa}`!a2zdMw4SURhp(oU&WZS z9SqOsDx}Cr=Y266-xaP5M`psE5e8xt{UzqpHBb^-0sYY$8gmmnT0D}loa%;Aw&Y;N zBnc){EW+1}xUd>m0?B~1pu?E5_rw`W2ZMOPL@EjdCUqV*-PRE4>3x}WZHGOQ{ZOQq zs_leLq{WI#BY1nLO)Q%g*=*0-8gn9zNFNE~l*|R=n61bNhmDhl+_0~+zo&?h#=X>8 zO1yFmog=%FKNS(OW=m4rxJhmVviPw|r-KHD+rSKQ-!7Fv;8k2~c0;RtIf>xuQkeNud)I__5nVK;RtfQ)q!7{hP zYvmgyoYM4Gvo7oG%3-Nxgtdtr=pqSRFuM3;Yut6EyFL6x)`_{%W4Bo zkf&>rHX#jE8s$}%1&%LCpVn%Lmq@vN=M_*pq7(0v@HPOF00`uC!BpHQ4(URJqUpMj z*hP8$;`T6oq#I-Cf`#+{0Ttz#on@w%khx=>#v=l*PK}~-$#jJ@j+3ZS_Cas5t@mhd z$+R%k2=73|CEQ@;ew50upl~|sS_hfomV^3EUsL10{gSW|LJOm!2ECD_Y{g3oX+@5? ziEtmW{ko!ojK|cQLn&qSuoA#4uS`yYF%(oTgT-NoTHnf<{_szq`gWee2u zJ-jkncQ0obek$Vz%3l8|x%S7I4n|d7!k2*7E8fk!q?8pl4D!)Qrn`_Bp49Uy?6EYD zsq)8(&BQ$;w|nk}mL8+B7s`Mq+cjt}$w|P4nL3_v zTKmmv_Z3D0J(l~5(mG5jJH;yciY9>?jE-6~g9ARNV~Q!=d5QPp3bqYXYcdd^z7c1s z{hWbxbYk3n&PS?I;;+f#b9m+b5QGz-z~t!{5*$VN$jZ9&7vi>Ozr%T^A-z;6>SHX2 z%RmrWuoPFTk@pVzIA-4WehOnvjP>M0tC3M^ogve;K8$1%R1(k~B4(yS5{N1UOKc8n zBBY4B3BMdNi8e+T=;%rkL=BlE(X7${nLEvI=Ox_pzs3^`=RxokI8?}0ld+D4EAs~a z`s}^*uab$}ZyCX1Jt&f&@doN3bHN5!Z9oMDA*c#wSo=xUh|(rO*$m3tdEuuh9eCeQ z!tko@Sqs@BwFv%)TMS5kD?(H<<^9GrX{lGHCMa`|kg@l-KIFXS>}V&I2!q|ef5D0u z=_bFZVpF8=OP4&n7NZp!JGq-CfLRy{8_N$yXs;AB=xxzx-YlUY)J!T7g6-jj5Gsuc z`x}v)VI{R`Jz7amiPtDZiuym}OE_P~=X@5lusZ@$u*qRe(G1^cVL)DEEp$_^V74%I z0=9gy^vz@dZ>)LyaWC0o#z)9TDU1(9;-j(0;_gZ#6N4uymB5q;=}!P%0>(##6cc>P zFeQS-nhKLzO|10I|Lmk?uGY`CK&K&ORQ$055NkSzrkIAWP>}&vsDGia|865$S^@p*kZ$nE7Xu)+iU(I7d@1 za@Q#a3=C^{)FK5_C zbZ1v2WL?H^ekYjcm@anpy)(@=7K_hS7YO&|_aE{5Pai3MntnBIvF)W2NekjrWRjjJ zQnZh<)aP-G2?#7r8Tbg#r9PbR2vAbk>j|B2QczMH)nz}#Q}2ffy71&Ya^ zd!({3-{j+Ib+2Yq7K^1aE`%`D#FwPxlN}kO@nhj}+Br^vMg0&?CRpVf7x)^J%94u| zX~7|-Y^y!ez6dF$o8+r5PKjxUJdGXY$pHeW>Jw{rokNp?i()ex)T^XH&Ary}pTLeZ zn<uZP={scrIxSFu_Tuf?oThI?kuq&vdY*!^!)a!U8E0W|zDmM_SeGFo$ zd;9E6+~41~uVg&4J!~7{PPZI)T9};wctZ1O7-5xXLw+$-P(uMF{d0fI{8AQ7M)6uW zOhiU7DWmc+siRSHsnBQexZu3p$Hk>N6f_t{JwX#t>aaNjMu5=rSQG%WyMwV*R*Dvi z57*seLysEGli|%{iftZ?fh9P(8jLZViCQADbR340fWo6uOdE4Tn0$={p!_b7L7#lw zvKFmy>1z8&-u7#G??w7k3NR_cr{X>7fD)c(VK-I8Q*tb}>@H=DmLd@@-pWpx2scmyBd3~=3`2SPtM=JJNr2Tj@K z>C~8+i@Z(!45vVV=J_O^ol}8x%SoaloG3XKBS7#{({s{i5*U74x?gF0af#R-QC#4H zz3ChTu+k+O@xYiHsNin(JD z9}{9tERWfZ1jvX*!i&r^OuTcfBtc?mhRHo|uoZ@xe`Be_X^c35mZSKZ2BGqvvOpQy zY@|b6WH4l)2w*n+5=$e)ZA+)S_POCLJoL=`dh3$rf|XA!9giO|dMp@C_$=e9w0*EF zn1lHP%j2{XB~_Ru!zPoWK!tQo2_Dv1T#oj39o?$7%n}2 z&fmsdXeA*Rb!5b_D8UAR*|g3q@t&6yOad0ci4;nWC?{mfnaLKpq{!9Hh*-Odh&6hT zn9Tcnib^N)z2o<Q z5qOmgpr!OE879oy6fS?)wEN_)h$&bfB3+$P;44L%p(WAY`P|E{e0TCfaSb{yXJmw= zJGco2H0K2V)uR~3hhqN+m9l4)(lRts&G77ck(g`REy zmnJWBDYm4)w(94KB)5Anx>334&R+A83WQ;;03GuPyoAfy{I>zEgPm#Fi%D$*VA& zqibt?l~2AkWEAz0BpPY+>WZ{r~6>0_|C`H)*^tHCKg>V|@XmZmb zzQ$}2e+1293CMCYs$H8Vyu;+^N-)pe4#1Pe%n-6L^`QtbLU$BfSY#IjCH=ACOvb1g z8R6xo6SH6)RvMKl;bCvgy%hb74g(w6h;ssiv7#b-N#MP@#? zAXzA-ktHHjEl~VH)j|oLc_(k?j2x`XH0s<(9Ltr9Foe%#cHP^=0J4v6Dd7Q|gQ!Mr zcqY+a_yr!Aq3i0l;Br>+Ves;qV2G?A?7OxKJ3*w!lZhNu@7D;9j3cnvl!;zFI$*ra z``Tf)WF;fcg<-N)%lC}xdm>C8YsD+mwF>;>Nh>Zy0;wH`qEsT*b9@y~3IlP4AMw3X z*{BZOe$m*iUa|Xf{fq z$R(5o(S}wm_MWS(kUg7JG_LnJi@;4!v&*l=vp;{}BmZ(<+vTFneUMdcwbMbzD{o>^9*-2f5 z{(3enoi6O_d;l_2Cg~*D0~`wXZo(0MyJElo0pi$Vet2+jb8|zI?JQhK{&LVdZ?yIo zUqF~zYw!P|GTvet95@asLz4o499zU`G{9(=GuaDL!D3ej3a#Y}lpU?$O3ldQmMjDi zdtPF=KZ^yT=zJ5B5Ki85oU@o?Je`I??4y#j|M>WIyae$y%??5K^`{t?i)|^M`2qdX z{Bsy)%WVJi?DIaTZqHZjz52;V)qBrIQ~vGGQ-A7b{r^6o)naM0*@t>$5~d)R6NZjZc^FLUq7)|POpo}-_9r-qe9@a@{})7&>?)8b5J z`M}nbAAWxK{qfIdA8X8fRkf^>pHJSLy!~+g;lJOXoYg*gN8XlPJ=yYiw#*F?5mf5$ zqv!lkEoVpLxEdV1UUQbz*{$1fS?R5`po8+WZ5 zu6)c5S^>#J=j!GwXN`}!ArpW+)OZSnb@g7*V{WhvArDvD;#cg2e9R460V$jy#?7s9 zg7{d;2@-@nT-jTA1zdj24OoE4LzacvRzT**+>ix`0%TDVd=+G6n{hy95bhhO;8)+k zD)<(l{3sY-x&~h3V{YgKzy%fKl54A>;$!8I2}m9~M(D0FXMD^JnE>RW8g8;$1ytiP zH*gb9ehe;fzjEgIm>W0&DBvK43a`dNdaMKo8AJgGMOyGGE>96El^06}D8cqRGtOg$Ch+;feGKd8!Kg<`K9F`69rHUL%7`qCz zEqk07IIFa*os(saB zr6Ye#u0iEaqQ2Slxd_1oIR@K!%F6KwRM=9C^1L+i8-4_1NQF-Xw0vQ;ph{ev8zf?P z)x_#BAVSTS`WbSI=0=ur1gnQdU+_&hnQWn*Z!4hS^qrd4Qs4bltGm_xChTVM`IFPr zcc-pb_T10Ee*5e3&#zyepZ@amiS^oE%lZ7-E_OsXnWB_S%*3U%meM!-+Yu zy^izwU*4Xc`~dJzPETH1W9)S+;Y)4)?eQC4$6l}U`S+*qUYwkr=?U%iozLr<+PO{L z8&tx7dHmt{?Aw|Ll{EhzDQC zOq73TO>+>wCheKzG1zb5M_G(H3jD*VevSS1eA3(kwB?wWoZpBtOM=X*9`|>mFoFVb zKTWLow#6UAmJs-FLC+usE^pe4!?^KW%0!U z{fp15_@ztV?dIeQ*1uW6ge{MF4LrGaXo`V%>>tOViAoE=c>lJ z`)qYhWD0P6{qg}1+%u-A#;KUx`!vKfJwe!!ofwhtK4z<;=becAI+Nu1ZO1H^*jdIk z$#q$Ow_{EG%ENsBQ;{b=9qhuE&k<`7juBwi=I!ivoRO_6QP`r*<@DXq1L6^12>-YI2}E%uVO8RZnhnf}fcI>Gzl#MOCgdGZbAf!gSTeDNOAZg>6>M z>{r!JbIJ`FFh5O((WyW%k@qJEY$hC-v-xuIIFp|mHLQ=kW}`Fc_Ipo}?KizQBmGff zIj<%@HI}-<*rYfTp{qzANG2Cy!fVWVlq481dlzKj0L5b%QM3tvdIzb5OgN8%qnwRc zfda48_;oYxFkIZ)BYS0oS8R#wI(R4MEdniNE)j~&dz*+f8(X4K*)_Pr z!ZsE7oO{k{f>o!dBZ%=T)ShK?OrXIw07u(VLZ#_{4-W^8|K}-e;Uq~9{}e?H_<6eh z{F`S7`1JFNcebAckD;Kf+ycd`4yO87(a2b*F8fBdv12bvuTmA_z&$=wv@&;}SOGHh z0He=TVY)9!voN2K^PmV$eONr%C%7ak5~zMe8y_mfyW(XLVQT#B$n?-%s~eC`^~Ns5 z7(!fI0a|1WRDtG4R=`>KDK_e;f+HTWrih-e$T3GsA@t-Nb=k85>=UYaVmyJD>KX3# zbF6ezgp6n-!91bd5k`mtWQCB4NHLMc)eFdJwIvY+udIZiwOEw0yV&aLjzXQI8Yt`n z7mjM!4+a0`)8X%UhxvECB}cR6WKy>mD^Q=E0)JPo0YfD|JT(5;F~9*eQ~M{d?#SE0 zCW;Bw4%`u+?s`W+SbjM9P}}vs^J*99@jvu<-UbMPfB-`M3a`;SPtMOyPJcZ){a6FN z9)AD%RqYdi5YHJf1ZEv^<*yy_H-ZoZ7~T@5LjH=3tMV~(G8&I0@viY`wWH@^+`3oe z1>#4tLud`JF@7Kq3qFbi^MhUQTREaR^UFBfd(I{Pbep=8?FIzg`N}%RfBeIXvn*Wf zJUKr-`OjZY&OUsso&PO5Kd*WFn&y1k-8IfwLTchh!)(sY%**qO`FN-BxG~kdY$`ui z0o$SoN6jp0gH~SN^&^Qh-*FQDp~%TMRw;il3&kH_0$zw5eYkQ@uEJZc7>wr!%$)vk zP1lAXpOi4pxHqi;!he-Pk^99*OiNG@s@^GX8cEF`)fzs1)PO$SVJnR(KP?^o50J7! ziG9fFsbMQd-CFNc`;*eSmf+k9Tza~-#yUM*5hIrUygfDfW?pa@C(9Y!I>-EWz2{y4 zP(ZK0123lQ5gMAF(1ZSA-EZ@H=do)!qpR*1)P3upx|U+q#pm!WxShq<>mIU=-LiSk z)9?Z)$6|cBQ#<&7cRn`uhM&IO-TCP6{eHanKcBwYeR5F4JfZj;4r`~ziLnGEnS9y$UIf54dU1X zekzl`NTZlXegl;BZ72;-@Ij#x(LYJ#f>H7^?C4|}(5Ai?zs~)|rB#n{H5Bp>@f=Rf zOh(emHb1`WBo5rC=h|YmA$7I9x-rH4DX$wo{E>(q75LUe?CPi<=U6Vpam;xY265fR zm8g@e@Uj;6;Db5raf7MAKCzQ0F)Dh8GWZ49p**J=)w4lhHCYrT7cPY>%$w<*YiS>K4i{@N$B^X}`>|0wa}GNu5K{5n0$-I$DcId&e#cQP&>p1C5evqXSjRKxB)> zEA`K~281W-Nb7t$b+Ku6xtt>wNpklz|y5U=3Av3Rn?B`Pdw%a28UF zm!RMy@uSp@)NFd!z^?FfOyoO;c|)Y@*9ZOSaxVgT8DZeu$=y<6Co-6}i4Iy1HJ&&sLl zqBGW9bGJ}UHg{CJ<=T$Jm?97e^V1FwQ$Nl^3TfP7G^mOZs|!>)IsfJCxm^r`r^$fag`BHkajzYb=3jLa^3xEch zRYXEKr~==1gZc=I6#od~?5x9ENn#>{gcTheC8PyC&?RK-5#%)cX62$f1TBfyAR+SF zm=K)CX~Dx8rt>1%5XFPu*I#=(E$=I3pp&2f;~(Bv=KWQWSKE%oy3lfbjptEqCALSw z7gpJb?|L^mUbXaIz9{sT3zCp8C^flqTuyaW*1wwfGdJfkr_ADw`&Q3AzWV@HXPRX3 zlq#_7-~NCq4`%%X;VoL@O#WEIn4TZiUeVzp-RU>j$8N{@%8F^It4nasufp3buMGe( z6`r6fSC@R493h|fo)_8+TU`z1fiuT0WzQu%O&oCrM>C4lRkAc!2%QQr_&}kJR`qlA zoQg_zqW*cV^w=64@kuV6ZVi^GjIxi+7L9RM1QKq_Aq|195M6k89%+O4KPLGvroqPT zdu%RQK%NzBGKVSu|K*b#ol!NTT>nfIr(Ag~>#)kgxNGoA`<+!Y`FG@&>Yyvwhq&CH9_&V>sp##SD(T zhKsF;Z=b`rB^H~UUzMIO^ZkD%Ub0QIHERcJWws%A{DJ*$-8C)KFyOkYPr?ZqoA^zm zoN<0)PxG%i0j1wwD)r(cAYWkY*g{}8SK1Oa>F*}1Y2Wsb# zvalGZf!?u~E_3|FTKo4km)TY2Sc{Rm^u2U7nl12Txi9JhPu^lBCu?~*RvoD9e_stL%xVvlZ}JkpRqF9O{QW?bL`lSMY$t2mt1gy z`{@NiKjQZ>+UOiVvpjWja|(XG!^3loOH!1=8W_otF?5}^o%0M!we8Trb+2g>0g2w? zB^ORx1C*h(HK%fd;IBaDwLE>-?C0ZusT@7^bjQ1bMYu%?YtxA#Q=?I94$-{wqTNwGR~HK(aY-dc zAkWeIfiX1qPam5`%xO6G-p5=jx%S4T&D z-fn*tKI1y>9HHfDxX7)EbftlQK?SWn4uZ_8T|YA#s^x`+*O6v5)N??PzBI(B9^v&i zi603IqH&5A8161?NFhVQSRrhbG6o~-CLaT$xC~<|#xiUyd6R!GsO(?l!4&C!q!28-3A)JrhSHX7c zPQ+=C%0(zQv66zkB|{nFfEJ)u3r}*BnNP(TGbwvaCl#w82GyjDpO;J{x4Ezhk^pZR zLFvbV)z1TG94`z9IG{Gx6;6EFArycj9^C$lD9FH=A5i8Fu4l+ ztRXNNldO6E1iKvFve=Zl-weUlfFG zbe4U8On`S6F!bqcDMwRL#E55Em`Z!p_talW$Qn}AKo=f9lMkl1TDI!G#3nP80RGBd zRSpe;#9bb_YB|MfVsj#uWo^kSjE4eLp>-??8mVX;Yxi!#b~j8C5rt)|CIQHl4QO33 zqnJaU0Y+^y;qI&OHFmttHP$&4Kqw_?@40Ie#aH%=wJ1s8MsR{F+?bJ{N~53LE2s2e ziYD0qqO+BkkECppyMszpI?>DJ*>08POv?~(lb487<{EOcYddxzq5xh5C-UH3;!@d^ zEE!5dvGHdenW-Q$xlZG2&F!CHwD56+?jnaEC0Sqz8CUOq+CZJX3w5rYfxeRZM%!GR zLf~yvMx2@s{88I3*KnP;e82V}ny&W9Ic@L8cHe);@&)wP;ALvqbu0kR{ds6ZfLp4w z^UNaLdMqOMft=^_$_l=w5YAIo*St_un*`m5Fc?M23~a@$)W9R4p8 zsU83k*Oskv_`>E67v=)mVC&Cfzf_+{53^+Qha*dvPpIB#8gf}byZ#=i{|DH7-KMKs z_m$JM;mH!j&<6GV$hbxL$=+T?ph^MZ%Is1irBYsE$9v8TUG9;Ny>GqdCsSoLfjxD` z&A6|FF||*Wf*zNJL#*?@$1}Tg*xquER7)OU7W(P<5{{@|su`KXmPClG^Xf-2bmi0w zpV)cp*72{_)8Ssc7tJos{@95BUKG!;=jc}X!7Jpnw3mEI4YlOmY9+|6o)|Y^J(X&u z+UkT@;Boi00NqJlaw|&4;k@SVjsZ}mx=pw!O$kdN`ziM@$Lwg3decA_ZG)eyEJ+tt z)W_{qt1#wLC$2S2xzzNgXaiN=C%p$Uo>67{sLzpeCz(uUDuHNvZ)a8sC?lSc-u2vx zohAT!?q`1#PMiQH_)Rs0EX0o&viPosARZzoAU)zJ#Oj2IXFLm3bt?lR)%YshKZs`>cdJDY_;&`V}4@yxtaD4MH=5>86_ws-nTT|^!StCog%rAH+ z)#cNtm62nQs3J?J&l(D{iBu1$7Z;+cRyahB6C^=mMNFDpVCJR%4M(Usqo~qC99zDI zo}%bGxJ?{L8wR@y44e@*CcTb*JHt1hQuD-rOEJFXKbR=i08*re;1rFq~1P&~!XlWVuqjBi^@ zD2?Q|(?)2wDl;_r5msHU-P+~K)CYAaypp4%Bk|Ghckqj>-^d?f4ZIR9_K&s0?2F+f z1p8?v&7_^H2<1J~McLLPo0+7AWaVLUNbws?{?;O7k43yRakj`9l3O~Xm{mW(d{tpz zicDriu(>Ce2{RuFCo#Z|MJiq|tMZ*~=rk%~x@sF%8b#IkYmfGwxB8(&T?Bg76)T!_ z*PpzTnv}lI`5avTvebShx1%cML|#Xg4MS9hMqE9Mk58^X!Mj(xYb3`wTp^+%>(Nm$ z=AY|nnYdOhNtW?ep*uJRCoM+M+j)|404Mxny$WpWqoWSQlM$BJJHq<~FXi57z>WZ% zyq`QqFU66!{js(U$`-r^drd|#nX2%q#-r6`-CFp2yY>m5hmV{i(Y(L)nsw~JvbgGf2r^#{ym+a%kM}|sk!Xf*w~9s-H_>i zbInNa$44GgZ{gp6n*qj@XB=)Dw}JL>)$@{*uLJitl0_r|gg2_n{PNZzWy0Tf%Tw`S zQ}&O{0V*gIJW$t2WYMRUJNb8-h(afo1VU_^!4}iJ* zv|75;@K)0898!O0ynDD7QP)E~y@ym~8i`2(g#TgRM<7OXpgbI4a+9Q2h^lq2 zT8?~^iy@NY`B^fRc9bYhrX0~#d|SOI^@R`c93V@{OB|k{4D;eD7UGVK0di)FoCqjM z38JUlPEoC8n&T0Y%bM-W)%l<)wFGcV-&SRKwnSBl!w3q6RV(k?TBcZHRTO|kwbX0? z@JF>fOW$&~!<4I(vJ+^UhS@yfkbl53*}pNki{&{V`>*Pin%HHKy7=os5-56LU%psvQy5~SdpvC zjR{Ro25l1N?A$nF$q5gT4(~knx|~!o@6LUSR8^c`dFoE;E*zt=4C641ci1eXtxq#& z7m{f;I+xQrPfx#PoWUKARKIRCPE`#+?Q^gW!afOO#1F=dRRAdK$FUvZD#DVZWH}2Y zP(DZ3{j~%)VbV7)9BjimSC%mtmSm0xYedNnPys&3dVb2i0@?~G-Mo_PvXT+ z?W6bUyE^{INR4vmG~7>9aA&EBk}NV=&Ch>P^sba;s@dz3m0sNKi`*GEYu;J``_p>K zMr(mud!l#p=~PbiE-oGksM^z05#lJ^JL|9UK01?4&kC2PydQv-+2N34@q05oD@U_X zYY~~T+soM`o?T_zW-yo1W;k1gufB}SQZWvyF18hnA;KZ{F_bNHCjwYu<>a@lE4d|J zh~+W=j;PNRMZ--(|60z0@^(GOZ`<61z=9kbMlQ?lLPik{ymI-sKn9D1oOv*A-JXd^-oJ&b0${pP0Hp=BJ z-{wBKBc|5%qL;Xm{t2FRj&@(|P0!uEhflb0hgGjmCeYx@0)$t?$hqOG^NK2u%sB_w zi%;*AH|Y);7IE8`akN-(wxwy01}0aph{(ViP<6bmyHACIOcg=6C5>M=1~=cRMGz;c z@0cw!jnWD^MIuH)8_0{#rsF!&VTw2&g;WAH4lsBKxvB5nTmpsEHBhx#gx}TlhTIP_ z`Zd4~_VFUd8hY|wOjDErg48A@o@I;B52&vSFT1>5LP_kA$Gu>yNPO;PL(hhvH{vgB zY!HK>2?8~4Xgs4;QfGx~a7HT}_@QNSbqZW9=q$R(4B^=hm0ZQLvG~-A*kEe!uqehm zpQ^UNSkZ@?xDqO?o~?mAUans&v$T1b%F?&u!9#C53sd0iK>W7HlNfe++ua$K`6x1o z%;;wOf?nA}oU)+uQ-wfe%(NsuDZao21!1LST{xw5PG7X2{;ql!0M+QH@rwQ;F1egY z=8cta<1naGRV1lzi+-rqq-;h}U5w)aYimeaV5Ei$?A2wF7)N9pY(zqga!BI?1*Th5W1NGc)Nsdibr#n-^zONQh zmc}K4yu(lwE9!(3$i^Uhp$h$+g9CS~LihB5H3fdE8(Kcj+LP%PxI4`dkv^$4h@&B0b`n6eS@kW>HPnk^mzj zQ>-W%B|3VX@P082U5y?6s#$~_)dL%sPMRC0Eycs=njLHf0Pxt5IO@r)hv1Hf%UNeT{_vl zE>Wq?V3m@#p2AiUuU{=z>v|au(fTew>xkiZf>$Q8d-n%fknahJ8=p3q<=VQyouICx zH{1!JU=kXjq|~L?*HE1)ARI9dbZA?3R$of(9@}3QID$pI~4K1NW8%EdGyBNJ-qf zH^1M6-PgoktGS53?+C>d6qKCc$dYy-@dHudI~u0{eHmqS6rV}&DlD={mkoogk>14S z*o#RrVrREymEAHT-9#lAZDXQZUPQ+@e<9_NitA)Tfpan%k0L_Iju%G)kXeEn4R0By zLt#0#Nw^5HbI~$eBvZ?{1Fyqdl*TaK-_mh~Y&;e=nFA4JDCTHvxtTAQEy)NJEhlne z#z2@wC-A`x>0q1?$-ca3jt98G|8N?@zP(#zWvUDIP}wW9?u9X#!jy@LY}&ZDG@-Ab za8O(o>J=s;sTkHPj)EXymTl!MK#CJ&}NtG4a9G z%6f$r=|0rFShNpyI6KH_j~5J$y`n6LD`ILV+g+ov%c{U5g)0KhFFE+X5~SU!c~e}> z8D3XKrR0&)*i0klM6|A5iJ&DdZvVBdZ7l@Zz6XACza`lO4>;WU`SH&`pP!fdkIiBW zYc;!dytm3FUJ{8@We`d4wU@=Kl;thw%R&`P*Ell3iwXMIRmu6bDyK_^7}Y}7 zi2Bc0o6(hMSDn*!Njm>}C7L!XLZY_bRcXZh;gTWF${(WK$B|jm!CvccYO%k`)owpZ z@`G_JE7HR4$+YrnRV&DU>rJpF0!l3Je|&FnYYL{C;=>;3K3=MC zgDIg;ePD>v^f9IgTB=i^TFzj49EUj|52c(I?w6-37jR_kEv3E0vqg9jDrwsxY|mZ7 zwyX^O#P_rt*;Q)6cyuIx=dLa?5`$J8a5q7fFjVO6BB6+<%Zo0U#anzpfl>b6XnY@4 z;d<_R?UvOVl+7gxyD4wGCapTU8^+7sbo2 zSJ%cV?KD=l7gdEyd}lb7npoLIE_916uOuO(DX_|4;)-rZa|~+nSjH#S$-Zl~{qm%)c{hhCX_M=2OfJytZcSgE0dDzWD++w*hwzoGs-E;rt7e9M-Q3Nry!rbb zcU4mxSBZ_{q@5dTCNHnKtGgvtcyc3_BYMsiawkM*b(*bEcf@d68vWOt{mUK5rbC}L)p-$M7%|%1qWnJrjr$$8L{SRA-gbR^0idCcHWSJTBz$6n@)d4oF zPW{Q$8u3$Hz@B^__XW#)g+bZP%sZ__X?KJoKdy>lLiZ1Bm7j_tQby4}g=^=z?b3^3 zn?K&-nKK{IG`2eXaGBFAdAYRIJ$jkkhpp0kFmpHj8;FAo!?|Pjlx8!)fm+*v-p=%P ze||YP0%*t-<*vVPbe&NKcxH2a-n!&$;` zSq*GeQh=Nz_uLJQ9%#i$!Ifjnf!SbvR#fDJq(sOX zu2#zyAXfsi?C53UX7V3$PvzXob4bPH9Pw?8O&BugpgR)T4iB*f$|PJQvqH~c2?Com zGKy<^F&jNZSYvK0ijt3f!_97OTCx_q72&yeWw$v8$3LIr%6YHPaaU8p)m)cGE$6zz z9V-KsH;^x>RemNR$O3w}$>jGM>u+;A(8<5imc z9?mv9jEG?T+Z=^ha@j%rE6PU2nLLMe>qeEFJA>IOFB|ulOmqRx+(qLu?=Swfe>P6z z`NF&5M`cz-w$2fQTo}n|zlY!BFA_}kYe}YJ_us?suJ=s5Xg*j`IAcd>@?7?MQC1D^ zb0$`G#A|)(dO|GVh(VQ9iPHnGDD@{V^V?(*mYtd;4tsD(!?m=LWTCQEWPN~m7GQk| za;&4bT-Q8E!#v4-tmCj2OS3FHiPU(Kg16w`lC3s@R&xHzjW&z$sqjG8e&4&Z0v}HW zhqvbEWFW5HDP`TOcSS~`IJVUFhb3;S``6pM$WKsLmdJZ}NKmOsi zEW2OlMU)$)$H@$+E^I?|?Q!`gGQxPN#F2X8as9x8-8`(s0R$J(_%y_X?Rg1wP zwTffdUBmWn94oa>sBxUR^>MjfzG^GP;$H!4#qgHV^1}O5yW40UmMjzZMTYdF+Y{^b zaLCDi8SGzX0C};T`4}Tc+c)+R=I15ICm2Si+n&bRF9J5!c*Z#3SXGcK0?xIkCA$rh zDv?b*TBb2aLUWR>_u+Dxao+BwKfc;uoogf126LOM_BkIiZnr4m<1Xn=QuO+ZoiNNg zuBI6B7L@z-R|Xi+aJl9va<1;aC=VQ>kRNo77Aa-H3&yV9r*TJV&_cQ2O4)PN&_M89 z_x7WRLgaQy4XWwy{CX8?th&wRbNyotLTG4eOrUkO0bR?KuSN0u>h2giFu=M|Pghj% zEDWHw+}V{7fMcIOo3HLyZwy1s^_8b%7A&{wj32zt$=hT`&S}h3()aSvBi$sP zf{-4BJKIR+w(Fjw(7%`^svRy$DYxrBDFFq$l}+v#wB5_iry^b#2KN6R;f*Kiygpvu+&OwV5+y-#4)Zr7`M&OY=oBE0sRZsL8+# zYk{Y(c6y>m0sb7%3KnwlqIhb{!e~jCoP7~ANmAahLd-T#`|BridId+A{9^ApaFBF? zQ{po*&U!N;K&4fEUBZ&xGL|epp=_lk(t@tCfhpcfaww0Qcq;?DzB28wl4cirZ<3!# zB#;+Ndf9!zDw=ohJr`%8cD$~qUKiuI@0UKJD4xaHW#No+aoRLa86pQ^2q7SA)(s+$c`JT;4B@OcFrO<%kaZMYS_bym#=D0p%TH zbZU1P9j^w4xt36db1}?LW#rl&#&cm!Zez>PXOaAft+T2F+DPZT4!HrW=-GyXh+FUw zTIG{?c20tdF6{`^@>Ue0q;IggB8ccI;7WXPsY+?)LK;IPS4#2|s}A-(EH;X{^pq68 z%&2D$$m^_f_oz7jP~UDeyb>Y?(6a2Z1a+Na3ZZ zGs;&g35`Lj3-_%MtCA;cyHATjm5PAzGIyMGi@&P~tW?k!b!X#W_3x!yTyVU6{RCr?px>4Nc zQ<;U>HlmbO&@)Qa=c;Vp$pQDYJP_V6_ltP=bSM8s-9VPAT7P$Ud8}ymZbK^fYXb3m zo0#F0xl%K1*T_{LFZ0-nrtXHU`)Hn5Q}SK6ZM_p$@7%(^uxjgWRJXQY1+SpaROvBy zNViyTKmS+}zhU%=sKQLM%|vzLs`>cGPbHXKuKC=>yNv-ANVryex!0W3iuwF;PY+{J zm%ZCw{IT^|x7^*7m7TpVHFtyXsk^rHS?5yU>rP9H{`wTnT3-8sZ(>iwWNo3Mb@7e7~Iv-&YyI6QA4_5dPT#Uy0}274{jaJryG8^K_s>0XAZ}vK7j&u*vI+ zJEPlDGt3=zUq^cRYPXGw%rLz+>t-cd>$d$a&b)1DchFBhkPD*915r3wbJpeNG(mnU z4-*fqmJ#EUt#oAC=)R+cbr3Q>8fGdE;egw^90S-;v^FiXH*%YsAQ@+c7Sa!hD~kkH zG@%m5mvImn0*<#c_l1j(W-lkkd%&wm(%mvV!bOwqMQ&J`$&L5^iI~NYJc+Ve0F_Dc z(jZI_3u*C&S*^;<>zdBS_O@e7!p~dW=-V>n48LGu3Jx8uu=jek%#Xraz86j&b*Lz- zsC&xQh=9vu^(HJ%gvCr{Ew4RLoO6}J>P8!Ms%|9nkOj}jUL8Q-vQWu>#niAd2&jy zWr^L@w6aPxvq@!Ev+EYBu6Q#lWLJ>*>YU7DQosZo3>pHT1Tjw1G|cA7EFeEuV&)EI z7*v>vBqAwa>=#(Qyrr5F9uW{PkdodNd? zVnm6vMOLaio?+v}WURS;$$sikpYCTES&@iSCI73em9oOMe^ho?dC+)YQLNIR@6_O?O@Y_JZc_+n zt)371y<1^o8X)H_TIcv(vPVUYVwNJ}Ohm?1AF_kQR#R=6%Ny*PI)R-JZnbb}Mad9S!~d2Xjlc>OzHe%pl!0p($TsVrdQ+f# zBdZkw`CIp-(p9OTSOtIU{p$Gy3xvHx1-%5gn4Aq?efiixfeWmSJ@LS^C& zekn?Pl!`ZS3}_@?`jcEITxz>v1e}VmjZIr60!UdzHk~a1&{Bd_!>lQk@OpDq?%js< zPkm8T_}WinjN_%QuJPE*5-t!NFIWt_^huiySl9|ejMhU@NeEe_^CB}>zy+Kq<~*{e zR&E(V(Zd5Bu-28i6J1Pr#podG>+;5iTJL-JlZ$p^w1O<8QL9(HPH9}u*O#-aS#mR5 z1BTg_!-k=18Rj%hpJNzRMK!9ZS2aXlyERwI85St*;+;~aj&)|tT^h_8%j7gJrd`^Mx);QhGz6P)Ur9UcWf0o9ikM7Y30q#s~n~osvjljSmHCWXnhd zq|R6&)>0SKGpFm&w@TW!tZZ3+KrB)M)Uety$ip0c^ZBM9olStw3^NBtu5#O zv02~Q*8hUmvbEW1JFRAWXKSa${@HSz*48GxUw#(<*?Y{Ub!Fr4&Q&n%qEOiXIQB;U z1nx`TX`F=P{VkCAoh8>nKe^c7>cV!*7VW+JbNSqZw*Ek&p>X8bYBZghK7Y&~t|#I6 z23=d6TCeW39zNVzhkqa7zYo`)cC*>Ue_N>Nhhh9f7#c4UE)vAjr5P+cC~pBdaIuq8 zpt8+S$&X6_jWO`-#Af@n0@oj$WsaTG2_+kbKoxYK9CjI~p0aAzdgFcU|*YkrbA5`3If(kCT#k>1~4-h066rB!|9}N&@4r4GJ`uzYS*fkbU_XiWk z-bHcOIq0)X+f#28uR2bPHU&zdC+Y?WW;^yJo`9y z)>c-ypQzc#Mr{xLYgUji_&a&w(M5*~;8^D%0%g}9UWL-^U}Db|2P^&P#XMOAE=k6v zAX~v0BSx1)TD;gW2)iyks0Q*)M!KR+KSqK=i5Qsiu-fFm!^O}wM!qYQ%XT7f*AgIf z&ck1Rzs@M{fR}?2z&og^Rp2~4uL523mXxI-5kmfegVpP-{Vo^*~YqaTEbvs{ND;ZMy*7!yD}H#h=cB$$sR278nquw}q=dBVa8Q7yJS0ptB(#Dkar9if%g z^nRhzD0C=U2IMirC!UkqSb}L*V2U9aJHCyVZDk=yzC2SzykGgf3Xjf>-?+k$8<26U zM`>TC7~@F6G4SWA{b4Hl*Rl>O%>0SeDgx8BYlK61HLJEzT91JR5K>YD&MFQ03|g-&oufh;0h?VcfwXl+o3Ej05dx$TRwby2BQXc=HgXB zBS<5JoCx#7<_bd?ILvf#CU-|3A4mM0TT&5wG7#4txPVx4H~_pK607#m}>f@&^(_o-&KSQ2nv9h+u8VAgB8Cns)0EmxwW zXFa^4BkyOE;T1_n5mD(mDRCzbOE~cpC3~i*&CQnVr)PyM3Avp!i~M;aJ4Hnis@FnM z3`EcvW|9$fLtML@-|_O-0DJ1>$aziO82RnSF!Uhnu{bNMjzd2Q$^_tP z3z|Vv#-v%EHcto^N%8uPaNo(Tzj{Ri&sjG~>NXkm^P8e6a@;dxabpM+8$ntOG4fc@ zEw9rtqs!}68BWw$$lRr>u$Ht{xZ1zHNkq{;yh0Ra;OrR`BOI6SC|;++}MnKLK+=tElW` z3_iKCcwDns2vITtZdj4_quuy8#Pz&-Qv#vaR<1CjuG4T__P+)nmTsky9ReEY?B_5G zZR}wjWY=jFhPLLII;1?HmZ8f*U?6w0EFrREhk(5_M;Hv453Z;*uE`8~)P&{&cQImVTyfGa~( z7+m)*EnwVL+^#82RF6AO3PuM!R3eC}2DB|N{y^2KR6HE{v8gRhC`u^-MROx`;M6SU z3w=_+XO!O;Y4C85uc zIEpuQC&#EYk4p-)j_szgCN9Ll^Nb@O2u`JFiAZtiWvs`n#$$?Pd*$(?m8GrEEcRcM zBor=9GaG=F*nc&*w>w$;ukBWQY5(wdf0+$=Em`Z91W?Z1}x zUyHZ@>N?I#kKO)5=V{>lBM7g8k@x9S=Dg<>(`)n5we?u^Q7VY*SqxMTflYb``vks5kCs? zpLze6#9$e>0ls-`g`WE-kUezcD)3=xB*Vdm7xXt;o1N`;c0HQLKPR~2Ao0gxFiH?M zKzncCZ?xL&<`>)xQ#-!QRRswsJ7&Bz;a+q@oWwMD3Xp56_tT?AVKyDZw1p*dT0<6QbT5cLDJU5X-{b5(eA zRl|zG9!2&f@d`ys0)3?K0@KF~9*sM(st5n6U9*kM#)pcj}RpgD%@!MZ_4|KM98Zs!E472-W71zqDX?V@Q?k`;?-a-O*b%NHrym z;zDi(^FvG#I_GIU_w5?b1tUF6McSSSsN!?woD9i$6)K0K24WU&g9J&fyij)21~re#I4A-?PM&K0M9W^ zT`nJ{D2OKHY&mIrwlPMU*i0=>h?afVsM5)=P?K$gXs*C|C%oNeX;@3@QaZ?-rBilu zOOiAp)J!|sjhoBZvh$!zQq$&V*6(A^n;B8BTAN#uGm{1%Q#zAEi2FTII$Z}-2c+Q^ zQWeJEBe=U9yY+QpDRgoIPvAjTkB=%`j(=B)1u})c)eT4D zwufp|R|H*C_ata;UEKdrx1NrHK~UdSl8|Ji!{ycuYx0CGHfO+Ms}%x`>oLXi>0<9t zoRofz2aJ>s!w3I*`|8Q7m#=?$_V(EchW9vh3$w+3K#Rn^y}f6z4&f5+ocibN1kD(a zYP8D8N?mh@K7?;&Ki_U}i z<5Z-b5jO$G^0}_yzJwQONYY{|tcv`xU<1O}dgIuyWn#e5TZli!z^SeFF4)%DOMJMJ z8vxa7;D9W3@LjGJy{>7)rU9IVy$R+X`Mjb{+Y^s1legjPFh(;XF>ho3TVTaH!J?p2 zMel>}39_~$YKj-QQ$as}1GEn?7P0oO!JeHb7rWCC3&y0-a3!Zwf4pn1!loo&fj!(^ z$zkKfNc-sNj(6VA_b|${ChnX*@VH z)C0Z$t!NddP&G`*sb?B6Ey^jH&{wExEofe==|WOB-Qo}IJ6kqg2lWEk)K)**c$IL?z7#rMt;f~jF6B-Sd3W0 zKJhLo)RWYum}34^L4LkgMKohYu~BgEm{vZP5L*;%L*5z>TGNLV;sdqVP$05&BZ}`K zN)B;chA1y;gIdD1?;xJd;sebPEf{0WP!tJsK$)y6&_qMsuIXt;*Pd&>nu|Bu#AlktDL|HtO`PG`ygE&0DC|F`7-mi*t6|63&g zmka*O*gbL@*x6{eL4CK`>~>mnW&zFde*c6lU|C360~1(aN&iH&)(_(Gz`H@!mBCOx zV}P!5H?67c=egO&oK4fe$-u5QmbFS;*W!6uvcHxfr=>wwF@W8oIN}9apVNv#`0Z@5 z46~5$%3@H#AtBEFFG zo0_8(*IwEXj|jX-%2eYPiU^~o%=K$&_)(L00HrQfLYVR5ZpBcGws{uK>_19dtQSU- zN(WRB8_+(x!uEZ-37&akWCB-Hbg2|db7(23TsH=g%V1waP}*?O5|~TyzuV(y#t45+ zFdAZY2mYw0?nQa$mI3$g$y>u$w51mfsNIy&yzF$3zOifI08>D$zy2!PFqkGY=)354 zu=+?TLR%|D&D+2>)Sz-XYXtMDpv2xIh<4`{m(4~mGEj4xXd#^Nj1`G@9)B6SDUREw zOuM=SEe51|AUAX9!qV7nWl=lz=x~L*pEkAv-z%^(Epog{SrX;$R^>ie{hB?~S%q+8 zS2ka%{FNhnJU|--XM+Vb#(fVvE2P@i9I2K=W;_h?+fSA*iiVwuG;EKgEu)2E;N2+co=V^ycR*Xelx;d8NcQKa@bI4*HAL@o^!o+zA zCYG@%m$4}Se6c7g$o(jED81ITOt(dm1u1BK#PeATO)Lq~6~RNk(HlPj`ENgjtXJ27 zSBNvhWhxqes5#(I*hE?5T*}c0@u9$8t$yopmldLH8ZS5BS6ofwIWTo(O)L+|{Ez;P^J5r&3a^|!@9I?Mot-LfWK~;+@7k6`9G7TE(&?nZC&84q7mC#QI!#0CbUtDGt4oyQh~MHpMayGvpHtX8zD+^dbq6BAf-D7gEdT-ol}IK>00W=5 zC|n#2!fTL6$><;?VPQLAcs>d+=iW%f=OdX}cSW_ZcnZ$MhislGM`jGr^u3!{D>Q&Y zzd%Sodzn6zdFtITo@RK;z|da4H1slLSijJVJHWTF-gfjh?|4|DG zs?iF8b+cNA6HBH{tErU9&Yc7E^Nig3XoyOx`wOn?-upBoh39#AL zI?M!qqv_x=5Y!wpKATo@vnPid5T$qty9J?0_Xf91$}5%S7FbI3z zz!0Vbh@O)q#sAC%V!ZbKOE{5EVmM>mw3vH1fkc5WJ1*eQ+X;rb{>|^>uZs!Bx{d<) zbI6uaCVOJqF2u8S9lc%lf;Y{-vDRb$mGv-^KUhDJ_|7`x-&lW>2)<`Kr6Z3IMIE#I zvxlR2?w?}EY_+mK2jhr-VXHsWcz>P@@ZIDbyYk2I=T#45d;c0vZ%+dslv4CGNRsQ2kn|L?7ewOCb9TSxUk|+@ zKAo8q?*7k5e``1Tl$nZvPX+%w2y~*r`FM4yQ^lvLsX`%&S%5Lp#ifNVJ{8f$Su`VE zJPn4>{4ad7;Nze^fA(>gc!wEBVWy^_4%V(W>RtG}@qWOY=U@DY9c}cT^+I1*KYj6# zbq3$2rwW*Xhr3tmE^!rUvk>rYf+pu6WHruCcN6<=K}}A%Wn2Y>Ljh34e>0$B4poLa zQn=XBV*(9mB=Y6nL0^eR=(~WF9+(M*ZTzzl$~)-cC-~=|2+t?%@(B*+H9ZNZppPpr z254Km(a1xjUl8!g8T;Gnw07ayrQgTnD*oiN^8&v0pw?M$H-SIfyAl6;3Gc?#0%O@P zsZuyRHJogA8u~yqbVfVNki*x5AM~Bh8~)-0eE$Ibd%Gj$JI<;{I}HPzwwjQ(nh}vy zf2sqBfi>Z8$`b(0&g1PY?E_PYL}%;N=FyMgV0uclqy; zvN`pO53TWFMw09>qic0M8u^n?*Z7(iNO(F0`LUM!p8|h?MD;ox;ZF}5 z-)ip?{rtx6l=MyX84?Y$ZoP;T+3NsaHaolgH-jQfyeVkzFu9>EGEugye_r$L@&olp zyJ&#xI^k60Cz6Q#S*fS^TKvIqExyvO#h16e7H2O&jHT>l zE7&3^iXmubrQtowu;~j}@s}rHz+WBhT}O-oANIt<>==Eun5eX+{W{f};3Xdj2=XXW z0c{pnO0j6@K8IQ{Lf%DNd&ryE%whjbtE54)wVmsU1GFjTN&Vw%Ej4$iSgF|dnFfMF z6*|5Z0_usbGPKs>qdm*L&}wWxOkeO3`#I9qU!3OpXlD`I&Qh4H;cH~6jH9n1@GO0y zkKEgxVh1v!R7V%5TPvPb!f9rR-8u)^v1O;ixOAqUpKQhKG-cmsXGYdy@Q!X`hjhQ5=9<8I z2u9~2@5PUKKMDWFyNY_@fS#}pujt!5xGm9F(XZDJr`U&{k#H(=V>m4kq!FBE);O5v z#=yFcLUCc>U*VD&auB2xEfhC~P}~?o4hg#-iW@_qa>J998&01y=z=0vnBBu>l%)Y9 z^kA2h2VEfpy1k5IVbXY$p!P|2ZVBi>k@g~#B z;YSlTyOT)mGJPUCrY=7yMfszv;4*#4z!@gWPY#yyh(UMmMf7uC1O-6T_2Fklkn*!4 zNMT=lt=)5aVxTmVNpNzDrz1CNG^IK9x0KV3BLZ?@gE;qOkUr6%HLgaO!U#4>;usq&QW7zk?VE%5MgWmrQfm z{lhOJzH{nxLa?4|haKq$lGzVC*7e8>#Bp~T@$cz*2m6`N0Xe6a43_f|zZIMt4!uN? z04HV%a8M}xjW6dSFZmY-C=vV218+CEB5{~Eo6rQMLH@3gob>%cc*(np=o{;eOHM?G zQ4(?)oX5Y-SAL?1d2PGXd`~|`sQWx4V8xW#z~c}r~2{Oi)SVynqP4|d0e+4 zCA-ZYJ$X&zqB)(8l%Sc`>F&T6q$D0_yE1g`<}n zdqsF74d74olEF-0B-DuxYjl7De~BX{o6qA;tbQO=KrXE!~onlbN-arPx#g z#0=H2^HOxv;X^pfQO%YL=8i(L1jCMJsj)-o-RWCMHveL~mwnOcX!uoX^wrK4sJ3)^ zQ(kOqP^AlrWW{QYsRW2}R61!(1S`{};E1D}li-fFUsx+~#HKIGW<;UX?VhC>ju1i6 z`Pnj!t72(Bq50C8d3_+>E67M6X69Vr%u`Em%V||tNhgOv4a#)Nr)gqa1FthpT|sJ{ z8M-$gQ=?h+m;dF=L~6|STbLSiy~E@Bztb3V{WnZyO;XtOG>{^u-$Gx0e+u{Wi2ryO z1t0j=|9Xi(PjQnUEMD9cDDoz*b7yR-E^zV-%(uu=Vh$oFe^yQ&ZEv2T7*HDL{0jfP z!8_9wH1L{CYc9MonX&nZ)o1b0i?t_j{U8psC;towL%r6opa$2Tyz$wklFO0O7t@dm z(aJmDKh=!w6#1ZTP$eg%ZBH}M0OthFiC?${Sz{Lgm1;i<>FB*gEw)-2d#l@-Y$-!~ z?^d+dQZQn+)|%B!tERTeQM9#_!g#7$;HVZrE!(I(b=0gy33t}?$bz+IwsT=YcV?fJ z%v2j*Y-%F&j&!xrvM#doqV{B~)Ha%nl~vj? zLD{Z^fpo5myD%c6q*AMG$DYlA)Ji{9u$QB){Kg|-&TY#%@-x_|_Dih6qM2_j6Qea4 zx%h?TxD?FdAT=2Vil$unMqB z_^O=6mt*ziZA3g2z|e074lk3vz4BJT6H5O0H4M@>{3;Sy9ijZ0RYa{0E}z!c1E6O1 zYZHGx#6O*;Q09mio#qz3-^smbiWh1#N-^HeL$z3QJ5y}yVTWF{OIq8k^qzX_w6>2moC6j+0-|)??sCojZLj|hkk9RV008{;e`s@!_1)d zwmWzQ5tSsS9_BE$Wq5Dx;$e%PG%dxZQEx4${?9e_W}~jF+X(5lcTiv_$sfV< zdXvPT)f0ks0g*-SpZP)L@y_n{dVW6`>?%)L-%+Cd4o2#4295SpLN%SAge06Rlb=LT z;3q-KrOB;AOEBoU^zO=!#1969z(>|)Ldfn$7ea`4k+&XAg?AHhm@o+MKIMdWGPZKP za=yScvX41ipea^Pnj=6>LLf37Jd=^>AUImCm`HDcY2RvbouUMev`h+WdBU?J0}qwO z!LxQ)F|l7!uD+5adl&>yOP{#!7*gz|PqQJl>RK8+Ue1zsCet_X;EUwgqbO8-fR;3T zkXLk{2Ww1UGa`f_ziITcc-`rT7!wsTHuwup$86j|%*G*ec~P{eBkKFO z{+L72#c)xExc)L3nBI)&3gJ4orcuz*MB^L_QDegrkD79!-_?27`eRj@68FIWT-YJG`|dXD%ZBMNYn~i9=J6g zSPYJsyH1vV>?C)rG;!+nE@QTrUqIs+^e%k~du?qkU~igi>IVMkJb_}Fymhhz9<=Yc zzU#0`d!h#Xx_2*^M<5Q)M+ydVt^B?geAZ_abA(8EO+>1UMr1|E6NQ4$#y-KJ7qZeJ z!?)Kzq!^Idtt^+Q2HLePBucaK)R0<3+4?9J8$_*cI)mWSrx14TwTsd8FoLRmrKD#C zCz7M=J@9zfTHBDeLx+4&0C{28cq6(^&;5!$bE={xNtXdIF|W1Ooy}JL7681Qa_HJE zv|!}4drn3ey*@pScvMAOEmq!7OCL3lZ!@&v?Qz>`-v)r^v*EUksJ;Qz{^ypcT`7uO zp4&o2VASLFDeLiIsqCPhu|wxkL936Q`>n3ivNnAi1mApT2>!3W>+aeWTmvSj>?XkOjO+K=s)w}4&g}Dd@wNA!^92Ji9flo3aWG2Q z&6c5<@H_kHe!Au8*!{1)c^d$N+XK*fxSl8eY%t~HBi7Zew(9uHK^orY5gMUM3b?Sy>K#0MH_-!t|X|C zV?9Dif&6((83aT>XP3e%O|F#8fu7tw%LP)tf@{oAkV{*jWh=n1l%n9V6`OZbVNZ64 z%EZAxt~+<{I;EwYKmM?v`%`vy2M1SP_y|dpgjz)`^uJ;d4!ZYTE*FO6DTs0iGavae zcr7E=F8!O>J_t=jmW3@F_P=-}xzg%T3h#v3-L$A_%205OBFxGVIQL{H_BCI+J{AjW zMIfhHhnYPEc8R;r$iL2t>uF(;TxUHal3!P{VID}Kd97ZWhV`={OQyENwDcXuX{aKw z$8`9ld~BKQQaSdriA|qiff#lezPAimF;t#-!3dTStP`G@#yN|^A#FE_2ib4%vDl6L zQGXqBj|?VpaK%+RIXz1-N@TttwUNStke;lhn7m+7)|DWpj3;F&9AxThp+Gtqi9O>C zy7Z%s8s+V?3WMuGFn-=a4Kb$6>^%MUH%UEKi1k~5U@Vl$M0Pf zw$gVLyx!ZVzH$;*DK-y)sA7hJQF2yu|G#D%!Y-@@MLBi#MQ5e6IFm}gYFc~PV)>3~ zRzb+LvpMm&s{c5Nd)~l{Y>kNXkI!e3xE-KTgBhd$YTCNG$92PNHC)H{mb-y z+w^`|^8R_r`~RfxH%;$vO5R_j@3&0v&r9C_l)mqn-UsRXZPWWWeZOOR@1^e_nBE_x z?;o1p|EA1O^LWJ~5lRVJB;w94*^;H7gg+(2L2lv8$C(8W$3vfz1lF=i0^dN^qR5Xn zo)Ra6=>k=aSi}ohj%rc=gx9Z`>SF$KuB>~@_MQPQu;2MT;IrDFzz7^3W45o0CX^zX z)YgJKXsG=ORKQdHj4weg?>CED{`ju!VjX(J!^hkG|9V-yFNQO95V-|9i99YPPfazdP;DGXM8qE&sPjTD{e1Ix~H~ zNdE72`1b++`*0m{BR28hRzXVeW&ZDF{_pQL|M#CgXSZ_1VcPD^O`f)Ud!xPOw063k z2i^8VTiR}Z(S8yRhv7(Esznm+AAtaRG7~qLVaXia+2q&sses`el)uq_d{$PljO;wDTLrr?$$G}aB->+l48*86kpCe=@6A$%J8v1%I54yN%KGJ2=> z%^-X6oNJKa%mnmw(`vA*R#a;h?DW%O=_t+C`odh_XqeAFXtT}9Sv9yf8q8;n^s81n z$lA_hkBn>-({|RJZhlYR0{g4Tu&uJAKj7)oD-lfUk)Vlw9Y`;%&4|r(-()_&Z?N4L z&r-PeO%iy5`|lZ znL_iTj&bmgHhm#EP^kC~&J-=z-Xy|g(g&|!hzleyc6&NF8-!kBCIk&WeHM9rc8lGW zBS(z|R8}h5L?`Ed@|NwS1>-hs=(iuNb_`@jn}TEkY)NpuTDGEhQn+hD${F6b3@G6j zG3}NZk|ZJ=4H&nZa4j?3YY7lJC}%$8AYn866lpiz)XGd-Uett*A|@kk_^DyQzxa#T zIQ{^1os3^&uNlLifcQaI`14WgUZ8x$a=0l4flPPHs9#qAtbhaM%KW)t5m0$maaFbw z=r{qXQ^*b%yp^)cYW&5vR}JC}B7~+lHAdkJD5s~Yxvq0Z_{}|bE?9H%*k{-9LGQwg zVzKFTr8QvPX{=Z*XIM9{CC~Ddu}Y%9?Bt^MSY8q%%0<8soZOWznQOyndS<70{ z=pJ6ITtySfYaZeNYZhApp;CqmAGy@K7eOEMiCD|R<%7zmFwz~tUgwId_#Wj+*;EIt z!UXFQ^y`m>y>Y-z6WFt^FdV6a`qgzd9=W?!9Y2GZsH|X%xW4ewADJ<#AhA_<%B-lP zx`@EGLx8Noygw+A7GBuXtidG8l?XNS$YrBtK6IxP-eZCrFvT8jA%gb>BB70VZ zNJ$r*q145QPLAsWjsWn4D?}0HIL_OMb_3<1qW0D1r9H>XTn=LjRQq^Z+0HeCKuD>( zYvdoYy%kI)G4Yo9<53cv#Q&Jsq&mg-X_8VpPb)Mu`-&*UJeN`+AT}HeSt^w>;}qK| zxJ%d&DfWn|a5*z7O0EwA$inTxhJ^DHB%GWDqrQ!=cpC*i#^ZoO+LER%L7J43L7Zw+ zVZ=+ju~RBnt;lI8aNnhyPh4i8nD;%%F(4VMUOmu9_AE3?_o$~Mwd%30Ut?jDl_VpO zaTsSJf4E0(Ud}hXdFO%Q(CU%9$_`Cd@g(vY3HN+{KX8v-s=6*tT=shvJeyYQ>)MFn z&}A=HjkggWeB4&W&6LLeo{xusV6Z)Q^hZvYP`z5wNX9fT8gZvYFs*HqDrW~18@!w9 z5@S5aAl?t>qObT-HuU<8s~C|2dm1qXwIC(*_|s4$m9v8l5d5Wz?8k&__HuPXQp`gg zvKT@eDhzgmZx$)_n9({+23;^3gpr$;7M;W3v9*S3LB2fMx;(+(WC&-l4d;SYv4AWFx*@pKPfVxkBjTwUlkjuANHOys1#*03S1Ib%af>$#W*%oWVoI zV)v|W)Uu}FhS=w~iyT{qf=e>>)vGD$VAdho5)au150+LU?3pmb%Ex6Zlm0nIQA&|v z^S)-*ygyf?W?f;2K&;rMR3q>u^k4MzGdW4Zp_f3^xB&>Ms9;Q1S~2*Kp_>(oC(?j& z8IGW#i>02Bx|6jxiOI0pAH|c%Cn+pm*kiEjx`f+AFXc ze%x>vhv=~V(1Y8vf|l zJEae0U^XK0KY}HR$`GYQBDg}2ZBX8s?`8#-Mz=ZPoF?rg(zB4Cb&N1#--~(|nVMqt z3qchtC$=*w-S%QzAj9H?oN`v#$yX6@cTGLU;6?&{2~mBSEL%OGEXQGmBe05u{IiWK z9!KDX>8l5m7=`qTD3WVy^=%?;jbyl+GSpJ02{sA>O^Tv3lPzxjYMlufz>YE`xfmKT z?htk&DMYM+4KJBvGruR<-#fhFA}+d2;yx;|7Yp{v-JO2`u{Bb ze-`QgBaS$9{%JjgwY;^_YHl*Z}K%lWz^a9#obao!Z3Fs(T zFZUyVfRdePGVtRSxXt3->cs!Z3dQ6~lpeIsNLUV0y)qeEV3_RfN#k7hCU zo>+;uyu{4iKuNTyv33Ka`IVQjbn{s{eWCqY>h$H&u89skQj+&gxPCQfbp5h;d*LuO zSFiLPu8TsSFNJOAv`TmbKcRI}WUrk(fAPz+!xhC*D3=(5{C$K-f*96{c{pbD?NOw; z6^!G{s-e`eQ0Z8ss6pPKUNN19XwCR3%C#}IKC;-s2c~nb-aQ%e;%+{fr?*JQ5pz!s zSKUgc^u1wiz&2>J1%iE)EMNy!Y=C$`uET;_x0*2l?Ha&kvFou(gz-o~84Fgfn+<-T z`4T4#3%-PKw-U-`R-*@_#A@fm0V^`|(dFuh5{uz3BI27hnzx%nS`5Z{Rn&~6$Ly|4ortIua)~r!#R+KAfwQUy^#-UrszInr`WWyudzcG!+15= zUxlHqK62I3dZQZzUyiVL>Qkg0>>U!`Ccqbr*(7?DiwBqoctFH~8&|A|nPp3n@AdB^ z&G2*hhN~MLZnN$TeGi1;je_k+9!l?w6J%J8o3m_5MLs)57nQurPVtUY=C%`zD1i#< zQBT1~0j7MS-c#&`$eYt`KZ)p;kQR8i#Z7Kfd0-x#a95!N)uSMxTyvTu_MG`cD_ z`@ta4!rVkZj>t#QtwWeEm%Var79)Isub&;fVZ4$T#Qrl->DSyR-Uy>}LDXbg>a+;> z<(2KDp7W1qZ@D)jl7d^w&_p9$qlVI?c@e|3T}ga48R%63n(EC?n zfKH3@kPuIm()}RvfuUfBvX@-g>-_3pQ=h66vN1bkZePlcZw72cmI{R3%jZeyfh}HgcN^)ob88qY<~#b1nUW9f65*`l#!iGJ+f-$*B9q5&1(M zXY3YWs3&5MIQOYnONQeUs=6+~OuMrgh3okSip--k(fdsXFWKoRx~K$k31OnBDu%JE z3<8ffou}CBF+` zD-FFiI}$_NW%xZ0*gi5nmeXsAFg$WH5-+%IIyF_|RiDZ!W6qOg#5*7MJ6qi8Owf~e zwBFD#P~<=`zJjYsv+n%yhqj(-BJ#gpCtbd#7Sp%5myE)Z@7mUM5N9_EYfp1q`Ubof znmU=J>vkeVnSfN;30~OoKlU(&D|<2YKGMrrh-BtQr8$8W`@A%CcN=;}F%aV^2H`cB zRb8OM>?1s#hOTo6)h3>u3argTgDeaUk&HyC(zs5<|9bt)tAnQ}&)&Q_dH(9n%ag+w z|9wUgca1CIk3Srx#*1HHlvJ?MwviO&7z{GnZnu2NS34VX9`XX65NH1fF^dI@&A6o- zCvK&D*>F|Syf${BGbZBzP*oXY2+eCHr3^0&#DS4GHBb{nSbQa~0=wR`712jn;@ch^ zLIDR0trtdcJDq-Y3B2c)7Jp$}TVIAQ^(-_JAloT15+ySP3q0nrI-(-WS5sYF)uMI@ z&GS;_1TU19^CozqE(P7T|8Y_Do{ECr_~(;>7lB<;#ArATN;WH1Bk)5n>0S6S4Pt7d zmblFlH8%GZDO!XtXKXLm}DK4Q%&yd?#a?e<5zZF!6r_D z-ZZH_B$X%nf$eD=jwfVX(GSkfeD2tRJ@BR|yFK<1Qw#((mKVk?QGzm^h2hbu7af}; znG__uDYD8|QDyao=4;{$_(D@p6@8&ig-yobw35Irt+qA}V@mg8@s7^P3V^|Plsu?f z6-b!Q8p`Hk0Z*4(7+)K^LdfqqEfj2+Ewk4^aiSz*6c!}HU`3e7$m5#8B$G7`CBIPrHOKbLb81ZMo-TTpMK7S}uKsfNmzScMl7%F^*Q_(S^K^7oPfZs$Q|18^mo#Hx}AB5xC{CKEsi{+vd^I5eA8u&@WQ z*#!##vf_)P82Ssy#V`_T(R`+Z10i<9ak8y5&F+zdXG+6bD>$MH)hRV+Hb>GE^jya@ zw|)_1Y8Wp)99U;6$kg=Ps_C_AQN>f~$w36%Hi)l*%2=BgHYJIlhP6~$@muPm-MjEc z=PAluln|g8Vh!O00@OKSFr;StJ*B=L0^7sJw2~c-v=>r`A`HZ=nRL}*c;hi!Nu0?i zA#$x|AlIn?mZGn68lSdZ zz91T3Fr5gFp|ZPyK%Mw4r$_oDWY?X=I=(_ulMD!XzXO^42gl$RB`Jwf&zPz(^%&bf2hSOk4T?t1g|>64MVSx_NdVq_d-q6)Hu#|VIK*RjMLbyCADYz`IZ ze!o_KtUu>i>1M`XVv4Vr;#pJ#6fHAyzSPWWq zlu_&vFrR?%-smKrCDPvlwiSy+MtG{bN^0R)7zO%$p$XK)wHOTiEH%6$@&1Bj{K{)Y2M}e+)TJEr{HQ&fae2UQdP((CIJI42l<10NLfQ) z@_8&eh1DUir5Q&pAzSSkN#z9C=rsvT^1;Dt8Ln9)F2nM+-BSw)t5~KW!OIxsje3Jg zU(55JYWhTA@C}~QQsjQmMa+gv>Bzsf1r|Ty^=qcOs>JTCKOBRFW6k}YQ_*KPFFfRN zzGVxBEhueVjN2e6p;smB$Fua@pCWB4!)pv#2+|EIp0M@h#c4=gcy+-^Vpv78A{pUl zYDbKoWH5GoZQ8wN_tj5(=ld2KPN+i_hQ(lY940hA>o%rhlZJDv?M%NuXWT&eML7W3 zG<8LSWaN)?dzFQ`FBM-PS|^qfRh1Kdit>yp+Q z?vdM2%QW0$w_M<`ViJj*5b+8+$d2z;$KQN}TsUjAfGaXM)#rJ>2)A=+7S1}I2!qb! z?%ir|AXfM){(Y+6E3;opk7lX5vUz>=+_0NpC^sx{NUm|NJ*u zGR5_zy3$LJDpVGuXhv!+!;d=MvnNsGx1yCwst!n}GD^DLlHDecia&F*GtR%yC)1h2 zmMOz-t6SZz)wk_7LhZKn5d6uxA`3n*w@Pop65mg<>( zE3K5304ju-t%L#U<0Oo#T{>IQxdiny!0-8v3P`8{yMDgYfycH zv3`&^gWwW4Ykw};hpido%-MX+IrNkfe3-->!fZMVWs-!F+6q;+E<*XzkIt1efmhQK zuLfOe0JIMIQl0oBoPY=q5~;rWC&&__8wV1EVi=E=x$&5VraZUe8ov`$8OYKdqMm6C z?mej(Rd}gtSs{`5lQ6tw=UBw;1KB;^8$f9An?m~=YwRKY%A7lHpWy3QJ7vZ4&*bJM z_hzD;(@d)I-bFCrVHJEH>2Bmx0$&1vAIH2Y*#kOg^U%b&>Q8+$#hLxw zwi|vG8h;sWnyaO_D9bJ(WH0$nZ)u!URnbv0npCNf8ISV9JR*}iVj*KPbyPAcb`yII z&f#(5jgsf)0h-FJjpY*?7bAvWQhm`#souRU!jCn;56QB={p`3U@qaGZhUQ1N3;+c2 zf0|8O{2ynly}1cbHaE9hn_KM`#{cQ;EaU$yh7JL8iY;SJClbx;B=FZkO#{b-Gc9!@5 z<^BI#y#Fube=hI;%lMyvp7@{X5l6g4lQR?B8?6Uyk#{$@yX|J>0HB!Cw>11G^+}Go z(t`WX82^(G)WWwQvWnT3MTRYWf$5jY!vu}WWcKFb21%yUgz3&xmyh^&1V4T>dF_Du|&iGsRa z(^E4$mo}eg>SFGU?GmJ}v4kP+lr8*Rf%ELwPw{S_wne0P|MN1yoT%r>0Aq_^iUF>~ z|HX_Hd&$gPU~&Ejhw**wO#X+hPHUzx0ShE^v!yf!N+? zZ#k`hf{-n611Mh>1dyNiN_}kRix~z$i?UoLt7k; zzap<|VP8#9eko3t@Kia*JV(ZUjuEZG=kf+~oNk2x^Ce90$v9&HClgCpRi4V|&C%)k zP;IuTknA)qbjx7wrJ==uqz|9{^6bf5xW)kf<`(}plVS#L1J`ltPgya{*c#lk;Y;d< z17YFV!&=T`R4v5{y(VkotXtL^1MDXX!6CEOXhxKxACY*K%qE@vM<|LhgaCp7Jgl`Q z(eaaTg0`JK_$wQe6Y8+Cduc)Veea&lAq+ai05*CnM{B|Hkqd+iDIXC|_t@%lBgWg< z=h$pG?jA~k&_yc6>H%wzlH>5?pjL+sO62JPPJ}#Y-Ch_|b7Enfr-G6+6oG1EIm$Td zY&?R5oYO?@$$4#Xyv!8e%_6c9mjJdl*bWn*!-SW)Zs6rP_1@qz6LgD!j4F$iy;Qf* zRkyLfuDL;}{D++mx0C*q=Kt(;+Bx}8dvhuOS;~LDS^M9urTy^yT7*APO6kVK_?Im2%MNd5^w?{6}dkV_)lCoeCU2TAZXvJq*cOpd-_T zg0(=a+u7s%<;t$`|Lqq6vP`I>j2yw`K3^X+9jz)An$xUvQL9U5KHe{xGJMa zE6q69JYH9RwX|RD<3__Q3aU(`-?puUATOIJiJZ!QSMKbYjHy{3_!TizQu?QecPvr# zp&vR8Jm-|{a7aE30c2y@9cC*f>;ISQ|x>x+Oflo>$}?3 zh&mpGlbD0j&4BRiqj&-%RLN63UZbBaMlHbNz7A!UJmp;r-{A^@g<&Ys#uCpbBR^t1 zXg>^xvXBCRM)#RE+6)2?#2Yr&pV-Or)YC5Wz<_Ylc!S(duvB z`AC|VXG%~zjGOf)v8j=^Xymmw0+0AOF&EyV=(c9b&k zxsMyeBqkBC@AUm~#rHrH}QBMK4Sw087De$vYW z_8$fn+-YFPn8g0qL7DuvnIg|AO*vd8xiH`UvO!;Rd8;SGQ!rFH%kIH4nyWEAR|;96 z#A~gTx%%{3n*61iPsa><&*wRq^A2fapxWMe{IhODp1H71_* z{WAg)L9&Ddziq}bd2JGU9!uQR^e_}96%Eu3forrw%%X9cGUAOfS{GjRh4DkoE>RGy zCp`5|*=(Kq{zwFDI`z*eU}liL1EvjOl13OTkbykq@m@wvDFKC2u*1X~{5tJuQ{`M9 zVL}s^X&E1zHFCK~DaV%dMPkbfgk?3q`K&A2$pg9f7(+AW;k|dSJUr-1e%nb`_pUhs zox&Rw>=7ylQ8!-TWVS$c8%VM;6tNdLPZ{&$BlFYH_8>(yHX-Yl(&Z1)rTN!a75bj{ z+SiyXgrsEk69+*>=eYdaQ?K-Lf+$dd>ipuAG@;AOW+e&=S_k50xv>%@fEHFBU46W- zL$4e8eIumyog6Cd<@qt~`H_-j(Qcu&RDG{7Tq6sX zl*Ub0TT^+s)U_1;5_1v~w6ql;gT$XnduLcDc2N_mzdg%wp&Y5Mwf(I_-ma=_YB*yCE^_Gz$8vH@cY1U|}9CS5fTgn)ptO>Li7U|;4c?4X?v3xHpX*dn zfi+DDKcPGJKY|gUGw|X>$0?ja4w=6e9ZH!?TR3_`U0U|*{3P=w z1FhGc`%cSlyjpgSpb4w#FcCn(`^;7^XS?PKY`H~8423LKXvAnw%C~pfBHFZ`T*N2w zwKo>)8-~yTneVzoXNDY9-1EjhH=505T%f~&9U46Q0gf6T)_3udI@o+@`oh5ex%;mS z?(KYtRl-d(acIPeQZc_zrW7at`>z*I{`vgXo0lg)y?FM948l*I{rkn?+e5c74I=A{ zouqqvdp{q%J2-su=Edu`E9ox6u*iDpr@E(`bq9%uJA8nu15K;(X#)-E1QjBb@G^kI zNxMk#9qjkdV%PO~8sSG=E)2C;TSw_dCdZfXQU=hm7KdNh(|%sbkCyB> zYD6v4K4YC9doL(;@$Yhsvcx_2$i1hQa_&L;Qmz>>j07GZl~h08bqdE>p^YP@mE3^& zy-A>{m#~eRu7SS#}86B8gGVG<(Ob(95w(`Q!8y|SzOatPXK&v;T%gor+3*MR^+ww?if1;)o#+FbPbkMTC}#UR`fzN? z2KT`>Eh?Ng*Pp4$kONynfHM)K7-u0K8Znss)|vu_`V{G!KC_z+=B)LNIgxAHP7R@K zo?+TS6YkJg&GF09HyDnQ$@o;pr-D!6iHcSf$T?W-X zknOwHt`>b^dDGMeTX;WsxF6%JARq7oPWvx3+BgSQSmjvh~CwoaJAJR2> zX(UI)Wp-hHI6k^Ou1}i|p6~mB3uq0DIA4umUb4Gp`lhCCiZFEjwaj7%ZCU~02xd3!G?m-I?M6Hm7~zjs(i?srImAs=U?$e_Q{wxi`Y6hRo!g1*=)9U+? zx=p&P(=e5*EvDMY!b%LV<6TyMH#;eu9_aqM3#5MS z^8g0YaD$91M>j$?dE+OP{7l+4rtPKbRGkBJCSljDW81cE+nU(6C$??d#>CddwvCBx zJ9)mG_dQ?LIaS?V`v-LI>U*!XucamMul|bLP>~18Z4FK}Auymw#-mv@lNgi~3-R+^ zMqgW345w|9zBYQUF3MRLroqLLgs+H=IHH<2J_jSBp_6PPPhfVd7w~n%Fgr$V>$E@a zfj8op{|f;V%-p54bQeA5o;)AQE#T`e+(ex!YCr0}^Sk}gyuZ9&N4s9com=6IT1Dvm zLYkGGn`Qc+(@k3MryhjcjW!q% zNjR_ls8{i>*}4(qWUaG!*g)FfVJ&0ukmp~~hN1kjYS}0674tB>#+ct~7oF6I3M)&0 zllKb+Y#P_CAUb63clNMa@ly2wdO-J?Pwlclt4E-Q{;Pxi6Cm~2;TGIVfzB2?j+CUe ziH@o74+C4wP)Ipyv=e1hBmC$fy~}}^dT(MOSkG;mRXP7MF5e7(Qq^>E3~8{6JG&n@ z0{TX*$VZGkgKxX|LMxj;q+$h{&AC-G2g;4O3Wx!NkT(h=EL6S^9)rO|!lQFIy|8sA z2p1WRx=r$1TsOSITX?QBRTjpGqIzy15$)dsfGqzW7h-5Myn&W z=EH`2K3eJOtr#D_FEva|hUDb3mHw?nLj!<*r_w#Jfe+mdtlrbU;%NIqVZ&O!t$NbR zga;|U^0oIS(*x-@=$)_*c6gWYal5Ih>5ZEkW7*By4XB&Ou#4?KY}(USu;NPmL7p~m zO%EHU@g{No1Y4)GIelYd+ZC_<*`-1J#=fDOyk6K=wwdus^9r?aN@a@<*jeV zcyQHJ?6iC%!K?StpuYmOP+j{AOTOi#^E>G&H*D9&%J$@C*6!%@$1L6G^3j{jgv@Lh zX$yu6s-)YU2=`~)11&VmW1S#=0wUJmMgmo`jo+uY`wdl zbnwkO$v8K7;USpL6TYcW9>cc|3*HvXhfe6{EN`yuw?#yG58O;^4B$C-#9!ywU;jVP z@2I!@w}!{%MnOpetLTtwHLxsyVB*F1E;_KXU7PXrzh)KAK^`&}R34zI^Is|wbZFaz zBxdl!$Z%v--QdLL+PRYZAUF;|4~Y)gy0+(5P}QI4C<+f^3p8ce_a|9mI7{5D7SR;x zu~Aw-Th9Lf@a98~&B9J^ZodiP*6;jvAPNq@dl&6a?gg6w^gm;!4?vp-z~C65y$wiz z>;2|?>petHr}(BB`{oNjoL$>9AbMeqeb|)ynxfY!i+aM6gL(B93$9F!GtUG&0PAG1XcbBB9_7 zCSbj>Wi2pbAEQI7)IPYLOKLoL8f7xBE`YBqe_e?rZas(@JNgw-*2Cua_R58&Qj|f1 zoaPD2A*Lb-9wC4Qc0!7q$L|rjc^0EN0+B;=MF%y@#usEFLuZ07!lKr;hxMWPMtc&> zIA63M!Z^&cllCdOWr;}%u=?Gop#BX?Qh0PocO)qLHmm&IlmhrEqf-D8qzFfXh%$$Q z!yrV+N1UV}@5oTZ=)mA9xFEVNOQyOz4PX)c7LwwJfll)@2m?wwL&E!6y-K}KQ+8?s=!;r6f<eZFpm%ierxuWMj%4-(4NdsnwpYXym+yZhQ zT#TclT5N`AoW$2Q=g8Vt?2`_CaSy7oPfByUMO3vSOa{2qN->ZUE*jQdtg@#1ywmFr zH7I&!E{st?;0epr3H2so6P}?C!(JY`u-Z$%7zzd-C+VbRQ}l0xspE&U2XW90(RHryrwRVO(|ystRjA`FktO_v9hfCB^_DY@x6psdC1fDe~H8a4#w@XP&~IA$=FI?C!Ot{uIpA%FH*{|4=aMy)1I@sWJb z=rP1$v9sobaMY*-KeXcP%AVvE6M_JF2`5yPw1bD8peyH3RU8UgLdLKJuXf8pr;X|f ze!MqXcN;a3^0k|y88?*IHfHn3C}C1wi$zdgOE{4G`ZaW3m};7cNBTm}EczVdKPP~ienp6VdGJ-`$FhGkp+fl&b!u{Ll_vW}-Wwyb>K zZ#CGvwkU_aJ!Ww;Rvq{#d*BI}2Q%93lHAY6q>Zcrb+a;$bRRd#1HrW($=JvC$igqVY$E^2^G9-M3QsvVm8YK!uX|t5 z!eeaTXt%fw^9EE}Rky;=?ZFjAB;YTj0T1!U=W6#oIrAfeVK2M{icFjMIKO#6rc|27&&{VlIua@3nzI$9RjubbV4zB`-N zf990w_dBJZ?$iLi|CHhzfGSD6zd*KwPTL!nt(+T(Ic}Ys)^0kRsd_+_!vP7O+nkhq zcGDUjIV`O^rg#xncpx;99?KBFleSAkmW7BOoCGqsjfdEhRIzzPgl<+WQk@AP@-G94 ziJX9Wvuzg&llqVpH@T-;3%zUTs2ITDV1P3?=)kH#7J#d*6RkuJz=Jx|w3uFd8)$#19T_fw_ZKDT*3$7Oj?;Dh!D|I=^fD(forBV{ zWJgLh4;l`>_56s^NB+%Q@ol^QsyJ6}n6s%k_544;S^-I`;DYPY(0>N~-;DR~!d&sM zh;DBRRZUGTxv79=o&Tp%|F=|pi|5;?%Iup_T_9Yg_;QRc5nMZJ!vc1h86d>5a2;0& zJle&zwRT(VU!f}tPN1$2I@|RLQB{d7Qbta~$R21KE>V2>){XOt57OSXRfAyu z_4Ddnc0&6Fg4WUbE7N})rx4S(BV*~a2Dec*4c9vm$3NlR#?T9zyU^hP z1Dlfn2^jPoG6a_!$*H|B%|s&c$I^d`^2B4jPJ1uFfK3o%{fJ+{xCqVrcNPG%kGgiE z5fN9GyDtt-Ek#^omzB})tIqKthCe`GjDBnK8m%d!7Oyb}_M)8luD8y1zln9O^y-*1 z3(z8X5#li9@L@^*FKF$+)n6^rv0&C5sG}P(8 z$tWd-#9XQql9Vb3^ty!o3&I_-DuY4`SVwTu;vB73Bn@>$5bR2rk>BO+u=n?yB+sf+ zOEugm?2uKb8C(r9Z(SZ!lMYl5h~X^xYn05JqReglh>}G&gava>&2!}cwjhSfG{s(# zjHuSc8KOWq1QV*YDKNom^9N|i9GLNcIKwqPIPWwP)ajOXU`xb08T1lTModZ6AW5p% zituDcr*;zzCn&JPc&NjlU<$0;g~EcC;<1NAL%>iuS-=Pf4QBSC#&MVGK%Z>)-IIEt z>`g0*PsIE&&*xdZU*CQKYrX-=m&b z0F!us@TWS3lX1E*zysnai{ODjc~okgS!qy{o1#C)uQ!}==Og@6okL+oqs%Qori!P>F*l> zT_o6yZbs16ADZERG&_PH0Pzqp=$aoCo}oo?N7K9=Z%yvCdDEtq8V8U%OJ4;=-_YNH zjju3A9EWlX_rLmwO=lrC+}k(*Riif1Pj38skcvVMk`C=ZXSC*tUZuH$)TAb0w*{CL z9n~dsaiA2&?=`Q2Jtb!ZTBu^g8kq!^(QACtksoq8IvI&TXl^v9h-f5)a|ther50JL z*qwQrLS6ghAk$VV5XZ&mFkOC}iJ+P~JmNklZWAHV6JZlRmph_p%Ehq_a3V4XZn0^z zJ_#I~C&H&siy|CN)lnRy+gu)!o2HRwO7BEkbZ?l3j3fuMEG#*GFORn!o0kH)X= z<*N~sMaQOrbm{O!iwRFgNg;yM&G@gtO=D^XS>RNx2TX?A?Y`17tJ4#)HB1@OQk*MN z(@8?Ml|!yacZ7FE=7abYW)iZSK$FoRx5y1~|6((>03Fbz0X~*NjH}-3F~hKoUY~4xE59G znv>ST868bh$bBIo?8B_9Jd8dSp_KY{S}3JnRt!Tb5!=ZOXi#$s@<Q!JgYk*Sq5&#BsULb!S$9T2j^59?I8wff5n z<7muXJhAUH?(IVT1W&2S;vY%v^o^!k;q8BqaWIZ`sbc~u`>(t_t3-I%-rH}lXQ+VO zV`TAHPtHstt6oHm%<@4!jz+=*<1Za56S$#v8LD2x8Tcgwfh$&pqyiKqU7!i_2F2Bj z5(amXg6s>T=NeiG>_o@qrGj#=ao6E4KQj5>`!Rk1bQlS^HNMjqlR53z)tRbQdxNfb zbdK|!+eRmhqH>un2ml5rLo+UzTvB2;Y?8wMN-k!D&F|@ zh57G)HW63|#wq3{{zfk^JlnEN$ACf1=`P-=nSIllD@85WfPZ}kCsJH!xtpKgpROTq zqnK?o=EsT@JYsPZSt_H|=$w@^eS%>wk(hP?7r0g`sNRTBJ`!<~zF(;^WE6>lgAIZC z`k{ig;qWMi^gt#HV$%BzhKZ%SIXRKR&kDD4=o-;l(vb0{X~X!T&s;t=1#?o)7DYV4 zZjo(X-P3-d>^vrLs8cQnmlAG) zxC{SR3l`|j*5DijjQnWjwgr-DgX2ri0M(m>ikppNN|}9Am`^nqiOFk|{vE5ywcd*T z^nEN&$}yON;@n^mABkGyip(?8(l^*$26PG9oA;q^|s z1{nk*?0$moZ;;dQX4EW@0Vhf2O!Bhqarpu=a{1ViDT78S??ewH!wzPjwTyICI4~#c z3{kiasmCLxr)~w8{z2>SpmLcol|2fpV2+2b`;b2utE{y-;Gc!4;ka>v6kU~hKA`Uq zUqk@In-Opny~0IY{8~i*On#!!&MuA9GkM~!C!cQKlk=t56^N|1Q5aO!50^e8Mzfu!Y504g_|-|c(9 zIH{qKpNoe_(Brl5@)WL+&oB78%4okRP|MgS@M}J#!842&A@=H<^z!wWhn}pkA?bJ= zIJPDDh%YEr8LYZru-QMt$UA)2zkNH#F{7EZdCNBITXrgJYZL5jo8}Cb#g~nby{LjL zdTG1dP>*XOFDN%l2NW)#4+8nuBaYzQ%}pz?l3N_ojZV8Jctg;aWD5RZ=-*>MwiXiU zwJ#4<3^D)!0z^6-@Dcss&-Aw%c*bcm&uP+bn%Gk;wL8=DjzM{pXXdDe(?Z-Eu?DAA zfBE(1EPh~4L8swsky5DcW9DDEpj&4Sn+=|v=n}{&mJ9^*)j=09DIw)g^5)RrNAe~p z(5##ywQXq+iU3Wsa@Z+HF70XiW9nDUzgb>3=Yvp`jNT}L9C6Q^a(*{gxW4?(Ji?wRTxbG z)ycPLF^luBy3Nw*-Z5H(ZS;H=iWO{+TI*aP5Jqk19|dkBzR{Pf^96E$L_B$y^hAxA z?(LC13J*={)>r$9z|ji>yP#~DfO7EmVC9n{J7%%Apr^9$2>o^wziHP7l_u~bhKh1hWbx_MJ*#q!h z{8GGp`NRP^nM>o=qRc3s+2{&~W-(VgQH*Gxz`V&=e?KuPGq#ebL9W80^5!XIce6&r zUq4IGHX8n>VrcRpp;Fe8Ak*TCjtJ9!)@k+ECE8rC6FfU(DPY;MVcAnhvV?#~U_Yw- zpu*LJyEJXPUe&g=QldUJq4zwMWIXfs@4LWyagTZ`(mPn2ywDGpiD`n$_ss z@-_rNt)7YTXyPr6X8xbGnO_7vE~`$VWhf=N^rO!iVk3Y zXiC!E9PeAsPLzvI1lrDYjF6p|>-81r7-0q;2p}k_qnj8UcY3ZF`my`^Y)Pgb6SKO- zEK-u~mR6&71U2{(tE8M-y*cSI#$P3aesqhsuDOUtOqCtp<%vyqV|ueX(tjwuS01QG zZ{r)oBg{v;vekflK*}%={R=8pNjaZI*AlU>@)3PbNKQo!HDKD4b0;vS2+LueF`&Wd zh{{ZN2)=w)RiP*9Wpq7}9vvplp^gnDgHg3N zG5{ww^P0Fk6cv>8zM+o^Qzr`phB|I*eNL8MB)ga$88{2H z?2*EY&}aXH)(}&~w-TKKPpTUDYxlGXWls|uO;@2$Q-X=kVzeAoRKgxDtz3ALIbv!a zm!&J&9e5MFjXhYhp?%A=&2r*(wq>Gdud$4~;V8Clw@#G<*dS>pK z?=>R&#>MISb9QCLZB+Gi2k`B_8p&uF9d=4_AU$<3Nyb7SORVhn<(N8lCl(E|Pb7fW ze*sGpIZOK2J29{X>_PqxEk!(cvMp!vF@-)wXM`BgrOds?7Qa*vcllf%1xWLdp34^f zqVrX-4oj)rW>`gs>+mow0Q0MHQ4jdTy%h;wDq3SlIs+OC z*=MTL*;?dzaBfQ3LjvwC78e~i;=Wp#56ne|;d1=Ml-($@srC z5!I$nL$d}$##$1`!x=bcWPcW*sFK@WH)Ywn6id6~&;$Q!J?TuERzE0=RAv?UdB16W z6h2&3wf%`vK&^LzFLgRPLB;f^%v38!4N@R}uciCuc)6c8-yce|Sn`@o>1iKg{Dfj# z=SP$}->?AVa6&!7Q3moZ#+BCIO))B}d84j=+f_NbOp&I7{#&ZQ`;h`5Eu>TZzH#B1 z{!s#Er)O4_zk5>v{?YdUv+vo`Pk(9v0CgO2g#0p$5}=&EV+`?QMe{8ToJj+55kUFE zPWF*cpLqC?CJsWqr<5L$4yK+M&?2gQmo?q59`h+83^a5qwTx@H2i}IA5piSg(-8)$ z6@s}rT?z`@F(mgC{aip|4zmXtS@!vA%9LNLujOy`!De6(CwuK+tuSwzLlM1*sX1k% zuwR>UpWaBj^(TVvA%D@B0Q_#_;r_1c=xF+1i2eUsHIo3Sl6X%3xr}{ZN=Pmfs&^Kq z?^11gGxrtw!}kF+h($W)(_{D>(?d%TkQm9#&JkYt^`4N`02$#6_!6acncqr$ry@ye zGG%CAi?W&v#)Hj8DLl*y9>v$hY8U}|43q{s*&oyPWEwNy#rJaD;BQ7<@u2=LdAe&3 z+-TtD!j{^ZzuO6e_e@XG*jtG{%S_~evrrZr2?}_B4+S}|8zI~c=dj?o(5vae-8Xn|Ez7$P0qLKBB!Iy^K=#{z9Ke_Zz?8(B z0Me${oYlddewO$MT(oo7nYOdpW-!dVOke8rck%>6XkI&$(*VPK&F1H%GOM{ZFXgLQ zhQ5-CmQk69{q2`$sUl6G90|hG($YQ?DQ6+lW3${sR17|jXt#I4!H6C7=#47sig~p8 ztT6=-c=Fxt`I!1a!Wd~-Mag%Z*yPd3m)hpv$Yj5HX$>DW6ogGrEG+PPa!lu``c!UR zMHf|{zYSW*5q|3&#{OP%nclveoS#Aq{ms=InT8=J$c1z1JOK|=sR$%lZM$An@Rk${ z_~n7WdF#1HN;t`d=~A49UvU`vgvx&6k0;qPh5&4j5o3Z!9K=K(R|vC*MXTfRbI6># zNOmwBW}J`&g5_5~#W)>4pRr%d3e)poHn`;Be%uE_4xyfhRfFo*To2N>^gH4p{%E3V z;hFvJD0jJEP51>25PynYb{*~h5S&(bUe$9aTA@3BeT3+SWsG_%SaYSt zDfxWQhEcv=0=XWAohiMjV5i32JjF}O2#X;!;d?jx%8s(I%MN`kGK}-CF%Y<`t`Y^4 zwBKaaJqX&_Wb zPW!SX+eM8(G^u7PRB538OT7s2CRNti#tKZo0^s81oh}=kaM{StopE!I7Mvv58PS0IcD!>=Tj6DRUGZNfsQf7nf z9QaI|wgQ)SzncKIIJl!NHnv-;Mh{}=*0=i*GH3kf&xy-cbwFBK^5AjnzkVevmx=9> z)|QA$<9p|YT%N;^<8cR00@vG|%BZ^*Z6PhwmR1taqml7j`>c+8pk_YdeWH6h*PvssfTs5seYO83E2eDo)=cm*)K-TBhyh#NcLuhE;| zJ1DVyK#m_p;@Y5mo;21rb7tkQMrxYk;FmKL6hEG{f8(2Yj|q6r|&wc=&IRl z#@RX%45H7FDFb_I7%eDn$WoClnx6yP|5L5Kb`iP@80_*gR$o8qd+L(g`^8yJSPFj&X*hOqtev5YL z+`5`F$&AwG?i`hmN5I|STi+h|C_HK8J(p8WU;H@4AF408mfz;E+zhNAS)qwyW^tY3 zno%;Bf_0ho*zpH<-CzE&=Yq|x?ybAoH8rDGS1ae zHxP>^1qr0Dj{~;1>GQFBb19z9WT{54V|kUYS9A~oTxCdz{1Vt#+-NyOCBiaSNwWD_ zOrB^XCQ0N|Yc+yA&SBAcO$9VO;cYJXDsqSphBQ<{%NB#^sP4&^P7J0MwafLc*pe~w zvM!e-DLGk40vy&6`99$$EQfQu%k#zVbs+`wzKWy{%3|y&3tCwSV(VFx8FZDTM|q&! zjdRc2FIhsC2zMS+?FR{axMT=McIf*N-37xp@Qj=N9N~yRF}%#K^%Db+=Kq)wnn+i$Ge8Zgij*$^t~Iaq(00IacaBv;#wT`r(&8$C7@R&!syP)9}ead5!3 z^nK98dYiBso1J%6_8a=i%+q;_TV0W$-tV9Dqw4||$I6dr488o?A&yGSM|y6RsE5D6 zsd##-@cgU&(s}D8kdDo{d>~*CIKXa5rBVN|Ho_lJbwj2r?V4|hl_%U$KRe79g$0gl zg~AVHC;f&6zXmLAftx+|o)LYoy#ZP|-3z}juI0VGU+!j1ZUGyn{&ZLVvL8DO-)+r+ zpG=qh24!;GdwSwKf*1;krf%WlIE^aW08bBvID zJNx2IW>Kj9_ppGf$`6p&%&h4W_rT=&5r}IotlK~#u2YW%)c?Ix|FZ!aqV0{Ij^JxH zWo1=s=7l@t9D!}x=ISu^A(>eN7hz_;WUP&~hDAd>y2t)HsxpY{@qeqnX1psCdG#ME z3FJGBDK<%)Lwc<5ubWMF+1(sp9jN_056)rgw^5UnPH|FqE#yja|8hSd`u1 z&0RT|IgYC>2mpd^By}-`Oh43WEH;;lDB60S!+6x{h41wvEhAC3q2_*q5*N6AH%oyF z+i>(Dh(AzboM~TJq>Lp`H=30DARE-^vTByP;oeooBNKZVpHc#9Jr#x{$iEcAs2N3z z@}DV_ll^OzaAP&$LfPHGB*m)E9(5p)v7XrGIPN+nPraIf_2*&|SN}20F(M_mT`7OR zK^T6>t_0ApAyQ;v|6J304=458+PwxgX5^@KFRLpdWF+e!6*7!y9T%aO){RLsTfS?Bv5}#4s~rNkFuC>t-omg1+lYIkiopY;T8hg8)*<|iLYUwagrs7I zFX7wW`U*jw4M`+H{)HFvr!iat28Y>a=?1jc+EqO51Q}tf_9!t2B1frklf8z#XLnP! zD+r2hFf(TuMQF>uF?isF6e_5UY`5Pz>qjvyWOhZ||DLs%S{L;bt>|Sbgeo$I8G-e7 z>t!h!&@B=!Gh)Z-pn?#?3W{TaO4*R9JK9Tm4&upIZ&C(!DQtqQg!-Fp%J(&I!9SOD z}COzj@l82T6ycjd1 zOu<-@kkH^Pl!8=OG=5}!{{`jLk4nPXDD1tkdukgI`BAh_wH;IAoP@A&;h{TN=hQ({ zzaF@zlfBHm{m9cMNWnTp>U*mQOVZ~F8{qx6auI&{YC-|+>)1}y`PQ}rcs)G*;2hnn z2z7VuJFA6Ph$F8@t=F1fNS=KPq3lu(gr`)L#gf$!Q_w0dL75(@KeIM--n>vNP5 z16)N|yGC|jkZ|BF>{~ct9J^mnS_)wssIe$6>x)DtI2UB@ zeD$JyU0GX8mN>Nq9i~gTavyxItn9Qf!_IMVJ}_Vk@26>Yx%kYQvtIUV52b2sUS12d zJkU4g9&r1%=2R4>eH~KUqoiJ@W7ogzKLcX~h0(he=RV}i=H63GRm$#|^TzB{35?@q zs3R@re9HDE*ieZ{Fcc*Dcq0HqpfHu)7MyRAXqX9mE=)N%6+GK~tZ zMam^KfL-qRO01~R3(Da4eBH}p(iW5|glUuq1^4Y7z)TA2%gUp{?4n*nlbP1aX~pfhWB*DXu_Qz7`Vmc{$n+r0D?NA zq~N6_Oi<1XiWb)6GK#29P7@8p0TwH;-2ds(e(7gVOgR5SJOh*9VFsnqWZ z(^dd#b3TIrc<+A{WJKt{(un`X*sj*kl#8ffzTaT){0=vcS@M>^>dIc`;P0(N6^gx@{ujw&^XVD2T#+q(d|fDlaO7o;=+^PdYC~4NJtT zIPLb1_yold_Up3Wti2BP?44kPCR36Ux!J-VC~k1fqI#Vk%l(7~i(0@lt~2)Q4|ny{ zBCc_wzD0Y`ImoDGiiK>EG$Bkai~bz3%VG+v#i4l^ytXVp6!$|)HH zGD)AH+Z(!aoN$zB4&c;zLiNV}*&yobCr+4O*O+Z988bkmuSANzrKcgOUew^OBYu~^ zL=64j+youI8r4T*o7yHsP$D#m^)=&`la?t1qlM&R^`PO1ZlyS7Q31=%;H)!i<|;-X zt4iAm1dFK|Y6y?#x#6)e&~NGqH+uT&&#t&CtLa~e;H&i~C@U2m3wm_3!G{4WiBj^< zFkSP)=+PbR5rY7@rTiw>$k&7oSkNt z1g{S!Frwh?q`2J>UGKRY$fr!v6(KC5^n@;Hs=e-O@=8y3cAw|YIQKz&nFS02!8mTmHI}`1*T=4p_<+HJI{1?#t9o-2YdzF2~(CpT;5qo;6 z>cM!75a!Ez?lOG#Nd48QfowdF>>%I%$v}Hfk>Rxr&KR@9({6@5`s5%Vcfi@Drbf0y z@5dU|k(BQcVs4r|%?PeL9-!Wn)`;OL;Ck}7IscT{b$#F^$@$mPIwAV)OnNF40n95& zL-M|H)blZJ-6cNiT{7?HNIrZdAJ&7opaI8lq-GKvE%**oFMfH{#~@TW+G@^cEeS$#le|`d=|>xO z$1VR`Y}d;ClCE(=)ccLuhe(s^cTVPUz4AYeHmWsK?AF2Vef^;AlK?%K4UP(IHuA{$ zY)C8TR4&nc{6;wJ2J&$r2`!kRB|MTwu61A>xO83@%(95oACO>ap0FgW!kwOqssUxoMGbk)wBeStR(G zVxcpVG>MBDJO&U!N7$_SIl_N5En2&__8PmSt5rJuIhkCQ!6Og`^N5G0YMAn%g(aXV zEa?B)g?g2-i95_l)LrV{U%$>bJlBQdzzR5kZTnYnV4uwS<5v$uC7K`?#2+QW`ryNd zTevWFnGakky2lg)3OUh?qF-Y2cfbl+;1vf7yVbH@-^EX5mHOkl#FuO|+${_er7$92 zcRWgG^oPZh2d;*Qux~9K+R%z&UBT3Cc#-jAuly9wIw-mi-;&I^F6uf4C8Nt9A9A2K zjLqGUls}Bh@X37UGzL+2XQO@JcTFgx2+Q~fb$}bh&9RFC)6)bPUntz$kDUk63Xhk{ zuP4dwvAIldO;eOvDS*v?SOeeSu8GAGgvy#O17k79RK`ZC`6Y#a5!V7FOIXV1>qEiF z(dz6(4TAbMe48)7St}hyXmHp6&jb@LXBchx3Ty2Xj5o$mq^BtbQ=qSU4FvxXb9j@z zxi+M??=osuuv8CL@t{9GmaKRk(7L?pdS~%3bd!4p07@F(p?-7Le%b=q)$WwwDZnI| z?UL9){zBPx;GyLBGq#&yUD2+7@CgMm3`@Q7yWO9~K4kkF1}W_0KCwon%GoNH--Z|q z!`-~mm`@S4FW!mP_B2Q(O#cTiC~6_M0g`C8cGjb3VwRj87=~@?KOWIF5ePsAV2GMr z6ku>NW^sLR4qEbcRAg^0A&4PMk3?Fq=2a78PYP{#+yb!zn<<7fWc5`#?(dU|uqOM^ z(n;^@11%<}*qj*9RaraBXj$=*$N9F{#|;?~jcV+bY^*LCSc7{%ZL!V2j?6f{S@ZCj zkPVON)SKk0LAI1&a|S2cmNYz=DzAng`qjM&b8nTO_F9(z&W~f>0kI#1tORS7)Z0;1 zz-2OW!xP;HS%EZcAeXs$xxK#(b= z3kk3H_S2o?(Bxv_pXvmwef=~c)$|^Hti`y$=rK%zXJBsp@I>$B4pp!6f$E_s^I%y{ z6E(9rA3Yf#<3pNpRfH+HsmQlL-g(UVyiD%q{gbX^V zD;MvAm$~PWD%~6LZF%3WG+xas9;oBa;`Zt3W`?z_^KZ~lgq^}i?YBy`nxB_K?DA2~ zVAbTz;8mh?og7e}8T$8TGGNQz%?6dUlL7wcVS@^z7{c%(Tw20)(1vL8y!*cL&&nkF ztU2h|MIi-H=Xb}lo`$5TlHgsrQ@suD04;{<<>tqI@M>$d7?H4J5CIWU=vYahvUMhZ6Y*> zLo=omb;YKW zkp~&p;803abNoI>&{ZKq5J%{+-Tg7F=u}H6vME~dG|>zkU(-WSqgbe?f3f6L;`c@e z7r`>Fel^9<=M@oMA(TOn?NKe=PDo04*IAloxuG%Ou|#m#r#6gqO<^TEsR5b2YM0e^ zwFD+K#HtlU=v3W!F3c!W%JCi~rTz}mE6L11OJ_Aot zow)|HB(~bpN7^4R1KHrwToyp z7io|ll5NV2VU?^^ZDPUPrPEh}Ce>&KNfv48(RXs#FjWY@dnIvu&}PjR>HgtCRjUU( zh^$oLcH6HLAf5%vR;^;^uJLFg+0O)XCzqm_V%_Us1IL>WcUHUAquV=2is)!q6A>?$~PV#SY0wW}+&6Xd!4`$7S z1WEIC;S}_!9dAd5A02IS9_t=Ezmti_bt%M+$G8;bWxMz*NYGry{BnxRUsCIC$yHpH zA;@3S;BUI?(N|EgR={xmodu4Nwj}Bw$s0&uCQ!H(Ydg8N7m)&SEo%N=gx}T_nUJd> zNk&fyp`Sk~65et!f7l3@cI-v{vGR7!dbt~{*dnc>!yY%;R7anSI!UPyzAeS`$xU%H zL^l5iG1-{JZYtCF*OV})mG0aWsfz0CP&V=kax}T%c)$eV?3H2_=p%$GYc zy%9|A{UgKya8tHwAxEMtt8IUAi$bK5YolCHX*=JS`||^LnMixWmKOfcU66+B5+VXU zp+s9HIPsU?3p)WWj5XuSeFtq6Ti0kH?~N4h4Xe4wAp!cJ5`HdOp0nV16bPIODek=w zaiR42yb!7fzUlhG37*)2ME3e*myH9{X$FQ^ReM|JD^Rn>1dR#QqX}(zUt6JlbdQuk zgk!HxJ40iz>E*8CC(>O5S0Kk`O#`xjEM?f@Yy`~gZ1-!JHU5^8;D76QmCtWjBd)GV zYemT7xO)XJ>)hhm&v@|dd0ts79$J~(k)qZM8HMs--Xzl%j+*&pcjjl94fsFhTzV*Q z5Id|I;|cSlP8I>l>-^qrTT#Eq6xl&gauYb|SGn93wiBTowIMa4Zs`s+XC9+G6%vA0sVU`bCE_7Ch;xR&Hv>`;%;j%aH`v~ zP}RXQgU-=~i?YCjZCi2GQEJyUiGBfJR*V?3hBTNgsjLY|VT$t}eM8bQ zxMDs7@iXi#bE9#>9WqTg^aaRh^v%~#!>DW)g!TwaJZqt%s_uV5siR;qh)4r+xmmQz z(jesp!4iNN@;`nFat;hdo=_6zB=U;e(p1>hPRh6>uFw2wFlF<&RY89GF!aNbB)g7X zEL5)(gCWWxpa%xCN`02SUVJylAH!J7f#mMNDe+p7@Ema_Vq=%{A z&G@ieeD_Q3&q#Sje}$t5I78V&=Tg-*W`*1W+@v2i3p_12ycLs>enL~66Kp<^L>68ka6@0c$8M0$Ap|g-2Op!O~%hEm;CTyBjMz#{&!-PjO1vgX>{qrdnG9Y zUs?!Za_hb|o{Rv-ltN{)VA6zsRG%SINGuH`r-)Jsjwv&Q{fBWYK>{*S3W~TrTa*YS z1_qwQ92UXNFV{_t6Peuk5A4>!w()Qb2zi{O`KZ9Ls4Lo=$FlQI^eQzga`oX41<|^iqtZeS`Ejz7jsX) z#huH~xQL>Jbz)cToNLOwVN#q5cV#EF;bMZwrck_a0{qzInH|kQ);OYNeAKFzEyT~M zZ))Yfh74aMGZYsUArX6-2ykIJZkpAGwAO%!+N-1G zU3d{!D;9$Yg7Uj?vTW0q1Pr&z9t+wj%IT9fjoah!;#GTpe&6SNcEv3SBa%&|?(Dhj z4{R^cUR_cc7B50ai6V8Qxo#rL;H;qyJtO{8z37ReBeZaYzgz$2QeORkm7j{i>iEl! zz9U=@=&DKV%v8coyGhY4D>YE_TY{GAc#q`cM9X(q<@*bc@lV z?kMJyF?h3vP~05rOeFl(To*#5Yf95a5#c^Lj4*vfeQA?hZmBlavD3bOEe)B#)Dwe0LP-jFQ4SbZc0X zhdssHAbRz!4v&B2*=ZeIk3D#gbL#Kyd*cZaccp1SIPVrS!y<#&dYUCR&l$+ZA14ew z9s=?$XbR2Fna6!YF>>dOb3HBmBdg#V+EBUhiilIf(AG;%z58=JGdnr*w8^Gt4KD=L`|ep#dHl_F#5LzRb-fgz3>Y5 zaS17rHB&(q)Fku5!toK(q-DLVIp$M4PVAOP1_Mgp^r*X^IDZD;mn69uN4e1okTejQ zoe#NXPH<5asJzzp#}iXv7h>98#}tB=|AsN%S=eYKsINlizYFNELg&8=m=8R+KN&y2${N^Pxn`j|vXHtm6JC_P*2u9EVRAivVLQK755`{9k3ocJXB6>1j@>0`v+0r_xKyQl!BK&E17)}d%;-$L7-cUvrFl4$V5;5Z~no-i|dh zfn{G<)Ax$rY4=_ckzvqdN3}wvEVEP%O-97(=+hoYXWXjvGReKzqjyuMPaD9)Oa9LE zb#Ha|bEG8R)ffK|d)`hE^V>OIV|DD+nWm@n|<9(-6-i5Agt( zLYfsWk5ZgZ>`X@&&S;*d^rn>6O_o3K+u}NK(Wbl*OYd$P39jcSKSjv~Eo)=jjYCS` z%%fo5gql^y&Nzp&%Fdl>iD>9EvCy~xTM;zDT|EhJvAg0)=}m_|LH$zY$7RTwBn63A zh}~TisogIkB3LzESl{2@O`y<*-_bC&&QrjKkLpJ|`&)dZB< zw_RZC3Y0?jIdRCj_+e>?h|5EQFw0erWqbo*T$MsP2jpMc3Pq}IE5pB6%r&tbLMP31 ztFH9}FR=!>+sLH2Q8IuDakNb~L{Gzh_B_n=JVkySY-p-}zQS?)+xx}f=3@anNa7N= z)>+Q>g>?4fI(hXKvR4iUxS(@_@y)|!I|sI_Z`)F_YF{Czg#|1cGne*YCKsO$_A=#Y zY3{Q+3!eokGz5Pnp+FMe?$OEd$VcQ+HoKqsg2Zfs`~_aVw*?z*Ov0-uJ;u`p*6FVY zn+s_Y)x-+?Dbz0FF)bCfH;}$6I{D>>3T0?T;>HzKVQ*@)tb0}UK(VccR3~^2f63Hp z<3Cth^EX$GxhQpezkfoM$B61C;<7NEIzr5}G@HGo>Hcw8P09(dwI?js&-v|okU$BI zT90uGDrWF7;CK<7SCDvsl^o}hV`oaKsb&R*9T};YNm%FYTf*o1d_tXKet)dMM-rqt zzqdsiA2B_YXDgD}+1TgLrzi6~BRXUuf`#b|nDH;8gXR^+ibgpcs)yWhr^;!S5O(ta zwSUpYI(Cl;D;MWqzc27cmiDXb%IGF5DX|LaoGmRJOFgF(EqeE#r7LNQX|pi`G`N?0 zu?LYG%~wP7yRGM!sQCn=VhV$sK;rn%4LIK|iX^V3oWw;q2y0=97wYe#&&;-l^v> z+mKg#D>kQ6ISAQRi(~K4Cior1ID6IANyZ726w4RF&oqmM)CkYhv0A)=V7JL*v}__b zCB1Cl>EO3GLE=DV!j}q%8MUHdYGhS6T7=#~WS8F2So2(Rp!(ZSpOz@wCRcEPt>4+= zvx>rZGUe6oAX#w3#k*3&uu`R1-TGNf-*sc{x|DT}nWmbzDxJ^Holl))ib6k{W~E_Q zhP-s{A|&`Hi}WYE_wO0T#5UX?oS`jSriCVn!Goruu%L$rSTqVo?n8O)bd$`YVU;vx zzRCFGF>fu|%Y~&j2xePqCYB~{Uc#9HCB9I4?kPTe-MW;j?f05YU^GIBFm0u!?&>R2 zA<7A6*pKo0|H)lNC;kXl%<%ov)OU?RNeJqnOD9(h#h~JaTJo{G?;+P;MCoLcw;U5a zb&51u{aP2wU%3<3?tBQ~zn<3odv@B|V}jdyGqt03>&=~j4egIB#3M&Lw#58cgqVnY z+?KJuX8W-cv+o%^z}*9W^P=}Q!$-#d3k#_XWZ2lKfLzjrd4V#}M8RqWqm1xL)94gg zXDQ$`E!{{zT6-Z{J(1W6YD)XT!l!&mFWXDuU3*og+>**f#BPLIJwXcfT)(ww1KmI> z(iS#3)B%Or1N$|w2LCI`>~4K~m<~Nax<8&V9oMp7LU-(jG*|rt;+oN&6oEpFq zUrtJf_*kHu`B@{1@+nqw_(~hcxOReDM|maU!Qy^wAg-A-tL*;UN~~c=ld%ktCnG~N z(TXxICO9>zxLzmU2p6HWu=uo~(tOIsaI)%Y!e2u0zFt;Oq>4YNVa3Yq^g~?Yle6o% z$uTbeSYwq^aWdB=pNOch-5|ZFE6v)oo>(+rF}UrgM1WOS=3TR5fWdOyE1g6p{Caea zD`i|UoHl~Gp&)w0359FXM0^DXXZNgr^hARBuXwB?neg*o#R6t*2>_LSZbEKW?Gn9F zvy2)?&MJxvU1s!z58cJH^>kzGQNQ!PEs}-mXZJCK3Me!D>W83arg5b8opRgWtMJ zGxQ0IA19s+%86&5$C!Io+a+4XWwKbJczXgJ6Al7I5bI;5fUY~F+r0bU;U= z(;-o&NR*yi#*Qq^QQ?mWUhomHuFZYl0P4psf_Gl$6Mx-C=Si%!5O^1K7T+%tP9dHt z&!Z5DEx`oln~a4qnE!1wkKly1gT`0~|HVx**3QF9zD@ZjP*~Yv z;3wtNc{UvCcj(vrYU)O+okl-;52gdk7FSL&WC4U=vp^6D973v5k1TVTs=w%Pl7*Cl zlGRFrJDMsW(=a|5y#!n1KwkG%lE9iz#Cb=bPOR3vzHaoNw*pIH5^FZZCBLC&*xqN0 zFkIL4@n~RVk5;Cp_gCC~X856F2@h|2r*ipS%6H&)_f~y5JV1;ln&F_KF2E%YJC0_e zia=wP+IDi++Y=G65>6?e)p~X>#k_zbn(!~XGOB5CP+WwDFixD}bvDI{zK}7V6I&&( zR?VeWPV_(@!*k@q>(oU;o$3Afg^tQX$RY>VMK*Gc&jLJeS!0#yuN}u&XrGk|J@Oh( zcdVKjQa5{9r1S&djOKJ%#N{*5CDq{up5>>Mu0$+d+GeYDu0t_ zTmKoh0-TSUUxsnzAypv^U?V$m)(WCGP;M4+jq7$YHT7)^nEBW^*(H?J9hulZ#%Wy& z-27U!WbLdHv9*T`wH+`k{3%-Q4Q!*w2N5Lq*ym)g+L&~X+OfNnJ8Ht`juGju$ya18 z3Aueo=Nn;_k!H?Z#r$C-nwN@2wh6kZZ(A*^`Dr-%X2EJ*ft#u)9>004N_o|LfZExN z6sTq>N^PTD+w|?}34@rjif2Qb1@qc^j%BNIGbB%aOXsFISmfaY(R?!i@8fp6Z_##S z`Ej`)FU)a;rVI#TWG*qKF}oc!F52ZDcv+%e^ifTW_ri=7@8w3Lqjd<=7TT2R;{(#< zba0r`wa`u{#jZ_^E5I-TU_+n6)!zW=IDfTo?(8olas>r$b*fdveYplo3_JS zOvk98vC~yFsS3WrloNZw;;hCZ1+AHjZE^v>$lIOi@HUAzJ_(m}p!wTzQ#9!tThgzG z?7vFLs1#7Js$jw^*yaOhcaA_Cjw$WpNvDuiZjUP3w!ggFjx#iNa;{)N0Zcu)PU^}mFb1585U2SwQs z8>Vw#Xnu8G!V+P3%>z^Ys8|lm3^8=TuHUq;`S}wY@zekl)53-wlj}}|fP7Rr#1u&d z0$R2^uckj~l^P4j{V-`Aj4VqglA~Me_Hh;;#$Nc2jbqMGrdAAGfw`!cFIU`5GOA~J z>wL@o5q%Hh4IKrDfp_KnuCw~+QSx_H;t`fDRWA~UZhL#%>i%T(-)h1a zY_>~eQ$owbI-UyEXb?N*jnPYmeXbN9%B7Uks;4)fCeJTCDRXotO=}^>i&InnMn8TX z3*)qh9U~9|!fu5?^*_cPQxz?48Qf==p5RCL+A{%)bdy68?r1KhR@fcNKDd&j%T+kt zSY!Y49#~v4esfq^vVHm~Y9y)1JTlneklkvu%Wb1A;y+*(VjGQqU2@BtjncD$>NSy2g zu$x;2vTLW0%4R;AYM`=@K$*L&l3V$BeM1D`i8aQOmWEvtPh4WQE^UNCo#ZGf(5Kky z4Fx!YX^kjt$rVSGQLt)CP#85dm)K5t~WxxfJJoT<;g;{Xymto2G)_jG`%4 z+MqjB3=W=PV%v2w2ex+s<&a0)v){5dnA^o+Th);q3sQJH^Z^FYg@UWUg!<&~o0^lP z$n<7%l+q1pWFQWJf6P7O1k-iE-x=ei(O@dAVy2C&9oB#siU5QWWvPO=B+2D}+x^VH z72|j0cu0Au=b&fK9YW`|L=SZwvc~k<0D0_P7US19{kDV*m}UDRn#(YMf&KB}CN~E) zx|i^ts_H$anwHd2LE)UF{sfIsq)K6Oz)jQDr;VYS4$+G5gyWYdA8A#38F7t~jp(j3Ydm>!k4?B5?Ep>R&a>Fj&q6l;a8C;+ z1t9WFgM;%7gCUP(Bg}!+!w#!8pI`Ep)b;l^qT&`Ak1s><(~vugC`o(PDXJg(tf$a) z)Yg@YAfpwy9d`DZ&~ShydEu>`h*Gqz>~KuHxM=>8-a7S+TRI4GG+~<_BZ6?jYES@MtmishUm!V&1;o)raHouC-QftC-Qp~ z9|G=8mIzHtM*f+DeHO4c;`fhI06qHBiSU6&3RQ1~l(KWym*q!@gKEMEO=t#tN##JD z&5SH$xJz>WW0jWG{w(vGY%x+ixy_rbj#Hm6PrbSNj6gGdID~BEdA2+751g{H_=-E~ zL4}C4c;U3G+WI(WN4*Gr zDjW8M;b*}HGgjJ~AWMU57Is4DG}TKX?0|IVtd*d4GPni(1{zP+g#=O2g3%^sbSUY*EE2O-_Ys)`+O4XNT}og!i*hd}3pHEUn&4 z^SfR*HhhcS`xo3173_Z{hcK>D+>C!#I9dGnrJ6%y{^0hT>Q(tjCX3q>$IJ{7;~`UI zBm2HVyIM(F1+JvkD(ALnGq0Y|v#yec7VFuLnZ~E?v}C1@GD<1A3ikC>C%#ztQ9HvX z&>3TCD(g@?G@9+V_`55PRZhT+c@MGbZyl;yF%7GJvW}pf&VOrR#i`r^>C!-rwEeD@ z-mc`~Y5l2VH1#T=|F6>Ewpy27z{-QDmXAFSPL)YhW|{mp8kNpX8KW8c{`h(|xTg(s z?u}s(by@nsV!m7fCr!7)N(c)|n-!Eq%`?H>T9EF!m_#IYYHG()_)A8XVGA<3$b0qu zL_lX1j=VZG<;*uy78&lIY8-afbU{CDl}E|@Z3adZuH*yNLiWW`biu2aW?i~vH4~+c zoGnwn9hjQ$O<7Yb*_RG@MMgDzzn;_75UK=8q#h|KAFv8I1I@~4%gfUMUfEi9i*18DaPTQ z1j>>ZNfyyEVuW20Q9SXd=2o&aFP5`kL~4JA_61HXLcxFgpIG!;cc9qFWfjIN z`4%VF{#&@H!G6PckJ2w4#A{~6)^(5N0zlYJ1b;WtSb#^i-rh($&}3f7GfBGMXlEPKG^*jXQ}0&nk3mKQ%%#^nt(VLD!OKq~K8Y5x|gx+_mCi#G~Lv z_i{TsmdZXAg-JzT5A8!e(;4^!icB0^^CiBtq{`^kRPaCFQRsXq4d<$2koU(e)@WYA zo-%Tz8J{|NUKBXboOr#EVRIBS7x5}nCX>{G{rX>`>q|Ahq^f2qZfjU*K=N=GPW5?M z<*{sErba;^jD0DnaCVwBX+Ymnf%D;eoe>`rjg%B-zHSEKygDInhA#=LdN}3m$;FVv zc#U9uMc+%rG1u+=+ODZfNzTjgL9@no8Oh&`HQ1P>51Uje!TxBI$E4=R&X+Dss)Ny0 zb5^zJseSw(I|QwOg{DAX7nXSz; zNC|Y6$w&Uua#2DlVIF7Y?-JBeXSFjss1N9F#47%AJMVZD^4YjvW9B?$p7rbO`ULsc z0c_wv^<9rIgs2(^gwSYv5z7m1{L_2=Z@hYa;Qcwgb#5}H!NW-Ph?X7`N71CT@6+Fy@r!Svs^WUog8CRlJ`QwB#TU^S&>+Iiz+uduW_o$;5=BHQ zaDNbCAR4ksR)U|(6%1^*;|90NS%QfM1~bp>8A2`N)4D<49BKTa1ScdgEY{gq+w7!Q z`+)?$%<7?4DCYGuO+f=XrC%{p2S}ApB)ipOiRsGqcxlIqkfWE16mNwifKH>_o4R^5 zsP)&Upd6oU)Oo+rd%X@SFp0}?U=S{oy~CIhUw&*Y@F!%RRQKPuz91AfW8*g-qf^&vQ|5_dAZ5`mQOqe zTJ-5^nFKZe$GPXb6X~{;xEH@Z1;gnQQIg))R|=n_eX$Z}(f$!QK5N#^&E14H2UKZ&xZ-t3liwu$RO2I!rg)S?kqA^SiXkz>4s{i8;2r3y>24;y zBjG5QqZrbVPoa`@VYVd{=El9D9nmc-`jrMr_hozo07>ulX)g4HFq4G)s!xGPSR1Y$ zWGX1!cj`+?mK){HQ*OT#>|sdnEEae;1&pg7YYxsqg5w?Ap6E2GqSR-eXjMir@uAfMBIY}G5fT)sz2D*U+YwAp2 z`F3KAc@Kev$`1r3m87z~ziuPTRq?O>Zo?5U3Van{n-FM&yO==f-}o&6IDV1#)tl8*6<*Kt3siixaMaTJQ5!8Z(IwT+O^xSg4ZCR>Wq3-gKxg7l zSvQk(aDt12F9VZ z-v0GSl~LL_;V5_*JG^n!VJMa z?Q9@f`x(kq?P>F0bM-3k!^~Pn@JjWP>bBxA0qL{@gg5O3pOSfoBICUvjhmgTpX|o9Q~3L@S!&f z8^2u|veww)2+5N9yAi2R6b|S)Cx1qUw}A?yW^#01<&A%C;6V-g;tW@ z4S$nX=t2&Q!;2?WL<8T8@OMb@kQYm&0I^%r1NXD-T}^-^-TG%bxJMe`qnixr&c4nk za{eop?c$I=rPpdh-W%bC?>Wzo^&Snpy||beV8WSf(muwWU`Rd0M7c?x5iV1?2(~MZ zZAxey|Bo|P*XHtlK4&MbzXOddsJij6Pxu}N9%!x*p_4)`tfMYfupx6s~vVUv|F8T|7`pk^gg*DD~$7xE5cEJ0=XD;GGiXUf)DhyfD4!*hRYQ}%O z4eXh|%sW)i=BUtdR3$qkSc8)8SEV z@_%-&0SA|L`&U zy?eUSXc;}nyj3K>>dSC0UhwUEl$0c<_8bR{ah>5?nW4EDJGJA-SsN+wy7uZ?35&$v z`IJuWTeGepcJz46C(+1(6Yg@)PLhKMlc2F_(ajjT3x)y@%dB9(j z;EaZn_8|ZMph)pUh$M66vSit_Una`dsU{W~3R>ifDIb^>@5!26dUyP9Z`+_P_&OG+ ze;=ss>C_nyJJ9Ub2-M~^IdVuA$)_)TY+m+=%x)jg2#z=zHwWjz=h647zHFzfbZdw1 z)lon8;ArMgRiK5O{4)3njYrMEYP8-RYxqb5Qy?T0`@l2rW(b`RmkL^;>(>%!c6x4kWGJFO2 zzV{wFl*oZ;dq5aH@CMlhDOG2&w9(&MwgvaHHvgbT*Jo91Bd>zF6Q{L1OiRU-`o;qn zKn8H(qK>2J!X!-;V?wUePcjJ?$xP^(G7csi#r&47eh_dd5`tX|2`Ka=z_Jbvw^zrj zP<>gILi@bm&u-0_y-%E2H@|25^@qTTKK&HRDSM~#Ts&2D0xCFh28cpa+NY^t9CjUD z_ot$uYNW!Epmv-E)o`JXnrk&3^ek+GIn9@GLz)2=ud^Vn(NjR3w~SgSOk)ju#kLU?bu&gs-Ct;S{Fe)q`#Vk-$74&FngYhPIgkg%Pomte383tNQDQ2H$Z& zTo`%yK3~8!(Bb%NM{uc`6aXB8r)`z$H4}K7Gf8Vtkqn;-s!3AFbG~UkmJHEjYEIeq zIf3%rO{GDtH+c~(Jbfq|0NB1$utz;N1^#fiJH-}6vdTki7fQ(rZl-{dazd%_*4_$N1Hwc#l%zOian~DDgA8}bKTclTW7t}m84wu293H= z66l7$!{!k;9Z8qxpRpqJ!GODG{BnI}WYdJsJ_JvnxozVQbNw5E*#Nlh7RoFdc9&6J z6Kdc!m-{-xXec_J47LTP3)a$L4lUB!fPz@I?LW&#ZwBpV>NYUIL3WSyz&b)KT*(M- zURhadP>TPpq(6px-Y&rgc{IW6;Oi%?+k2CP{r%?&X>7hvELmG$B8{P~L5{b7wi`9r>^ke1iB!#(LfU zsc->ntQs(5LT|py z?;(UaCs~f^slIN=ZU>^%UDBU3u+RoVu(GW6{o?@3jSI8M-;~{W_+9ye>lFoHwceW% zIPHV-skwN27yIJ^1Bi@uWi-n!8~?)k^9 z#Zbx@5lc=L^efI>=+dwB&YbXvJm%|P#tbcC&>LFNV9Y@Qn4wWg2GrO^HBfPwcZk|d z^N&U;nj=_!gcPvPG%+-=k1iy~aCP>iieib2`=H>OoB&?g&qhU&KTZnww-j&Da%{Lp zsMCg38TP{1mzx_`iq5Q<(dCEp7qsBlDY-2VNuV{c8n=f!aZ^a;;)&F86P+c+DX7Bt z){Z{a%A>-2ii3}#u%@zTn!hD;fN1uh41?(5?PS7rJo*6d$v*_X{rJEYfb+0rAiXc_ zg@RiD&)q)_3B%8CY!nVIJI{}=VG#CeA{@Ys1m-&Pz0K-~y0A<9`ZG4i?Gx-%$J3dey{;Fprx#BS`eK^QgRD+LP4}Q5uOP+`fN(KLc^Uqb zz#=BjP`OFA0kod+afkdqgPcs88KAWXbwBqGh*^j02CVITG_}mV+J(LA3X)I~*p9$~oZ(GN;@pCiaPdL#ZLIUlIP>Bl)r5Yk%T4HuNHV#!)aStcxzG zP1PXZ91~||C|jRzo(wfK`Na0GP6`UkmR+t7EX24Tb^e~Xl?>JUTUP`XB|YC%@%U^t z)T@gC;&7Fanv|8vsq#pX2STo+95metX--rMsRp}l|60fgB6W9OA!PJCiz7QLGY7jr z<^u54Iw6L2HpcWlOr?Y*m~xg6;fzcQNw|T)5H)d1_{#VVIjC9zp1iyZ`yvTgH}TRQ zxF&ufKiv`h6irmT`1DI1A^i>CW@~H9)>&1_2?KwEtZDiMl0YAvY4Nn3@^?_i(B@{Y zaDLvQ32O*!uwE+T5`sLsUiRGY!2KV98nb9f`^OiQil6LWMsREig)nTs;>2(Kz0_3r%DS4G za=^vDPjaD7d^dTXkY%pVFrZQxeUqpD9^*Z(B1zcS7b}=VmFO))ey+Gt|YU!v301&J`1b{)7HYLegNBzb6>!$ZV$DG8at8Z&YYtcs&zIN^zo z&rP!$sF<@DisSDz4xs)R67%$dWba<# zF6D+CF@3W$#`k)99`ykR^Mb~)j~=!jM^S{ZvkzKsaWEw%#<=H5hiG_1o53hDNYQfw zW9|sRcAlIWnUwftZXex1^vuhtk506n@TZL(Qvd$UJRK}T6y5;;^AlC!*87?DXE$qz z@zCEyOm`$vHDW2us$5TE#N?(&QbEpsemfYSzEKL0{Upt=hN&N_G&IQ^tY_2d?jvZA zbr5=cbqFJF_#5w?r>va?B?fh={=_v1>UlvL_@Q{>vJFSJv*VPjo9Y^z<#*QenaE4} z)a9@Fd8FM}ZX>Em!y4aFk2c{xXJ%OPKd+-njX*zN@2Xd3di`IHF7H-m@^ghjpD(C0 zM%|?caj`our!!7@y}}>sbLZMDM*i!4OFY4|Nq%{E2!@&yKx-w;7edM1?)TtqJJN=c zgTO=y&`8(DrXKtDA1tJ#@|mj6`}c=)QX>{~y{LRWs||wsXJf|U)kI%OV}d*ZWw<=(;!m}p7TB&X`8)lP8F0>ubC<-oZ7pMO+p*2XwAt|2?Uj)+D0v(>Pb2bIl*YLQ^OEkIDyW847!iA& zpvb3*Mc~F2_~+#{sLVNIc?o7wO-hzH2Up;?A`DpD%W=Kd!a(=ZPT$7Hykl)DZ)Dd)2*Mbeu|ZMw(ji1)?@~s zHm0&t0>@e}&t)TAx>DkbCFVh%#qe=yoHYyfIi#wzJ4Wv)sJrtG#!r~Y+ol%jm7~Ah; z8F;B?%z3mXk)3!YyQJKt!@+(W32v~9lPSpWuz(>uQ=L%_Bt0%RS@H%kfhOL+MJz`7 ze{Bbyn@xw8+T`2V{jBjNsl3K9TceGbB|vnRN?9H~ z8cjb`)MS38_Sp{?qM*SIvn93Cg&CpjIr-))?tRCoEXP}Pmy(&M5xf3&S*M-`syCd) z@i6qtww37Cz<ae^FV z???r*zHT$i+PPB>`7bQMERaUq%sJhqcRUON^$H!Ix>+cI+EghJ5orOb=s8^6V}mwS z5{87T!tD1)Zjq<(Q!k7<24$MCm~qr!ZwmTQvY##xu^dfIGmI((XQo@n&&fN`cJ*dn zt6_qQfxlaVjq$K*p6BHqk|&NH)w3+%zbvOgLG+~fJiSv6E^2`;@vA29GpvE(`@kJC z`-*yLppf6kubYSA&{kp2-qP?(;HRVn$@pitcQ9MklLi5k5j9 z{h~&3=nr(c5`^lPJXzp8-KM6=1RrAO&%9jqV?q1}z`=)1qWh_VKA-zh$lhIGEnR&# z9Zx1hys&l8<21UI*vGC<+vbWu#E<&sF#@w%C6>lLE?7%zlPF0#y>he8$4&)UlZyyz zOr?zqwmWq2yBAbP4&O*(6fQ~g3uA1wjrEZ#<%$uB*sT% zd<5pGY9jedPxQ1k9I@Rvd{X)X9HWVV!vU28V^fxlBo?Hf1(@0HE^?O`fEq=pbzUsf z&!WdKMnv=|S6y6)1$SF2@ioM`RRef^nqzWsT_1r8*U##uNoevq8OYIPZ+Xhi$|T9Z zoW%J?AOK3y$;KL>^0W8O3-bfup{J*}UW>B`T3y@R)IS5se*h{$EDxa4&)$2`?+1W4 zW#MD*R10V-_EB5Z_saklHX-7dcE=C4i`EeiBm8svY*$=mV$;{lCp;SOb~Bt1RI$`i zJqkLh^O)%@zG@RV?YYj&^;3cf$euFM|j1@yj5m=1+mQvd#cCP~&Tw?TNovu{M@qkk{yuZN_IldFn_&eXH< z#p^2mnzsJu4V|k?3S;ZM>LFX`@+I581??$g_xi7pY>%Z`G_`;OW+4>IGaVu74o$#l zT@k1|Y_XYC^~wmUhe)iodJK>^q3Hg~lsyPwEAicWcbXFKkv}cA>Pl^2T=#+cJ$Urfs!?`mX`?sy83juiIunA6p)JYybZV_09nDA1w8t zNJ1Nr>+QD_z|F85T5OQ`04DsHSyOeOwPha5);8DY2PJ5*+L}Fbl#*P7nU{4tchC`S zFazIQ7zNU$W%GH|x%u;L?iD2T;^H9g+R61Q8B+b%nv-~BzXVtJV~4A@p!)0=$Yfc<+b+!ckh}SbO4)e81#oTmKGv^=7hAxr>S$!fAK^5>0AVGGqnct z^Pc_sCH`-LIhKt7(r}M~5rN>p!cYK+yH$^!}q7$ml=YL;ebADYisE(34v? zz8~7FX=(MPs>!|n9bgKj=_!qvm1A&<+h;lVmLDvasw(Ny%?LhXFkM?+Sfuq*_@p@z zUAZ}w3{7XPV=SpR05M;_WIg5HvjbV9d=$6ZjFro$kv+^$MS$wgdm|~|*A@1QCT5xr zWU?wL`uybeTuB9LX(hdOWP7RaZt3p4^RhzR0&shJ{z<#tE>8im9t5RtnYR|onS-Ue z<=nSG81zH}^LEA`-eS@Pqorg8;U0^HKj%KF zrzd5TlhhA*=vSi{6s=6GUY`hk3&21L`YXn;?kCsh{r_zNj!*FPzrOAUjNF5JRBs^d zg)ABJ2iA}Q0_JQlYe|IHwgX8~e;?mz&rAkbg}1hqb$-Nh2tSXM z@8S?{Mn>kuh9Gkh!|$Y--Ar>KDc!myAH{q;>`pJtnG4AW#0&Im*Mfr3z25|UZwQDS zS}p*i;S6oxzLPfsS&A{JzQoN}+!Rq5-wica?LQJK&AUoMXw`L-*QaFYB44lb4SNu+ zE;w^b61K%vcB9Q%$7HUgC-&4au1OjE%8(dYMzWST&jT`8Wr=LEW0rtcz_fAx3%`IJ zDMxEe8;71~*bvTV!m-Il$?Mx(TX5Xp&n83!zb)4v*u zqKQTm>Ujitk%EjweMdHc9KV@YU(VQxhwJBOPr4Sif|)NB->vL?kAK^vF1&M17r@p4 zwfzmGmGiQG#{COyli;>^l@A1`gIr!hX*u#=uGqAsMA?mp`7Xi>CE47gR*yIxLKq6| zU!2$?4sn75kxQj=7UI*mnZATlkB=Y7mX8}0WsAyn$qa=?|Jvy)Ef+25kv%j5{vwdRhL|1l}6(ZG1$QYMr#5bM<)- z_$SS0v6Ev_28{>Kv4oqHWDs!+3WmstQGc1JD-S0lMpVJjI7We?*~=`=!gy$6B6Pf5 zbl$F0fByQ#=p)jOT|KKbuVy_RMAvx0h8tuVHQb9mJ3IBK#QP9WxWR$~hj+MMBLQ+o ziYlUHx2DIo*vc1!$*OvUO+cnOkeA~oq_@r2Vxh@IZ1Z2fR4dPYa;Fiyc_WU8d>C%h z$oQi(wzQeedz;KO$GfG_X=yR_TLcZagR5G|OQLkS4YuK7nrFx-U5} zon33<)9dSmA+gs~gD0+cnc$i^jK1E&dWcdfB-Gr`5@bfr3f$E^Me6!QNk0Cxw>-F0K5X@LZo^?;W9g?#unoURU~%K-rc4dU69Sw0gL@ z0oeXCWd-_;{q5$P>=m2q+;>~d-n}k!p(LgE5`r*tx0 zl~(p8+~Zw8nF-?#vH)CqJ9Rb@7IJ-nZ9b9Hu5$gnIgwy=lX;F^Lo9ND>^wN0jNy<1 z?ewHnHqEHOzZ0jqVOo;o0KXWK&xB8sSekZH&zD8A()%~BP;29LY3M&_>b|eIjV#Tb zlY*nS>?QqKJ0c2VKYR zwu^-*?sCMbg$X`g=+_*{jaokCTQTc7WgDI=EKR{sd!e zE@F)B+!))g{ou*=1O~wyf-hA4xe4c6XjLeM3}XC7f(oTM*f`P_znc|yDv(s7lk(?!j z{qNla(h~*g$^9TbRgj)Kv865$sV>9(pFBm()p{>TSI zudMMdl~y7Jd%grsnx6%X&?-0-rAo{KCyM!pPs@ZCgWtt=?Q()(CTF+ z`_WYncuT3d%?Y$bY5BxNy_B<(zA@=t0&<%d77J_$Rlv{iDIOl9C&3P5G|@Qf0phqS z#2I@d*l~f@>=eR8A)%hdlk1oXa$ms~v|AQvlx-w%B9pHgtevnry&c0&sw!BqI-Qtb zg{C5(1Eu#Om@C0N2}ooat@Ec{gcR;yjpIY^YyCbNpZ2H2 zE7@{SZ@9r*-bwL~b2eDQqOxN8-~agey8rWES^U@5&UPE)zjn8`+gscC{f9*mc1hG#Nkm_VtfH{_<<^wPuB_!_%>%QRnz_;Toxb>wuVxh{$9~yW?6-Evwv=l=} z32NeXgo#s(f`O{pE{!moa#mL=j0KkVOu>Vs{s_;vV`3Fs<#a=&Ow;^885w$HNhMPE zk&o*4RBv8^lB!z0m52hvPadHqwU;=+`5k{rF~-mf0F;$=P`GT{Fw4zyS3TE`d_-I7u!Fl@%RS5 z9|zB#2>&f!`(}-`0`K`uE47`XN$`x`0?wk}MHP!RbX%eljIz?Qky?jWtOz;K&?uTq z8E>vIx|ZE`RyG=~aEpY(n*KzPUSUwMJ6$Qw%F!HRh@X!pj$$9&#uGl>RFUhLlll$bRv%3A8d4#AaA8<=Xfpcy@`l+RjC_Z2UZE`_Z*CV51O zd#emAo5I-qL*?Ol;vZdV}mjJ9(!KMrx zpu0jhZE$4K!1b@u!LlPJQpu?C0&adyrS!Rjifc(`FOZwcT^zH?^!)s2m`=IpOV|$4 z8F3-rv7lm1_9x>*_!s`_b64K(>h)zZiPy8MsK-{$l+tl@wHJW(7G9D@{dMJ94F7Mh zyUKl(yXd6MKE4;9C+QXY2u^?O+_BG_-BomW7JkOy^ML-pI2mvOhI-BdF=akc;;HO1 zO(B8|u;uePlRhNa>J@(te*+)DJOR;Xn*Ru4dwrcdYpp|Dp0wiCbb@yKGy3=>9nj}< z`ut*$PBLw=`#WnXncR_li7_5pwY4u6l)9+V|OkNrRrx@U*QE3zU5 zIdKRC5ZwdyYp8=P#Iw#x;JHR)V=g3b<*~fAS)YC0uNbco!lpiNDS(#F+mhezGk0=9 zsbDKCb~$P1Erv{oooRqVf0+XK9yb>$E=pGyTtOp%ame@>RKm2lvK#Wku882xot-(U zgNuebaR_O#Y{s^*buZc|8%T_x3sV(G$nBnIh>wB&oOc3a`4<0?nt7O4cFWD7E+b`u zwJfXsr`gE<>+*k~{SUos7V-RBZvShyZ2RAKdujjsgV_HrEEiIU335b&qPb7e%$&x) zPZSQipmxt;?~x+;=kxQPLy635jf6Xw(rDp6 z3bL!Xmqb>aa3W8qwIn1^xuTG8eF)2vsKIdrcJP(7pARNQIJTnA!1XnawaZtlsy!r+eu2!G|G`f6M|NJD}v-cY)ri=s%J43AyZlUp~{^?*+D)$cxEr z;F9@(E|xj!b@@&pM4g)&jMK_8%IBUlsJlEY!rmZ(;H!GW*PW*+4KPn>!%SP6gMvT= z^Ccc`FnoIuj5H9=lp;H6LnSKp3_y(gQ-?Ebe}Zs^?N1QSu=B~o8PLDjb}d$tRaW3I zL~wtiL{jJQ*cicsBf1ZvYjEcF9MWiJuM|A@#;8DuCfwox29ai#=ea?9UkurXCMgIB z|Jl(Eb3=NjAU&HcPU4wnNRYnsGH^nWqVNL;0@5-{2@3M?Uo{XXMXK>By~-!oX@Fbr zq{dA}HH|<-1RJy?!wCNa;(dw(etywi-Hp}eUGH@;6cqU@sAl7UzVhE@UeV-!VKP38 zXSL`UU+*eGF}}X~$)Ux+N&1@caSEi0->-v#USq=Qtnk=VQn$nh3^CR62Y`7D0$ZEB zK|Q#|k1(qynA?$*o zKYAi>0bH5@|A_WKlvCEvrpbV*p7$~XmgIkHZ|`hc`G2=|w>FpdzfWub3m}>!!uo_1 z29kIFYXnFR>&Yl5&^A{B1R>0FMHV?~i3YA~1K>K{b4; zVFiAvVk{qYz1_->t3~aaBNL<@4B)ksuW)+MksQ9cOs9+*7$ptBDR6Sh4kbIyj2ggr zod!EWb~8MKq-lmhrhx_;m+?Xjq9IiqWSC;SPT?SWtaI@oCK9z_M9A|Fo~w3Chwln_ z-f1v&%x}p1E3piro@KgW^&m-a-K`ee3 zf4EO}eDVCl3}+gvh0JiKv4c+IWUB3kN93&ag#LNTm>}3|9W0ggXFsBmUJ-g1$~PT7 zc^aMdphi;;NBN2Hk$)tkur(d$(3%;!0{kPWdG$)#;>1IqRtYONfLI~cEDb)E&T;_8?>R`8o^Wf z5HJ?)4Ppt4*@{UhzM(3;H8`MKWTJ5`qi9;gDxy{ev=eHT7Yi3Gi!f|7j0_4P*G%(^ zDq{$;(C5pmsx?%BHJ|AWYpTbUIketBEKmN~8(v{9jlP~$qf@Qp>-Z{;Cc3}~pMxt2 z#iDyE4<7?7WKc<-qpn>w4`P%OdN-`Q?ge2m(`T<{R2Q+$d?s1YPf;4hN@UXKZyfuO z{sNr(D&H1AUk%czj~P-#HxB}Z%i$!OP$z{v`ivk<#AO|Zk0~DlekKetF$G4>UNu~5nMhb?W@fHHFB zwkiQeLRNqU21%kLOyl;7?<)aCyepuOnjE6o6Xfh-7pl7Jli^$1Unw^$em9f(oV#yU z==z7Vf2V`~cM;SO8cX}O`ilLY@3a@pYyhW5rRkz7CV*PWS;+VPtDIEJ?7x&x;(lJB zCHa4LH`}{Z|9xj`x4pdu_TQal{P!Qy{!6d=JjuvHZNQ4qR9y~H(|NPi+1}}FZp~u? zE^49*Ke0nkIga2PF7A?*sk~%UdFi5p(z3k8F_@b>;484<@d?1YGf4JTt4mRyyO$#h%*8@%KlOH5XA`tl)?9g8W=Xu(^lbyccTZTZ5UUHmPb4TyBhPl85&G95YH7v2r zWP^kWVH=?Ji|MYn8^KSnpMQJ$=BMvpzCC^QWngBskJw-aR&MzlyxIN58>wna;*#3 zr%XhXC5)G7_o2P;C6O+#%5lAPeWC*_-a0}DX6s9`2_7%p%%0s)Ko<>3zZp%3uX!eM zVNA7dv9R0#$k@_p`?TE>uQ`<1EU2~Voxo!j(tA+|J@0ouW)p8yW>9V-5_9A%40tQm z^Fig1$I<1j<>dJfud)eNw&}&fMJb0KRHf7DL`P(q{csdtFs}EW2mi{Cd>tL1eM#@e z7oO`3`@x9C-i%s3hl7G;)5=D?(D}laeU)a3wrugSY}tA@xooR*=psP1WWLq*lB*bf zNciL#SLLah8eh+h3}S+<(;YMyLLOjXH0Lp!E@br?q}TBnuE09l9^9BQV7$%Uf%XN6 z3Ok=KnZ^V&wmAVAhg4%Uhq$=_@wh_BRnV}h;bE9&lUY%)IRg&Flv~Zs9lmgOwVlTi zW6bdjk(}-BrYeM1({@`TEVpTWjVr6Mv^?+r;4ZB_e3rt$D+I zHA9CeP-T#%wL@~kbVR&@o{>mYSYphylMz)> z?-S+7-z+Q9Yo?9-(0e+7$G`ny@?kPazUf7itU2vvy=L5>8pa|YE#{3z?aj{4PG{#M z7>)SSHwYE}F2c=^4v^)NSe7}OF;hb@`pC66?^jHdhQ3UPQ6`h0;CF9&m(#)TRZC<( z3*99$pIJf6b5xz2ySn7e)h+c2evoW|B$MI-}Dw7`DFQ$;Vq<;T`gP*6~V5Q=W^Of0JMzbw0n(dhg zXEV$GR5=oum-auVM$|m3zHj}t@CE!q>Wu+Q9lgz#`f=VGa^d%pISK(%gKV`b7JSoe zB~-yjxf^rOX227a=UdGf@6A?G9;u1?e06d$&zjBVAHLL&9*12E}M+90fp6t#_N0JwiPKD@oN}^Xy3n#q*0~8X0OjHxeAPzb! z$%ve65{$QW1!lZ~cBXhG?obk)@ZJsG(u_Kap;Kbg8<>JjuNT7un3xeIr%=yf51|H2 zr*pxM2j(mMX`C|EeZqDL(IdpnQxr4V-N}36{wpYaReuVF9R4gB)5Mz_GDiiQ`Jd2J zD;YR{-+-8zKDO$|XVVKZSP9Oj1r?9CRr@MI<7g#tjn2k z&FM5Ho$DY77!XDVr#yK}R-@t=fB*a6J3)Us8l_l^bOIK)cQIGV7*bL`cQ%t=e3=f| zkow{QMesOzD?Z#YJ%x?L=5~tpd}`7v39}`oj?6X)Rw{Ppeud{S{yJX-?p4SMW&JRn zPOhdCzGR#W8i1Ax`5)E(L#$^W^G|vF=N8k}TkWmw-JQofTTuUNx3$||+JF8X>_0&T z0}y4|U7-CZPm6lkXzTID=62BjOJ{Sd({3>im3hrSHLszjzUOLa+KEcq*oGnlcuBp$ zKWRxfSNB%_d|tK`SNkCKc0?Hu1IVt;9(s-pZRd<HrJQgF=VzY8+*@!wvP)1E?hBZpEhEJI))skGv^F5M|;DgMNa3|^(SM*=wJQ_4@;GoGvFK{p80~3{bMw{5Ci1Z8+!C=(VtwW#%Pe6A&xBk z6?#Qfv_O)#gCq|}5HCSl4?fp_23(|-To-BIBaKx;NWpc&tQgm{=3-`+8DViq@!+q4 z`UtGqA+N`Rz3)#KC4MlUjZQ{@RKYe0naRqtT8?wAFWh74U$lp;q)QI{+mC`DW4R*? zhdcMMOQj2tDS1B-;U@>)nCz4@0G&#mB3I<`QbOeM-2|gie{QY~&^jY9)oETS;508a zkZfkJkg1Z=9YEsXgn$K*b1pWGU+Zu6+RE2n1};w%yVsM@h>;-5Ri@BJJxn3AzgYEv zog-@rhCe6K2|r{}n5t=o{QRgdJEG4a{g4OgftowPqtWUEJ3eMC zIt%{$>dgk^zYP4pdZz*Wzvh0cx!-Mp{b#q`tQYw2oy30;EmR}Iyvr)Vt!Sf+n{c6fFY#YB1T{RG5t8HpNg8OhIFSO)iE_`V`(Ju}P)+6GJGq zR;UQ`s780twU7U`wS#)8%N4R6ins`%Fwo3UHC2<3{OATC)8JL)BF}|R4IOa)Bo@BuqM?lQPKU7SrcoO24SbgjUSbc0$R^K*g zee4Ekee4EkeQe9LzHms)HMpl+A)n$&E8+*9>3Du__)4RFs~1Gk@b1wCBg||S6^k{% zR4j;!+aM}#lc~sVhN;Nz0#lLQDpRot{(65%jvh8_FN5>ZNi-eiUk9yx6=f<3Y)3)9 z;L_)YJ?Xa`qwq8D+cd+0jim{)JzZhMP(tPjV^L0|&1 zVmuVq+8?F0_MOCa3s`r{ux??keNU{l3k-2G9p|)3^7Y&qpyT8+AfyxeXB|?V6w3P)%YL222=AJvHxwf z8jUX6|2EsLZoSn-{%51G|Gho@kJY{umbk&LM)0j6EOEc8H9Ne6dhJH9-ekYcU_&BX z+%IeF??!}Pi^)NaQkD(|(eRr8Fd)fqrV*)lxu8kG zKj1mJ2wk8Y(N%;l-<;zXB-Xq0J}lFGP3FfVFlHNrc5njGjOINcGVp!;nyZCqs6nbP z7eSHO_9jvEJCp}&%Y2u-9Sp`3*rvdAhL{huonThb;rNH(*7Bvk9>mq^2} zs?TJ;#ORBQi_2qzNfk;84#7tY)Z3|xvu|yxY~fs47?D5&s)L4g_?eS#K&knDCHhcc zvGb9DCsis)_8bWie5`?i1|JJFE=1TzjE2tG>+j#Z=rOKI^EyM+u#3xRwt#~Pgcs}4 z$p!R5kjM1~2>ZtSzkdowww^py_gyx)0u}NUoI+EZh;$d#6g!cpqmw=iKeV_5F$?h9 za^8POtuu!M1L58y@iank5#M5SkP!`k5Be}YCmX4$_)Z8kLM_O5_}L5)0j>b^ia{S! zxezh;7nqe8I9F>5;sf7A*mo6`K^q}z8C4MSI?5&EwYab4&s3cHl&tFTXJo3T<(g~z zT;5vWfg^7i#@LB?$0}AgJQa$NkhB7*_{wwMVA82~>3}i~uz?TD^)fr*&3{SpCDq^a z%l--e-7K@gnb5929pS$+$X}cvmOJ%&nU?k$xzs-_gPOJXel$KiU-Wnxli`!{5i}~z zkbff5_l(PbRB=~lew*Mt{fS4m4P0JD>O~*5oaIWo%WnJT<7Z zRKxs&AMo({TEvCz6V)$!1AH@l2hiM5054CY4_j*qJS89V18CMZNNiJu813Y3p*PX6 z4@c8p=0=gG{5m$$)`kWgM7Po&7ov_-MShac)-d*nqg5?#9`gUfB6U=uMepZX|5EQ< zpaa3BzzhJcDJ&gIWqLHOj;f5V%hb~yzMU*0oqy3k;|n5sH?y2t;TPgM32UwLe)i8F zkJ!QBh}{90l2@w$;03lSx z6y~5Kb=wlYAT^?-zy|@GPq@ZPYZ9Rh^!Qu;^c&>hD)(w~3{>8ar$cnyK}4RP#h<%6 z1y>iZK4?17xA>>=emon0FlD! zmnO6eQ`5k5=$`SH%DOpUtDNuw=4HNm2(bPaEYn?2C8qsbJ6jgm-np?Fx_1zePu^+b z)}ih!_7YmXKYXVz6zttXw7h_Pag(zv1u=gyH6fnz*M!l5OE}nq$>m(uQIan3k`z71 zup#@7{gNb1Uu=aJbt&6jIdtT1k%b1g`b*sWIsF%VIbvwWyL3H*@M%Ju%i9rCJKn9( z`W%y&z+P_=A)Ssc8x)j&hT{oVUar(ZaASzdE-xhbj5d765>mTbt>o&i4|hA#Ri<9m zr9+%PlH@UV{X(1yW0ra?&RgZvC_ni94!6cyzli!%(r!4weMYJDGe|^OV8H+WeO`GI z6s4!h+c=&MuxM0I1Ztut3P@0+KR&%ZLY*rF+L?A~j}e86Rx%pNY4xg1_Dnt(k+`FG zquGpE=h#N{ub>i~ROb zI-Kp049q~)vK>l^>)+d7E7&liZAG$*z0D>vr|fjHfp|i@%+Mt8v|2~WVZ`^qW2URt z7`eoX{8@i8KAY~s$HJj>%0H+f=fP~WxSCD5(zxInAtXC2;{hIj2W`?gseW#rV^8p3 znF*O9n=An`qT))MC26HYP)1|ERjIb_m!iH2-^mD!i>4-Sgjk2$0$NQLsX#5=YBQvK zv~et8W*w{pL#Rmr?5zpNwnnILfu}#j`=6gK`m@Cb0pOGQ-)z6$b^U+rx9dgxue<60 zl}?iiOvlZZ28bK`%W(-y;lUY21ZM|}^ZD290qib(8>$XRN9((fjUAs3YrN6nzxG;< zUfqZawq*~p*gV?l$LaV30rf;Ln#rab6RYPvK>2)on2#Lsl&p%ETSegbha5QG^i%pq zyas2e^r5f8Eh@}Hc#qnN*rCZc>H2Zzg`?KPa=Tt;0AK*}e^b%tow)O9PF1OE<$2W^ zXY{w(Y8pD#?e;U=ZJk6HTprdt!0S5UA9of3>E{zU%q%~xe08D!J(^s7h-L)!ljBx; zq1?BMKgfkEWSEa(1=^|Xlvv20YrBYF|1rd`Pb04u0qu)`_C-MZBA`98PEc=rbYb5*819*$=KZ<+MgCw9znOyZ|W4G)hpD21}PwC)P2dv;Re!EZ4f zye`tNo(u|4fZwhk4`*kS;O*iSS2(Z_l#5;dvhoqpVhjAo!++NI0g&eZwbQM;_)oLj zEbyPZ8~;b37%{OeCWiLM?{|UMZ zi2(mC0qtw!=OUo|?ZD^4!N%Q1&$Hmal8L=X;dt}9e@)~6H9H;f|5|T0TdnOM_zqr!)a}*8P!Ee#@>)%F`$@L%_ zR8OMn)$bO}8yI!k5k6UMzCU3tZKAzEaO%R ze=efSvR1zF~f`3&#mNI+~7z$$*B!QO@MN(>NJhO zvh1)-KkZt{3WKSqQN^X`u~n$jxaMPx2eVqB+MXw!n*IWnHzXLp;<)LErrl-_wi}UP z<+h8F(fEF}5UrRYN0c%|{xN_op^OZ;&NNZ=}Zr43!Rt#P{eoYBK&E z-7TPTErry8(B>vrFy%aYLI!I}vBks3ccV`btDy7fiFHcdg?RFKB|*L(ctb(KV@XW} z=LO(nVi2K&3BGZko>mjjp5mNt@Y&W1fQwF9_-M15UGLMTnkhsG++S*#kK+90D@9AK z9O6TxtHtHjLM!P~uFwYVu%r7d`@d4tYhF}>E%<+8`|WNM{Xgxun)}^W8~Ok3Rax^&XspNP)1xW4531gwI!llh!BvntWrXx^j8 zky9>wa@}KdUZcG^KkJ{O2^;QTtj9jB*X#IT&_DSdxJlFDo_hE4<;y2Z5Nu2QVWWAu zz=yb1R%zwVT-@vayX)BEUc7kW7uUG_fDhq2_sDLm$57qC$L~fnzMl3c>J{JQ@x}Y| z@nWmWy3##gpo3RS6V|3Nv>c}aWE}D-qCOYLBj^9a7L1Ht64w{ah2rV_3Ulocvta`rEIYb@Z^anLw zp8XkKm83r;q*)x6Rfj2?NxoGneVPVh85Xvg`>~MIuB!7fq>y60xcY8dWcmjRQ7Ms# zZW+&@oa!Q|2D6I`U#22zuPmNg>s#HwNi@aj73%xT&J`|?HeXgt~ z^(tv(^Ixj+G!7E%4yU~XwWHN_gC0Qv+vyiy)Ed1b_OK*JesxG@d}w0ZB=#+(aMw1Y ze)hbfd1f|`Qm=aKtNQ0pm~5`ck00C1L0aM4?17+2V?FX4E?!7@{Ms$6I}`@7^mvwO zY`f#vY9_j3FhMgET%z?0lA684_<3w@OA;j+a?HoJnq#|bQ_57T>ZFH>Z0=*&;nYy~ zK-Z&#@f08x0J~sCpN|NLz2blUNPp2uQM{@h5i!HcM#z$pj|dGit9)HMGLXiS(SV@y zdQL7rKK_3Q|H+R2r27A^cbXpl(`pp>&wapuvcf;9C=X1rUA92B!VLm1c(@nPLJ&1r zl}g(?#Dg$#>{>d2!pmep0dk_cEUFMl_e_8i^1)!j6JbsT8%UTy;shRy@K6r*0UyWS z@!s8+LZHb!UPm-<*zCJE^C)gB4ObKULEzkNqby$H$=Eu`@IS)>!=R0otY+56RXaQ( za{-pD3wf;HhO+BO7*_-aHo!4R)tQWHWQ00GwG3VUZVLcO!#~6~>-%8;NDzPhn}&=e z*3cYnRMj=Wk%Yc6TR+e_(s@aI@5D~Mu%Hb)CoIP69nF}E|D;WNAY7-lI>2h-{NP3A z$+0eykql&rrngVa`KCwefp~i}#gUg<@?Qn8#BK}mNK0VkXh#6+4IgO4IEmIEh>txW zkp(~i&3eZO3XG+|`9IHa(zuKfP$8+~jhe-40WOS_C?*c4aj+!RF3awrJ4NV*^EpMJ zgZih}K4#&I(~hz>QtTMS*dej)>Z>rD)-s{MS`gavMa1ZW0^-Oz@13a~+&18_vc|l3 z+A1J*<4weqv4M7#p}O1LKP-9XI4Z^MBap*p;H99k1^|nkyqE?wWv1>D=2*bv<#33H zwN(PN=$thyoG^A^Nz~8lz}TZk0tgv84Efb~SomOW{Lcs(xt;ibtlQb|xcFbAQ{aF1 zn*Swk6KD{99OSQp;B}7)UN8S*f){KhNfa+*bHt?S950NH{t< zMvJfwxKxRZD6FC7HAU?ISy)m*f)v)BV8LVQTgB!|NyWma15jqTP;?I`DZB}tPit__ zvz6T$cH&apiP8<>*N`Vn(XwVS=-h<5OR{Y2FS6h2V}+Czrr2;5@4D=lBO8c@n=CJ* z2&_v$g4QvOV~e^tHu^8F?NiM|c(irTCZ3Weh~F|1EU{Jiql}FLDFc<&nOZ<5&Nwif0|%{~=u0JAaUyNFw4_x^n3S)xP|2*$ zT4g@fU3k)I*PD%Icb~ClvsuJ{xvld*U(w0nI2<4CZ`WFN)_B}&wtB6OVR|j>D-1*G5RNM5t6}*}E-QqwD(y55Z2IG9_@s>9D2}Ye z%F#x=*|qRtA#>0g*9#k2$M0Ye7F)4P3=3-rquxI`XTOiG56}327(b|99G<~{+3760 zIMm-Itmh5r*2VDg(=cxpkPtTdgO%|Ppu8$&zi#j@3zkAAu1_rPpL;{#TvIrHPqN%5 z`4!RMm$lp!+>;?kdG{bwCm z^R4y2(Wvhi>;GT7{;SSibLr21xlasd+nxn z$WG|Bb%{hX9`A+Rz=Gh9$PPfLZjdln{4Ek&PWU!I>kE~^r<=2s8w4ir3yd2dmIClI z^X9=OpR~v(Ewfgpc$1!Pe4@G$iID}CTb?X~upX05a@LKK z1Z`c*TGp(dQdcBcj%)b7L{BSK^WtPJGPrP(H@gr5&8rXb$mFY+EZrYf{`u$x4*_GL z_G2FY5aaSB==_F?Dj3fRgmTy^xy)*i3?1eL8QQ5`VR@HG)di{k3B^}^VZPgb!1@#3 zgn$RV8_C;UJ}mj z-t-hCzTWgv%Ho=!E18`r=iiG;5(F$ z<@t_BBf}%1S#fn}m6mn91pg&j?5%>QLx{#sQ-_LP1<8=^N2L*h-1%k^I34{ihM-pq zaWMT8s^8XA3Ms1QOt2AG**KreU}H;0cX^dG=wq;ha3gtzWmR+ox_p2jpYrW_yzt#r zt$Y63>W;MVa0s{hHV-7(Mg<~whDF4dZ`$JdyiR*e%L^1VrwaiehQw-HmE!zQTT1|HR6<|-b%`-$R&Qm2x`7XBmv&X>i&->1J9>)Y zmw_rUhNA|k)c9OT_&3*5FlHe*gqN1P$OBSZ5BZk_od%9z=-pCe7Du$b~%f{ zQ+SpA!nGc$xM4mDdnGb)NBa93H>y(~_$x;LP@DYadGW`%$JFRU4SQ1C-JKdGqFoomL@w(%eB)p`s5pBv3a zv*X79+vh(DaOOVZKYDB+{L^yd@zr~s?#A$s6MrzBUz~;x`3RBAJkE>{nG9r>!a`^x)v$1?AUm1GGn82pOF0p}vZ`(|ma|ko4NnWRm$O$$Gnuzu8-vx%;+V}W zz;4c5`8-%T=Mw zEkBRhGZ;W81v~In?isJ zf8%>XJWYPn9uSf@=>#d_1}94p8zQFtCN&olZef-Sw)rNNl_KuoCM>J==lF8XU06y0 zHvZk*h|O=jxt-W*hljEm3*&~())*3T3scpwk=UfhrkHK)P=G3TEUl@pM2 zPQ=*^n3xT4E@0IM>i^?(GWu|x+XZkM|Fhiy{J**1-fuL43yM_ZPJ#d5ef*z^3jo0X z{js4h09v(rr`Bw+MyuD{?{yw4;yAi<6BhtX+yF513g9J3wQm5v$6&-B1C%9!{4Buw z)c4qNSgKB8GC%dx7?PzU*d~AKmm$cP-bxaQ#{e~oPT+uMte{mY9iiH*sR6OcPNR;MloMVAd1}b#XH_IPH*|`RPu=pim1e6(mdSx#aTr_C~JG0wNxrVO;0q83>{KQIAs3!|30TKM&TUCyzJAfXb1)5dN#FJzj5hYoPjxxE3k}RDm$s+4G zWKbnpNt~2YNs`bU$uJO8JjpL6izgX4l1o{?)fZ=rC#ofxfQ(`~Kmk@?{Bad6o(QHS z{UOhN7J8Ll@1-P6Qai288VJ~meZ;ucI`~gs7qBVupPFFo%l7vht?quOzK{IRF1#=P z-6#I1H#RK40bkYX9aewbYqfjruh<0$il$jOpbh}E6{=@J>@0|#1+nvXiJi8qTL*pf zc${(InFE|XJQ`<+#Yt-UHuyRYjZ^CT+3%$t9%t|Tu8>GVM9##|OOT+LoS6jN7KJ28 z<-{6plR^^Wa^@-I4iZRQGUuA3Ub8u41#GFV2Ay-wx@tb>8g;#yi1eHFp5l0}+j)}Y znWH@tNHi9Nb7$zDacs{m?;jT3bItxR`JOj6okDPzN%&l|?gr!YrdI-s^0{VpEzaj1 z+pt~I=Ndb<$NIc`o3=;$yqR6w=Y2kejoTuAuD#l5=I2dMS&#a;W}RK`=XN%(t+792 z?+%japAP$zXEA(qoAggh*bNXsZT@GVw2c{{)@_DCw-2yA6Ud%6*OP9CGVweKE6+#t z6g*FXlNa310{{2$e;5I|LceA5|J!J`9Q?oA=oJ1RZsi|d%*QNG(X2l`8vcN4 zPSf`Ij~p6B5XjZfeS!!T1y3gy+vYKL3r-Kv@=n6#K76XTNFKe|5qBYrk8>f4-ghZ%yBX za81mjrLIFaH|AYBtK6INAu(}t$mV_<8A43%7!r4S5U7ATOe|5`=jv*%wPb~3q$iIR zo*e5bz&o}W-K7)~bC5Tk7T1Y|98>2Zj>np{BvIF6D9!oWBOd=wj_?%Zac5ykYfkiE bx5gL$ihptc{s#a6|NjF3Kw`3507eM_7biZB diff --git a/campcaster/src/tools/pear/src/OS/Guess.php b/campcaster/src/tools/pear/src/OS/Guess.php new file mode 100644 index 000000000..5a661154a --- /dev/null +++ b/campcaster/src/tools/pear/src/OS/Guess.php @@ -0,0 +1,345 @@ + + * @author Gregory Beaver + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Guess.php,v 1.20.2.1 2006/06/16 11:41:16 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since PEAR 0.1 + */ + +// {{{ uname examples + +// php_uname() without args returns the same as 'uname -a', or a PHP-custom +// string for Windows. +// PHP versions prior to 4.3 return the uname of the host where PHP was built, +// as of 4.3 it returns the uname of the host running the PHP code. +// +// PC RedHat Linux 7.1: +// Linux host.example.com 2.4.2-2 #1 Sun Apr 8 20:41:30 EDT 2001 i686 unknown +// +// PC Debian Potato: +// Linux host 2.4.17 #2 SMP Tue Feb 12 15:10:04 CET 2002 i686 unknown +// +// PC FreeBSD 3.3: +// FreeBSD host.example.com 3.3-STABLE FreeBSD 3.3-STABLE #0: Mon Feb 21 00:42:31 CET 2000 root@example.com:/usr/src/sys/compile/CONFIG i386 +// +// PC FreeBSD 4.3: +// FreeBSD host.example.com 4.3-RELEASE FreeBSD 4.3-RELEASE #1: Mon Jun 25 11:19:43 EDT 2001 root@example.com:/usr/src/sys/compile/CONFIG i386 +// +// PC FreeBSD 4.5: +// FreeBSD host.example.com 4.5-STABLE FreeBSD 4.5-STABLE #0: Wed Feb 6 23:59:23 CET 2002 root@example.com:/usr/src/sys/compile/CONFIG i386 +// +// PC FreeBSD 4.5 w/uname from GNU shellutils: +// FreeBSD host.example.com 4.5-STABLE FreeBSD 4.5-STABLE #0: Wed Feb i386 unknown +// +// HP 9000/712 HP-UX 10: +// HP-UX iq B.10.10 A 9000/712 2008429113 two-user license +// +// HP 9000/712 HP-UX 10 w/uname from GNU shellutils: +// HP-UX host B.10.10 A 9000/712 unknown +// +// IBM RS6000/550 AIX 4.3: +// AIX host 3 4 000003531C00 +// +// AIX 4.3 w/uname from GNU shellutils: +// AIX host 3 4 000003531C00 unknown +// +// SGI Onyx IRIX 6.5 w/uname from GNU shellutils: +// IRIX64 host 6.5 01091820 IP19 mips +// +// SGI Onyx IRIX 6.5: +// IRIX64 host 6.5 01091820 IP19 +// +// SparcStation 20 Solaris 8 w/uname from GNU shellutils: +// SunOS host.example.com 5.8 Generic_108528-12 sun4m sparc +// +// SparcStation 20 Solaris 8: +// SunOS host.example.com 5.8 Generic_108528-12 sun4m sparc SUNW,SPARCstation-20 +// +// Mac OS X (Darwin) +// Darwin home-eden.local 7.5.0 Darwin Kernel Version 7.5.0: Thu Aug 5 19:26:16 PDT 2004; root:xnu/xnu-517.7.21.obj~3/RELEASE_PPC Power Macintosh +// +// Mac OS X early versions +// + +// }}} + +/* TODO: + * - define endianness, to allow matchSignature("bigend") etc. + */ + +/** + * Retrieves information about the current operating system + * + * This class uses php_uname() to grok information about the current OS + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Gregory Beaver + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class OS_Guess +{ + var $sysname; + var $nodename; + var $cpu; + var $release; + var $extra; + + function OS_Guess($uname = null) + { + list($this->sysname, + $this->release, + $this->cpu, + $this->extra, + $this->nodename) = $this->parseSignature($uname); + } + + function parseSignature($uname = null) + { + static $sysmap = array( + 'HP-UX' => 'hpux', + 'IRIX64' => 'irix', + ); + static $cpumap = array( + 'i586' => 'i386', + 'i686' => 'i386', + 'ppc' => 'powerpc', + ); + if ($uname === null) { + $uname = php_uname(); + } + $parts = split('[[:space:]]+', trim($uname)); + $n = count($parts); + + $release = $machine = $cpu = ''; + $sysname = $parts[0]; + $nodename = $parts[1]; + $cpu = $parts[$n-1]; + $extra = ''; + if ($cpu == 'unknown') { + $cpu = $parts[$n-2]; + } + + switch ($sysname) { + case 'AIX' : + $release = "$parts[3].$parts[2]"; + break; + case 'Windows' : + switch ($parts[1]) { + case '95/98': + $release = '9x'; + break; + default: + $release = $parts[1]; + break; + } + $cpu = 'i386'; + break; + case 'Linux' : + $extra = $this->_detectGlibcVersion(); + // use only the first two digits from the kernel version + $release = ereg_replace('^([[:digit:]]+\.[[:digit:]]+).*', '\1', $parts[2]); + break; + case 'Mac' : + $sysname = 'darwin'; + $nodename = $parts[2]; + $release = $parts[3]; + if ($cpu == 'Macintosh') { + if ($parts[$n - 2] == 'Power') { + $cpu = 'powerpc'; + } + } + break; + case 'Darwin' : + if ($cpu == 'Macintosh') { + if ($parts[$n - 2] == 'Power') { + $cpu = 'powerpc'; + } + } + $release = ereg_replace('^([[:digit:]]+\.[[:digit:]]+).*', '\1', $parts[2]); + break; + default: + $release = ereg_replace('-.*', '', $parts[2]); + break; + } + + + if (isset($sysmap[$sysname])) { + $sysname = $sysmap[$sysname]; + } else { + $sysname = strtolower($sysname); + } + if (isset($cpumap[$cpu])) { + $cpu = $cpumap[$cpu]; + } + return array($sysname, $release, $cpu, $extra, $nodename); + } + + function _detectGlibcVersion() + { + static $glibc = false; + if ($glibc !== false) { + return $glibc; // no need to run this multiple times + } + include_once "System.php"; + if (!@file_exists('/usr/bin/cpp') || !@is_executable('/usr/bin/cpp')) { + // Use glibc's header file to + // get major and minor version number: + if (@file_exists('/usr/include/features.h') && + @is_readable('/usr/include/features.h')) { + $features_file = fopen('/usr/include/features.h', 'rb'); + while (!feof($features_file)) { + $line = fgets($features_file, 8192); + if (!$line || (strpos($line, '#define') === false)) { + continue; + } + if (strpos($line, '__GLIBC__')) { + // major version number #define __GLIBC__ version + $line = preg_split('/\s+/', $line); + $glibc_major = trim($line[2]); + if (isset($glibc_minor)) { + break; + } + continue; + } + if (strpos($line, '__GLIBC_MINOR__')) { + // got the minor version number + // #define __GLIBC_MINOR__ version + $line = preg_split('/\s+/', $line); + $glibc_minor = trim($line[2]); + if (isset($glibc_major)) { + break; + } + continue; + } + } + fclose($features_file); + if (!isset($glibc_major) || !isset($glibc_minor)) { + return $glibc = ''; + } + return $glibc = 'glibc' . trim($glibc_major) . "." . trim($glibc_minor) ; + } + return $glibc = ''; + } + $tmpfile = System::mktemp("glibctest"); + $fp = fopen($tmpfile, "w"); + fwrite($fp, "#include \n__GLIBC__ __GLIBC_MINOR__\n"); + fclose($fp); + $cpp = popen("/usr/bin/cpp $tmpfile", "r"); + $major = $minor = 0; + while ($line = fgets($cpp, 1024)) { + if ($line{0} == '#' || trim($line) == '') { + continue; + } + if (list($major, $minor) = explode(' ', trim($line))) { + break; + } + } + pclose($cpp); + unlink($tmpfile); + if (!($major && $minor) && is_link('/lib/libc.so.6')) { + // Let's try reading the libc.so.6 symlink + if (ereg('^libc-([.*])\.so$', basename(readlink('/lib/libc.so.6')), $matches)) { + list($major, $minor) = explode('.', $matches); + } + } + if (!($major && $minor)) { + return $glibc = ''; + } + return $glibc = "glibc{$major}.{$minor}"; + } + + function getSignature() + { + if (empty($this->extra)) { + return "{$this->sysname}-{$this->release}-{$this->cpu}"; + } + return "{$this->sysname}-{$this->release}-{$this->cpu}-{$this->extra}"; + } + + function getSysname() + { + return $this->sysname; + } + + function getNodename() + { + return $this->nodename; + } + + function getCpu() + { + return $this->cpu; + } + + function getRelease() + { + return $this->release; + } + + function getExtra() + { + return $this->extra; + } + + function matchSignature($match) + { + if (is_array($match)) { + $fragments = $match; + } else { + $fragments = explode('-', $match); + } + $n = count($fragments); + $matches = 0; + if ($n > 0) { + $matches += $this->_matchFragment($fragments[0], $this->sysname); + } + if ($n > 1) { + $matches += $this->_matchFragment($fragments[1], $this->release); + } + if ($n > 2) { + $matches += $this->_matchFragment($fragments[2], $this->cpu); + } + if ($n > 3) { + $matches += $this->_matchFragment($fragments[3], $this->extra); + } + return ($matches == $n); + } + + function _matchFragment($fragment, $value) + { + if (strcspn($fragment, '*?') < strlen($fragment)) { + $reg = '^' . str_replace(array('*', '?', '/'), array('.*', '.', '\\/'), $fragment) . '$'; + return eregi($reg, $value); + } + return ($fragment == '*' || !strcasecmp($fragment, $value)); + } + +} +/* + * Local Variables: + * indent-tabs-mode: nil + * c-basic-offset: 4 + * End: + */ +?> diff --git a/campcaster/src/tools/pear/src/PEAR-1.3.5.tgz b/campcaster/src/tools/pear/src/PEAR-1.3.5.tgz deleted file mode 100644 index 6816ea7438d0ceb0ea32313cd8274bffc2175a2a..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 108423 zcmV)ZK&!tWiwFP!000001MGckW7{^e=>2;9D^RVsl3TqWekgI8)Nxv$lh?JKcK147 z9g3oC))J{DDLdXa_vhZ$w$q;7wRRgzBrq5NgP8#^kA-DlSr<<8(|q>7 zzSO7FZg2Pd?0+%V*%`F)FYEB%_~{J>y$J2?I8`$M+iWW!GW zdUAUBhE*=3XfbTH7LFA(7nh5s=R~bZG--))4TKBzWwm5`;%T5g?Kj(22WqgVo;7!# zy+3?${Io@1Ingk96E5d-E4ZbX?0YK&Y;MEInLlmGH&AHegm&OAB7pns^wMEeSfXM3 zUSzpmINV_0ut>gz2az?KIYFIG{eanlV?{6;bvALsC~(J1{Ivl%Sl&byh9?qgD1lkC z#iiBw`_h`Z(Jg@<9e%PM!iB*g4H~{TyJe1gX3wlp)gC)hx^fWs!AS(IFl%ycdA2iQ z4nAX-fC-^6cWn6XhI73`yyD8D?@mTPES)gqXi(P!2m0$=V{zA;`pg>p%SaT)0l2wz z0%+sM_sk7hu=G4E>3b3)pAHS)-m+h7fRwJT z98ZuNy>kG->{$pep9|uC+TzdXb>PpOXEVo|JZ;feY_gSX(~N@cf6Ab6>d&o^{nY%a zd4O-zNI;e6?!>VHhbD~Q1L5J!X8uJ6l^+5JM#HgST^bOfIuAP@3+osE*2&=U-UZrq z8ZTy0p8Y44NMplmK1cpD4Vr#%@h}L@f5{;8#tI@t!}3BCk<5R|ACif4?aYwc3(#mK zY4>U10Nx=lEBNEHPP5k>JZ;IJ_-bNB&a-a2J!rJMjm|Et2z-EVX0Gi3s?TthzUJSb zw&X)B0Q?Jz!oTAgyy3s_x#vet`0N{4i=Wu{%M13W-k?1gvV~*Mm~DC0Nb)}R{^h%k zZ$N5XB2QvC2gnQ>P(2FSB(UbNx@{-QYobb|L&VZ+VTKEBHGxS>Y6N*JX zJ$1ZmH}Ji=<3%)N98($wXA$xNhi@#pT{!y{n2ri?ve|y+!l}fPr{C;WTA8v}7pAhE zCdi@}fqm&-JEK!8K!&p@UAJ3#b^y!`W_qidw{CD-6kezam9Mg|$|e<;*{)>}7OcIPXXgxi1vXDqaK^_XYH$Gh5tYn!Krd@$gj0;UXFGZ!qRJ z4*>^8>p{?Y7%+Dl@*^$K1 z44~qMibtwc5J3!hoU>2Jh6FFJ6^bGZWS4S1;Y*M;D2zH0A~w zx?a;C2e9qs-wS%4MgFC;0Hhty&YLM?qj9a_5O;hBmyUh)#)&Td zJYq4lEO<|5`QCxE#jpUMyGVE)K)6b^%l1W`_i0_xo|VT#RU$fmHxB8v^o|ht;=d;l z&@4ZA?%$Wr(OP^!gAn4jEl<9bXr7KWUs{oMcMu2GGF*!r7^=U4jVS3xcZG5qShjOw zP45AMhT?#e-@RZIuGLjQBLBx|e%A?&{8KuiD7&)MVfb3@sakjBstEv2^wODH%UJ{) z{fjjhQWDO+0SF>ou`OQ->Egj4#e?$zkPc8K{B& zo>|eI!G#YCF0kCtIpo{uk`jlGKi5=BvrvxY<#HO1uJ)FMB~E1?Ku?yC@IYOh^pwOQ z=L~0!`i6s+bx@ZlDx{9tmupdktQ%U_&YdgU`3Gt%>y4a+TYjjP-l>y&mSt{>R{?ro zmL}1X@cI3YX(i!B&J2ixUqIn6hS#0qCT>0%gva+wSk}b@#T% zp%3lBPJd@_Z*Q_|O*+$UyT20;M*=!u=w-n7+P(33+V4*~o$h4NX-_6SYj?-7cAUXr z?AUqWamQQ+{Pxsw2GeP$yXWlg_O~a!t~2OQCWE~}7Y40AF@hJYuoU{!es|aEjrXSQ zJ!iZ<1@KO9dty&__jY@ej$?!`m|7Y5yF1q2V7F_x$3Tkqw!JqUTVo4HYS-!YCT9F4 z>nkB0lhPI`fXqWRu@*S?N~r6 zJ9`}O!i>q>;cn)v2XA82UFYW?@f2c{c#3vxkU;X?o6hG zzSZgPb*4L(J>8xRkR@*K+7lp?6xgzh)7fqBOncUN((QMg-R@4iw*!2#y=QM*{r12f zB*4Zec%^tEtiAS5Z_=OiyMxYlXS+Xj_9j*j*3o3o*-3#`8cr#)7!P1=121o*TyS>B zW8mbwj=gK|bUWSMdK?^6a+L-tKMh>{|WpUZd%ezh(uZlB4!Yaz-J~c` z>S`(aodUZV@7ZG*foW&b2az-0?hHEi&JH~9CzqR4IZKHbm>1jHv#oy5+3s{ER<{RC zbFVkp9_(1#J4yDu4qLXmFf&f4V@-GZfZ|Tio^;xK16+fXfivi&0GDOQy?(bh=)u4O z+qb4uP#pGlJD?|Y#)FQt*GUe9(9v?>a=XR~**gk5sfioxS6W&pdSe^-(YObC2y|n- z)9(N~>hJY|%~_LO;6|ci!vg&pO{!%39C*mhc47Z+rb0k$G;@^bXX=;wG$T(H_+}ul;8Eve^uQliDK6Cwmqf9HR zV2B;7KiS#cZiB|WZH;?vs|Wf?cYC^vLUh;eWXIEa-oZ)9>zpg16^%1|WDrOW0OIM&R9?L=yw^TiFaK&|}y+j@z&~*zWEPw)=w# zXpg{Ud!YLE)P^q-$3@L>0lIb$_bzB>uxst@THBNDo&&rUv{a|JyEnGmUFf3)QdDQ? zMFOIziJf+*3-pW|kBQwL>`txm-mbmvZ1=Z!w|DoF`|h|AK0{)^{j?R^3qM8s{tIX3 zUvOMBOJbI^CGI3_iCJt-+;8Cjw_|H!mTNA|q`@!_0aI$ja09LO$>4X;>oac98{&ey zWE0;B(To^zXG@QRWCG1l)!Xa!7(00Ll6?rRvCG{dtO)9BC3YB#E(8CDw6)q6i_m8y zWDa!emf=AQvqHv?ShZ@~ec>N*eEbgn{ma4O`_rR$Z=u2x5MWcFzL{{FP?b8cabTe} zb=cgW0JeDg5waUAK;MUrjr2hyb^pa=;*eRh6S!!!te{Fyh&r1%cpD0(A|J8#q9xi( zGqHkkd}GK>#*QLsEIlSKme2)7GTp|~i`*GLnz^W}}1Zs3f3 zwA`*5G~Oy=1jEtfa~#`RCupsZyn6ZM)oC}nyK9k`Mp;a=Chv51xA|l+i$O^jy2HoV z_h{&bL%t7VnmPlVG5kKSfJ-CzvAZ7NjWX zE97YK4j?MzEQ8%kg6ntNuttK=3D_7OpzF=)=;gZ)-@iT_9lU$}?yW3-4AT#~Cm`O1 zD!4cYjO=?kk~nx1phWam>bKBkiG{>|Qe(f}6DxaeT{*#GE@~5Y(klu^)PliWE*41F z$P&N)`_hk|OnjSv+1PjogU;vGnoQCTQ?VD(`ybyAaHIk?h#<(x!+umW6Um!_#WzEbD8ZZynOZ!{N(qbA^3Axpv280^N_I4$5cU~|>9J$kJwAWiQ zIGEZd0~fS5ICYvd-C;wl0GvZ)NcgZ$zF0_|OZV>m>gV-p&}c)iI&1Zc&xi%WByjy@ zsHUD)4DiKUc!$IfbA=00G#ujcLRT1~Mp1UYoJH<}WDm`!#n&|!MK%y#E+d#(kI5r& zf*~Zm?$XlT-R=yTrqYmzLv{qqf9iS;d;8(d_lL)cI(z-?At33FLMKuLMyxALxXZwv zeaPa|8PeDoUpbz`|DqS3=Qtp2>hg^rX|Dhek~ky-V7x$9qMIKWOYWVhNY>^@cL0TGnOM=KGh2{qLC%hTK+JWzoUz(s3FF}3G$Ox&6wN&wxxdla zk0O6ACtlRvDx~4?Bb5V4HCtc6Rt_!8SLr z`mewKisUhe&EqEv6_Su1<1raMhTQ=!C5(b#1)vuNPP7cXkgJJU%?eqS187*)Is+}m zLK+U)Sh?6XI(yQzwTJ8taA9n{+hJ|!TX)#&$ky9L*n#gy&o!9C)-nuQVPLml_uPU9 z3*fq~gLiLV9sR(V+uPmF;@Mw?ClqKLAHF_(adN0vQqTU>;h6p>Ohk9UI-Ox>Z`kj} zv+!`34pw10NRO!Y2uJj15K%ayY@2m^!@=IL+l%M(0r6xvEl&SH&{$N$@0dcf;fM9_ceE18fyF>m0f4F~V-#0sL_&<9Q7lh95_F)Uu>9OdB zwkm;?Ed^j#c99pPMP+C-iTBa>Z`kq4HohEy;{M|3FN!YlI|1pjJ}d+H^aj1oLAx!g zin1%w$%T_b<>ZGW_RhQg#Ey=k#&(Ih#Dd#>4jjw3JMF#BZnw>j-h&L7yNfUn^y=!e z=E4f>lZeg>V7}OiKeGZ*pmtXx2ki0PNtVn8&0Y3`<2iwAk2>w$L3g(SlM*hy{+xx_ z*s6x_1)QCHc>8nx`Mm%4gMAMsMOYJLd_nqLrR=2x5_S{-PAu9;1+gbvxDlxt)+keKYmy6}6Y7*-zU+?_A8@T#=fuY_K3`l-U?qGLY z00LQ%ZV2_0{I`pR&0j8%wBd&l4R^}ai0q3o(Z+*jK@OOvyv6`Nt8bey&`}8G!o|#u zYSpu|Aut2m8J?ei3mPnFt8+O~TK!EAYS{kL1L7h8TY^04rJyC8__<|Y;>y~mF@rzV zss=?+B)%mmXYF&n4M9Qi>yG}K!xL{dy+-0C5oW468a1l5k6Jp3muhC*(qOyi`mn{6 z02=}O5&()mq~X{&096og)nRgZBnPM>8tR=l#kcNxT-IB=}1Cx!;Z9>UOwLQoD} z8p9-@y+Lbl*8s+Vb9L`iHH%^as`4}89$}>#G0b?$mOf|4TaX?txHSfsHXx??lhh^n z+GyfLjvf6lbH}z2boyeG9}qos!G}@*_~AcE+P%y*m_L?&re7YHw>MqCUlK6N&V+r89|~6w{&3*I&)@#X>Qdp3ee&m z<|dXjCNZvI#&wf3{A<8Uh&R2E37$B0;_8iTxvqw`P7vyX6V~JPoukbeIb=$U1NQg< zhT;OtR73W3>X7OeHZPyCO9$=7`EhmR>s2nC2sHFx@TAR~z_!lwxaKy6F%FTg0RK+A+s_acF&`}aYx^^? zoj+CCZ@&rM5ub0-QzIY37`z~6o#ZRu65?P^DWI+(%d5GpvcP$6q_8$JkT(} zIan-LfKUe@hT6w`BvwF39GV!Q9O8(rfFX`qOb}9MK%C-DWCROd$V^@&BY&rXb%ACs zA>SQCnN`YwUPGsm1dNki9%5ET=7K z=h~Vr9TPo+{%MB`PcK~k<~xw&Pf<0UIog{ntz-Ofko$kDvL=>Ria1{(RZ_;k!+%;; zkVE1r*U_7_EBHt+;uZi-bu+a^5kr7d(5+#Usyl@PCSj6h@(t-LUtwo~er(Y8vV#*3 z>gSEtH+XFPnohfavH}+k3V0R)7tQmcMr4h{23m*@ndi>%h1~#Y?Ai@~It49#$oly3 z(3=eD1o^u^%3w^h|1x^TKSUeF_FtV2=Ko+j@ac8B9sJ(uKtc8pO+S8Cd>-w;9__y# z?Z5tg?7!}3{`KW-wxqn_CR+n;uGQ|e+Pfe$hP~df(_^9ME}TG`Yb9Kla^s>rF_qIi zxsC6&*a}bZrkJEXIkpK)bMA-&-?$qNcbQyr#{q_3i+C?gf}P(C>mhI{J%F@^Prl)J zi|b=yj>hfuBg}t8kNJhML?d$nS)F0h0lGpoT}_J2Nc@Tsy6FLT;fZ!EzzWU&ZJ@^x z={lf6VmwG_`kFEnvGO^fnVWtubx!_Xq(Vp+;to`yhU`|V#Kaf3p&I~zcoxq9lE4kt z&MEn*$;YzsP;xny(P@JiqnL5%_AR>tg$0fD)YtcuOu^=I%r@S#n)Twkd|M9v=Ej1(N+W8h6%>82+I`I-jnn;a{)rx zi-to3E38pPSue4xHS|)jnc7ySkB6TepeToiUUEn=otYj2I@Vm8=}JzkCf_5kQBw_~ zGPWrQPk4up_%+TmMtjJ@iu5Do-q661tjWYh2}JQlKVzrI9}aOH zhfA8GI(zlv^~oU#Dq-uOq!$_{OBfaxY|2>{-TszA2GtVtE{9)^SzQfAUG^?L^_zT+ z#5d`DrW?;LoTyfvTfq2&kzf=0>6KVv`@p7eq$?&qsU^VZHPlKoHzi+JQ^)$^R9L>w z9&u=JpKp#1-~Mz~{cv)4Ts2;*iI$gc;~B7<#WKR^)wRlN&d-H>6Jye>)D`tXrBk5;pkcq-0dKFHyyv+8>Rx4LC4ih+5neEU&d6c*Kx z#k-&+8#7Opus)KbuN6|vQWjF(H;h$k#>2#n*O{>aLlxCMeY8!@aq`4-y9I~^9+aTp z?&#qCE1V`-5JMEyIAg*KMgy%ko-O>vA;GJqXp~^><2WocR!9XDM_Ne^m6=8WC04?O z%yd|tI+RzjA*o5%6HdinRT5`&2DUD~Dy|O5mtgCpl05Qt_67JlPQdTL*ozsY($R`} zWU5J??!e6BbBe}{ET1Fj>mfAf#|F0Ds|EjoCn z5KR;(22YX6xvA*DnZSOz6KBGv+)*IM1eU^~M4Y`seeQsr5aU~Q)<^Y=4-CimI0-z{ z;v$`IP-A#B>YyJtg^-EIo9q@bO*ftGS}N*KHSfsuAx`J`@IB=596|j3&gXb@TN~*O z27kWB{(?+X+>3RVH^+SaLD{d>!ID^$HMKR#ZV4t1 z2AVQ&bwF&7{V=)bfIS(O7Ogd&jd|}CuF@3dYXVpoD@;Zxt8S(C|2({%%M;Ml5PF{F zBEBmyiopW}(;RA3n7|}6k;%84H=u>U4B~y5Y5sTtvcIwC6TaW8l2NEWtYjYc+i!{P zXf^YzwX=tH#@%JW&yNU8Io8#T?NEA$_ebmP5B160|HY!}{%x$V|Jmtd{J`Y?Z_wLj z_iy;|v-0z}|9jm3J?{Vh?e>2s{|{rWuD=cZV*9LE-q1#?+rQIJOYWQun;;SXSKkE{ zZ+o&zII49(DzqXga41Dmg@)*wo||bfeyO0{*h?VLI7RPu=+c6l4e>oyT8YOE7jGt^ z!Hazuf_{=g5pV3+k%}A4tJi6_h~ZBuqOiraG{FogAg0Vu-Vd@~0TJylXw& z`70KiDzS9wEwVyBvm;kD-b9X~zHoKI=5)EK13Rz9{}eyIuN`HL+0TFpiKO!$8$BQAx(xIorpa^F#AGETk8$T@h4(+pY02 ztg}swzD^G1K)6L@rv^QHsyBn4QjiV)x0><~)TkO8JF7ym9O5NwDy@(VXHd(HpduSb z#qEi?ghXpN%qzhQpka0tB-*dDPMtM6TiJR>TP1SH*i8VRWMNuMRvOgo=&|Wywy85vOTP93c&G~zx;*OZ2!|1dnN8LaEC9{ z5HbFN!&7O%_}i=o1bTx>BQC$&%8>t8Wsp=lj%iWIAQ5kUKJGZ+a{513B$SUj>yPO> z`3(_TU@RnZ0UwdMY3o-$k7-kEznyylz$0{UN_GQ$RcCXPZ~&TLPUDu|<+0i$ovz&$Sej}2ur@;P^TCLtEX$?{1)J>p}ivWaqMpYcm;J*GwlTBtMl zcXNR(^;!tPEdvGW2*yw|7$&ik8!)U}up!4#v@7^(u=Fy!A$+!uc{x^GAzGE~kXZ@9 z*Cr)k=KEK~&DFl&%$ip2vFDlnwZy=H^*p&ZrZ6r!yL2@MQWe;z#&Q(-I}TJD<)T5; zKl%P2DPINl-x7mrC5K67R|kGd1$`|#LExxSR|-k)pWU**+$Z1uL%P7;+(lm-mSX@{;F34(T#5ImYDh8)7ULPxt~`Gj-UrF}H3p z3)jAKCUI;V-g|)(>IwW>J4|<6Xb65Vae|FsmQY7EQij^Xveb4!>66!^wUd>!mf<9K zq_w9sm@&;k%j?n`%h20K0liUlpd_6s3UzLHvjF$RpF10I00ANzU0X!*viKbyS9n1Yg&boX7aFBVF>c~^KFY&6N7`B_HvD5PELE5K5bG)%g!NWn4% z3rd2*5{1~&T%J|&-|G2Ub_nSpg%A5VS!9Tt*-XLrpqecBh;Okv<0D@X!`tk~N9Y*i z!IXDz)O6Y0Mf`)aRwNwb8dhx8RIGE~rQUg%rJmzsi;>dPj}1}v^KSy;?Fi!mvO)j~ zo$6}RCJ`V?(Qmq0pyRB|ubDUu3p`%gMyfF6r5rX(CZT{Ab-9+TTQdbsnbe`^+TTHIryI9fJglSE2E?MNwrJ zsj{b2BIL<`I1fFN{@^Dk3c#lg1?g%Qyt^i&nx%kDn1ywh$QmOhsy9uBAWA zq6TdKCpxbb_~lyBY2z#OIZa^`0YHRsb|JjYB6Ut#DtVN{!x|o-d;*aygbbH8F2U_1=iK%^9qT z35!KduI?(9lGf)NYv0L`zM%o=j6k_3ILj(YQm}p~jhOdEp`Z zSkbw8wSq%asm9QVjw|ADYO#PFVS=+K=_kWrX)}{+hVd^Gg5wYUL3yL=w)KOXHr9_>H=?d(7P$Ho895_U^FXWwtZJtSt98wm6b$VOH8(hy*hHP6U2W9Q{daxwr^;#$JDl z0K_6I49X}P|8m9{0>g5*UlN=5#yAj}>n>5e_^vCH6exSul~FaTFxs|LR3dH&t@^2< zX-?RK_~wkRJbhrHl!+U!HXSvo&P2^u4xFv*<0>Y-T@-f3fM{NXj2Kb(!oxU|0NcSt zlD3QahysMgr1b_W?rY+j7fT|>b>b7_mDr&u!3gxYN01GR^FA(e ztS}z(H98Uc(_Bk}9NhCJGR7T&N^I)F%@XkUqS-A5(Pw-`(_OeV!|d6&cf#HC3xlKP zp#Ob|q4z#kBOY&&9cW=m*TM~$$0C63>ze5OpOxq#uXVx*B&}=$4N#CicnGA4f8))3 z;+Sh7EG8iE{dMW#I1giV)uIwFk8;bzy@G~8-2g=+@`GD$-9X(Dh>=e$b+Ts7EL1%{ zRzr65_T==%>(`^>ckfQO*6A&Af(9Kjtezo-B=JwRCLQ!hR*tJT_>TZs9ua_Z2UcgT zW_6OQ!GA(HPe?~o=2kivTmxa`KmhO#NT+j+l|=e(covx-5yO1On$6~h5VgrT#H67p zErYSYf>MbZrnIzC@rXe|-HUhus~X&(kma45iJI8TiTZ>oQ~hWX~x5XcmWp+ zU`}~1Hfb2+OhmAyjhb+vW{G?zpSKwI&*wZ&nQkFNlueW26?Hanrm!Lb=HHjr%#Cha zFcP4lDA20Fh+cf&0u`@)d zqVTAWeGzp`2)1H%?8HH%X`4)K`I(Whec7l8j4R3-o0JxEV(_!-8wmTKk)+iDlSud* z>k-_>f4P`g7<5FKZZ87=+6C5#!bz%5>=JmU#V*|o)Pdw_vbUU%;b#rACu7aVRLnPm z(()j0B<02(v=E~*(I|aDB^8Pn@gdbpXQ6UhMS5wJ(kdQB_M^yt6xoj=y9^@vZiY&j zU`tYd@XI@j>Sl@EMd0w8Cv_Evdtg;Ja5g3+jd1DdQOc}rMR_mAcbPGlhV5}BwbiV! zn!OAHIum8N+fmwhTLK=sZ-Cr^*Bc}k;VB}UV*TD)HxnPchMbF%o5>HVfnvs=X2<{Y z7{B*F`{bWzOI^wN$qY{u6>IVTN0#+Jie;sgVb3jdI$5MCZmiN2xd}sAUV*@o@x6EK z(){9k-a;X>7~hRsOz3pdQmy6BW{P<8mdJX<`!3$PDLgb{<|(9c$dHO_!o-kvB7*b7 zWJQ-`)CUSu1&PY}1nWCoho-;G0o*GhdCFp;dXP)_(%L0I%Rvh9)%3q%rZr5o;R_$$ z84NR!HJ+j4z&G(2mNslsd7~YnI-s7?UW=ToMe`5fS1IrHAJVZ>!2JC@D`kUO1A6&p z4eR-Y9Y~ezKwgUZ;D#V6_mV`YY$?IA8TQfz5;+8wp@}hzV9HfNg>~DH&)hSuiC&(m z66YCX_|;%(_nip>@7c5EBw;6W401klgptg;Xi&L;ASA|w15G++rA_X+R%uSGn9@Y6 z1}kSVb@U!{2r7Uu1fWrwt?_3TUMXRt9BF74DNJ2iVf^yfROXl~*I_z-U2b&9yTGms zqzf(g4Ot+0Q$^<7qDY}f0H||lupZADYIlLjhqH!xT}B{Vs%a;K&G>Fa7%7dWGj~x# z;EiY4WqF=c%T!fKMX0bu<*)V#G3F89t?U_vAk;(da&4u$GizI!gO8<;T*=RXJsTjm;ObucabRk z#85QhET(J}5BX-Mlw&O>!!`Oy8vK%#h!h@(IZkr=IGcw@P46V;Y?-N0nnL3lMoM^p zb@9?!gf$JmF#v+rJaN0Lj87vM1dC;ON&Wf}dW5@F5)h-q8T(0 zNyE>TS{Af+R>j>e#E_s)O!8SCYGrX6B^Q0I+0H9 zmPK{=OfBfr+E1Q{Q!wj142?E|D~C_3O#^6B@i)^LpH=bS>iL<8ZYuMAZCnQv=U!2ke~o0DqohX#tm||DjK~%bIs?p{CroX zaG^gu&CgN9D6nB{tBL#`R9GuW*rL|s5O@OfiK;JB{^rbsYzXEIWU zvHQBex$HrlGpSbn)8A@n0{z=GT5Jtltv{ikyJ#Uh)@j(OvpE&g=&R?TU?PZGE-b<0 z71N;Dj$&tlp)>MprUyX-f?>Bf2s!f~f>{j7uz4=-QQWH>&INLI=6J=p78AsQznpPj zPk-Sg4)o~;Zm7Cy(sT<`w&b_@)=#v-bG#Yh=khQ06&R8nYXx*om&pWeCTAo=f$|0D zFsZpuNDopHoIs2a3f;gs6JB@sBGK(@o-{0jaoYSqRBG^I^y??Rm=*gcd76c)Rx)c_G2;1zGE^xl4=xMQ`2!E>VQ-pYDsYv zOv93tReuB~qt;2C=_f=Q%Jmqp)tl+u6;}`dDa!^@!=f=3{QJZ}^FZ?NL6$n~)0|s~ z-I?IAHK`aUjwYu5tH7V1Ui{-#f{7;CcxpHVtTm$K$r{BHQSfG|rgVsR)4U89445`%^awx@T0oBKHpOG?wUT0fvHs)_~yyGB(M<&-Gze{@RRgguWq8hH`e zm!Rg1POTu1pMLcm%Qv1uw*$+L-uM%Dib?|DTIU#)=dG1E9tSt&FzRuu!i-6`J;t52 zQN|NGD!Z7rGfZt9KmR)ilgf+#B!=^Mi2t_08&F+iLDvIej;tRL`p=6eUWIRSgh zgFKan_Qm2-X>yR_Qf+sd-6kag8?@TpR%Zuf+OWSf91M!$QdN~~wK};QF5ENcNB=MAjrEfIJ6!z3U1W|OtH!#C*7h#Uy)eB*$Q(!z9*4T>7#Mxlt^!5v9S#MGAI z(wfa~na%Cpw0Is{&5h(3>em0FTtl9#l%vR>L}_J}eSnThuyOV5v=dDpfl3f72=)3t zS>}q;7hQ+2rJ9!O?(x!tnW#V=hLtKRmk)PLalP1~cx4`=>+mJETi9zm?VV6+eFD47 zPYIT6Nzwk_SJM9X4=@r^=CybC)2y9_!U{MuL*QFjhHFIO`zm`i3|Sa?DSh+Vs+ zLIQ($`Qr3&wTnr9A@jJBe)LdoTINnf)&-IGLT&fCQg(d!dS!p|%b2^vhwH(;=ggCG zeE3s|4&;?FbpS2g@LXy={Oy(a|KNB|AlyB%0b)99;I;I~-)l|0mgVsh4XlfoaK5wG zr{Q#@%Pek3+`kiH*Oi+rTP{E=YtY7oOwg%qHgh6M>4yp;$UVnfhmD9%++4aKpJ9=# z+m&(Yu29-WE?wq$|A1_Tnq|D*wQ(NLEbpp;_P*fG82A_M&-ds8qkxcHyx%|e9M9&ALU{5+*2a`!~+X$BHGOX45 zg zbSc~zcnVD6)@b_^M;?k`HUsDjS@AfN1~h_in;RcOJjbA*D3tP{aV$fl;1(XeS64x{ zq75H2RR|YXTMDb<#Ff_}$hdNf--#2kgP%^A@D^gH*6Ku+*P)?QO25k_SAEp)?ycX2 zu%B3$8NXVI&l_~WuMzAm(v93Ho?>w?-E~+8alkdv%XL!Lm>oq3h%yvch|9kU8>3vo z7Oha68sHq}O&O19$$0X8MFBYt-urK;&Af#f!=u0*FNqaJRxn1OikC@W!Z^Sb z`XfW@H^`2pwi$9^4MI@Fl%a?r9+!)fOYtPrJpL1u`@}+j?$EexaO_}`=%$^sEOOqj zGeC@uovAPQqC^n7Cg5_6@PL9Gj_VsT_Ed$)xFWeM#;PRZxs0`ZXr_>P0!9t=1kB}B z*^TqDbAe|@*y5>^T{Ia63U!R-k}Nd16AKL-5F-!1-@sndpx_MKmv~qwV*pT?5o$Gb zulX@_A7A1Lj}ZLJ*LnITj8n?2NQG0L4k8)`{kYFy)3AbI?XF_u9bh9_u54dqv(0TNVQNjAf!w{B8+^|vtHV_vOfzVo*hi!Fz z_b<{MvlR13#2RQDJ6r!GFi#PUS=_6m*SQCNYVuGE!Ga>V%`uYNNaW` zefwkR%)8?^FHXyKhl*l{gm@651kVt$i;^&Tj>A8PTv36(+RkKSe5*Vdk7X zKXZ#?fP0ezH&Z8E;GONXR*eT?$o@RxM#{BttByZ}B{Tf2HpvFr$XpB`>34_ye`s+j`lP6)e->+mU0cl%J+s)vXUv4zb*|JkkR(Errmb9I9otAIbaG^_f zER|q9>su^ZFvW^0;qMkZqM^&bo(Ch(gAHwVg`b5m@s1PMv+s0(L#1XTK;7?IJPz3Y z*Rl7r>`20e85h$&UxMZ^Bjn5j|9aB%OyZ}Pl9m`yH0^kxnQ0LIINyMIiYzwy)<+BH z5-4BjM630p(U@sU$qNi40FeiyY(Zt#O?aD;IR_n4 z3E!ne2h#@s%D%*qI6g(<0>M1D{AI#cq<74?^b|)9v{9wd~tF((x7T`VUu6v$j~KM&TS~;IpG@&vzTxIYCx60rHkW% zlHp(_IqqrIf?swT^a=?Dq<@t){$9=FmT7?c9qmf6|Jw*QSqQHfi~GPYU{^Nws&pU3 zo#{%5lM?8YgPxe{ruYrZ+FCdvaEzH1T$q=2ykX_@k2_XU#tTt0K~JghspzpQ!p>xw zX+}5vR^d=~kDOP<_z^s3zOEgu0o7L@9uILEfLLvncn=)+V7+ME$UZ+{9T*%&+pCl z=O&hqpQUF8@lb+cZW0QnhLeEGH_vUDO--*U%ndM~WFVH3?NnF;C+w0bycvhFYACV@ z=<3@i$6ivL?PN$Fqs+_avoV;|S&j*%7>-#s%4sGO-na-bFK!MJM$*kifTX)|Gzf4e zjC*%-6Oz~~!XPtM-B6A%g^h-Q7$WuB+AP#c2qixrRgzmU>#zw-cTKxI%o)T?y@;2ENSaxm%OpXi)f zB;4UWMRtnA+AZBD6vBOm3}tr9E@AI_%T3%|k;~)853XVmz|s=&ML8lh1f4i_AsZXR zR@p3)&?wBna3{_px&$bFZ6=KYQe?qS9tnRX0tkr_E{dmFZ5nqo<}jG1pff5OOHQrF&}_Dxt6)kbu?a8SbL`E}%ds*SnziN*m%GksYX03EGE)88OnMVT}QgneRS zW&BWjSf{R)4Qa$$cs&7Y|F zZfNU1Glrjg&l(3JW)6qK+{Jb04L^ke1$kW&Y}ZhCrECQK-5n`g$LxM8%_PwF(!e4T zP*6cgR#>4Gj}G7dbXGk*JUJb`|MC6k=r1#6p`2Yhbtcth z;>@gD)?fkbL(zI@;_@90s8ct`}CZ!?1e{phRgvdF{9Uz|k*U|g;Mv#JEt$?X(`+j6$>Iu5*uDU~H zM4Z_GNpbdLPVmBqBP#;b`CsMq-RX3bg2s{byk63j1 z@d%3n-DCh|snfiU^)DqxuM@z3OmWV|)eG6QqHXBM3f=Rlo4rc%Dki2q<6TTz z4K`e}sOVI~n?mjY}es zuqhaUA50wXLWsm@D4}wy#ZDQOQ`nY4AUU;Sf zp=C&6>W#{vkbu(O1FDRm{wNA8kcXQSf>u4xPelbP(k#9`%m=XUPF{eO^-cO^+5X^B zh=vcHj1=_<3qadTd+G*ZIaq6-Q}8BY5bO32D(2Xnsy1XKY*ln!Bn5z~;ecu-a>^_x zA3x2MXJWMDDTieYrX-@o5M(~YGc6+`&P1JeyG{gXGz~I9&5>u=!YU)?bnakXlDram z23F_=l~X;ysLGf_aqBTghwi)C%%&MC5Si#jXpoWgcs-#QUQ!Yfax9XN?AIa^dh65*QrWMQ<@hOhsz`1`bwiIfqxm8)O$xcv zk$-U3I8uwjj_$`b-Ty;Hmw>vcDf1@QnQpE<1C@&=(DRSw2WCf{bQ-IOCR-XJS^M(* z_T^f#W;~`ljzL~pR=Keas3(E%Fe=MZr&lU7%r6+n5OUK((QCGs&yw=XZS z35(x;V_!Wa#UZvdY=s$sY1LViiO70jY_twaK)mK+Fzaj-g|oR7e64TzUrJrazn;E( z`ED4C>IQq|ihx<@CacR^>8vaLxOq@mUiIkZ;fs?57|dP=OAdwOT=*9gP@jj*M&Q>L z=CN5g!KJkbQ7(oc7BOy}u909$htLt8!P3DA#UxsEp!5`}0OJr}<6GR2Iy{VO8V%Q2&t-Ci$-In3?Rdj!woObXUMV%zN$RYjRZkK zBg*@&Xi-fJy+mRZuSX)@h~Cvi?NuE$!ir;!m=8_)njn%I;YlAX8@?*4nT0d)ZAv_v zTcGeIVJ8nFSsc*7fOb7|aG5Z22yAJ;-i{xqj}l`;b~;AnCqlr7tSAaHM~Wi18Oy)aaWULWt|x4A zZpe~`AXif7t)MBsu@*`#lX@SjX35S-`pPzEkDyN&+YfLu=uXuq**f8k8_~=phSmg~ zh8M&3VJ`LR&|HAfP)I0*o=D%j0;m|=x)jt@*Qye@%(-~s`ykeFR=+E14@kAJJxR*n zew%}K7Av9Z+!r&{Z_5ouMU8Na?jKtf!^J|G!KY)(b(_RWcW#k;*_5C0vFqWuR`X$- z4rRqs2lXai=^sB9t#GQAWSO{T1u`wFLihhU942MzrWm3j21`;ies|LPVd;cnN;f8a z{7@*2?@mTkDD~a~t(jyKceOfLEE91Vj1o!I0X+`C<#;ttFVsPHb#8(39E?II07VOj zP;AriD=c356}cUKHBW36CQ=oZlD*D}KAp8VmK%r&ii#_v=l|K})wx-D*t|0D`uPM? z$EhZM)5KUJq(VYRN!$H%)iP@`k*}!P$;8*@$ZRRi2sdsp*c6y&9$w@eWl$9gM92 zk=_H4#-?usZgA}Nq33~NDmUZoxZm7q-05^GHSlp$rN&yGaNVFaOk&&(!*jF9?iSOx zEvB$(F;2<*m9png@ax|=7v{g?Coli!v2%f;I&U8$0cdgl&tA9JA27B9pI)ci>2=_3 zx6|pe2k717XVpjM|75Li*tI(!qOm-4J}rO-B5TaxzcBI_`+XK(y3^>!okW-W{UM&3 zJ|+x(Oc?r@F!WzOVd(wxg=Ug`-skhhl6>mIjRn3oF_wmxAhiFj-H;_l9tSVv7lJUx&_m~w8`U~nBJYh$SC@3= z|5P@BYzjrSl!rWPlN(|p#04gd^MfXP=V9K|VdenhX`RiYI(xbge?ewGtFsIE`3!zu zz|Vd73;%ciUT0sy->2}}bEt9A7_msbabW*4YZQ{=hHfZQ#a-^|*%dhiDIS_`xy`IG zWy2~P%N`@J70I?)+`Ys z6;%-S;rKNUtd)A>2Z@}xmZvRZ*~CrQ>w_;+O$2wdV^cqZ_S5@$6O5=Zp~swYyFPD$E|P$6k;lWx61g=aA`e*l81v z{e43m?3juuknV*FOiVEiQ-{M#9I0Adr!JNa4>5tUg5*$UA_{On&tH-kWAtJjPlBT~ z&4)w7LF?Td2dXNYH>--B8-6{B@FsUF10o$ZR=eYqI8xXM4%8eTBFAJ})G2h1$p6IE zmG$>J)t|@prOQJY@q6&1TSd(wN)5o){(gqwRLAk`y%yivYoc+hTGY_GX5q%u|Fm_d z9)%oT;8a|XT*D)RlC=Vgb>-9@2BFTahriA>A65m+xc(TbAytbQ3rU(rTRI|av4B9U zjV?`|%n5#A2z{0BcqviN@Q`&;J{2)G)s?xq*^)c-&o>~;-{kG3C1_p-f`*@uhqhnbjbePU;Uy+9YN_uW79Lv&%2J}GQ z&wvtxz{bE}M1+-<0kH|z8sb8>dw&U`$TXMh(*($%U(%Yx$TU{Yfh;A$f&!egs;V%u zOzwF4$7};4KY0Ogazqg|&aEQq%!o?1nL^JZ%?^p6;rt7TWb{@X;Ag_ax0|a1HN8AK zK0G*mcl_7U$>IAK$1mWk!DuQ066Y&tsEYcLK&JqP@u_Zgq8pv$HI%T6C@v%{8S)C@ zryK?9A2K;$U2_-Z$J|xL|3Y^t$uCKH>6+ReMbr%;$DUE;U8!eez8~KzQOB&n?C4j=HW^=0sM%=wIbyr2S?Uv zwqrcwP#OkoyO|C4^$MjJs8{aO491pUL49-#5=BPhyscK*yhe|vUnQK*`Dgrn;bd*5 z@7Z_QJe2Q#?+@yJm%1Mh#$5)%Y$hfai@!*&mGtRGQRHst)55Vqho=*gz=ijmS$X=k(fw*MIHW}0%&%|?QPeY;`fo}q&Ew(U8V^7m!52~5iE#_ygC z2w&#GDa=@urHHparDGSa8%TQkZaBSGI0B}oMRe|hnDL1c_NC=rh|pA;yu-lrhA8xU zk(uvZM9!xuKDwC1!Shiok+&R1lTK=YY&xCWoY1m*Ko%@!W@~CQVE`mQT&J8{u7@}M z=tnUu+Sj<*W7@>~IS^z{Xoze_WAv%J^Hm!TzCHQ&Ta(FfJ~n8ioQbTK{;b%dNI;u& z8Qg`cRplAOUgH+_ ze5+ub^1QEm+-2{J;kC9q!=BYnIu3^x4g&<1s$TZgk7$6q71MgxBa>nJ%oWFye>L zEH1t}TcO_Jr?~$KfH)I*k>L^`%QBq%b#J9kOt_Tqo)Vvm;CQ@Y@`Ehdb=fPK0UUk2 z7c8*nkQUMT%*;A;^DQnhh@=mJQ1rfI?+fM*xGn!4j+?!PoV7 z1^jm{tX765hsMZVd;|<4nq#~n*O{0d$1f*59s-Z${ny64F{!RXTHn>@l@WXX*MIaKYqrd0tD?8St1t*zSfd$A z_&|@;*x{i`=JYJ@wusLhZ_;%1Bq|2h4JRsoIu^e!x-ya@-QebPrhB1BhsG73eE+|> zA2|=<{kPKpZ@WF%W>BWr8w_^3-8Q`K4Eh6h|ArqwD?g9^e=G5N^#6PG|9kZR``7mW zlfsUB|LqCyKlp!-bq2%1_ORV%wll*FBlq|ITkRbv(JAFUX!Z_75aoRX<+U>Gkz9}G zkSgaS7*Iova;{6J}Tm%-K|CM&Be4#k$2U)pcRi=!rWb8kcw=kdrD8 z1!P_n06sQayt#A&XTw5I9VjfN6iAU+ZV2fE5b=CmG{eZJg2AqY$~ckT+)Ddz)iZ>- zrW5O(XmPb4Yj7V&RvK*XH>$=p9xE~S{G50hzyOPBuyDJqhH?W#@jwT~=*cmKxuR{N z@`o$%Ky@hiQ918ZD$DpB#3=z_*M=6zD_v1}OT~Vui~El#x=N@Ky}5J&W6Gc^h?%+& zn;xP2OArdz;SEhQ;&~cE2h;Cq>eAHTTE!9ofpxe6d3Ka{t%mX|Sb+7 zC+f^-die#?zi8;+(~EqCceuC-5GE+8kC;$Me+P>C7|kXh$jx*|g)32XbR#h+(B35SXZ{W5 zH6rq@>+8vsR|A23wJ!vK$tp-#IK@!Tuue8!MuGAmot}UPT==+LbbTVbBuK%?Jbs=U zU2}=-#F)zA^2%?4CtEfqYmU1szZqDN#=s;GGDgr}gX`#{DL82H7^d@FvrLhy;ruFX zWtCe(F~0m!Os1|b9?aiGTjOWqCWm(ZV$IV6#V52VPQV<5|DopBndrLCU}DGNY(?}Y zj%$`xHb6JNwr1``9=!uQK*NA=xme7|>`@zZeT)11s-9(4KhiP;WBR>!d}TGJHx^gm zzKqs%LcFe3hW=g z>@%DKmyBvZ&3<(E`xq6Yl!Y~x0+Z0PazJgZRH|~)U!}CRe^O<0bLokjrL04WiaT~z zm8HxPg%UtoHO-zkt`|QOf&b9-w>T)Do}?^&4uSC-G7s~Ns^h~7QcGbu7B%|?bel99 z&3MR+h0AC;IZ95^K9@VdX}w!xpQ|6s(4x=Tihe->FYn9@B3`{(D?)`9prY|C5u+mV z)wNe*5XDhei5mni!t@ISbswi+Ajk;5L;adqZ$2+A5x*-oJHaKBN~IJ0IKZ50)xQb5 z!Q>S}Ms5H+U)u4fH>KMB?D^K$Uz=a-?{~hdeiz@d?gKRs)0_sAgUaMa0x!|S79gO_ z6Yw;Jkv1;Im=`fjQ*6Nu$&PP929LDM&g5xuXkF7YEmFsDC``70JWt<^ zuK1)v-^vCKfFF#3I5OdQQ<@TCxrUa+%Ns{!Dm-uFSc>VwIa!xpQJN)QT^r6?-Z;~P zt;$;LL0kIC0jh1z!wW^yOoYocsP|Y-YGmp({dwOSRh;;N|U}NEx zyU?rvk*j;vC}p%-cH5NrB@%lZV<02yMFFRH1oTuLL}#Q0Y!EPvj)idr&K6jrLMlvo zb_@;C`cFy7K4A)%TUU2CZeP7>D`OkTW}=r|{}!(dw1Js@a(u z@oKh>m>Kavh!w^f6_s+>28A7zZ=5*CniNb!elY&4i!_yp@VT7ewup%0H|imvle@zc z@~&`$XV%%OZ+#{&PGS?))k1sSsQGu=_QlqH2JK0Exz1fYH`2r0L}v9xz1PQJQv??& zA9`ey4@>H7g*Y$_6XnCjoUD`;KsC8lUVpC`YO^U!pED_yag|o0?A0^FW>$6p&y)fl zt(-w44w@C-YQvZa2%(93Z#hryqi!y7cTn5Jq&52tK@$3tMW)k;8~LY`!FjFP`rD`Z zELhkh-l#~sd;V*$`+1Xgu>jJ@Vu1!CO5_|*dQNy^f?;4P{uR#D(gQ(%RU>dY?)Xr$ zDE7KO)P+Gv^kJWXAVPy*YBx9VMox5O7=KK)o+%yk;iB0$p~I<*PACYm0=!lS37}lQ zk^r9EjVy`AXlfbEUf==;Bb#Gql1G$At`+cz3;fAe(Pk7IG%>A5NBV!wPoDq(8y9)& z@8SQ?wzqq2^#AW}_d4BPZ$SS4y+{B5-{m9y{~z7?AKm#M-TD6=-1%S3oKG+mu*G}h z1pi=9E%-f$Z>8M&|0&%0W7$RS`~%_5-)nVtS*JVf_J)HUHvh%w$zRFww@yWtMc|T z<5jJC$|Cu5;}BGdeHB-Ep|Y9!-}sSqNpaxK5#yA#M(up8n(< zte@RS9(Up0K}Fom;6Y`xvh^f3K#i{(zh1-UP&#!M-;@E~mEs%l7*g&rT3p0@2R6rh z-mi6v9}cG$F`C$lqf%!@x2Gwr0A?;a@XmxsZ0Dy9j<^N#=o$#`c2Y1E50js77^jCz zkzBrBCkJ$g?!g?@OoITv`|ADc3puPVCWA#8gfA(-2fA(})eYP;Aga_7-fN zwLP$uT_XUW*Z~)Bd9|(4&$xUjwFFQSXbyM{4(coDM-E>_awCJQWg735*mK-Bb9K9L z-_(jX*&@S96_6Fzr}TKX;1{ZhE!y5-80)F~N!y((>p!7yXq5rixna{j_GdgmlI}KD z^)L?KEc1MwU1f6brH_BDXs@Mv!AhJj9H@F-tDYVnzo~9v_iMKQX^U-+4&VNS!%YSN zbSN?>F4k{$nw^ANDzT9%>Z=PsbU%&U(2627h(nJJ{ZXxxQCp#-;`R-hsDm6WaQIG~ z-wRrtbNYc|8Wvl)i`bAwyM4r-85$rX3k=N!Y{i3JKSt0aY9%g@(edio9mRiFTpZUv zVLQKFN8N7wH=vm1r!BfMrq+#D#$2<<_h+0m&J$)OHvbf3FS-+MdZI zMTaE_>U=*1OM{e!5|3B1Th|e&gb&gYb7$(T4gbGum$Kb5!b_*h#BRPj8U1|p_T{^u zPjYC(noQV>wtynmIXyC(CS#LU$y< zAEkxT9qF(b4M~q;*)^q)0B}`VqnXT%ldd7MML1SetLy`6@O$QXva((~cTiE|dg)p- z{{n=85Awdw&QMJ{hrc3w%XxZ`wL03FAFqyQepp{qmMC*MLDC*(quDqilt`;s_(|p& z70qM~5vQodP0@gj&Jtns6Gkxlc%B%f^RmWgVFFwtTL*t;7Jni~9(9ptGckxW(Ooq1 zQeDq0%+(eGyN~HL!VuGe7!%ImC%g?KXI`s@piHrbV_*8F)MQ!ftqharoiwGD61lAi z?L0IDxHDPq+yp2Wi=nCXCaK;qg}~v$8cb)MjEwUvfW`fkU+;<#Eo>^U4FxYf?qdELc$zBe}y2z+jG*p6-(1lVkk2y&Z2a$z0 zWod2MRBxTIx<1?1z|v90t%Ko{yldEc=CN-4pfR*-Q+yORa<4VsRlP+I3q%I~@N~(Y zs-dRmTv(}^RM_*W;&h6C+Ir2r^{B0=#40Jx-c~Oo zpFU(3kya#gK(YSXiJ`5p?yQ4}^vA1`xB7^?6_~`nDu@SzVU#E&{9Go^Cmy-j_Ginv zm#uo~UR-ACCaVViO}3r~07I&!yX^9{sydkP+{~Rw>gKV3Q{y;-esl&+iYbL3@Hl6F zRn1LRbyHPMs8E?&SP}pIqM6{8_8=%O*TI6K=6%C?7f~Bac-fDvrUmIR{SV3Q2$oCMl;PHHI)uM=&?$G_bLz9D}6jFr+DSZ71JBL2gKRIjC?` z=%sMO#ZO$NtZzd03DqaxEkP#={nCzFIyTusGx*2dKo6fMxJ1mnI7#ImsF{i*i@7Ok zbTgWxQa~{zM)su@gf*Sc>#UQ)8CVkC+vC-Y`>D?6mQ9y6H^2}58#-Q}TTz&7L=L3N zbUt64b=o|1tN0G8%5(m`2hYFN7p@u{4(6F!-{y>(YVGs#xkq~m8J%VY*h+F(1wYSm zUdwX*40AEG42s3g2(4tyZonkixDT*kiplqv4ql4#5~ACw5{iZLLh5I#m|`ueHB+%{ zm<5v@CYM6lu@!<11P2%SX}P7nz~}48AX#;N8I;?oatYRZoe5zg*gW^v&U13i9P7yP zdCH@R?h=nM?F=*Ssa!4010sE^DG^{6HF`{}f>?(J#l+aMa&(iZ-Yh+hC=e&h-P@`n zF-lpPo9txrm$tyTo4h&Lu$VDkBs(gYIE=JXLl`Q0=}`2tYC8Ekt}^i|6H>;SsFx{( zG;D>;)oYtwT@x7omcgSOj=vQlncRgKaQrq^JC^mFs8G%u1-1^SNkUQ{LslDjeRKmd zKuJ#7&#lx$Kyr&UGBU~lKZ9tVAkgZqSi<~7T`O){efdhKwxZ1|C+0e;B(0mQVAR4z zD-LhgEDb94DwRY7uH-_l+PV&KL`EtG#^N*`T*iSoHhO~c;kCu^+S>5Sfwj#nDS^P* zrmZqh!_>M!gRR=f;Jc6BZyy7GEz3vW&dVXLs}MTWE#!{83x!&13KJehWP!26^fz@0 zs}9WJj*4xruKJ)uDbG9dN3HNokx&T)DnUGk_{)q0B7nDY2CjSW&Y8D&cD@87gscd3 zm2n&`dF})kjQFdfl} zi8dEh#dIn;+YIuG&-7grR4rI^PXhEstb;^t6HMf%EP{o7Bb2!1!B4)t@{Wi*+7LQ7J-KRieLi$-o!93{TPv&Xk~5fImHUU)slCZ}C8*A8 ztMm-j)ekB3hTgbLy-{6zOC{4#cr!9=l)&(Ovgnte>Uy5r9g|U3GRGRM8H?lPm$;rb zd6b!4*zS+0SsBx?a!*@-QkUtv_qNA>bElDmr&R4{4&%`chf!l|E*(aVEm}Ojt$Hyu z)EG8!@C6llx3%kIcW!Ivhvz1{KXzuW{R|$zB#@=$`qjd?S%t;+RUKT}PFil%>{9~F zaSKtQ9Rs%o?z3d-#?YSuzOa#p69|OcA7rCbev|6V`JfdmkFo3U!gAd>x+@tK{A-{Dk{nP(_nSIx4za}|1N-Q;`B^J4kdF<5xSvIX|!66lr25VZYN|G*3dAH zg7Yw=rIpTr$xc^9Ni4)lv>FG|$t)fXkq-GHjDmlPa!oBz1fwLlhDXCyH30Cw`lBpf z3J*1k%!6X5P$(1bUY!S5c*_q|cNHecN%9EnL8c=3-w>8<20-$390lWujc1rcq!g_v zf{t=Vrq~iBeaWNK*$9L@fQ|WeLI6UYz_GFwvV00%kCN%=dYRQ2O7O^`AUh1KyHN@m z22Zgw_b`AP`-ojmXAF6x_<|x&UZ!lZhoh_T8W>py#tdBwo=V)?#2xPn#axAGjr)+^`*?4fK+U>&_Wj|b-h859+fV`vBv#NdF-VBSfFuMO1- zpbhFwqrrI+GqePV5;n4UJV`T%b$6wK0e(ygcVN~TdeDGU9~2sMhz_Wk%W*QN?A$iQ zfet8RPsFJ1I+(^|nt3sNSrfWPMFmn{g~&51BM#ZoYqdF8C~nW&a026%=!7wFoD(^- zo?IiAhtVlJ^@u>EqCST2!IQH6K?L#1;!ByXNRQ&v7X;8BhZEiYutpapLdDv z?miXHYT1{Is=_TIVL(fW%x5;Dis`6E2t63rt&Hr zT`0%{#8_W6-)b&}od-)N;5WT=V&$MaX+LY)mxn@S;^Ga$eA7{+BWAf~YAU1hvEC^T z2K^o+mTH@9!7b8dRKgMtumDn%&J3<=vI3hAP1c^kI6f9g0G7GxkV7yOM|IlV}j1#t~-+0t_n&M=ieTb^;+Ov2&AP zi6P^X;|cI5bryuZzbS#>k&_WH3NM56XdHo*#A+*kpNr$E5GD=Qs05b|6E6nQWGZ$} z*x2%*g**hWlAsObhhZXW&mdPqK45&CBDZTn@T&GcZR@&1@l|YBB&1E@D2K8)be*I0 z_8F%&*{WB?#Bmx!)yY}aQ1pgpAN(M~?P*%PwlJWtT7&8^?Zu=+(x z+~*n;w$E@nfP&luJ?qFLFDz|5@tPX|?q4g;6L6edrWesrXgc@@a#@gj7!olw$oDDI zCl|I?;0F^rx2C)xj$D92;d&t{3$`Di{DGFw*asoZ&QPbj!OuWq;mNZ{PMsX`(Nvro zQa0F_9on#M&te_N5CH`>Dq_Qfp{l$p1=M%oKpK*oz}-H2b^{>`MCRTzCc^gf6 z7vQQ>4V#}$)MZ0y@#vzQ8D!(>hD%I!(RVEi`7 zk(dIWfQ=6iG=kx994Cx0GQ6q5dvc8w;P;#Kir)kiHJZSqyvNHeR;gsCY0`jAX&AF3GwDgik&1&ni>4f4-fH7ML?B2sSNCdyLCb}y zFTay(P3zOjBi;=oH7j@Ufb~uYOM>WA2te9h-^dlN!T^%DwYB(`e8=R&;2UNpnx=pl z0;TL}5ka=CtcLUrN7xSNu1&vXlc@+#8RXHmP>jQXLGy6WI>gF&=BJp_6-U>z3vmN) zR%8$<3vatCBJU(B(C}Vfo#y4J@c3=wMb4W+EC*3ONnuZw_Wpo}5{ za7cn^ehi|9LkK#|z8+4)=?tg^lC4r})Yksnw;Ov~{np|8&CTt@!_Tibc6Q$%Y=3^Y zad5P=vD>yWA)kkRUWD}{Ombx&l0@8mBF|@V^$@_0KJ~(ZYj3>smI*YGF|%3V#xP)z zfTQw)XraZ1Hh=gxJ0r)#kO$6acZ*75d) zJxLn8IeNPbniHY{$$Xdj1FU=TsY@wZq7)V2*#un z(!Hp4xV696JPP*TAH92j6m0DMdh}*z@5lRmQ~}ywqX`mEy~CDv6b|j`?+>@J`}dJf zu@cNFKlF?HB*HhSjZWAYgCD0C93?2GCNjU{G6wXL2w($Yf*N!p0iT15D4LM{3k`gl zay~EuIT6}+^=|u@9X85?U~6aley~AiM_{8hiP-jmC;@}0*U&i%)=fZ#C^Ad~%B-1% zaUM~2igt$vL-VCdQcbQ((aU!|nW0Tv8j0S*s}^sHr`!#Uty#|yY@`9P^@!qbKu=&xucWq+CZdkAKX@f(34dA|LV-e+ zb;6fsSkwB|kr4}8H8WXj7M;bAC0K2<75cksk?>fI!J*Mp5n1K}Wk1j?DH&!J57@;*nS~oTyY(zn;*b6D5Wf> z-nsHyYn@bggWju_2Z5tWCp*zi5@iCt^6PG6k(aN-2d-{FiFp>F65NX`ppL9hn5{aE zl({BVwo*AAxx&LHPH}NIb}_**Pc$#5LY#BVnJ{@dA49Om`8YqU=|^Ey0GWy2OW3nT z2ptcDu9*A6m_;riIf3CDGRjLCV+GCK3I&BJh2dWP|w&&ORG9(5}BnKN2u~TyxTZ>(?8s1 z=kJZ9{R2=a#eKFxx0-@CKzYMpRvAqLoy-v%I3c0-~B6=d+`iaoD{gR(Qkuz*?_VE zgSK{*rWY_9fNFj+7qy`vY(8|=AatB~*C2Nw&lHp0n(phs2$t;BS|Sl%2YUn?A=m2( z80I4zW=Ayei{i2X9gjJ|rAb6)ykIHUal?UzxVMMYv!EF}SCpos3VJmhH^3jKg@}=; zY{O;^=+rE}?XeJoJAq8!h_=XTUPvv?r^bg7sGv%rW<@v%fg2ne&h`7RcXqe?{dVAU z{NP-tIOu|LI;@8osunuNN(xYc5RYbA!F+LkO+q zQ}>MLy}K(y=T?_X@o!K#Xu*FQ#+Vyjs~fA>6U)PepD-GL_7y5=MN_Lf3@}z~-_910 zRDNieSB%Fr6i*VYy0z;mNE~?7&J=z?u!;(HcUgaDSi;Xs6@5=_X_h{ z3Pwl~oKX@v7^^{T|=eN7sy*OyKw$$s3QnBds4qZE>HVE=C!wv2RN6qg@=sJvhWLqf(ljYgNZV^vMRll|`pa zI%PX(o937IfG5YZAP^k{OQSS7;{Xf@@ZJf)CaAj3W|g#~;aI;WQ$vJbvb%qU<$n8j zRAx}Y+q`)a3enoTsPmc!w^rvw8S|t~Q}x=?;)r?}ofcG-%y%m8lnbkC&wHV4Q?oD~ z6X$o;@~zOgK2|AYI4HRuRoNodyi`?hyRuuUp3yhaXyTd5bM}dJAahv-I3|#M`fvaO z=&eig3e=3J~r@kb#hfyfM z^>4fD-F5OOS)+JbclI>Z>-BnJ z5{|Baj}DQ?Y{G4A8;wQD3cb~oR@eJ`l;66)v-i`+?#>p2-J}HWqG(?)`)*_N?;AgE z_xCp5Zuj3EZ2t(BCdV7g|1Vtr{o^tFhyA&_{9XU!H%$#hC4`lKz)fIzOK=OZw9;%7 z9+AWGyRHy8Q7>3y{qC;fKL?xiV;EhE|E{e+T7UGI{)g{EDsn>qnT*!TNBq?eD8bZ$m3VfL@ev5DO&y^2;ww@XP3OYZ7Ir zuz~cJ+oer!?f<;DyT7rewcV|;%>l_uLRhRsfs(OEPCPXYEf+{16d3+CvJs@cbydVeMtXROKS6EqBb zko}vb@M<(1#V72)*_8g9=IkG~`{vmtbT^#DrClUb8^%f(>ZYu%clA7kE=0dU=b*cY zw=?+b4E{<0c|kLYiv2=%JSRP&VM>9L2t|Z0uuFmIN(b<7Nb{M&57I-p$O*6gNxwhe z9BKexK%l=>9g}!IS;lP(5CA?7%XC|YKS|D{R78ayHF%8G#=QOE^@@E#+ytD8f+pF( zu|I?w0RN6cb}WwIPbVEM+$%zSpDnT6!cYbnphTq5yELB~zuD(mViz#qup$@{SbkQ& z*e60b9~6Ez->@QiG@VW4XZppr3eW`z6l_{yVh1E_2>dYwO)(xH88PVYiQuNnqx~Yv z*n(nA9YeKfQHIfOWEkh*HWX(3tihxm*3KkNP{S@vOY#X^p4*O06km7@{&|_Q2BA>D zOjzGIdT>OEv1SvO3k(QO^MsZK<~z8+D7yUqwG*5%sV}Ff$2lnD*~eer?&4)Tcq8c% zSb3#BL2<-|l^!wb#ttGBGo%4XUflr63-yS?GtNvYzcoYv=VSJc9}`o{>ekX>bZ;vr8upF~_h~8BN<}tCdlT5gyO9 z_8JXDbS#b=NYCYN16d=D~_%j#MnHGQ41n!zhO+ zhgT`1lHm-sA~3Z7UVHrX@nfyzk`%_(u$6$WBS@8d;8c#Af_)+OoiIAYJ9O3XK&&tb4=6E8AwPOtRX>gSR6co zDK0g5t|%MUkjYIEn~6}fJ-!Z-2nGz3L3~S}i7K>%!Kc;$1vYS^+HL2$fTyiB7YaXU z)oD)zF%H=8*E>Pu8;%y}GIrkK0b*iOtX`0cv4JWsi=u_YneOZiFh(MW2dfa{0Qx+F z({%ul0{XMH3Yxm#W^pv_1n2SDImMk%(l}=WZ@VXFX`G+Idl3YH5y@2+lOCGOK)1Up zFby4cxPy(?&qk;3aW7wR1bCv13a>n>GmG7JoZ>4@eX%!A4(tGgVqwq#03VXZg1mNo z0o(%DWl>@zdIScTxtOkEwxug^X*!+&O>4&UTXI$M>@RHfQ>lt{2S3Bn3M%Bd5|k0W z?k7?XVudvXYkSc9a1|%R^eX=VLu&Krxhe#>hXVPiQ)!i}p^{Q?^ZM}$$`_JBWWP?MYIx$?L$WmPnNpUYgIDzol zg;=qL_0EXkplX{dj8x`H#1Hj-=DhCT;Myb|j6%4jn?M9(IPIH0OR0$6;j{nYP!5DS zTfyzgav3l3y;>wy9Ml7LIP`2mcxr_2E==jD>d%rL&@sAD^gfC46KWUaGHHEZ@Yk}; z1g9BZS@YkB-SaRPnB+heKCN{)-vK~&ADVTX0C)xmPW z_96NB4LBt?VdVkvXF6O=>%wGuCiF}|F~F~xPZ(EC5@<;fL7e5&0NPYd5(4@ohEw!} z&L;_WpNR~?hp8?k@S;$Rdp=;X)s7BCFVFL+H=EBKNWgRmz~sU)=3Hi7)JA}}GU}S# zM3b~*7v7YO515A=@PY>IP~5eLihjfQLdU^hg#UK#t2mmj8ax3pAasL9rjAk#}ey9oZ>+>C?_OndLI3yrK8x^&Q$0Q8TTV zJ6I0Z3y>L$xzxb62oMuMSKGn&feX$t7Wo+TjP-1F)X<6wY^c)tRXj!i6IUjN0bJ#Y z3z4QP@x4%m*!nPMe0+E`Geq8(<0dEZlHB4;m$@tV2Ho9$T#>0a93YEbD9@aYEj8Er zt4&AE;`m`gi0q)6Nr?Ss7vMRZldx8Vv58b2^dR=t7zobY=St~5zVTK-LClKn0CUyR zyW9>we|BOa2+Hb4;EObGP3*3Jf(zlm8hfe8aX=mnoD934#v{oT<%IJWA6-Ek;2{Q6 zXGR(LJ|j;#E4&Y!sVLm($SA@UPzL9WNe-j4nBgM(LT4!#kK7JVgeK zaOFl0y=s0$XYv)NzqmF$*3Uj>b0l@P1*2};wsdmBaKOzP01+iZis}U~Z}h^3vuJ<7 z#HL;^prp|Ss#>RE$7~TTz#YLCCI%Y;G@X6~@Z0F7Lx2+?2XMY^*<|Ad36JvBwrb(= z)}f(u_pAGYt|^>hf7~5*W5)khHB`9*;NcmtZ1lPdTWp7;8e1%_0AvI1fX7($qmxPL z4{WF0sn}dML7I%NMQS9xSff03n3Wr?XbG-&>hBx5fvkQxR(mm;o(4|`rLFsR+gZg= zA9Z`9E}ym5+!%DzhKARJbQCR$CC-Bi>7E4FDP2kBK+Pe-ySn3>gNyM)q=%8+pM#SX z22)%hFf?V1C~sT6^gqWqlnrn07>f`&=)ibvly=61u_})Hpe0^?22`Wf_Hn(GbDqrruHatwlVkF9ERoF5|&tklsClr?v(;MJK7K~b8)H&~d| zZK2jFlV(cNd<~LPWowN=BPdz3l$;zZ(W_c2S?y?Cesi&2QkHsbF*3-S8_NXj~fyYbo%2n`4c+&u~CjetG9FLI=^bs=2UH3I<$hF z09O^UevZW!Y3r+NsE&|2i!?547L{T?LbmRryr&E9N639C!G9S4E7DYp;H+!MqXwT7+Iapaf z8;`^6x`wbQN|to1WXqPZYFsUGY8BU!%Id>SxxOCitt`?@h@0+5glnGYMrfhNBJj$e zuQjT&NMm?7pQ|l(oS(BPad+#VW_<+)))M@%T)7Arllm?3S-WHQkFkzeE{U%Wyg3#O z+XZgz#8Vi%lun_Q+d@EXp!Kl;p)OoP7P#D#Eox&3j*h@A8q#|iYeAq91Oi@jX;Rdc zF&JRBb`nKN0Li&I7@klh&fpR_c(z>B1un|1Zh7tqH@7``)llot-c^`^t(;FvzC~Qf zmTnszwE)kt*-pR6vZiKk8yD43>m!24s=0eqh=y((8Fk>^RHH#5(t+7Lco5v47DiV_ zR7;xkjN*%4G;`yCbW*$soI_gq6D~wauK9ZXS#|yCKl%7?C4FWUU#}^>X#09ic~{qz zrAh!zPgwU7sIKuyeMrD)Fj&wW*I{F~68wu@-wfRC&!c>6%I0nxQ*x6-9an%0 zC}D8+dpwzdcRoafgB>&kn3GvW5PRGCzB@hpT@UzS&kgrq(Nf*3K%;U1zRAS@^kFZ8w~uOoKc(^3dVS_ef0id&y&R%T^7;A76HLtyGift z@YQv@l1|K?l!eRh(`BUShBqOpO5Ep&bK#$xO*uD^M1ePgA&vxT9jY8SsicLlqLy9xzRTlQg_!=ygHSIdh>7*Z!2HqJ z2^H{_jZbJP*wOhk>Sz0uYbbs$L~*CEOU_-^4clTvp4qC;o5bOTR}NmI{E(!k zWJmrpH=D9=A;h|bBg_Tn%Di+18PU#pmt_&U#2Q(;_$W=^E-PXh76)rsQybZf_@DaD zzmZ&*Z2OKKlj5)p<5P?#H060$?DUmKaK*qQ%EDy>-wlNHUm{Kj2-r+W>XVRk1Q0`u zzoz|!I)~BuW9l1-B6aq3J2~2Gez+82akyg6IPSroB54Hr)l{+OToHmi0s~-t34XX0 zXmaUd5x6=q!eHXtqTXRV(PHpG8As+}5zULzCVLOae50v2Z&62lM`hIv+l(mzvw8!F ztKYCxTzMOG!NOAlKO_)38ks9L!xF@VH)ZZ8j$)^nix$3n&0-MFi=grRdpv;pt^gLt zZs~v*L?FWSuop2jN+llWoQXRL5FS6@cgwz!D1R+#hFWemRH6tVHN*{98mbX1e7m-g?><>nBo&yW#MA&7A zD!)bqHXSRXX`9JVzCX}L#b_@%k)oC{KMj(G8?dJ}z^c>|JQ~0(=_~$aeMLJ@`b>XX z-{JC(KI32JS6${~xCz9f5;rU_J~Y<4s~;KxJ0hiEt#!o;FY=^mzOhLHfZrg?&k&2!3erUlu~5sWud00@!%?3B{^tGj~k9qkjIQj?duR&C-CDUJ&*>d^*X_e7yH3Ku&#(Ai}Z%u2G{Eg7B2P#U$cJD=S6zKjo0h- z0t=UK`ZiqH_Nm$;y;HX2^*SiZ*XyGO9l9wim-LjIn|REG@$g*O1nn|q`=GH1SovCe zq2)1-=BZIZckXM4TEaA1Opb(_~H#8<2<_>8li z(nv|zvIxCit7%bKv@L!w+IUrnCeiRqERLSRAP-N96O8SZp1K9B6;I_lvWre=D@95x zr+SB@c)j&$JK)z7^&BqsK;wfsDBNloul8PeEl`TQV<2Z3<11GzgaI6WFlc`*TI6M+ zKMcCFaRtuXzQg)dwlHCb^hs$0RH6)i8QIk#vhukvCphJ8UqGjWU{q;RlSkKhqPsc| z-9fco-4!q-UxeC{F_xi+lNMFLh3>APjT4JDdCI#wB*Tl!X83PUOC^+1I+x{hqHfjd zt$k6x)|%Ju{DiR<&f%%k3*?n&)yt%wfT+{(82+r>#aOvHA|UdHo0d1ki$*i>TelTg zptDg(+1sdPXKr?-t65Q)H!Ob6)3gv8p>2+~ z<*?4`X$GqJBJ*T4R)3CE^T;8fVOIlqv*-b;IY2;1%ouCcSog^bwS*0KU3k>;Ep`f5 zZ>gu0d+Fl&76Ex0H5<;#?nAvTvKrnkkwNJ?=RiDeHy#7N2jBkMK0dYrRB>Cvo|_Ll z6jn;ru;SD;)Yn|$^*1}A@(Xa!CCX2{)Ld7s=A|lKNZD7b0+x2EOJ4*O>+!U0w@G?1 zvUJLW4g7_vT~M0^25DhTS3gw5Q(qiAOCg9tzHx&c%Oqp{{iLU$Qi8V@4Z4 z&)CPT3n#2dI!lI_9uD~p_v^cc#DHj28(xO-2=3Sm>NfMvTT4EtvW;3wI2U#BE7S)Z zyYQDlLB|-aFNu`n4zYMqsV>Inuxzsw-(LHA=e4CT^OIVAoSalrn6vk&>v(*}-UZqwWH8iNMc0}=#)uIt>iJIC4TokWMt3OfsIa{;IRor+uTCYZ* zSLN#(pJ<6HIY${MINte&d8^3v^o}&d(2b4+|6Fotpqm|ojA7^P z1&xBR(hcG38OD zzJSo71D`{VPM&fk&Vygsv;6k$^46ADUE)NDSF^8o$;Jp)s@G0={9yy{NvcItZsqL) z&h5%zORG8X!lQ(JuR(xI@YlLMRkjbE;~+$`!pv+i1Mv zJHlB!LAF?2Y47tWgD?Xw9#E${l9ItO<)5r2)U4Fx0^+IQ26`Xo$90uHz6P$*%xM0W zdBnLJHBBZ=wX_Na&wii&?!KFC(xp^k`PNv0u4|`?B{-CUU29=S1}DBYumd3KE&|zN zk-(JK%MmM4dns6*5=#ME37V`u)DgRvLW!!WbSV^jIwx5Uakg%Vb_M}0Jmx?>Hd;2G z0}k`1*cW}n8GyUW+vP>>4$rHp9M-y{EMierlF5j#+1B2Hjn(0UxG?TSJ1UDMqElXt zI&sQ+!lVYDnyXB;Cry+V)qO`0V*vS_NOCaUGKov)ddV3z`_*PL}jXQbcZ0h3x98M_%s5P6= zMV!w2x7SITo$oAR8x=)J`KRCp#;n%f)Ez^)-98gc)H6a{v0$1`Lsa~ovZM2~Lk=v1 z(QH^we+{0`eISsKcQAoG(DPh_rLB^}8k|q;(N@V+r9(x9tUfoa0opXHrbhXAs2<+e zdRV`MH8#1qggy_-ie$4$kKVm`=j25*9_6)JP7;*T3Tpl^yHCsFh~}^M)qGiqRonSZ$&Qvv%p@jHSumx*`=B1LN(~2!ePri$}wE z+z4ocW?$5xgG%C1~aONjum`c*?IFGd6@tFideAaCaYi31RC048ld!l$GY!S*ZwoRNEZe~-%-ts= zj3+G-Q)-gnKO-*#E8&;Lt;m!I84@_N!;V21FlhBd122?mWkUjPJ#GpLjjZ4#DHsOn zuD@c$;!4>&Xf|f_SEk`Md%Y$F1N!rDA#cHNiVkg2Dz?L~n^j69uZf0(-xV!1et<&k zn9>mR-{3|J-xEa|ixsI#f4J`W>C5$sIbN5YW%3H~bd19urFtRtOK znMRQXyYqEw8N&dMd+VvQ15^PHUKGIcRe%$NVmC!FD_a#D1K!a|1jY#yIpQholF$RJ z<{n&C$2AjZ#~2Vod8^e2pE3gA9`-r`AR>h4z4wU23(zGb{_PySTx?)lhv0iXUfyL- z&S_25dM4|8%$GT+f35z3dttvRb~d@OQGt#mZadbU0Jb>!!ZX*lI6o=FQ%TNJ5HKiO zye)|gQHxLn96>4)u7_PzP9Yt-_&0L`@0gbeNf4zX(E}kFfis&f7^&~&!cjrkSp!uS z-#EHK!<2f&-#3?h7Nn@#qo#`NjgC#dAY##pInqM{VN@?JBb~*UQG%*LS0KXj2t!sa zDLIS*-K8>vB`i1&=icy}qLK(F)R?9hQG)Tm*om`I+d$F)N(%E~t9jJl+TZMN?!SGz zy?0a$Pe|qLVx8bf{Oz~n)SB4YJK8>Yy|KAn)_^M136|ID!F~H~cN=YNqSf*36ibimJ5B!7g{euhd+ zyW6ioeaOp*c=Y6dmerOmFRwX@Xfl!$gk&d9D7Gx`w4#=UWPdBl$?d+p zn2-Wpg=Tq0r?5bILtHj?eghRSx!gEECn?zIxN9cA&C;nBdQ$tMrqlYi;1cFblIzmd z!gVgoIhVUXFdNn=t4h;Y4AY5Vi*g#rm`}yT+k*?rhWFmD>e|7lUH8tGyT9fym4cWU zl|y0#6VRjn&u?~)wh!O2&CH#M*WY_e7W2%Lz?Y+slU1n_zJecAmUr?8{c)RNc#@LQ zuo|9WX|v+a9bN^Qi6ie1c7N^fzuVp`Ho=Q*?eFex9AFt<{D%WJLx-LU&3`p}2Cx6- zn`d(3f_2{*|L~1bgS5O{a>L@}^)HP2wI<%R)07upaLSEd+vKxA$G-T$`5R2T)#P+s-_I}&`H-ad|mJlNJhJ$Id93DMQxmKX6k}BcXV3a2KdU~FvS4_02 zhF3azcnWmi+$Mr&B>F@qGYiJE9BnZ93%n%(^RXugpjkr9@Kh5tJaz3d;lVvak=qNw zJLcNiN|JRJ%gfzC-;YWv+b1E^#F-#HYg=8bngf(vw$>nZp8I76s!ns}Smpb9$1B-Q z>44Q5IW`AUk{`IVUCsu}jk@V5cuOq`u3g2d%+@L`t{nnV!vxXmVRuW6r4f*Q!nTKf zTrqHK@CCxS*+?Xq8;?dpnqx!@biD$u*-5FAFc+1)(U_B+I{P&5k{`Pi8AjVaN@wCn z>AKR@G{=aikEMq?_aHs$I{m33gZ#8{u(R>Qu1~1Fl{Pf3xL54*euoEeth>tI|HsOQ zhwT6I`%R&=DMh%UajYOrvn|vxH&y?HQ!H{dm0kktkfLZYTwUyA;W{|Eo_V z@GMDD%fiE&Ljx#qtIOehqeEu{IGFkk`LQ{ZeaJm|UjE@DladSuu6X*IF-{|p_nKxI zTTG;a_FG>iC30Ey)CXTxzWG`8_*-8kxfxm2j2i!EKaC>E``~}q(Dfe)Ng0b0qi`f{|j~~Ul`=^JGl5^?3=OZ46QWj&I+Fz&gFQ;6+xFZiw5#@L2 za5!tIZoV?4F?vmTfRCFxzi!&XnHrx7f?f*{MXOIIm{T{H(*hXHB+LnD>;^P00Fp+C zHW=D|3Sj890ApB1y0dRe3=^1H68|=n7`89A9R=yNL0XAb6gOBkXN4Mu&|=Oe(h{%f z7PN{}Cxw9;bp(1T82(V*&@f}`e{<`UkcpM=P!c;t3UIMpPP5rANwH&zI?}4?_Xo=R)6LhJH_zqPq1#~*b8A>i-SLc zjH2Rr9*W~VS1jc6fUVo)d*U&Ru*7J7u7_Zz7ij>=OFifVm4W@KhEaMkEG@L)%FC*<;SltFm#vp4}oV@EZKDYt|7J3)H#KhZ#{@2m&akSe$Z zob%}10Se36bTU&Fn`1_W5H5gMjO?~JJjOXT&lU)L z<8ZWDlBCcnjTEo-2|9Tyd~R^4n1>wPepxHL!LA3=&M9kMc2iDM#?zvQL6RoR6pNik z-YLVeqGLf;IM~qYB*d9ugzW3n9vHPEyd~&ZA7V)$JRTA)WViw|BXU}fnLL~(qib)! zBIziu*<2J;N{>Rjsjo zBRLHj9-+rPI>piEJJ?T>h%+JfIq%>MDZ=7^E6!j&v>s4HbDrkY&LqvIohZwa6#gCO zXKmGot1O;Iq7$qS@EhZFrffas7dP&}kTGYxyfRxB6?ZVtDR6a&%kk+tU;+^%&nO9G zP^BR|udz*{Pv5x^1>Xb=#`B=d?T!fV@#)%FI_2AMur$j?8lAsC*u}x~$+s#Ii-bzC z7%cYab%s05u>X(})FcD@HbvH?fytUQ7GEvdNx6vKIU)orMCK9OiCoc3Fo3qj4C+wC zj<-SzHh=}?kh_y6-!skHGn+v0Yu|ZNjN*WEMC2bc*2E-agu)q$z_{4TrB2J&I^Jdn ze339h=^`hVIXj3-k$0Z>7#m{%U?RPY$8A;{(GE6g*eQ zMu1`~Uvh(K%h;uZZo zZo==TWqM(DQ5J>Yo}#?}vMBuaL8ZYds1W2rPZnYhm-hlw%D6nqjIRD|^>3EpmBUxe zw+7%TSqDP)?F5bY7{N~4+>kVS z`FU1L{kG;7g(ctQ-YZmtG;nXA6FS?$YG&lw23+nfZ=A7%Gx~0hgCV|MlpPcJR4o&nU!^>wmB&36Df1N0nM1v54lj;y!g;yv-|Ah!w-k;4-Gc6 zt!JN?$nLqkffDSJcpv6QOgC-LtJuG*I@?3MlDn6sbBm#}0|M#CIP0+5CZYbV$H9(~@ z=OE`qigc2qhe z#|eWB_p6{@giAosx@WUOST! zwa?dM(CBOBi>mpH7UF&o1&oE$}c+$)yjL^L}MTG#0etw(SN3ASd+4p?-Z$eur7K~Iv>RjtlJ$}b9G?dr`q6@NuuXa znR6RBNnA1RZ-|pz=a6-9Rn}F7yt1w?h&*pkT}WjOh@>>Yv>E#yhtnwu-3iZjqcwqi z5MJ6xmeo1-EVj+w@wO#*c(!ptxPsfF7Z6ph&2svs)Z(y)gzfab=LdA{bj^JgT^T=3ulNEJbXzoK7#oU*Avlju zy{$cS_KXz(_iAUBd&3dg*Lsx_LxM+T2K&>c$bk1|uGot+w~>+5I$#Y-Vp^?#5SXoT zInzGK@Lo>JW)}b8#t>mv zhfz%;C>yIu2byV{TbIQqV%@vw%QKAV(m=1sRlk>^#wXwFk`t9S#!G8t8+S4bi@ZVsKe#2j@k5|{f4T7iad9=2^ z_GlH};rFl4-9OL2XH$J|Wrh7O_-6T5o^JrwXN=;=J$ZvCHgBl=e7^mDZKjj!EIvD* z2CYFmSo`j~r_1ZBtB+Bo1%3W8OJ|cmp(=xfDlj4lre5R@NzJAnQ)swG547DU@ z$6KvmpQWeh$t)Qv&tGUjY=m4_h7IlRY;NxzZj-W+l`&xz9EGsrRho^4%UAI*TE2=- zgfH)DIvS-{Ai~YEQP0NLXJI6Hb#(3+`Sx?lG*FuU~vOh4eVEewi^8@_wS&KF&QJAqY8rB+4Sk|j& zAXTxM_#tAe7pRpw4#q<;uxU;VguM-CBQ$58iRfOVk@Seg6a76@u8N=mLG)=5O{U=P znt}Yc0%q`RSq&MzZ^($EV_Y4=T`|r825$@Q6x5=OlFK+t6AYNbW+sMpECLg-smvLB zyh7hvbgySn0BJn?Conej98Jftga@-Mo?ds5LGaubxegy{%O<3=IN<@HKJ4DZIcBmw ztHoxRy+gDf{(88%zxSGESxl%%y~v|f?7iOkQ51x75b&uKjF?lsMI!5iG@UNcj#1g7 zm`WhfN%f*FsAr3l2Vi;3mRFSZ@j@tbBkJwO;n6l5==Q-++ZCwV+J3$9e)q_#;=q~> zv&P7LuyHYoU8?CEr1DpEj}W{Q`tJ_*fBCiE@U-%du^G@@1Yx*OF4~*{WDfKhz?yD+ zfqm*Q_K<_Y9qV)-YI+ur3CkJP&mm;(gE;nc=3tK!434b6e$IEnk{){8N%F}D%xT(dTYRqI|zI%c6sbHBCv2=|?0 z-izNC=#~SBze5aho*9^-q@}<$yUh|}8m0q3F+q}t+GHdOJIF}EnS<3xc>2;S ztdp)oM(Q@%sB$-RI*Akicz@WLW7&wpj`1oubBtHP132uLZ_@?mhmtwlINF$F(nM+3 ztSLzIOq+zb$h@(kx#tZ+k@*LGw0(F~f6%hDW6&C;IR>pDE-+{qnul5k;ov;-4|{WC z^UZesajW8vf$Om57`X;hA36!1z20;@0Y==eILw$Xx1N%S48O?1R<;{Ud^yz@H=wWs zLki9u_)+jm)_m3IyG=ONc3b<0{ht|M*#G$u?7O?srwEO@sYeB*Fp>Nu%_BEbnDqO@ z{^52#q=>=}q$oIZAVtAjb5AEb%0(Fj!lq0N?rA;Pe!YEgu)Wo1>+7iINbE|kX)eH> zXSxgUwe$_efzH?g>cTy|_w1zd_j-e(qK=^m7;_9jz#2w_bTDmU2U~47ff09_PDf?j z>F8*89_|Fiz1)dl&CQ(%=A&;{SDnMi<1-8b>pAE%a7Vwst4Uw7wCk*|Ak8rZ4Px_b za^|KZ7=oAo0fgH8PZaj_e{TLK;kkB)tMhnpZss0h4-T^vn9Od_`*4=bCTAbmN6GkB zW_h+UN(bR+g^hj%(c{I>MRe`mNTHX1-~P4sPO6pnAWA};6ITMNjuf|srhH3<^hAPI zNEND?24ik3im#T65VA_QhXQ6NxQL<&hT?-f&Ov$#FmS?9yPo3|F7uO52UUOK7sO8E ziaiW}_i*JNHK{9Lc?u*7vGy9ao#sEm-v zu=yn^gl$A0NmFcj*Tgz#!idKZC?ia!_k&ruid zjE+mA!uA-9Q_m;F;K*)7|k{ns_Kvz zO|y-!PSEXk+eLaamt2wVBzJ@rb|CW{ z+~jSbv5&&2q2$)^YV2ENDTDlg25YGdjd?MZ&UV3cK!x;hw~)z%GOX}!Sd|#h98Wm# zl456Y=}o1q;aVkiiqdq&w=wu~wXzQxS{OTwD%-=5bZ{{X_dv)egx9}jT4)c;z!QSR zKv2OUVk_7f4znUI7Qz}MD2x}h%cK*`q@nQ1_2V^=DFdv|i%+gt_90URZl!$%NRjWQ zhHGpkm3cd;q0B@>37v7h_FdwIYenng1*i#)2&6`O9t6F4r|R7(h`?^;Yr3mA!X~C$7P%izjw+8O)}1+dSV=(`()?F>!VBol+B53fCql2vxKY zLxPI)qbF!>3@^d7W7sail+Z!nC8mTXxh|%%=nS?jjQa?B#Lb?yvbQhR-u2$Krv zIv9h~Yn-d>5x>0MJ$ScCimXap?QpDe#n+vojVrTjAPvLJEFc;%rscyH>{^?~n76^uFC)o3 z9H46|dK^>|ljv*EB0Cxdu>@DzsLSYw8(-BxgDiR{i10x#AVU(ZXha-~Wgo6X?OA=0J3{B%`a2_Uc zKITfHI%}71)XG+%Sa-4+NHuxmEt=og-I+d(-@4s43U$mVjJ#olh^+NpmY!wd_*SrU z5nac1B$%5Ba)bufl29Y^tHMN>fY%%U-x+|N!tz^m)b)-_i<1RiFn$@z0L*OFI3?9W zki5GnW^>f;6wyu-i?!33wQ~SH`=KIT-@%z z*?+s;Y%8E$fSL_#nD>f*X+zfVy2zl-X{j@8R%5P_&)-59uGeZ{fs>4RDGm%TZyCw0 z_&r@Q+$c(kB4-l@I~B9!E6VRlv9LBUlNhzhe((TSW}mK(%LtUW1M8R85NI*<3clzN z27>MO%BX|4IF7QjNN-ZB)1ibl?A3p>Vy<8~CH0>G}wSo4xAShK6{@*A6(s8S*hb}N1X+W(? z>h?yus;cM=1ya41OrHP1!mu`8bEq0GnXiN1Rz7zarXW@EMBUuq zRFV*PVO1GP3pP@4T{4XGL6{BskvfYeqi`U+=~W9_DrY_U@O;YxAa#I5_TKOAB88_a z=BLm)btEfTrke_p3k7YoKxxeFySTj;wk!i+a`iyn?itu%-DL9@Wm6hAlgcG`;>Kjq zXSu(4)-ptH3XTrmZ$osud`4?i=2I;sPOY<;tp#dtynHc&Pj-hJ-oe_$9#_VGB57fX z(_MMsIXy)O&j78P6{1~K@K1u(^yjSM9e%-cpcb;?@x(!n{yA4Y&+MXNJ_+n>u@8_p zfEu*I+`(k@dT~y}apzQ#X*<|QXVbh%Fc%+2JIQ1=Eu@QaiVJ)=7&gd&T|YXMEejFT zI!-Scfw66;jF-HHs<|R^Wn)ORW3rU3lv};!T9`66D7KKo+@i&f@P&`37zC0Btw5F% zXtAe?EULhp$~jDdt+-3$TGW>N)p>;RCs|EE6s4AtodJZ%1ux9{U?mrpy3v;^9-=W1 z0pLsW5P?XGi4Btr8O`*;!uo@7+x(RV; zw0CSHD#Y@$6$9M-DrXeSt*n=P8IvHLtYR0=p>zmLaarlTwipP5S{0oV$}AL}(hO_q zRM!13W9A|OpalDUIrr+>Oj@vJ%7VK;n>vL(wz^dwtmO%~62=*2EF{I2$;a=%63$@b zi!BJ%!RpU}WtBUU>p`SZRxfA-U4Ppq#vx$DsiakknGf%fl;JX80I1!uB;{%Q_~K`L z2SEUAK$E}RcTc-WgiWbFX~8tE8aA>V*{=OvFmxW)q70~|<`S8ZHLn;upag@S{)q&0 zkPiC4b(PF&_qz`XpqeqJI2^^lN6!6PC2+*##xh^s?F^^KQzw^>VUD=74uJ>fe<7s= z*D65cIS+%K!LeT7-;@IABr!`UtIyyH0wp9^x*&`ZSo05~jvs)x^^B88+cUDE; zIU`)ife73bY1oo)m$E5c2KC3`Sv=_fHcOf4)X!$gG-muoE1CPstm@#j^`zxv#ctGr z#k%9jn zbhA*7cbrn2Ykcix;7u{UL`#pcQk{f@lW-`+RN5>W&%lw{(I$@~4NIa@LMp5qYQ61( zEzdZ`PZ~%P(_9d}@SIrS6H*9VEo*zkIM%svh-%Lq?+GBQ#uXe_(2+3@z-p@7RY5hJ zz3{V@CCa)h1UNz2{}e>#k=%+WTkrnD*a*xyO2;T|wT*q{Ven%#%~jx5X|68ZwKYu< zMrWkM4%Oul%w2^^Q#Vnh-&>t7`s`Pan*OPO!vZ0eg$kZPV7Vj=KANyQ0JjVgD+y%o1pTm zcuHqm_R-Y?Mx9p{HE7d|>DZ!cye(qX0H(%M7YI0r|_z-d>bjN-5%&ak4* zUKyj5x9ZeKK8Y>un}dVGbHZlwqKdhy-k>3Ey`H3l=`b4HRu@W=1k@4Pb%mjat87KY zRhR@&##h4ADH@cMCou~024nf_ENuC;aK&w`aSt0XFy`a}b;O_weae3vBe}_%rWyHD z*EEm&^p{xE5Db*{pwuRSPSv5cj(I!?wpvn<4t|G)%q`Ct1ww3b?KYo(;9+Mf&fi?@ zV%_pA=5hQf8tM`n?+X*U@XjA{z@-qCXqFW2=xf}315TC@DN-j~sRMTF5p8|1!Veeu zJm($%;uI2K$@ShJHhLX z-NWshnYQF=fpZd>_xic^hFO)Uiyd*Ya8SJwYx=6P-I4Yp;X2hTEN&Vv+*GhKZTeMY z0gio#0E1_bYmbA_J`f#B`u||Y6=iG1vq<1_pdJXLClknt%%;L%kcH?J{j*|Blqo5I^rk`cUQEn==3dHe*19jbIh8HdKl_L1L;Hq^xklgr@-W zzJSRoP<}cl(2VHXPH67o(GXo!sXs+Ar})M}CM8zsCF~vqMT->Yl3>7J4A55O@IOXV z$(TWjWpev+=2tC;@Pc&diV40?g9g29bbd^-iTx!Tcd0aA*u6E1E1S@*bdZ-%s2S0QG<0_`wXP6rH<}zA z*`G5x;DAi6`7*QQYU~!~ijVWpnJw<^H`jzYXA6_Cl~0z; zG8CZ0pgB>j<}FQ=)y$3NhDP=0ObvNe-U6G$LAY|RiisJ;`IK_58kj3e?Z%C?uhz{G z4t+JTy)+$9%9B0czy)eNIp+RN9OWP>td-#1aCjSwo7&1L_&Zdno&{s6*xJ%9EgKvz0V_-=;O>s*6QyrsI>Ank_rqoJ27RHdx9qQKIa4fOs8&7k z?Ck#&o`B0)qnL>hvN5uAG@Nbpq;2MQ76@&b0E6l%jN`5q%jv!gE;{fsBbrtm!>c(g zkxi7a4KSngzKG(iI&A32G~Jx}sHV`%g^x)=SDjiyKrPg+ zSr6?x;S8+KTegXYJOJ0weXD30mKv_&1PWMk9z0#ENURE3woGmBV56>1EV|#7@L9-y zh{`g$P}az>VzbNRG29wUdeB{qLR`!w7OZ`aY&I+AH_o?20-o|2CI>w0qWL@olL~8b z)=`SqTcCAjO@35M#yy|cRs5xB5N}A?*_@)EEU-M)i2q8<)0Aas%8Gx@A=$`blFT;8>>B)- zuwGxrnP*zD!W~R(nUu==Q$tX#KG0)3t|PrL8lxa9NI-(ewRrFb_@tsKGO@(x87zbH*{2mciWYfqo7!heG``VG(H)o<4y1#7Eo z-#%G=`egm-x9scM>iSx6JB@#RN}uQ7vuVD!vI34>-z?wC^9{iI49UuapSX+ElVHK; z^X>O*Go4&B(eHd3vhj zlH9HE0jxaguXd-Oz<#b4?mvq_jKg@yLn#d+2%`vM?c~~lA~HbDBDPo3Xi^0$J%K30 z5Sqz9#!fK7Oaeh3p(QJ8lmjvQ#hZJ@2M8`gS6~X8K>msm5A%q9jK||>7_)Q5=-M9k z9njatY`98Q@)_(OPc!35Cf zd43{BT@K}L#t7h+c80yc+`~GT0o&ic?LO|V1+dUp*49_np9ZT>d#jIoYu^O}CQYYj z!S<&~uypSpH~Q?S5P}mAg#e@R?A|>iLGRY~yY0QL?Y+%k`)_v+4|n!{Y>FiqEJN;c zUug)H%hubGEWW&6Qu_V79}hORwpkl{`;bvMSbkKe^v3_?r5~4+{$XQF`^kzgKPf5A zN7>(hceJy=w*h&xm%ptsPQ3yj@YA{jHtH__t?tOpYTrS4aGvQ{5k@dLj|LZb$;}hZ zQ1Xv^!9z-k9Eq5%Ir`v$3X+TR62!slO=7gLwof8bJTXoP063!?T;`I|@xNCfHZo%; zE7|Fw8|+MlnQ@N1>g9`o(JAl6s}Ps0wqSp9Em*y%cRkw4mK7?@9Lob0{M4m|dGEMR{P-JZoJM$yI+_50)|x$`gHDe8%{|;zz}~a1f40n?Mt9 zF)putI^5sia_#=xmsB2wjVO2W^95dX@ZV}U~`K%lJ-O>oIVVm zPqOGG{~JQz_^jN8QKPR|t`V zpWYn3-R*Ct<1r5#uZoC!E-Z!`4ppEn2D73@bI&9Wu8TkqdxqXT4`mlc5jsi-`xBKe z)znZ#A@7t$IQE=AfN%uk{H#M5El>|b5+fO|V}KIJP4)^bFTM}--;iPcJj}Jg8LaAW zc2yA+K(8*}F%Zfp2q92zXcGh`4Abk=i(+Mpt<*9qi-{r2k)ZGvwT;(N-em9%4OX#a zp*_MQMmcu)cu;*|wc_&iU7d8aijTb!${EUk-ZO3`ACbe^`-yk1NDhc{>>4<~WGW)3&r?cAWD z-x*V`*Ui*46Us^>ysK{+3 zTZ`c`9R()Z087=%f;q5fTf3g?!0Af3_)XHuY=kC%crt~XJbeSeK-gh&?P&m6B|dvv zCUkMKg`GFbr=GgNsOdS<>WITNm&JzO$|JHR2;QVu&=8L^By#axwABI$UbqbWL9=;`E&pd(fsaq{*19vD9`UyGRYA0By3$e>?AtEL3mQi8dX>BI=B++;G zegvZ_u0skuX3CVyFFDO@^V}S`-hEzq6p(h}_1eS1$j!7N$nl>`l&v&|AkvJ+#;^>B zm|$tf^6X;u+|!}*&Qy7IYY-ehfHaYe zA$lhAM)Rl*87^ShA!o|h`i%xI4#~GM@{v7o{yK8Lj(&5#PTZx>Jg;52)&stIP`;C# zrY+84q)6bAY20&M?>Rl4v$n1Ibie_?M`kOL4d;p4o7jDjzou) z;M~%p814<2g}^(6+~ggDG;RA6Fs@HCodp)1jP<8M{Ph-?54kQ=zsg3XkF3jv7RZ#^ zLpdzg9XWUY7Tp{R9wE8GWZg2i1C;w`tYRuSy2}}dr`L74gyz<)kB0B&P1&6$@iab8 za7)CGzctB~U6VC~7L5D_tv;>q9!6*C8mm+>nn?0K;Td`zVk#c(&gsvA&j&t!a&1YCK1@3XRfCJ6)w{IIT77Q%vdG>09n z@;G1PKws}X|5rKDt4Un=OkZ_^*Q$D01M*4Hk^U$RhhV+wJ!tt4S$H+3X1VD-Yt41e z@~&h5QA=NO1~Tr~9A`bm)$N3Y=s7iL809##Fj-T^uaD_+y@ItJ*XSJxov}CzSly_r zP57gPY=PwGjeaFge^!AnsMT5$Ebv7zIiGM|)v{I3ODR8ZfXE|8tv)lJ{~Ch8k-t7V zZk$A%vw;5+aIvd6kGS&%@I}HKDsjPK23B_$@;tnF!Twoon=7Jt^ya^SpnpI}V{`5e-!7 za(QF_&>?8h=SFOFTv~h(>Uq{JKz|O zC+{#ALlpDVQS>Rs@QC4cCm6*SkzNz#6XF}-;uO9(n1Tu>l~NJr@i-oZ=*Eb=a{o|5 z$SKY7()c>fO-{zoH}Ijji6w*4Y$$A`_77KnWNqf$PRgKds1CA5bQSC$_OV#Y$aj-WMXVz6V7Zi_{ zeew+(P*J|AFWPwI4-R!+`9oiX3vI%c(njrL%R(+?hJAsAU}WMq z<4hygBk0f z+1uLx`7roCXm;7RCRmo~W@VFbdftynAb^cD`ZO6qAb3D(|8V==#=*wX{y_(v#~6xR zO?cmIdlaoYDAYB^#Xv72g&_OJD1B?^V0)7_@T+PI=wD1lS07MO;(Z0c`VqgUllk)? zeV(EuPyReNi5HiFXZPkkY)Y!(ymbOWijt{Lo7LO6aiA<;WoUHdh)2O*2Pfg+0z3z- z}7s8yN|2Bt77UpY$0mTFkJ`p0jMD)>@I+tb0ASL9?o=8^bhdPFc4vjZ=rblT9eI7W~bq zRqcEz7McBe!A;|CB9!Y8o93#zL(v=!{ECYjUjJta=ZJ`TrSmT*G=j+{mm0;NWpblx zgKKhDJ33&G3@ISbD?}R9^6w}`8Xa|9#-|Cy^vMIvf5!O>I6LqvIroSdBcK3Azz#wn zi&%8K{V4<$NDqk#w}O{1nl^2h`kU}YBRXp@2>$ud?1r1{J+otxI2jr0v*)rg1OqJ@ zrscVHCR4^*s>lmxnKK>COLq|+%u6>IFaVQfUbxF7I-L7ovUwKJ0J90(o#ari&TtT8KX7EMOsAZj&NK5TU# zu0T51rW&!ss%|NXqG2rCcvs=#pdkDbgxft=1S{!9TTnX!Wgkt^U`)8~Njl2VW_~|46SA zyur@CRQ!)8PuD2^$D?l_tv>yB?GeWRc=RZ^oyNaDrO(&+A7A5te2xF{9~J-O#xXmz z_#d|!OXO_`F=2!M8#3&%o{j%!j*i`3ED>Wr#8@J0PrK_fmdNVL`g*Xw-h1-6xB93o zmI%hISRogB0L4yIj_)E!g1>|r+{6cE%!t$Z{Sa@m`6nx=$&H67;uH4)*vQ= zim&k_J3|CNMBydIL&VwkhuDy$L)JXQTtp7VFbe;&&$h2F!%UAYS~$Eqa<@a3r9K4( zd{#IuD~N)w>cdoVGs>U>oy`Li$`>KN!yMUQ%FF$JXo?S~3{23xsr_&BQIbVXu zeK?w&hn?Ugnueeo1a96oI!9;n&!EPy-?@qC1U6gjB#%Eqp*zs-CK)b|AkZ4>f?|vpj2bi; ztSqk|6kwQU1Z2WP3Od6k8Nl#rS(;7}46F^Vak+%if-I3r;PzE81Axh8C2#KW-=SKi z5dB=Z&9a+H-GBYE4ns60^MS0|XI8jc*ELUu<`)Mq(CUhMTn#JhRBIq1Sti4mN zKr#V9VXccYIRyX!!vX=p#wd!!vEuTAK16w--%zq~G?&BMGTiDI%K(~UG98)(4b3<^ z3_7$ty-L+?K^Cxbf9TFNu`mtqFj;%svIHL>aI0=WK=MT~F z6JoBzc`I3lBokIA3;^EYm_Cb|^9CA)fwhZo$n?2s-3%ImsKq24H?^I!S&SR5Uxk*| zL{S;8NF4?^P8;%4Xxd$8MXRe^M%Q6mJ{v`JF|UK&znn|lB_sO82i?=Q*NO0myc;iniI{n{6? zkIcK{cw3bMBIX`y7xrDl)CDA4G+Wa|ZFfno5M9xbWfw`a_$-DiSIS@1rMSta1LFuj-if+XB5e)eLXXk)r{;Azb%5Ue8xqFQ4&8}aRo|* z6gj=-6o4->;Muq>23)E4xkg@|@J;ZkMForOFSpi|eYiFWRwEWNq|##{2#O%}v`9t~ zPn+y)HezgWc&%hnMXY#hJ5=JW!&wjSgVArK)%@>&v_Log`E)vI_f}T^8}5WTHj0C@ zVOt5!@YWTX1DLv=>KJ$XgA$I=FM#g`;IZVdWL4~YW8;(o5J0%2kG;L|YkBU4?&gCEbmIPm@o6D^5S9a46HQh|q(jQjI=9$$`ep=~ z&!Kx_AR$~exD*-fR$l->4t7EpUUldDkzamq;49XVT!2Tsc-(cO$ZGH{R^?lqqn{a# zpMw81op-1dINW>r>hQVE!J0c-boVnO;`&Aw5cZ4__S7)^jPW90nBaKOz*^fTl-ecn z+NoPfrLSAPVeaxB>*mwH52KP&lmW^FtAjM^-B(d@gkhYo=1Y+cod?MAU4HDxN=ley zWlF<{Wq1@oK@FIi2xT!E($Diq0uczQ22X9cmTC~6t6ngvahf)yG>af?!B zkz?N_2M)PvOJB7p?o&saWImarXMxXU(40-q-GXzmr|Gy49B#J~lel$Mr9Q7}jr@mu z-O7noF3tt~WKtE!7a^_QXGb~ZK(yX~YOWJbA%Jnz?JDHi(cJ&W>-v!S`c?e|dQu zF`U`))*G+9)7*BB&yr07^c4-$gIz}(=g)LlWGPxpfeaE3Hl@YW%qJ|}=N}IkGxSbV zfqt@;JP)TOoR=kL0){k-;nt;k%}AN(mtTa&Wnx*IHKZ{`u3pj=0#@rT?b3dQnZ0c6 z-{?PeymFPES6O)2h{|oxjw9BMtq#&!Ue<+C#6~4JcZ8Qupo4I5PK$#DTuIRq zm=>vf&0J)VR+#rs_yrD059b%5S*aJzP}?@4MbVV(@>tw$<2PpWZcMx{r`v;vO;L6> z2ZIyCBumEQ1v_IPK6*%A3qboyFUApDKq{B&XB9%x^Th_-KPvA`!5@f?@9 zK9(Jm51i`DqxLAHC&iK}>n1fzI+M>4)}d8ho&5PEkDR477ZDBoG={}EK<1WKD&p~n z(wU!reql8;d%vh)T;Ne5K+NL=>A1KFv6vGJ&i7 zR-r7WdA<;)o+oK^Qsm&)l0(e5Q{6ze^5Kp0NG-@tohPMs1~hI-K^mdNWSlMxm-4lg z_3ku5IqiO+i)nW}tfQgE*IqlkZM|s6qZ0ib{@lC(u4kU$HAd2nahhw=gTh`JxE*a# zV$nd1N?2^a6^diY`9ft?48C}95-MY>)qDzAa84&AsoJGU2Q1KdRX7@+P_hDRO4c$A zu&6^=)BjoK0GbkVv!}(x|3i#Z;}bu{u5CasD&J)b#`c}HEc(yb%Ym!(T#NA&L3_M#d(s6d0jeRy& zk*N@1%#vSX&suvy_EwMcyuUTrcCUl(Zv91svKG{)f*VD4Sq%4B)Cg-Mn@k&-vWua` zqS08JP5&&qv+2$OT8mj%ZDA^;kW`U8X{&Nbz@bQ|?D!S6N)p5y@R+VBdGlr!<1A4q zp_EH_J78E`$3P#)WFm<27`=w1z1spS-7e})-LPv8hS*G&Z~vabqO zw>d7+G{iI=pMggij~mOQN0KR{2bscg6g|N1n~la&ffx5M7W}F}eKK^$r~;KmugF%l zM%j2;VnXMu*-45q$HWZbq}anZ2oi>jj?Uo-bqqp7W2U**2=ht0T&4xzK7L85Ly57W zMP8ODLHAxa!~3cIHalY%;8C~$cruONW;|S(_4RUF(Ig}KeiZhcW%mm9W23zo*oW1& zXfzicV#d4S#$llLAoK|(zOkODm}}s!Sr~#(*Z#tuDuJ0rN!Sv@)L#z>d8+Ivn^>mk zq$d6QDgkBPFnS$>Ek`z^kg?!Ts3F2S8@L(SQiqv2@QO>Q;0R@cCV4Y~*cU`OQ8llQ zd2^NCs555(a8g)BP-p={a zMwKSG0xLM?aD!{kGW#uwB|oha&F?6dputL1^XC0OJUy((vBOgl*jM6EC6)4m5hhz} z-ajP!7Z_~=d;%0y*F6v&d)tCy_tCpM#gN&tcK%*+0)1DNfKtT~7ktj8T#%MJz3nBW zo}O?4*o5KK+f%Adk4o3nbDg<3URriB?&&=6~J zR}&>OsumMP50?2Pj~-4Ym>~_xu}b1OUB(*_6fNrCk7mg`!M(lZk$JQ+D}2jD@J)^Y z89+8(k{7QEJS@Wxpc~B~BEM`gZ1f6dr%aAsO$gObk32GeN6d8zOn?S7`Bzgf6aB_m zp@m^|mKUOpYNjHzcA--yn3<4aK5S+gX(4h1#TJ1QTVKyt$mx^Oh*;2=U;$Cp8|R#= z6J#jMAt^if3?T*~5>SLylhj@;X=X`XO! z`z-PW9R`9|??Xt6Bm>5fGpOktLXLS`AgA2&ZFah>oPp|_m015K#xKE^Dq8Vz9o`LD zfk5puRE}1uusejXa2J-?;ek_YXf#WUGse8ISAGKo?<%{bW{9xLeG;URUYUCI@uLN#FrEz> zveXb>ag=g(1osxzgxsi9LC(a;{%wx4QeAKr=K~~WBR|$Wf&fNz9fS~o!uSH%DqG4f z`7HNdCoOn5o00y#Drcwx9=e90Q-^i?sKVxE^Q@9Xcsy`J@C0}epLGtOI-SjrW~&kd z`f$iJk6!>mm)=w>&MZbn%!;jxG5A3_b-o2(@>oR)5c(a;W2awFXbO|F1mKJy_K`?( zto7%JwcK-2A7&53Ag`M|r%q1nUoCUR%su0PZOvCRuu;k_u23??NXeGEzs&m+J0wEg zW)2Uh-atWkEjq3=ZizNe3q?s({T?(ja5^jNkC_hSnqiD5jJ3KNY_Y3>9{Ec2IT#Fl zLV{orZMJQ_0ke&sV%91Y9HK)QiS9>qSMKnRF?E&F$Np;ij!QW0OG!SWSB3ecap;E4jwJ zvAHRh_2_c6#F(mQMu^Nmcz4H}Z$3qx*1)^C$6IfV^&PZmb-N8v%_I)weIWCIDUV#A zld#EI%fgy8%D?d%h@JE(MeM(r$_?K+d%UtN6#c^(pmgcyMWXwz7!t~9`Q8{CtXs}( z{OvgD|NdsUk)fdg>(PJZ#L$a75*W7UL|`X^a@#ACZ`KmNswel#+f0-W`6ep%R%Hx= zkZm4gFFo>#^|CS%MyLxmvi_F6RK%1+70KMG@NGSQ@vuOxLo3GHWB<>}v(o2wsed$~ z0qphr8ZiiTd5eNkl~D>pEDRSS_J?z$f-XqZ%f7PR?v)KV-Bh_YL5sdA`E*UNaDR6G zg0Ii#J$C+wJz=tVb?F~!@;}^SC+uy=|M1-%R%+|+Hv78y-Cg$m>+|Iwp8w(7=zTUD zLKrZ}F`CRL%j6_t|1X#MV&`^*qKxxwvV6;aoaWOB9qK!?qR`Mle0|Ly@lTOI;wp1K{G80o=xNHX{9s#l z?=AcJ;C(t>%^Ku=u-p16EtUl=(z65uEkyTDX7tyCS;9b0W?}g3wyNU%S3~s$b5R&) zGp3@rJ=h*>^Gp=m8@INit?!4MTf;lsRwfFOL*XaDKZ~$Ff{X<`^TDqV51;Qpe=;Ou zf~>Uitr+KQGAAjIeRBdj|C1GImmw1?D3ia{DUL)>+&PmXDd9RlW@`)@UWV3C3tGyi z+46$dPe8g?E+cL%i%@NKqsM8&IMB2l@>l)nc`CFgVkBkMf!%i=$>^_gkn*w!CSS4w z+%}=9U5F(?dzuk;cH1a>Fzh7+8=ULy=i~9JpgJ!YOU!^qiYIIc-iu7CGcZ0lOG_&H zZ~|V07@Zs(pCCUb8uu&0NRf9ibwp2i>$7IY$qJM9K_mD#QUQ!+Zml6JobUh&K)KLW z{TizE&4T5IGBzM)Uqs*+z0l>F^1Vv|wVVQi(Qv09zs;tTBAxSv+3rUB6GrCLLOn|^ z5M-VcnF4pP-!ZsyPPtVq<)O`2%f)KRYu;il&EKX)29^qo0UBUZD*}1XraZ8K=CL+d6c#Wc8qpM&oHtJ&hpF47>5J z#xP#ED?U@evR{ulknGRL91`~DQw}Hl^CbXtl$<)hAC^b_A`QJPbNLHi-04QIpcl5J zm}Zr~7QxuRjUrDv8H4UX3>vJ%GqAjb-TKEhZbKq3zo&WL>8khe1UF|)4pV#r;$B3- zqaGdXV$3LN;S>JxNpvndnq552Vb6Bj5D-Y)+^X|*{5FrQ&uCcBd+hLDs0(l=hRgLb zn*o|C+|NoH0&zaE=s1>^Fk`L(p+-8{5;GS>NJ(L`;h>fV9JsHonHUa}$>iXKq78La z4;;QWn*HqH6vDLATZoh`hl)k|_i^_5pcq&ve6~nNJJn{0A^CjCUTO0nod?EPD_F?)ygTIFId}`|%bZWQCI5Cwqrb;I_BG?*1Np{15u5lO>?=;w{k} zApsxd948!!kyCOt&;GtjvxyRSiz4k2(l0mh!I4Otj_Ho&IZGd{ttt|dbIPjHF;tg> zgfmMnQ)^sB!&N#7FJ1Fe-P37G4V0Ix=IfYbn3RcF6FRH&praaVFSfZ#3I4uS9gsN# zQ;Ws6>wYIPp)R()b_m2;IHAOqIX43W6?2RNFy=x{E=Dbo&UIBC-!ePq0IQms>D^-c zIOgLI$KF5}7`Aif%PfH~-8ti;W)zmEEYX#B4sLAhFLdQa7RMt5-N6JoNj8qs`U{JYh4?Eo@2iQaHJG=oD zg>{B6z^!(wf}G<6E!qd0q<`NMK}=Mh?22YMPun3H8g8?Je>NYt5!~Jh7~f_iOd(k} zigeKTmkR;}1s-7hO;Yxg0O7pBP?liIH_O3Lf^`1{iB#yNJn_3e62VEkq!c=f&{oUE zLEnjDo|xUql~AVB)8SA%Opd7zY6wI_2KEFXu%NE*c{PWv9qd1hvML*TLw!6jSD)JxEFp9s?BVXzd@~x+=qV6s$x%xo7lz?-Z4|2iHT^{zm z(JR*0==s6R{YQI#c(~AkRB#>7IN0D$KYuL1cz%gBm}F_EW*yc8o>LJ&tmb6J!Yx+p zt_VZ;^u)Atc~*_dJIW3R^5WJx3&LSuw=i(SlPY2X!MghT=NhU4fzO_U`AgY0@ zN=bej-i&u#0yJZMBx{|K+M>uN6Udl2Cvl5MAd`U*XdDkYp-B5gW+4A($-Y zSe)AzATGU6qQ#Wm6W-=ivpFufdH7=AfjQ;G6MUVJ{S{VvAe1W0e4LSVObV#*&`p=* z&`QZ!Py|-yDnFbjp&lA>p${x21c|vkO-p<@7!11daJN$A1>=m`%(&3p?QW z)w$Ntcppo73}1TQ2_(A#gI7RR8n=?CT0B^zbwNM{Ww{}4XBONfsWb9@Nb#6qYatkM zj$gQ$V)lWd6RR`A-$aqS!2ovhwnFjgutUMC2kWTJo~!x0Ia~5@boCg7lV;gKGCCL{ z9Ls*j!YFf05CmLXa9TtWoJOmfOSDBD1lFoU@0yvC8aE{E)@jnJK!h2rh0ATAiFJo} z`czj@tr=%#l+le2A~17QK9u@l&7qhR+GH?tP%4^;91sUhU9b5vRo}4Tf!HN}T|ou7 zdN{}sK1X7k!FJ)`Gzb%EZZmrr74_s+GiN{?9cn8?KL#5KkJ!^tfXfO3SW5vk5)d2% z?XfEu1K+?`I)*i}CKw!TusfLCu+8=07iI(~kG> zu}i*Wd(bTDg;q5ASzJ$5p!@nWr~Q^ez*>mnd!&Uw!Q019YpaE(2PLEEY&LgVo2~oc zK+t-vCk0VQDF+2(v?{{xY**|J5@Ot27WeNhCydX9F6KL}TdnBijQz@4-~WDk`aOGC zkM=GbfPilVw$9126Zg?mnOqj`ogjRY5E8P&r+XVG_u0MIZ3=+Fn_)5?zfFqLbEsm| z+1zfOpAWooU)wQTUZB8sO-_}0O;5$vy^ZDMKKoB`|Fu8=O4CV9@M%Tt%6P`UjoD=} zEn4>(K=vugajakG^2?+iU5&V5Ua$7Txc<_$a-Uq)L!~NJjw}eyndx_lsV@p7x6@-4@ zi>Szz+7Z37O>$+Sr0`q3dmx3P0YKHv%5pfn?9ZwIbuxYqlyzGjAC$FjzM&XE=l#Rq5cr3kraEA ze1&3YU;E+4sv>RyU|NK)U^`ftm12b*Vkoj+WIaeUW7;Y&%vSHhYHjq+nE77k>Eb)CC$0Y@N8{MC-zy@hs^EH+?Nd;G0+-Jwx$IKT}*% z=7QUZP<7hxZfB1DOz={0Y_yV6J5S1lMIVQ&+(x z;hSeAAblKv2Kyu18SEI0Oe7f@5C7ufU1+)-c13V2E~^qitVnPvUKS;UKVnJLXlzbZ zn64?YDtZ+CqkSa)Uw$0_A1Us+ItQRi|DUbRTet3PS^hul<(=qiI{*4qKHUH3OZe~n z{37DplH<40HKC{nZ8>P=#|2x*lj%iN0{@;O7q6-SE+!Nvk?g=f zaGQX)Ji9owcbbgR4Td4Y{u0%=5GV%GkUPj+BQ-q86W&F$)pVIbSCn9kJP+hc8Kj57 z!`>zHG+&j7Wcz48mH}8jXfPuq25OYI1r8*TyKI`iXBWC&gh96^$ueR5e$KWwCnmh_ zp3pgCbDD)jxneACA~fI-R+8d`BI8IgCwkn60CuKg$QkV-pN2U^&qPhR>cc zMu35l*)%U9l?D%ysPtC@XmEdtX~R!e*>u^@06?^RM#~KfMffylcS<(LfDn8#XaE<= z^#}fcgvRiKB5w}1(OU^&0hE9os4{dohJczfBF=~t!w{Ywgj&ZX&?ydR3ISW@979ZN zOrCxfLKvt3HJ?I2-7BTWEe9f%)+u%7_63s%EaY}i+jU!2uDhW4Ipcf#fjEKck3T%Hp7P@F*;$YN z3W6*hp+WN!HrFyQxU&%a|1s{m;WcG9^R3jvej7zXzq*AwL|d&(vZSjgt8@iaMC)A^bCmn8B*0pIkB(NeQE=F3w1)lAZc|Px>+-v|ADp|>c=wbt^$EexG%{CkZ~jfzCmB+u*;^aNs1$p#UMK^j21@;`I#|qtv((KO()8e?@#Jr`*6rw z*rh>e!LmLR19tZwKYaD{<>=AFr%!)kFX|D&tzp_9#NQ$!<4X3fxhTRYKF8|IqX!y< z=hnhbRl^#RlrVSBx+?lezMK=vk}>7Vh9+ykec-Na1)d&&-D~st7v)uuS!<#X$chn& z^CJ!C{oOquHgnYd_Xjrtgo8Qq38(C~s7`h+Uqf?B&Jjw^$(VHi43J5! zG5QU$i2J89zM(i)dz1}T^&q?;PjWWzz%H;2!#Km72#Po&fq}y%n+&i6vMTMw_FTMp zb@cPY=eum`;$F1HM!zm3xNFf4(E~|OfC4wirr^XBVC%AgP&ec=kA}Di7&Ikeqgn`I zH8?aax7LHk^g|^^v}V}*Po5tf?y;_JuiX_5mt6m|w9}3FCa>#qcOUw@L;d~xgTBW8 z(5(!etGMq+vIHk`iZ-B_OuU@W`}}TEN_Tn1$YgWkytR{#TU}QJ$Nn5WKY0G=>BFNV zj+c#qqYO%OaUx`};GD5`_MvV$|B1j%=;p#WYTZzULtG2+!B79|<-yU*L&h_iC|r5V zB{IsO7@7{^?2>(^vsZFwx9Rn$picU+7W-jQBMGn?Myx6C3%mR{tJNI4fE(l-#hCrOzi zWWs+yIB0JUZsWC2Z&+Q#^5Tr$l744xoQPu;FZr^SmlUXcK7kW;kuMmM&C{d+{%5`_ zDdq=Ka1;$NZ0Dgt(D8xsyzGu9nnK|QjVDp3J3G(M6P1TV|@8$Zr zXwB&n-HqUYvEO^{1+Ivz;2s- z0o*HoeAi0;>dJ<8v6>16Ti;@w-0nYcP z5J@>!wZv4BH%k~!!Pw=LL{2hV51tRnc)4POzo1M$aJ5dsEk$MD zVIw@v&Q=9a7KE})bP9u8U$RV2KsWIB6+`O5+AA5}aeQ8{cs+>`<6Dpdoy^Vk1d*YS zbLKOr-!&X8nFvB48k2&H9B#q+xf0@$*OTa}P`o%*ROgb_rSLKW5n&=c*%aI3I+<&C z9^WOS=l$lsWks)Wag7_7ZEE6>cp;+JEn;lkG0d1YYN4?CWj}r zCz+bIPH^R0=@n`?fC>_-A9i+g_MUf}6x3EV7L0(v1yW_Ct{gn36aE#P1&pucj$CLrR))M|8R5jm4^MCn zh{$CC-mypGR#FU!Jp^Iish!qw8@(6bMHSbXCTwYhpySWAt?cI1z2kf&Jv}qn@)(f{_LG z!Pt5(MP(#sDWnyHE^gu~eX1v~=@3Md9|2NYYiQ*=a0NTZIYzC@Btt5Xp za;qcYREh@Qmd4}+F^W+{b}NZiZb}1A=Xp*8Wy9smzO)!%N z)-f%fO~itS@wKDLYPR5GmEN}2)&)7a9a%3@F0t_6APelh9RLrY9kyI`rlsx5)g6r= zJkUZLl$ZX4#aduT0eJ)J2IA8R9~dYB9_dzMm?;?F#O%Lp)tz-;O9P2OX!EB#xv1z$ z0LGQ{^Owsnkj)O&EQUM#UwGO%A1iN#pE0v_P1VeyGW)^UdiO29ZD$>g(xo?@bt63YS1bY% z-o&3nFqP6I80(l^>Flr@Niu+5x>gV|K`eb~M9CM{#2sM`CDnReL)YM!{Cx%jN~>mS zNr%PKalBA5XP>`%`jo`slML0R9$A8D5twWq6qF2c7wNnN4+e~vg<^E;qE~_LAHj=x z{ez}frsd<;9TC6|4@+Db2cue(Vd5&CX*Mi@bIonnJ==spX8m)`2BPY0b0M*-U*?Q6 zxSvPXDfT~8xVyCBI^UrP3F^gdVJ?E!-JGvxPX>-&mbLBcK4Chh11Zq)&CNQ6;4BWx|ZcyHdDaD0{#C;t>=!UAJ-X3096d0Zyn_(Jl= zx?IJ4-ttAD+4>_DEY9*GVS7AR2DjFXq0}7dfH?f!6I8S+gIxnf;BA8=hB)4k1B9ET z&SIBQN84Z$-_<^YWqc4pMwes>UOlIIAum$hFO2Kpf7-8hs)NLoReY)Uv9bF0M? zl5SCHa4#Zno@{^N%e36`-zz&k;!c_cmHV5mWo+(zh87fL+ zRUz?%NcWM*Ab}6Rnf9$%)Re@^L#LuPP7;3F(@Z=g>Cf`~;3c?EOsDv7RVH*i7&x1JcClx}ld`rs;b{qGx1VT7p{ActaA0gI z+~fTvrEamdyp9RE z%|VH&!k%;6b^1jq)3`>te;*lzXa6Z~9tXR7j3(loDg`X0g^+R5enr72tuBVYO%grjq_-R({Wigyd0Idoj&!R~Q z5=6xabSwTn5Vp5Hbx`TkFSgdH@S62ay&l9Emz7Q^iqZsEJ^d3uq3|R9ZGEOQO^XmN ztdxv$bi83H{L}b|ry+cUKRVr>37U$7FJulz0V8-a0j|j8pL2nPB|T@tjd|iuFnI@~HZRVE6}3QUm~?0BHwg zmK3cH0+G$KF*|?|Hw{xbDvJL?Dv_J~&rMBb4=5Lo8}8qDdV%2fGYi#iLcMfgE9yn$ zhQtAR3RLV$y;xvxs;8?37KH^Nm9kf%yr5b7}~-= zC;>w=5VVml>c)uU44LX^V{yYT*d1zvskJ%uX~awd6AaA%d98->Ijz-b{B6_R9L?5? zvV?W)lS%0%hy<9G{xVjX$!+)JVPqEli;$qOb`;=$`HLr=l)qUJ6grLa9dB*!HClao z@WgGDlatH0y1Va=pVJ|eICNNoUS5Psxm zjj#g8Xd?j$@K*EkZFXu2$;BaHodHG>?(ukR*ap5iCZj8(q`^m6fT6{c%a>WENFP70 zWA;_0|6>hyJVOgk99u@aIdqi|4#;#XxN#%$&b_I3#lTqH0uz`E!3t7RS)N+f1lpBV z%AFR_Jy4oO5jKh48ttf2R8HRbO%ah`;iI4%>q!b8%pk6ZS7)@G9$8 zdi*Lk4avAzNaJ!#&J|R%=Qaw~*jefInloP^#t78B9o{6{;!nYt-G!8A&Oa5Buge?Ncnd@mr%dw`7-SqLuC_8dH1dYzAMBq|s zCRemB>sawk)kV@{GgrMhhdlC&ay5XU)_|pmN{dyY?mgD32v=(mmy7J!WQ4X@UW9gu zc^R9^wd`rAtjB}G(B4`!s1gk8Fj%*_I&N-bC-)&Zi^6a;uC8{iu2U7Sl*7A>vSO2k z46$Rr4A}Y;q{Uk0%ARXEx=;t+#v4jwyz|BF(bj<0P7~~}qow?T$ZF}tH`nYaN#}t7 z6uzNIPZ?c;z`#QLEu*1n=%oW+1;KGUd*ezb-MI$wArjWpYzhh6$z`FW4auPc4*<;y z(A&MV>Z5l2L_j>N`8s4qUwLU&XO6_Xj=Gl82dXFOQ#c}95RlJ3b$o$9@PL4CGCZ!& zco&R1@&yluFJ&CI@%u6@m)y#OUCRK!Cdw#L^9tbMt!PJMCKsua=Hfa^ErO}ja3EU20_M>Np z)wDwB_##3^KRt?2S#w<=6SCRo!itu}qU~7<+<@4oC${)n@Hd=mI3lAc`r-JNoGL5* zs%<9VITAiaiUTruC=rmak{2=~V_HDd;CMfRp@>eWU^omUwTIC^DreS^>qhO8UAbTz zMCEg6GYgIe<>YLfB zn5q7jm?wLVj)Zs#;*oA>VN*Ax3oxl-gvp@g@}pQq%||k#q@=%y z3tN&#+zs5frL;oT-s0i-1%v=Q`hIH*2*tN8=afQbTlRjuKm7QYTx7`o;#^6VU1WEag7C z3>N$cMzaJg`Qjh`)){>J zWA}BZ^Llc#`??zqBYe^R0rc37r=g9_rEX9}G08GZ`Hn2hHmu8~P+6XDS}VH^*5#X3 zNTcDefj;(Lb@xwO=KwnIb&1lg5=u_3w|w1 zOrv;JkWUV?O{xGN5S59?zW2AS_z^TRB8Cin#L+X~P9DXLRQQz~)0;~1n#du?n3+Pe zp%TJrvv=78mo%_KtI|>304s?4#AFIV6Ek!e{$>P@2j7rMP?;9*(+SyWWlNGjD0QT0 z=bU7zp1cd(ofq`3+Ql9vE;9FufK~E;7-qE0hc>u|h2Ajw2EptjbEYD6+LbJSZ4O$f z3)8^KuxzR@YwEH$I8(yc_|E2L9JFfEXI~m!nad~Cv@L7Mb|+C^G-ggh%VJFZafuDK z)p}dYjFcL=KVcW}c}e;Zzsd|} z2x{#_4}jRAcUuqK+pzySiHQca2)kJYHWanOakAnd5tC`Y!bWi#sPIq!zMdQGlIQys zgp1a)ja7>%r2&()#bi^4>@mab(U`&~j@w9jbM6Xn9!DxH&&VVut~&I_wczsu}H-0gX|NXebR z5Jcl_BoY#c4hL{R3+rHP8Nyh3id$Igpp|=^Yq(`2m>zI$IMiHpy7v0I#{T{RIBn?m zaerTBMLNnsl!{awvKZ>YK9d6BM~`11zVO>))8O?D*3>$%h6)Z?L2OwXczwFoZj>C- zNd)o3HJ$O59-tK(B`xrL4Ceel-v76+kMDuW>qCzFI~(xl#!stkI!Oz_kSptBYjg9v z+qa{Ci=wT&cQ)bQXp4TsbL-ajt?g)Qb9?j7_T9U8w(qd7o9tb5W&MAB!q2@Q*-BsA z*kJ#QZuYO_xe0B3L?zEJ+#~Q#bjj!A)x-5jriAT`yV2J7-{0+HZdf?L0p=$~zFPbP z;6lL;*Jgnn6eHcNh__{DxNxq#HP{r&E`XNjq3!8#eUxF@PF57e45Pm3iKB$513P-U z|7h>|(H@=JSs9saB{FgwxL2*t-eSe`yqHe<=h-CfpQk4grKx4i1Ndoyd}mcmhxUAZ zY>-HI&=4m+0z-0yE?ZWN5!@A1 zxK)-ZGz6XUMohSPcMtdgQ4gA;(H&#VrwB8LF`LcO2_$ivUf9F_0{HcC#V$ETIb_U# zb`~A|f2aoiDS7uUok#b|@( zciGu7ymM!`xfPAmDfsH|eON^8Yu8-vX5&#lo8@!PyRccEA-f zgD}6{DE+V`0RevHI4aO}Uzk)t zmg4y&KUXnA`DQC=vHc@9I&DwVa!j@rZ3~5basavyWhIYS0B&f?Y8!sBNto@jCW{R1 zn!zeT_0bLHd4sB6Vdx|SA4K+Fki2LuX$z3E!Hmx*tQfl*u|MSg5I|plFn-HgfOrl? z5CSI{Lu<_A<1Hhs4x|ZMX!)hKR3ALjwtG=a5-)aWiAvg_$_30C4Ek7xy?Qf<2ke7( z?IYN;5-jr5P7B)EfV!tjEBBi87#1HiUG>RrN3Cs9}z4a0hAD8%B%wjp}4BXT}yUuAv(DHg(f}KquhKl zB7xx?v5m@&^JxM>0s$f@lEJXqRHKle*bM#(`%@PJU~Qaz_La|=g)O>Kz{cR)A3gIO zzb^Z)%g*cbn_cz~SPArRZe(#!Or50py`VXO4rb5}zyMdX0Ps$g13Lq(`y+>Ra<=79{&$|uJEwG} zl#6aJj;+vpc!gq!lzxaN=>i$Md|tKpz-<#22^=@|hQ@gTa7@`HV8X~xc8Vz$PxAM| zgfBvC1?Xr8x7zjn$FIwqt=H|>okx$KyzaKxubmzCpAMsXUTs8RYlcb-(4knUjNEgB zxYfn|?=2UhaQnA5vNE<#OgZH@Zs>+aG~k~28s2(r0?#qTENCj0Xaq@WK6aE) z)SX2F7v5Y)8@f|3%XE4=aJB`0+yR5DDO5E!_N6z;BYDCre+h!c$R-3E1J5!4fe91# z0Pc$&0Vrbt=&)wL-NRZNj#kXO+i*dbc>b5iDr~*coHBT8iI!WYLN4aF6+N=1b%C)e zhzpEe%e~n6Dl*jYR6(C=1SiQphcZKppfII0)m0D;&GrW*~dExxurF=y2@%+hJ>(g~%<4SX3}HeV7^ zm{3=2uU!|eu3mP4Rrq7`6PoP}ViN#(z;HdAuXF$qh*L=3wIjzL4Wixs!@Wl@4-Wrx zbhP*4;o(E}C+LS+`>vM>|v=zl+D0 zQ9Ob0h7CQ#aX2`~4Tt41J8eKM^+z`qhKUFl1emBG{8dqKT}o?IzAV*s8@U_>)}IFE z4C85DrhMNysz}{;C`9g%TUlG|F^HnW)x3;aY+|$D)0Rwaf?q`&l8q#z65_#AWbXBh zI~KS3ZPeL#pA;L**{Dwk>Dg< zCfT&KyEl9zWrTikAGPBqlJj{)@=4ryvUe+ZKkY^FkJ@_i229Y#GT&gUJt*_oaq8iS zt#7UWWY4o_ySt&X&Q5AnLEkl^Le#aZ3X!VML@-jvtxKU35$K;#4eXff#DWVEt8D-Rld;U=X1$$I#SYLy5`C+4jQ3pAxT42 zbqb79ZL%D!gXYV*kC%mj5uG-hAh~p_jQzh%i`^^%q>B;b;u`mT-^1;oL8il~$YRMr zzjP}xCZ@Q2{RaRBkDvfk=yJ>Gd$u}Z{0f4MF;?I7qRn1(r;8UPINAFFm&ORPI$)`b zw2U!CH~maj%N(Mqjh7YCLR}mgFeHikeFg}?p%WVMRJ+gDwz$(8Fve^KD_?s>@oX&O zUL!Cp@L|7R?(zO_&-O@h;?Io0_gPN)6GZ7HI^WfOe~Ypd%&e`Em%s<5R`%UK5?3x#1*!`e|!J6mMfAL0R zP4jn}ujZ2gJ6XhK<92<}2ahyjo1) ze7(q53`>(SX7U=$Zg0c_I4S0mMTRDj9mZUDz4jtv z1coabhoUMenF5qLaf$B62G8J7E*K^+Pdlw|`rF%OG>pEPw0gQdMvu4Qq1>zy0}a~s zPJux(p&xKAjW~pJlBDD4z%4DDD2;*gs+UAWiikxMgyKB5lVC_>sPENWnprQ|wU6dJwPk{Kex6w@7%g;`+wfux*J_l?_Zy) z=d1tcSO3qi{-6Kz{6E)q{4~cXpO^WJT{?al{4#iye}G_RA0Dvj8nf00jDN0f(QfM* zgpQv_|BGEj0J7PCuL0N>^Gh|(L-I_$vpLuvY+J6Wx4}EL-ZgbMKcB;OliJhVQy)%d z**s&{O&`0XLwlos z^avAakSjwvA44t|G_wSg7tz3KF1qiacyOM>jU0kPv+XwTil&kYY>KlLyC?EF+fB=* z46Y>a=5!%NgS!!L7opo#|-H?@iP+;SitdwF68Mj&nv*or#Nz5y>^StyLIdZ{Nx%9=_Oh>~}Y&?D$G zEOE{B8df+{?K#Xai83{C+9xqU*(#za}iXN;ee3_JjzTu+D`@<)Dm##;G7 z^`j*56lxKskro!k?q_+kX5TLAo7Jo|*J+zot8ROek5@Bx?V$~KmTS2js@i4M%yu~v zQ!_=L>kdktWSYPr;?hvZX+gokpaC_7Wwg6@^m2Fqun`ozQ|xXhier78cnvg@Z$KSJ zC_JO#7vn9hfeQ20N|=^2Yc&yj#f}sX)=1NM6iz{{3Zs20=(b<*mb4z8^7Jgo#xUAB zFB80Bm(kx>>59t^ley?GFbGY@0P zUjS+AlbcM`TITd;*Ru26(ke{SX}U~XdK0WlpH<~w?8<||K>O_o>tM3nd~-O3(C`ST zMnbb>yZn2ssB4|?71jD@b-$Moejx{Zt(X)vd5r(q5pa^1sji=vLVbbT5E^Tqo|{{z z<7*AP%-}-~gQdnykmv%LHxU_!193% zi7OrekmFd?^5Ch4*ty^FjZ~8Sg4jAZ+IRxjC%74UEL2$|phIJa!@h!_m=S_g}o&+pX80>1+Z24VwdE#Lh^xhhAfh zrqVqIwwB5zQnJfCl69KqBAA&OxfeDHL>W=Wl_>`5*xyvhctQG% zp}!c~rVYRwBQgLJhW1`YtN~DFFCkdg?UIML(E1N_50l~V-)q9XUgI8ky$Hc>MrX2B z!MB84g_35}nMas1b+te$?W+a$L#n??xgCYp!}C_bOukEU5_%fwUE2{y4*lP}-nxu$QRF4jmurZ#;r`L+7kB*%AlIE1L6$jX=i+o^poi~Lp?6kw zkiIGEUhXJPZQIt**h4S zY^Sxx+FPvA9maKUHn~%-e3w1!hQ6{*%KjLg z3g2#L&zS&vk0Q>WBY3De(~<1|74&MKf<5Ocnse&-WmSny=VF?V(;UH1dMl4-<$ob-R+?0-LcbF&SR93yNp4@{JJAnReL^_qZVHJ16C zAAI*(oVMDugKGb7GW5tehb{-B?~WnwEz}u2e(9kE$9YQt`lb_nVCg~>oKQXmzH1ww zM?VZ6wz(E4|nTIq%-_3#ARH}k;wBnB7tPMSoJJvE8$eV zV%*e*{l(|ryYsI%K^~1pVMr^O4fqkt-YKaVm0o(hU8>S~S_knY2jOyS05m*5?P$Ps z2Q3mJX3G`I*UK)6(kxEacVK&3^U_W2Owm(uY4v()yuGL)(LYBY1%9Y$7lPLLi4Ry< zr6MKKMu%0tG)KjKs8yFk3L}q-vRQfdCvb|V$ko9p^x3-9fS@IwCiEXPBEdME+l+&z zrZH;?g*n<(q37Y`j&W)hAW}{+2MD^EAm=!a`4QE~Qcf;E46Qp*!E`!u9 zj81?RSOpuv=7W@CQeEUN_Fy%K>||k9Sv(aXoRUezN2!bG%%QF+MreXDl~V?fbvW>h zhtV)<1o3Bt60wmIa`jTUxU`rtJcJcA@B9ZxqhI%*?;iYmqEEGf-!MV|TN7q_>p?dax*iaT3aqa?uk?z`_U50>{p zbJW2t1XPA-!miDWv*##yfR#)!5>%|)x6<+8@JH4>J_^17{XkOHcMcJfrawx{SN+GV>#f=iEBOZ5Dj*5!lgx+2${`2!W_Fg z$G!)m3S!hQ=3M*I%}B)Pm}{?=`t zr@U*_!`%Z;2Yd%;qz(*)nl?jc)-V!>ms@X(>Y3Gw83wD-swp#2w!6txs;&_oHz7Ml z@lJGaYzeKI+hPm@W5US{gNi){BL}wC%%v`SWDr3mFH^~?4$z=dYix-r#&KDti!ilWFaT5zd7eB~^@lFz7#!MatxOr%6A0{%wh>Uo zG3q2gbVJauP@az(rjo53id)D#h7Bk$AfBey&ekA$%gmxfmbEXp2aqU5i=XfG zw4?|eni-7(Sy}>FMm!EBLLyKVA6=#Vu82+HVFTlRk#Zh?4>|g0E)20l_90J(0#QDI6gj+6n=u=l2Vp!%4mPCF;PIv{0UWixGN$pxT##*FoW94fOu)v{W;+D5in=z^A z#yraABeX0K5!*e;#&g(vAtxg#yESJ~IUe$24#>@C$`%X<=LRTeRy#SNQsyMIAr4vP zEc{@DEqIsY1QQSCyeDYNI$~NT>qi<5M(BI|lB}Q5;LTL7#&6lFH(xQ5q9thI`EERN zb1lA?cSb>IzH}mGk)B&eMwDe)VYj5w6BP72(}UFtok||76@g-=azlrk0-pFwc;&!O0#fVz$nh0vQ5morom+m&u$Aaki~D4{H2ZIDDkP)n~(Y6P7ff!F-0?3IzS3N`vlNHn5U=b84iWaX)q8}{IfUN1(|Tec_5A%i~y%j zw11hiK*>2dq42N!gCaGMtryi)aIIM0tDWX!3iapGBvZ<&sQq44L!KJ*zQJLU=&zF9 zZ9K9{%4aTAa{!B(+S8W-3MB|3nDFBzKq7;t&w$GCknsa&8&FFxq<+>o>NmjYwJL zBz6=JKVUsNVZHsBjc-|`Df`o5L>iq`Yd0G7e-IBw;*$2gSnn2hxZpp~*mfg!UcG+p zUQEr$t}zH|)YlqjO|MaO>^FBLNW|XXZZbOvlNf@Yxq{DAxTgO=T;rH@|ME+_1@odp z>B++fggw>QoMu-$c$&L`1@D&DjW1jdie1T_54ym7mJo!kdM5t0&f`Ci%%hR%KOLE` zI_ocglz#5X60{4_=vXC{=MFoUIH1$0wfh@F{vc z2G$J52Ny9P@}j~$oX5-n{gbyN!w*~!Rc!cz>orijlu=Z9@dh$I^Vrdge6gCMauKcK zWh|_v3<_jCBFc-1>jHyCri3j~aWS;!=pIBcx-Wil4=0BDlt_^GHA0r6=S?w)6SsjM zbTws+wy!F_OBYt14Z2iey7ajfIK=?kFd%X#Dljd8DHI@sN0u(FCQ#xcobMrY-im?? z3gzLSRGeWi`S^*GLVBD!QLm`DrB{?YMg*uRRVV;RAWT|O_=_WfEEXVnH@J*T zHxUu4BlZraT7*APZy`oNP{9NV0nI+Tg_cQ`~7g@{*K%<5&Xzwc1 z2gb*xbLf;gSG3~Ji(Xc$Qh4KM=@ONt&&o3+oPa%PMhyw$gojQsssrC2R7sJXwY_H(`)$93c7N)Do};u=Cyj!-UzZ@jedQ2_k?%Cy-=5 z10IUZ;V-4qpVE|aD*!=E@oH2q(s6d0rFHS;8I>XPJk12Im54s zAiUCaL7J9e#IPtDMj{}6#M7bZxm60Ui9nyn{S(iS|Mr)qST$+U&*$v=JQO)7WS}ER zn>)!t@Go{1&ZKI9$Lf-uiQg!$r{rClIT+L^^V4Odg9q_8OEA}1PA^okIisnIQWeWE zQ;9lCFVLc5nvIv`1`6+4U-~(#S^^(y)znaq1XEXeYrtd_>EC%RRRbr9$BUf!>PiIA zljnX!^v4aX1$I5nfe}#B3rRms0xIxZ;GUu~ipz3XBVh^Rj|L!PQkl915vg4m4r{0w z@RyW{1HDyxQGW~VqCNhvUcH3B87)ppsGm*js?q?|nGq|_5Pj~2fbd&>nBn~bRhyZ4 zxRCc zi&zwim;Kw6F%p<0*QiEj!rqZ&v}R^Ff!|FbZFhlTh(MeL^n11dLKroQ6MM~W^koh^ zKR;(PAkC<>vjDkk3wb!%-$5PMf-r{O>1Ly1W~@|W6mXGMR*Cr_c4H^*Ph!80Qrb@O zP>uSxDo>sGrkon`GnqidXUcMmP1(@4mr22+6+JA*Z`oXoUM7V;ID2f@A3&Y{{gm=b ziP5d;KB8hfujaU@qDR;G*@qHO^ZXqTlFAPm_Yf8%)bWn5M9?E&*B2lD$pdBk^RvvgMD)Ft}Wi8;?}Qx@+Pe z7RG>=Mj8QrUnK_-O!^pgAUHVPJg6%@Fkv#kI8QFR!`Jgxbto|7kruA3nw&w$@uxvr zBXj>Qy+e^BsRgnbSU&s*bfB=r5}}N^W;#N^x#x)kf0@mqG5fMt#tT8#gb`eMc;G=B zQRqVEkM_jfJxfoB1DX)+DguMpWi9EuLABuFIYbLYnY|GjJ$Mb*%nISTi4Mw9NWcLx z5NkdA;HiqqO3OQBJgl~4f!wWxw|dYqZBhb!#tTSPsAL50h4d=tD7;AS#Hep z;`++7AJKA zAct2+j(wo=ghJ=NNH{J+<#jY|LHgmz>E^c5WTT0|j9y<2>sD{?EiTUU>@H!@E4D7m z#&G}gQ=aGWl-i%hoCxZq1EI9{xD~M280&E@^1w}|a9z1jj!_j}w?2kK%jb6~5Zmv! z>f?n|eRi$qNu_+@JKOKK4emh{^_c6m$4IPr2}nQ>$_O?o?=deYYl;06pDlge)GgO_ zPpjM1>Xv9Vw52M<1YDNP5G(;yV)qM?U#kNH&nN~KeZe%V&$0?^qAuwn6-gJ5j*PnBU*bF#9!O5K@MKLxkv-CK;-D^9*15+|EIgoEu0dOwKb ze#~D~5=vL#C`IRM3t%XvgDGCB9!ULEeV%y8CrtI|_4uP$B#&W{$uU9PkqTdv^uvN- z9U*4Zh%N0x*JrPpWFRQMTjYy91jdf*Cl<^i$Au^7y1BacB{Ehs;_4N z4HbIN$atiK+81wl$cEPEPLxSnUo-QB)AqXNb?}5wry}(&9=5h-h&O4>0M2>tWPRo( z39*xrCnw@Z1<$aX^Q=5X`^9mIhEpJJGE%pA8{v07uZ3*r>Q@!$&Aut{ciekU{2@30GJAq10 zk|_Ke13CC=$ z%j-E#CFD0mHVhC3{X!$%Bg3~Q>Rh3@LvO_o-lLIb7#tx~lx$X%Fh6M0O5O=0R&Yc& zDEhlxot}c90y~XRU>gr0OzO$JBC@BdNZP70kE4$tBm4Da>Ss~(reuP|5gBD^09Kw7 z+SKa=dQawCj8#Liyx3A7g9-z!&=bF){JASKXU$L+cfmFs#1|Q4^Nch#@%jxfiYza5 zH30i1ub}2nzN+;v@VBM&mR$&b|_l#8??AcN{uN z+Ys1W4~gmqvu}_P%V^CCX-^$g>;e^Op4YBK*g(+vCRO2CBmO*ZvcW~BDbp#Q3Y>HN zcuiQ=c1RJC+cmP*6N`SiE4~}Romy-4)|!U^+B*)vi%4Oy?5YZz!Z8euj;>?nX@398v}84i$&SH%JhOk;Ii!0P#gXB{t=;1qBlJUIt`Z1k9FV5?q+^klAL z3I&0uSe1B(gulW&+4TFu3P}3G6+mo~EHWyK;}LJ(RMh$%l9;mDx2hViYwN>#?5Qta zSJb~81Ft?BQm5;3pLk;oT|Pz0!t|2~Fbt^3jY090Z7|F2P z=|vvhX~>k5UBHxacqUBq6SZci$ZD3FskwCt)-n2W)AN}_3l6WUaWbe6x8LJVDPeOF zbNsBE=5|^SDQKLSV<`^BFpb=b*fmE8dft1DpMstlGJUScH{+E|tt&Bre-b57o;gdG zZ}SP4W0o>JroO#-j`C!&m}X-<%zDD{PP#eB`rvRCN`~y@QgxCan{FMCw0x<;kz>F( z&AcqLlWdwTGlUaUhuSV|#$z~r4Dq6CW~)cTbZ{EXmplU`X3GmSMrJxgP{~3CaXmMz zh8SbPv#Bc2yog;VRfc98y~QIJm4haPf#@#^cB}I<;R|7Tf+=)RnUKG_GF-xy;ZnW_ z{<#b}K~&u)|508H|AL9OeXK>L6&)H>q=hjj(st~^wm7hzQlz1sYKhxA@#E)}+Jd(E zX-}qo4;tXDrG6AHjDsjvY1HYcv1L7OiV6W#eL!_tvi|s#?j%O8gVM&!kd=%M-})+h zk%|5bvD}tY-{u+qA-4c~*_#Huty=&&EKcObR@NgOfQ(jzSnz#sfXYE0+Ph1fTUoLM zAD<s9mayKhVN7%sy>)uvS%8taJT}c`3f_qEF{_;o& zW>sMo+)20u>S_HqM8Af1rj=L4c^;w7VBxuUTnZ_I9I;$E9_vZ+M(RU50hNR=1~Th- zo-D_+g(w4O7qBH9#;qUfi>uOotvG+RSp&T?+;;hSvP@_F>T^3w(`6a*vbA_>&QwRj zZwYVFU@(EkUJJ;8j=X-6o~8wBNJZoq4RF4lqKb=%3N=;v$RW!-@ay$Foqj3cSyGkUeRf}oscex&%w>5H1 z3_DI@@Sq=q9uiLj(8sdQeSvb}0f)>^J3}MAi2ZwywF-aSyxCw4^;v0WZ$t{k8Z#fv zHxPv?U)tP-n#IsJ>u7LfR6ZM?tv6M}z-VwpANF4CJ>T7X{^&nP&-Raw_MboTTephG zOu7Kz)@euJK}%3GlTh<9ibq~UcEDf(ErIM&ZwD4YJb~bN;_*()s~1lWAMWn4>3M!| z_=P5i%ToWTCx=U_s%PNKg3-jF%Zc&nFIr(ORquk;MzS@M1tlFbh`EoFSrr3hO&!Cn z10OKMmPdK#p@n8|jR~W9B&|&vgVq0G#L4EqZs@0$MfcWso-IL1Udil z{IzGy|cB&UTxmKeJ8rA?!P`2&%GbnLNkm7q`kR@&ws^p6WaP1z4-Y>^b2>Y zyAxgV`FQnkfkRo5oxNQ~opCqX`u_X7{q4=o+n6E{V182MtHnP6F4RkF_U9l$ELSK0 zosLo1EBq604K_i`y5!JKvvE3yP?Q>6A5}ue)qFA)Q9+mF$Rng+D!1a({YQJxkM>Bt zot2T936(!kujoV zTlonlzQpV@p)vNN1=%l`DKrF~@MMlz)H# zx*r~}=^C@v2IG8I-Qrb`5t?i7Pll0xhV|Y@TZ22dBG}>^o8N70-C}3YaPzz2<`&xv z|D9i?(cXte)V_9&M_(M}bG89vJPg4SBcDSvjMX>4Q^+;`=^6^GA*JptgCxZwvnT{3 zl}@0umq9_$_r;SY!{3F&#~6!wS`qmqe6R)}=Td87bd zK%u`(!$edzY4U>YJt#8(7B<1{!RBBa-zA6#VJx@?!e;^4Oi7;5MCfZ{WXa+nooe$iAin@+L&6INg@dRGf;w6hvSw0oRB?EKy1lan0 zL%J}@4nfm!9=Oj5*AMBF*gp4LjQBITRkRAm<06l48n!~QlFIpnNa2LNdjyK|19k77 z99K=_T{dg)QMKd=ZdL7(ZEwIwNH^WM&7kAfE}zOk$X)x)^2%@E+)Sal0^ZGSEtqL# zctUK(W4?en6GT$OU@*zBeZ^zf(Ravu3&fW42o0s70Eqc8+m{)bRfkxSHIMTtbo=Hw zW_Rs!HLD6KMI|8Sk0D72xhpm54dAA~-Bv377$H{@w~^%z&)(^4fb22{;#oS!yy|Ys z0O)$2o{!+nkmQ;D0P1WIp=y%Mn^=P+iyA=#p>T{^o?U?=)iyVhGYYHMU^n_{46%oAxWR|@4m1|6YgX;wFL_dgpV^HOyeT_cc#^}tm#+?=cYhF} zGRZq!}XfBp`U6rdoM{#icBPA~X&(Uu>?wQ(_g*&-9l=9&7oTg@XfBh<|lXB82#iqV^G2>uJndgzua;-W$ezx z=S!YHJ%J{Q+4^&aVKHc87nxW-$>*sp!PbxO7KeG`(Jx0Ehk3qixlI4~eJNx^JCMxb zY{Y$rI`PKw-;)0CoBi+KY-EtKW)$~)Y>{p5%UWC}7=-U|@9EydqrH*Vi52zE8s^J{ z!t?SA?gT>`5#s;XB4zuMw=Ia8|ax>@%3r?*!mw~_4nuLe{S9RZgVTz+T6Nz_s;g#om;m-|8wW|t>~({|N2xsU-ds< z^*>+rKmT*|KcA=mvGqTnqyBMpNuTq4Fx|!!4)>nyAH8I^bGjlwJ$Urj7zk2-oAH!YB_AIgK706*mF?fEE4lx4 zkJ`N5ZLDu&15P-dQ*Pbz>Xj@Lko^yAeV15qL*Hd8x)uebqy;~0>8}#)%KUkxo>MD? ze&s-TO7>Z00*oHKXZIm;F5$1p=>uL;R?%b))^-wVUH1p%<$Y zMxc#Bno4fX(L7BG5nPr#$LsNGM!WlmRf=#!$20-8qelwrs36V$92lJP8kunl4_LQ@ zcp$cX>{J$1q@pq};?~t@L#QqkiA|LqY{f?q2!2VCFfK^G0;eVjAoEdZKbHvw!49L0n3b;+N7|(G= znU$~a?C?kfdUiB|#~-{M;78FQqfq0wop|GKgKv)?_W#eD!MCqrf!iA~&ofaGOkakN zUZVC9WmMuPo5y92^Co0WbqX`{7fPY@VFXo5hIZ4y!?1TF+BL(e18G@m%$xb2J{yxD z9a04uJ$;tEgFvz?jJu2H4xRptz?|hv#!@(>O3)TcnC&MnBa^yRnzeYmAH@;c(Y7Bu zI73r5f*74(y(+wI0rJ%>^-|ThkQ?j*$ z7r>_@8=6FC?0!Gj9qdhp+JE$W!Y$cY#7i2O=PloW32+81UHB~oG1sg5EU*ZyXc6?) zK)vI-MSufJiyPuPuh<2&KuQ>N(t=%3340G{r@Yj+^Kd|+S<$O392E%l?(^{QszpqH z4>!En>7s6?@Eod~DyIa1W6h7_G!pF4KAWuGoX^%e$S7NKra|Y)p(~vQ@fxpb_DZ5P zur!cJW*rbp*C^}<{SlG^sf9ejmevTdBym7F^owF%q6n(vY+mhrsm3osLrV+IMyv3q zpwOHYvCJ`r9OeG^#w*M>0=B{-?#d6S3#`9ikYjNE8Gx7hyI}Q-IeAUAgP_=&0x`$(T-)3~n=E`V*v0 zVU?}Xth^@Eu(WN;EqlOaje(mbQ>oA`n>wsDII!V55vE2-m=smcloLmb^vhuWh;BR%fBF<8@Ve|Xz;A+h9o!^P zVo#C2^Eq;~AP^tz{nn#Dj(&#p1o-Ex=TaDKJx3{Hf~loszDlOZ0ngY;We6H;Z$)g= z@|+pkWk|?#$$F^=&?H_kP*g_Icv!VE2mTy`dujoUN{DdDPS2!N`Qoi+a2Ui>oOw4ufzKoLd`$WOUShvUMA0loe-j2%%MHqbuZDsPXhYE@@#Ah<$09-mtQ z5csfPr1@eB+hvg#=#y0BY^7)1{!#1!(8jVB0@J^EE-);N`; zAEOpeu%*9`*t=GP=zy5g;gqO^F~q7Y3Nk{+tRn0d#?|1MIRrHwYUs+hNs&(CAD~1< zObbALB{V<-c%Itm0>Nl$V>ba^+g1XwCMMw|&r7FLh=jU^*9jLrcT5^RD$ru&K z)Dh7;dxx!)Br>FBzFJY0ka^lSe)%3=YaFi;mz|CzL7grwe-%udS*p^$*wld9tHl0o zD5B$m?w#S=aqug}Ssv+pSoTvJ)l!!Xgy1s72Fm~PU3$TP`1k@VAPuVBsvtM2MUm{SwI z8|sBLR3a!ND{>5txzZTD6)I98v{b8BadR;+%ibu~SNN!l5Z|2zT^lEhD)pv)Wt;?W z^t=z>D7j*@4GtcfGIQdRMv50cU;eTAiE`s%!aNc7o_)|V`+`vXvhqLy?XezJADiFo zk@-<@t;~Vex|0VeZZm@G)<6xn;NfHRrY| zJK##9tN4NNS~MAMo4m(H)1+L^z}qfkHy@ytHn$LvSX0=C_0R7*1Zu$Io59s>914V9 zzwA!B#A>gvGo{VGT+vIxK+*SMd@$2rt7n>s09=G^=fk(2AQgQ5wjoHN{LZo{CNwGeA$<6y*Bf zVlQ&UH?MO85wl0uU2v8DtO?__Vy}VTwSNj z+uR2K@2&6dMpp;G*C+UV_5c3r|NYhf`>X%=I{x2Z#?M-uJKW1!M(o}Ek7(;ZhMTvB zw`~t=H)5|hR4)(Z3)#!8c)hsgGDsFq{=Z;kHOa{r0KftJLh>zUWzG`dS;*HqoiB@I zdW|~*8NS3AV;6I=M!!9KIy!vuX!J`mg}iRg`)8C&&hzEbG)uub)%HwApql$7qyHu4 zZ8H?a^d9ZyEZ13ASE2RXp{7PT5+z&GqZhovdkr`aIR1@#hB?R>$E(-rQO?pOdbGlg z*#t&@X(z>*lOV6nXa+qLDoGPEU~wHZoThM|X#8wvik6uqF!r5jAQ*G-!)#hC#>7pI zFm!1)v6O30OiynvdcUGqk7w&oqY)SDSTYCo$RbeNXXn>w7iqbgE^&Qy$7%k==r=7^ z@IDt-MSU_cB^9yk%T&(CAnAI9aTL&@xj_v+s+f0X=#Tj~tBO~Q3InRc=Q4SpN`%JQ z5%{dWAch7q%Y13Pc2QBZ;-F%MH=C*xl!DuPXAp0gn`D4n#KP+bZhn~a6Fa<~2d@M2 zMx0?=hT=olPj%}GxgR?-%=_4jj$tVVgTWhnjj>dlia9Ggf?6mzp?{&)2y8asxAdmR zqI@-_IW+#X2%?P$%jL8Z5!iPf5!kpG`$b(qqTBSGQsB^T>GU$^8z)IpUks741yoDlFzmPpI12QbJG zp{xPUgKR#Yt|r7dby|!Y*Oclyc1M^5 z>WI%qos{q2kQ*M23Wc-mk1nrptcf#6=^TO{U_pcD09GzNx4BC}QF^>7n;iPKpM&|c z?44(B)he z<4r$Vc`A0Isd%SuifhC%=yrL&>p=dNZ1=iw@H}Xh?O-99L&TaUc)3{07ulodBKzvi zWO=p!FDCa<$sE~l5P4>Gaj^v-k8yw2Ya)$r<4*%iq1-Ej;n4MT(LuuZe%kBq9*}kB zPkW8`zj|#j6`*7xI2+r=P z3(S_$?4Q+SK08a*so0RNAva}Pn=5ISEJ@QngUVZC1IkTPV6dL8-A3Ng#yCS( zdxBA!#ko6+Y+A}H->o=XODYoO$hMZut*5m_2e|FCbbwz)c?qu zj2wx}tp`Zx*|Pmb{Q|gI-jh5zi-#o(n#7YIrwf5ln6z}}??U1!GQSz4Qn81{Crud{ zEN&2TU>*v_fK;3jDHiF5!PqdOki5oWOWpGTI5wwT|0$yEOGbNbv$YQ~<=(dWd1;en ztOj}3N$lq>_LB;rIq;1ap)y1NmkYeGH+mG;Qw>I{RxH&`X(p z@Rv0W&gmaP8k8ug@$*eY>#k!n)aj^tu-rc=)ZB^%+@VsM*Sv- z#q3#;GyUKh4v%pAo&WQ`b8skr>TGOv_7B<_vbyNS-N9@$shUIJP>>(w54&4`p99Zf z9d6f(Coa2d!>6t^#RM|m+XW=#eSN8EGN7!iY3``6J+L$Ikp^(;3{I9OeELb(hpc~= zP33;otk*0ViVw9GemXqdTW&R1kZQ~+Q@?S@EeCWw4Nf97FR+(U8G~`RaDT^T9u;`J%%wE+XWqURqsQDYfx5y!+pa95=Yqla;4j$<#C4NwL6i zpRTkR?)!01avcxc#W$cEj(N}IbV@*|3&6@3X`(2w)~yD46X zqp04=#}I>!CX`o9u5uSjxqm(zf3&Z&TPv$iSG;#aypWoxC&X$#?7Y{9_p%Qi?CtIx zbc#0&#xO^}85k#Fr6}`MvF*X3mT3(RKaVP14pn>j_q|TH>oEnV?)plSzK1oDbHeSJ zwKv~x92|HX(tTqSnl<6Ccf$p!p)q+Ash8$09=qQ-xX@jE(5(me%j^fo%pwbA#P>T` z-iBg+meS>8T&b(j? zzIIeyi?7@UOgbhvW!t&kb*8LtBYZO?t*~heAY3SM`4_rM_e{TGqFc`DUpdao;6g^w zNUcc{m3D7ywQy; zwIgt0*tZ1g9Sw+n-#iaV7Ciqv1sUf2CZU--&i&3)IG+?pFTP2WwS(iw=h%krTG8Gs|2B^g!ajmC}O$snCh^ZvqU+FLEN2r4MEi~8}30qGZy9|I4C1u?%v zYA~(wCgqI;RaDVCA|7R|`xFHE!Y3}Q<7~c`vzF?DH}nN z=K;(L`ZJ7YBiOt9z?{%;A)O)*_hEZ%5Br%n6L*<`8;-okS<@bA=HPilovSdAQCEGP zci_WNViIuKFMBJxNs9y8tM1Yu?{+t7lQmXOoBV0#{oA*9LB=ba6e4rNoB3TDmGZz% zT9vU1DT=Do^gPwXytDusYp(?Lzrs!Pi#-|t&)FD*4cw~(=p6sg*6PzIs8(5dw)*15 zv(@M5|M}$Us<^lIzdrfTSO3qi{-0m{KmUFFKa=*IlJ>eed*8&tnfM{-p?c&MduJ}} zPx{x$|C{cIFJMb+KYh`D_RRK81qjN?^dKBfhIEf*YFB_T zD~Xum{X;Sfr{o0MXo$|Qd!7C5cb%QXjkoX{B$31T3h5G8a2tM>F@C*h#G)d7HAJb| z%xv8yIL%JiP^ZCnF#H8xMr-A1<8?e6S4+)h%Db58guiG;NY@HoklCWz%gWM{%wW8< z(Vx!Xh=QrH#$m#%V}SXIqsa(8{%~nwUogWed9B{TH&>+r-s&7~Y`^VnRq6t7rzW#$ zFutgk&^DAi^?v8Db8vXD*20@0%TJcOD}7_h*|iH(1IL6k6)FpXkHiMdhUBrxGn3f_ zFQXG?9&}F-jYiQJ11+CbYa$8H#y!j_Nr8+|uvCC#s3oJ$wei`TDwNTzmKnF4D3)pD zF1BI~nzGMBZHL26L>wqSa@aLmVvWGlN2I{nK5 ztJUBS%ZC^5uF!W^jsQ++yKSVoHf@8>DHIykQ072zL^uh@wvSnQcLkqoFN05^VI`nc zgfJRi&WIu7i*?ytQ+6hTHAfZziK!ek%4P2DH9Y+CwzIqCER<1}MNziB4aJkpe zIO8~`>fy31)19(evCo+miC8(8R;sfx-aYebs#P3U)Pw)t-rN4M!bRPWZ#oRd`*CCc z%|XTUvF2F&r0EkVlpsdfeUNb)u8UHf>k!8GH|90)W^b%>_2@Bbv!kbdiJKWWXL6*z z;=w81LHN>FqK$-UbYb>S&fhz{L8b{i3C_at7^M}M!Je8=Te(l>y0FPrEB|OTs+2SJ zajns))Tya@IqUiA;9ri9TAn*bi!zSXuVas8D?WK~i`~9q4tW{BO<{oW?JngtjW^fW zsks-|#x#LMF_o5q<_!pPiDqRvCv#UBsUR4T1~?p5ZG3n=9M_s9ag@S8E?K&Lvek=& z-Vj4CRR>|rxoO?Zvskc;7yaR>;KV?p3F2S)dpM|8mT}8#R@~ww5#!BiV1=LhKs#i) zQm@cHRnPVb>Y{ZK)y-{6m)9XXQxpwo)>o$`>l?OMv-uN$7SWKIh+ub>BvU`Pe}nM! zRCUnPZf-r`oVTeKe45;*S~Qy))yx6dq-;AFO^~E3of{fQd7{&W3b_rq{Qt5SkF%P1 zWCQGh@G-bj-tUSZ*Xlz$(l6UPCGovaGYwA(Lmo_(VPf}P=kTZ9t(TadrQ~o|*&a*{NNdpGZ?b9H@U2a^ zacVBk-#q-$0CMx%g^SCa7S0b<`Ue&&)g?dTru~VM2sbPZ+$SLhU&6sxJk4VXLN#=0 ztHqs7`%w1a@I7&&Fuh&QuUh)>p_PFk+MN2!kD0UtLF|g|TFfq^ zk+Z1skGASsEvM)Hn-*KBW#JkdmXf9{dlM8@>^_{`z0Q_r zQ}&zqsQE>DU7Vt9`jFLcKpqBleALV*=ZRPwXDVA2-5TLsw|&gyjh=trXws!&Q4{0R|i zib|=HcQ%3{5e1uTwEEm9aD*Gfy=7s~w1U8GRw}Xvb!5iu*Z=1TTT1c60L(>(tvR9VA?2YpeoM~O>c%AD?z5qDY1NX%4fdfOEJIFM~vYf}s`}SjD zG)mdEs_A=ROv`SVaYG#_$IIh1naI)J}D@@#_2}m$2-9~O?&sDDLbhCcvS5)*8}Eq8Hq^*>@*RjMsuaPQW7V#slIMxr5bEKj}pA}2p%ER ziGu_$Jv{3Ggqy9-5AWZIzwf@^7qnu;Po4daRWwxs=V3{A7FF4|pf{~n)+!jWrUttx zt{FJ;U*^bDmJ)VulegX~&Ku`~7K304Uz1b= zM`t2Dpe!OWf$G=A#Kf%N0X_S<|&3kWm$(sCMWsoO}=1b5U_&>`FJS!9AN(hsm8P6svWm4u1|f(i{s>2#&SOi@_t;6^6(8 zqKb<%(Q@}qiM_DaT>AMsng5E(^e;wWGIW_M@YcXuqQJo6P*^pugDV{wpp29<*{j0n zOx|2Aay8-G2+-U^UyMp{bxhw?5DYE%dQ|36r;|GZZfFc$?r(Ez<=+m4a}EmX?hZ=K z8&x2oxud#!*HJZYZvGmhYRQSW7*$*)bBA^7uET0x+x;cRH4RNX#@MhJZTj?7iTPTb z&a#O)yRrCQvg2ZfkDvY6IxNv(`#M*I1XIS6O)rvMjxC&2NlV0-(|a$) zFsYEMbC)G#XHiv^xB;Jr8Ab>hbNH=j>Ej?U$GI#|CRwz-UyyE7E26+m@r^l^Y zv#kA4tQI0)3z5^p>%0~o=eJPC(a=L9Gj?9C;!v*|UHzC4d17HVbcM|_9RgIg2c>Vm zQA@3Dlg81?F`nta`G(h3_IvBtjO^o;(N!x}AS;)`Q6P_234GN6LSGZaWB3SY!!zZ2bJlnMQ>BF6*BKX@cmq|{h}HZdR*Z;BjIKehZhR9&y(L}=Wz1U>LH|4wr6s)7 zGg|)Rk3W_O*b@3&mGoSEUi$v^zuHCS|Le!_|4RCCIGHA77T!$G@2`zw|1Z&MJ$oj^ zix;gYtItY*6=^Ks*g*N^JnaLO3XW%okIN*4* zBv?{rb)`>bZHbS6{D2l@4}i~qD!oMRhx&eazgEf?TS5-LB(#NIXua}U8uWMuQ z^@;|?z)+fjAF{q|AgvAWPQxYmA9Mxlfq)u)B+q|j$L#Zk#4VKT1m-jLb!dC%;Be#Z z+wRu(ex_5~JDc!&&0Cm1Z|uKWD>VkHl`h(-`pf4G1)yaP1t#IKhC-t7o3wis<(1#m zduqERtWlE14cJy`7gMX49M9lW&==SR(byD?-$j`#3#iKiS@&didWx}T&emG=6aYgz3IKR0sQ|3u=qUw|LkdNRpozu{$hpr|Fh@M#l5xv z^~rzMJDWf4irpW7{M*vsmi9aE#QpftF)U;l%IEFb{exe~llT6cy{o6LgmNbzT?r%g z&FvMruEJMYVG##hS@iDywGz-BoNFb7+qu+!ftlAnwD@ccgHO=sAQta}_@AQMgWqs| z{-;8-cJByCEZ+7&RG3W$J-i@)vfO&IOk`gzZx70pj*X^^^n?RxIjZTDrMa3~?R^Rr z&18qZKM4}>NP9@3KtTR&FvPL6_RH-R!Zg@PyDdF2DF2sq*X!*3j5+qmTYMyOyTS}7 zh%>oW{B3FbM^Sp{6PF&A)=;=P=p2fY@B7-iDafpsTu>l<=7N#m*4ANwSo(2mOYzlP zTYg(hWzoMa31bL;jD{5Z8kY#=!zAE4yN9Cl>o$fi&grjsvwOHJtoNP${oVb=s(&y9 zuv}29`LOhO8Flg992E3G8P(vOQ4_{x*qe=k$Rvh;TcV=-?|0y%ue(H6zD_E7N1EzK zF>t9VEq$)QJmoa}gxqI_&Ztbu!T2JKqcQm|U-aUT7#5rpMi_DUO4ep4X9_JN*zyy& zm=ca;8Qg06GiY|K%Oq|2%|9u!tDT)KZ&z1u+gDTA?vu+C7Cph3472fot;hdb<6;nu zJtUGY{}NNL)=;*4_L8uBD3{P*qK9g^TRo(e?Bxk~fb^ak-E(LzPi&kn#_$>q@vtQx zu8N0G#KWiJ;WP2@xp??OJp4{P{4c&)}HI`oGqb)t0!Q#=ky=&)4`*U*kW0jsNs-760jA8lH(CdLKUqWAQ3UP8JT> zB(gD^?lYFuU7jx%|H;@4DgILn13;}}0H~+St<~ixD`MqY`{|Q*>pMFD)RODVCZj>E zkE1~_5pSj+DNYjJk5=qsYlX5@tXG;9^ELcj*TM9qn_|^2Q5P;GX!i4xE=)cgn2xVY zx5$+``Itf(4*UYeC=^f9I}N%c44tG)SpMav#`(JNl7=JjS&H(9OA^bGv__za&fg{ z{iJXkWr}ennO;}%&^5eh!4LAqItDVhb;K&~cXH_T7J#}*Gz^yC1k-3TRZ*{W+$gBl zZbRRGjLAuIaEQ^%E1Pe(u|H)@6)U|((E--31=A=0CeO+xbXvs}!m`CKx7coDG815o z8}OAWld?l8Gc(M##o<)2It9r`N;QjAaPTTjIN?|Z_OF}~_*Ix9^6|uYTwTtgnN%w_ z4o0GFH>0}>9$bcE!Q?eZ?*^Rt@fMq?~{YyXYGrh(Qv`C6qyTc9x&=F zTU3OJjMFb+>aNTK75vD8lUHouLOVuJPVB& zVJY3J;=3g8AXV~M10)*kpKwiM!e>spf@kLLCLH^I*x3Bd zjvR=Jks_jU!q!6x&fpBBl^#3FsgpGyyP9;HEgfYNmeu$RN@P&2Z2?_}j*PD0brlVm zDlEDwh?IyAj_O#0N_OQJN}5-#Ny;P+h;O=_c1YS!m5s1~&X;5g)Z|o=p33r@TTOkH zxs2dV3&_8iD0PN0CQ6eU$-%wSuh^lUeLbPdZs08^xHLoC^g?qxG7sKo8d6<6FA81; z)w-{}nl)l&E3vSAk4y=@$R&HxripXLmU9_H1(h^~yM;#6@=wt=@-obwih(nDGL(FP zxjCdkU~0liewmDc>+PqyNY<=Ib&zQ&!)|SXiQM|~xbQ43giYd-m2dH6GhldO9r$6n zG`b+PnF~#II1Vsmgv_pelaas3gP53k%<48J8~M#13pf9qx0&DX*i2)wW`1^>;ccDM zDpjP!Xby`v{5c$W><%U$M~!!26%mC0^1;a>Y@41*%)jd1w>&P=#Li zdZ@5W)gWZMvO%7CRTWh*zvI9qYpEr=6mwd~$S)LMNnc5qikIA~WI_@QWtj3{LPC(Q za|%U{461sfq!lTys6y~}yA4NhI*mygX%MLs6;{-}ftu&RaAFBUCKarkeQGJ!WobIh zg3AQXL%EU*TRJO2mjlq)BGGBD5B*JtMiaHHBpZn)b{mG(ts|>KBeh#~hhs2yRm7cP zG(J;5(!2^8d5(o^IAJ7a7gA7l1CoLCT@MrZSO8;g+7QEU5usrh)_4CDGwDir4{lG+8xU+ z$2oxSjn?uKTFcKW+SRg9=QPw5|0hK^rfOC>LlJ^F1ieKW~TDohreh`*yUF# z+i|?R^f(yRNsOYA@TP)Abk@s*qYBL_(j=Xw+@qF-oMiLF;V(Gjm|LbeL!T!$j*Rfg z6SGnmtDKFo(eS5aCKRkXtF=6QK0CAUSyIwRJ+u@@I$i7tJf**MjZ>91c{DK5%K9s) zoG*$o|E9oKN_v@mR#AbKUT8_CyJHSl1BqC9T*&h|X^ABJ0tAuMD?Pgk!Ocji5Yy`X z4TVkpi(E^|bP!OQCHBoglil|6GQX{`gGMe_CRD8DdSZUB`#_JNoU6#jt5ytWey1i6aEtvw2J5QM50NSWu3zg^8 zb+vzHWIKse(#YK+JRpuY9nh(P7 z8p25+exHQ_><)v#56f4-FJvTb_9r2o6nA+Rb5`6<_sDyE@DLHvupJGKkhr z;OK?cGe+~NP0VjlqJq@(8x->b*|LCGNZbU>8$Fg3MG+A{i+huEO7B;NgGr6lioU9e zQ8mKL%gi|XY8^PWe8cCfH^ctYpB(dwE*js{pHdS`YjT!z4I4xiY_Ki&8TUW8=FKs~l%i8iR;o zSa2W+5Nu@eYRy;tfAC(sGd{x<3`Vto;x%YtMHL2BH`ATb1yn8Ded6z)$+UT}d%Y1R zUCyA$0P-AWjXg$>bGolmRf`(z;|P661!~@5r=S(CyE50&d2vM1t9q zii#GmmEj?r1Hu7b++Oj;6RqV+iMBwMA5m|G_GK)JnB#~g*imvOg9Oz%#RQ!iV=Y7B z@KrhQ&!AfAbPo>qw>J+fqz_^^;#;9!b5asBY659KvWtMulj{k(7^5LP)i94P^g>>2 zk*q1w2u>Z=)CdY!BuaddR5w1$`yo}}mtKq{Y!%tt*gxo~0(;P1r131Io!!IjO}Y~}t`9PoR=};|KJf1kI#Sog zW#8l0k%ddeETB{{7or@hw4@v@DyP(GlQ=+|*fnEcz9?U;V%Tl;_ohMuV3bn>(d6!0GOuHJ>(H zsku{2w7x@gr`48Y?nEHSgfUE$r)g`$L3+}yYr(G7T#?eiwwa~{#7u3l7%1s)C?>O$ zVb~WTE)zV|#cd<^NU5>BtZg@!m$weLxcxoZJ~Xww+}T-P{`KA4lB~Co9jMu{+uLR` zkUJS=GKj_f{kZ%h_Lg!A?rcrTaPDA9$pCI=J}Ku(**K<@LB@^;O|QKpR%$d}FTHxu z**V-k{JVH4cHY1Hp|cO0+t$Y6Mu|SX?O-}aJx5jCGOm*u2uktQwL#d|67y@kW5PiI zqPUI&>ghH6*%#CaV@!{C|* zJwOU@iqoOg-yT-X`9zR%zUisL95*z3PLuMjsLIjT6Ay>`X>g5hnb%0t$u%xy)O7)w zOp#Q-y8iO;r9T!Yk*S!d75HHNxG&2$N1&-%>)x zPefSh!!)UB(4k%wzQQr|VmQRQvheo1y|>#Ay%IO9N`KZzHM3RvMAMu;Rao8E!KdkU z68En$sK)gm>f@yJdIXS6zTm7)^kdN>${C)e>5 z{~IOOARZ*~#dQKievQOlGy3?Szfa+{!`JWf4j~+Monlcz-y>QYx?>p z%}Kqz<8PXZCg-@p;dI48LoN#;t}*S7@iR+wSbR2?CAfI{(_j2#7J}R_6!i3`zc`$j z**lAi>z|t6<`A~K*@Dn-zj;(EDxY24P63Ur=0C<%WtXYCd$CHn91Um-1iu_mw>s@- zALIOw;S7Oc2Ti;;yBFZ{nREVs@@$39|4*K`T5$Yd74+ll`TtLO4p`)Gv-O2omq&p0 zr5&JS_#ID1>at*cNo)1jmE+9PJ`2Nb(OP=TVlYs*`tlhZTGtf{jfa28raw2QXa8LK0olcV6iwUW;UC@U zXo8MUpO+v0fy?l7BZeYm+4qjT-SOG)`;}vHiUK zXz3gA>#x6xgH+v+h+)*1cbE}(Up*FJ?&*)`{uEU^gQZK7Ap*7|IxchyrnT)Xflnj&<8?n z?QT+xkg*`bh5rD-^e`(`@)CZjd#59$BzyF*eA@ZtGD9kfVEHU8tD^W1y<4;B3bh^ekG z4LW#yr6W0B8*EI_YnRJoVqH!CehK*Q)X{}d*@IV5v%?( zhx^-a-gNf4)Kh<%t?iD2BE)z8GRi$33$~u85lFOWdvt<6O4ESClECo*))YFglYNN? zUgy`%&feknE_U%r2KWEzps!X{=|H;_%QLAef61=Q%1Jg|9%Z$@%2Wlbw%K4^lvW#q z-~v49Hh}mobT^e@bKqB#ETyyJK_L5zgxBf@2Xu9*S&k3fZ zR`n0KThToPxj#f0?~`p{=w*;#fC+WM5zhu8D&cx?R))I4Xf|YN4EE8q_n4=ZV9UMt zk|@q7fC2?YoTMh|@Dmz^eU+NU{dd&+2pchiFeklQ9VT|t%ENR%sJ))hD{t>PEC}If^C(N4nM%? zWB*Aw%wm5T0*sSD^+I_orVciM&<+U==V*)b2*o9gAQC~x4mS3-DH%~fb0DuHl3D*8 z`@8|t+Idhz!R$(g$rOVb8ZVPA;W-B%!DJDN=Fn|c=IbyfkAxpauLfdFFe1P66B^J# znDl`;1cRnF{85>D(UAsQ=Ie07_MUGsacu4RtfL8rwEe~0x`26dmC#=pbQF6Gg9>s; z5{^Ksj5Sfc+uPkg+}JsM0Ac~bz`ijl0xD)tO#D>-Ii?I=pCI#I!Kj=DF znEpJ8qM?4-qfFOi$$HV7%H+2)yE#@UcNwY<&f?;;CGV!#osi<)utyaf6L`RL5dp++ zgon%EwNrU9PU;SiOa&d>U?l`&19t@>Ohi`5`XU`kU5*#&i{$@sB!#t#+jhz(kTNR1^I*0y zmbU${wFRFhfQWJh$VZ4O+yoy9S8mSM{!QpePYL-qvIAq+$)LQMegpozPfBgHnKOwz z9IMjhBB6z5!PvdhogPT4r$875BzTtIGXuoIgLuBAdA*zlQB^h|HMteJ#Gru4$0Cio zx(}xc>3lZbNnj&j{Z=}#Ttwl(nilPnLK}J6rWf|`#$twxSSo?6VgIJlFuDxls*XKT zCCR{a&?T22nOmM1s_X6}JqcVPL+;6S9-y_f~q z?YB4r7z(F9niwD8D?FT=-KZHZk4xBsQY#$tU_B&gZV=vP9#B%Z4=L2&1E-^f$ z1_Q;!%_FNjvj`sE7*O_ntH+6aM1_1FXVkX2I&ewg0e!4jhW?tH0#`YmncPtRiOewV zzGtu0q*b-#Lo&jOPMggp%KlpzR%slupvfxUadcT%Q1Hxvo(UWrl|=^lKOT_n^Kl(@ zc**R9x|C&)iE>lu4KI6F37;gwj5u@;O7z~XH*dLZQ;G+eQhaA{dgwMBtN|V+ z;o2`Sm?XYEmsg`%Fj8bfFxnp;Dg#BvA=GcGYLY}p;imwt`!>>Esc2}bdJ`vECA|oz z>ZC0JxeuJ%A`FK-4ST@V`G~ml{_R`Yu(J-n&CWwv>MpP+u2jI(LNOd9p`^5|oV3$# zM-1xt2tggcET(m}F&xN!;YUC*OYZL#HR>MF*m6}M4Xpu?)QWt~B5|erS)4w2hRWC= zPpfX4^)t|dmZu5&GPhk*niW4hiWo-l;IA3#JxJ7>NEvZzG~|$s=4$R_dWVn@ugmtd z9G(&P=4kJZQeB@3ur_B>Ral=|W*a*UfQT>UIlrfqslcDaUjtLvb);=Qgk&%!Rd?n<`L|OY zz6r;*E-~~UEM)Y7o+@h|Rx?tgER1lf1k@{68gu58-<)^{^S}^ZIg_)Xc$k6Y%t*0R zXh4wqDE^kS#xen+vy1H@0OoQYUCLuV$Q9!tCZX}<$~r`+KBuhR80honCJ?|0%5E3Y zN2~{uC2smk-AEyeh|dDUyJ96O3q}e+`n8@x8DAt;0;ZDyB$^N<3gqC5iAn{J)}I*7 zATqtNUdG-Q6pZ|a$YLNzqsPnySxMQ{qRD4>jKX*J8m4Z(qRY;@Q!}fBv+8VZcM57K zB^L@pzMILMUPuNi^>PmQUr=3GmWnkmdQ-!znc1fdpoF$}HZT|y>vE~?204JrW^{y_ zi}5_9(wOJcvcq6nN)6?}BCS84L8OK;G zS$##DdUiW6LyZv&VL~gL=)CP-d%VolQwZhPlO^T^49eiJz#aP>Y!Qw1R>dSQdL)o znOZ-$!2={KKFLY3$he?ScLU>*5+;7f1A8_P%56KED`DaTjPVR)f2Ol)2}CoDO(i#E zg=@*(a6Q`8TwSR3-W$|?E*?0*i{RjBU*{;scw^5!TN>)BP~M5s(U6Xucoie%VAOFj zD0$JZ#odm5F-E2XQpL#|hB7D3UaMwSB1jT8IDuyXhDpH)S$Gv>@1kWr-oDe0VEA;b zM0faVPmji^>_L-JR3y;-R&=T$1fD)XL&51Ob{Mlq4Ow}HA12Xc0!5?KQ??{v5QI`H z* zD?IITq1a@DM0*+NrQn}j6MuU?&1Sk#?6xD+?PGrQtzfv&I8ot*W0M-%EY=X6rgrN^ zt1PYJju~l$lsYIq>=E?Ko@`bcajh>Zh*32i85DYrlq=+#51ObiApb-R{tyQeYAYySuvKR%KP8Zfcq zc>(xi&%SAN-lPArcW@GG0=(0i2nwLY)S6_vx`LXjegs=YG2*xF@SJN=e6$LUyEkXi z3>I823@zb^-TnTI?pqSY{L|>zitCuSka^rEhwa$f{&Y^wHAFlo)w#*Ox~q^u6!R=a z1uSjQIU$jgGER)UwI<)0AJam}+} zC^{QtrzKN8X9?otEI#o)Zvt&kLW;xesz9kanVpQnDVeQGLj<;5?7qJqiOf~neA>V_UQZIjF6F|}A-FBO|G z3e(_|wnmmO@kC_Yoytc1@aPhwuascOPG_Sa4*TZbR1G=L<^)$#>eHYgWgaNSZY|iw zgd|4oA|Y)aY166|prrM3ceqYTpPOH-c*SnPcCJ zp*7I~#B~uNqYd1C&e+JCqiV3PLVl~MCyDRwY82qgQJ0c8Fg!jahZw1&GI@bzIONBO zT;)Q#87AizLQDBFou+&&2OT;umXnX+1jB?xlHH-Q589>-O5qm40g%`n?Q;0}2e%P-QYqDfRIerZQ zYjc>gPw9x1Rah0yc=n#Npvz2f3*OdJHRE<`vCCT7u{S&-`8_jjx_s^kzWdv`J-hK8 zu-nI*UIDvgV$c3U&MiSd-_a-V1WF0^!{Z z0Mn~`#Q(^_tfxGB-tC7AFJ0(2fn0ouMHSO!-XZpYT${hpCa$eHmbwofbSJaCJDcPg*Y<>(F*Kam-5EI~Jsw?k{NZY%AzF)p z{kLLaUoHP`+R?A(Xc0$BBM_P1`12X(m5W}fJe_DAQm^e&!&ZQ7t)+91M zl&hnx`77y^5A*8j>ZV1|1{*>eK61L)Ty3dqPxWWZy0^7lcSYnyE!SP)_%4>~cM{XR z*xcN5-JXDjg!Vg+J&&2+W5FxUc!$qVmPJtRQ;_nTLKd+v;9kI?$Xv0PxUrG&vY1QB zvV{v&7fP3BX5n!WkGbQQk@x<5f$J|zeT$RSFzO9-VCgJ9?H-T^*aS1Cji+>B73eV3 zShp$mgHbR#;m~VSj8)k0#VXQ3B;$5Oam*2sR8{gEJ0;PB0|Y1G6hjg39%LNtoomZa zQ@-x8K=~;8V8$1D&4Q$M(Z+f5`?_z~uz$HC8cZ@j}(jBw1 zJ0YtmLW1rgCvh~G_0c}#$Bn~{x4dLA76`55Ue*q&ilHpeFq9>Sx$6#wl^UAGwJ4=` z`Z?*H2F%gPiMUl{p5(Fj`kZOmAIntJd@?(gcTmm2aOm7arP^hVF-yT^f7)xj|Ftp? zSh5hTjqUl6dW!(sJ(v%OgM)ja&Ff6$*0O%d=~xH)!1RjUN)rjIDIw4V<2UQ&EtWq= zxh2bSZ}=o+19sROUlH!<;!&k+?}eiBR(NB@y9+C1E$fMC7uK=a{CaMT8RGH4>lK(` zcp7iEaeV6(PbLhR|m#Xydd$c z<2gZKYGPw&ODOZ)d4Fb4;iU={RTxvzqm|>jtaa2n_FT9y zkEDo`X*62Coh*(?OVKRnm}gL#)N;{yat#Hj3ft;ssyLyzb@9Hxg+|N7!Y~jq%2=41 zmMwW@P<@2KwFA418N4+kdltp-Oo!Vl#$O!`g>zS_-TD2cZA(@oMHgV{xO*t1r`Dl4hMPIDF_`hl z2v-WkbT%1g!!6{PP8ulo27^$h$;HphX@qSTmd}h&{^N;n+Ra>FS7zgnW8{7`DwXQHh=7lFfc{HtBDEK%Mk47mQjKG-MIhtd%gO}7((6@|8xU9mg z-k_%}w9c0<{YeMrj6~Xr+|f`i&mR%Z7?*xKUmXwZBEZ~>)o*5 z2Bt+bZJ$$$y1s=+g~j@wP5q=hbi%s7UYfvl&Uj>C-EbUCw2KD9urU4)zOB58H`4hIB;=FO7S&~DcEb-QRveb zI{u}ftkb^07$g;->aZVF@|9VRn>W_E?8Re1Vtyr(?gcl*Dl~uIpBtZgq#A#LBTv~- zMwl+2cGaVmfGV%$n8iJ3Z zsPk&&=wZ@UBIOz$!%4hadpMvY#+q)V;zwUT6;*ESVIp%&GB8}A^w)6#{fMG*uchh@ z-^r~IYS}sL`sLeV5Dr7TAN3Y5VzL#h&`jj}zuiz-WI~ol@SDT-DuhzFgD|)`OjcPJ zfo0P4LcSr@0ud4~#6R*0w{lZLy?-J_pFcdAl&(wC#V|og%*c;St=@4ijN4GQpQ^Jq zBabkF=i3ODk@#6Ann~LD4pD83$@zq`tM*PX1^o29EuK>1*~UpP3Hy!c^fU>k@?~c{ zXj7`s?_V$d$6x+I!fv!cI(@c$aFtAh5oR^L=Qdg^E6<-k75^bb>&3Gb{8zO2H$G3F ztUOy4Smw#|)zv5Pw-7I$K7S_e8H=xv?|Jn-(*E)?nhZQ{+{^PAVO`U)=V#8}E}rEq z-?`8A{o}P6O|CdaT(w^lt^fM37md}Gm8WEyi8#NBquJzNfENY-N-!HX95&Hx34hL5 z=7xjcg&aycN1m#XNCIT;V4MVX6R&GF!-4v2?l&+ZfK5P%K;@mh9;b%hf>^zC(BUKs zVIpi;`tYbD3u48~C>{=wSq6>E;6(KJ%zPRRVOt?ZNIY!2<8`gFCtqG(>g36?1Itgk zE6wRA4DP(p*k7xtM1ycZXWTgG2O+10g9-Kw5%rEjkBwEDG7T#_nf72rFl1tGAM0W= z45Z2LfPykkB@i1g*_=upjTr?m19G7m!9Wtu631{f3I-T|h;qn$Y5Llr6xSeb97dyF zB7ScE+}w;liC6vT(>ipq54bk_(dhM`O7{q^ygg`(bn~fS2-uIF3tW`TE6ccAl_Gafj;yZ$h5>Sd3S$8XSI@+VxRLo3dh5t$Q*7L|o**5g*`B^3TlO>K|aPRWe2rUI=Ihvr$PkxhVuWBjm3 zGI`#)3=o!}F`aItrYXW&{5IGMqC}Wyr5cYwd zlUh*L)%o)D-4rJIyD*rY12w;10>d=bu4b$v$Bhs}6!Q%Tm1sH zUenBxJQI~1a7==Y_zVt*I5c&qr*#MCeC6Q=Dv<-=*=TWXP zMSglgJ=vRa(3{GHBMIKz@Pg9%bCrRMt$ESXofr$uPk_d~SJnin`Rl^xLsWf3m1>3d zh`Ly*iM7|Vpb#7S)}Ju%LkB-em`oMl$#*0s2bgqBor zHl+Ak7Znz1jd#w4MipfNfUq8+yCg6jMxj=t`#g?a=`30;To~cAH?_cnaBvjlq`Fz{ z)fFG3PNB4a{qRDf|3M z@KH`fBzdg?u6Q>d(-8S%I#R(0Yt#;IZ0YZ&-ysiMW~{O3e8aW=FiHZALs~w8ZLC`M zxP)nXd6lk>>+AIIHKZd4GadGy#zlIjc+sEWGF3w^nqq5vzq5I`yZ`s@L1%Ace*^wR zQyZx6H-!XYfI2f_63elFoQ^QUrk9seP2c)>+{*E#au!K<6vSsi7x>By#MTQmLmW-& zs+7+;s?h05(W5*$^3)=ZxAC%a*2b6FuShH;baP~4hDY?7@HRoNUI>@pApl%|e#WTY zqLlBQ!kS;=9L=HfGcfaX= z0WD)K6brJnau=d4@agpt>tcLpA=0FX+#_{xA|*#0jG_xoI!z@ev6)OF)TBF<#R|J& zf+_E1msLue1rBoh2&IpLgvlsFuPjFk(`^gGkfXCZg|cB^{Oop~+B;+<<589K#k*7s zCyvCV1N(f1bQqsjII~3Qv;>rMcHoDiezkTBrj;BXVd2LJ}Fyo z2v`DTKwJaxw|5VO_cE?=CH8N6gD554ocvAMzsi7krmzv)!UXC`z^c}d9`P)Hq0Y73 zBu%>S&T7f!0}8JP>$CAN9Dgj}21dVbk*y|!84E##7)l4Zc*Ub!Dduiid09=$Kji=y zj-1TBBaK~5X8JwQ6Cz#_ZS-ryp{-<5;~q*VUu5XBOc4If;ecd=rMB7-7@mzs_*uASDG;*83XaplE} z7sRbqI-S&;LEN5yPW=3n2VOe#Cw>kp!-81gMqY3n;f1oF%bX^dEH55jk)>aM+8bh; z9E^=qrBkugfUVSgkowX1B8aDSe};*1`r)WI^e$4MxM476{DA4waf$!_W92iUyW&Mx z(E#Zg5WfM&ww6$CD6Sg_V?NpOw6L|uFwOJW1eI5z7P;Qtw>EpeGjwZHSF3OX!1pS2 zRpz*>9(nA2u&y{T0mBKxb37bpJ;%JfsbYC`HcrmN(`i*V&vy=aM>JMJz<-egxkugX z_&Io&$H65-kohI;rgOIg+B*E~7|>;)(xfRD2BBZLt@u&D&5pXzg!6vrPGo*J7wF@c z-!?a+aUUoi_O8HlG=0z4aQvfHL-j&zYzR;j14rSF9hwmcI3!H*549yc605bjg~e;U zAnXn8icc1)=&LE~|r?B3n5QF2I^J*^-u1JrCJWxR$hv7C|;>_ zn_L`TJ$~%ndhz>FIpp2)wSV)K%)N4X;*mbf5nUBYeW8N)*xdy1@x=5=V|h84%t57h z^7sqk;&mj(*<@XT!gBr=XY6KP-a?e1FsAICxF)JbABwmV-uoCFpg<9A0CY9c_$bx{ z@QN(Xy&HDsxV(_Y=t0@+E_W2q&Ax6f(!ac(ft)i9$N2|sd~}Q~D2q6uz8i2F)Wzz` z)9<_}8S|*C(K~LHalpoR1$|PG zbb*39=%S5IDsR!+D2jXWl~jDOVMuyvB#S`Jf2CQ@D7sLmFWOHCmel2&7@udz#dZxpz#QU#Q~JQW%Pk*)Kj zuo0u+(_(BIQ?U$Uz%r^=omM0W>G<1tO=?NGXYxT@=F)=_c;_XJZlDl?HY0PUPgQ3y zg`y>Bv{X~N%*KF9Ksy`8wBnekcGN@}C-ol9ng%gdAP`kJbDaUj69nyam_n{%&1(|u zoCca=`!s`jnsAYlEyCI*rQ(%7xRQmy_yPlBCF1bi9?A&P&P*kwG~q!BI1Qi?DOsf{ z6ey{y%o&>m3=AzUNu-gjW?=Q(A1=A24>a_!3TQ$tpnf69k%112L?ET+WrGWhUy7Gk zQqQ3##~4;X!?K7lZ!)Gt?p1x2t;DB7-3F1Yl52d1GMsb*nK>L;y3=r!Rg*5D2AQ@8 zf0i0#aRrB^kQn&o8W_|rpI8>xZA^1PF_^^<<2ult-q`q*#XfT13*$FxBB6zfJ;)DK zv}J1B<1eaka)~H!PkLZ!_<-3>6p(D3DSt3rGnf`#Kp_bNXH!VlRkw5EM(YX5w5N33 zP=v25PB?ZlEG#jJV4b58EV)g?cFm6El(ar82<0A0>27P~#mY)i^k1KB^j@2H^QyM_ zvAq7&Be?)+6j}+hNDR>IAv6}Ti@waP6`X|tEIyDSA%Dc)%gan|219~%dA~m#O@5^2 zY7V|OugIN#?NP1J%!nlW)J{esQG9W91q|#EKDt6lsN{-3tE{I|_(+3rB6>ChU&Q#( z?s~@mA4gdp@Cql$m)t~eKtmK5%v`cM7i79`I$$q&O#STs8@IgGKffb zBDKm`&L$As75&gZ98q>CT*q^Bqqb=$KPEV>U)C;3PKfv&RSrAv_Ao5$_riJs+W|;w zFyK{wQN*thY|&XPw`sR!x8X0;E(&JAj?JdkE2DM!>MjVRAzcU}uc7@Y!VSJDDkK@^ zyXyK!3?x){(CC#tZulxU$D)OGhM!iJQ!&7622p~ub^pAiZ6T`3d32eTKzpiySJ$Uv zicaF_41XV{R_VCOB|$IlpQ9}1tQ{73H!_C6M$=NnRbfI-ft@Ngu8jW=rs0|Rq4yD; zNnRz%iE?Xt?Okuw->O0tT@6y-{=5v>AY$+qLh;~gxTRPzO9Y*L>431{0xqL3LDzzd z3Nv_ttlcCdZ;X!I+UX066wS`0gG*NU7Q!dJB;czJIX)BvF#X{r!RopPpA-U-x1x-8 zI^KEsp>5=k+rPf+i1TQSx3s;}z`nI4yR|NCT;T}1oenbI#J{9l__opeG9cCEaQ>w1 zwaQCzrU_*#^-A-kH^qPYqXGRB;l*TI6*6~GMgg|Yk-X^)KCySXfm>a#;k}K+pDe*B zRm54y;o$^-1+WkzYEGrTg+p9tc zXh+LlCOW$o6Q}QH>t3#^Fx+ch?Cp2nbPx94ZXb4ccDo=b9{$~LTjIIIb}qcia;LR(v$E_k=ll7Q`Q*e8aPvH%P2~Q62JaFDG{#en>fKLgc99 z!pj+TO-7`{C{;_aQxOrz!DNUr-{jyge`q2t!@rM~E49KPL-~({^`VK7nvZS`$C%)( zDU$zbic-xJLYbi5a#R)H%o|y?1`F?BbDHt1C)wq~Z$ZwgJZjVR1JSfic05d&83tzE z)U%a23q#uMwJzjuHa5+qe^YH0g111-6T+QJ8J&!M0+gIe5pgfkp zvBr13USp|TM#-)Ueom<{r3E(X0oSaSzWIl4{zLhjQeEA$BOfg?!%0o{J@@eT;ADSg rt|#pxrX-mtG4S*MAF+ + * @author Stig Bakken + * @author Tomas V.V.Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: PEAR.php,v 1.98 2006/01/23 05:38:05 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/**#@+ + * ERROR constants + */ +define('PEAR_ERROR_RETURN', 1); +define('PEAR_ERROR_PRINT', 2); +define('PEAR_ERROR_TRIGGER', 4); +define('PEAR_ERROR_DIE', 8); +define('PEAR_ERROR_CALLBACK', 16); +/** + * WARNING: obsolete + * @deprecated + */ +define('PEAR_ERROR_EXCEPTION', 32); +/**#@-*/ +define('PEAR_ZE2', (function_exists('version_compare') && + version_compare(zend_version(), "2-dev", "ge"))); + +if (substr(PHP_OS, 0, 3) == 'WIN') { + define('OS_WINDOWS', true); + define('OS_UNIX', false); + define('PEAR_OS', 'Windows'); +} else { + define('OS_WINDOWS', false); + define('OS_UNIX', true); + define('PEAR_OS', 'Unix'); // blatant assumption +} + +// instant backwards compatibility +if (!defined('PATH_SEPARATOR')) { + if (OS_WINDOWS) { + define('PATH_SEPARATOR', ';'); + } else { + define('PATH_SEPARATOR', ':'); + } +} + +$GLOBALS['_PEAR_default_error_mode'] = PEAR_ERROR_RETURN; +$GLOBALS['_PEAR_default_error_options'] = E_USER_NOTICE; +$GLOBALS['_PEAR_destructor_object_list'] = array(); +$GLOBALS['_PEAR_shutdown_funcs'] = array(); +$GLOBALS['_PEAR_error_handler_stack'] = array(); + +@ini_set('track_errors', true); + +/** + * Base class for other PEAR classes. Provides rudimentary + * emulation of destructors. + * + * If you want a destructor in your class, inherit PEAR and make a + * destructor method called _yourclassname (same name as the + * constructor, but with a "_" prefix). Also, in your constructor you + * have to call the PEAR constructor: $this->PEAR();. + * The destructor method will be called without parameters. Note that + * at in some SAPI implementations (such as Apache), any output during + * the request shutdown (in which destructors are called) seems to be + * discarded. If you need to get any debug information from your + * destructor, use error_log(), syslog() or something similar. + * + * IMPORTANT! To use the emulated destructors you need to create the + * objects by reference: $obj =& new PEAR_child; + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Tomas V.V. Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @see PEAR_Error + * @since Class available since PHP 4.0.2 + * @link http://pear.php.net/manual/en/core.pear.php#core.pear.pear + */ +class PEAR +{ + // {{{ properties + + /** + * Whether to enable internal debug messages. + * + * @var bool + * @access private + */ + var $_debug = false; + + /** + * Default error mode for this object. + * + * @var int + * @access private + */ + var $_default_error_mode = null; + + /** + * Default error options used for this object when error mode + * is PEAR_ERROR_TRIGGER. + * + * @var int + * @access private + */ + var $_default_error_options = null; + + /** + * Default error handler (callback) for this object, if error mode is + * PEAR_ERROR_CALLBACK. + * + * @var string + * @access private + */ + var $_default_error_handler = ''; + + /** + * Which class to use for error objects. + * + * @var string + * @access private + */ + var $_error_class = 'PEAR_Error'; + + /** + * An array of expected errors. + * + * @var array + * @access private + */ + var $_expected_errors = array(); + + // }}} + + // {{{ constructor + + /** + * Constructor. Registers this object in + * $_PEAR_destructor_object_list for destructor emulation if a + * destructor object exists. + * + * @param string $error_class (optional) which class to use for + * error objects, defaults to PEAR_Error. + * @access public + * @return void + */ + function PEAR($error_class = null) + { + $classname = strtolower(get_class($this)); + if ($this->_debug) { + print "PEAR constructor called, class=$classname\n"; + } + if ($error_class !== null) { + $this->_error_class = $error_class; + } + while ($classname && strcasecmp($classname, "pear")) { + $destructor = "_$classname"; + if (method_exists($this, $destructor)) { + global $_PEAR_destructor_object_list; + $_PEAR_destructor_object_list[] = &$this; + if (!isset($GLOBALS['_PEAR_SHUTDOWN_REGISTERED'])) { + register_shutdown_function("_PEAR_call_destructors"); + $GLOBALS['_PEAR_SHUTDOWN_REGISTERED'] = true; + } + break; + } else { + $classname = get_parent_class($classname); + } + } + } + + // }}} + // {{{ destructor + + /** + * Destructor (the emulated type of...). Does nothing right now, + * but is included for forward compatibility, so subclass + * destructors should always call it. + * + * See the note in the class desciption about output from + * destructors. + * + * @access public + * @return void + */ + function _PEAR() { + if ($this->_debug) { + printf("PEAR destructor called, class=%s\n", strtolower(get_class($this))); + } + } + + // }}} + // {{{ getStaticProperty() + + /** + * If you have a class that's mostly/entirely static, and you need static + * properties, you can use this method to simulate them. Eg. in your method(s) + * do this: $myVar = &PEAR::getStaticProperty('myclass', 'myVar'); + * You MUST use a reference, or they will not persist! + * + * @access public + * @param string $class The calling classname, to prevent clashes + * @param string $var The variable to retrieve. + * @return mixed A reference to the variable. If not set it will be + * auto initialised to NULL. + */ + function &getStaticProperty($class, $var) + { + static $properties; + return $properties[$class][$var]; + } + + // }}} + // {{{ registerShutdownFunc() + + /** + * Use this function to register a shutdown method for static + * classes. + * + * @access public + * @param mixed $func The function name (or array of class/method) to call + * @param mixed $args The arguments to pass to the function + * @return void + */ + function registerShutdownFunc($func, $args = array()) + { + // if we are called statically, there is a potential + // that no shutdown func is registered. Bug #6445 + if (!isset($GLOBALS['_PEAR_SHUTDOWN_REGISTERED'])) { + register_shutdown_function("_PEAR_call_destructors"); + $GLOBALS['_PEAR_SHUTDOWN_REGISTERED'] = true; + } + $GLOBALS['_PEAR_shutdown_funcs'][] = array($func, $args); + } + + // }}} + // {{{ isError() + + /** + * Tell whether a value is a PEAR error. + * + * @param mixed $data the value to test + * @param int $code if $data is an error object, return true + * only if $code is a string and + * $obj->getMessage() == $code or + * $code is an integer and $obj->getCode() == $code + * @access public + * @return bool true if parameter is an error + */ + function isError($data, $code = null) + { + if (is_a($data, 'PEAR_Error')) { + if (is_null($code)) { + return true; + } elseif (is_string($code)) { + return $data->getMessage() == $code; + } else { + return $data->getCode() == $code; + } + } + return false; + } + + // }}} + // {{{ setErrorHandling() + + /** + * Sets how errors generated by this object should be handled. + * Can be invoked both in objects and statically. If called + * statically, setErrorHandling sets the default behaviour for all + * PEAR objects. If called in an object, setErrorHandling sets + * the default behaviour for that object. + * + * @param int $mode + * One of PEAR_ERROR_RETURN, PEAR_ERROR_PRINT, + * PEAR_ERROR_TRIGGER, PEAR_ERROR_DIE, + * PEAR_ERROR_CALLBACK or PEAR_ERROR_EXCEPTION. + * + * @param mixed $options + * When $mode is PEAR_ERROR_TRIGGER, this is the error level (one + * of E_USER_NOTICE, E_USER_WARNING or E_USER_ERROR). + * + * When $mode is PEAR_ERROR_CALLBACK, this parameter is expected + * to be the callback function or method. A callback + * function is a string with the name of the function, a + * callback method is an array of two elements: the element + * at index 0 is the object, and the element at index 1 is + * the name of the method to call in the object. + * + * When $mode is PEAR_ERROR_PRINT or PEAR_ERROR_DIE, this is + * a printf format string used when printing the error + * message. + * + * @access public + * @return void + * @see PEAR_ERROR_RETURN + * @see PEAR_ERROR_PRINT + * @see PEAR_ERROR_TRIGGER + * @see PEAR_ERROR_DIE + * @see PEAR_ERROR_CALLBACK + * @see PEAR_ERROR_EXCEPTION + * + * @since PHP 4.0.5 + */ + + function setErrorHandling($mode = null, $options = null) + { + if (isset($this) && is_a($this, 'PEAR')) { + $setmode = &$this->_default_error_mode; + $setoptions = &$this->_default_error_options; + } else { + $setmode = &$GLOBALS['_PEAR_default_error_mode']; + $setoptions = &$GLOBALS['_PEAR_default_error_options']; + } + + switch ($mode) { + case PEAR_ERROR_EXCEPTION: + case PEAR_ERROR_RETURN: + case PEAR_ERROR_PRINT: + case PEAR_ERROR_TRIGGER: + case PEAR_ERROR_DIE: + case null: + $setmode = $mode; + $setoptions = $options; + break; + + case PEAR_ERROR_CALLBACK: + $setmode = $mode; + // class/object method callback + if (is_callable($options)) { + $setoptions = $options; + } else { + trigger_error("invalid error callback", E_USER_WARNING); + } + break; + + default: + trigger_error("invalid error mode", E_USER_WARNING); + break; + } + } + + // }}} + // {{{ expectError() + + /** + * This method is used to tell which errors you expect to get. + * Expected errors are always returned with error mode + * PEAR_ERROR_RETURN. Expected error codes are stored in a stack, + * and this method pushes a new element onto it. The list of + * expected errors are in effect until they are popped off the + * stack with the popExpect() method. + * + * Note that this method can not be called statically + * + * @param mixed $code a single error code or an array of error codes to expect + * + * @return int the new depth of the "expected errors" stack + * @access public + */ + function expectError($code = '*') + { + if (is_array($code)) { + array_push($this->_expected_errors, $code); + } else { + array_push($this->_expected_errors, array($code)); + } + return sizeof($this->_expected_errors); + } + + // }}} + // {{{ popExpect() + + /** + * This method pops one element off the expected error codes + * stack. + * + * @return array the list of error codes that were popped + */ + function popExpect() + { + return array_pop($this->_expected_errors); + } + + // }}} + // {{{ _checkDelExpect() + + /** + * This method checks unsets an error code if available + * + * @param mixed error code + * @return bool true if the error code was unset, false otherwise + * @access private + * @since PHP 4.3.0 + */ + function _checkDelExpect($error_code) + { + $deleted = false; + + foreach ($this->_expected_errors AS $key => $error_array) { + if (in_array($error_code, $error_array)) { + unset($this->_expected_errors[$key][array_search($error_code, $error_array)]); + $deleted = true; + } + + // clean up empty arrays + if (0 == count($this->_expected_errors[$key])) { + unset($this->_expected_errors[$key]); + } + } + return $deleted; + } + + // }}} + // {{{ delExpect() + + /** + * This method deletes all occurences of the specified element from + * the expected error codes stack. + * + * @param mixed $error_code error code that should be deleted + * @return mixed list of error codes that were deleted or error + * @access public + * @since PHP 4.3.0 + */ + function delExpect($error_code) + { + $deleted = false; + + if ((is_array($error_code) && (0 != count($error_code)))) { + // $error_code is a non-empty array here; + // we walk through it trying to unset all + // values + foreach($error_code as $key => $error) { + if ($this->_checkDelExpect($error)) { + $deleted = true; + } else { + $deleted = false; + } + } + return $deleted ? true : PEAR::raiseError("The expected error you submitted does not exist"); // IMPROVE ME + } elseif (!empty($error_code)) { + // $error_code comes alone, trying to unset it + if ($this->_checkDelExpect($error_code)) { + return true; + } else { + return PEAR::raiseError("The expected error you submitted does not exist"); // IMPROVE ME + } + } else { + // $error_code is empty + return PEAR::raiseError("The expected error you submitted is empty"); // IMPROVE ME + } + } + + // }}} + // {{{ raiseError() + + /** + * This method is a wrapper that returns an instance of the + * configured error class with this object's default error + * handling applied. If the $mode and $options parameters are not + * specified, the object's defaults are used. + * + * @param mixed $message a text error message or a PEAR error object + * + * @param int $code a numeric error code (it is up to your class + * to define these if you want to use codes) + * + * @param int $mode One of PEAR_ERROR_RETURN, PEAR_ERROR_PRINT, + * PEAR_ERROR_TRIGGER, PEAR_ERROR_DIE, + * PEAR_ERROR_CALLBACK, PEAR_ERROR_EXCEPTION. + * + * @param mixed $options If $mode is PEAR_ERROR_TRIGGER, this parameter + * specifies the PHP-internal error level (one of + * E_USER_NOTICE, E_USER_WARNING or E_USER_ERROR). + * If $mode is PEAR_ERROR_CALLBACK, this + * parameter specifies the callback function or + * method. In other error modes this parameter + * is ignored. + * + * @param string $userinfo If you need to pass along for example debug + * information, this parameter is meant for that. + * + * @param string $error_class The returned error object will be + * instantiated from this class, if specified. + * + * @param bool $skipmsg If true, raiseError will only pass error codes, + * the error message parameter will be dropped. + * + * @access public + * @return object a PEAR error object + * @see PEAR::setErrorHandling + * @since PHP 4.0.5 + */ + function &raiseError($message = null, + $code = null, + $mode = null, + $options = null, + $userinfo = null, + $error_class = null, + $skipmsg = false) + { + // The error is yet a PEAR error object + if (is_object($message)) { + $code = $message->getCode(); + $userinfo = $message->getUserInfo(); + $error_class = $message->getType(); + $message->error_message_prefix = ''; + $message = $message->getMessage(); + } + + if (isset($this) && isset($this->_expected_errors) && sizeof($this->_expected_errors) > 0 && sizeof($exp = end($this->_expected_errors))) { + if ($exp[0] == "*" || + (is_int(reset($exp)) && in_array($code, $exp)) || + (is_string(reset($exp)) && in_array($message, $exp))) { + $mode = PEAR_ERROR_RETURN; + } + } + // No mode given, try global ones + if ($mode === null) { + // Class error handler + if (isset($this) && isset($this->_default_error_mode)) { + $mode = $this->_default_error_mode; + $options = $this->_default_error_options; + // Global error handler + } elseif (isset($GLOBALS['_PEAR_default_error_mode'])) { + $mode = $GLOBALS['_PEAR_default_error_mode']; + $options = $GLOBALS['_PEAR_default_error_options']; + } + } + + if ($error_class !== null) { + $ec = $error_class; + } elseif (isset($this) && isset($this->_error_class)) { + $ec = $this->_error_class; + } else { + $ec = 'PEAR_Error'; + } + if ($skipmsg) { + $a = &new $ec($code, $mode, $options, $userinfo); + return $a; + } else { + $a = &new $ec($message, $code, $mode, $options, $userinfo); + return $a; + } + } + + // }}} + // {{{ throwError() + + /** + * Simpler form of raiseError with fewer options. In most cases + * message, code and userinfo are enough. + * + * @param string $message + * + */ + function &throwError($message = null, + $code = null, + $userinfo = null) + { + if (isset($this) && is_a($this, 'PEAR')) { + $a = &$this->raiseError($message, $code, null, null, $userinfo); + return $a; + } else { + $a = &PEAR::raiseError($message, $code, null, null, $userinfo); + return $a; + } + } + + // }}} + function staticPushErrorHandling($mode, $options = null) + { + $stack = &$GLOBALS['_PEAR_error_handler_stack']; + $def_mode = &$GLOBALS['_PEAR_default_error_mode']; + $def_options = &$GLOBALS['_PEAR_default_error_options']; + $stack[] = array($def_mode, $def_options); + switch ($mode) { + case PEAR_ERROR_EXCEPTION: + case PEAR_ERROR_RETURN: + case PEAR_ERROR_PRINT: + case PEAR_ERROR_TRIGGER: + case PEAR_ERROR_DIE: + case null: + $def_mode = $mode; + $def_options = $options; + break; + + case PEAR_ERROR_CALLBACK: + $def_mode = $mode; + // class/object method callback + if (is_callable($options)) { + $def_options = $options; + } else { + trigger_error("invalid error callback", E_USER_WARNING); + } + break; + + default: + trigger_error("invalid error mode", E_USER_WARNING); + break; + } + $stack[] = array($mode, $options); + return true; + } + + function staticPopErrorHandling() + { + $stack = &$GLOBALS['_PEAR_error_handler_stack']; + $setmode = &$GLOBALS['_PEAR_default_error_mode']; + $setoptions = &$GLOBALS['_PEAR_default_error_options']; + array_pop($stack); + list($mode, $options) = $stack[sizeof($stack) - 1]; + array_pop($stack); + switch ($mode) { + case PEAR_ERROR_EXCEPTION: + case PEAR_ERROR_RETURN: + case PEAR_ERROR_PRINT: + case PEAR_ERROR_TRIGGER: + case PEAR_ERROR_DIE: + case null: + $setmode = $mode; + $setoptions = $options; + break; + + case PEAR_ERROR_CALLBACK: + $setmode = $mode; + // class/object method callback + if (is_callable($options)) { + $setoptions = $options; + } else { + trigger_error("invalid error callback", E_USER_WARNING); + } + break; + + default: + trigger_error("invalid error mode", E_USER_WARNING); + break; + } + return true; + } + + // {{{ pushErrorHandling() + + /** + * Push a new error handler on top of the error handler options stack. With this + * you can easily override the actual error handler for some code and restore + * it later with popErrorHandling. + * + * @param mixed $mode (same as setErrorHandling) + * @param mixed $options (same as setErrorHandling) + * + * @return bool Always true + * + * @see PEAR::setErrorHandling + */ + function pushErrorHandling($mode, $options = null) + { + $stack = &$GLOBALS['_PEAR_error_handler_stack']; + if (isset($this) && is_a($this, 'PEAR')) { + $def_mode = &$this->_default_error_mode; + $def_options = &$this->_default_error_options; + } else { + $def_mode = &$GLOBALS['_PEAR_default_error_mode']; + $def_options = &$GLOBALS['_PEAR_default_error_options']; + } + $stack[] = array($def_mode, $def_options); + + if (isset($this) && is_a($this, 'PEAR')) { + $this->setErrorHandling($mode, $options); + } else { + PEAR::setErrorHandling($mode, $options); + } + $stack[] = array($mode, $options); + return true; + } + + // }}} + // {{{ popErrorHandling() + + /** + * Pop the last error handler used + * + * @return bool Always true + * + * @see PEAR::pushErrorHandling + */ + function popErrorHandling() + { + $stack = &$GLOBALS['_PEAR_error_handler_stack']; + array_pop($stack); + list($mode, $options) = $stack[sizeof($stack) - 1]; + array_pop($stack); + if (isset($this) && is_a($this, 'PEAR')) { + $this->setErrorHandling($mode, $options); + } else { + PEAR::setErrorHandling($mode, $options); + } + return true; + } + + // }}} + // {{{ loadExtension() + + /** + * OS independant PHP extension load. Remember to take care + * on the correct extension name for case sensitive OSes. + * + * @param string $ext The extension name + * @return bool Success or not on the dl() call + */ + function loadExtension($ext) + { + if (!extension_loaded($ext)) { + // if either returns true dl() will produce a FATAL error, stop that + if ((ini_get('enable_dl') != 1) || (ini_get('safe_mode') == 1)) { + return false; + } + if (OS_WINDOWS) { + $suffix = '.dll'; + } elseif (PHP_OS == 'HP-UX') { + $suffix = '.sl'; + } elseif (PHP_OS == 'AIX') { + $suffix = '.a'; + } elseif (PHP_OS == 'OSX') { + $suffix = '.bundle'; + } else { + $suffix = '.so'; + } + return @dl('php_'.$ext.$suffix) || @dl($ext.$suffix); + } + return true; + } + + // }}} +} + +// {{{ _PEAR_call_destructors() + +function _PEAR_call_destructors() +{ + global $_PEAR_destructor_object_list; + if (is_array($_PEAR_destructor_object_list) && + sizeof($_PEAR_destructor_object_list)) + { + reset($_PEAR_destructor_object_list); + if (@PEAR::getStaticProperty('PEAR', 'destructlifo')) { + $_PEAR_destructor_object_list = array_reverse($_PEAR_destructor_object_list); + } + while (list($k, $objref) = each($_PEAR_destructor_object_list)) { + $classname = get_class($objref); + while ($classname) { + $destructor = "_$classname"; + if (method_exists($objref, $destructor)) { + $objref->$destructor(); + break; + } else { + $classname = get_parent_class($classname); + } + } + } + // Empty the object list to ensure that destructors are + // not called more than once. + $_PEAR_destructor_object_list = array(); + } + + // Now call the shutdown functions + if (is_array($GLOBALS['_PEAR_shutdown_funcs']) AND !empty($GLOBALS['_PEAR_shutdown_funcs'])) { + foreach ($GLOBALS['_PEAR_shutdown_funcs'] as $value) { + call_user_func_array($value[0], $value[1]); + } + } +} + +// }}} +/** + * Standard PEAR error class for PHP 4 + * + * This class is supserseded by {@link PEAR_Exception} in PHP 5 + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Tomas V.V. Cox + * @author Gregory Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/manual/en/core.pear.pear-error.php + * @see PEAR::raiseError(), PEAR::throwError() + * @since Class available since PHP 4.0.2 + */ +class PEAR_Error +{ + // {{{ properties + + var $error_message_prefix = ''; + var $mode = PEAR_ERROR_RETURN; + var $level = E_USER_NOTICE; + var $code = -1; + var $message = ''; + var $userinfo = ''; + var $backtrace = null; + + // }}} + // {{{ constructor + + /** + * PEAR_Error constructor + * + * @param string $message message + * + * @param int $code (optional) error code + * + * @param int $mode (optional) error mode, one of: PEAR_ERROR_RETURN, + * PEAR_ERROR_PRINT, PEAR_ERROR_DIE, PEAR_ERROR_TRIGGER, + * PEAR_ERROR_CALLBACK or PEAR_ERROR_EXCEPTION + * + * @param mixed $options (optional) error level, _OR_ in the case of + * PEAR_ERROR_CALLBACK, the callback function or object/method + * tuple. + * + * @param string $userinfo (optional) additional user/debug info + * + * @access public + * + */ + function PEAR_Error($message = 'unknown error', $code = null, + $mode = null, $options = null, $userinfo = null) + { + if ($mode === null) { + $mode = PEAR_ERROR_RETURN; + } + $this->message = $message; + $this->code = $code; + $this->mode = $mode; + $this->userinfo = $userinfo; + if (function_exists("debug_backtrace")) { + if (@!PEAR::getStaticProperty('PEAR_Error', 'skiptrace')) { + $this->backtrace = debug_backtrace(); + } + } + if ($mode & PEAR_ERROR_CALLBACK) { + $this->level = E_USER_NOTICE; + $this->callback = $options; + } else { + if ($options === null) { + $options = E_USER_NOTICE; + } + $this->level = $options; + $this->callback = null; + } + if ($this->mode & PEAR_ERROR_PRINT) { + if (is_null($options) || is_int($options)) { + $format = "%s"; + } else { + $format = $options; + } + printf($format, $this->getMessage()); + } + if ($this->mode & PEAR_ERROR_TRIGGER) { + trigger_error($this->getMessage(), $this->level); + } + if ($this->mode & PEAR_ERROR_DIE) { + $msg = $this->getMessage(); + if (is_null($options) || is_int($options)) { + $format = "%s"; + if (substr($msg, -1) != "\n") { + $msg .= "\n"; + } + } else { + $format = $options; + } + die(sprintf($format, $msg)); + } + if ($this->mode & PEAR_ERROR_CALLBACK) { + if (is_callable($this->callback)) { + call_user_func($this->callback, $this); + } + } + if ($this->mode & PEAR_ERROR_EXCEPTION) { + trigger_error("PEAR_ERROR_EXCEPTION is obsolete, use class PEAR_Exception for exceptions", E_USER_WARNING); + eval('$e = new Exception($this->message, $this->code);throw($e);'); + } + } + + // }}} + // {{{ getMode() + + /** + * Get the error mode from an error object. + * + * @return int error mode + * @access public + */ + function getMode() { + return $this->mode; + } + + // }}} + // {{{ getCallback() + + /** + * Get the callback function/method from an error object. + * + * @return mixed callback function or object/method array + * @access public + */ + function getCallback() { + return $this->callback; + } + + // }}} + // {{{ getMessage() + + + /** + * Get the error message from an error object. + * + * @return string full error message + * @access public + */ + function getMessage() + { + return ($this->error_message_prefix . $this->message); + } + + + // }}} + // {{{ getCode() + + /** + * Get error code from an error object + * + * @return int error code + * @access public + */ + function getCode() + { + return $this->code; + } + + // }}} + // {{{ getType() + + /** + * Get the name of this error/exception. + * + * @return string error/exception name (type) + * @access public + */ + function getType() + { + return get_class($this); + } + + // }}} + // {{{ getUserInfo() + + /** + * Get additional user-supplied information. + * + * @return string user-supplied information + * @access public + */ + function getUserInfo() + { + return $this->userinfo; + } + + // }}} + // {{{ getDebugInfo() + + /** + * Get additional debug information supplied by the application. + * + * @return string debug information + * @access public + */ + function getDebugInfo() + { + return $this->getUserInfo(); + } + + // }}} + // {{{ getBacktrace() + + /** + * Get the call backtrace from where the error was generated. + * Supported with PHP 4.3.0 or newer. + * + * @param int $frame (optional) what frame to fetch + * @return array Backtrace, or NULL if not available. + * @access public + */ + function getBacktrace($frame = null) + { + if (defined('PEAR_IGNORE_BACKTRACE')) { + return null; + } + if ($frame === null) { + return $this->backtrace; + } + return $this->backtrace[$frame]; + } + + // }}} + // {{{ addUserInfo() + + function addUserInfo($info) + { + if (empty($this->userinfo)) { + $this->userinfo = $info; + } else { + $this->userinfo .= " ** $info"; + } + } + + // }}} + // {{{ toString() + + /** + * Make a string representation of this object. + * + * @return string a string with an object summary + * @access public + */ + function toString() { + $modes = array(); + $levels = array(E_USER_NOTICE => 'notice', + E_USER_WARNING => 'warning', + E_USER_ERROR => 'error'); + if ($this->mode & PEAR_ERROR_CALLBACK) { + if (is_array($this->callback)) { + $callback = (is_object($this->callback[0]) ? + strtolower(get_class($this->callback[0])) : + $this->callback[0]) . '::' . + $this->callback[1]; + } else { + $callback = $this->callback; + } + return sprintf('[%s: message="%s" code=%d mode=callback '. + 'callback=%s prefix="%s" info="%s"]', + strtolower(get_class($this)), $this->message, $this->code, + $callback, $this->error_message_prefix, + $this->userinfo); + } + if ($this->mode & PEAR_ERROR_PRINT) { + $modes[] = 'print'; + } + if ($this->mode & PEAR_ERROR_TRIGGER) { + $modes[] = 'trigger'; + } + if ($this->mode & PEAR_ERROR_DIE) { + $modes[] = 'die'; + } + if ($this->mode & PEAR_ERROR_RETURN) { + $modes[] = 'return'; + } + return sprintf('[%s: message="%s" code=%d mode=%s level=%s '. + 'prefix="%s" info="%s"]', + strtolower(get_class($this)), $this->message, $this->code, + implode("|", $modes), $levels[$this->level], + $this->error_message_prefix, + $this->userinfo); + } + + // }}} +} + +/* + * Local Variables: + * mode: php + * tab-width: 4 + * c-basic-offset: 4 + * End: + */ +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Autoloader.php b/campcaster/src/tools/pear/src/PEAR/Autoloader.php new file mode 100644 index 000000000..8991a0122 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Autoloader.php @@ -0,0 +1,223 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Autoloader.php,v 1.13 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/manual/en/core.ppm.php#core.ppm.pear-autoloader + * @since File available since Release 0.1 + * @deprecated File deprecated in Release 1.4.0a1 + */ + +// /* vim: set expandtab tabstop=4 shiftwidth=4: */ + +if (!extension_loaded("overload")) { + // die hard without ext/overload + die("Rebuild PHP with the `overload' extension to use PEAR_Autoloader"); +} + +/** + * Include for PEAR_Error and PEAR classes + */ +require_once "PEAR.php"; + +/** + * This class is for objects where you want to separate the code for + * some methods into separate classes. This is useful if you have a + * class with not-frequently-used methods that contain lots of code + * that you would like to avoid always parsing. + * + * The PEAR_Autoloader class provides autoloading and aggregation. + * The autoloading lets you set up in which classes the separated + * methods are found. Aggregation is the technique used to import new + * methods, an instance of each class providing separated methods is + * stored and called every time the aggregated method is called. + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/manual/en/core.ppm.php#core.ppm.pear-autoloader + * @since File available since Release 0.1 + * @deprecated File deprecated in Release 1.4.0a1 + */ +class PEAR_Autoloader extends PEAR +{ + // {{{ properties + + /** + * Map of methods and classes where they are defined + * + * @var array + * + * @access private + */ + var $_autoload_map = array(); + + /** + * Map of methods and aggregate objects + * + * @var array + * + * @access private + */ + var $_method_map = array(); + + // }}} + // {{{ addAutoload() + + /** + * Add one or more autoload entries. + * + * @param string $method which method to autoload + * + * @param string $classname (optional) which class to find the method in. + * If the $method parameter is an array, this + * parameter may be omitted (and will be ignored + * if not), and the $method parameter will be + * treated as an associative array with method + * names as keys and class names as values. + * + * @return void + * + * @access public + */ + function addAutoload($method, $classname = null) + { + if (is_array($method)) { + array_walk($method, create_function('$a,&$b', '$b = strtolower($b);')); + $this->_autoload_map = array_merge($this->_autoload_map, $method); + } else { + $this->_autoload_map[strtolower($method)] = $classname; + } + } + + // }}} + // {{{ removeAutoload() + + /** + * Remove an autoload entry. + * + * @param string $method which method to remove the autoload entry for + * + * @return bool TRUE if an entry was removed, FALSE if not + * + * @access public + */ + function removeAutoload($method) + { + $method = strtolower($method); + $ok = isset($this->_autoload_map[$method]); + unset($this->_autoload_map[$method]); + return $ok; + } + + // }}} + // {{{ addAggregateObject() + + /** + * Add an aggregate object to this object. If the specified class + * is not defined, loading it will be attempted following PEAR's + * file naming scheme. All the methods in the class will be + * aggregated, except private ones (name starting with an + * underscore) and constructors. + * + * @param string $classname what class to instantiate for the object. + * + * @return void + * + * @access public + */ + function addAggregateObject($classname) + { + $classname = strtolower($classname); + if (!class_exists($classname)) { + $include_file = preg_replace('/[^a-z0-9]/i', '_', $classname); + include_once $include_file; + } + $obj =& new $classname; + $methods = get_class_methods($classname); + foreach ($methods as $method) { + // don't import priviate methods and constructors + if ($method{0} != '_' && $method != $classname) { + $this->_method_map[$method] = $obj; + } + } + } + + // }}} + // {{{ removeAggregateObject() + + /** + * Remove an aggregate object. + * + * @param string $classname the class of the object to remove + * + * @return bool TRUE if an object was removed, FALSE if not + * + * @access public + */ + function removeAggregateObject($classname) + { + $ok = false; + $classname = strtolower($classname); + reset($this->_method_map); + while (list($method, $obj) = each($this->_method_map)) { + if (is_a($obj, $classname)) { + unset($this->_method_map[$method]); + $ok = true; + } + } + return $ok; + } + + // }}} + // {{{ __call() + + /** + * Overloaded object call handler, called each time an + * undefined/aggregated method is invoked. This method repeats + * the call in the right aggregate object and passes on the return + * value. + * + * @param string $method which method that was called + * + * @param string $args An array of the parameters passed in the + * original call + * + * @return mixed The return value from the aggregated method, or a PEAR + * error if the called method was unknown. + */ + function __call($method, $args, &$retval) + { + $method = strtolower($method); + if (empty($this->_method_map[$method]) && isset($this->_autoload_map[$method])) { + $this->addAggregateObject($this->_autoload_map[$method]); + } + if (isset($this->_method_map[$method])) { + $retval = call_user_func_array(array($this->_method_map[$method], $method), $args); + return true; + } + return false; + } + + // }}} +} + +overload("PEAR_Autoloader"); + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Builder.php b/campcaster/src/tools/pear/src/PEAR/Builder.php new file mode 100644 index 000000000..4bb3b405b --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Builder.php @@ -0,0 +1,455 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Builder.php,v 1.27 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * Needed for extending PEAR_Builder + */ +require_once 'PEAR/Common.php'; +require_once 'PEAR/PackageFile.php'; +/** + * Class to handle building (compiling) extensions. + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since PHP 4.0.2 + * @see http://pear.php.net/manual/en/core.ppm.pear-builder.php + */ +class PEAR_Builder extends PEAR_Common +{ + // {{{ properties + + var $php_api_version = 0; + var $zend_module_api_no = 0; + var $zend_extension_api_no = 0; + + var $extensions_built = array(); + + var $current_callback = null; + + // used for msdev builds + var $_lastline = null; + var $_firstline = null; + // }}} + // {{{ constructor + + /** + * PEAR_Builder constructor. + * + * @param object $ui user interface object (instance of PEAR_Frontend_*) + * + * @access public + */ + function PEAR_Builder(&$ui) + { + parent::PEAR_Common(); + $this->setFrontendObject($ui); + } + + // }}} + + // {{{ _build_win32() + + /** + * Build an extension from source on windows. + * requires msdev + */ + function _build_win32($descfile, $callback = null) + { + if (is_object($descfile)) { + $pkg = $descfile; + } else { + $pf = &new PEAR_PackageFile($this->config, $this->debug); + $pkg = &$pf->fromPackageFile($descfile, PEAR_VALIDATE_NORMAL); + if (PEAR::isError($pkg)) { + return $pkg; + } + } + $dir = dirname($pkg->getArchiveFile()); + $old_cwd = getcwd(); + + if (!@chdir($dir)) { + return $this->raiseError("could not chdir to $dir"); + } + $this->log(2, "building in $dir"); + + $dsp = $pkg->getPackage().'.dsp'; + if (!@is_file("$dir/$dsp")) { + return $this->raiseError("The DSP $dsp does not exist."); + } + // XXX TODO: make release build type configurable + $command = 'msdev '.$dsp.' /MAKE "'.$info['package']. ' - Release"'; + + $this->current_callback = $callback; + $err = $this->_runCommand($command, array(&$this, 'msdevCallback')); + if (PEAR::isError($err)) { + return $err; + } + + // figure out the build platform and type + $platform = 'Win32'; + $buildtype = 'Release'; + if (preg_match('/.*?'.$pkg->getPackage().'\s-\s(\w+)\s(.*?)-+/i',$this->_firstline,$matches)) { + $platform = $matches[1]; + $buildtype = $matches[2]; + } + + if (preg_match('/(.*)?\s-\s(\d+).*?(\d+)/',$this->_lastline,$matches)) { + if ($matches[2]) { + // there were errors in the build + return $this->raiseError("There were errors during compilation."); + } + $out = $matches[1]; + } else { + return $this->raiseError("Did not understand the completion status returned from msdev.exe."); + } + + // msdev doesn't tell us the output directory :/ + // open the dsp, find /out and use that directory + $dsptext = join(file($dsp),''); + + // this regex depends on the build platform and type having been + // correctly identified above. + $regex ='/.*?!IF\s+"\$\(CFG\)"\s+==\s+("'. + $pkg->getPackage().'\s-\s'. + $platform.'\s'. + $buildtype.'").*?'. + '\/out:"(.*?)"/is'; + + if ($dsptext && preg_match($regex,$dsptext,$matches)) { + // what we get back is a relative path to the output file itself. + $outfile = realpath($matches[2]); + } else { + return $this->raiseError("Could not retrieve output information from $dsp."); + } + if (@copy($outfile, "$dir/$out")) { + $outfile = "$dir/$out"; + } + + $built_files[] = array( + 'file' => "$outfile", + 'php_api' => $this->php_api_version, + 'zend_mod_api' => $this->zend_module_api_no, + 'zend_ext_api' => $this->zend_extension_api_no, + ); + + return $built_files; + } + // }}} + + // {{{ msdevCallback() + function msdevCallback($what, $data) + { + if (!$this->_firstline) + $this->_firstline = $data; + $this->_lastline = $data; + } + // }}} + + // {{{ _harventInstDir + /** + * @param string + * @param string + * @param array + * @access private + */ + function _harvestInstDir($dest_prefix, $dirname, &$built_files) + { + $d = opendir($dirname); + if (!$d) + return false; + + $ret = true; + while (($ent = readdir($d)) !== false) { + if ($ent{0} == '.') + continue; + + $full = $dirname . DIRECTORY_SEPARATOR . $ent; + if (is_dir($full)) { + if (!$this->_harvestInstDir( + $dest_prefix . DIRECTORY_SEPARATOR . $ent, + $full, $built_files)) { + $ret = false; + break; + } + } else { + $dest = $dest_prefix . DIRECTORY_SEPARATOR . $ent; + $built_files[] = array( + 'file' => $full, + 'dest' => $dest, + 'php_api' => $this->php_api_version, + 'zend_mod_api' => $this->zend_module_api_no, + 'zend_ext_api' => $this->zend_extension_api_no, + ); + } + } + closedir($d); + return $ret; + } + + // }}} + + // {{{ build() + + /** + * Build an extension from source. Runs "phpize" in the source + * directory, but compiles in a temporary directory + * (/var/tmp/pear-build-USER/PACKAGE-VERSION). + * + * @param string|PEAR_PackageFile_v* $descfile path to XML package description file, or + * a PEAR_PackageFile object + * + * @param mixed $callback callback function used to report output, + * see PEAR_Builder::_runCommand for details + * + * @return array an array of associative arrays with built files, + * format: + * array( array( 'file' => '/path/to/ext.so', + * 'php_api' => YYYYMMDD, + * 'zend_mod_api' => YYYYMMDD, + * 'zend_ext_api' => YYYYMMDD ), + * ... ) + * + * @access public + * + * @see PEAR_Builder::_runCommand + */ + function build($descfile, $callback = null) + { + if (PEAR_OS == "Windows") { + return $this->_build_win32($descfile,$callback); + } + if (PEAR_OS != 'Unix') { + return $this->raiseError("building extensions not supported on this platform"); + } + if (is_object($descfile)) { + $pkg = $descfile; + $descfile = $pkg->getPackageFile(); + } else { + $pf = &new PEAR_PackageFile($this->config); + $pkg = &$pf->fromPackageFile($descfile, PEAR_VALIDATE_NORMAL); + if (PEAR::isError($pkg)) { + return $pkg; + } + } + $dir = dirname($descfile); + $old_cwd = getcwd(); + if (!@chdir($dir)) { + return $this->raiseError("could not chdir to $dir"); + } + $vdir = $pkg->getPackage() . '-' . $pkg->getVersion(); + if (is_dir($vdir)) { + chdir($vdir); + } + $dir = getcwd(); + $this->log(2, "building in $dir"); + $this->current_callback = $callback; + putenv('PATH=' . $this->config->get('bin_dir') . ':' . getenv('PATH')); + $err = $this->_runCommand("phpize", array(&$this, 'phpizeCallback')); + if (PEAR::isError($err)) { + return $err; + } + if (!$err) { + return $this->raiseError("`phpize' failed"); + } + + // {{{ start of interactive part + $configure_command = "$dir/configure"; + $configure_options = $pkg->getConfigureOptions(); + if ($configure_options) { + foreach ($configure_options as $o) { + list($r) = $this->ui->userDialog('build', + array($o['prompt']), + array('text'), + array(@$o['default'])); + if (substr($o['name'], 0, 5) == 'with-' && + ($r == 'yes' || $r == 'autodetect')) { + $configure_command .= " --$o[name]"; + } else { + $configure_command .= " --$o[name]=".trim($r); + } + } + } + // }}} end of interactive part + + // FIXME make configurable + if(!$user=getenv('USER')){ + $user='defaultuser'; + } + $build_basedir = "/var/tmp/pear-build-$user"; + $build_dir = "$build_basedir/$vdir"; + $inst_dir = "$build_basedir/install-$vdir"; + $this->log(1, "building in $build_dir"); + if (is_dir($build_dir)) { + System::rm(array('-rf', $build_dir)); + } + if (!System::mkDir(array('-p', $build_dir))) { + return $this->raiseError("could not create build dir: $build_dir"); + } + $this->addTempFile($build_dir); + if (!System::mkDir(array('-p', $inst_dir))) { + return $this->raiseError("could not create temporary install dir: $inst_dir"); + } + $this->addTempFile($inst_dir); + + if (getenv('MAKE')) { + $make_command = getenv('MAKE'); + } else { + $make_command = 'make'; + } + $to_run = array( + $configure_command, + $make_command, + "$make_command INSTALL_ROOT=\"$inst_dir\" install", + "find \"$inst_dir\" -ls" + ); + if (!@chdir($build_dir)) { + return $this->raiseError("could not chdir to $build_dir"); + } + putenv('PHP_PEAR_VERSION=1.4.11'); + foreach ($to_run as $cmd) { + $err = $this->_runCommand($cmd, $callback); + if (PEAR::isError($err)) { + chdir($old_cwd); + return $err; + } + if (!$err) { + chdir($old_cwd); + return $this->raiseError("`$cmd' failed"); + } + } + if (!($dp = opendir("modules"))) { + chdir($old_cwd); + return $this->raiseError("no `modules' directory found"); + } + $built_files = array(); + $prefix = exec("php-config --prefix"); + $this->_harvestInstDir($prefix, $inst_dir . DIRECTORY_SEPARATOR . $prefix, $built_files); + chdir($old_cwd); + return $built_files; + } + + // }}} + // {{{ phpizeCallback() + + /** + * Message callback function used when running the "phpize" + * program. Extracts the API numbers used. Ignores other message + * types than "cmdoutput". + * + * @param string $what the type of message + * @param mixed $data the message + * + * @return void + * + * @access public + */ + function phpizeCallback($what, $data) + { + if ($what != 'cmdoutput') { + return; + } + $this->log(1, rtrim($data)); + if (preg_match('/You should update your .aclocal.m4/', $data)) { + return; + } + $matches = array(); + if (preg_match('/^\s+(\S[^:]+):\s+(\d{8})/', $data, $matches)) { + $member = preg_replace('/[^a-z]/', '_', strtolower($matches[1])); + $apino = (int)$matches[2]; + if (isset($this->$member)) { + $this->$member = $apino; + //$msg = sprintf("%-22s : %d", $matches[1], $apino); + //$this->log(1, $msg); + } + } + } + + // }}} + // {{{ _runCommand() + + /** + * Run an external command, using a message callback to report + * output. The command will be run through popen and output is + * reported for every line with a "cmdoutput" message with the + * line string, including newlines, as payload. + * + * @param string $command the command to run + * + * @param mixed $callback (optional) function to use as message + * callback + * + * @return bool whether the command was successful (exit code 0 + * means success, any other means failure) + * + * @access private + */ + function _runCommand($command, $callback = null) + { + $this->log(1, "running: $command"); + $pp = @popen("$command 2>&1", "r"); + if (!$pp) { + return $this->raiseError("failed to run `$command'"); + } + if ($callback && $callback[0]->debug == 1) { + $olddbg = $callback[0]->debug; + $callback[0]->debug = 2; + } + + while ($line = fgets($pp, 1024)) { + if ($callback) { + call_user_func($callback, 'cmdoutput', $line); + } else { + $this->log(2, rtrim($line)); + } + } + if ($callback && isset($olddbg)) { + $callback[0]->debug = $olddbg; + } + $exitcode = @pclose($pp); + return ($exitcode == 0); + } + + // }}} + // {{{ log() + + function log($level, $msg) + { + if ($this->current_callback) { + if ($this->debug >= $level) { + call_user_func($this->current_callback, 'output', $msg); + } + return; + } + return PEAR_Common::log($level, $msg); + } + + // }}} +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/ChannelFile.php b/campcaster/src/tools/pear/src/PEAR/ChannelFile.php new file mode 100644 index 000000000..001652119 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/ChannelFile.php @@ -0,0 +1,1615 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: ChannelFile.php,v 1.75 2006/03/02 18:14:12 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * Needed for error handling + */ +require_once 'PEAR/ErrorStack.php'; +require_once 'PEAR/XMLParser.php'; +require_once 'PEAR/Common.php'; + +/** + * Error code if the channel.xml tag does not contain a valid version + */ +define('PEAR_CHANNELFILE_ERROR_NO_VERSION', 1); +/** + * Error code if the channel.xml tag version is not supported (version 1.0 is the only supported version, + * currently + */ +define('PEAR_CHANNELFILE_ERROR_INVALID_VERSION', 2); + +/** + * Error code if parsing is attempted with no xml extension + */ +define('PEAR_CHANNELFILE_ERROR_NO_XML_EXT', 3); + +/** + * Error code if creating the xml parser resource fails + */ +define('PEAR_CHANNELFILE_ERROR_CANT_MAKE_PARSER', 4); + +/** + * Error code used for all sax xml parsing errors + */ +define('PEAR_CHANNELFILE_ERROR_PARSER_ERROR', 5); + +/**#@+ + * Validation errors + */ +/** + * Error code when channel name is missing + */ +define('PEAR_CHANNELFILE_ERROR_NO_NAME', 6); +/** + * Error code when channel name is invalid + */ +define('PEAR_CHANNELFILE_ERROR_INVALID_NAME', 7); +/** + * Error code when channel summary is missing + */ +define('PEAR_CHANNELFILE_ERROR_NO_SUMMARY', 8); +/** + * Error code when channel summary is multi-line + */ +define('PEAR_CHANNELFILE_ERROR_MULTILINE_SUMMARY', 9); +/** + * Error code when channel server is missing for xmlrpc or soap protocol + */ +define('PEAR_CHANNELFILE_ERROR_NO_HOST', 10); +/** + * Error code when channel server is invalid for xmlrpc or soap protocol + */ +define('PEAR_CHANNELFILE_ERROR_INVALID_HOST', 11); +/** + * Error code when a mirror name is invalid + */ +define('PEAR_CHANNELFILE_ERROR_INVALID_MIRROR', 21); +/** + * Error code when a mirror type is invalid + */ +define('PEAR_CHANNELFILE_ERROR_INVALID_MIRRORTYPE', 22); +/** + * Error code when an attempt is made to generate xml, but the parsed content is invalid + */ +define('PEAR_CHANNELFILE_ERROR_INVALID', 23); +/** + * Error code when an empty package name validate regex is passed in + */ +define('PEAR_CHANNELFILE_ERROR_EMPTY_REGEX', 24); +/** + * Error code when a tag has no version + */ +define('PEAR_CHANNELFILE_ERROR_NO_FUNCTIONVERSION', 25); +/** + * Error code when a tag has no name + */ +define('PEAR_CHANNELFILE_ERROR_NO_FUNCTIONNAME', 26); +/** + * Error code when a tag has no name + */ +define('PEAR_CHANNELFILE_ERROR_NOVALIDATE_NAME', 27); +/** + * Error code when a tag has no version attribute + */ +define('PEAR_CHANNELFILE_ERROR_NOVALIDATE_VERSION', 28); +/** + * Error code when a mirror does not exist but is called for in one of the set* + * methods. + */ +define('PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND', 32); +/** + * Error code when a server port is not numeric + */ +define('PEAR_CHANNELFILE_ERROR_INVALID_PORT', 33); +/** + * Error code when contains no version attribute + */ +define('PEAR_CHANNELFILE_ERROR_NO_STATICVERSION', 34); +/** + * Error code when contains no type attribute in a protocol definition + */ +define('PEAR_CHANNELFILE_ERROR_NOBASEURLTYPE', 35); +/** + * Error code when a mirror is defined and the channel.xml represents the __uri pseudo-channel + */ +define('PEAR_CHANNELFILE_URI_CANT_MIRROR', 36); +/** + * Error code when ssl attribute is present and is not "yes" + */ +define('PEAR_CHANNELFILE_ERROR_INVALID_SSL', 37); +/**#@-*/ + +/** + * Mirror types allowed. Currently only internet servers are recognized. + */ +$GLOBALS['_PEAR_CHANNELS_MIRROR_TYPES'] = array('server'); + + +/** + * The Channel handling class + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_ChannelFile { + /** + * @access private + * @var PEAR_ErrorStack + * @access private + */ + var $_stack; + + /** + * Supported channel.xml versions, for parsing + * @var array + * @access private + */ + var $_supportedVersions = array('1.0'); + + /** + * Parsed channel information + * @var array + * @access private + */ + var $_channelInfo; + + /** + * index into the subchannels array, used for parsing xml + * @var int + * @access private + */ + var $_subchannelIndex; + + /** + * index into the mirrors array, used for parsing xml + * @var int + * @access private + */ + var $_mirrorIndex; + + /** + * Flag used to determine the validity of parsed content + * @var boolean + * @access private + */ + var $_isValid = false; + + function PEAR_ChannelFile() + { + $this->_stack = &new PEAR_ErrorStack('PEAR_ChannelFile'); + $this->_stack->setErrorMessageTemplate($this->_getErrorMessage()); + $this->_isValid = false; + } + + /** + * @return array + * @access protected + */ + function _getErrorMessage() + { + return + array( + PEAR_CHANNELFILE_ERROR_INVALID_VERSION => + 'While parsing channel.xml, an invalid version number "%version% was passed in, expecting one of %versions%', + PEAR_CHANNELFILE_ERROR_NO_VERSION => + 'No version number found in tag', + PEAR_CHANNELFILE_ERROR_NO_XML_EXT => + '%error%', + PEAR_CHANNELFILE_ERROR_CANT_MAKE_PARSER => + 'Unable to create XML parser', + PEAR_CHANNELFILE_ERROR_PARSER_ERROR => + '%error%', + PEAR_CHANNELFILE_ERROR_NO_NAME => + 'Missing channel name', + PEAR_CHANNELFILE_ERROR_INVALID_NAME => + 'Invalid channel %tag% "%name%"', + PEAR_CHANNELFILE_ERROR_NO_SUMMARY => + 'Missing channel summary', + PEAR_CHANNELFILE_ERROR_MULTILINE_SUMMARY => + 'Channel summary should be on one line, but is multi-line', + PEAR_CHANNELFILE_ERROR_NO_HOST => + 'Missing channel server for %type% server', + PEAR_CHANNELFILE_ERROR_INVALID_HOST => + 'Server name "%server%" is invalid for %type% server', + PEAR_CHANNELFILE_ERROR_INVALID_MIRROR => + 'Invalid mirror name "%name%", mirror type %type%', + PEAR_CHANNELFILE_ERROR_INVALID_MIRRORTYPE => + 'Invalid mirror type "%type%"', + PEAR_CHANNELFILE_ERROR_INVALID => + 'Cannot generate xml, contents are invalid', + PEAR_CHANNELFILE_ERROR_EMPTY_REGEX => + 'packagenameregex cannot be empty', + PEAR_CHANNELFILE_ERROR_NO_FUNCTIONVERSION => + '%parent% %protocol% function has no version', + PEAR_CHANNELFILE_ERROR_NO_FUNCTIONNAME => + '%parent% %protocol% function has no name', + PEAR_CHANNELFILE_ERROR_NOBASEURLTYPE => + '%parent% rest baseurl has no type', + PEAR_CHANNELFILE_ERROR_NOVALIDATE_NAME => + 'Validation package has no name in tag', + PEAR_CHANNELFILE_ERROR_NOVALIDATE_VERSION => + 'Validation package "%package%" has no version', + PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND => + 'Mirror "%mirror%" does not exist', + PEAR_CHANNELFILE_ERROR_INVALID_PORT => + 'Port "%port%" must be numeric', + PEAR_CHANNELFILE_ERROR_NO_STATICVERSION => + ' tag must contain version attribute', + PEAR_CHANNELFILE_URI_CANT_MIRROR => + 'The __uri pseudo-channel cannot have mirrors', + PEAR_CHANNELFILE_ERROR_INVALID_SSL => + '%server% has invalid ssl attribute "%ssl%" can only be yes or not present', + ); + } + + /** + * @param string contents of package.xml file + * @return bool success of parsing + */ + function fromXmlString($data) + { + if (preg_match('/_supportedVersions)) { + $this->_stack->push(PEAR_CHANNELFILE_ERROR_INVALID_VERSION, 'error', + array('version' => $channelversion[1])); + return false; + } + $parser = new PEAR_XMLParser; + $result = $parser->parse($data); + if ($result !== true) { + if ($result->getCode() == 1) { + $this->_stack->push(PEAR_CHANNELFILE_ERROR_NO_XML_EXT, 'error', + array('error' => $error)); + } else { + $this->_stack->push(PEAR_CHANNELFILE_ERROR_CANT_MAKE_PARSER, 'error'); + } + return false; + } + $this->_channelInfo = $parser->getData(); + return true; + } else { + $this->_stack->push(PEAR_CHANNELFILE_ERROR_NO_VERSION, 'error', array('xml' => $data)); + return false; + } + } + + /** + * @return array + */ + function toArray() + { + if (!$this->_isValid && !$this->validate()) { + return false; + } + return $this->_channelInfo; + } + + /** + * @param array + * @static + * @return PEAR_ChannelFile|false false if invalid + */ + function &fromArray($data, $compatibility = false, $stackClass = 'PEAR_ErrorStack') + { + $a = new PEAR_ChannelFile($compatibility, $stackClass); + $a->_fromArray($data); + if (!$a->validate()) { + $a = false; + return $a; + } + return $a; + } + + /** + * Unlike {@link fromArray()} this does not do any validation + * @param array + * @static + * @return PEAR_ChannelFile + */ + function &fromArrayWithErrors($data, $compatibility = false, + $stackClass = 'PEAR_ErrorStack') + { + $a = new PEAR_ChannelFile($compatibility, $stackClass); + $a->_fromArray($data); + return $a; + } + + /** + * @param array + * @access private + */ + function _fromArray($data) + { + $this->_channelInfo = $data; + } + + /** + * Wrapper to {@link PEAR_ErrorStack::getErrors()} + * @param boolean determines whether to purge the error stack after retrieving + * @return array + */ + function getErrors($purge = false) + { + return $this->_stack->getErrors($purge); + } + + /** + * Unindent given string (?) + * + * @param string $str The string that has to be unindented. + * @return string + * @access private + */ + function _unIndent($str) + { + // remove leading newlines + $str = preg_replace('/^[\r\n]+/', '', $str); + // find whitespace at the beginning of the first line + $indent_len = strspn($str, " \t"); + $indent = substr($str, 0, $indent_len); + $data = ''; + // remove the same amount of whitespace from following lines + foreach (explode("\n", $str) as $line) { + if (substr($line, 0, $indent_len) == $indent) { + $data .= substr($line, $indent_len) . "\n"; + } + } + return $data; + } + + /** + * Parse a channel.xml file. Expects the name of + * a channel xml file as input. + * + * @param string $descfile name of channel xml file + * @return bool success of parsing + */ + function fromXmlFile($descfile) + { + if (!@is_file($descfile) || !is_readable($descfile) || + (!$fp = @fopen($descfile, 'r'))) { + require_once 'PEAR.php'; + return PEAR::raiseError("Unable to open $descfile"); + } + + // read the whole thing so we only get one cdata callback + // for each block of cdata + if (function_exists('file_get_contents')) { + fclose($fp); + $data = file_get_contents($descfile); + } else { + $data = fread($fp, filesize($descfile)); + fclose($fp); + } + return $this->fromXmlString($data); + } + + /** + * Parse channel information from different sources + * + * This method is able to extract information about a channel + * from an .xml file or a string + * + * @access public + * @param string Filename of the source or the source itself + * @return bool + */ + function fromAny($info) + { + if (is_string($info) && file_exists($info) && strlen($info) < 255) { + $tmp = substr($info, -4); + if ($tmp == '.xml') { + $info = $this->fromXmlFile($info); + } else { + $fp = fopen($info, "r"); + $test = fread($fp, 5); + fclose($fp); + if ($test == "fromXmlFile($info); + } + } + if (PEAR::isError($info)) { + require_once 'PEAR.php'; + return PEAR::raiseError($info); + } + } + if (is_string($info)) { + $info = $this->fromXmlString($info); + } + return $info; + } + + /** + * Return an XML document based on previous parsing and modifications + * + * @return string XML data + * + * @access public + */ + function toXml() + { + if (!$this->_isValid && !$this->validate()) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID); + return false; + } + if (!isset($this->_channelInfo['attribs']['version'])) { + $this->_channelInfo['attribs']['version'] = '1.0'; + } + $channelInfo = $this->_channelInfo; + $ret = "\n"; + $ret .= " + $channelInfo[name] + " . htmlspecialchars($channelInfo['summary'])." +"; + if (isset($channelInfo['suggestedalias'])) { + $ret .= ' ' . $channelInfo['suggestedalias'] . "\n"; + } + if (isset($channelInfo['validatepackage'])) { + $ret .= ' ' . + htmlspecialchars($channelInfo['validatepackage']['_content']) . + "\n"; + } + $ret .= " \n"; + $ret .= ' _makeXmlrpcXml($channelInfo['servers']['primary']['xmlrpc'], ' '); + } + if (isset($channelInfo['servers']['primary']['rest'])) { + $ret .= $this->_makeRestXml($channelInfo['servers']['primary']['rest'], ' '); + } + if (isset($channelInfo['servers']['primary']['soap'])) { + $ret .= $this->_makeSoapXml($channelInfo['servers']['primary']['soap'], ' '); + } + $ret .= " \n"; + if (isset($channelInfo['servers']['mirror'])) { + $ret .= $this->_makeMirrorsXml($channelInfo); + } + $ret .= " \n"; + $ret .= ""; + return str_replace("\r", "\n", str_replace("\r\n", "\n", $ret)); + } + + /** + * Generate the tag + * @access private + */ + function _makeXmlrpcXml($info, $indent) + { + $ret = $indent . "_makeFunctionsXml($info['function'], "$indent "); + $ret .= $indent . "\n"; + return $ret; + } + + /** + * Generate the tag + * @access private + */ + function _makeSoapXml($info, $indent) + { + $ret = $indent . "_makeFunctionsXml($info['function'], "$indent "); + $ret .= $indent . "\n"; + return $ret; + } + + /** + * Generate the tag + * @access private + */ + function _makeRestXml($info, $indent) + { + $ret = $indent . "\n"; + if (!isset($info['baseurl'][0])) { + $info['baseurl'] = array($info['baseurl']); + } + foreach ($info['baseurl'] as $url) { + $ret .= "$indent \n"; + } + $ret .= $indent . "\n"; + return $ret; + } + + /** + * Generate the tag + * @access private + */ + function _makeMirrorsXml($channelInfo) + { + $ret = ""; + if (!isset($channelInfo['servers']['mirror'][0])) { + $channelInfo['servers']['mirror'] = array($channelInfo['servers']['mirror']); + } + foreach ($channelInfo['servers']['mirror'] as $mirror) { + $ret .= ' _makeXmlrpcXml($mirror['xmlrpc'], ' '); + } + if (isset($mirror['rest'])) { + $ret .= $this->_makeRestXml($mirror['rest'], ' '); + } + if (isset($mirror['soap'])) { + $ret .= $this->_makeSoapXml($mirror['soap'], ' '); + } + $ret .= " \n"; + } else { + $ret .= "/>\n"; + } + } + return $ret; + } + + /** + * Generate the tag + * @access private + */ + function _makeFunctionsXml($functions, $indent, $rest = false) + { + $ret = ''; + if (!isset($functions[0])) { + $functions = array($functions); + } + foreach ($functions as $function) { + $ret .= "$indent\n"; + } + return $ret; + } + + /** + * Validation error. Also marks the object contents as invalid + * @param error code + * @param array error information + * @access private + */ + function _validateError($code, $params = array()) + { + $this->_stack->push($code, 'error', $params); + $this->_isValid = false; + } + + /** + * Validation warning. Does not mark the object contents invalid. + * @param error code + * @param array error information + * @access private + */ + function _validateWarning($code, $params = array()) + { + $this->_stack->push($code, 'warning', $params); + } + + /** + * Validate parsed file. + * + * @access public + * @return boolean + */ + function validate() + { + $this->_isValid = true; + $info = $this->_channelInfo; + if (empty($info['name'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NO_NAME); + } elseif (!$this->validChannelServer($info['name'])) { + if ($info['name'] != '__uri') { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_NAME, array('tag' => 'name', + 'name' => $info['name'])); + } + } + if (empty($info['summary'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NO_SUMMARY); + } elseif (strpos(trim($info['summary']), "\n") !== false) { + $this->_validateWarning(PEAR_CHANNELFILE_ERROR_MULTILINE_SUMMARY, + array('summary' => $info['summary'])); + } + if (isset($info['suggestedalias'])) { + if (!$this->validChannelServer($info['suggestedalias'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_NAME, + array('tag' => 'suggestedalias', 'name' =>$info['suggestedalias'])); + } + } + if (isset($info['localalias'])) { + if (!$this->validChannelServer($info['localalias'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_NAME, + array('tag' => 'localalias', 'name' =>$info['localalias'])); + } + } + if (isset($info['validatepackage'])) { + if (!isset($info['validatepackage']['_content'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NOVALIDATE_NAME); + } + if (!isset($info['validatepackage']['attribs']['version'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NOVALIDATE_VERSION, + array('package' => @$info['validatepackage']['_content'])); + } + } + if (isset($info['servers']['primary']['attribs']['port']) && + !is_numeric($info['servers']['primary']['attribs']['port'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_PORT, + array('port' => $info['servers']['primary']['attribs']['port'])); + } + if (isset($info['servers']['primary']['attribs']['ssl']) && + $info['servers']['primary']['attribs']['ssl'] != 'yes') { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_SSL, + array('ssl' => $info['servers']['primary']['attribs']['ssl'], + 'server' => $info['name'])); + } + + if (isset($info['servers']['primary']['xmlrpc']) && + isset($info['servers']['primary']['xmlrpc']['function'])) { + $this->_validateFunctions('xmlrpc', $info['servers']['primary']['xmlrpc']['function']); + } + if (isset($info['servers']['primary']['soap']) && + isset($info['servers']['primary']['soap']['function'])) { + $this->_validateFunctions('soap', $info['servers']['primary']['soap']['function']); + } + if (isset($info['servers']['primary']['rest']) && + isset($info['servers']['primary']['rest']['baseurl'])) { + $this->_validateFunctions('rest', $info['servers']['primary']['rest']['baseurl']); + } + if (isset($info['servers']['mirror'])) { + if ($this->_channelInfo['name'] == '__uri') { + $this->_validateError(PEAR_CHANNELFILE_URI_CANT_MIRROR); + } + if (!isset($info['servers']['mirror'][0])) { + $info['servers']['mirror'] = array($info['servers']['mirror']); + } + $i = 0; + foreach ($info['servers']['mirror'] as $mirror) { + if (!isset($mirror['attribs']['host'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NO_HOST, + array('type' => 'mirror')); + } elseif (!$this->validChannelServer($mirror['attribs']['host'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_HOST, + array('server' => $mirror['attribs']['host'], 'type' => 'mirror')); + } + if (isset($mirror['attribs']['ssl']) && $mirror['attribs']['ssl'] != 'yes') { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_SSL, + array('ssl' => $info['ssl'], 'server' => $mirror['attribs']['host'])); + } + if (isset($mirror['xmlrpc'])) { + $this->_validateFunctions('xmlrpc', + $mirror['xmlrpc']['function'], $mirror['attribs']['host']); + } + if (isset($mirror['soap'])) { + $this->_validateFunctions('soap', $mirror['soap']['function'], + $mirror['attribs']['host']); + } + if (isset($mirror['rest'])) { + $this->_validateFunctions('rest', $mirror['rest']['baseurl'], + $mirror['attribs']['host']); + } + } + } + return $this->_isValid; + } + + /** + * @param string xmlrpc or soap - protocol name this function applies to + * @param array the functions + * @param string the name of the parent element (mirror name, for instance) + */ + function _validateFunctions($protocol, $functions, $parent = '') + { + if (!isset($functions[0])) { + $functions = array($functions); + } + foreach ($functions as $function) { + if (!isset($function['_content']) || empty($function['_content'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NO_FUNCTIONNAME, + array('parent' => $parent, 'protocol' => $protocol)); + } + if ($protocol == 'rest') { + if (!isset($function['attribs']['type']) || + empty($function['attribs']['type'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NO_BASEURLTYPE, + array('parent' => $parent, 'protocol' => $protocol)); + } + } else { + if (!isset($function['attribs']['version']) || + empty($function['attribs']['version'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NO_FUNCTIONVERSION, + array('parent' => $parent, 'protocol' => $protocol)); + } + } + } + } + + /** + * Test whether a string contains a valid channel server. + * @param string $ver the package version to test + * @return bool + */ + function validChannelServer($server) + { + if ($server == '__uri') { + return true; + } + return (bool) preg_match(PEAR_CHANNELS_SERVER_PREG, $server); + } + + /** + * @return string|false + */ + function getName() + { + if (isset($this->_channelInfo['name'])) { + return $this->_channelInfo['name']; + } else { + return false; + } + } + + /** + * @return string|false + */ + function getServer() + { + if (isset($this->_channelInfo['name'])) { + return $this->_channelInfo['name']; + } else { + return false; + } + } + + /** + * @return int|80 port number to connect to + */ + function getPort($mirror = false) + { + if ($mirror) { + if ($mir = $this->getMirror($mirror)) { + if (isset($mir['attribs']['port'])) { + return $mir['attribs']['port']; + } else { + if ($this->getSSL($mirror)) { + return 443; + } + return 80; + } + } + return false; + } + if (isset($this->_channelInfo['servers']['primary']['attribs']['port'])) { + return $this->_channelInfo['servers']['primary']['attribs']['port']; + } + if ($this->getSSL()) { + return 443; + } + return 80; + } + + /** + * @return bool Determines whether secure sockets layer (SSL) is used to connect to this channel + */ + function getSSL($mirror = false) + { + if ($mirror) { + if ($mir = $this->getMirror($mirror)) { + if (isset($mir['attribs']['ssl'])) { + return true; + } else { + return false; + } + } + return false; + } + if (isset($this->_channelInfo['servers']['primary']['attribs']['ssl'])) { + return true; + } + return false; + } + + /** + * @return string|false + */ + function getSummary() + { + if (isset($this->_channelInfo['summary'])) { + return $this->_channelInfo['summary']; + } else { + return false; + } + } + + /** + * @param string xmlrpc or soap + * @param string|false mirror name or false for primary server + */ + function getPath($protocol, $mirror = false) + { + if (!in_array($protocol, array('xmlrpc', 'soap'))) { + return false; + } + if ($mirror) { + if (!($mir = $this->getMirror($mirror))) { + return false; + } + if (isset($mir[$protocol]['attribs']['path'])) { + return $mir[$protocol]['attribs']['path']; + } else { + return $protocol . '.php'; + } + } elseif (isset($this->_channelInfo['servers']['primary'][$protocol]['attribs']['path'])) { + return $this->_channelInfo['servers']['primary'][$protocol]['attribs']['path']; + } + return $protocol . '.php'; + } + + /** + * @param string protocol type (xmlrpc, soap) + * @param string Mirror name + * @return array|false + */ + function getFunctions($protocol, $mirror = false) + { + if ($this->getName() == '__uri') { + return false; + } + if ($protocol == 'rest') { + $function = 'baseurl'; + } else { + $function = 'function'; + } + if ($mirror) { + if ($mir = $this->getMirror($mirror)) { + if (isset($mir[$protocol][$function])) { + return $mir[$protocol][$function]; + } + } + return false; + } + if (isset($this->_channelInfo['servers']['primary'][$protocol][$function])) { + return $this->_channelInfo['servers']['primary'][$protocol][$function]; + } else { + return false; + } + } + + /** + * @param string Protocol type + * @param string Function name (null to return the + * first protocol of the type requested) + * @param string Mirror name, if any + * @return array + */ + function getFunction($type, $name = null, $mirror = false) + { + $protocols = $this->getFunctions($type, $mirror); + if (!$protocols) { + return false; + } + foreach ($protocols as $protocol) { + if ($name === null) { + return $protocol; + } + if ($protocol['_content'] != $name) { + continue; + } + return $protocol; + } + return false; + } + + /** + * @param string protocol type + * @param string protocol name + * @param string version + * @param string mirror name + * @return boolean + */ + function supports($type, $name = null, $mirror = false, $version = '1.0') + { + $protocols = $this->getFunctions($type, $mirror); + if (!$protocols) { + return false; + } + foreach ($protocols as $protocol) { + if ($protocol['attribs']['version'] != $version) { + continue; + } + if ($name === null) { + return true; + } + if ($protocol['_content'] != $name) { + continue; + } + return true; + } + return false; + } + + /** + * Determines whether a channel supports Representational State Transfer (REST) protocols + * for retrieving channel information + * @param string + * @return bool + */ + function supportsREST($mirror = false) + { + if ($mirror == $this->_channelInfo['name']) { + $mirror = false; + } + if ($mirror) { + if ($mir = $this->getMirror($mirror)) { + return isset($mir['rest']); + } + return false; + } + return isset($this->_channelInfo['servers']['primary']['rest']); + } + + /** + * Get the URL to access a base resource. + * + * Hyperlinks in the returned xml will be used to retrieve the proper information + * needed. This allows extreme extensibility and flexibility in implementation + * @param string Resource Type to retrieve + */ + function getBaseURL($resourceType, $mirror = false) + { + if ($mirror == $this->_channelInfo['name']) { + $mirror = false; + } + if ($mirror) { + if ($mir = $this->getMirror($mirror)) { + $rest = $mir['rest']; + } else { + return false; + } + $server = $mirror; + } else { + $rest = $this->_channelInfo['servers']['primary']['rest']; + $server = $this->getServer(); + } + if (!isset($rest['baseurl'][0])) { + $rest['baseurl'] = array($rest['baseurl']); + } + foreach ($rest['baseurl'] as $baseurl) { + if (strtolower($baseurl['attribs']['type']) == strtolower($resourceType)) { + return $baseurl['_content']; + } + } + return false; + } + + /** + * Since REST does not implement RPC, provide this as a logical wrapper around + * resetFunctions for REST + * @param string|false mirror name, if any + */ + function resetREST($mirror = false) + { + return $this->resetFunctions('rest', $mirror); + } + + /** + * Empty all protocol definitions + * @param string protocol type (xmlrpc, soap) + * @param string|false mirror name, if any + */ + function resetFunctions($type, $mirror = false) + { + if ($mirror) { + if (isset($this->_channelInfo['servers']['mirror'])) { + $mirrors = $this->_channelInfo['servers']['mirror']; + if (!isset($mirrors[0])) { + $mirrors = array($mirrors); + } + foreach ($mirrors as $i => $mir) { + if ($mir['attribs']['host'] == $mirror) { + if (isset($this->_channelInfo['servers']['mirror'][$i][$type])) { + unset($this->_channelInfo['servers']['mirror'][$i][$type]); + } + return true; + } + } + return false; + } else { + return false; + } + } else { + if (isset($this->_channelInfo['servers']['primary'][$type])) { + unset($this->_channelInfo['servers']['primary'][$type]); + } + return true; + } + } + + /** + * Set a channel's protocols to the protocols supported by pearweb + */ + function setDefaultPEARProtocols($version = '1.0', $mirror = false) + { + switch ($version) { + case '1.0' : + $this->resetFunctions('xmlrpc', $mirror); + $this->resetFunctions('soap', $mirror); + $this->resetREST($mirror); + $this->addFunction('xmlrpc', '1.0', 'logintest', $mirror); + $this->addFunction('xmlrpc', '1.0', 'package.listLatestReleases', $mirror); + $this->addFunction('xmlrpc', '1.0', 'package.listAll', $mirror); + $this->addFunction('xmlrpc', '1.0', 'package.info', $mirror); + $this->addFunction('xmlrpc', '1.0', 'package.getDownloadURL', $mirror); + $this->addFunction('xmlrpc', '1.1', 'package.getDownloadURL', $mirror); + $this->addFunction('xmlrpc', '1.0', 'package.getDepDownloadURL', $mirror); + $this->addFunction('xmlrpc', '1.1', 'package.getDepDownloadURL', $mirror); + $this->addFunction('xmlrpc', '1.0', 'package.search', $mirror); + $this->addFunction('xmlrpc', '1.0', 'channel.listAll', $mirror); + return true; + break; + default : + return false; + break; + } + } + + /** + * @return array + */ + function getMirrors() + { + if (isset($this->_channelInfo['servers']['mirror'])) { + $mirrors = $this->_channelInfo['servers']['mirror']; + if (!isset($mirrors[0])) { + $mirrors = array($mirrors); + } + return $mirrors; + } else { + return array(); + } + } + + /** + * Get the unserialized XML representing a mirror + * @return array|false + */ + function getMirror($server) + { + foreach ($this->getMirrors() as $mirror) { + if ($mirror['attribs']['host'] == $server) { + return $mirror; + } + } + return false; + } + + /** + * @param string + * @return string|false + * @error PEAR_CHANNELFILE_ERROR_NO_NAME + * @error PEAR_CHANNELFILE_ERROR_INVALID_NAME + */ + function setName($name) + { + return $this->setServer($name); + } + + /** + * Set the socket number (port) that is used to connect to this channel + * @param integer + * @param string|false name of the mirror server, or false for the primary + */ + function setPort($port, $mirror = false) + { + if ($mirror) { + if (!isset($this->_channelInfo['servers']['mirror'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND, + array('mirror' => $mirror)); + return false; + } + $setmirror = false; + if (isset($this->_channelInfo['servers']['mirror'][0])) { + foreach ($this->_channelInfo['servers']['mirror'] as $i => $mir) { + if ($mirror == $mir['attribs']['host']) { + $this->_channelInfo['servers']['mirror'][$i]['attribs']['port'] = $port; + return true; + } + } + return false; + } elseif ($this->_channelInfo['servers']['mirror']['attribs']['host'] == $mirror) { + $this->_channelInfo['servers']['mirror']['attribs']['port'] = $port; + $this->_isValid = false; + return true; + } + } + $this->_channelInfo['servers']['primary']['attribs']['port'] = $port; + $this->_isValid = false; + return true; + } + + /** + * Set the socket number (port) that is used to connect to this channel + * @param bool Determines whether to turn on SSL support or turn it off + * @param string|false name of the mirror server, or false for the primary + */ + function setSSL($ssl = true, $mirror = false) + { + if ($mirror) { + if (!isset($this->_channelInfo['servers']['mirror'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND, + array('mirror' => $mirror)); + return false; + } + $setmirror = false; + if (isset($this->_channelInfo['servers']['mirror'][0])) { + foreach ($this->_channelInfo['servers']['mirror'] as $i => $mir) { + if ($mirror == $mir['attribs']['host']) { + if (!$ssl) { + if (isset($this->_channelInfo['servers']['mirror'][$i] + ['attribs']['ssl'])) { + unset($this->_channelInfo['servers']['mirror'][$i]['attribs']['ssl']); + } + } else { + $this->_channelInfo['servers']['mirror'][$i]['attribs']['ssl'] = 'yes'; + } + return true; + } + } + return false; + } elseif ($this->_channelInfo['servers']['mirror']['attribs']['host'] == $mirror) { + if (!$ssl) { + if (isset($this->_channelInfo['servers']['mirror']['attribs']['ssl'])) { + unset($this->_channelInfo['servers']['mirror']['attribs']['ssl']); + } + } else { + $this->_channelInfo['servers']['mirror']['attribs']['ssl'] = 'yes'; + } + $this->_isValid = false; + return true; + } + } + if ($ssl) { + $this->_channelInfo['servers']['primary']['attribs']['ssl'] = 'yes'; + } else { + if (isset($this->_channelInfo['servers']['primary']['attribs']['ssl'])) { + unset($this->_channelInfo['servers']['primary']['attribs']['ssl']); + } + } + $this->_isValid = false; + return true; + } + + /** + * Set the socket number (port) that is used to connect to this channel + * @param integer + * @param string|false name of the mirror server, or false for the primary + */ + function setPath($protocol, $path, $mirror = false) + { + if (!in_array($protocol, array('xmlrpc', 'soap'))) { + return false; + } + if ($mirror) { + if (!isset($this->_channelInfo['servers']['mirror'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND, + array('mirror' => $mirror)); + return false; + } + $setmirror = false; + if (isset($this->_channelInfo['servers']['mirror'][0])) { + foreach ($this->_channelInfo['servers']['mirror'] as $i => $mir) { + if ($mirror == $mir['attribs']['host']) { + $this->_channelInfo['servers']['mirror'][$i][$protocol]['attribs']['path'] = + $path; + return true; + } + } + $this->_validateError(PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND, + array('mirror' => $mirror)); + return false; + } elseif ($this->_channelInfo['servers']['mirror']['attribs']['host'] == $mirror) { + $this->_channelInfo['servers']['mirror'][$protocol]['attribs']['path'] = $path; + $this->_isValid = false; + return true; + } + } + $this->_channelInfo['servers']['primary'][$protocol]['attribs']['path'] = $path; + $this->_isValid = false; + return true; + } + + /** + * @param string + * @return string|false + * @error PEAR_CHANNELFILE_ERROR_NO_SERVER + * @error PEAR_CHANNELFILE_ERROR_INVALID_SERVER + */ + function setServer($server, $mirror = false) + { + if (empty($server)) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NO_SERVER); + return false; + } elseif (!$this->validChannelServer($server)) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_NAME, + array('tag' => 'name', 'name' => $server)); + return false; + } + if ($mirror) { + $found = false; + foreach ($this->_channelInfo['servers']['mirror'] as $i => $mir) { + if ($mirror == $mir['attribs']['host']) { + $found = true; + break; + } + } + if (!$found) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND, + array('mirror' => $mirror)); + return false; + } + $this->_channelInfo['mirror'][$i]['attribs']['host'] = $server; + return true; + } + $this->_channelInfo['name'] = $server; + return true; + } + + /** + * @param string + * @return boolean success + * @error PEAR_CHANNELFILE_ERROR_NO_SUMMARY + * @warning PEAR_CHANNELFILE_ERROR_MULTILINE_SUMMARY + */ + function setSummary($summary) + { + if (empty($summary)) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_NO_SUMMARY); + return false; + } elseif (strpos(trim($summary), "\n") !== false) { + $this->_validateWarning(PEAR_CHANNELFILE_ERROR_MULTILINE_SUMMARY, + array('summary' => $summary)); + } + $this->_channelInfo['summary'] = $summary; + return true; + } + + /** + * @param string + * @param boolean determines whether the alias is in channel.xml or local + * @return boolean success + */ + function setAlias($alias, $local = false) + { + if (!$this->validChannelServer($alias)) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_INVALID_NAME, + array('tag' => 'suggestedalias', 'name' => $alias)); + return false; + } + if ($local) { + $this->_channelInfo['localalias'] = $alias; + } else { + $this->_channelInfo['suggestedalias'] = $alias; + } + return true; + } + + /** + * @return string + */ + function getAlias() + { + if (isset($this->_channelInfo['localalias'])) { + return $this->_channelInfo['localalias']; + } + if (isset($this->_channelInfo['suggestedalias'])) { + return $this->_channelInfo['suggestedalias']; + } + if (isset($this->_channelInfo['name'])) { + return $this->_channelInfo['name']; + } + } + + /** + * Set the package validation object if it differs from PEAR's default + * The class must be includeable via changing _ in the classname to path separator, + * but no checking of this is made. + * @param string|false pass in false to reset to the default packagename regex + * @return boolean success + */ + function setValidationPackage($validateclass, $version) + { + if (empty($validateclass)) { + unset($this->_channelInfo['validatepackage']); + } + $this->_channelInfo['validatepackage'] = array('_content' => $validateclass); + $this->_channelInfo['validatepackage']['attribs'] = array('version' => $version); + } + + /** + * Add a protocol to the provides section + * @param string protocol type + * @param string protocol version + * @param string protocol name, if any + * @param string mirror name, if this is a mirror's protocol + * @return bool + */ + function addFunction($type, $version, $name = '', $mirror = false) + { + if ($mirror) { + return $this->addMirrorFunction($mirror, $type, $version, $name); + } + $set = array('attribs' => array('version' => $version), '_content' => $name); + if (!isset($this->_channelInfo['servers']['primary'][$type]['function'])) { + $this->_channelInfo['servers']['primary'][$type]['function'] = $set; + $this->_isValid = false; + return true; + } elseif (!isset($this->_channelInfo['servers']['primary'][$type]['function'][0])) { + $this->_channelInfo['servers']['primary'][$type]['function'] = array( + $this->_channelInfo['servers']['primary'][$type]['function']); + } + $this->_channelInfo['servers']['primary'][$type]['function'][] = $set; + return true; + } + /** + * Add a protocol to a mirror's provides section + * @param string mirror name (server) + * @param string protocol type + * @param string protocol version + * @param string protocol name, if any + */ + function addMirrorFunction($mirror, $type, $version, $name = '') + { + $found = false; + if (!isset($this->_channelInfo['servers']['mirror'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND, + array('mirror' => $mirror)); + return false; + } + $setmirror = false; + if (isset($this->_channelInfo['servers']['mirror'][0])) { + foreach ($this->_channelInfo['servers']['mirror'] as $i => $mir) { + if ($mirror == $mir['attribs']['host']) { + $setmirror = &$this->_channelInfo['servers']['mirror'][$i]; + break; + } + } + } else { + if ($this->_channelInfo['servers']['mirror']['attribs']['host'] == $mirror) { + $setmirror = &$this->_channelInfo['servers']['mirror']; + } + } + if (!$setmirror) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND, + array('mirror' => $mirror)); + return false; + } + $set = array('attribs' => array('version' => $version), '_content' => $name); + if (!isset($setmirror[$type]['function'])) { + $setmirror[$type]['function'] = $set; + $this->_isValid = false; + return true; + } elseif (!isset($setmirror[$type]['function'][0])) { + $setmirror[$type]['function'] = array($setmirror[$type]['function']); + } + $setmirror[$type]['function'][] = $set; + $this->_isValid = false; + return true; + } + + /** + * @param string Resource Type this url links to + * @param string URL + * @param string|false mirror name, if this is not a primary server REST base URL + */ + function setBaseURL($resourceType, $url, $mirror = false) + { + if ($mirror) { + $found = false; + if (!isset($this->_channelInfo['servers']['mirror'])) { + $this->_validateError(PEAR_CHANNELFILE_ERROR_MIRROR_NOT_FOUND, + array('mirror' => $mirror)); + return false; + } + $setmirror = false; + if (isset($this->_channelInfo['servers']['mirror'][0])) { + foreach ($this->_channelInfo['servers']['mirror'] as $i => $mir) { + if ($mirror == $mir['attribs']['host']) { + $setmirror = &$this->_channelInfo['servers']['mirror'][$i]; + break; + } + } + } else { + if ($this->_channelInfo['servers']['mirror']['attribs']['host'] == $mirror) { + $setmirror = &$this->_channelInfo['servers']['mirror']; + } + } + } else { + $setmirror = &$this->_channelInfo['servers']['primary']; + } + $set = array('attribs' => array('type' => $resourceType), '_content' => $url); + if (!isset($setmirror['rest']['baseurl'])) { + $setmirror['rest']['baseurl'] = $set; + $this->_isValid = false; + return true; + } elseif (!isset($setmirror['rest']['baseurl'][0])) { + $setmirror['rest']['baseurl'] = array($setmirror['rest']['baseurl']); + } + foreach ($setmirror['rest']['baseurl'] as $i => $url) { + if ($url['attribs']['type'] == $resourceType) { + $this->_isValid = false; + $setmirror['rest']['baseurl'][$i] = $set; + return true; + } + } + $setmirror['rest']['baseurl'][] = $set; + $this->_isValid = false; + return true; + } + + /** + * @param string mirror server + * @param int mirror http port + * @return boolean + */ + function addMirror($server, $port = null) + { + if ($this->_channelInfo['name'] == '__uri') { + return false; // the __uri channel cannot have mirrors by definition + } + $set = array('attribs' => array('host' => $server)); + if (is_numeric($port)) { + $set['attribs']['port'] = $port; + } + if (!isset($this->_channelInfo['servers']['mirror'])) { + $this->_channelInfo['servers']['mirror'] = $set; + return true; + } else { + if (!isset($this->_channelInfo['servers']['mirror'][0])) { + $this->_channelInfo['servers']['mirror'] = + array($this->_channelInfo['servers']['mirror']); + } + } + $this->_channelInfo['servers']['mirror'][] = $set; + return true; + } + + /** + * Retrieve the name of the validation package for this channel + * @return string|false + */ + function getValidationPackage() + { + if (!$this->_isValid && !$this->validate()) { + return false; + } + if (!isset($this->_channelInfo['validatepackage'])) { + return array('attribs' => array('version' => 'default'), + '_content' => 'PEAR_Validate'); + } + return $this->_channelInfo['validatepackage']; + } + + /** + * Retrieve the object that can be used for custom validation + * @param string|false the name of the package to validate. If the package is + * the channel validation package, PEAR_Validate is returned + * @return PEAR_Validate|false false is returned if the validation package + * cannot be located + */ + function &getValidationObject($package = false) + { + if (!class_exists('PEAR_Validate')) { + require_once 'PEAR/Validate.php'; + } + if (!$this->_isValid) { + if (!$this->validate()) { + $a = false; + return $a; + } + } + if (isset($this->_channelInfo['validatepackage'])) { + if ($package == $this->_channelInfo['validatepackage']) { + // channel validation packages are always validated by PEAR_Validate + $val = &new PEAR_Validate; + return $val; + } + if (!class_exists(str_replace('.', '_', + $this->_channelInfo['validatepackage']['_content']))) { + if ($this->isIncludeable(str_replace('_', '/', + $this->_channelInfo['validatepackage']['_content']) . '.php')) { + include_once str_replace('_', '/', + $this->_channelInfo['validatepackage']['_content']) . '.php'; + $vclass = str_replace('.', '_', + $this->_channelInfo['validatepackage']['_content']); + $val = &new $vclass; + } else { + $a = false; + return $a; + } + } else { + $vclass = str_replace('.', '_', + $this->_channelInfo['validatepackage']['_content']); + $val = &new $vclass; + } + } else { + $val = &new PEAR_Validate; + } + return $val; + } + + function isIncludeable($path) + { + $possibilities = explode(PATH_SEPARATOR, ini_get('include_path')); + foreach ($possibilities as $dir) { + if (file_exists($dir . DIRECTORY_SEPARATOR . $path) + && is_readable($dir . DIRECTORY_SEPARATOR . $path)) { + return true; + } + } + return false; + } + + /** + * This function is used by the channel updater and retrieves a value set by + * the registry, or the current time if it has not been set + * @return string + */ + function lastModified() + { + if (isset($this->_channelInfo['_lastmodified'])) { + return $this->_channelInfo['_lastmodified']; + } + return time(); + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/ChannelFile/Parser.php b/campcaster/src/tools/pear/src/PEAR/ChannelFile/Parser.php new file mode 100644 index 000000000..bd7b2d2f6 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/ChannelFile/Parser.php @@ -0,0 +1,73 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Parser.php,v 1.4 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * base xml parser class + */ +require_once 'PEAR/XMLParser.php'; +require_once 'PEAR/ChannelFile.php'; +/** + * Parser for channel.xml + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_ChannelFile_Parser extends PEAR_XMLParser +{ + var $_config; + var $_logger; + var $_registry; + + function setConfig(&$c) + { + $this->_config = &$c; + $this->_registry = &$c->getRegistry(); + } + + function setLogger(&$l) + { + $this->_logger = &$l; + } + + function parse($data, $file) + { + if (PEAR::isError($err = parent::parse($data, $file))) { + return $err; + } + $ret = new PEAR_ChannelFile; + $ret->setConfig($this->_config); + if (isset($this->_logger)) { + $ret->setLogger($this->_logger); + } + $ret->fromArray($this->_unserializedData); + // make sure the filelist is in the easy to read format needed + $ret->flattenFilelist(); + $ret->setPackagefile($file, $archive); + return $ret; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command.php b/campcaster/src/tools/pear/src/PEAR/Command.php new file mode 100644 index 000000000..8cb0714ec --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command.php @@ -0,0 +1,412 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Command.php,v 1.36.2.1 2006/06/16 13:01:59 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * Needed for error handling + */ +require_once 'PEAR.php'; +require_once 'PEAR/Frontend.php'; +require_once 'PEAR/XMLParser.php'; + +/** + * List of commands and what classes they are implemented in. + * @var array command => implementing class + */ +$GLOBALS['_PEAR_Command_commandlist'] = array(); + +/** + * List of shortcuts to common commands. + * @var array shortcut => command + */ +$GLOBALS['_PEAR_Command_shortcuts'] = array(); + +/** + * Array of command objects + * @var array class => object + */ +$GLOBALS['_PEAR_Command_objects'] = array(); + +/** + * PEAR command class, a simple factory class for administrative + * commands. + * + * How to implement command classes: + * + * - The class must be called PEAR_Command_Nnn, installed in the + * "PEAR/Common" subdir, with a method called getCommands() that + * returns an array of the commands implemented by the class (see + * PEAR/Command/Install.php for an example). + * + * - The class must implement a run() function that is called with three + * params: + * + * (string) command name + * (array) assoc array with options, freely defined by each + * command, for example: + * array('force' => true) + * (array) list of the other parameters + * + * The run() function returns a PEAR_CommandResponse object. Use + * these methods to get information: + * + * int getStatus() Returns PEAR_COMMAND_(SUCCESS|FAILURE|PARTIAL) + * *_PARTIAL means that you need to issue at least + * one more command to complete the operation + * (used for example for validation steps). + * + * string getMessage() Returns a message for the user. Remember, + * no HTML or other interface-specific markup. + * + * If something unexpected happens, run() returns a PEAR error. + * + * - DON'T OUTPUT ANYTHING! Return text for output instead. + * + * - DON'T USE HTML! The text you return will be used from both Gtk, + * web and command-line interfaces, so for now, keep everything to + * plain text. + * + * - DON'T USE EXIT OR DIE! Always use pear errors. From static + * classes do PEAR::raiseError(), from other classes do + * $this->raiseError(). + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Command +{ + // {{{ factory() + + /** + * Get the right object for executing a command. + * + * @param string $command The name of the command + * @param object $config Instance of PEAR_Config object + * + * @return object the command object or a PEAR error + * + * @access public + * @static + */ + function &factory($command, &$config) + { + if (empty($GLOBALS['_PEAR_Command_commandlist'])) { + PEAR_Command::registerCommands(); + } + if (isset($GLOBALS['_PEAR_Command_shortcuts'][$command])) { + $command = $GLOBALS['_PEAR_Command_shortcuts'][$command]; + } + if (!isset($GLOBALS['_PEAR_Command_commandlist'][$command])) { + $a = PEAR::raiseError("unknown command `$command'"); + return $a; + } + $class = $GLOBALS['_PEAR_Command_commandlist'][$command]; + if (!class_exists($class)) { + require_once $GLOBALS['_PEAR_Command_objects'][$class]; + } + if (!class_exists($class)) { + $a = PEAR::raiseError("unknown command `$command'"); + return $a; + } + $ui =& PEAR_Command::getFrontendObject(); + $obj = &new $class($ui, $config); + return $obj; + } + + // }}} + // {{{ & getObject() + function &getObject($command) + { + $class = $GLOBALS['_PEAR_Command_commandlist'][$command]; + if (!class_exists($class)) { + require_once $GLOBALS['_PEAR_Command_objects'][$class]; + } + if (!class_exists($class)) { + return PEAR::raiseError("unknown command `$command'"); + } + $ui =& PEAR_Command::getFrontendObject(); + $config = &PEAR_Config::singleton(); + $obj = &new $class($ui, $config); + return $obj; + } + + // }}} + // {{{ & getFrontendObject() + + /** + * Get instance of frontend object. + * + * @return object|PEAR_Error + * @static + */ + function &getFrontendObject() + { + $a = &PEAR_Frontend::singleton(); + return $a; + } + + // }}} + // {{{ & setFrontendClass() + + /** + * Load current frontend class. + * + * @param string $uiclass Name of class implementing the frontend + * + * @return object the frontend object, or a PEAR error + * @static + */ + function &setFrontendClass($uiclass) + { + $a = &PEAR_Frontend::setFrontendClass($uiclass); + return $a; + } + + // }}} + // {{{ setFrontendType() + + /** + * Set current frontend. + * + * @param string $uitype Name of the frontend type (for example "CLI") + * + * @return object the frontend object, or a PEAR error + * @static + */ + function setFrontendType($uitype) + { + $uiclass = 'PEAR_Frontend_' . $uitype; + return PEAR_Command::setFrontendClass($uiclass); + } + + // }}} + // {{{ registerCommands() + + /** + * Scan through the Command directory looking for classes + * and see what commands they implement. + * + * @param bool (optional) if FALSE (default), the new list of + * commands should replace the current one. If TRUE, + * new entries will be merged with old. + * + * @param string (optional) where (what directory) to look for + * classes, defaults to the Command subdirectory of + * the directory from where this file (__FILE__) is + * included. + * + * @return bool TRUE on success, a PEAR error on failure + * + * @access public + * @static + */ + function registerCommands($merge = false, $dir = null) + { + $parser = new PEAR_XMLParser; + if ($dir === null) { + $dir = dirname(__FILE__) . '/Command'; + } + + if (!@is_dir($dir)) { + return PEAR::raiseError("registerCommands: opendir($dir) '$dir' does not exist or is not a directory"); + } + + $dp = @opendir($dir); + if (empty($dp)) { + return PEAR::raiseError("registerCommands: opendir($dir) failed"); + } + if (!$merge) { + $GLOBALS['_PEAR_Command_commandlist'] = array(); + } + while ($entry = readdir($dp)) { + if ($entry{0} == '.' || substr($entry, -4) != '.xml') { + continue; + } + $class = "PEAR_Command_".substr($entry, 0, -4); + $file = "$dir/$entry"; + $parser->parse(file_get_contents($file)); + $implements = $parser->getData(); + // List of commands + if (empty($GLOBALS['_PEAR_Command_objects'][$class])) { + $GLOBALS['_PEAR_Command_objects'][$class] = "$dir/" . substr($entry, 0, -4) . + '.php'; + } + foreach ($implements as $command => $desc) { + if ($command == 'attribs') { + continue; + } + if (isset($GLOBALS['_PEAR_Command_commandlist'][$command])) { + return PEAR::raiseError('Command "' . $command . '" already registered in ' . + 'class "' . $GLOBALS['_PEAR_Command_commandlist'][$command] . '"'); + } + $GLOBALS['_PEAR_Command_commandlist'][$command] = $class; + $GLOBALS['_PEAR_Command_commanddesc'][$command] = $desc['summary']; + if (isset($desc['shortcut'])) { + $shortcut = $desc['shortcut']; + if (isset($GLOBALS['_PEAR_Command_shortcuts'][$shortcut])) { + return PEAR::raiseError('Command shortcut "' . $shortcut . '" already ' . + 'registered to command "' . $command . '" in class "' . + $GLOBALS['_PEAR_Command_commandlist'][$command] . '"'); + } + $GLOBALS['_PEAR_Command_shortcuts'][$shortcut] = $command; + } + if (isset($desc['options']) && $desc['options']) { + foreach ($desc['options'] as $oname => $option) { + if (isset($option['shortopt']) && strlen($option['shortopt']) > 1) { + return PEAR::raiseError('Option "' . $oname . '" short option "' . + $option['shortopt'] . '" must be ' . + 'only 1 character in Command "' . $command . '" in class "' . + $class . '"'); + } + } + } + } + } + ksort($GLOBALS['_PEAR_Command_shortcuts']); + ksort($GLOBALS['_PEAR_Command_commandlist']); + @closedir($dp); + return true; + } + + // }}} + // {{{ getCommands() + + /** + * Get the list of currently supported commands, and what + * classes implement them. + * + * @return array command => implementing class + * + * @access public + * @static + */ + function getCommands() + { + if (empty($GLOBALS['_PEAR_Command_commandlist'])) { + PEAR_Command::registerCommands(); + } + return $GLOBALS['_PEAR_Command_commandlist']; + } + + // }}} + // {{{ getShortcuts() + + /** + * Get the list of command shortcuts. + * + * @return array shortcut => command + * + * @access public + * @static + */ + function getShortcuts() + { + if (empty($GLOBALS['_PEAR_Command_shortcuts'])) { + PEAR_Command::registerCommands(); + } + return $GLOBALS['_PEAR_Command_shortcuts']; + } + + // }}} + // {{{ getGetoptArgs() + + /** + * Compiles arguments for getopt. + * + * @param string $command command to get optstring for + * @param string $short_args (reference) short getopt format + * @param array $long_args (reference) long getopt format + * + * @return void + * + * @access public + * @static + */ + function getGetoptArgs($command, &$short_args, &$long_args) + { + if (empty($GLOBALS['_PEAR_Command_commandlist'])) { + PEAR_Command::registerCommands(); + } + if (isset($GLOBALS['_PEAR_Command_shortcuts'][$command])) { + $command = $GLOBALS['_PEAR_Command_shortcuts'][$command]; + } + if (!isset($GLOBALS['_PEAR_Command_commandlist'][$command])) { + return null; + } + $obj = &PEAR_Command::getObject($command); + return $obj->getGetoptArgs($command, $short_args, $long_args); + } + + // }}} + // {{{ getDescription() + + /** + * Get description for a command. + * + * @param string $command Name of the command + * + * @return string command description + * + * @access public + * @static + */ + function getDescription($command) + { + if (!isset($GLOBALS['_PEAR_Command_commanddesc'][$command])) { + return null; + } + return $GLOBALS['_PEAR_Command_commanddesc'][$command]; + } + + // }}} + // {{{ getHelp() + + /** + * Get help for command. + * + * @param string $command Name of the command to return help for + * + * @access public + * @static + */ + function getHelp($command) + { + $cmds = PEAR_Command::getCommands(); + if (isset($GLOBALS['_PEAR_Command_shortcuts'][$command])) { + $command = $GLOBALS['_PEAR_Command_shortcuts'][$command]; + } + if (isset($cmds[$command])) { + $obj = &PEAR_Command::getObject($command); + return $obj->getHelp($command); + } + return false; + } + // }}} +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Auth.php b/campcaster/src/tools/pear/src/PEAR/Command/Auth.php new file mode 100644 index 000000000..b4cc30d30 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Auth.php @@ -0,0 +1,186 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Auth.php,v 1.23 2006/03/02 18:14:13 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; +require_once 'PEAR/Config.php'; + +/** + * PEAR commands for login/logout + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Command_Auth extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'login' => array( + 'summary' => 'Connects and authenticates to remote server', + 'shortcut' => 'li', + 'function' => 'doLogin', + 'options' => array(), + 'doc' => ' +Log in to the remote server. To use remote functions in the installer +that require any kind of privileges, you need to log in first. The +username and password you enter here will be stored in your per-user +PEAR configuration (~/.pearrc on Unix-like systems). After logging +in, your username and password will be sent along in subsequent +operations on the remote server.', + ), + 'logout' => array( + 'summary' => 'Logs out from the remote server', + 'shortcut' => 'lo', + 'function' => 'doLogout', + 'options' => array(), + 'doc' => ' +Logs out from the remote server. This command does not actually +connect to the remote server, it only deletes the stored username and +password from your user configuration.', + ) + + ); + + // }}} + + // {{{ constructor + + /** + * PEAR_Command_Auth constructor. + * + * @access public + */ + function PEAR_Command_Auth(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + // {{{ doLogin() + + /** + * Execute the 'login' command. + * + * @param string $command command name + * + * @param array $options option_name => value + * + * @param array $params list of additional parameters + * + * @return bool TRUE on success or + * a PEAR error on failure + * + * @access public + */ + function doLogin($command, $options, $params) + { + $reg = &$this->config->getRegistry(); + $channel = $this->config->get('default_channel'); + $chan = $reg->getChannel($channel); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + $server = $this->config->get('preferred_mirror'); + $remote = &$this->config->getRemote(); + $username = $this->config->get('username'); + if (empty($username)) { + $username = @$_ENV['USER']; + } + $this->ui->outputData("Logging in to $server.", $command); + + list($username, $password) = $this->ui->userDialog( + $command, + array('Username', 'Password'), + array('text', 'password'), + array($username, '') + ); + $username = trim($username); + $password = trim($password); + + $this->config->set('username', $username); + $this->config->set('password', $password); + + if ($chan->supportsREST()) { + $ok = true; + } else { + $remote->expectError(401); + $ok = $remote->call('logintest'); + $remote->popExpect(); + } + if ($ok === true) { + $this->ui->outputData("Logged in.", $command); + $this->config->store(); + } else { + return $this->raiseError("Login failed!"); + } + return true; + } + + // }}} + // {{{ doLogout() + + /** + * Execute the 'logout' command. + * + * @param string $command command name + * + * @param array $options option_name => value + * + * @param array $params list of additional parameters + * + * @return bool TRUE on success or + * a PEAR error on failure + * + * @access public + */ + function doLogout($command, $options, $params) + { + $reg = &$this->config->getRegistry(); + $channel = $this->config->get('default_channel'); + $chan = $reg->getChannel($channel); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + $server = $this->config->get('preferred_mirror'); + $this->ui->outputData("Logging out from $server.", $command); + $this->config->remove('username'); + $this->config->remove('password'); + $this->config->store(); + return true; + } + + // }}} +} + +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Auth.xml b/campcaster/src/tools/pear/src/PEAR/Command/Auth.xml new file mode 100644 index 000000000..bfc28da38 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Auth.xml @@ -0,0 +1,25 @@ + + + Connects and authenticates to remote server + li + doLogin + + +Log in to the remote server. To use remote functions in the installer +that require any kind of privileges, you need to log in first. The +username and password you enter here will be stored in your per-user +PEAR configuration (~/.pearrc on Unix-like systems). After logging +in, your username and password will be sent along in subsequent +operations on the remote server. + + + Logs out from the remote server + lo + doLogout + + +Logs out from the remote server. This command does not actually +connect to the remote server, it only deletes the stored username and +password from your user configuration. + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Build.php b/campcaster/src/tools/pear/src/PEAR/Command/Build.php new file mode 100644 index 000000000..7835b1bb7 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Build.php @@ -0,0 +1,104 @@ + + * @author Tomas V.V.Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Build.php,v 1.13 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for building extensions. + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Tomas V.V.Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Command_Build extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'build' => array( + 'summary' => 'Build an Extension From C Source', + 'function' => 'doBuild', + 'shortcut' => 'b', + 'options' => array(), + 'doc' => '[package.xml] +Builds one or more extensions contained in a package.' + ), + ); + + // }}} + + // {{{ constructor + + /** + * PEAR_Command_Build constructor. + * + * @access public + */ + function PEAR_Command_Build(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + // {{{ doBuild() + + function doBuild($command, $options, $params) + { + require_once 'PEAR/Builder.php'; + if (sizeof($params) < 1) { + $params[0] = 'package.xml'; + } + $builder = &new PEAR_Builder($this->ui); + $this->debug = $this->config->get('verbose'); + $err = $builder->build($params[0], array(&$this, 'buildCallback')); + if (PEAR::isError($err)) { + return $err; + } + return true; + } + + // }}} + // {{{ buildCallback() + + function buildCallback($what, $data) + { + if (($what == 'cmdoutput' && $this->debug > 1) || + ($what == 'output' && $this->debug > 0)) { + $this->ui->outputData(rtrim($data), 'build'); + } + } + + // }}} +} diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Build.xml b/campcaster/src/tools/pear/src/PEAR/Command/Build.xml new file mode 100644 index 000000000..ec4e6f554 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Build.xml @@ -0,0 +1,10 @@ + + + Build an Extension From C Source + doBuild + b + + [package.xml] +Builds one or more extensions contained in a package. + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Channels.php b/campcaster/src/tools/pear/src/PEAR/Command/Channels.php new file mode 100644 index 000000000..1da715d9d --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Channels.php @@ -0,0 +1,780 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Channels.php,v 1.44.2.1 2006/07/17 18:24:10 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for managing channels. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Command_Channels extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'list-channels' => array( + 'summary' => 'List Available Channels', + 'function' => 'doList', + 'shortcut' => 'lc', + 'options' => array(), + 'doc' => ' +List all available channels for installation. +', + ), + 'update-channels' => array( + 'summary' => 'Update the Channel List', + 'function' => 'doUpdateAll', + 'shortcut' => 'uc', + 'options' => array(), + 'doc' => ' +List all installed packages in all channels. +' + ), + 'channel-delete' => array( + 'summary' => 'Remove a Channel From the List', + 'function' => 'doDelete', + 'shortcut' => 'cde', + 'options' => array(), + 'doc' => ' +Delete a channel from the registry. You may not +remove any channel that has installed packages. +' + ), + 'channel-add' => array( + 'summary' => 'Add a Channel', + 'function' => 'doAdd', + 'shortcut' => 'ca', + 'options' => array(), + 'doc' => ' +Add a private channel to the channel list. Note that all +public channels should be synced using "update-channels". +Parameter may be either a local file or remote URL to a +channel.xml. +' + ), + 'channel-update' => array( + 'summary' => 'Update an Existing Channel', + 'function' => 'doUpdate', + 'shortcut' => 'cu', + 'options' => array( + 'force' => array( + 'shortopt' => 'f', + 'doc' => 'will force download of new channel.xml if an existing channel name is used', + ), + 'channel' => array( + 'shortopt' => 'c', + 'arg' => 'CHANNEL', + 'doc' => 'will force download of new channel.xml if an existing channel name is used', + ), +), + 'doc' => '[|] +Update a channel in the channel list directly. Note that all +public channels can be synced using "update-channels". +Parameter may be a local or remote channel.xml, or the name of +an existing channel. +' + ), + 'channel-info' => array( + 'summary' => 'Retrieve Information on a Channel', + 'function' => 'doInfo', + 'shortcut' => 'ci', + 'options' => array(), + 'doc' => ' +List the files in an installed package. +' + ), + 'channel-alias' => array( + 'summary' => 'Specify an alias to a channel name', + 'function' => 'doAlias', + 'shortcut' => 'cha', + 'options' => array(), + 'doc' => ' +Specify a specific alias to use for a channel name. +The alias may not be an existing channel name or +alias. +' + ), + 'channel-discover' => array( + 'summary' => 'Initialize a Channel from its server', + 'function' => 'doDiscover', + 'shortcut' => 'di', + 'options' => array(), + 'doc' => '[|] +Initialize a Channel from its server and creates the local channel.xml. +' + ), + ); + + // }}} + // {{{ constructor + + /** + * PEAR_Command_Registry constructor. + * + * @access public + */ + function PEAR_Command_Channels(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + // {{{ doList() + + function _sortChannels($a, $b) + { + return strnatcasecmp($a->getName(), $b->getName()); + } + + function doList($command, $options, $params) + { + $reg = &$this->config->getRegistry(); + $registered = $reg->getChannels(); + usort($registered, array(&$this, '_sortchannels')); + $i = $j = 0; + $data = array( + 'caption' => 'Registered Channels:', + 'border' => true, + 'headline' => array('Channel', 'Summary') + ); + foreach ($registered as $channel) { + $data['data'][] = array($channel->getName(), + $channel->getSummary()); + } + if (count($registered)==0) { + $data = '(no registered channels)'; + } + $this->ui->outputData($data, $command); + return true; + } + + function doUpdateAll($command, $options, $params) + { + $reg = &$this->config->getRegistry(); + $savechannel = $this->config->get('default_channel'); + if (isset($options['channel'])) { + if (!$reg->channelExists($options['channel'])) { + return $this->raiseError('Unknown channel "' . $options['channel'] . '"'); + } + $this->config->set('default_channel', $options['channel']); + } else { + $this->config->set('default_channel', 'pear.php.net'); + } + $remote = &$this->config->getRemote(); + $channels = $remote->call('channel.listAll'); + if (PEAR::isError($channels)) { + $this->config->set('default_channel', $savechannel); + return $channels; + } + if (!is_array($channels) || isset($channels['faultCode'])) { + $this->config->set('default_channel', $savechannel); + return $this->raiseError("Incorrect channel listing returned from channel '$chan'"); + } + if (!count($channels)) { + $data = 'no updates available'; + } + $dl = &$this->getDownloader(); + if (!class_exists('System')) { + require_once 'System.php'; + } + $tmpdir = System::mktemp(array('-d')); + foreach ($channels as $channel) { + $channel = $channel[0]; + $save = $channel; + if ($reg->channelExists($channel, true)) { + $this->ui->outputData("Updating channel \"$channel\"", $command); + $test = $reg->getChannel($channel, true); + if (PEAR::isError($test)) { + $this->ui->outputData("Channel '$channel' is corrupt in registry!", $command); + $lastmodified = false; + } else { + $lastmodified = $test->lastModified(); + + } + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $contents = $dl->downloadHttp('http://' . $test->getName() . '/channel.xml', + $this->ui, $tmpdir, null, $lastmodified); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($contents)) { + $this->ui->outputData('ERROR: Cannot retrieve channel.xml for channel "' . + $test->getName() . '"', $command); + continue; + } + if (!$contents) { + $this->ui->outputData("Channel \"$channel\" is up-to-date", $command); + continue; + } + list($contents, $lastmodified) = $contents; + $info = implode('', file($contents)); + if (!$info) { + $this->ui->outputData("Channel \"$channel\" is up-to-date", $command); + continue; + } + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $channelinfo = new PEAR_ChannelFile; + $channelinfo->fromXmlString($info); + if ($channelinfo->getErrors()) { + $this->ui->outputData("Downloaded channel data from channel \"$channel\" " . + 'is corrupt, skipping', $command); + continue; + } + $channel = $channelinfo; + if ($channel->getName() != $save) { + $this->ui->outputData('ERROR: Security risk - downloaded channel ' . + 'definition file for channel "' + . $channel->getName() . ' from channel "' . $save . + '". To use anyway, use channel-update', $command); + continue; + } + $reg->updateChannel($channel, $lastmodified); + } else { + if ($reg->isAlias($channel)) { + $temp = &$reg->getChannel($channel); + if (PEAR::isError($temp)) { + return $this->raiseError($temp); + } + $temp->setAlias($temp->getName(), true); // set the alias to the channel name + if ($reg->channelExists($temp->getName())) { + $this->ui->outputData('ERROR: existing channel "' . $temp->getName() . + '" is aliased to "' . $channel . '" already and cannot be ' . + 're-aliased to "' . $temp->getName() . '" because a channel with ' . + 'that name or alias already exists! Please re-alias and try ' . + 'again.', $command); + continue; + } + } + $this->ui->outputData("Adding new channel \"$channel\"", $command); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $contents = $dl->downloadHttp('http://' . $channel . '/channel.xml', + $this->ui, $tmpdir, null, false); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($contents)) { + $this->ui->outputData('ERROR: Cannot retrieve channel.xml for channel "' . + $channel . '"', $command); + continue; + } + list($contents, $lastmodified) = $contents; + $info = implode('', file($contents)); + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $channelinfo = new PEAR_Channelfile; + $channelinfo->fromXmlString($info); + if ($channelinfo->getErrors()) { + $this->ui->outputData("Downloaded channel data from channel \"$channel\"" . + ' is corrupt, skipping', $command); + continue; + } + $channel = $channelinfo; + if ($channel->getName() != $save) { + $this->ui->outputData('ERROR: Security risk - downloaded channel ' . + 'definition file for channel "' + . $channel->getName() . '" from channel "' . $save . + '". To use anyway, use channel-update', $command); + continue; + } + $reg->addChannel($channel, $lastmodified); + } + } + $this->config->set('default_channel', $savechannel); + $this->ui->outputData('update-channels complete', $command); + return true; + } + + function doInfo($command, $options, $params) + { + if (sizeof($params) != 1) { + return $this->raiseError("No channel specified"); + } + $reg = &$this->config->getRegistry(); + $channel = strtolower($params[0]); + if ($reg->channelExists($channel)) { + $chan = $reg->getChannel($channel); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + } else { + if (strpos($channel, '://')) { + $downloader = &$this->getDownloader(); + if (!class_exists('System')) { + require_once 'System.php'; + } + $tmpdir = System::mktemp(array('-d')); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $loc = $downloader->downloadHttp($channel, $this->ui, $tmpdir); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($loc)) { + return $this->raiseError('Cannot open "' . $channel . '"'); + } else { + $contents = implode('', file($loc)); + } + } else { + $fp = @fopen($params[0], 'r'); + if (!$fp) { + if (@file_exists($params[0])) { + return $this->raiseError('Cannot open "' . $params[0] . '"'); + } else { + return $this->raiseError('Unknown channel "' . $channel . '"'); + } + } + $contents = ''; + while (!feof($fp)) { + $contents .= fread($fp, 1024); + } + fclose($fp); + } + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $chan = new PEAR_ChannelFile; + $chan->fromXmlString($contents); + $chan->validate(); + if ($errs = $chan->getErrors(true)) { + foreach ($errs as $err) { + $this->ui->outputData($err['level'] . ': ' . $err['message']); + } + return $this->raiseError('Channel file "' . $params[0] . '" is not valid'); + } + } + if ($chan) { + $channel = $chan->getName(); + $caption = 'Channel ' . $channel . ' Information:'; + $data1 = array( + 'caption' => $caption, + 'border' => true); + $data1['data']['server'] = array('Name and Server', $chan->getName()); + if ($chan->getAlias() != $chan->getName()) { + $data1['data']['alias'] = array('Alias', $chan->getAlias()); + } + $data1['data']['summary'] = array('Summary', $chan->getSummary()); + $validate = $chan->getValidationPackage(); + $data1['data']['vpackage'] = array('Validation Package Name', $validate['_content']); + $data1['data']['vpackageversion'] = + array('Validation Package Version', $validate['attribs']['version']); + $d = array(); + $d['main'] = $data1; + + $data['data'] = array(); + $data['caption'] = 'Server Capabilities'; + $data['headline'] = array('Type', 'Version/REST type', 'Function Name/REST base'); + $capabilities = $chan->getFunctions('xmlrpc'); + $soaps = $chan->getFunctions('soap'); + if ($capabilities || $soaps || $chan->supportsREST()) { + if ($capabilities) { + if (!isset($capabilities[0])) { + $capabilities = array($capabilities); + } + foreach ($capabilities as $protocol) { + $data['data'][] = array('xmlrpc', $protocol['attribs']['version'], + $protocol['_content']); + } + } + if ($soaps) { + if (!isset($soaps[0])) { + $soaps = array($soaps); + } + foreach ($soaps as $protocol) { + $data['data'][] = array('soap', $protocol['attribs']['version'], + $protocol['_content']); + } + } + if ($chan->supportsREST()) { + $funcs = $chan->getFunctions('rest'); + if (!isset($funcs[0])) { + $funcs = array($funcs); + } + foreach ($funcs as $protocol) { + $data['data'][] = array('rest', $protocol['attribs']['type'], + $protocol['_content']); + } + } + } else { + $data['data'][] = array('No supported protocols'); + } + $d['protocols'] = $data; + $data['data'] = array(); + $mirrors = $chan->getMirrors(); + if ($mirrors) { + $data['caption'] = 'Channel ' . $channel . ' Mirrors:'; + unset($data['headline']); + foreach ($mirrors as $mirror) { + $data['data'][] = array($mirror['attribs']['host']); + $d['mirrors'] = $data; + } + foreach ($mirrors as $mirror) { + $data['data'] = array(); + $data['caption'] = 'Mirror ' . $mirror['attribs']['host'] . ' Capabilities'; + $data['headline'] = array('Type', 'Version/REST type', 'Function Name/REST base'); + $capabilities = $chan->getFunctions('xmlrpc', $mirror['attribs']['host']); + $soaps = $chan->getFunctions('soap', $mirror['attribs']['host']); + if ($capabilities || $soaps || $chan->supportsREST($mirror['attribs']['host'])) { + if ($capabilities) { + if (!isset($capabilities[0])) { + $capabilities = array($capabilities); + } + foreach ($capabilities as $protocol) { + $data['data'][] = array('xmlrpc', $protocol['attribs']['version'], + $protocol['_content']); + } + } + if ($soaps) { + if (!isset($soaps[0])) { + $soaps = array($soaps); + } + foreach ($soaps as $protocol) { + $data['data'][] = array('soap', $protocol['attribs']['version'], + $protocol['_content']); + } + } + if ($chan->supportsREST($mirror['attribs']['host'])) { + $funcs = $chan->getFunctions('rest', $mirror['attribs']['host']); + if (!isset($funcs[0])) { + $funcs = array($funcs); + } + foreach ($funcs as $protocol) { + $data['data'][] = array('rest', $protocol['attribs']['type'], + $protocol['_content']); + } + } + } else { + $data['data'][] = array('No supported protocols'); + } + $d['mirrorprotocols'] = $data; + } + } + $this->ui->outputData($d, 'channel-info'); + } else { + return $this->raiseError('Serious error: Channel "' . $params[0] . + '" has a corrupted registry entry'); + } + } + + // }}} + + function doDelete($command, $options, $params) + { + if (sizeof($params) != 1) { + return $this->raiseError('channel-delete: no channel specified'); + } + $reg = &$this->config->getRegistry(); + if (!$reg->channelExists($params[0])) { + return $this->raiseError('channel-delete: channel "' . $params[0] . '" does not exist'); + } + $channel = $reg->channelName($params[0]); + if ($channel == 'pear.php.net') { + return $this->raiseError('Cannot delete the pear.php.net channel'); + } + if ($channel == 'pecl.php.net') { + return $this->raiseError('Cannot delete the pecl.php.net channel'); + } + if ($channel == '__uri') { + return $this->raiseError('Cannot delete the __uri pseudo-channel'); + } + if (PEAR::isError($err = $reg->listPackages($channel))) { + return $err; + } + if (count($err)) { + return $this->raiseError('Channel "' . $channel . + '" has installed packages, cannot delete'); + } + if (!$reg->deleteChannel($channel)) { + return $this->raiseError('Channel "' . $channel . '" deletion failed'); + } else { + $this->config->deleteChannel($channel); + $this->ui->outputData('Channel "' . $channel . '" deleted', $command); + } + } + + function doAdd($command, $options, $params) + { + if (sizeof($params) != 1) { + return $this->raiseError('channel-add: no channel file specified'); + } + if (strpos($params[0], '://')) { + $downloader = &$this->getDownloader(); + if (!class_exists('System')) { + require_once 'System.php'; + } + $tmpdir = System::mktemp(array('-d')); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $loc = $downloader->downloadHttp($params[0], $this->ui, $tmpdir, null, false); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($loc)) { + return $this->raiseError('channel-add: Cannot open "' . $params[0] . '"'); + } else { + list($loc, $lastmodified) = $loc; + $contents = implode('', file($loc)); + } + } else { + $lastmodified = false; + $fp = @fopen($params[0], 'r'); + if (!$fp) { + return $this->raiseError('channel-add: cannot open "' . $params[0] . '"'); + } + $contents = ''; + while (!feof($fp)) { + $contents .= fread($fp, 1024); + } + fclose($fp); + } + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $channel = new PEAR_ChannelFile; + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $result = $channel->fromXmlString($contents); + PEAR::staticPopErrorHandling(); + if (!$result) { + $exit = false; + if (count($errors = $channel->getErrors(true))) { + foreach ($errors as $error) { + $this->ui->outputData(ucfirst($error['level'] . ': ' . $error['message'])); + if (!$exit) { + $exit = $error['level'] == 'error' ? true : false; + } + } + if ($exit) { + return $this->raiseError('channel-add: invalid channel.xml file'); + } + } + } + $reg = &$this->config->getRegistry(); + if ($reg->channelExists($channel->getName())) { + return $this->raiseError('channel-add: Channel "' . $channel->getName() . + '" exists, use channel-update to update entry'); + } + $ret = $reg->addChannel($channel, $lastmodified); + if (PEAR::isError($ret)) { + return $ret; + } + if (!$ret) { + return $this->raiseError('channel-add: adding Channel "' . $channel->getName() . + '" to registry failed'); + } + $this->config->setChannels($reg->listChannels()); + $this->config->writeConfigFile(); + $this->ui->outputData('Adding Channel "' . $channel->getName() . '" succeeded', $command); + } + + function doUpdate($command, $options, $params) + { + if (!class_exists('System')) { + require_once 'System.php'; + } + $tmpdir = System::mktemp(array('-d')); + $reg = &$this->config->getRegistry(); + if (sizeof($params) != 1) { + return $this->raiseError("No channel file specified"); + } + $lastmodified = false; + if ((!file_exists($params[0]) || is_dir($params[0])) + && $reg->channelExists(strtolower($params[0]))) { + $c = $reg->getChannel(strtolower($params[0])); + if (PEAR::isError($c)) { + return $this->raiseError($c); + } + $this->ui->outputData('Retrieving channel.xml from remote server'); + $dl = &$this->getDownloader(array()); + // if force is specified, use a timestamp of "1" to force retrieval + $lastmodified = isset($options['force']) ? false : $c->lastModified(); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $contents = $dl->downloadHttp('http://' . $c->getName() . '/channel.xml', + $this->ui, $tmpdir, null, $lastmodified); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($contents)) { + return $this->raiseError('Cannot retrieve channel.xml for channel "' . + $c->getName() . '"'); + } + list($contents, $lastmodified) = $contents; + if (!$contents) { + $this->ui->outputData("Channel $params[0] channel.xml is up to date"); + return; + } + $contents = implode('', file($contents)); + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $channel = new PEAR_ChannelFile; + $channel->fromXmlString($contents); + if (!$channel->getErrors()) { + // security check: is the downloaded file for the channel we got it from? + if (strtolower($channel->getName()) != strtolower($c->getName())) { + if (isset($options['force'])) { + $this->ui->log(0, 'WARNING: downloaded channel definition file' . + ' for channel "' . $channel->getName() . '" from channel "' . + strtolower($c->getName()) . '"'); + } else { + return $this->raiseError('ERROR: downloaded channel definition file' . + ' for channel "' . $channel->getName() . '" from channel "' . + strtolower($c->getName()) . '"'); + } + } + } + } else { + if (strpos($params[0], '://')) { + $dl = &$this->getDownloader(); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $loc = $dl->downloadHttp($params[0], + $this->ui, $tmpdir, null, $lastmodified); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($loc)) { + return $this->raiseError("Cannot open " . $params[0]); + } else { + list($loc, $lastmodified) = $loc; + $contents = implode('', file($loc)); + } + } else { + $fp = @fopen($params[0], 'r'); + if (!$fp) { + return $this->raiseError("Cannot open " . $params[0]); + } + $contents = ''; + while (!feof($fp)) { + $contents .= fread($fp, 1024); + } + fclose($fp); + } + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $channel = new PEAR_ChannelFile; + $channel->fromXmlString($contents); + } + $exit = false; + if (count($errors = $channel->getErrors(true))) { + foreach ($errors as $error) { + $this->ui->outputData(ucfirst($error['level'] . ': ' . $error['message'])); + if (!$exit) { + $exit = $error['level'] == 'error' ? true : false; + } + } + if ($exit) { + return $this->raiseError('Invalid channel.xml file'); + } + } + if (!$reg->channelExists($channel->getName())) { + return $this->raiseError('Error: Channel "' . $channel->getName() . + '" does not exist, use channel-add to add an entry'); + } + $ret = $reg->updateChannel($channel, $lastmodified); + if (PEAR::isError($ret)) { + return $ret; + } + if (!$ret) { + return $this->raiseError('Updating Channel "' . $channel->getName() . + '" in registry failed'); + } + $this->config->setChannels($reg->listChannels()); + $this->config->writeConfigFile(); + $this->ui->outputData('Update of Channel "' . $channel->getName() . '" succeeded'); + } + + function &getDownloader() + { + if (!class_exists('PEAR_Downloader')) { + require_once 'PEAR/Downloader.php'; + } + $a = new PEAR_Downloader($this->ui, array(), $this->config); + return $a; + } + + function doAlias($command, $options, $params) + { + $reg = &$this->config->getRegistry(); + if (sizeof($params) == 1) { + return $this->raiseError('No channel alias specified'); + } + if (sizeof($params) != 2) { + return $this->raiseError( + 'Invalid format, correct is: channel-alias channel alias'); + } + if (!$reg->channelExists($params[0], true)) { + if ($reg->isAlias($params[0])) { + $extra = ' (use "channel-alias ' . $reg->channelName($params[0]) . ' ' . + strtolower($params[1]) . '")'; + } else { + $extra = ''; + } + return $this->raiseError('"' . $params[0] . '" is not a valid channel' . $extra); + } + if ($reg->isAlias($params[1])) { + return $this->raiseError('Channel "' . $reg->channelName($params[1]) . '" is ' . + 'already aliased to "' . strtolower($params[1]) . '", cannot re-alias'); + } + $chan = &$reg->getChannel($params[0]); + if (PEAR::isError($chan)) { + return $this->raiseError('Corrupt registry? Error retrieving channel "' . $params[0] . + '" information (' . $chan->getMessage() . ')'); + } + // make it a local alias + if (!$chan->setAlias(strtolower($params[1]), true)) { + return $this->raiseError('Alias "' . strtolower($params[1]) . + '" is not a valid channel alias'); + } + $reg->updateChannel($chan); + $this->ui->outputData('Channel "' . $chan->getName() . '" aliased successfully to "' . + strtolower($params[1]) . '"'); + } + + function doDiscover($command, $options, $params) + { + $reg = &$this->config->getRegistry(); + if (sizeof($params) != 1) { + return $this->raiseError("No channel server specified"); + } + if ($reg->channelExists($params[0])) { + if ($reg->isAlias($params[0])) { + return $this->raiseError("A channel alias named \"$params[0]\" " . + 'already exists, aliasing channel "' . $reg->channelName($params[0]) + . '"'); + } else { + return $this->raiseError("Channel \"$params[0]\" is already initialized"); + } + } + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $err = $this->doAdd($command, $options, array('http://' . $params[0] . '/channel.xml')); + $this->popErrorHandling(); + if (PEAR::isError($err)) { + return $this->raiseError("Discovery of channel \"$params[0]\" failed (" . + $err->getMessage() . ')'); + } + $this->ui->outputData("Discovery of channel \"$params[0]\" succeeded", $command); + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Channels.xml b/campcaster/src/tools/pear/src/PEAR/Command/Channels.xml new file mode 100644 index 000000000..051fffc32 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Channels.xml @@ -0,0 +1,93 @@ + + + List Available Channels + doList + lc + + +List all available channels for installation. + + + + Update the Channel List + doUpdateAll + uc + + +List all installed packages in all channels. + + + + Remove a Channel From the List + doDelete + cde + + <channel name> +Delete a channel from the registry. You may not +remove any channel that has installed packages. + + + + Add a Channel + doAdd + ca + + <channel.xml> +Add a private channel to the channel list. Note that all +public channels should be synced using "update-channels". +Parameter may be either a local file or remote URL to a +channel.xml. + + + + Update an Existing Channel + doUpdate + cu + + + f + will force download of new channel.xml if an existing channel name is used + + + c + CHANNEL + will force download of new channel.xml if an existing channel name is used + + + [<channel.xml>|<channel name>] +Update a channel in the channel list directly. Note that all +public channels can be synced using "update-channels". +Parameter may be a local or remote channel.xml, or the name of +an existing channel. + + + + Retrieve Information on a Channel + doInfo + ci + + <package> +List the files in an installed package. + + + + Specify an alias to a channel name + doAlias + cha + + <channel> <alias> +Specify a specific alias to use for a channel name. +The alias may not be an existing channel name or +alias. + + + + Initialize a Channel from its server + doDiscover + di + + [<channel.xml>|<channel name>] +Initialize a Channel from its server and create the local channel.xml. + + + diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Common.php b/campcaster/src/tools/pear/src/PEAR/Command/Common.php new file mode 100644 index 000000000..1b18a9389 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Common.php @@ -0,0 +1,279 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Common.php,v 1.32.2.1 2006/06/08 22:27:11 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR.php'; + +/** + * PEAR commands base class + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Command_Common extends PEAR +{ + // {{{ properties + + /** + * PEAR_Config object used to pass user system and configuration + * on when executing commands + * + * @var PEAR_Config + */ + var $config; + /** + * @var PEAR_Registry + * @access protected + */ + var $_registry; + + /** + * User Interface object, for all interaction with the user. + * @var object + */ + var $ui; + + var $_deps_rel_trans = array( + 'lt' => '<', + 'le' => '<=', + 'eq' => '=', + 'ne' => '!=', + 'gt' => '>', + 'ge' => '>=', + 'has' => '==' + ); + + var $_deps_type_trans = array( + 'pkg' => 'package', + 'ext' => 'extension', + 'php' => 'PHP', + 'prog' => 'external program', + 'ldlib' => 'external library for linking', + 'rtlib' => 'external runtime library', + 'os' => 'operating system', + 'websrv' => 'web server', + 'sapi' => 'SAPI backend' + ); + + // }}} + // {{{ constructor + + /** + * PEAR_Command_Common constructor. + * + * @access public + */ + function PEAR_Command_Common(&$ui, &$config) + { + parent::PEAR(); + $this->config = &$config; + $this->ui = &$ui; + } + + // }}} + + // {{{ getCommands() + + /** + * Return a list of all the commands defined by this class. + * @return array list of commands + * @access public + */ + function getCommands() + { + $ret = array(); + foreach (array_keys($this->commands) as $command) { + $ret[$command] = $this->commands[$command]['summary']; + } + return $ret; + } + + // }}} + // {{{ getShortcuts() + + /** + * Return a list of all the command shortcuts defined by this class. + * @return array shortcut => command + * @access public + */ + function getShortcuts() + { + $ret = array(); + foreach (array_keys($this->commands) as $command) { + if (isset($this->commands[$command]['shortcut'])) { + $ret[$this->commands[$command]['shortcut']] = $command; + } + } + return $ret; + } + + // }}} + // {{{ getOptions() + + function getOptions($command) + { + $shortcuts = $this->getShortcuts(); + if (isset($shortcuts[$command])) { + $command = $shortcuts[$command]; + } + return @$this->commands[$command]['options']; + } + + // }}} + // {{{ getGetoptArgs() + + function getGetoptArgs($command, &$short_args, &$long_args) + { + $short_args = ""; + $long_args = array(); + if (empty($this->commands[$command]) || empty($this->commands[$command]['options'])) { + return; + } + reset($this->commands[$command]['options']); + while (list($option, $info) = each($this->commands[$command]['options'])) { + $larg = $sarg = ''; + if (isset($info['arg'])) { + if ($info['arg']{0} == '(') { + $larg = '=='; + $sarg = '::'; + $arg = substr($info['arg'], 1, -1); + } else { + $larg = '='; + $sarg = ':'; + $arg = $info['arg']; + } + } + if (isset($info['shortopt'])) { + $short_args .= $info['shortopt'] . $sarg; + } + $long_args[] = $option . $larg; + } + } + + // }}} + // {{{ getHelp() + /** + * Returns the help message for the given command + * + * @param string $command The command + * @return mixed A fail string if the command does not have help or + * a two elements array containing [0]=>help string, + * [1]=> help string for the accepted cmd args + */ + function getHelp($command) + { + $config = &PEAR_Config::singleton(); + $help = @$this->commands[$command]['doc']; + if (empty($help)) { + // XXX (cox) Fallback to summary if there is no doc (show both?) + if (!$help = @$this->commands[$command]['summary']) { + return "No help for command \"$command\""; + } + } + if (preg_match_all('/{config\s+([^\}]+)}/e', $help, $matches)) { + foreach($matches[0] as $k => $v) { + $help = preg_replace("/$v/", $config->get($matches[1][$k]), $help); + } + } + return array($help, $this->getHelpArgs($command)); + } + + // }}} + // {{{ getHelpArgs() + /** + * Returns the help for the accepted arguments of a command + * + * @param string $command + * @return string The help string + */ + function getHelpArgs($command) + { + if (isset($this->commands[$command]['options']) && + count($this->commands[$command]['options'])) + { + $help = "Options:\n"; + foreach ($this->commands[$command]['options'] as $k => $v) { + if (isset($v['arg'])) { + if ($v['arg']{0} == '(') { + $arg = substr($v['arg'], 1, -1); + $sapp = " [$arg]"; + $lapp = "[=$arg]"; + } else { + $sapp = " $v[arg]"; + $lapp = "=$v[arg]"; + } + } else { + $sapp = $lapp = ""; + } + if (isset($v['shortopt'])) { + $s = $v['shortopt']; + @$help .= " -$s$sapp, --$k$lapp\n"; + } else { + @$help .= " --$k$lapp\n"; + } + $p = " "; + $doc = rtrim(str_replace("\n", "\n$p", $v['doc'])); + $help .= " $doc\n"; + } + return $help; + } + return null; + } + + // }}} + // {{{ run() + + function run($command, $options, $params) + { + if (empty($this->commands[$command]['function'])) { + // look for shortcuts + foreach (array_keys($this->commands) as $cmd) { + if (isset($this->commands[$cmd]['shortcut']) && $this->commands[$cmd]['shortcut'] == $command) { + if (empty($this->commands[$cmd]['function'])) { + return $this->raiseError("unknown command `$command'"); + } else { + $func = $this->commands[$cmd]['function']; + } + $command = $cmd; + break; + } + } + } else { + $func = $this->commands[$command]['function']; + } + return $this->$func($command, $options, $params); + } + + // }}} +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Config.php b/campcaster/src/tools/pear/src/PEAR/Command/Config.php new file mode 100644 index 000000000..9836bf231 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Config.php @@ -0,0 +1,418 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Config.php,v 1.51.2.1 2006/06/04 12:11:39 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for managing configuration data. + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Command_Config extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'config-show' => array( + 'summary' => 'Show All Settings', + 'function' => 'doConfigShow', + 'shortcut' => 'csh', + 'options' => array( + 'channel' => array( + 'shortopt' => 'c', + 'doc' => 'show configuration variables for another channel', + 'arg' => 'CHAN', + ), +), + 'doc' => '[layer] +Displays all configuration values. An optional argument +may be used to tell which configuration layer to display. Valid +configuration layers are "user", "system" and "default". To display +configurations for different channels, set the default_channel +configuration variable and run config-show again. +', + ), + 'config-get' => array( + 'summary' => 'Show One Setting', + 'function' => 'doConfigGet', + 'shortcut' => 'cg', + 'options' => array( + 'channel' => array( + 'shortopt' => 'c', + 'doc' => 'show configuration variables for another channel', + 'arg' => 'CHAN', + ), +), + 'doc' => ' [layer] +Displays the value of one configuration parameter. The +first argument is the name of the parameter, an optional second argument +may be used to tell which configuration layer to look in. Valid configuration +layers are "user", "system" and "default". If no layer is specified, a value +will be picked from the first layer that defines the parameter, in the order +just specified. The configuration value will be retrieved for the channel +specified by the default_channel configuration variable. +', + ), + 'config-set' => array( + 'summary' => 'Change Setting', + 'function' => 'doConfigSet', + 'shortcut' => 'cs', + 'options' => array( + 'channel' => array( + 'shortopt' => 'c', + 'doc' => 'show configuration variables for another channel', + 'arg' => 'CHAN', + ), +), + 'doc' => ' [layer] +Sets the value of one configuration parameter. The first argument is +the name of the parameter, the second argument is the new value. Some +parameters are subject to validation, and the command will fail with +an error message if the new value does not make sense. An optional +third argument may be used to specify in which layer to set the +configuration parameter. The default layer is "user". The +configuration value will be set for the current channel, which +is controlled by the default_channel configuration variable. +', + ), + 'config-help' => array( + 'summary' => 'Show Information About Setting', + 'function' => 'doConfigHelp', + 'shortcut' => 'ch', + 'options' => array(), + 'doc' => '[parameter] +Displays help for a configuration parameter. Without arguments it +displays help for all configuration parameters. +', + ), + 'config-create' => array( + 'summary' => 'Create a Default configuration file', + 'function' => 'doConfigCreate', + 'shortcut' => 'coc', + 'options' => array( + 'windows' => array( + 'shortopt' => 'w', + 'doc' => 'create a config file for a windows install', + ), + ), + 'doc' => ' +Create a default configuration file with all directory configuration +variables set to subdirectories of , and save it as . +This is useful especially for creating a configuration file for a remote +PEAR installation (using the --remoteconfig option of install, upgrade, +and uninstall). +', + ), + ); + + // }}} + // {{{ constructor + + /** + * PEAR_Command_Config constructor. + * + * @access public + */ + function PEAR_Command_Config(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + // {{{ doConfigShow() + + function doConfigShow($command, $options, $params) + { + if (is_array($params)) { + $layer = isset($params[0]) ? $params[0] : NULL; + } else { + $layer = NULL; + } + + // $params[0] -> the layer + if ($error = $this->_checkLayer($layer)) { + return $this->raiseError("config-show:$error"); + } + $keys = $this->config->getKeys(); + sort($keys); + $channel = isset($options['channel']) ? $options['channel'] : + $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + if (!$reg->channelExists($channel)) { + return $this->raiseError('Channel "' . $channel . '" does not exist'); + } + $data = array('caption' => 'Configuration (channel ' . $channel . '):'); + foreach ($keys as $key) { + $type = $this->config->getType($key); + $value = $this->config->get($key, $layer, $channel); + if ($type == 'password' && $value) { + $value = '********'; + } + if ($value === false) { + $value = 'false'; + } elseif ($value === true) { + $value = 'true'; + } + $data['data'][$this->config->getGroup($key)][] = array($this->config->getPrompt($key) , $key, $value); + } + foreach ($this->config->getLayers() as $layer) { + $data['data']['Config Files'][] = array(ucfirst($layer) . ' Configuration File', 'Filename' , $this->config->getConfFile($layer)); + } + + $this->ui->outputData($data, $command); + return true; + } + + // }}} + // {{{ doConfigGet() + + function doConfigGet($command, $options, $params) + { + if (!is_array($params)) { + $args_cnt = 0; + } else { + $args_cnt = count($params); + } + + switch ($args_cnt) { + case 1: + $config_key = $params[0]; + $layer = NULL; + break; + case 2: + $config_key = $params[0]; + $layer = $params[1]; + if ($error = $this->_checkLayer($layer)) { + return $this->raiseError("config-get:$error"); + } + break; + case 0: + default: + return $this->raiseError("config-get expects 1 or 2 parameters"); + } + + $channel = isset($options['channel']) ? $options['channel'] : $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + + if (!$reg->channelExists($channel)) { + return $this->raiseError('Channel "' . $channel . '" does not exist'); + } + + $this->ui->outputData($this->config->get($config_key, $layer, $channel), $command); + + return true; + } + + // }}} + // {{{ doConfigSet() + + function doConfigSet($command, $options, $params) + { + // $param[0] -> a parameter to set + // $param[1] -> the value for the parameter + // $param[2] -> the layer + $failmsg = ''; + if (sizeof($params) < 2 || sizeof($params) > 3) { + $failmsg .= "config-set expects 2 or 3 parameters"; + return PEAR::raiseError($failmsg); + } + if (isset($params[2]) && $error = $this->_checkLayer($params[2])) { + $failmsg .= $error; + return PEAR::raiseError("config-set:$failmsg"); + } + $channel = isset($options['channel']) ? $options['channel'] : + $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + if (!$reg->channelExists($channel)) { + return $this->raiseError('Channel "' . $channel . '" does not exist'); + } + if ($params[0] == 'default_channel') { + if (!$reg->channelExists($params[1])) { + return $this->raiseError('Channel "' . $params[1] . '" does not exist'); + } + } + if (count($params) == 2) { + array_push($params, 'user'); + $layer = 'user'; + } else { + $layer = $params[2]; + } + array_push($params, $channel); + if (!call_user_func_array(array(&$this->config, 'set'), $params)) + { + array_pop($params); + $failmsg = "config-set (" . implode(", ", $params) . ") failed, channel $channel"; + } else { + $this->config->store($layer); + } + if ($failmsg) { + return $this->raiseError($failmsg); + } + $this->ui->outputData('config-set succeeded', $command); + return true; + } + + // }}} + // {{{ doConfigHelp() + + function doConfigHelp($command, $options, $params) + { + if (empty($params)) { + $params = $this->config->getKeys(); + } + $data['caption'] = "Config help" . ((count($params) == 1) ? " for $params[0]" : ''); + $data['headline'] = array('Name', 'Type', 'Description'); + $data['border'] = true; + foreach ($params as $name) { + $type = $this->config->getType($name); + $docs = $this->config->getDocs($name); + if ($type == 'set') { + $docs = rtrim($docs) . "\nValid set: " . + implode(' ', $this->config->getSetValues($name)); + } + $data['data'][] = array($name, $type, $docs); + } + $this->ui->outputData($data, $command); + } + + // }}} + // {{{ doConfigCreate() + + function doConfigCreate($command, $options, $params) + { + if (count($params) != 2) { + return PEAR::raiseError('config-create: must have 2 parameters, root path and ' . + 'filename to save as'); + } + $root = $params[0]; + // Clean up the DIRECTORY_SEPARATOR mess + $ds2 = DIRECTORY_SEPARATOR . DIRECTORY_SEPARATOR; + $root = preg_replace(array('!\\\\+!', '!/+!', "!$ds2+!"), + array('/', '/', '/'), + $root); + if ($root{0} != '/') { + if (isset($options['windows'])) { + if (!preg_match('/^[A-Za-z]:/', $root)) { + return PEAR::raiseError('Root directory must be an absolute path beginning ' . + 'with "\\" or "C:\\", was: "' . $root . '"'); + } + } else { + return PEAR::raiseError('Root directory must be an absolute path beginning ' . + 'with "/", was: "' . $root . '"'); + } + } + $windows = isset($options['windows']); + if ($windows) { + $root = str_replace('/', '\\', $root); + } + if (!file_exists($params[1])) { + if (!@touch($params[1])) { + return PEAR::raiseError('Could not create "' . $params[1] . '"'); + } + } + $params[1] = realpath($params[1]); + $config = &new PEAR_Config($params[1], '#no#system#config#', false, false); + if ($root{strlen($root) - 1} == '/') { + $root = substr($root, 0, strlen($root) - 1); + } + $config->noRegistry(); + $config->set('php_dir', $windows ? "$root\\pear\\php" : "$root/pear/php", 'user'); + $config->set('data_dir', $windows ? "$root\\pear\\data" : "$root/pear/data"); + $config->set('ext_dir', $windows ? "$root\\pear\\ext" : "$root/pear/ext"); + $config->set('doc_dir', $windows ? "$root\\pear\\docs" : "$root/pear/docs"); + $config->set('test_dir', $windows ? "$root\\pear\\tests" : "$root/pear/tests"); + $config->set('cache_dir', $windows ? "$root\\pear\\cache" : "$root/pear/cache"); + $config->set('bin_dir', $windows ? "$root\\pear" : "$root/pear"); + $config->writeConfigFile(); + $this->_showConfig($config); + $this->ui->outputData('Successfully created default configuration file "' . $params[1] . '"', + $command); + } + + // }}} + + function _showConfig(&$config) + { + $params = array('user'); + $keys = $config->getKeys(); + sort($keys); + $channel = 'pear.php.net'; + $data = array('caption' => 'Configuration (channel ' . $channel . '):'); + foreach ($keys as $key) { + $type = $config->getType($key); + $value = $config->get($key, 'user', $channel); + if ($type == 'password' && $value) { + $value = '********'; + } + if ($value === false) { + $value = 'false'; + } elseif ($value === true) { + $value = 'true'; + } + $data['data'][$config->getGroup($key)][] = + array($config->getPrompt($key) , $key, $value); + } + foreach ($config->getLayers() as $layer) { + $data['data']['Config Files'][] = + array(ucfirst($layer) . ' Configuration File', 'Filename' , + $config->getConfFile($layer)); + } + + $this->ui->outputData($data, 'config-show'); + return true; + } + // {{{ _checkLayer() + + /** + * Checks if a layer is defined or not + * + * @param string $layer The layer to search for + * @return mixed False on no error or the error message + */ + function _checkLayer($layer = null) + { + if (!empty($layer) && $layer != 'default') { + $layers = $this->config->getLayers(); + if (!in_array($layer, $layers)) { + return " only the layers: \"" . implode('" or "', $layers) . "\" are supported"; + } + } + return false; + } + + // }}} +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Config.xml b/campcaster/src/tools/pear/src/PEAR/Command/Config.xml new file mode 100644 index 000000000..f64a925f5 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Config.xml @@ -0,0 +1,92 @@ + + + Show All Settings + doConfigShow + csh + + + c + show configuration variables for another channel + CHAN + + + [layer] +Displays all configuration values. An optional argument +may be used to tell which configuration layer to display. Valid +configuration layers are "user", "system" and "default". To display +configurations for different channels, set the default_channel +configuration variable and run config-show again. + + + + Show One Setting + doConfigGet + cg + + + c + show configuration variables for another channel + CHAN + + + <parameter> [layer] +Displays the value of one configuration parameter. The +first argument is the name of the parameter, an optional second argument +may be used to tell which configuration layer to look in. Valid configuration +layers are "user", "system" and "default". If no layer is specified, a value +will be picked from the first layer that defines the parameter, in the order +just specified. The configuration value will be retrieved for the channel +specified by the default_channel configuration variable. + + + + Change Setting + doConfigSet + cs + + + c + show configuration variables for another channel + CHAN + + + <parameter> <value> [layer] +Sets the value of one configuration parameter. The first argument is +the name of the parameter, the second argument is the new value. Some +parameters are subject to validation, and the command will fail with +an error message if the new value does not make sense. An optional +third argument may be used to specify in which layer to set the +configuration parameter. The default layer is "user". The +configuration value will be set for the current channel, which +is controlled by the default_channel configuration variable. + + + + Show Information About Setting + doConfigHelp + ch + + [parameter] +Displays help for a configuration parameter. Without arguments it +displays help for all configuration parameters. + + + + Create a Default configuration file + doConfigCreate + coc + + + w + create a config file for a windows install + + + <root path> <filename> +Create a default configuration file with all directory configuration +variables set to subdirectories of <root path>, and save it as <filename>. +This is useful especially for creating a configuration file for a remote +PEAR installation (using the --remoteconfig option of install, upgrade, +and uninstall). + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Install.php b/campcaster/src/tools/pear/src/PEAR/Command/Install.php new file mode 100644 index 000000000..29662bfeb --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Install.php @@ -0,0 +1,773 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Install.php,v 1.115 2006/03/02 18:14:13 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for installation or deinstallation/upgrading of + * packages. + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Command_Install extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'install' => array( + 'summary' => 'Install Package', + 'function' => 'doInstall', + 'shortcut' => 'i', + 'options' => array( + 'force' => array( + 'shortopt' => 'f', + 'doc' => 'will overwrite newer installed packages', + ), + 'loose' => array( + 'shortopt' => 'l', + 'doc' => 'do not check for recommended dependency version', + ), + 'nodeps' => array( + 'shortopt' => 'n', + 'doc' => 'ignore dependencies, install anyway', + ), + 'register-only' => array( + 'shortopt' => 'r', + 'doc' => 'do not install files, only register the package as installed', + ), + 'soft' => array( + 'shortopt' => 's', + 'doc' => 'soft install, fail silently, or upgrade if already installed', + ), + 'nobuild' => array( + 'shortopt' => 'B', + 'doc' => 'don\'t build C extensions', + ), + 'nocompress' => array( + 'shortopt' => 'Z', + 'doc' => 'request uncompressed files when downloading', + ), + 'installroot' => array( + 'shortopt' => 'R', + 'arg' => 'DIR', + 'doc' => 'root directory used when installing files (ala PHP\'s INSTALL_ROOT), use packagingroot for RPM', + ), + 'packagingroot' => array( + 'shortopt' => 'P', + 'arg' => 'DIR', + 'doc' => 'root directory used when packaging files, like RPM packaging', + ), + 'ignore-errors' => array( + 'doc' => 'force install even if there were errors', + ), + 'alldeps' => array( + 'shortopt' => 'a', + 'doc' => 'install all required and optional dependencies', + ), + 'onlyreqdeps' => array( + 'shortopt' => 'o', + 'doc' => 'install all required dependencies', + ), + 'offline' => array( + 'shortopt' => 'O', + 'doc' => 'do not attempt to download any urls or contact channels', + ), + 'pretend' => array( + 'shortopt' => 'p', + 'doc' => 'Only list the packages that would be downloaded', + ), + ), + 'doc' => '[channel/] ... +Installs one or more PEAR packages. You can specify a package to +install in four ways: + +"Package-1.0.tgz" : installs from a local file + +"http://example.com/Package-1.0.tgz" : installs from +anywhere on the net. + +"package.xml" : installs the package described in +package.xml. Useful for testing, or for wrapping a PEAR package in +another package manager such as RPM. + +"Package[-version/state][.tar]" : queries your default channel\'s server +({config master_server}) and downloads the newest package with +the preferred quality/state ({config preferred_state}). + +To retrieve Package version 1.1, use "Package-1.1," to retrieve +Package state beta, use "Package-beta." To retrieve an uncompressed +file, append .tar (make sure there is no file by the same name first) + +To download a package from another channel, prefix with the channel name like +"channel/Package" + +More than one package may be specified at once. It is ok to mix these +four ways of specifying packages. +'), + 'upgrade' => array( + 'summary' => 'Upgrade Package', + 'function' => 'doInstall', + 'shortcut' => 'up', + 'options' => array( + 'force' => array( + 'shortopt' => 'f', + 'doc' => 'overwrite newer installed packages', + ), + 'loose' => array( + 'shortopt' => 'l', + 'doc' => 'do not check for recommended dependency version', + ), + 'nodeps' => array( + 'shortopt' => 'n', + 'doc' => 'ignore dependencies, upgrade anyway', + ), + 'register-only' => array( + 'shortopt' => 'r', + 'doc' => 'do not install files, only register the package as upgraded', + ), + 'nobuild' => array( + 'shortopt' => 'B', + 'doc' => 'don\'t build C extensions', + ), + 'nocompress' => array( + 'shortopt' => 'Z', + 'doc' => 'request uncompressed files when downloading', + ), + 'installroot' => array( + 'shortopt' => 'R', + 'arg' => 'DIR', + 'doc' => 'root directory used when installing files (ala PHP\'s INSTALL_ROOT), use packagingroot for RPM', + ), + 'packagingroot' => array( + 'shortopt' => 'P', + 'arg' => 'DIR', + 'doc' => 'root directory used when packaging files, like RPM packaging', + ), + 'ignore-errors' => array( + 'doc' => 'force install even if there were errors', + ), + 'alldeps' => array( + 'shortopt' => 'a', + 'doc' => 'install all required and optional dependencies', + ), + 'onlyreqdeps' => array( + 'shortopt' => 'o', + 'doc' => 'install all required dependencies', + ), + 'offline' => array( + 'shortopt' => 'O', + 'doc' => 'do not attempt to download any urls or contact channels', + ), + 'pretend' => array( + 'shortopt' => 'p', + 'doc' => 'Only list the packages that would be downloaded', + ), + ), + 'doc' => ' ... +Upgrades one or more PEAR packages. See documentation for the +"install" command for ways to specify a package. + +When upgrading, your package will be updated if the provided new +package has a higher version number (use the -f option if you need to +upgrade anyway). + +More than one package may be specified at once. +'), + 'upgrade-all' => array( + 'summary' => 'Upgrade All Packages', + 'function' => 'doInstall', + 'shortcut' => 'ua', + 'options' => array( + 'nodeps' => array( + 'shortopt' => 'n', + 'doc' => 'ignore dependencies, upgrade anyway', + ), + 'register-only' => array( + 'shortopt' => 'r', + 'doc' => 'do not install files, only register the package as upgraded', + ), + 'nobuild' => array( + 'shortopt' => 'B', + 'doc' => 'don\'t build C extensions', + ), + 'nocompress' => array( + 'shortopt' => 'Z', + 'doc' => 'request uncompressed files when downloading', + ), + 'installroot' => array( + 'shortopt' => 'R', + 'arg' => 'DIR', + 'doc' => 'root directory used when installing files (ala PHP\'s INSTALL_ROOT), use packagingroot for RPM', + ), + 'ignore-errors' => array( + 'doc' => 'force install even if there were errors', + ), + 'loose' => array( + 'doc' => 'do not check for recommended dependency version', + ), + ), + 'doc' => ' +Upgrades all packages that have a newer release available. Upgrades are +done only if there is a release available of the state specified in +"preferred_state" (currently {config preferred_state}), or a state considered +more stable. +'), + 'uninstall' => array( + 'summary' => 'Un-install Package', + 'function' => 'doUninstall', + 'shortcut' => 'un', + 'options' => array( + 'nodeps' => array( + 'shortopt' => 'n', + 'doc' => 'ignore dependencies, uninstall anyway', + ), + 'register-only' => array( + 'shortopt' => 'r', + 'doc' => 'do not remove files, only register the packages as not installed', + ), + 'installroot' => array( + 'shortopt' => 'R', + 'arg' => 'DIR', + 'doc' => 'root directory used when installing files (ala PHP\'s INSTALL_ROOT)', + ), + 'ignore-errors' => array( + 'doc' => 'force install even if there were errors', + ), + 'offline' => array( + 'shortopt' => 'O', + 'doc' => 'do not attempt to uninstall remotely', + ), + ), + 'doc' => '[channel/] ... +Uninstalls one or more PEAR packages. More than one package may be +specified at once. Prefix with channel name to uninstall from a +channel not in your default channel ({config default_channel}) +'), + 'bundle' => array( + 'summary' => 'Unpacks a Pecl Package', + 'function' => 'doBundle', + 'shortcut' => 'bun', + 'options' => array( + 'destination' => array( + 'shortopt' => 'd', + 'arg' => 'DIR', + 'doc' => 'Optional destination directory for unpacking (defaults to current path or "ext" if exists)', + ), + 'force' => array( + 'shortopt' => 'f', + 'doc' => 'Force the unpacking even if there were errors in the package', + ), + ), + 'doc' => ' +Unpacks a Pecl Package into the selected location. It will download the +package if needed. +'), + 'run-scripts' => array( + 'summary' => 'Run Post-Install Scripts bundled with a package', + 'function' => 'doRunScripts', + 'shortcut' => 'rs', + 'options' => array( + ), + 'doc' => ' +Run post-installation scripts in package , if any exist. +'), + ); + + // }}} + // {{{ constructor + + /** + * PEAR_Command_Install constructor. + * + * @access public + */ + function PEAR_Command_Install(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + /** + * For unit testing purposes + */ + function &getDownloader(&$ui, $options, &$config) + { + if (!class_exists('PEAR_Downloader')) { + require_once 'PEAR/Downloader.php'; + } + $a = &new PEAR_Downloader($ui, $options, $config); + return $a; + } + + /** + * For unit testing purposes + */ + function &getInstaller(&$ui) + { + if (!class_exists('PEAR_Installer')) { + require_once 'PEAR/Installer.php'; + } + $a = &new PEAR_Installer($ui); + return $a; + } + + // {{{ doInstall() + + function doInstall($command, $options, $params) + { + if (empty($this->installer)) { + $this->installer = &$this->getInstaller($this->ui); + } + if ($command == 'upgrade') { + $options['upgrade'] = true; + } + if (isset($options['installroot']) && isset($options['packagingroot'])) { + return $this->raiseError('ERROR: cannot use both --installroot and --packagingroot'); + } + if (isset($options['packagingroot']) && $this->config->get('verbose') > 2) { + $this->ui->outputData('using package root: ' . $options['packagingroot']); + } + $reg = &$this->config->getRegistry(); + if ($command == 'upgrade-all') { + $options['upgrade'] = true; + $reg = &$this->config->getRegistry(); + $savechannel = $this->config->get('default_channel'); + $params = array(); + foreach ($reg->listChannels() as $channel) { + if ($channel == '__uri') { + continue; + } + $this->config->set('default_channel', $channel); + $chan = &$reg->getChannel($channel); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + if ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $dorest = true; + unset($remote); + } else { + $dorest = false; + $remote = &$this->config->getRemote($this->config); + } + $state = $this->config->get('preferred_state'); + $installed = array_flip($reg->listPackages($channel)); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + if ($dorest) { + $rest = &$this->config->getREST('1.0', array()); + $latest = $rest->listLatestUpgrades($base, $state, $installed, $channel, $reg); + } else { + if (empty($state) || $state == 'any') { + $latest = $remote->call("package.listLatestReleases"); + } else { + $latest = $remote->call("package.listLatestReleases", $state); + } + } + PEAR::staticPopErrorHandling(); + if (PEAR::isError($latest) || !is_array($latest)) { + continue; + } + foreach ($latest as $package => $info) { + $package = strtolower($package); + if (!isset($installed[$package])) { + // skip packages we don't have installed + continue; + } + $inst_version = $reg->packageInfo($package, 'version', $channel); + if (version_compare("$info[version]", "$inst_version", "le")) { + // installed version is up-to-date + continue; + } + $params[] = $reg->parsedPackageNameToString(array('package' => $package, + 'channel' => $channel)); + $this->ui->outputData(array('data' => "Will upgrade $package"), $command); + } + } + $this->config->set('default_channel', $savechannel); + } + $this->downloader = &$this->getDownloader($this->ui, $options, $this->config); + $errors = array(); + $downloaded = array(); + $downloaded = &$this->downloader->download($params); + $errors = $this->downloader->getErrorMsgs(); + if (count($errors)) { + foreach ($errors as $error) { + $err['data'][] = array($error); + } + $err['headline'] = 'Install Errors'; + $this->ui->outputData($err); + if (!count($downloaded)) { + return $this->raiseError("$command failed"); + } + } + $data = array( + 'headline' => 'Packages that would be Installed' + ); + if (isset($options['pretend'])) { + foreach ($downloaded as $package) { + $data['data'][] = array($reg->parsedPackageNameToString($package->getParsedPackage())); + } + $this->ui->outputData($data, 'pretend'); + return true; + } + $this->installer->setOptions($options); + $this->installer->sortPackagesForInstall($downloaded); + if (PEAR::isError($err = $this->installer->setDownloadedPackages($downloaded))) { + $this->raiseError($err->getMessage()); + return true; + } + $extrainfo = array(); + foreach ($downloaded as $param) { + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $info = $this->installer->install($param, $options); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($info)) { + $oldinfo = $info; + $pkg = &$param->getPackageFile(); + if ($info->getCode() != PEAR_INSTALLER_NOBINARY) { + if (!($info = $pkg->installBinary($this->installer))) { + $this->ui->outputData('ERROR: ' .$oldinfo->getMessage()); + continue; + } + // we just installed a different package than requested, + // let's change the param and info so that the rest of this works + $param = $info[0]; + $info = $info[1]; + } + } + if (is_array($info)) { + if ($param->getPackageType() == 'extsrc' || + $param->getPackageType() == 'extbin') { + $pkg = &$param->getPackageFile(); + if ($instbin = $pkg->getInstalledBinary()) { + $instpkg = &$reg->getPackage($instbin, $pkg->getChannel()); + } else { + $instpkg = &$reg->getPackage($pkg->getPackage(), $pkg->getChannel()); + } + foreach ($instpkg->getFilelist() as $name => $atts) { + $pinfo = pathinfo($atts['installed_as']); + if (!isset($pinfo['extension']) || + in_array($pinfo['extension'], array('c', 'h'))) { + continue; // make sure we don't match php_blah.h + } + if ((strpos($pinfo['basename'], 'php_') === 0 && + $pinfo['extension'] == 'dll') || + // most unices + $pinfo['extension'] == 'so' || + // hp-ux + $pinfo['extension'] == 'sl') { + $extrainfo[] = 'You should add "extension=' . $pinfo['basename'] + . '" to php.ini'; + break; + } + } + } + if ($this->config->get('verbose') > 0) { + $channel = $param->getChannel(); + $label = $reg->parsedPackageNameToString( + array( + 'channel' => $channel, + 'package' => $param->getPackage(), + 'version' => $param->getVersion(), + )); + $out = array('data' => "$command ok: $label"); + if (isset($info['release_warnings'])) { + $out['release_warnings'] = $info['release_warnings']; + } + $this->ui->outputData($out, $command); + if (!isset($options['register-only']) && !isset($options['offline'])) { + if ($this->config->isDefinedLayer('ftp')) { + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $info = $this->installer->ftpInstall($param); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($info)) { + $this->ui->outputData($info->getMessage()); + $this->ui->outputData("remote install failed: $label"); + } else { + $this->ui->outputData("remote install ok: $label"); + } + } + } + } + $deps = $param->getDeps(); + if ($deps) { + if (isset($deps['group'])) { + $groups = $deps['group']; + if (!isset($groups[0])) { + $groups = array($groups); + } + foreach ($groups as $group) { + if ($group['attribs']['name'] == 'default') { + // default group is always installed, unless the user + // explicitly chooses to install another group + continue; + } + $this->ui->outputData($param->getPackage() . ': Optional feature ' . + $group['attribs']['name'] . ' available (' . + $group['attribs']['hint'] . ')'); + } + $extrainfo[] = 'To install use "pear install ' . + $reg->parsedPackageNameToString( + array('package' => $param->getPackage(), + 'channel' => $param->getChannel()), true) . + '#featurename"'; + } + } + if (isset($options['installroot'])) { + $reg = &$this->config->getRegistry(); + } + $pkg = &$reg->getPackage($param->getPackage(), $param->getChannel()); + // $pkg may be NULL if install is a 'fake' install via --packagingroot + if (is_object($pkg)) { + $pkg->setConfig($this->config); + if ($list = $pkg->listPostinstallScripts()) { + $pn = $reg->parsedPackageNameToString(array('channel' => + $param->getChannel(), 'package' => $param->getPackage()), true); + $extrainfo[] = $pn . ' has post-install scripts:'; + foreach ($list as $file) { + $extrainfo[] = $file; + } + $extrainfo[] = 'Use "pear run-scripts ' . $pn . '" to run'; + $extrainfo[] = 'DO NOT RUN SCRIPTS FROM UNTRUSTED SOURCES'; + } + } + } else { + return $this->raiseError("$command failed"); + } + } + if (count($extrainfo)) { + foreach ($extrainfo as $info) { + $this->ui->outputData($info); + } + } + return true; + } + + // }}} + // {{{ doUninstall() + + function doUninstall($command, $options, $params) + { + if (empty($this->installer)) { + $this->installer = &$this->getInstaller($this->ui); + } + if (isset($options['remoteconfig'])) { + $e = $this->config->readFTPConfigFile($options['remoteconfig']); + if (!PEAR::isError($e)) { + $this->installer->setConfig($this->config); + } + } + if (sizeof($params) < 1) { + return $this->raiseError("Please supply the package(s) you want to uninstall"); + } + $reg = &$this->config->getRegistry(); + $newparams = array(); + $badparams = array(); + foreach ($params as $pkg) { + $channel = $this->config->get('default_channel'); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $parsed = $reg->parsePackageName($pkg, $channel); + PEAR::staticPopErrorHandling(); + if (!$parsed || PEAR::isError($parsed)) { + $badparams[] = $pkg; + continue; + } + $package = $parsed['package']; + $channel = $parsed['channel']; + $info = &$reg->getPackage($package, $channel); + if ($info === null && + ($channel == 'pear.php.net' || $channel == 'pecl.php.net')) { + // make sure this isn't a package that has flipped from pear to pecl but + // used a package.xml 1.0 + $testc = ($channel == 'pear.php.net') ? 'pecl.php.net' : 'pear.php.net'; + $info = &$reg->getPackage($package, $testc); + if ($info !== null) { + $channel = $testc; + } + } + if ($info === null) { + $badparams[] = $pkg; + } else { + $newparams[] = &$info; + // check for binary packages (this is an alias for those packages if so) + if ($installedbinary = $info->getInstalledBinary()) { + $this->ui->log('adding binary package ' . + $reg->parsedPackageNameToString(array('channel' => $channel, + 'package' => $installedbinary), true)); + $newparams[] = &$reg->getPackage($installedbinary, $channel); + } + // add the contents of a dependency group to the list of installed packages + if (isset($parsed['group'])) { + $group = $info->getDependencyGroup($parsed['group']); + if ($group) { + $installed = &$reg->getInstalledGroup($group); + if ($installed) { + foreach ($installed as $i => $p) { + $newparams[] = &$installed[$i]; + } + } + } + } + } + } + $err = $this->installer->sortPackagesForUninstall($newparams); + if (PEAR::isError($err)) { + $this->ui->outputData($err->getMessage(), $command); + return true; + } + $params = $newparams; + // twist this to use it to check on whether dependent packages are also being uninstalled + // for circular dependencies like subpackages + $this->installer->setUninstallPackages($newparams); + $params = array_merge($params, $badparams); + foreach ($params as $pkg) { + $this->installer->pushErrorHandling(PEAR_ERROR_RETURN); + if ($err = $this->installer->uninstall($pkg, $options)) { + $this->installer->popErrorHandling(); + if (PEAR::isError($err)) { + $this->ui->outputData($err->getMessage(), $command); + continue; + } + $savepkg = $pkg; + if ($this->config->get('verbose') > 0) { + if (is_object($pkg)) { + $pkg = $reg->parsedPackageNameToString($pkg); + } + $this->ui->outputData("uninstall ok: $pkg", $command); + } + if (!isset($options['offline']) && is_object($savepkg) && + defined('PEAR_REMOTEINSTALL_OK')) { + if ($this->config->isDefinedLayer('ftp')) { + $this->installer->pushErrorHandling(PEAR_ERROR_RETURN); + $info = $this->installer->ftpUninstall($savepkg); + $this->installer->popErrorHandling(); + if (PEAR::isError($info)) { + $this->ui->outputData($info->getMessage()); + $this->ui->outputData("remote uninstall failed: $pkg"); + } else { + $this->ui->outputData("remote uninstall ok: $pkg"); + } + } + } + } else { + $this->installer->popErrorHandling(); + if (is_object($pkg)) { + $pkg = $reg->parsedPackageNameToString($pkg); + } + return $this->raiseError("uninstall failed: $pkg"); + } + } + return true; + } + + // }}} + + + // }}} + // {{{ doBundle() + /* + (cox) It just downloads and untars the package, does not do + any check that the PEAR_Installer::_installFile() does. + */ + + function doBundle($command, $options, $params) + { + $downloader = &$this->getDownloader($this->ui, array('force' => true, 'nodeps' => true, + 'soft' => true), $this->config); + $reg = &$this->config->getRegistry(); + if (sizeof($params) < 1) { + return $this->raiseError("Please supply the package you want to bundle"); + } + + if (isset($options['destination'])) { + if (!is_dir($options['destination'])) { + System::mkdir('-p ' . $options['destination']); + } + $dest = realpath($options['destination']); + } else { + $pwd = getcwd(); + if (is_dir($pwd . DIRECTORY_SEPARATOR . 'ext')) { + $dest = $pwd . DIRECTORY_SEPARATOR . 'ext'; + } else { + $dest = $pwd; + } + } + $downloader->setDownloadDir($dest); + $result = &$downloader->download(array($params[0])); + if (PEAR::isError($result)) { + return $result; + } + $pkgfile = &$result[0]->getPackageFile(); + $pkgname = $pkgfile->getName(); + $pkgversion = $pkgfile->getVersion(); + + // Unpacking ------------------------------------------------- + $dest .= DIRECTORY_SEPARATOR . $pkgname; + $orig = $pkgname . '-' . $pkgversion; + + $tar = &new Archive_Tar($pkgfile->getArchiveFile()); + if (!@$tar->extractModify($dest, $orig)) { + return $this->raiseError('unable to unpack ' . $pkgfile->getArchiveFile()); + } + $this->ui->outputData("Package ready at '$dest'"); + // }}} + } + + // }}} + + function doRunScripts($command, $options, $params) + { + if (!isset($params[0])) { + return $this->raiseError('run-scripts expects 1 parameter: a package name'); + } + $reg = &$this->config->getRegistry(); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $parsed = $reg->parsePackageName($params[0], $this->config->get('default_channel')); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($parsed)) { + return $this->raiseError($parsed); + } + $package = &$reg->getPackage($parsed['package'], $parsed['channel']); + if (is_object($package)) { + $package->setConfig($this->config); + $package->runPostinstallScripts(); + } else { + return $this->raiseError('Could not retrieve package "' . $params[0] . '" from registry'); + } + $this->ui->outputData('Install scripts complete', $command); + return true; + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Install.xml b/campcaster/src/tools/pear/src/PEAR/Command/Install.xml new file mode 100644 index 000000000..ccb9ecf60 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Install.xml @@ -0,0 +1,254 @@ + + + Install Package + doInstall + i + + + f + will overwrite newer installed packages + + + l + do not check for recommended dependency version + + + n + ignore dependencies, install anyway + + + r + do not install files, only register the package as installed + + + s + soft install, fail silently, or upgrade if already installed + + + B + don't build C extensions + + + Z + request uncompressed files when downloading + + + R + DIR + root directory used when installing files (ala PHP's INSTALL_ROOT) + + + force install even if there were errors + + + a + install all required and optional dependencies + + + o + install all required dependencies + + + O + do not attempt to download any urls or contact channels + + + p + Only list the packages that would be downloaded + + + [channel/]<package> ... +Installs one or more PEAR packages. You can specify a package to +install in four ways: + +"Package-1.0.tgz" : installs from a local file + +"http://example.com/Package-1.0.tgz" : installs from +anywhere on the net. + +"package.xml" : installs the package described in +package.xml. Useful for testing, or for wrapping a PEAR package in +another package manager such as RPM. + +"Package[-version/state][.tar]" : queries your default channel's server +({config master_server}) and downloads the newest package with +the preferred quality/state ({config preferred_state}). + +To retrieve Package version 1.1, use "Package-1.1," to retrieve +Package state beta, use "Package-beta." To retrieve an uncompressed +file, append .tar (make sure there is no file by the same name first) + +To download a package from another channel, prefix with the channel name like +"channel/Package" + +More than one package may be specified at once. It is ok to mix these +four ways of specifying packages. + + + + Upgrade Package + doInstall + up + + + f + overwrite newer installed packages + + + l + do not check for recommended dependency version + + + n + ignore dependencies, upgrade anyway + + + r + do not install files, only register the package as upgraded + + + B + don't build C extensions + + + Z + request uncompressed files when downloading + + + R + DIR + root directory used when installing files (ala PHP's INSTALL_ROOT) + + + force install even if there were errors + + + a + install all required and optional dependencies + + + o + install all required dependencies + + + O + do not attempt to download any urls or contact channels + + + p + Only list the packages that would be downloaded + + + <package> ... +Upgrades one or more PEAR packages. See documentation for the +"install" command for ways to specify a package. + +When upgrading, your package will be updated if the provided new +package has a higher version number (use the -f option if you need to +upgrade anyway). + +More than one package may be specified at once. + + + + Upgrade All Packages + doInstall + ua + + + n + ignore dependencies, upgrade anyway + + + r + do not install files, only register the package as upgraded + + + B + don't build C extensions + + + Z + request uncompressed files when downloading + + + R + DIR + root directory used when installing files (ala PHP's INSTALL_ROOT) + + + force install even if there were errors + + + do not check for recommended dependency version + + + +Upgrades all packages that have a newer release available. Upgrades are +done only if there is a release available of the state specified in +"preferred_state" (currently {config preferred_state}), or a state considered +more stable. + + + + Un-install Package + doUninstall + un + + + n + ignore dependencies, uninstall anyway + + + r + do not remove files, only register the packages as not installed + + + R + DIR + root directory used when installing files (ala PHP's INSTALL_ROOT) + + + force install even if there were errors + + + O + do not attempt to uninstall remotely + + + [channel/]<package> ... +Uninstalls one or more PEAR packages. More than one package may be +specified at once. Prefix with channel name to uninstall from a +channel not in your default channel ({config default_channel}) + + + + Unpacks a Pecl Package + doBundle + bun + + + d + DIR + Optional destination directory for unpacking (defaults to current path or "ext" if exists) + + + f + Force the unpacking even if there were errors in the package + + + <package> +Unpacks a Pecl Package into the selected location. It will download the +package if needed. + + + + Run Post-Install Scripts bundled with a package + doRunScripts + rs + + <package> +Run post-installation scripts in package <package>, if any exist. + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Mirror.php b/campcaster/src/tools/pear/src/PEAR/Command/Mirror.php new file mode 100644 index 000000000..9c4b2afdf --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Mirror.php @@ -0,0 +1,153 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Mirror.php,v 1.18 2006/03/02 18:14:13 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.2.0 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for providing file mirrors + * + * @category pear + * @package PEAR + * @author Alexander Merz + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.2.0 + */ +class PEAR_Command_Mirror extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'download-all' => array( + 'summary' => 'Downloads each available package from the default channel', + 'function' => 'doDownloadAll', + 'shortcut' => 'da', + 'options' => array( + 'channel' => + array( + 'shortopt' => 'c', + 'doc' => 'specify a channel other than the default channel', + 'arg' => 'CHAN', + ), + ), + 'doc' => ' +Requests a list of available packages from the default channel ({config default_channel}) +and downloads them to current working directory. Note: only +packages within preferred_state ({config preferred_state}) will be downloaded' + ), + ); + + // }}} + + // {{{ constructor + + /** + * PEAR_Command_Mirror constructor. + * + * @access public + * @param object PEAR_Frontend a reference to an frontend + * @param object PEAR_Config a reference to the configuration data + */ + function PEAR_Command_Mirror(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + /** + * For unit-testing + */ + function &factory($a) + { + $a = &PEAR_Command::factory($a, $this->config); + return $a; + } + + // {{{ doDownloadAll() + /** + * retrieves a list of avaible Packages from master server + * and downloads them + * + * @access public + * @param string $command the command + * @param array $options the command options before the command + * @param array $params the stuff after the command name + * @return bool true if succesful + * @throw PEAR_Error + */ + function doDownloadAll($command, $options, $params) + { + $savechannel = $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + $channel = isset($options['channel']) ? $options['channel'] : + $this->config->get('default_channel'); + if (!$reg->channelExists($channel)) { + $this->config->set('default_channel', $savechannel); + return $this->raiseError('Channel "' . $channel . '" does not exist'); + } + $this->config->set('default_channel', $channel); + $this->ui->outputData('Using Channel ' . $this->config->get('default_channel')); + $chan = $reg->getChannel($channel); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + if ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $rest = &$this->config->getREST('1.0', array()); + $remoteInfo = array_flip($rest->listPackages($base)); + } else { + $remote = &$this->config->getRemote(); + $stable = ($this->config->get('preferred_state') == 'stable'); + $remoteInfo = $remote->call("package.listAll", true, $stable, false); + } + if (PEAR::isError($remoteInfo)) { + return $remoteInfo; + } + $cmd = &$this->factory("download"); + if (PEAR::isError($cmd)) { + return $cmd; + } + $this->ui->outputData('Using Preferred State of ' . + $this->config->get('preferred_state')); + $this->ui->outputData('Gathering release information, please wait...'); + /** + * Error handling not necessary, because already done by + * the download command + */ + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $err = $cmd->run('download', array('downloadonly' => true), array_keys($remoteInfo)); + PEAR::staticPopErrorHandling(); + $this->config->set('default_channel', $savechannel); + if (PEAR::isError($err)) { + $this->ui->outputData($err->getMessage()); + } + return true; + } + + // }}} +} diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Mirror.xml b/campcaster/src/tools/pear/src/PEAR/Command/Mirror.xml new file mode 100644 index 000000000..fe8be9d03 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Mirror.xml @@ -0,0 +1,18 @@ + + + Downloads each available package from the default channel + doDownloadAll + da + + + c + specify a channel other than the default channel + CHAN + + + +Requests a list of available packages from the default channel ({config default_channel}) +and downloads them to current working directory. Note: only +packages within preferred_state ({config preferred_state}) will be downloaded + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Package.php b/campcaster/src/tools/pear/src/PEAR/Command/Package.php new file mode 100644 index 000000000..f2be87d81 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Package.php @@ -0,0 +1,1164 @@ + + * @author Martin Jansen + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Package.php,v 1.119.2.1 2006/06/07 23:39:22 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for login/logout + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Martin Jansen + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: @package_version@ + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ + +class PEAR_Command_Package extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'package' => array( + 'summary' => 'Build Package', + 'function' => 'doPackage', + 'shortcut' => 'p', + 'options' => array( + 'nocompress' => array( + 'shortopt' => 'Z', + 'doc' => 'Do not gzip the package file' + ), + 'showname' => array( + 'shortopt' => 'n', + 'doc' => 'Print the name of the packaged file.', + ), + ), + 'doc' => '[descfile] [descfile2] +Creates a PEAR package from its description file (usually called +package.xml). If a second packagefile is passed in, then +the packager will check to make sure that one is a package.xml +version 1.0, and the other is a package.xml version 2.0. The +package.xml version 1.0 will be saved as "package.xml" in the archive, +and the other as "package2.xml" in the archive" +' + ), + 'package-validate' => array( + 'summary' => 'Validate Package Consistency', + 'function' => 'doPackageValidate', + 'shortcut' => 'pv', + 'options' => array(), + 'doc' => ' +', + ), + 'cvsdiff' => array( + 'summary' => 'Run a "cvs diff" for all files in a package', + 'function' => 'doCvsDiff', + 'shortcut' => 'cd', + 'options' => array( + 'quiet' => array( + 'shortopt' => 'q', + 'doc' => 'Be quiet', + ), + 'reallyquiet' => array( + 'shortopt' => 'Q', + 'doc' => 'Be really quiet', + ), + 'date' => array( + 'shortopt' => 'D', + 'doc' => 'Diff against revision of DATE', + 'arg' => 'DATE', + ), + 'release' => array( + 'shortopt' => 'R', + 'doc' => 'Diff against tag for package release REL', + 'arg' => 'REL', + ), + 'revision' => array( + 'shortopt' => 'r', + 'doc' => 'Diff against revision REV', + 'arg' => 'REV', + ), + 'context' => array( + 'shortopt' => 'c', + 'doc' => 'Generate context diff', + ), + 'unified' => array( + 'shortopt' => 'u', + 'doc' => 'Generate unified diff', + ), + 'ignore-case' => array( + 'shortopt' => 'i', + 'doc' => 'Ignore case, consider upper- and lower-case letters equivalent', + ), + 'ignore-whitespace' => array( + 'shortopt' => 'b', + 'doc' => 'Ignore changes in amount of white space', + ), + 'ignore-blank-lines' => array( + 'shortopt' => 'B', + 'doc' => 'Ignore changes that insert or delete blank lines', + ), + 'brief' => array( + 'doc' => 'Report only whether the files differ, no details', + ), + 'dry-run' => array( + 'shortopt' => 'n', + 'doc' => 'Don\'t do anything, just pretend', + ), + ), + 'doc' => ' +Compares all the files in a package. Without any options, this +command will compare the current code with the last checked-in code. +Using the -r or -R option you may compare the current code with that +of a specific release. +', + ), + 'cvstag' => array( + 'summary' => 'Set CVS Release Tag', + 'function' => 'doCvsTag', + 'shortcut' => 'ct', + 'options' => array( + 'quiet' => array( + 'shortopt' => 'q', + 'doc' => 'Be quiet', + ), + 'reallyquiet' => array( + 'shortopt' => 'Q', + 'doc' => 'Be really quiet', + ), + 'slide' => array( + 'shortopt' => 'F', + 'doc' => 'Move (slide) tag if it exists', + ), + 'delete' => array( + 'shortopt' => 'd', + 'doc' => 'Remove tag', + ), + 'dry-run' => array( + 'shortopt' => 'n', + 'doc' => 'Don\'t do anything, just pretend', + ), + ), + 'doc' => ' [files...] +Sets a CVS tag on all files in a package. Use this command after you have +packaged a distribution tarball with the "package" command to tag what +revisions of what files were in that release. If need to fix something +after running cvstag once, but before the tarball is released to the public, +use the "slide" option to move the release tag. + +to include files (such as a second package.xml, or tests not included in the +release), pass them as additional parameters. +', + ), + 'package-dependencies' => array( + 'summary' => 'Show package dependencies', + 'function' => 'doPackageDependencies', + 'shortcut' => 'pd', + 'options' => array(), + 'doc' => ' +List all dependencies the package has.' + ), + 'sign' => array( + 'summary' => 'Sign a package distribution file', + 'function' => 'doSign', + 'shortcut' => 'si', + 'options' => array(), + 'doc' => ' +Signs a package distribution (.tar or .tgz) file with GnuPG.', + ), + 'makerpm' => array( + 'summary' => 'Builds an RPM spec file from a PEAR package', + 'function' => 'doMakeRPM', + 'shortcut' => 'rpm', + 'options' => array( + 'spec-template' => array( + 'shortopt' => 't', + 'arg' => 'FILE', + 'doc' => 'Use FILE as RPM spec file template' + ), + 'rpm-pkgname' => array( + 'shortopt' => 'p', + 'arg' => 'FORMAT', + 'doc' => 'Use FORMAT as format string for RPM package name, %s is replaced +by the PEAR package name, defaults to "PEAR::%s".', + ), + ), + 'doc' => ' + +Creates an RPM .spec file for wrapping a PEAR package inside an RPM +package. Intended to be used from the SPECS directory, with the PEAR +package tarball in the SOURCES directory: + +$ pear makerpm ../SOURCES/Net_Socket-1.0.tgz +Wrote RPM spec file PEAR::Net_Geo-1.0.spec +$ rpm -bb PEAR::Net_Socket-1.0.spec +... +Wrote: /usr/src/redhat/RPMS/i386/PEAR::Net_Socket-1.0-1.i386.rpm +', + ), + 'convert' => array( + 'summary' => 'Convert a package.xml 1.0 to package.xml 2.0 format', + 'function' => 'doConvert', + 'shortcut' => 'c2', + 'options' => array( + 'flat' => array( + 'shortopt' => 'f', + 'doc' => 'do not beautify the filelist.', + ), + ), + 'doc' => '[descfile] [descfile2] +Converts a package.xml in 1.0 format into a package.xml +in 2.0 format. The new file will be named package2.xml by default, +and package.xml will be used as the old file by default. +This is not the most intelligent conversion, and should only be +used for automated conversion or learning the format. +' + ), + ); + + var $output; + + // }}} + // {{{ constructor + + /** + * PEAR_Command_Package constructor. + * + * @access public + */ + function PEAR_Command_Package(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + // {{{ _displayValidationResults() + + function _displayValidationResults($err, $warn, $strict = false) + { + foreach ($err as $e) { + $this->output .= "Error: $e\n"; + } + foreach ($warn as $w) { + $this->output .= "Warning: $w\n"; + } + $this->output .= sprintf('Validation: %d error(s), %d warning(s)'."\n", + sizeof($err), sizeof($warn)); + if ($strict && sizeof($err) > 0) { + $this->output .= "Fix these errors and try again."; + return false; + } + return true; + } + + // }}} + function &getPackager() + { + if (!class_exists('PEAR_Packager')) { + require_once 'PEAR/Packager.php'; + } + $a = &new PEAR_Packager; + return $a; + } + + function &getPackageFile($config, $debug = false, $tmpdir = null) + { + if (!class_exists('PEAR_Common')) { + require_once 'PEAR/Common.php'; + } + if (!class_exists('PEAR/PackageFile.php')) { + require_once 'PEAR/PackageFile.php'; + } + $a = &new PEAR_PackageFile($config, $debug, $tmpdir); + $common = new PEAR_Common; + $common->ui = $this->ui; + $a->setLogger($common); + return $a; + } + // {{{ doPackage() + + function doPackage($command, $options, $params) + { + $this->output = ''; + $pkginfofile = isset($params[0]) ? $params[0] : 'package.xml'; + $pkg2 = isset($params[1]) ? $params[1] : null; + if (!$pkg2 && !isset($params[0])) { + if (file_exists('package2.xml')) { + $pkg2 = 'package2.xml'; + } + } + $packager = &$this->getPackager(); + $compress = empty($options['nocompress']) ? true : false; + $result = $packager->package($pkginfofile, $compress, $pkg2); + if (PEAR::isError($result)) { + return $this->raiseError($result); + } + // Don't want output, only the package file name just created + if (isset($options['showname'])) { + $this->output = $result; + } + if ($this->output) { + $this->ui->outputData($this->output, $command); + } + return true; + } + + // }}} + // {{{ doPackageValidate() + + function doPackageValidate($command, $options, $params) + { + $this->output = ''; + if (sizeof($params) < 1) { + $params[0] = "package.xml"; + } + $obj = &$this->getPackageFile($this->config, $this->_debug); + $obj->rawReturn(); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $info = $obj->fromTgzFile($params[0], PEAR_VALIDATE_NORMAL); + if (PEAR::isError($info)) { + $info = $obj->fromPackageFile($params[0], PEAR_VALIDATE_NORMAL); + } else { + $archive = $info->getArchiveFile(); + $tar = &new Archive_Tar($archive); + $tar->extract(dirname($info->getPackageFile())); + $info->setPackageFile(dirname($info->getPackageFile()) . DIRECTORY_SEPARATOR . + $info->getPackage() . '-' . $info->getVersion() . DIRECTORY_SEPARATOR . + basename($info->getPackageFile())); + } + PEAR::staticPopErrorHandling(); + if (PEAR::isError($info)) { + return $this->raiseError($info); + } + $valid = false; + if ($info->getPackagexmlVersion() == '2.0') { + if ($valid = $info->validate(PEAR_VALIDATE_NORMAL)) { + $info->flattenFileList(); + $valid = $info->validate(PEAR_VALIDATE_PACKAGING); + } + } else { + $valid = $info->validate(PEAR_VALIDATE_PACKAGING); + } + $err = array(); + $warn = array(); + if (!$valid) { + foreach ($info->getValidationWarnings() as $error) { + if ($error['level'] == 'warning') { + $warn[] = $error['message']; + } else { + $err[] = $error['message']; + } + } + } + $this->_displayValidationResults($err, $warn); + $this->ui->outputData($this->output, $command); + return true; + } + + // }}} + // {{{ doCvsTag() + + function doCvsTag($command, $options, $params) + { + $this->output = ''; + $_cmd = $command; + if (sizeof($params) < 1) { + $help = $this->getHelp($command); + return $this->raiseError("$command: missing parameter: $help[0]"); + } + $obj = &$this->getPackageFile($this->config, $this->_debug); + $info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL); + if (PEAR::isError($info)) { + return $this->raiseError($info); + } + $err = $warn = array(); + if (!$info->validate()) { + foreach ($info->getValidationWarnings() as $error) { + if ($error['level'] == 'warning') { + $warn[] = $error['message']; + } else { + $err[] = $error['message']; + } + } + } + if (!$this->_displayValidationResults($err, $warn, true)) { + $this->ui->outputData($this->output, $command); + return $this->raiseError('CVS tag failed'); + } + $version = $info->getVersion(); + $cvsversion = preg_replace('/[^a-z0-9]/i', '_', $version); + $cvstag = "RELEASE_$cvsversion"; + $files = array_keys($info->getFilelist()); + $command = "cvs"; + if (isset($options['quiet'])) { + $command .= ' -q'; + } + if (isset($options['reallyquiet'])) { + $command .= ' -Q'; + } + $command .= ' tag'; + if (isset($options['slide'])) { + $command .= ' -F'; + } + if (isset($options['delete'])) { + $command .= ' -d'; + } + $command .= ' ' . $cvstag . ' ' . escapeshellarg($params[0]); + array_shift($params); + if (count($params)) { + // add in additional files to be tagged + $files = array_merge($files, $params); + } + foreach ($files as $file) { + $command .= ' ' . escapeshellarg($file); + } + if ($this->config->get('verbose') > 1) { + $this->output .= "+ $command\n"; + } + $this->output .= "+ $command\n"; + if (empty($options['dry-run'])) { + $fp = popen($command, "r"); + while ($line = fgets($fp, 1024)) { + $this->output .= rtrim($line)."\n"; + } + pclose($fp); + } + $this->ui->outputData($this->output, $_cmd); + return true; + } + + // }}} + // {{{ doCvsDiff() + + function doCvsDiff($command, $options, $params) + { + $this->output = ''; + if (sizeof($params) < 1) { + $help = $this->getHelp($command); + return $this->raiseError("$command: missing parameter: $help[0]"); + } + $obj = &$this->getPackageFile($this->config, $this->_debug); + $info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL); + if (PEAR::isError($info)) { + return $this->raiseError($info); + } + $err = $warn = array(); + if (!$info->validate()) { + foreach ($info->getValidationWarnings() as $error) { + if ($error['level'] == 'warning') { + $warn[] = $error['message']; + } else { + $err[] = $error['message']; + } + } + } + if (!$this->_displayValidationResults($err, $warn, true)) { + $this->ui->outputData($this->output, $command); + return $this->raiseError('CVS diff failed'); + } + $info1 = $info->getFilelist(); + $files = $info1; + $cmd = "cvs"; + if (isset($options['quiet'])) { + $cmd .= ' -q'; + unset($options['quiet']); + } + if (isset($options['reallyquiet'])) { + $cmd .= ' -Q'; + unset($options['reallyquiet']); + } + if (isset($options['release'])) { + $cvsversion = preg_replace('/[^a-z0-9]/i', '_', $options['release']); + $cvstag = "RELEASE_$cvsversion"; + $options['revision'] = $cvstag; + unset($options['release']); + } + $execute = true; + if (isset($options['dry-run'])) { + $execute = false; + unset($options['dry-run']); + } + $cmd .= ' diff'; + // the rest of the options are passed right on to "cvs diff" + foreach ($options as $option => $optarg) { + $arg = @$this->commands[$command]['options'][$option]['arg']; + $short = @$this->commands[$command]['options'][$option]['shortopt']; + $cmd .= $short ? " -$short" : " --$option"; + if ($arg && $optarg) { + $cmd .= ($short ? '' : '=') . escapeshellarg($optarg); + } + } + foreach ($files as $file) { + $cmd .= ' ' . escapeshellarg($file['name']); + } + if ($this->config->get('verbose') > 1) { + $this->output .= "+ $cmd\n"; + } + if ($execute) { + $fp = popen($cmd, "r"); + while ($line = fgets($fp, 1024)) { + $this->output .= rtrim($line)."\n"; + } + pclose($fp); + } + $this->ui->outputData($this->output, $command); + return true; + } + + // }}} + // {{{ doPackageDependencies() + + function doPackageDependencies($command, $options, $params) + { + // $params[0] -> the PEAR package to list its information + if (sizeof($params) != 1) { + return $this->raiseError("bad parameter(s), try \"help $command\""); + } + $obj = &$this->getPackageFile($this->config, $this->_debug); + $info = $obj->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL); + if (PEAR::isError($info)) { + return $this->raiseError($info); + } + $deps = $info->getDeps(); + if (is_array($deps)) { + if ($info->getPackagexmlVersion() == '1.0') { + $data = array( + 'caption' => 'Dependencies for pear/' . $info->getPackage(), + 'border' => true, + 'headline' => array("Required?", "Type", "Name", "Relation", "Version"), + ); + + foreach ($deps as $d) { + if (isset($d['optional'])) { + if ($d['optional'] == 'yes') { + $req = 'No'; + } else { + $req = 'Yes'; + } + } else { + $req = 'Yes'; + } + if (isset($this->_deps_rel_trans[$d['rel']])) { + $rel = $this->_deps_rel_trans[$d['rel']]; + } else { + $rel = $d['rel']; + } + + if (isset($this->_deps_type_trans[$d['type']])) { + $type = ucfirst($this->_deps_type_trans[$d['type']]); + } else { + $type = $d['type']; + } + + if (isset($d['name'])) { + $name = $d['name']; + } else { + $name = ''; + } + + if (isset($d['version'])) { + $version = $d['version']; + } else { + $version = ''; + } + + $data['data'][] = array($req, $type, $name, $rel, $version); + } + } else { // package.xml 2.0 dependencies display + require_once 'PEAR/Dependency2.php'; + $deps = $info->getDependencies(); + $reg = &$this->config->getRegistry(); + if (is_array($deps)) { + $d = new PEAR_Dependency2($this->config, array(), ''); + $data = array( + 'caption' => 'Dependencies for ' . $info->getPackage(), + 'border' => true, + 'headline' => array("Required?", "Type", "Name", 'Versioning', 'Group'), + ); + foreach ($deps as $type => $subd) { + $req = ($type == 'required') ? 'Yes' : 'No'; + if ($type == 'group') { + $group = $subd['attribs']['name']; + } else { + $group = ''; + } + if (!isset($subd[0])) { + $subd = array($subd); + } + foreach ($subd as $groupa) { + foreach ($groupa as $deptype => $depinfo) { + if ($deptype == 'attribs') { + continue; + } + if ($deptype == 'pearinstaller') { + $deptype = 'pear Installer'; + } + if (!isset($depinfo[0])) { + $depinfo = array($depinfo); + } + foreach ($depinfo as $inf) { + $name = ''; + if (isset($inf['channel'])) { + $alias = $reg->channelAlias($inf['channel']); + if (!$alias) { + $alias = '(channel?) ' .$inf['channel']; + } + $name = $alias . '/'; + } + if (isset($inf['name'])) { + $name .= $inf['name']; + } elseif (isset($inf['pattern'])) { + $name .= $inf['pattern']; + } else { + $name .= ''; + } + if (isset($inf['uri'])) { + $name .= ' [' . $inf['uri'] . ']'; + } + if (isset($inf['conflicts'])) { + $ver = 'conflicts'; + } else { + $ver = $d->_getExtraString($inf); + } + $data['data'][] = array($req, ucfirst($deptype), $name, + $ver, $group); + } + } + } + } + } + } + + $this->ui->outputData($data, $command); + return true; + } + + // Fallback + $this->ui->outputData("This package does not have any dependencies.", $command); + } + + // }}} + // {{{ doSign() + + function doSign($command, $options, $params) + { + require_once 'System.php'; + require_once 'Archive/Tar.php'; + // should move most of this code into PEAR_Packager + // so it'll be easy to implement "pear package --sign" + if (sizeof($params) != 1) { + return $this->raiseError("bad parameter(s), try \"help $command\""); + } + if (!file_exists($params[0])) { + return $this->raiseError("file does not exist: $params[0]"); + } + $obj = $this->getPackageFile($this->config, $this->_debug); + $info = $obj->fromTgzFile($params[0], PEAR_VALIDATE_NORMAL); + if (PEAR::isError($info)) { + return $this->raiseError($info); + } + $tar = new Archive_Tar($params[0]); + $tmpdir = System::mktemp('-d pearsign'); + if (!$tar->extractList('package2.xml package.sig', $tmpdir)) { + if (!$tar->extractList('package.xml package.sig', $tmpdir)) { + return $this->raiseError("failed to extract tar file"); + } + } + if (file_exists("$tmpdir/package.sig")) { + return $this->raiseError("package already signed"); + } + $packagexml = 'package.xml'; + if (file_exists("$tmpdir/package2.xml")) { + $packagexml = 'package2.xml'; + } + @unlink("$tmpdir/package.sig"); + $input = $this->ui->userDialog($command, + array('GnuPG Passphrase'), + array('password')); + $gpg = popen("gpg --batch --passphrase-fd 0 --armor --detach-sign --output $tmpdir/package.sig $tmpdir/$packagexml 2>/dev/null", "w"); + if (!$gpg) { + return $this->raiseError("gpg command failed"); + } + fwrite($gpg, "$input[0]\n"); + if (pclose($gpg) || !file_exists("$tmpdir/package.sig")) { + return $this->raiseError("gpg sign failed"); + } + $tar->addModify("$tmpdir/package.sig", '', $tmpdir); + return true; + } + + // }}} + + /** + * For unit testing purposes + */ + function &getInstaller(&$ui) + { + if (!class_exists('PEAR_Installer')) { + require_once 'PEAR/Installer.php'; + } + $a = &new PEAR_Installer($ui); + return $a; + } + + /** + * For unit testing purposes + */ + function &getCommandPackaging(&$ui, &$config) + { + if (!class_exists('PEAR_Command_Packaging')) { + @include_once 'PEAR/Command/Packaging.php'; + } + + if (class_exists('PEAR_Command_Packaging')) { + $a = &new PEAR_Command_Packaging($ui, $config); + } else { + $a = null; + } + return $a; + } + + // {{{ doMakeRPM() + + function doMakeRPM($command, $options, $params) + { + require_once 'System.php'; + require_once 'Archive/Tar.php'; + + // Check to see if PEAR_Command_Packaging is installed, and + // transparently switch to use the "make-rpm-spec" command from it + // instead, if it does. Otherwise, continue to use the old version + // of "makerpm" supplied with this package (PEAR). + $packaging_cmd = $this->getCommandPackaging($this->ui, $this->config); + if ($packaging_cmd !== null) { + $this->ui->outputData('PEAR_Command_Packaging is installed; using '. + 'newer "make-rpm-spec" command instead'); + return $packaging_cmd->run('make-rpm-spec', $options, $params); + } else { + $this->ui->outputData('WARNING: "pear makerpm" is now deprecated; an '. + 'improved version is available via "pear make-rpm-spec", which '. + 'is available by installing PEAR_Command_Packaging'); + } + + if (sizeof($params) != 1) { + return $this->raiseError("bad parameter(s), try \"help $command\""); + } + if (!file_exists($params[0])) { + return $this->raiseError("file does not exist: $params[0]"); + } + $reg = &$this->config->getRegistry(); + $pkg = &$this->getPackageFile($this->config, $this->_debug); + $pf = &$pkg->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL); + if (PEAR::isError($pf)) { + $u = $pf->getUserinfo(); + if (is_array($u)) { + foreach ($u as $err) { + if (is_array($err)) { + $err = $err['message']; + } + $this->ui->outputData($err); + } + } + return $this->raiseError("$params[0] is not a valid package"); + } + $tmpdir = System::mktemp(array('-d', 'pear2rpm')); + $instroot = System::mktemp(array('-d', 'pear2rpm')); + $tmp = $this->config->get('verbose'); + $this->config->set('verbose', 0); + $installer = $this->getInstaller($this->ui); + require_once 'PEAR/Downloader/Package.php'; + $pack = new PEAR_Downloader_Package($installer); + $pack->setPackageFile($pf); + $params[0] = &$pack; + $installer->setOptions(array('installroot' => $instroot, + 'nodeps' => true, 'soft' => true)); + $installer->setDownloadedPackages($params); + $info = $installer->install($params[0], + array('installroot' => $instroot, + 'nodeps' => true, 'soft' => true)); + $pkgdir = $pf->getPackage() . '-' . $pf->getVersion(); + $info['rpm_xml_dir'] = '/var/lib/pear'; + $this->config->set('verbose', $tmp); + if (isset($options['spec-template'])) { + $spec_template = $options['spec-template']; + } else { + $spec_template = '@DATA-DIR@/PEAR/template.spec'; + } + $info['possible_channel'] = ''; + $info['extra_config'] = ''; + if (isset($options['rpm-pkgname'])) { + $rpm_pkgname_format = $options['rpm-pkgname']; + } else { + if ($pf->getChannel() == 'pear.php.net' || $pf->getChannel() == 'pecl.php.net') { + $alias = 'PEAR'; + } else { + $chan = &$reg->getChannel($pf->getChannel()); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + $alias = $chan->getAlias(); + $alias = strtoupper($alias); + $info['possible_channel'] = $pf->getChannel() . '/'; + } + $rpm_pkgname_format = $alias . '::%s'; + } + + $info['extra_headers'] = ''; + $info['doc_files'] = ''; + $info['files'] = ''; + $info['package2xml'] = ''; + $info['rpm_package'] = sprintf($rpm_pkgname_format, $pf->getPackage()); + $srcfiles = 0; + foreach ($info['filelist'] as $name => $attr) { + if (!isset($attr['role'])) { + continue; + } + $name = preg_replace('![/:\\\\]!', '/', $name); + if ($attr['role'] == 'doc') { + $info['doc_files'] .= " $name"; + // Map role to the rpm vars + } else { + $c_prefix = '%{_libdir}/php/pear'; + switch ($attr['role']) { + case 'php': + $prefix = $c_prefix; + break; + case 'ext': + $prefix = '%{_libdir}/php'; + break; // XXX good place? + case 'src': + $srcfiles++; + $prefix = '%{_includedir}/php'; + break; // XXX good place? + case 'test': + $prefix = "$c_prefix/tests/" . $pf->getPackage(); + break; + case 'data': + $prefix = "$c_prefix/data/" . $pf->getPackage(); + break; + case 'script': + $prefix = '%{_bindir}'; + break; + default: // non-standard roles + $prefix = "$c_prefix/$attr[role]/" . $pf->getPackage(); + $info['extra_config'] .= + "\n -d {$attr[role]}_dir=$c_prefix/{$attr[role]} \\"; + $this->ui->outputData('WARNING: role "' . $attr['role'] . '" used, ' . + 'and will be installed in "' . $c_prefix . '/' . $attr['role'] . + '/' . $pf->getPackage() . + ' - hand-edit the final .spec if this is wrong', $command); + break; + } + $name = str_replace('\\', '/', $name); + $info['files'] .= "$prefix/$name\n"; + } + } + if ($srcfiles > 0) { + require_once 'OS/Guess.php'; + $os = new OS_Guess; + $arch = $os->getCpu(); + } else { + $arch = 'noarch'; + } + $cfg = array('master_server', 'php_dir', 'ext_dir', 'doc_dir', + 'bin_dir', 'data_dir', 'test_dir'); + foreach ($cfg as $k) { + if ($k == 'master_server') { + $chan = $reg->getChannel($pf->getChannel()); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + $info[$k] = $chan->getServer(); + continue; + } + $info[$k] = $this->config->get($k); + } + $info['arch'] = $arch; + $fp = @fopen($spec_template, "r"); + if (!$fp) { + return $this->raiseError("could not open RPM spec file template $spec_template: $php_errormsg"); + } + $info['package'] = $pf->getPackage(); + $info['version'] = $pf->getVersion(); + $info['release_license'] = $pf->getLicense(); + if ($pf->getDeps()) { + if ($pf->getPackagexmlVersion() == '1.0') { + $requires = $conflicts = array(); + foreach ($pf->getDeps() as $dep) { + if (isset($dep['optional']) && $dep['optional'] == 'yes') { + continue; + } + if ($dep['type'] != 'pkg') { + continue; + } + if (isset($dep['channel']) && $dep['channel'] != 'pear.php.net' && + $dep['channel'] != 'pecl.php.net') { + $chan = &$reg->getChannel($dep['channel']); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + $package = strtoupper($chan->getAlias()) . '::' . $dep['name']; + } else { + $package = 'PEAR::' . $dep['name']; + } + $trans = array( + '>' => '>', + '<' => '<', + '>=' => '>=', + '<=' => '<=', + '=' => '=', + 'gt' => '>', + 'lt' => '<', + 'ge' => '>=', + 'le' => '<=', + 'eq' => '=', + ); + if ($dep['rel'] == 'has') { + $requires[] = $package; + } elseif ($dep['rel'] == 'not') { + $conflicts[] = $package; + } elseif ($dep['rel'] == 'ne') { + $conflicts[] = $package . ' = ' . $dep['version']; + } elseif (isset($trans[$dep['rel']])) { + $requires[] = $package . ' ' . $trans[$dep['rel']] . ' ' . $dep['version']; + } + } + if (count($requires)) { + $info['extra_headers'] .= 'Requires: ' . implode(', ', $requires) . "\n"; + } + if (count($conflicts)) { + $info['extra_headers'] .= 'Conflicts: ' . implode(', ', $conflicts) . "\n"; + } + } else { + $info['package2xml'] = '2'; // tell the spec to use package2.xml + $requires = $conflicts = array(); + $deps = $pf->getDeps(true); + if (isset($deps['required']['package'])) { + if (!isset($deps['required']['package'][0])) { + $deps['required']['package'] = array($deps['required']['package']); + } + foreach ($deps['required']['package'] as $dep) { + if ($dep['channel'] != 'pear.php.net' && $dep['channel'] != 'pecl.php.net') { + $chan = &$reg->getChannel($dep['channel']); + if (PEAR::isError($chan)) { + return $this->raiseError($chan); + } + $package = strtoupper($chan->getAlias()) . '::' . $dep['name']; + } else { + $package = 'PEAR::' . $dep['name']; + } + if (isset($dep['conflicts']) && (isset($dep['min']) || + isset($dep['max']))) { + $deprange = array(); + if (isset($dep['min'])) { + $deprange[] = array($dep['min'],'>='); + } + if (isset($dep['max'])) { + $deprange[] = array($dep['max'], '<='); + } + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude']) || + !isset($dep['exclude'][0])) { + $dep['exclude'] = array($dep['exclude']); + } + if (count($deprange)) { + $excl = $dep['exclude']; + // change >= to > if excluding the min version + // change <= to < if excluding the max version + for($i = 0; $i < count($excl); $i++) { + if (isset($deprange[0]) && + $excl[$i] == $deprange[0][0]) { + $deprange[0][1] = '<'; + unset($dep['exclude'][$i]); + } + if (isset($deprange[1]) && + $excl[$i] == $deprange[1][0]) { + $deprange[1][1] = '>'; + unset($dep['exclude'][$i]); + } + } + } + if (count($dep['exclude'])) { + $dep['exclude'] = array_values($dep['exclude']); + $newdeprange = array(); + // remove excludes that are outside the existing range + for ($i = 0; $i < count($dep['exclude']); $i++) { + if ($dep['exclude'][$i] < $dep['min'] || + $dep['exclude'][$i] > $dep['max']) { + unset($dep['exclude'][$i]); + } + } + $dep['exclude'] = array_values($dep['exclude']); + usort($dep['exclude'], 'version_compare'); + // take the remaining excludes and + // split the dependency into sub-ranges + $lastmin = $deprange[0]; + for ($i = 0; $i < count($dep['exclude']) - 1; $i++) { + $newdeprange[] = '(' . + $package . " {$lastmin[1]} {$lastmin[0]} and " . + $package . ' < ' . $dep['exclude'][$i] . ')'; + $lastmin = array($dep['exclude'][$i], '>'); + } + if (isset($dep['max'])) { + $newdeprange[] = '(' . $package . + " {$lastmin[1]} {$lastmin[0]} and " . + $package . ' < ' . $dep['max'] . ')'; + } + $conflicts[] = implode(' or ', $deprange); + } else { + $conflicts[] = $package . + " {$deprange[0][1]} {$deprange[0][0]}" . + (isset($deprange[1]) ? + " and $package {$deprange[1][1]} {$deprange[1][0]}" + : ''); + } + } + continue; + } + if (!isset($dep['min']) && !isset($dep['max']) && + !isset($dep['exclude'])) { + if (isset($dep['conflicts'])) { + $conflicts[] = $package; + } else { + $requires[] = $package; + } + } else { + if (isset($dep['min'])) { + $requires[] = $package . ' >= ' . $dep['min']; + } + if (isset($dep['max'])) { + $requires[] = $package . ' <= ' . $dep['max']; + } + if (isset($dep['exclude'])) { + $ex = $dep['exclude']; + if (!is_array($ex)) { + $ex = array($ex); + } + foreach ($ex as $ver) { + $conflicts[] = $package . ' = ' . $ver; + } + } + } + } + require_once 'Archive/Tar.php'; + $tar = new Archive_Tar($pf->getArchiveFile()); + $tar->pushErrorHandling(PEAR_ERROR_RETURN); + $a = $tar->extractInString('package2.xml'); + $tar->popErrorHandling(); + if ($a === null || PEAR::isError($a)) { + $info['package2xml'] = ''; + // this doesn't have a package.xml version 1.0 + $requires[] = 'PEAR::PEAR >= ' . + $deps['required']['pearinstaller']['min']; + } + if (count($requires)) { + $info['extra_headers'] .= 'Requires: ' . implode(', ', $requires) . "\n"; + } + if (count($conflicts)) { + $info['extra_headers'] .= 'Conflicts: ' . implode(', ', $conflicts) . "\n"; + } + } + } + } + + // remove the trailing newline + $info['extra_headers'] = trim($info['extra_headers']); + if (function_exists('file_get_contents')) { + fclose($fp); + $spec_contents = preg_replace('/@([a-z0-9_-]+)@/e', '$info["\1"]', + file_get_contents($spec_template)); + } else { + $spec_contents = preg_replace('/@([a-z0-9_-]+)@/e', '$info["\1"]', + fread($fp, filesize($spec_template))); + fclose($fp); + } + $spec_file = "$info[rpm_package]-$info[version].spec"; + $wp = fopen($spec_file, "wb"); + if (!$wp) { + return $this->raiseError("could not write RPM spec file $spec_file: $php_errormsg"); + } + fwrite($wp, $spec_contents); + fclose($wp); + $this->ui->outputData("Wrote RPM spec file $spec_file", $command); + + return true; + } + + function doConvert($command, $options, $params) + { + $packagexml = isset($params[0]) ? $params[0] : 'package.xml'; + $newpackagexml = isset($params[1]) ? $params[1] : dirname($packagexml) . + DIRECTORY_SEPARATOR . 'package2.xml'; + $pkg = &$this->getPackageFile($this->config, $this->_debug); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $pf = $pkg->fromPackageFile($packagexml, PEAR_VALIDATE_NORMAL); + PEAR::staticPopErrorHandling(); + if (!PEAR::isError($pf)) { + if (is_a($pf, 'PEAR_PackageFile_v2')) { + $this->ui->outputData($packagexml . ' is already a package.xml version 2.0'); + return true; + } + $gen = &$pf->getDefaultGenerator(); + $newpf = &$gen->toV2(); + $newpf->setPackagefile($newpackagexml); + $gen = &$newpf->getDefaultGenerator(); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $state = (isset($options['flat']) ? PEAR_VALIDATE_PACKAGING : PEAR_VALIDATE_NORMAL); + $saved = $gen->toPackageFile(dirname($newpackagexml), $state, + basename($newpackagexml)); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($saved)) { + if (is_array($saved->getUserInfo())) { + foreach ($saved->getUserInfo() as $warning) { + $this->ui->outputData($warning['message']); + } + } + $this->ui->outputData($saved->getMessage()); + return true; + } + $this->ui->outputData('Wrote new version 2.0 package.xml to "' . $saved . '"'); + return true; + } else { + if (is_array($pf->getUserInfo())) { + foreach ($pf->getUserInfo() as $warning) { + $this->ui->outputData($warning['message']); + } + } + return $this->raiseError($pf); + } + } + + // }}} +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Package.xml b/campcaster/src/tools/pear/src/PEAR/Command/Package.xml new file mode 100644 index 000000000..e3f6a5537 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Package.xml @@ -0,0 +1,194 @@ + + + Build Package + doPackage + p + + + Z + Do not gzip the package file + + + n + Print the name of the packaged file. + + + [descfile] [descfile2] +Creates a PEAR package from its description file (usually called +package.xml). If a second packagefile is passed in, then +the packager will check to make sure that one is a package.xml +version 1.0, and the other is a package.xml version 2.0. The +package.xml version 1.0 will be saved as "package.xml" in the archive, +and the other as "package2.xml" in the archive" + + + + Validate Package Consistency + doPackageValidate + pv + + + + + + Run a "cvs diff" for all files in a package + doCvsDiff + cd + + + q + Be quiet + + + Q + Be really quiet + + + D + Diff against revision of DATE + DATE + + + R + Diff against tag for package release REL + REL + + + r + Diff against revision REV + REV + + + c + Generate context diff + + + u + Generate unified diff + + + i + Ignore case, consider upper- and lower-case letters equivalent + + + b + Ignore changes in amount of white space + + + B + Ignore changes that insert or delete blank lines + + + Report only whether the files differ, no details + + + n + Don't do anything, just pretend + + + <package.xml> +Compares all the files in a package. Without any options, this +command will compare the current code with the last checked-in code. +Using the -r or -R option you may compare the current code with that +of a specific release. + + + + Set CVS Release Tag + doCvsTag + ct + + + q + Be quiet + + + Q + Be really quiet + + + F + Move (slide) tag if it exists + + + d + Remove tag + + + n + Don't do anything, just pretend + + + <package.xml> +Sets a CVS tag on all files in a package. Use this command after you have +packaged a distribution tarball with the "package" command to tag what +revisions of what files were in that release. If need to fix something +after running cvstag once, but before the tarball is released to the public, +use the "slide" option to move the release tag. + + + + Show package dependencies + doPackageDependencies + pd + + +List all dependencies the package has. + + + Sign a package distribution file + doSign + si + + <package-file> +Signs a package distribution (.tar or .tgz) file with GnuPG. + + + Builds an RPM spec file from a PEAR package + doMakeRPM + rpm + + + t + FILE + Use FILE as RPM spec file template + + + p + FORMAT + Use FORMAT as format string for RPM package name, %s is replaced +by the PEAR package name, defaults to "PEAR::%s". + + + <package-file> + +Creates an RPM .spec file for wrapping a PEAR package inside an RPM +package. Intended to be used from the SPECS directory, with the PEAR +package tarball in the SOURCES directory: + +$ pear makerpm ../SOURCES/Net_Socket-1.0.tgz +Wrote RPM spec file PEAR::Net_Geo-1.0.spec +$ rpm -bb PEAR::Net_Socket-1.0.spec +... +Wrote: /usr/src/redhat/RPMS/i386/PEAR::Net_Socket-1.0-1.i386.rpm + + + + Convert a package.xml 1.0 to package.xml 2.0 format + doConvert + c2 + + + f + do not beautify the filelist. + + + [descfile] [descfile2] +Converts a package.xml in 1.0 format into a package.xml +in 2.0 format. The new file will be named package2.xml by default, +and package.xml will be used as the old file by default. +This is not the most intelligent conversion, and should only be +used for automated conversion or learning the format. + + + diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Pickle.php b/campcaster/src/tools/pear/src/PEAR/Command/Pickle.php new file mode 100644 index 000000000..7812779ef --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Pickle.php @@ -0,0 +1,376 @@ + + * @copyright 2005-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Pickle.php,v 1.5.2.1 2006/05/10 03:25:15 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for login/logout + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 2005-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.1 + */ + +class PEAR_Command_Pickle extends PEAR_Command_Common +{ + var $commands = array( + 'pickle' => array( + 'summary' => 'Build PECL Package', + 'function' => 'doPackage', + 'shortcut' => 'pi', + 'options' => array( + 'nocompress' => array( + 'shortopt' => 'Z', + 'doc' => 'Do not gzip the package file' + ), + 'showname' => array( + 'shortopt' => 'n', + 'doc' => 'Print the name of the packaged file.', + ), + ), + 'doc' => '[descfile] +Creates a PECL package from its package2.xml file. + +An automatic conversion will be made to a package.xml 1.0 and written out to +disk in the current directory as "package.xml". Note that +only simple package.xml 2.0 will be converted. package.xml 2.0 with: + + - dependency types other than required/optional PECL package/ext/php/pearinstaller + - more than one extsrcrelease + - extbinrelease, phprelease, or bundle release type + - dependency groups + - ignore tags in release filelist + - tasks other than replace + - custom roles + +will cause pickle to fail, and output an error message. If your package2.xml +uses any of these features, you are best off using PEAR_PackageFileManager to +generate both package.xml. +' + ), + ); + + /** + * PEAR_Command_Package constructor. + * + * @access public + */ + function PEAR_Command_Pickle(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + + /** + * For unit-testing ease + * + * @return PEAR_Packager + */ + function &getPackager() + { + if (!class_exists('PEAR_Packager')) { + require_once 'PEAR/Packager.php'; + } + $a = &new PEAR_Packager; + return $a; + } + + /** + * For unit-testing ease + * + * @param PEAR_Config $config + * @param bool $debug + * @param string|null $tmpdir + * @return PEAR_PackageFile + */ + function &getPackageFile($config, $debug = false, $tmpdir = null) + { + if (!class_exists('PEAR_Common')) { + require_once 'PEAR/Common.php'; + } + if (!class_exists('PEAR/PackageFile.php')) { + require_once 'PEAR/PackageFile.php'; + } + $a = &new PEAR_PackageFile($config, $debug, $tmpdir); + $common = new PEAR_Common; + $common->ui = $this->ui; + $a->setLogger($common); + return $a; + } + + function doPackage($command, $options, $params) + { + $this->output = ''; + $pkginfofile = isset($params[0]) ? $params[0] : 'package2.xml'; + $packager = &$this->getPackager(); + if (PEAR::isError($err = $this->_convertPackage($pkginfofile))) { + return $err; + } + $compress = empty($options['nocompress']) ? true : false; + $result = $packager->package($pkginfofile, $compress, 'package.xml'); + if (PEAR::isError($result)) { + return $this->raiseError($result); + } + // Don't want output, only the package file name just created + if (isset($options['showname'])) { + $this->ui->outputData($result, $command); + } + return true; + } + + function _convertPackage($packagexml) + { + $pkg = &$this->getPackageFile($this->config); + $pf2 = &$pkg->fromPackageFile($packagexml, PEAR_VALIDATE_NORMAL); + if (!is_a($pf2, 'PEAR_PackageFile_v2')) { + return $this->raiseError('Cannot process "' . + $packagexml . '", is not a package.xml 2.0'); + } + require_once 'PEAR/PackageFile/v1.php'; + $pf = new PEAR_PackageFile_v1; + $pf->setConfig($this->config); + if ($pf2->getPackageType() != 'extsrc') { + return $this->raiseError('Cannot safely convert "' . $packagexml . + '", is not an extension source package. Using a PEAR_PackageFileManager-based ' . + 'script is an option'); + } + if (is_array($pf2->getUsesRole())) { + return $this->raiseError('Cannot safely convert "' . $packagexml . + '", contains custom roles. Using a PEAR_PackageFileManager-based script or ' . + 'the convert command is an option'); + } + if (is_array($pf2->getUsesTask())) { + return $this->raiseError('Cannot safely convert "' . $packagexml . + '", contains custom tasks. Using a PEAR_PackageFileManager-based script or ' . + 'the convert command is an option'); + } + $deps = $pf2->getDependencies(); + if (isset($deps['group'])) { + return $this->raiseError('Cannot safely convert "' . $packagexml . + '", contains dependency groups. Using a PEAR_PackageFileManager-based script ' . + 'or the convert command is an option'); + } + if (isset($deps['required']['subpackage']) || + isset($deps['optional']['subpackage'])) { + return $this->raiseError('Cannot safely convert "' . $packagexml . + '", contains subpackage dependencies. Using a PEAR_PackageFileManager-based '. + 'script is an option'); + } + if (isset($deps['required']['os'])) { + return $this->raiseError('Cannot safely convert "' . $packagexml . + '", contains os dependencies. Using a PEAR_PackageFileManager-based '. + 'script is an option'); + } + if (isset($deps['required']['arch'])) { + return $this->raiseError('Cannot safely convert "' . $packagexml . + '", contains arch dependencies. Using a PEAR_PackageFileManager-based '. + 'script is an option'); + } + $pf->setPackage($pf2->getPackage()); + $pf->setSummary($pf2->getSummary()); + $pf->setDescription($pf2->getDescription()); + foreach ($pf2->getMaintainers() as $maintainer) { + $pf->addMaintainer($maintainer['role'], $maintainer['handle'], + $maintainer['name'], $maintainer['email']); + } + $pf->setVersion($pf2->getVersion()); + $pf->setDate($pf2->getDate()); + $pf->setLicense($pf2->getLicense()); + $pf->setState($pf2->getState()); + $pf->setNotes($pf2->getNotes()); + $pf->addPhpDep($deps['required']['php']['min'], 'ge'); + if (isset($deps['required']['php']['max'])) { + $pf->addPhpDep($deps['required']['php']['max'], 'le'); + } + if (isset($deps['required']['package'])) { + if (!isset($deps['required']['package'][0])) { + $deps['required']['package'] = array($deps['required']['package']); + } + foreach ($deps['required']['package'] as $dep) { + if (!isset($dep['channel'])) { + return $this->raiseError('Cannot safely convert "' . $packagexml . '"' . + ' contains uri-based dependency on a package. Using a ' . + 'PEAR_PackageFileManager-based script is an option'); + } + if ($dep['channel'] != 'pear.php.net' && $dep['channel'] != 'pecl.php.net') { + return $this->raiseError('Cannot safely convert "' . $packagexml . '"' . + ' contains dependency on a non-standard channel package. Using a ' . + 'PEAR_PackageFileManager-based script is an option'); + } + if (isset($dep['conflicts'])) { + return $this->raiseError('Cannot safely convert "' . $packagexml . '"' . + ' contains conflicts dependency. Using a ' . + 'PEAR_PackageFileManager-based script is an option'); + } + if (isset($dep['exclude'])) { + $this->ui->outputData('WARNING: exclude tags are ignored in conversion'); + } + if (isset($dep['min'])) { + $pf->addPackageDep($dep['name'], $dep['min'], 'ge'); + } + if (isset($dep['max'])) { + $pf->addPackageDep($dep['name'], $dep['max'], 'le'); + } + } + } + if (isset($deps['required']['extension'])) { + if (!isset($deps['required']['extension'][0])) { + $deps['required']['extension'] = array($deps['required']['extension']); + } + foreach ($deps['required']['extension'] as $dep) { + if (isset($dep['conflicts'])) { + return $this->raiseError('Cannot safely convert "' . $packagexml . '"' . + ' contains conflicts dependency. Using a ' . + 'PEAR_PackageFileManager-based script is an option'); + } + if (isset($dep['exclude'])) { + $this->ui->outputData('WARNING: exclude tags are ignored in conversion'); + } + if (isset($dep['min'])) { + $pf->addExtensionDep($dep['name'], $dep['min'], 'ge'); + } + if (isset($dep['max'])) { + $pf->addExtensionDep($dep['name'], $dep['max'], 'le'); + } + } + } + if (isset($deps['optional']['package'])) { + if (!isset($deps['optional']['package'][0])) { + $deps['optional']['package'] = array($deps['optional']['package']); + } + foreach ($deps['optional']['package'] as $dep) { + if (!isset($dep['channel'])) { + return $this->raiseError('Cannot safely convert "' . $packagexml . '"' . + ' contains uri-based dependency on a package. Using a ' . + 'PEAR_PackageFileManager-based script is an option'); + } + if ($dep['channel'] != 'pear.php.net' && $dep['channel'] != 'pecl.php.net') { + return $this->raiseError('Cannot safely convert "' . $packagexml . '"' . + ' contains dependency on a non-standard channel package. Using a ' . + 'PEAR_PackageFileManager-based script is an option'); + } + if (isset($dep['exclude'])) { + $this->ui->outputData('WARNING: exclude tags are ignored in conversion'); + } + if (isset($dep['min'])) { + $pf->addPackageDep($dep['name'], $dep['min'], 'ge', 'yes'); + } + if (isset($dep['max'])) { + $pf->addPackageDep($dep['name'], $dep['max'], 'le', 'yes'); + } + } + } + if (isset($deps['optional']['extension'])) { + if (!isset($deps['optional']['extension'][0])) { + $deps['optional']['extension'] = array($deps['optional']['extension']); + } + foreach ($deps['optional']['extension'] as $dep) { + if (isset($dep['exclude'])) { + $this->ui->outputData('WARNING: exclude tags are ignored in conversion'); + } + if (isset($dep['min'])) { + $pf->addExtensionDep($dep['name'], $dep['min'], 'ge', 'yes'); + } + if (isset($dep['max'])) { + $pf->addExtensionDep($dep['name'], $dep['max'], 'le', 'yes'); + } + } + } + $contents = $pf2->getContents(); + $release = $pf2->getReleases(); + if (isset($releases[0])) { + return $this->raiseError('Cannot safely process "' . $packagexml . '" contains ' + . 'multiple extsrcrelease tags. Using a PEAR_PackageFileManager-based script ' . + 'or the convert command is an option'); + } + if ($configoptions = $pf2->getConfigureOptions()) { + foreach ($configoptions as $option) { + $pf->addConfigureOption($option['name'], $option['prompt'], + isset($option['default']) ? $option['default'] : false); + } + } + if (isset($release['filelist']['ignore'])) { + return $this->raiseError('Cannot safely process "' . $packagexml . '" contains ' + . 'ignore tags. Using a PEAR_PackageFileManager-based script or the convert' . + ' command is an option'); + } + if (isset($release['filelist']['install']) && + !isset($release['filelist']['install'][0])) { + $release['filelist']['install'] = array($release['filelist']['install']); + } + if (isset($contents['dir']['attribs']['baseinstalldir'])) { + $baseinstalldir = $contents['dir']['attribs']['baseinstalldir']; + } else { + $baseinstalldir = false; + } + if (!isset($contents['dir']['file'][0])) { + $contents['dir']['file'] = array($contents['dir']['file']); + } + foreach ($contents['dir']['file'] as $file) { + if ($baseinstalldir && !isset($file['attribs']['baseinstalldir'])) { + $file['attribs']['baseinstalldir'] = $baseinstalldir; + } + $processFile = $file; + unset($processFile['attribs']); + if (count($processFile)) { + foreach ($processFile as $name => $task) { + if ($name != $pf2->getTasksNs() . ':replace') { + return $this->raiseError('Cannot safely process "' . $packagexml . + '" contains tasks other than replace. Using a ' . + 'PEAR_PackageFileManager-based script is an option.'); + } + $file['attribs']['replace'][] = $task; + } + } + if (!in_array($file['attribs']['role'], PEAR_Common::getFileRoles())) { + return $this->raiseError('Cannot safely convert "' . $packagexml . + '", contains custom roles. Using a PEAR_PackageFileManager-based script ' . + 'or the convert command is an option'); + } + if (isset($release['filelist']['install'])) { + foreach ($release['filelist']['install'] as $installas) { + if ($installas['attribs']['name'] == $file['attribs']['name']) { + $file['attribs']['install-as'] = $installas['attribs']['as']; + } + } + } + $pf->addFile('/', $file['attribs']['name'], $file['attribs']); + } + if ($pf2->getChangeLog()) { + $this->ui->outputData('WARNING: changelog is not translated to package.xml ' . + '1.0, use PEAR_PackageFileManager-based script if you need changelog-' . + 'translation for package.xml 1.0'); + } + $gen = &$pf->getDefaultGenerator(); + $gen->toPackageFile('.'); + } +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Pickle.xml b/campcaster/src/tools/pear/src/PEAR/Command/Pickle.xml new file mode 100644 index 000000000..550186fd0 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Pickle.xml @@ -0,0 +1,40 @@ + + + Build PECL Package + doPackage + pi + + + Z + Do not gzip the package file + + + n + Print the name of the packaged file. + + + [descfile] [descfile2] +Creates a PECL package from its description file (usually called +package.xml). If a second packagefile is passed in, then +the packager will check to make sure that one is a package.xml +version 1.0, and the other is a package.xml version 2.0. The +package.xml version 1.0 will be saved as "package.xml" in the archive, +and the other as "package2.xml" in the archive" + +If no second file is passed in, and [descfile] is a package.xml 2.0, +an automatic conversion will be made to a package.xml 1.0. Note that +only simple package.xml 2.0 will be converted. package.xml 2.0 with: + + - dependency types other than required/optional PECL package/ext/php/pearinstaller + - more than one extsrcrelease + - extbinrelease, phprelease, or bundle release type + - dependency groups + - ignore tags in release filelist + - tasks other than replace + - custom roles + +will cause pickle to fail, and output an error message. If your package2.xml +uses any of these features, you are best off using PEAR_PackageFileManager to +generate both package.xml. + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Registry.php b/campcaster/src/tools/pear/src/PEAR/Command/Registry.php new file mode 100644 index 000000000..3e2f232d9 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Registry.php @@ -0,0 +1,997 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Registry.php,v 1.70 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for registry manipulation + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Command_Registry extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'list' => array( + 'summary' => 'List Installed Packages In The Default Channel', + 'function' => 'doList', + 'shortcut' => 'l', + 'options' => array( + 'channel' => array( + 'shortopt' => 'c', + 'doc' => 'list installed packages from this channel', + 'arg' => 'CHAN', + ), + 'allchannels' => array( + 'shortopt' => 'a', + 'doc' => 'list installed packages from all channels', + ), + ), + 'doc' => ' +If invoked without parameters, this command lists the PEAR packages +installed in your php_dir ({config php_dir}). With a parameter, it +lists the files in a package. +', + ), + 'list-files' => array( + 'summary' => 'List Files In Installed Package', + 'function' => 'doFileList', + 'shortcut' => 'fl', + 'options' => array(), + 'doc' => ' +List the files in an installed package. +' + ), + 'shell-test' => array( + 'summary' => 'Shell Script Test', + 'function' => 'doShellTest', + 'shortcut' => 'st', + 'options' => array(), + 'doc' => ' [[relation] version] +Tests if a package is installed in the system. Will exit(1) if it is not. + The version comparison operator. One of: + <, lt, <=, le, >, gt, >=, ge, ==, =, eq, !=, <>, ne + The version to compare with +'), + 'info' => array( + 'summary' => 'Display information about a package', + 'function' => 'doInfo', + 'shortcut' => 'in', + 'options' => array(), + 'doc' => ' +Displays information about a package. The package argument may be a +local package file, an URL to a package file, or the name of an +installed package.' + ) + ); + + // }}} + // {{{ constructor + + /** + * PEAR_Command_Registry constructor. + * + * @access public + */ + function PEAR_Command_Registry(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + // {{{ doList() + + function _sortinfo($a, $b) + { + $apackage = isset($a['package']) ? $a['package'] : $a['name']; + $bpackage = isset($b['package']) ? $b['package'] : $b['name']; + return strcmp($apackage, $bpackage); + } + + function doList($command, $options, $params) + { + if (isset($options['allchannels'])) { + return $this->doListAll($command, array(), $params); + } + $reg = &$this->config->getRegistry(); + if (count($params) == 1) { + return $this->doFileList($command, $options, $params); + } + if (isset($options['channel'])) { + if ($reg->channelExists($options['channel'])) { + $channel = $reg->channelName($options['channel']); + } else { + return $this->raiseError('Channel "' . $options['channel'] .'" does not exist'); + } + } else { + $channel = $this->config->get('default_channel'); + } + $installed = $reg->packageInfo(null, null, $channel); + usort($installed, array(&$this, '_sortinfo')); + $i = $j = 0; + $data = array( + 'caption' => 'Installed packages, channel ' . + $channel . ':', + 'border' => true, + 'headline' => array('Package', 'Version', 'State') + ); + foreach ($installed as $package) { + $pobj = $reg->getPackage(isset($package['package']) ? + $package['package'] : $package['name'], $channel); + $data['data'][] = array($pobj->getPackage(), $pobj->getVersion(), + $pobj->getState() ? $pobj->getState() : null); + } + if (count($installed)==0) { + $data = '(no packages installed from channel ' . $channel . ')'; + } + $this->ui->outputData($data, $command); + return true; + } + + function doListAll($command, $options, $params) + { + $reg = &$this->config->getRegistry(); + $installed = $reg->packageInfo(null, null, null); + foreach ($installed as $channel => $packages) { + usort($packages, array($this, '_sortinfo')); + $i = $j = 0; + $data = array( + 'caption' => 'Installed packages, channel ' . $channel . ':', + 'border' => true, + 'headline' => array('Package', 'Version', 'State') + ); + foreach ($packages as $package) { + $pobj = $reg->getPackage(isset($package['package']) ? + $package['package'] : $package['name'], $channel); + $data['data'][] = array($pobj->getPackage(), $pobj->getVersion(), + $pobj->getState() ? $pobj->getState() : null); + } + if (count($packages)==0) { + $data = array( + 'caption' => 'Installed packages, channel ' . $channel . ':', + 'border' => true, + 'data' => array(array('(no packages installed)')), + ); + } + $this->ui->outputData($data, $command); + } + return true; + } + + function doFileList($command, $options, $params) + { + if (count($params) != 1) { + return $this->raiseError('list-files expects 1 parameter'); + } + $reg = &$this->config->getRegistry(); + if (!is_dir($params[0]) && (file_exists($params[0]) || $fp = @fopen($params[0], + 'r'))) { + @fclose($fp); + if (!class_exists('PEAR_PackageFile')) { + require_once 'PEAR/PackageFile.php'; + } + $pkg = &new PEAR_PackageFile($this->config, $this->_debug); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $info = &$pkg->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL); + PEAR::staticPopErrorHandling(); + $headings = array('Package File', 'Install Path'); + $installed = false; + } else { + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $parsed = $reg->parsePackageName($params[0], $this->config->get('default_channel')); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($parsed)) { + return $this->raiseError($parsed); + } + $info = &$reg->getPackage($parsed['package'], $parsed['channel']); + $headings = array('Type', 'Install Path'); + $installed = true; + } + if (PEAR::isError($info)) { + return $this->raiseError($info); + } + if ($info === null) { + return $this->raiseError("`$params[0]' not installed"); + } + $list = ($info->getPackagexmlVersion() == '1.0' || $installed) ? + $info->getFilelist() : $info->getContents(); + if ($installed) { + $caption = 'Installed Files For ' . $params[0]; + } else { + $caption = 'Contents of ' . basename($params[0]); + } + $data = array( + 'caption' => $caption, + 'border' => true, + 'headline' => $headings); + if ($info->getPackagexmlVersion() == '1.0' || $installed) { + foreach ($list as $file => $att) { + if ($installed) { + if (empty($att['installed_as'])) { + continue; + } + $data['data'][] = array($att['role'], $att['installed_as']); + } else { + if (isset($att['baseinstalldir']) && !in_array($att['role'], + array('test', 'data', 'doc'))) { + $dest = $att['baseinstalldir'] . DIRECTORY_SEPARATOR . + $file; + } else { + $dest = $file; + } + switch ($att['role']) { + case 'test': + case 'data': + case 'doc': + $role = $att['role']; + if ($role == 'test') { + $role .= 's'; + } + $dest = $this->config->get($role . '_dir') . DIRECTORY_SEPARATOR . + $info->getPackage() . DIRECTORY_SEPARATOR . $dest; + break; + case 'php': + default: + $dest = $this->config->get('php_dir') . DIRECTORY_SEPARATOR . + $dest; + } + $ds2 = DIRECTORY_SEPARATOR . DIRECTORY_SEPARATOR; + $dest = preg_replace(array('!\\\\+!', '!/!', "!$ds2+!"), + array(DIRECTORY_SEPARATOR, + DIRECTORY_SEPARATOR, + DIRECTORY_SEPARATOR), + $dest); + $file = preg_replace('!/+!', '/', $file); + $data['data'][] = array($file, $dest); + } + } + } else { // package.xml 2.0, not installed + if (!isset($list['dir']['file'][0])) { + $list['dir']['file'] = array($list['dir']['file']); + } + foreach ($list['dir']['file'] as $att) { + $att = $att['attribs']; + $file = $att['name']; + $role = &PEAR_Installer_Role::factory($info, $att['role'], $this->config); + $role->setup($this, $info, $att, $file); + if (!$role->isInstallable()) { + $dest = '(not installable)'; + } else { + $dest = $role->processInstallation($info, $att, $file, ''); + if (PEAR::isError($dest)) { + $dest = '(Unknown role "' . $att['role'] . ')'; + } else { + list(,, $dest) = $dest; + } + } + $data['data'][] = array($file, $dest); + } + } + $this->ui->outputData($data, $command); + return true; + } + + // }}} + // {{{ doShellTest() + + function doShellTest($command, $options, $params) + { + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $reg = &$this->config->getRegistry(); + $info = $reg->parsePackageName($params[0], $this->config->get('default_channel')); + if (PEAR::isError($info)) { + exit(1); // invalid package name + } + $package = $info['package']; + $channel = $info['channel']; + // "pear shell-test Foo" + if (!$reg->packageExists($package, $channel)) { + if ($channel == 'pecl.php.net') { + if ($reg->packageExists($package, 'pear.php.net')) { + $channel = 'pear.php.net'; // magically change channels for extensions + } + } + } + if (sizeof($params) == 1) { + if (!$reg->packageExists($package, $channel)) { + exit(1); + } + // "pear shell-test Foo 1.0" + } elseif (sizeof($params) == 2) { + $v = $reg->packageInfo($package, 'version', $channel); + if (!$v || !version_compare("$v", "{$params[1]}", "ge")) { + exit(1); + } + // "pear shell-test Foo ge 1.0" + } elseif (sizeof($params) == 3) { + $v = $reg->packageInfo($package, 'version', $channel); + if (!$v || !version_compare("$v", "{$params[2]}", $params[1])) { + exit(1); + } + } else { + $this->popErrorHandling(); + $this->raiseError("$command: expects 1 to 3 parameters"); + exit(1); + } + } + + // }}} + // {{{ doInfo + + function doInfo($command, $options, $params) + { + if (count($params) != 1) { + return $this->raiseError('pear info expects 1 parameter'); + } + $info = false; + $reg = &$this->config->getRegistry(); + if ((@is_file($params[0]) && !is_dir($params[0])) || $fp = @fopen($params[0], 'r')) { + @fclose($fp); + if (!class_exists('PEAR_PackageFile')) { + require_once 'PEAR/PackageFile.php'; + } + $pkg = &new PEAR_PackageFile($this->config, $this->_debug); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $obj = &$pkg->fromAnyFile($params[0], PEAR_VALIDATE_NORMAL); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($obj)) { + $uinfo = $obj->getUserInfo(); + if (is_array($uinfo)) { + foreach ($uinfo as $message) { + if (is_array($message)) { + $message = $message['message']; + } + $this->ui->outputData($message); + } + } + return $this->raiseError($obj); + } + if ($obj->getPackagexmlVersion() == '1.0') { + $info = $obj->toArray(); + } else { + return $this->_doInfo2($command, $options, $params, $obj, false); + } + } else { + $parsed = $reg->parsePackageName($params[0], $this->config->get('default_channel')); + if (PEAR::isError($parsed)) { + return $this->raiseError($parsed); + } + $package = $parsed['package']; + $channel = $parsed['channel']; + $info = $reg->packageInfo($package, null, $channel); + if (isset($info['old'])) { + $obj = $reg->getPackage($package, $channel); + return $this->_doInfo2($command, $options, $params, $obj, true); + } + } + if (PEAR::isError($info)) { + return $info; + } + if (empty($info)) { + $this->raiseError("No information found for `$params[0]'"); + return; + } + unset($info['filelist']); + unset($info['dirtree']); + unset($info['changelog']); + if (isset($info['xsdversion'])) { + $info['package.xml version'] = $info['xsdversion']; + unset($info['xsdversion']); + } + if (isset($info['packagerversion'])) { + $info['packaged with PEAR version'] = $info['packagerversion']; + unset($info['packagerversion']); + } + $keys = array_keys($info); + $longtext = array('description', 'summary'); + foreach ($keys as $key) { + if (is_array($info[$key])) { + switch ($key) { + case 'maintainers': { + $i = 0; + $mstr = ''; + foreach ($info[$key] as $m) { + if ($i++ > 0) { + $mstr .= "\n"; + } + $mstr .= $m['name'] . " <"; + if (isset($m['email'])) { + $mstr .= $m['email']; + } else { + $mstr .= $m['handle'] . '@php.net'; + } + $mstr .= "> ($m[role])"; + } + $info[$key] = $mstr; + break; + } + case 'release_deps': { + $i = 0; + $dstr = ''; + foreach ($info[$key] as $d) { + if (isset($this->_deps_rel_trans[$d['rel']])) { + $rel = $this->_deps_rel_trans[$d['rel']]; + } else { + $rel = $d['rel']; + } + if (isset($this->_deps_type_trans[$d['type']])) { + $type = ucfirst($this->_deps_type_trans[$d['type']]); + } else { + $type = $d['type']; + } + if (isset($d['name'])) { + $name = $d['name'] . ' '; + } else { + $name = ''; + } + if (isset($d['version'])) { + $version = $d['version'] . ' '; + } else { + $version = ''; + } + if (isset($d['optional']) && $d['optional'] == 'yes') { + $optional = ' (optional)'; + } else { + $optional = ''; + } + $dstr .= "$type $name$rel $version$optional\n"; + } + $info[$key] = $dstr; + break; + } + case 'provides' : { + $debug = $this->config->get('verbose'); + if ($debug < 2) { + $pstr = 'Classes: '; + } else { + $pstr = ''; + } + $i = 0; + foreach ($info[$key] as $p) { + if ($debug < 2 && $p['type'] != "class") { + continue; + } + // Only print classes when verbosity mode is < 2 + if ($debug < 2) { + if ($i++ > 0) { + $pstr .= ", "; + } + $pstr .= $p['name']; + } else { + if ($i++ > 0) { + $pstr .= "\n"; + } + $pstr .= ucfirst($p['type']) . " " . $p['name']; + if (isset($p['explicit']) && $p['explicit'] == 1) { + $pstr .= " (explicit)"; + } + } + } + $info[$key] = $pstr; + break; + } + case 'configure_options' : { + foreach ($info[$key] as $i => $p) { + $info[$key][$i] = array_map(null, array_keys($p), array_values($p)); + $info[$key][$i] = array_map(create_function('$a', + 'return join(" = ",$a);'), $info[$key][$i]); + $info[$key][$i] = implode(', ', $info[$key][$i]); + } + $info[$key] = implode("\n", $info[$key]); + break; + } + default: { + $info[$key] = implode(", ", $info[$key]); + break; + } + } + } + if ($key == '_lastmodified') { + $hdate = date('Y-m-d', $info[$key]); + unset($info[$key]); + $info['Last Modified'] = $hdate; + } elseif ($key == '_lastversion') { + $info['Last Installed Version'] = $info[$key] ? $info[$key] : '- None -'; + unset($info[$key]); + } else { + $info[$key] = trim($info[$key]); + if (in_array($key, $longtext)) { + $info[$key] = preg_replace('/ +/', ' ', $info[$key]); + } + } + } + $caption = 'About ' . $info['package'] . '-' . $info['version']; + $data = array( + 'caption' => $caption, + 'border' => true); + foreach ($info as $key => $value) { + $key = ucwords(trim(str_replace('_', ' ', $key))); + $data['data'][] = array($key, $value); + } + $data['raw'] = $info; + + $this->ui->outputData($data, 'package-info'); + } + + // }}} + + /** + * @access private + */ + function _doInfo2($command, $options, $params, &$obj, $installed) + { + $reg = &$this->config->getRegistry(); + $caption = 'About ' . $obj->getChannel() . '/' .$obj->getPackage() . '-' . + $obj->getVersion(); + $data = array( + 'caption' => $caption, + 'border' => true); + switch ($obj->getPackageType()) { + case 'php' : + $release = 'PEAR-style PHP-based Package'; + break; + case 'extsrc' : + $release = 'PECL-style PHP extension (source code)'; + break; + case 'extbin' : + $release = 'PECL-style PHP extension (binary)'; + break; + case 'bundle' : + $release = 'Package bundle (collection of packages)'; + break; + } + $extends = $obj->getExtends(); + $extends = $extends ? + $obj->getPackage() . ' (extends ' . $extends . ')' : $obj->getPackage(); + if ($src = $obj->getSourcePackage()) { + $extends .= ' (source package ' . $src['channel'] . '/' . $src['package'] . ')'; + } + $info = array( + 'Release Type' => $release, + 'Name' => $extends, + 'Channel' => $obj->getChannel(), + 'Summary' => preg_replace('/ +/', ' ', $obj->getSummary()), + 'Description' => preg_replace('/ +/', ' ', $obj->getDescription()), + ); + $info['Maintainers'] = ''; + foreach (array('lead', 'developer', 'contributor', 'helper') as $role) { + $leads = $obj->{"get{$role}s"}(); + if (!$leads) { + continue; + } + if (isset($leads['active'])) { + $leads = array($leads); + } + foreach ($leads as $lead) { + if (!empty($info['Maintainers'])) { + $info['Maintainers'] .= "\n"; + } + $info['Maintainers'] .= $lead['name'] . ' <'; + $info['Maintainers'] .= $lead['email'] . "> ($role)"; + } + } + $info['Release Date'] = $obj->getDate(); + if ($time = $obj->getTime()) { + $info['Release Date'] .= ' ' . $time; + } + $info['Release Version'] = $obj->getVersion() . ' (' . $obj->getState() . ')'; + $info['API Version'] = $obj->getVersion('api') . ' (' . $obj->getState('api') . ')'; + $info['License'] = $obj->getLicense(); + $uri = $obj->getLicenseLocation(); + if ($uri) { + if (isset($uri['uri'])) { + $info['License'] .= ' (' . $uri['uri'] . ')'; + } else { + $extra = $obj->getInstalledLocation($info['filesource']); + if ($extra) { + $info['License'] .= ' (' . $uri['filesource'] . ')'; + } + } + } + $info['Release Notes'] = $obj->getNotes(); + if ($compat = $obj->getCompatible()) { + $info['Compatible with'] = ''; + foreach ($compat as $package) { + $info['Compatible with'] .= $package['channel'] . '/' . $package['package'] . + "\nVersions >= " . $package['min'] . ', <= ' . $package['max']; + if (isset($package['exclude'])) { + if (is_array($package['exclude'])) { + $package['exclude'] = implode(', ', $package['exclude']); + } + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + $info['Not Compatible with'] .= $package['channel'] . '/' . + $package['package'] . "\nVersions " . $package['exclude']; + } + } + } + $usesrole = $obj->getUsesrole(); + if ($usesrole) { + if (!isset($usesrole[0])) { + $usesrole = array($usesrole); + } + foreach ($usesrole as $roledata) { + if (isset($info['Uses Custom Roles'])) { + $info['Uses Custom Roles'] .= "\n"; + } else { + $info['Uses Custom Roles'] = ''; + } + if (isset($roledata['package'])) { + $rolepackage = $reg->parsedPackageNameToString($roledata, true); + } else { + $rolepackage = $roledata['uri']; + } + $info['Uses Custom Roles'] .= $roledata['role'] . ' (' . $rolepackage . ')'; + } + } + $usestask = $obj->getUsestask(); + if ($usestask) { + if (!isset($usestask[0])) { + $usestask = array($usestask); + } + foreach ($usestask as $taskdata) { + if (isset($info['Uses Custom Tasks'])) { + $info['Uses Custom Tasks'] .= "\n"; + } else { + $info['Uses Custom Tasks'] = ''; + } + if (isset($taskdata['package'])) { + $taskpackage = $reg->parsedPackageNameToString($taskdata, true); + } else { + $taskpackage = $taskdata['uri']; + } + $info['Uses Custom Tasks'] .= $taskdata['task'] . ' (' . $taskpackage . ')'; + } + } + $deps = $obj->getDependencies(); + $info['Required Dependencies'] = 'PHP version ' . $deps['required']['php']['min']; + if (isset($deps['required']['php']['max'])) { + $info['Required Dependencies'] .= '-' . $deps['required']['php']['max'] . "\n"; + } else { + $info['Required Dependencies'] .= "\n"; + } + if (isset($deps['required']['php']['exclude'])) { + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + if (is_array($deps['required']['php']['exclude'])) { + $deps['required']['php']['exclude'] = + implode(', ', $deps['required']['php']['exclude']); + } + $info['Not Compatible with'] .= "PHP versions\n " . + $deps['required']['php']['exclude']; + } + $info['Required Dependencies'] .= 'PEAR installer version'; + if (isset($deps['required']['pearinstaller']['max'])) { + $info['Required Dependencies'] .= 's ' . + $deps['required']['pearinstaller']['min'] . '-' . + $deps['required']['pearinstaller']['max']; + } else { + $info['Required Dependencies'] .= ' ' . + $deps['required']['pearinstaller']['min'] . ' or newer'; + } + if (isset($deps['required']['pearinstaller']['exclude'])) { + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + if (is_array($deps['required']['pearinstaller']['exclude'])) { + $deps['required']['pearinstaller']['exclude'] = + implode(', ', $deps['required']['pearinstaller']['exclude']); + } + $info['Not Compatible with'] .= "PEAR installer\n Versions " . + $deps['required']['pearinstaller']['exclude']; + } + foreach (array('Package', 'Extension') as $type) { + $index = strtolower($type); + if (isset($deps['required'][$index])) { + if (isset($deps['required'][$index]['name'])) { + $deps['required'][$index] = array($deps['required'][$index]); + } + foreach ($deps['required'][$index] as $package) { + if (isset($package['conflicts'])) { + $infoindex = 'Not Compatible with'; + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + } else { + $infoindex = 'Required Dependencies'; + $info[$infoindex] .= "\n"; + } + if ($index == 'extension') { + $name = $package['name']; + } else { + if (isset($package['channel'])) { + $name = $package['channel'] . '/' . $package['name']; + } else { + $name = '__uri/' . $package['name'] . ' (static URI)'; + } + } + $info[$infoindex] .= "$type $name"; + if (isset($package['uri'])) { + $info[$infoindex] .= "\n Download URI: $package[uri]"; + continue; + } + if (isset($package['max']) && isset($package['min'])) { + $info[$infoindex] .= " \n Versions " . + $package['min'] . '-' . $package['max']; + } elseif (isset($package['min'])) { + $info[$infoindex] .= " \n Version " . + $package['min'] . ' or newer'; + } elseif (isset($package['max'])) { + $info[$infoindex] .= " \n Version " . + $package['max'] . ' or older'; + } + if (isset($package['recommended'])) { + $info[$infoindex] .= "\n Recommended version: $package[recommended]"; + } + if (isset($package['exclude'])) { + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + if (is_array($package['exclude'])) { + $package['exclude'] = implode(', ', $package['exclude']); + } + $package['package'] = $package['name']; // for parsedPackageNameToString + if (isset($package['conflicts'])) { + $info['Not Compatible with'] .= '=> except '; + } + $info['Not Compatible with'] .= 'Package ' . + $reg->parsedPackageNameToString($package, true); + $info['Not Compatible with'] .= "\n Versions " . $package['exclude']; + } + } + } + } + if (isset($deps['required']['os'])) { + if (isset($deps['required']['os']['name'])) { + $dep['required']['os']['name'] = array($dep['required']['os']['name']); + } + foreach ($dep['required']['os'] as $os) { + if (isset($os['conflicts']) && $os['conflicts'] == 'yes') { + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + $info['Not Compatible with'] .= "$os[name] Operating System"; + } else { + $info['Required Dependencies'] .= "\n"; + $info['Required Dependencies'] .= "$os[name] Operating System"; + } + } + } + if (isset($deps['required']['arch'])) { + if (isset($deps['required']['arch']['pattern'])) { + $dep['required']['arch']['pattern'] = array($dep['required']['os']['pattern']); + } + foreach ($dep['required']['arch'] as $os) { + if (isset($os['conflicts']) && $os['conflicts'] == 'yes') { + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + $info['Not Compatible with'] .= "OS/Arch matching pattern '/$os[pattern]/'"; + } else { + $info['Required Dependencies'] .= "\n"; + $info['Required Dependencies'] .= "OS/Arch matching pattern '/$os[pattern]/'"; + } + } + } + if (isset($deps['optional'])) { + foreach (array('Package', 'Extension') as $type) { + $index = strtolower($type); + if (isset($deps['optional'][$index])) { + if (isset($deps['optional'][$index]['name'])) { + $deps['optional'][$index] = array($deps['optional'][$index]); + } + foreach ($deps['optional'][$index] as $package) { + if (isset($package['conflicts']) && $package['conflicts'] == 'yes') { + $infoindex = 'Not Compatible with'; + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + } else { + $infoindex = 'Optional Dependencies'; + if (!isset($info['Optional Dependencies'])) { + $info['Optional Dependencies'] = ''; + } else { + $info['Optional Dependencies'] .= "\n"; + } + } + if ($index == 'extension') { + $name = $package['name']; + } else { + if (isset($package['channel'])) { + $name = $package['channel'] . '/' . $package['name']; + } else { + $name = '__uri/' . $package['name'] . ' (static URI)'; + } + } + $info[$infoindex] .= "$type $name"; + if (isset($package['uri'])) { + $info[$infoindex] .= "\n Download URI: $package[uri]"; + continue; + } + if ($infoindex == 'Not Compatible with') { + // conflicts is only used to say that all versions conflict + continue; + } + if (isset($package['max']) && isset($package['min'])) { + $info[$infoindex] .= " \n Versions " . + $package['min'] . '-' . $package['max']; + } elseif (isset($package['min'])) { + $info[$infoindex] .= " \n Version " . + $package['min'] . ' or newer'; + } elseif (isset($package['max'])) { + $info[$infoindex] .= " \n Version " . + $package['min'] . ' or older'; + } + if (isset($package['recommended'])) { + $info[$infoindex] .= "\n Recommended version: $package[recommended]"; + } + if (isset($package['exclude'])) { + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info['Not Compatible with'] .= "\n"; + } + if (is_array($package['exclude'])) { + $package['exclude'] = implode(', ', $package['exclude']); + } + $info['Not Compatible with'] .= "Package $package\n Versions " . + $package['exclude']; + } + } + } + } + } + if (isset($deps['group'])) { + if (!isset($deps['group'][0])) { + $deps['group'] = array($deps['group']); + } + foreach ($deps['group'] as $group) { + $info['Dependency Group ' . $group['attribs']['name']] = $group['attribs']['hint']; + $groupindex = $group['attribs']['name'] . ' Contents'; + $info[$groupindex] = ''; + foreach (array('Package', 'Extension') as $type) { + $index = strtolower($type); + if (isset($group[$index])) { + if (isset($group[$index]['name'])) { + $group[$index] = array($group[$index]); + } + foreach ($group[$index] as $package) { + if (!empty($info[$groupindex])) { + $info[$groupindex] .= "\n"; + } + if ($index == 'extension') { + $name = $package['name']; + } else { + if (isset($package['channel'])) { + $name = $package['channel'] . '/' . $package['name']; + } else { + $name = '__uri/' . $package['name'] . ' (static URI)'; + } + } + if (isset($package['uri'])) { + if (isset($package['conflicts']) && $package['conflicts'] == 'yes') { + $info[$groupindex] .= "Not Compatible with $type $name"; + } else { + $info[$groupindex] .= "$type $name"; + } + $info[$groupindex] .= "\n Download URI: $package[uri]"; + continue; + } + if (isset($package['conflicts']) && $package['conflicts'] == 'yes') { + $info[$groupindex] .= "Not Compatible with $type $name"; + continue; + } + $info[$groupindex] .= "$type $name"; + if (isset($package['max']) && isset($package['min'])) { + $info[$groupindex] .= " \n Versions " . + $package['min'] . '-' . $package['max']; + } elseif (isset($package['min'])) { + $info[$groupindex] .= " \n Version " . + $package['min'] . ' or newer'; + } elseif (isset($package['max'])) { + $info[$groupindex] .= " \n Version " . + $package['min'] . ' or older'; + } + if (isset($package['recommended'])) { + $info[$groupindex] .= "\n Recommended version: $package[recommended]"; + } + if (isset($package['exclude'])) { + if (!isset($info['Not Compatible with'])) { + $info['Not Compatible with'] = ''; + } else { + $info[$groupindex] .= "Not Compatible with\n"; + } + if (is_array($package['exclude'])) { + $package['exclude'] = implode(', ', $package['exclude']); + } + $info[$groupindex] .= " Package $package\n Versions " . + $package['exclude']; + } + } + } + } + } + } + if ($obj->getPackageType() == 'bundle') { + $info['Bundled Packages'] = ''; + foreach ($obj->getBundledPackages() as $package) { + if (!empty($info['Bundled Packages'])) { + $info['Bundled Packages'] .= "\n"; + } + if (isset($package['uri'])) { + $info['Bundled Packages'] .= '__uri/' . $package['name']; + $info['Bundled Packages'] .= "\n (URI: $package[uri]"; + } else { + $info['Bundled Packages'] .= $package['channel'] . '/' . $package['name']; + } + } + } + $info['package.xml version'] = '2.0'; + if ($installed) { + if ($obj->getLastModified()) { + $info['Last Modified'] = date('Y-m-d H:i', $obj->getLastModified()); + } + $v = $obj->getLastInstalledVersion(); + $info['Last Installed Version'] = $v ? $v : '- None -'; + } + foreach ($info as $key => $value) { + $data['data'][] = array($key, $value); + } + $data['raw'] = $obj->getArray(); // no validation needed + + $this->ui->outputData($data, 'package-info'); + } +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Registry.xml b/campcaster/src/tools/pear/src/PEAR/Command/Registry.xml new file mode 100644 index 000000000..57a55b9a0 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Registry.xml @@ -0,0 +1,54 @@ + + + List Installed Packages In The Default Channel + doList + l + + + c + list installed packages from this channel + CHAN + + + a + list installed packages from all channels + + + <package> +If invoked without parameters, this command lists the PEAR packages +installed in your php_dir ({config php_dir}). With a parameter, it +lists the files in a package. + + + + List Files In Installed Package + doFileList + fl + + <package> +List the files in an installed package. + + + + Shell Script Test + doShellTest + st + + <package> [[relation] version] +Tests if a package is installed in the system. Will exit(1) if it is not. + <relation> The version comparison operator. One of: + <, lt, <=, le, >, gt, >=, ge, ==, =, eq, !=, <>, ne + <version> The version to compare with + + + + Display information about a package + doInfo + in + + <package> +Displays information about a package. The package argument may be a +local package file, an URL to a package file, or the name of an +installed package. + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Remote.php b/campcaster/src/tools/pear/src/PEAR/Command/Remote.php new file mode 100644 index 000000000..46b8655c1 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Remote.php @@ -0,0 +1,670 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Remote.php,v 1.90.2.3 2006/06/04 12:27:55 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; +require_once 'PEAR/REST.php'; + +/** + * PEAR commands for remote server querying + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Command_Remote extends PEAR_Command_Common +{ + // {{{ command definitions + + var $commands = array( + 'remote-info' => array( + 'summary' => 'Information About Remote Packages', + 'function' => 'doRemoteInfo', + 'shortcut' => 'ri', + 'options' => array(), + 'doc' => ' +Get details on a package from the server.', + ), + 'list-upgrades' => array( + 'summary' => 'List Available Upgrades', + 'function' => 'doListUpgrades', + 'shortcut' => 'lu', + 'options' => array(), + 'doc' => '[preferred_state] +List releases on the server of packages you have installed where +a newer version is available with the same release state (stable etc.) +or the state passed as the second parameter.' + ), + 'remote-list' => array( + 'summary' => 'List Remote Packages', + 'function' => 'doRemoteList', + 'shortcut' => 'rl', + 'options' => array( + 'channel' => + array( + 'shortopt' => 'c', + 'doc' => 'specify a channel other than the default channel', + 'arg' => 'CHAN', + ) + ), + 'doc' => ' +Lists the packages available on the configured server along with the +latest stable release of each package.', + ), + 'search' => array( + 'summary' => 'Search remote package database', + 'function' => 'doSearch', + 'shortcut' => 'sp', + 'options' => array( + 'channel' => + array( + 'shortopt' => 'c', + 'doc' => 'specify a channel other than the default channel', + 'arg' => 'CHAN', + ) + ), + 'doc' => '[packagename] [packageinfo] +Lists all packages which match the search parameters. The first +parameter is a fragment of a packagename. The default channel +will be used unless explicitly overridden. The second parameter +will be used to match any portion of the summary/description', + ), + 'list-all' => array( + 'summary' => 'List All Packages', + 'function' => 'doListAll', + 'shortcut' => 'la', + 'options' => array( + 'channel' => + array( + 'shortopt' => 'c', + 'doc' => 'specify a channel other than the default channel', + 'arg' => 'CHAN', + ) + ), + 'doc' => ' +Lists the packages available on the configured server along with the +latest stable release of each package.', + ), + 'download' => array( + 'summary' => 'Download Package', + 'function' => 'doDownload', + 'shortcut' => 'd', + 'options' => array( + 'nocompress' => array( + 'shortopt' => 'Z', + 'doc' => 'download an uncompressed (.tar) file', + ), + ), + 'doc' => '... +Download package tarballs. The files will be named as suggested by the +server, for example if you download the DB package and the latest stable +version of DB is 1.6.5, the downloaded file will be DB-1.6.5.tgz.', + ), + 'clear-cache' => array( + 'summary' => 'Clear Web Services Cache', + 'function' => 'doClearCache', + 'shortcut' => 'cc', + 'options' => array(), + 'doc' => ' +Clear the XML-RPC/REST cache. See also the cache_ttl configuration +parameter. +', + ), + ); + + // }}} + // {{{ constructor + + /** + * PEAR_Command_Remote constructor. + * + * @access public + */ + function PEAR_Command_Remote(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + + function _checkChannelForStatus($channel, $chan) + { + if (PEAR::isError($chan)) { + $this->raiseError($chan); + } + if (!is_a($chan, 'PEAR_ChannelFile')) { + return $this->raiseError('Internal corruption error: invalid channel "' . + $channel . '"'); + } + $rest = new PEAR_REST($this->config); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $a = $rest->downloadHttp('http://' . $channel . + '/channel.xml', $chan->lastModified()); + PEAR::staticPopErrorHandling(); + if (!PEAR::isError($a) && $a) { + $this->ui->outputData('WARNING: channel "' . $channel . '" has ' . + 'updated its protocols, use "channel-update ' . $channel . + '" to update'); + } + } + + // {{{ doRemoteInfo() + + function doRemoteInfo($command, $options, $params) + { + if (sizeof($params) != 1) { + return $this->raiseError("$command expects one param: the remote package name"); + } + $savechannel = $channel = $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + $package = $params[0]; + $parsed = $reg->parsePackageName($package, $channel); + if (PEAR::isError($parsed)) { + return $this->raiseError('Invalid package name "' . $package . '"'); + } + + $channel = $parsed['channel']; + $this->config->set('default_channel', $channel); + $chan = $reg->getChannel($channel); + if (PEAR::isError($e = $this->_checkChannelForStatus($channel, $chan))) { + return $e; + } + if ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $rest = &$this->config->getREST('1.0', array()); + $info = $rest->packageInfo($base, $parsed['package']); + } else { + $r = &$this->config->getRemote(); + $info = $r->call('package.info', $parsed['package']); + } + if (PEAR::isError($info)) { + $this->config->set('default_channel', $savechannel); + return $this->raiseError($info); + } + if (!isset($info['name'])) { + return $this->raiseError('No remote package "' . $package . '" was found'); + } + + $installed = $reg->packageInfo($info['name'], null, $channel); + $info['installed'] = $installed['version'] ? $installed['version'] : '- no -'; + if (is_array($info['installed'])) { + $info['installed'] = $info['installed']['release']; + } + + $this->ui->outputData($info, $command); + $this->config->set('default_channel', $savechannel); + + return true; + } + + // }}} + // {{{ doRemoteList() + + function doRemoteList($command, $options, $params) + { + $savechannel = $channel = $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + if (isset($options['channel'])) { + $channel = $options['channel']; + if ($reg->channelExists($channel)) { + $this->config->set('default_channel', $channel); + } else { + return $this->raiseError('Channel "' . $channel . '" does not exist'); + } + } + $chan = $reg->getChannel($channel); + if (PEAR::isError($e = $this->_checkChannelForStatus($channel, $chan))) { + return $e; + } + $list_options = false; + if ($this->config->get('preferred_state') == 'stable') { + $list_options = true; + } + if ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.1', $this->config->get('preferred_mirror'))) { + // use faster list-all if available + $rest = &$this->config->getREST('1.1', array()); + $available = $rest->listAll($base, $list_options); + } elseif ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $rest = &$this->config->getREST('1.0', array()); + $available = $rest->listAll($base, $list_options); + } else { + $r = &$this->config->getRemote(); + if ($channel == 'pear.php.net') { + // hack because of poor pearweb design + $available = $r->call('package.listAll', true, $list_options, false); + } else { + $available = $r->call('package.listAll', true, $list_options); + } + } + if (PEAR::isError($available)) { + $this->config->set('default_channel', $savechannel); + return $this->raiseError($available); + } + $i = $j = 0; + $data = array( + 'caption' => 'Channel ' . $channel . ' Available packages:', + 'border' => true, + 'headline' => array('Package', 'Version'), + ); + if (count($available)==0) { + $data = '(no packages available yet)'; + } else { + foreach ($available as $name => $info) { + $data['data'][] = array($name, (isset($info['stable']) && $info['stable']) + ? $info['stable'] : '-n/a-'); + } + } + $this->ui->outputData($data, $command); + $this->config->set('default_channel', $savechannel); + return true; + } + + // }}} + // {{{ doListAll() + + function doListAll($command, $options, $params) + { + $savechannel = $channel = $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + if (isset($options['channel'])) { + $channel = $options['channel']; + if ($reg->channelExists($channel)) { + $this->config->set('default_channel', $channel); + } else { + return $this->raiseError("Channel \"$channel\" does not exist"); + } + } + $list_options = false; + if ($this->config->get('preferred_state') == 'stable') { + $list_options = true; + } + $chan = $reg->getChannel($channel); + if (PEAR::isError($e = $this->_checkChannelForStatus($channel, $chan))) { + return $e; + } + if ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.1', $this->config->get('preferred_mirror'))) { + // use faster list-all if available + $rest = &$this->config->getREST('1.1', array()); + $available = $rest->listAll($base, $list_options, false); + } elseif ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $rest = &$this->config->getREST('1.0', array()); + $available = $rest->listAll($base, $list_options, false); + } else { + $r = &$this->config->getRemote(); + if ($channel == 'pear.php.net') { + // hack because of poor pearweb design + $available = $r->call('package.listAll', true, $list_options, false); + } else { + $available = $r->call('package.listAll', true, $list_options); + } + } + if (PEAR::isError($available)) { + $this->config->set('default_channel', $savechannel); + return $this->raiseError('The package list could not be fetched from the remote server. Please try again. (Debug info: "' . $available->getMessage() . '")'); + } + $data = array( + 'caption' => 'All packages:', + 'border' => true, + 'headline' => array('Package', 'Latest', 'Local'), + ); + $local_pkgs = $reg->listPackages($channel); + + foreach ($available as $name => $info) { + $installed = $reg->packageInfo($name, null, $channel); + if (is_array($installed['version'])) { + $installed['version'] = $installed['version']['release']; + } + $desc = $info['summary']; + if (isset($params[$name])) { + $desc .= "\n\n".$info['description']; + } + if (isset($options['mode'])) + { + if ($options['mode'] == 'installed' && !isset($installed['version'])) { + continue; + } + if ($options['mode'] == 'notinstalled' && isset($installed['version'])) { + continue; + } + if ($options['mode'] == 'upgrades' + && (!isset($installed['version']) || version_compare($installed['version'], + $info['stable'], '>='))) { + continue; + } + } + $pos = array_search(strtolower($name), $local_pkgs); + if ($pos !== false) { + unset($local_pkgs[$pos]); + } + + if (isset($info['stable']) && !$info['stable']) { + $info['stable'] = null; + } + $data['data'][$info['category']][] = array( + $reg->channelAlias($channel) . '/' . $name, + @$info['stable'], + @$installed['version'], + @$desc, + @$info['deps'], + ); + } + + if (isset($options['mode']) && in_array($options['mode'], array('notinstalled', 'upgrades'))) { + $this->config->set('default_channel', $savechannel); + $this->ui->outputData($data, $command); + return true; + } + foreach ($local_pkgs as $name) { + $info = &$reg->getPackage($name, $channel); + $data['data']['Local'][] = array( + $reg->channelAlias($channel) . '/' . $info->getPackage(), + '', + $info->getVersion(), + $info->getSummary(), + $info->getDeps() + ); + } + + $this->config->set('default_channel', $savechannel); + $this->ui->outputData($data, $command); + return true; + } + + // }}} + // {{{ doSearch() + + function doSearch($command, $options, $params) + { + if ((!isset($params[0]) || empty($params[0])) + && (!isset($params[1]) || empty($params[1]))) + { + return $this->raiseError('no valid search string supplied'); + }; + + $savechannel = $channel = $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + $package = $params[0]; + $summary = isset($params[1]) ? $params[1] : false; + if (isset($options['channel'])) { + $reg = &$this->config->getRegistry(); + $channel = $options['channel']; + if ($reg->channelExists($channel)) { + $this->config->set('default_channel', $channel); + } else { + return $this->raiseError('Channel "' . $channel . '" does not exist'); + } + } + $chan = $reg->getChannel($channel); + if (PEAR::isError($e = $this->_checkChannelForStatus($channel, $chan))) { + return $e; + } + if ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $rest = &$this->config->getREST('1.0', array()); + $available = $rest->listAll($base, false, false, $package, $summary); + } else { + $r = &$this->config->getRemote(); + $available = $r->call('package.search', $package, $summary, true, + $this->config->get('preferred_state') == 'stable', true); + } + if (PEAR::isError($available)) { + $this->config->set('default_channel', $savechannel); + return $this->raiseError($available); + } + if (!$available) { + return $this->raiseError('no packages found that match pattern "' . $package . '"'); + } + $data = array( + 'caption' => 'Matched packages, channel ' . $channel . ':', + 'border' => true, + 'headline' => array('Package', 'Stable/(Latest)', 'Local'), + ); + + foreach ($available as $name => $info) { + $installed = $reg->packageInfo($name, null, $channel); + $desc = $info['summary']; + if (isset($params[$name])) + $desc .= "\n\n".$info['description']; + + $unstable = ''; + if ($info['unstable']) { + $unstable = '/(' . $info['unstable'] . ' ' . $info['state'] . ')'; + } + if (!isset($info['stable']) || !$info['stable']) { + $info['stable'] = 'none'; + } + $version = is_array($installed['version']) ? $installed['version']['release'] : + $installed['version']; + $data['data'][$info['category']][] = array( + $name, + $info['stable'] . $unstable, + $version, + $desc, + ); + } + $this->ui->outputData($data, $command); + $this->config->set('default_channel', $channel); + return true; + } + + // }}} + function &getDownloader($options) + { + if (!class_exists('PEAR_Downloader')) { + require_once 'PEAR/Downloader.php'; + } + $a = &new PEAR_Downloader($this->ui, $options, $this->config); + return $a; + } + // {{{ doDownload() + + function doDownload($command, $options, $params) + { + // make certain that dependencies are ignored + $options['downloadonly'] = 1; + // eliminate error messages for preferred_state-related errors + $options['ignorepreferred_state'] = 1; + $downloader = &$this->getDownloader($options); + $downloader->setDownloadDir(getcwd()); + $errors = array(); + $downloaded = array(); + $err = $downloader->download($params); + if (PEAR::isError($err)) { + return $err; + } + $errors = $downloader->getErrorMsgs(); + if (count($errors)) { + foreach ($errors as $error) { + $this->ui->outputData($error); + } + return $this->raiseError("$command failed"); + } + $downloaded = $downloader->getDownloadedPackages(); + foreach ($downloaded as $pkg) { + $this->ui->outputData("File $pkg[file] downloaded", $command); + } + return true; + } + + function downloadCallback($msg, $params = null) + { + if ($msg == 'done') { + $this->bytes_downloaded = $params; + } + } + + // }}} + // {{{ doListUpgrades() + + function doListUpgrades($command, $options, $params) + { + require_once 'PEAR/Common.php'; + if (isset($params[0]) && !is_array(PEAR_Common::betterStates($params[0]))) { + return $this->raiseError($params[0] . ' is not a valid state (stable/beta/alpha/devel/etc.) try "pear help list-upgrades"'); + } + $savechannel = $channel = $this->config->get('default_channel'); + $reg = &$this->config->getRegistry(); + foreach ($reg->listChannels() as $channel) { + $inst = array_flip($reg->listPackages($channel)); + if (!count($inst)) { + continue; + } + if ($channel == '__uri') { + continue; + } + $this->config->set('default_channel', $channel); + if (empty($params[0])) { + $state = $this->config->get('preferred_state'); + } else { + $state = $params[0]; + } + $caption = $channel . ' Available Upgrades'; + $chan = $reg->getChannel($channel); + if (PEAR::isError($e = $this->_checkChannelForStatus($channel, $chan))) { + return $e; + } + if ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $rest = &$this->config->getREST('1.0', array()); + if (empty($state) || $state == 'any') { + $state = false; + } else { + $caption .= ' (' . implode(', ', PEAR_Common::betterStates($state, true)) . ')'; + } + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $latest = $rest->listLatestUpgrades($base, $state, $inst, $channel, $reg); + PEAR::staticPopErrorHandling(); + } else { + $remote = &$this->config->getRemote(); + $remote->pushErrorHandling(PEAR_ERROR_RETURN); + if (empty($state) || $state == 'any') { + $latest = $remote->call("package.listLatestReleases"); + } else { + $latest = $remote->call("package.listLatestReleases", $state); + $caption .= ' (' . implode(', ', PEAR_Common::betterStates($state, true)) . ')'; + } + $remote->popErrorHandling(); + } + if (PEAR::isError($latest)) { + $this->ui->outputData($latest->getMessage()); + continue; + } + $caption .= ':'; + if (PEAR::isError($latest)) { + $this->config->set('default_channel', $savechannel); + return $latest; + } + $data = array( + 'caption' => $caption, + 'border' => 1, + 'headline' => array('Channel', 'Package', 'Local', 'Remote', 'Size'), + ); + foreach ((array)$latest as $pkg => $info) { + $package = strtolower($pkg); + if (!isset($inst[$package])) { + // skip packages we don't have installed + continue; + } + extract($info); + $inst_version = $reg->packageInfo($package, 'version', $channel); + $inst_state = $reg->packageInfo($package, 'release_state', $channel); + if (version_compare("$version", "$inst_version", "le")) { + // installed version is up-to-date + continue; + } + if ($filesize >= 20480) { + $filesize += 1024 - ($filesize % 1024); + $fs = sprintf("%dkB", $filesize / 1024); + } elseif ($filesize > 0) { + $filesize += 103 - ($filesize % 103); + $fs = sprintf("%.1fkB", $filesize / 1024.0); + } else { + $fs = " -"; // XXX center instead + } + $data['data'][] = array($channel, $pkg, "$inst_version ($inst_state)", "$version ($state)", $fs); + } + if (empty($data['data'])) { + $this->ui->outputData('Channel ' . $channel . ': No upgrades available'); + } else { + $this->ui->outputData($data, $command); + } + } + $this->config->set('default_channel', $savechannel); + return true; + } + + // }}} + // {{{ doClearCache() + + function doClearCache($command, $options, $params) + { + $cache_dir = $this->config->get('cache_dir'); + $verbose = $this->config->get('verbose'); + $output = ''; + if (!($dp = @opendir($cache_dir))) { + return $this->raiseError("opendir($cache_dir) failed: $php_errormsg"); + } + if ($verbose >= 1) { + $output .= "reading directory $cache_dir\n"; + } + $num = 0; + while ($ent = readdir($dp)) { + if (preg_match('/^xmlrpc_cache_[a-z0-9]{32}$/', $ent) || + preg_match('/rest.cache(file|id)$/', $ent)) { + $path = $cache_dir . DIRECTORY_SEPARATOR . $ent; + $ok = @unlink($path); + if ($ok) { + if ($verbose >= 2) { + $output .= "deleted $path\n"; + } + $num++; + } elseif ($verbose >= 1) { + $output .= "failed to delete $path\n"; + } + } + } + closedir($dp); + if ($verbose >= 1) { + $output .= "$num cache entries cleared\n"; + } + $this->ui->outputData(rtrim($output), $command); + return $num; + } + + // }}} +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Remote.xml b/campcaster/src/tools/pear/src/PEAR/Command/Remote.xml new file mode 100644 index 000000000..7c43a885b --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Remote.xml @@ -0,0 +1,92 @@ + + + Information About Remote Packages + doRemoteInfo + ri + + <package> +Get details on a package from the server. + + + List Available Upgrades + doListUpgrades + lu + + [preferred_state] +List releases on the server of packages you have installed where +a newer version is available with the same release state (stable etc.) +or the state passed as the second parameter. + + + List Remote Packages + doRemoteList + rl + + + c + specify a channel other than the default channel + CHAN + + + +Lists the packages available on the configured server along with the +latest stable release of each package. + + + Search remote package database + doSearch + sp + + + c + specify a channel other than the default channel + CHAN + + + [packagename] [packageinfo] +Lists all packages which match the search parameters. The first +parameter is a fragment of a packagename. The default channel +will be used unless explicitly overridden. The second parameter +will be used to match any portion of the summary/description + + + List All Packages + doListAll + la + + + c + specify a channel other than the default channel + CHAN + + + +Lists the packages available on the configured server along with the +latest stable release of each package. + + + Download Package + doDownload + d + + + Z + download an uncompressed (.tar) file + + + <package>... +Download package tarballs. The files will be named as suggested by the +server, for example if you download the DB package and the latest stable +version of DB is 1.6.5, the downloaded file will be DB-1.6.5.tgz. + + + Clear Web Services Cache + doClearCache + cc + + +Clear the XML-RPC/REST cache. See also the cache_ttl configuration +parameter. + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Test.php b/campcaster/src/tools/pear/src/PEAR/Command/Test.php new file mode 100644 index 000000000..6bc569a3c --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Test.php @@ -0,0 +1,275 @@ + + * @author Martin Jansen + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Test.php,v 1.9 2006/02/03 22:28:08 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Command/Common.php'; + +/** + * PEAR commands for login/logout + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Martin Jansen + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ + +class PEAR_Command_Test extends PEAR_Command_Common +{ + // {{{ properties + + var $commands = array( + 'run-tests' => array( + 'summary' => 'Run Regression Tests', + 'function' => 'doRunTests', + 'shortcut' => 'rt', + 'options' => array( + 'recur' => array( + 'shortopt' => 'r', + 'doc' => 'Run tests in child directories, recursively. 4 dirs deep maximum', + ), + 'ini' => array( + 'shortopt' => 'i', + 'doc' => 'actual string of settings to pass to php in format " -d setting=blah"', + 'arg' => 'SETTINGS' + ), + 'realtimelog' => array( + 'shortopt' => 'l', + 'doc' => 'Log test runs/results as they are run', + ), + 'quiet' => array( + 'shortopt' => 'q', + 'doc' => 'Only display detail for failed tests', + ), + 'simple' => array( + 'shortopt' => 's', + 'doc' => 'Display simple output for all tests', + ), + 'package' => array( + 'shortopt' => 'p', + 'doc' => 'Treat parameters as installed packages from which to run tests', + ), + 'phpunit' => array( + 'shortopt' => 'u', + 'doc' => 'Search parameters for AllTests.php, and use that to run phpunit-based tests', + ), + ), + 'doc' => '[testfile|dir ...] +Run regression tests with PHP\'s regression testing script (run-tests.php).', + ), + ); + + var $output; + + // }}} + // {{{ constructor + + /** + * PEAR_Command_Test constructor. + * + * @access public + */ + function PEAR_Command_Test(&$ui, &$config) + { + parent::PEAR_Command_Common($ui, $config); + } + + // }}} + // {{{ doRunTests() + + function doRunTests($command, $options, $params) + { + require_once 'PEAR/Common.php'; + require_once 'PEAR/RunTest.php'; + require_once 'System.php'; + $log = new PEAR_Common; + $log->ui = &$this->ui; // slightly hacky, but it will work + $run = new PEAR_RunTest($log, $options); + $tests = array(); + if (isset($options['recur'])) { + $depth = 4; + } else { + $depth = 1; + } + if (!count($params)) { + $params[] = '.'; + } + if (isset($options['package'])) { + $oldparams = $params; + $params = array(); + $reg = &$this->config->getRegistry(); + foreach ($oldparams as $param) { + $pname = $reg->parsePackageName($param, $this->config->get('default_channel')); + if (PEAR::isError($pname)) { + return $this->raiseError($pname); + } + $package = &$reg->getPackage($pname['package'], $pname['channel']); + if (!$package) { + return PEAR::raiseError('Unknown package "' . + $reg->parsedPackageNameToString($pname) . '"'); + } + $filelist = $package->getFilelist(); + foreach ($filelist as $name => $atts) { + if (isset($atts['role']) && $atts['role'] != 'test') { + continue; + } + if (isset($options['phpunit'])) { + if (!preg_match('/AllTests\.php$/i', $name)) { + continue; + } + } else { + if (!preg_match('/\.phpt$/', $name)) { + continue; + } + } + $params[] = $atts['installed_as']; + } + } + } + foreach ($params as $p) { + if (is_dir($p)) { + if (isset($options['phpunit'])) { + $dir = System::find(array($p, '-type', 'f', + '-maxdepth', $depth, + '-name', 'AllTests.php')); + } else { + $dir = System::find(array($p, '-type', 'f', + '-maxdepth', $depth, + '-name', '*.phpt')); + } + $tests = array_merge($tests, $dir); + } else { + if (isset($options['phpunit'])) { + if (!preg_match('/AllTests\.php$/i', $p)) { + continue; + } + $tests[] = $p; + } else { + if (!@file_exists($p)) { + if (!preg_match('/\.phpt$/', $p)) { + $p .= '.phpt'; + } + $dir = System::find(array(dirname($p), '-type', 'f', + '-maxdepth', $depth, + '-name', $p)); + $tests = array_merge($tests, $dir); + } else { + $tests[] = $p; + } + } + } + } + $ini_settings = ''; + if (isset($options['ini'])) { + $ini_settings .= $options['ini']; + } + if (isset($_ENV['TEST_PHP_INCLUDE_PATH'])) { + $ini_settings .= " -d include_path={$_ENV['TEST_PHP_INCLUDE_PATH']}"; + } + if ($ini_settings) { + $this->ui->outputData('Using INI settings: "' . $ini_settings . '"'); + } + $skipped = $passed = $failed = array(); + $this->ui->outputData('Running ' . count($tests) . ' tests', $command); + $start = time(); + if (isset($options['realtimelog'])) { + @unlink('run-tests.log'); + } + foreach ($tests as $t) { + if (isset($options['realtimelog'])) { + $fp = @fopen('run-tests.log', 'a'); + if ($fp) { + fwrite($fp, "Running test $t..."); + fclose($fp); + } + } + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $result = $run->run($t, $ini_settings); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($result)) { + $this->ui->log(0, $result->getMessage()); + continue; + } + if (isset($options['realtimelog'])) { + $fp = @fopen('run-tests.log', 'a'); + if ($fp) { + fwrite($fp, "$result\n"); + fclose($fp); + } + } + if ($result == 'FAILED') { + $failed[] = $t; + } + if ($result == 'PASSED') { + $passed[] = $t; + } + if ($result == 'SKIPPED') { + $skipped[] = $t; + } + } + $total = date('i:s', time() - $start); + if (count($failed)) { + $output = "TOTAL TIME: $total\n"; + $output .= count($passed) . " PASSED TESTS\n"; + $output .= count($skipped) . " SKIPPED TESTS\n"; + $output .= count($failed) . " FAILED TESTS:\n"; + foreach ($failed as $failure) { + $output .= $failure . "\n"; + } + if (isset($options['realtimelog'])) { + $fp = @fopen('run-tests.log', 'a'); + } else { + $fp = @fopen('run-tests.log', 'w'); + } + if ($fp) { + fwrite($fp, $output, strlen($output)); + fclose($fp); + $this->ui->outputData('wrote log to "' . realpath('run-tests.log') . '"', $command); + } + } elseif (@file_exists('run-tests.log') && !@is_dir('run-tests.log')) { + @unlink('run-tests.log'); + } + $this->ui->outputData('TOTAL TIME: ' . $total); + $this->ui->outputData(count($passed) . ' PASSED TESTS', $command); + $this->ui->outputData(count($skipped) . ' SKIPPED TESTS', $command); + if (count($failed)) { + $this->ui->outputData(count($failed) . ' FAILED TESTS:', $command); + foreach ($failed as $failure) { + $this->ui->outputData($failure, $command); + } + } + + return true; + } + // }}} +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Command/Test.xml b/campcaster/src/tools/pear/src/PEAR/Command/Test.xml new file mode 100644 index 000000000..6f66916fb --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Command/Test.xml @@ -0,0 +1,40 @@ + + + Run Regression Tests + doRunTests + rt + + + r + Run tests in child directories, recursively. 4 dirs deep maximum + + + i + actual string of settings to pass to php in format " -d setting=blah" + SETTINGS + + + l + Log test runs/results as they are run + + + q + Only display detail for failed tests + + + s + Display simple output for all tests + + + p + Treat parameters as installed packages from which to run tests + + + u + Search parameters for AllTests.php, and use that to run phpunit-based tests + + + [testfile|dir ...] +Run regression tests with PHP's regression testing script (run-tests.php). + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Common.php b/campcaster/src/tools/pear/src/PEAR/Common.php new file mode 100644 index 000000000..7bcbec4fc --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Common.php @@ -0,0 +1,1129 @@ + + * @author Tomas V. V. Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Common.php,v 1.155 2006/03/02 18:14:12 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1.0 + * @deprecated File deprecated since Release 1.4.0a1 + */ + +/** + * Include error handling + */ +require_once 'PEAR.php'; + +// {{{ constants and globals + +/** + * PEAR_Common error when an invalid PHP file is passed to PEAR_Common::analyzeSourceCode() + */ +define('PEAR_COMMON_ERROR_INVALIDPHP', 1); +define('_PEAR_COMMON_PACKAGE_NAME_PREG', '[A-Za-z][a-zA-Z0-9_]+'); +define('PEAR_COMMON_PACKAGE_NAME_PREG', '/^' . _PEAR_COMMON_PACKAGE_NAME_PREG . '$/'); + +// this should allow: 1, 1.0, 1.0RC1, 1.0dev, 1.0dev123234234234, 1.0a1, 1.0b1, 1.0pl1 +define('_PEAR_COMMON_PACKAGE_VERSION_PREG', '\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?'); +define('PEAR_COMMON_PACKAGE_VERSION_PREG', '/^' . _PEAR_COMMON_PACKAGE_VERSION_PREG . '$/i'); + +// XXX far from perfect :-) +define('_PEAR_COMMON_PACKAGE_DOWNLOAD_PREG', '(' . _PEAR_COMMON_PACKAGE_NAME_PREG . + ')(-([.0-9a-zA-Z]+))?'); +define('PEAR_COMMON_PACKAGE_DOWNLOAD_PREG', '/^' . _PEAR_COMMON_PACKAGE_DOWNLOAD_PREG . + '$/'); + +define('_PEAR_CHANNELS_NAME_PREG', '[A-Za-z][a-zA-Z0-9\.]+'); +define('PEAR_CHANNELS_NAME_PREG', '/^' . _PEAR_CHANNELS_NAME_PREG . '$/'); + +// this should allow any dns or IP address, plus a path - NO UNDERSCORES ALLOWED +define('_PEAR_CHANNELS_SERVER_PREG', '[a-zA-Z0-9\-]+(?:\.[a-zA-Z0-9\-]+)*(\/[a-zA-Z0-9\-]+)*'); +define('PEAR_CHANNELS_SERVER_PREG', '/^' . _PEAR_CHANNELS_SERVER_PREG . '$/i'); + +define('_PEAR_CHANNELS_PACKAGE_PREG', '(' ._PEAR_CHANNELS_SERVER_PREG . ')\/(' + . _PEAR_COMMON_PACKAGE_NAME_PREG . ')'); +define('PEAR_CHANNELS_PACKAGE_PREG', '/^' . _PEAR_CHANNELS_PACKAGE_PREG . '$/i'); + +define('_PEAR_COMMON_CHANNEL_DOWNLOAD_PREG', '(' . _PEAR_CHANNELS_NAME_PREG . ')::(' + . _PEAR_COMMON_PACKAGE_NAME_PREG . ')(-([.0-9a-zA-Z]+))?'); +define('PEAR_COMMON_CHANNEL_DOWNLOAD_PREG', '/^' . _PEAR_COMMON_CHANNEL_DOWNLOAD_PREG . '$/'); + +/** + * List of temporary files and directories registered by + * PEAR_Common::addTempFile(). + * @var array + */ +$GLOBALS['_PEAR_Common_tempfiles'] = array(); + +/** + * Valid maintainer roles + * @var array + */ +$GLOBALS['_PEAR_Common_maintainer_roles'] = array('lead','developer','contributor','helper'); + +/** + * Valid release states + * @var array + */ +$GLOBALS['_PEAR_Common_release_states'] = array('alpha','beta','stable','snapshot','devel'); + +/** + * Valid dependency types + * @var array + */ +$GLOBALS['_PEAR_Common_dependency_types'] = array('pkg','ext','php','prog','ldlib','rtlib','os','websrv','sapi'); + +/** + * Valid dependency relations + * @var array + */ +$GLOBALS['_PEAR_Common_dependency_relations'] = array('has','eq','lt','le','gt','ge','not', 'ne'); + +/** + * Valid file roles + * @var array + */ +$GLOBALS['_PEAR_Common_file_roles'] = array('php','ext','test','doc','data','src','script'); + +/** + * Valid replacement types + * @var array + */ +$GLOBALS['_PEAR_Common_replacement_types'] = array('php-const', 'pear-config', 'package-info'); + +/** + * Valid "provide" types + * @var array + */ +$GLOBALS['_PEAR_Common_provide_types'] = array('ext', 'prog', 'class', 'function', 'feature', 'api'); + +/** + * Valid "provide" types + * @var array + */ +$GLOBALS['_PEAR_Common_script_phases'] = array('pre-install', 'post-install', 'pre-uninstall', 'post-uninstall', 'pre-build', 'post-build', 'pre-configure', 'post-configure', 'pre-setup', 'post-setup'); + +// }}} + +/** + * Class providing common functionality for PEAR administration classes. + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Tomas V. V. Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + * @deprecated This class will disappear, and its components will be spread + * into smaller classes, like the AT&T breakup, as of Release 1.4.0a1 + */ +class PEAR_Common extends PEAR +{ + // {{{ properties + + /** stack of elements, gives some sort of XML context */ + var $element_stack = array(); + + /** name of currently parsed XML element */ + var $current_element; + + /** array of attributes of the currently parsed XML element */ + var $current_attributes = array(); + + /** assoc with information about a package */ + var $pkginfo = array(); + + /** + * User Interface object (PEAR_Frontend_* class). If null, + * the log() method uses print. + * @var object + */ + var $ui = null; + + /** + * Configuration object (PEAR_Config). + * @var object + */ + var $config = null; + + var $current_path = null; + + /** + * PEAR_SourceAnalyzer instance + * @var object + */ + var $source_analyzer = null; + /** + * Flag variable used to mark a valid package file + * @var boolean + * @access private + */ + var $_validPackageFile; + + // }}} + + // {{{ constructor + + /** + * PEAR_Common constructor + * + * @access public + */ + function PEAR_Common() + { + parent::PEAR(); + $this->config = &PEAR_Config::singleton(); + $this->debug = $this->config->get('verbose'); + } + + // }}} + // {{{ destructor + + /** + * PEAR_Common destructor + * + * @access private + */ + function _PEAR_Common() + { + // doesn't work due to bug #14744 + //$tempfiles = $this->_tempfiles; + $tempfiles =& $GLOBALS['_PEAR_Common_tempfiles']; + while ($file = array_shift($tempfiles)) { + if (@is_dir($file)) { + if (!class_exists('System')) { + require_once 'System.php'; + } + System::rm(array('-rf', $file)); + } elseif (file_exists($file)) { + unlink($file); + } + } + } + + // }}} + // {{{ addTempFile() + + /** + * Register a temporary file or directory. When the destructor is + * executed, all registered temporary files and directories are + * removed. + * + * @param string $file name of file or directory + * + * @return void + * + * @access public + */ + function addTempFile($file) + { + if (!class_exists('PEAR_Frontend')) { + require_once 'PEAR/Frontend.php'; + } + PEAR_Frontend::addTempFile($file); + } + + // }}} + // {{{ mkDirHier() + + /** + * Wrapper to System::mkDir(), creates a directory as well as + * any necessary parent directories. + * + * @param string $dir directory name + * + * @return bool TRUE on success, or a PEAR error + * + * @access public + */ + function mkDirHier($dir) + { + $this->log(2, "+ create dir $dir"); + if (!class_exists('System')) { + require_once 'System.php'; + } + return System::mkDir(array('-p', $dir)); + } + + // }}} + // {{{ log() + + /** + * Logging method. + * + * @param int $level log level (0 is quiet, higher is noisier) + * @param string $msg message to write to the log + * + * @return void + * + * @access public + * @static + */ + function log($level, $msg, $append_crlf = true) + { + if ($this->debug >= $level) { + if (!class_exists('PEAR_Frontend')) { + require_once 'PEAR/Frontend.php'; + } + $ui = &PEAR_Frontend::singleton(); + if (is_a($ui, 'PEAR_Frontend')) { + $ui->log($msg, $append_crlf); + } else { + print "$msg\n"; + } + } + } + + // }}} + // {{{ mkTempDir() + + /** + * Create and register a temporary directory. + * + * @param string $tmpdir (optional) Directory to use as tmpdir. + * Will use system defaults (for example + * /tmp or c:\windows\temp) if not specified + * + * @return string name of created directory + * + * @access public + */ + function mkTempDir($tmpdir = '') + { + if ($tmpdir) { + $topt = array('-t', $tmpdir); + } else { + $topt = array(); + } + $topt = array_merge($topt, array('-d', 'pear')); + if (!class_exists('System')) { + require_once 'System.php'; + } + if (!$tmpdir = System::mktemp($topt)) { + return false; + } + $this->addTempFile($tmpdir); + return $tmpdir; + } + + // }}} + // {{{ setFrontendObject() + + /** + * Set object that represents the frontend to be used. + * + * @param object Reference of the frontend object + * @return void + * @access public + */ + function setFrontendObject(&$ui) + { + $this->ui = &$ui; + } + + // }}} + + // {{{ infoFromTgzFile() + + /** + * Returns information about a package file. Expects the name of + * a gzipped tar file as input. + * + * @param string $file name of .tgz file + * + * @return array array with package information + * + * @access public + * @deprecated use PEAR_PackageFile->fromTgzFile() instead + * + */ + function infoFromTgzFile($file) + { + $packagefile = &new PEAR_PackageFile($this->config); + $pf = &$packagefile->fromTgzFile($file, PEAR_VALIDATE_NORMAL); + if (PEAR::isError($pf)) { + $errs = $pf->getUserinfo(); + if (is_array($errs)) { + foreach ($errs as $error) { + $e = $this->raiseError($error['message'], $error['code'], null, null, $error); + } + } + return $pf; + } + return $this->_postProcessValidPackagexml($pf); + } + + // }}} + // {{{ infoFromDescriptionFile() + + /** + * Returns information about a package file. Expects the name of + * a package xml file as input. + * + * @param string $descfile name of package xml file + * + * @return array array with package information + * + * @access public + * @deprecated use PEAR_PackageFile->fromPackageFile() instead + * + */ + function infoFromDescriptionFile($descfile) + { + $packagefile = &new PEAR_PackageFile($this->config); + $pf = &$packagefile->fromPackageFile($descfile, PEAR_VALIDATE_NORMAL); + if (PEAR::isError($pf)) { + $errs = $pf->getUserinfo(); + if (is_array($errs)) { + foreach ($errs as $error) { + $e = $this->raiseError($error['message'], $error['code'], null, null, $error); + } + } + return $pf; + } + return $this->_postProcessValidPackagexml($pf); + } + + // }}} + // {{{ infoFromString() + + /** + * Returns information about a package file. Expects the contents + * of a package xml file as input. + * + * @param string $data contents of package.xml file + * + * @return array array with package information + * + * @access public + * @deprecated use PEAR_PackageFile->fromXmlstring() instead + * + */ + function infoFromString($data) + { + $packagefile = &new PEAR_PackageFile($this->config); + $pf = &$packagefile->fromXmlString($data, PEAR_VALIDATE_NORMAL, false); + if (PEAR::isError($pf)) { + $errs = $pf->getUserinfo(); + if (is_array($errs)) { + foreach ($errs as $error) { + $e = $this->raiseError($error['message'], $error['code'], null, null, $error); + } + } + return $pf; + } + return $this->_postProcessValidPackagexml($pf); + } + // }}} + + /** + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @return array + */ + function _postProcessValidPackagexml(&$pf) + { + if (is_a($pf, 'PEAR_PackageFile_v2')) { + // sort of make this into a package.xml 1.0-style array + // changelog is not converted to old format. + $arr = $pf->toArray(true); + $arr = array_merge($arr, $arr['old']); + unset($arr['old']); + unset($arr['xsdversion']); + unset($arr['contents']); + unset($arr['compatible']); + unset($arr['channel']); + unset($arr['uri']); + unset($arr['dependencies']); + unset($arr['phprelease']); + unset($arr['extsrcrelease']); + unset($arr['extbinrelease']); + unset($arr['bundle']); + unset($arr['lead']); + unset($arr['developer']); + unset($arr['helper']); + unset($arr['contributor']); + $arr['filelist'] = $pf->getFilelist(); + $this->pkginfo = $arr; + return $arr; + } else { + $this->pkginfo = $pf->toArray(); + return $this->pkginfo; + } + } + // {{{ infoFromAny() + + /** + * Returns package information from different sources + * + * This method is able to extract information about a package + * from a .tgz archive or from a XML package definition file. + * + * @access public + * @param string Filename of the source ('package.xml', '.tgz') + * @return string + * @deprecated use PEAR_PackageFile->fromAnyFile() instead + */ + function infoFromAny($info) + { + if (is_string($info) && file_exists($info)) { + $packagefile = &new PEAR_PackageFile($this->config); + $pf = &$packagefile->fromAnyFile($info, PEAR_VALIDATE_NORMAL); + if (PEAR::isError($pf)) { + $errs = $pf->getUserinfo(); + if (is_array($errs)) { + foreach ($errs as $error) { + $e = $this->raiseError($error['message'], $error['code'], null, null, $error); + } + } + return $pf; + } + return $this->_postProcessValidPackagexml($pf); + } + return $info; + } + + // }}} + // {{{ xmlFromInfo() + + /** + * Return an XML document based on the package info (as returned + * by the PEAR_Common::infoFrom* methods). + * + * @param array $pkginfo package info + * + * @return string XML data + * + * @access public + * @deprecated use a PEAR_PackageFile_v* object's generator instead + */ + function xmlFromInfo($pkginfo) + { + $config = &PEAR_Config::singleton(); + $packagefile = &new PEAR_PackageFile($config); + $pf = &$packagefile->fromArray($pkginfo); + $gen = &$pf->getDefaultGenerator(); + return $gen->toXml(PEAR_VALIDATE_PACKAGING); + } + + // }}} + // {{{ validatePackageInfo() + + /** + * Validate XML package definition file. + * + * @param string $info Filename of the package archive or of the + * package definition file + * @param array $errors Array that will contain the errors + * @param array $warnings Array that will contain the warnings + * @param string $dir_prefix (optional) directory where source files + * may be found, or empty if they are not available + * @access public + * @return boolean + * @deprecated use the validation of PEAR_PackageFile objects + */ + function validatePackageInfo($info, &$errors, &$warnings, $dir_prefix = '') + { + $config = &PEAR_Config::singleton(); + $packagefile = &new PEAR_PackageFile($config); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + if (strpos($info, 'fromXmlString($info, PEAR_VALIDATE_NORMAL, ''); + } else { + $pf = &$packagefile->fromAnyFile($info, PEAR_VALIDATE_NORMAL); + } + PEAR::staticPopErrorHandling(); + if (PEAR::isError($pf)) { + $errs = $pf->getUserinfo(); + if (is_array($errs)) { + foreach ($errs as $error) { + if ($error['level'] == 'error') { + $errors[] = $error['message']; + } else { + $warnings[] = $error['message']; + } + } + } + return false; + } + return true; + } + + // }}} + // {{{ buildProvidesArray() + + /** + * Build a "provides" array from data returned by + * analyzeSourceCode(). The format of the built array is like + * this: + * + * array( + * 'class;MyClass' => 'array('type' => 'class', 'name' => 'MyClass'), + * ... + * ) + * + * + * @param array $srcinfo array with information about a source file + * as returned by the analyzeSourceCode() method. + * + * @return void + * + * @access public + * + */ + function buildProvidesArray($srcinfo) + { + $file = basename($srcinfo['source_file']); + $pn = ''; + if (isset($this->_packageName)) { + $pn = $this->_packageName; + } + $pnl = strlen($pn); + foreach ($srcinfo['declared_classes'] as $class) { + $key = "class;$class"; + if (isset($this->pkginfo['provides'][$key])) { + continue; + } + $this->pkginfo['provides'][$key] = + array('file'=> $file, 'type' => 'class', 'name' => $class); + if (isset($srcinfo['inheritance'][$class])) { + $this->pkginfo['provides'][$key]['extends'] = + $srcinfo['inheritance'][$class]; + } + } + foreach ($srcinfo['declared_methods'] as $class => $methods) { + foreach ($methods as $method) { + $function = "$class::$method"; + $key = "function;$function"; + if ($method{0} == '_' || !strcasecmp($method, $class) || + isset($this->pkginfo['provides'][$key])) { + continue; + } + $this->pkginfo['provides'][$key] = + array('file'=> $file, 'type' => 'function', 'name' => $function); + } + } + + foreach ($srcinfo['declared_functions'] as $function) { + $key = "function;$function"; + if ($function{0} == '_' || isset($this->pkginfo['provides'][$key])) { + continue; + } + if (!strstr($function, '::') && strncasecmp($function, $pn, $pnl)) { + $warnings[] = "in1 " . $file . ": function \"$function\" not prefixed with package name \"$pn\""; + } + $this->pkginfo['provides'][$key] = + array('file'=> $file, 'type' => 'function', 'name' => $function); + } + } + + // }}} + // {{{ analyzeSourceCode() + + /** + * Analyze the source code of the given PHP file + * + * @param string Filename of the PHP file + * @return mixed + * @access public + */ + function analyzeSourceCode($file) + { + if (!function_exists("token_get_all")) { + return false; + } + if (!defined('T_DOC_COMMENT')) { + define('T_DOC_COMMENT', T_COMMENT); + } + if (!defined('T_INTERFACE')) { + define('T_INTERFACE', -1); + } + if (!defined('T_IMPLEMENTS')) { + define('T_IMPLEMENTS', -1); + } + if (!$fp = @fopen($file, "r")) { + return false; + } + if (function_exists('file_get_contents')) { + fclose($fp); + $contents = file_get_contents($file); + } else { + $contents = fread($fp, filesize($file)); + fclose($fp); + } + $tokens = token_get_all($contents); +/* + for ($i = 0; $i < sizeof($tokens); $i++) { + @list($token, $data) = $tokens[$i]; + if (is_string($token)) { + var_dump($token); + } else { + print token_name($token) . ' '; + var_dump(rtrim($data)); + } + } +*/ + $look_for = 0; + $paren_level = 0; + $bracket_level = 0; + $brace_level = 0; + $lastphpdoc = ''; + $current_class = ''; + $current_interface = ''; + $current_class_level = -1; + $current_function = ''; + $current_function_level = -1; + $declared_classes = array(); + $declared_interfaces = array(); + $declared_functions = array(); + $declared_methods = array(); + $used_classes = array(); + $used_functions = array(); + $extends = array(); + $implements = array(); + $nodeps = array(); + $inquote = false; + $interface = false; + for ($i = 0; $i < sizeof($tokens); $i++) { + if (is_array($tokens[$i])) { + list($token, $data) = $tokens[$i]; + } else { + $token = $tokens[$i]; + $data = ''; + } + if ($inquote) { + if ($token != '"') { + continue; + } else { + $inquote = false; + continue; + } + } + switch ($token) { + case T_WHITESPACE: + continue; + case ';': + if ($interface) { + $current_function = ''; + $current_function_level = -1; + } + break; + case '"': + $inquote = true; + break; + case T_CURLY_OPEN: + case T_DOLLAR_OPEN_CURLY_BRACES: + case '{': $brace_level++; continue 2; + case '}': + $brace_level--; + if ($current_class_level == $brace_level) { + $current_class = ''; + $current_class_level = -1; + } + if ($current_function_level == $brace_level) { + $current_function = ''; + $current_function_level = -1; + } + continue 2; + case '[': $bracket_level++; continue 2; + case ']': $bracket_level--; continue 2; + case '(': $paren_level++; continue 2; + case ')': $paren_level--; continue 2; + case T_INTERFACE: + $interface = true; + case T_CLASS: + if (($current_class_level != -1) || ($current_function_level != -1)) { + PEAR::raiseError("Parser error: invalid PHP found in file \"$file\"", + PEAR_COMMON_ERROR_INVALIDPHP); + return false; + } + case T_FUNCTION: + case T_NEW: + case T_EXTENDS: + case T_IMPLEMENTS: + $look_for = $token; + continue 2; + case T_STRING: + if (version_compare(zend_version(), '2.0', '<')) { + if (in_array(strtolower($data), + array('public', 'private', 'protected', 'abstract', + 'interface', 'implements', 'throw') + )) { + PEAR::raiseError('Error: PHP5 token encountered in ' . $file . + 'packaging should be done in PHP 5'); + return false; + } + } + if ($look_for == T_CLASS) { + $current_class = $data; + $current_class_level = $brace_level; + $declared_classes[] = $current_class; + } elseif ($look_for == T_INTERFACE) { + $current_interface = $data; + $current_class_level = $brace_level; + $declared_interfaces[] = $current_interface; + } elseif ($look_for == T_IMPLEMENTS) { + $implements[$current_class] = $data; + } elseif ($look_for == T_EXTENDS) { + $extends[$current_class] = $data; + } elseif ($look_for == T_FUNCTION) { + if ($current_class) { + $current_function = "$current_class::$data"; + $declared_methods[$current_class][] = $data; + } elseif ($current_interface) { + $current_function = "$current_interface::$data"; + $declared_methods[$current_interface][] = $data; + } else { + $current_function = $data; + $declared_functions[] = $current_function; + } + $current_function_level = $brace_level; + $m = array(); + } elseif ($look_for == T_NEW) { + $used_classes[$data] = true; + } + $look_for = 0; + continue 2; + case T_VARIABLE: + $look_for = 0; + continue 2; + case T_DOC_COMMENT: + case T_COMMENT: + if (preg_match('!^/\*\*\s!', $data)) { + $lastphpdoc = $data; + if (preg_match_all('/@nodep\s+(\S+)/', $lastphpdoc, $m)) { + $nodeps = array_merge($nodeps, $m[1]); + } + } + continue 2; + case T_DOUBLE_COLON: + if (!($tokens[$i - 1][0] == T_WHITESPACE || $tokens[$i - 1][0] == T_STRING)) { + PEAR::raiseError("Parser error: invalid PHP found in file \"$file\"", + PEAR_COMMON_ERROR_INVALIDPHP); + return false; + } + $class = $tokens[$i - 1][1]; + if (strtolower($class) != 'parent') { + $used_classes[$class] = true; + } + continue 2; + } + } + return array( + "source_file" => $file, + "declared_classes" => $declared_classes, + "declared_interfaces" => $declared_interfaces, + "declared_methods" => $declared_methods, + "declared_functions" => $declared_functions, + "used_classes" => array_diff(array_keys($used_classes), $nodeps), + "inheritance" => $extends, + "implements" => $implements, + ); + } + + // }}} + // {{{ betterStates() + + /** + * Return an array containing all of the states that are more stable than + * or equal to the passed in state + * + * @param string Release state + * @param boolean Determines whether to include $state in the list + * @return false|array False if $state is not a valid release state + */ + function betterStates($state, $include = false) + { + static $states = array('snapshot', 'devel', 'alpha', 'beta', 'stable'); + $i = array_search($state, $states); + if ($i === false) { + return false; + } + if ($include) { + $i--; + } + return array_slice($states, $i + 1); + } + + // }}} + // {{{ detectDependencies() + + function detectDependencies($any, $status_callback = null) + { + if (!function_exists("token_get_all")) { + return false; + } + if (PEAR::isError($info = $this->infoFromAny($any))) { + return $this->raiseError($info); + } + if (!is_array($info)) { + return false; + } + $deps = array(); + $used_c = $decl_c = $decl_f = $decl_m = array(); + foreach ($info['filelist'] as $file => $fa) { + $tmp = $this->analyzeSourceCode($file); + $used_c = @array_merge($used_c, $tmp['used_classes']); + $decl_c = @array_merge($decl_c, $tmp['declared_classes']); + $decl_f = @array_merge($decl_f, $tmp['declared_functions']); + $decl_m = @array_merge($decl_m, $tmp['declared_methods']); + $inheri = @array_merge($inheri, $tmp['inheritance']); + } + $used_c = array_unique($used_c); + $decl_c = array_unique($decl_c); + $undecl_c = array_diff($used_c, $decl_c); + return array('used_classes' => $used_c, + 'declared_classes' => $decl_c, + 'declared_methods' => $decl_m, + 'declared_functions' => $decl_f, + 'undeclared_classes' => $undecl_c, + 'inheritance' => $inheri, + ); + } + + // }}} + // {{{ getUserRoles() + + /** + * Get the valid roles for a PEAR package maintainer + * + * @return array + * @static + */ + function getUserRoles() + { + return $GLOBALS['_PEAR_Common_maintainer_roles']; + } + + // }}} + // {{{ getReleaseStates() + + /** + * Get the valid package release states of packages + * + * @return array + * @static + */ + function getReleaseStates() + { + return $GLOBALS['_PEAR_Common_release_states']; + } + + // }}} + // {{{ getDependencyTypes() + + /** + * Get the implemented dependency types (php, ext, pkg etc.) + * + * @return array + * @static + */ + function getDependencyTypes() + { + return $GLOBALS['_PEAR_Common_dependency_types']; + } + + // }}} + // {{{ getDependencyRelations() + + /** + * Get the implemented dependency relations (has, lt, ge etc.) + * + * @return array + * @static + */ + function getDependencyRelations() + { + return $GLOBALS['_PEAR_Common_dependency_relations']; + } + + // }}} + // {{{ getFileRoles() + + /** + * Get the implemented file roles + * + * @return array + * @static + */ + function getFileRoles() + { + return $GLOBALS['_PEAR_Common_file_roles']; + } + + // }}} + // {{{ getReplacementTypes() + + /** + * Get the implemented file replacement types in + * + * @return array + * @static + */ + function getReplacementTypes() + { + return $GLOBALS['_PEAR_Common_replacement_types']; + } + + // }}} + // {{{ getProvideTypes() + + /** + * Get the implemented file replacement types in + * + * @return array + * @static + */ + function getProvideTypes() + { + return $GLOBALS['_PEAR_Common_provide_types']; + } + + // }}} + // {{{ getScriptPhases() + + /** + * Get the implemented file replacement types in + * + * @return array + * @static + */ + function getScriptPhases() + { + return $GLOBALS['_PEAR_Common_script_phases']; + } + + // }}} + // {{{ validPackageName() + + /** + * Test whether a string contains a valid package name. + * + * @param string $name the package name to test + * + * @return bool + * + * @access public + */ + function validPackageName($name) + { + return (bool)preg_match(PEAR_COMMON_PACKAGE_NAME_PREG, $name); + } + + + // }}} + // {{{ validPackageVersion() + + /** + * Test whether a string contains a valid package version. + * + * @param string $ver the package version to test + * + * @return bool + * + * @access public + */ + function validPackageVersion($ver) + { + return (bool)preg_match(PEAR_COMMON_PACKAGE_VERSION_PREG, $ver); + } + + + // }}} + + // {{{ downloadHttp() + + /** + * Download a file through HTTP. Considers suggested file name in + * Content-disposition: header and can run a callback function for + * different events. The callback will be called with two + * parameters: the callback type, and parameters. The implemented + * callback types are: + * + * 'setup' called at the very beginning, parameter is a UI object + * that should be used for all output + * 'message' the parameter is a string with an informational message + * 'saveas' may be used to save with a different file name, the + * parameter is the filename that is about to be used. + * If a 'saveas' callback returns a non-empty string, + * that file name will be used as the filename instead. + * Note that $save_dir will not be affected by this, only + * the basename of the file. + * 'start' download is starting, parameter is number of bytes + * that are expected, or -1 if unknown + * 'bytesread' parameter is the number of bytes read so far + * 'done' download is complete, parameter is the total number + * of bytes read + * 'connfailed' if the TCP connection fails, this callback is called + * with array(host,port,errno,errmsg) + * 'writefailed' if writing to disk fails, this callback is called + * with array(destfile,errmsg) + * + * If an HTTP proxy has been configured (http_proxy PEAR_Config + * setting), the proxy will be used. + * + * @param string $url the URL to download + * @param object $ui PEAR_Frontend_* instance + * @param object $config PEAR_Config instance + * @param string $save_dir (optional) directory to save file in + * @param mixed $callback (optional) function/method to call for status + * updates + * + * @return string Returns the full path of the downloaded file or a PEAR + * error on failure. If the error is caused by + * socket-related errors, the error object will + * have the fsockopen error code available through + * getCode(). + * + * @access public + * @deprecated in favor of PEAR_Downloader::downloadHttp() + */ + function downloadHttp($url, &$ui, $save_dir = '.', $callback = null) + { + if (!class_exists('PEAR_Downloader')) { + require_once 'PEAR/Downloader.php'; + } + return PEAR_Downloader::downloadHttp($url, $ui, $save_dir, $callback); + } + + // }}} + + /** + * @param string $path relative or absolute include path + * @return boolean + * @static + */ + function isIncludeable($path) + { + if (file_exists($path) && is_readable($path)) { + return true; + } + $ipath = explode(PATH_SEPARATOR, ini_get('include_path')); + foreach ($ipath as $include) { + $test = realpath($include . DIRECTORY_SEPARATOR . $path); + if (file_exists($test) && is_readable($test)) { + return true; + } + } + return false; + } +} +require_once 'PEAR/Config.php'; +require_once 'PEAR/PackageFile.php'; +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Config.php b/campcaster/src/tools/pear/src/PEAR/Config.php new file mode 100644 index 000000000..1992e6817 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Config.php @@ -0,0 +1,2098 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Config.php,v 1.124.2.3 2006/07/15 00:38:27 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * Required for error handling + */ +require_once 'PEAR.php'; +require_once 'PEAR/Registry.php'; +require_once 'PEAR/Installer/Role.php'; +require_once 'System.php'; +require_once 'PEAR/Remote.php'; + +/** + * Last created PEAR_Config instance. + * @var object + */ +$GLOBALS['_PEAR_Config_instance'] = null; +if (!defined('PEAR_INSTALL_DIR') || !PEAR_INSTALL_DIR) { + $PEAR_INSTALL_DIR = PHP_LIBDIR . DIRECTORY_SEPARATOR . 'pear'; +} else { + $PEAR_INSTALL_DIR = PEAR_INSTALL_DIR; +} + +// Below we define constants with default values for all configuration +// parameters except username/password. All of them can have their +// defaults set through environment variables. The reason we use the +// PHP_ prefix is for some security, PHP protects environment +// variables starting with PHP_*. + +// default channel and preferred mirror is based on whether we are invoked through +// the "pear" or the "pecl" command + +if (!defined('PEAR_RUNTYPE') || PEAR_RUNTYPE == 'pear') { + define('PEAR_CONFIG_DEFAULT_CHANNEL', 'pear.php.net'); +} else { + define('PEAR_CONFIG_DEFAULT_CHANNEL', 'pecl.php.net'); +} + +if (getenv('PHP_PEAR_SYSCONF_DIR')) { + define('PEAR_CONFIG_SYSCONFDIR', getenv('PHP_PEAR_SYSCONF_DIR')); +} elseif (getenv('SystemRoot')) { + define('PEAR_CONFIG_SYSCONFDIR', getenv('SystemRoot')); +} else { + define('PEAR_CONFIG_SYSCONFDIR', PHP_SYSCONFDIR); +} + +// Default for master_server +if (getenv('PHP_PEAR_MASTER_SERVER')) { + define('PEAR_CONFIG_DEFAULT_MASTER_SERVER', getenv('PHP_PEAR_MASTER_SERVER')); +} else { + define('PEAR_CONFIG_DEFAULT_MASTER_SERVER', 'pear.php.net'); +} + +// Default for http_proxy +if (getenv('PHP_PEAR_HTTP_PROXY')) { + define('PEAR_CONFIG_DEFAULT_HTTP_PROXY', getenv('PHP_PEAR_HTTP_PROXY')); +} elseif (getenv('http_proxy')) { + define('PEAR_CONFIG_DEFAULT_HTTP_PROXY', getenv('http_proxy')); +} else { + define('PEAR_CONFIG_DEFAULT_HTTP_PROXY', ''); +} + +// Default for php_dir +if (getenv('PHP_PEAR_INSTALL_DIR')) { + define('PEAR_CONFIG_DEFAULT_PHP_DIR', getenv('PHP_PEAR_INSTALL_DIR')); +} else { + if (@is_dir($PEAR_INSTALL_DIR)) { + define('PEAR_CONFIG_DEFAULT_PHP_DIR', + $PEAR_INSTALL_DIR); + } else { + define('PEAR_CONFIG_DEFAULT_PHP_DIR', $PEAR_INSTALL_DIR); + } +} + +// Default for ext_dir +if (getenv('PHP_PEAR_EXTENSION_DIR')) { + define('PEAR_CONFIG_DEFAULT_EXT_DIR', getenv('PHP_PEAR_EXTENSION_DIR')); +} else { + if (ini_get('extension_dir')) { + define('PEAR_CONFIG_DEFAULT_EXT_DIR', ini_get('extension_dir')); + } elseif (defined('PEAR_EXTENSION_DIR') && @is_dir(PEAR_EXTENSION_DIR)) { + define('PEAR_CONFIG_DEFAULT_EXT_DIR', PEAR_EXTENSION_DIR); + } elseif (defined('PHP_EXTENSION_DIR')) { + define('PEAR_CONFIG_DEFAULT_EXT_DIR', PHP_EXTENSION_DIR); + } else { + define('PEAR_CONFIG_DEFAULT_EXT_DIR', '.'); + } +} + +// Default for doc_dir +if (getenv('PHP_PEAR_DOC_DIR')) { + define('PEAR_CONFIG_DEFAULT_DOC_DIR', getenv('PHP_PEAR_DOC_DIR')); +} else { + define('PEAR_CONFIG_DEFAULT_DOC_DIR', + $PEAR_INSTALL_DIR.DIRECTORY_SEPARATOR.'docs'); +} + +// Default for bin_dir +if (getenv('PHP_PEAR_BIN_DIR')) { + define('PEAR_CONFIG_DEFAULT_BIN_DIR', getenv('PHP_PEAR_BIN_DIR')); +} else { + define('PEAR_CONFIG_DEFAULT_BIN_DIR', PHP_BINDIR); +} + +// Default for data_dir +if (getenv('PHP_PEAR_DATA_DIR')) { + define('PEAR_CONFIG_DEFAULT_DATA_DIR', getenv('PHP_PEAR_DATA_DIR')); +} else { + define('PEAR_CONFIG_DEFAULT_DATA_DIR', + $PEAR_INSTALL_DIR.DIRECTORY_SEPARATOR.'data'); +} + +// Default for test_dir +if (getenv('PHP_PEAR_TEST_DIR')) { + define('PEAR_CONFIG_DEFAULT_TEST_DIR', getenv('PHP_PEAR_TEST_DIR')); +} else { + define('PEAR_CONFIG_DEFAULT_TEST_DIR', + $PEAR_INSTALL_DIR.DIRECTORY_SEPARATOR.'tests'); +} + +// Default for temp_dir +if (getenv('PHP_PEAR_TEMP_DIR')) { + define('PEAR_CONFIG_DEFAULT_TEMP_DIR', getenv('PHP_PEAR_TEMP_DIR')); +} else { + define('PEAR_CONFIG_DEFAULT_TEMP_DIR', + System::tmpdir() . DIRECTORY_SEPARATOR . 'pear' . + DIRECTORY_SEPARATOR . 'temp'); +} + +// Default for cache_dir +if (getenv('PHP_PEAR_CACHE_DIR')) { + define('PEAR_CONFIG_DEFAULT_CACHE_DIR', getenv('PHP_PEAR_CACHE_DIR')); +} else { + define('PEAR_CONFIG_DEFAULT_CACHE_DIR', + System::tmpdir() . DIRECTORY_SEPARATOR . 'pear' . + DIRECTORY_SEPARATOR . 'cache'); +} + +// Default for download_dir +if (getenv('PHP_PEAR_DOWNLOAD_DIR')) { + define('PEAR_CONFIG_DEFAULT_DOWNLOAD_DIR', getenv('PHP_PEAR_DOWNLOAD_DIR')); +} else { + define('PEAR_CONFIG_DEFAULT_DOWNLOAD_DIR', + System::tmpdir() . DIRECTORY_SEPARATOR . 'pear' . + DIRECTORY_SEPARATOR . 'download'); +} + +// Default for php_bin +if (getenv('PHP_PEAR_PHP_BIN')) { + define('PEAR_CONFIG_DEFAULT_PHP_BIN', getenv('PHP_PEAR_PHP_BIN')); +} else { + define('PEAR_CONFIG_DEFAULT_PHP_BIN', PEAR_CONFIG_DEFAULT_BIN_DIR. + DIRECTORY_SEPARATOR.'php'.(OS_WINDOWS ? '.exe' : '')); +} + +// Default for verbose +if (getenv('PHP_PEAR_VERBOSE')) { + define('PEAR_CONFIG_DEFAULT_VERBOSE', getenv('PHP_PEAR_VERBOSE')); +} else { + define('PEAR_CONFIG_DEFAULT_VERBOSE', 1); +} + +// Default for preferred_state +if (getenv('PHP_PEAR_PREFERRED_STATE')) { + define('PEAR_CONFIG_DEFAULT_PREFERRED_STATE', getenv('PHP_PEAR_PREFERRED_STATE')); +} else { + define('PEAR_CONFIG_DEFAULT_PREFERRED_STATE', 'stable'); +} + +// Default for umask +if (getenv('PHP_PEAR_UMASK')) { + define('PEAR_CONFIG_DEFAULT_UMASK', getenv('PHP_PEAR_UMASK')); +} else { + define('PEAR_CONFIG_DEFAULT_UMASK', decoct(umask())); +} + +// Default for cache_ttl +if (getenv('PHP_PEAR_CACHE_TTL')) { + define('PEAR_CONFIG_DEFAULT_CACHE_TTL', getenv('PHP_PEAR_CACHE_TTL')); +} else { + define('PEAR_CONFIG_DEFAULT_CACHE_TTL', 3600); +} + +// Default for sig_type +if (getenv('PHP_PEAR_SIG_TYPE')) { + define('PEAR_CONFIG_DEFAULT_SIG_TYPE', getenv('PHP_PEAR_SIG_TYPE')); +} else { + define('PEAR_CONFIG_DEFAULT_SIG_TYPE', 'gpg'); +} + +// Default for sig_bin +if (getenv('PHP_PEAR_SIG_BIN')) { + define('PEAR_CONFIG_DEFAULT_SIG_BIN', getenv('PHP_PEAR_SIG_BIN')); +} else { + define('PEAR_CONFIG_DEFAULT_SIG_BIN', + System::which( + 'gpg', OS_WINDOWS ? 'c:\gnupg\gpg.exe' : '/usr/local/bin/gpg')); +} + +// Default for sig_keydir +if (getenv('PHP_PEAR_SIG_KEYDIR')) { + define('PEAR_CONFIG_DEFAULT_SIG_KEYDIR', getenv('PHP_PEAR_SIG_KEYDIR')); +} else { + define('PEAR_CONFIG_DEFAULT_SIG_KEYDIR', + PEAR_CONFIG_SYSCONFDIR . DIRECTORY_SEPARATOR . 'pearkeys'); +} + +/** + * This is a class for storing configuration data, keeping track of + * which are system-defined, user-defined or defaulted. + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Config extends PEAR +{ + // {{{ properties + + /** + * Array of config files used. + * + * @var array layer => config file + */ + var $files = array( + 'system' => '', + 'user' => '', + ); + + var $layers = array(); + + /** + * Configuration data, two-dimensional array where the first + * dimension is the config layer ('user', 'system' and 'default'), + * and the second dimension is keyname => value. + * + * The order in the first dimension is important! Earlier + * layers will shadow later ones when a config value is + * requested (if a 'user' value exists, it will be returned first, + * then 'system' and finally 'default'). + * + * @var array layer => array(keyname => value, ...) + */ + var $configuration = array( + 'user' => array(), + 'system' => array(), + 'default' => array(), + ); + + /** + * Configuration values that can be set for a channel + * + * All other configuration values can only have a global value + * @var array + * @access private + */ + var $_channelConfigInfo = array( + 'php_dir', 'ext_dir', 'doc_dir', 'bin_dir', 'data_dir', + 'test_dir', 'php_bin', 'username', 'password', 'verbose', + 'preferred_state', 'umask', 'preferred_mirror', + ); + + /** + * Channels that can be accessed + * @see setChannels() + * @var array + * @access private + */ + var $_channels = array('pear.php.net', 'pecl.php.net', '__uri'); + + /** + * This variable is used to control the directory values returned + * @see setInstallRoot(); + * @var string|false + * @access private + */ + var $_installRoot = false; + + /** + * If requested, this will always refer to the registry + * contained in php_dir + * @var PEAR_Registry + */ + var $_registry = array(); + + /** + * @var array + * @access private + */ + var $_regInitialized = array(); + + /** + * @var bool + * @access private + */ + var $_noRegistry = false; + + /** + * amount of errors found while parsing config + * @var integer + * @access private + */ + var $_errorsFound = 0; + var $_lastError = null; + + /** + * Information about the configuration data. Stores the type, + * default value and a documentation string for each configuration + * value. + * + * @var array layer => array(infotype => value, ...) + */ + var $configuration_info = array( + // Channels/Internet Access + 'default_channel' => array( + 'type' => 'string', + 'default' => PEAR_CONFIG_DEFAULT_CHANNEL, + 'doc' => 'the default channel to use for all non explicit commands', + 'prompt' => 'Default Channel', + 'group' => 'Internet Access', + ), + 'preferred_mirror' => array( + 'type' => 'string', + 'default' => PEAR_CONFIG_DEFAULT_CHANNEL, + 'doc' => 'the default server or mirror to use for channel actions', + 'prompt' => 'Default Channel Mirror', + 'group' => 'Internet Access', + ), + 'remote_config' => array( + 'type' => 'password', + 'default' => '', + 'doc' => 'ftp url of remote configuration file to use for synchronized install', + 'prompt' => 'Remote Configuration File', + 'group' => 'Internet Access', + ), + 'auto_discover' => array( + 'type' => 'integer', + 'default' => 0, + 'doc' => 'whether to automatically discover new channels', + 'prompt' => 'Auto-discover new Channels', + 'group' => 'Internet Access', + ), + // Internet Access + 'master_server' => array( + 'type' => 'string', + 'default' => 'pear.php.net', + 'doc' => 'name of the main PEAR server [NOT USED IN THIS VERSION]', + 'prompt' => 'PEAR server [DEPRECATED]', + 'group' => 'Internet Access', + ), + 'http_proxy' => array( + 'type' => 'string', + 'default' => PEAR_CONFIG_DEFAULT_HTTP_PROXY, + 'doc' => 'HTTP proxy (host:port) to use when downloading packages', + 'prompt' => 'HTTP Proxy Server Address', + 'group' => 'Internet Access', + ), + // File Locations + 'php_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_PHP_DIR, + 'doc' => 'directory where .php files are installed', + 'prompt' => 'PEAR directory', + 'group' => 'File Locations', + ), + 'ext_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_EXT_DIR, + 'doc' => 'directory where loadable extensions are installed', + 'prompt' => 'PHP extension directory', + 'group' => 'File Locations', + ), + 'doc_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_DOC_DIR, + 'doc' => 'directory where documentation is installed', + 'prompt' => 'PEAR documentation directory', + 'group' => 'File Locations', + ), + 'bin_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_BIN_DIR, + 'doc' => 'directory where executables are installed', + 'prompt' => 'PEAR executables directory', + 'group' => 'File Locations', + ), + 'data_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_DATA_DIR, + 'doc' => 'directory where data files are installed', + 'prompt' => 'PEAR data directory', + 'group' => 'File Locations (Advanced)', + ), + 'test_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_TEST_DIR, + 'doc' => 'directory where regression tests are installed', + 'prompt' => 'PEAR test directory', + 'group' => 'File Locations (Advanced)', + ), + 'cache_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_CACHE_DIR, + 'doc' => 'directory which is used for XMLRPC cache', + 'prompt' => 'PEAR Installer cache directory', + 'group' => 'File Locations (Advanced)', + ), + 'temp_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_TEMP_DIR, + 'doc' => 'directory which is used for all temp files', + 'prompt' => 'PEAR Installer temp directory', + 'group' => 'File Locations (Advanced)', + ), + 'download_dir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_CACHE_DIR, + 'doc' => 'directory which is used for all downloaded files', + 'prompt' => 'PEAR Installer download directory', + 'group' => 'File Locations (Advanced)', + ), + 'php_bin' => array( + 'type' => 'file', + 'default' => PEAR_CONFIG_DEFAULT_PHP_BIN, + 'doc' => 'PHP CLI/CGI binary for executing scripts', + 'prompt' => 'PHP CLI/CGI binary', + 'group' => 'File Locations (Advanced)', + ), + // Maintainers + 'username' => array( + 'type' => 'string', + 'default' => '', + 'doc' => '(maintainers) your PEAR account name', + 'prompt' => 'PEAR username (for maintainers)', + 'group' => 'Maintainers', + ), + 'password' => array( + 'type' => 'password', + 'default' => '', + 'doc' => '(maintainers) your PEAR account password', + 'prompt' => 'PEAR password (for maintainers)', + 'group' => 'Maintainers', + ), + // Advanced + 'verbose' => array( + 'type' => 'integer', + 'default' => PEAR_CONFIG_DEFAULT_VERBOSE, + 'doc' => 'verbosity level +0: really quiet +1: somewhat quiet +2: verbose +3: debug', + 'prompt' => 'Debug Log Level', + 'group' => 'Advanced', + ), + 'preferred_state' => array( + 'type' => 'set', + 'default' => PEAR_CONFIG_DEFAULT_PREFERRED_STATE, + 'doc' => 'the installer will prefer releases with this state when installing packages without a version or state specified', + 'valid_set' => array( + 'stable', 'beta', 'alpha', 'devel', 'snapshot'), + 'prompt' => 'Preferred Package State', + 'group' => 'Advanced', + ), + 'umask' => array( + 'type' => 'mask', + 'default' => PEAR_CONFIG_DEFAULT_UMASK, + 'doc' => 'umask used when creating files (Unix-like systems only)', + 'prompt' => 'Unix file mask', + 'group' => 'Advanced', + ), + 'cache_ttl' => array( + 'type' => 'integer', + 'default' => PEAR_CONFIG_DEFAULT_CACHE_TTL, + 'doc' => 'amount of secs where the local cache is used and not updated', + 'prompt' => 'Cache TimeToLive', + 'group' => 'Advanced', + ), + 'sig_type' => array( + 'type' => 'set', + 'default' => PEAR_CONFIG_DEFAULT_SIG_TYPE, + 'doc' => 'which package signature mechanism to use', + 'valid_set' => array('gpg'), + 'prompt' => 'Package Signature Type', + 'group' => 'Maintainers', + ), + 'sig_bin' => array( + 'type' => 'string', + 'default' => PEAR_CONFIG_DEFAULT_SIG_BIN, + 'doc' => 'which package signature mechanism to use', + 'prompt' => 'Signature Handling Program', + 'group' => 'Maintainers', + ), + 'sig_keyid' => array( + 'type' => 'string', + 'default' => '', + 'doc' => 'which key to use for signing with', + 'prompt' => 'Signature Key Id', + 'group' => 'Maintainers', + ), + 'sig_keydir' => array( + 'type' => 'directory', + 'default' => PEAR_CONFIG_DEFAULT_SIG_KEYDIR, + 'doc' => 'directory where signature keys are located', + 'prompt' => 'Signature Key Directory', + 'group' => 'Maintainers', + ), + // __channels is reserved - used for channel-specific configuration + ); + + // }}} + + // {{{ PEAR_Config([file], [defaults_file]) + + /** + * Constructor. + * + * @param string file to read user-defined options from + * @param string file to read system-wide defaults from + * @param bool determines whether a registry object "follows" + * the value of php_dir (is automatically created + * and moved when php_dir is changed) + * @param bool if true, fails if configuration files cannot be loaded + * + * @access public + * + * @see PEAR_Config::singleton + */ + function PEAR_Config($user_file = '', $system_file = '', $ftp_file = false, + $strict = true) + { + $this->PEAR(); + PEAR_Installer_Role::initializeConfig($this); + $sl = DIRECTORY_SEPARATOR; + if (empty($user_file)) { + if (OS_WINDOWS) { + $user_file = PEAR_CONFIG_SYSCONFDIR . $sl . 'pear.ini'; + } else { + $user_file = getenv('HOME') . $sl . '.pearrc'; + } + } + if (empty($system_file)) { + if (OS_WINDOWS) { + $system_file = PEAR_CONFIG_SYSCONFDIR . $sl . 'pearsys.ini'; + } else { + $system_file = PEAR_CONFIG_SYSCONFDIR . $sl . 'pear.conf'; + } + } + + $this->layers = array_keys($this->configuration); + $this->files['user'] = $user_file; + $this->files['system'] = $system_file; + if ($user_file && @file_exists($user_file)) { + $this->pushErrorHandling(PEAR_ERROR_RETURN); + $this->readConfigFile($user_file, 'user', $strict); + $this->popErrorHandling(); + if ($this->_errorsFound > 0) { + return; + } + } + + if ($system_file && @file_exists($system_file)) { + $this->mergeConfigFile($system_file, false, 'system', $strict); + if ($this->_errorsFound > 0) { + return; + } + + } + + if (!$ftp_file) { + $ftp_file = $this->get('remote_config'); + } + + if ($ftp_file && defined('PEAR_REMOTEINSTALL_OK')) { + $this->readFTPConfigFile($ftp_file); + } + + foreach ($this->configuration_info as $key => $info) { + $this->configuration['default'][$key] = $info['default']; + } + + $this->_registry['default'] = &new PEAR_Registry($this->configuration['default']['php_dir']); + $this->_registry['default']->setConfig($this); + $this->_regInitialized['default'] = false; + //$GLOBALS['_PEAR_Config_instance'] = &$this; + } + + // }}} + // {{{ singleton([file], [defaults_file]) + + /** + * Static singleton method. If you want to keep only one instance + * of this class in use, this method will give you a reference to + * the last created PEAR_Config object if one exists, or create a + * new object. + * + * @param string (optional) file to read user-defined options from + * @param string (optional) file to read system-wide defaults from + * + * @return object an existing or new PEAR_Config instance + * + * @access public + * + * @see PEAR_Config::PEAR_Config + */ + function &singleton($user_file = '', $system_file = '', $strict = true) + { + if (is_object($GLOBALS['_PEAR_Config_instance'])) { + return $GLOBALS['_PEAR_Config_instance']; + } + + $t_conf = &new PEAR_Config($user_file, $system_file, false, $strict); + if ($t_conf->_errorsFound > 0) { + return $t_conf->lastError; + } + + $GLOBALS['_PEAR_Config_instance'] = &$t_conf; + return $GLOBALS['_PEAR_Config_instance']; + } + + // }}} + // {{{ validConfiguration() + + /** + * Determine whether any configuration files have been detected, and whether a + * registry object can be retrieved from this configuration. + * @return bool + * @since PEAR 1.4.0a1 + */ + function validConfiguration() + { + if ($this->isDefinedLayer('user') || $this->isDefinedLayer('system')) { + return true; + } + return false; + } + + // }}} + // {{{ readConfigFile([file], [layer]) + + /** + * Reads configuration data from a file. All existing values in + * the config layer are discarded and replaced with data from the + * file. + * @param string file to read from, if NULL or not specified, the + * last-used file for the same layer (second param) is used + * @param string config layer to insert data into ('user' or 'system') + * @return bool TRUE on success or a PEAR error on failure + */ + function readConfigFile($file = null, $layer = 'user', $strict = true) + { + if (empty($this->files[$layer])) { + return $this->raiseError("unknown config layer `$layer'"); + } + + if ($file === null) { + $file = $this->files[$layer]; + } + + $data = $this->_readConfigDataFrom($file); + + if (PEAR::isError($data)) { + if ($strict) { + $this->_errorsFound++; + $this->lastError = $data; + + return $data; + } else { + return true; + } + } else { + $this->files[$layer] = $file; + } + + $this->_decodeInput($data); + $this->configuration[$layer] = $data; + $this->_setupChannels(); + if (!$this->_noRegistry && ($phpdir = $this->get('php_dir', $layer, 'pear.php.net'))) { + $this->_registry[$layer] = &new PEAR_Registry($phpdir); + $this->_registry[$layer]->setConfig($this); + $this->_regInitialized[$layer] = false; + } else { + unset($this->_registry[$layer]); + } + return true; + } + + // }}} + + /** + * @param string url to the remote config file, like ftp://www.example.com/pear/config.ini + * @return true|PEAR_Error + */ + function readFTPConfigFile($path) + { + do { // poor man's try + if (!class_exists('Net_FTP')) { + if (!class_exists('PEAR_Common')) { + require_once 'PEAR/Common.php'; + } + if (PEAR_Common::isIncludeable('Net/FTP.php')) { + include_once 'Net/FTP.php'; + } + } + if (class_exists('Net_FTP') && + (class_exists('PEAR_FTP') || PEAR_Common::isIncludeable('PEAR/FTP.php'))) { + require_once 'PEAR/FTP.php'; + $this->_ftp = &new PEAR_FTP; + $this->_ftp->pushErrorHandling(PEAR_ERROR_RETURN); + $e = $this->_ftp->init($path); + if (PEAR::isError($e)) { + $this->_ftp->popErrorHandling(); + return $e; + } + $tmp = System::mktemp('-d'); + PEAR_Common::addTempFile($tmp); + $e = $this->_ftp->get(basename($path), $tmp . DIRECTORY_SEPARATOR . + 'pear.ini', false, FTP_BINARY); + if (PEAR::isError($e)) { + $this->_ftp->popErrorHandling(); + return $e; + } + PEAR_Common::addTempFile($tmp . DIRECTORY_SEPARATOR . 'pear.ini'); + $this->_ftp->disconnect(); + $this->_ftp->popErrorHandling(); + $this->files['ftp'] = $tmp . DIRECTORY_SEPARATOR . 'pear.ini'; + $e = $this->readConfigFile(null, 'ftp'); + if (PEAR::isError($e)) { + return $e; + } + $fail = array(); + foreach ($this->configuration_info as $key => $val) { + if (in_array($this->getGroup($key), + array('File Locations', 'File Locations (Advanced)')) && + $this->getType($key) == 'directory') { + // any directory configs must be set for this to work + if (!isset($this->configuration['ftp'][$key])) { + $fail[] = $key; + } + } + } + if (count($fail)) { + $fail = '"' . implode('", "', $fail) . '"'; + unset($this->files['ftp']); + unset($this->configuration['ftp']); + return PEAR::raiseError('ERROR: Ftp configuration file must set all ' . + 'directory configuration variables. These variables were not set: ' . + $fail); + } else { + return true; + } + } else { + return PEAR::raiseError('Net_FTP must be installed to use remote config'); + } + } while (false); // poor man's catch + unset($this->files['ftp']); + return PEAR::raiseError('no remote host specified'); + } + + // {{{ _setupChannels() + + /** + * Reads the existing configurations and creates the _channels array from it + */ + function _setupChannels() + { + $set = array_flip(array_values($this->_channels)); + foreach ($this->configuration as $layer => $data) { + $i = 1000; + if (isset($data['__channels'])) { + foreach ($data['__channels'] as $channel => $info) { + $set[$channel] = $i++; + } + } + } + $this->_channels = array_values(array_flip($set)); + $this->setChannels($this->_channels); + } + + // }}} + // {{{ deleteChannel(channel) + + function deleteChannel($channel) + { + foreach ($this->configuration as $layer => $data) { + if (isset($data['__channels'])) { + if (isset($data['__channels'][strtolower($channel)])) { + unset($this->configuration[$layer]['__channels'][strtolower($channel)]); + } + } + } + $this->_channels = array_flip($this->_channels); + unset($this->_channels[strtolower($channel)]); + $this->_channels = array_flip($this->_channels); + } + + // }}} + // {{{ mergeConfigFile(file, [override], [layer]) + + /** + * Merges data into a config layer from a file. Does the same + * thing as readConfigFile, except it does not replace all + * existing values in the config layer. + * @param string file to read from + * @param bool whether to overwrite existing data (default TRUE) + * @param string config layer to insert data into ('user' or 'system') + * @param string if true, errors are returned if file opening fails + * @return bool TRUE on success or a PEAR error on failure + */ + function mergeConfigFile($file, $override = true, $layer = 'user', $strict = true) + { + if (empty($this->files[$layer])) { + return $this->raiseError("unknown config layer `$layer'"); + } + if ($file === null) { + $file = $this->files[$layer]; + } + $data = $this->_readConfigDataFrom($file); + if (PEAR::isError($data)) { + if ($strict) { + $this->_errorsFound++; + $this->lastError = $data; + + return $data; + } else { + return true; + } + } + $this->_decodeInput($data); + if ($override) { + $this->configuration[$layer] = + PEAR_Config::arrayMergeRecursive($this->configuration[$layer], $data); + } else { + $this->configuration[$layer] = + PEAR_Config::arrayMergeRecursive($data, $this->configuration[$layer]); + } + $this->_setupChannels(); + if (!$this->_noRegistry && ($phpdir = $this->get('php_dir', $layer, 'pear.php.net'))) { + $this->_registry[$layer] = &new PEAR_Registry($phpdir); + $this->_registry[$layer]->setConfig($this); + $this->_regInitialized[$layer] = false; + } else { + unset($this->_registry[$layer]); + } + return true; + } + + // }}} + // {{{ arrayMergeRecursive($arr2, $arr1) + /** + * @param array + * @param array + * @return array + * @static + */ + function arrayMergeRecursive($arr2, $arr1) + { + $ret = array(); + foreach ($arr2 as $key => $data) { + if (!isset($arr1[$key])) { + $ret[$key] = $data; + unset($arr1[$key]); + continue; + } + if (is_array($data)) { + if (!is_array($arr1[$key])) { + $ret[$key] = $arr1[$key]; + unset($arr1[$key]); + continue; + } + $ret[$key] = PEAR_Config::arrayMergeRecursive($arr1[$key], $arr2[$key]); + unset($arr1[$key]); + } + } + return array_merge($ret, $arr1); + } + + // }}} + // {{{ writeConfigFile([file], [layer]) + + /** + * Writes data into a config layer from a file. + * + * @param string|null file to read from, or null for default + * @param string config layer to insert data into ('user' or + * 'system') + * @param string|null data to write to config file or null for internal data [DEPRECATED] + * @return bool TRUE on success or a PEAR error on failure + */ + function writeConfigFile($file = null, $layer = 'user', $data = null) + { + $this->_lazyChannelSetup($layer); + if ($layer == 'both' || $layer == 'all') { + foreach ($this->files as $type => $file) { + $err = $this->writeConfigFile($file, $type, $data); + if (PEAR::isError($err)) { + return $err; + } + } + return true; + } + if (empty($this->files[$layer])) { + return $this->raiseError("unknown config file type `$layer'"); + } + if ($file === null) { + $file = $this->files[$layer]; + } + $data = ($data === null) ? $this->configuration[$layer] : $data; + $this->_encodeOutput($data); + $opt = array('-p', dirname($file)); + if (!@System::mkDir($opt)) { + return $this->raiseError("could not create directory: " . dirname($file)); + } + if (@is_file($file) && !@is_writeable($file)) { + return $this->raiseError("no write access to $file!"); + } + $fp = @fopen($file, "w"); + if (!$fp) { + return $this->raiseError("PEAR_Config::writeConfigFile fopen('$file','w') failed"); + } + $contents = "#PEAR_Config 0.9\n" . serialize($data); + if (!@fwrite($fp, $contents)) { + return $this->raiseError("PEAR_Config::writeConfigFile: fwrite failed"); + } + return true; + } + + // }}} + // {{{ _readConfigDataFrom(file) + + /** + * Reads configuration data from a file and returns the parsed data + * in an array. + * + * @param string file to read from + * + * @return array configuration data or a PEAR error on failure + * + * @access private + */ + function _readConfigDataFrom($file) + { + $fp = @fopen($file, "r"); + if (!$fp) { + return $this->raiseError("PEAR_Config::readConfigFile fopen('$file','r') failed"); + } + $size = filesize($file); + $rt = get_magic_quotes_runtime(); + set_magic_quotes_runtime(0); + if (function_exists('file_get_contents')) { + fclose($fp); + $contents = file_get_contents($file); + } else { + $contents = @fread($fp, $size); + fclose($fp); + } + if (empty($contents)) { + return $this->raiseError('Configuration file "' . $file . '" is empty'); + } + + set_magic_quotes_runtime($rt); + + $version = false; + if (preg_match('/^#PEAR_Config\s+(\S+)\s+/si', $contents, $matches)) { + $version = $matches[1]; + $contents = substr($contents, strlen($matches[0])); + } else { + // Museum config file + if (substr($contents,0,2) == 'a:') { + $version = '0.1'; + } + } + if ($version && version_compare("$version", '1', '<')) { + + // no '@', it is possible that unserialize + // raises a notice but it seems to block IO to + // STDOUT if a '@' is used and a notice is raise + $data = unserialize($contents); + + if (!is_array($data) && !$data) { + if ($contents == serialize(false)) { + $data = array(); + } else { + $err = $this->raiseError("PEAR_Config: bad data in $file"); + return $err; + } + } + if (!is_array($data)) { + if (strlen(trim($contents)) > 0) { + $error = "PEAR_Config: bad data in $file"; + $err = $this->raiseError($error); + return $err; + } else { + $data = array(); + } + } + // add parsing of newer formats here... + } else { + $err = $this->raiseError("$file: unknown version `$version'"); + return $err; + } + return $data; + } + + // }}} + // {{{ getConfFile(layer) + /** + * Gets the file used for storing the config for a layer + * + * @param string $layer 'user' or 'system' + */ + + function getConfFile($layer) + { + return $this->files[$layer]; + } + + // }}} + + /** + * @param array information on a role as parsed from its xml file + * @return true|PEAR_Error + * @access private + */ + function _addConfigVars($vars) + { + if (count($vars) > 3) { + return $this->raiseError('Roles can only define 3 new config variables or less'); + } + foreach ($vars as $name => $var) { + if (!is_array($var)) { + return $this->raiseError('Configuration information must be an array'); + } + if (!isset($var['type'])) { + return $this->raiseError('Configuration information must contain a type'); + } else { + if (!in_array($var['type'], + array('string', 'mask', 'password', 'directory', 'file', 'set'))) { + return $this->raiseError( + 'Configuration type must be one of directory, file, string, ' . + 'mask, set, or password'); + } + } + if (!isset($var['default'])) { + return $this->raiseError( + 'Configuration information must contain a default value ("default" index)'); + } else { + if (is_array($var['default'])) { + $real_default = ''; + foreach ($var['default'] as $config_var => $val) { + if (strpos($config_var, 'text') === 0) { + $real_default .= $val; + } elseif (strpos($config_var, 'constant') === 0) { + if (defined($val)) { + $real_default .= constant($val); + } else { + return $this->raiseError( + 'Unknown constant "' . $val . '" requested in ' . + 'default value for configuration variable "' . + $name . '"'); + } + } elseif (isset($this->configuration_info[$config_var])) { + $real_default .= + $this->configuration_info[$config_var]['default']; + } else { + return $this->raiseError( + 'Unknown request for "' . $config_var . '" value in ' . + 'default value for configuration variable "' . + $name . '"'); + } + } + $var['default'] = $real_default; + } + if ($var['type'] == 'integer') { + $var['default'] = (integer) $var['default']; + } + } + if (!isset($var['doc'])) { + return $this->raiseError( + 'Configuration information must contain a summary ("doc" index)'); + } + if (!isset($var['prompt'])) { + return $this->raiseError( + 'Configuration information must contain a simple prompt ("prompt" index)'); + } + if (!isset($var['group'])) { + return $this->raiseError( + 'Configuration information must contain a simple group ("group" index)'); + } + if (isset($this->configuration_info[$name])) { + return $this->raiseError('Configuration variable "' . $name . + '" already exists'); + } + $this->configuration_info[$name] = $var; + } + return true; + } + + // {{{ _encodeOutput(&data) + + /** + * Encodes/scrambles configuration data before writing to files. + * Currently, 'password' values will be base64-encoded as to avoid + * that people spot cleartext passwords by accident. + * + * @param array (reference) array to encode values in + * + * @return bool TRUE on success + * + * @access private + */ + function _encodeOutput(&$data) + { + foreach ($data as $key => $value) { + if ($key == '__channels') { + foreach ($data['__channels'] as $channel => $blah) { + $this->_encodeOutput($data['__channels'][$channel]); + } + } + if (!isset($this->configuration_info[$key])) { + continue; + } + $type = $this->configuration_info[$key]['type']; + switch ($type) { + // we base64-encode passwords so they are at least + // not shown in plain by accident + case 'password': { + $data[$key] = base64_encode($data[$key]); + break; + } + case 'mask': { + $data[$key] = octdec($data[$key]); + break; + } + } + } + return true; + } + + // }}} + // {{{ _decodeInput(&data) + + /** + * Decodes/unscrambles configuration data after reading from files. + * + * @param array (reference) array to encode values in + * + * @return bool TRUE on success + * + * @access private + * + * @see PEAR_Config::_encodeOutput + */ + function _decodeInput(&$data) + { + if (!is_array($data)) { + return true; + } + foreach ($data as $key => $value) { + if ($key == '__channels') { + foreach ($data['__channels'] as $channel => $blah) { + $this->_decodeInput($data['__channels'][$channel]); + } + } + if (!isset($this->configuration_info[$key])) { + continue; + } + $type = $this->configuration_info[$key]['type']; + switch ($type) { + case 'password': { + $data[$key] = base64_decode($data[$key]); + break; + } + case 'mask': { + $data[$key] = decoct($data[$key]); + break; + } + } + } + return true; + } + + // }}} + // {{{ getDefaultChannel([layer]) + /** + * Retrieve the default channel. + * + * On startup, channels are not initialized, so if the default channel is not + * pear.php.net, then initialize the config. + * @param string registry layer + * @return string|false + */ + function getDefaultChannel($layer = null) + { + $ret = false; + if ($layer === null) { + foreach ($this->layers as $layer) { + if (isset($this->configuration[$layer]['default_channel'])) { + $ret = $this->configuration[$layer]['default_channel']; + break; + } + } + } elseif (isset($this->configuration[$layer]['default_channel'])) { + $ret = $this->configuration[$layer]['default_channel']; + } + if ($ret == 'pear.php.net' && defined('PEAR_RUNTYPE') && PEAR_RUNTYPE == 'pecl') { + $ret = 'pecl.php.net'; + } + if ($ret) { + if ($ret != 'pear.php.net') { + $this->_lazyChannelSetup(); + } + return $ret; + } + return PEAR_CONFIG_DEFAULT_CHANNEL; + } + + // {{{ get(key, [layer]) + /** + * Returns a configuration value, prioritizing layers as per the + * layers property. + * + * @param string config key + * + * @return mixed the config value, or NULL if not found + * + * @access public + */ + function get($key, $layer = null, $channel = false) + { + if (!isset($this->configuration_info[$key])) { + return null; + } + if ($key == '__channels') { + return null; + } + if ($key == 'default_channel') { + return $this->getDefaultChannel($layer); + } + if (!$channel) { + $channel = $this->getDefaultChannel(); + } elseif ($channel != 'pear.php.net') { + $this->_lazyChannelSetup(); + } + $channel = strtolower($channel); + + $test = (in_array($key, $this->_channelConfigInfo)) ? + $this->_getChannelValue($key, $layer, $channel) : + null; + if ($test !== null) { + if ($this->_installRoot) { + if (in_array($this->getGroup($key), + array('File Locations', 'File Locations (Advanced)')) && + $this->getType($key) == 'directory') { + return $this->_prependPath($test, $this->_installRoot); + } + } + return $test; + } + if ($layer === null) { + foreach ($this->layers as $layer) { + if (isset($this->configuration[$layer][$key])) { + $test = $this->configuration[$layer][$key]; + if ($this->_installRoot) { + if (in_array($this->getGroup($key), + array('File Locations', 'File Locations (Advanced)')) && + $this->getType($key) == 'directory') { + return $this->_prependPath($test, $this->_installRoot); + } + } + if ($key == 'preferred_mirror') { + $reg = &$this->getRegistry(); + if (is_object($reg)) { + $chan = &$reg->getChannel($channel); + if (PEAR::isError($chan)) { + return $channel; + } + if (!$chan->getMirror($test) && $chan->getName() != $test) { + return $channel; // mirror does not exist + } + } + } + return $test; + } + } + } elseif (isset($this->configuration[$layer][$key])) { + $test = $this->configuration[$layer][$key]; + if ($this->_installRoot) { + if (in_array($this->getGroup($key), + array('File Locations', 'File Locations (Advanced)')) && + $this->getType($key) == 'directory') { + return $this->_prependPath($test, $this->_installRoot); + } + } + if ($key == 'preferred_mirror') { + $reg = &$this->getRegistry(); + if (is_object($reg)) { + $chan = &$reg->getChannel($channel); + if (PEAR::isError($chan)) { + return $channel; + } + if (!$chan->getMirror($test) && $chan->getName() != $test) { + return $channel; // mirror does not exist + } + } + } + return $test; + } + return null; + } + + // }}} + // {{{ _getChannelValue(key, value, [layer]) + /** + * Returns a channel-specific configuration value, prioritizing layers as per the + * layers property. + * + * @param string config key + * + * @return mixed the config value, or NULL if not found + * + * @access private + */ + function _getChannelValue($key, $layer, $channel) + { + if ($key == '__channels' || $channel == 'pear.php.net') { + return null; + } + $ret = null; + if ($layer === null) { + foreach ($this->layers as $ilayer) { + if (isset($this->configuration[$ilayer]['__channels'][$channel][$key])) { + $ret = $this->configuration[$ilayer]['__channels'][$channel][$key]; + break; + } + } + } elseif (isset($this->configuration[$layer]['__channels'][$channel][$key])) { + $ret = $this->configuration[$layer]['__channels'][$channel][$key]; + } + if ($key == 'preferred_mirror') { + if ($ret !== null) { + $reg = &$this->getRegistry($layer); + if (is_object($reg)) { + $chan = &$reg->getChannel($channel); + if (PEAR::isError($chan)) { + return $channel; + } + if (!$chan->getMirror($ret) && $chan->getName() != $ret) { + return $channel; // mirror does not exist + } + } + return $ret; + } + if ($channel == $this->getDefaultChannel($layer)) { + return $channel; // we must use the channel name as the preferred mirror + // if the user has not chosen an alternate + } else { + return $this->getDefaultChannel($layer); + } + } + return $ret; + } + + + // }}} + // {{{ set(key, value, [layer]) + + /** + * Set a config value in a specific layer (defaults to 'user'). + * Enforces the types defined in the configuration_info array. An + * integer config variable will be cast to int, and a set config + * variable will be validated against its legal values. + * + * @param string config key + * @param string config value + * @param string (optional) config layer + * @param string channel to set this value for, or null for global value + * @return bool TRUE on success, FALSE on failure + */ + function set($key, $value, $layer = 'user', $channel = false) + { + if ($key == '__channels') { + return false; + } + if (!isset($this->configuration[$layer])) { + return false; + } + if ($key == 'default_channel') { + // can only set this value globally + $channel = 'pear.php.net'; + if ($value != 'pear.php.net') { + $this->_lazyChannelSetup($layer); + } + } + if ($key == 'preferred_mirror') { + if ($channel == '__uri') { + return false; // can't set the __uri pseudo-channel's mirror + } + $reg = &$this->getRegistry($layer); + if (is_object($reg)) { + $chan = &$reg->getChannel($channel ? $channel : 'pear.php.net'); + if (PEAR::isError($chan)) { + return false; + } + if (!$chan->getMirror($value) && $chan->getName() != $value) { + return false; // mirror does not exist + } + } + } + if (empty($this->configuration_info[$key])) { + return false; + } + extract($this->configuration_info[$key]); + switch ($type) { + case 'integer': + $value = (int)$value; + break; + case 'set': { + // If a valid_set is specified, require the value to + // be in the set. If there is no valid_set, accept + // any value. + if ($valid_set) { + reset($valid_set); + if ((key($valid_set) === 0 && !in_array($value, $valid_set)) || + (key($valid_set) !== 0 && empty($valid_set[$value]))) + { + return false; + } + } + break; + } + } + if (!$channel) { + $channel = $this->get('default_channel', null, 'pear.php.net'); + } + if (!in_array($channel, $this->_channels)) { + $this->_lazyChannelSetup($layer); + $reg = &$this->getRegistry($layer); + if ($reg) { + $channel = $reg->channelName($channel); + } + if (!in_array($channel, $this->_channels)) { + return false; + } + } + if ($channel != 'pear.php.net') { + if (in_array($key, $this->_channelConfigInfo)) { + $this->configuration[$layer]['__channels'][$channel][$key] = $value; + return true; + } else { + return false; + } + } else { + if ($key == 'default_channel') { + if (!isset($reg)) { + $reg = &$this->getRegistry($layer); + if (!$reg) { + $reg = &$this->getRegistry(); + } + } + if ($reg) { + $value = $reg->channelName($value); + } + if (!$value) { + return false; + } + } + } + $this->configuration[$layer][$key] = $value; + if ($key == 'php_dir' && !$this->_noRegistry) { + if (!isset($this->_registry[$layer]) || + $value != $this->_registry[$layer]->install_dir) { + $this->_registry[$layer] = &new PEAR_Registry($value); + $this->_regInitialized[$layer] = false; + $this->_registry[$layer]->setConfig($this); + } + } + return true; + } + + // }}} + function _lazyChannelSetup($uselayer = false) + { + if ($this->_noRegistry) { + return; + } + $merge = false; + foreach ($this->_registry as $layer => $p) { + if ($uselayer && $uselayer != $layer) { + continue; + } + if (!$this->_regInitialized[$layer]) { + if ($layer == 'default' && isset($this->_registry['user']) || + isset($this->_registry['system'])) { + // only use the default registry if there are no alternatives + continue; + } + if (!is_object($this->_registry[$layer])) { + if ($phpdir = $this->get('php_dir', $layer, 'pear.php.net')) { + $this->_registry[$layer] = &new PEAR_Registry($phpdir); + $this->_registry[$layer]->setConfig($this); + $this->_regInitialized[$layer] = false; + } else { + unset($this->_registry[$layer]); + return; + } + } + $this->setChannels($this->_registry[$layer]->listChannels(), $merge); + $this->_regInitialized[$layer] = true; + $merge = true; + } + } + } + // {{{ setChannels() + + /** + * Set the list of channels. + * + * This should be set via a call to {@link PEAR_Registry::listChannels()} + * @param array + * @param bool + * @return bool success of operation + */ + function setChannels($channels, $merge = false) + { + if (!is_array($channels)) { + return false; + } + if ($merge) { + $this->_channels = array_merge($this->_channels, $channels); + } else { + $this->_channels = $channels; + } + foreach ($channels as $channel) { + $channel = strtolower($channel); + if ($channel == 'pear.php.net') { + continue; + } + foreach ($this->layers as $layer) { + if (!isset($this->configuration[$layer]['__channels'][$channel]) + || !is_array($this->configuration[$layer]['__channels'][$channel])) { + $this->configuration[$layer]['__channels'][$channel] = array(); + } + } + } + return true; + } + + // }}} + // {{{ getType(key) + + /** + * Get the type of a config value. + * + * @param string config key + * + * @return string type, one of "string", "integer", "file", + * "directory", "set" or "password". + * + * @access public + * + */ + function getType($key) + { + if (isset($this->configuration_info[$key])) { + return $this->configuration_info[$key]['type']; + } + return false; + } + + // }}} + // {{{ getDocs(key) + + /** + * Get the documentation for a config value. + * + * @param string config key + * + * @return string documentation string + * + * @access public + * + */ + function getDocs($key) + { + if (isset($this->configuration_info[$key])) { + return $this->configuration_info[$key]['doc']; + } + return false; + } + // }}} + // {{{ getPrompt(key) + + /** + * Get the short documentation for a config value. + * + * @param string config key + * + * @return string short documentation string + * + * @access public + * + */ + function getPrompt($key) + { + if (isset($this->configuration_info[$key])) { + return $this->configuration_info[$key]['prompt']; + } + return false; + } + // }}} + // {{{ getGroup(key) + + /** + * Get the parameter group for a config key. + * + * @param string config key + * + * @return string parameter group + * + * @access public + * + */ + function getGroup($key) + { + if (isset($this->configuration_info[$key])) { + return $this->configuration_info[$key]['group']; + } + return false; + } + + // }}} + // {{{ getGroups() + + /** + * Get the list of parameter groups. + * + * @return array list of parameter groups + * + * @access public + * + */ + function getGroups() + { + $tmp = array(); + foreach ($this->configuration_info as $key => $info) { + $tmp[$info['group']] = 1; + } + return array_keys($tmp); + } + + // }}} + // {{{ getGroupKeys() + + /** + * Get the list of the parameters in a group. + * + * @param string $group parameter group + * + * @return array list of parameters in $group + * + * @access public + * + */ + function getGroupKeys($group) + { + $keys = array(); + foreach ($this->configuration_info as $key => $info) { + if ($info['group'] == $group) { + $keys[] = $key; + } + } + return $keys; + } + + // }}} + // {{{ getSetValues(key) + + /** + * Get the list of allowed set values for a config value. Returns + * NULL for config values that are not sets. + * + * @param string config key + * + * @return array enumerated array of set values, or NULL if the + * config key is unknown or not a set + * + * @access public + * + */ + function getSetValues($key) + { + if (isset($this->configuration_info[$key]) && + isset($this->configuration_info[$key]['type']) && + $this->configuration_info[$key]['type'] == 'set') + { + $valid_set = $this->configuration_info[$key]['valid_set']; + reset($valid_set); + if (key($valid_set) === 0) { + return $valid_set; + } + return array_keys($valid_set); + } + return null; + } + + // }}} + // {{{ getKeys() + + /** + * Get all the current config keys. + * + * @return array simple array of config keys + * + * @access public + */ + function getKeys() + { + $keys = array(); + foreach ($this->layers as $layer) { + $test = $this->configuration[$layer]; + if (isset($test['__channels'])) { + foreach ($test['__channels'] as $channel => $configs) { + $keys = array_merge($keys, $configs); + } + } + unset($test['__channels']); + $keys = array_merge($keys, $test); + } + return array_keys($keys); + } + + // }}} + // {{{ remove(key, [layer]) + + /** + * Remove the a config key from a specific config layer. + * + * @param string config key + * + * @param string (optional) config layer + * + * @return bool TRUE on success, FALSE on failure + * + * @access public + */ + function remove($key, $layer = 'user') + { + $channel = $this->getDefaultChannel(); + if ($channel !== 'pear.php.net') { + if (isset($this->configuration[$layer]['__channels'][$channel][$key])) { + unset($this->configuration[$layer]['__channels'][$channel][$key]); + return true; + } + } + if (isset($this->configuration[$layer][$key])) { + unset($this->configuration[$layer][$key]); + return true; + } + return false; + } + + // }}} + // {{{ removeLayer(layer) + + /** + * Temporarily remove an entire config layer. USE WITH CARE! + * + * @param string config key + * + * @param string (optional) config layer + * + * @return bool TRUE on success, FALSE on failure + * + * @access public + */ + function removeLayer($layer) + { + if (isset($this->configuration[$layer])) { + $this->configuration[$layer] = array(); + return true; + } + return false; + } + + // }}} + // {{{ store([layer]) + + /** + * Stores configuration data in a layer. + * + * @param string config layer to store + * + * @return bool TRUE on success, or PEAR error on failure + * + * @access public + */ + function store($layer = 'user', $data = null) + { + return $this->writeConfigFile(null, $layer, $data); + } + + // }}} + // {{{ toDefault(key) + + /** + * Unset the user-defined value of a config key, reverting the + * value to the system-defined one. + * + * @param string config key + * + * @return bool TRUE on success, FALSE on failure + * + * @access public + */ + function toDefault($key) + { + trigger_error("PEAR_Config::toDefault() deprecated, use PEAR_Config::remove() instead", E_USER_NOTICE); + return $this->remove($key, 'user'); + } + + // }}} + // {{{ definedBy(key) + + /** + * Tells what config layer that gets to define a key. + * + * @param string config key + * @param boolean return the defining channel + * + * @return string|array the config layer, or an empty string if not found. + * + * if $returnchannel, the return is an array array('layer' => layername, + * 'channel' => channelname), or an empty string if not found + * + * @access public + */ + function definedBy($key, $returnchannel = false) + { + foreach ($this->layers as $layer) { + $channel = $this->getDefaultChannel(); + if ($channel !== 'pear.php.net') { + if (isset($this->configuration[$layer]['__channels'][$channel][$key])) { + if ($returnchannel) { + return array('layer' => $layer, 'channel' => $channel); + } + return $layer; + } + } + if (isset($this->configuration[$layer][$key])) { + if ($returnchannel) { + return array('layer' => $layer, 'channel' => 'pear.php.net'); + } + return $layer; + } + } + return ''; + } + + // }}} + // {{{ isDefaulted(key) + + /** + * Tells whether a config value has a system-defined value. + * + * @param string config key + * + * @return bool + * + * @access public + * + * @deprecated + */ + function isDefaulted($key) + { + trigger_error("PEAR_Config::isDefaulted() deprecated, use PEAR_Config::definedBy() instead", E_USER_NOTICE); + return $this->definedBy($key) == 'system'; + } + + // }}} + // {{{ isDefined(key) + + /** + * Tells whether a given key exists as a config value. + * + * @param string config key + * + * @return bool whether exists in this object + * + * @access public + */ + function isDefined($key) + { + foreach ($this->layers as $layer) { + if (isset($this->configuration[$layer][$key])) { + return true; + } + } + return false; + } + + // }}} + // {{{ isDefinedLayer(key) + + /** + * Tells whether a given config layer exists. + * + * @param string config layer + * + * @return bool whether exists in this object + * + * @access public + */ + function isDefinedLayer($layer) + { + return isset($this->configuration[$layer]); + } + + // }}} + // {{{ getLayers() + + /** + * Returns the layers defined (except the 'default' one) + * + * @return array of the defined layers + */ + function getLayers() + { + $cf = $this->configuration; + unset($cf['default']); + return array_keys($cf); + } + + // }}} + // {{{ apiVersion() + function apiVersion() + { + return '1.1'; + } + // }}} + + /** + * @return PEAR_Registry + */ + function &getRegistry($use = null) + { + if ($use === null) { + $layer = 'user'; + } else { + $layer = $use; + } + if (isset($this->_registry[$layer])) { + return $this->_registry[$layer]; + } elseif ($use === null && isset($this->_registry['system'])) { + return $this->_registry['system']; + } elseif ($use === null && isset($this->_registry['default'])) { + return $this->_registry['default']; + } elseif ($use) { + $a = false; + return $a; + } else { + // only go here if null was passed in + die("CRITICAL ERROR: Registry could not be initialized from any value"); + } + } + /** + * This is to allow customization like the use of installroot + * @param PEAR_Registry + * @return bool + */ + function setRegistry(&$reg, $layer = 'user') + { + if ($this->_noRegistry) { + return false; + } + if (!in_array($layer, array('user', 'system'))) { + return false; + } + $this->_registry[$layer] = &$reg; + if (is_object($reg)) { + $this->_registry[$layer]->setConfig($this); + } + return true; + } + + function noRegistry() + { + $this->_noRegistry = true; + } + + /** + * @return PEAR_Remote + */ + function &getRemote() + { + $remote = &new PEAR_Remote($this); + return $remote; + } + + /** + * @return PEAR_REST + */ + function &getREST($version, $options = array()) + { + $version = str_replace('.', '', $version); + if (!class_exists($class = 'PEAR_REST_' . $version)) { + require_once 'PEAR/REST/' . $version . '.php'; + } + $remote = &new $class($this, $options); + return $remote; + } + + /** + * The ftp server is set in {@link readFTPConfigFile()}. It exists only if a + * remote configuration file has been specified + * @return PEAR_FTP|false + */ + function &getFTP() + { + if (isset($this->_ftp)) { + return $this->_ftp; + } else { + $a = false; + return $a; + } + } + + // {{{ _prependPath($path, $prepend) + + function _prependPath($path, $prepend) + { + if (strlen($prepend) > 0) { + if (OS_WINDOWS && preg_match('/^[a-z]:/i', $path)) { + if (preg_match('/^[a-z]:/i', $prepend)) { + $prepend = substr($prepend, 2); + } elseif ($prepend{0} != '\\') { + $prepend = "\\$prepend"; + } + $path = substr($path, 0, 2) . $prepend . substr($path, 2); + } else { + $path = $prepend . $path; + } + } + return $path; + } + // }}} + + /** + * @param string|false installation directory to prepend to all _dir variables, or false to + * disable + */ + function setInstallRoot($root) + { + if (substr($root, -1) == DIRECTORY_SEPARATOR) { + $root = substr($root, 0, -1); + } + $old = $this->_installRoot; + $this->_installRoot = $root; + if (($old != $root) && !$this->_noRegistry) { + foreach (array_keys($this->_registry) as $layer) { + if ($layer == 'ftp' || !isset($this->_registry[$layer])) { + continue; + } + $this->_registry[$layer] = + &new PEAR_Registry($this->get('php_dir', $layer, 'pear.php.net')); + $this->_registry[$layer]->setConfig($this); + $this->_regInitialized[$layer] = false; + } + } + } +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Dependency.php b/campcaster/src/tools/pear/src/PEAR/Dependency.php new file mode 100644 index 000000000..ac880dd19 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Dependency.php @@ -0,0 +1,495 @@ + | +// | Stig Bakken | +// +----------------------------------------------------------------------+ +// +// THIS FILE IS DEPRECATED IN FAVOR OF DEPENDENCY2.PHP, AND IS NOT USED IN THE INSTALLER +// $Id: Dependency.php,v 1.41 2006/01/06 04:47:36 cellog Exp $ + +require_once "PEAR.php"; +require_once "OS/Guess.php"; + +define('PEAR_DEPENDENCY_MISSING', -1); +define('PEAR_DEPENDENCY_CONFLICT', -2); +define('PEAR_DEPENDENCY_UPGRADE_MINOR', -3); +define('PEAR_DEPENDENCY_UPGRADE_MAJOR', -4); +define('PEAR_DEPENDENCY_BAD_DEPENDENCY', -5); +define('PEAR_DEPENDENCY_MISSING_OPTIONAL', -6); +define('PEAR_DEPENDENCY_CONFLICT_OPTIONAL', -7); +define('PEAR_DEPENDENCY_UPGRADE_MINOR_OPTIONAL', -8); +define('PEAR_DEPENDENCY_UPGRADE_MAJOR_OPTIONAL', -9); + +/** + * Dependency check for PEAR packages + * + * The class is based on the dependency RFC that can be found at + * http://cvs.php.net/cvs.php/pearweb/rfc. It requires PHP >= 4.1 + * + * @author Tomas V.V.Vox + * @author Stig Bakken + */ +class PEAR_Dependency +{ + // {{{ constructor + /** + * Constructor + * + * @access public + * @param object Registry object + * @return void + */ + function PEAR_Dependency(&$registry) + { + $this->registry = &$registry; + } + + // }}} + // {{{ callCheckMethod() + + /** + * This method maps the XML dependency definition to the + * corresponding one from PEAR_Dependency + * + * 
+    * $opts => Array
+    *    (
+    *        [type] => pkg
+    *        [rel] => ge
+    *        [version] => 3.4
+    *        [name] => HTML_Common
+    *        [optional] => false
+    *    )
+    *
+ * + * @param string Error message + * @param array Options + * @return boolean + */ + function callCheckMethod(&$errmsg, $opts) + { + $rel = isset($opts['rel']) ? $opts['rel'] : 'has'; + $req = isset($opts['version']) ? $opts['version'] : null; + $name = isset($opts['name']) ? $opts['name'] : null; + $channel = isset($opts['channel']) ? $opts['channel'] : 'pear.php.net'; + $opt = (isset($opts['optional']) && $opts['optional'] == 'yes') ? + $opts['optional'] : null; + $errmsg = ''; + switch ($opts['type']) { + case 'pkg': + return $this->checkPackage($errmsg, $name, $req, $rel, $opt, $channel); + break; + case 'ext': + return $this->checkExtension($errmsg, $name, $req, $rel, $opt); + break; + case 'php': + return $this->checkPHP($errmsg, $req, $rel); + break; + case 'prog': + return $this->checkProgram($errmsg, $name); + break; + case 'os': + return $this->checkOS($errmsg, $name); + break; + case 'sapi': + return $this->checkSAPI($errmsg, $name); + break; + case 'zend': + return $this->checkZend($errmsg, $name); + break; + default: + return "'{$opts['type']}' dependency type not supported"; + } + } + + // }}} + // {{{ checkPackage() + + /** + * Package dependencies check method + * + * @param string $errmsg Empty string, it will be populated with an error message, if any + * @param string $name Name of the package to test + * @param string $req The package version required + * @param string $relation How to compare versions with each other + * @param bool $opt Whether the relationship is optional + * @param string $channel Channel name + * + * @return mixed bool false if no error or the error string + */ + function checkPackage(&$errmsg, $name, $req = null, $relation = 'has', + $opt = false, $channel = 'pear.php.net') + { + if (is_string($req) && substr($req, 0, 2) == 'v.') { + $req = substr($req, 2); + } + switch ($relation) { + case 'has': + if (!$this->registry->packageExists($name, $channel)) { + if ($opt) { + $errmsg = "package `$channel/$name' is recommended to utilize some features."; + return PEAR_DEPENDENCY_MISSING_OPTIONAL; + } + $errmsg = "requires package `$channel/$name'"; + return PEAR_DEPENDENCY_MISSING; + } + return false; + case 'not': + if ($this->registry->packageExists($name, $channel)) { + $errmsg = "conflicts with package `$channel/$name'"; + return PEAR_DEPENDENCY_CONFLICT; + } + return false; + case 'lt': + case 'le': + case 'eq': + case 'ne': + case 'ge': + case 'gt': + $version = $this->registry->packageInfo($name, 'version', $channel); + if (!$this->registry->packageExists($name, $channel) + || !version_compare("$version", "$req", $relation)) + { + $code = $this->codeFromRelation($relation, $version, $req, $opt); + if ($opt) { + $errmsg = "package `$channel/$name' version " . $this->signOperator($relation) . + " $req is recommended to utilize some features."; + if ($version) { + $errmsg .= " Installed version is $version"; + } + return $code; + } + $errmsg = "requires package `$channel/$name' " . + $this->signOperator($relation) . " $req"; + return $code; + } + return false; + } + $errmsg = "relation '$relation' with requirement '$req' is not supported (name=$channel/$name)"; + return PEAR_DEPENDENCY_BAD_DEPENDENCY; + } + + // }}} + // {{{ checkPackageUninstall() + + /** + * Check package dependencies on uninstall + * + * @param string $error The resultant error string + * @param string $warning The resultant warning string + * @param string $name Name of the package to test + * @param string $channel Channel name of the package + * + * @return bool true if there were errors + */ + function checkPackageUninstall(&$error, &$warning, $package, $channel = 'pear.php.net') + { + $channel = strtolower($channel); + $error = null; + $channels = $this->registry->listAllPackages(); + foreach ($channels as $channelname => $packages) { + foreach ($packages as $pkg) { + if ($pkg == $package && $channel == $channelname) { + continue; + } + $deps = $this->registry->packageInfo($pkg, 'release_deps', $channel); + if (empty($deps)) { + continue; + } + foreach ($deps as $dep) { + $depchannel = isset($dep['channel']) ? $dep['channel'] : 'pear.php.net'; + if ($dep['type'] == 'pkg' && (strcasecmp($dep['name'], $package) == 0) && + ($depchannel == $channel)) { + if ($dep['rel'] == 'ne') { + continue; + } + if (isset($dep['optional']) && $dep['optional'] == 'yes') { + $warning .= "\nWarning: Package '$depchannel/$pkg' optionally depends on '$channel:/package'"; + } else { + $error .= "Package '$depchannel/$pkg' depends on '$channel/$package'\n"; + } + } + } + } + } + return ($error) ? true : false; + } + + // }}} + // {{{ checkExtension() + + /** + * Extension dependencies check method + * + * @param string $name Name of the extension to test + * @param string $req_ext_ver Required extension version to compare with + * @param string $relation How to compare versions with eachother + * @param bool $opt Whether the relationship is optional + * + * @return mixed bool false if no error or the error string + */ + function checkExtension(&$errmsg, $name, $req = null, $relation = 'has', + $opt = false) + { + if ($relation == 'not') { + if (extension_loaded($name)) { + $errmsg = "conflicts with PHP extension '$name'"; + return PEAR_DEPENDENCY_CONFLICT; + } else { + return false; + } + } + + if (!extension_loaded($name)) { + if ($relation == 'ne') { + return false; + } + if ($opt) { + $errmsg = "'$name' PHP extension is recommended to utilize some features"; + return PEAR_DEPENDENCY_MISSING_OPTIONAL; + } + $errmsg = "'$name' PHP extension is not installed"; + return PEAR_DEPENDENCY_MISSING; + } + if ($relation == 'has') { + return false; + } + $code = false; + if (is_string($req) && substr($req, 0, 2) == 'v.') { + $req = substr($req, 2); + } + $ext_ver = phpversion($name); + $operator = $relation; + // Force params to be strings, otherwise the comparation will fail (ex. 0.9==0.90) + if (!version_compare("$ext_ver", "$req", $operator)) { + $errmsg = "'$name' PHP extension version " . + $this->signOperator($operator) . " $req is required"; + $code = $this->codeFromRelation($relation, $ext_ver, $req, $opt); + if ($opt) { + $errmsg = "'$name' PHP extension version " . $this->signOperator($operator) . + " $req is recommended to utilize some features"; + return $code; + } + } + return $code; + } + + // }}} + // {{{ checkOS() + + /** + * Operating system dependencies check method + * + * @param string $os Name of the operating system + * + * @return mixed bool false if no error or the error string + */ + function checkOS(&$errmsg, $os) + { + // XXX Fixme: Implement a more flexible way, like + // comma separated values or something similar to PEAR_OS + static $myos; + if (empty($myos)) { + $myos = new OS_Guess(); + } + // only 'has' relation is currently supported + if ($myos->matchSignature($os)) { + return false; + } + $errmsg = "'$os' operating system not supported"; + return PEAR_DEPENDENCY_CONFLICT; + } + + // }}} + // {{{ checkPHP() + + /** + * PHP version check method + * + * @param string $req which version to compare + * @param string $relation how to compare the version + * + * @return mixed bool false if no error or the error string + */ + function checkPHP(&$errmsg, $req, $relation = 'ge') + { + // this would be a bit stupid, but oh well :) + if ($relation == 'has') { + return false; + } + if ($relation == 'not') { + $errmsg = "Invalid dependency - 'not' is allowed when specifying PHP, you must run PHP in PHP"; + return PEAR_DEPENDENCY_BAD_DEPENDENCY; + } + if (substr($req, 0, 2) == 'v.') { + $req = substr($req,2, strlen($req) - 2); + } + $php_ver = phpversion(); + $operator = $relation; + if (!version_compare("$php_ver", "$req", $operator)) { + $errmsg = "PHP version " . $this->signOperator($operator) . + " $req is required"; + return PEAR_DEPENDENCY_CONFLICT; + } + return false; + } + + // }}} + // {{{ checkProgram() + + /** + * External program check method. Looks for executable files in + * directories listed in the PATH environment variable. + * + * @param string $program which program to look for + * + * @return mixed bool false if no error or the error string + */ + function checkProgram(&$errmsg, $program) + { + // XXX FIXME honor safe mode + $exe_suffix = OS_WINDOWS ? '.exe' : ''; + $path_elements = explode(PATH_SEPARATOR, getenv('PATH')); + foreach ($path_elements as $dir) { + $file = $dir . DIRECTORY_SEPARATOR . $program . $exe_suffix; + if (@file_exists($file) && @is_executable($file)) { + return false; + } + } + $errmsg = "'$program' program is not present in the PATH"; + return PEAR_DEPENDENCY_MISSING; + } + + // }}} + // {{{ checkSAPI() + + /** + * SAPI backend check method. Version comparison is not yet + * available here. + * + * @param string $name name of SAPI backend + * @param string $req which version to compare + * @param string $relation how to compare versions (currently + * hardcoded to 'has') + * @return mixed bool false if no error or the error string + */ + function checkSAPI(&$errmsg, $name, $req = null, $relation = 'has') + { + // XXX Fixme: There is no way to know if the user has or + // not other SAPI backends installed than the installer one + + $sapi_backend = php_sapi_name(); + // Version comparisons not supported, sapi backends don't have + // version information yet. + if ($sapi_backend == $name) { + return false; + } + $errmsg = "'$sapi_backend' SAPI backend not supported"; + return PEAR_DEPENDENCY_CONFLICT; + } + + // }}} + // {{{ checkZend() + + /** + * Zend version check method + * + * @param string $req which version to compare + * @param string $relation how to compare the version + * + * @return mixed bool false if no error or the error string + */ + function checkZend(&$errmsg, $req, $relation = 'ge') + { + if (substr($req, 0, 2) == 'v.') { + $req = substr($req,2, strlen($req) - 2); + } + $zend_ver = zend_version(); + $operator = substr($relation,0,2); + if (!version_compare("$zend_ver", "$req", $operator)) { + $errmsg = "Zend version " . $this->signOperator($operator) . + " $req is required"; + return PEAR_DEPENDENCY_CONFLICT; + } + return false; + } + + // }}} + // {{{ signOperator() + + /** + * Converts text comparing operators to them sign equivalents + * + * Example: 'ge' to '>=' + * + * @access public + * @param string Operator + * @return string Sign equivalent + */ + function signOperator($operator) + { + switch($operator) { + case 'lt': return '<'; + case 'le': return '<='; + case 'gt': return '>'; + case 'ge': return '>='; + case 'eq': return '=='; + case 'ne': return '!='; + default: + return $operator; + } + } + + // }}} + // {{{ codeFromRelation() + + /** + * Convert relation into corresponding code + * + * @access public + * @param string Relation + * @param string Version + * @param string Requirement + * @param bool Optional dependency indicator + * @return integer + */ + function codeFromRelation($relation, $version, $req, $opt = false) + { + $code = PEAR_DEPENDENCY_BAD_DEPENDENCY; + switch ($relation) { + case 'gt': case 'ge': case 'eq': + // upgrade + $have_major = preg_replace('/\D.*/', '', $version); + $need_major = preg_replace('/\D.*/', '', $req); + if ($need_major > $have_major) { + $code = $opt ? PEAR_DEPENDENCY_UPGRADE_MAJOR_OPTIONAL : + PEAR_DEPENDENCY_UPGRADE_MAJOR; + } else { + $code = $opt ? PEAR_DEPENDENCY_UPGRADE_MINOR_OPTIONAL : + PEAR_DEPENDENCY_UPGRADE_MINOR; + } + break; + case 'lt': case 'le': case 'ne': + $code = $opt ? PEAR_DEPENDENCY_CONFLICT_OPTIONAL : + PEAR_DEPENDENCY_CONFLICT; + break; + } + return $code; + } + + // }}} +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Dependency2.php b/campcaster/src/tools/pear/src/PEAR/Dependency2.php new file mode 100644 index 000000000..fe59d51c1 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Dependency2.php @@ -0,0 +1,1202 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Dependency2.php,v 1.50 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * Required for the PEAR_VALIDATE_* constants + */ +require_once 'PEAR/Validate.php'; + +/** + * Dependency check for PEAR packages + * + * This class handles both version 1.0 and 2.0 dependencies + * WARNING: *any* changes to this class must be duplicated in the + * test_PEAR_Dependency2 class found in tests/PEAR_Dependency2/setup.php.inc, + * or unit tests will not actually validate the changes + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Dependency2 +{ + /** + * One of the PEAR_VALIDATE_* states + * @see PEAR_VALIDATE_NORMAL + * @var integer + */ + var $_state; + /** + * Command-line options to install/upgrade/uninstall commands + * @param array + */ + var $_options; + /** + * @var OS_Guess + */ + var $_os; + /** + * @var PEAR_Registry + */ + var $_registry; + /** + * @var PEAR_Config + */ + var $_config; + /** + * @var PEAR_DependencyDB + */ + var $_dependencydb; + /** + * Output of PEAR_Registry::parsedPackageName() + * @var array + */ + var $_currentPackage; + /** + * @param PEAR_Config + * @param array installation options + * @param array format of PEAR_Registry::parsedPackageName() + * @param int installation state (one of PEAR_VALIDATE_*) + */ + function PEAR_Dependency2(&$config, $installoptions, $package, + $state = PEAR_VALIDATE_INSTALLING) + { + $this->_config = &$config; + if (!class_exists('PEAR_DependencyDB')) { + require_once 'PEAR/DependencyDB.php'; + } + if (isset($installoptions['packagingroot'])) { + // make sure depdb is in the right location + $config->setInstallRoot($installoptions['packagingroot']); + } + $this->_registry = &$config->getRegistry(); + $this->_dependencydb = &PEAR_DependencyDB::singleton($config); + if (isset($installoptions['packagingroot'])) { + $config->setInstallRoot(false); + } + $this->_options = $installoptions; + $this->_state = $state; + if (!class_exists('OS_Guess')) { + require_once 'OS/Guess.php'; + } + $this->_os = new OS_Guess; + $this->_currentPackage = $package; + } + + function _getExtraString($dep) + { + $extra = ' ('; + if (isset($dep['uri'])) { + return ''; + } + if (isset($dep['recommended'])) { + $extra .= 'recommended version ' . $dep['recommended']; + } else { + if (isset($dep['min'])) { + $extra .= 'version >= ' . $dep['min']; + } + if (isset($dep['max'])) { + if ($extra != ' (') { + $extra .= ', '; + } + $extra .= 'version <= ' . $dep['max']; + } + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude'])) { + $dep['exclude'] = array($dep['exclude']); + } + if ($extra != ' (') { + $extra .= ', '; + } + $extra .= 'excluded versions: '; + foreach ($dep['exclude'] as $i => $exclude) { + if ($i) { + $extra .= ', '; + } + $extra .= $exclude; + } + } + } + $extra .= ')'; + if ($extra == ' ()') { + $extra = ''; + } + return $extra; + } + + /** + * This makes unit-testing a heck of a lot easier + */ + function getPHP_OS() + { + return PHP_OS; + } + + /** + * This makes unit-testing a heck of a lot easier + */ + function getsysname() + { + return $this->_os->getSysname(); + } + + /** + * Specify a dependency on an OS. Use arch for detailed os/processor information + * + * There are two generic OS dependencies that will be the most common, unix and windows. + * Other options are linux, freebsd, darwin (OS X), sunos, irix, hpux, aix + */ + function validateOsDependency($dep) + { + if ($this->_state != PEAR_VALIDATE_INSTALLING && + $this->_state != PEAR_VALIDATE_DOWNLOADING) { + return true; + } + if (isset($dep['conflicts'])) { + $not = true; + } else { + $not = false; + } + if ($dep['name'] == '*') { + return true; + } + switch (strtolower($dep['name'])) { + case 'windows' : + if ($not) { + if (strtolower(substr($this->getPHP_OS(), 0, 3)) == 'win') { + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError("Cannot install %s on Windows"); + } else { + return $this->warning("warning: Cannot install %s on Windows"); + } + } + } else { + if (strtolower(substr($this->getPHP_OS(), 0, 3)) != 'win') { + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError("Can only install %s on Windows"); + } else { + return $this->warning("warning: Can only install %s on Windows"); + } + } + } + break; + case 'unix' : + $unices = array('linux', 'freebsd', 'darwin', 'sunos', 'irix', 'hpux', 'aix'); + if ($not) { + if (in_array($this->getSysname(), $unices)) { + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError("Cannot install %s on any Unix system"); + } else { + return $this->warning( + "warning: Cannot install %s on any Unix system"); + } + } + } else { + if (!in_array($this->getSysname(), $unices)) { + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError("Can only install %s on a Unix system"); + } else { + return $this->warning( + "warning: Can only install %s on a Unix system"); + } + } + } + break; + default : + if ($not) { + if (strtolower($dep['name']) == strtolower($this->getSysname())) { + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError('Cannot install %s on ' . $dep['name'] . + ' operating system'); + } else { + return $this->warning('warning: Cannot install %s on ' . + $dep['name'] . ' operating system'); + } + } + } else { + if (strtolower($dep['name']) != strtolower($this->getSysname())) { + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError('Cannot install %s on ' . + $this->getSysname() . + ' operating system, can only install on ' . $dep['name']); + } else { + return $this->warning('warning: Cannot install %s on ' . + $this->getSysname() . + ' operating system, can only install on ' . $dep['name']); + } + } + } + } + return true; + } + + /** + * This makes unit-testing a heck of a lot easier + */ + function matchSignature($pattern) + { + return $this->_os->matchSignature($pattern); + } + + /** + * Specify a complex dependency on an OS/processor/kernel version, + * Use OS for simple operating system dependency. + * + * This is the only dependency that accepts an eregable pattern. The pattern + * will be matched against the php_uname() output parsed by OS_Guess + */ + function validateArchDependency($dep) + { + if ($this->_state != PEAR_VALIDATE_INSTALLING) { + return true; + } + if (isset($dep['conflicts'])) { + $not = true; + } else { + $not = false; + } + if (!$this->matchSignature($dep['pattern'])) { + if (!$not) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s Architecture dependency failed, does not ' . + 'match "' . $dep['pattern'] . '"'); + } else { + return $this->warning('warning: %s Architecture dependency failed, does ' . + 'not match "' . $dep['pattern'] . '"'); + } + } + return true; + } else { + if ($not) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s Architecture dependency failed, required "' . + $dep['pattern'] . '"'); + } else { + return $this->warning('warning: %s Architecture dependency failed, ' . + 'required "' . $dep['pattern'] . '"'); + } + } + return true; + } + } + + /** + * This makes unit-testing a heck of a lot easier + */ + function extension_loaded($name) + { + return extension_loaded($name); + } + + /** + * This makes unit-testing a heck of a lot easier + */ + function phpversion($name = null) + { + if ($name !== null) { + return phpversion($name); + } else { + return phpversion(); + } + } + + function validateExtensionDependency($dep, $required = true) + { + if ($this->_state != PEAR_VALIDATE_INSTALLING && + $this->_state != PEAR_VALIDATE_DOWNLOADING) { + return true; + } + $loaded = $this->extension_loaded($dep['name']); + $extra = $this->_getExtraString($dep); + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude'])) { + $dep['exclude'] = array($dep['exclude']); + } + } + if (!isset($dep['min']) && !isset($dep['max']) && + !isset($dep['recommended']) && !isset($dep['exclude'])) { + if ($loaded) { + if (isset($dep['conflicts'])) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s conflicts with PHP extension "' . + $dep['name'] . '"' . $extra); + } else { + return $this->warning('warning: %s conflicts with PHP extension "' . + $dep['name'] . '"' . $extra); + } + } + return true; + } else { + if (isset($dep['conflicts'])) { + return true; + } + if ($required) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires PHP extension "' . + $dep['name'] . '"' . $extra); + } else { + return $this->warning('warning: %s requires PHP extension "' . + $dep['name'] . '"' . $extra); + } + } else { + return $this->warning('%s can optionally use PHP extension "' . + $dep['name'] . '"' . $extra); + } + } + } + if (!$loaded) { + if (isset($dep['conflicts'])) { + return true; + } + if (!$required) { + return $this->warning('%s can optionally use PHP extension "' . + $dep['name'] . '"' . $extra); + } else { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires PHP extension "' . $dep['name'] . + '"' . $extra); + } + return $this->warning('warning: %s requires PHP extension "' . $dep['name'] . + '"' . $extra); + } + } + $version = (string) $this->phpversion($dep['name']); + if (empty($version)) { + $version = '0'; + } + $fail = false; + if (isset($dep['min'])) { + if (!version_compare($version, $dep['min'], '>=')) { + $fail = true; + } + } + if (isset($dep['max'])) { + if (!version_compare($version, $dep['max'], '<=')) { + $fail = true; + } + } + if ($fail && !isset($dep['conflicts'])) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires PHP extension "' . $dep['name'] . + '"' . $extra . ', installed version is ' . $version); + } else { + return $this->warning('warning: %s requires PHP extension "' . $dep['name'] . + '"' . $extra . ', installed version is ' . $version); + } + } elseif ((isset($dep['min']) || isset($dep['max'])) && !$fail && isset($dep['conflicts'])) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s conflicts with PHP extension "' . + $dep['name'] . '"' . $extra . ', installed version is ' . $version); + } else { + return $this->warning('warning: %s conflicts with PHP extension "' . + $dep['name'] . '"' . $extra . ', installed version is ' . $version); + } + } + if (isset($dep['exclude'])) { + foreach ($dep['exclude'] as $exclude) { + if (version_compare($version, $exclude, '==')) { + if (isset($dep['conflicts'])) { + continue; + } + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError('%s is not compatible with PHP extension "' . + $dep['name'] . '" version ' . + $exclude); + } else { + return $this->warning('warning: %s is not compatible with PHP extension "' . + $dep['name'] . '" version ' . + $exclude); + } + } elseif (version_compare($version, $exclude, '!=') && isset($dep['conflicts'])) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s conflicts with PHP extension "' . + $dep['name'] . '"' . $extra . ', installed version is ' . $version); + } else { + return $this->warning('warning: %s conflicts with PHP extension "' . + $dep['name'] . '"' . $extra . ', installed version is ' . $version); + } + } + } + } + if (isset($dep['recommended'])) { + if (version_compare($version, $dep['recommended'], '==')) { + return true; + } else { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s dependency: PHP extension ' . $dep['name'] . + ' version "' . $version . '"' . + ' is not the recommended version "' . $dep['recommended'] . + '", but may be compatible, use --force to install'); + } else { + return $this->warning('warning: %s dependency: PHP extension ' . + $dep['name'] . ' version "' . $version . '"' . + ' is not the recommended version "' . $dep['recommended'].'"'); + } + } + } + return true; + } + + function validatePhpDependency($dep) + { + if ($this->_state != PEAR_VALIDATE_INSTALLING && + $this->_state != PEAR_VALIDATE_DOWNLOADING) { + return true; + } + $version = $this->phpversion(); + $extra = $this->_getExtraString($dep); + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude'])) { + $dep['exclude'] = array($dep['exclude']); + } + } + if (isset($dep['min'])) { + if (!version_compare($version, $dep['min'], '>=')) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires PHP' . + $extra . ', installed version is ' . $version); + } else { + return $this->warning('warning: %s requires PHP' . + $extra . ', installed version is ' . $version); + } + } + } + if (isset($dep['max'])) { + if (!version_compare($version, $dep['max'], '<=')) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires PHP' . + $extra . ', installed version is ' . $version); + } else { + return $this->warning('warning: %s requires PHP' . + $extra . ', installed version is ' . $version); + } + } + } + if (isset($dep['exclude'])) { + foreach ($dep['exclude'] as $exclude) { + if (version_compare($version, $exclude, '==')) { + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError('%s is not compatible with PHP version ' . + $exclude); + } else { + return $this->warning( + 'warning: %s is not compatible with PHP version ' . + $exclude); + } + } + } + } + return true; + } + + /** + * This makes unit-testing a heck of a lot easier + */ + function getPEARVersion() + { + return '1.4.11'; + } + + function validatePearinstallerDependency($dep) + { + $pearversion = $this->getPEARVersion(); + $extra = $this->_getExtraString($dep); + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude'])) { + $dep['exclude'] = array($dep['exclude']); + } + } + if (version_compare($pearversion, $dep['min'], '<')) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires PEAR Installer' . $extra . + ', installed version is ' . $pearversion); + } else { + return $this->warning('warning: %s requires PEAR Installer' . $extra . + ', installed version is ' . $pearversion); + } + } + if (isset($dep['max'])) { + if (version_compare($pearversion, $dep['max'], '>')) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires PEAR Installer' . $extra . + ', installed version is ' . $pearversion); + } else { + return $this->warning('warning: %s requires PEAR Installer' . $extra . + ', installed version is ' . $pearversion); + } + } + } + if (isset($dep['exclude'])) { + if (!isset($dep['exclude'][0])) { + $dep['exclude'] = array($dep['exclude']); + } + foreach ($dep['exclude'] as $exclude) { + if (version_compare($exclude, $pearversion, '==')) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s is not compatible with PEAR Installer ' . + 'version ' . $exclude); + } else { + return $this->warning('warning: %s is not compatible with PEAR ' . + 'Installer version ' . $exclude); + } + } + } + } + return true; + } + + function validateSubpackageDependency($dep, $required, $params) + { + return $this->validatePackageDependency($dep, $required, $params); + } + + /** + * @param array dependency information (2.0 format) + * @param boolean whether this is a required dependency + * @param array a list of downloaded packages to be installed, if any + * @param boolean if true, then deps on pear.php.net that fail will also check + * against pecl.php.net packages to accomodate extensions that have + * moved to pecl.php.net from pear.php.net + */ + function validatePackageDependency($dep, $required, $params, $depv1 = false) + { + if ($this->_state != PEAR_VALIDATE_INSTALLING && + $this->_state != PEAR_VALIDATE_DOWNLOADING) { + return true; + } + if (isset($dep['providesextension'])) { + if ($this->extension_loaded($dep['providesextension'])) { + $save = $dep; + $subdep = $dep; + $subdep['name'] = $subdep['providesextension']; + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $ret = $this->validateExtensionDependency($subdep, $required); + PEAR::popErrorHandling(); + if (!PEAR::isError($ret)) { + return true; + } + } + } + if ($this->_state == PEAR_VALIDATE_INSTALLING) { + return $this->_validatePackageInstall($dep, $required, $depv1); + } + if ($this->_state == PEAR_VALIDATE_DOWNLOADING) { + return $this->_validatePackageDownload($dep, $required, $params, $depv1); + } + } + + function _validatePackageDownload($dep, $required, $params, $depv1 = false) + { + $dep['package'] = $dep['name']; + if (isset($dep['uri'])) { + $dep['channel'] = '__uri'; + } + $depname = $this->_registry->parsedPackageNameToString($dep, true); + $found = false; + foreach ($params as $param) { + if ($param->isEqual( + array('package' => $dep['name'], + 'channel' => $dep['channel']))) { + $found = true; + break; + } + if ($depv1 && $dep['channel'] == 'pear.php.net') { + if ($param->isEqual( + array('package' => $dep['name'], + 'channel' => 'pecl.php.net'))) { + $found = true; + break; + } + } + } + if (!$found && isset($dep['providesextension'])) { + foreach ($params as $param) { + if ($param->isExtension($dep['providesextension'])) { + $found = true; + break; + } + } + } + if ($found) { + $version = $param->getVersion(); + $installed = false; + $downloaded = true; + } else { + if ($this->_registry->packageExists($dep['name'], $dep['channel'])) { + $installed = true; + $downloaded = false; + $version = $this->_registry->packageinfo($dep['name'], 'version', + $dep['channel']); + } else { + if ($dep['channel'] == 'pecl.php.net' && $this->_registry->packageExists($dep['name'], + 'pear.php.net')) { + $installed = true; + $downloaded = false; + $version = $this->_registry->packageinfo($dep['name'], 'version', + 'pear.php.net'); + } else { + $version = 'not installed or downloaded'; + $installed = false; + $downloaded = false; + } + } + } + $extra = $this->_getExtraString($dep); + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude'])) { + $dep['exclude'] = array($dep['exclude']); + } + } + if (!isset($dep['min']) && !isset($dep['max']) && + !isset($dep['recommended']) && !isset($dep['exclude'])) { + if ($installed || $downloaded) { + $installed = $installed ? 'installed' : 'downloaded'; + if (isset($dep['conflicts'])) { + if ($version) { + $rest = ", $installed version is " . $version; + } else { + $rest = ''; + } + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s conflicts with package "' . $depname . '"' . + $extra . $rest); + } else { + return $this->warning('warning: %s conflicts with package "' . $depname . '"' . + $extra . $rest); + } + } + return true; + } else { + if (isset($dep['conflicts'])) { + return true; + } + if ($required) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires package "' . $depname . '"' . + $extra); + } else { + return $this->warning('warning: %s requires package "' . $depname . '"' . + $extra); + } + } else { + return $this->warning('%s can optionally use package "' . $depname . '"' . + $extra); + } + } + } + if (!$installed && !$downloaded) { + if (isset($dep['conflicts'])) { + return true; + } + if ($required) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires package "' . $depname . '"' . + $extra); + } else { + return $this->warning('warning: %s requires package "' . $depname . '"' . + $extra); + } + } else { + return $this->warning('%s can optionally use package "' . $depname . '"' . + $extra); + } + } + $fail = false; + if (isset($dep['min'])) { + if (version_compare($version, $dep['min'], '<')) { + $fail = true; + } + } + if (isset($dep['max'])) { + if (version_compare($version, $dep['max'], '>')) { + $fail = true; + } + } + if ($fail && !isset($dep['conflicts'])) { + $installed = $installed ? 'installed' : 'downloaded'; + $dep['package'] = $dep['name']; + $dep = $this->_registry->parsedPackageNameToString($dep, true); + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s requires package "' . $depname . '"' . + $extra . ", $installed version is " . $version); + } else { + return $this->warning('warning: %s requires package "' . $depname . '"' . + $extra . ", $installed version is " . $version); + } + } elseif ((isset($dep['min']) || isset($dep['max'])) && !$fail && + isset($dep['conflicts']) && !isset($dep['exclude'])) { + $installed = $installed ? 'installed' : 'downloaded'; + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s conflicts with package "' . $depname . '"' . $extra . + ", $installed version is " . $version); + } else { + return $this->warning('warning: %s conflicts with package "' . $depname . '"' . + $extra . ", $installed version is " . $version); + } + } + if (isset($dep['exclude'])) { + $installed = $installed ? 'installed' : 'downloaded'; + foreach ($dep['exclude'] as $exclude) { + if (version_compare($version, $exclude, '==') && !isset($dep['conflicts'])) { + if (!isset($this->_options['nodeps']) && + !isset($this->_options['force'])) { + return $this->raiseError('%s is not compatible with ' . + $installed . ' package "' . + $depname . '" version ' . + $exclude); + } else { + return $this->warning('warning: %s is not compatible with ' . + $installed . ' package "' . + $depname . '" version ' . + $exclude); + } + } elseif (version_compare($version, $exclude, '!=') && isset($dep['conflicts'])) { + $installed = $installed ? 'installed' : 'downloaded'; + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s conflicts with package "' . $depname . '"' . + $extra . ", $installed version is " . $version); + } else { + return $this->warning('warning: %s conflicts with package "' . $depname . '"' . + $extra . ", $installed version is " . $version); + } + } + } + } + if (isset($dep['recommended'])) { + $installed = $installed ? 'installed' : 'downloaded'; + if (version_compare($version, $dep['recommended'], '==')) { + return true; + } else { + if (!$found && $installed) { + $param = $this->_registry->getPackage($dep['name'], $dep['channel']); + } + if ($param) { + $found = false; + foreach ($params as $parent) { + if ($parent->isEqual($this->_currentPackage)) { + $found = true; + break; + } + } + if ($found) { + if ($param->isCompatible($parent)) { + return true; + } + } else { // this is for validPackage() calls + $parent = $this->_registry->getPackage($this->_currentPackage['package'], + $this->_currentPackage['channel']); + if ($parent !== null) { + if ($param->isCompatible($parent)) { + return true; + } + } + } + } + if (!isset($this->_options['nodeps']) && !isset($this->_options['force']) && + !isset($this->_options['loose'])) { + return $this->raiseError('%s dependency package "' . $depname . + '" ' . $installed . ' version ' . $version . + ' is not the recommended version ' . $dep['recommended'] . + ', but may be compatible, use --force to install'); + } else { + return $this->warning('warning: %s dependency package "' . $depname . + '" ' . $installed . ' version ' . $version . + ' is not the recommended version ' . $dep['recommended']); + } + } + } + return true; + } + + function _validatePackageInstall($dep, $required, $depv1 = false) + { + return $this->_validatePackageDownload($dep, $required, array(), $depv1); + } + + /** + * Verify that uninstalling packages passed in to command line is OK. + * + * @param PEAR_Installer $dl + * @return PEAR_Error|true + */ + function validatePackageUninstall(&$dl) + { + if (PEAR::isError($this->_dependencydb)) { + return $this->_dependencydb; + } + $params = array(); + // construct an array of "downloaded" packages to fool the package dependency checker + // into using these to validate uninstalls of circular dependencies + $downloaded = &$dl->getUninstallPackages(); + foreach ($downloaded as $i => $pf) { + if (!class_exists('PEAR_Downloader_Package')) { + require_once 'PEAR/Downloader/Package.php'; + } + $dp = &new PEAR_Downloader_Package($dl); + $dp->setPackageFile($downloaded[$i]); + $params[$i] = &$dp; + } + $deps = $this->_dependencydb->getDependentPackageDependencies($this->_currentPackage); + $fail = false; + if ($deps) { + foreach ($deps as $channel => $info) { + foreach ($info as $package => $ds) { + foreach ($ds as $d) { + $d['dep']['package'] = $d['dep']['name']; + $checker = &new PEAR_Dependency2($this->_config, $this->_options, + array('channel' => $channel, 'package' => $package), $this->_state); + $dep = $d['dep']; + $required = $d['type'] == 'required'; + $ret = $checker->_validatePackageUninstall($dep, $required, $params, $dl); + if (is_array($ret)) { + $dl->log(0, $ret[0]); + } elseif (PEAR::isError($ret)) { + $dl->log(0, $ret->getMessage()); + $fail = true; + } + } + } + } + } + if ($fail) { + if (isset($this->_options['nodeps']) || isset($this->_options['force'])) { + return $this->warning( + 'warning: %s should not be uninstalled, other installed packages depend ' . + 'on this package'); + } else { + return $this->raiseError( + '%s cannot be uninstalled, other installed packages depend on this package'); + } + } + return true; + } + + function _validatePackageUninstall($dep, $required, $params, &$dl) + { + $dep['package'] = $dep['name']; + $depname = $this->_registry->parsedPackageNameToString($dep, true); + $found = false; + foreach ($params as $param) { + if ($param->isEqual($this->_currentPackage)) { + $found = true; + break; + } + } + $version = $this->_registry->packageinfo($dep['name'], 'version', + $dep['channel']); + if (!$version) { + return true; + } + $extra = $this->_getExtraString($dep); + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude'])) { + $dep['exclude'] = array($dep['exclude']); + } + } + if (isset($dep['conflicts'])) { + return true; // uninstall OK - these packages conflict (probably installed with --force) + } + if (!isset($dep['min']) && !isset($dep['max'])) { + if ($required) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError('%s' . $extra . ' is required by installed package "' . + $depname . '"'); + } else { + return $this->warning('warning: %s' . $extra . + ' is required by installed package "' . $depname . '"'); + } + } else { + return $this->warning('%s' . $extra . + ' can be optionally used by installed package "' . $depname . '"'); + } + } + $fail = false; + if (isset($dep['min'])) { + if (version_compare($version, $dep['min'], '>=')) { + $fail = true; + } + } + if (isset($dep['max'])) { + if (version_compare($version, $dep['max'], '<=')) { + $fail = true; + } + } + if ($fail) { + if ($found) { + if (!isset($dl->___checked[$this->_currentPackage['channel']] + [$this->_currentPackage['package']])) { + $dl->___checked[$this->_currentPackage['channel']] + [$this->_currentPackage['package']] = true; + $deps = $this->_dependencydb->getDependentPackageDependencies( + $this->_currentPackage); + if ($deps) { + foreach ($deps as $channel => $info) { + foreach ($info as $package => $ds) { + foreach ($ds as $d) { + $d['dep']['package'] = $d['dep']['name']; + $checker = &new PEAR_Dependency2($this->_config, $this->_options, + array('channel' => $channel, 'package' => $package), + $this->_state); + $dep = $d['dep']; + $required = $d['type'] == 'required'; + $ret = $checker->_validatePackageUninstall($dep, $required, $params, + $dl); + if (PEAR::isError($ret)) { + $fail = true; + break 3; + } + } + } + $fail = false; + } + } + } else { + return true; + } + } + if (!$fail) { + return true; + } + if ($required) { + if (!isset($this->_options['nodeps']) && !isset($this->_options['force'])) { + return $this->raiseError($depname . $extra . ' is required by installed package' . + ' "%s"'); + } else { + return $this->warning('warning: ' . $depname . $extra . + ' is required by installed package "%s"'); + } + } else { + return $this->warning($depname . $extra . ' can be optionally used by installed package' . + ' "%s"'); + } + } + return true; + } + + /** + * validate a downloaded package against installed packages + * + * As of PEAR 1.4.3, this will only validate + * + * @param array|PEAR_Downloader_Package|PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * $pkg package identifier (either + * array('package' => blah, 'channel' => blah) or an array with + * index 'info' referencing an object) + * @param PEAR_Downloader $dl + * @param array $params full list of packages to install + * @return true|PEAR_Error + */ + function validatePackage($pkg, &$dl, $params = array()) + { + if (is_array($pkg) && isset($pkg['info'])) { + $deps = $this->_dependencydb->getDependentPackageDependencies($pkg['info']); + } else { + $deps = $this->_dependencydb->getDependentPackageDependencies($pkg); + } + $fail = false; + if ($deps) { + if (!class_exists('PEAR_Downloader_Package')) { + require_once 'PEAR/Downloader/Package.php'; + } + $dp = &new PEAR_Downloader_Package($dl); + if (is_object($pkg)) { + $dp->setPackageFile($pkg); + } else { + $dp->setDownloadURL($pkg); + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + foreach ($deps as $channel => $info) { + foreach ($info as $package => $ds) { + foreach ($params as $packd) { + if (strtolower($packd->getPackage()) == strtolower($package) && + $packd->getChannel() == $channel) { + $dl->log(3, 'skipping installed package check of "' . + $this->_registry->parsedPackageNameToString( + array('channel' => $channel, 'package' => $package), + true) . + '", version "' . $packd->getVersion() . '" will be ' . + 'downloaded and installed'); + continue 2; // jump to next package + } + } + foreach ($ds as $d) { + $checker = &new PEAR_Dependency2($this->_config, $this->_options, + array('channel' => $channel, 'package' => $package), $this->_state); + $dep = $d['dep']; + $required = $d['type'] == 'required'; + $ret = $checker->_validatePackageDownload($dep, $required, array(&$dp)); + if (is_array($ret)) { + $dl->log(0, $ret[0]); + } elseif (PEAR::isError($ret)) { + $dl->log(0, $ret->getMessage()); + $fail = true; + } + } + } + } + PEAR::popErrorHandling(); + } + if ($fail) { + return $this->raiseError( + '%s cannot be installed, conflicts with installed packages'); + } + return true; + } + + /** + * validate a package.xml 1.0 dependency + */ + function validateDependency1($dep, $params = array()) + { + if (!isset($dep['optional'])) { + $dep['optional'] = 'no'; + } + list($newdep, $type) = $this->normalizeDep($dep); + if (!$newdep) { + return $this->raiseError("Invalid Dependency"); + } + if (method_exists($this, "validate{$type}Dependency")) { + return $this->{"validate{$type}Dependency"}($newdep, $dep['optional'] == 'no', + $params, true); + } + } + + /** + * Convert a 1.0 dep into a 2.0 dep + */ + function normalizeDep($dep) + { + $types = array( + 'pkg' => 'Package', + 'ext' => 'Extension', + 'os' => 'Os', + 'php' => 'Php' + ); + if (isset($types[$dep['type']])) { + $type = $types[$dep['type']]; + } else { + return array(false, false); + } + $newdep = array(); + switch ($type) { + case 'Package' : + $newdep['channel'] = 'pear.php.net'; + case 'Extension' : + case 'Os' : + $newdep['name'] = $dep['name']; + break; + } + $dep['rel'] = PEAR_Dependency2::signOperator($dep['rel']); + switch ($dep['rel']) { + case 'has' : + return array($newdep, $type); + break; + case 'not' : + $newdep['conflicts'] = true; + break; + case '>=' : + case '>' : + $newdep['min'] = $dep['version']; + if ($dep['rel'] == '>') { + $newdep['exclude'] = $dep['version']; + } + break; + case '<=' : + case '<' : + $newdep['max'] = $dep['version']; + if ($dep['rel'] == '<') { + $newdep['exclude'] = $dep['version']; + } + break; + case 'ne' : + case '!=' : + $newdep['min'] = '0'; + $newdep['max'] = '100000'; + $newdep['exclude'] = $dep['version']; + break; + case '==' : + $newdep['min'] = $dep['version']; + $newdep['max'] = $dep['version']; + break; + } + if ($type == 'Php') { + if (!isset($newdep['min'])) { + $newdep['min'] = '4.2.0'; + } + if (!isset($newdep['max'])) { + $newdep['max'] = '6.0.0'; + } + } + return array($newdep, $type); + } + + /** + * Converts text comparing operators to them sign equivalents + * + * Example: 'ge' to '>=' + * + * @access public + * @param string Operator + * @return string Sign equivalent + */ + function signOperator($operator) + { + switch($operator) { + case 'lt': return '<'; + case 'le': return '<='; + case 'gt': return '>'; + case 'ge': return '>='; + case 'eq': return '=='; + case 'ne': return '!='; + default: + return $operator; + } + } + + function raiseError($msg) + { + if (isset($this->_options['ignore-errors'])) { + return $this->warning($msg); + } + return PEAR::raiseError(sprintf($msg, $this->_registry->parsedPackageNameToString( + $this->_currentPackage, true))); + } + + function warning($msg) + { + return array(sprintf($msg, $this->_registry->parsedPackageNameToString( + $this->_currentPackage, true))); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/DependencyDB.php b/campcaster/src/tools/pear/src/PEAR/DependencyDB.php new file mode 100644 index 000000000..840cf6730 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/DependencyDB.php @@ -0,0 +1,675 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: DependencyDB.php,v 1.30.2.1 2006/05/25 22:00:05 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * Needed for error handling + */ +require_once 'PEAR.php'; +require_once 'PEAR/Config.php'; + +/** + * Track dependency relationships between installed packages + * @category pear + * @package PEAR + * @author Greg Beaver + * @author Tomas V.V.Cox + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_DependencyDB +{ + // {{{ properties + + /** + * This is initialized by {@link setConfig()} + * @var PEAR_Config + * @access private + */ + var $_config; + /** + * This is initialized by {@link setConfig()} + * @var PEAR_Registry + * @access private + */ + var $_registry; + /** + * Filename of the dependency DB (usually .depdb) + * @var string + * @access private + */ + var $_depdb = false; + /** + * File name of the lockfile (usually .depdblock) + * @var string + * @access private + */ + var $_lockfile = false; + /** + * Open file resource for locking the lockfile + * @var resource|false + * @access private + */ + var $_lockFp = false; + /** + * API version of this class, used to validate a file on-disk + * @var string + * @access private + */ + var $_version = '1.0'; + /** + * Cached dependency database file + * @var array|null + * @access private + */ + var $_cache; + + // }}} + // {{{ & singleton() + + /** + * Get a raw dependency database. Calls setConfig() and assertDepsDB() + * @param PEAR_Config + * @param string|false full path to the dependency database, or false to use default + * @return PEAR_DependencyDB|PEAR_Error + * @static + */ + function &singleton(&$config, $depdb = false) + { + if (!isset($GLOBALS['_PEAR_DEPENDENCYDB_INSTANCE'] + [$config->get('php_dir', null, 'pear.php.net')])) { + $a = new PEAR_DependencyDB; + $GLOBALS['_PEAR_DEPENDENCYDB_INSTANCE'] + [$config->get('php_dir', null, 'pear.php.net')] = &$a; + $a->setConfig($config, $depdb); + if (PEAR::isError($e = $a->assertDepsDB())) { + return $e; + } + } + return $GLOBALS['_PEAR_DEPENDENCYDB_INSTANCE'] + [$config->get('php_dir', null, 'pear.php.net')]; + } + + /** + * Set up the registry/location of dependency DB + * @param PEAR_Config|false + * @param string|false full path to the dependency database, or false to use default + */ + function setConfig(&$config, $depdb = false) + { + if (!$config) { + $this->_config = &PEAR_Config::singleton(); + } else { + $this->_config = &$config; + } + $this->_registry = &$this->_config->getRegistry(); + if (!$depdb) { + $this->_depdb = $this->_config->get('php_dir', null, 'pear.php.net') . + DIRECTORY_SEPARATOR . '.depdb'; + } else { + $this->_depdb = $depdb; + } + $this->_lockfile = dirname($this->_depdb) . DIRECTORY_SEPARATOR . '.depdblock'; + } + // }}} + + function hasWriteAccess() + { + if (!@file_exists($this->_depdb)) { + $dir = $this->_depdb; + while ($dir && $dir != '.') { + $dir = dirname($dir); // cd .. + if ($dir != '.' && @file_exists($dir)) { + if (@is_writeable($dir)) { + return true; + } else { + return false; + } + } + } + return false; + } + return @is_writeable($this->_depdb); + } + + // {{{ assertDepsDB() + + /** + * Create the dependency database, if it doesn't exist. Error if the database is + * newer than the code reading it. + * @return void|PEAR_Error + */ + function assertDepsDB() + { + if (!is_file($this->_depdb)) { + $this->rebuildDB(); + } else { + $depdb = $this->_getDepDB(); + // Datatype format has been changed, rebuild the Deps DB + if ($depdb['_version'] < $this->_version) { + $this->rebuildDB(); + } + if ($depdb['_version']{0} > $this->_version{0}) { + return PEAR::raiseError('Dependency database is version ' . + $depdb['_version'] . ', and we are version ' . + $this->_version . ', cannot continue'); + } + } + } + + /** + * Get a list of installed packages that depend on this package + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2|array + * @return array|false + */ + function getDependentPackages(&$pkg) + { + $data = $this->_getDepDB(); + if (is_object($pkg)) { + $channel = strtolower($pkg->getChannel()); + $package = strtolower($pkg->getPackage()); + } else { + $channel = strtolower($pkg['channel']); + $package = strtolower($pkg['package']); + } + if (isset($data['packages'][$channel][$package])) { + return $data['packages'][$channel][$package]; + } + return false; + } + + /** + * Get a list of the actual dependencies of installed packages that depend on + * a package. + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2|array + * @return array|false + */ + function getDependentPackageDependencies(&$pkg) + { + $data = $this->_getDepDB(); + if (is_object($pkg)) { + $channel = strtolower($pkg->getChannel()); + $package = strtolower($pkg->getPackage()); + } else { + $channel = strtolower($pkg['channel']); + $package = strtolower($pkg['package']); + } + $depend = $this->getDependentPackages($pkg); + if (!$depend) { + return false; + } + $dependencies = array(); + foreach ($depend as $info) { + $temp = $this->getDependencies($info); + foreach ($temp as $dep) { + if (strtolower($dep['dep']['channel']) == strtolower($channel) && + strtolower($dep['dep']['name']) == strtolower($package)) { + $dependencies[$info['channel']][$info['package']][] = $dep; + } + } + } + return $dependencies; + } + + /** + * Get a list of dependencies of this installed package + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2|array + * @return array|false + */ + function getDependencies(&$pkg) + { + if (is_object($pkg)) { + $channel = strtolower($pkg->getChannel()); + $package = strtolower($pkg->getPackage()); + } else { + $channel = strtolower($pkg['channel']); + $package = strtolower($pkg['package']); + } + $data = $this->_getDepDB(); + if (isset($data['dependencies'][$channel][$package])) { + return $data['dependencies'][$channel][$package]; + } + return false; + } + + /** + * Determine whether $parent depends on $child, near or deep + * @param array|PEAR_PackageFile_v2|PEAR_PackageFile_v2 + * @param array|PEAR_PackageFile_v2|PEAR_PackageFile_v2 + */ + function dependsOn($parent, $child) + { + $c = array(); + $this->_getDepDB(); + return $this->_dependsOn($parent, $child, $c); + } + + function _dependsOn($parent, $child, &$checked) + { + if (is_object($parent)) { + $channel = strtolower($parent->getChannel()); + $package = strtolower($parent->getPackage()); + } else { + $channel = strtolower($parent['channel']); + $package = strtolower($parent['package']); + } + if (is_object($child)) { + $depchannel = strtolower($child->getChannel()); + $deppackage = strtolower($child->getPackage()); + } else { + $depchannel = strtolower($child['channel']); + $deppackage = strtolower($child['package']); + } + if (isset($checked[$channel][$package][$depchannel][$deppackage])) { + return false; // avoid endless recursion + } + $checked[$channel][$package][$depchannel][$deppackage] = true; + if (!isset($this->_cache['dependencies'][$channel][$package])) { + return false; + } + foreach ($this->_cache['dependencies'][$channel][$package] as $info) { + if (isset($info['dep']['uri'])) { + if (is_object($child)) { + if ($info['dep']['uri'] == $child->getURI()) { + return true; + } + } elseif (isset($child['uri'])) { + if ($info['dep']['uri'] == $child['uri']) { + return true; + } + } + return false; + } + if (strtolower($info['dep']['channel']) == strtolower($depchannel) && + strtolower($info['dep']['name']) == strtolower($deppackage)) { + return true; + } + } + foreach ($this->_cache['dependencies'][$channel][$package] as $info) { + if (isset($info['dep']['uri'])) { + if ($this->_dependsOn(array( + 'uri' => $info['dep']['uri'], + 'package' => $info['dep']['name']), $child, $checked)) { + return true; + } + } else { + if ($this->_dependsOn(array( + 'channel' => $info['dep']['channel'], + 'package' => $info['dep']['name']), $child, $checked)) { + return true; + } + } + } + return false; + } + + /** + * Register dependencies of a package that is being installed or upgraded + * @param PEAR_PackageFile_v2|PEAR_PackageFile_v2 + */ + function installPackage(&$package) + { + $data = $this->_getDepDB(); + unset($this->_cache); + $this->_setPackageDeps($data, $package); + $this->_writeDepDB($data); + } + + /** + * Remove dependencies of a package that is being uninstalled, or upgraded. + * + * Upgraded packages first uninstall, then install + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2|array If an array, then it must have + * indices 'channel' and 'package' + */ + function uninstallPackage(&$pkg) + { + $data = $this->_getDepDB(); + unset($this->_cache); + if (is_object($pkg)) { + $channel = strtolower($pkg->getChannel()); + $package = strtolower($pkg->getPackage()); + } else { + $channel = strtolower($pkg['channel']); + $package = strtolower($pkg['package']); + } + if (!isset($data['dependencies'][$channel][$package])) { + return true; + } + foreach ($data['dependencies'][$channel][$package] as $dep) { + $found = false; + if (isset($dep['dep']['uri'])) { + $depchannel = '__uri'; + } else { + $depchannel = strtolower($dep['dep']['channel']); + } + if (isset($data['packages'][$depchannel][strtolower($dep['dep']['name'])])) { + foreach ($data['packages'][$depchannel][strtolower($dep['dep']['name'])] as + $i => $info) { + if ($info['channel'] == $channel && + $info['package'] == $package) { + $found = true; + break; + } + } + } + if ($found) { + unset($data['packages'][$depchannel][strtolower($dep['dep']['name'])][$i]); + if (!count($data['packages'][$depchannel][strtolower($dep['dep']['name'])])) { + unset($data['packages'][$depchannel][strtolower($dep['dep']['name'])]); + if (!count($data['packages'][$depchannel])) { + unset($data['packages'][$depchannel]); + } + } else { + $data['packages'][$depchannel][strtolower($dep['dep']['name'])] = + array_values( + $data['packages'][$depchannel][strtolower($dep['dep']['name'])]); + } + } + } + unset($data['dependencies'][$channel][$package]); + if (!count($data['dependencies'][$channel])) { + unset($data['dependencies'][$channel]); + } + if (!count($data['dependencies'])) { + unset($data['dependencies']); + } + if (!count($data['packages'])) { + unset($data['packages']); + } + $this->_writeDepDB($data); + } + + /** + * Rebuild the dependency DB by reading registry entries. + * @return true|PEAR_Error + */ + function rebuildDB() + { + $depdb = array('_version' => $this->_version); + if (!$this->hasWriteAccess()) { + // allow startup for read-only with older Registry + return $depdb; + } + $packages = $this->_registry->listAllPackages(); + foreach ($packages as $channel => $ps) { + foreach ($ps as $package) { + $package = $this->_registry->getPackage($package, $channel); + $this->_setPackageDeps($depdb, $package); + } + } + $error = $this->_writeDepDB($depdb); + if (PEAR::isError($error)) { + return $error; + } + $this->_cache = $depdb; + return true; + } + + /** + * Register usage of the dependency DB to prevent race conditions + * @param int one of the LOCK_* constants + * @return true|PEAR_Error + * @access private + */ + function _lock($mode = LOCK_EX) + { + if (!eregi('Windows 9', php_uname())) { + if ($mode != LOCK_UN && is_resource($this->_lockFp)) { + // XXX does not check type of lock (LOCK_SH/LOCK_EX) + return true; + } + $open_mode = 'w'; + // XXX People reported problems with LOCK_SH and 'w' + if ($mode === LOCK_SH) { + if (@!is_file($this->_lockfile)) { + touch($this->_lockfile); + } + $open_mode = 'r'; + } + + if (!is_resource($this->_lockFp)) { + $this->_lockFp = @fopen($this->_lockfile, $open_mode); + } + if (!is_resource($this->_lockFp)) { + return PEAR::raiseError("could not create Dependency lock file" . + (isset($php_errormsg) ? ": " . $php_errormsg : "")); + } + if (!(int)flock($this->_lockFp, $mode)) { + switch ($mode) { + case LOCK_SH: $str = 'shared'; break; + case LOCK_EX: $str = 'exclusive'; break; + case LOCK_UN: $str = 'unlock'; break; + default: $str = 'unknown'; break; + } + return PEAR::raiseError("could not acquire $str lock ($this->_lockfile)"); + } + } + return true; + } + + /** + * Release usage of dependency DB + * @return true|PEAR_Error + * @access private + */ + function _unlock() + { + $ret = $this->_lock(LOCK_UN); + if (is_resource($this->_lockFp)) { + fclose($this->_lockFp); + } + $this->_lockFp = null; + return $ret; + } + + /** + * Load the dependency database from disk, or return the cache + * @return array|PEAR_Error + */ + function _getDepDB() + { + if (!$this->hasWriteAccess()) { + return array('_version' => $this->_version); + } + if (isset($this->_cache)) { + return $this->_cache; + } + if (!$fp = fopen($this->_depdb, 'r')) { + $err = PEAR::raiseError("Could not open dependencies file `".$this->_depdb."'"); + return $err; + } + $rt = get_magic_quotes_runtime(); + set_magic_quotes_runtime(0); + clearstatcache(); + if (function_exists('file_get_contents')) { + fclose($fp); + $data = unserialize(file_get_contents($this->_depdb)); + } else { + $data = unserialize(fread($fp, filesize($this->_depdb))); + fclose($fp); + } + set_magic_quotes_runtime($rt); + $this->_cache = $data; + return $data; + } + + /** + * Write out the dependency database to disk + * @param array the database + * @return true|PEAR_Error + * @access private + */ + function _writeDepDB(&$deps) + { + if (PEAR::isError($e = $this->_lock(LOCK_EX))) { + return $e; + } + if (!$fp = fopen($this->_depdb, 'wb')) { + $this->_unlock(); + return PEAR::raiseError("Could not open dependencies file `".$this->_depdb."' for writing"); + } + $rt = get_magic_quotes_runtime(); + set_magic_quotes_runtime(0); + fwrite($fp, serialize($deps)); + set_magic_quotes_runtime($rt); + fclose($fp); + $this->_unlock(); + $this->_cache = $deps; + return true; + } + + /** + * Register all dependencies from a package in the dependencies database, in essence + * "installing" the package's dependency information + * @param array the database + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @access private + */ + function _setPackageDeps(&$data, &$pkg) + { + $pkg->setConfig($this->_config); + if ($pkg->getPackagexmlVersion() == '1.0') { + $gen = &$pkg->getDefaultGenerator(); + $deps = $gen->dependenciesToV2(); + } else { + $deps = $pkg->getDeps(true); + } + if (!$deps) { + return; + } + $data['dependencies'][strtolower($pkg->getChannel())][strtolower($pkg->getPackage())] + = array(); + if (isset($deps['required']['package'])) { + if (!isset($deps['required']['package'][0])) { + $deps['required']['package'] = array($deps['required']['package']); + } + foreach ($deps['required']['package'] as $dep) { + $this->_registerDep($data, $pkg, $dep, 'required'); + } + } + if (isset($deps['optional']['package'])) { + if (!isset($deps['optional']['package'][0])) { + $deps['optional']['package'] = array($deps['optional']['package']); + } + foreach ($deps['optional']['package'] as $dep) { + $this->_registerDep($data, $pkg, $dep, 'optional'); + } + } + if (isset($deps['required']['subpackage'])) { + if (!isset($deps['required']['subpackage'][0])) { + $deps['required']['subpackage'] = array($deps['required']['subpackage']); + } + foreach ($deps['required']['subpackage'] as $dep) { + $this->_registerDep($data, $pkg, $dep, 'required'); + } + } + if (isset($deps['optional']['subpackage'])) { + if (!isset($deps['optional']['subpackage'][0])) { + $deps['optional']['subpackage'] = array($deps['optional']['subpackage']); + } + foreach ($deps['optional']['subpackage'] as $dep) { + $this->_registerDep($data, $pkg, $dep, 'optional'); + } + } + if (isset($deps['group'])) { + if (!isset($deps['group'][0])) { + $deps['group'] = array($deps['group']); + } + foreach ($deps['group'] as $group) { + if (isset($group['package'])) { + if (!isset($group['package'][0])) { + $group['package'] = array($group['package']); + } + foreach ($group['package'] as $dep) { + $this->_registerDep($data, $pkg, $dep, 'optional', + $group['attribs']['name']); + } + } + if (isset($group['subpackage'])) { + if (!isset($group['subpackage'][0])) { + $group['subpackage'] = array($group['subpackage']); + } + foreach ($group['subpackage'] as $dep) { + $this->_registerDep($data, $pkg, $dep, 'optional', + $group['attribs']['name']); + } + } + } + } + if ($data['dependencies'][strtolower($pkg->getChannel())] + [strtolower($pkg->getPackage())] == array()) { + unset($data['dependencies'][strtolower($pkg->getChannel())] + [strtolower($pkg->getPackage())]); + if (!count($data['dependencies'][strtolower($pkg->getChannel())])) { + unset($data['dependencies'][strtolower($pkg->getChannel())]); + } + } + } + + /** + * @param array the database + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @param array the specific dependency + * @param required|optional whether this is a required or an optional dep + * @param string|false dependency group this dependency is from, or false for ordinary dep + */ + function _registerDep(&$data, &$pkg, $dep, $type, $group = false) + { + $info = array( + 'dep' => $dep, + 'type' => $type, + 'group' => $group); + + if (isset($dep['channel'])) { + $depchannel = $dep['channel']; + } else { + $depchannel = '__uri'; + } + $data['dependencies'][strtolower($pkg->getChannel())][strtolower($pkg->getPackage())][] + = $info; + if (isset($data['packages'][strtolower($depchannel)][strtolower($dep['name'])])) { + $found = false; + foreach ($data['packages'][strtolower($depchannel)][strtolower($dep['name'])] + as $i => $p) { + if ($p['channel'] == strtolower($pkg->getChannel()) && + $p['package'] == strtolower($pkg->getPackage())) { + $found = true; + break; + } + } + if (!$found) { + $data['packages'][strtolower($depchannel)][strtolower($dep['name'])][] + = array('channel' => strtolower($pkg->getChannel()), + 'package' => strtolower($pkg->getPackage())); + } + } else { + $data['packages'][strtolower($depchannel)][strtolower($dep['name'])][] + = array('channel' => strtolower($pkg->getChannel()), + 'package' => strtolower($pkg->getPackage())); + } + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Downloader.php b/campcaster/src/tools/pear/src/PEAR/Downloader.php new file mode 100644 index 000000000..1368bc048 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Downloader.php @@ -0,0 +1,1547 @@ + + * @author Stig Bakken + * @author Tomas V. V. Cox + * @author Martin Jansen + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Downloader.php,v 1.99.2.2 2006/06/16 12:35:12 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.3.0 + */ + +/** + * Needed for constants, extending + */ +require_once 'PEAR/Common.php'; + +define('PEAR_INSTALLER_OK', 1); +define('PEAR_INSTALLER_FAILED', 0); +define('PEAR_INSTALLER_SKIPPED', -1); +define('PEAR_INSTALLER_ERROR_NO_PREF_STATE', 2); + +/** + * Administration class used to download anything from the internet (PEAR Packages, + * static URLs, xml files) + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @author Stig Bakken + * @author Tomas V. V. Cox + * @author Martin Jansen + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.3.0 + */ +class PEAR_Downloader extends PEAR_Common +{ + /** + * @var PEAR_Registry + * @access private + */ + var $_registry; + + /** + * @var PEAR_Remote + * @access private + */ + var $_remote; + + /** + * Preferred Installation State (snapshot, devel, alpha, beta, stable) + * @var string|null + * @access private + */ + var $_preferredState; + + /** + * Options from command-line passed to Install. + * + * Recognized options:
+ * - onlyreqdeps : install all required dependencies as well + * - alldeps : install all dependencies, including optional + * - installroot : base relative path to install files in + * - force : force a download even if warnings would prevent it + * - nocompress : download uncompressed tarballs + * @see PEAR_Command_Install + * @access private + * @var array + */ + var $_options; + + /** + * Downloaded Packages after a call to download(). + * + * Format of each entry: + * + * + * array('pkg' => 'package_name', 'file' => '/path/to/local/file', + * 'info' => array() // parsed package.xml + * ); + * + * @access private + * @var array + */ + var $_downloadedPackages = array(); + + /** + * Packages slated for download. + * + * This is used to prevent downloading a package more than once should it be a dependency + * for two packages to be installed. + * Format of each entry: + * + * 
+     * array('package_name1' => parsed package.xml, 'package_name2' => parsed package.xml,
+     * );
+     *
+ * @access private + * @var array + */ + var $_toDownload = array(); + + /** + * Array of every package installed, with names lower-cased. + * + * Format: + * + * array('package1' => 0, 'package2' => 1, ); + * + * @var array + */ + var $_installed = array(); + + /** + * @var array + * @access private + */ + var $_errorStack = array(); + + /** + * @var boolean + * @access private + */ + var $_internalDownload = false; + + /** + * Temporary variable used in sorting packages by dependency in {@link sortPkgDeps()} + * @var array + * @access private + */ + var $_packageSortTree; + + /** + * Temporary directory, or configuration value where downloads will occur + * @var string + */ + var $_downloadDir; + // {{{ PEAR_Downloader() + + /** + * @param PEAR_Frontend_* + * @param array + * @param PEAR_Config + */ + function PEAR_Downloader(&$ui, $options, &$config) + { + parent::PEAR_Common(); + $this->_options = $options; + $this->config = &$config; + $this->_preferredState = $this->config->get('preferred_state'); + $this->ui = &$ui; + if (!$this->_preferredState) { + // don't inadvertantly use a non-set preferred_state + $this->_preferredState = null; + } + + if (isset($this->_options['installroot'])) { + $this->config->setInstallRoot($this->_options['installroot']); + } + $this->_registry = &$config->getRegistry(); + $this->_remote = &$config->getRemote(); + + if (isset($this->_options['alldeps']) || isset($this->_options['onlyreqdeps'])) { + $this->_installed = $this->_registry->listAllPackages(); + foreach ($this->_installed as $key => $unused) { + if (!count($unused)) { + continue; + } + @array_walk($this->_installed[$key], 'strtolower'); + } + } + } + + /** + * Attempt to discover a channel's remote capabilities from + * its server name + * @param string + * @return boolean + */ + function discover($channel) + { + $this->log(1, 'Attempting to discover channel "' . $channel . '"...'); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $callback = $this->ui ? array(&$this, '_downloadCallback') : null; + if (!class_exists('System')) { + require_once 'System.php'; + } + $a = $this->downloadHttp('http://' . $channel . '/channel.xml', $this->ui, + System::mktemp(array('-d')), $callback, false); + PEAR::popErrorHandling(); + if (PEAR::isError($a)) { + return false; + } + list($a, $lastmodified) = $a; + if (!class_exists('PEAR/ChannelFile.php')) { + require_once 'PEAR/ChannelFile.php'; + } + $b = new PEAR_ChannelFile; + if ($b->fromXmlFile($a)) { + @unlink($a); + if ($this->config->get('auto_discover')) { + $this->_registry->addChannel($b, $lastmodified); + $alias = $b->getName(); + if ($b->getName() == $this->_registry->channelName($b->getAlias())) { + $alias = $b->getAlias(); + } + $this->log(1, 'Auto-discovered channel "' . $channel . + '", alias "' . $alias . '", adding to registry'); + } + return true; + } + @unlink($a); + return false; + } + + /** + * For simpler unit-testing + * @param PEAR_Downloader + * @return PEAR_Downloader_Package + */ + function &newDownloaderPackage(&$t) + { + if (!class_exists('PEAR_Downloader_Package')) { + require_once 'PEAR/Downloader/Package.php'; + } + $a = &new PEAR_Downloader_Package($t); + return $a; + } + + /** + * For simpler unit-testing + * @param PEAR_Config + * @param array + * @param array + * @param int + */ + function &getDependency2Object(&$c, $i, $p, $s) + { + if (!class_exists('PEAR/Dependency2.php')) { + require_once 'PEAR/Dependency2.php'; + } + $z = &new PEAR_Dependency2($c, $i, $p, $s); + return $z; + } + + function &download($params) + { + if (!count($params)) { + $a = array(); + return $a; + } + if (!isset($this->_registry)) { + $this->_registry = &$this->config->getRegistry(); + } + if (!isset($this->_remote)) { + $this->_remote = &$this->config->getRemote(); + } + $channelschecked = array(); + // convert all parameters into PEAR_Downloader_Package objects + foreach ($params as $i => $param) { + $params[$i] = &$this->newDownloaderPackage($this); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $err = $params[$i]->initialize($param); + PEAR::staticPopErrorHandling(); + if (!$err) { + // skip parameters that were missed by preferred_state + continue; + } + if (PEAR::isError($err)) { + if (!isset($this->_options['soft'])) { + $this->log(0, $err->getMessage()); + } + $params[$i] = false; + if (is_object($param)) { + $param = $param->getChannel() . '/' . $param->getPackage(); + } + $this->pushError('Package "' . $param . '" is not valid', + PEAR_INSTALLER_SKIPPED); + } else { + do { + if ($params[$i] && $params[$i]->getType() == 'local') { + // bug #7090 + // skip channel.xml check for local packages + break; + } + if ($params[$i] && !isset($channelschecked[$params[$i]->getChannel()]) && + !isset($this->_options['offline'])) { + $channelschecked[$params[$i]->getChannel()] = true; + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + if (!class_exists('System')) { + require_once 'System.php'; + } + $curchannel = &$this->_registry->getChannel($params[$i]->getChannel()); + if (PEAR::isError($curchannel)) { + PEAR::staticPopErrorHandling(); + return $this->raiseError($curchannel); + } + $a = $this->downloadHttp('http://' . $params[$i]->getChannel() . + '/channel.xml', $this->ui, + System::mktemp(array('-t' . $this->getDownloadDir())), null, $curchannel->lastModified()); + + PEAR::staticPopErrorHandling(); + if (PEAR::isError($a) || !$a) { + break; + } + $this->log(0, 'WARNING: channel "' . $params[$i]->getChannel() . '" has ' . + 'updated its protocols, use "channel-update ' . $params[$i]->getChannel() . + '" to update'); + } + } while (false); + if ($params[$i] && !isset($this->_options['downloadonly'])) { + if (isset($this->_options['packagingroot'])) { + $checkdir = $this->_prependPath( + $this->config->get('php_dir', null, $params[$i]->getChannel()), + $this->_options['packagingroot']); + } else { + $checkdir = $this->config->get('php_dir', + null, $params[$i]->getChannel()); + } + while ($checkdir && $checkdir != '/' && !file_exists($checkdir)) { + $checkdir = dirname($checkdir); + } + if ($checkdir == '.') { + $checkdir = '/'; + } + if (!@is_writeable($checkdir)) { + return PEAR::raiseError('Cannot install, php_dir for channel "' . + $params[$i]->getChannel() . '" is not writeable by the current user'); + } + } + } + } + unset($channelschecked); + PEAR_Downloader_Package::removeDuplicates($params); + if (!count($params)) { + $a = array(); + return $a; + } + if (!isset($this->_options['nodeps']) && !isset($this->_options['offline'])) { + $reverify = true; + while ($reverify) { + $reverify = false; + foreach ($params as $i => $param) { + $ret = $params[$i]->detectDependencies($params); + if (PEAR::isError($ret)) { + $reverify = true; + $params[$i] = false; + PEAR_Downloader_Package::removeDuplicates($params); + if (!isset($this->_options['soft'])) { + $this->log(0, $ret->getMessage()); + } + continue 2; + } + } + } + } + if (isset($this->_options['offline'])) { + $this->log(3, 'Skipping dependency download check, --offline specified'); + } + if (!count($params)) { + $a = array(); + return $a; + } + while (PEAR_Downloader_Package::mergeDependencies($params)); + PEAR_Downloader_Package::removeInstalled($params); + if (!count($params)) { + $this->pushError('No valid packages found', PEAR_INSTALLER_FAILED); + $a = array(); + return $a; + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $err = $this->analyzeDependencies($params); + PEAR::popErrorHandling(); + if (!count($params)) { + $this->pushError('No valid packages found', PEAR_INSTALLER_FAILED); + $a = array(); + return $a; + } + $ret = array(); + $newparams = array(); + if (isset($this->_options['pretend'])) { + return $params; + } + foreach ($params as $i => $package) { + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $pf = &$params[$i]->download(); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($pf)) { + if (!isset($this->_options['soft'])) { + $this->log(1, $pf->getMessage()); + $this->log(0, 'Error: cannot download "' . + $this->_registry->parsedPackageNameToString($package->getParsedPackage(), + true) . + '"'); + } + continue; + } + $newparams[] = &$params[$i]; + $ret[] = array('file' => $pf->getArchiveFile(), + 'info' => &$pf, + 'pkg' => $pf->getPackage()); + } + $this->_downloadedPackages = $ret; + return $newparams; + } + + /** + * @param array all packages to be installed + */ + function analyzeDependencies(&$params) + { + $hasfailed = $failed = false; + if (isset($this->_options['downloadonly'])) { + return; + } + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $redo = true; + $reset = false; + while ($redo) { + $redo = false; + foreach ($params as $i => $param) { + $deps = $param->getDeps(); + if (!$deps) { + $depchecker = &$this->getDependency2Object($this->config, $this->getOptions(), + $param->getParsedPackage(), PEAR_VALIDATE_DOWNLOADING); + if ($param->getType() == 'xmlrpc') { + $send = $param->getDownloadURL(); + } else { + $send = $param->getPackageFile(); + } + $installcheck = $depchecker->validatePackage($send, $this, $params); + if (PEAR::isError($installcheck)) { + if (!isset($this->_options['soft'])) { + $this->log(0, $installcheck->getMessage()); + } + $hasfailed = true; + $params[$i] = false; + $reset = true; + $redo = true; + $failed = false; + PEAR_Downloader_Package::removeDuplicates($params); + continue 2; + } + continue; + } + if (!$reset && $param->alreadyValidated()) { + continue; + } + if (count($deps)) { + $depchecker = &$this->getDependency2Object($this->config, $this->getOptions(), + $param->getParsedPackage(), PEAR_VALIDATE_DOWNLOADING); + if ($param->getType() == 'xmlrpc') { + $send = $param->getDownloadURL(); + } else { + $send = $param->getPackageFile(); + } + $installcheck = $depchecker->validatePackage($send, $this, $params); + if (PEAR::isError($installcheck)) { + if (!isset($this->_options['soft'])) { + $this->log(0, $installcheck->getMessage()); + } + $hasfailed = true; + $params[$i] = false; + $reset = true; + $redo = true; + $failed = false; + PEAR_Downloader_Package::removeDuplicates($params); + continue 2; + } + $failed = false; + if (isset($deps['required'])) { + foreach ($deps['required'] as $type => $dep) { + // note: Dependency2 will never return a PEAR_Error if ignore-errors + // is specified, so soft is needed to turn off logging + if (!isset($dep[0])) { + if (PEAR::isError($e = $depchecker->{"validate{$type}Dependency"}($dep, + true, $params))) { + $failed = true; + if (!isset($this->_options['soft'])) { + $this->log(0, $e->getMessage()); + } + } elseif (is_array($e) && !$param->alreadyValidated()) { + if (!isset($this->_options['soft'])) { + $this->log(0, $e[0]); + } + } + } else { + foreach ($dep as $d) { + if (PEAR::isError($e = + $depchecker->{"validate{$type}Dependency"}($d, + true, $params))) { + $failed = true; + if (!isset($this->_options['soft'])) { + $this->log(0, $e->getMessage()); + } + } elseif (is_array($e) && !$param->alreadyValidated()) { + if (!isset($this->_options['soft'])) { + $this->log(0, $e[0]); + } + } + } + } + } + if (isset($deps['optional'])) { + foreach ($deps['optional'] as $type => $dep) { + if (!isset($dep[0])) { + if (PEAR::isError($e = + $depchecker->{"validate{$type}Dependency"}($dep, + false, $params))) { + $failed = true; + if (!isset($this->_options['soft'])) { + $this->log(0, $e->getMessage()); + } + } elseif (is_array($e) && !$param->alreadyValidated()) { + if (!isset($this->_options['soft'])) { + $this->log(0, $e[0]); + } + } + } else { + foreach ($dep as $d) { + if (PEAR::isError($e = + $depchecker->{"validate{$type}Dependency"}($d, + false, $params))) { + $failed = true; + if (!isset($this->_options['soft'])) { + $this->log(0, $e->getMessage()); + } + } elseif (is_array($e) && !$param->alreadyValidated()) { + if (!isset($this->_options['soft'])) { + $this->log(0, $e[0]); + } + } + } + } + } + } + $groupname = $param->getGroup(); + if (isset($deps['group']) && $groupname) { + if (!isset($deps['group'][0])) { + $deps['group'] = array($deps['group']); + } + $found = false; + foreach ($deps['group'] as $group) { + if ($group['attribs']['name'] == $groupname) { + $found = true; + break; + } + } + if ($found) { + unset($group['attribs']); + foreach ($group as $type => $dep) { + if (!isset($dep[0])) { + if (PEAR::isError($e = + $depchecker->{"validate{$type}Dependency"}($dep, + false, $params))) { + $failed = true; + if (!isset($this->_options['soft'])) { + $this->log(0, $e->getMessage()); + } + } elseif (is_array($e) && !$param->alreadyValidated()) { + if (!isset($this->_options['soft'])) { + $this->log(0, $e[0]); + } + } + } else { + foreach ($dep as $d) { + if (PEAR::isError($e = + $depchecker->{"validate{$type}Dependency"}($d, + false, $params))) { + $failed = true; + if (!isset($this->_options['soft'])) { + $this->log(0, $e->getMessage()); + } + } elseif (is_array($e) && !$param->alreadyValidated()) { + if (!isset($this->_options['soft'])) { + $this->log(0, $e[0]); + } + } + } + } + } + } + } + } else { + foreach ($deps as $dep) { + if (PEAR::isError($e = $depchecker->validateDependency1($dep, $params))) { + $failed = true; + if (!isset($this->_options['soft'])) { + $this->log(0, $e->getMessage()); + } + } elseif (is_array($e) && !$param->alreadyValidated()) { + if (!isset($this->_options['soft'])) { + $this->log(0, $e[0]); + } + } + } + } + $params[$i]->setValidated(); + } + if ($failed) { + $hasfailed = true; + $params[$i] = false; + $reset = true; + $redo = true; + $failed = false; + PEAR_Downloader_Package::removeDuplicates($params); + continue 2; + } + } + } + PEAR::staticPopErrorHandling(); + if ($hasfailed && (isset($this->_options['ignore-errors']) || + isset($this->_options['nodeps']))) { + // this is probably not needed, but just in case + if (!isset($this->_options['soft'])) { + $this->log(0, 'WARNING: dependencies failed'); + } + } + } + + /** + * Retrieve the directory that downloads will happen in + * @access private + * @return string + */ + function getDownloadDir() + { + if (isset($this->_downloadDir)) { + return $this->_downloadDir; + } + $downloaddir = $this->config->get('download_dir'); + if (empty($downloaddir)) { + if (!class_exists('System')) { + require_once 'System.php'; + } + if (PEAR::isError($downloaddir = System::mktemp('-d'))) { + return $downloaddir; + } + $this->log(3, '+ tmp dir created at ' . $downloaddir); + } + return $this->_downloadDir = $downloaddir; + } + + function setDownloadDir($dir) + { + $this->_downloadDir = $dir; + } + + // }}} + // {{{ configSet() + function configSet($key, $value, $layer = 'user', $channel = false) + { + $this->config->set($key, $value, $layer, $channel); + $this->_preferredState = $this->config->get('preferred_state', null, $channel); + if (!$this->_preferredState) { + // don't inadvertantly use a non-set preferred_state + $this->_preferredState = null; + } + } + + // }}} + // {{{ setOptions() + function setOptions($options) + { + $this->_options = $options; + } + + // }}} + // {{{ setOptions() + function getOptions() + { + return $this->_options; + } + + // }}} + + /** + * For simpler unit-testing + * @param PEAR_Config + * @param int + * @param string + */ + function &getPackagefileObject(&$c, $d, $t = false) + { + if (!class_exists('PEAR_PackageFile')) { + require_once 'PEAR/PackageFile.php'; + } + $a = &new PEAR_PackageFile($c, $d, $t); + return $a; + } + + // {{{ _getPackageDownloadUrl() + + /** + * @param array output of {@link parsePackageName()} + * @access private + */ + function _getPackageDownloadUrl($parr) + { + $curchannel = $this->config->get('default_channel'); + $this->configSet('default_channel', $parr['channel']); + // getDownloadURL returns an array. On error, it only contains information + // on the latest release as array(version, info). On success it contains + // array(version, info, download url string) + $state = isset($parr['state']) ? $parr['state'] : $this->config->get('preferred_state'); + if (!$this->_registry->channelExists($parr['channel'])) { + do { + if ($this->config->get('auto_discover')) { + if ($this->discover($parr['channel'])) { + break; + } + } + $this->configSet('default_channel', $curchannel); + return PEAR::raiseError('Unknown remote channel: ' . $remotechannel); + } while (false); + } + $chan = &$this->_registry->getChannel($parr['channel']); + if (PEAR::isError($chan)) { + return $chan; + } + $version = $this->_registry->packageInfo($parr['package'], 'version', + $parr['channel']); + if ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $rest = &$this->config->getREST('1.0', $this->_options); + if (!isset($parr['version']) && !isset($parr['state']) && $version + && !isset($this->_options['downloadonly'])) { + $url = $rest->getDownloadURL($base, $parr, $state, $version); + } else { + $url = $rest->getDownloadURL($base, $parr, $state, false); + } + if (PEAR::isError($url)) { + $this->configSet('default_channel', $curchannel); + return $url; + } + if ($parr['channel'] != $curchannel) { + $this->configSet('default_channel', $curchannel); + } + if (!is_array($url)) { + return $url; + } + $url['raw'] = false; // no checking is necessary for REST + if (!is_array($url['info'])) { + return PEAR::raiseError('Invalid remote dependencies retrieved from REST - ' . + 'this should never happen'); + } + if (isset($url['info']['required']) || $url['compatible']) { + require_once 'PEAR/PackageFile/v2.php'; + $pf = new PEAR_PackageFile_v2; + $pf->setRawChannel($parr['channel']); + if ($url['compatible']) { + $pf->setRawCompatible($url['compatible']); + } + } else { + require_once 'PEAR/PackageFile/v1.php'; + $pf = new PEAR_PackageFile_v1; + } + $pf->setRawPackage($url['package']); + $pf->setDeps($url['info']); + $pf->setRawState($url['stability']); + $url['info'] = &$pf; + if (!extension_loaded("zlib") || isset($this->_options['nocompress'])) { + $ext = '.tar'; + } else { + $ext = '.tgz'; + } + if (is_array($url)) { + if (isset($url['url'])) { + $url['url'] .= $ext; + } + } + return $url; + } elseif ($chan->supports('xmlrpc', 'package.getDownloadURL', false, '1.1')) { + // don't install with the old version information unless we're doing a plain + // vanilla simple installation. If the user says to install a particular + // version or state, ignore the current installed version + if (!isset($parr['version']) && !isset($parr['state']) && $version + && !isset($this->_options['downloadonly'])) { + $url = $this->_remote->call('package.getDownloadURL', $parr, $state, $version); + } else { + $url = $this->_remote->call('package.getDownloadURL', $parr, $state); + } + } else { + $url = $this->_remote->call('package.getDownloadURL', $parr, $state); + } + if (PEAR::isError($url)) { + return $url; + } + if ($parr['channel'] != $curchannel) { + $this->configSet('default_channel', $curchannel); + } + if (isset($url['__PEAR_ERROR_CLASS__'])) { + return PEAR::raiseError($url['message']); + } + if (!is_array($url)) { + return $url; + } + $url['raw'] = $url['info']; + if (isset($this->_options['downloadonly'])) { + $pkg = &$this->getPackagefileObject($this->config, $this->debug); + } else { + $pkg = &$this->getPackagefileObject($this->config, $this->debug, + $this->getDownloadDir()); + } + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $pinfo = &$pkg->fromXmlString($url['info'], PEAR_VALIDATE_DOWNLOADING, 'remote'); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($pinfo)) { + if (!isset($this->_options['soft'])) { + $this->log(0, $pinfo->getMessage()); + } + return PEAR::raiseError('Remote package.xml is not valid - this should never happen'); + } + $url['info'] = &$pinfo; + if (!extension_loaded("zlib") || isset($this->_options['nocompress'])) { + $ext = '.tar'; + } else { + $ext = '.tgz'; + } + if (is_array($url)) { + if (isset($url['url'])) { + $url['url'] .= $ext; + } + } + return $url; + } + // }}} + // {{{ getDepPackageDownloadUrl() + + /** + * @param array dependency array + * @access private + */ + function _getDepPackageDownloadUrl($dep, $parr) + { + $xsdversion = isset($dep['rel']) ? '1.0' : '2.0'; + $curchannel = $this->config->get('default_channel'); + if (isset($dep['uri'])) { + $xsdversion = '2.0'; + $chan = &$this->_registry->getChannel('__uri'); + if (PEAR::isError($chan)) { + return $chan; + } + $version = $this->_registry->packageInfo($dep['name'], 'version', '__uri'); + $this->configSet('default_channel', '__uri'); + } else { + if (isset($dep['channel'])) { + $remotechannel = $dep['channel']; + } else { + $remotechannel = 'pear.php.net'; + } + if (!$this->_registry->channelExists($remotechannel)) { + do { + if ($this->config->get('auto_discover')) { + if ($this->discover($remotechannel)) { + break; + } + } + return PEAR::raiseError('Unknown remote channel: ' . $remotechannel); + } while (false); + } + $chan = &$this->_registry->getChannel($remotechannel); + if (PEAR::isError($chan)) { + return $chan; + } + $version = $this->_registry->packageInfo($dep['name'], 'version', + $remotechannel); + $this->configSet('default_channel', $remotechannel); + } + $state = isset($parr['state']) ? $parr['state'] : $this->config->get('preferred_state'); + if (isset($parr['state']) && isset($parr['version'])) { + unset($parr['state']); + } + if (isset($dep['uri'])) { + $info = &$this->newDownloaderPackage($this); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $err = $info->initialize($dep); + PEAR::staticPopErrorHandling(); + if (!$err) { + // skip parameters that were missed by preferred_state + return PEAR::raiseError('Cannot initialize dependency'); + } + if (PEAR::isError($err)) { + if (!isset($this->_options['soft'])) { + $this->log(0, $err->getMessage()); + } + if (is_object($info)) { + $param = $info->getChannel() . '/' . $info->getPackage(); + } + return PEAR::raiseError('Package "' . $param . '" is not valid'); + } + return $info; + } elseif ($chan->supportsREST($this->config->get('preferred_mirror')) && + $base = $chan->getBaseURL('REST1.0', $this->config->get('preferred_mirror'))) { + $rest = &$this->config->getREST('1.0', $this->_options); + $url = $rest->getDepDownloadURL($base, $xsdversion, $dep, $parr, + $state, $version); + if (PEAR::isError($url)) { + return $url; + } + if ($parr['channel'] != $curchannel) { + $this->configSet('default_channel', $curchannel); + } + if (!is_array($url)) { + return $url; + } + $url['raw'] = false; // no checking is necessary for REST + if (!is_array($url['info'])) { + return PEAR::raiseError('Invalid remote dependencies retrieved from REST - ' . + 'this should never happen'); + } + if (isset($url['info']['required'])) { + if (!class_exists('PEAR_PackageFile_v2')) { + require_once 'PEAR/PackageFile/v2.php'; + } + $pf = new PEAR_PackageFile_v2; + $pf->setRawChannel($remotechannel); + } else { + if (!class_exists('PEAR_PackageFile_v1')) { + require_once 'PEAR/PackageFile/v1.php'; + } + $pf = new PEAR_PackageFile_v1; + } + $pf->setRawPackage($url['package']); + $pf->setDeps($url['info']); + $pf->setRawState($url['stability']); + $url['info'] = &$pf; + if (!extension_loaded("zlib") || isset($this->_options['nocompress'])) { + $ext = '.tar'; + } else { + $ext = '.tgz'; + } + if (is_array($url)) { + if (isset($url['url'])) { + $url['url'] .= $ext; + } + } + return $url; + } elseif ($chan->supports('xmlrpc', 'package.getDepDownloadURL', false, '1.1')) { + if ($version) { + $url = $this->_remote->call('package.getDepDownloadURL', $xsdversion, $dep, $parr, + $state, $version); + } else { + $url = $this->_remote->call('package.getDepDownloadURL', $xsdversion, $dep, $parr, + $state); + } + } else { + $url = $this->_remote->call('package.getDepDownloadURL', $xsdversion, $dep, $parr, $state); + } + if ($this->config->get('default_channel') != $curchannel) { + $this->configSet('default_channel', $curchannel); + } + if (!is_array($url)) { + return $url; + } + if (isset($url['__PEAR_ERROR_CLASS__'])) { + return PEAR::raiseError($url['message']); + } + $url['raw'] = $url['info']; + $pkg = &$this->getPackagefileObject($this->config, $this->debug); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $pinfo = &$pkg->fromXmlString($url['info'], PEAR_VALIDATE_DOWNLOADING, 'remote'); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($pinfo)) { + if (!isset($this->_options['soft'])) { + $this->log(0, $pinfo->getMessage()); + } + return PEAR::raiseError('Remote package.xml is not valid - this should never happen'); + } + $url['info'] = &$pinfo; + if (is_array($url)) { + if (!extension_loaded("zlib") || isset($this->_options['nocompress'])) { + $ext = '.tar'; + } else { + $ext = '.tgz'; + } + if (isset($url['url'])) { + $url['url'] .= $ext; + } + } + return $url; + } + // }}} + // {{{ getPackageDownloadUrl() + + /** + * @deprecated in favor of _getPackageDownloadUrl + */ + function getPackageDownloadUrl($package, $version = null, $channel = false) + { + if ($version) { + $package .= "-$version"; + } + if ($this === null || $this->_registry === null) { + $package = "http://pear.php.net/get/$package"; + } else { + $chan = $this->_registry->getChannel($channel); + if (PEAR::isError($chan)) { + return ''; + } + $package = "http://" . $chan->getServer() . "/get/$package"; + } + if (!extension_loaded("zlib")) { + $package .= '?uncompress=yes'; + } + return $package; + } + + // }}} + // {{{ getDownloadedPackages() + + /** + * Retrieve a list of downloaded packages after a call to {@link download()}. + * + * Also resets the list of downloaded packages. + * @return array + */ + function getDownloadedPackages() + { + $ret = $this->_downloadedPackages; + $this->_downloadedPackages = array(); + $this->_toDownload = array(); + return $ret; + } + + // }}} + // {{{ _downloadCallback() + + function _downloadCallback($msg, $params = null) + { + switch ($msg) { + case 'saveas': + $this->log(1, "downloading $params ..."); + break; + case 'done': + $this->log(1, '...done: ' . number_format($params, 0, '', ',') . ' bytes'); + break; + case 'bytesread': + static $bytes; + if (empty($bytes)) { + $bytes = 0; + } + if (!($bytes % 10240)) { + $this->log(1, '.', false); + } + $bytes += $params; + break; + case 'start': + $this->log(1, "Starting to download {$params[0]} (".number_format($params[1], 0, '', ',')." bytes)"); + break; + } + if (method_exists($this->ui, '_downloadCallback')) + $this->ui->_downloadCallback($msg, $params); + } + + // }}} + // {{{ _prependPath($path, $prepend) + + function _prependPath($path, $prepend) + { + if (strlen($prepend) > 0) { + if (OS_WINDOWS && preg_match('/^[a-z]:/i', $path)) { + if (preg_match('/^[a-z]:/i', $prepend)) { + $prepend = substr($prepend, 2); + } elseif ($prepend{0} != '\\') { + $prepend = "\\$prepend"; + } + $path = substr($path, 0, 2) . $prepend . substr($path, 2); + } else { + $path = $prepend . $path; + } + } + return $path; + } + // }}} + // {{{ pushError($errmsg, $code) + + /** + * @param string + * @param integer + */ + function pushError($errmsg, $code = -1) + { + array_push($this->_errorStack, array($errmsg, $code)); + } + + // }}} + // {{{ getErrorMsgs() + + function getErrorMsgs() + { + $msgs = array(); + $errs = $this->_errorStack; + foreach ($errs as $err) { + $msgs[] = $err[0]; + } + $this->_errorStack = array(); + return $msgs; + } + + // }}} + + /** + * for BC + */ + function sortPkgDeps(&$packages, $uninstall = false) + { + $uninstall ? + $this->sortPackagesForUninstall($packages) : + $this->sortPackagesForInstall($packages); + } + + function _getDepTreeDP($package, $packages, &$deps, &$checked) + { + $pf = $package->getPackageFile(); + $checked[strtolower($package->getChannel())][strtolower($package->getPackage())] + = true; + $pdeps = $pf->getDeps(true); + if (!$pdeps) { + return; + } + if ($pf->getPackagexmlVersion() == '1.0') { + foreach ($pdeps as $dep) { + if ($dep['type'] != 'pkg') { + continue; + } + $deps['pear.php.net'][strtolower($dep['name'])] = true; + foreach ($packages as $p) { + $dep['channel'] = 'pear.php.net'; + $dep['package'] = $dep['name']; + if ($p->isEqual($dep)) { + if (!isset($checked[strtolower($p->getChannel())] + [strtolower($p->getPackage())])) { + // add the dependency's dependencies to the tree + $this->_getDepTreeDP($p, $packages, $deps, $checked); + } + } + } + } + } else { + $tdeps = array(); + if (isset($pdeps['required']['package'])) { + $t = $pdeps['required']['package']; + if (!isset($t[0])) { + $t = array($t); + } + $tdeps = array_merge($tdeps, $t); + } + if (isset($pdeps['required']['subpackage'])) { + $t = $pdeps['required']['subpackage']; + if (!isset($t[0])) { + $t = array($t); + } + $tdeps = array_merge($tdeps, $t); + } + if (isset($pdeps['optional']['package'])) { + $t = $pdeps['optional']['package']; + if (!isset($t[0])) { + $t = array($t); + } + $tdeps = array_merge($tdeps, $t); + } + if (isset($pdeps['optional']['subpackage'])) { + $t = $pdeps['optional']['subpackage']; + if (!isset($t[0])) { + $t = array($t); + } + $tdeps = array_merge($tdeps, $t); + } + if (isset($pdeps['group'])) { + if (!isset($pdeps['group'][0])) { + $pdeps['group'] = array($pdeps['group']); + } + foreach ($pdeps['group'] as $group) { + if (isset($group['package'])) { + $t = $group['package']; + if (!isset($t[0])) { + $t = array($t); + } + $tdeps = array_merge($tdeps, $t); + } + if (isset($group['subpackage'])) { + $t = $group['subpackage']; + if (!isset($t[0])) { + $t = array($t); + } + $tdeps = array_merge($tdeps, $t); + } + } + } + foreach ($tdeps as $dep) { + if (!isset($dep['channel'])) { + $depchannel = '__uri'; + } else { + $depchannel = $dep['channel']; + } + $deps[$depchannel][strtolower($dep['name'])] = true; + foreach ($packages as $p) { + $dep['channel'] = $depchannel; + $dep['package'] = $dep['name']; + if ($p->isEqual($dep)) { + if (!isset($checked[strtolower($p->getChannel())] + [strtolower($p->getPackage())])) { + // add the dependency's dependencies to the tree + $this->_getDepTreeDP($p, $packages, $deps, $checked); + } + } + } + } + } + } + + /** + * Sort a list of arrays of array(downloaded packagefilename) by dependency. + * + * It also removes duplicate dependencies + * @param array an array of downloaded PEAR_Downloader_Packages + * @return array array of array(packagefilename, package.xml contents) + */ + function sortPackagesForInstall(&$packages) + { + foreach ($packages as $i => $package) { + $checked = $deps = array(); + $this->_getDepTreeDP($packages[$i], $packages, $deps, $checked); + $this->_depTree[$package->getChannel()][$package->getPackage()] = $deps; + } + usort($packages, array(&$this, '_sortInstall')); + } + + function _dependsOn($a, $b) + { + return $this->_checkDepTree(strtolower($a->getChannel()), strtolower($a->getPackage()), + $b); + } + + function _checkDepTree($channel, $package, $b, $checked = array()) + { + $checked[$channel][$package] = true; + if (!isset($this->_depTree[$channel][$package])) { + return false; + } + if (isset($this->_depTree[$channel][$package][strtolower($b->getChannel())] + [strtolower($b->getPackage())])) { + return true; + } + foreach ($this->_depTree[$channel][$package] as $ch => $packages) { + foreach ($packages as $pa => $true) { + if ($this->_checkDepTree($ch, $pa, $b, $checked)) { + return true; + } + } + } + return false; + } + + function _sortInstall($a, $b) + { + if (!$a->getDeps() && !$b->getDeps()) { + return 0; // neither package has dependencies, order is insignificant + } + if ($a->getDeps() && !$b->getDeps()) { + return 1; // $a must be installed after $b because $a has dependencies + } + if (!$a->getDeps() && $b->getDeps()) { + return -1; // $b must be installed after $a because $b has dependencies + } + // both packages have dependencies + if ($this->_dependsOn($a, $b)) { + return 1; + } + if ($this->_dependsOn($b, $a)) { + return -1; + } + return 0; + } + + /** + * Download a file through HTTP. Considers suggested file name in + * Content-disposition: header and can run a callback function for + * different events. The callback will be called with two + * parameters: the callback type, and parameters. The implemented + * callback types are: + * + * 'setup' called at the very beginning, parameter is a UI object + * that should be used for all output + * 'message' the parameter is a string with an informational message + * 'saveas' may be used to save with a different file name, the + * parameter is the filename that is about to be used. + * If a 'saveas' callback returns a non-empty string, + * that file name will be used as the filename instead. + * Note that $save_dir will not be affected by this, only + * the basename of the file. + * 'start' download is starting, parameter is number of bytes + * that are expected, or -1 if unknown + * 'bytesread' parameter is the number of bytes read so far + * 'done' download is complete, parameter is the total number + * of bytes read + * 'connfailed' if the TCP/SSL connection fails, this callback is called + * with array(host,port,errno,errmsg) + * 'writefailed' if writing to disk fails, this callback is called + * with array(destfile,errmsg) + * + * If an HTTP proxy has been configured (http_proxy PEAR_Config + * setting), the proxy will be used. + * + * @param string $url the URL to download + * @param object $ui PEAR_Frontend_* instance + * @param object $config PEAR_Config instance + * @param string $save_dir directory to save file in + * @param mixed $callback function/method to call for status + * updates + * @param false|string|array $lastmodified header values to check against for caching + * use false to return the header values from this download + * @param false|array $accept Accept headers to send + * @return string|array Returns the full path of the downloaded file or a PEAR + * error on failure. If the error is caused by + * socket-related errors, the error object will + * have the fsockopen error code available through + * getCode(). If caching is requested, then return the header + * values. + * + * @access public + */ + function downloadHttp($url, &$ui, $save_dir = '.', $callback = null, $lastmodified = null, + $accept = false) + { + static $redirect = 0; + // allways reset , so we are clean case of error + $wasredirect = $redirect; + $redirect = 0; + if ($callback) { + call_user_func($callback, 'setup', array(&$ui)); + } + $info = parse_url($url); + if (!isset($info['scheme']) || !in_array($info['scheme'], array('http', 'https'))) { + return PEAR::raiseError('Cannot download non-http URL "' . $url . '"'); + } + if (!isset($info['host'])) { + return PEAR::raiseError('Cannot download from non-URL "' . $url . '"'); + } else { + $host = @$info['host']; + $port = @$info['port']; + $path = @$info['path']; + } + if (isset($this)) { + $config = &$this->config; + } else { + $config = &PEAR_Config::singleton(); + } + $proxy_host = $proxy_port = $proxy_user = $proxy_pass = ''; + if ($config->get('http_proxy')&& + $proxy = parse_url($config->get('http_proxy'))) { + $proxy_host = @$proxy['host']; + if (isset($proxy['scheme']) && $proxy['scheme'] == 'https') { + $proxy_host = 'ssl://' . $proxy_host; + } + $proxy_port = @$proxy['port']; + $proxy_user = @$proxy['user']; + $proxy_pass = @$proxy['pass']; + + if ($proxy_port == '') { + $proxy_port = 8080; + } + if ($callback) { + call_user_func($callback, 'message', "Using HTTP proxy $host:$port"); + } + } + if (empty($port)) { + if (isset($info['scheme']) && $info['scheme'] == 'https') { + $port = 443; + } else { + $port = 80; + } + } + if ($proxy_host != '') { + $fp = @fsockopen($proxy_host, $proxy_port, $errno, $errstr); + if (!$fp) { + if ($callback) { + call_user_func($callback, 'connfailed', array($proxy_host, $proxy_port, + $errno, $errstr)); + } + return PEAR::raiseError("Connection to `$proxy_host:$proxy_port' failed: $errstr", $errno); + } + if ($lastmodified === false || $lastmodified) { + $request = "GET $url HTTP/1.1\r\n"; + } else { + $request = "GET $url HTTP/1.0\r\n"; + } + } else { + if (isset($info['scheme']) && $info['scheme'] == 'https') { + $host = 'ssl://' . $host; + } + $fp = @fsockopen($host, $port, $errno, $errstr); + if (!$fp) { + if ($callback) { + call_user_func($callback, 'connfailed', array($host, $port, + $errno, $errstr)); + } + return PEAR::raiseError("Connection to `$host:$port' failed: $errstr", $errno); + } + if ($lastmodified === false || $lastmodified) { + $request = "GET $path HTTP/1.1\r\n"; + } else { + $request = "GET $path HTTP/1.0\r\n"; + } + } + $ifmodifiedsince = ''; + if (is_array($lastmodified)) { + if (isset($lastmodified['Last-Modified'])) { + $ifmodifiedsince = 'If-Modified-Since: ' . $lastmodified['Last-Modified'] . "\r\n"; + } + if (isset($lastmodified['ETag'])) { + $ifmodifiedsince .= "If-None-Match: $lastmodified[ETag]\r\n"; + } + } else { + $ifmodifiedsince = ($lastmodified ? "If-Modified-Since: $lastmodified\r\n" : ''); + } + $request .= "Host: $host:$port\r\n" . $ifmodifiedsince . + "User-Agent: PEAR/1.4.11/PHP/" . PHP_VERSION . "\r\n"; + if (isset($this)) { // only pass in authentication for non-static calls + $username = $config->get('username'); + $password = $config->get('password'); + if ($username && $password) { + $tmp = base64_encode("$username:$password"); + $request .= "Authorization: Basic $tmp\r\n"; + } + } + if ($proxy_host != '' && $proxy_user != '') { + $request .= 'Proxy-Authorization: Basic ' . + base64_encode($proxy_user . ':' . $proxy_pass) . "\r\n"; + } + if ($accept) { + $request .= 'Accept: ' . implode(', ', $accept) . "\r\n"; + } + $request .= "Connection: close\r\n"; + $request .= "\r\n"; + fwrite($fp, $request); + $headers = array(); + $reply = 0; + while (trim($line = fgets($fp, 1024))) { + if (preg_match('/^([^:]+):\s+(.*)\s*$/', $line, $matches)) { + $headers[strtolower($matches[1])] = trim($matches[2]); + } elseif (preg_match('|^HTTP/1.[01] ([0-9]{3}) |', $line, $matches)) { + $reply = (int) $matches[1]; + if ($reply == 304 && ($lastmodified || ($lastmodified === false))) { + return false; + } + if (! in_array($reply, array(200, 301, 302, 303, 305, 307))) { + return PEAR::raiseError("File http://$host:$port$path not valid (received: $line)"); + } + } + } + if ($reply != 200) { + if (isset($headers['location'])) { + if ($wasredirect < 5) { + $redirect = $wasredirect + 1; + return $this->downloadHttp($headers['location'], + $ui, $save_dir, $callback, $lastmodified, $accept); + } else { + return PEAR::raiseError("File http://$host:$port$path not valid (redirection looped more than 5 times)"); + } + } else { + return PEAR::raiseError("File http://$host:$port$path not valid (redirected but no location)"); + } + } + if (isset($headers['content-disposition']) && + preg_match('/\sfilename=\"([^;]*\S)\"\s*(;|$)/', $headers['content-disposition'], $matches)) { + $save_as = basename($matches[1]); + } else { + $save_as = basename($url); + } + if ($callback) { + $tmp = call_user_func($callback, 'saveas', $save_as); + if ($tmp) { + $save_as = $tmp; + } + } + $dest_file = $save_dir . DIRECTORY_SEPARATOR . $save_as; + if (!$wp = @fopen($dest_file, 'wb')) { + fclose($fp); + if ($callback) { + call_user_func($callback, 'writefailed', array($dest_file, $php_errormsg)); + } + return PEAR::raiseError("could not open $dest_file for writing"); + } + if (isset($headers['content-length'])) { + $length = $headers['content-length']; + } else { + $length = -1; + } + $bytes = 0; + if ($callback) { + call_user_func($callback, 'start', array(basename($dest_file), $length)); + } + while ($data = @fread($fp, 1024)) { + $bytes += strlen($data); + if ($callback) { + call_user_func($callback, 'bytesread', $bytes); + } + if (!@fwrite($wp, $data)) { + fclose($fp); + if ($callback) { + call_user_func($callback, 'writefailed', array($dest_file, $php_errormsg)); + } + return PEAR::raiseError("$dest_file: write failed ($php_errormsg)"); + } + } + fclose($fp); + fclose($wp); + if ($callback) { + call_user_func($callback, 'done', $bytes); + } + if ($lastmodified === false || $lastmodified) { + if (isset($headers['etag'])) { + $lastmodified = array('ETag' => $headers['etag']); + } + if (isset($headers['last-modified'])) { + if (is_array($lastmodified)) { + $lastmodified['Last-Modified'] = $headers['last-modified']; + } else { + $lastmodified = $headers['last-modified']; + } + } + return array($dest_file, $lastmodified, $headers); + } + return $dest_file; + } +} +// }}} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Downloader/Package.php b/campcaster/src/tools/pear/src/PEAR/Downloader/Package.php new file mode 100644 index 000000000..d1ff75260 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Downloader/Package.php @@ -0,0 +1,1723 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Package.php,v 1.91.2.1 2006/05/25 22:00:05 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * Error code when parameter initialization fails because no releases + * exist within preferred_state, but releases do exist + */ +define('PEAR_DOWNLOADER_PACKAGE_STATE', -1003); +/** + * Coordinates download parameters and manages their dependencies + * prior to downloading them. + * + * Input can come from three sources: + * + * - local files (archives or package.xml) + * - remote files (downloadable urls) + * - abstract package names + * + * The first two elements are handled cleanly by PEAR_PackageFile, but the third requires + * accessing pearweb's xml-rpc interface to determine necessary dependencies, and the + * format returned of dependencies is slightly different from that used in package.xml. + * + * This class hides the differences between these elements, and makes automatic + * dependency resolution a piece of cake. It also manages conflicts when + * two classes depend on incompatible dependencies, or differing versions of the same + * package dependency. In addition, download will not be attempted if the php version is + * not supported, PEAR installer version is not supported, or non-PECL extensions are not + * installed. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Downloader_Package +{ + /** + * @var PEAR_Downloader + */ + var $_downloader; + /** + * @var PEAR_Config + */ + var $_config; + /** + * @var PEAR_Registry + */ + var $_registry; + /** + * Used to implement packagingroot properly + * @var PEAR_Registry + */ + var $_installRegistry; + /** + * @var PEAR_PackageFile_v1|PEAR_PackageFile|v2 + */ + var $_packagefile; + /** + * @var array + */ + var $_parsedname; + /** + * @var array + */ + var $_downloadURL; + /** + * @var array + */ + var $_downloadDeps = array(); + /** + * @var boolean + */ + var $_valid = false; + /** + * @var boolean + */ + var $_analyzed = false; + /** + * if this or a parent package was invoked with Package-state, this is set to the + * state variable. + * + * This allows temporary reassignment of preferred_state for a parent package and all of + * its dependencies. + * @var string|false + */ + var $_explicitState = false; + /** + * If this package is invoked with Package#group, this variable will be true + */ + var $_explicitGroup = false; + /** + * Package type local|url|xmlrpc + * @var string + */ + var $_type; + /** + * Contents of package.xml, if downloaded from a remote channel + * @var string|false + * @access private + */ + var $_rawpackagefile; + /** + * @var boolean + * @access private + */ + var $_validated = false; + + /** + * @param PEAR_Downloader + */ + function PEAR_Downloader_Package(&$downloader) + { + $this->_downloader = &$downloader; + $this->_config = &$this->_downloader->config; + $this->_registry = &$this->_config->getRegistry(); + $options = $downloader->getOptions(); + if (isset($options['packagingroot'])) { + $this->_config->setInstallRoot($options['packagingroot']); + $this->_installRegistry = &$this->_config->getRegistry(); + $this->_config->setInstallRoot(false); + } else { + $this->_installRegistry = &$this->_registry; + } + $this->_valid = $this->_analyzed = false; + } + + /** + * Parse the input and determine whether this is a local file, a remote uri, or an + * abstract package name. + * + * This is the heart of the PEAR_Downloader_Package(), and is used in + * {@link PEAR_Downloader::download()} + * @param string + * @return bool|PEAR_Error + */ + function initialize($param) + { + $origErr = $this->_fromFile($param); + if (!$this->_valid) { + $options = $this->_downloader->getOptions(); + if (isset($options['offline'])) { + if (PEAR::isError($origErr)) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, $origErr->getMessage()); + } + } + return PEAR::raiseError('Cannot download non-local package "' . $param . '"'); + } + $err = $this->_fromUrl($param); + if (PEAR::isError($err) || !$this->_valid) { + if ($this->_type == 'url') { + if (PEAR::isError($err)) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, $err->getMessage()); + } + } + return PEAR::raiseError("Invalid or missing remote package file"); + } + $err = $this->_fromString($param); + if (PEAR::isError($err) || !$this->_valid) { + if (PEAR::isError($err) && + $err->getCode() == PEAR_DOWNLOADER_PACKAGE_STATE) { + return false; // instruct the downloader to silently skip + } + if (isset($this->_type) && $this->_type == 'local' && + PEAR::isError($origErr)) { + if (is_array($origErr->getUserInfo())) { + foreach ($origErr->getUserInfo() as $err) { + if (is_array($err)) { + $err = $err['message']; + } + if (!isset($options['soft'])) { + $this->_downloader->log(0, $err); + } + } + } + if (!isset($options['soft'])) { + $this->_downloader->log(0, $origErr->getMessage()); + } + if (is_array($param)) { + $param = $this->_registry->parsedPackageNameToString($param, + true); + } + return PEAR::raiseError( + "Cannot initialize '$param', invalid or missing package file"); + } + if (PEAR::isError($err)) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, $err->getMessage()); + } + } + if (is_array($param)) { + $param = $this->_registry->parsedPackageNameToString($param, true); + } + return PEAR::raiseError( + "Cannot initialize '$param', invalid or missing package file"); + } + } + } + return true; + } + + /** + * Retrieve any non-local packages + * @return PEAR_PackageFile_v1|PEAR_PackageFile_v2|PEAR_Error + */ + function &download() + { + if (isset($this->_packagefile)) { + return $this->_packagefile; + } + if (isset($this->_downloadURL['url'])) { + $this->_isvalid = false; + $info = $this->getParsedPackage(); + foreach ($info as $i => $p) { + $info[$i] = strtolower($p); + } + $err = $this->_fromUrl($this->_downloadURL['url'], + $this->_registry->parsedPackageNameToString($this->_parsedname, true)); + $newinfo = $this->getParsedPackage(); + foreach ($newinfo as $i => $p) { + $newinfo[$i] = strtolower($p); + } + if ($info != $newinfo) { + do { + if ($info['package'] == 'pecl.php.net' && $newinfo['package'] == 'pear.php.net') { + $info['package'] = 'pear.php.net'; + if ($info == $newinfo) { + // skip the channel check if a pecl package says it's a PEAR package + break; + } + } + return PEAR::raiseError('CRITICAL ERROR: We are ' . + $this->_registry->parsedPackageNameToString($info) . ', but the file ' . + 'downloaded claims to be ' . + $this->_registry->parsedPackageNameToString($this->getParsedPackage())); + } while (false); + } + if (PEAR::isError($err) || !$this->_valid) { + return $err; + } + } + $this->_type = 'local'; + return $this->_packagefile; + } + + function &getPackageFile() + { + return $this->_packagefile; + } + + function &getDownloader() + { + return $this->_downloader; + } + + function getType() + { + return $this->_type; + } + + /** + * Like {@link initialize()}, but operates on a dependency + */ + function fromDepURL($dep) + { + $this->_downloadURL = $dep; + if (isset($dep['uri'])) { + $options = $this->_downloader->getOptions(); + if (!extension_loaded("zlib") || isset($options['nocompress'])) { + $ext = '.tar'; + } else { + $ext = '.tgz'; + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $err = $this->_fromUrl($dep['uri'] . $ext); + PEAR::popErrorHandling(); + if (PEAR::isError($err)) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, $err->getMessage()); + } + return PEAR::raiseError('Invalid uri dependency "' . $dep['uri'] . $ext . '", ' . + 'cannot download'); + } + } else { + $this->_parsedname = + array( + 'package' => $dep['info']->getPackage(), + 'channel' => $dep['info']->getChannel(), + 'version' => $dep['version'] + ); + if (!isset($dep['nodefault'])) { + $this->_parsedname['group'] = 'default'; // download the default dependency group + $this->_explicitGroup = false; + } + $this->_rawpackagefile = $dep['raw']; + } + } + + function detectDependencies($params) + { + $options = $this->_downloader->getOptions(); + if (isset($options['downloadonly'])) { + return; + } + if (isset($options['offline'])) { + $this->_downloader->log(3, 'Skipping dependency download check, --offline specified'); + return; + } + $pname = $this->getParsedPackage(); + if (!$pname) { + return; + } + $deps = $this->getDeps(); + if (!$deps) { + return; + } + if (isset($deps['required'])) { // package.xml 2.0 + return $this->_detect2($deps, $pname, $options, $params); + } else { + return $this->_detect1($deps, $pname, $options, $params); + } + } + + function setValidated() + { + $this->_validated = true; + } + + function alreadyValidated() + { + return $this->_validated; + } + + /** + * Remove packages to be downloaded that are already installed + * @param array of PEAR_Downloader_Package objects + * @static + */ + function removeInstalled(&$params) + { + if (!isset($params[0])) { + return; + } + $options = $params[0]->_downloader->getOptions(); + if (!isset($options['downloadonly'])) { + foreach ($params as $i => $param) { + // remove self if already installed with this version + // this does not need any pecl magic - we only remove exact matches + if ($param->_installRegistry->packageExists($param->getPackage(), $param->getChannel())) { + if (version_compare($param->_installRegistry->packageInfo($param->getPackage(), 'version', + $param->getChannel()), $param->getVersion(), '==')) { + if (!isset($options['force'])) { + $info = $param->getParsedPackage(); + unset($info['version']); + unset($info['state']); + if (!isset($options['soft'])) { + $param->_downloader->log(1, 'Skipping package "' . + $param->getShortName() . + '", already installed as version ' . + $param->_installRegistry->packageInfo($param->getPackage(), + 'version', $param->getChannel())); + } + $params[$i] = false; + } + } elseif (!isset($options['force']) && !isset($options['upgrade']) && + !isset($options['soft'])) { + $info = $param->getParsedPackage(); + $param->_downloader->log(1, 'Skipping package "' . + $param->getShortName() . + '", already installed as version ' . + $param->_installRegistry->packageInfo($param->getPackage(), 'version', + $param->getChannel())); + $params[$i] = false; + } + } + } + } + PEAR_Downloader_Package::removeDuplicates($params); + } + + function _detect2($deps, $pname, $options, $params) + { + $this->_downloadDeps = array(); + $groupnotfound = false; + foreach (array('package', 'subpackage') as $packagetype) { + // get required dependency group + if (isset($deps['required'][$packagetype])) { + if (isset($deps['required'][$packagetype][0])) { + foreach ($deps['required'][$packagetype] as $dep) { + if (isset($dep['conflicts'])) { + // skip any package that this package conflicts with + continue; + } + $ret = $this->_detect2Dep($dep, $pname, 'required', $params); + if (is_array($ret)) { + $this->_downloadDeps[] = $ret; + } + } + } else { + $dep = $deps['required'][$packagetype]; + if (!isset($dep['conflicts'])) { + // skip any package that this package conflicts with + $ret = $this->_detect2Dep($dep, $pname, 'required', $params); + if (is_array($ret)) { + $this->_downloadDeps[] = $ret; + } + } + } + } + // get optional dependency group, if any + if (isset($deps['optional'][$packagetype])) { + $skipnames = array(); + if (!isset($deps['optional'][$packagetype][0])) { + $deps['optional'][$packagetype] = array($deps['optional'][$packagetype]); + } + foreach ($deps['optional'][$packagetype] as $dep) { + $skip = false; + if (!isset($options['alldeps'])) { + $dep['package'] = $dep['name']; + if (!isset($options['soft'])) { + $this->_downloader->log(3, 'Notice: package "' . + $this->_registry->parsedPackageNameToString($this->getParsedPackage(), + true) . '" optional dependency "' . + $this->_registry->parsedPackageNameToString(array('package' => + $dep['name'], 'channel' => 'pear.php.net'), true) . + '" will not be automatically downloaded'); + } + $skipnames[] = $this->_registry->parsedPackageNameToString($dep, true); + $skip = true; + unset($dep['package']); + } + if (!($ret = $this->_detect2Dep($dep, $pname, 'optional', $params))) { + $dep['package'] = $dep['name']; + if (@$skipnames[count($skipnames) - 1] == + $this->_registry->parsedPackageNameToString($dep, true)) { + array_pop($skipnames); + } + } + if (!$skip && is_array($ret)) { + $this->_downloadDeps[] = $ret; + } + } + if (count($skipnames)) { + if (!isset($options['soft'])) { + $this->_downloader->log(1, 'Did not download optional dependencies: ' . + implode(', ', $skipnames) . + ', use --alldeps to download automatically'); + } + } + } + // get requested dependency group, if any + $groupname = $this->getGroup(); + $explicit = $this->_explicitGroup; + if (!$groupname) { + if ($this->canDefault()) { + $groupname = 'default'; // try the default dependency group + } else { + continue; + } + } + if ($groupnotfound) { + continue; + } + if (isset($deps['group'])) { + if (isset($deps['group']['attribs'])) { + if (strtolower($deps['group']['attribs']['name']) == strtolower($groupname)) { + $group = $deps['group']; + } elseif ($explicit) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, 'Warning: package "' . + $this->_registry->parsedPackageNameToString($pname, true) . + '" has no dependency ' . 'group named "' . $groupname . '"'); + } + $groupnotfound = true; + continue; + } + } else { + $found = false; + foreach ($deps['group'] as $group) { + if (strtolower($group['attribs']['name']) == strtolower($groupname)) { + $found = true; + break; + } + } + if (!$found) { + if ($explicit) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, 'Warning: package "' . + $this->_registry->parsedPackageNameToString($pname, true) . + '" has no dependency ' . 'group named "' . $groupname . '"'); + } + } + $groupnotfound = true; + continue; + } + } + } + if (isset($group)) { + if (isset($group[$packagetype])) { + if (isset($group[$packagetype][0])) { + foreach ($group[$packagetype] as $dep) { + $ret = $this->_detect2Dep($dep, $pname, 'dependency group "' . + $group['attribs']['name'] . '"', $params); + if (is_array($ret)) { + $this->_downloadDeps[] = $ret; + } + } + } else { + $ret = $this->_detect2Dep($group[$packagetype], $pname, + 'dependency group "' . + $group['attribs']['name'] . '"', $params); + if (is_array($ret)) { + $this->_downloadDeps[] = $ret; + } + } + } + } + } + } + + function _detect2Dep($dep, $pname, $group, $params) + { + if (isset($dep['conflicts'])) { + return true; + } + $options = $this->_downloader->getOptions(); + if (isset($dep['uri'])) { + return array('uri' => $dep['uri'], 'dep' => $dep);; + } + $testdep = $dep; + $testdep['package'] = $dep['name']; + if (PEAR_Downloader_Package::willDownload($testdep, $params)) { + $dep['package'] = $dep['name']; + if (!isset($options['soft'])) { + $this->_downloader->log(2, $this->getShortName() . ': Skipping ' . $group . + ' dependency "' . + $this->_registry->parsedPackageNameToString($dep, true) . + '", will be installed'); + } + return false; + } + $options = $this->_downloader->getOptions(); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + if ($this->_explicitState) { + $pname['state'] = $this->_explicitState; + } + $url = + $this->_downloader->_getDepPackageDownloadUrl($dep, $pname); + if (PEAR::isError($url)) { + PEAR::popErrorHandling(); + return $url; + } + $dep['package'] = $dep['name']; + $ret = $this->_analyzeDownloadURL($url, 'dependency', $dep, $params, $group == 'optional' && + !isset($options['alldeps'])); + PEAR::popErrorHandling(); + if (PEAR::isError($ret)) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, $ret->getMessage()); + } + return false; + } else { + // check to see if a dep is already installed and is the same or newer + if (!isset($dep['min']) && !isset($dep['max']) && !isset($dep['recommended'])) { + $oper = 'has'; + } else { + $oper = 'gt'; + } + // do not try to move this before getDepPackageDownloadURL + // we can't determine whether upgrade is necessary until we know what + // version would be downloaded + if (!isset($options['force']) && $this->isInstalled($ret, $oper)) { + $version = $this->_installRegistry->packageInfo($dep['name'], 'version', + $dep['channel']); + $dep['package'] = $dep['name']; + if (!isset($options['soft'])) { + $this->_downloader->log(3, $this->getShortName() . ': Skipping ' . $group . + ' dependency "' . + $this->_registry->parsedPackageNameToString($dep, true) . + '" version ' . $url['version'] . ', already installed as version ' . + $version); + } + return false; + } + } + if (isset($dep['nodefault'])) { + $ret['nodefault'] = true; + } + return $ret; + } + + function _detect1($deps, $pname, $options, $params) + { + $this->_downloadDeps = array(); + $skipnames = array(); + foreach ($deps as $dep) { + $nodownload = false; + if ($dep['type'] == 'pkg') { + $dep['channel'] = 'pear.php.net'; + $dep['package'] = $dep['name']; + switch ($dep['rel']) { + case 'not' : + continue 2; + case 'ge' : + case 'eq' : + case 'gt' : + case 'has' : + $group = (!isset($dep['optional']) || $dep['optional'] == 'no') ? + 'required' : + 'optional'; + if (PEAR_Downloader_Package::willDownload($dep, $params)) { + $this->_downloader->log(2, $this->getShortName() . ': Skipping ' . $group + . ' dependency "' . + $this->_registry->parsedPackageNameToString($dep, true) . + '", will be installed'); + continue 2; + } + $fakedp = new PEAR_PackageFile_v1; + $fakedp->setPackage($dep['name']); + // skip internet check if we are not upgrading (bug #5810) + if (!isset($options['upgrade']) && $this->isInstalled( + $fakedp, $dep['rel'])) { + $this->_downloader->log(2, $this->getShortName() . ': Skipping ' . $group + . ' dependency "' . + $this->_registry->parsedPackageNameToString($dep, true) . + '", is already installed'); + continue 2; + } + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + if ($this->_explicitState) { + $pname['state'] = $this->_explicitState; + } + $url = + $this->_downloader->_getDepPackageDownloadUrl($dep, $pname); + $chan = 'pear.php.net'; + if (PEAR::isError($url)) { + // check to see if this is a pecl package that has jumped + // from pear.php.net to pecl.php.net channel + if (!class_exists('PEAR_Dependency2')) { + require_once 'PEAR/Dependency2.php'; + } + $newdep = PEAR_Dependency2::normalizeDep($dep); + $newdep = $newdep[0]; + $newdep['channel'] = 'pecl.php.net'; + $chan = 'pecl.php.net'; + $url = + $this->_downloader->_getDepPackageDownloadUrl($newdep, $pname); + $obj = &$this->_installRegistry->getPackage($dep['name']); + if (PEAR::isError($url)) { + PEAR::popErrorHandling(); + if ($obj !== null && $this->isInstalled($obj, $dep['rel'])) { + $group = (!isset($dep['optional']) || $dep['optional'] == 'no') ? + 'required' : + 'optional'; + $dep['package'] = $dep['name']; + if (!isset($options['soft'])) { + $this->_downloader->log(3, $this->getShortName() . + ': Skipping ' . $group . ' dependency "' . + $this->_registry->parsedPackageNameToString($dep, true) . + '", already installed as version ' . $obj->getVersion()); + } + if (@$skipnames[count($skipnames) - 1] == + $this->_registry->parsedPackageNameToString($dep, true)) { + array_pop($skipnames); + } + continue; + } else { + if (isset($dep['optional']) && $dep['optional'] == 'yes') { + $this->_downloader->log(2, $this->getShortName() . + ': Skipping ' . $group + . ' dependency "' . + $this->_registry->parsedPackageNameToString($dep, true) . + '", no releases exist'); + continue; + } else { + return $url; + } + } + } + } + PEAR::popErrorHandling(); + if (!isset($options['alldeps'])) { + if (isset($dep['optional']) && $dep['optional'] == 'yes') { + if (!isset($options['soft'])) { + $this->_downloader->log(3, 'Notice: package "' . + $this->getShortName() . + '" optional dependency "' . + $this->_registry->parsedPackageNameToString( + array('channel' => $chan, 'package' => + $dep['name']), true) . + '" will not be automatically downloaded'); + } + $skipnames[] = $this->_registry->parsedPackageNameToString( + array('channel' => $chan, 'package' => + $dep['name']), true); + $nodownload = true; + } + } + if (!isset($options['alldeps']) && !isset($options['onlyreqdeps'])) { + if (!isset($dep['optional']) || $dep['optional'] == 'no') { + if (!isset($options['soft'])) { + $this->_downloader->log(3, 'Notice: package "' . + $this->getShortName() . + '" required dependency "' . + $this->_registry->parsedPackageNameToString( + array('channel' => $chan, 'package' => + $dep['name']), true) . + '" will not be automatically downloaded'); + } + $skipnames[] = $this->_registry->parsedPackageNameToString( + array('channel' => $chan, 'package' => + $dep['name']), true); + $nodownload = true; + } + } + // check to see if a dep is already installed + // do not try to move this before getDepPackageDownloadURL + // we can't determine whether upgrade is necessary until we know what + // version would be downloaded + if (!isset($options['force']) && $this->isInstalled( + $url, $dep['rel'])) { + $group = (!isset($dep['optional']) || $dep['optional'] == 'no') ? + 'required' : + 'optional'; + $dep['package'] = $dep['name']; + if (isset($newdep)) { + $version = $this->_installRegistry->packageInfo($newdep['name'], 'version', + $newdep['channel']); + } else { + $version = $this->_installRegistry->packageInfo($dep['name'], 'version'); + } + $dep['version'] = $url['version']; + if (!isset($options['soft'])) { + $this->_downloader->log(3, $this->getShortName() . ': Skipping ' . $group . + ' dependency "' . + $this->_registry->parsedPackageNameToString($dep, true) . + '", already installed as version ' . $version); + } + if (@$skipnames[count($skipnames) - 1] == + $this->_registry->parsedPackageNameToString($dep, true)) { + array_pop($skipnames); + } + continue; + } + if ($nodownload) { + continue; + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + if (isset($newdep)) { + $dep = $newdep; + } + $dep['package'] = $dep['name']; + $ret = $this->_analyzeDownloadURL($url, 'dependency', $dep, $params, + isset($dep['optional']) && $dep['optional'] == 'yes' && + !isset($options['alldeps'])); + PEAR::popErrorHandling(); + if (PEAR::isError($ret)) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, $ret->getMessage()); + } + continue; + } + $this->_downloadDeps[] = $ret; + } + } + if (count($skipnames)) { + if (!isset($options['soft'])) { + $this->_downloader->log(1, 'Did not download dependencies: ' . + implode(', ', $skipnames) . + ', use --alldeps or --onlyreqdeps to download automatically'); + } + } + } + + function setDownloadURL($pkg) + { + $this->_downloadURL = $pkg; + } + + /** + * Set the package.xml object for this downloaded package + * + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 $pkg + */ + function setPackageFile(&$pkg) + { + $this->_packagefile = &$pkg; + } + + function getShortName() + { + return $this->_registry->parsedPackageNameToString(array('channel' => $this->getChannel(), + 'package' => $this->getPackage()), true); + } + + function getParsedPackage() + { + if (isset($this->_packagefile) || isset($this->_parsedname)) { + return array('channel' => $this->getChannel(), + 'package' => $this->getPackage(), + 'version' => $this->getVersion()); + } + return false; + } + + function getDownloadURL() + { + return $this->_downloadURL; + } + + function canDefault() + { + if (isset($this->_downloadURL)) { + if (isset($this->_downloadURL['nodefault'])) { + return false; + } + } + return true; + } + + function getPackage() + { + if (isset($this->_packagefile)) { + return $this->_packagefile->getPackage(); + } elseif (isset($this->_downloadURL['info'])) { + return $this->_downloadURL['info']->getPackage(); + } else { + return false; + } + } + + /** + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + */ + function isSubpackage(&$pf) + { + if (isset($this->_packagefile)) { + return $this->_packagefile->isSubpackage($pf); + } elseif (isset($this->_downloadURL['info'])) { + return $this->_downloadURL['info']->isSubpackage($pf); + } else { + return false; + } + } + + function getPackageType() + { + if (isset($this->_packagefile)) { + return $this->_packagefile->getPackageType(); + } elseif (isset($this->_downloadURL['info'])) { + return $this->_downloadURL['info']->getPackageType(); + } else { + return false; + } + } + + function isBundle() + { + if (isset($this->_packagefile)) { + return $this->_packagefile->getPackageType() == 'bundle'; + } else { + return false; + } + } + + function getPackageXmlVersion() + { + if (isset($this->_packagefile)) { + return $this->_packagefile->getPackagexmlVersion(); + } elseif (isset($this->_downloadURL['info'])) { + return $this->_downloadURL['info']->getPackagexmlVersion(); + } else { + return '1.0'; + } + } + + function getChannel() + { + if (isset($this->_packagefile)) { + return $this->_packagefile->getChannel(); + } elseif (isset($this->_downloadURL['info'])) { + return $this->_downloadURL['info']->getChannel(); + } else { + return false; + } + } + + function getURI() + { + if (isset($this->_packagefile)) { + return $this->_packagefile->getURI(); + } elseif (isset($this->_downloadURL['info'])) { + return $this->_downloadURL['info']->getURI(); + } else { + return false; + } + } + + function getVersion() + { + if (isset($this->_packagefile)) { + return $this->_packagefile->getVersion(); + } elseif (isset($this->_downloadURL['version'])) { + return $this->_downloadURL['version']; + } else { + return false; + } + } + + function isCompatible($pf) + { + if (isset($this->_packagefile)) { + return $this->_packagefile->isCompatible($pf); + } elseif (isset($this->_downloadURL['info'])) { + return $this->_downloadURL['info']->isCompatible($pf); + } else { + return true; + } + } + + function setGroup($group) + { + $this->_parsedname['group'] = $group; + } + + function getGroup() + { + if (isset($this->_parsedname['group'])) { + return $this->_parsedname['group']; + } else { + return ''; + } + } + + function isExtension($name) + { + if (isset($this->_packagefile)) { + return $this->_packagefile->isExtension($name); + } elseif (isset($this->_downloadURL['info'])) { + return $this->_downloadURL['info']->getProvidesExtension() == $name; + } else { + return false; + } + } + + function getDeps() + { + if (isset($this->_packagefile)) { + if ($this->_packagefile->getPackagexmlVersion() == '2.0') { + return $this->_packagefile->getDeps(true); + } else { + return $this->_packagefile->getDeps(); + } + } elseif (isset($this->_downloadURL['info'])) { + if ($this->_downloadURL['info']->getPackagexmlVersion() == '2.0') { + return $this->_downloadURL['info']->getDeps(true); + } else { + return $this->_downloadURL['info']->getDeps(); + } + } else { + return array(); + } + } + + /** + * @param array Parsed array from {@link PEAR_Registry::parsePackageName()} or a dependency + * returned from getDepDownloadURL() + */ + function isEqual($param) + { + if (is_object($param)) { + $channel = $param->getChannel(); + $package = $param->getPackage(); + if ($param->getURI()) { + $param = array( + 'channel' => $param->getChannel(), + 'package' => $param->getPackage(), + 'version' => $param->getVersion(), + 'uri' => $param->getURI(), + ); + } else { + $param = array( + 'channel' => $param->getChannel(), + 'package' => $param->getPackage(), + 'version' => $param->getVersion(), + ); + } + } else { + if (isset($param['uri'])) { + if ($this->getChannel() != '__uri') { + return false; + } + return $param['uri'] == $this->getURI(); + } + $package = isset($param['package']) ? $param['package'] : + $param['info']->getPackage(); + $channel = isset($param['channel']) ? $param['channel'] : + $param['info']->getChannel(); + if (isset($param['rel'])) { + if (!class_exists('PEAR_Dependency2')) { + require_once 'PEAR/Dependency2.php'; + } + $newdep = PEAR_Dependency2::normalizeDep($param); + $newdep = $newdep[0]; + } elseif (isset($param['min'])) { + $newdep = $param; + } + } + if (isset($newdep)) { + if (!isset($newdep['min'])) { + $newdep['min'] = '0'; + } + if (!isset($newdep['max'])) { + $newdep['max'] = '100000000000000000000'; + } + // use magic to support pecl packages suddenly jumping to the pecl channel + // we need to support both dependency possibilities + if ($channel == 'pear.php.net' && $this->getChannel() == 'pecl.php.net') { + if ($package == $this->getPackage()) { + $channel = 'pecl.php.net'; + } + } + if ($channel == 'pecl.php.net' && $this->getChannel() == 'pear.php.net') { + if ($package == $this->getPackage()) { + $channel = 'pear.php.net'; + } + } + return (strtolower($package) == strtolower($this->getPackage()) && + $channel == $this->getChannel() && + version_compare($newdep['min'], $this->getVersion(), '<=') && + version_compare($newdep['max'], $this->getVersion(), '>=')); + } + // use magic to support pecl packages suddenly jumping to the pecl channel + if ($channel == 'pecl.php.net' && $this->getChannel() == 'pear.php.net') { + if (strtolower($package) == strtolower($this->getPackage())) { + $channel = 'pear.php.net'; + } + } + if (isset($param['version'])) { + return (strtolower($package) == strtolower($this->getPackage()) && + $channel == $this->getChannel() && + $param['version'] == $this->getVersion()); + } else { + return strtolower($package) == strtolower($this->getPackage()) && + $channel == $this->getChannel(); + } + } + + function isInstalled($dep, $oper = '==') + { + if (!$dep) { + return false; + } + if ($oper != 'ge' && $oper != 'gt' && $oper != 'has' && $oper != '==') { + return false; + } + if (is_object($dep)) { + $package = $dep->getPackage(); + $channel = $dep->getChannel(); + if ($dep->getURI()) { + $dep = array( + 'uri' => $dep->getURI(), + 'version' => $dep->getVersion(), + ); + } else { + $dep = array( + 'version' => $dep->getVersion(), + ); + } + } else { + if (isset($dep['uri'])) { + $channel = '__uri'; + $package = $dep['dep']['name']; + } else { + $channel = $dep['info']->getChannel(); + $package = $dep['info']->getPackage(); + } + } + $options = $this->_downloader->getOptions(); + $test = $this->_installRegistry->packageExists($package, $channel); + if (!$test && $channel == 'pecl.php.net') { + // do magic to allow upgrading from old pecl packages to new ones + $test = $this->_installRegistry->packageExists($package, 'pear.php.net'); + $channel = 'pear.php.net'; + } + if ($test) { + if (isset($dep['uri'])) { + if ($this->_installRegistry->packageInfo($package, 'uri', '__uri') == $dep['uri']) { + return true; + } + } + if (isset($options['upgrade'])) { + if ($oper == 'has') { + if (version_compare($this->_installRegistry->packageInfo( + $package, 'version', $channel), + $dep['version'], '>=')) { + return true; + } else { + return false; + } + } else { + if (version_compare($this->_installRegistry->packageInfo( + $package, 'version', $channel), + $dep['version'], '>=')) { + return true; + } + return false; + } + } + return true; + } + return false; + } + + /** + * @param array + * @static + */ + function removeDuplicates(&$params) + { + $pnames = array(); + foreach ($params as $i => $param) { + if (!$param) { + continue; + } + if ($param->getPackage()) { + $pnames[$i] = $param->getChannel() . '/' . + $param->getPackage() . '-' . $param->getVersion() . '#' . $param->getGroup(); + } + } + $pnames = array_unique($pnames); + $unset = array_diff(array_keys($params), array_keys($pnames)); + $testp = array_flip($pnames); + foreach ($params as $i => $param) { + if (!$param) { + $unset[] = $i; + continue; + } + if (!is_a($param, 'PEAR_Downloader_Package')) { + $unset[] = $i; + continue; + } + if (!isset($testp[$param->getChannel() . '/' . $param->getPackage() . '-' . + $param->getVersion() . '#' . $param->getGroup()])) { + $unset[] = $i; + } + } + foreach ($unset as $i) { + unset($params[$i]); + } + $ret = array(); + foreach ($params as $i => $param) { + $ret[] = &$params[$i]; + } + $params = array(); + foreach ($ret as $i => $param) { + $params[] = &$ret[$i]; + } + } + + function explicitState() + { + return $this->_explicitState; + } + + function setExplicitState($s) + { + $this->_explicitState = $s; + } + + /** + * @static + */ + function mergeDependencies(&$params) + { + $newparams = array(); + $bundles = array(); + foreach ($params as $i => $param) { + if (!$param->isBundle()) { + continue; + } + $bundles[] = $i; + $pf = &$param->getPackageFile(); + $newdeps = array(); + $contents = $pf->getBundledPackages(); + if (!is_array($contents)) { + $contents = array($contents); + } + foreach ($contents as $file) { + $filecontents = $pf->getFileContents($file); + $dl = &$param->getDownloader(); + $options = $dl->getOptions(); + $fp = @fopen($dl->getDownloadDir() . DIRECTORY_SEPARATOR . $file, 'wb'); + if (!$fp) { + continue; + } + fwrite($fp, $filecontents, strlen($filecontents)); + fclose($fp); + if ($s = $params[$i]->explicitState()) { + $obj->setExplicitState($s); + } + $obj = &new PEAR_Downloader_Package($params[$i]->getDownloader()); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $e = $obj->_fromFile($a = $dl->getDownloadDir() . DIRECTORY_SEPARATOR . $file); + PEAR::popErrorHandling(); + if (PEAR::isError($e)) { + if (!isset($options['soft'])) { + $dl->log(0, $e->getMessage()); + } + continue; + } + $j = &$obj; + if (!PEAR_Downloader_Package::willDownload($j, + array_merge($params, $newparams)) && !$param->isInstalled($j)) { + $newparams[] = &$j; + } + } + } + foreach ($bundles as $i) { + unset($params[$i]); // remove bundles - only their contents matter for installation + } + PEAR_Downloader_Package::removeDuplicates($params); // strip any unset indices + if (count($newparams)) { // add in bundled packages for install + foreach ($newparams as $i => $unused) { + $params[] = &$newparams[$i]; + } + $newparams = array(); + } + foreach ($params as $i => $param) { + $newdeps = array(); + foreach ($param->_downloadDeps as $dep) { + if (!PEAR_Downloader_Package::willDownload($dep, + array_merge($params, $newparams)) && !$param->isInstalled($dep)) { + $newdeps[] = $dep; + } else { + // detect versioning conflicts here + } + } + // convert the dependencies into PEAR_Downloader_Package objects for the next time + // around + $params[$i]->_downloadDeps = array(); + foreach ($newdeps as $dep) { + $obj = &new PEAR_Downloader_Package($params[$i]->getDownloader()); + if ($s = $params[$i]->explicitState()) { + $obj->setExplicitState($s); + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $e = $obj->fromDepURL($dep); + PEAR::popErrorHandling(); + if (PEAR::isError($e)) { + if (!isset($options['soft'])) { + $obj->_downloader->log(0, $e->getMessage()); + } + continue; + } + $e = $obj->detectDependencies($params); + if (PEAR::isError($e)) { + if (!isset($options['soft'])) { + $obj->_downloader->log(0, $e->getMessage()); + } + } + $j = &$obj; + $newparams[] = &$j; + } + } + if (count($newparams)) { + foreach ($newparams as $i => $unused) { + $params[] = &$newparams[$i]; + } + return true; + } else { + return false; + } + } + + + /** + * @static + */ + function willDownload($param, $params) + { + if (!is_array($params)) { + return false; + } + foreach ($params as $obj) { + if ($obj->isEqual($param)) { + return true; + } + } + return false; + } + + /** + * For simpler unit-testing + * @param PEAR_Config + * @param int + * @param string + */ + function &getPackagefileObject(&$c, $d, $t = false) + { + $a = &new PEAR_PackageFile($c, $d, $t); + return $a; + } + + + /** + * This will retrieve from a local file if possible, and parse out + * a group name as well. The original parameter will be modified to reflect this. + * @param string|array can be a parsed package name as well + * @access private + */ + function _fromFile(&$param) + { + if (is_string($param) && !@is_file($param)) { + $test = explode('#', $param); + $group = array_pop($test); + if (@is_file(implode('#', $test))) { + $this->setGroup($group); + $param = implode('#', $test); + $this->_explicitGroup = true; + } + } + if (@is_file($param)) { + $this->_type = 'local'; + $options = $this->_downloader->getOptions(); + if (isset($options['downloadonly'])) { + $pkg = &$this->getPackagefileObject($this->_config, + $this->_downloader->_debug); + } else { + $pkg = &$this->getPackagefileObject($this->_config, + $this->_downloader->_debug, $this->_downloader->getDownloadDir()); + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $pf = &$pkg->fromAnyFile($param, PEAR_VALIDATE_INSTALLING); + PEAR::popErrorHandling(); + if (PEAR::isError($pf)) { + $this->_valid = false; + return $pf; + } + $this->_packagefile = &$pf; + if (!$this->getGroup()) { + $this->setGroup('default'); // install the default dependency group + } + return $this->_valid = true; + } + return $this->_valid = false; + } + + function _fromUrl($param, $saveparam = '') + { + if (!is_array($param) && + (preg_match('#^(http|ftp)://#', $param))) { + $options = $this->_downloader->getOptions(); + $this->_type = 'url'; + $callback = $this->_downloader->ui ? + array(&$this->_downloader, '_downloadCallback') : null; + $this->_downloader->pushErrorHandling(PEAR_ERROR_RETURN); + $file = $this->_downloader->downloadHttp($param, $this->_downloader->ui, + $this->_downloader->getDownloadDir(), $callback); + $this->_downloader->popErrorHandling(); + if (PEAR::isError($file)) { + if (!empty($saveparam)) { + $saveparam = ", cannot download \"$saveparam\""; + } + $err = PEAR::raiseError('Could not download from "' . $param . + '"' . $saveparam); + return $err; + } + if ($this->_rawpackagefile) { + require_once 'Archive/Tar.php'; + $tar = &new Archive_Tar($file); + $packagexml = $tar->extractInString('package2.xml'); + if (!$packagexml) { + $packagexml = $tar->extractInString('package.xml'); + } + if (str_replace(array("\n", "\r"), array('',''), $packagexml) != + str_replace(array("\n", "\r"), array('',''), $this->_rawpackagefile)) { + if ($this->getChannel() == 'pear.php.net') { + // be more lax for the existing PEAR packages that have not-ok + // characters in their package.xml + $this->_downloader->log(0, 'CRITICAL WARNING: The "' . + $this->getPackage() . '" package has invalid characters in its ' . + 'package.xml. The next version of PEAR may not be able to install ' . + 'this package for security reasons. Please open a bug report at ' . + 'http://pear.php.net/package/' . $this->getPackage() . '/bugs'); + } else { + return PEAR::raiseError('CRITICAL ERROR: package.xml downloaded does ' . + 'not match value returned from xml-rpc'); + } + } + } + // whew, download worked! + if (isset($options['downloadonly'])) { + $pkg = &$this->getPackagefileObject($this->_config, $this->_downloader->debug); + } else { + $pkg = &$this->getPackagefileObject($this->_config, $this->_downloader->debug, + $this->_downloader->getDownloadDir()); + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $pf = &$pkg->fromAnyFile($file, PEAR_VALIDATE_INSTALLING); + PEAR::popErrorHandling(); + if (PEAR::isError($pf)) { + if (is_array($pf->getUserInfo())) { + foreach ($pf->getUserInfo() as $err) { + if (is_array($err)) { + $err = $err['message']; + } + if (!isset($options['soft'])) { + $this->_downloader->log(0, "Validation Error: $err"); + } + } + } + if (!isset($options['soft'])) { + $this->_downloader->log(0, $pf->getMessage()); + } + $err = PEAR::raiseError('Download of "' . ($saveparam ? $saveparam : + $param) . '" succeeded, but it is not a valid package archive'); + $this->_valid = false; + return $err; + } + $this->_packagefile = &$pf; + $this->setGroup('default'); // install the default dependency group + return $this->_valid = true; + } + return $this->_valid = false; + } + + /** + * + * @param string|array pass in an array of format + * array( + * 'package' => 'pname', + * ['channel' => 'channame',] + * ['version' => 'version',] + * ['state' => 'state',]) + * or a string of format [channame/]pname[-version|-state] + */ + function _fromString($param) + { + $options = $this->_downloader->getOptions(); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $pname = $this->_registry->parsePackageName($param, + $this->_config->get('default_channel')); + PEAR::popErrorHandling(); + if (PEAR::isError($pname)) { + if ($pname->getCode() == 'invalid') { + $this->_valid = false; + return false; + } + if ($pname->getCode() == 'channel') { + $parsed = $pname->getUserInfo(); + if ($this->_downloader->discover($parsed['channel'])) { + if ($this->_config->get('auto_discover')) { + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $pname = $this->_registry->parsePackageName($param, + $this->_config->get('default_channel')); + PEAR::popErrorHandling(); + } else { + if (!isset($options['soft'])) { + $this->_downloader->log(0, 'Channel "' . $parsed['channel'] . + '" is not initialized, use ' . + '"pear channel-discover ' . $parsed['channel'] . '" to initialize' . + 'or pear config-set auto_discover 1'); + } + } + } + if (PEAR::isError($pname)) { + if (!isset($options['soft'])) { + $this->_downloader->log(0, $pname->getMessage()); + } + if (is_array($param)) { + $param = $this->_registry->parsedPackageNameToString($param); + } + $err = PEAR::raiseError('invalid package name/package file "' . + $param . '"'); + $this->_valid = false; + return $err; + } + } else { + if (!isset($options['soft'])) { + $this->_downloader->log(0, $pname->getMessage()); + } + $err = PEAR::raiseError('invalid package name/package file "' . + $param . '"'); + $this->_valid = false; + return $err; + } + } + if (!isset($this->_type)) { + $this->_type = 'xmlrpc'; + } + $this->_parsedname = $pname; + if (isset($pname['state'])) { + $this->_explicitState = $pname['state']; + } else { + $this->_explicitState = false; + } + if (isset($pname['group'])) { + $this->_explicitGroup = true; + } else { + $this->_explicitGroup = false; + } + $info = $this->_downloader->_getPackageDownloadUrl($pname); + if (PEAR::isError($info)) { + if ($pname['channel'] == 'pear.php.net') { + // try pecl + $pname['channel'] = 'pecl.php.net'; + if ($test = $this->_downloader->_getPackageDownloadUrl($pname)) { + if (!PEAR::isError($test)) { + $info = PEAR::raiseError($info->getMessage() . ' - package ' . + $this->_registry->parsedPackageNameToString($pname, true) . + ' can be installed with "pecl install ' . $pname['package'] . + '"'); + } else { + $pname['channel'] = 'pear.php.net'; + } + } else { + $pname['channel'] = 'pear.php.net'; + } + } + return $info; + } + $this->_rawpackagefile = $info['raw']; + $ret = $this->_analyzeDownloadURL($info, $param, $pname); + if (PEAR::isError($ret)) { + return $ret; + } + if ($ret) { + $this->_downloadURL = $ret; + return $this->_valid = (bool) $ret; + } + } + + /** + * @param array output of package.getDownloadURL + * @param string|array|object information for detecting packages to be downloaded, and + * for errors + * @param array name information of the package + * @param array|null packages to be downloaded + * @param bool is this an optional dependency? + * @access private + */ + function _analyzeDownloadURL($info, $param, $pname, $params = null, $optional = false) + { + if (!is_string($param) && PEAR_Downloader_Package::willDownload($param, $params)) { + return false; + } + if (!$info) { + if (!is_string($param)) { + $saveparam = ", cannot download \"$param\""; + } else { + $saveparam = ''; + } + // no releases exist + return PEAR::raiseError('No releases for package "' . + $this->_registry->parsedPackageNameToString($pname, true) . '" exist' . $saveparam); + } + if (strtolower($info['info']->getChannel()) != strtolower($pname['channel'])) { + $err = false; + if ($pname['channel'] == 'pecl.php.net') { + if ($info['info']->getChannel() != 'pear.php.net') { + $err = true; + } + } elseif ($info['info']->getChannel() == 'pecl.php.net') { + if ($pname['channel'] != 'pear.php.net') { + $err = true; + } + } else { + $err = true; + } + if ($err) { + return PEAR::raiseError('SECURITY ERROR: package in channel "' . $pname['channel'] . + '" retrieved another channel\'s name for download! ("' . + $info['info']->getChannel() . '")'); + } + } + if (!isset($info['url'])) { + $instead = ', will instead download version ' . $info['version'] . + ', stability "' . $info['info']->getState() . '"'; + // releases exist, but we failed to get any + if (isset($this->_downloader->_options['force'])) { + if (isset($pname['version'])) { + $vs = ', version "' . $pname['version'] . '"'; + } elseif (isset($pname['state'])) { + $vs = ', stability "' . $pname['state'] . '"'; + } elseif ($param == 'dependency') { + if (!class_exists('PEAR_Common')) { + require_once 'PEAR/Common.php'; + } + if (!in_array($info['info']->getState(), + PEAR_Common::betterStates($this->_config->get('preferred_state'), true))) { + if ($optional) { + // don't spit out confusing error message + return $this->_downloader->_getPackageDownloadUrl( + array('package' => $pname['package'], + 'channel' => $pname['channel'], + 'version' => $info['version'])); + } + $vs = ' within preferred state "' . $this->_config->get('preferred_state') . + '"'; + } else { + if (!class_exists('PEAR_Dependency2')) { + require_once 'PEAR/Dependency2.php'; + } + if ($optional) { + // don't spit out confusing error message + return $this->_downloader->_getPackageDownloadUrl( + array('package' => $pname['package'], + 'channel' => $pname['channel'], + 'version' => $info['version'])); + } + $vs = PEAR_Dependency2::_getExtraString($pname); + $instead = ''; + } + } else { + $vs = ' within preferred state "' . $this->_config->get( + 'preferred_state') . '"'; + } + if (!isset($options['soft'])) { + $this->_downloader->log(1, 'WARNING: failed to download ' . $pname['channel'] . + '/' . $pname['package'] . $vs . $instead); + } + // download the latest release + return $this->_downloader->_getPackageDownloadUrl( + array('package' => $pname['package'], + 'channel' => $pname['channel'], + 'version' => $info['version'])); + } else { + // construct helpful error message + if (isset($pname['version'])) { + $vs = ', version "' . $pname['version'] . '"'; + } elseif (isset($pname['state'])) { + $vs = ', stability "' . $pname['state'] . '"'; + } elseif ($param == 'dependency') { + if (!class_exists('PEAR_Common')) { + require_once 'PEAR/Common.php'; + } + if (!in_array($info['info']->getState(), + PEAR_Common::betterStates($this->_config->get('preferred_state'), true))) { + if ($optional) { + // don't spit out confusing error message, and don't die on + // optional dep failure! + return $this->_downloader->_getPackageDownloadUrl( + array('package' => $pname['package'], + 'channel' => $pname['channel'], + 'version' => $info['version'])); + } + $vs = ' within preferred state "' . $this->_config->get('preferred_state') . + '"'; + } else { + if (!class_exists('PEAR_Dependency2')) { + require_once 'PEAR/Dependency2.php'; + } + if ($optional) { + // don't spit out confusing error message, and don't die on + // optional dep failure! + return $this->_downloader->_getPackageDownloadUrl( + array('package' => $pname['package'], + 'channel' => $pname['channel'], + 'version' => $info['version'])); + } + $vs = PEAR_Dependency2::_getExtraString($pname); + } + } else { + $vs = ' within preferred state "' . $this->_downloader->config->get( + 'preferred_state') . '"'; + } + $options = $this->_downloader->getOptions(); + // this is only set by the "download-all" command + if (isset($options['ignorepreferred_state'])) { + $err = PEAR::raiseError( + 'Failed to download ' . $this->_registry->parsedPackageNameToString( + array('channel' => $pname['channel'], 'package' => $pname['package']), + true) + . $vs . + ', latest release is version ' . $info['version'] . + ', stability "' . $info['info']->getState() . '", use "' . + $this->_registry->parsedPackageNameToString( + array('channel' => $pname['channel'], 'package' => $pname['package'], + 'version' => $info['version'])) . '" to install', + PEAR_DOWNLOADER_PACKAGE_STATE); + return $err; + } + $err = PEAR::raiseError( + 'Failed to download ' . $this->_registry->parsedPackageNameToString( + array('channel' => $pname['channel'], 'package' => $pname['package']), + true) + . $vs . + ', latest release is version ' . $info['version'] . + ', stability "' . $info['info']->getState() . '", use "' . + $this->_registry->parsedPackageNameToString( + array('channel' => $pname['channel'], 'package' => $pname['package'], + 'version' => $info['version'])) . '" to install'); + return $err; + } + } + return $info; + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/ErrorStack.php b/campcaster/src/tools/pear/src/PEAR/ErrorStack.php new file mode 100644 index 000000000..8e1f694ef --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/ErrorStack.php @@ -0,0 +1,970 @@ + + * @copyright 2004-2006 Greg Beaver + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: ErrorStack.php,v 1.22 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR_ErrorStack + */ + +/** + * Singleton storage + * + * Format: + * 
+ * array(
+ *  'package1' => PEAR_ErrorStack object,
+ *  'package2' => PEAR_ErrorStack object,
+ *  ...
+ * )
+ *
+ * @access private + * @global array $GLOBALS['_PEAR_ERRORSTACK_SINGLETON'] + */ +$GLOBALS['_PEAR_ERRORSTACK_SINGLETON'] = array(); + +/** + * Global error callback (default) + * + * This is only used if set to non-false. * is the default callback for + * all packages, whereas specific packages may set a default callback + * for all instances, regardless of whether they are a singleton or not. + * + * To exclude non-singletons, only set the local callback for the singleton + * @see PEAR_ErrorStack::setDefaultCallback() + * @access private + * @global array $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_CALLBACK'] + */ +$GLOBALS['_PEAR_ERRORSTACK_DEFAULT_CALLBACK'] = array( + '*' => false, +); + +/** + * Global Log object (default) + * + * This is only used if set to non-false. Use to set a default log object for + * all stacks, regardless of instantiation order or location + * @see PEAR_ErrorStack::setDefaultLogger() + * @access private + * @global array $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_LOGGER'] + */ +$GLOBALS['_PEAR_ERRORSTACK_DEFAULT_LOGGER'] = false; + +/** + * Global Overriding Callback + * + * This callback will override any error callbacks that specific loggers have set. + * Use with EXTREME caution + * @see PEAR_ErrorStack::staticPushCallback() + * @access private + * @global array $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_LOGGER'] + */ +$GLOBALS['_PEAR_ERRORSTACK_OVERRIDE_CALLBACK'] = array(); + +/**#@+ + * One of four possible return values from the error Callback + * @see PEAR_ErrorStack::_errorCallback() + */ +/** + * If this is returned, then the error will be both pushed onto the stack + * and logged. + */ +define('PEAR_ERRORSTACK_PUSHANDLOG', 1); +/** + * If this is returned, then the error will only be pushed onto the stack, + * and not logged. + */ +define('PEAR_ERRORSTACK_PUSH', 2); +/** + * If this is returned, then the error will only be logged, but not pushed + * onto the error stack. + */ +define('PEAR_ERRORSTACK_LOG', 3); +/** + * If this is returned, then the error is completely ignored. + */ +define('PEAR_ERRORSTACK_IGNORE', 4); +/** + * If this is returned, then the error is logged and die() is called. + */ +define('PEAR_ERRORSTACK_DIE', 5); +/**#@-*/ + +/** + * Error code for an attempt to instantiate a non-class as a PEAR_ErrorStack in + * the singleton method. + */ +define('PEAR_ERRORSTACK_ERR_NONCLASS', 1); + +/** + * Error code for an attempt to pass an object into {@link PEAR_ErrorStack::getMessage()} + * that has no __toString() method + */ +define('PEAR_ERRORSTACK_ERR_OBJTOSTRING', 2); +/** + * Error Stack Implementation + * + * Usage: + * + * // global error stack + * $global_stack = &PEAR_ErrorStack::singleton('MyPackage'); + * // local error stack + * $local_stack = new PEAR_ErrorStack('MyPackage'); + * + * @author Greg Beaver + * @version 1.4.11 + * @package PEAR_ErrorStack + * @category Debugging + * @copyright 2004-2006 Greg Beaver + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: ErrorStack.php,v 1.22 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR_ErrorStack + */ +class PEAR_ErrorStack { + /** + * Errors are stored in the order that they are pushed on the stack. + * @since 0.4alpha Errors are no longer organized by error level. + * This renders pop() nearly unusable, and levels could be more easily + * handled in a callback anyway + * @var array + * @access private + */ + var $_errors = array(); + + /** + * Storage of errors by level. + * + * Allows easy retrieval and deletion of only errors from a particular level + * @since PEAR 1.4.0dev + * @var array + * @access private + */ + var $_errorsByLevel = array(); + + /** + * Package name this error stack represents + * @var string + * @access protected + */ + var $_package; + + /** + * Determines whether a PEAR_Error is thrown upon every error addition + * @var boolean + * @access private + */ + var $_compat = false; + + /** + * If set to a valid callback, this will be used to generate the error + * message from the error code, otherwise the message passed in will be + * used + * @var false|string|array + * @access private + */ + var $_msgCallback = false; + + /** + * If set to a valid callback, this will be used to generate the error + * context for an error. For PHP-related errors, this will be a file + * and line number as retrieved from debug_backtrace(), but can be + * customized for other purposes. The error might actually be in a separate + * configuration file, or in a database query. + * @var false|string|array + * @access protected + */ + var $_contextCallback = false; + + /** + * If set to a valid callback, this will be called every time an error + * is pushed onto the stack. The return value will be used to determine + * whether to allow an error to be pushed or logged. + * + * The return value must be one an PEAR_ERRORSTACK_* constant + * @see PEAR_ERRORSTACK_PUSHANDLOG, PEAR_ERRORSTACK_PUSH, PEAR_ERRORSTACK_LOG + * @var false|string|array + * @access protected + */ + var $_errorCallback = array(); + + /** + * PEAR::Log object for logging errors + * @var false|Log + * @access protected + */ + var $_logger = false; + + /** + * Error messages - designed to be overridden + * @var array + * @abstract + */ + var $_errorMsgs = array(); + + /** + * Set up a new error stack + * + * @param string $package name of the package this error stack represents + * @param callback $msgCallback callback used for error message generation + * @param callback $contextCallback callback used for context generation, + * defaults to {@link getFileLine()} + * @param boolean $throwPEAR_Error + */ + function PEAR_ErrorStack($package, $msgCallback = false, $contextCallback = false, + $throwPEAR_Error = false) + { + $this->_package = $package; + $this->setMessageCallback($msgCallback); + $this->setContextCallback($contextCallback); + $this->_compat = $throwPEAR_Error; + } + + /** + * Return a single error stack for this package. + * + * Note that all parameters are ignored if the stack for package $package + * has already been instantiated + * @param string $package name of the package this error stack represents + * @param callback $msgCallback callback used for error message generation + * @param callback $contextCallback callback used for context generation, + * defaults to {@link getFileLine()} + * @param boolean $throwPEAR_Error + * @param string $stackClass class to instantiate + * @static + * @return PEAR_ErrorStack + */ + function &singleton($package, $msgCallback = false, $contextCallback = false, + $throwPEAR_Error = false, $stackClass = 'PEAR_ErrorStack') + { + if (isset($GLOBALS['_PEAR_ERRORSTACK_SINGLETON'][$package])) { + return $GLOBALS['_PEAR_ERRORSTACK_SINGLETON'][$package]; + } + if (!class_exists($stackClass)) { + if (function_exists('debug_backtrace')) { + $trace = debug_backtrace(); + } + PEAR_ErrorStack::staticPush('PEAR_ErrorStack', PEAR_ERRORSTACK_ERR_NONCLASS, + 'exception', array('stackclass' => $stackClass), + 'stack class "%stackclass%" is not a valid class name (should be like PEAR_ErrorStack)', + false, $trace); + } + $GLOBALS['_PEAR_ERRORSTACK_SINGLETON'][$package] = + new $stackClass($package, $msgCallback, $contextCallback, $throwPEAR_Error); + + return $GLOBALS['_PEAR_ERRORSTACK_SINGLETON'][$package]; + } + + /** + * Internal error handler for PEAR_ErrorStack class + * + * Dies if the error is an exception (and would have died anyway) + * @access private + */ + function _handleError($err) + { + if ($err['level'] == 'exception') { + $message = $err['message']; + if (isset($_SERVER['REQUEST_URI'])) { + echo '
'; + } else { + echo "\n"; + } + var_dump($err['context']); + die($message); + } + } + + /** + * Set up a PEAR::Log object for all error stacks that don't have one + * @param Log $log + * @static + */ + function setDefaultLogger(&$log) + { + if (is_object($log) && method_exists($log, 'log') ) { + $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_LOGGER'] = &$log; + } elseif (is_callable($log)) { + $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_LOGGER'] = &$log; + } + } + + /** + * Set up a PEAR::Log object for this error stack + * @param Log $log + */ + function setLogger(&$log) + { + if (is_object($log) && method_exists($log, 'log') ) { + $this->_logger = &$log; + } elseif (is_callable($log)) { + $this->_logger = &$log; + } + } + + /** + * Set an error code => error message mapping callback + * + * This method sets the callback that can be used to generate error + * messages for any instance + * @param array|string Callback function/method + */ + function setMessageCallback($msgCallback) + { + if (!$msgCallback) { + $this->_msgCallback = array(&$this, 'getErrorMessage'); + } else { + if (is_callable($msgCallback)) { + $this->_msgCallback = $msgCallback; + } + } + } + + /** + * Get an error code => error message mapping callback + * + * This method returns the current callback that can be used to generate error + * messages + * @return array|string|false Callback function/method or false if none + */ + function getMessageCallback() + { + return $this->_msgCallback; + } + + /** + * Sets a default callback to be used by all error stacks + * + * This method sets the callback that can be used to generate error + * messages for a singleton + * @param array|string Callback function/method + * @param string Package name, or false for all packages + * @static + */ + function setDefaultCallback($callback = false, $package = false) + { + if (!is_callable($callback)) { + $callback = false; + } + $package = $package ? $package : '*'; + $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_CALLBACK'][$package] = $callback; + } + + /** + * Set a callback that generates context information (location of error) for an error stack + * + * This method sets the callback that can be used to generate context + * information for an error. Passing in NULL will disable context generation + * and remove the expensive call to debug_backtrace() + * @param array|string|null Callback function/method + */ + function setContextCallback($contextCallback) + { + if ($contextCallback === null) { + return $this->_contextCallback = false; + } + if (!$contextCallback) { + $this->_contextCallback = array(&$this, 'getFileLine'); + } else { + if (is_callable($contextCallback)) { + $this->_contextCallback = $contextCallback; + } + } + } + + /** + * Set an error Callback + * If set to a valid callback, this will be called every time an error + * is pushed onto the stack. The return value will be used to determine + * whether to allow an error to be pushed or logged. + * + * The return value must be one of the ERRORSTACK_* constants. + * + * This functionality can be used to emulate PEAR's pushErrorHandling, and + * the PEAR_ERROR_CALLBACK mode, without affecting the integrity of + * the error stack or logging + * @see PEAR_ERRORSTACK_PUSHANDLOG, PEAR_ERRORSTACK_PUSH, PEAR_ERRORSTACK_LOG + * @see popCallback() + * @param string|array $cb + */ + function pushCallback($cb) + { + array_push($this->_errorCallback, $cb); + } + + /** + * Remove a callback from the error callback stack + * @see pushCallback() + * @return array|string|false + */ + function popCallback() + { + if (!count($this->_errorCallback)) { + return false; + } + return array_pop($this->_errorCallback); + } + + /** + * Set a temporary overriding error callback for every package error stack + * + * Use this to temporarily disable all existing callbacks (can be used + * to emulate the @ operator, for instance) + * @see PEAR_ERRORSTACK_PUSHANDLOG, PEAR_ERRORSTACK_PUSH, PEAR_ERRORSTACK_LOG + * @see staticPopCallback(), pushCallback() + * @param string|array $cb + * @static + */ + function staticPushCallback($cb) + { + array_push($GLOBALS['_PEAR_ERRORSTACK_OVERRIDE_CALLBACK'], $cb); + } + + /** + * Remove a temporary overriding error callback + * @see staticPushCallback() + * @return array|string|false + * @static + */ + function staticPopCallback() + { + $ret = array_pop($GLOBALS['_PEAR_ERRORSTACK_OVERRIDE_CALLBACK']); + if (!is_array($GLOBALS['_PEAR_ERRORSTACK_OVERRIDE_CALLBACK'])) { + $GLOBALS['_PEAR_ERRORSTACK_OVERRIDE_CALLBACK'] = array(); + } + return $ret; + } + + /** + * Add an error to the stack + * + * If the message generator exists, it is called with 2 parameters. + * - the current Error Stack object + * - an array that is in the same format as an error. Available indices + * are 'code', 'package', 'time', 'params', 'level', and 'context' + * + * Next, if the error should contain context information, this is + * handled by the context grabbing method. + * Finally, the error is pushed onto the proper error stack + * @param int $code Package-specific error code + * @param string $level Error level. This is NOT spell-checked + * @param array $params associative array of error parameters + * @param string $msg Error message, or a portion of it if the message + * is to be generated + * @param array $repackage If this error re-packages an error pushed by + * another package, place the array returned from + * {@link pop()} in this parameter + * @param array $backtrace Protected parameter: use this to pass in the + * {@link debug_backtrace()} that should be used + * to find error context + * @return PEAR_Error|array|Exception + * if compatibility mode is on, a PEAR_Error is also + * thrown. If the class Exception exists, then one + * is returned to allow code like: + * + * throw ($stack->push(MY_ERROR_CODE, 'error', array('username' => 'grob'))); + * + * + * The errorData property of the exception class will be set to the array + * that would normally be returned. If a PEAR_Error is returned, the userinfo + * property is set to the array + * + * Otherwise, an array is returned in this format: + * + * array( + * 'code' => $code, + * 'params' => $params, + * 'package' => $this->_package, + * 'level' => $level, + * 'time' => time(), + * 'context' => $context, + * 'message' => $msg, + * //['repackage' => $err] repackaged error array/Exception class + * ); + * + */ + function push($code, $level = 'error', $params = array(), $msg = false, + $repackage = false, $backtrace = false) + { + $context = false; + // grab error context + if ($this->_contextCallback) { + if (!$backtrace) { + $backtrace = debug_backtrace(); + } + $context = call_user_func($this->_contextCallback, $code, $params, $backtrace); + } + + // save error + $time = explode(' ', microtime()); + $time = $time[1] + $time[0]; + $err = array( + 'code' => $code, + 'params' => $params, + 'package' => $this->_package, + 'level' => $level, + 'time' => $time, + 'context' => $context, + 'message' => $msg, + ); + + if ($repackage) { + $err['repackage'] = $repackage; + } + + // set up the error message, if necessary + if ($this->_msgCallback) { + $msg = call_user_func_array($this->_msgCallback, + array(&$this, $err)); + $err['message'] = $msg; + } + $push = $log = true; + $die = false; + // try the overriding callback first + $callback = $this->staticPopCallback(); + if ($callback) { + $this->staticPushCallback($callback); + } + if (!is_callable($callback)) { + // try the local callback next + $callback = $this->popCallback(); + if (is_callable($callback)) { + $this->pushCallback($callback); + } else { + // try the default callback + $callback = isset($GLOBALS['_PEAR_ERRORSTACK_DEFAULT_CALLBACK'][$this->_package]) ? + $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_CALLBACK'][$this->_package] : + $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_CALLBACK']['*']; + } + } + if (is_callable($callback)) { + switch(call_user_func($callback, $err)){ + case PEAR_ERRORSTACK_IGNORE: + return $err; + break; + case PEAR_ERRORSTACK_PUSH: + $log = false; + break; + case PEAR_ERRORSTACK_LOG: + $push = false; + break; + case PEAR_ERRORSTACK_DIE: + $die = true; + break; + // anything else returned has the same effect as pushandlog + } + } + if ($push) { + array_unshift($this->_errors, $err); + $this->_errorsByLevel[$err['level']][] = &$this->_errors[0]; + } + if ($log) { + if ($this->_logger || $GLOBALS['_PEAR_ERRORSTACK_DEFAULT_LOGGER']) { + $this->_log($err); + } + } + if ($die) { + die(); + } + if ($this->_compat && $push) { + return $this->raiseError($msg, $code, null, null, $err); + } + return $err; + } + + /** + * Static version of {@link push()} + * + * @param string $package Package name this error belongs to + * @param int $code Package-specific error code + * @param string $level Error level. This is NOT spell-checked + * @param array $params associative array of error parameters + * @param string $msg Error message, or a portion of it if the message + * is to be generated + * @param array $repackage If this error re-packages an error pushed by + * another package, place the array returned from + * {@link pop()} in this parameter + * @param array $backtrace Protected parameter: use this to pass in the + * {@link debug_backtrace()} that should be used + * to find error context + * @return PEAR_Error|null|Exception + * if compatibility mode is on, a PEAR_Error is also + * thrown. If the class Exception exists, then one + * is returned to allow code like: + * + * throw ($stack->push(MY_ERROR_CODE, 'error', array('username' => 'grob'))); + * + * @static + */ + function staticPush($package, $code, $level = 'error', $params = array(), + $msg = false, $repackage = false, $backtrace = false) + { + $s = &PEAR_ErrorStack::singleton($package); + if ($s->_contextCallback) { + if (!$backtrace) { + if (function_exists('debug_backtrace')) { + $backtrace = debug_backtrace(); + } + } + } + return $s->push($code, $level, $params, $msg, $repackage, $backtrace); + } + + /** + * Log an error using PEAR::Log + * @param array $err Error array + * @param array $levels Error level => Log constant map + * @access protected + */ + function _log($err) + { + if ($this->_logger) { + $logger = &$this->_logger; + } else { + $logger = &$GLOBALS['_PEAR_ERRORSTACK_DEFAULT_LOGGER']; + } + if (is_a($logger, 'Log')) { + $levels = array( + 'exception' => PEAR_LOG_CRIT, + 'alert' => PEAR_LOG_ALERT, + 'critical' => PEAR_LOG_CRIT, + 'error' => PEAR_LOG_ERR, + 'warning' => PEAR_LOG_WARNING, + 'notice' => PEAR_LOG_NOTICE, + 'info' => PEAR_LOG_INFO, + 'debug' => PEAR_LOG_DEBUG); + if (isset($levels[$err['level']])) { + $level = $levels[$err['level']]; + } else { + $level = PEAR_LOG_INFO; + } + $logger->log($err['message'], $level, $err); + } else { // support non-standard logs + call_user_func($logger, $err); + } + } + + + /** + * Pop an error off of the error stack + * + * @return false|array + * @since 0.4alpha it is no longer possible to specify a specific error + * level to return - the last error pushed will be returned, instead + */ + function pop() + { + return @array_shift($this->_errors); + } + + /** + * Determine whether there are any errors on the stack + * @param string|array Level name. Use to determine if any errors + * of level (string), or levels (array) have been pushed + * @return boolean + */ + function hasErrors($level = false) + { + if ($level) { + return isset($this->_errorsByLevel[$level]); + } + return count($this->_errors); + } + + /** + * Retrieve all errors since last purge + * + * @param boolean set in order to empty the error stack + * @param string level name, to return only errors of a particular severity + * @return array + */ + function getErrors($purge = false, $level = false) + { + if (!$purge) { + if ($level) { + if (!isset($this->_errorsByLevel[$level])) { + return array(); + } else { + return $this->_errorsByLevel[$level]; + } + } else { + return $this->_errors; + } + } + if ($level) { + $ret = $this->_errorsByLevel[$level]; + foreach ($this->_errorsByLevel[$level] as $i => $unused) { + // entries are references to the $_errors array + $this->_errorsByLevel[$level][$i] = false; + } + // array_filter removes all entries === false + $this->_errors = array_filter($this->_errors); + unset($this->_errorsByLevel[$level]); + return $ret; + } + $ret = $this->_errors; + $this->_errors = array(); + $this->_errorsByLevel = array(); + return $ret; + } + + /** + * Determine whether there are any errors on a single error stack, or on any error stack + * + * The optional parameter can be used to test the existence of any errors without the need of + * singleton instantiation + * @param string|false Package name to check for errors + * @param string Level name to check for a particular severity + * @return boolean + * @static + */ + function staticHasErrors($package = false, $level = false) + { + if ($package) { + if (!isset($GLOBALS['_PEAR_ERRORSTACK_SINGLETON'][$package])) { + return false; + } + return $GLOBALS['_PEAR_ERRORSTACK_SINGLETON'][$package]->hasErrors($level); + } + foreach ($GLOBALS['_PEAR_ERRORSTACK_SINGLETON'] as $package => $obj) { + if ($obj->hasErrors($level)) { + return true; + } + } + return false; + } + + /** + * Get a list of all errors since last purge, organized by package + * @since PEAR 1.4.0dev BC break! $level is now in the place $merge used to be + * @param boolean $purge Set to purge the error stack of existing errors + * @param string $level Set to a level name in order to retrieve only errors of a particular level + * @param boolean $merge Set to return a flat array, not organized by package + * @param array $sortfunc Function used to sort a merged array - default + * sorts by time, and should be good for most cases + * @static + * @return array + */ + function staticGetErrors($purge = false, $level = false, $merge = false, + $sortfunc = array('PEAR_ErrorStack', '_sortErrors')) + { + $ret = array(); + if (!is_callable($sortfunc)) { + $sortfunc = array('PEAR_ErrorStack', '_sortErrors'); + } + foreach ($GLOBALS['_PEAR_ERRORSTACK_SINGLETON'] as $package => $obj) { + $test = $GLOBALS['_PEAR_ERRORSTACK_SINGLETON'][$package]->getErrors($purge, $level); + if ($test) { + if ($merge) { + $ret = array_merge($ret, $test); + } else { + $ret[$package] = $test; + } + } + } + if ($merge) { + usort($ret, $sortfunc); + } + return $ret; + } + + /** + * Error sorting function, sorts by time + * @access private + */ + function _sortErrors($a, $b) + { + if ($a['time'] == $b['time']) { + return 0; + } + if ($a['time'] < $b['time']) { + return 1; + } + return -1; + } + + /** + * Standard file/line number/function/class context callback + * + * This function uses a backtrace generated from {@link debug_backtrace()} + * and so will not work at all in PHP < 4.3.0. The frame should + * reference the frame that contains the source of the error. + * @return array|false either array('file' => file, 'line' => line, + * 'function' => function name, 'class' => class name) or + * if this doesn't work, then false + * @param unused + * @param integer backtrace frame. + * @param array Results of debug_backtrace() + * @static + */ + function getFileLine($code, $params, $backtrace = null) + { + if ($backtrace === null) { + return false; + } + $frame = 0; + $functionframe = 1; + if (!isset($backtrace[1])) { + $functionframe = 0; + } else { + while (isset($backtrace[$functionframe]['function']) && + $backtrace[$functionframe]['function'] == 'eval' && + isset($backtrace[$functionframe + 1])) { + $functionframe++; + } + } + if (isset($backtrace[$frame])) { + if (!isset($backtrace[$frame]['file'])) { + $frame++; + } + $funcbacktrace = $backtrace[$functionframe]; + $filebacktrace = $backtrace[$frame]; + $ret = array('file' => $filebacktrace['file'], + 'line' => $filebacktrace['line']); + // rearrange for eval'd code or create function errors + if (strpos($filebacktrace['file'], '(') && + preg_match(';^(.*?)\((\d+)\) : (.*?)$;', $filebacktrace['file'], + $matches)) { + $ret['file'] = $matches[1]; + $ret['line'] = $matches[2] + 0; + } + if (isset($funcbacktrace['function']) && isset($backtrace[1])) { + if ($funcbacktrace['function'] != 'eval') { + if ($funcbacktrace['function'] == '__lambda_func') { + $ret['function'] = 'create_function() code'; + } else { + $ret['function'] = $funcbacktrace['function']; + } + } + } + if (isset($funcbacktrace['class']) && isset($backtrace[1])) { + $ret['class'] = $funcbacktrace['class']; + } + return $ret; + } + return false; + } + + /** + * Standard error message generation callback + * + * This method may also be called by a custom error message generator + * to fill in template values from the params array, simply + * set the third parameter to the error message template string to use + * + * The special variable %__msg% is reserved: use it only to specify + * where a message passed in by the user should be placed in the template, + * like so: + * + * Error message: %msg% - internal error + * + * If the message passed like so: + * + * + * $stack->push(ERROR_CODE, 'error', array(), 'server error 500'); + * + * + * The returned error message will be "Error message: server error 500 - + * internal error" + * @param PEAR_ErrorStack + * @param array + * @param string|false Pre-generated error message template + * @static + * @return string + */ + function getErrorMessage(&$stack, $err, $template = false) + { + if ($template) { + $mainmsg = $template; + } else { + $mainmsg = $stack->getErrorMessageTemplate($err['code']); + } + $mainmsg = str_replace('%__msg%', $err['message'], $mainmsg); + if (is_array($err['params']) && count($err['params'])) { + foreach ($err['params'] as $name => $val) { + if (is_array($val)) { + // @ is needed in case $val is a multi-dimensional array + $val = @implode(', ', $val); + } + if (is_object($val)) { + if (method_exists($val, '__toString')) { + $val = $val->__toString(); + } else { + PEAR_ErrorStack::staticPush('PEAR_ErrorStack', PEAR_ERRORSTACK_ERR_OBJTOSTRING, + 'warning', array('obj' => get_class($val)), + 'object %obj% passed into getErrorMessage, but has no __toString() method'); + $val = 'Object'; + } + } + $mainmsg = str_replace('%' . $name . '%', $val, $mainmsg); + } + } + return $mainmsg; + } + + /** + * Standard Error Message Template generator from code + * @return string + */ + function getErrorMessageTemplate($code) + { + if (!isset($this->_errorMsgs[$code])) { + return '%__msg%'; + } + return $this->_errorMsgs[$code]; + } + + /** + * Set the Error Message Template array + * + * The array format must be: + * 
+     * array(error code => 'message template',...)
+     *
+ * + * Error message parameters passed into {@link push()} will be used as input + * for the error message. If the template is 'message %foo% was %bar%', and the + * parameters are array('foo' => 'one', 'bar' => 'six'), the error message returned will + * be 'message one was six' + * @return string + */ + function setErrorMessageTemplate($template) + { + $this->_errorMsgs = $template; + } + + + /** + * emulate PEAR::raiseError() + * + * @return PEAR_Error + */ + function raiseError() + { + require_once 'PEAR.php'; + $args = func_get_args(); + return call_user_func_array(array('PEAR', 'raiseError'), $args); + } +} +$stack = &PEAR_ErrorStack::singleton('PEAR_ErrorStack'); +$stack->pushCallback(array('PEAR_ErrorStack', '_handleError')); +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Exception.php b/campcaster/src/tools/pear/src/PEAR/Exception.php new file mode 100644 index 000000000..866aba5d1 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Exception.php @@ -0,0 +1,376 @@ + + * @author Hans Lellelid + * @author Bertrand Mansion + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Exception.php,v 1.23 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.3.3 + */ + + +/** + * Base PEAR_Exception Class + * + * 1) Features: + * + * - Nestable exceptions (throw new PEAR_Exception($msg, $prev_exception)) + * - Definable triggers, shot when exceptions occur + * - Pretty and informative error messages + * - Added more context info available (like class, method or cause) + * - cause can be a PEAR_Exception or an array of mixed + * PEAR_Exceptions/PEAR_ErrorStack warnings + * - callbacks for specific exception classes and their children + * + * 2) Ideas: + * + * - Maybe a way to define a 'template' for the output + * + * 3) Inherited properties from PHP Exception Class: + * + * protected $message + * protected $code + * protected $line + * protected $file + * private $trace + * + * 4) Inherited methods from PHP Exception Class: + * + * __clone + * __construct + * getMessage + * getCode + * getFile + * getLine + * getTraceSafe + * getTraceSafeAsString + * __toString + * + * 5) Usage example + * + * + * require_once 'PEAR/Exception.php'; + * + * class Test { + * function foo() { + * throw new PEAR_Exception('Error Message', ERROR_CODE); + * } + * } + * + * function myLogger($pear_exception) { + * echo $pear_exception->getMessage(); + * } + * // each time a exception is thrown the 'myLogger' will be called + * // (its use is completely optional) + * PEAR_Exception::addObserver('myLogger'); + * $test = new Test; + * try { + * $test->foo(); + * } catch (PEAR_Exception $e) { + * print $e; + * } + * + * + * @category pear + * @package PEAR + * @author Tomas V.V.Cox + * @author Hans Lellelid + * @author Bertrand Mansion + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.3.3 + * + */ +class PEAR_Exception extends Exception +{ + const OBSERVER_PRINT = -2; + const OBSERVER_TRIGGER = -4; + const OBSERVER_DIE = -8; + protected $cause; + private static $_observers = array(); + private static $_uniqueid = 0; + private $_trace; + + /** + * Supported signatures: + * PEAR_Exception(string $message); + * PEAR_Exception(string $message, int $code); + * PEAR_Exception(string $message, Exception $cause); + * PEAR_Exception(string $message, Exception $cause, int $code); + * PEAR_Exception(string $message, array $causes); + * PEAR_Exception(string $message, array $causes, int $code); + */ + public function __construct($message, $p2 = null, $p3 = null) + { + if (is_int($p2)) { + $code = $p2; + $this->cause = null; + } elseif ($p2 instanceof Exception || is_array($p2)) { + $code = $p3; + if (is_array($p2) && isset($p2['message'])) { + // fix potential problem of passing in a single warning + $p2 = array($p2); + } + $this->cause = $p2; + } else { + $code = null; + $this->cause = null; + } + parent::__construct($message, $code); + $this->signal(); + } + + /** + * @param mixed $callback - A valid php callback, see php func is_callable() + * - A PEAR_Exception::OBSERVER_* constant + * - An array(const PEAR_Exception::OBSERVER_*, + * mixed $options) + * @param string $label The name of the observer. Use this if you want + * to remove it later with removeObserver() + */ + public static function addObserver($callback, $label = 'default') + { + self::$_observers[$label] = $callback; + } + + public static function removeObserver($label = 'default') + { + unset(self::$_observers[$label]); + } + + /** + * @return int unique identifier for an observer + */ + public static function getUniqueId() + { + return self::$_uniqueid++; + } + + private function signal() + { + foreach (self::$_observers as $func) { + if (is_callable($func)) { + call_user_func($func, $this); + continue; + } + settype($func, 'array'); + switch ($func[0]) { + case self::OBSERVER_PRINT : + $f = (isset($func[1])) ? $func[1] : '%s'; + printf($f, $this->getMessage()); + break; + case self::OBSERVER_TRIGGER : + $f = (isset($func[1])) ? $func[1] : E_USER_NOTICE; + trigger_error($this->getMessage(), $f); + break; + case self::OBSERVER_DIE : + $f = (isset($func[1])) ? $func[1] : '%s'; + die(printf($f, $this->getMessage())); + break; + default: + trigger_error('invalid observer type', E_USER_WARNING); + } + } + } + + /** + * Return specific error information that can be used for more detailed + * error messages or translation. + * + * This method may be overridden in child exception classes in order + * to add functionality not present in PEAR_Exception and is a placeholder + * to define API + * + * The returned array must be an associative array of parameter => value like so: + * 
+     * array('name' => $name, 'context' => array(...))
+     *
+ * @return array + */ + public function getErrorData() + { + return array(); + } + + /** + * Returns the exception that caused this exception to be thrown + * @access public + * @return Exception|array The context of the exception + */ + public function getCause() + { + return $this->cause; + } + + /** + * Function must be public to call on caused exceptions + * @param array + */ + public function getCauseMessage(&$causes) + { + $trace = $this->getTraceSafe(); + $cause = array('class' => get_class($this), + 'message' => $this->message, + 'file' => 'unknown', + 'line' => 'unknown'); + if (isset($trace[0])) { + if (isset($trace[0]['file'])) { + $cause['file'] = $trace[0]['file']; + $cause['line'] = $trace[0]['line']; + } + } + $causes[] = $cause; + if ($this->cause instanceof PEAR_Exception) { + $this->cause->getCauseMessage($causes); + } elseif ($this->cause instanceof Exception) { + $causes[] = array('class' => get_class($cause), + 'message' => $cause->getMessage(), + 'file' => $cause->getFile(), + 'line' => $cause->getLine()); + + } elseif (is_array($this->cause)) { + foreach ($this->cause as $cause) { + if ($cause instanceof PEAR_Exception) { + $cause->getCauseMessage($causes); + } elseif ($cause instanceof Exception) { + $causes[] = array('class' => get_class($cause), + 'message' => $cause->getMessage(), + 'file' => $cause->getFile(), + 'line' => $cause->getLine()); + } elseif (is_array($cause) && isset($cause['message'])) { + // PEAR_ErrorStack warning + $causes[] = array( + 'class' => $cause['package'], + 'message' => $cause['message'], + 'file' => isset($cause['context']['file']) ? + $cause['context']['file'] : + 'unknown', + 'line' => isset($cause['context']['line']) ? + $cause['context']['line'] : + 'unknown', + ); + } + } + } + } + + public function getTraceSafe() + { + if (!isset($this->_trace)) { + $this->_trace = $this->getTrace(); + if (empty($this->_trace)) { + $backtrace = debug_backtrace(); + $this->_trace = array($backtrace[count($backtrace)-1]); + } + } + return $this->_trace; + } + + public function getErrorClass() + { + $trace = $this->getTraceSafe(); + return $trace[0]['class']; + } + + public function getErrorMethod() + { + $trace = $this->getTraceSafe(); + return $trace[0]['function']; + } + + public function __toString() + { + if (isset($_SERVER['REQUEST_URI'])) { + return $this->toHtml(); + } + return $this->toText(); + } + + public function toHtml() + { + $trace = $this->getTraceSafe(); + $causes = array(); + $this->getCauseMessage($causes); + $html = '' . "\n"; + foreach ($causes as $i => $cause) { + $html .= '\n"; + } + $html .= '' . "\n" + . '' + . '' + . '' . "\n"; + + foreach ($trace as $k => $v) { + $html .= '' + . '' + . '' . "\n"; + } + $html .= '' + . '' + . '' . "\n" + . '
' + . str_repeat('-', $i) . ' ' . $cause['class'] . ': ' + . htmlspecialchars($cause['message']) . ' in ' . $cause['file'] . ' ' + . 'on line ' . $cause['line'] . '' + . "
Exception trace
#FunctionLocation
' . $k . ''; + if (!empty($v['class'])) { + $html .= $v['class'] . $v['type']; + } + $html .= $v['function']; + $args = array(); + if (!empty($v['args'])) { + foreach ($v['args'] as $arg) { + if (is_null($arg)) $args[] = 'null'; + elseif (is_array($arg)) $args[] = 'Array'; + elseif (is_object($arg)) $args[] = 'Object('.get_class($arg).')'; + elseif (is_bool($arg)) $args[] = $arg ? 'true' : 'false'; + elseif (is_int($arg) || is_double($arg)) $args[] = $arg; + else { + $arg = (string)$arg; + $str = htmlspecialchars(substr($arg, 0, 16)); + if (strlen($arg) > 16) $str .= '…'; + $args[] = "'" . $str . "'"; + } + } + } + $html .= '(' . implode(', ',$args) . ')' + . '' . (isset($v['file']) ? $v['file'] : 'unknown') + . ':' . (isset($v['line']) ? $v['line'] : 'unknown') + . '
' . ($k+1) . '{main} 
'; + return $html; + } + + public function toText() + { + $causes = array(); + $this->getCauseMessage($causes); + $causeMsg = ''; + foreach ($causes as $i => $cause) { + $causeMsg .= str_repeat(' ', $i) . $cause['class'] . ': ' + . $cause['message'] . ' in ' . $cause['file'] + . ' on line ' . $cause['line'] . "\n"; + } + return $causeMsg . $this->getTraceAsString(); + } +} + +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Frontend.php b/campcaster/src/tools/pear/src/PEAR/Frontend.php new file mode 100644 index 000000000..3431629d9 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Frontend.php @@ -0,0 +1,186 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Frontend.php,v 1.9 2006/03/03 13:13:07 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * Which user interface class is being used. + * @var string class name + */ +$GLOBALS['_PEAR_FRONTEND_CLASS'] = 'PEAR_Frontend_CLI'; + +/** + * Instance of $_PEAR_Command_uiclass. + * @var object + */ +$GLOBALS['_PEAR_FRONTEND_SINGLETON'] = null; + +/** + * Singleton-based frontend for PEAR user input/output + * + * Note that frontend classes must implement userConfirm(), and shoul implement + * displayFatalError() and outputData() + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Frontend extends PEAR +{ + /** + * Retrieve the frontend object + * @return PEAR_Frontend_CLI|PEAR_Frontend_Web|PEAR_Frontend_Gtk + * @static + */ + function &singleton($type = null) + { + if ($type === null) { + if (!isset($GLOBALS['_PEAR_FRONTEND_SINGLETON'])) { + $a = false; + return $a; + } + return $GLOBALS['_PEAR_FRONTEND_SINGLETON']; + } else { + $a = PEAR_Frontend::setFrontendClass($type); + return $a; + } + } + + /** + * Set the frontend class that will be used by calls to {@link singleton()} + * + * Frontends are expected to conform to the PEAR naming standard of + * _ => DIRECTORY_SEPARATOR (PEAR_Frontend_CLI is in PEAR/Frontend/CLI.php) + * @param string $uiclass full class name + * @return PEAR_Frontend + * @static + */ + function &setFrontendClass($uiclass) + { + if (is_object($GLOBALS['_PEAR_FRONTEND_SINGLETON']) && + is_a($GLOBALS['_PEAR_FRONTEND_SINGLETON'], $uiclass)) { + return $GLOBALS['_PEAR_FRONTEND_SINGLETON']; + } + if (!class_exists($uiclass)) { + $file = str_replace('_', '/', $uiclass) . '.php'; + if (PEAR_Frontend::isIncludeable($file)) { + include_once $file; + } + } + if (class_exists($uiclass)) { + $obj = &new $uiclass; + // quick test to see if this class implements a few of the most + // important frontend methods + if (method_exists($obj, 'userConfirm')) { + $GLOBALS['_PEAR_FRONTEND_SINGLETON'] = &$obj; + $GLOBALS['_PEAR_FRONTEND_CLASS'] = $uiclass; + return $obj; + } else { + $err = PEAR::raiseError("not a frontend class: $uiclass"); + return $err; + } + } + $err = PEAR::raiseError("no such class: $uiclass"); + return $err; + } + + /** + * Set the frontend class that will be used by calls to {@link singleton()} + * + * Frontends are expected to be a descendant of PEAR_Frontend + * @param PEAR_Frontend + * @return PEAR_Frontend + * @static + */ + function &setFrontendObject($uiobject) + { + if (is_object($GLOBALS['_PEAR_FRONTEND_SINGLETON']) && + is_a($GLOBALS['_PEAR_FRONTEND_SINGLETON'], get_class($uiobject))) { + return $GLOBALS['_PEAR_FRONTEND_SINGLETON']; + } + if (!is_a($uiobject, 'PEAR_Frontend')) { + $err = PEAR::raiseError('not a valid frontend class: (' . + get_class($uiobject) . ')'); + return $err; + } + // quick test to see if this class implements a few of the most + // important frontend methods + if (method_exists($uiobject, 'userConfirm')) { + $GLOBALS['_PEAR_FRONTEND_SINGLETON'] = &$uiobject; + $GLOBALS['_PEAR_FRONTEND_CLASS'] = get_class($uiobject); + return $uiobject; + } else { + $err = PEAR::raiseError("not a value frontend class: (" . get_class($uiobject) + . ')'); + return $err; + } + } + + /** + * @param string $path relative or absolute include path + * @return boolean + * @static + */ + function isIncludeable($path) + { + if (file_exists($path) && is_readable($path)) { + return true; + } + $ipath = explode(PATH_SEPARATOR, ini_get('include_path')); + foreach ($ipath as $include) { + $test = realpath($include . DIRECTORY_SEPARATOR . $path); + if (!$test) { // support wrappers like phar (realpath just don't work with them) + $test = $include . DIRECTORY_SEPARATOR . $path; + } + if (file_exists($test) && is_readable($test)) { + return true; + } + } + return false; + } + + /** + * @param PEAR_Config + */ + function setConfig(&$config) + { + } + + /** + * This can be overridden to allow session-based temporary file management + * + * By default, all files are deleted at the end of a session. The web installer + * needs to be able to sustain a list over many sessions in order to support + * user interaction with install scripts + */ + function addTempFile($file) + { + $GLOBALS['_PEAR_Common_tempfiles'][] = $file; + } + + function log($msg, $append_crlf = true) + { + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Frontend/CLI.php b/campcaster/src/tools/pear/src/PEAR/Frontend/CLI.php new file mode 100644 index 000000000..667590294 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Frontend/CLI.php @@ -0,0 +1,742 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: CLI.php,v 1.59 2006/03/02 13:16:19 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ +/** + * base class + */ +require_once 'PEAR/Frontend.php'; + +/** + * Command-line Frontend for the PEAR Installer + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Frontend_CLI extends PEAR_Frontend +{ + // {{{ properties + + /** + * What type of user interface this frontend is for. + * @var string + * @access public + */ + var $type = 'CLI'; + var $lp = ''; // line prefix + + var $params = array(); + var $term = array( + 'bold' => '', + 'normal' => '', + ); + + // }}} + + // {{{ constructor + + function PEAR_Frontend_CLI() + { + parent::PEAR(); + $term = getenv('TERM'); //(cox) $_ENV is empty for me in 4.1.1 + if (function_exists('posix_isatty') && !posix_isatty(1)) { + // output is being redirected to a file or through a pipe + } elseif ($term) { + // XXX can use ncurses extension here, if available + if (preg_match('/^(xterm|vt220|linux)/', $term)) { + $this->term['bold'] = sprintf("%c%c%c%c", 27, 91, 49, 109); + $this->term['normal']=sprintf("%c%c%c", 27, 91, 109); + } elseif (preg_match('/^vt100/', $term)) { + $this->term['bold'] = sprintf("%c%c%c%c%c%c", 27, 91, 49, 109, 0, 0); + $this->term['normal']=sprintf("%c%c%c%c%c", 27, 91, 109, 0, 0); + } + } elseif (OS_WINDOWS) { + // XXX add ANSI codes here + } + } + + // }}} + + // {{{ displayLine(text) + + function displayLine($text) + { + trigger_error("PEAR_Frontend_CLI::displayLine deprecated", E_USER_ERROR); + } + + function _displayLine($text) + { + print "$this->lp$text\n"; + } + + // }}} + // {{{ display(text) + + function display($text) + { + trigger_error("PEAR_Frontend_CLI::display deprecated", E_USER_ERROR); + } + + function _display($text) + { + print $text; + } + + // }}} + // {{{ displayError(eobj) + + /** + * @param object PEAR_Error object + */ + function displayError($eobj) + { + return $this->_displayLine($eobj->getMessage()); + } + + // }}} + // {{{ displayFatalError(eobj) + + /** + * @param object PEAR_Error object + */ + function displayFatalError($eobj) + { + $this->displayError($eobj); + if (class_exists('PEAR_Config')) { + $config = &PEAR_Config::singleton(); + if ($config->get('verbose') > 5) { + if (function_exists('debug_print_backtrace')) { + debug_print_backtrace(); + } elseif (function_exists('debug_backtrace')) { + $trace = debug_backtrace(); + $raised = false; + foreach ($trace as $i => $frame) { + if (!$raised) { + if (isset($frame['class']) && strtolower($frame['class']) == + 'pear' && strtolower($frame['function']) == 'raiseerror') { + $raised = true; + } else { + continue; + } + } + @$this->_displayLine("#$i: $frame[class]$frame[type]$frame[function] $frame[line]"); + } + } + } + } + exit(1); + } + + // }}} + // {{{ displayHeading(title) + + function displayHeading($title) + { + trigger_error("PEAR_Frontend_CLI::displayHeading deprecated", E_USER_ERROR); + } + + function _displayHeading($title) + { + print $this->lp.$this->bold($title)."\n"; + print $this->lp.str_repeat("=", strlen($title))."\n"; + } + + // }}} + + /** + * Instruct the runInstallScript method to skip a paramgroup that matches the + * id value passed in. + * + * This method is useful for dynamically configuring which sections of a post-install script + * will be run based on the user's setup, which is very useful for making flexible + * post-install scripts without losing the cross-Frontend ability to retrieve user input + * @param string + */ + function skipParamgroup($id) + { + $this->_skipSections[$id] = true; + } + + function runPostinstallScripts(&$scripts) + { + foreach ($scripts as $i => $script) { + $this->runInstallScript($scripts[$i]->_params, $scripts[$i]->_obj); + } + } + + /** + * @param array $xml contents of postinstallscript tag + * @param object $script post-installation script + * @param string install|upgrade + */ + function runInstallScript($xml, &$script) + { + $this->_skipSections = array(); + if (!is_array($xml) || !isset($xml['paramgroup'])) { + $script->run(array(), '_default'); + } else { + $completedPhases = array(); + if (!isset($xml['paramgroup'][0])) { + $xml['paramgroup'] = array($xml['paramgroup']); + } + foreach ($xml['paramgroup'] as $group) { + if (isset($this->_skipSections[$group['id']])) { + // the post-install script chose to skip this section dynamically + continue; + } + if (isset($group['name'])) { + $paramname = explode('::', $group['name']); + if ($lastgroup['id'] != $paramname[0]) { + continue; + } + $group['name'] = $paramname[1]; + if (isset($answers)) { + if (isset($answers[$group['name']])) { + switch ($group['conditiontype']) { + case '=' : + if ($answers[$group['name']] != $group['value']) { + continue 2; + } + break; + case '!=' : + if ($answers[$group['name']] == $group['value']) { + continue 2; + } + break; + case 'preg_match' : + if (!@preg_match('/' . $group['value'] . '/', + $answers[$group['name']])) { + continue 2; + } + break; + default : + return; + } + } + } else { + return; + } + } + $lastgroup = $group; + if (isset($group['instructions'])) { + $this->_display($group['instructions']); + } + if (!isset($group['param'][0])) { + $group['param'] = array($group['param']); + } + if (isset($group['param'])) { + if (method_exists($script, 'postProcessPrompts')) { + $prompts = $script->postProcessPrompts($group['param'], $group['id']); + if (!is_array($prompts) || count($prompts) != count($group['param'])) { + $this->outputData('postinstall', 'Error: post-install script did not ' . + 'return proper post-processed prompts'); + $prompts = $group['param']; + } else { + foreach ($prompts as $i => $var) { + if (!is_array($var) || !isset($var['prompt']) || + !isset($var['name']) || + ($var['name'] != $group['param'][$i]['name']) || + ($var['type'] != $group['param'][$i]['type'])) { + $this->outputData('postinstall', 'Error: post-install script ' . + 'modified the variables or prompts, severe security risk. ' . + 'Will instead use the defaults from the package.xml'); + $prompts = $group['param']; + } + } + } + $answers = $this->confirmDialog($prompts); + } else { + $answers = $this->confirmDialog($group['param']); + } + } + if ((isset($answers) && $answers) || !isset($group['param'])) { + if (!isset($answers)) { + $answers = array(); + } + array_unshift($completedPhases, $group['id']); + if (!$script->run($answers, $group['id'])) { + $script->run($completedPhases, '_undoOnError'); + return; + } + } else { + $script->run($completedPhases, '_undoOnError'); + return; + } + } + } + } + + /** + * Ask for user input, confirm the answers and continue until the user is satisfied + * @param array an array of arrays, format array('name' => 'paramname', 'prompt' => + * 'text to display', 'type' => 'string'[, default => 'default value']) + * @return array + */ + function confirmDialog($params) + { + $answers = array(); + $prompts = $types = array(); + foreach ($params as $param) { + $prompts[$param['name']] = $param['prompt']; + $types[$param['name']] = $param['type']; + if (isset($param['default'])) { + $answers[$param['name']] = $param['default']; + } else { + $answers[$param['name']] = ''; + } + } + do { + $ok = array('yesno' => 'no'); + do { + $answers = $this->userDialog('', $prompts, $types, $answers); + } while (count(array_filter($answers)) != count($prompts)); + $this->outputData('Your choices:'); + foreach ($prompts as $name => $prompt) { + $this->outputData($prompt . ': ' . $answers[$name]); + } + $ok = $this->userDialog('', + array( + 'yesno' => 'These Choices OK? (use "abort" to halt)' + ), + array( + 'yesno' => 'string', + ), + array( + 'yesno' => 'yes' + ) + ); + if ($ok['yesno'] == 'abort') { + return false; + } + } while ($ok['yesno'] != 'yes'); + return $answers; + } + // {{{ userDialog(prompt, [type], [default]) + + function userDialog($command, $prompts, $types = array(), $defaults = array()) + { + $result = array(); + if (is_array($prompts)) { + // php 5.0.0 inexplicably breaks BC with this behavior + // now reading from STDIN is the intended syntax + if (version_compare(phpversion(), '5.0.0', '<')) { + $fp = fopen("php://stdin", "r"); + } + foreach ($prompts as $key => $prompt) { + $type = $types[$key]; + $default = @$defaults[$key]; + if ($type == 'password') { + system('stty -echo'); + } + print "$this->lp$prompt "; + if ($default) { + print "[$default] "; + } + print ": "; + if (version_compare(phpversion(), '5.0.0', '<')) { + $line = fgets($fp, 2048); + } else { + if (!defined('STDIN')) { + define('STDIN', fopen('php://stdin', 'r')); + } + $line = fgets(STDIN, 2048); + } + if ($type == 'password') { + system('stty echo'); + print "\n"; + } + if ($default && trim($line) == "") { + $result[$key] = $default; + } else { + $result[$key] = trim($line); + } + } + if (version_compare(phpversion(), '5.0.0', '<')) { + fclose($fp); + } + } + return $result; + } + + // }}} + // {{{ userConfirm(prompt, [default]) + + function userConfirm($prompt, $default = 'yes') + { + trigger_error("PEAR_Frontend_CLI::userConfirm not yet converted", E_USER_ERROR); + static $positives = array('y', 'yes', 'on', '1'); + static $negatives = array('n', 'no', 'off', '0'); + print "$this->lp$prompt [$default] : "; + $fp = fopen("php://stdin", "r"); + $line = fgets($fp, 2048); + fclose($fp); + $answer = strtolower(trim($line)); + if (empty($answer)) { + $answer = $default; + } + if (in_array($answer, $positives)) { + return true; + } + if (in_array($answer, $negatives)) { + return false; + } + if (in_array($default, $positives)) { + return true; + } + return false; + } + + // }}} + // {{{ startTable([params]) + + function startTable($params = array()) + { + trigger_error("PEAR_Frontend_CLI::startTable deprecated", E_USER_ERROR); + } + + function _startTable($params = array()) + { + $params['table_data'] = array(); + $params['widest'] = array(); // indexed by column + $params['highest'] = array(); // indexed by row + $params['ncols'] = 0; + $this->params = $params; + } + + // }}} + // {{{ tableRow(columns, [rowparams], [colparams]) + + function tableRow($columns, $rowparams = array(), $colparams = array()) + { + trigger_error("PEAR_Frontend_CLI::tableRow deprecated", E_USER_ERROR); + } + + function _tableRow($columns, $rowparams = array(), $colparams = array()) + { + $highest = 1; + for ($i = 0; $i < sizeof($columns); $i++) { + $col = &$columns[$i]; + if (isset($colparams[$i]) && !empty($colparams[$i]['wrap'])) { + $col = wordwrap($col, $colparams[$i]['wrap'], "\n", 0); + } + if (strpos($col, "\n") !== false) { + $multiline = explode("\n", $col); + $w = 0; + foreach ($multiline as $n => $line) { + if (strlen($line) > $w) { + $w = strlen($line); + } + } + $lines = sizeof($multiline); + } else { + $w = strlen($col); + } + + if (isset($this->params['widest'][$i])) { + if ($w > $this->params['widest'][$i]) { + $this->params['widest'][$i] = $w; + } + } else { + $this->params['widest'][$i] = $w; + } + $tmp = count_chars($columns[$i], 1); + // handle unix, mac and windows formats + $lines = (isset($tmp[10]) ? $tmp[10] : (isset($tmp[13]) ? $tmp[13] : 0)) + 1; + if ($lines > $highest) { + $highest = $lines; + } + } + if (sizeof($columns) > $this->params['ncols']) { + $this->params['ncols'] = sizeof($columns); + } + $new_row = array( + 'data' => $columns, + 'height' => $highest, + 'rowparams' => $rowparams, + 'colparams' => $colparams, + ); + $this->params['table_data'][] = $new_row; + } + + // }}} + // {{{ endTable() + + function endTable() + { + trigger_error("PEAR_Frontend_CLI::endTable deprecated", E_USER_ERROR); + } + + function _endTable() + { + extract($this->params); + if (!empty($caption)) { + $this->_displayHeading($caption); + } + if (count($table_data) == 0) { + return; + } + if (!isset($width)) { + $width = $widest; + } else { + for ($i = 0; $i < $ncols; $i++) { + if (!isset($width[$i])) { + $width[$i] = $widest[$i]; + } + } + } + $border = false; + if (empty($border)) { + $cellstart = ''; + $cellend = ' '; + $rowend = ''; + $padrowend = false; + $borderline = ''; + } else { + $cellstart = '| '; + $cellend = ' '; + $rowend = '|'; + $padrowend = true; + $borderline = '+'; + foreach ($width as $w) { + $borderline .= str_repeat('-', $w + strlen($cellstart) + strlen($cellend) - 1); + $borderline .= '+'; + } + } + if ($borderline) { + $this->_displayLine($borderline); + } + for ($i = 0; $i < sizeof($table_data); $i++) { + extract($table_data[$i]); + if (!is_array($rowparams)) { + $rowparams = array(); + } + if (!is_array($colparams)) { + $colparams = array(); + } + $rowlines = array(); + if ($height > 1) { + for ($c = 0; $c < sizeof($data); $c++) { + $rowlines[$c] = preg_split('/(\r?\n|\r)/', $data[$c]); + if (sizeof($rowlines[$c]) < $height) { + $rowlines[$c] = array_pad($rowlines[$c], $height, ''); + } + } + } else { + for ($c = 0; $c < sizeof($data); $c++) { + $rowlines[$c] = array($data[$c]); + } + } + for ($r = 0; $r < $height; $r++) { + $rowtext = ''; + for ($c = 0; $c < sizeof($data); $c++) { + if (isset($colparams[$c])) { + $attribs = array_merge($rowparams, $colparams); + } else { + $attribs = $rowparams; + } + $w = isset($width[$c]) ? $width[$c] : 0; + //$cell = $data[$c]; + $cell = $rowlines[$c][$r]; + $l = strlen($cell); + if ($l > $w) { + $cell = substr($cell, 0, $w); + } + if (isset($attribs['bold'])) { + $cell = $this->bold($cell); + } + if ($l < $w) { + // not using str_pad here because we may + // add bold escape characters to $cell + $cell .= str_repeat(' ', $w - $l); + } + + $rowtext .= $cellstart . $cell . $cellend; + } + if (!$border) { + $rowtext = rtrim($rowtext); + } + $rowtext .= $rowend; + $this->_displayLine($rowtext); + } + } + if ($borderline) { + $this->_displayLine($borderline); + } + } + + // }}} + // {{{ outputData() + + function outputData($data, $command = '_default') + { + switch ($command) { + case 'channel-info': + foreach ($data as $type => $section) { + if ($type == 'main') { + $section['data'] = array_values($section['data']); + } + $this->outputData($section); + } + break; + case 'install': + case 'upgrade': + case 'upgrade-all': + if (isset($data['release_warnings'])) { + $this->_displayLine(''); + $this->_startTable(array( + 'border' => false, + 'caption' => 'Release Warnings' + )); + $this->_tableRow(array($data['release_warnings']), null, array(1 => array('wrap' => 55))); + $this->_endTable(); + $this->_displayLine(''); + } + $this->_displayLine($data['data']); + break; + case 'search': + $this->_startTable($data); + if (isset($data['headline']) && is_array($data['headline'])) { + $this->_tableRow($data['headline'], array('bold' => true), array(1 => array('wrap' => 55))); + } + + foreach($data['data'] as $category) { + foreach($category as $pkg) { + $this->_tableRow($pkg, null, array(1 => array('wrap' => 55))); + } + }; + $this->_endTable(); + break; + case 'list-all': + $this->_startTable($data); + if (isset($data['headline']) && is_array($data['headline'])) { + $this->_tableRow($data['headline'], array('bold' => true), array(1 => array('wrap' => 55))); + } + + foreach($data['data'] as $category) { + foreach($category as $pkg) { + unset($pkg[4]); + unset($pkg[5]); + $this->_tableRow($pkg, null, array(1 => array('wrap' => 55))); + } + }; + $this->_endTable(); + break; + case 'config-show': + $data['border'] = false; + $opts = array(0 => array('wrap' => 30), + 1 => array('wrap' => 20), + 2 => array('wrap' => 35)); + $this->_startTable($data); + if (isset($data['headline']) && is_array($data['headline'])) { + $this->_tableRow($data['headline'], + array('bold' => true), + $opts); + } + foreach($data['data'] as $group) { + foreach($group as $value) { + if ($value[2] == '') { + $value[2] = ""; + } + $this->_tableRow($value, null, $opts); + } + } + $this->_endTable(); + break; + case 'remote-info': + $data = array( + 'caption' => 'Package details:', + 'border' => false, + 'data' => array( + array("Latest", $data['stable']), + array("Installed", $data['installed']), + array("Package", $data['name']), + array("License", $data['license']), + array("Category", $data['category']), + array("Summary", $data['summary']), + array("Description", $data['description']), + ), + ); + default: { + if (is_array($data)) { + $this->_startTable($data); + $count = count($data['data'][0]); + if ($count == 2) { + $opts = array(0 => array('wrap' => 25), + 1 => array('wrap' => 48) + ); + } elseif ($count == 3) { + $opts = array(0 => array('wrap' => 30), + 1 => array('wrap' => 20), + 2 => array('wrap' => 35) + ); + } else { + $opts = null; + } + if (isset($data['headline']) && is_array($data['headline'])) { + $this->_tableRow($data['headline'], + array('bold' => true), + $opts); + } + foreach($data['data'] as $row) { + $this->_tableRow($row, null, $opts); + } + $this->_endTable(); + } else { + $this->_displayLine($data); + } + } + } + } + + // }}} + // {{{ log(text) + + + function log($text, $append_crlf = true) + { + if ($append_crlf) { + return $this->_displayLine($text); + } + return $this->_display($text); + } + + + // }}} + // {{{ bold($text) + + function bold($text) + { + if (empty($this->term['bold'])) { + return strtoupper($text); + } + return $this->term['bold'] . $text . $this->term['normal']; + } + + // }}} +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Installer.php b/campcaster/src/tools/pear/src/PEAR/Installer.php new file mode 100644 index 000000000..bdb591603 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer.php @@ -0,0 +1,1592 @@ + + * @author Tomas V.V. Cox + * @author Martin Jansen + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Installer.php,v 1.228.2.1 2006/03/05 20:07:52 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * Used for installation groups in package.xml 2.0 and platform exceptions + */ +require_once 'OS/Guess.php'; +require_once 'PEAR/Downloader.php'; + +define('PEAR_INSTALLER_NOBINARY', -240); +/** + * Administration class used to install PEAR packages and maintain the + * installed package database. + * + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Tomas V.V. Cox + * @author Martin Jansen + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Installer extends PEAR_Downloader +{ + // {{{ properties + + /** name of the package directory, for example Foo-1.0 + * @var string + */ + var $pkgdir; + + /** directory where PHP code files go + * @var string + */ + var $phpdir; + + /** directory where PHP extension files go + * @var string + */ + var $extdir; + + /** directory where documentation goes + * @var string + */ + var $docdir; + + /** installation root directory (ala PHP's INSTALL_ROOT or + * automake's DESTDIR + * @var string + */ + var $installroot = ''; + + /** debug level + * @var int + */ + var $debug = 1; + + /** temporary directory + * @var string + */ + var $tmpdir; + + /** + * PEAR_Registry object used by the installer + * @var PEAR_Registry + */ + var $registry; + + /** + * array of PEAR_Downloader_Packages + * @var array + */ + var $_downloadedPackages; + + /** List of file transactions queued for an install/upgrade/uninstall. + * + * Format: + * array( + * 0 => array("rename => array("from-file", "to-file")), + * 1 => array("delete" => array("file-to-delete")), + * ... + * ) + * + * @var array + */ + var $file_operations = array(); + + // }}} + + // {{{ constructor + + /** + * PEAR_Installer constructor. + * + * @param object $ui user interface object (instance of PEAR_Frontend_*) + * + * @access public + */ + function PEAR_Installer(&$ui) + { + parent::PEAR_Common(); + $this->setFrontendObject($ui); + $this->debug = $this->config->get('verbose'); + } + + function setOptions($options) + { + $this->_options = $options; + } + + function setConfig(&$config) + { + $this->config = &$config; + $this->_registry = &$config->getRegistry(); + } + + // }}} + + function _removeBackups($files) + { + foreach ($files as $path) { + $this->addFileOperation('removebackup', array($path)); + } + } + + // {{{ _deletePackageFiles() + + /** + * Delete a package's installed files, does not remove empty directories. + * + * @param string package name + * @param string channel name + * @param bool if true, then files are backed up first + * @return bool TRUE on success, or a PEAR error on failure + * @access protected + */ + function _deletePackageFiles($package, $channel = false, $backup = false) + { + if (!$channel) { + $channel = 'pear.php.net'; + } + if (!strlen($package)) { + return $this->raiseError("No package to uninstall given"); + } + if (strtolower($package) == 'pear' && $channel == 'pear.php.net') { + // to avoid race conditions, include all possible needed files + require_once 'PEAR/Task/Common.php'; + require_once 'PEAR/Task/Replace.php'; + require_once 'PEAR/Task/Unixeol.php'; + require_once 'PEAR/Task/Windowseol.php'; + require_once 'PEAR/PackageFile/v1.php'; + require_once 'PEAR/PackageFile/v2.php'; + require_once 'PEAR/PackageFile/Generator/v1.php'; + require_once 'PEAR/PackageFile/Generator/v2.php'; + } + $filelist = $this->_registry->packageInfo($package, 'filelist', $channel); + if ($filelist == null) { + return $this->raiseError("$channel/$package not installed"); + } + $ret = array(); + foreach ($filelist as $file => $props) { + if (empty($props['installed_as'])) { + continue; + } + $path = $props['installed_as']; + if ($backup) { + $this->addFileOperation('backup', array($path)); + $ret[] = $path; + } + $this->addFileOperation('delete', array($path)); + } + if ($backup) { + return $ret; + } + return true; + } + + // }}} + // {{{ _installFile() + + /** + * @param string filename + * @param array attributes from tag in package.xml + * @param string path to install the file in + * @param array options from command-line + * @access private + */ + function _installFile($file, $atts, $tmp_path, $options) + { + // {{{ return if this file is meant for another platform + static $os; + if (!isset($this->_registry)) { + $this->_registry = &$this->config->getRegistry(); + } + if (isset($atts['platform'])) { + if (empty($os)) { + $os = new OS_Guess(); + } + if (strlen($atts['platform']) && $atts['platform']{0} == '!') { + $negate = true; + $platform = substr($atts['platform'], 1); + } else { + $negate = false; + $platform = $atts['platform']; + } + if ((bool) $os->matchSignature($platform) === $negate) { + $this->log(3, "skipped $file (meant for $atts[platform], we are ".$os->getSignature().")"); + return PEAR_INSTALLER_SKIPPED; + } + } + // }}} + + $channel = $this->pkginfo->getChannel(); + // {{{ assemble the destination paths + switch ($atts['role']) { + case 'doc': + case 'data': + case 'test': + $dest_dir = $this->config->get($atts['role'] . '_dir', null, $channel) . + DIRECTORY_SEPARATOR . $this->pkginfo->getPackage(); + unset($atts['baseinstalldir']); + break; + case 'ext': + case 'php': + $dest_dir = $this->config->get($atts['role'] . '_dir', null, $channel); + break; + case 'script': + $dest_dir = $this->config->get('bin_dir', null, $channel); + break; + case 'src': + case 'extsrc': + $this->source_files++; + return; + default: + return $this->raiseError("Invalid role `$atts[role]' for file $file"); + } + $save_destdir = $dest_dir; + if (!empty($atts['baseinstalldir'])) { + $dest_dir .= DIRECTORY_SEPARATOR . $atts['baseinstalldir']; + } + if (dirname($file) != '.' && empty($atts['install-as'])) { + $dest_dir .= DIRECTORY_SEPARATOR . dirname($file); + } + if (empty($atts['install-as'])) { + $dest_file = $dest_dir . DIRECTORY_SEPARATOR . basename($file); + } else { + $dest_file = $dest_dir . DIRECTORY_SEPARATOR . $atts['install-as']; + } + $orig_file = $tmp_path . DIRECTORY_SEPARATOR . $file; + + // Clean up the DIRECTORY_SEPARATOR mess + $ds2 = DIRECTORY_SEPARATOR . DIRECTORY_SEPARATOR; + list($dest_file, $orig_file) = preg_replace(array('!\\\\+!', '!/!', "!$ds2+!"), + array(DIRECTORY_SEPARATOR, + DIRECTORY_SEPARATOR, + DIRECTORY_SEPARATOR), + array($dest_file, $orig_file)); + $final_dest_file = $installed_as = $dest_file; + if (isset($this->_options['packagingroot'])) { + $installedas_dest_dir = dirname($final_dest_file); + $installedas_dest_file = $dest_dir . DIRECTORY_SEPARATOR . '.tmp' . basename($final_dest_file); + $final_dest_file = $this->_prependPath($final_dest_file, + $this->_options['packagingroot']); + } else { + $installedas_dest_dir = dirname($final_dest_file); + $installedas_dest_file = $installedas_dest_dir . DIRECTORY_SEPARATOR . '.tmp' . basename($final_dest_file); + } + $dest_dir = dirname($final_dest_file); + $dest_file = $dest_dir . DIRECTORY_SEPARATOR . '.tmp' . basename($final_dest_file); + // }}} + + if (empty($this->_options['register-only']) && !@is_dir($dest_dir)) { + if (!$this->mkDirHier($dest_dir)) { + return $this->raiseError("failed to mkdir $dest_dir", + PEAR_INSTALLER_FAILED); + } + $this->log(3, "+ mkdir $dest_dir"); + } + // pretty much nothing happens if we are only registering the install + if (empty($this->_options['register-only'])) { + if (empty($atts['replacements'])) { + if (!file_exists($orig_file)) { + return $this->raiseError("file $orig_file does not exist", + PEAR_INSTALLER_FAILED); + } + if (!@copy($orig_file, $dest_file)) { + return $this->raiseError("failed to write $dest_file", + PEAR_INSTALLER_FAILED); + } + $this->log(3, "+ cp $orig_file $dest_file"); + if (isset($atts['md5sum'])) { + $md5sum = md5_file($dest_file); + } + } else { + // {{{ file with replacements + if (!file_exists($orig_file)) { + return $this->raiseError("file does not exist", + PEAR_INSTALLER_FAILED); + } + if (function_exists('file_get_contents')) { + $contents = file_get_contents($orig_file); + } else { + $fp = fopen($orig_file, "r"); + $contents = @fread($fp, filesize($orig_file)); + fclose($fp); + } + if ($contents === false) { + $contents = ''; + } + if (isset($atts['md5sum'])) { + $md5sum = md5($contents); + } + $subst_from = $subst_to = array(); + foreach ($atts['replacements'] as $a) { + $to = ''; + if ($a['type'] == 'php-const') { + if (preg_match('/^[a-z0-9_]+$/i', $a['to'])) { + eval("\$to = $a[to];"); + } else { + if (!isset($options['soft'])) { + $this->log(0, "invalid php-const replacement: $a[to]"); + } + continue; + } + } elseif ($a['type'] == 'pear-config') { + if ($a['to'] == 'master_server') { + $chan = $this->_registry->getChannel($channel); + if (!PEAR::isError($chan)) { + $to = $chan->getServer(); + } else { + $to = $this->config->get($a['to'], null, $channel); + } + } else { + $to = $this->config->get($a['to'], null, $channel); + } + if (is_null($to)) { + if (!isset($options['soft'])) { + $this->log(0, "invalid pear-config replacement: $a[to]"); + } + continue; + } + } elseif ($a['type'] == 'package-info') { + if ($t = $this->pkginfo->packageInfo($a['to'])) { + $to = $t; + } else { + if (!isset($options['soft'])) { + $this->log(0, "invalid package-info replacement: $a[to]"); + } + continue; + } + } + if (!is_null($to)) { + $subst_from[] = $a['from']; + $subst_to[] = $to; + } + } + $this->log(3, "doing ".sizeof($subst_from)." substitution(s) for $final_dest_file"); + if (sizeof($subst_from)) { + $contents = str_replace($subst_from, $subst_to, $contents); + } + $wp = @fopen($dest_file, "wb"); + if (!is_resource($wp)) { + return $this->raiseError("failed to create $dest_file: $php_errormsg", + PEAR_INSTALLER_FAILED); + } + if (fwrite($wp, $contents) === false) { + return $this->raiseError("failed writing to $dest_file: $php_errormsg", + PEAR_INSTALLER_FAILED); + } + fclose($wp); + // }}} + } + // {{{ check the md5 + if (isset($md5sum)) { + if (strtolower($md5sum) == strtolower($atts['md5sum'])) { + $this->log(2, "md5sum ok: $final_dest_file"); + } else { + if (empty($options['force'])) { + // delete the file + @unlink($dest_file); + if (!isset($options['ignore-errors'])) { + return $this->raiseError("bad md5sum for file $final_dest_file", + PEAR_INSTALLER_FAILED); + } else { + if (!isset($options['soft'])) { + $this->log(0, "warning : bad md5sum for file $final_dest_file"); + } + } + } else { + if (!isset($options['soft'])) { + $this->log(0, "warning : bad md5sum for file $final_dest_file"); + } + } + } + } + // }}} + // {{{ set file permissions + if (!OS_WINDOWS) { + if ($atts['role'] == 'script') { + $mode = 0777 & ~(int)octdec($this->config->get('umask')); + $this->log(3, "+ chmod +x $dest_file"); + } else { + $mode = 0666 & ~(int)octdec($this->config->get('umask')); + } + $this->addFileOperation("chmod", array($mode, $dest_file)); + if (!@chmod($dest_file, $mode)) { + if (!isset($options['soft'])) { + $this->log(0, "failed to change mode of $dest_file"); + } + } + } + // }}} + $this->addFileOperation("rename", array($dest_file, $final_dest_file, + $atts['role'] == 'ext')); + } + // Store the full path where the file was installed for easy unistall + $this->addFileOperation("installed_as", array($file, $installed_as, + $save_destdir, dirname(substr($installedas_dest_file, strlen($save_destdir))))); + + //$this->log(2, "installed: $dest_file"); + return PEAR_INSTALLER_OK; + } + + // }}} + // {{{ _installFile2() + + /** + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @param string filename + * @param array attributes from tag in package.xml + * @param string path to install the file in + * @param array options from command-line + * @access private + */ + function _installFile2(&$pkg, $file, $atts, $tmp_path, $options) + { + if (!isset($this->_registry)) { + $this->_registry = &$this->config->getRegistry(); + } + + $channel = $pkg->getChannel(); + // {{{ assemble the destination paths + if (!in_array($atts['attribs']['role'], + PEAR_Installer_Role::getValidRoles($pkg->getPackageType()))) { + return $this->raiseError('Invalid role `' . $atts['attribs']['role'] . + "' for file $file"); + } + $role = &PEAR_Installer_Role::factory($pkg, $atts['attribs']['role'], $this->config); + $err = $role->setup($this, $pkg, $atts['attribs'], $file); + if (PEAR::isError($err)) { + return $err; + } + if (!$role->isInstallable()) { + return; + } + $info = $role->processInstallation($pkg, $atts['attribs'], $file, $tmp_path); + if (PEAR::isError($info)) { + return $info; + } else { + list($save_destdir, $dest_dir, $dest_file, $orig_file) = $info; + } + $final_dest_file = $installed_as = $dest_file; + if (isset($this->_options['packagingroot'])) { + $final_dest_file = $this->_prependPath($final_dest_file, + $this->_options['packagingroot']); + } + $dest_dir = dirname($final_dest_file); + $dest_file = $dest_dir . DIRECTORY_SEPARATOR . '.tmp' . basename($final_dest_file); + // }}} + + if (empty($this->_options['register-only'])) { + if (!@is_dir($dest_dir)) { + if (!$this->mkDirHier($dest_dir)) { + return $this->raiseError("failed to mkdir $dest_dir", + PEAR_INSTALLER_FAILED); + } + $this->log(3, "+ mkdir $dest_dir"); + } + } + $attribs = $atts['attribs']; + unset($atts['attribs']); + // pretty much nothing happens if we are only registering the install + if (empty($this->_options['register-only'])) { + if (!count($atts)) { // no tasks + if (!file_exists($orig_file)) { + return $this->raiseError("file $orig_file does not exist", + PEAR_INSTALLER_FAILED); + } + if (!@copy($orig_file, $dest_file)) { + return $this->raiseError("failed to write $dest_file", + PEAR_INSTALLER_FAILED); + } + $this->log(3, "+ cp $orig_file $dest_file"); + if (isset($attribs['md5sum'])) { + $md5sum = md5_file($dest_file); + } + } else { // file with tasks + if (!file_exists($orig_file)) { + return $this->raiseError("file $orig_file does not exist", + PEAR_INSTALLER_FAILED); + } + if (function_exists('file_get_contents')) { + $contents = file_get_contents($orig_file); + } else { + $fp = fopen($orig_file, "r"); + $contents = @fread($fp, filesize($orig_file)); // filesize can be 0 + fclose($fp); + } + if ($contents === false) { + $contents = ''; + } + if (isset($attribs['md5sum'])) { + $md5sum = md5($contents); + } + foreach ($atts as $tag => $raw) { + $tag = str_replace($pkg->getTasksNs() . ':', '', $tag); + $task = "PEAR_Task_$tag"; + $task = &new $task($this->config, $this, PEAR_TASK_INSTALL); + if (!$task->isScript()) { // scripts are only handled after installation + $task->init($raw, $attribs, $pkg->getLastInstalledVersion()); + $res = $task->startSession($pkg, $contents, $final_dest_file); + if ($res === false) { + continue; // skip this file + } + if (PEAR::isError($res)) { + return $res; + } + $contents = $res; // save changes + } + $wp = @fopen($dest_file, "wb"); + if (!is_resource($wp)) { + return $this->raiseError("failed to create $dest_file: $php_errormsg", + PEAR_INSTALLER_FAILED); + } + if (fwrite($wp, $contents) === false) { + return $this->raiseError("failed writing to $dest_file: $php_errormsg", + PEAR_INSTALLER_FAILED); + } + fclose($wp); + } + } + // {{{ check the md5 + if (isset($md5sum)) { + if (strtolower($md5sum) == strtolower($attribs['md5sum'])) { + $this->log(2, "md5sum ok: $final_dest_file"); + } else { + if (empty($options['force'])) { + // delete the file + @unlink($dest_file); + if (!isset($options['ignore-errors'])) { + return $this->raiseError("bad md5sum for file $final_dest_file", + PEAR_INSTALLER_FAILED); + } else { + if (!isset($options['soft'])) { + $this->log(0, "warning : bad md5sum for file $final_dest_file"); + } + } + } else { + if (!isset($options['soft'])) { + $this->log(0, "warning : bad md5sum for file $final_dest_file"); + } + } + } + } + // }}} + // {{{ set file permissions + if (!OS_WINDOWS) { + if ($role->isExecutable()) { + $mode = 0777 & ~(int)octdec($this->config->get('umask')); + $this->log(3, "+ chmod +x $dest_file"); + } else { + $mode = 0666 & ~(int)octdec($this->config->get('umask')); + } + $this->addFileOperation("chmod", array($mode, $dest_file)); + if (!@chmod($dest_file, $mode)) { + if (!isset($options['soft'])) { + $this->log(0, "failed to change mode of $dest_file"); + } + } + } + // }}} + $this->addFileOperation("rename", array($dest_file, $final_dest_file, $role->isExtension())); + } + // Store the full path where the file was installed for easy uninstall + $this->addFileOperation("installed_as", array($file, $installed_as, + $save_destdir, dirname(substr($dest_file, strlen($save_destdir))))); + + //$this->log(2, "installed: $dest_file"); + return PEAR_INSTALLER_OK; + } + + // }}} + // {{{ addFileOperation() + + /** + * Add a file operation to the current file transaction. + * + * @see startFileTransaction() + * @param string $type This can be one of: + * - rename: rename a file ($data has 3 values) + * - backup: backup an existing file ($data has 1 value) + * - removebackup: clean up backups created during install ($data has 1 value) + * - chmod: change permissions on a file ($data has 2 values) + * - delete: delete a file ($data has 1 value) + * - rmdir: delete a directory if empty ($data has 1 value) + * - installed_as: mark a file as installed ($data has 4 values). + * @param array $data For all file operations, this array must contain the + * full path to the file or directory that is being operated on. For + * the rename command, the first parameter must be the file to rename, + * the second its new name, the third whether this is a PHP extension. + * + * The installed_as operation contains 4 elements in this order: + * 1. Filename as listed in the filelist element from package.xml + * 2. Full path to the installed file + * 3. Full path from the php_dir configuration variable used in this + * installation + * 4. Relative path from the php_dir that this file is installed in + */ + function addFileOperation($type, $data) + { + if (!is_array($data)) { + return $this->raiseError('Internal Error: $data in addFileOperation' + . ' must be an array, was ' . gettype($data)); + } + if ($type == 'chmod') { + $octmode = decoct($data[0]); + $this->log(3, "adding to transaction: $type $octmode $data[1]"); + } else { + $this->log(3, "adding to transaction: $type " . implode(" ", $data)); + } + $this->file_operations[] = array($type, $data); + } + + // }}} + // {{{ startFileTransaction() + + function startFileTransaction($rollback_in_case = false) + { + if (count($this->file_operations) && $rollback_in_case) { + $this->rollbackFileTransaction(); + } + $this->file_operations = array(); + } + + // }}} + // {{{ commitFileTransaction() + + function commitFileTransaction() + { + $n = count($this->file_operations); + $this->log(2, "about to commit $n file operations"); + // {{{ first, check permissions and such manually + $errors = array(); + foreach ($this->file_operations as $tr) { + list($type, $data) = $tr; + switch ($type) { + case 'rename': + if (!file_exists($data[0])) { + $errors[] = "cannot rename file $data[0], doesn't exist"; + } + // check that dest dir. is writable + if (!is_writable(dirname($data[1]))) { + $errors[] = "permission denied ($type): $data[1]"; + } + break; + case 'chmod': + // check that file is writable + if (!is_writable($data[1])) { + $errors[] = "permission denied ($type): $data[1] " . decoct($data[0]); + } + break; + case 'delete': + if (!file_exists($data[0])) { + $this->log(2, "warning: file $data[0] doesn't exist, can't be deleted"); + } + // check that directory is writable + if (file_exists($data[0])) { + if (!is_writable(dirname($data[0]))) { + $errors[] = "permission denied ($type): $data[0]"; + } else { + // make sure the file to be deleted can be opened for writing + $fp = false; + if (!is_dir($data[0]) && !($fp = @fopen($data[0], 'a'))) { + $errors[] = "permission denied ($type): $data[0]"; + } elseif ($fp) { + fclose($fp); + } + } + } + break; + } + + } + // }}} + $m = sizeof($errors); + if ($m > 0) { + foreach ($errors as $error) { + if (!isset($this->_options['soft'])) { + $this->log(1, $error); + } + } + if (!isset($this->_options['ignore-errors'])) { + return false; + } + } + $this->_dirtree = array(); + // {{{ really commit the transaction + foreach ($this->file_operations as $tr) { + list($type, $data) = $tr; + switch ($type) { + case 'backup': + @copy($data[0], $data[0] . '.bak'); + $this->log(3, "+ backup $data[0] to $data[0].bak"); + break; + case 'removebackup': + @unlink($data[0] . '.bak'); + $this->log(3, "+ rm backup of $data[0] ($data[0].bak)"); + break; + case 'rename': + $test = @unlink($data[1]); + if (!$test && file_exists($data[1])) { + if ($data[2]) { + $extra = ', this extension must be installed manually. Rename to "' . + basename($data[1]) . '"'; + } else { + $extra = ''; + } + if (!isset($this->_options['soft'])) { + $this->log(1, 'Could not delete ' . $data[1] . ', cannot rename ' . + $data[0] . $extra); + } + if (!isset($this->_options['ignore-errors'])) { + return false; + } + } + @rename($data[0], $data[1]); + $this->log(3, "+ mv $data[0] $data[1]"); + break; + case 'chmod': + @chmod($data[1], $data[0]); + $octmode = decoct($data[0]); + $this->log(3, "+ chmod $octmode $data[1]"); + break; + case 'delete': + @unlink($data[0]); + $this->log(3, "+ rm $data[0]"); + break; + case 'rmdir': + @rmdir($data[0]); + $this->log(3, "+ rmdir $data[0]"); + break; + case 'installed_as': + $this->pkginfo->setInstalledAs($data[0], $data[1]); + if (!isset($this->_dirtree[dirname($data[1])])) { + $this->_dirtree[dirname($data[1])] = true; + $this->pkginfo->setDirtree(dirname($data[1])); + + while(!empty($data[3]) && $data[3] != '/' && $data[3] != '\\' + && $data[3] != '.') { + $this->pkginfo->setDirtree($pp = + $this->_prependPath($data[3], $data[2])); + $this->_dirtree[$pp] = true; + $data[3] = dirname($data[3]); + } + } + break; + } + } + // }}} + $this->log(2, "successfully committed $n file operations"); + $this->file_operations = array(); + return true; + } + + // }}} + // {{{ rollbackFileTransaction() + + function rollbackFileTransaction() + { + $n = count($this->file_operations); + $this->log(2, "rolling back $n file operations"); + foreach ($this->file_operations as $tr) { + list($type, $data) = $tr; + switch ($type) { + case 'backup': + if (file_exists($data[0] . '.bak')) { + @unlink($data[0]); + @copy($data[0] . '.bak', $data[0]); + $this->log(3, "+ restore $data[0] from $data[0].bak"); + } + break; + case 'rename': + @unlink($data[0]); + $this->log(3, "+ rm $data[0]"); + break; + case 'mkdir': + @rmdir($data[0]); + $this->log(3, "+ rmdir $data[0]"); + break; + case 'chmod': + break; + case 'delete': + break; + case 'installed_as': + $this->pkginfo->setInstalledAs($data[0], false); + break; + } + } + $this->pkginfo->resetDirtree(); + $this->file_operations = array(); + } + + // }}} + // {{{ mkDirHier($dir) + + function mkDirHier($dir) + { + $this->addFileOperation('mkdir', array($dir)); + return parent::mkDirHier($dir); + } + + // }}} + // {{{ download() + + /** + * Download any files and their dependencies, if necessary + * + * @param array a mixed list of package names, local files, or package.xml + * @param PEAR_Config + * @param array options from the command line + * @param array this is the array that will be populated with packages to + * install. Format of each entry: + * + * + * array('pkg' => 'package_name', 'file' => '/path/to/local/file', + * 'info' => array() // parsed package.xml + * ); + * + * @param array this will be populated with any error messages + * @param false private recursion variable + * @param false private recursion variable + * @param false private recursion variable + * @deprecated in favor of PEAR_Downloader + */ + function download($packages, $options, &$config, &$installpackages, + &$errors, $installed = false, $willinstall = false, $state = false) + { + // trickiness: initialize here + parent::PEAR_Downloader($this->ui, $options, $config); + $ret = parent::download($packages); + $errors = $this->getErrorMsgs(); + $installpackages = $this->getDownloadedPackages(); + trigger_error("PEAR Warning: PEAR_Installer::download() is deprecated " . + "in favor of PEAR_Downloader class", E_USER_WARNING); + return $ret; + } + + // }}} + // {{{ _parsePackageXml() + + function _parsePackageXml(&$descfile, &$tmpdir) + { + if (substr($descfile, -4) == '.xml') { + $tmpdir = false; + } else { + // {{{ Decompress pack in tmp dir ------------------------------------- + + // To allow relative package file names + $descfile = realpath($descfile); + + if (PEAR::isError($tmpdir = System::mktemp('-d'))) { + return $tmpdir; + } + $this->log(3, '+ tmp dir created at ' . $tmpdir); + // }}} + } + // Parse xml file ----------------------------------------------- + $pkg = new PEAR_PackageFile($this->config, $this->debug, $tmpdir); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $p = &$pkg->fromAnyFile($descfile, PEAR_VALIDATE_INSTALLING); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($p)) { + if (is_array($p->getUserInfo())) { + foreach ($p->getUserInfo() as $err) { + $loglevel = $err['level'] == 'error' ? 0 : 1; + if (!isset($this->_options['soft'])) { + $this->log($loglevel, ucfirst($err['level']) . ': ' . $err['message']); + } + } + } + return $this->raiseError('Installation failed: invalid package file'); + } else { + $descfile = $p->getPackageFile(); + } + return $p; + } + + // }}} + /** + * Set the list of PEAR_Downloader_Package objects to allow more sane + * dependency validation + * @param array + */ + function setDownloadedPackages(&$pkgs) + { + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $err = $this->analyzeDependencies($pkgs); + PEAR::popErrorHandling(); + if (PEAR::isError($err)) { + return $err; + } + $this->_downloadedPackages = &$pkgs; + } + + /** + * Set the list of PEAR_Downloader_Package objects to allow more sane + * dependency validation + * @param array + */ + function setUninstallPackages(&$pkgs) + { + $this->_downloadedPackages = &$pkgs; + } + + function getInstallPackages() + { + return $this->_downloadedPackages; + } + + // {{{ install() + + /** + * Installs the files within the package file specified. + * + * @param string|PEAR_Downloader_Package $pkgfile path to the package file, + * or a pre-initialized packagefile object + * @param array $options + * recognized options: + * - installroot : optional prefix directory for installation + * - force : force installation + * - register-only : update registry but don't install files + * - upgrade : upgrade existing install + * - soft : fail silently + * - nodeps : ignore dependency conflicts/missing dependencies + * - alldeps : install all dependencies + * - onlyreqdeps : install only required dependencies + * + * @return array|PEAR_Error package info if successful + */ + + function install($pkgfile, $options = array()) + { + $this->_options = $options; + $this->_registry = &$this->config->getRegistry(); + if (is_object($pkgfile)) { + $dlpkg = &$pkgfile; + $pkg = $pkgfile->getPackageFile(); + $pkgfile = $pkg->getArchiveFile(); + $descfile = $pkg->getPackageFile(); + $tmpdir = dirname($descfile); + } else { + $descfile = $pkgfile; + $tmpdir = ''; + if (PEAR::isError($pkg = &$this->_parsePackageXml($descfile, $tmpdir))) { + return $pkg; + } + } + + if (realpath($descfile) != realpath($pkgfile)) { + $tar = new Archive_Tar($pkgfile); + if (!@$tar->extract($tmpdir)) { + return $this->raiseError("unable to unpack $pkgfile"); + } + } + + $pkgname = $pkg->getName(); + $channel = $pkg->getChannel(); + if (isset($this->_options['packagingroot'])) { + $packrootphp_dir = $this->_prependPath( + $this->config->get('php_dir', null, $channel), + $this->_options['packagingroot']); + } + + if (isset($options['installroot'])) { + $this->config->setInstallRoot($options['installroot']); + $this->_registry = &$this->config->getRegistry(); + $installregistry = &$this->_registry; + $this->installroot = ''; // all done automagically now + $php_dir = $this->config->get('php_dir', null, $channel); + } else { + $this->config->setInstallRoot(false); + $this->_registry = &$this->config->getRegistry(); + if (isset($this->_options['packagingroot'])) { + $installregistry = &new PEAR_Registry($packrootphp_dir); + $php_dir = $packrootphp_dir; + } else { + $installregistry = &$this->_registry; + $php_dir = $this->config->get('php_dir', null, $channel); + } + $this->installroot = ''; + } + + // {{{ checks to do when not in "force" mode + if (empty($options['force']) && @is_dir($this->config->get('php_dir'))) { + $testp = $channel == 'pear.php.net' ? $pkgname : array($channel, $pkgname); + $instfilelist = $pkg->getInstallationFileList(true); + if (PEAR::isError($instfilelist)) { + return $instfilelist; + } + $test = $installregistry->checkFileMap($instfilelist, $testp, '1.1'); + if (PEAR::isError($test)) { + return $test; + } + if (sizeof($test)) { + $pkgs = $this->getInstallPackages(); + $found = false; + foreach ($pkgs as $param) { + if ($pkg->isSubpackageOf($param)) { + $found = true; + break; + } + } + if ($found) { + // subpackages can conflict with earlier versions of parent packages + $parentreg = $installregistry->packageInfo($param->getPackage(), null, $param->getChannel()); + $tmp = $test; + foreach ($tmp as $file => $info) { + if (is_array($info)) { + if (strtolower($info[1]) == strtolower($param->getPackage()) && + strtolower($info[0]) == strtolower($param->getChannel())) { + unset($test[$file]); + unset($parentreg['filelist'][$file]); + } + } else { + if (strtolower($param->getChannel()) != 'pear.php.net') { + continue; + } + if (strtolower($info) == strtolower($param->getPackage())) { + unset($test[$file]); + unset($parentreg['filelist'][$file]); + } + } + } + $pfk = &new PEAR_PackageFile($this->config); + $parentpkg = &$pfk->fromArray($parentreg); + $installregistry->updatePackage2($parentpkg); + } + if ($param->getChannel() == 'pecl.php.net' && isset($options['upgrade'])) { + $tmp = $test; + foreach ($tmp as $file => $info) { + if (is_string($info)) { + // pear.php.net packages are always stored as strings + if (strtolower($info) == strtolower($param->getPackage())) { + // upgrading existing package + unset($test[$file]); + } + } + } + } + if (sizeof($test)) { + $msg = "$channel/$pkgname: conflicting files found:\n"; + $longest = max(array_map("strlen", array_keys($test))); + $fmt = "%${longest}s (%s)\n"; + foreach ($test as $file => $info) { + if (!is_array($info)) { + $info = array('pear.php.net', $info); + } + $info = $info[0] . '/' . $info[1]; + $msg .= sprintf($fmt, $file, $info); + } + if (!isset($options['ignore-errors'])) { + return $this->raiseError($msg); + } else { + if (!isset($options['soft'])) { + $this->log(0, "WARNING: $msg"); + } + } + } + } + } + // }}} + + $this->startFileTransaction(); + + if (empty($options['upgrade']) && empty($options['soft'])) { + // checks to do only when installing new packages + if ($channel == 'pecl.php.net') { + $test = $installregistry->packageExists($pkgname, $channel); + if (!$test) { + $test = $installregistry->packageExists($pkgname, 'pear.php.net'); + } + } else { + $test = $installregistry->packageExists($pkgname, $channel); + } + if (empty($options['force']) && $test) { + return $this->raiseError("$channel/$pkgname is already installed"); + } + } else { + $usechannel = $channel; + if ($channel == 'pecl.php.net') { + $test = $installregistry->packageExists($pkgname, $channel); + if (!$test) { + $test = $installregistry->packageExists($pkgname, 'pear.php.net'); + $usechannel = 'pear.php.net'; + } + } else { + $test = $installregistry->packageExists($pkgname, $channel); + } + if ($test) { + $v1 = $installregistry->packageInfo($pkgname, 'version', $usechannel); + $v2 = $pkg->getVersion(); + $cmp = version_compare("$v1", "$v2", 'gt'); + if (empty($options['force']) && !version_compare("$v2", "$v1", 'gt')) { + return $this->raiseError("upgrade to a newer version ($v2 is not newer than $v1)"); + } + if (empty($options['register-only'])) { + // when upgrading, remove old release's files first: + if (PEAR::isError($err = $this->_deletePackageFiles($pkgname, $usechannel, + true))) { + if (!isset($options['ignore-errors'])) { + return $this->raiseError($err); + } else { + if (!isset($options['soft'])) { + $this->log(0, 'WARNING: ' . $err->getMessage()); + } + } + } else { + $backedup = $err; + } + } + } + } + + // {{{ Copy files to dest dir --------------------------------------- + + // info from the package it self we want to access from _installFile + $this->pkginfo = &$pkg; + // used to determine whether we should build any C code + $this->source_files = 0; + + $savechannel = $this->config->get('default_channel'); + if (empty($options['register-only']) && !is_dir($php_dir)) { + if (PEAR::isError(System::mkdir(array('-p'), $php_dir))) { + return $this->raiseError("no installation destination directory '$php_dir'\n"); + } + } + + $tmp_path = dirname($descfile); + if (substr($pkgfile, -4) != '.xml') { + $tmp_path .= DIRECTORY_SEPARATOR . $pkgname . '-' . $pkg->getVersion(); + } + + $this->configSet('default_channel', $channel); + // {{{ install files + + if ($pkg->getPackagexmlVersion() == '2.0') { + $filelist = $pkg->getInstallationFilelist(); + } else { + $filelist = $pkg->getFileList(); + } + if (PEAR::isError($filelist)) { + return $filelist; + } + $pkg->resetFilelist(); + $pkg->setLastInstalledVersion($installregistry->packageInfo($pkg->getPackage(), + 'version', $pkg->getChannel())); + foreach ($filelist as $file => $atts) { + if ($pkg->getPackagexmlVersion() == '1.0') { + $this->expectError(PEAR_INSTALLER_FAILED); + $res = $this->_installFile($file, $atts, $tmp_path, $options); + $this->popExpect(); + } else { + $this->expectError(PEAR_INSTALLER_FAILED); + $res = $this->_installFile2($pkg, $file, $atts, $tmp_path, $options); + $this->popExpect(); + } + if (PEAR::isError($res)) { + if (empty($options['ignore-errors'])) { + $this->rollbackFileTransaction(); + if ($res->getMessage() == "file does not exist") { + $this->raiseError("file $file in package.xml does not exist"); + } + return $this->raiseError($res); + } else { + if (!isset($options['soft'])) { + $this->log(0, "Warning: " . $res->getMessage()); + } + } + } + if ($res == PEAR_INSTALLER_OK) { + // Register files that were installed + $pkg->installedFile($file, $atts); + } + } + // }}} + + // {{{ compile and install source files + if ($this->source_files > 0 && empty($options['nobuild'])) { + if (PEAR::isError($err = + $this->_compileSourceFiles($savechannel, $pkg))) { + return $err; + } + } + // }}} + + if (isset($backedup)) { + $this->_removeBackups($backedup); + } + if (!$this->commitFileTransaction()) { + $this->rollbackFileTransaction(); + $this->configSet('default_channel', $savechannel); + return $this->raiseError("commit failed", PEAR_INSTALLER_FAILED); + } + // }}} + + $ret = false; + $installphase = 'install'; + $oldversion = false; + // {{{ Register that the package is installed ----------------------- + if (empty($options['upgrade'])) { + // if 'force' is used, replace the info in registry + $usechannel = $channel; + if ($channel == 'pecl.php.net') { + $test = $installregistry->packageExists($pkgname, $channel); + if (!$test) { + $test = $installregistry->packageExists($pkgname, 'pear.php.net'); + $usechannel = 'pear.php.net'; + } + } else { + $test = $installregistry->packageExists($pkgname, $channel); + } + if (!empty($options['force']) && $test) { + $oldversion = $installregistry->packageInfo($pkgname, 'version', $usechannel); + $installregistry->deletePackage($pkgname, $usechannel); + } + $ret = $installregistry->addPackage2($pkg); + } else { + $usechannel = $channel; + if ($channel == 'pecl.php.net') { + $test = $installregistry->packageExists($pkgname, $channel); + if (!$test) { + $test = $installregistry->packageExists($pkgname, 'pear.php.net'); + $usechannel = 'pear.php.net'; + } + } else { + $test = $installregistry->packageExists($pkgname, $channel); + } + // new: upgrade installs a package if it isn't installed + if (!$test) { + $ret = $installregistry->addPackage2($pkg); + } else { + if ($usechannel != $channel) { + $installregistry->deletePackage($pkgname, $usechannel); + $ret = $installregistry->addPackage2($pkg); + } else { + $ret = $installregistry->updatePackage2($pkg); + } + $installphase = 'upgrade'; + } + } + if (!$ret) { + $this->configSet('default_channel', $savechannel); + return $this->raiseError("Adding package $channel/$pkgname to registry failed"); + } + // }}} + $this->configSet('default_channel', $savechannel); + if (class_exists('PEAR_Task_Common')) { // this is auto-included if any tasks exist + if (PEAR_Task_Common::hasPostinstallTasks()) { + PEAR_Task_Common::runPostinstallTasks($installphase); + } + } + return $pkg->toArray(true); + } + + // }}} + + // {{{ _compileSourceFiles() + /** + * @param string + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + */ + function _compileSourceFiles($savechannel, &$filelist) + { + require_once 'PEAR/Builder.php'; + $this->log(1, "$this->source_files source files, building"); + $bob = &new PEAR_Builder($this->ui); + $bob->debug = $this->debug; + $built = $bob->build($filelist, array(&$this, '_buildCallback')); + if (PEAR::isError($built)) { + $this->rollbackFileTransaction(); + $this->configSet('default_channel', $savechannel); + return $built; + } + $this->log(1, "\nBuild process completed successfully"); + foreach ($built as $ext) { + $bn = basename($ext['file']); + list($_ext_name, $_ext_suff) = explode('.', $bn); + if ($_ext_suff == '.so' || $_ext_suff == '.dll') { + if (extension_loaded($_ext_name)) { + $this->raiseError("Extension '$_ext_name' already loaded. " . + 'Please unload it in your php.ini file ' . + 'prior to install or upgrade'); + } + $role = 'ext'; + } else { + $role = 'src'; + } + $dest = $ext['dest']; + $this->log(1, "Installing '$ext[file]'"); + $packagingroot = ''; + if (isset($this->_options['packagingroot'])) { + $packagingroot = $this->_options['packagingroot']; + } + $copyto = $this->_prependPath($dest, $packagingroot); + $copydir = dirname($copyto); + // pretty much nothing happens if we are only registering the install + if (empty($this->_options['register-only'])) { + if (!@is_dir($copydir)) { + if (!$this->mkDirHier($copydir)) { + return $this->raiseError("failed to mkdir $copydir", + PEAR_INSTALLER_FAILED); + } + $this->log(3, "+ mkdir $copydir"); + } + if (!@copy($ext['file'], $copyto)) { + return $this->raiseError("failed to write $copyto", PEAR_INSTALLER_FAILED); + } + $this->log(3, "+ cp $ext[file] $copyto"); + if (!OS_WINDOWS) { + $mode = 0666 & ~(int)octdec($this->config->get('umask')); + $this->addFileOperation('chmod', array($mode, $copyto)); + if (!@chmod($copyto, $mode)) { + $this->log(0, "failed to change mode of $copyto"); + } + } + $this->addFileOperation('rename', array($ext['file'], $copyto)); + } + + if ($filelist->getPackageXmlVersion() == '1.0') { + $filelist->installedFile($bn, array( + 'role' => $role, + 'name' => $bn, + 'installed_as' => $dest, + 'php_api' => $ext['php_api'], + 'zend_mod_api' => $ext['zend_mod_api'], + 'zend_ext_api' => $ext['zend_ext_api'], + )); + } else { + $filelist->installedFile($bn, array('attribs' => array( + 'role' => $role, + 'name' => $bn, + 'installed_as' => $dest, + 'php_api' => $ext['php_api'], + 'zend_mod_api' => $ext['zend_mod_api'], + 'zend_ext_api' => $ext['zend_ext_api'], + ))); + } + } + } + + // }}} + function &getUninstallPackages() + { + return $this->_downloadedPackages; + } + // {{{ uninstall() + + /** + * Uninstall a package + * + * This method removes all files installed by the application, and then + * removes any empty directories. + * @param string package name + * @param array Command-line options. Possibilities include: + * + * - installroot: base installation dir, if not the default + * - nodeps: do not process dependencies of other packages to ensure + * uninstallation does not break things + */ + function uninstall($package, $options = array()) + { + if (isset($options['installroot'])) { + $this->config->setInstallRoot($options['installroot']); + $this->installroot = ''; + } else { + $this->config->setInstallRoot(''); + $this->installroot = ''; + } + $this->_registry = &$this->config->getRegistry(); + if (is_object($package)) { + $channel = $package->getChannel(); + $pkg = $package; + $package = $pkg->getPackage(); + } else { + $pkg = false; + $info = $this->_registry->parsePackageName($package, + $this->config->get('default_channel')); + $channel = $info['channel']; + $package = $info['package']; + } + $savechannel = $this->config->get('default_channel'); + $this->configSet('default_channel', $channel); + if (!is_object($pkg)) { + $pkg = $this->_registry->getPackage($package, $channel); + } + if (!$pkg) { + $this->configSet('default_channel', $savechannel); + return $this->raiseError($this->_registry->parsedPackageNameToString( + array( + 'channel' => $channel, + 'package' => $package + ), true) . ' not installed'); + } + if ($pkg->getInstalledBinary()) { + // this is just an alias for a binary package + return $this->_registry->deletePackage($package, $channel); + } + $filelist = $pkg->getFilelist(); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + if (!class_exists('PEAR_Dependency2')) { + require_once 'PEAR/Dependency2.php'; + } + $depchecker = &new PEAR_Dependency2($this->config, $options, + array('channel' => $channel, 'package' => $package), + PEAR_VALIDATE_UNINSTALLING); + $e = $depchecker->validatePackageUninstall($this); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($e)) { + if (!isset($options['ignore-errors'])) { + return $this->raiseError($e); + } else { + if (!isset($options['soft'])) { + $this->log(0, 'WARNING: ' . $e->getMessage()); + } + } + } elseif (is_array($e)) { + if (!isset($options['soft'])) { + $this->log(0, $e[0]); + } + } + // {{{ Delete the files + $this->startFileTransaction(); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + if (PEAR::isError($err = $this->_deletePackageFiles($package, $channel))) { + PEAR::popErrorHandling(); + $this->rollbackFileTransaction(); + $this->configSet('default_channel', $savechannel); + if (!isset($options['ignore-errors'])) { + return $this->raiseError($err); + } else { + if (!isset($options['soft'])) { + $this->log(0, 'WARNING: ' . $err->getMessage()); + } + } + } else { + PEAR::popErrorHandling(); + } + if (!$this->commitFileTransaction()) { + $this->rollbackFileTransaction(); + if (!isset($options['ignore-errors'])) { + return $this->raiseError("uninstall failed"); + } elseif (!isset($options['soft'])) { + $this->log(0, 'WARNING: uninstall failed'); + } + } else { + $this->startFileTransaction(); + if ($dirtree = $pkg->getDirTree()) { + // attempt to delete empty directories + uksort($dirtree, array($this, '_sortDirs')); + foreach($dirtree as $dir => $notused) { + $this->addFileOperation('rmdir', array($dir)); + } + } else { + $this->configSet('default_channel', $savechannel); + return $this->_registry->deletePackage($package, $channel); + } + if (!$this->commitFileTransaction()) { + $this->rollbackFileTransaction(); + } + } + // }}} + + $this->configSet('default_channel', $savechannel); + // Register that the package is no longer installed + return $this->_registry->deletePackage($package, $channel); + } + + /** + * Sort a list of arrays of array(downloaded packagefilename) by dependency. + * + * It also removes duplicate dependencies + * @param array an array of PEAR_PackageFile_v[1/2] objects + * @return array|PEAR_Error array of array(packagefilename, package.xml contents) + */ + function sortPackagesForUninstall(&$packages) + { + $this->_dependencyDB = &PEAR_DependencyDB::singleton($this->config); + if (PEAR::isError($this->_dependencyDB)) { + return $this->_dependencyDB; + } + usort($packages, array(&$this, '_sortUninstall')); + } + + function _sortUninstall($a, $b) + { + if (!$a->getDeps() && !$b->getDeps()) { + return 0; // neither package has dependencies, order is insignificant + } + if ($a->getDeps() && !$b->getDeps()) { + return -1; // $a must be installed after $b because $a has dependencies + } + if (!$a->getDeps() && $b->getDeps()) { + return 1; // $b must be installed after $a because $b has dependencies + } + // both packages have dependencies + if ($this->_dependencyDB->dependsOn($a, $b)) { + return -1; + } + if ($this->_dependencyDB->dependsOn($b, $a)) { + return 1; + } + return 0; + } + + // }}} + // {{{ _sortDirs() + function _sortDirs($a, $b) + { + if (strnatcmp($a, $b) == -1) return 1; + if (strnatcmp($a, $b) == 1) return -1; + return 0; + } + + // }}} + + // {{{ _buildCallback() + + function _buildCallback($what, $data) + { + if (($what == 'cmdoutput' && $this->debug > 1) || + ($what == 'output' && $this->debug > 0)) { + $this->ui->outputData(rtrim($data), 'build'); + } + } + + // }}} +} + +// {{{ md5_file() utility function +if (!function_exists("md5_file")) { + function md5_file($filename) { + $fp = fopen($filename, "r"); + if (!$fp) return null; + if (function_exists('file_get_contents')) { + fclose($fp); + $contents = file_get_contents($filename); + } else { + $contents = fread($fp, filesize($filename)); + fclose($fp); + } + return md5($contents); + } +} +// }}} + +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role.php new file mode 100644 index 000000000..b97b80801 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role.php @@ -0,0 +1,248 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Role.php,v 1.13 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * base class for installer roles + */ +require_once 'PEAR/Installer/Role/Common.php'; +require_once 'PEAR/XMLParser.php'; +//$GLOBALS['_PEAR_INSTALLER_ROLES'] = array(); +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role +{ + /** + * Set up any additional configuration variables that file roles require + * + * Never call this directly, it is called by the PEAR_Config constructor + * @param PEAR_Config + * @access private + * @static + */ + function initializeConfig(&$config) + { + if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) { + PEAR_Installer_Role::registerRoles(); + } + foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $class => $info) { + if (!$info['config_vars']) { + continue; + } + $config->_addConfigVars($info['config_vars']); + } + } + + /** + * @param PEAR_PackageFile_v2 + * @param string role name + * @param PEAR_Config + * @return PEAR_Installer_Role_Common + * @static + */ + function &factory($pkg, $role, &$config) + { + if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) { + PEAR_Installer_Role::registerRoles(); + } + if (!in_array($role, PEAR_Installer_Role::getValidRoles($pkg->getPackageType()))) { + $a = false; + return $a; + } + $a = 'PEAR_Installer_Role_' . ucfirst($role); + if (!class_exists($a)) { + require_once str_replace('_', '/', $a) . '.php'; + } + $b = new $a($config); + return $b; + } + + /** + * Get a list of file roles that are valid for the particular release type. + * + * For instance, src files serve no purpose in regular php releases. php files + * serve no purpose in extsrc or extbin releases + * @param string + * @param bool clear cache + * @return array + * @static + */ + function getValidRoles($release, $clear = false) + { + if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) { + PEAR_Installer_Role::registerRoles(); + } + static $ret = array(); + if ($clear) { + $ret = array(); + } + if (isset($ret[$release])) { + return $ret[$release]; + } + $ret[$release] = array(); + foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $role => $okreleases) { + if (in_array($release, $okreleases['releasetypes'])) { + $ret[$release][] = strtolower(str_replace('PEAR_Installer_Role_', '', $role)); + } + } + return $ret[$release]; + } + + /** + * Get a list of roles that require their files to be installed + * + * Most roles must be installed, but src and package roles, for instance + * are pseudo-roles. src files are compiled into a new extension. Package + * roles are actually fully bundled releases of a package + * @param bool clear cache + * @return array + * @static + */ + function getInstallableRoles($clear = false) + { + if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) { + PEAR_Installer_Role::registerRoles(); + } + static $ret; + if ($clear) { + unset($ret); + } + if (!isset($ret)) { + foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $role => $okreleases) { + if ($okreleases['installable']) { + $ret[] = strtolower(str_replace('PEAR_Installer_Role_', '', $role)); + } + } + } + return $ret; + } + + /** + * Return an array of roles that are affected by the baseinstalldir attribute + * + * Most roles ignore this attribute, and instead install directly into: + * PackageName/filepath + * so a tests file tests/file.phpt is installed into PackageName/tests/filepath.php + * @param bool clear cache + * @return array + * @static + */ + function getBaseinstallRoles($clear = false) + { + if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) { + PEAR_Installer_Role::registerRoles(); + } + static $ret; + if ($clear) { + unset($ret); + } + if (!isset($ret)) { + foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $role => $okreleases) { + if ($okreleases['honorsbaseinstall']) { + $ret[] = strtolower(str_replace('PEAR_Installer_Role_', '', $role)); + } + } + } + return $ret; + } + + /** + * Return an array of file roles that should be analyzed for PHP content at package time, + * like the "php" role. + * @param bool clear cache + * @return array + * @static + */ + function getPhpRoles($clear = false) + { + if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) { + PEAR_Installer_Role::registerRoles(); + } + static $ret; + if ($clear) { + unset($ret); + } + if (!isset($ret)) { + foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $role => $okreleases) { + if ($okreleases['phpfile']) { + $ret[] = strtolower(str_replace('PEAR_Installer_Role_', '', $role)); + } + } + } + return $ret; + } + + /** + * Scan through the Command directory looking for classes + * and see what commands they implement. + * @param string which directory to look for classes, defaults to + * the Installer/Roles subdirectory of + * the directory from where this file (__FILE__) is + * included. + * + * @return bool TRUE on success, a PEAR error on failure + * @access public + * @static + */ + function registerRoles($dir = null) + { + $parser = new PEAR_XMLParser; + if ($dir === null) { + $dir = dirname(__FILE__) . '/Role'; + } + $dp = @opendir($dir); + if (empty($dp)) { + return PEAR::raiseError("registerRoles: opendir($dir) failed"); + } + while ($entry = readdir($dp)) { + if ($entry{0} == '.' || substr($entry, -4) != '.xml') { + continue; + } + $class = "PEAR_Installer_Role_".substr($entry, 0, -4); + // List of roles + if (empty($GLOBALS['_PEAR_INSTALLER_ROLES'][$class])) { + $file = "$dir/$entry"; + $parser->parse(file_get_contents($file)); + $data = $parser->getData(); + if (!is_array($data['releasetypes'])) { + $data['releasetypes'] = array($data['releasetypes']); + } + $GLOBALS['_PEAR_INSTALLER_ROLES'][$class] = $data; + } + } + @closedir($dp); + ksort($GLOBALS['_PEAR_INSTALLER_ROLES']); + PEAR_Installer_Role::getBaseinstallRoles(true); + PEAR_Installer_Role::getInstallableRoles(true); + PEAR_Installer_Role::getPhpRoles(true); + PEAR_Installer_Role::getValidRoles('****', true); + return true; + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Common.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Common.php new file mode 100644 index 000000000..41295c674 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Common.php @@ -0,0 +1,180 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Common.php,v 1.10 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * Base class for all installation roles. + * + * This class allows extensibility of file roles. Packages with complex + * customization can now provide custom file roles along with the possibility of + * adding configuration values to match. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role_Common +{ + /** + * @var PEAR_Config + * @access protected + */ + var $config; + + /** + * @param PEAR_Config + */ + function PEAR_Installer_Role_Common(&$config) + { + $this->config = $config; + } + + /** + * Retrieve configuration information about a file role from its XML info + * + * @param string $role Role Classname, as in "PEAR_Installer_Role_Data" + * @return array + */ + function getInfo($role) + { + if (empty($GLOBALS['_PEAR_INSTALLER_ROLES'][$role])) { + return PEAR::raiseError('Unknown Role class: "' . $role . '"'); + } + return $GLOBALS['_PEAR_INSTALLER_ROLES'][$role]; + } + + /** + * This is called for each file to set up the directories and files + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @param array attributes from the tag + * @param string file name + * @return array an array consisting of: + * + * 1 the original, pre-baseinstalldir installation directory + * 2 the final installation directory + * 3 the full path to the final location of the file + * 4 the location of the pre-installation file + */ + function processInstallation($pkg, $atts, $file, $tmp_path, $layer = null) + { + $roleInfo = PEAR_Installer_Role_Common::getInfo('PEAR_Installer_Role_' . + ucfirst(str_replace('pear_installer_role_', '', strtolower(get_class($this))))); + if (PEAR::isError($roleInfo)) { + return $roleInfo; + } + if (!$roleInfo['locationconfig']) { + return false; + } + if ($roleInfo['honorsbaseinstall']) { + $dest_dir = $save_destdir = $this->config->get($roleInfo['locationconfig'], $layer, + $pkg->getChannel()); + if (!empty($atts['baseinstalldir'])) { + $dest_dir .= DIRECTORY_SEPARATOR . $atts['baseinstalldir']; + } + } elseif ($roleInfo['unusualbaseinstall']) { + $dest_dir = $save_destdir = $this->config->get($roleInfo['locationconfig'], + null, $pkg->getChannel()) . DIRECTORY_SEPARATOR . $pkg->getPackage(); + if (!empty($atts['baseinstalldir'])) { + $dest_dir .= DIRECTORY_SEPARATOR . $atts['baseinstalldir']; + } + } else { + $dest_dir = $save_destdir = $this->config->get($roleInfo['locationconfig'], + null, $pkg->getChannel()) . DIRECTORY_SEPARATOR . $pkg->getPackage(); + } + if (dirname($file) != '.' && empty($atts['install-as'])) { + $dest_dir .= DIRECTORY_SEPARATOR . dirname($file); + } + if (empty($atts['install-as'])) { + $dest_file = $dest_dir . DIRECTORY_SEPARATOR . basename($file); + } else { + $dest_file = $dest_dir . DIRECTORY_SEPARATOR . $atts['install-as']; + } + $orig_file = $tmp_path . DIRECTORY_SEPARATOR . $file; + + // Clean up the DIRECTORY_SEPARATOR mess + $ds2 = DIRECTORY_SEPARATOR . DIRECTORY_SEPARATOR; + + list($dest_dir, $dest_file, $orig_file) = preg_replace(array('!\\\\+!', '!/!', "!$ds2+!"), + array(DIRECTORY_SEPARATOR, DIRECTORY_SEPARATOR, + DIRECTORY_SEPARATOR), + array($dest_dir, $dest_file, $orig_file)); + return array($save_destdir, $dest_dir, $dest_file, $orig_file); + } + + /** + * Get the name of the configuration variable that specifies the location of this file + * @return string|false + */ + function getLocationConfig() + { + $roleInfo = PEAR_Installer_Role_Common::getInfo('PEAR_Installer_Role_' . + ucfirst(str_replace('pear_installer_role_', '', strtolower(get_class($this))))); + if (PEAR::isError($roleInfo)) { + return $roleInfo; + } + return $roleInfo['locationconfig']; + } + + /** + * Do any unusual setup here + * @param PEAR_Installer + * @param PEAR_PackageFile_v2 + * @param array file attributes + * @param string file name + */ + function setup(&$installer, $pkg, $atts, $file) + { + } + + function isExecutable() + { + $roleInfo = PEAR_Installer_Role_Common::getInfo('PEAR_Installer_Role_' . + ucfirst(str_replace('pear_installer_role_', '', strtolower(get_class($this))))); + if (PEAR::isError($roleInfo)) { + return $roleInfo; + } + return $roleInfo['executable']; + } + + function isInstallable() + { + $roleInfo = PEAR_Installer_Role_Common::getInfo('PEAR_Installer_Role_' . + ucfirst(str_replace('pear_installer_role_', '', strtolower(get_class($this))))); + if (PEAR::isError($roleInfo)) { + return $roleInfo; + } + return $roleInfo['installable']; + } + + function isExtension() + { + $roleInfo = PEAR_Installer_Role_Common::getInfo('PEAR_Installer_Role_' . + ucfirst(str_replace('pear_installer_role_', '', strtolower(get_class($this))))); + if (PEAR::isError($roleInfo)) { + return $roleInfo; + } + return $roleInfo['phpextension']; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Data.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Data.php new file mode 100644 index 000000000..73229470d --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Data.php @@ -0,0 +1,34 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Data.php,v 1.6 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role_Data extends PEAR_Installer_Role_Common {} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Data.xml b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Data.xml new file mode 100644 index 000000000..4382b7073 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Data.xml @@ -0,0 +1,13 @@ + + php + extsrc + extbin + 1 + data_dir + + + + + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Doc.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Doc.php new file mode 100644 index 000000000..21dd9ba33 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Doc.php @@ -0,0 +1,34 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Doc.php,v 1.6 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role_Doc extends PEAR_Installer_Role_Common {} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Doc.xml b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Doc.xml new file mode 100644 index 000000000..0c593ef36 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Doc.xml @@ -0,0 +1,13 @@ + + php + extsrc + extbin + 1 + doc_dir + + + + + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Ext.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Ext.php new file mode 100644 index 000000000..9ccdd9298 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Ext.php @@ -0,0 +1,34 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Ext.php,v 1.6 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role_Ext extends PEAR_Installer_Role_Common {} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Ext.xml b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Ext.xml new file mode 100644 index 000000000..d5c1c485e --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Ext.xml @@ -0,0 +1,11 @@ + + extbin + 1 + ext_dir + 1 + + + + 1 + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Php.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Php.php new file mode 100644 index 000000000..dcf536960 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Php.php @@ -0,0 +1,34 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Php.php,v 1.7 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role_Php extends PEAR_Installer_Role_Common {} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Php.xml b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Php.xml new file mode 100644 index 000000000..037c2a11c --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Php.xml @@ -0,0 +1,13 @@ + + php + extsrc + extbin + 1 + php_dir + 1 + + 1 + + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Script.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Script.php new file mode 100644 index 000000000..a7e3e686d --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Script.php @@ -0,0 +1,34 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Script.php,v 1.6 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role_Script extends PEAR_Installer_Role_Common {} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Script.xml b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Script.xml new file mode 100644 index 000000000..bc2df1766 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Script.xml @@ -0,0 +1,13 @@ + + php + extsrc + extbin + 1 + bin_dir + 1 + + + 1 + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Src.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Src.php new file mode 100644 index 000000000..ca5af7ead --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Src.php @@ -0,0 +1,40 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Src.php,v 1.6 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role_Src extends PEAR_Installer_Role_Common +{ + function setup(&$installer, $pkg, $atts, $file) + { + $installer->source_files++; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Src.xml b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Src.xml new file mode 100644 index 000000000..c2fb4d183 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Src.xml @@ -0,0 +1,11 @@ + + extsrc + + + + + + + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Test.php b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Test.php new file mode 100644 index 000000000..53c515010 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Test.php @@ -0,0 +1,34 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Test.php,v 1.6 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Installer_Role_Test extends PEAR_Installer_Role_Common {} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Installer/Role/Test.xml b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Test.xml new file mode 100644 index 000000000..dd4864269 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Installer/Role/Test.xml @@ -0,0 +1,13 @@ + + php + extsrc + extbin + 1 + test_dir + + + + + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile.php b/campcaster/src/tools/pear/src/PEAR/PackageFile.php new file mode 100644 index 000000000..41842de5f --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile.php @@ -0,0 +1,441 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: PackageFile.php,v 1.33.2.1 2006/06/08 00:04:13 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * needed for PEAR_VALIDATE_* constants + */ +require_once 'PEAR/Validate.php'; +/** + * Error code if the package.xml tag does not contain a valid version + */ +define('PEAR_PACKAGEFILE_ERROR_NO_PACKAGEVERSION', 1); +/** + * Error code if the package.xml tag version is not supported (version 1.0 and 1.1 are the only supported versions, + * currently + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_PACKAGEVERSION', 2); +/** + * Abstraction for the package.xml package description file + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_PackageFile +{ + /** + * @var PEAR_Config + */ + var $_config; + var $_debug; + /** + * Temp directory for uncompressing tgz files. + * @var string|false + */ + var $_tmpdir; + var $_logger = false; + /** + * @var boolean + */ + var $_rawReturn = false; + + /** + * + * @param PEAR_Config $config + * @param ? $debug + * @param string @tmpdir Optional temporary directory for uncompressing + * files + */ + function PEAR_PackageFile(&$config, $debug = false, $tmpdir = false) + { + $this->_config = $config; + $this->_debug = $debug; + $this->_tmpdir = $tmpdir; + } + + /** + * Turn off validation - return a parsed package.xml without checking it + * + * This is used by the package-validate command + */ + function rawReturn() + { + $this->_rawReturn = true; + } + + function setLogger(&$l) + { + $this->_logger = &$l; + } + + /** + * Create a PEAR_PackageFile_Parser_v* of a given version. + * @param int $version + * @return PEAR_PackageFile_Parser_v1|PEAR_PackageFile_Parser_v1 + */ + function &parserFactory($version) + { + if (!in_array($version{0}, array('1', '2'))) { + $a = false; + return $a; + } + include_once 'PEAR/PackageFile/Parser/v' . $version{0} . '.php'; + $version = $version{0}; + $class = "PEAR_PackageFile_Parser_v$version"; + $a = new $class; + return $a; + } + + /** + * For simpler unit-testing + * @return string + */ + function getClassPrefix() + { + return 'PEAR_PackageFile_v'; + } + + /** + * Create a PEAR_PackageFile_v* of a given version. + * @param int $version + * @return PEAR_PackageFile_v1|PEAR_PackageFile_v1 + */ + function &factory($version) + { + if (!in_array($version{0}, array('1', '2'))) { + $a = false; + return $a; + } + include_once 'PEAR/PackageFile/v' . $version{0} . '.php'; + $version = $version{0}; + $class = $this->getClassPrefix() . $version; + $a = new $class; + return $a; + } + + /** + * Create a PEAR_PackageFile_v* from its toArray() method + * + * WARNING: no validation is performed, the array is assumed to be valid, + * always parse from xml if you want validation. + * @param array $arr + * @return PEAR_PackageFileManager_v1|PEAR_PackageFileManager_v2 + * @uses factory() to construct the returned object. + */ + function &fromArray($arr) + { + if (isset($arr['xsdversion'])) { + $obj = &$this->factory($arr['xsdversion']); + if ($this->_logger) { + $obj->setLogger($this->_logger); + } + $obj->setConfig($this->_config); + $obj->fromArray($arr); + return $obj; + } else { + if (isset($arr['package']['attribs']['version'])) { + $obj = &$this->factory($arr['package']['attribs']['version']); + } else { + $obj = &$this->factory('1.0'); + } + if ($this->_logger) { + $obj->setLogger($this->_logger); + } + $obj->setConfig($this->_config); + $obj->fromArray($arr); + return $obj; + } + } + + /** + * Create a PEAR_PackageFile_v* from an XML string. + * @access public + * @param string $data contents of package.xml file + * @param int $state package state (one of PEAR_VALIDATE_* constants) + * @param string $file full path to the package.xml file (and the files + * it references) + * @param string $archive optional name of the archive that the XML was + * extracted from, if any + * @return PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @uses parserFactory() to construct a parser to load the package. + */ + function &fromXmlString($data, $state, $file, $archive = false) + { + if (preg_match('/]+version="([0-9]+\.[0-9]+)"/', $data, $packageversion)) { + if (!in_array($packageversion[1], array('1.0', '2.0'))) { + return PEAR::raiseError('package.xml version "' . $packageversion[1] . + '" is not supported, only 1.0 and 2.0 are supported.'); + } + $object = &$this->parserFactory($packageversion[1]); + if ($this->_logger) { + $object->setLogger($this->_logger); + } + $object->setConfig($this->_config); + $pf = $object->parse($data, $file, $archive); + if (PEAR::isError($pf)) { + return $pf; + } + if ($this->_rawReturn) { + return $pf; + } + if ($pf->validate($state)) { + if ($this->_logger) { + if ($pf->getValidationWarnings(false)) { + foreach ($pf->getValidationWarnings() as $warning) { + $this->_logger->log(0, 'WARNING: ' . $warning['message']); + } + } + } + if (method_exists($pf, 'flattenFilelist')) { + $pf->flattenFilelist(); // for v2 + } + return $pf; + } else { + if ($this->_config->get('verbose') > 0) { + if ($this->_logger) { + if ($pf->getValidationWarnings(false)) { + foreach ($pf->getValidationWarnings(false) as $warning) { + $this->_logger->log(0, 'ERROR: ' . $warning['message']); + } + } + } + } + $a = PEAR::raiseError('Parsing of package.xml from file "' . $file . '" failed', + 2, null, null, $pf->getValidationWarnings()); + return $a; + } + } elseif (preg_match('/]+version="([^"]+)"/', $data, $packageversion)) { + $a = PEAR::raiseError('package.xml file "' . $file . + '" has unsupported package.xml version "' . $packageversion[1] . '"'); + return $a; + } else { + if (!class_exists('PEAR_ErrorStack')) { + require_once 'PEAR/ErrorStack.php'; + } + PEAR_ErrorStack::staticPush('PEAR_PackageFile', + PEAR_PACKAGEFILE_ERROR_NO_PACKAGEVERSION, + 'warning', array('xml' => $data), 'package.xml "' . $file . + '" has no package.xml version'); + $object = &$this->parserFactory('1.0'); + $object->setConfig($this->_config); + $pf = $object->parse($data, $file, $archive); + if (PEAR::isError($pf)) { + return $pf; + } + if ($this->_rawReturn) { + return $pf; + } + if ($pf->validate($state)) { + if ($this->_logger) { + if ($pf->getValidationWarnings(false)) { + foreach ($pf->getValidationWarnings() as $warning) { + $this->_logger->log(0, 'WARNING: ' . $warning['message']); + } + } + } + if (method_exists($pf, 'flattenFilelist')) { + $pf->flattenFilelist(); // for v2 + } + return $pf; + } else { + $a = PEAR::raiseError('Parsing of package.xml from file "' . $file . '" failed', + 2, null, null, $pf->getValidationWarnings()); + return $a; + } + } + } + + /** + * Register a temporary file or directory. When the destructor is + * executed, all registered temporary files and directories are + * removed. + * + * @param string $file name of file or directory + * @return void + */ + function addTempFile($file) + { + $GLOBALS['_PEAR_Common_tempfiles'][] = $file; + } + + /** + * Create a PEAR_PackageFile_v* from a compresed Tar or Tgz file. + * @access public + * @param string contents of package.xml file + * @param int package state (one of PEAR_VALIDATE_* constants) + * @return PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @using Archive_Tar to extract the files + * @using fromPackageFile() to load the package after the package.xml + * file is extracted. + */ + function &fromTgzFile($file, $state) + { + if (!class_exists('Archive_Tar')) { + require_once 'Archive/Tar.php'; + } + $tar = new Archive_Tar($file); + if ($this->_debug <= 1) { + $tar->pushErrorHandling(PEAR_ERROR_RETURN); + } + $content = $tar->listContent(); + if ($this->_debug <= 1) { + $tar->popErrorHandling(); + } + if (!is_array($content)) { + if (is_string($file) && strlen($file < 255) && !@is_file($file)) { + $ret = PEAR::raiseError("could not open file \"$file\""); + return $ret; + } + $file = realpath($file); + $ret = PEAR::raiseError("Could not get contents of package \"$file\"". + '. Invalid tgz file.'); + return $ret; + } else { + if (!count($content) && !@is_file($file)) { + $ret = PEAR::raiseError("could not open file \"$file\""); + return $ret; + } + } + $xml = null; + $origfile = $file; + foreach ($content as $file) { + $name = $file['filename']; + if ($name == 'package2.xml') { // allow a .tgz to distribute both versions + $xml = $name; + break; + } + if ($name == 'package.xml') { + $xml = $name; + break; + } elseif (ereg('package.xml$', $name, $match)) { + $xml = $name; + break; + } + } + if ($this->_tmpdir) { + $tmpdir = $this->_tmpdir; + } else { + $tmpdir = System::mkTemp(array('-d', 'pear')); + PEAR_PackageFile::addTempFile($tmpdir); + } + if (!$xml || !$tar->extractList(array($xml), $tmpdir)) { + $ret = PEAR::raiseError('could not extract the package.xml file from "' . + $origfile . '"'); + return $ret; + } + $ret = &PEAR_PackageFile::fromPackageFile("$tmpdir/$xml", $state, $origfile); + return $ret; + } + + /** + * Create a PEAR_PackageFile_v* from a package.xml file. + * + * @access public + * @param string $descfile name of package xml file + * @param int $state package state (one of PEAR_VALIDATE_* constants) + * @param string|false $archive name of the archive this package.xml came + * from, if any + * @return PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @uses PEAR_PackageFile::fromXmlString to create the oject after the + * XML is loaded from the package.xml file. + */ + function &fromPackageFile($descfile, $state, $archive = false) + { + if (is_string($descfile) && strlen($descfile) < 255 && + !@is_file($descfile) || !is_readable($descfile) || + (!$fp = @fopen($descfile, 'r'))) { + $a = PEAR::raiseError("Unable to open $descfile"); + return $a; + } + + // read the whole thing so we only get one cdata callback + // for each block of cdata + if (function_exists('file_get_contents')) { + @fclose($fp); + $data = file_get_contents($descfile); + } else { + $data = ''; + while (!feof($fp)) { + $data .= @fread($fp, 8192); + } + fclose($fp); + } + $ret = &PEAR_PackageFile::fromXmlString($data, $state, $descfile, $archive); + return $ret; + } + + + /** + * Create a PEAR_PackageFile_v* from a .tgz archive or package.xml file. + * + * This method is able to extract information about a package from a .tgz + * archive or from a XML package definition file. + * + * @access public + * @param string $info file name + * @param int $state package state (one of PEAR_VALIDATE_* constants) + * @return PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @uses fromPackageFile() if the file appears to be XML + * @uses fromTgzFile() to load all non-XML files + */ + function &fromAnyFile($info, $state) + { + if (is_dir($info)) { + $info = PEAR::raiseError("'$info' is a directory, a file is expected"); + return $info; + } + + $fp = false; + if (is_string($info) && strlen($info) < 255 && + (file_exists($info) || ($fp = @fopen($info, 'r')))) { + if ($fp) { + fclose($fp); + } + $tmp = substr($info, -4); + if ($tmp == '.xml') { + $info = &PEAR_PackageFile::fromPackageFile($info, $state); + } elseif ($tmp == '.tar' || $tmp == '.tgz') { + $info = &PEAR_PackageFile::fromTgzFile($info, $state); + } else { + $fp = fopen($info, "r"); + $test = fread($fp, 5); + fclose($fp); + if ($test == " diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile/Generator/v1.php b/campcaster/src/tools/pear/src/PEAR/PackageFile/Generator/v1.php new file mode 100644 index 000000000..c6968f4e2 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile/Generator/v1.php @@ -0,0 +1,1269 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: v1.php,v 1.70.2.1 2006/05/10 02:55:06 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * needed for PEAR_VALIDATE_* constants + */ +require_once 'PEAR/Validate.php'; +require_once 'System.php'; +require_once 'PEAR/PackageFile/v2.php'; +/** + * This class converts a PEAR_PackageFile_v1 object into any output format. + * + * Supported output formats include array, XML string, and a PEAR_PackageFile_v2 + * object, for converting package.xml 1.0 into package.xml 2.0 with no sweat. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_PackageFile_Generator_v1 +{ + /** + * @var PEAR_PackageFile_v1 + */ + var $_packagefile; + function PEAR_PackageFile_Generator_v1(&$packagefile) + { + $this->_packagefile = &$packagefile; + } + + function getPackagerVersion() + { + return '1.4.11'; + } + + /** + * @param PEAR_Packager + * @param bool if true, a .tgz is written, otherwise a .tar is written + * @param string|null directory in which to save the .tgz + * @return string|PEAR_Error location of package or error object + */ + function toTgz(&$packager, $compress = true, $where = null) + { + require_once 'Archive/Tar.php'; + if ($where === null) { + if (!($where = System::mktemp(array('-d')))) { + return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: mktemp failed'); + } + } elseif (!@System::mkDir(array('-p', $where))) { + return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: "' . $where . '" could' . + ' not be created'); + } + if (file_exists($where . DIRECTORY_SEPARATOR . 'package.xml') && + !is_file($where . DIRECTORY_SEPARATOR . 'package.xml')) { + return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: unable to save package.xml as' . + ' "' . $where . DIRECTORY_SEPARATOR . 'package.xml"'); + } + if (!$this->_packagefile->validate(PEAR_VALIDATE_PACKAGING)) { + return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: invalid package file'); + } + $pkginfo = $this->_packagefile->getArray(); + $ext = $compress ? '.tgz' : '.tar'; + $pkgver = $pkginfo['package'] . '-' . $pkginfo['version']; + $dest_package = getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext; + if (file_exists(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext) && + !is_file(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext)) { + return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: cannot create tgz file "' . + getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext . '"'); + } + if ($pkgfile = $this->_packagefile->getPackageFile()) { + $pkgdir = dirname(realpath($pkgfile)); + $pkgfile = basename($pkgfile); + } else { + return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: package file object must ' . + 'be created from a real file'); + } + // {{{ Create the package file list + $filelist = array(); + $i = 0; + + foreach ($this->_packagefile->getFilelist() as $fname => $atts) { + $file = $pkgdir . DIRECTORY_SEPARATOR . $fname; + if (!file_exists($file)) { + return PEAR::raiseError("File does not exist: $fname"); + } else { + $filelist[$i++] = $file; + if (!isset($atts['md5sum'])) { + $this->_packagefile->setFileAttribute($fname, 'md5sum', md5_file($file)); + } + $packager->log(2, "Adding file $fname"); + } + } + // }}} + $packagexml = $this->toPackageFile($where, PEAR_VALIDATE_PACKAGING, 'package.xml', true); + if ($packagexml) { + $tar =& new Archive_Tar($dest_package, $compress); + $tar->setErrorHandling(PEAR_ERROR_RETURN); // XXX Don't print errors + // ----- Creates with the package.xml file + $ok = $tar->createModify(array($packagexml), '', $where); + if (PEAR::isError($ok)) { + return $ok; + } elseif (!$ok) { + return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: tarball creation failed'); + } + // ----- Add the content of the package + if (!$tar->addModify($filelist, $pkgver, $pkgdir)) { + return PEAR::raiseError('PEAR_Packagefile_v1::toTgz: tarball creation failed'); + } + return $dest_package; + } + } + + /** + * @param string|null directory to place the package.xml in, or null for a temporary dir + * @param int one of the PEAR_VALIDATE_* constants + * @param string name of the generated file + * @param bool if true, then no analysis will be performed on role="php" files + * @return string|PEAR_Error path to the created file on success + */ + function toPackageFile($where = null, $state = PEAR_VALIDATE_NORMAL, $name = 'package.xml', + $nofilechecking = false) + { + if (!$this->_packagefile->validate($state, $nofilechecking)) { + return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: invalid package.xml', + null, null, null, $this->_packagefile->getValidationWarnings()); + } + if ($where === null) { + if (!($where = System::mktemp(array('-d')))) { + return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: mktemp failed'); + } + } elseif (!@System::mkDir(array('-p', $where))) { + return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: "' . $where . '" could' . + ' not be created'); + } + $newpkgfile = $where . DIRECTORY_SEPARATOR . $name; + $np = @fopen($newpkgfile, 'wb'); + if (!$np) { + return PEAR::raiseError('PEAR_Packagefile_v1::toPackageFile: unable to save ' . + "$name as $newpkgfile"); + } + fwrite($np, $this->toXml($state, true)); + fclose($np); + return $newpkgfile; + } + + /** + * fix both XML encoding to be UTF8, and replace standard XML entities < > " & ' + * + * @param string $string + * @return string + * @access private + */ + function _fixXmlEncoding($string) + { + if (version_compare(phpversion(), '5.0.0', 'lt')) { + $string = utf8_encode($string); + } + return strtr($string, array( + '&' => '&', + '>' => '>', + '<' => '<', + '"' => '"', + '\'' => ''' )); + } + + /** + * Return an XML document based on the package info (as returned + * by the PEAR_Common::infoFrom* methods). + * + * @return string XML data + */ + function toXml($state = PEAR_VALIDATE_NORMAL, $nofilevalidation = false) + { + $this->_packagefile->setDate(date('Y-m-d')); + if (!$this->_packagefile->validate($state, $nofilevalidation)) { + return false; + } + $pkginfo = $this->_packagefile->getArray(); + static $maint_map = array( + "handle" => "user", + "name" => "name", + "email" => "email", + "role" => "role", + ); + $ret = "\n"; + $ret .= "\n"; + $ret .= "\n" . +" $pkginfo[package]"; + if (isset($pkginfo['extends'])) { + $ret .= "\n$pkginfo[extends]"; + } + $ret .= + "\n ".$this->_fixXmlEncoding($pkginfo['summary'])."\n" . +" ".trim($this->_fixXmlEncoding($pkginfo['description']))."\n \n" . +" \n"; + foreach ($pkginfo['maintainers'] as $maint) { + $ret .= " \n"; + foreach ($maint_map as $idx => $elm) { + $ret .= " <$elm>"; + $ret .= $this->_fixXmlEncoding($maint[$idx]); + $ret .= "\n"; + } + $ret .= " \n"; + } + $ret .= " \n"; + $ret .= $this->_makeReleaseXml($pkginfo, false, $state); + if (isset($pkginfo['changelog']) && count($pkginfo['changelog']) > 0) { + $ret .= " \n"; + foreach ($pkginfo['changelog'] as $oldrelease) { + $ret .= $this->_makeReleaseXml($oldrelease, true); + } + $ret .= " \n"; + } + $ret .= "\n"; + return $ret; + } + + // }}} + // {{{ _makeReleaseXml() + + /** + * Generate part of an XML description with release information. + * + * @param array $pkginfo array with release information + * @param bool $changelog whether the result will be in a changelog element + * + * @return string XML data + * + * @access private + */ + function _makeReleaseXml($pkginfo, $changelog = false, $state = PEAR_VALIDATE_NORMAL) + { + // XXX QUOTE ENTITIES IN PCDATA, OR EMBED IN CDATA BLOCKS!! + $indent = $changelog ? " " : ""; + $ret = "$indent \n"; + if (!empty($pkginfo['version'])) { + $ret .= "$indent $pkginfo[version]\n"; + } + if (!empty($pkginfo['release_date'])) { + $ret .= "$indent $pkginfo[release_date]\n"; + } + if (!empty($pkginfo['release_license'])) { + $ret .= "$indent $pkginfo[release_license]\n"; + } + if (!empty($pkginfo['release_state'])) { + $ret .= "$indent $pkginfo[release_state]\n"; + } + if (!empty($pkginfo['release_notes'])) { + $ret .= "$indent ".trim($this->_fixXmlEncoding($pkginfo['release_notes'])) + ."\n$indent \n"; + } + if (!empty($pkginfo['release_warnings'])) { + $ret .= "$indent ".$this->_fixXmlEncoding($pkginfo['release_warnings'])."\n"; + } + if (isset($pkginfo['release_deps']) && sizeof($pkginfo['release_deps']) > 0) { + $ret .= "$indent \n"; + foreach ($pkginfo['release_deps'] as $dep) { + $ret .= "$indent _fixXmlEncoding($c['name']) . "\""; + if (isset($c['default'])) { + $ret .= " default=\"" . $this->_fixXmlEncoding($c['default']) . "\""; + } + $ret .= " prompt=\"" . $this->_fixXmlEncoding($c['prompt']) . "\""; + $ret .= "/>\n"; + } + $ret .= "$indent \n"; + } + if (isset($pkginfo['provides'])) { + foreach ($pkginfo['provides'] as $key => $what) { + $ret .= "$indent recursiveXmlFilelist($pkginfo['filelist']); + } else { + foreach ($pkginfo['filelist'] as $file => $fa) { + @$ret .= "$indent _fixXmlEncoding($fa['baseinstalldir']) . '"'; + } + if (isset($fa['md5sum'])) { + $ret .= " md5sum=\"$fa[md5sum]\""; + } + if (isset($fa['platform'])) { + $ret .= " platform=\"$fa[platform]\""; + } + if (!empty($fa['install-as'])) { + $ret .= ' install-as="' . + $this->_fixXmlEncoding($fa['install-as']) . '"'; + } + $ret .= ' name="' . $this->_fixXmlEncoding($file) . '"'; + if (empty($fa['replacements'])) { + $ret .= "/>\n"; + } else { + $ret .= ">\n"; + foreach ($fa['replacements'] as $r) { + $ret .= "$indent $v) { + $ret .= " $k=\"" . $this->_fixXmlEncoding($v) .'"'; + } + $ret .= "/>\n"; + } + @$ret .= "$indent \n"; + } + } + } + $ret .= "$indent \n"; + } + $ret .= "$indent \n"; + return $ret; + } + + /** + * @param array + * @access protected + */ + function recursiveXmlFilelist($list) + { + $this->_dirs = array(); + foreach ($list as $file => $attributes) { + $this->_addDir($this->_dirs, explode('/', dirname($file)), $file, $attributes); + } + return $this->_formatDir($this->_dirs); + } + + /** + * @param array + * @param array + * @param string|null + * @param array|null + * @access private + */ + function _addDir(&$dirs, $dir, $file = null, $attributes = null) + { + if ($dir == array() || $dir == array('.')) { + $dirs['files'][basename($file)] = $attributes; + return; + } + $curdir = array_shift($dir); + if (!isset($dirs['dirs'][$curdir])) { + $dirs['dirs'][$curdir] = array(); + } + $this->_addDir($dirs['dirs'][$curdir], $dir, $file, $attributes); + } + + /** + * @param array + * @param string + * @param string + * @access private + */ + function _formatDir($dirs, $indent = '', $curdir = '') + { + $ret = ''; + if (!count($dirs)) { + return ''; + } + if (isset($dirs['dirs'])) { + uksort($dirs['dirs'], 'strnatcasecmp'); + foreach ($dirs['dirs'] as $dir => $contents) { + $usedir = "$curdir/$dir"; + $ret .= "$indent \n"; + $ret .= $this->_formatDir($contents, "$indent ", $usedir); + $ret .= "$indent \n"; + } + } + if (isset($dirs['files'])) { + uksort($dirs['files'], 'strnatcasecmp'); + foreach ($dirs['files'] as $file => $attribs) { + $ret .= $this->_formatFile($file, $attribs, $indent); + } + } + return $ret; + } + + /** + * @param string + * @param array + * @param string + * @access private + */ + function _formatFile($file, $attributes, $indent) + { + $ret = "$indent _fixXmlEncoding($attributes['baseinstalldir']) . '"'; + } + if (isset($attributes['md5sum'])) { + $ret .= " md5sum=\"$attributes[md5sum]\""; + } + if (isset($attributes['platform'])) { + $ret .= " platform=\"$attributes[platform]\""; + } + if (!empty($attributes['install-as'])) { + $ret .= ' install-as="' . + $this->_fixXmlEncoding($attributes['install-as']) . '"'; + } + $ret .= ' name="' . $this->_fixXmlEncoding($file) . '"'; + if (empty($attributes['replacements'])) { + $ret .= "/>\n"; + } else { + $ret .= ">\n"; + foreach ($attributes['replacements'] as $r) { + $ret .= "$indent $v) { + $ret .= " $k=\"" . $this->_fixXmlEncoding($v) .'"'; + } + $ret .= "/>\n"; + } + $ret .= "$indent \n"; + } + return $ret; + } + + // {{{ _unIndent() + + /** + * Unindent given string (?) + * + * @param string $str The string that has to be unindented. + * @return string + * @access private + */ + function _unIndent($str) + { + // remove leading newlines + $str = preg_replace('/^[\r\n]+/', '', $str); + // find whitespace at the beginning of the first line + $indent_len = strspn($str, " \t"); + $indent = substr($str, 0, $indent_len); + $data = ''; + // remove the same amount of whitespace from following lines + foreach (explode("\n", $str) as $line) { + if (substr($line, 0, $indent_len) == $indent) { + $data .= substr($line, $indent_len) . "\n"; + } + } + return $data; + } + + /** + * @return array + */ + function dependenciesToV2() + { + $arr = array(); + $this->_convertDependencies2_0($arr); + return $arr['dependencies']; + } + + /** + * Convert a package.xml version 1.0 into version 2.0 + * + * Note that this does a basic conversion, to allow more advanced + * features like bundles and multiple releases + * @param string the classname to instantiate and return. This must be + * PEAR_PackageFile_v2 or a descendant + * @param boolean if true, only valid, deterministic package.xml 1.0 as defined by the + * strictest parameters will be converted + * @return PEAR_PackageFile_v2|PEAR_Error + */ + function &toV2($class = 'PEAR_PackageFile_v2', $strict = false) + { + if ($strict) { + if (!$this->_packagefile->validate()) { + $a = PEAR::raiseError('invalid package.xml version 1.0 cannot be converted' . + ' to version 2.0', null, null, null, + $this->_packagefile->getValidationWarnings(true)); + return $a; + } + } + $arr = array( + 'attribs' => array( + 'version' => '2.0', + 'xmlns' => 'http://pear.php.net/dtd/package-2.0', + 'xmlns:tasks' => 'http://pear.php.net/dtd/tasks-1.0', + 'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance', + 'xsi:schemaLocation' => "http://pear.php.net/dtd/tasks-1.0\n" . +"http://pear.php.net/dtd/tasks-1.0.xsd\n" . +"http://pear.php.net/dtd/package-2.0\n" . +'http://pear.php.net/dtd/package-2.0.xsd', + ), + 'name' => $this->_packagefile->getPackage(), + 'channel' => 'pear.php.net', + ); + $arr['summary'] = $this->_packagefile->getSummary(); + $arr['description'] = $this->_packagefile->getDescription(); + $maintainers = $this->_packagefile->getMaintainers(); + foreach ($maintainers as $maintainer) { + if ($maintainer['role'] != 'lead') { + continue; + } + $new = array( + 'name' => $maintainer['name'], + 'user' => $maintainer['handle'], + 'email' => $maintainer['email'], + 'active' => 'yes', + ); + $arr['lead'][] = $new; + } + if (!isset($arr['lead'])) { // some people... you know? + $arr['lead'] = array( + 'name' => 'unknown', + 'user' => 'unknown', + 'email' => 'noleadmaintainer@example.com', + 'active' => 'no', + ); + } + if (count($arr['lead']) == 1) { + $arr['lead'] = $arr['lead'][0]; + } + foreach ($maintainers as $maintainer) { + if ($maintainer['role'] == 'lead') { + continue; + } + $new = array( + 'name' => $maintainer['name'], + 'user' => $maintainer['handle'], + 'email' => $maintainer['email'], + 'active' => 'yes', + ); + $arr[$maintainer['role']][] = $new; + } + if (isset($arr['developer']) && count($arr['developer']) == 1) { + $arr['developer'] = $arr['developer'][0]; + } + if (isset($arr['contributor']) && count($arr['contributor']) == 1) { + $arr['contributor'] = $arr['contributor'][0]; + } + if (isset($arr['helper']) && count($arr['helper']) == 1) { + $arr['helper'] = $arr['helper'][0]; + } + $arr['date'] = $this->_packagefile->getDate(); + $arr['version'] = + array( + 'release' => $this->_packagefile->getVersion(), + 'api' => $this->_packagefile->getVersion(), + ); + $arr['stability'] = + array( + 'release' => $this->_packagefile->getState(), + 'api' => $this->_packagefile->getState(), + ); + $licensemap = + array( + 'php' => 'http://www.php.net/license', + 'php license' => 'http://www.php.net/license', + 'lgpl' => 'http://www.gnu.org/copyleft/lesser.html', + 'bsd' => 'http://www.opensource.org/licenses/bsd-license.php', + 'bsd style' => 'http://www.opensource.org/licenses/bsd-license.php', + 'bsd-style' => 'http://www.opensource.org/licenses/bsd-license.php', + 'mit' => 'http://www.opensource.org/licenses/mit-license.php', + 'gpl' => 'http://www.gnu.org/copyleft/gpl.html', + 'apache' => 'http://www.opensource.org/licenses/apache2.0.php' + ); + if (isset($licensemap[strtolower($this->_packagefile->getLicense())])) { + $arr['license'] = array( + 'attribs' => array('uri' => + $licensemap[strtolower($this->_packagefile->getLicense())]), + '_content' => $this->_packagefile->getLicense() + ); + } else { + // don't use bogus uri + $arr['license'] = $this->_packagefile->getLicense(); + } + $arr['notes'] = $this->_packagefile->getNotes(); + $temp = array(); + $arr['contents'] = $this->_convertFilelist2_0($temp); + $this->_convertDependencies2_0($arr); + $release = ($this->_packagefile->getConfigureOptions() || $this->_isExtension) ? + 'extsrcrelease' : 'phprelease'; + if ($release == 'extsrcrelease') { + $arr['channel'] = 'pecl.php.net'; + $arr['providesextension'] = $arr['name']; // assumption + } + $arr[$release] = array(); + if ($this->_packagefile->getConfigureOptions()) { + $arr[$release]['configureoption'] = $this->_packagefile->getConfigureOptions(); + foreach ($arr[$release]['configureoption'] as $i => $opt) { + $arr[$release]['configureoption'][$i] = array('attribs' => $opt); + } + if (count($arr[$release]['configureoption']) == 1) { + $arr[$release]['configureoption'] = $arr[$release]['configureoption'][0]; + } + } + $this->_convertRelease2_0($arr[$release], $temp); + if ($release == 'extsrcrelease' && count($arr[$release]) > 1) { + // multiple extsrcrelease tags added in PEAR 1.4.1 + $arr['dependencies']['required']['pearinstaller']['min'] = '1.4.1'; + } + if ($cl = $this->_packagefile->getChangelog()) { + foreach ($cl as $release) { + $rel = array(); + $rel['version'] = + array( + 'release' => $release['version'], + 'api' => $release['version'], + ); + if (!isset($release['release_state'])) { + $release['release_state'] = 'stable'; + } + $rel['stability'] = + array( + 'release' => $release['release_state'], + 'api' => $release['release_state'], + ); + if (isset($release['release_date'])) { + $rel['date'] = $release['release_date']; + } else { + $rel['date'] = date('Y-m-d'); + } + if (isset($release['release_license'])) { + if (isset($licensemap[strtolower($release['release_license'])])) { + $uri = $licensemap[strtolower($release['release_license'])]; + } else { + $uri = 'http://www.example.com'; + } + $rel['license'] = array( + 'attribs' => array('uri' => $uri), + '_content' => $release['release_license'] + ); + } else { + $rel['license'] = $arr['license']; + } + if (!isset($release['release_notes'])) { + $release['release_notes'] = 'no release notes'; + } + $rel['notes'] = $release['release_notes']; + $arr['changelog']['release'][] = $rel; + } + } + $ret = new $class; + $ret->setConfig($this->_packagefile->_config); + if (isset($this->_packagefile->_logger) && is_object($this->_packagefile->_logger)) { + $ret->setLogger($this->_packagefile->_logger); + } + $ret->fromArray($arr); + return $ret; + } + + /** + * @param array + * @param bool + * @access private + */ + function _convertDependencies2_0(&$release, $internal = false) + { + $peardep = array('pearinstaller' => + array('min' => '1.4.0b1')); // this is a lot safer + $required = $optional = array(); + $release['dependencies'] = array(); + if ($this->_packagefile->hasDeps()) { + foreach ($this->_packagefile->getDeps() as $dep) { + if (!isset($dep['optional']) || $dep['optional'] == 'no') { + $required[] = $dep; + } else { + $optional[] = $dep; + } + } + foreach (array('required', 'optional') as $arr) { + $deps = array(); + foreach ($$arr as $dep) { + // organize deps by dependency type and name + if (!isset($deps[$dep['type']])) { + $deps[$dep['type']] = array(); + } + if (isset($dep['name'])) { + $deps[$dep['type']][$dep['name']][] = $dep; + } else { + $deps[$dep['type']][] = $dep; + } + } + do { + if (isset($deps['php'])) { + $php = array(); + if (count($deps['php']) > 1) { + $php = $this->_processPhpDeps($deps['php']); + } else { + if (!isset($deps['php'][0])) { + list($key, $blah) = each ($deps['php']); // stupid buggy versions + $deps['php'] = array($blah[0]); + } + $php = $this->_processDep($deps['php'][0]); + if (!$php) { + break; // poor mans throw + } + } + $release['dependencies'][$arr]['php'] = $php; + } + } while (false); + do { + if (isset($deps['pkg'])) { + $pkg = array(); + $pkg = $this->_processMultipleDepsName($deps['pkg']); + if (!$pkg) { + break; // poor mans throw + } + $release['dependencies'][$arr]['package'] = $pkg; + } + } while (false); + do { + if (isset($deps['ext'])) { + $pkg = array(); + $pkg = $this->_processMultipleDepsName($deps['ext']); + $release['dependencies'][$arr]['extension'] = $pkg; + } + } while (false); + // skip sapi - it's not supported so nobody will have used it + // skip os - it's not supported in 1.0 + } + } + if (isset($release['dependencies']['required'])) { + $release['dependencies']['required'] = + array_merge($peardep, $release['dependencies']['required']); + } else { + $release['dependencies']['required'] = $peardep; + } + if (!isset($release['dependencies']['required']['php'])) { + $release['dependencies']['required']['php'] = + array('min' => '4.0.0'); + } + $order = array(); + $bewm = $release['dependencies']['required']; + $order['php'] = $bewm['php']; + $order['pearinstaller'] = $bewm['pearinstaller']; + isset($bewm['package']) ? $order['package'] = $bewm['package'] :0; + isset($bewm['extension']) ? $order['extension'] = $bewm['extension'] :0; + $release['dependencies']['required'] = $order; + } + + /** + * @param array + * @access private + */ + function _convertFilelist2_0(&$package) + { + $ret = array('dir' => + array( + 'attribs' => array('name' => '/'), + 'file' => array() + ) + ); + $package['platform'] = + $package['install-as'] = array(); + $this->_isExtension = false; + foreach ($this->_packagefile->getFilelist() as $name => $file) { + $file['name'] = $name; + if (isset($file['role']) && $file['role'] == 'src') { + $this->_isExtension = true; + } + if (isset($file['replacements'])) { + $repl = $file['replacements']; + unset($file['replacements']); + } else { + unset($repl); + } + if (isset($file['install-as'])) { + $package['install-as'][$name] = $file['install-as']; + unset($file['install-as']); + } + if (isset($file['platform'])) { + $package['platform'][$name] = $file['platform']; + unset($file['platform']); + } + $file = array('attribs' => $file); + if (isset($repl)) { + foreach ($repl as $replace ) { + $file['tasks:replace'][] = array('attribs' => $replace); + } + if (count($repl) == 1) { + $file['tasks:replace'] = $file['tasks:replace'][0]; + } + } + $ret['dir']['file'][] = $file; + } + return $ret; + } + + /** + * Post-process special files with install-as/platform attributes and + * make the release tag. + * + * This complex method follows this work-flow to create the release tags: + * + * 
+     * - if any install-as/platform exist, create a generic release and fill it with
+     *   o  tags for 
+     *   o  tags for 
+     *   o  tags for 
+     *   o  tags for 
+     * - create a release for each platform encountered and fill with
+     *   o  tags for 
+     *   o  tags for 
+     *   o  tags for 
+     *   o  tags for 
+     *   o  tags for 
+     *   o  tags for 
+     *   o  tags for 
+     *
+ * + * It does this by accessing the $package parameter, which contains an array with + * indices: + * + * - platform: mapping of file => OS the file should be installed on + * - install-as: mapping of file => installed name + * - osmap: mapping of OS => list of files that should be installed + * on that OS + * - notosmap: mapping of OS => list of files that should not be + * installed on that OS + * + * @param array + * @param array + * @access private + */ + function _convertRelease2_0(&$release, $package) + { + //- if any install-as/platform exist, create a generic release and fill it with + if (count($package['platform']) || count($package['install-as'])) { + $generic = array(); + $genericIgnore = array(); + foreach ($package['install-as'] as $file => $as) { + //o tags for + if (!isset($package['platform'][$file])) { + $generic[] = $file; + continue; + } + //o tags for + if (isset($package['platform'][$file]) && + $package['platform'][$file]{0} == '!') { + $generic[] = $file; + continue; + } + //o tags for + if (isset($package['platform'][$file]) && + $package['platform'][$file]{0} != '!') { + $genericIgnore[] = $file; + continue; + } + } + foreach ($package['platform'] as $file => $platform) { + if (isset($package['install-as'][$file])) { + continue; + } + if ($platform{0} != '!') { + //o tags for + $genericIgnore[] = $file; + } + } + if (count($package['platform'])) { + $oses = $notplatform = $platform = array(); + foreach ($package['platform'] as $file => $os) { + // get a list of oses + if ($os{0} == '!') { + if (isset($oses[substr($os, 1)])) { + continue; + } + $oses[substr($os, 1)] = count($oses); + } else { + if (isset($oses[$os])) { + continue; + } + $oses[$os] = count($oses); + } + } + //- create a release for each platform encountered and fill with + foreach ($oses as $os => $releaseNum) { + $release[$releaseNum]['installconditions']['os']['name'] = $os; + $release[$releaseNum]['filelist'] = array('install' => array(), + 'ignore' => array()); + foreach ($package['install-as'] as $file => $as) { + //o tags for + if (!isset($package['platform'][$file])) { + $release[$releaseNum]['filelist']['install'][] = + array( + 'attribs' => array( + 'name' => $file, + 'as' => $as, + ), + ); + continue; + } + //o tags for + // + if (isset($package['platform'][$file]) && + $package['platform'][$file] == $os) { + $release[$releaseNum]['filelist']['install'][] = + array( + 'attribs' => array( + 'name' => $file, + 'as' => $as, + ), + ); + continue; + } + //o tags for + // + if (isset($package['platform'][$file]) && + $package['platform'][$file] != "!$os" && + $package['platform'][$file]{0} == '!') { + $release[$releaseNum]['filelist']['install'][] = + array( + 'attribs' => array( + 'name' => $file, + 'as' => $as, + ), + ); + continue; + } + //o tags for + // + if (isset($package['platform'][$file]) && + $package['platform'][$file] == "!$os") { + $release[$releaseNum]['filelist']['ignore'][] = + array( + 'attribs' => array( + 'name' => $file, + ), + ); + continue; + } + //o tags for + // + if (isset($package['platform'][$file]) && + $package['platform'][$file]{0} != '!' && + $package['platform'][$file] != $os) { + $release[$releaseNum]['filelist']['ignore'][] = + array( + 'attribs' => array( + 'name' => $file, + ), + ); + continue; + } + } + foreach ($package['platform'] as $file => $platform) { + if (isset($package['install-as'][$file])) { + continue; + } + //o tags for + if ($platform == "!$os") { + $release[$releaseNum]['filelist']['ignore'][] = + array( + 'attribs' => array( + 'name' => $file, + ), + ); + continue; + } + //o tags for + if ($platform{0} != '!' && $platform != $os) { + $release[$releaseNum]['filelist']['ignore'][] = + array( + 'attribs' => array( + 'name' => $file, + ), + ); + } + } + if (!count($release[$releaseNum]['filelist']['install'])) { + unset($release[$releaseNum]['filelist']['install']); + } + if (!count($release[$releaseNum]['filelist']['ignore'])) { + unset($release[$releaseNum]['filelist']['ignore']); + } + } + if (count($generic) || count($genericIgnore)) { + $release[count($oses)] = array(); + if (count($generic)) { + foreach ($generic as $file) { + if (isset($package['install-as'][$file])) { + $installas = $package['install-as'][$file]; + } else { + $installas = $file; + } + $release[count($oses)]['filelist']['install'][] = + array( + 'attribs' => array( + 'name' => $file, + 'as' => $installas, + ) + ); + } + } + if (count($genericIgnore)) { + foreach ($genericIgnore as $file) { + $release[count($oses)]['filelist']['ignore'][] = + array( + 'attribs' => array( + 'name' => $file, + ) + ); + } + } + } + // cleanup + foreach ($release as $i => $rel) { + if (isset($rel['filelist']['install']) && + count($rel['filelist']['install']) == 1) { + $release[$i]['filelist']['install'] = + $release[$i]['filelist']['install'][0]; + } + if (isset($rel['filelist']['ignore']) && + count($rel['filelist']['ignore']) == 1) { + $release[$i]['filelist']['ignore'] = + $release[$i]['filelist']['ignore'][0]; + } + } + if (count($release) == 1) { + $release = $release[0]; + } + } else { + // no platform atts, but some install-as atts + foreach ($package['install-as'] as $file => $value) { + $release['filelist']['install'][] = + array( + 'attribs' => array( + 'name' => $file, + 'as' => $value + ) + ); + } + if (count($release['filelist']['install']) == 1) { + $release['filelist']['install'] = $release['filelist']['install'][0]; + } + } + } + } + + /** + * @param array + * @return array + * @access private + */ + function _processDep($dep) + { + if ($dep['type'] == 'php') { + if ($dep['rel'] == 'has') { + // come on - everyone has php! + return false; + } + } + $php = array(); + if ($dep['type'] != 'php') { + $php['name'] = $dep['name']; + if ($dep['type'] == 'pkg') { + $php['channel'] = 'pear.php.net'; + } + } + switch ($dep['rel']) { + case 'gt' : + $php['min'] = $dep['version']; + $php['exclude'] = $dep['version']; + break; + case 'ge' : + if (!isset($dep['version'])) { + if ($dep['type'] == 'php') { + if (isset($dep['name'])) { + $dep['version'] = $dep['name']; + } + } + } + $php['min'] = $dep['version']; + break; + case 'lt' : + $php['max'] = $dep['version']; + $php['exclude'] = $dep['version']; + break; + case 'le' : + $php['max'] = $dep['version']; + break; + case 'eq' : + $php['min'] = $dep['version']; + $php['max'] = $dep['version']; + break; + case 'ne' : + $php['exclude'] = $dep['version']; + break; + case 'not' : + $php['conflicts'] = 'yes'; + break; + } + return $php; + } + + /** + * @param array + * @return array + */ + function _processPhpDeps($deps) + { + $test = array(); + foreach ($deps as $dep) { + $test[] = $this->_processDep($dep); + } + $min = array(); + $max = array(); + foreach ($test as $dep) { + if (!$dep) { + continue; + } + if (isset($dep['min'])) { + $min[$dep['min']] = count($min); + } + if (isset($dep['max'])) { + $max[$dep['max']] = count($max); + } + } + if (count($min) > 0) { + uksort($min, 'version_compare'); + } + if (count($max) > 0) { + uksort($max, 'version_compare'); + } + if (count($min)) { + // get the highest minimum + $min = array_pop($a = array_flip($min)); + } else { + $min = false; + } + if (count($max)) { + // get the lowest maximum + $max = array_shift($a = array_flip($max)); + } else { + $max = false; + } + if ($min) { + $php['min'] = $min; + } + if ($max) { + $php['max'] = $max; + } + $exclude = array(); + foreach ($test as $dep) { + if (!isset($dep['exclude'])) { + continue; + } + $exclude[] = $dep['exclude']; + } + if (count($exclude)) { + $php['exclude'] = $exclude; + } + return $php; + } + + /** + * process multiple dependencies that have a name, like package deps + * @param array + * @return array + * @access private + */ + function _processMultipleDepsName($deps) + { + $tests = array(); + foreach ($deps as $name => $dep) { + foreach ($dep as $d) { + $tests[$name][] = $this->_processDep($d); + } + } + foreach ($tests as $name => $test) { + $php = array(); + $min = array(); + $max = array(); + $php['name'] = $name; + foreach ($test as $dep) { + if (!$dep) { + continue; + } + if (isset($dep['channel'])) { + $php['channel'] = 'pear.php.net'; + } + if (isset($dep['conflicts']) && $dep['conflicts'] == 'yes') { + $php['conflicts'] = 'yes'; + } + if (isset($dep['min'])) { + $min[$dep['min']] = count($min); + } + if (isset($dep['max'])) { + $max[$dep['max']] = count($max); + } + } + if (count($min) > 0) { + uksort($min, 'version_compare'); + } + if (count($max) > 0) { + uksort($max, 'version_compare'); + } + if (count($min)) { + // get the highest minimum + $min = array_pop($a = array_flip($min)); + } else { + $min = false; + } + if (count($max)) { + // get the lowest maximum + $max = array_shift($a = array_flip($max)); + } else { + $max = false; + } + if ($min) { + $php['min'] = $min; + } + if ($max) { + $php['max'] = $max; + } + $exclude = array(); + foreach ($test as $dep) { + if (!isset($dep['exclude'])) { + continue; + } + $exclude[] = $dep['exclude']; + } + if (count($exclude)) { + $php['exclude'] = $exclude; + } + $ret[] = $php; + } + return $ret; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile/Generator/v2.php b/campcaster/src/tools/pear/src/PEAR/PackageFile/Generator/v2.php new file mode 100644 index 000000000..b72a16d1b --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile/Generator/v2.php @@ -0,0 +1,1533 @@ + + * @author Stephan Schmidt (original XML_Serializer code) + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: v2.php,v 1.34 2006/03/02 20:50:59 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * file/dir manipulation routines + */ +require_once 'System.php'; +/** + * This class converts a PEAR_PackageFile_v2 object into any output format. + * + * Supported output formats include array, XML string (using S. Schmidt's + * XML_Serializer, slightly customized) + * @category pear + * @package PEAR + * @author Greg Beaver + * @author Stephan Schmidt (original XML_Serializer code) + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_PackageFile_Generator_v2 +{ + /** + * default options for the serialization + * @access private + * @var array $_defaultOptions + */ + var $_defaultOptions = array( + 'indent' => ' ', // string used for indentation + 'linebreak' => "\n", // string used for newlines + 'typeHints' => false, // automatically add type hin attributes + 'addDecl' => true, // add an XML declaration + 'defaultTagName' => 'XML_Serializer_Tag', // tag used for indexed arrays or invalid names + 'classAsTagName' => false, // use classname for objects in indexed arrays + 'keyAttribute' => '_originalKey', // attribute where original key is stored + 'typeAttribute' => '_type', // attribute for type (only if typeHints => true) + 'classAttribute' => '_class', // attribute for class of objects (only if typeHints => true) + 'scalarAsAttributes' => false, // scalar values (strings, ints,..) will be serialized as attribute + 'prependAttributes' => '', // prepend string for attributes + 'indentAttributes' => false, // indent the attributes, if set to '_auto', it will indent attributes so they all start at the same column + 'mode' => 'simplexml', // use 'simplexml' to use parent name as tagname if transforming an indexed array + 'addDoctype' => false, // add a doctype declaration + 'doctype' => null, // supply a string or an array with id and uri ({@see PEAR_PackageFile_Generator_v2_PEAR_PackageFile_Generator_v2_XML_Util::getDoctypeDeclaration()} + 'rootName' => 'package', // name of the root tag + 'rootAttributes' => array( + 'version' => '2.0', + 'xmlns' => 'http://pear.php.net/dtd/package-2.0', + 'xmlns:tasks' => 'http://pear.php.net/dtd/tasks-1.0', + 'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance', + 'xsi:schemaLocation' => 'http://pear.php.net/dtd/tasks-1.0 +http://pear.php.net/dtd/tasks-1.0.xsd +http://pear.php.net/dtd/package-2.0 +http://pear.php.net/dtd/package-2.0.xsd', + ), // attributes of the root tag + 'attributesArray' => 'attribs', // all values in this key will be treated as attributes + 'contentName' => '_content', // this value will be used directly as content, instead of creating a new tag, may only be used in conjuction with attributesArray + 'beautifyFilelist' => false, + 'encoding' => 'UTF-8', + ); + + /** + * options for the serialization + * @access private + * @var array $options + */ + var $options = array(); + + /** + * current tag depth + * @var integer $_tagDepth + */ + var $_tagDepth = 0; + + /** + * serilialized representation of the data + * @var string $_serializedData + */ + var $_serializedData = null; + /** + * @var PEAR_PackageFile_v2 + */ + var $_packagefile; + /** + * @param PEAR_PackageFile_v2 + */ + function PEAR_PackageFile_Generator_v2(&$packagefile) + { + $this->_packagefile = &$packagefile; + } + + /** + * @return string + */ + function getPackagerVersion() + { + return '1.4.11'; + } + + /** + * @param PEAR_Packager + * @param bool generate a .tgz or a .tar + * @param string|null temporary directory to package in + */ + function toTgz(&$packager, $compress = true, $where = null) + { + $a = null; + return $this->toTgz2($packager, $a, $compress, $where); + } + + /** + * Package up both a package.xml and package2.xml for the same release + * @param PEAR_Packager + * @param PEAR_PackageFile_v1 + * @param bool generate a .tgz or a .tar + * @param string|null temporary directory to package in + */ + function toTgz2(&$packager, &$pf1, $compress = true, $where = null) + { + require_once 'Archive/Tar.php'; + if (!$this->_packagefile->isEquivalent($pf1)) { + return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: "' . + basename($pf1->getPackageFile()) . + '" is not equivalent to "' . basename($this->_packagefile->getPackageFile()) + . '"'); + } + if ($where === null) { + if (!($where = System::mktemp(array('-d')))) { + return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: mktemp failed'); + } + } elseif (!@System::mkDir(array('-p', $where))) { + return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: "' . $where . '" could' . + ' not be created'); + } + if (file_exists($where . DIRECTORY_SEPARATOR . 'package.xml') && + !is_file($where . DIRECTORY_SEPARATOR . 'package.xml')) { + return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: unable to save package.xml as' . + ' "' . $where . DIRECTORY_SEPARATOR . 'package.xml"'); + } + if (!$this->_packagefile->validate(PEAR_VALIDATE_PACKAGING)) { + return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: invalid package.xml'); + } + $ext = $compress ? '.tgz' : '.tar'; + $pkgver = $this->_packagefile->getPackage() . '-' . $this->_packagefile->getVersion(); + $dest_package = getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext; + if (file_exists(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext) && + !is_file(getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext)) { + return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: cannot create tgz file "' . + getcwd() . DIRECTORY_SEPARATOR . $pkgver . $ext . '"'); + } + if ($pkgfile = $this->_packagefile->getPackageFile()) { + $pkgdir = dirname(realpath($pkgfile)); + $pkgfile = basename($pkgfile); + } else { + return PEAR::raiseError('PEAR_Packagefile_v2::toTgz: package file object must ' . + 'be created from a real file'); + } + // {{{ Create the package file list + $filelist = array(); + $i = 0; + $this->_packagefile->flattenFilelist(); + $contents = $this->_packagefile->getContents(); + if (isset($contents['bundledpackage'])) { // bundles of packages + $contents = $contents['bundledpackage']; + if (!isset($contents[0])) { + $contents = array($contents); + } + $packageDir = $where; + foreach ($contents as $i => $package) { + $fname = $package; + $file = $pkgdir . DIRECTORY_SEPARATOR . $fname; + if (!file_exists($file)) { + return $packager->raiseError("File does not exist: $fname"); + } + $tfile = $packageDir . DIRECTORY_SEPARATOR . $fname; + System::mkdir(array('-p', dirname($tfile))); + copy($file, $tfile); + $filelist[$i++] = $tfile; + $packager->log(2, "Adding package $fname"); + } + } else { // normal packages + $contents = $contents['dir']['file']; + if (!isset($contents[0])) { + $contents = array($contents); + } + + $packageDir = $where; + foreach ($contents as $i => $file) { + $fname = $file['attribs']['name']; + $atts = $file['attribs']; + $orig = $file; + $file = $pkgdir . DIRECTORY_SEPARATOR . $fname; + if (!file_exists($file)) { + return $packager->raiseError("File does not exist: $fname"); + } else { + $tfile = $packageDir . DIRECTORY_SEPARATOR . $fname; + unset($orig['attribs']); + if (count($orig)) { // file with tasks + // run any package-time tasks + if (function_exists('file_get_contents')) { + $contents = file_get_contents($file); + } else { + $fp = fopen($file, "r"); + $contents = @fread($fp, filesize($file)); + fclose($fp); + } + foreach ($orig as $tag => $raw) { + $tag = str_replace($this->_packagefile->getTasksNs() . ':', '', $tag); + $task = "PEAR_Task_$tag"; + $task = &new $task($this->_packagefile->_config, + $this->_packagefile->_logger, + PEAR_TASK_PACKAGE); + $task->init($raw, $atts, null); + $res = $task->startSession($this->_packagefile, $contents, $tfile); + if (!$res) { + continue; // skip this task + } + if (PEAR::isError($res)) { + return $res; + } + $contents = $res; // save changes + System::mkdir(array('-p', dirname($tfile))); + $wp = fopen($tfile, "wb"); + fwrite($wp, $contents); + fclose($wp); + } + } + if (!file_exists($tfile)) { + System::mkdir(array('-p', dirname($tfile))); + copy($file, $tfile); + } + $filelist[$i++] = $tfile; + $this->_packagefile->setFileAttribute($fname, 'md5sum', md5_file($tfile), $i - 1); + $packager->log(2, "Adding file $fname"); + } + } + } + // }}} + if ($pf1 !== null) { + $name = 'package2.xml'; + } else { + $name = 'package.xml'; + } + $packagexml = $this->toPackageFile($where, PEAR_VALIDATE_PACKAGING, $name); + if ($packagexml) { + $tar =& new Archive_Tar($dest_package, $compress); + $tar->setErrorHandling(PEAR_ERROR_RETURN); // XXX Don't print errors + // ----- Creates with the package.xml file + $ok = $tar->createModify(array($packagexml), '', $where); + if (PEAR::isError($ok)) { + return $packager->raiseError($ok); + } elseif (!$ok) { + return $packager->raiseError('PEAR_Packagefile_v2::toTgz(): adding ' . $name . + ' failed'); + } + // ----- Add the content of the package + if (!$tar->addModify($filelist, $pkgver, $where)) { + return $packager->raiseError( + 'PEAR_Packagefile_v2::toTgz(): tarball creation failed'); + } + // add the package.xml version 1.0 + if ($pf1 !== null) { + $pfgen = &$pf1->getDefaultGenerator(); + $packagexml1 = $pfgen->toPackageFile($where, PEAR_VALIDATE_PACKAGING, + 'package.xml', true); + if (!$tar->addModify(array($packagexml1), '', $where)) { + return $packager->raiseError( + 'PEAR_Packagefile_v2::toTgz(): adding package.xml failed'); + } + } + return $dest_package; + } + } + + function toPackageFile($where = null, $state = PEAR_VALIDATE_NORMAL, $name = 'package.xml') + { + if (!$this->_packagefile->validate($state)) { + return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: invalid package.xml', + null, null, null, $this->_packagefile->getValidationWarnings()); + } + if ($where === null) { + if (!($where = System::mktemp(array('-d')))) { + return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: mktemp failed'); + } + } elseif (!@System::mkDir(array('-p', $where))) { + return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: "' . $where . '" could' . + ' not be created'); + } + $newpkgfile = $where . DIRECTORY_SEPARATOR . $name; + $np = @fopen($newpkgfile, 'wb'); + if (!$np) { + return PEAR::raiseError('PEAR_Packagefile_v2::toPackageFile: unable to save ' . + "$name as $newpkgfile"); + } + fwrite($np, $this->toXml($state)); + fclose($np); + return $newpkgfile; + } + + function &toV2() + { + return $this->_packagefile; + } + + /** + * Return an XML document based on the package info (as returned + * by the PEAR_Common::infoFrom* methods). + * + * @return string XML data + */ + function toXml($state = PEAR_VALIDATE_NORMAL, $options = array()) + { + $this->_packagefile->setDate(date('Y-m-d')); + $this->_packagefile->setTime(date('H:i:s')); + if (!$this->_packagefile->validate($state)) { + return false; + } + if (is_array($options)) { + $this->options = array_merge($this->_defaultOptions, $options); + } else { + $this->options = $this->_defaultOptions; + } + $arr = $this->_packagefile->getArray(); + if (isset($arr['filelist'])) { + unset($arr['filelist']); + } + if (isset($arr['_lastversion'])) { + unset($arr['_lastversion']); + } + if ($state ^ PEAR_VALIDATE_PACKAGING && !isset($arr['bundle'])) { + $use = $this->_recursiveXmlFilelist($arr['contents']['dir']['file']); + unset($arr['contents']['dir']['file']); + if (isset($use['dir'])) { + $arr['contents']['dir']['dir'] = $use['dir']; + } + if (isset($use['file'])) { + $arr['contents']['dir']['file'] = $use['file']; + } + $this->options['beautifyFilelist'] = true; + } + $arr['attribs']['packagerversion'] = '1.4.11'; + if ($this->serialize($arr, $options)) { + return $this->_serializedData . "\n"; + } + return false; + } + + + function _recursiveXmlFilelist($list) + { + $dirs = array(); + if (isset($list['attribs'])) { + $file = $list['attribs']['name']; + unset($list['attribs']['name']); + $attributes = $list['attribs']; + $this->_addDir($dirs, explode('/', dirname($file)), $file, $attributes); + } else { + foreach ($list as $a) { + $file = $a['attribs']['name']; + $attributes = $a['attribs']; + unset($a['attribs']); + $this->_addDir($dirs, explode('/', dirname($file)), $file, $attributes, $a); + } + } + $this->_formatDir($dirs); + $this->_deFormat($dirs); + return $dirs; + } + + function _addDir(&$dirs, $dir, $file = null, $attributes = null, $tasks = null) + { + if (!$tasks) { + $tasks = array(); + } + if ($dir == array() || $dir == array('.')) { + $dirs['file'][basename($file)] = $tasks; + $attributes['name'] = basename($file); + $dirs['file'][basename($file)]['attribs'] = $attributes; + return; + } + $curdir = array_shift($dir); + if (!isset($dirs['dir'][$curdir])) { + $dirs['dir'][$curdir] = array(); + } + $this->_addDir($dirs['dir'][$curdir], $dir, $file, $attributes, $tasks); + } + + function _formatDir(&$dirs) + { + if (!count($dirs)) { + return array(); + } + $newdirs = array(); + if (isset($dirs['dir'])) { + $newdirs['dir'] = $dirs['dir']; + } + if (isset($dirs['file'])) { + $newdirs['file'] = $dirs['file']; + } + $dirs = $newdirs; + if (isset($dirs['dir'])) { + uksort($dirs['dir'], 'strnatcasecmp'); + foreach ($dirs['dir'] as $dir => $contents) { + $this->_formatDir($dirs['dir'][$dir]); + } + } + if (isset($dirs['file'])) { + uksort($dirs['file'], 'strnatcasecmp'); + }; + } + + function _deFormat(&$dirs) + { + if (!count($dirs)) { + return array(); + } + $newdirs = array(); + if (isset($dirs['dir'])) { + foreach ($dirs['dir'] as $dir => $contents) { + $newdir = array(); + $newdir['attribs']['name'] = $dir; + $this->_deFormat($contents); + foreach ($contents as $tag => $val) { + $newdir[$tag] = $val; + } + $newdirs['dir'][] = $newdir; + } + if (count($newdirs['dir']) == 1) { + $newdirs['dir'] = $newdirs['dir'][0]; + } + } + if (isset($dirs['file'])) { + foreach ($dirs['file'] as $name => $file) { + $newdirs['file'][] = $file; + } + if (count($newdirs['file']) == 1) { + $newdirs['file'] = $newdirs['file'][0]; + } + } + $dirs = $newdirs; + } + + /** + * reset all options to default options + * + * @access public + * @see setOption(), XML_Unserializer() + */ + function resetOptions() + { + $this->options = $this->_defaultOptions; + } + + /** + * set an option + * + * You can use this method if you do not want to set all options in the constructor + * + * @access public + * @see resetOption(), XML_Serializer() + */ + function setOption($name, $value) + { + $this->options[$name] = $value; + } + + /** + * sets several options at once + * + * You can use this method if you do not want to set all options in the constructor + * + * @access public + * @see resetOption(), XML_Unserializer(), setOption() + */ + function setOptions($options) + { + $this->options = array_merge($this->options, $options); + } + + /** + * serialize data + * + * @access public + * @param mixed $data data to serialize + * @return boolean true on success, pear error on failure + */ + function serialize($data, $options = null) + { + // if options have been specified, use them instead + // of the previously defined ones + if (is_array($options)) { + $optionsBak = $this->options; + if (isset($options['overrideOptions']) && $options['overrideOptions'] == true) { + $this->options = array_merge($this->_defaultOptions, $options); + } else { + $this->options = array_merge($this->options, $options); + } + } + else { + $optionsBak = null; + } + + // start depth is zero + $this->_tagDepth = 0; + + $this->_serializedData = ''; + // serialize an array + if (is_array($data)) { + if (isset($this->options['rootName'])) { + $tagName = $this->options['rootName']; + } else { + $tagName = 'array'; + } + + $this->_serializedData .= $this->_serializeArray($data, $tagName, $this->options['rootAttributes']); + } + + // add doctype declaration + if ($this->options['addDoctype'] === true) { + $this->_serializedData = PEAR_PackageFile_Generator_v2_XML_Util::getDoctypeDeclaration($tagName, $this->options['doctype']) + . $this->options['linebreak'] + . $this->_serializedData; + } + + // build xml declaration + if ($this->options['addDecl']) { + $atts = array(); + if (isset($this->options['encoding']) ) { + $encoding = $this->options['encoding']; + } else { + $encoding = null; + } + $this->_serializedData = PEAR_PackageFile_Generator_v2_XML_Util::getXMLDeclaration('1.0', $encoding) + . $this->options['linebreak'] + . $this->_serializedData; + } + + + if ($optionsBak !== null) { + $this->options = $optionsBak; + } + + return true; + } + + /** + * get the result of the serialization + * + * @access public + * @return string serialized XML + */ + function getSerializedData() + { + if ($this->_serializedData == null ) { + return $this->raiseError('No serialized data available. Use XML_Serializer::serialize() first.', XML_SERIALIZER_ERROR_NO_SERIALIZATION); + } + return $this->_serializedData; + } + + /** + * serialize any value + * + * This method checks for the type of the value and calls the appropriate method + * + * @access private + * @param mixed $value + * @param string $tagName + * @param array $attributes + * @return string + */ + function _serializeValue($value, $tagName = null, $attributes = array()) + { + if (is_array($value)) { + $xml = $this->_serializeArray($value, $tagName, $attributes); + } elseif (is_object($value)) { + $xml = $this->_serializeObject($value, $tagName); + } else { + $tag = array( + 'qname' => $tagName, + 'attributes' => $attributes, + 'content' => $value + ); + $xml = $this->_createXMLTag($tag); + } + return $xml; + } + + /** + * serialize an array + * + * @access private + * @param array $array array to serialize + * @param string $tagName name of the root tag + * @param array $attributes attributes for the root tag + * @return string $string serialized data + * @uses PEAR_PackageFile_Generator_v2_XML_Util::isValidName() to check, whether key has to be substituted + */ + function _serializeArray(&$array, $tagName = null, $attributes = array()) + { + $_content = null; + + /** + * check for special attributes + */ + if ($this->options['attributesArray'] !== null) { + if (isset($array[$this->options['attributesArray']])) { + $attributes = $array[$this->options['attributesArray']]; + unset($array[$this->options['attributesArray']]); + } + /** + * check for special content + */ + if ($this->options['contentName'] !== null) { + if (isset($array[$this->options['contentName']])) { + $_content = $array[$this->options['contentName']]; + unset($array[$this->options['contentName']]); + } + } + } + + /* + * if mode is set to simpleXML, check whether + * the array is associative or indexed + */ + if (is_array($array) && $this->options['mode'] == 'simplexml') { + $indexed = true; + if (!count($array)) { + $indexed = false; + } + foreach ($array as $key => $val) { + if (!is_int($key)) { + $indexed = false; + break; + } + } + + if ($indexed && $this->options['mode'] == 'simplexml') { + $string = ''; + foreach ($array as $key => $val) { + if ($this->options['beautifyFilelist'] && $tagName == 'dir') { + if (!isset($this->_curdir)) { + $this->_curdir = ''; + } + $savedir = $this->_curdir; + if (isset($val['attribs'])) { + if ($val['attribs']['name'] == '/') { + $this->_curdir = '/'; + } else { + if ($this->_curdir == '/') { + $this->_curdir = ''; + } + $this->_curdir .= '/' . $val['attribs']['name']; + } + } + } + $string .= $this->_serializeValue( $val, $tagName, $attributes); + if ($this->options['beautifyFilelist'] && $tagName == 'dir') { + $string .= ' '; + if (empty($savedir)) { + unset($this->_curdir); + } else { + $this->_curdir = $savedir; + } + } + + $string .= $this->options['linebreak']; + // do indentation + if ($this->options['indent']!==null && $this->_tagDepth>0) { + $string .= str_repeat($this->options['indent'], $this->_tagDepth); + } + } + return rtrim($string); + } + } + + if ($this->options['scalarAsAttributes'] === true) { + foreach ($array as $key => $value) { + if (is_scalar($value) && (PEAR_PackageFile_Generator_v2_XML_Util::isValidName($key) === true)) { + unset($array[$key]); + $attributes[$this->options['prependAttributes'].$key] = $value; + } + } + } + + // check for empty array => create empty tag + if (empty($array)) { + $tag = array( + 'qname' => $tagName, + 'content' => $_content, + 'attributes' => $attributes + ); + + } else { + $this->_tagDepth++; + $tmp = $this->options['linebreak']; + foreach ($array as $key => $value) { + // do indentation + if ($this->options['indent']!==null && $this->_tagDepth>0) { + $tmp .= str_repeat($this->options['indent'], $this->_tagDepth); + } + + // copy key + $origKey = $key; + // key cannot be used as tagname => use default tag + $valid = PEAR_PackageFile_Generator_v2_XML_Util::isValidName($key); + if (PEAR::isError($valid)) { + if ($this->options['classAsTagName'] && is_object($value)) { + $key = get_class($value); + } else { + $key = $this->options['defaultTagName']; + } + } + $atts = array(); + if ($this->options['typeHints'] === true) { + $atts[$this->options['typeAttribute']] = gettype($value); + if ($key !== $origKey) { + $atts[$this->options['keyAttribute']] = (string)$origKey; + } + + } + if ($this->options['beautifyFilelist'] && $key == 'dir') { + if (!isset($this->_curdir)) { + $this->_curdir = ''; + } + $savedir = $this->_curdir; + if (isset($value['attribs'])) { + if ($value['attribs']['name'] == '/') { + $this->_curdir = '/'; + } else { + $this->_curdir .= '/' . $value['attribs']['name']; + } + } + } + + if (is_string($value) && $value && ($value{strlen($value) - 1} == "\n")) { + $value .= str_repeat($this->options['indent'], $this->_tagDepth); + } + $tmp .= $this->_createXMLTag(array( + 'qname' => $key, + 'attributes' => $atts, + 'content' => $value ) + ); + if ($this->options['beautifyFilelist'] && $key == 'dir') { + if (isset($value['attribs'])) { + $tmp .= ' '; + if (empty($savedir)) { + unset($this->_curdir); + } else { + $this->_curdir = $savedir; + } + } + } + $tmp .= $this->options['linebreak']; + } + + $this->_tagDepth--; + if ($this->options['indent']!==null && $this->_tagDepth>0) { + $tmp .= str_repeat($this->options['indent'], $this->_tagDepth); + } + + if (trim($tmp) === '') { + $tmp = null; + } + + $tag = array( + 'qname' => $tagName, + 'content' => $tmp, + 'attributes' => $attributes + ); + } + if ($this->options['typeHints'] === true) { + if (!isset($tag['attributes'][$this->options['typeAttribute']])) { + $tag['attributes'][$this->options['typeAttribute']] = 'array'; + } + } + + $string = $this->_createXMLTag($tag, false); + return $string; + } + + /** + * create a tag from an array + * this method awaits an array in the following format + * array( + * 'qname' => $tagName, + * 'attributes' => array(), + * 'content' => $content, // optional + * 'namespace' => $namespace // optional + * 'namespaceUri' => $namespaceUri // optional + * ) + * + * @access private + * @param array $tag tag definition + * @param boolean $replaceEntities whether to replace XML entities in content or not + * @return string $string XML tag + */ + function _createXMLTag( $tag, $replaceEntities = true ) + { + if ($this->options['indentAttributes'] !== false) { + $multiline = true; + $indent = str_repeat($this->options['indent'], $this->_tagDepth); + + if ($this->options['indentAttributes'] == '_auto') { + $indent .= str_repeat(' ', (strlen($tag['qname'])+2)); + + } else { + $indent .= $this->options['indentAttributes']; + } + } else { + $multiline = false; + $indent = false; + } + + if (is_array($tag['content'])) { + if (empty($tag['content'])) { + $tag['content'] = ''; + } + } elseif(is_scalar($tag['content']) && (string)$tag['content'] == '') { + $tag['content'] = ''; + } + + if (is_scalar($tag['content']) || is_null($tag['content'])) { + if ($this->options['encoding'] == 'UTF-8' && + version_compare(phpversion(), '5.0.0', 'lt')) { + $encoding = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_UTF8_XML; + } else { + $encoding = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML; + } + $tag = PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray($tag, $replaceEntities, $multiline, $indent, $this->options['linebreak'], $encoding); + } elseif (is_array($tag['content'])) { + $tag = $this->_serializeArray($tag['content'], $tag['qname'], $tag['attributes']); + } elseif (is_object($tag['content'])) { + $tag = $this->_serializeObject($tag['content'], $tag['qname'], $tag['attributes']); + } elseif (is_resource($tag['content'])) { + settype($tag['content'], 'string'); + $tag = PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray($tag, $replaceEntities); + } + return $tag; + } +} + +// well, it's one way to do things without extra deps ... +/* vim: set expandtab tabstop=4 shiftwidth=4: */ +// +----------------------------------------------------------------------+ +// | PHP Version 4 | +// +----------------------------------------------------------------------+ +// | Copyright (c) 1997-2002 The PHP Group | +// +----------------------------------------------------------------------+ +// | This source file is subject to version 2.0 of the PHP license, | +// | that is bundled with this package in the file LICENSE, and is | +// | available at through the world-wide-web at | +// | http://www.php.net/license/2_02.txt. | +// | If you did not receive a copy of the PHP license and are unable to | +// | obtain it through the world-wide-web, please send a note to | +// | license@php.net so we can mail you a copy immediately. | +// +----------------------------------------------------------------------+ +// | Authors: Stephan Schmidt | +// +----------------------------------------------------------------------+ +// +// $Id: v2.php,v 1.34 2006/03/02 20:50:59 cellog Exp $ + +/** + * error code for invalid chars in XML name + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ERROR_INVALID_CHARS", 51); + +/** + * error code for invalid chars in XML name + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ERROR_INVALID_START", 52); + +/** + * error code for non-scalar tag content + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ERROR_NON_SCALAR_CONTENT", 60); + +/** + * error code for missing tag name + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ERROR_NO_TAG_NAME", 61); + +/** + * replace XML entities + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_REPLACE_ENTITIES", 1); + +/** + * embedd content in a CData Section + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_CDATA_SECTION", 2); + +/** + * do not replace entitites + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_NONE", 0); + +/** + * replace all XML entitites + * This setting will replace <, >, ", ' and & + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML", 1); + +/** + * replace only required XML entitites + * This setting will replace <, " and & + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML_REQUIRED", 2); + +/** + * replace HTML entitites + * @link http://www.php.net/htmlentities + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_HTML", 3); + +/** + * replace all XML entitites, and encode from ISO-8859-1 to UTF-8 + * This setting will replace <, >, ", ' and & + */ +define("PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_UTF8_XML", 4); + +/** + * utility class for working with XML documents + * + * customized version of XML_Util 0.6.0 + * + * @category XML + * @package PEAR + * @version 0.6.0 + * @author Stephan Schmidt + * @author Gregory Beaver + */ +class PEAR_PackageFile_Generator_v2_XML_Util { + + /** + * return API version + * + * @access public + * @static + * @return string $version API version + */ + function apiVersion() + { + return "0.6"; + } + + /** + * replace XML entities + * + * With the optional second parameter, you may select, which + * entities should be replaced. + * + * + * require_once 'XML/Util.php'; + * + * // replace XML entites: + * $string = PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities("This string contains < & >."); + * + * + * @access public + * @static + * @param string string where XML special chars should be replaced + * @param integer setting for entities in attribute values (one of PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML_REQUIRED, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_HTML) + * @return string string with replaced chars + */ + function replaceEntities($string, $replaceEntities = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML) + { + switch ($replaceEntities) { + case PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_UTF8_XML: + return strtr(utf8_encode($string),array( + '&' => '&', + '>' => '>', + '<' => '<', + '"' => '"', + '\'' => ''' )); + break; + case PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML: + return strtr($string,array( + '&' => '&', + '>' => '>', + '<' => '<', + '"' => '"', + '\'' => ''' )); + break; + case PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML_REQUIRED: + return strtr($string,array( + '&' => '&', + '<' => '<', + '"' => '"' )); + break; + case PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_HTML: + return htmlspecialchars($string); + break; + } + return $string; + } + + /** + * build an xml declaration + * + * + * require_once 'XML/Util.php'; + * + * // get an XML declaration: + * $xmlDecl = PEAR_PackageFile_Generator_v2_XML_Util::getXMLDeclaration("1.0", "UTF-8", true); + * + * + * @access public + * @static + * @param string $version xml version + * @param string $encoding character encoding + * @param boolean $standAlone document is standalone (or not) + * @return string $decl xml declaration + * @uses PEAR_PackageFile_Generator_v2_XML_Util::attributesToString() to serialize the attributes of the XML declaration + */ + function getXMLDeclaration($version = "1.0", $encoding = null, $standalone = null) + { + $attributes = array( + "version" => $version, + ); + // add encoding + if ($encoding !== null) { + $attributes["encoding"] = $encoding; + } + // add standalone, if specified + if ($standalone !== null) { + $attributes["standalone"] = $standalone ? "yes" : "no"; + } + + return sprintf("", PEAR_PackageFile_Generator_v2_XML_Util::attributesToString($attributes, false)); + } + + /** + * build a document type declaration + * + * + * require_once 'XML/Util.php'; + * + * // get a doctype declaration: + * $xmlDecl = PEAR_PackageFile_Generator_v2_XML_Util::getDocTypeDeclaration("rootTag","myDocType.dtd"); + * + * + * @access public + * @static + * @param string $root name of the root tag + * @param string $uri uri of the doctype definition (or array with uri and public id) + * @param string $internalDtd internal dtd entries + * @return string $decl doctype declaration + * @since 0.2 + */ + function getDocTypeDeclaration($root, $uri = null, $internalDtd = null) + { + if (is_array($uri)) { + $ref = sprintf( ' PUBLIC "%s" "%s"', $uri["id"], $uri["uri"] ); + } elseif (!empty($uri)) { + $ref = sprintf( ' SYSTEM "%s"', $uri ); + } else { + $ref = ""; + } + + if (empty($internalDtd)) { + return sprintf("", $root, $ref); + } else { + return sprintf("", $root, $ref, $internalDtd); + } + } + + /** + * create string representation of an attribute list + * + * + * require_once 'XML/Util.php'; + * + * // build an attribute string + * $att = array( + * "foo" => "bar", + * "argh" => "tomato" + * ); + * + * $attList = PEAR_PackageFile_Generator_v2_XML_Util::attributesToString($att); + * + * + * @access public + * @static + * @param array $attributes attribute array + * @param boolean|array $sort sort attribute list alphabetically, may also be an assoc array containing the keys 'sort', 'multiline', 'indent', 'linebreak' and 'entities' + * @param boolean $multiline use linebreaks, if more than one attribute is given + * @param string $indent string used for indentation of multiline attributes + * @param string $linebreak string used for linebreaks of multiline attributes + * @param integer $entities setting for entities in attribute values (one of PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_NONE, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML_REQUIRED, PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_HTML) + * @return string string representation of the attributes + * @uses PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities() to replace XML entities in attribute values + * @todo allow sort also to be an options array + */ + function attributesToString($attributes, $sort = true, $multiline = false, $indent = ' ', $linebreak = "\n", $entities = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML) + { + /** + * second parameter may be an array + */ + if (is_array($sort)) { + if (isset($sort['multiline'])) { + $multiline = $sort['multiline']; + } + if (isset($sort['indent'])) { + $indent = $sort['indent']; + } + if (isset($sort['linebreak'])) { + $multiline = $sort['linebreak']; + } + if (isset($sort['entities'])) { + $entities = $sort['entities']; + } + if (isset($sort['sort'])) { + $sort = $sort['sort']; + } else { + $sort = true; + } + } + $string = ''; + if (is_array($attributes) && !empty($attributes)) { + if ($sort) { + ksort($attributes); + } + if( !$multiline || count($attributes) == 1) { + foreach ($attributes as $key => $value) { + if ($entities != PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_NONE) { + $value = PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities($value, $entities); + } + $string .= ' '.$key.'="'.$value.'"'; + } + } else { + $first = true; + foreach ($attributes as $key => $value) { + if ($entities != PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_NONE) { + $value = PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities($value, $entities); + } + if ($first) { + $string .= " ".$key.'="'.$value.'"'; + $first = false; + } else { + $string .= $linebreak.$indent.$key.'="'.$value.'"'; + } + } + } + } + return $string; + } + + /** + * create a tag + * + * This method will call PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray(), which + * is more flexible. + * + * + * require_once 'XML/Util.php'; + * + * // create an XML tag: + * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createTag("myNs:myTag", array("foo" => "bar"), "This is inside the tag", "http://www.w3c.org/myNs#"); + * + * + * @access public + * @static + * @param string $qname qualified tagname (including namespace) + * @param array $attributes array containg attributes + * @param mixed $content + * @param string $namespaceUri URI of the namespace + * @param integer $replaceEntities whether to replace XML special chars in content, embedd it in a CData section or none of both + * @param boolean $multiline whether to create a multiline tag where each attribute gets written to a single line + * @param string $indent string used to indent attributes (_auto indents attributes so they start at the same column) + * @param string $linebreak string used for linebreaks + * @param string $encoding encoding that should be used to translate content + * @return string $string XML tag + * @see PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray() + * @uses PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray() to create the tag + */ + function createTag($qname, $attributes = array(), $content = null, $namespaceUri = null, $replaceEntities = PEAR_PackageFile_Generator_v2_XML_Util_REPLACE_ENTITIES, $multiline = false, $indent = "_auto", $linebreak = "\n", $encoding = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML) + { + $tag = array( + "qname" => $qname, + "attributes" => $attributes + ); + + // add tag content + if ($content !== null) { + $tag["content"] = $content; + } + + // add namespace Uri + if ($namespaceUri !== null) { + $tag["namespaceUri"] = $namespaceUri; + } + + return PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray($tag, $replaceEntities, $multiline, $indent, $linebreak, $encoding); + } + + /** + * create a tag from an array + * this method awaits an array in the following format + * 
+    * array(
+    *  "qname"        => $qname         // qualified name of the tag
+    *  "namespace"    => $namespace     // namespace prefix (optional, if qname is specified or no namespace)
+    *  "localpart"    => $localpart,    // local part of the tagname (optional, if qname is specified)
+    *  "attributes"   => array(),       // array containing all attributes (optional)
+    *  "content"      => $content,      // tag content (optional)
+    *  "namespaceUri" => $namespaceUri  // namespaceUri for the given namespace (optional)
+    *   )
+    *
+ * + * + * require_once 'XML/Util.php'; + * + * $tag = array( + * "qname" => "foo:bar", + * "namespaceUri" => "http://foo.com", + * "attributes" => array( "key" => "value", "argh" => "fruit&vegetable" ), + * "content" => "I'm inside the tag", + * ); + * // creating a tag with qualified name and namespaceUri + * $string = PEAR_PackageFile_Generator_v2_XML_Util::createTagFromArray($tag); + * + * + * @access public + * @static + * @param array $tag tag definition + * @param integer $replaceEntities whether to replace XML special chars in content, embedd it in a CData section or none of both + * @param boolean $multiline whether to create a multiline tag where each attribute gets written to a single line + * @param string $indent string used to indent attributes (_auto indents attributes so they start at the same column) + * @param string $linebreak string used for linebreaks + * @return string $string XML tag + * @see PEAR_PackageFile_Generator_v2_XML_Util::createTag() + * @uses PEAR_PackageFile_Generator_v2_XML_Util::attributesToString() to serialize the attributes of the tag + * @uses PEAR_PackageFile_Generator_v2_XML_Util::splitQualifiedName() to get local part and namespace of a qualified name + */ + function createTagFromArray($tag, $replaceEntities = PEAR_PackageFile_Generator_v2_XML_Util_REPLACE_ENTITIES, $multiline = false, $indent = "_auto", $linebreak = "\n", $encoding = PEAR_PackageFile_Generator_v2_XML_Util_ENTITIES_XML) + { + if (isset($tag["content"]) && !is_scalar($tag["content"])) { + return PEAR_PackageFile_Generator_v2_XML_Util::raiseError( "Supplied non-scalar value as tag content", PEAR_PackageFile_Generator_v2_XML_Util_ERROR_NON_SCALAR_CONTENT ); + } + + if (!isset($tag['qname']) && !isset($tag['localPart'])) { + return PEAR_PackageFile_Generator_v2_XML_Util::raiseError( 'You must either supply a qualified name (qname) or local tag name (localPart).', PEAR_PackageFile_Generator_v2_XML_Util_ERROR_NO_TAG_NAME ); + } + + // if no attributes hav been set, use empty attributes + if (!isset($tag["attributes"]) || !is_array($tag["attributes"])) { + $tag["attributes"] = array(); + } + + // qualified name is not given + if (!isset($tag["qname"])) { + // check for namespace + if (isset($tag["namespace"]) && !empty($tag["namespace"])) { + $tag["qname"] = $tag["namespace"].":".$tag["localPart"]; + } else { + $tag["qname"] = $tag["localPart"]; + } + // namespace URI is set, but no namespace + } elseif (isset($tag["namespaceUri"]) && !isset($tag["namespace"])) { + $parts = PEAR_PackageFile_Generator_v2_XML_Util::splitQualifiedName($tag["qname"]); + $tag["localPart"] = $parts["localPart"]; + if (isset($parts["namespace"])) { + $tag["namespace"] = $parts["namespace"]; + } + } + + if (isset($tag["namespaceUri"]) && !empty($tag["namespaceUri"])) { + // is a namespace given + if (isset($tag["namespace"]) && !empty($tag["namespace"])) { + $tag["attributes"]["xmlns:".$tag["namespace"]] = $tag["namespaceUri"]; + } else { + // define this Uri as the default namespace + $tag["attributes"]["xmlns"] = $tag["namespaceUri"]; + } + } + + // check for multiline attributes + if ($multiline === true) { + if ($indent === "_auto") { + $indent = str_repeat(" ", (strlen($tag["qname"])+2)); + } + } + + // create attribute list + $attList = PEAR_PackageFile_Generator_v2_XML_Util::attributesToString($tag["attributes"], true, $multiline, $indent, $linebreak ); + if (!isset($tag["content"]) || (string)$tag["content"] == '') { + $tag = sprintf("<%s%s />", $tag["qname"], $attList); + } else { + if ($replaceEntities == PEAR_PackageFile_Generator_v2_XML_Util_REPLACE_ENTITIES) { + $tag["content"] = PEAR_PackageFile_Generator_v2_XML_Util::replaceEntities($tag["content"], $encoding); + } elseif ($replaceEntities == PEAR_PackageFile_Generator_v2_XML_Util_CDATA_SECTION) { + $tag["content"] = PEAR_PackageFile_Generator_v2_XML_Util::createCDataSection($tag["content"]); + } + $tag = sprintf("<%s%s>%s", $tag["qname"], $attList, $tag["content"], $tag["qname"] ); + } + return $tag; + } + + /** + * create a start element + * + * + * require_once 'XML/Util.php'; + * + * // create an XML start element: + * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createStartElement("myNs:myTag", array("foo" => "bar") ,"http://www.w3c.org/myNs#"); + * + * + * @access public + * @static + * @param string $qname qualified tagname (including namespace) + * @param array $attributes array containg attributes + * @param string $namespaceUri URI of the namespace + * @param boolean $multiline whether to create a multiline tag where each attribute gets written to a single line + * @param string $indent string used to indent attributes (_auto indents attributes so they start at the same column) + * @param string $linebreak string used for linebreaks + * @return string $string XML start element + * @see PEAR_PackageFile_Generator_v2_XML_Util::createEndElement(), PEAR_PackageFile_Generator_v2_XML_Util::createTag() + */ + function createStartElement($qname, $attributes = array(), $namespaceUri = null, $multiline = false, $indent = '_auto', $linebreak = "\n") + { + // if no attributes hav been set, use empty attributes + if (!isset($attributes) || !is_array($attributes)) { + $attributes = array(); + } + + if ($namespaceUri != null) { + $parts = PEAR_PackageFile_Generator_v2_XML_Util::splitQualifiedName($qname); + } + + // check for multiline attributes + if ($multiline === true) { + if ($indent === "_auto") { + $indent = str_repeat(" ", (strlen($qname)+2)); + } + } + + if ($namespaceUri != null) { + // is a namespace given + if (isset($parts["namespace"]) && !empty($parts["namespace"])) { + $attributes["xmlns:".$parts["namespace"]] = $namespaceUri; + } else { + // define this Uri as the default namespace + $attributes["xmlns"] = $namespaceUri; + } + } + + // create attribute list + $attList = PEAR_PackageFile_Generator_v2_XML_Util::attributesToString($attributes, true, $multiline, $indent, $linebreak); + $element = sprintf("<%s%s>", $qname, $attList); + return $element; + } + + /** + * create an end element + * + * + * require_once 'XML/Util.php'; + * + * // create an XML start element: + * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createEndElement("myNs:myTag"); + * + * + * @access public + * @static + * @param string $qname qualified tagname (including namespace) + * @return string $string XML end element + * @see PEAR_PackageFile_Generator_v2_XML_Util::createStartElement(), PEAR_PackageFile_Generator_v2_XML_Util::createTag() + */ + function createEndElement($qname) + { + $element = sprintf("", $qname); + return $element; + } + + /** + * create an XML comment + * + * + * require_once 'XML/Util.php'; + * + * // create an XML start element: + * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createComment("I am a comment"); + * + * + * @access public + * @static + * @param string $content content of the comment + * @return string $comment XML comment + */ + function createComment($content) + { + $comment = sprintf("", $content); + return $comment; + } + + /** + * create a CData section + * + * + * require_once 'XML/Util.php'; + * + * // create a CData section + * $tag = PEAR_PackageFile_Generator_v2_XML_Util::createCDataSection("I am content."); + * + * + * @access public + * @static + * @param string $data data of the CData section + * @return string $string CData section with content + */ + function createCDataSection($data) + { + return sprintf("", $data); + } + + /** + * split qualified name and return namespace and local part + * + * + * require_once 'XML/Util.php'; + * + * // split qualified tag + * $parts = PEAR_PackageFile_Generator_v2_XML_Util::splitQualifiedName("xslt:stylesheet"); + * + * the returned array will contain two elements: + * 
+    * array(
+    *       "namespace" => "xslt",
+    *       "localPart" => "stylesheet"
+    *      );
+    *
+ * + * @access public + * @static + * @param string $qname qualified tag name + * @param string $defaultNs default namespace (optional) + * @return array $parts array containing namespace and local part + */ + function splitQualifiedName($qname, $defaultNs = null) + { + if (strstr($qname, ':')) { + $tmp = explode(":", $qname); + return array( + "namespace" => $tmp[0], + "localPart" => $tmp[1] + ); + } + return array( + "namespace" => $defaultNs, + "localPart" => $qname + ); + } + + /** + * check, whether string is valid XML name + * + *

XML names are used for tagname, attribute names and various + * other, lesser known entities.

+ *

An XML name may only consist of alphanumeric characters, + * dashes, undescores and periods, and has to start with a letter + * or an underscore. + *

+ * + * + * require_once 'XML/Util.php'; + * + * // verify tag name + * $result = PEAR_PackageFile_Generator_v2_XML_Util::isValidName("invalidTag?"); + * if (PEAR_PackageFile_Generator_v2_XML_Util::isError($result)) { + * print "Invalid XML name: " . $result->getMessage(); + * } + * + * + * @access public + * @static + * @param string $string string that should be checked + * @return mixed $valid true, if string is a valid XML name, PEAR error otherwise + * @todo support for other charsets + */ + function isValidName($string) + { + // check for invalid chars + if (!preg_match("/^[[:alnum:]_\-.]$/", $string{0})) { + return PEAR_PackageFile_Generator_v2_XML_Util::raiseError( "XML names may only start with letter or underscore", PEAR_PackageFile_Generator_v2_XML_Util_ERROR_INVALID_START ); + } + + // check for invalid chars + if (!preg_match("/^([a-zA-Z_]([a-zA-Z0-9_\-\.]*)?:)?[a-zA-Z_]([a-zA-Z0-9_\-\.]+)?$/", $string)) { + return PEAR_PackageFile_Generator_v2_XML_Util::raiseError( "XML names may only contain alphanumeric chars, period, hyphen, colon and underscores", PEAR_PackageFile_Generator_v2_XML_Util_ERROR_INVALID_CHARS ); + } + // XML name is valid + return true; + } + + /** + * replacement for PEAR_PackageFile_Generator_v2_XML_Util::raiseError + * + * Avoids the necessity to always require + * PEAR.php + * + * @access public + * @param string error message + * @param integer error code + * @return object PEAR_Error + */ + function raiseError($msg, $code) + { + require_once 'PEAR.php'; + return PEAR::raiseError($msg, $code); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile/Parser/v1.php b/campcaster/src/tools/pear/src/PEAR/PackageFile/Parser/v1.php new file mode 100644 index 000000000..9ade998c8 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile/Parser/v1.php @@ -0,0 +1,461 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: v1.php,v 1.21 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * package.xml abstraction class + */ +require_once 'PEAR/PackageFile/v1.php'; +/** + * Parser for package.xml version 1.0 + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: @PEAR-VER@ + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_PackageFile_Parser_v1 +{ + var $_registry; + var $_config; + var $_logger; + /** + * BC hack to allow PEAR_Common::infoFromString() to sort of + * work with the version 2.0 format - there's no filelist though + * @param PEAR_PackageFile_v2 + */ + function fromV2($packagefile) + { + $info = $packagefile->getArray(true); + $ret = new PEAR_PackageFile_v1; + $ret->fromArray($info['old']); + } + + function setConfig(&$c) + { + $this->_config = &$c; + $this->_registry = &$c->getRegistry(); + } + + function setLogger(&$l) + { + $this->_logger = &$l; + } + + /** + * @param string contents of package.xml file, version 1.0 + * @return bool success of parsing + */ + function parse($data, $file, $archive = false) + { + if (!extension_loaded('xml')) { + return PEAR::raiseError('Cannot create xml parser for parsing package.xml, no xml extension'); + } + $xp = @xml_parser_create(); + if (!$xp) { + return PEAR::raiseError('Cannot create xml parser for parsing package.xml'); + } + xml_set_object($xp, $this); + xml_set_element_handler($xp, '_element_start_1_0', '_element_end_1_0'); + xml_set_character_data_handler($xp, '_pkginfo_cdata_1_0'); + xml_parser_set_option($xp, XML_OPTION_CASE_FOLDING, false); + + $this->element_stack = array(); + $this->_packageInfo = array('provides' => array()); + $this->current_element = false; + unset($this->dir_install); + $this->_packageInfo['filelist'] = array(); + $this->filelist =& $this->_packageInfo['filelist']; + $this->dir_names = array(); + $this->in_changelog = false; + $this->d_i = 0; + $this->cdata = ''; + $this->_isValid = true; + + if (!xml_parse($xp, $data, 1)) { + $code = xml_get_error_code($xp); + $line = xml_get_current_line_number($xp); + xml_parser_free($xp); + return PEAR::raiseError(sprintf("XML error: %s at line %d", + $str = xml_error_string($code), $line), 2); + } + + xml_parser_free($xp); + + $pf = new PEAR_PackageFile_v1; + $pf->setConfig($this->_config); + if (isset($this->_logger)) { + $pf->setLogger($this->_logger); + } + $pf->setPackagefile($file, $archive); + $pf->fromArray($this->_packageInfo); + return $pf; + } + // {{{ _unIndent() + + /** + * Unindent given string + * + * @param string $str The string that has to be unindented. + * @return string + * @access private + */ + function _unIndent($str) + { + // remove leading newlines + $str = preg_replace('/^[\r\n]+/', '', $str); + // find whitespace at the beginning of the first line + $indent_len = strspn($str, " \t"); + $indent = substr($str, 0, $indent_len); + $data = ''; + // remove the same amount of whitespace from following lines + foreach (explode("\n", $str) as $line) { + if (substr($line, 0, $indent_len) == $indent) { + $data .= substr($line, $indent_len) . "\n"; + } + } + return $data; + } + + // Support for package DTD v1.0: + // {{{ _element_start_1_0() + + /** + * XML parser callback for ending elements. Used for version 1.0 + * packages. + * + * @param resource $xp XML parser resource + * @param string $name name of ending element + * + * @return void + * + * @access private + */ + function _element_start_1_0($xp, $name, $attribs) + { + array_push($this->element_stack, $name); + $this->current_element = $name; + $spos = sizeof($this->element_stack) - 2; + $this->prev_element = ($spos >= 0) ? $this->element_stack[$spos] : ''; + $this->current_attributes = $attribs; + $this->cdata = ''; + switch ($name) { + case 'dir': + if ($this->in_changelog) { + break; + } + if (array_key_exists('name', $attribs) && $attribs['name'] != '/') { + $attribs['name'] = preg_replace(array('!\\\\+!', '!/+!'), array('/', '/'), + $attribs['name']); + if (strrpos($attribs['name'], '/') == strlen($attribs['name']) - 1) { + $attribs['name'] = substr($attribs['name'], 0, + strlen($attribs['name']) - 1); + } + if (strpos($attribs['name'], '/') === 0) { + $attribs['name'] = substr($attribs['name'], 1); + } + $this->dir_names[] = $attribs['name']; + } + if (isset($attribs['baseinstalldir'])) { + $this->dir_install = $attribs['baseinstalldir']; + } + if (isset($attribs['role'])) { + $this->dir_role = $attribs['role']; + } + break; + case 'file': + if ($this->in_changelog) { + break; + } + if (isset($attribs['name'])) { + $path = ''; + if (count($this->dir_names)) { + foreach ($this->dir_names as $dir) { + $path .= $dir . '/'; + } + } + $path .= preg_replace(array('!\\\\+!', '!/+!'), array('/', '/'), + $attribs['name']); + unset($attribs['name']); + $this->current_path = $path; + $this->filelist[$path] = $attribs; + // Set the baseinstalldir only if the file don't have this attrib + if (!isset($this->filelist[$path]['baseinstalldir']) && + isset($this->dir_install)) + { + $this->filelist[$path]['baseinstalldir'] = $this->dir_install; + } + // Set the Role + if (!isset($this->filelist[$path]['role']) && isset($this->dir_role)) { + $this->filelist[$path]['role'] = $this->dir_role; + } + } + break; + case 'replace': + if (!$this->in_changelog) { + $this->filelist[$this->current_path]['replacements'][] = $attribs; + } + break; + case 'maintainers': + $this->_packageInfo['maintainers'] = array(); + $this->m_i = 0; // maintainers array index + break; + case 'maintainer': + // compatibility check + if (!isset($this->_packageInfo['maintainers'])) { + $this->_packageInfo['maintainers'] = array(); + $this->m_i = 0; + } + $this->_packageInfo['maintainers'][$this->m_i] = array(); + $this->current_maintainer =& $this->_packageInfo['maintainers'][$this->m_i]; + break; + case 'changelog': + $this->_packageInfo['changelog'] = array(); + $this->c_i = 0; // changelog array index + $this->in_changelog = true; + break; + case 'release': + if ($this->in_changelog) { + $this->_packageInfo['changelog'][$this->c_i] = array(); + $this->current_release = &$this->_packageInfo['changelog'][$this->c_i]; + } else { + $this->current_release = &$this->_packageInfo; + } + break; + case 'deps': + if (!$this->in_changelog) { + $this->_packageInfo['release_deps'] = array(); + } + break; + case 'dep': + // dependencies array index + if (!$this->in_changelog) { + $this->d_i++; + isset($attribs['type']) ? ($attribs['type'] = strtolower($attribs['type'])) : false; + $this->_packageInfo['release_deps'][$this->d_i] = $attribs; + } + break; + case 'configureoptions': + if (!$this->in_changelog) { + $this->_packageInfo['configure_options'] = array(); + } + break; + case 'configureoption': + if (!$this->in_changelog) { + $this->_packageInfo['configure_options'][] = $attribs; + } + break; + case 'provides': + if (empty($attribs['type']) || empty($attribs['name'])) { + break; + } + $attribs['explicit'] = true; + $this->_packageInfo['provides']["$attribs[type];$attribs[name]"] = $attribs; + break; + case 'package' : + if (isset($attribs['version'])) { + $this->_packageInfo['xsdversion'] = trim($attribs['version']); + } else { + $this->_packageInfo['xsdversion'] = '1.0'; + } + if (isset($attribs['packagerversion'])) { + $this->_packageInfo['packagerversion'] = $attribs['packagerversion']; + } + break; + } + } + + // }}} + // {{{ _element_end_1_0() + + /** + * XML parser callback for ending elements. Used for version 1.0 + * packages. + * + * @param resource $xp XML parser resource + * @param string $name name of ending element + * + * @return void + * + * @access private + */ + function _element_end_1_0($xp, $name) + { + $data = trim($this->cdata); + switch ($name) { + case 'name': + switch ($this->prev_element) { + case 'package': + $this->_packageInfo['package'] = $data; + break; + case 'maintainer': + $this->current_maintainer['name'] = $data; + break; + } + break; + case 'extends' : + $this->_packageInfo['extends'] = $data; + break; + case 'summary': + $this->_packageInfo['summary'] = $data; + break; + case 'description': + $data = $this->_unIndent($this->cdata); + $this->_packageInfo['description'] = $data; + break; + case 'user': + $this->current_maintainer['handle'] = $data; + break; + case 'email': + $this->current_maintainer['email'] = $data; + break; + case 'role': + $this->current_maintainer['role'] = $data; + break; + case 'version': + //$data = ereg_replace ('[^a-zA-Z0-9._\-]', '_', $data); + if ($this->in_changelog) { + $this->current_release['version'] = $data; + } else { + $this->_packageInfo['version'] = $data; + } + break; + case 'date': + if ($this->in_changelog) { + $this->current_release['release_date'] = $data; + } else { + $this->_packageInfo['release_date'] = $data; + } + break; + case 'notes': + // try to "de-indent" release notes in case someone + // has been over-indenting their xml ;-) + $data = $this->_unIndent($this->cdata); + if ($this->in_changelog) { + $this->current_release['release_notes'] = $data; + } else { + $this->_packageInfo['release_notes'] = $data; + } + break; + case 'warnings': + if ($this->in_changelog) { + $this->current_release['release_warnings'] = $data; + } else { + $this->_packageInfo['release_warnings'] = $data; + } + break; + case 'state': + if ($this->in_changelog) { + $this->current_release['release_state'] = $data; + } else { + $this->_packageInfo['release_state'] = $data; + } + break; + case 'license': + if ($this->in_changelog) { + $this->current_release['release_license'] = $data; + } else { + $this->_packageInfo['release_license'] = $data; + } + break; + case 'dep': + if ($data && !$this->in_changelog) { + $this->_packageInfo['release_deps'][$this->d_i]['name'] = $data; + } + break; + case 'dir': + if ($this->in_changelog) { + break; + } + array_pop($this->dir_names); + break; + case 'file': + if ($this->in_changelog) { + break; + } + if ($data) { + $path = ''; + if (count($this->dir_names)) { + foreach ($this->dir_names as $dir) { + $path .= $dir . '/'; + } + } + $path .= $data; + $this->filelist[$path] = $this->current_attributes; + // Set the baseinstalldir only if the file don't have this attrib + if (!isset($this->filelist[$path]['baseinstalldir']) && + isset($this->dir_install)) + { + $this->filelist[$path]['baseinstalldir'] = $this->dir_install; + } + // Set the Role + if (!isset($this->filelist[$path]['role']) && isset($this->dir_role)) { + $this->filelist[$path]['role'] = $this->dir_role; + } + } + break; + case 'maintainer': + if (empty($this->_packageInfo['maintainers'][$this->m_i]['role'])) { + $this->_packageInfo['maintainers'][$this->m_i]['role'] = 'lead'; + } + $this->m_i++; + break; + case 'release': + if ($this->in_changelog) { + $this->c_i++; + } + break; + case 'changelog': + $this->in_changelog = false; + break; + } + array_pop($this->element_stack); + $spos = sizeof($this->element_stack) - 1; + $this->current_element = ($spos > 0) ? $this->element_stack[$spos] : ''; + $this->cdata = ''; + } + + // }}} + // {{{ _pkginfo_cdata_1_0() + + /** + * XML parser callback for character data. Used for version 1.0 + * packages. + * + * @param resource $xp XML parser resource + * @param string $name character data + * + * @return void + * + * @access private + */ + function _pkginfo_cdata_1_0($xp, $data) + { + if (isset($this->cdata)) { + $this->cdata .= $data; + } + } + + // }}} +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile/Parser/v2.php b/campcaster/src/tools/pear/src/PEAR/PackageFile/Parser/v2.php new file mode 100644 index 000000000..e791c5e0a --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile/Parser/v2.php @@ -0,0 +1,115 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: v2.php,v 1.19 2006/01/23 17:39:52 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * base xml parser class + */ +require_once 'PEAR/XMLParser.php'; +require_once 'PEAR/PackageFile/v2.php'; +/** + * Parser for package.xml version 2.0 + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: @PEAR-VER@ + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_PackageFile_Parser_v2 extends PEAR_XMLParser +{ + var $_config; + var $_logger; + var $_registry; + + function setConfig(&$c) + { + $this->_config = &$c; + $this->_registry = &$c->getRegistry(); + } + + function setLogger(&$l) + { + $this->_logger = &$l; + } + /** + * Unindent given string + * + * @param string $str The string that has to be unindented. + * @return string + * @access private + */ + function _unIndent($str) + { + // remove leading newlines + $str = preg_replace('/^[\r\n]+/', '', $str); + // find whitespace at the beginning of the first line + $indent_len = strspn($str, " \t"); + $indent = substr($str, 0, $indent_len); + $data = ''; + // remove the same amount of whitespace from following lines + foreach (explode("\n", $str) as $line) { + if (substr($line, 0, $indent_len) == $indent) { + $data .= substr($line, $indent_len) . "\n"; + } + } + return $data; + } + + /** + * post-process data + * + * @param string $data + * @param string $element element name + */ + function postProcess($data, $element) + { + if ($element == 'notes') { + return trim($this->_unIndent($data)); + } + return trim($data); + } + + /** + * @param string + * @param string file name of the package.xml + * @param string|false name of the archive this package.xml came from, if any + * @param string class name to instantiate and return. This must be PEAR_PackageFile_v2 or + * a subclass + * @return PEAR_PackageFile_v2 + */ + function &parse($data, $file, $archive = false, $class = 'PEAR_PackageFile_v2') + { + if (PEAR::isError($err = parent::parse($data, $file))) { + return $err; + } + $ret = new $class; + $ret->setConfig($this->_config); + if (isset($this->_logger)) { + $ret->setLogger($this->_logger); + } + $ret->fromArray($this->_unserializedData); + $ret->setPackagefile($file, $archive); + return $ret; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile/v1.php b/campcaster/src/tools/pear/src/PEAR/PackageFile/v1.php new file mode 100644 index 000000000..089ac1c8d --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile/v1.php @@ -0,0 +1,1600 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: v1.php,v 1.69 2006/03/02 18:14:13 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * For error handling + */ +require_once 'PEAR/ErrorStack.php'; + +/** + * Error code if parsing is attempted with no xml extension + */ +define('PEAR_PACKAGEFILE_ERROR_NO_XML_EXT', 3); + +/** + * Error code if creating the xml parser resource fails + */ +define('PEAR_PACKAGEFILE_ERROR_CANT_MAKE_PARSER', 4); + +/** + * Error code used for all sax xml parsing errors + */ +define('PEAR_PACKAGEFILE_ERROR_PARSER_ERROR', 5); + +/** + * Error code used when there is no name + */ +define('PEAR_PACKAGEFILE_ERROR_NO_NAME', 6); + +/** + * Error code when a package name is not valid + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_NAME', 7); + +/** + * Error code used when no summary is parsed + */ +define('PEAR_PACKAGEFILE_ERROR_NO_SUMMARY', 8); + +/** + * Error code for summaries that are more than 1 line + */ +define('PEAR_PACKAGEFILE_ERROR_MULTILINE_SUMMARY', 9); + +/** + * Error code used when no description is present + */ +define('PEAR_PACKAGEFILE_ERROR_NO_DESCRIPTION', 10); + +/** + * Error code used when no license is present + */ +define('PEAR_PACKAGEFILE_ERROR_NO_LICENSE', 11); + +/** + * Error code used when a version number is not present + */ +define('PEAR_PACKAGEFILE_ERROR_NO_VERSION', 12); + +/** + * Error code used when a version number is invalid + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_VERSION', 13); + +/** + * Error code when release state is missing + */ +define('PEAR_PACKAGEFILE_ERROR_NO_STATE', 14); + +/** + * Error code when release state is invalid + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_STATE', 15); + +/** + * Error code when release state is missing + */ +define('PEAR_PACKAGEFILE_ERROR_NO_DATE', 16); + +/** + * Error code when release state is invalid + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_DATE', 17); + +/** + * Error code when no release notes are found + */ +define('PEAR_PACKAGEFILE_ERROR_NO_NOTES', 18); + +/** + * Error code when no maintainers are found + */ +define('PEAR_PACKAGEFILE_ERROR_NO_MAINTAINERS', 19); + +/** + * Error code when a maintainer has no handle + */ +define('PEAR_PACKAGEFILE_ERROR_NO_MAINTHANDLE', 20); + +/** + * Error code when a maintainer has no handle + */ +define('PEAR_PACKAGEFILE_ERROR_NO_MAINTROLE', 21); + +/** + * Error code when a maintainer has no name + */ +define('PEAR_PACKAGEFILE_ERROR_NO_MAINTNAME', 22); + +/** + * Error code when a maintainer has no email + */ +define('PEAR_PACKAGEFILE_ERROR_NO_MAINTEMAIL', 23); + +/** + * Error code when a maintainer has no handle + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_MAINTROLE', 24); + +/** + * Error code when a dependency is not a PHP dependency, but has no name + */ +define('PEAR_PACKAGEFILE_ERROR_NO_DEPNAME', 25); + +/** + * Error code when a dependency has no type (pkg, php, etc.) + */ +define('PEAR_PACKAGEFILE_ERROR_NO_DEPTYPE', 26); + +/** + * Error code when a dependency has no relation (lt, ge, has, etc.) + */ +define('PEAR_PACKAGEFILE_ERROR_NO_DEPREL', 27); + +/** + * Error code when a dependency is not a 'has' relation, but has no version + */ +define('PEAR_PACKAGEFILE_ERROR_NO_DEPVERSION', 28); + +/** + * Error code when a dependency has an invalid relation + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_DEPREL', 29); + +/** + * Error code when a dependency has an invalid type + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_DEPTYPE', 30); + +/** + * Error code when a dependency has an invalid optional option + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_DEPOPTIONAL', 31); + +/** + * Error code when a dependency is a pkg dependency, and has an invalid package name + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_DEPNAME', 32); + +/** + * Error code when a dependency has a channel="foo" attribute, and foo is not a registered channel + */ +define('PEAR_PACKAGEFILE_ERROR_UNKNOWN_DEPCHANNEL', 33); + +/** + * Error code when rel="has" and version attribute is present. + */ +define('PEAR_PACKAGEFILE_ERROR_DEPVERSION_IGNORED', 34); + +/** + * Error code when type="php" and dependency name is present + */ +define('PEAR_PACKAGEFILE_ERROR_DEPNAME_IGNORED', 35); + +/** + * Error code when a configure option has no name + */ +define('PEAR_PACKAGEFILE_ERROR_NO_CONFNAME', 36); + +/** + * Error code when a configure option has no name + */ +define('PEAR_PACKAGEFILE_ERROR_NO_CONFPROMPT', 37); + +/** + * Error code when a file in the filelist has an invalid role + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_FILEROLE', 38); + +/** + * Error code when a file in the filelist has no role + */ +define('PEAR_PACKAGEFILE_ERROR_NO_FILEROLE', 39); + +/** + * Error code when analyzing a php source file that has parse errors + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_PHPFILE', 40); + +/** + * Error code when analyzing a php source file reveals a source element + * without a package name prefix + */ +define('PEAR_PACKAGEFILE_ERROR_NO_PNAME_PREFIX', 41); + +/** + * Error code when an unknown channel is specified + */ +define('PEAR_PACKAGEFILE_ERROR_UNKNOWN_CHANNEL', 42); + +/** + * Error code when no files are found in the filelist + */ +define('PEAR_PACKAGEFILE_ERROR_NO_FILES', 43); + +/** + * Error code when a file is not valid php according to _analyzeSourceCode() + */ +define('PEAR_PACKAGEFILE_ERROR_INVALID_FILE', 44); + +/** + * Error code when the channel validator returns an error or warning + */ +define('PEAR_PACKAGEFILE_ERROR_CHANNELVAL', 45); + +/** + * Error code when a php5 package is packaged in php4 (analysis doesn't work) + */ +define('PEAR_PACKAGEFILE_ERROR_PHP5', 46); + +/** + * Error code when a file is listed in package.xml but does not exist + */ +define('PEAR_PACKAGEFILE_ERROR_FILE_NOTFOUND', 47); + +/** + * Error code when a + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_PackageFile_v1 +{ + /** + * @access private + * @var PEAR_ErrorStack + * @access private + */ + var $_stack; + + /** + * A registry object, used to access the package name validation regex for non-standard channels + * @var PEAR_Registry + * @access private + */ + var $_registry; + + /** + * An object that contains a log method that matches PEAR_Common::log's signature + * @var object + * @access private + */ + var $_logger; + + /** + * Parsed package information + * @var array + * @access private + */ + var $_packageInfo; + + /** + * path to package.xml + * @var string + * @access private + */ + var $_packageFile; + + /** + * path to package .tgz or false if this is a local/extracted package.xml + * @var string + * @access private + */ + var $_archiveFile; + + /** + * @var int + * @access private + */ + var $_isValid = 0; + + /** + * Determines whether this packagefile was initialized only with partial package info + * + * If this package file was constructed via parsing REST, it will only contain + * + * - package name + * - channel name + * - dependencies + * @var boolean + * @access private + */ + var $_incomplete = true; + + /** + * @param bool determines whether to return a PEAR_Error object, or use the PEAR_ErrorStack + * @param string Name of Error Stack class to use. + */ + function PEAR_PackageFile_v1() + { + $this->_stack = &new PEAR_ErrorStack('PEAR_PackageFile_v1'); + $this->_stack->setErrorMessageTemplate($this->_getErrorMessage()); + $this->_isValid = 0; + } + + function installBinary($installer) + { + return false; + } + + function isExtension($name) + { + return false; + } + + function setConfig(&$config) + { + $this->_config = &$config; + $this->_registry = &$config->getRegistry(); + } + + function setRequestedGroup() + { + // placeholder + } + + /** + * For saving in the registry. + * + * Set the last version that was installed + * @param string + */ + function setLastInstalledVersion($version) + { + $this->_packageInfo['_lastversion'] = $version; + } + + /** + * @return string|false + */ + function getLastInstalledVersion() + { + if (isset($this->_packageInfo['_lastversion'])) { + return $this->_packageInfo['_lastversion']; + } + return false; + } + + function getInstalledBinary() + { + return false; + } + + function listPostinstallScripts() + { + return false; + } + + function initPostinstallScripts() + { + return false; + } + + function setLogger(&$logger) + { + if ($logger && (!is_object($logger) || !method_exists($logger, 'log'))) { + return PEAR::raiseError('Logger must be compatible with PEAR_Common::log'); + } + $this->_logger = &$logger; + } + + function setPackagefile($file, $archive = false) + { + $this->_packageFile = $file; + $this->_archiveFile = $archive ? $archive : $file; + } + + function getPackageFile() + { + return isset($this->_packageFile) ? $this->_packageFile : false; + } + + function getPackageType() + { + return 'php'; + } + + function getArchiveFile() + { + return $this->_archiveFile; + } + + function packageInfo($field) + { + if (!is_string($field) || empty($field) || + !isset($this->_packageInfo[$field])) { + return false; + } + return $this->_packageInfo[$field]; + } + + function setDirtree($path) + { + $this->_packageInfo['dirtree'][$path] = true; + } + + function getDirtree() + { + if (isset($this->_packageInfo['dirtree']) && count($this->_packageInfo['dirtree'])) { + return $this->_packageInfo['dirtree']; + } + return false; + } + + function resetDirtree() + { + unset($this->_packageInfo['dirtree']); + } + + function fromArray($pinfo) + { + $this->_incomplete = false; + $this->_packageInfo = $pinfo; + } + + function isIncomplete() + { + return $this->_incomplete; + } + + function getChannel() + { + return 'pear.php.net'; + } + + function getUri() + { + return false; + } + + function getTime() + { + return false; + } + + function getExtends() + { + if (isset($this->_packageInfo['extends'])) { + return $this->_packageInfo['extends']; + } + return false; + } + + /** + * @return array + */ + function toArray() + { + if (!$this->validate(PEAR_VALIDATE_NORMAL)) { + return false; + } + return $this->getArray(); + } + + function getArray() + { + return $this->_packageInfo; + } + + function getName() + { + return $this->getPackage(); + } + + function getPackage() + { + if (isset($this->_packageInfo['package'])) { + return $this->_packageInfo['package']; + } + return false; + } + + /** + * WARNING - don't use this unless you know what you are doing + */ + function setRawPackage($package) + { + $this->_packageInfo['package'] = $package; + } + + function setPackage($package) + { + $this->_packageInfo['package'] = $package; + $this->_isValid = false; + } + + function getVersion() + { + if (isset($this->_packageInfo['version'])) { + return $this->_packageInfo['version']; + } + return false; + } + + function setVersion($version) + { + $this->_packageInfo['version'] = $version; + $this->_isValid = false; + } + + function clearMaintainers() + { + unset($this->_packageInfo['maintainers']); + } + + function getMaintainers() + { + if (isset($this->_packageInfo['maintainers'])) { + return $this->_packageInfo['maintainers']; + } + return false; + } + + /** + * Adds a new maintainer - no checking of duplicates is performed, use + * updatemaintainer for that purpose. + */ + function addMaintainer($role, $handle, $name, $email) + { + $this->_packageInfo['maintainers'][] = + array('handle' => $handle, 'role' => $role, 'email' => $email, 'name' => $name); + $this->_isValid = false; + } + + function updateMaintainer($role, $handle, $name, $email) + { + $found = false; + if (!isset($this->_packageInfo['maintainers']) || + !is_array($this->_packageInfo['maintainers'])) { + return $this->addMaintainer($role, $handle, $name, $email); + } + foreach ($this->_packageInfo['maintainers'] as $i => $maintainer) { + if ($maintainer['handle'] == $handle) { + $found = $i; + break; + } + } + if ($found !== false) { + unset($this->_packageInfo['maintainers'][$found]); + $this->_packageInfo['maintainers'] = + array_values($this->_packageInfo['maintainers']); + } + $this->addMaintainer($role, $handle, $name, $email); + } + + function deleteMaintainer($handle) + { + $found = false; + foreach ($this->_packageInfo['maintainers'] as $i => $maintainer) { + if ($maintainer['handle'] == $handle) { + $found = $i; + break; + } + } + if ($found !== false) { + unset($this->_packageInfo['maintainers'][$found]); + $this->_packageInfo['maintainers'] = + array_values($this->_packageInfo['maintainers']); + return true; + } + return false; + } + + function getState() + { + if (isset($this->_packageInfo['release_state'])) { + return $this->_packageInfo['release_state']; + } + return false; + } + + function setRawState($state) + { + $this->_packageInfo['release_state'] = $state; + } + + function setState($state) + { + $this->_packageInfo['release_state'] = $state; + $this->_isValid = false; + } + + function getDate() + { + if (isset($this->_packageInfo['release_date'])) { + return $this->_packageInfo['release_date']; + } + return false; + } + + function setDate($date) + { + $this->_packageInfo['release_date'] = $date; + $this->_isValid = false; + } + + function getLicense() + { + if (isset($this->_packageInfo['release_license'])) { + return $this->_packageInfo['release_license']; + } + return false; + } + + function setLicense($date) + { + $this->_packageInfo['release_license'] = $date; + $this->_isValid = false; + } + + function getSummary() + { + if (isset($this->_packageInfo['summary'])) { + return $this->_packageInfo['summary']; + } + return false; + } + + function setSummary($summary) + { + $this->_packageInfo['summary'] = $summary; + $this->_isValid = false; + } + + function getDescription() + { + if (isset($this->_packageInfo['description'])) { + return $this->_packageInfo['description']; + } + return false; + } + + function setDescription($desc) + { + $this->_packageInfo['description'] = $desc; + $this->_isValid = false; + } + + function getNotes() + { + if (isset($this->_packageInfo['release_notes'])) { + return $this->_packageInfo['release_notes']; + } + return false; + } + + function setNotes($notes) + { + $this->_packageInfo['release_notes'] = $notes; + $this->_isValid = false; + } + + function getDeps() + { + if (isset($this->_packageInfo['release_deps'])) { + return $this->_packageInfo['release_deps']; + } + return false; + } + + /** + * Reset dependencies prior to adding new ones + */ + function clearDeps() + { + unset($this->_packageInfo['release_deps']); + } + + function addPhpDep($version, $rel) + { + $this->_isValid = false; + $this->_packageInfo['release_deps'][] = + array('type' => 'php', + 'rel' => $rel, + 'version' => $version); + } + + function addPackageDep($name, $version, $rel, $optional = 'no') + { + $this->_isValid = false; + $dep = + array('type' => 'pkg', + 'name' => $name, + 'rel' => $rel, + 'optional' => $optional); + if ($rel != 'has' && $rel != 'not') { + $dep['version'] = $version; + } + $this->_packageInfo['release_deps'][] = $dep; + } + + function addExtensionDep($name, $version, $rel, $optional = 'no') + { + $this->_isValid = false; + $this->_packageInfo['release_deps'][] = + array('type' => 'ext', + 'name' => $name, + 'rel' => $rel, + 'version' => $version, + 'optional' => $optional); + } + + /** + * WARNING - do not use this function directly unless you know what you're doing + */ + function setDeps($deps) + { + $this->_packageInfo['release_deps'] = $deps; + } + + function hasDeps() + { + return isset($this->_packageInfo['release_deps']) && + count($this->_packageInfo['release_deps']); + } + + function getDependencyGroup($group) + { + return false; + } + + function isCompatible($pf) + { + return false; + } + + function isSubpackageOf($p) + { + return $p->isSubpackage($this); + } + + function isSubpackage($p) + { + return false; + } + + function dependsOn($package, $channel) + { + if (strtolower($channel) != 'pear.php.net') { + return false; + } + if (!($deps = $this->getDeps())) { + return false; + } + foreach ($deps as $dep) { + if ($dep['type'] != 'pkg') { + continue; + } + if (strtolower($dep['name']) == strtolower($package)) { + return true; + } + } + return false; + } + + function getConfigureOptions() + { + if (isset($this->_packageInfo['configure_options'])) { + return $this->_packageInfo['configure_options']; + } + return false; + } + + function hasConfigureOptions() + { + return isset($this->_packageInfo['configure_options']) && + count($this->_packageInfo['configure_options']); + } + + function addConfigureOption($name, $prompt, $default = false) + { + $o = array('name' => $name, 'prompt' => $prompt); + if ($default !== false) { + $o['default'] = $default; + } + if (!isset($this->_packageInfo['configure_options'])) { + $this->_packageInfo['configure_options'] = array(); + } + $this->_packageInfo['configure_options'][] = $o; + } + + function clearConfigureOptions() + { + unset($this->_packageInfo['configure_options']); + } + + function getProvides() + { + if (isset($this->_packageInfo['provides'])) { + return $this->_packageInfo['provides']; + } + return false; + } + + function addFile($dir, $file, $attrs) + { + $dir = preg_replace(array('!\\\\+!', '!/+!'), array('/', '/'), $dir); + if ($dir == '/' || $dir == '') { + $dir = ''; + } else { + $dir .= '/'; + } + $file = $dir . $file; + $file = preg_replace('![\\/]+!', '/', $file); + $this->_packageInfo['filelist'][$file] = $attrs; + } + + function getInstallationFilelist() + { + return $this->getFilelist(); + } + + function getFilelist() + { + if (isset($this->_packageInfo['filelist'])) { + return $this->_packageInfo['filelist']; + } + return false; + } + + function setFileAttribute($file, $attr, $value) + { + $this->_packageInfo['filelist'][$file][$attr] = $value; + } + + function resetFilelist() + { + $this->_packageInfo['filelist'] = array(); + } + + function setInstalledAs($file, $path) + { + if ($path) { + return $this->_packageInfo['filelist'][$file]['installed_as'] = $path; + } + unset($this->_packageInfo['filelist'][$file]['installed_as']); + } + + function installedFile($file, $atts) + { + if (isset($this->_packageInfo['filelist'][$file])) { + $this->_packageInfo['filelist'][$file] = + array_merge($this->_packageInfo['filelist'][$file], $atts); + } else { + $this->_packageInfo['filelist'][$file] = $atts; + } + } + + function getChangelog() + { + if (isset($this->_packageInfo['changelog'])) { + return $this->_packageInfo['changelog']; + } + return false; + } + + function getPackagexmlVersion() + { + return '1.0'; + } + + /** + * Wrapper to {@link PEAR_ErrorStack::getErrors()} + * @param boolean determines whether to purge the error stack after retrieving + * @return array + */ + function getValidationWarnings($purge = true) + { + return $this->_stack->getErrors($purge); + } + + // }}} + /** + * Validation error. Also marks the object contents as invalid + * @param error code + * @param array error information + * @access private + */ + function _validateError($code, $params = array()) + { + $this->_stack->push($code, 'error', $params, false, false, debug_backtrace()); + $this->_isValid = false; + } + + /** + * Validation warning. Does not mark the object contents invalid. + * @param error code + * @param array error information + * @access private + */ + function _validateWarning($code, $params = array()) + { + $this->_stack->push($code, 'warning', $params, false, false, debug_backtrace()); + } + + /** + * @param integer error code + * @access protected + */ + function _getErrorMessage() + { + return array( + PEAR_PACKAGEFILE_ERROR_NO_NAME => + 'Missing Package Name', + PEAR_PACKAGEFILE_ERROR_NO_SUMMARY => + 'No summary found', + PEAR_PACKAGEFILE_ERROR_MULTILINE_SUMMARY => + 'Summary should be on one line', + PEAR_PACKAGEFILE_ERROR_NO_DESCRIPTION => + 'Missing description', + PEAR_PACKAGEFILE_ERROR_NO_LICENSE => + 'Missing license', + PEAR_PACKAGEFILE_ERROR_NO_VERSION => + 'No release version found', + PEAR_PACKAGEFILE_ERROR_NO_STATE => + 'No release state found', + PEAR_PACKAGEFILE_ERROR_NO_DATE => + 'No release date found', + PEAR_PACKAGEFILE_ERROR_NO_NOTES => + 'No release notes found', + PEAR_PACKAGEFILE_ERROR_NO_LEAD => + 'Package must have at least one lead maintainer', + PEAR_PACKAGEFILE_ERROR_NO_MAINTAINERS => + 'No maintainers found, at least one must be defined', + PEAR_PACKAGEFILE_ERROR_NO_MAINTHANDLE => + 'Maintainer %index% has no handle (user ID at channel server)', + PEAR_PACKAGEFILE_ERROR_NO_MAINTROLE => + 'Maintainer %index% has no role', + PEAR_PACKAGEFILE_ERROR_NO_MAINTNAME => + 'Maintainer %index% has no name', + PEAR_PACKAGEFILE_ERROR_NO_MAINTEMAIL => + 'Maintainer %index% has no email', + PEAR_PACKAGEFILE_ERROR_NO_DEPNAME => + 'Dependency %index% is not a php dependency, and has no name', + PEAR_PACKAGEFILE_ERROR_NO_DEPREL => + 'Dependency %index% has no relation (rel)', + PEAR_PACKAGEFILE_ERROR_NO_DEPTYPE => + 'Dependency %index% has no type', + PEAR_PACKAGEFILE_ERROR_DEPNAME_IGNORED => + 'PHP Dependency %index% has a name attribute of "%name%" which will be' . + ' ignored!', + PEAR_PACKAGEFILE_ERROR_NO_DEPVERSION => + 'Dependency %index% is not a rel="has" or rel="not" dependency, ' . + 'and has no version', + PEAR_PACKAGEFILE_ERROR_NO_DEPPHPVERSION => + 'Dependency %index% is a type="php" dependency, ' . + 'and has no version', + PEAR_PACKAGEFILE_ERROR_DEPVERSION_IGNORED => + 'Dependency %index% is a rel="%rel%" dependency, versioning is ignored', + PEAR_PACKAGEFILE_ERROR_INVALID_DEPOPTIONAL => + 'Dependency %index% has invalid optional value "%opt%", should be yes or no', + PEAR_PACKAGEFILE_PHP_NO_NOT => + 'Dependency %index%: php dependencies cannot use "not" rel, use "ne"' . + ' to exclude specific versions', + PEAR_PACKAGEFILE_ERROR_NO_CONFNAME => + 'Configure Option %index% has no name', + PEAR_PACKAGEFILE_ERROR_NO_CONFPROMPT => + 'Configure Option %index% has no prompt', + PEAR_PACKAGEFILE_ERROR_NO_FILES => + 'No files in section of package.xml', + PEAR_PACKAGEFILE_ERROR_NO_FILEROLE => + 'File "%file%" has no role, expecting one of "%roles%"', + PEAR_PACKAGEFILE_ERROR_INVALID_FILEROLE => + 'File "%file%" has invalid role "%role%", expecting one of "%roles%"', + PEAR_PACKAGEFILE_ERROR_INVALID_FILENAME => + 'File "%file%" cannot start with ".", cannot package or install', + PEAR_PACKAGEFILE_ERROR_INVALID_PHPFILE => + 'Parser error: invalid PHP found in file "%file%"', + PEAR_PACKAGEFILE_ERROR_NO_PNAME_PREFIX => + 'in %file%: %type% "%name%" not prefixed with package name "%package%"', + PEAR_PACKAGEFILE_ERROR_INVALID_FILE => + 'Parser error: invalid PHP file "%file%"', + PEAR_PACKAGEFILE_ERROR_CHANNELVAL => + 'Channel validator error: field "%field%" - %reason%', + PEAR_PACKAGEFILE_ERROR_PHP5 => + 'Error, PHP5 token encountered in %file%, analysis should be in PHP5', + PEAR_PACKAGEFILE_ERROR_FILE_NOTFOUND => + 'File "%file%" in package.xml does not exist', + PEAR_PACKAGEFILE_ERROR_NON_ISO_CHARS => + 'Package.xml contains non-ISO-8859-1 characters, and may not validate', + ); + } + + /** + * Validate XML package definition file. + * + * @access public + * @return boolean + */ + function validate($state = PEAR_VALIDATE_NORMAL, $nofilechecking = false) + { + if (($this->_isValid & $state) == $state) { + return true; + } + $this->_isValid = true; + $info = $this->_packageInfo; + if (empty($info['package'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_NAME); + $this->_packageName = $pn = 'unknown'; + } else { + $this->_packageName = $pn = $info['package']; + } + + if (empty($info['summary'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_SUMMARY); + } elseif (strpos(trim($info['summary']), "\n") !== false) { + $this->_validateWarning(PEAR_PACKAGEFILE_ERROR_MULTILINE_SUMMARY, + array('summary' => $info['summary'])); + } + if (empty($info['description'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_DESCRIPTION); + } + if (empty($info['release_license'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_LICENSE); + } + if (empty($info['version'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_VERSION); + } + if (empty($info['release_state'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_STATE); + } + if (empty($info['release_date'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_DATE); + } + if (empty($info['release_notes'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_NOTES); + } + if (empty($info['maintainers'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_MAINTAINERS); + } else { + $haslead = false; + $i = 1; + foreach ($info['maintainers'] as $m) { + if (empty($m['handle'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_MAINTHANDLE, + array('index' => $i)); + } + if (empty($m['role'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_MAINTROLE, + array('index' => $i, 'roles' => PEAR_Common::getUserRoles())); + } elseif ($m['role'] == 'lead') { + $haslead = true; + } + if (empty($m['name'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_MAINTNAME, + array('index' => $i)); + } + if (empty($m['email'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_MAINTEMAIL, + array('index' => $i)); + } + $i++; + } + if (!$haslead) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_LEAD); + } + } + if (!empty($info['release_deps'])) { + $i = 1; + foreach ($info['release_deps'] as $d) { + if (!isset($d['type']) || empty($d['type'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_DEPTYPE, + array('index' => $i, 'types' => PEAR_Common::getDependencyTypes())); + continue; + } + if (!isset($d['rel']) || empty($d['rel'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_DEPREL, + array('index' => $i, 'rels' => PEAR_Common::getDependencyRelations())); + continue; + } + if (!empty($d['optional'])) { + if (!in_array($d['optional'], array('yes', 'no'))) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_INVALID_DEPOPTIONAL, + array('index' => $i, 'opt' => $d['optional'])); + } + } + if ($d['rel'] != 'has' && $d['rel'] != 'not' && empty($d['version'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_DEPVERSION, + array('index' => $i)); + } elseif (($d['rel'] == 'has' || $d['rel'] == 'not') && !empty($d['version'])) { + $this->_validateWarning(PEAR_PACKAGEFILE_ERROR_DEPVERSION_IGNORED, + array('index' => $i, 'rel' => $d['rel'])); + } + if ($d['type'] == 'php' && !empty($d['name'])) { + $this->_validateWarning(PEAR_PACKAGEFILE_ERROR_DEPNAME_IGNORED, + array('index' => $i, 'name' => $d['name'])); + } elseif ($d['type'] != 'php' && empty($d['name'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_DEPNAME, + array('index' => $i)); + } + if ($d['type'] == 'php' && empty($d['version'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_DEPPHPVERSION, + array('index' => $i)); + } + if (($d['rel'] == 'not') && ($d['type'] == 'php')) { + $this->_validateError(PEAR_PACKAGEFILE_PHP_NO_NOT, + array('index' => $i)); + } + $i++; + } + } + if (!empty($info['configure_options'])) { + $i = 1; + foreach ($info['configure_options'] as $c) { + if (empty($c['name'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_CONFNAME, + array('index' => $i)); + } + if (empty($c['prompt'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_CONFPROMPT, + array('index' => $i)); + } + $i++; + } + } + if (empty($info['filelist'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_FILES); + $errors[] = 'no files'; + } else { + foreach ($info['filelist'] as $file => $fa) { + if (empty($fa['role'])) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_NO_FILEROLE, + array('file' => $file, 'roles' => PEAR_Common::getFileRoles())); + continue; + } elseif (!in_array($fa['role'], PEAR_Common::getFileRoles())) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_INVALID_FILEROLE, + array('file' => $file, 'role' => $fa['role'], 'roles' => PEAR_Common::getFileRoles())); + } + if ($file{0} == '.' && $file{1} == '/') { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_INVALID_FILENAME, + array('file' => $file)); + } + } + } + if (isset($this->_registry) && $this->_isValid) { + $chan = $this->_registry->getChannel('pear.php.net'); + if (PEAR::isError($chan)) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_CHANNELVAL, $chan->getMessage()); + return $this->_isValid = 0; + } + $validator = $chan->getValidationObject(); + $validator->setPackageFile($this); + $validator->validate($state); + $failures = $validator->getFailures(); + foreach ($failures['errors'] as $error) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_CHANNELVAL, $error); + } + foreach ($failures['warnings'] as $warning) { + $this->_validateWarning(PEAR_PACKAGEFILE_ERROR_CHANNELVAL, $warning); + } + } + if ($this->_isValid && $state == PEAR_VALIDATE_PACKAGING && !$nofilechecking) { + if ($this->_analyzePhpFiles()) { + $this->_isValid = true; + } + } + if ($this->_isValid) { + return $this->_isValid = $state; + } + return $this->_isValid = 0; + } + + function _analyzePhpFiles() + { + if (!$this->_isValid) { + return false; + } + if (!isset($this->_packageFile)) { + return false; + } + $dir_prefix = dirname($this->_packageFile); + $common = new PEAR_Common; + $log = isset($this->_logger) ? array(&$this->_logger, 'log') : + array($common, 'log'); + $info = $this->getFilelist(); + foreach ($info as $file => $fa) { + if (!file_exists($dir_prefix . DIRECTORY_SEPARATOR . $file)) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_FILE_NOTFOUND, + array('file' => realpath($dir_prefix) . DIRECTORY_SEPARATOR . $file)); + continue; + } + if ($fa['role'] == 'php' && $dir_prefix) { + call_user_func_array($log, array(1, "Analyzing $file")); + $srcinfo = $this->_analyzeSourceCode($dir_prefix . DIRECTORY_SEPARATOR . $file); + if ($srcinfo) { + $this->_buildProvidesArray($srcinfo); + } + } + } + $this->_packageName = $pn = $this->getPackage(); + $pnl = strlen($pn); + if (isset($this->_packageInfo['provides'])) { + foreach ((array) $this->_packageInfo['provides'] as $key => $what) { + if (isset($what['explicit'])) { + // skip conformance checks if the provides entry is + // specified in the package.xml file + continue; + } + extract($what); + if ($type == 'class') { + if (!strncasecmp($name, $pn, $pnl)) { + continue; + } + $this->_validateWarning(PEAR_PACKAGEFILE_ERROR_NO_PNAME_PREFIX, + array('file' => $file, 'type' => $type, 'name' => $name, 'package' => $pn)); + } elseif ($type == 'function') { + if (strstr($name, '::') || !strncasecmp($name, $pn, $pnl)) { + continue; + } + $this->_validateWarning(PEAR_PACKAGEFILE_ERROR_NO_PNAME_PREFIX, + array('file' => $file, 'type' => $type, 'name' => $name, 'package' => $pn)); + } + } + } + return $this->_isValid; + } + + /** + * Get the default xml generator object + * + * @return PEAR_PackageFile_Generator_v1 + */ + function &getDefaultGenerator() + { + if (!class_exists('PEAR_PackageFile_Generator_v1')) { + require_once 'PEAR/PackageFile/Generator/v1.php'; + } + $a = &new PEAR_PackageFile_Generator_v1($this); + return $a; + } + + /** + * Get the contents of a file listed within the package.xml + * @param string + * @return string + */ + function getFileContents($file) + { + if ($this->_archiveFile == $this->_packageFile) { // unpacked + $dir = dirname($this->_packageFile); + $file = $dir . DIRECTORY_SEPARATOR . $file; + $file = str_replace(array('/', '\\'), + array(DIRECTORY_SEPARATOR, DIRECTORY_SEPARATOR), $file); + if (file_exists($file) && is_readable($file)) { + return implode('', file($file)); + } + } else { // tgz + if (!class_exists('Archive_Tar')) { + require_once 'Archive/Tar.php'; + } + $tar = &new Archive_Tar($this->_archiveFile); + $tar->pushErrorHandling(PEAR_ERROR_RETURN); + if ($file != 'package.xml' && $file != 'package2.xml') { + $file = $this->getPackage() . '-' . $this->getVersion() . '/' . $file; + } + $file = $tar->extractInString($file); + $tar->popErrorHandling(); + if (PEAR::isError($file)) { + return PEAR::raiseError("Cannot locate file '$file' in archive"); + } + return $file; + } + } + + // {{{ analyzeSourceCode() + /** + * Analyze the source code of the given PHP file + * + * @param string Filename of the PHP file + * @return mixed + * @access private + */ + function _analyzeSourceCode($file) + { + if (!function_exists("token_get_all")) { + return false; + } + if (!defined('T_DOC_COMMENT')) { + define('T_DOC_COMMENT', T_COMMENT); + } + if (!defined('T_INTERFACE')) { + define('T_INTERFACE', -1); + } + if (!defined('T_IMPLEMENTS')) { + define('T_IMPLEMENTS', -1); + } + if (!$fp = @fopen($file, "r")) { + return false; + } + if (function_exists('file_get_contents')) { + fclose($fp); + $contents = file_get_contents($file); + } else { + $contents = @fread($fp, filesize($file)); + fclose($fp); + } + $tokens = token_get_all($contents); +/* + for ($i = 0; $i < sizeof($tokens); $i++) { + @list($token, $data) = $tokens[$i]; + if (is_string($token)) { + var_dump($token); + } else { + print token_name($token) . ' '; + var_dump(rtrim($data)); + } + } +*/ + $look_for = 0; + $paren_level = 0; + $bracket_level = 0; + $brace_level = 0; + $lastphpdoc = ''; + $current_class = ''; + $current_interface = ''; + $current_class_level = -1; + $current_function = ''; + $current_function_level = -1; + $declared_classes = array(); + $declared_interfaces = array(); + $declared_functions = array(); + $declared_methods = array(); + $used_classes = array(); + $used_functions = array(); + $extends = array(); + $implements = array(); + $nodeps = array(); + $inquote = false; + $interface = false; + for ($i = 0; $i < sizeof($tokens); $i++) { + if (is_array($tokens[$i])) { + list($token, $data) = $tokens[$i]; + } else { + $token = $tokens[$i]; + $data = ''; + } + if ($inquote) { + if ($token != '"' && $token != T_END_HEREDOC) { + continue; + } else { + $inquote = false; + continue; + } + } + switch ($token) { + case T_WHITESPACE : + continue; + case ';': + if ($interface) { + $current_function = ''; + $current_function_level = -1; + } + break; + case '"': + case T_START_HEREDOC: + $inquote = true; + break; + case T_CURLY_OPEN: + case T_DOLLAR_OPEN_CURLY_BRACES: + case '{': $brace_level++; continue 2; + case '}': + $brace_level--; + if ($current_class_level == $brace_level) { + $current_class = ''; + $current_class_level = -1; + } + if ($current_function_level == $brace_level) { + $current_function = ''; + $current_function_level = -1; + } + continue 2; + case '[': $bracket_level++; continue 2; + case ']': $bracket_level--; continue 2; + case '(': $paren_level++; continue 2; + case ')': $paren_level--; continue 2; + case T_INTERFACE: + $interface = true; + case T_CLASS: + if (($current_class_level != -1) || ($current_function_level != -1)) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_INVALID_PHPFILE, + array('file' => $file)); + return false; + } + case T_FUNCTION: + case T_NEW: + case T_EXTENDS: + case T_IMPLEMENTS: + $look_for = $token; + continue 2; + case T_STRING: + if (version_compare(zend_version(), '2.0', '<')) { + if (in_array(strtolower($data), + array('public', 'private', 'protected', 'abstract', + 'interface', 'implements', 'throw') + )) { + $this->_validateWarning(PEAR_PACKAGEFILE_ERROR_PHP5, + array($file)); + } + } + if ($look_for == T_CLASS) { + $current_class = $data; + $current_class_level = $brace_level; + $declared_classes[] = $current_class; + } elseif ($look_for == T_INTERFACE) { + $current_interface = $data; + $current_class_level = $brace_level; + $declared_interfaces[] = $current_interface; + } elseif ($look_for == T_IMPLEMENTS) { + $implements[$current_class] = $data; + } elseif ($look_for == T_EXTENDS) { + $extends[$current_class] = $data; + } elseif ($look_for == T_FUNCTION) { + if ($current_class) { + $current_function = "$current_class::$data"; + $declared_methods[$current_class][] = $data; + } elseif ($current_interface) { + $current_function = "$current_interface::$data"; + $declared_methods[$current_interface][] = $data; + } else { + $current_function = $data; + $declared_functions[] = $current_function; + } + $current_function_level = $brace_level; + $m = array(); + } elseif ($look_for == T_NEW) { + $used_classes[$data] = true; + } + $look_for = 0; + continue 2; + case T_VARIABLE: + $look_for = 0; + continue 2; + case T_DOC_COMMENT: + case T_COMMENT: + if (preg_match('!^/\*\*\s!', $data)) { + $lastphpdoc = $data; + if (preg_match_all('/@nodep\s+(\S+)/', $lastphpdoc, $m)) { + $nodeps = array_merge($nodeps, $m[1]); + } + } + continue 2; + case T_DOUBLE_COLON: + if (!($tokens[$i - 1][0] == T_WHITESPACE || $tokens[$i - 1][0] == T_STRING)) { + $this->_validateError(PEAR_PACKAGEFILE_ERROR_INVALID_PHPFILE, + array('file' => $file)); + return false; + } + $class = $tokens[$i - 1][1]; + if (strtolower($class) != 'parent') { + $used_classes[$class] = true; + } + continue 2; + } + } + return array( + "source_file" => $file, + "declared_classes" => $declared_classes, + "declared_interfaces" => $declared_interfaces, + "declared_methods" => $declared_methods, + "declared_functions" => $declared_functions, + "used_classes" => array_diff(array_keys($used_classes), $nodeps), + "inheritance" => $extends, + "implements" => $implements, + ); + } + + /** + * Build a "provides" array from data returned by + * analyzeSourceCode(). The format of the built array is like + * this: + * + * array( + * 'class;MyClass' => 'array('type' => 'class', 'name' => 'MyClass'), + * ... + * ) + * + * + * @param array $srcinfo array with information about a source file + * as returned by the analyzeSourceCode() method. + * + * @return void + * + * @access private + * + */ + function _buildProvidesArray($srcinfo) + { + if (!$this->_isValid) { + return false; + } + $file = basename($srcinfo['source_file']); + $pn = $this->getPackage(); + $pnl = strlen($pn); + foreach ($srcinfo['declared_classes'] as $class) { + $key = "class;$class"; + if (isset($this->_packageInfo['provides'][$key])) { + continue; + } + $this->_packageInfo['provides'][$key] = + array('file'=> $file, 'type' => 'class', 'name' => $class); + if (isset($srcinfo['inheritance'][$class])) { + $this->_packageInfo['provides'][$key]['extends'] = + $srcinfo['inheritance'][$class]; + } + } + foreach ($srcinfo['declared_methods'] as $class => $methods) { + foreach ($methods as $method) { + $function = "$class::$method"; + $key = "function;$function"; + if ($method{0} == '_' || !strcasecmp($method, $class) || + isset($this->_packageInfo['provides'][$key])) { + continue; + } + $this->_packageInfo['provides'][$key] = + array('file'=> $file, 'type' => 'function', 'name' => $function); + } + } + + foreach ($srcinfo['declared_functions'] as $function) { + $key = "function;$function"; + if ($function{0} == '_' || isset($this->_packageInfo['provides'][$key])) { + continue; + } + if (!strstr($function, '::') && strncasecmp($function, $pn, $pnl)) { + $warnings[] = "in1 " . $file . ": function \"$function\" not prefixed with package name \"$pn\""; + } + $this->_packageInfo['provides'][$key] = + array('file'=> $file, 'type' => 'function', 'name' => $function); + } + } + + // }}} +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile/v2.php b/campcaster/src/tools/pear/src/PEAR/PackageFile/v2.php new file mode 100644 index 000000000..9e69e5531 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile/v2.php @@ -0,0 +1,2008 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: v2.php,v 1.129.2.1 2006/03/23 04:07:51 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * For error handling + */ +require_once 'PEAR/ErrorStack.php'; +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_PackageFile_v2 +{ + + /** + * Parsed package information + * @var array + * @access private + */ + var $_packageInfo = array(); + + /** + * path to package .tgz or false if this is a local/extracted package.xml + * @var string|false + * @access private + */ + var $_archiveFile; + + /** + * path to package .xml or false if this is an abstract parsed-from-string xml + * @var string|false + * @access private + */ + var $_packageFile; + + /** + * This is used by file analysis routines to log progress information + * @var PEAR_Common + * @access protected + */ + var $_logger; + + /** + * This is set to the highest validation level that has been validated + * + * If the package.xml is invalid or unknown, this is set to 0. If + * normal validation has occurred, this is set to PEAR_VALIDATE_NORMAL. If + * downloading/installation validation has occurred it is set to PEAR_VALIDATE_DOWNLOADING + * or INSTALLING, and so on up to PEAR_VALIDATE_PACKAGING. This allows validation + * "caching" to occur, which is particularly important for package validation, so + * that PHP files are not validated twice + * @var int + * @access private + */ + var $_isValid = 0; + + /** + * True if the filelist has been validated + * @param bool + */ + var $_filesValid = false; + + /** + * @var PEAR_Registry + * @access protected + */ + var $_registry; + + /** + * @var PEAR_Config + * @access protected + */ + var $_config; + + /** + * Optional Dependency group requested for installation + * @var string + * @access private + */ + var $_requestedGroup = false; + + /** + * @var PEAR_ErrorStack + * @access protected + */ + var $_stack; + + /** + * Namespace prefix used for tasks in this package.xml - use tasks: whenever possible + */ + var $_tasksNs; + + /** + * Determines whether this packagefile was initialized only with partial package info + * + * If this package file was constructed via parsing REST, it will only contain + * + * - package name + * - channel name + * - dependencies + * @var boolean + * @access private + */ + var $_incomplete = true; + + /** + * @var PEAR_PackageFile_v2_Validator + */ + var $_v2Validator; + + /** + * The constructor merely sets up the private error stack + */ + function PEAR_PackageFile_v2() + { + $this->_stack = new PEAR_ErrorStack('PEAR_PackageFile_v2', false, null); + $this->_isValid = false; + } + + /** + * To make unit-testing easier + * @param PEAR_Frontend_* + * @param array options + * @param PEAR_Config + * @return PEAR_Downloader + * @access protected + */ + function &getPEARDownloader(&$i, $o, &$c) + { + $z = &new PEAR_Downloader($i, $o, $c); + return $z; + } + + /** + * To make unit-testing easier + * @param PEAR_Config + * @param array options + * @param array package name as returned from {@link PEAR_Registry::parsePackageName()} + * @param int PEAR_VALIDATE_* constant + * @return PEAR_Dependency2 + * @access protected + */ + function &getPEARDependency2(&$c, $o, $p, $s = PEAR_VALIDATE_INSTALLING) + { + if (!class_exists('PEAR_Dependency2')) { + require_once 'PEAR/Dependency2.php'; + } + $z = &new PEAR_Dependency2($c, $o, $p, $s); + return $z; + } + + function getInstalledBinary() + { + return isset($this->_packageInfo['#binarypackage']) ? $this->_packageInfo['#binarypackage'] : + false; + } + + /** + * Installation of source package has failed, attempt to download and install the + * binary version of this package. + * @param PEAR_Installer + * @return array|false + */ + function installBinary(&$installer) + { + if (!OS_WINDOWS) { + $a = false; + return $a; + } + if ($this->getPackageType() == 'extsrc') { + if (!is_array($installer->getInstallPackages())) { + $a = false; + return $a; + } + foreach ($installer->getInstallPackages() as $p) { + if ($p->isExtension($this->_packageInfo['providesextension'])) { + if ($p->getPackageType() != 'extsrc') { + $a = false; + return $a; // the user probably downloaded it separately + } + } + } + if (isset($this->_packageInfo['extsrcrelease']['binarypackage'])) { + $installer->log(0, 'Attempting to download binary version of extension "' . + $this->_packageInfo['providesextension'] . '"'); + $params = $this->_packageInfo['extsrcrelease']['binarypackage']; + if (!is_array($params) || !isset($params[0])) { + $params = array($params); + } + if (isset($this->_packageInfo['channel'])) { + foreach ($params as $i => $param) { + $params[$i] = array('channel' => $this->_packageInfo['channel'], + 'package' => $param, 'version' => $this->getVersion()); + } + } + $dl = &$this->getPEARDownloader($installer->ui, $installer->getOptions(), + $installer->config); + $verbose = $dl->config->get('verbose'); + $dl->config->set('verbose', -1); + foreach ($params as $param) { + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $ret = $dl->download(array($param)); + PEAR::popErrorHandling(); + if (is_array($ret) && count($ret)) { + break; + } + } + $dl->config->set('verbose', $verbose); + if (is_array($ret)) { + if (count($ret) == 1) { + $pf = $ret[0]->getPackageFile(); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $err = $installer->install($ret[0]); + PEAR::popErrorHandling(); + if (is_array($err)) { + $this->_packageInfo['#binarypackage'] = $ret[0]->getPackage(); + // "install" self, so all dependencies will work transparently + $this->_registry->addPackage2($this); + $installer->log(0, 'Download and install of binary extension "' . + $this->_registry->parsedPackageNameToString( + array('channel' => $pf->getChannel(), + 'package' => $pf->getPackage()), true) . '" successful'); + $a = array($ret[0], $err); + return $a; + } + $installer->log(0, 'Download and install of binary extension "' . + $this->_registry->parsedPackageNameToString( + array('channel' => $pf->getChannel(), + 'package' => $pf->getPackage()), true) . '" failed'); + } + } + } + } + $a = false; + return $a; + } + + /** + * @return string|false Extension name + */ + function getProvidesExtension() + { + if (in_array($this->getPackageType(), array('extsrc', 'extbin'))) { + if (isset($this->_packageInfo['providesextension'])) { + return $this->_packageInfo['providesextension']; + } + } + return false; + } + + /** + * @param string Extension name + * @return bool + */ + function isExtension($extension) + { + if (in_array($this->getPackageType(), array('extsrc', 'extbin'))) { + return $this->_packageInfo['providesextension'] == $extension; + } + return false; + } + + /** + * Tests whether every part of the package.xml 1.0 is represented in + * this package.xml 2.0 + * @param PEAR_PackageFile_v1 + * @return bool + */ + function isEquivalent($pf1) + { + if (!$pf1) { + return true; + } + if ($this->getPackageType() == 'bundle') { + return false; + } + $this->_stack->getErrors(true); + if (!$pf1->validate(PEAR_VALIDATE_NORMAL)) { + return false; + } + $pass = true; + if ($pf1->getPackage() != $this->getPackage()) { + $this->_differentPackage($pf1->getPackage()); + $pass = false; + } + if ($pf1->getVersion() != $this->getVersion()) { + $this->_differentVersion($pf1->getVersion()); + $pass = false; + } + if (trim($pf1->getSummary()) != $this->getSummary()) { + $this->_differentSummary($pf1->getSummary()); + $pass = false; + } + if (preg_replace('/\s+/', '', $pf1->getDescription()) != + preg_replace('/\s+/', '', $this->getDescription())) { + $this->_differentDescription($pf1->getDescription()); + $pass = false; + } + if ($pf1->getState() != $this->getState()) { + $this->_differentState($pf1->getState()); + $pass = false; + } + if (!strstr(preg_replace('/\s+/', '', $this->getNotes()), + preg_replace('/\s+/', '', $pf1->getNotes()))) { + $this->_differentNotes($pf1->getNotes()); + $pass = false; + } + $mymaintainers = $this->getMaintainers(); + $yourmaintainers = $pf1->getMaintainers(); + for ($i1 = 0; $i1 < count($yourmaintainers); $i1++) { + $reset = false; + for ($i2 = 0; $i2 < count($mymaintainers); $i2++) { + if ($mymaintainers[$i2]['handle'] == $yourmaintainers[$i1]['handle']) { + if ($mymaintainers[$i2]['role'] != $yourmaintainers[$i1]['role']) { + $this->_differentRole($mymaintainers[$i2]['handle'], + $yourmaintainers[$i1]['role'], $mymaintainers[$i2]['role']); + $pass = false; + } + if ($mymaintainers[$i2]['email'] != $yourmaintainers[$i1]['email']) { + $this->_differentEmail($mymaintainers[$i2]['handle'], + $yourmaintainers[$i1]['email'], $mymaintainers[$i2]['email']); + $pass = false; + } + if ($mymaintainers[$i2]['name'] != $yourmaintainers[$i1]['name']) { + $this->_differentName($mymaintainers[$i2]['handle'], + $yourmaintainers[$i1]['name'], $mymaintainers[$i2]['name']); + $pass = false; + } + unset($mymaintainers[$i2]); + $mymaintainers = array_values($mymaintainers); + unset($yourmaintainers[$i1]); + $yourmaintainers = array_values($yourmaintainers); + $reset = true; + break; + } + } + if ($reset) { + $i1 = -1; + } + } + $this->_unmatchedMaintainers($mymaintainers, $yourmaintainers); + $filelist = $this->getFilelist(); + foreach ($pf1->getFilelist() as $file => $atts) { + if (!isset($filelist[$file])) { + $this->_missingFile($file); + $pass = false; + } + } + return $pass; + } + + function _differentPackage($package) + { + $this->_stack->push(__FUNCTION__, 'error', array('package' => $package, + 'self' => $this->getPackage()), + 'package.xml 1.0 package "%package%" does not match "%self%"'); + } + + function _differentVersion($version) + { + $this->_stack->push(__FUNCTION__, 'error', array('version' => $version, + 'self' => $this->getVersion()), + 'package.xml 1.0 version "%version%" does not match "%self%"'); + } + + function _differentState($state) + { + $this->_stack->push(__FUNCTION__, 'error', array('state' => $state, + 'self' => $this->getState()), + 'package.xml 1.0 state "%state%" does not match "%self%"'); + } + + function _differentRole($handle, $role, $selfrole) + { + $this->_stack->push(__FUNCTION__, 'error', array('handle' => $handle, + 'role' => $role, 'self' => $selfrole), + 'package.xml 1.0 maintainer "%handle%" role "%role%" does not match "%self%"'); + } + + function _differentEmail($handle, $email, $selfemail) + { + $this->_stack->push(__FUNCTION__, 'error', array('handle' => $handle, + 'email' => $email, 'self' => $selfemail), + 'package.xml 1.0 maintainer "%handle%" email "%email%" does not match "%self%"'); + } + + function _differentName($handle, $name, $selfname) + { + $this->_stack->push(__FUNCTION__, 'error', array('handle' => $handle, + 'name' => $name, 'self' => $selfname), + 'package.xml 1.0 maintainer "%handle%" name "%name%" does not match "%self%"'); + } + + function _unmatchedMaintainers($my, $yours) + { + if ($my) { + array_walk($my, create_function('&$i, $k', '$i = $i["handle"];')); + $this->_stack->push(__FUNCTION__, 'error', array('handles' => $my), + 'package.xml 2.0 has unmatched extra maintainers "%handles%"'); + } + if ($yours) { + array_walk($yours, create_function('&$i, $k', '$i = $i["handle"];')); + $this->_stack->push(__FUNCTION__, 'error', array('handles' => $yours), + 'package.xml 1.0 has unmatched extra maintainers "%handles%"'); + } + } + + function _differentNotes($notes) + { + $truncnotes = strlen($notes) < 25 ? $notes : substr($notes, 0, 24) . '...'; + $truncmynotes = strlen($this->getNotes()) < 25 ? $this->getNotes() : + substr($this->getNotes(), 0, 24) . '...'; + $this->_stack->push(__FUNCTION__, 'error', array('notes' => $truncnotes, + 'self' => $truncmynotes), + 'package.xml 1.0 release notes "%notes%" do not match "%self%"'); + } + + function _differentSummary($summary) + { + $truncsummary = strlen($summary) < 25 ? $summary : substr($summary, 0, 24) . '...'; + $truncmysummary = strlen($this->getsummary()) < 25 ? $this->getSummary() : + substr($this->getsummary(), 0, 24) . '...'; + $this->_stack->push(__FUNCTION__, 'error', array('summary' => $truncsummary, + 'self' => $truncmysummary), + 'package.xml 1.0 summary "%summary%" does not match "%self%"'); + } + + function _differentDescription($description) + { + $truncdescription = trim(strlen($description) < 25 ? $description : substr($description, 0, 24) . '...'); + $truncmydescription = trim(strlen($this->getDescription()) < 25 ? $this->getDescription() : + substr($this->getdescription(), 0, 24) . '...'); + $this->_stack->push(__FUNCTION__, 'error', array('description' => $truncdescription, + 'self' => $truncmydescription), + 'package.xml 1.0 description "%description%" does not match "%self%"'); + } + + function _missingFile($file) + { + $this->_stack->push(__FUNCTION__, 'error', array('file' => $file), + 'package.xml 1.0 file "%file%" is not present in '); + } + + /** + * WARNING - do not use this function unless you know what you're doing + */ + function setRawState($state) + { + $this->_packageInfo['stability']['release'] = $state; + } + + /** + * WARNING - do not use this function unless you know what you're doing + */ + function setRawCompatible($compatible) + { + $this->_packageInfo['compatible'] = $compatible; + } + + /** + * WARNING - do not use this function unless you know what you're doing + */ + function setRawPackage($package) + { + $this->_packageInfo['name'] = $package; + } + + /** + * WARNING - do not use this function unless you know what you're doing + */ + function setRawChannel($channel) + { + $this->_packageInfo['channel'] = $channel; + } + + function setRequestedGroup($group) + { + $this->_requestedGroup = $group; + } + + function getRequestedGroup() + { + if (isset($this->_requestedGroup)) { + return $this->_requestedGroup; + } + return false; + } + + /** + * For saving in the registry. + * + * Set the last version that was installed + * @param string + */ + function setLastInstalledVersion($version) + { + $this->_packageInfo['_lastversion'] = $version; + } + + /** + * @return string|false + */ + function getLastInstalledVersion() + { + if (isset($this->_packageInfo['_lastversion'])) { + return $this->_packageInfo['_lastversion']; + } + return false; + } + + /** + * Determines whether this package.xml has post-install scripts or not + * @return array|false + */ + function listPostinstallScripts() + { + $filelist = $this->getFilelist(); + $contents = $this->getContents(); + $contents = $contents['dir']['file']; + if (!is_array($contents) || !isset($contents[0])) { + $contents = array($contents); + } + $taskfiles = array(); + foreach ($contents as $file) { + $atts = $file['attribs']; + unset($file['attribs']); + if (count($file)) { + $taskfiles[$atts['name']] = $file; + } + } + $common = new PEAR_Common; + $common->debug = $this->_config->get('verbose'); + $this->_scripts = array(); + $ret = array(); + foreach ($taskfiles as $name => $tasks) { + if (!isset($filelist[$name])) { + // ignored files will not be in the filelist + continue; + } + $atts = $filelist[$name]; + foreach ($tasks as $tag => $raw) { + $task = $this->getTask($tag); + $task = &new $task($this->_config, $common, PEAR_TASK_INSTALL); + if ($task->isScript()) { + $ret[] = $filelist[$name]['installed_as']; + } + } + } + if (count($ret)) { + return $ret; + } + return false; + } + + /** + * Initialize post-install scripts for running + * + * This method can be used to detect post-install scripts, as the return value + * indicates whether any exist + * @return bool + */ + function initPostinstallScripts() + { + $filelist = $this->getFilelist(); + $contents = $this->getContents(); + $contents = $contents['dir']['file']; + if (!is_array($contents) || !isset($contents[0])) { + $contents = array($contents); + } + $taskfiles = array(); + foreach ($contents as $file) { + $atts = $file['attribs']; + unset($file['attribs']); + if (count($file)) { + $taskfiles[$atts['name']] = $file; + } + } + $common = new PEAR_Common; + $common->debug = $this->_config->get('verbose'); + $this->_scripts = array(); + foreach ($taskfiles as $name => $tasks) { + $atts = $filelist[$name]; + foreach ($tasks as $tag => $raw) { + $taskname = $this->getTask($tag); + $task = &new $taskname($this->_config, $common, PEAR_TASK_INSTALL); + if (!$task->isScript()) { + continue; // scripts are only handled after installation + } + $lastversion = isset($this->_packageInfo['_lastversion']) ? + $this->_packageInfo['_lastversion'] : null; + $task->init($raw, $atts, $lastversion); + $res = $task->startSession($this, $atts['installed_as']); + if (!$res) { + continue; // skip this file + } + if (PEAR::isError($res)) { + return $res; + } + $assign = &$task; + $this->_scripts[] = &$assign; + } + } + if (count($this->_scripts)) { + return true; + } + return false; + } + + function runPostinstallScripts() + { + if ($this->initPostinstallScripts()) { + $ui = &PEAR_Frontend::singleton(); + if ($ui) { + $ui->runPostinstallScripts($this->_scripts, $this); + } + } + } + + + /** + * Convert a recursive set of and tags into a single tag with + * tags. + */ + function flattenFilelist() + { + if (isset($this->_packageInfo['bundle'])) { + return; + } + $filelist = array(); + if (isset($this->_packageInfo['contents']['dir']['dir'])) { + $this->_getFlattenedFilelist($filelist, $this->_packageInfo['contents']['dir']); + if (!isset($filelist[1])) { + $filelist = $filelist[0]; + } + $this->_packageInfo['contents']['dir']['file'] = $filelist; + unset($this->_packageInfo['contents']['dir']['dir']); + } else { + // else already flattened but check for baseinstalldir propagation + if (isset($this->_packageInfo['contents']['dir']['attribs']['baseinstalldir'])) { + if (isset($this->_packageInfo['contents']['dir']['file'][0])) { + foreach ($this->_packageInfo['contents']['dir']['file'] as $i => $file) { + if (isset($file['attribs']['baseinstalldir'])) { + continue; + } + $this->_packageInfo['contents']['dir']['file'][$i]['attribs']['baseinstalldir'] + = $this->_packageInfo['contents']['dir']['attribs']['baseinstalldir']; + } + } else { + if (!isset($this->_packageInfo['contents']['dir']['file']['attribs']['baseinstalldir'])) { + $this->_packageInfo['contents']['dir']['file']['attribs']['baseinstalldir'] + = $this->_packageInfo['contents']['dir']['attribs']['baseinstalldir']; + } + } + } + } + } + + /** + * @param array the final flattened file list + * @param array the current directory being processed + * @param string|false any recursively inherited baeinstalldir attribute + * @param string private recursion variable + * @return array + * @access protected + */ + function _getFlattenedFilelist(&$files, $dir, $baseinstall = false, $path = '') + { + if (isset($dir['attribs']) && isset($dir['attribs']['baseinstalldir'])) { + $baseinstall = $dir['attribs']['baseinstalldir']; + } + if (isset($dir['dir'])) { + if (!isset($dir['dir'][0])) { + $dir['dir'] = array($dir['dir']); + } + foreach ($dir['dir'] as $subdir) { + if (!isset($subdir['attribs']) || !isset($subdir['attribs']['name'])) { + $name = '*unknown*'; + } else { + $name = $subdir['attribs']['name']; + } + $newpath = empty($path) ? $name : + $path . '/' . $name; + $this->_getFlattenedFilelist($files, $subdir, + $baseinstall, $newpath); + } + } + if (isset($dir['file'])) { + if (!isset($dir['file'][0])) { + $dir['file'] = array($dir['file']); + } + foreach ($dir['file'] as $file) { + $attrs = $file['attribs']; + $name = $attrs['name']; + if ($baseinstall && !isset($attrs['baseinstalldir'])) { + $attrs['baseinstalldir'] = $baseinstall; + } + $attrs['name'] = empty($path) ? $name : $path . '/' . $name; + $attrs['name'] = preg_replace(array('!\\\\+!', '!/+!'), array('/', '/'), + $attrs['name']); + $file['attribs'] = $attrs; + $files[] = $file; + } + } + } + + function setConfig(&$config) + { + $this->_config = &$config; + $this->_registry = &$config->getRegistry(); + } + + function setLogger(&$logger) + { + if (!is_object($logger) || !method_exists($logger, 'log')) { + return PEAR::raiseError('Logger must be compatible with PEAR_Common::log'); + } + $this->_logger = &$logger; + } + + /** + * WARNING - do not use this function directly unless you know what you're doing + */ + function setDeps($deps) + { + $this->_packageInfo['dependencies'] = $deps; + } + + function setPackagefile($file, $archive = false) + { + $this->_packageFile = $file; + $this->_archiveFile = $archive ? $archive : $file; + } + + /** + * Wrapper to {@link PEAR_ErrorStack::getErrors()} + * @param boolean determines whether to purge the error stack after retrieving + * @return array + */ + function getValidationWarnings($purge = true) + { + return $this->_stack->getErrors($purge); + } + + function getPackageFile() + { + return $this->_packageFile; + } + + function getArchiveFile() + { + return $this->_archiveFile; + } + + + /** + * Directly set the array that defines this packagefile + * + * WARNING: no validation. This should only be performed by internal methods + * inside PEAR or by inputting an array saved from an existing PEAR_PackageFile_v2 + * @param array + */ + function fromArray($pinfo) + { + unset($pinfo['old']); + unset($pinfo['xsdversion']); + $this->_incomplete = false; + $this->_packageInfo = $pinfo; + } + + function isIncomplete() + { + return $this->_incomplete; + } + + /** + * @return array + */ + function toArray($forreg = false) + { + if (!$this->validate(PEAR_VALIDATE_NORMAL)) { + return false; + } + return $this->getArray($forreg); + } + + function getArray($forReg = false) + { + if ($forReg) { + $arr = $this->_packageInfo; + $arr['old'] = array(); + $arr['old']['version'] = $this->getVersion(); + $arr['old']['release_date'] = $this->getDate(); + $arr['old']['release_state'] = $this->getState(); + $arr['old']['release_license'] = $this->getLicense(); + $arr['old']['release_notes'] = $this->getNotes(); + $arr['old']['release_deps'] = $this->getDeps(); + $arr['old']['maintainers'] = $this->getMaintainers(); + $arr['xsdversion'] = '2.0'; + return $arr; + } else { + $info = $this->_packageInfo; + unset($info['dirtree']); + if (isset($info['_lastversion'])) { + unset($info['_lastversion']); + } + if (isset($info['#binarypackage'])) { + unset($info['#binarypackage']); + } + return $info; + } + } + + function packageInfo($field) + { + $arr = $this->getArray(true); + if ($field == 'state') { + return $arr['stability']['release']; + } + if ($field == 'api-version') { + return $arr['version']['api']; + } + if ($field == 'api-state') { + return $arr['stability']['api']; + } + if (isset($arr['old'][$field])) { + if (!is_string($arr['old'][$field])) { + return null; + } + return $arr['old'][$field]; + } + if (isset($arr[$field])) { + if (!is_string($arr[$field])) { + return null; + } + return $arr[$field]; + } + return null; + } + + function getName() + { + return $this->getPackage(); + } + + function getPackage() + { + if (isset($this->_packageInfo['name'])) { + return $this->_packageInfo['name']; + } + return false; + } + + function getChannel() + { + if (isset($this->_packageInfo['uri'])) { + return '__uri'; + } + if (isset($this->_packageInfo['channel'])) { + return strtolower($this->_packageInfo['channel']); + } + return false; + } + + function getUri() + { + if (isset($this->_packageInfo['uri'])) { + return $this->_packageInfo['uri']; + } + return false; + } + + function getExtends() + { + if (isset($this->_packageInfo['extends'])) { + return $this->_packageInfo['extends']; + } + return false; + } + + function getSummary() + { + if (isset($this->_packageInfo['summary'])) { + return $this->_packageInfo['summary']; + } + return false; + } + + function getDescription() + { + if (isset($this->_packageInfo['description'])) { + return $this->_packageInfo['description']; + } + return false; + } + + function getMaintainers($raw = false) + { + if (!isset($this->_packageInfo['lead'])) { + return false; + } + if ($raw) { + $ret = array('lead' => $this->_packageInfo['lead']); + (isset($this->_packageInfo['developer'])) ? + $ret['developer'] = $this->_packageInfo['developer'] :null; + (isset($this->_packageInfo['contributor'])) ? + $ret['contributor'] = $this->_packageInfo['contributor'] :null; + (isset($this->_packageInfo['helper'])) ? + $ret['helper'] = $this->_packageInfo['helper'] :null; + return $ret; + } else { + $ret = array(); + $leads = isset($this->_packageInfo['lead'][0]) ? $this->_packageInfo['lead'] : + array($this->_packageInfo['lead']); + foreach ($leads as $lead) { + $s = $lead; + $s['handle'] = $s['user']; + unset($s['user']); + $s['role'] = 'lead'; + $ret[] = $s; + } + if (isset($this->_packageInfo['developer'])) { + $leads = isset($this->_packageInfo['developer'][0]) ? + $this->_packageInfo['developer'] : + array($this->_packageInfo['developer']); + foreach ($leads as $maintainer) { + $s = $maintainer; + $s['handle'] = $s['user']; + unset($s['user']); + $s['role'] = 'developer'; + $ret[] = $s; + } + } + if (isset($this->_packageInfo['contributor'])) { + $leads = isset($this->_packageInfo['contributor'][0]) ? + $this->_packageInfo['contributor'] : + array($this->_packageInfo['contributor']); + foreach ($leads as $maintainer) { + $s = $maintainer; + $s['handle'] = $s['user']; + unset($s['user']); + $s['role'] = 'contributor'; + $ret[] = $s; + } + } + if (isset($this->_packageInfo['helper'])) { + $leads = isset($this->_packageInfo['helper'][0]) ? + $this->_packageInfo['helper'] : + array($this->_packageInfo['helper']); + foreach ($leads as $maintainer) { + $s = $maintainer; + $s['handle'] = $s['user']; + unset($s['user']); + $s['role'] = 'helper'; + $ret[] = $s; + } + } + return $ret; + } + return false; + } + + function getLeads() + { + if (isset($this->_packageInfo['lead'])) { + return $this->_packageInfo['lead']; + } + return false; + } + + function getDevelopers() + { + if (isset($this->_packageInfo['developer'])) { + return $this->_packageInfo['developer']; + } + return false; + } + + function getContributors() + { + if (isset($this->_packageInfo['contributor'])) { + return $this->_packageInfo['contributor']; + } + return false; + } + + function getHelpers() + { + if (isset($this->_packageInfo['helper'])) { + return $this->_packageInfo['helper']; + } + return false; + } + + function setDate($date) + { + if (!isset($this->_packageInfo['date'])) { + // ensure that the extends tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('time', 'version', + 'stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), array(), 'date'); + } + $this->_packageInfo['date'] = $date; + $this->_isValid = 0; + } + + function setTime($time) + { + $this->_isValid = 0; + if (!isset($this->_packageInfo['time'])) { + // ensure that the time tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('version', + 'stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), $time, 'time'); + } + $this->_packageInfo['time'] = $time; + } + + function getDate() + { + if (isset($this->_packageInfo['date'])) { + return $this->_packageInfo['date']; + } + return false; + } + + function getTime() + { + if (isset($this->_packageInfo['time'])) { + return $this->_packageInfo['time']; + } + return false; + } + + /** + * @param package|api version category to return + */ + function getVersion($key = 'release') + { + if (isset($this->_packageInfo['version'][$key])) { + return $this->_packageInfo['version'][$key]; + } + return false; + } + + function getStability() + { + if (isset($this->_packageInfo['stability'])) { + return $this->_packageInfo['stability']; + } + return false; + } + + function getState($key = 'release') + { + if (isset($this->_packageInfo['stability'][$key])) { + return $this->_packageInfo['stability'][$key]; + } + return false; + } + + function getLicense($raw = false) + { + if (isset($this->_packageInfo['license'])) { + if ($raw) { + return $this->_packageInfo['license']; + } + if (is_array($this->_packageInfo['license'])) { + return $this->_packageInfo['license']['_content']; + } else { + return $this->_packageInfo['license']; + } + } + return false; + } + + function getLicenseLocation() + { + if (!isset($this->_packageInfo['license']) || !is_array($this->_packageInfo['license'])) { + return false; + } + return $this->_packageInfo['license']['attribs']; + } + + function getNotes() + { + if (isset($this->_packageInfo['notes'])) { + return $this->_packageInfo['notes']; + } + return false; + } + + /** + * Return the tag contents, if any + * @return array|false + */ + function getUsesrole() + { + if (isset($this->_packageInfo['usesrole'])) { + return $this->_packageInfo['usesrole']; + } + return false; + } + + /** + * Return the tag contents, if any + * @return array|false + */ + function getUsestask() + { + if (isset($this->_packageInfo['usestask'])) { + return $this->_packageInfo['usestask']; + } + return false; + } + + /** + * This should only be used to retrieve filenames and install attributes + */ + function getFilelist($preserve = false) + { + if (isset($this->_packageInfo['filelist']) && !$preserve) { + return $this->_packageInfo['filelist']; + } + $this->flattenFilelist(); + if ($contents = $this->getContents()) { + $ret = array(); + if (!isset($contents['dir']['file'][0])) { + $contents['dir']['file'] = array($contents['dir']['file']); + } + foreach ($contents['dir']['file'] as $file) { + $name = $file['attribs']['name']; + if (!$preserve) { + $file = $file['attribs']; + } + $ret[$name] = $file; + } + if (!$preserve) { + $this->_packageInfo['filelist'] = $ret; + } + return $ret; + } + return false; + } + + /** + * Return configure options array, if any + * + * @return array|false + */ + function getConfigureOptions() + { + if ($this->getPackageType() != 'extsrc') { + return false; + } + $releases = $this->getReleases(); + if (isset($releases[0])) { + $releases = $release[0]; + } + if (isset($releases['configureoption'])) { + if (!isset($releases['configureoption'][0])) { + $releases['configureoption'] = array($releases['configureoption']); + } + for ($i = 0; $i < count($releases['configureoption']); $i++) { + $releases['configureoption'][$i] = $releases['configureoption'][$i]['attribs']; + } + return $releases['configureoption']; + } + return false; + } + + /** + * This is only used at install-time, after all serialization + * is over. + */ + function resetFilelist() + { + $this->_packageInfo['filelist'] = array(); + } + + /** + * Retrieve a list of files that should be installed on this computer + * @return array + */ + function getInstallationFilelist($forfilecheck = false) + { + $contents = $this->getFilelist(true); + if (isset($contents['dir']['attribs']['baseinstalldir'])) { + $base = $contents['dir']['attribs']['baseinstalldir']; + } + if (isset($this->_packageInfo['bundle'])) { + return PEAR::raiseError( + 'Exception: bundles should be handled in download code only'); + } + $release = $this->getReleases(); + if ($release) { + if (!isset($release[0])) { + if (!isset($release['installconditions']) && !isset($release['filelist'])) { + if ($forfilecheck) { + return $this->getFilelist(); + } + return $contents; + } + $release = array($release); + } + $depchecker = &$this->getPEARDependency2($this->_config, array(), + array('channel' => $this->getChannel(), 'package' => $this->getPackage()), + PEAR_VALIDATE_INSTALLING); + foreach ($release as $instance) { + if (isset($instance['installconditions'])) { + $installconditions = $instance['installconditions']; + if (is_array($installconditions)) { + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + foreach ($installconditions as $type => $conditions) { + if (!isset($conditions[0])) { + $conditions = array($conditions); + } + foreach ($conditions as $condition) { + $ret = $depchecker->{"validate{$type}Dependency"}($condition); + if (PEAR::isError($ret)) { + PEAR::popErrorHandling(); + continue 3; // skip this release + } + } + } + PEAR::popErrorHandling(); + } + } + // this is the release to use + if (isset($instance['filelist'])) { + // ignore files + if (isset($instance['filelist']['ignore'])) { + $ignore = isset($instance['filelist']['ignore'][0]) ? + $instance['filelist']['ignore'] : + array($instance['filelist']['ignore']); + foreach ($ignore as $ig) { + unset ($contents[$ig['attribs']['name']]); + } + } + // install files as this name + if (isset($instance['filelist']['install'])) { + $installas = isset($instance['filelist']['install'][0]) ? + $instance['filelist']['install'] : + array($instance['filelist']['install']); + foreach ($installas as $as) { + $contents[$as['attribs']['name']]['attribs']['install-as'] = + $as['attribs']['as']; + } + } + } + if ($forfilecheck) { + foreach ($contents as $file => $attrs) { + $contents[$file] = $attrs['attribs']; + } + } + return $contents; + } + } else { // simple release - no installconditions or install-as + if ($forfilecheck) { + return $this->getFilelist(); + } + return $contents; + } + // no releases matched + return PEAR::raiseError('No releases in package.xml matched the existing operating ' . + 'system, extensions installed, or architecture, cannot install'); + } + + /** + * This is only used at install-time, after all serialization + * is over. + * @param string file name + * @param string installed path + */ + function setInstalledAs($file, $path) + { + if ($path) { + return $this->_packageInfo['filelist'][$file]['installed_as'] = $path; + } + unset($this->_packageInfo['filelist'][$file]['installed_as']); + } + + function getInstalledLocation($file) + { + if (isset($this->_packageInfo['filelist'][$file]['installed_as'])) { + return $this->_packageInfo['filelist'][$file]['installed_as']; + } + return false; + } + + /** + * This is only used at install-time, after all serialization + * is over. + */ + function installedFile($file, $atts) + { + if (isset($this->_packageInfo['filelist'][$file])) { + $this->_packageInfo['filelist'][$file] = + array_merge($this->_packageInfo['filelist'][$file], $atts['attribs']); + } else { + $this->_packageInfo['filelist'][$file] = $atts['attribs']; + } + } + + /** + * Retrieve the contents tag + */ + function getContents() + { + if (isset($this->_packageInfo['contents'])) { + return $this->_packageInfo['contents']; + } + return false; + } + + /** + * @param string full path to file + * @param string attribute name + * @param string attribute value + * @param int risky but fast - use this to choose a file based on its position in the list + * of files. Index is zero-based like PHP arrays. + * @return bool success of operation + */ + function setFileAttribute($filename, $attr, $value, $index = false) + { + $this->_isValid = 0; + if (in_array($attr, array('role', 'name', 'baseinstalldir'))) { + $this->_filesValid = false; + } + if ($index !== false && + isset($this->_packageInfo['contents']['dir']['file'][$index]['attribs'])) { + $this->_packageInfo['contents']['dir']['file'][$index]['attribs'][$attr] = $value; + return true; + } + if (!isset($this->_packageInfo['contents']['dir']['file'])) { + return false; + } + $files = $this->_packageInfo['contents']['dir']['file']; + if (!isset($files[0])) { + $files = array($files); + $ind = false; + } else { + $ind = true; + } + foreach ($files as $i => $file) { + if (isset($file['attribs'])) { + if ($file['attribs']['name'] == $filename) { + if ($ind) { + $this->_packageInfo['contents']['dir']['file'][$i]['attribs'][$attr] = $value; + } else { + $this->_packageInfo['contents']['dir']['file']['attribs'][$attr] = $value; + } + return true; + } + } + } + return false; + } + + function setDirtree($path) + { + $this->_packageInfo['dirtree'][$path] = true; + } + + function getDirtree() + { + if (isset($this->_packageInfo['dirtree']) && count($this->_packageInfo['dirtree'])) { + return $this->_packageInfo['dirtree']; + } + return false; + } + + function resetDirtree() + { + unset($this->_packageInfo['dirtree']); + } + + /** + * Determines whether this package claims it is compatible with the version of + * the package that has a recommended version dependency + * @param PEAR_PackageFile_v2|PEAR_PackageFile_v1|PEAR_Downloader_Package + * @return boolean + */ + function isCompatible($pf) + { + if (!isset($this->_packageInfo['compatible'])) { + return false; + } + if (!isset($this->_packageInfo['channel'])) { + return false; + } + $me = $pf->getVersion(); + $compatible = $this->_packageInfo['compatible']; + if (!isset($compatible[0])) { + $compatible = array($compatible); + } + $found = false; + foreach ($compatible as $info) { + if (strtolower($info['name']) == strtolower($pf->getPackage())) { + if (strtolower($info['channel']) == strtolower($pf->getChannel())) { + $found = true; + break; + } + } + } + if (!$found) { + return false; + } + if (isset($info['exclude'])) { + if (!isset($info['exclude'][0])) { + $info['exclude'] = array($info['exclude']); + } + foreach ($info['exclude'] as $exclude) { + if (version_compare($me, $exclude, '==')) { + return false; + } + } + } + if (version_compare($me, $info['min'], '>=') && version_compare($me, $info['max'], '<=')) { + return true; + } + return false; + } + + /** + * @return array|false + */ + function getCompatible() + { + if (isset($this->_packageInfo['compatible'])) { + return $this->_packageInfo['compatible']; + } + return false; + } + + function getDependencies() + { + if (isset($this->_packageInfo['dependencies'])) { + return $this->_packageInfo['dependencies']; + } + return false; + } + + function isSubpackageOf($p) + { + return $p->isSubpackage($this); + } + + /** + * Determines whether the passed in package is a subpackage of this package. + * + * No version checking is done, only name verification. + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @return bool + */ + function isSubpackage($p) + { + $sub = array(); + if (isset($this->_packageInfo['dependencies']['required']['subpackage'])) { + $sub = $this->_packageInfo['dependencies']['required']['subpackage']; + if (!isset($sub[0])) { + $sub = array($sub); + } + } + if (isset($this->_packageInfo['dependencies']['optional']['subpackage'])) { + $sub1 = $this->_packageInfo['dependencies']['optional']['subpackage']; + if (!isset($sub1[0])) { + $sub1 = array($sub1); + } + $sub = array_merge($sub, $sub1); + } + if (isset($this->_packageInfo['dependencies']['group'])) { + $group = $this->_packageInfo['dependencies']['group']; + if (!isset($group[0])) { + $group = array($group); + } + foreach ($group as $deps) { + if (isset($deps['subpackage'])) { + $sub2 = $deps['subpackage']; + if (!isset($sub2[0])) { + $sub2 = array($sub2); + } + $sub = array_merge($sub, $sub2); + } + } + } + foreach ($sub as $dep) { + if (strtolower($dep['name']) == strtolower($p->getPackage())) { + if (isset($dep['channel'])) { + if (strtolower($dep['channel']) == strtolower($p->getChannel())) { + return true; + } + } else { + if ($dep['uri'] == $p->getURI()) { + return true; + } + } + } + } + return false; + } + + function dependsOn($package, $channel) + { + if (!($deps = $this->getDependencies())) { + return false; + } + foreach (array('package', 'subpackage') as $type) { + foreach (array('required', 'optional') as $needed) { + if (isset($deps[$needed][$type])) { + if (!isset($deps[$needed][$type][0])) { + $deps[$needed][$type] = array($deps[$needed][$type]); + } + foreach ($deps[$needed][$type] as $dep) { + $depchannel = isset($dep['channel']) ? $dep['channel'] : '__uri'; + if (strtolower($dep['name']) == strtolower($package) && + $depchannel == $channel) { + return true; + } + } + } + } + if (isset($deps['group'])) { + if (!isset($deps['group'][0])) { + $dep['group'] = array($deps['group']); + } + foreach ($deps['group'] as $group) { + if (isset($group[$type])) { + if (!is_array($group[$type])) { + $group[$type] = array($group[$type]); + } + foreach ($group[$type] as $dep) { + $depchannel = isset($dep['channel']) ? $dep['channel'] : '__uri'; + if (strtolower($dep['name']) == strtolower($package) && + $depchannel == $channel) { + return true; + } + } + } + } + } + } + return false; + } + + /** + * Get the contents of a dependency group + * @param string + * @return array|false + */ + function getDependencyGroup($name) + { + $name = strtolower($name); + if (!isset($this->_packageInfo['dependencies']['group'])) { + return false; + } + $groups = $this->_packageInfo['dependencies']['group']; + if (!isset($groups[0])) { + $groups = array($groups); + } + foreach ($groups as $group) { + if (strtolower($group['attribs']['name']) == $name) { + return $group; + } + } + return false; + } + + /** + * Retrieve a partial package.xml 1.0 representation of dependencies + * + * a very limited representation of dependencies is returned by this method. + * The tag for excluding certain versions of a dependency is + * completely ignored. In addition, dependency groups are ignored, with the + * assumption that all dependencies in dependency groups are also listed in + * the optional group that work with all dependency groups + * @param boolean return package.xml 2.0 tag + * @return array|false + */ + function getDeps($raw = false, $nopearinstaller = false) + { + if (isset($this->_packageInfo['dependencies'])) { + if ($raw) { + return $this->_packageInfo['dependencies']; + } + $ret = array(); + $map = array( + 'php' => 'php', + 'package' => 'pkg', + 'subpackage' => 'pkg', + 'extension' => 'ext', + 'os' => 'os', + 'pearinstaller' => 'pkg', + ); + foreach (array('required', 'optional') as $type) { + $optional = ($type == 'optional') ? 'yes' : 'no'; + if (!isset($this->_packageInfo['dependencies'][$type])) { + continue; + } + foreach ($this->_packageInfo['dependencies'][$type] as $dtype => $deps) { + if ($dtype == 'pearinstaller' && $nopearinstaller) { + continue; + } + if (!isset($deps[0])) { + $deps = array($deps); + } + foreach ($deps as $dep) { + if (!isset($map[$dtype])) { + // no support for arch type + continue; + } + if ($dtype == 'pearinstaller') { + $dep['name'] = 'PEAR'; + $dep['channel'] = 'pear.php.net'; + } + $s = array('type' => $map[$dtype]); + if (isset($dep['channel'])) { + $s['channel'] = $dep['channel']; + } + if (isset($dep['uri'])) { + $s['uri'] = $dep['uri']; + } + if (isset($dep['name'])) { + $s['name'] = $dep['name']; + } + if (isset($dep['conflicts'])) { + $s['rel'] = 'not'; + } else { + if (!isset($dep['min']) && + !isset($dep['max'])) { + $s['rel'] = 'has'; + $s['optional'] = $optional; + } elseif (isset($dep['min']) && + isset($dep['max'])) { + $s['rel'] = 'ge'; + $s1 = $s; + $s1['rel'] = 'le'; + $s['version'] = $dep['min']; + $s1['version'] = $dep['max']; + if (isset($dep['channel'])) { + $s1['channel'] = $dep['channel']; + } + if ($dtype != 'php') { + $s['name'] = $dep['name']; + $s1['name'] = $dep['name']; + } + $s['optional'] = $optional; + $s1['optional'] = $optional; + $ret[] = $s1; + } elseif (isset($dep['min'])) { + if (isset($dep['exclude']) && + $dep['exclude'] == $dep['min']) { + $s['rel'] = 'gt'; + } else { + $s['rel'] = 'ge'; + } + $s['version'] = $dep['min']; + $s['optional'] = $optional; + if ($dtype != 'php') { + $s['name'] = $dep['name']; + } + } elseif (isset($dep['max'])) { + if (isset($dep['exclude']) && + $dep['exclude'] == $dep['max']) { + $s['rel'] = 'lt'; + } else { + $s['rel'] = 'le'; + } + $s['version'] = $dep['max']; + $s['optional'] = $optional; + if ($dtype != 'php') { + $s['name'] = $dep['name']; + } + } + } + $ret[] = $s; + } + } + } + if (count($ret)) { + return $ret; + } + } + return false; + } + + /** + * @return php|extsrc|extbin|bundle|false + */ + function getPackageType() + { + if (isset($this->_packageInfo['phprelease'])) { + return 'php'; + } + if (isset($this->_packageInfo['extsrcrelease'])) { + return 'extsrc'; + } + if (isset($this->_packageInfo['extbinrelease'])) { + return 'extbin'; + } + if (isset($this->_packageInfo['bundle'])) { + return 'bundle'; + } + return false; + } + + /** + * @return array|false + */ + function getReleases() + { + $type = $this->getPackageType(); + if ($type != 'bundle') { + $type .= 'release'; + } + if ($this->getPackageType() && isset($this->_packageInfo[$type])) { + return $this->_packageInfo[$type]; + } + return false; + } + + /** + * @return array + */ + function getChangelog() + { + if (isset($this->_packageInfo['changelog'])) { + return $this->_packageInfo['changelog']; + } + return false; + } + + function hasDeps() + { + return isset($this->_packageInfo['dependencies']); + } + + function getPackagexmlVersion() + { + return '2.0'; + } + + /** + * @return array|false + */ + function getSourcePackage() + { + if (isset($this->_packageInfo['extbinrelease'])) { + return array('channel' => $this->_packageInfo['srcchannel'], + 'package' => $this->_packageInfo['srcpackage']); + } + return false; + } + + function getBundledPackages() + { + if (isset($this->_packageInfo['bundle'])) { + return $this->_packageInfo['contents']['bundledpackage']; + } + return false; + } + + function getLastModified() + { + if (isset($this->_packageInfo['_lastmodified'])) { + return $this->_packageInfo['_lastmodified']; + } + return false; + } + + /** + * Get the contents of a file listed within the package.xml + * @param string + * @return string + */ + function getFileContents($file) + { + if ($this->_archiveFile == $this->_packageFile) { // unpacked + $dir = dirname($this->_packageFile); + $file = $dir . DIRECTORY_SEPARATOR . $file; + $file = str_replace(array('/', '\\'), + array(DIRECTORY_SEPARATOR, DIRECTORY_SEPARATOR), $file); + if (file_exists($file) && is_readable($file)) { + return implode('', file($file)); + } + } else { // tgz + $tar = &new Archive_Tar($this->_archiveFile); + $tar->pushErrorHandling(PEAR_ERROR_RETURN); + if ($file != 'package.xml' && $file != 'package2.xml') { + $file = $this->getPackage() . '-' . $this->getVersion() . '/' . $file; + } + $file = $tar->extractInString($file); + $tar->popErrorHandling(); + if (PEAR::isError($file)) { + return PEAR::raiseError("Cannot locate file '$file' in archive"); + } + return $file; + } + } + + function &getRW() + { + if (!class_exists('PEAR_PackageFile_v2_rw')) { + require_once 'PEAR/PackageFile/v2/rw.php'; + } + $a = new PEAR_PackageFile_v2_rw; + foreach (get_object_vars($this) as $name => $unused) { + if (!isset($this->$name)) { + continue; + } + if ($name == '_config' || $name == '_logger'|| $name == '_registry' || + $name == '_stack') { + $a->$name = &$this->$name; + } else { + $a->$name = $this->$name; + } + } + return $a; + } + + function &getDefaultGenerator() + { + if (!class_exists('PEAR_PackageFile_Generator_v2')) { + require_once 'PEAR/PackageFile/Generator/v2.php'; + } + $a = &new PEAR_PackageFile_Generator_v2($this); + return $a; + } + + function analyzeSourceCode($file, $string = false) + { + if (!isset($this->_v2Validator) || + !is_a($this->_v2Validator, 'PEAR_PackageFile_v2_Validator')) { + if (!class_exists('PEAR_PackageFile_v2_Validator')) { + require_once 'PEAR/PackageFile/v2/Validator.php'; + } + $this->_v2Validator = new PEAR_PackageFile_v2_Validator; + } + return $this->_v2Validator->analyzeSourceCode($file, $string); + } + + function validate($state = PEAR_VALIDATE_NORMAL) + { + if (!isset($this->_packageInfo) || !is_array($this->_packageInfo)) { + return false; + } + if (!isset($this->_v2Validator) || + !is_a($this->_v2Validator, 'PEAR_PackageFile_v2_Validator')) { + if (!class_exists('PEAR_PackageFile_v2_Validator')) { + require_once 'PEAR/PackageFile/v2/Validator.php'; + } + $this->_v2Validator = new PEAR_PackageFile_v2_Validator; + } + if (isset($this->_packageInfo['xsdversion'])) { + unset($this->_packageInfo['xsdversion']); + } + return $this->_v2Validator->validate($this, $state); + } + + function getTasksNs() + { + if (!isset($this->_tasksNs)) { + if (isset($this->_packageInfo['attribs'])) { + foreach ($this->_packageInfo['attribs'] as $name => $value) { + if ($value == 'http://pear.php.net/dtd/tasks-1.0') { + $this->_tasksNs = str_replace('xmlns:', '', $name); + break; + } + } + } + } + return $this->_tasksNs; + } + + /** + * Determine whether a task name is a valid task. Custom tasks may be defined + * using subdirectories by putting a "-" in the name, as in + * + * Note that this method will auto-load the task class file and test for the existence + * of the name with "-" replaced by "_" as in PEAR/Task/mycustom/task.php makes class + * PEAR_Task_mycustom_task + * @param string + * @return boolean + */ + function getTask($task) + { + $this->getTasksNs(); + // transform all '-' to '/' and 'tasks:' to '' so tasks:replace becomes replace + $task = str_replace(array($this->_tasksNs . ':', '-'), array('', ' '), $task); + $task = str_replace(' ', '/', ucwords($task)); + $ps = (strtolower(substr(PHP_OS, 0, 3)) == 'win') ? ';' : ':'; + foreach (explode($ps, ini_get('include_path')) as $path) { + if (file_exists($path . "/PEAR/Task/$task.php")) { + include_once "PEAR/Task/$task.php"; + $task = str_replace('/', '_', $task); + if (class_exists("PEAR_Task_$task")) { + return "PEAR_Task_$task"; + } + } + } + return false; + } + + /** + * Key-friendly array_splice + * @param tagname to splice a value in before + * @param mixed the value to splice in + * @param string the new tag name + */ + function _ksplice($array, $key, $value, $newkey) + { + $offset = array_search($key, array_keys($array)); + $after = array_slice($array, $offset); + $before = array_slice($array, 0, $offset); + $before[$newkey] = $value; + return array_merge($before, $after); + } + + /** + * @param array a list of possible keys, in the order they may occur + * @param mixed contents of the new package.xml tag + * @param string tag name + * @access private + */ + function _insertBefore($array, $keys, $contents, $newkey) + { + foreach ($keys as $key) { + if (isset($array[$key])) { + return $array = $this->_ksplice($array, $key, $contents, $newkey); + } + } + $array[$newkey] = $contents; + return $array; + } + + /** + * @param subsection of {@link $_packageInfo} + * @param array|string tag contents + * @param array format: + * 
+     * array(
+     *   tagname => array(list of tag names that follow this one),
+     *   childtagname => array(list of child tag names that follow this one),
+     * )
+     *
+ * + * This allows construction of nested tags + * @access private + */ + function _mergeTag($manip, $contents, $order) + { + if (count($order)) { + foreach ($order as $tag => $curorder) { + if (!isset($manip[$tag])) { + // ensure that the tag is set up + $manip = $this->_insertBefore($manip, $curorder, array(), $tag); + } + if (count($order) > 1) { + $manip[$tag] = $this->_mergeTag($manip[$tag], $contents, array_slice($order, 1)); + return $manip; + } + } + } else { + return $manip; + } + if (is_array($manip[$tag]) && !empty($manip[$tag]) && isset($manip[$tag][0])) { + $manip[$tag][] = $contents; + } else { + if (!count($manip[$tag])) { + $manip[$tag] = $contents; + } else { + $manip[$tag] = array($manip[$tag]); + $manip[$tag][] = $contents; + } + } + return $manip; + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile/v2/Validator.php b/campcaster/src/tools/pear/src/PEAR/PackageFile/v2/Validator.php new file mode 100644 index 000000000..8066a5215 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile/v2/Validator.php @@ -0,0 +1,1999 @@ + | +// | | +// +----------------------------------------------------------------------+ +// +// $Id: Validator.php,v 1.86.2.1 2006/05/10 02:55:06 cellog Exp $ +/** + * Private validation class used by PEAR_PackageFile_v2 - do not use directly, its + * sole purpose is to split up the PEAR/PackageFile/v2.php file to make it smaller + * @author Greg Beaver + * @access private + */ +class PEAR_PackageFile_v2_Validator +{ + /** + * @var array + */ + var $_packageInfo; + /** + * @var PEAR_PackageFile_v2 + */ + var $_pf; + /** + * @var PEAR_ErrorStack + */ + var $_stack; + /** + * @var int + */ + var $_isValid = 0; + /** + * @var int + */ + var $_filesValid = 0; + /** + * @var int + */ + var $_curState = 0; + /** + * @param PEAR_PackageFile_v2 + * @param int + */ + function validate(&$pf, $state = PEAR_VALIDATE_NORMAL) + { + $this->_pf = &$pf; + $this->_curState = $state; + $this->_packageInfo = $this->_pf->getArray(); + $this->_isValid = $this->_pf->_isValid; + $this->_filesValid = $this->_pf->_filesValid; + $this->_stack = &$pf->_stack; + $this->_stack->getErrors(true); + if (($this->_isValid & $state) == $state) { + return true; + } + if (!isset($this->_packageInfo) || !is_array($this->_packageInfo)) { + return false; + } + if (!isset($this->_packageInfo['attribs']['version']) || + $this->_packageInfo['attribs']['version'] != '2.0') { + $this->_noPackageVersion(); + } + $structure = + array( + 'name', + 'channel|uri', + '*extends', // can't be multiple, but this works fine + 'summary', + 'description', + '+lead', // these all need content checks + '*developer', + '*contributor', + '*helper', + 'date', + '*time', + 'version', + 'stability', + 'license->?uri->?filesource', + 'notes', + 'contents', //special validation needed + '*compatible', + 'dependencies', //special validation needed + '*usesrole', + '*usestask', // reserve these for 1.4.0a1 to implement + // this will allow a package.xml to gracefully say it + // needs a certain package installed in order to implement a role or task + '*providesextension', + '*srcpackage|*srcuri', + '+phprelease|+extsrcrelease|+extbinrelease|bundle', //special validation needed + '*changelog', + ); + $test = $this->_packageInfo; + if (isset($test['dependencies']) && + isset($test['dependencies']['required']) && + isset($test['dependencies']['required']['pearinstaller']) && + isset($test['dependencies']['required']['pearinstaller']['min']) && + version_compare('1.4.11', + $test['dependencies']['required']['pearinstaller']['min'], '<')) { + $this->_pearVersionTooLow($test['dependencies']['required']['pearinstaller']['min']); + return false; + } + // ignore post-installation array fields + if (array_key_exists('filelist', $test)) { + unset($test['filelist']); + } + if (array_key_exists('_lastmodified', $test)) { + unset($test['_lastmodified']); + } + if (array_key_exists('#binarypackage', $test)) { + unset($test['#binarypackage']); + } + if (array_key_exists('old', $test)) { + unset($test['old']); + } + if (array_key_exists('_lastversion', $test)) { + unset($test['_lastversion']); + } + if (!$this->_stupidSchemaValidate($structure, + $test, '')) { + return false; + } + if (empty($this->_packageInfo['name'])) { + $this->_tagCannotBeEmpty('name'); + } + if (isset($this->_packageInfo['uri'])) { + $test = 'uri'; + } else { + $test = 'channel'; + } + if (empty($this->_packageInfo[$test])) { + $this->_tagCannotBeEmpty($test); + } + if (is_array($this->_packageInfo['license']) && + (!isset($this->_packageInfo['license']['_content']) || + empty($this->_packageInfo['license']['_content']))) { + $this->_tagCannotBeEmpty('license'); + } elseif (empty($this->_packageInfo['license'])) { + $this->_tagCannotBeEmpty('license'); + } + if (empty($this->_packageInfo['summary'])) { + $this->_tagCannotBeEmpty('summary'); + } + if (empty($this->_packageInfo['description'])) { + $this->_tagCannotBeEmpty('description'); + } + if (empty($this->_packageInfo['date'])) { + $this->_tagCannotBeEmpty('date'); + } + if (empty($this->_packageInfo['notes'])) { + $this->_tagCannotBeEmpty('notes'); + } + if (isset($this->_packageInfo['time']) && empty($this->_packageInfo['time'])) { + $this->_tagCannotBeEmpty('time'); + } + if (isset($this->_packageInfo['dependencies'])) { + $this->_validateDependencies(); + } + if (isset($this->_packageInfo['compatible'])) { + $this->_validateCompatible(); + } + if (!isset($this->_packageInfo['bundle'])) { + if (!isset($this->_packageInfo['contents']['dir'])) { + $this->_filelistMustContainDir('contents'); + return false; + } + if (isset($this->_packageInfo['contents']['file'])) { + $this->_filelistCannotContainFile('contents'); + return false; + } + } + $this->_validateMaintainers(); + $this->_validateStabilityVersion(); + $fail = false; + if (array_key_exists('usesrole', $this->_packageInfo)) { + $roles = $this->_packageInfo['usesrole']; + if (!is_array($roles) || !isset($roles[0])) { + $roles = array($roles); + } + foreach ($roles as $role) { + if (!isset($role['role'])) { + $this->_usesroletaskMustHaveRoleTask('usesrole', 'role'); + $fail = true; + } else { + if (!isset($role['channel'])) { + if (!isset($role['uri'])) { + $this->_usesroletaskMustHaveChannelOrUri($role['role'], 'usesrole'); + $fail = true; + } + } elseif (!isset($role['package'])) { + $this->_usesroletaskMustHavePackage($role['role'], 'usesrole'); + $fail = true; + } + } + } + } + if (array_key_exists('usestask', $this->_packageInfo)) { + $roles = $this->_packageInfo['usestask']; + if (!is_array($roles) || !isset($roles[0])) { + $roles = array($roles); + } + foreach ($roles as $role) { + if (!isset($role['task'])) { + $this->_usesroletaskMustHaveRoleTask('usestask', 'task'); + $fail = true; + } else { + if (!isset($role['channel'])) { + if (!isset($role['uri'])) { + $this->_usesroletaskMustHaveChannelOrUri($role['task'], 'usestask'); + $fail = true; + } + } elseif (!isset($role['package'])) { + $this->_usesroletaskMustHavePackage($role['task'], 'usestask'); + $fail = true; + } + } + } + } + if ($fail) { + return false; + } + $this->_validateFilelist(); + $this->_validateRelease(); + if (!$this->_stack->hasErrors()) { + $chan = $this->_pf->_registry->getChannel($this->_pf->getChannel(), true); + if (PEAR::isError($chan)) { + $this->_unknownChannel($this->_pf->getChannel()); + } else { + $valpack = $chan->getValidationPackage(); + // for channel validator packages, always use the default PEAR validator. + // otherwise, they can't be installed or packaged + $validator = $chan->getValidationObject($this->_pf->getPackage()); + if (!$validator) { + $this->_stack->push(__FUNCTION__, 'error', + array_merge( + array('channel' => $chan->getName(), + 'package' => $this->_pf->getPackage()), + $valpack + ), + 'package "%channel%/%package%" cannot be properly validated without ' . + 'validation package "%channel%/%name%-%version%"'); + return $this->_isValid = 0; + } + $validator->setPackageFile($this->_pf); + $validator->validate($state); + $failures = $validator->getFailures(); + foreach ($failures['errors'] as $error) { + $this->_stack->push(__FUNCTION__, 'error', $error, + 'Channel validator error: field "%field%" - %reason%'); + } + foreach ($failures['warnings'] as $warning) { + $this->_stack->push(__FUNCTION__, 'warning', $warning, + 'Channel validator warning: field "%field%" - %reason%'); + } + } + } + $this->_pf->_isValid = $this->_isValid = !$this->_stack->hasErrors('error'); + if ($this->_isValid && $state == PEAR_VALIDATE_PACKAGING && !$this->_filesValid) { + if ($this->_pf->getPackageType() == 'bundle') { + if ($this->_analyzeBundledPackages()) { + $this->_filesValid = $this->_pf->_filesValid = true; + } else { + $this->_pf->_isValid = $this->_isValid = 0; + } + } else { + if (!$this->_analyzePhpFiles()) { + $this->_pf->_isValid = $this->_isValid = 0; + } else { + $this->_filesValid = $this->_pf->_filesValid = true; + } + } + } + if ($this->_isValid) { + return $this->_pf->_isValid = $this->_isValid = $state; + } + return $this->_pf->_isValid = $this->_isValid = 0; + } + + function _stupidSchemaValidate($structure, $xml, $root) + { + if (!is_array($xml)) { + $xml = array(); + } + $keys = array_keys($xml); + reset($keys); + $key = current($keys); + while ($key == 'attribs' || $key == '_contents') { + $key = next($keys); + } + $unfoundtags = $optionaltags = array(); + $ret = true; + $mismatch = false; + foreach ($structure as $struc) { + if ($key) { + $tag = $xml[$key]; + } + $test = $this->_processStructure($struc); + if (isset($test['choices'])) { + $loose = true; + foreach ($test['choices'] as $choice) { + if ($key == $choice['tag']) { + $key = next($keys); + while ($key == 'attribs' || $key == '_contents') { + $key = next($keys); + } + $unfoundtags = $optionaltags = array(); + $mismatch = false; + if ($key && $key != $choice['tag'] && isset($choice['multiple'])) { + $unfoundtags[] = $choice['tag']; + $optionaltags[] = $choice['tag']; + if ($key) { + $mismatch = true; + } + } + $ret &= $this->_processAttribs($choice, $tag, $root); + continue 2; + } else { + $unfoundtags[] = $choice['tag']; + $mismatch = true; + } + if (!isset($choice['multiple']) || $choice['multiple'] != '*') { + $loose = false; + } else { + $optionaltags[] = $choice['tag']; + } + } + if (!$loose) { + $this->_invalidTagOrder($unfoundtags, $key, $root); + return false; + } + } else { + if ($key != $test['tag']) { + if (isset($test['multiple']) && $test['multiple'] != '*') { + $unfoundtags[] = $test['tag']; + $this->_invalidTagOrder($unfoundtags, $key, $root); + return false; + } else { + if ($key) { + $mismatch = true; + } + $unfoundtags[] = $test['tag']; + $optionaltags[] = $test['tag']; + } + if (!isset($test['multiple'])) { + $this->_invalidTagOrder($unfoundtags, $key, $root); + return false; + } + continue; + } else { + $unfoundtags = $optionaltags = array(); + $mismatch = false; + } + $key = next($keys); + while ($key == 'attribs' || $key == '_contents') { + $key = next($keys); + } + if ($key && $key != $test['tag'] && isset($test['multiple'])) { + $unfoundtags[] = $test['tag']; + $optionaltags[] = $test['tag']; + $mismatch = true; + } + $ret &= $this->_processAttribs($test, $tag, $root); + continue; + } + } + if (!$mismatch && count($optionaltags)) { + // don't error out on any optional tags + $unfoundtags = array_diff($unfoundtags, $optionaltags); + } + if (count($unfoundtags)) { + $this->_invalidTagOrder($unfoundtags, $key, $root); + } elseif ($key) { + // unknown tags + $this->_invalidTagOrder('*no tags allowed here*', $key, $root); + while ($key = next($keys)) { + $this->_invalidTagOrder('*no tags allowed here*', $key, $root); + } + } + return $ret; + } + + function _processAttribs($choice, $tag, $context) + { + if (isset($choice['attribs'])) { + if (!is_array($tag)) { + $tag = array($tag); + } + $tags = $tag; + if (!isset($tags[0])) { + $tags = array($tags); + } + $ret = true; + foreach ($tags as $i => $tag) { + if (!is_array($tag) || !isset($tag['attribs'])) { + foreach ($choice['attribs'] as $attrib) { + if ($attrib{0} != '?') { + $ret &= $this->_tagHasNoAttribs($choice['tag'], + $context); + continue 2; + } + } + } + foreach ($choice['attribs'] as $attrib) { + if ($attrib{0} != '?') { + if (!isset($tag['attribs'][$attrib])) { + $ret &= $this->_tagMissingAttribute($choice['tag'], + $attrib, $context); + } + } + } + } + return $ret; + } + return true; + } + + function _processStructure($key) + { + $ret = array(); + if (count($pieces = explode('|', $key)) > 1) { + foreach ($pieces as $piece) { + $ret['choices'][] = $this->_processStructure($piece); + } + return $ret; + } + $multi = $key{0}; + if ($multi == '+' || $multi == '*') { + $ret['multiple'] = $key{0}; + $key = substr($key, 1); + } + if (count($attrs = explode('->', $key)) > 1) { + $ret['tag'] = array_shift($attrs); + $ret['attribs'] = $attrs; + } else { + $ret['tag'] = $key; + } + return $ret; + } + + function _validateStabilityVersion() + { + $structure = array('release', 'api'); + $a = $this->_stupidSchemaValidate($structure, $this->_packageInfo['version'], ''); + $a &= $this->_stupidSchemaValidate($structure, $this->_packageInfo['stability'], ''); + if ($a) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $this->_packageInfo['version']['release'])) { + $this->_invalidVersion('release', $this->_packageInfo['version']['release']); + } + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $this->_packageInfo['version']['api'])) { + $this->_invalidVersion('api', $this->_packageInfo['version']['api']); + } + if (!in_array($this->_packageInfo['stability']['release'], + array('snapshot', 'devel', 'alpha', 'beta', 'stable'))) { + $this->_invalidState('release', $this->_packageinfo['stability']['release']); + } + if (!in_array($this->_packageInfo['stability']['api'], + array('devel', 'alpha', 'beta', 'stable'))) { + $this->_invalidState('api', $this->_packageinfo['stability']['api']); + } + } + } + + function _validateMaintainers() + { + $structure = + array( + 'name', + 'user', + 'email', + 'active', + ); + foreach (array('lead', 'developer', 'contributor', 'helper') as $type) { + if (!isset($this->_packageInfo[$type])) { + continue; + } + if (isset($this->_packageInfo[$type][0])) { + foreach ($this->_packageInfo[$type] as $lead) { + $this->_stupidSchemaValidate($structure, $lead, '<' . $type . '>'); + } + } else { + $this->_stupidSchemaValidate($structure, $this->_packageInfo[$type], + '<' . $type . '>'); + } + } + } + + function _validatePhpDep($dep, $installcondition = false) + { + $structure = array( + 'min', + '*max', + '*exclude', + ); + $type = $installcondition ? '' : ''; + $this->_stupidSchemaValidate($structure, $dep, $type); + if (isset($dep['min'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?(?:-[a-zA-Z0-9]+)?$/', + $dep['min'])) { + $this->_invalidVersion($type . '', $dep['min']); + } + } + if (isset($dep['max'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?(?:-[a-zA-Z0-9]+)?$/', + $dep['max'])) { + $this->_invalidVersion($type . '', $dep['max']); + } + } + } + + function _validatePearinstallerDep($dep) + { + $structure = array( + 'min', + '*max', + '*recommended', + '*exclude', + ); + $this->_stupidSchemaValidate($structure, $dep, ''); + if (isset($dep['min'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $dep['min'])) { + $this->_invalidVersion('', + $dep['min']); + } + } + if (isset($dep['max'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $dep['max'])) { + $this->_invalidVersion('', + $dep['max']); + } + } + if (isset($dep['recommended'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $dep['recommended'])) { + $this->_invalidVersion('', + $dep['recommended']); + } + } + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude'])) { + $dep['exclude'] = array($dep['exclude']); + } + foreach ($dep['exclude'] as $exclude) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $exclude)) { + $this->_invalidVersion('', + $exclude); + } + } + } + } + + function _validatePackageDep($dep, $group, $type = '') + { + if (isset($dep['uri'])) { + if (isset($dep['conflicts'])) { + $structure = array( + 'name', + 'uri', + 'conflicts', + '*providesextension', + ); + } else { + $structure = array( + 'name', + 'uri', + '*providesextension', + ); + } + } else { + if (isset($dep['conflicts'])) { + $structure = array( + 'name', + 'channel', + '*min', + '*max', + '*exclude', + 'conflicts', + '*providesextension', + ); + } else { + $structure = array( + 'name', + 'channel', + '*min', + '*max', + '*recommended', + '*exclude', + '*nodefault', + '*providesextension', + ); + } + } + if (isset($dep['name'])) { + $type .= '' . $dep['name'] . ''; + } + $this->_stupidSchemaValidate($structure, $dep, '' . $group . $type); + if (isset($dep['uri']) && (isset($dep['min']) || isset($dep['max']) || + isset($dep['recommended']) || isset($dep['exclude']))) { + $this->_uriDepsCannotHaveVersioning('' . $group . $type); + } + if (isset($dep['channel']) && strtolower($dep['channel']) == '__uri') { + $this->_DepchannelCannotBeUri('' . $group . $type); + } + if (isset($dep['min'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $dep['min'])) { + $this->_invalidVersion('' . $group . $type . '', $dep['min']); + } + } + if (isset($dep['max'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $dep['max'])) { + $this->_invalidVersion('' . $group . $type . '', $dep['max']); + } + } + if (isset($dep['recommended'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $dep['recommended'])) { + $this->_invalidVersion('' . $group . $type . '', + $dep['recommended']); + } + } + if (isset($dep['exclude'])) { + if (!is_array($dep['exclude'])) { + $dep['exclude'] = array($dep['exclude']); + } + foreach ($dep['exclude'] as $exclude) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $exclude)) { + $this->_invalidVersion('' . $group . $type . '', + $exclude); + } + } + } + } + + function _validateSubpackageDep($dep, $group) + { + $this->_validatePackageDep($dep, $group, ''); + if (isset($dep['providesextension'])) { + $this->_subpackageCannotProvideExtension(@$dep['name']); + } + if (isset($dep['conflicts'])) { + $this->_subpackagesCannotConflict(@$dep['name']); + } + } + + function _validateExtensionDep($dep, $group = false, $installcondition = false) + { + if (isset($dep['conflicts'])) { + $structure = array( + 'name', + '*min', + '*max', + '*exclude', + 'conflicts', + ); + } else { + $structure = array( + 'name', + '*min', + '*max', + '*recommended', + '*exclude', + ); + } + if ($installcondition) { + $type = ''; + } else { + $type = '' . $group . ''; + } + if (isset($dep['name'])) { + $type .= '' . $dep['name'] . ''; + } + $this->_stupidSchemaValidate($structure, $dep, $type); + if (isset($dep['min'])) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $dep['min'])) { + $this->_invalidVersion(substr($type, 1) . '_invalidVersion(substr($type, 1) . '_invalidVersion(substr($type, 1) . '_invalidVersion(substr($type, 1) . '' : ''; + if ($this->_stupidSchemaValidate($structure, $dep, $type)) { + if ($dep['name'] == '*') { + if (array_key_exists('conflicts', $dep)) { + $this->_cannotConflictWithAllOs($type); + } + } + } + } + + function _validateArchDep($dep, $installcondition = false) + { + $structure = array( + 'pattern', + '*conflicts', + ); + $type = $installcondition ? '' : ''; + $this->_stupidSchemaValidate($structure, $dep, $type); + } + + function _validateInstallConditions($cond, $release) + { + $structure = array( + '*php', + '*extension', + '*os', + '*arch', + ); + if (!$this->_stupidSchemaValidate($structure, + $cond, $release)) { + return false; + } + foreach (array('php', 'extension', 'os', 'arch') as $type) { + if (isset($cond[$type])) { + $iter = $cond[$type]; + if (!is_array($iter) || !isset($iter[0])) { + $iter = array($iter); + } + foreach ($iter as $package) { + if ($type == 'extension') { + $this->{"_validate{$type}Dep"}($package, false, true); + } else { + $this->{"_validate{$type}Dep"}($package, true); + } + } + } + } + } + + function _validateDependencies() + { + $structure = array( + 'required', + '*optional', + '*group->name->hint' + ); + if (!$this->_stupidSchemaValidate($structure, + $this->_packageInfo['dependencies'], '')) { + return false; + } + foreach (array('required', 'optional') as $simpledep) { + if (isset($this->_packageInfo['dependencies'][$simpledep])) { + if ($simpledep == 'optional') { + $structure = array( + '*package', + '*subpackage', + '*extension', + ); + } else { + $structure = array( + 'php', + 'pearinstaller', + '*package', + '*subpackage', + '*extension', + '*os', + '*arch', + ); + } + if ($this->_stupidSchemaValidate($structure, + $this->_packageInfo['dependencies'][$simpledep], + "<$simpledep>")) { + foreach (array('package', 'subpackage', 'extension') as $type) { + if (isset($this->_packageInfo['dependencies'][$simpledep][$type])) { + $iter = $this->_packageInfo['dependencies'][$simpledep][$type]; + if (!isset($iter[0])) { + $iter = array($iter); + } + foreach ($iter as $package) { + if ($type != 'extension') { + if (isset($package['uri'])) { + if (isset($package['channel'])) { + $this->_UrlOrChannel($type, + $package['name']); + } + } else { + if (!isset($package['channel'])) { + $this->_NoChannel($type, $package['name']); + } + } + } + $this->{"_validate{$type}Dep"}($package, "<$simpledep>"); + } + } + } + if ($simpledep == 'optional') { + continue; + } + foreach (array('php', 'pearinstaller', 'os', 'arch') as $type) { + if (isset($this->_packageInfo['dependencies'][$simpledep][$type])) { + $iter = $this->_packageInfo['dependencies'][$simpledep][$type]; + if (!isset($iter[0])) { + $iter = array($iter); + } + foreach ($iter as $package) { + $this->{"_validate{$type}Dep"}($package); + } + } + } + } + } + } + if (isset($this->_packageInfo['dependencies']['group'])) { + $groups = $this->_packageInfo['dependencies']['group']; + if (!isset($groups[0])) { + $groups = array($groups); + } + $structure = array( + '*package', + '*subpackage', + '*extension', + ); + foreach ($groups as $group) { + if ($this->_stupidSchemaValidate($structure, $group, '')) { + if (!PEAR_Validate::validGroupName($group['attribs']['name'])) { + $this->_invalidDepGroupName($group['attribs']['name']); + } + foreach (array('package', 'subpackage', 'extension') as $type) { + if (isset($group[$type])) { + $iter = $group[$type]; + if (!isset($iter[0])) { + $iter = array($iter); + } + foreach ($iter as $package) { + if ($type != 'extension') { + if (isset($package['uri'])) { + if (isset($package['channel'])) { + $this->_UrlOrChannelGroup($type, + $package['name'], + $group['name']); + } + } else { + if (!isset($package['channel'])) { + $this->_NoChannelGroup($type, + $package['name'], + $group['name']); + } + } + } + $this->{"_validate{$type}Dep"}($package, ''); + } + } + } + } + } + } + } + + function _validateCompatible() + { + $compat = $this->_packageInfo['compatible']; + if (!isset($compat[0])) { + $compat = array($compat); + } + $required = array('name', 'channel', 'min', 'max', '*exclude'); + foreach ($compat as $package) { + $type = ''; + if (is_array($package) && array_key_exists('name', $package)) { + $type .= '' . $package['name'] . ''; + } + $this->_stupidSchemaValidate($required, $package, $type); + if (is_array($package) && array_key_exists('min', $package)) { + if (!preg_match('/^\d+(?:\.\d+)*(?:[a-zA-Z]+\d*)?$/', + $package['min'])) { + $this->_invalidVersion(substr($type, 1) . '_invalidVersion(substr($type, 1) . '_invalidVersion(substr($type, 1) . '_NoBundledPackages(); + } + if (!is_array($list['bundledpackage']) || !isset($list['bundledpackage'][0])) { + return $this->_AtLeast2BundledPackages(); + } + foreach ($list['bundledpackage'] as $package) { + if (!is_string($package)) { + $this->_bundledPackagesMustBeFilename(); + } + } + } + + function _validateFilelist($list = false, $allowignore = false, $dirs = '') + { + $iscontents = false; + if (!$list) { + $iscontents = true; + $list = $this->_packageInfo['contents']; + if (isset($this->_packageInfo['bundle'])) { + return $this->_validateBundle($list); + } + } + if ($allowignore) { + $struc = array( + '*install->name->as', + '*ignore->name' + ); + } else { + $struc = array( + '*dir->name->?baseinstalldir', + '*file->name->role->?baseinstalldir->?md5sum' + ); + if (isset($list['dir']) && isset($list['file'])) { + // stave off validation errors without requiring a set order. + $_old = $list; + if (isset($list['attribs'])) { + $list = array('attribs' => $_old['attribs']); + } + $list['dir'] = $_old['dir']; + $list['file'] = $_old['file']; + } + } + if (!isset($list['attribs']) || !isset($list['attribs']['name'])) { + $unknown = $allowignore ? '' : ''; + $dirname = $iscontents ? '' : $unknown; + } else { + $dirname = ''; + } + $res = $this->_stupidSchemaValidate($struc, $list, $dirname); + if ($allowignore && $res) { + $this->_pf->getFilelist(); + $fcontents = $this->_pf->getContents(); + $filelist = array(); + if (!isset($fcontents['dir']['file'][0])) { + $fcontents['dir']['file'] = array($fcontents['dir']['file']); + } + foreach ($fcontents['dir']['file'] as $file) { + $filelist[$file['attribs']['name']] = true; + } + if (isset($list['install'])) { + if (!isset($list['install'][0])) { + $list['install'] = array($list['install']); + } + foreach ($list['install'] as $file) { + if (!isset($filelist[$file['attribs']['name']])) { + $this->_notInContents($file['attribs']['name'], 'install'); + } + } + } + if (isset($list['ignore'])) { + if (!isset($list['ignore'][0])) { + $list['ignore'] = array($list['ignore']); + } + foreach ($list['ignore'] as $file) { + if (!isset($filelist[$file['attribs']['name']])) { + $this->_notInContents($file['attribs']['name'], 'ignore'); + } + } + } + } + if (!$allowignore && isset($list['file'])) { + if (!isset($list['file'][0])) { + // single file + $list['file'] = array($list['file']); + } + foreach ($list['file'] as $i => $file) + { + if (isset($file['attribs']) && isset($file['attribs']['name']) && + $file['attribs']['name']{0} == '.' && + $file['attribs']['name']{1} == '/') { + // name is something like "./doc/whatever.txt" + $this->_invalidFileName($file['attribs']['name']); + } + if (isset($file['attribs']) && isset($file['attribs']['role'])) { + if (!$this->_validateRole($file['attribs']['role'])) { + if (isset($this->_packageInfo['usesrole'])) { + $roles = $this->_packageInfo['usesrole']; + if (!isset($roles[0])) { + $roles = array($roles); + } + foreach ($roles as $role) { + if ($role['role'] = $file['attribs']['role']) { + $msg = 'This package contains role "%role%" and requires ' . + 'package "%package%" to be used'; + if (isset($role['uri'])) { + $params = array('role' => $role['role'], + 'package' => $role['uri']); + } else { + $params = array('role' => $role['role'], + 'package' => $this->_pf->_registry-> + parsedPackageNameToString(array('package' => + $role['package'], 'channel' => $role['channel']), + true)); + } + $this->_stack->push('_mustInstallRole', 'error', $params, $msg); + } + } + } + $this->_invalidFileRole($file['attribs']['name'], + $dirname, $file['attribs']['role']); + } + } + if (!isset($file['attribs'])) { + continue; + } + $save = $file['attribs']; + if ($dirs) { + $save['name'] = $dirs . '/' . $save['name']; + } + unset($file['attribs']); + if (count($file) && $this->_curState != PEAR_VALIDATE_DOWNLOADING) { // has tasks + foreach ($file as $task => $value) { + if ($tagClass = $this->_pf->getTask($task)) { + if (!is_array($value) || !isset($value[0])) { + $value = array($value); + } + foreach ($value as $v) { + $ret = call_user_func(array($tagClass, 'validateXml'), + $this->_pf, $v, $this->_pf->_config, $save); + if (is_array($ret)) { + $this->_invalidTask($task, $ret, @$save['name']); + } + } + } else { + if (isset($this->_packageInfo['usestask'])) { + $roles = $this->_packageInfo['usestask']; + if (!isset($roles[0])) { + $roles = array($roles); + } + foreach ($roles as $role) { + if ($role['task'] = $task) { + $msg = 'This package contains task "%task%" and requires ' . + 'package "%package%" to be used'; + if (isset($role['uri'])) { + $params = array('task' => $role['task'], + 'package' => $role['uri']); + } else { + $params = array('task' => $role['task'], + 'package' => $this->_pf->_registry-> + parsedPackageNameToString(array('package' => + $role['package'], 'channel' => $role['channel']), + true)); + } + $this->_stack->push('_mustInstallTask', 'error', + $params, $msg); + } + } + } + $this->_unknownTask($task, $save['name']); + } + } + } + } + } + if (isset($list['ignore'])) { + if (!$allowignore) { + $this->_ignoreNotAllowed('ignore'); + } + } + if (isset($list['install'])) { + if (!$allowignore) { + $this->_ignoreNotAllowed('install'); + } + } + if (isset($list['file'])) { + if ($allowignore) { + $this->_fileNotAllowed('file'); + } + } + if (isset($list['dir'])) { + if ($allowignore) { + $this->_fileNotAllowed('dir'); + } else { + if (!isset($list['dir'][0])) { + $list['dir'] = array($list['dir']); + } + foreach ($list['dir'] as $dir) { + if (isset($dir['attribs']) && isset($dir['attribs']['name'])) { + if ($dir['attribs']['name'] == '/' || + !isset($this->_packageInfo['contents']['dir']['dir'])) { + // always use nothing if the filelist has already been flattened + $newdirs = ''; + } elseif ($dirs == '') { + $newdirs = $dir['attribs']['name']; + } else { + $newdirs = $dirs . '/' . $dir['attribs']['name']; + } + } else { + $newdirs = $dirs; + } + $this->_validateFilelist($dir, $allowignore, $newdirs); + } + } + } + } + + function _validateRelease() + { + if (isset($this->_packageInfo['phprelease'])) { + $release = 'phprelease'; + if (isset($this->_packageInfo['providesextension'])) { + $this->_cannotProvideExtension($release); + } + if (isset($this->_packageInfo['srcpackage']) || isset($this->_packageInfo['srcuri'])) { + $this->_cannotHaveSrcpackage($release); + } + $releases = $this->_packageInfo['phprelease']; + if (!is_array($releases)) { + return true; + } + if (!isset($releases[0])) { + $releases = array($releases); + } + foreach ($releases as $rel) { + $this->_stupidSchemaValidate(array( + '*installconditions', + '*filelist', + ), $rel, ''); + } + } + if (isset($this->_packageInfo['extsrcrelease'])) { + $release = 'extsrcrelease'; + if (!isset($this->_packageInfo['providesextension'])) { + $this->_mustProvideExtension($release); + } + if (isset($this->_packageInfo['srcpackage']) || isset($this->_packageInfo['srcuri'])) { + $this->_cannotHaveSrcpackage($release); + } + $releases = $this->_packageInfo['extsrcrelease']; + if (!is_array($releases)) { + return true; + } + if (!isset($releases[0])) { + $releases = array($releases); + } + foreach ($releases as $rel) { + $this->_stupidSchemaValidate(array( + '*installconditions', + '*configureoption->name->prompt->?default', + '*binarypackage', + '*filelist', + ), $rel, ''); + if (isset($rel['binarypackage'])) { + if (!is_array($rel['binarypackage']) || !isset($rel['binarypackage'][0])) { + $rel['binarypackage'] = array($rel['binarypackage']); + } + foreach ($rel['binarypackage'] as $bin) { + if (!is_string($bin)) { + $this->_binaryPackageMustBePackagename(); + } + } + } + } + } + if (isset($this->_packageInfo['extbinrelease'])) { + $release = 'extbinrelease'; + if (!isset($this->_packageInfo['providesextension'])) { + $this->_mustProvideExtension($release); + } + if (isset($this->_packageInfo['channel']) && + !isset($this->_packageInfo['srcpackage'])) { + $this->_mustSrcPackage($release); + } + if (isset($this->_packageInfo['uri']) && !isset($this->_packageInfo['srcuri'])) { + $this->_mustSrcuri($release); + } + $releases = $this->_packageInfo['extbinrelease']; + if (!is_array($releases)) { + return true; + } + if (!isset($releases[0])) { + $releases = array($releases); + } + foreach ($releases as $rel) { + $this->_stupidSchemaValidate(array( + '*installconditions', + '*filelist', + ), $rel, ''); + } + } + if (isset($this->_packageInfo['bundle'])) { + $release = 'bundle'; + if (isset($this->_packageInfo['providesextension'])) { + $this->_cannotProvideExtension($release); + } + if (isset($this->_packageInfo['srcpackage']) || isset($this->_packageInfo['srcuri'])) { + $this->_cannotHaveSrcpackage($release); + } + $releases = $this->_packageInfo['bundle']; + if (!is_array($releases) || !isset($releases[0])) { + $releases = array($releases); + } + foreach ($releases as $rel) { + $this->_stupidSchemaValidate(array( + '*installconditions', + '*filelist', + ), $rel, ''); + } + } + foreach ($releases as $rel) { + if (is_array($rel) && array_key_exists('installconditions', $rel)) { + $this->_validateInstallConditions($rel['installconditions'], + "<$release>"); + } + if (is_array($rel) && array_key_exists('filelist', $rel)) { + if ($rel['filelist']) { + + $this->_validateFilelist($rel['filelist'], true); + } + } + } + } + + /** + * This is here to allow role extension through plugins + * @param string + */ + function _validateRole($role) + { + return in_array($role, PEAR_Installer_Role::getValidRoles($this->_pf->getPackageType())); + } + + function _pearVersionTooLow($version) + { + $this->_stack->push(__FUNCTION__, 'error', + array('version' => $version), + 'This package.xml requires PEAR version %version% to parse properly, we are ' . + 'version 1.4.11'); + } + + function _invalidTagOrder($oktags, $actual, $root) + { + $this->_stack->push(__FUNCTION__, 'error', + array('oktags' => $oktags, 'actual' => $actual, 'root' => $root), + 'Invalid tag order in %root%, found <%actual%> expected one of "%oktags%"'); + } + + function _ignoreNotAllowed($type) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type), + '<%type%> is not allowed inside global , only inside ' . + '/, use and only'); + } + + function _fileNotAllowed($type) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type), + '<%type%> is not allowed inside release , only inside ' . + ', use and only'); + } + + function _tagMissingAttribute($tag, $attr, $context) + { + $this->_stack->push(__FUNCTION__, 'error', array('tag' => $tag, + 'attribute' => $attr, 'context' => $context), + 'tag <%tag%> in context "%context%" has no attribute "%attribute%"'); + } + + function _tagHasNoAttribs($tag, $context) + { + $this->_stack->push(__FUNCTION__, 'error', array('tag' => $tag, + 'context' => $context), + 'tag <%tag%> has no attributes in context "%context%"'); + } + + function _invalidInternalStructure() + { + $this->_stack->push(__FUNCTION__, 'exception', array(), + 'internal array was not generated by compatible parser, or extreme parser error, cannot continue'); + } + + function _invalidFileRole($file, $dir, $role) + { + $this->_stack->push(__FUNCTION__, 'error', array( + 'file' => $file, 'dir' => $dir, 'role' => $role, + 'roles' => PEAR_Installer_Role::getValidRoles($this->_pf->getPackageType())), + 'File "%file%" in directory "%dir%" has invalid role "%role%", should be one of %roles%'); + } + + function _invalidFileName($file, $dir) + { + $this->_stack->push(__FUNCTION__, 'error', array( + 'file' => $file), + 'File "%file%" cannot begin with "."'); + } + + function _filelistCannotContainFile($filelist) + { + $this->_stack->push(__FUNCTION__, 'error', array('tag' => $filelist), + '<%tag%> can only contain , contains . Use ' . + ' as the first dir element'); + } + + function _filelistMustContainDir($filelist) + { + $this->_stack->push(__FUNCTION__, 'error', array('tag' => $filelist), + '<%tag%> must contain . Use as the ' . + 'first dir element'); + } + + function _tagCannotBeEmpty($tag) + { + $this->_stack->push(__FUNCTION__, 'error', array('tag' => $tag), + '<%tag%> cannot be empty (<%tag%/>)'); + } + + function _UrlOrChannel($type, $name) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type, + 'name' => $name), + 'Required dependency <%type%> "%name%" can have either url OR ' . + 'channel attributes, and not both'); + } + + function _NoChannel($type, $name) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type, + 'name' => $name), + 'Required dependency <%type%> "%name%" must have either url OR ' . + 'channel attributes'); + } + + function _UrlOrChannelGroup($type, $name, $group) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type, + 'name' => $name, 'group' => $group), + 'Group "%group%" dependency <%type%> "%name%" can have either url OR ' . + 'channel attributes, and not both'); + } + + function _NoChannelGroup($type, $name, $group) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type, + 'name' => $name, 'group' => $group), + 'Group "%group%" dependency <%type%> "%name%" must have either url OR ' . + 'channel attributes'); + } + + function _unknownChannel($channel) + { + $this->_stack->push(__FUNCTION__, 'error', array('channel' => $channel), + 'Unknown channel "%channel%"'); + } + + function _noPackageVersion() + { + $this->_stack->push(__FUNCTION__, 'error', array(), + 'package.xml tag has no version attribute, or version is not 2.0'); + } + + function _NoBundledPackages() + { + $this->_stack->push(__FUNCTION__, 'error', array(), + 'No tag was found in , required for bundle packages'); + } + + function _AtLeast2BundledPackages() + { + $this->_stack->push(__FUNCTION__, 'error', array(), + 'At least 2 packages must be bundled in a bundle package'); + } + + function _ChannelOrUri($name) + { + $this->_stack->push(__FUNCTION__, 'error', array('name' => $name), + 'Bundled package "%name%" can have either a uri or a channel, not both'); + } + + function _noChildTag($child, $tag) + { + $this->_stack->push(__FUNCTION__, 'error', array('child' => $child, 'tag' => $tag), + 'Tag <%tag%> is missing child tag <%child%>'); + } + + function _invalidVersion($type, $value) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type, 'value' => $value), + 'Version type <%type%> is not a valid version (%value%)'); + } + + function _invalidState($type, $value) + { + $states = array('stable', 'beta', 'alpha', 'devel'); + if ($type != 'api') { + $states[] = 'snapshot'; + } + if (strtolower($value) == 'rc') { + $this->_stack->push(__FUNCTION__, 'error', + array('version' => $this->_packageInfo['version']['release']), + 'RC is not a state, it is a version postfix, try %version%RC1, stability beta'); + } + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type, 'value' => $value, + 'types' => $states), + 'Stability type <%type%> is not a valid stability (%value%), must be one of ' . + '%types%'); + } + + function _invalidTask($task, $ret, $file) + { + switch ($ret[0]) { + case PEAR_TASK_ERROR_MISSING_ATTRIB : + $info = array('attrib' => $ret[1], 'task' => $task, 'file' => $file); + $msg = 'task <%task%> is missing attribute "%attrib%" in file %file%'; + break; + case PEAR_TASK_ERROR_NOATTRIBS : + $info = array('task' => $task, 'file' => $file); + $msg = 'task <%task%> has no attributes in file %file%'; + break; + case PEAR_TASK_ERROR_WRONG_ATTRIB_VALUE : + $info = array('attrib' => $ret[1], 'values' => $ret[3], + 'was' => $ret[2], 'task' => $task, 'file' => $file); + $msg = 'task <%task%> attribute "%attrib%" has the wrong value "%was%" '. + 'in file %file%, expecting one of "%values%"'; + break; + case PEAR_TASK_ERROR_INVALID : + $info = array('reason' => $ret[1], 'task' => $task, 'file' => $file); + $msg = 'task <%task%> in file %file% is invalid because of "%reason%"'; + break; + } + $this->_stack->push(__FUNCTION__, 'error', $info, $msg); + } + + function _unknownTask($task, $file) + { + $this->_stack->push(__FUNCTION__, 'error', array('task' => $task, 'file' => $file), + 'Unknown task "%task%" passed in file '); + } + + function _subpackageCannotProvideExtension($name) + { + $this->_stack->push(__FUNCTION__, 'error', array('name' => $name), + 'Subpackage dependency "%name%" cannot use , ' . + 'only package dependencies can use this tag'); + } + + function _subpackagesCannotConflict($name) + { + $this->_stack->push(__FUNCTION__, 'error', array('name' => $name), + 'Subpackage dependency "%name%" cannot use , ' . + 'only package dependencies can use this tag'); + } + + function _cannotProvideExtension($release) + { + $this->_stack->push(__FUNCTION__, 'error', array('release' => $release), + '<%release%> packages cannot use , only extbinrelease and extsrcrelease can provide a PHP extension'); + } + + function _mustProvideExtension($release) + { + $this->_stack->push(__FUNCTION__, 'error', array('release' => $release), + '<%release%> packages must use to indicate which PHP extension is provided'); + } + + function _cannotHaveSrcpackage($release) + { + $this->_stack->push(__FUNCTION__, 'error', array('release' => $release), + '<%release%> packages cannot specify a source code package, only extension binaries may use the tag'); + } + + function _mustSrcPackage($release) + { + $this->_stack->push(__FUNCTION__, 'error', array('release' => $release), + ' packages must specify a source code package with '); + } + + function _mustSrcuri($release) + { + $this->_stack->push(__FUNCTION__, 'error', array('release' => $release), + ' packages must specify a source code package with '); + } + + function _uriDepsCannotHaveVersioning($type) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type), + '%type%: dependencies with a tag cannot have any versioning information'); + } + + function _conflictingDepsCannotHaveVersioning($type) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type), + '%type%: conflicting dependencies cannot have versioning info, use to ' . + 'exclude specific versions of a dependency'); + } + + function _DepchannelCannotBeUri($type) + { + $this->_stack->push(__FUNCTION__, 'error', array('type' => $type), + '%type%: channel cannot be __uri, this is a pseudo-channel reserved for uri ' . + 'dependencies only'); + } + + function _bundledPackagesMustBeFilename() + { + $this->_stack->push(__FUNCTION__, 'error', array(), + ' tags must contain only the filename of a package release ' . + 'in the bundle'); + } + + function _binaryPackageMustBePackagename() + { + $this->_stack->push(__FUNCTION__, 'error', array(), + ' tags must contain the name of a package that is ' . + 'a compiled version of this extsrc package'); + } + + function _fileNotFound($file) + { + $this->_stack->push(__FUNCTION__, 'error', array('file' => $file), + 'File "%file%" in package.xml does not exist'); + } + + function _notInContents($file, $tag) + { + $this->_stack->push(__FUNCTION__, 'error', array('file' => $file, 'tag' => $tag), + '<%tag% name="%file%"> is invalid, file is not in '); + } + + function _cannotValidateNoPathSet() + { + $this->_stack->push(__FUNCTION__, 'error', array(), + 'Cannot validate files, no path to package file is set (use setPackageFile())'); + } + + function _usesroletaskMustHaveChannelOrUri($role, $tag) + { + $this->_stack->push(__FUNCTION__, 'error', array('role' => $role, 'tag' => $tag), + '<%tag%> must contain either , or and '); + } + + function _usesroletaskMustHavePackage($role, $tag) + { + $this->_stack->push(__FUNCTION__, 'error', array('role' => $role, 'tag' => $tag), + '<%tag%> must contain '); + } + + function _usesroletaskMustHaveRoleTask($tag, $type) + { + $this->_stack->push(__FUNCTION__, 'error', array('tag' => $tag, 'type' => $type), + '<%tag%> must contain <%type%> defining the %type% to be used'); + } + + function _cannotConflictWithAllOs($type) + { + $this->_stack->push(__FUNCTION__, 'error', array('tag' => $tag), + '%tag% cannot conflict with all OSes'); + } + + function _invalidDepGroupName($name) + { + $this->_stack->push(__FUNCTION__, 'error', array('group' => $name), + 'Invalid dependency group name "%name%"'); + } + + function _analyzeBundledPackages() + { + if (!$this->_isValid) { + return false; + } + if (!$this->_pf->getPackageType() == 'bundle') { + return false; + } + if (!isset($this->_pf->_packageFile)) { + return false; + } + $dir_prefix = dirname($this->_pf->_packageFile); + $log = isset($this->_pf->_logger) ? array(&$this->_pf->_logger, 'log') : + array('PEAR_Common', 'log'); + $info = $this->_pf->getContents(); + $info = $info['bundledpackage']; + if (!is_array($info)) { + $info = array($info); + } + $pkg = &new PEAR_PackageFile($this->_pf->_config); + foreach ($info as $package) { + if (!file_exists($dir_prefix . DIRECTORY_SEPARATOR . $package)) { + $this->_fileNotFound($dir_prefix . DIRECTORY_SEPARATOR . $package); + $this->_isValid = 0; + continue; + } + call_user_func_array($log, array(1, "Analyzing bundled package $package")); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $ret = $pkg->fromAnyFile($dir_prefix . DIRECTORY_SEPARATOR . $package, + PEAR_VALIDATE_NORMAL); + PEAR::popErrorHandling(); + if (PEAR::isError($ret)) { + call_user_func_array($log, array(0, "ERROR: package $package is not a valid " . + 'package')); + $inf = $ret->getUserInfo(); + if (is_array($inf)) { + foreach ($inf as $err) { + call_user_func_array($log, array(1, $err['message'])); + } + } + return false; + } + } + return true; + } + + function _analyzePhpFiles() + { + if (!$this->_isValid) { + return false; + } + if (!isset($this->_pf->_packageFile)) { + $this->_cannotValidateNoPathSet(); + return false; + } + $dir_prefix = dirname($this->_pf->_packageFile); + $common = new PEAR_Common; + $log = isset($this->_pf->_logger) ? array(&$this->_pf->_logger, 'log') : + array(&$common, 'log'); + $info = $this->_pf->getContents(); + $info = $info['dir']['file']; + if (isset($info['attribs'])) { + $info = array($info); + } + $provides = array(); + foreach ($info as $fa) { + $fa = $fa['attribs']; + $file = $fa['name']; + if (!file_exists($dir_prefix . DIRECTORY_SEPARATOR . $file)) { + $this->_fileNotFound($dir_prefix . DIRECTORY_SEPARATOR . $file); + $this->_isValid = 0; + continue; + } + if (in_array($fa['role'], PEAR_Installer_Role::getPhpRoles()) && $dir_prefix) { + call_user_func_array($log, array(1, "Analyzing $file")); + $srcinfo = $this->analyzeSourceCode($dir_prefix . DIRECTORY_SEPARATOR . $file); + if ($srcinfo) { + $provides = array_merge($provides, $this->_buildProvidesArray($srcinfo)); + } + } + } + $this->_packageName = $pn = $this->_pf->getPackage(); + $pnl = strlen($pn); + foreach ($provides as $key => $what) { + if (isset($what['explicit']) || !$what) { + // skip conformance checks if the provides entry is + // specified in the package.xml file + continue; + } + extract($what); + if ($type == 'class') { + if (!strncasecmp($name, $pn, $pnl)) { + continue; + } + $this->_stack->push(__FUNCTION__, 'warning', + array('file' => $file, 'type' => $type, 'name' => $name, 'package' => $pn), + 'in %file%: %type% "%name%" not prefixed with package name "%package%"'); + } elseif ($type == 'function') { + if (strstr($name, '::') || !strncasecmp($name, $pn, $pnl)) { + continue; + } + $this->_stack->push(__FUNCTION__, 'warning', + array('file' => $file, 'type' => $type, 'name' => $name, 'package' => $pn), + 'in %file%: %type% "%name%" not prefixed with package name "%package%"'); + } + } + return $this->_isValid; + } + + /** + * Analyze the source code of the given PHP file + * + * @param string Filename of the PHP file + * @param boolean whether to analyze $file as the file contents + * @return mixed + */ + function analyzeSourceCode($file, $string = false) + { + if (!function_exists("token_get_all")) { + $this->_stack->push(__FUNCTION__, 'error', array('file' => $file), + 'Parser error: token_get_all() function must exist to analyze source code'); + return false; + } + if (!defined('T_DOC_COMMENT')) { + define('T_DOC_COMMENT', T_COMMENT); + } + if (!defined('T_INTERFACE')) { + define('T_INTERFACE', -1); + } + if (!defined('T_IMPLEMENTS')) { + define('T_IMPLEMENTS', -1); + } + if ($string) { + $contents = $file; + } else { + if (!$fp = @fopen($file, "r")) { + return false; + } + if (function_exists('file_get_contents')) { + fclose($fp); + $contents = file_get_contents($file); + } else { + $contents = @fread($fp, filesize($file)); + fclose($fp); + } + } + $tokens = token_get_all($contents); +/* + for ($i = 0; $i < sizeof($tokens); $i++) { + @list($token, $data) = $tokens[$i]; + if (is_string($token)) { + var_dump($token); + } else { + print token_name($token) . ' '; + var_dump(rtrim($data)); + } + } +*/ + $look_for = 0; + $paren_level = 0; + $bracket_level = 0; + $brace_level = 0; + $lastphpdoc = ''; + $current_class = ''; + $current_interface = ''; + $current_class_level = -1; + $current_function = ''; + $current_function_level = -1; + $declared_classes = array(); + $declared_interfaces = array(); + $declared_functions = array(); + $declared_methods = array(); + $used_classes = array(); + $used_functions = array(); + $extends = array(); + $implements = array(); + $nodeps = array(); + $inquote = false; + $interface = false; + for ($i = 0; $i < sizeof($tokens); $i++) { + if (is_array($tokens[$i])) { + list($token, $data) = $tokens[$i]; + } else { + $token = $tokens[$i]; + $data = ''; + } + if ($inquote) { + if ($token != '"' && $token != T_END_HEREDOC) { + continue; + } else { + $inquote = false; + continue; + } + } + switch ($token) { + case T_WHITESPACE : + continue; + case ';': + if ($interface) { + $current_function = ''; + $current_function_level = -1; + } + break; + case '"': + case T_START_HEREDOC: + $inquote = true; + break; + case T_CURLY_OPEN: + case T_DOLLAR_OPEN_CURLY_BRACES: + case '{': $brace_level++; continue 2; + case '}': + $brace_level--; + if ($current_class_level == $brace_level) { + $current_class = ''; + $current_class_level = -1; + } + if ($current_function_level == $brace_level) { + $current_function = ''; + $current_function_level = -1; + } + continue 2; + case '[': $bracket_level++; continue 2; + case ']': $bracket_level--; continue 2; + case '(': $paren_level++; continue 2; + case ')': $paren_level--; continue 2; + case T_INTERFACE: + $interface = true; + case T_CLASS: + if (($current_class_level != -1) || ($current_function_level != -1)) { + $this->_stack->push(__FUNCTION__, 'error', array('file' => $file), + 'Parser error: invalid PHP found in file "%file%"'); + return false; + } + case T_FUNCTION: + case T_NEW: + case T_EXTENDS: + case T_IMPLEMENTS: + $look_for = $token; + continue 2; + case T_STRING: + if (version_compare(zend_version(), '2.0', '<')) { + if (in_array(strtolower($data), + array('public', 'private', 'protected', 'abstract', + 'interface', 'implements', 'throw') + )) { + $this->_stack->push(__FUNCTION__, 'warning', array( + 'file' => $file), + 'Error, PHP5 token encountered in %file%,' . + ' analysis should be in PHP5'); + } + } + if ($look_for == T_CLASS) { + $current_class = $data; + $current_class_level = $brace_level; + $declared_classes[] = $current_class; + } elseif ($look_for == T_INTERFACE) { + $current_interface = $data; + $current_class_level = $brace_level; + $declared_interfaces[] = $current_interface; + } elseif ($look_for == T_IMPLEMENTS) { + $implements[$current_class] = $data; + } elseif ($look_for == T_EXTENDS) { + $extends[$current_class] = $data; + } elseif ($look_for == T_FUNCTION) { + if ($current_class) { + $current_function = "$current_class::$data"; + $declared_methods[$current_class][] = $data; + } elseif ($current_interface) { + $current_function = "$current_interface::$data"; + $declared_methods[$current_interface][] = $data; + } else { + $current_function = $data; + $declared_functions[] = $current_function; + } + $current_function_level = $brace_level; + $m = array(); + } elseif ($look_for == T_NEW) { + $used_classes[$data] = true; + } + $look_for = 0; + continue 2; + case T_VARIABLE: + $look_for = 0; + continue 2; + case T_DOC_COMMENT: + case T_COMMENT: + if (preg_match('!^/\*\*\s!', $data)) { + $lastphpdoc = $data; + if (preg_match_all('/@nodep\s+(\S+)/', $lastphpdoc, $m)) { + $nodeps = array_merge($nodeps, $m[1]); + } + } + continue 2; + case T_DOUBLE_COLON: + if (!($tokens[$i - 1][0] == T_WHITESPACE || $tokens[$i - 1][0] == T_STRING)) { + $this->_stack->push(__FUNCTION__, 'warning', array('file' => $file), + 'Parser error: invalid PHP found in file "%file%"'); + return false; + } + $class = $tokens[$i - 1][1]; + if (strtolower($class) != 'parent') { + $used_classes[$class] = true; + } + continue 2; + } + } + return array( + "source_file" => $file, + "declared_classes" => $declared_classes, + "declared_interfaces" => $declared_interfaces, + "declared_methods" => $declared_methods, + "declared_functions" => $declared_functions, + "used_classes" => array_diff(array_keys($used_classes), $nodeps), + "inheritance" => $extends, + "implements" => $implements, + ); + } + + /** + * Build a "provides" array from data returned by + * analyzeSourceCode(). The format of the built array is like + * this: + * + * array( + * 'class;MyClass' => 'array('type' => 'class', 'name' => 'MyClass'), + * ... + * ) + * + * + * @param array $srcinfo array with information about a source file + * as returned by the analyzeSourceCode() method. + * + * @return void + * + * @access private + * + */ + function _buildProvidesArray($srcinfo) + { + if (!$this->_isValid) { + return array(); + } + $providesret = array(); + $file = basename($srcinfo['source_file']); + $pn = $this->_pf->getPackage(); + $pnl = strlen($pn); + foreach ($srcinfo['declared_classes'] as $class) { + $key = "class;$class"; + if (isset($providesret[$key])) { + continue; + } + $providesret[$key] = + array('file'=> $file, 'type' => 'class', 'name' => $class); + if (isset($srcinfo['inheritance'][$class])) { + $providesret[$key]['extends'] = + $srcinfo['inheritance'][$class]; + } + } + foreach ($srcinfo['declared_methods'] as $class => $methods) { + foreach ($methods as $method) { + $function = "$class::$method"; + $key = "function;$function"; + if ($method{0} == '_' || !strcasecmp($method, $class) || + isset($providesret[$key])) { + continue; + } + $providesret[$key] = + array('file'=> $file, 'type' => 'function', 'name' => $function); + } + } + + foreach ($srcinfo['declared_functions'] as $function) { + $key = "function;$function"; + if ($function{0} == '_' || isset($providesret[$key])) { + continue; + } + if (!strstr($function, '::') && strncasecmp($function, $pn, $pnl)) { + $warnings[] = "in1 " . $file . ": function \"$function\" not prefixed with package name \"$pn\""; + } + $providesret[$key] = + array('file'=> $file, 'type' => 'function', 'name' => $function); + } + return $providesret; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/PackageFile/v2/rw.php b/campcaster/src/tools/pear/src/PEAR/PackageFile/v2/rw.php new file mode 100644 index 000000000..2509a18cc --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/PackageFile/v2/rw.php @@ -0,0 +1,1557 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: rw.php,v 1.15 2006/01/28 17:35:11 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a8 + */ +/** + * For base class + */ +require_once 'PEAR/PackageFile/v2.php'; +/** + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a8 + */ +class PEAR_PackageFile_v2_rw extends PEAR_PackageFile_v2 +{ + /** + * @param string Extension name + * @return bool success of operation + */ + function setProvidesExtension($extension) + { + if (in_array($this->getPackageType(), array('extsrc', 'extbin'))) { + if (!isset($this->_packageInfo['providesextension'])) { + // ensure that the channel tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('usesrole', 'usestask', 'srcpackage', 'srcuri', 'phprelease', + 'extsrcrelease', 'extbinrelease', 'bundle', 'changelog'), + $extension, 'providesextension'); + } + $this->_packageInfo['providesextension'] = $extension; + return true; + } + return false; + } + + function setPackage($package) + { + $this->_isValid = 0; + if (!isset($this->_packageInfo['attribs'])) { + $this->_packageInfo = array_merge(array('attribs' => array( + 'version' => '2.0', + 'xmlns' => 'http://pear.php.net/dtd/package-2.0', + 'xmlns:tasks' => 'http://pear.php.net/dtd/tasks-1.0', + 'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance', + 'xsi:schemaLocation' => 'http://pear.php.net/dtd/tasks-1.0 + http://pear.php.net/dtd/tasks-1.0.xsd + http://pear.php.net/dtd/package-2.0 + http://pear.php.net/dtd/package-2.0.xsd', + )), $this->_packageInfo); + } + if (!isset($this->_packageInfo['name'])) { + return $this->_packageInfo = array_merge(array('name' => $package), + $this->_packageInfo); + } + $this->_packageInfo['name'] = $package; + } + + function setUri($uri) + { + unset($this->_packageInfo['channel']); + $this->_isValid = 0; + if (!isset($this->_packageInfo['uri'])) { + // ensure that the uri tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('extends', 'summary', 'description', 'lead', + 'developer', 'contributor', 'helper', 'date', 'time', 'version', + 'stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), $uri, 'uri'); + } + $this->_packageInfo['uri'] = $uri; + } + + function setChannel($channel) + { + unset($this->_packageInfo['uri']); + $this->_isValid = 0; + if (!isset($this->_packageInfo['channel'])) { + // ensure that the channel tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('extends', 'summary', 'description', 'lead', + 'developer', 'contributor', 'helper', 'date', 'time', 'version', + 'stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), $channel, 'channel'); + } + $this->_packageInfo['channel'] = $channel; + } + + function setExtends($extends) + { + $this->_isValid = 0; + if (!isset($this->_packageInfo['extends'])) { + // ensure that the extends tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('summary', 'description', 'lead', + 'developer', 'contributor', 'helper', 'date', 'time', 'version', + 'stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), $extends, 'extends'); + } + $this->_packageInfo['extends'] = $extends; + } + + function setSummary($summary) + { + $this->_isValid = 0; + if (!isset($this->_packageInfo['summary'])) { + // ensure that the summary tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('description', 'lead', + 'developer', 'contributor', 'helper', 'date', 'time', 'version', + 'stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), $summary, 'summary'); + } + $this->_packageInfo['summary'] = $summary; + } + + function setDescription($desc) + { + $this->_isValid = 0; + if (!isset($this->_packageInfo['description'])) { + // ensure that the description tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('lead', + 'developer', 'contributor', 'helper', 'date', 'time', 'version', + 'stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), $desc, 'description'); + } + $this->_packageInfo['description'] = $desc; + } + + /** + * Adds a new maintainer - no checking of duplicates is performed, use + * updatemaintainer for that purpose. + */ + function addMaintainer($role, $handle, $name, $email, $active = 'yes') + { + if (!in_array($role, array('lead', 'developer', 'contributor', 'helper'))) { + return false; + } + if (isset($this->_packageInfo[$role])) { + if (!isset($this->_packageInfo[$role][0])) { + $this->_packageInfo[$role] = array($this->_packageInfo[$role]); + } + $this->_packageInfo[$role][] = + array( + 'name' => $name, + 'user' => $handle, + 'email' => $email, + 'active' => $active, + ); + } else { + $testarr = array('lead', + 'developer', 'contributor', 'helper', 'date', 'time', 'version', + 'stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'); + foreach (array('lead', 'developer', 'contributor', 'helper') as $testrole) { + array_shift($testarr); + if ($role == $testrole) { + break; + } + } + if (!isset($this->_packageInfo[$role])) { + // ensure that the extends tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, $testarr, + array(), $role); + } + $this->_packageInfo[$role] = + array( + 'name' => $name, + 'user' => $handle, + 'email' => $email, + 'active' => $active, + ); + } + $this->_isValid = 0; + } + + function updateMaintainer($newrole, $handle, $name, $email, $active = 'yes') + { + $found = false; + foreach (array('lead', 'developer', 'contributor', 'helper') as $role) { + if (!isset($this->_packageInfo[$role])) { + continue; + } + $info = $this->_packageInfo[$role]; + if (!isset($info[0])) { + if ($info['user'] == $handle) { + $found = true; + break; + } + } + foreach ($info as $i => $maintainer) { + if ($maintainer['user'] == $handle) { + $found = $i; + break 2; + } + } + } + if ($found === false) { + return $this->addMaintainer($newrole, $handle, $name, $email, $active); + } + if ($found !== false) { + if ($found === true) { + unset($this->_packageInfo[$role]); + } else { + unset($this->_packageInfo[$role][$found]); + $this->_packageInfo[$role] = array_values($this->_packageInfo[$role]); + } + } + $this->addMaintainer($newrole, $handle, $name, $email, $active); + $this->_isValid = 0; + } + + function deleteMaintainer($handle) + { + $found = false; + foreach (array('lead', 'developer', 'contributor', 'helper') as $role) { + if (!isset($this->_packageInfo[$role])) { + continue; + } + if (!isset($this->_packageInfo[$role][0])) { + $this->_packageInfo[$role] = array($this->_packageInfo[$role]); + } + foreach ($this->_packageInfo[$role] as $i => $maintainer) { + if ($maintainer['user'] == $handle) { + $found = $i; + break; + } + } + if ($found !== false) { + unset($this->_packageInfo[$role][$found]); + if (!count($this->_packageInfo[$role]) && $role == 'lead') { + $this->_isValid = 0; + } + if (!count($this->_packageInfo[$role])) { + unset($this->_packageInfo[$role]); + return true; + } + $this->_packageInfo[$role] = + array_values($this->_packageInfo[$role]); + if (count($this->_packageInfo[$role]) == 1) { + $this->_packageInfo[$role] = $this->_packageInfo[$role][0]; + } + return true; + } + if (count($this->_packageInfo[$role]) == 1) { + $this->_packageInfo[$role] = $this->_packageInfo[$role][0]; + } + } + return false; + } + + function setReleaseVersion($version) + { + if (isset($this->_packageInfo['version']) && + isset($this->_packageInfo['version']['release'])) { + unset($this->_packageInfo['version']['release']); + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $version, array( + 'version' => array('stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), + 'release' => array('api'))); + $this->_isValid = 0; + } + + function setAPIVersion($version) + { + if (isset($this->_packageInfo['version']) && + isset($this->_packageInfo['version']['api'])) { + unset($this->_packageInfo['version']['api']); + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $version, array( + 'version' => array('stability', 'license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), + 'api' => array())); + $this->_isValid = 0; + } + + /** + * snapshot|devel|alpha|beta|stable + */ + function setReleaseStability($state) + { + if (isset($this->_packageInfo['stability']) && + isset($this->_packageInfo['stability']['release'])) { + unset($this->_packageInfo['stability']['release']); + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $state, array( + 'stability' => array('license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), + 'release' => array('api'))); + $this->_isValid = 0; + } + + /** + * @param devel|alpha|beta|stable + */ + function setAPIStability($state) + { + if (isset($this->_packageInfo['stability']) && + isset($this->_packageInfo['stability']['api'])) { + unset($this->_packageInfo['stability']['api']); + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $state, array( + 'stability' => array('license', 'notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), + 'api' => array())); + $this->_isValid = 0; + } + + function setLicense($license, $uri = false, $filesource = false) + { + if (!isset($this->_packageInfo['license'])) { + // ensure that the license tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('notes', 'contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), 0, 'license'); + } + if ($uri || $filesource) { + $attribs = array(); + if ($uri) { + $attribs['uri'] = $uri; + } + $uri = true; // for test below + if ($filesource) { + $attribs['filesource'] = $filesource; + } + } + $license = $uri ? array('attribs' => $attribs, '_content' => $license) : $license; + $this->_packageInfo['license'] = $license; + $this->_isValid = 0; + } + + function setNotes($notes) + { + $this->_isValid = 0; + if (!isset($this->_packageInfo['notes'])) { + // ensure that the notes tag is set up in the right location + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('contents', 'compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), $notes, 'notes'); + } + $this->_packageInfo['notes'] = $notes; + } + + /** + * This is only used at install-time, after all serialization + * is over. + * @param string file name + * @param string installed path + */ + function setInstalledAs($file, $path) + { + if ($path) { + return $this->_packageInfo['filelist'][$file]['installed_as'] = $path; + } + unset($this->_packageInfo['filelist'][$file]['installed_as']); + } + + /** + * This is only used at install-time, after all serialization + * is over. + */ + function installedFile($file, $atts) + { + if (isset($this->_packageInfo['filelist'][$file])) { + $this->_packageInfo['filelist'][$file] = + array_merge($this->_packageInfo['filelist'][$file], $atts['attribs']); + } else { + $this->_packageInfo['filelist'][$file] = $atts['attribs']; + } + } + + /** + * Reset the listing of package contents + * @param string base installation dir for the whole package, if any + */ + function clearContents($baseinstall = false) + { + $this->_filesValid = false; + $this->_isValid = 0; + if (!isset($this->_packageInfo['contents'])) { + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('compatible', + 'dependencies', 'providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), array(), 'contents'); + } + if ($this->getPackageType() != 'bundle') { + $this->_packageInfo['contents'] = + array('dir' => array('attribs' => array('name' => '/'))); + if ($baseinstall) { + $this->_packageInfo['contents']['dir']['attribs']['baseinstalldir'] = $baseinstall; + } + } + } + + /** + * @param string relative path of the bundled package. + */ + function addBundledPackage($path) + { + if ($this->getPackageType() != 'bundle') { + return false; + } + $this->_filesValid = false; + $this->_isValid = 0; + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $path, array( + 'contents' => array('compatible', 'dependencies', 'providesextension', + 'usesrole', 'usestask', 'srcpackage', 'srcuri', 'phprelease', + 'extsrcrelease', 'extbinrelease', 'bundle', 'changelog'), + 'bundledpackage' => array())); + } + + /** + * @param string file name + * @param PEAR_Task_Common a read/write task + */ + function addTaskToFile($filename, $task) + { + if (!method_exists($task, 'getXml')) { + return false; + } + if (!method_exists($task, 'getName')) { + return false; + } + if (!method_exists($task, 'validate')) { + return false; + } + if (!$task->validate()) { + return false; + } + if (!isset($this->_packageInfo['contents']['dir']['file'])) { + return false; + } + $this->getTasksNs(); // discover the tasks namespace if not done already + $files = $this->_packageInfo['contents']['dir']['file']; + if (!isset($files[0])) { + $files = array($files); + $ind = false; + } else { + $ind = true; + } + foreach ($files as $i => $file) { + if (isset($file['attribs'])) { + if ($file['attribs']['name'] == $filename) { + if ($ind) { + $t = isset($this->_packageInfo['contents']['dir']['file'][$i] + ['attribs'][$this->_tasksNs . + ':' . $task->getName()]) ? + $this->_packageInfo['contents']['dir']['file'][$i] + ['attribs'][$this->_tasksNs . + ':' . $task->getName()] : false; + if ($t && !isset($t[0])) { + $this->_packageInfo['contents']['dir']['file'][$i] + [$this->_tasksNs . ':' . $task->getName()] = array($t); + } + $this->_packageInfo['contents']['dir']['file'][$i][$this->_tasksNs . + ':' . $task->getName()][] = $task->getXml(); + } else { + $t = isset($this->_packageInfo['contents']['dir']['file'] + ['attribs'][$this->_tasksNs . + ':' . $task->getName()]) ? $this->_packageInfo['contents']['dir']['file'] + ['attribs'][$this->_tasksNs . + ':' . $task->getName()] : false; + if ($t && !isset($t[0])) { + $this->_packageInfo['contents']['dir']['file'] + [$this->_tasksNs . ':' . $task->getName()] = array($t); + } + $this->_packageInfo['contents']['dir']['file'][$this->_tasksNs . + ':' . $task->getName()][] = $task->getXml(); + } + return true; + } + } + } + return false; + } + + /** + * @param string path to the file + * @param string filename + * @param array extra attributes + */ + function addFile($dir, $file, $attrs) + { + if ($this->getPackageType() == 'bundle') { + return false; + } + $this->_filesValid = false; + $this->_isValid = 0; + $dir = preg_replace(array('!\\\\+!', '!/+!'), array('/', '/'), $dir); + if ($dir == '/' || $dir == '') { + $dir = ''; + } else { + $dir .= '/'; + } + $attrs['name'] = $dir . $file; + if (!isset($this->_packageInfo['contents'])) { + // ensure that the contents tag is set up + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, + array('compatible', 'dependencies', 'providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', + 'extbinrelease', 'bundle', 'changelog'), array(), 'contents'); + } + if (isset($this->_packageInfo['contents']['dir']['file'])) { + if (!isset($this->_packageInfo['contents']['dir']['file'][0])) { + $this->_packageInfo['contents']['dir']['file'] = + array($this->_packageInfo['contents']['dir']['file']); + } + $this->_packageInfo['contents']['dir']['file'][]['attribs'] = $attrs; + } else { + $this->_packageInfo['contents']['dir']['file']['attribs'] = $attrs; + } + } + + /** + * @param string Dependent package name + * @param string Dependent package's channel name + * @param string minimum version of specified package that this release is guaranteed to be + * compatible with + * @param string maximum version of specified package that this release is guaranteed to be + * compatible with + * @param string versions of specified package that this release is not compatible with + */ + function addCompatiblePackage($name, $channel, $min, $max, $exclude = false) + { + $this->_isValid = 0; + $set = array( + 'name' => $name, + 'channel' => $channel, + 'min' => $min, + 'max' => $max, + ); + if ($exclude) { + $set['exclude'] = $exclude; + } + $this->_isValid = 0; + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $set, array( + 'compatible' => array('dependencies', 'providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog') + )); + } + + /** + * Removes the tag entirely + */ + function resetUsesrole() + { + if (isset($this->_packageInfo['usesrole'])) { + unset($this->_packageInfo['usesrole']); + } + } + + /** + * @param string + * @param string package name or uri + * @param string channel name if non-uri + */ + function addUsesrole($role, $packageOrUri, $channel = false) { + $set = array('role' => $role); + if ($channel) { + $set['package'] = $packageOrUri; + $set['channel'] = $channel; + } else { + $set['uri'] = $packageOrUri; + } + $this->_isValid = 0; + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $set, array( + 'usesrole' => array('usestask', 'srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', 'extbinrelease', 'bundle', 'changelog') + )); + } + + /** + * Removes the tag entirely + */ + function resetUsestask() + { + if (isset($this->_packageInfo['usestask'])) { + unset($this->_packageInfo['usestask']); + } + } + + + /** + * @param string + * @param string package name or uri + * @param string channel name if non-uri + */ + function addUsestask($task, $packageOrUri, $channel = false) { + $set = array('task' => $task); + if ($channel) { + $set['package'] = $packageOrUri; + $set['channel'] = $channel; + } else { + $set['uri'] = $packageOrUri; + } + $this->_isValid = 0; + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $set, array( + 'usestask' => array('srcpackage', 'srcuri', + 'phprelease', 'extsrcrelease', 'extbinrelease', 'bundle', 'changelog') + )); + } + + /** + * Remove all compatible tags + */ + function clearCompatible() + { + unset($this->_packageInfo['compatible']); + } + + /** + * Reset dependencies prior to adding new ones + */ + function clearDeps() + { + if (!isset($this->_packageInfo['dependencies'])) { + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, array(), + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'))); + } + $this->_packageInfo['dependencies'] = array(); + } + + /** + * @param string minimum PHP version allowed + * @param string maximum PHP version allowed + * @param array $exclude incompatible PHP versions + */ + function setPhpDep($min, $max = false, $exclude = false) + { + $this->_isValid = 0; + $dep = + array( + 'min' => $min, + ); + if ($max) { + $dep['max'] = $max; + } + if ($exclude) { + if (count($exclude) == 1) { + $exclude = $exclude[0]; + } + $dep['exclude'] = $exclude; + } + if (isset($this->_packageInfo['dependencies']['required']['php'])) { + $this->_stack->push(__FUNCTION__, 'warning', array('dep' => + $this->_packageInfo['dependencies']['required']['php']), + 'warning: PHP dependency already exists, overwriting'); + unset($this->_packageInfo['dependencies']['required']['php']); + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + 'required' => array('optional', 'group'), + 'php' => array('pearinstaller', 'package', 'subpackage', 'extension', 'os', 'arch') + )); + return true; + } + + /** + * @param string minimum allowed PEAR installer version + * @param string maximum allowed PEAR installer version + * @param string recommended PEAR installer version + * @param array incompatible version of the PEAR installer + */ + function setPearinstallerDep($min, $max = false, $recommended = false, $exclude = false) + { + $this->_isValid = 0; + $dep = + array( + 'min' => $min, + ); + if ($max) { + $dep['max'] = $max; + } + if ($recommended) { + $dep['recommended'] = $recommended; + } + if ($exclude) { + if (count($exclude) == 1) { + $exclude = $exclude[0]; + } + $dep['exclude'] = $exclude; + } + if (isset($this->_packageInfo['dependencies']['required']['pearinstaller'])) { + $this->_stack->push(__FUNCTION__, 'warning', array('dep' => + $this->_packageInfo['dependencies']['required']['pearinstaller']), + 'warning: PEAR Installer dependency already exists, overwriting'); + unset($this->_packageInfo['dependencies']['required']['pearinstaller']); + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + 'required' => array('optional', 'group'), + 'pearinstaller' => array('package', 'subpackage', 'extension', 'os', 'arch') + )); + } + + /** + * Mark a package as conflicting with this package + * @param string package name + * @param string package channel + * @param string extension this package provides, if any + */ + function addConflictingPackageDepWithChannel($name, $channel, $providesextension = false) + { + $this->_isValid = 0; + $dep = + array( + 'name' => $name, + 'channel' => $channel, + 'conflicts' => '', + ); + if ($providesextension) { + $dep['providesextension'] = $providesextension; + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + 'required' => array('optional', 'group'), + 'package' => array('subpackage', 'extension', 'os', 'arch') + )); + } + + /** + * Mark a package as conflicting with this package + * @param string package name + * @param string package channel + * @param string extension this package provides, if any + */ + function addConflictingPackageDepWithUri($name, $uri, $providesextension = false) + { + $this->_isValid = 0; + $dep = + array( + 'name' => $name, + 'uri' => $uri, + 'conflicts' => '', + ); + if ($providesextension) { + $dep['providesextension'] = $providesextension; + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + 'required' => array('optional', 'group'), + 'package' => array('subpackage', 'extension', 'os', 'arch') + )); + } + + function addDependencyGroup($name, $hint) + { + $this->_isValid = 0; + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, + array('attribs' => array('name' => $name, 'hint' => $hint)), + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + 'group' => array(), + )); + } + + /** + * @param string package name + * @param string|false channel name, false if this is a uri + * @param string|false uri name, false if this is a channel + * @param string|false minimum version required + * @param string|false maximum version allowed + * @param string|false recommended installation version + * @param array|false versions to exclude from installation + * @param string extension this package provides, if any + * @param bool if true, tells the installer to ignore the default optional dependency group + * when installing this package + * @return array + * @access private + */ + function _constructDep($name, $channel, $uri, $min, $max, $recommended, $exclude, + $providesextension = false, $nodefault = false) + { + $dep = + array( + 'name' => $name, + ); + if ($channel) { + $dep['channel'] = $channel; + } elseif ($uri) { + $dep['uri'] = $uri; + } + if ($min) { + $dep['min'] = $min; + } + if ($max) { + $dep['max'] = $max; + } + if ($recommended) { + $dep['recommended'] = $recommended; + } + if ($exclude) { + if (is_array($exclude) && count($exclude) == 1) { + $exclude = $exclude[0]; + } + $dep['exclude'] = $exclude; + } + if ($nodefault) { + $dep['nodefault'] = ''; + } + if ($providesextension) { + $dep['providesextension'] = $providesextension; + } + return $dep; + } + + /** + * @param package|subpackage + * @param string group name + * @param string package name + * @param string package channel + * @param string minimum version + * @param string maximum version + * @param string recommended version + * @param array|false optional excluded versions + * @param string extension this package provides, if any + * @param bool if true, tells the installer to ignore the default optional dependency group + * when installing this package + * @return bool false if the dependency group has not been initialized with + * {@link addDependencyGroup()}, or a subpackage is added with + * a providesextension + */ + function addGroupPackageDepWithChannel($type, $groupname, $name, $channel, $min = false, + $max = false, $recommended = false, $exclude = false, + $providesextension = false, $nodefault = false) + { + if ($type == 'subpackage' && $providesextension) { + return false; // subpackages must be php packages + } + $dep = $this->_constructDep($name, $channel, false, $min, $max, $recommended, $exclude, + $providesextension, $nodefault); + return $this->_addGroupDependency($type, $dep, $groupname); + } + + /** + * @param package|subpackage + * @param string group name + * @param string package name + * @param string package uri + * @param string extension this package provides, if any + * @param bool if true, tells the installer to ignore the default optional dependency group + * when installing this package + * @return bool false if the dependency group has not been initialized with + * {@link addDependencyGroup()} + */ + function addGroupPackageDepWithURI($type, $groupname, $name, $uri, $providesextension = false, + $nodefault = false) + { + if ($type == 'subpackage' && $providesextension) { + return false; // subpackages must be php packages + } + $dep = $this->_constructDep($name, false, $uri, false, false, false, false, + $providesextension, $nodefault); + return $this->_addGroupDependency($type, $dep, $groupname); + } + + /** + * @param string group name (must be pre-existing) + * @param string extension name + * @param string minimum version allowed + * @param string maximum version allowed + * @param string recommended version + * @param array incompatible versions + */ + function addGroupExtensionDep($groupname, $name, $min = false, $max = false, + $recommended = false, $exclude = false) + { + $this->_isValid = 0; + $dep = $this->_constructDep($name, false, false, $min, $max, $recommended, $exclude); + return $this->_addGroupDependency('extension', $dep, $groupname); + } + + /** + * @param package|subpackage|extension + * @param array dependency contents + * @param string name of the dependency group to add this to + * @return boolean + * @access private + */ + function _addGroupDependency($type, $dep, $groupname) + { + $arr = array('subpackage', 'extension'); + if ($type != 'package') { + array_shift($arr); + } + if ($type == 'extension') { + array_shift($arr); + } + if (!isset($this->_packageInfo['dependencies']['group'])) { + return false; + } else { + if (!isset($this->_packageInfo['dependencies']['group'][0])) { + if ($this->_packageInfo['dependencies']['group']['attribs']['name'] == $groupname) { + $this->_packageInfo['dependencies']['group'] = $this->_mergeTag( + $this->_packageInfo['dependencies']['group'], $dep, + array( + $type => $arr + )); + $this->_isValid = 0; + return true; + } else { + return false; + } + } else { + foreach ($this->_packageInfo['dependencies']['group'] as $i => $group) { + if ($group['attribs']['name'] == $groupname) { + $this->_packageInfo['dependencies']['group'][$i] = $this->_mergeTag( + $this->_packageInfo['dependencies']['group'][$i], $dep, + array( + $type => $arr + )); + $this->_isValid = 0; + return true; + } + } + return false; + } + } + } + + /** + * @param optional|required + * @param string package name + * @param string package channel + * @param string minimum version + * @param string maximum version + * @param string recommended version + * @param string extension this package provides, if any + * @param bool if true, tells the installer to ignore the default optional dependency group + * when installing this package + * @param array|false optional excluded versions + */ + function addPackageDepWithChannel($type, $name, $channel, $min = false, $max = false, + $recommended = false, $exclude = false, + $providesextension = false, $nodefault = false) + { + $this->_isValid = 0; + $arr = array('optional', 'group'); + if ($type != 'required') { + array_shift($arr); + } + $dep = $this->_constructDep($name, $channel, false, $min, $max, $recommended, $exclude, + $providesextension, $nodefault); + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + $type => $arr, + 'package' => array('subpackage', 'extension', 'os', 'arch') + )); + } + + /** + * @param optional|required + * @param string name of the package + * @param string uri of the package + * @param string extension this package provides, if any + * @param bool if true, tells the installer to ignore the default optional dependency group + * when installing this package + */ + function addPackageDepWithUri($type, $name, $uri, $providesextension = false, + $nodefault = false) + { + $this->_isValid = 0; + $arr = array('optional', 'group'); + if ($type != 'required') { + array_shift($arr); + } + $dep = $this->_constructDep($name, false, $uri, false, false, false, false, + $providesextension, $nodefault); + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + $type => $arr, + 'package' => array('subpackage', 'extension', 'os', 'arch') + )); + } + + /** + * @param optional|required optional, required + * @param string package name + * @param string package channel + * @param string minimum version + * @param string maximum version + * @param string recommended version + * @param array incompatible versions + * @param bool if true, tells the installer to ignore the default optional dependency group + * when installing this package + */ + function addSubpackageDepWithChannel($type, $name, $channel, $min = false, $max = false, + $recommended = false, $exclude = false, + $nodefault = false) + { + $this->_isValid = 0; + $arr = array('optional', 'group'); + if ($type != 'required') { + array_shift($arr); + } + $dep = $this->_constructDep($name, $channel, false, $min, $max, $recommended, $exclude, + $nodefault); + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + $type => $arr, + 'subpackage' => array('extension', 'os', 'arch') + )); + } + + /** + * @param optional|required optional, required + * @param string package name + * @param string package uri for download + * @param bool if true, tells the installer to ignore the default optional dependency group + * when installing this package + */ + function addSubpackageDepWithUri($type, $name, $uri, $nodefault = false) + { + $this->_isValid = 0; + $arr = array('optional', 'group'); + if ($type != 'required') { + array_shift($arr); + } + $dep = $this->_constructDep($name, false, $uri, false, false, false, false, $nodefault); + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + $type => $arr, + 'subpackage' => array('extension', 'os', 'arch') + )); + } + + /** + * @param optional|required optional, required + * @param string extension name + * @param string minimum version + * @param string maximum version + * @param string recommended version + * @param array incompatible versions + */ + function addExtensionDep($type, $name, $min = false, $max = false, $recommended = false, + $exclude = false) + { + $this->_isValid = 0; + $arr = array('optional', 'group'); + if ($type != 'required') { + array_shift($arr); + } + $dep = $this->_constructDep($name, false, false, $min, $max, $recommended, $exclude); + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + $type => $arr, + 'extension' => array('os', 'arch') + )); + } + + /** + * @param string Operating system name + * @param boolean true if this package cannot be installed on this OS + */ + function addOsDep($name, $conflicts = false) + { + $this->_isValid = 0; + $dep = array('name' => $name); + if ($conflicts) { + $dep['conflicts'] = ''; + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + 'required' => array('optional', 'group'), + 'os' => array('arch') + )); + } + + /** + * @param string Architecture matching pattern + * @param boolean true if this package cannot be installed on this architecture + */ + function addArchDep($pattern, $conflicts = false) + { + $this->_isValid = 0; + $dep = array('pattern' => $pattern); + if ($conflicts) { + $dep['conflicts'] = ''; + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, $dep, + array( + 'dependencies' => array('providesextension', 'usesrole', 'usestask', + 'srcpackage', 'srcuri', 'phprelease', 'extsrcrelease', 'extbinrelease', + 'bundle', 'changelog'), + 'required' => array('optional', 'group'), + 'arch' => array() + )); + } + + /** + * Set the kind of package, and erase all release tags + * + * - a php package is a PEAR-style package + * - an extbin package is a PECL-style extension binary + * - an extsrc package is a PECL-style source for a binary + * - a bundle package is a collection of other pre-packaged packages + * @param php|extbin|extsrc|bundle + * @return bool success + */ + function setPackageType($type) + { + $this->_isValid = 0; + if (!in_array($type, array('php', 'extbin', 'extsrc', 'bundle'))) { + return false; + } + if ($type != 'bundle') { + $type .= 'release'; + } + foreach (array('phprelease', 'extbinrelease', 'extsrcrelease', 'bundle') as $test) { + unset($this->_packageInfo[$test]); + } + if (!isset($this->_packageInfo[$type])) { + // ensure that the release tag is set up + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, array('changelog'), + array(), $type); + } + $this->_packageInfo[$type] = array(); + return true; + } + + /** + * @return bool true if package type is set up + */ + function addRelease() + { + if ($type = $this->getPackageType()) { + if ($type != 'bundle') { + $type .= 'release'; + } + $this->_packageInfo = $this->_mergeTag($this->_packageInfo, array(), + array($type => array('changelog'))); + return true; + } + return false; + } + + /** + * Get the current release tag in order to add to it + * @param bool returns only releases that have installcondition if true + * @return array|null + */ + function &_getCurrentRelease($strict = true) + { + if ($p = $this->getPackageType()) { + if ($strict) { + if ($p == 'extsrc') { + $a = null; + return $a; + } + } + if ($p != 'bundle') { + $p .= 'release'; + } + if (isset($this->_packageInfo[$p][0])) { + return $this->_packageInfo[$p][count($this->_packageInfo[$p]) - 1]; + } else { + return $this->_packageInfo[$p]; + } + } else { + $a = null; + return $a; + } + } + + /** + * Add a file to the current release that should be installed under a different name + * @param string path to file + * @param string name the file should be installed as + */ + function addInstallAs($path, $as) + { + $r = &$this->_getCurrentRelease(); + if ($r === null) { + return false; + } + $this->_isValid = 0; + $r = $this->_mergeTag($r, array('attribs' => array('name' => $path, 'as' => $as)), + array( + 'filelist' => array(), + 'install' => array('ignore') + )); + } + + /** + * Add a file to the current release that should be ignored + * @param string path to file + * @return bool success of operation + */ + function addIgnore($path) + { + $r = &$this->_getCurrentRelease(); + if ($r === null) { + return false; + } + $this->_isValid = 0; + $r = $this->_mergeTag($r, array('attribs' => array('name' => $path)), + array( + 'filelist' => array(), + 'ignore' => array() + )); + } + + /** + * Add an extension binary package for this extension source code release + * + * Note that the package must be from the same channel as the extension source package + * @param string + */ + function addBinarypackage($package) + { + if ($this->getPackageType() != 'extsrc') { + return false; + } + $r = &$this->_getCurrentRelease(false); + if ($r === null) { + return false; + } + $this->_isValid = 0; + $r = $this->_mergeTag($r, $package, + array( + 'binarypackage' => array('filelist'), + )); + } + + /** + * Add a configureoption to an extension source package + * @param string + * @param string + * @param string + */ + function addConfigureOption($name, $prompt, $default = null) + { + if ($this->getPackageType() != 'extsrc') { + return false; + } + $r = &$this->_getCurrentRelease(false); + if ($r === null) { + return false; + } + $opt = array('attribs' => array('name' => $name, 'prompt' => $prompt)); + if ($default !== null) { + $opt['default'] = $default; + } + $this->_isValid = 0; + $r = $this->_mergeTag($r, $opt, + array( + 'configureoption' => array('binarypackage', 'filelist'), + )); + } + + /** + * Set an installation condition based on php version for the current release set + * @param string minimum version + * @param string maximum version + * @param false|array incompatible versions of PHP + */ + function setPhpInstallCondition($min, $max, $exclude = false) + { + $r = &$this->_getCurrentRelease(); + if ($r === null) { + return false; + } + $this->_isValid = 0; + if (isset($r['installconditions']['php'])) { + unset($r['installconditions']['php']); + } + $dep = array('min' => $min, 'max' => $max); + if ($exclude) { + if (is_array($exclude) && count($exclude) == 1) { + $exclude = $exclude[0]; + } + $dep['exclude'] = $exclude; + } + if ($this->getPackageType() == 'extsrc') { + $r = $this->_mergeTag($r, $dep, + array( + 'installconditions' => array('configureoption', 'binarypackage', + 'filelist'), + 'php' => array('extension', 'os', 'arch') + )); + } else { + $r = $this->_mergeTag($r, $dep, + array( + 'installconditions' => array('filelist'), + 'php' => array('extension', 'os', 'arch') + )); + } + } + + /** + * @param optional|required optional, required + * @param string extension name + * @param string minimum version + * @param string maximum version + * @param string recommended version + * @param array incompatible versions + */ + function addExtensionInstallCondition($name, $min = false, $max = false, $recommended = false, + $exclude = false) + { + $r = &$this->_getCurrentRelease(); + if ($r === null) { + return false; + } + $this->_isValid = 0; + $dep = $this->_constructDep($name, false, false, $min, $max, $recommended, $exclude); + if ($this->getPackageType() == 'extsrc') { + $r = $this->_mergeTag($r, $dep, + array( + 'installconditions' => array('configureoption', 'binarypackage', + 'filelist'), + 'extension' => array('os', 'arch') + )); + } else { + $r = $this->_mergeTag($r, $dep, + array( + 'installconditions' => array('filelist'), + 'extension' => array('os', 'arch') + )); + } + } + + /** + * Set an installation condition based on operating system for the current release set + * @param string OS name + * @param bool whether this OS is incompatible with the current release + */ + function setOsInstallCondition($name, $conflicts = false) + { + $r = &$this->_getCurrentRelease(); + if ($r === null) { + return false; + } + $this->_isValid = 0; + if (isset($r['installconditions']['os'])) { + unset($r['installconditions']['os']); + } + $dep = array('name' => $name); + if ($conflicts) { + $dep['conflicts'] = ''; + } + if ($this->getPackageType() == 'extsrc') { + $r = $this->_mergeTag($r, $dep, + array( + 'installconditions' => array('configureoption', 'binarypackage', + 'filelist'), + 'os' => array('arch') + )); + } else { + $r = $this->_mergeTag($r, $dep, + array( + 'installconditions' => array('filelist'), + 'os' => array('arch') + )); + } + } + + /** + * Set an installation condition based on architecture for the current release set + * @param string architecture pattern + * @param bool whether this arch is incompatible with the current release + */ + function setArchInstallCondition($pattern, $conflicts = false) + { + $r = &$this->_getCurrentRelease(); + if ($r === null) { + return false; + } + $this->_isValid = 0; + if (isset($r['installconditions']['arch'])) { + unset($r['installconditions']['arch']); + } + $dep = array('pattern' => $pattern); + if ($conflicts) { + $dep['conflicts'] = ''; + } + if ($this->getPackageType() == 'extsrc') { + $r = $this->_mergeTag($r, $dep, + array( + 'installconditions' => array('configureoption', 'binarypackage', + 'filelist'), + 'arch' => array() + )); + } else { + $r = $this->_mergeTag($r, $dep, + array( + 'installconditions' => array('filelist'), + 'arch' => array() + )); + } + } + + /** + * For extension binary releases, this is used to specify either the + * static URI to a source package, or the package name and channel of the extsrc + * package it is based on. + * @param string Package name, or full URI to source package (extsrc type) + */ + function setSourcePackage($packageOrUri) + { + $this->_isValid = 0; + if (isset($this->_packageInfo['channel'])) { + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, array('phprelease', + 'extsrcrelease', 'extbinrelease', 'bundle', 'changelog'), + $packageOrUri, 'srcpackage'); + } else { + $this->_packageInfo = $this->_insertBefore($this->_packageInfo, array('phprelease', + 'extsrcrelease', 'extbinrelease', 'bundle', 'changelog'), $packageOrUri, 'srcuri'); + } + } + + /** + * Generate a valid change log entry from the current package.xml + * @param string|false + */ + function generateChangeLogEntry($notes = false) + { + return array( + 'version' => + array( + 'release' => $this->getVersion('release'), + 'api' => $this->getVersion('api'), + ), + 'stability' => + $this->getStability(), + 'date' => $this->getDate(), + 'license' => $this->getLicense(true), + 'notes' => $notes ? $notes : $this->getNotes() + ); + } + + /** + * @param string release version to set change log notes for + * @param array output of {@link generateChangeLogEntry()} + */ + function setChangelogEntry($releaseversion, $contents) + { + if (!isset($this->_packageInfo['changelog'])) { + $this->_packageInfo['changelog']['release'] = $contents; + return; + } + if (!isset($this->_packageInfo['changelog']['release'][0])) { + if ($this->_packageInfo['changelog']['release']['version']['release'] == $releaseversion) { + $this->_packageInfo['changelog']['release'] = array( + $this->_packageInfo['changelog']['release']); + } else { + $this->_packageInfo['changelog']['release'] = array( + $this->_packageInfo['changelog']['release']); + return $this->_packageInfo['changelog']['release'][] = $contents; + } + } + foreach($this->_packageInfo['changelog']['release'] as $index => $changelog) { + if (isset($changelog['version']) && + strnatcasecmp($changelog['version']['release'], $releaseversion) == 0) { + $curlog = $index; + } + } + if (isset($curlog)) { + $this->_packageInfo['changelog']['release'][$curlog] = $contents; + } else { + $this->_packageInfo['changelog']['release'][] = $contents; + } + } + + /** + * Remove the changelog entirely + */ + function clearChangeLog() + { + unset($this->_packageInfo['changelog']); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Packager.php b/campcaster/src/tools/pear/src/PEAR/Packager.php new file mode 100644 index 000000000..75685115b --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Packager.php @@ -0,0 +1,202 @@ + + * @author Tomas V. V. Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Packager.php,v 1.68 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR/Common.php'; +require_once 'PEAR/PackageFile.php'; +require_once 'System.php'; + +/** + * Administration class used to make a PEAR release tarball. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Packager extends PEAR_Common +{ + /** + * @var PEAR_Registry + */ + var $_registry; + // {{{ package() + + function package($pkgfile = null, $compress = true, $pkg2 = null) + { + // {{{ validate supplied package.xml file + if (empty($pkgfile)) { + $pkgfile = 'package.xml'; + } + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $pkg = &new PEAR_PackageFile($this->config, $this->debug); + $pf = &$pkg->fromPackageFile($pkgfile, PEAR_VALIDATE_NORMAL); + $main = &$pf; + PEAR::staticPopErrorHandling(); + if (PEAR::isError($pf)) { + if (is_array($pf->getUserInfo())) { + foreach ($pf->getUserInfo() as $error) { + $this->log(0, 'Error: ' . $error['message']); + } + } + $this->log(0, $pf->getMessage()); + return $this->raiseError("Cannot package, errors in package file"); + } else { + foreach ($pf->getValidationWarnings() as $warning) { + $this->log(1, 'Warning: ' . $warning['message']); + } + } + + // }}} + if ($pkg2) { + $this->log(0, 'Attempting to process the second package file'); + PEAR::staticPushErrorHandling(PEAR_ERROR_RETURN); + $pf2 = &$pkg->fromPackageFile($pkg2, PEAR_VALIDATE_NORMAL); + PEAR::staticPopErrorHandling(); + if (PEAR::isError($pf2)) { + if (is_array($pf2->getUserInfo())) { + foreach ($pf2->getUserInfo() as $error) { + $this->log(0, 'Error: ' . $error['message']); + } + } + $this->log(0, $pf2->getMessage()); + return $this->raiseError("Cannot package, errors in second package file"); + } else { + foreach ($pf2->getValidationWarnings() as $warning) { + $this->log(1, 'Warning: ' . $warning['message']); + } + } + if ($pf2->getPackagexmlVersion() == '2.0') { + $main = &$pf2; + $other = &$pf; + } else { + $main = &$pf; + $other = &$pf2; + } + if ($main->getPackagexmlVersion() != '2.0') { + return PEAR::raiseError('Error: cannot package two package.xml version 1.0, can ' . + 'only package together a package.xml 1.0 and package.xml 2.0'); + } + if ($other->getPackagexmlVersion() != '1.0') { + return PEAR::raiseError('Error: cannot package two package.xml version 2.0, can ' . + 'only package together a package.xml 1.0 and package.xml 2.0'); + } + } + $main->setLogger($this); + if (!$main->validate(PEAR_VALIDATE_PACKAGING)) { + foreach ($main->getValidationWarnings() as $warning) { + $this->log(0, 'Error: ' . $warning['message']); + } + return $this->raiseError("Cannot package, errors in package"); + } else { + foreach ($main->getValidationWarnings() as $warning) { + $this->log(1, 'Warning: ' . $warning['message']); + } + } + if ($pkg2) { + $other->setLogger($this); + $a = false; + if (!$other->validate(PEAR_VALIDATE_NORMAL) || $a = !$main->isEquivalent($other)) { + foreach ($other->getValidationWarnings() as $warning) { + $this->log(0, 'Error: ' . $warning['message']); + } + foreach ($main->getValidationWarnings() as $warning) { + $this->log(0, 'Error: ' . $warning['message']); + } + if ($a) { + return $this->raiseError('The two package.xml files are not equivalent!'); + } + return $this->raiseError("Cannot package, errors in package"); + } else { + foreach ($other->getValidationWarnings() as $warning) { + $this->log(1, 'Warning: ' . $warning['message']); + } + } + $gen = &$main->getDefaultGenerator(); + $tgzfile = $gen->toTgz2($this, $other, $compress); + if (PEAR::isError($tgzfile)) { + return $tgzfile; + } + $dest_package = basename($tgzfile); + $pkgdir = dirname($pkgfile); + + // TAR the Package ------------------------------------------- + $this->log(1, "Package $dest_package done"); + if (file_exists("$pkgdir/CVS/Root")) { + $cvsversion = preg_replace('/[^a-z0-9]/i', '_', $pf->getVersion()); + $cvstag = "RELEASE_$cvsversion"; + $this->log(1, 'Tag the released code with "pear cvstag ' . + $main->getPackageFile() . '"'); + $this->log(1, "(or set the CVS tag $cvstag by hand)"); + } + } else { // this branch is executed for single packagefile packaging + $gen = &$pf->getDefaultGenerator(); + $tgzfile = $gen->toTgz($this, $compress); + if (PEAR::isError($tgzfile)) { + $this->log(0, $tgzfile->getMessage()); + return $this->raiseError("Cannot package, errors in package"); + } + $dest_package = basename($tgzfile); + $pkgdir = dirname($pkgfile); + + // TAR the Package ------------------------------------------- + $this->log(1, "Package $dest_package done"); + if (file_exists("$pkgdir/CVS/Root")) { + $cvsversion = preg_replace('/[^a-z0-9]/i', '_', $pf->getVersion()); + $cvstag = "RELEASE_$cvsversion"; + $this->log(1, "Tag the released code with `pear cvstag $pkgfile'"); + $this->log(1, "(or set the CVS tag $cvstag by hand)"); + } + } + return $dest_package; + } + + // }}} +} + +// {{{ md5_file() utility function +if (!function_exists('md5_file')) { + function md5_file($file) { + if (!$fd = @fopen($file, 'r')) { + return false; + } + if (function_exists('file_get_contents')) { + fclose($fd); + $md5 = md5(file_get_contents($file)); + } else { + $md5 = md5(fread($fd, filesize($file))); + fclose($fd); + } + return $md5; + } +} +// }}} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/REST.php b/campcaster/src/tools/pear/src/PEAR/REST.php new file mode 100644 index 000000000..237c92742 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/REST.php @@ -0,0 +1,397 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: REST.php,v 1.20 2006/03/02 03:09:31 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * For downloading xml files + */ +require_once 'PEAR.php'; +require_once 'PEAR/XMLParser.php'; + +/** + * Intelligently retrieve data, following hyperlinks if necessary, and re-directing + * as well + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_REST +{ + var $config; + var $_options; + function PEAR_REST(&$config, $options = array()) + { + $this->config = &$config; + $this->_options = $options; + } + + /** + * Retrieve REST data, but always retrieve the local cache if it is available. + * + * This is useful for elements that should never change, such as information on a particular + * release + * @param string full URL to this resource + * @param array|false contents of the accept-encoding header + * @param boolean if true, xml will be returned as a string, otherwise, xml will be + * parsed using PEAR_XMLParser + * @return string|array + */ + function retrieveCacheFirst($url, $accept = false, $forcestring = false) + { + $cachefile = $this->config->get('cache_dir') . DIRECTORY_SEPARATOR . + md5($url) . 'rest.cachefile'; + if (@file_exists($cachefile)) { + return unserialize(implode('', file($cachefile))); + } + return $this->retrieveData($url, $accept, $forcestring); + } + + /** + * Retrieve a remote REST resource + * @param string full URL to this resource + * @param array|false contents of the accept-encoding header + * @param boolean if true, xml will be returned as a string, otherwise, xml will be + * parsed using PEAR_XMLParser + * @return string|array + */ + function retrieveData($url, $accept = false, $forcestring = false) + { + $cacheId = $this->getCacheId($url); + if ($ret = $this->useLocalCache($url, $cacheId)) { + return $ret; + } + if (!isset($this->_options['offline'])) { + $trieddownload = true; + $file = $this->downloadHttp($url, $cacheId ? $cacheId['lastChange'] : false, $accept); + } else { + $trieddownload = false; + $file = false; + } + if (PEAR::isError($file)) { + if ($file->getCode() == -9276) { + $trieddownload = false; + $file = false; // use local copy if available on socket connect error + } else { + return $file; + } + } + if (!$file) { + $ret = $this->getCache($url); + if (!PEAR::isError($ret) && $trieddownload) { + // reset the age of the cache if the server says it was unmodified + $this->saveCache($url, $ret, null, true, $cacheId); + } + return $ret; + } + if (is_array($file)) { + $headers = $file[2]; + $lastmodified = $file[1]; + $content = $file[0]; + } else { + $content = $file; + $lastmodified = false; + $headers = array(); + } + if ($forcestring) { + $this->saveCache($url, $content, $lastmodified, false, $cacheId); + return $content; + } + if (isset($headers['content-type'])) { + switch ($headers['content-type']) { + case 'text/xml' : + case 'application/xml' : + $parser = new PEAR_XMLParser; + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $err = $parser->parse($content); + PEAR::popErrorHandling(); + if (PEAR::isError($err)) { + return PEAR::raiseError('Invalid xml downloaded from "' . $url . '": ' . + $err->getMessage()); + } + $content = $parser->getData(); + case 'text/html' : + default : + // use it as a string + } + } else { + // assume XML + $parser = new PEAR_XMLParser; + $parser->parse($content); + $content = $parser->getData(); + } + $this->saveCache($url, $content, $lastmodified, false, $cacheId); + return $content; + } + + function useLocalCache($url, $cacheid = null) + { + if ($cacheid === null) { + $cacheidfile = $this->config->get('cache_dir') . DIRECTORY_SEPARATOR . + md5($url) . 'rest.cacheid'; + if (@file_exists($cacheidfile)) { + $cacheid = unserialize(implode('', file($cacheidfile))); + } else { + return false; + } + } + $cachettl = $this->config->get('cache_ttl'); + // If cache is newer than $cachettl seconds, we use the cache! + if (time() - $cacheid['age'] < $cachettl) { + return $this->getCache($url); + } + return false; + } + + function getCacheId($url) + { + $cacheidfile = $this->config->get('cache_dir') . DIRECTORY_SEPARATOR . + md5($url) . 'rest.cacheid'; + if (@file_exists($cacheidfile)) { + $ret = unserialize(implode('', file($cacheidfile))); + return $ret; + } else { + return false; + } + } + + function getCache($url) + { + $cachefile = $this->config->get('cache_dir') . DIRECTORY_SEPARATOR . + md5($url) . 'rest.cachefile'; + if (@file_exists($cachefile)) { + return unserialize(implode('', file($cachefile))); + } else { + return PEAR::raiseError('No cached content available for "' . $url . '"'); + } + } + + /** + * @param string full URL to REST resource + * @param string original contents of the REST resource + * @param array HTTP Last-Modified and ETag headers + * @param bool if true, then the cache id file should be regenerated to + * trigger a new time-to-live value + */ + function saveCache($url, $contents, $lastmodified, $nochange = false, $cacheid = null) + { + $cacheidfile = $this->config->get('cache_dir') . DIRECTORY_SEPARATOR . + md5($url) . 'rest.cacheid'; + $cachefile = $this->config->get('cache_dir') . DIRECTORY_SEPARATOR . + md5($url) . 'rest.cachefile'; + if ($cacheid === null && $nochange) { + $cacheid = unserialize(implode('', file($cacheidfile))); + } + + $fp = @fopen($cacheidfile, 'wb'); + if (!$fp) { + $cache_dir = $this->config->get('cache_dir'); + if (!is_dir($cache_dir)) { + System::mkdir(array('-p', $cache_dir)); + $fp = @fopen($cacheidfile, 'wb'); + if (!$fp) { + return false; + } + } else { + return false; + } + } + + if ($nochange) { + fwrite($fp, serialize(array( + 'age' => time(), + 'lastChange' => $cacheid['lastChange'], + ))); + fclose($fp); + return true; + } else { + fwrite($fp, serialize(array( + 'age' => time(), + 'lastChange' => $lastmodified, + ))); + } + fclose($fp); + $fp = @fopen($cachefile, 'wb'); + if (!$fp) { + @unlink($cacheidfile); + return false; + } + fwrite($fp, serialize($contents)); + fclose($fp); + return true; + } + + /** + * Efficiently Download a file through HTTP. Returns downloaded file as a string in-memory + * This is best used for small files + * + * If an HTTP proxy has been configured (http_proxy PEAR_Config + * setting), the proxy will be used. + * + * @param string $url the URL to download + * @param string $save_dir directory to save file in + * @param false|string|array $lastmodified header values to check against for caching + * use false to return the header values from this download + * @param false|array $accept Accept headers to send + * @return string|array Returns the contents of the downloaded file or a PEAR + * error on failure. If the error is caused by + * socket-related errors, the error object will + * have the fsockopen error code available through + * getCode(). If caching is requested, then return the header + * values. + * + * @access public + */ + function downloadHttp($url, $lastmodified = null, $accept = false) + { + $info = parse_url($url); + if (!isset($info['scheme']) || !in_array($info['scheme'], array('http', 'https'))) { + return PEAR::raiseError('Cannot download non-http URL "' . $url . '"'); + } + if (!isset($info['host'])) { + return PEAR::raiseError('Cannot download from non-URL "' . $url . '"'); + } else { + $host = $info['host']; + if (!array_key_exists('port', $info)) { + $info['port'] = null; + } + if (!array_key_exists('path', $info)) { + $info['path'] = null; + } + $port = $info['port']; + $path = $info['path']; + } + $proxy_host = $proxy_port = $proxy_user = $proxy_pass = ''; + if ($this->config->get('http_proxy')&& + $proxy = parse_url($this->config->get('http_proxy'))) { + $proxy_host = @$proxy['host']; + if (isset($proxy['scheme']) && $proxy['scheme'] == 'https') { + $proxy_host = 'ssl://' . $proxy_host; + } + $proxy_port = @$proxy['port']; + $proxy_user = @$proxy['user']; + $proxy_pass = @$proxy['pass']; + + if ($proxy_port == '') { + $proxy_port = 8080; + } + } + if (empty($port)) { + if (isset($info['scheme']) && $info['scheme'] == 'https') { + $port = 443; + } else { + $port = 80; + } + } + If (isset($proxy['host'])) { + $request = "GET $url HTTP/1.1\r\n"; + } else { + $request = "GET $path HTTP/1.1\r\n"; + } + + $ifmodifiedsince = ''; + if (is_array($lastmodified)) { + if (isset($lastmodified['Last-Modified'])) { + $ifmodifiedsince = 'If-Modified-Since: ' . $lastmodified['Last-Modified'] . "\r\n"; + } + if (isset($lastmodified['ETag'])) { + $ifmodifiedsince .= "If-None-Match: $lastmodified[ETag]\r\n"; + } + } else { + $ifmodifiedsince = ($lastmodified ? "If-Modified-Since: $lastmodified\r\n" : ''); + } + $request .= "Host: $host:$port\r\n" . $ifmodifiedsince . + "User-Agent: PEAR/1.4.11/PHP/" . PHP_VERSION . "\r\n"; + $username = $this->config->get('username'); + $password = $this->config->get('password'); + if ($username && $password) { + $tmp = base64_encode("$username:$password"); + $request .= "Authorization: Basic $tmp\r\n"; + } + if ($proxy_host != '' && $proxy_user != '') { + $request .= 'Proxy-Authorization: Basic ' . + base64_encode($proxy_user . ':' . $proxy_pass) . "\r\n"; + } + if ($accept) { + $request .= 'Accept: ' . implode(', ', $accept) . "\r\n"; + } + $request .= "Connection: close\r\n"; + $request .= "\r\n"; + if ($proxy_host != '') { + $fp = @fsockopen($proxy_host, $proxy_port, $errno, $errstr, 15); + if (!$fp) { + return PEAR::raiseError("Connection to `$proxy_host:$proxy_port' failed: $errstr", + -9276); + } + } else { + if (isset($info['scheme']) && $info['scheme'] == 'https') { + $host = 'ssl://' . $host; + } + $fp = @fsockopen($host, $port, $errno, $errstr); + if (!$fp) { + return PEAR::raiseError("Connection to `$host:$port' failed: $errstr", $errno); + } + } + fwrite($fp, $request); + $headers = array(); + while (trim($line = fgets($fp, 1024))) { + if (preg_match('/^([^:]+):\s+(.*)\s*$/', $line, $matches)) { + $headers[strtolower($matches[1])] = trim($matches[2]); + } elseif (preg_match('|^HTTP/1.[01] ([0-9]{3}) |', $line, $matches)) { + if ($matches[1] == 304 && ($lastmodified || ($lastmodified === false))) { + return false; + } + if ($matches[1] != 200) { + return PEAR::raiseError("File http://$host:$port$path not valid (received: $line)", (int) $matches[1]); + } + } + } + if (isset($headers['content-length'])) { + $length = $headers['content-length']; + } else { + $length = -1; + } + $data = ''; + while ($chunk = @fread($fp, 8192)) { + $data .= $chunk; + } + fclose($fp); + if ($lastmodified === false || $lastmodified) { + if (isset($headers['etag'])) { + $lastmodified = array('ETag' => $headers['etag']); + } + if (isset($headers['last-modified'])) { + if (is_array($lastmodified)) { + $lastmodified['Last-Modified'] = $headers['last-modified']; + } else { + $lastmodified = $headers['last-modified']; + } + } + return array($data, $lastmodified, $headers); + } + return $data; + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/REST/10.php b/campcaster/src/tools/pear/src/PEAR/REST/10.php new file mode 100644 index 000000000..292eba4a6 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/REST/10.php @@ -0,0 +1,624 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: 10.php,v 1.40 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a12 + */ + +/** + * For downloading REST xml/txt files + */ +require_once 'PEAR/REST.php'; + +/** + * Implement REST 1.0 + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a12 + */ +class PEAR_REST_10 +{ + /** + * @var PEAR_REST + */ + var $_rest; + function PEAR_REST_10($config, $options = array()) + { + $this->_rest = &new PEAR_REST($config, $options); + } + + function getDownloadURL($base, $packageinfo, $prefstate, $installed) + { + $channel = $packageinfo['channel']; + $package = $packageinfo['package']; + $states = $this->betterStates($prefstate, true); + if (!$states) { + return PEAR::raiseError('"' . $prefstate . '" is not a valid state'); + } + $state = $version = null; + if (isset($packageinfo['state'])) { + $state = $packageinfo['state']; + } + if (isset($packageinfo['version'])) { + $version = $packageinfo['version']; + } + $info = $this->_rest->retrieveData($base . 'r/' . strtolower($package) . '/allreleases.xml'); + if (PEAR::isError($info)) { + return PEAR::raiseError('No releases available for package "' . + $channel . '/' . $package . '"'); + } + if (!isset($info['r'])) { + return false; + } + $found = false; + $release = false; + if (!is_array($info['r']) || !isset($info['r'][0])) { + $info['r'] = array($info['r']); + } + foreach ($info['r'] as $release) { + if (!isset($this->_rest->_options['force']) && ($installed && + version_compare($release['v'], $installed, '<'))) { + continue; + } + if (isset($state)) { + if ($release['s'] == $state) { + $found = true; + break; + } + } elseif (isset($version)) { + if ($release['v'] == $version) { + $found = true; + break; + } + } else { + if (in_array($release['s'], $states)) { + $found = true; + break; + } + } + } + return $this->_returnDownloadURL($base, $package, $release, $info, $found); + } + + function getDepDownloadURL($base, $xsdversion, $dependency, $deppackage, + $prefstate = 'stable', $installed = false) + { + $channel = $dependency['channel']; + $package = $dependency['name']; + $states = $this->betterStates($prefstate, true); + if (!$states) { + return PEAR::raiseError('"' . $prefstate . '" is not a valid state'); + } + $state = $version = null; + if (isset($packageinfo['state'])) { + $state = $packageinfo['state']; + } + if (isset($packageinfo['version'])) { + $version = $packageinfo['version']; + } + $info = $this->_rest->retrieveData($base . 'r/' . strtolower($package) . '/allreleases.xml'); + if (PEAR::isError($info)) { + return PEAR::raiseError('Package "' . $deppackage['channel'] . '/' . $deppackage['package'] + . '" dependency "' . $channel . '/' . $package . '" has no releases'); + } + if (!is_array($info) || !isset($info['r'])) { + return false; + } + $exclude = array(); + $min = $max = $recommended = false; + if ($xsdversion == '1.0') { + $pinfo['package'] = $dependency['name']; + $pinfo['channel'] = 'pear.php.net'; // this is always true - don't change this + switch ($dependency['rel']) { + case 'ge' : + $min = $dependency['version']; + break; + case 'gt' : + $min = $dependency['version']; + $exclude = array($dependency['version']); + break; + case 'eq' : + $recommended = $dependency['version']; + break; + case 'lt' : + $max = $dependency['version']; + $exclude = array($dependency['version']); + break; + case 'le' : + $max = $dependency['version']; + break; + case 'ne' : + $exclude = array($dependency['version']); + break; + } + } else { + $pinfo['package'] = $dependency['name']; + $min = isset($dependency['min']) ? $dependency['min'] : false; + $max = isset($dependency['max']) ? $dependency['max'] : false; + $recommended = isset($dependency['recommended']) ? + $dependency['recommended'] : false; + if (isset($dependency['exclude'])) { + if (!isset($dependency['exclude'][0])) { + $exclude = array($dependency['exclude']); + } + } + } + $found = false; + $release = false; + if (!is_array($info['r']) || !isset($info['r'][0])) { + $info['r'] = array($info['r']); + } + foreach ($info['r'] as $release) { + if (!isset($this->_rest->_options['force']) && ($installed && + version_compare($release['v'], $installed, '<'))) { + continue; + } + if (in_array($release['v'], $exclude)) { // skip excluded versions + continue; + } + // allow newer releases to say "I'm OK with the dependent package" + if ($xsdversion == '2.0' && isset($release['co'])) { + if (!is_array($release['co']) || !isset($release['co'][0])) { + $release['co'] = array($release['co']); + } + foreach ($release['co'] as $entry) { + if (isset($entry['x']) && !is_array($entry['x'])) { + $entry['x'] = array($entry['x']); + } elseif (!isset($entry['x'])) { + $entry['x'] = array(); + } + if ($entry['c'] == $deppackage['channel'] && + strtolower($entry['p']) == strtolower($deppackage['package']) && + version_compare($deppackage['version'], $entry['min'], '>=') && + version_compare($deppackage['version'], $entry['max'], '<=') && + !in_array($release['v'], $entry['x'])) { + $recommended = $release['v']; + break; + } + } + } + if ($recommended) { + if ($release['v'] != $recommended) { // if we want a specific + // version, then skip all others + continue; + } else { + if (!in_array($release['s'], $states)) { + // the stability is too low, but we must return the + // recommended version if possible + return $this->_returnDownloadURL($base, $package, $release, $info, true); + } + } + } + if ($min && version_compare($release['v'], $min, 'lt')) { // skip too old versions + continue; + } + if ($max && version_compare($release['v'], $max, 'gt')) { // skip too new versions + continue; + } + if ($installed && version_compare($release['v'], $installed, '<')) { + continue; + } + if (in_array($release['s'], $states)) { // if in the preferred state... + $found = true; // ... then use it + break; + } + } + return $this->_returnDownloadURL($base, $package, $release, $info, $found); + } + + function _returnDownloadURL($base, $package, $release, $info, $found) + { + if (!$found) { + $release = $info['r'][0]; + } + $releaseinfo = $this->_rest->retrieveCacheFirst($base . 'r/' . strtolower($package) . '/' . + $release['v'] . '.xml'); + if (PEAR::isError($releaseinfo)) { + return PEAR::raiseError('Package "' . $package . '" Version "' . $release['v'] . + '" does not have REST xml available'); + } + $packagexml = $this->_rest->retrieveCacheFirst($base . 'r/' . strtolower($package) . '/' . + 'deps.' . $release['v'] . '.txt', false, true); + if (PEAR::isError($packagexml)) { + return PEAR::raiseError('Package "' . $package . '" Version "' . $release['v'] . + '" does not have REST dependency information available'); + } + $packagexml = unserialize($packagexml); + if (!$packagexml) { + $packagexml = array(); + } + $allinfo = $this->_rest->retrieveData($base . 'r/' . strtolower($package) . + '/allreleases.xml'); + if (!is_array($allinfo['r']) || !isset($allinfo['r'][0])) { + $allinfo['r'] = array($allinfo['r']); + } + $compatible = false; + foreach ($allinfo['r'] as $release) { + if ($release['v'] != $releaseinfo['v']) { + continue; + } + if (!isset($release['co'])) { + break; + } + $compatible = array(); + if (!is_array($release['co']) || !isset($release['co'][0])) { + $release['co'] = array($release['co']); + } + foreach ($release['co'] as $entry) { + $comp = array(); + $comp['name'] = $entry['p']; + $comp['channel'] = $entry['c']; + $comp['min'] = $entry['min']; + $comp['max'] = $entry['max']; + if (isset($entry['x']) && !is_array($entry['x'])) { + $comp['exclude'] = $entry['x']; + } + $compatible[] = $comp; + } + if (count($compatible) == 1) { + $compatible = $compatible[0]; + } + break; + } + if ($found) { + return + array('version' => $releaseinfo['v'], + 'info' => $packagexml, + 'package' => $releaseinfo['p']['_content'], + 'stability' => $releaseinfo['st'], + 'url' => $releaseinfo['g'], + 'compatible' => $compatible); + } else { + return + array('version' => $releaseinfo['v'], + 'package' => $releaseinfo['p']['_content'], + 'stability' => $releaseinfo['st'], + 'info' => $packagexml, + 'compatible' => $compatible); + } + } + + function listPackages($base) + { + $packagelist = $this->_rest->retrieveData($base . 'p/packages.xml'); + if (PEAR::isError($packagelist)) { + return $packagelist; + } + if (!is_array($packagelist) || !isset($packagelist['p'])) { + return array(); + } + if (!is_array($packagelist['p'])) { + $packagelist['p'] = array($packagelist['p']); + } + return $packagelist['p']; + } + + function listAll($base, $dostable, $basic = true, $searchpackage = false, $searchsummary = false) + { + $packagelist = $this->_rest->retrieveData($base . 'p/packages.xml'); + if (PEAR::isError($packagelist)) { + return $packagelist; + } + if ($this->_rest->config->get('verbose') > 0) { + $ui = &PEAR_Frontend::singleton(); + $ui->log('Retrieving data...0%', false); + } + $ret = array(); + if (!is_array($packagelist) || !isset($packagelist['p'])) { + return $ret; + } + if (!is_array($packagelist['p'])) { + $packagelist['p'] = array($packagelist['p']); + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $next = .1; + foreach ($packagelist['p'] as $progress => $package) { + if ($this->_rest->config->get('verbose') > 0) { + if ($progress / count($packagelist['p']) >= $next) { + if ($next == .5) { + $ui->log('50%', false); + } else { + $ui->log('.', false); + } + $next += .1; + } + } + if ($basic) { // remote-list command + if ($dostable) { + $latest = $this->_rest->retrieveData($base . 'r/' . strtolower($package) . + '/stable.txt'); + } else { + $latest = $this->_rest->retrieveData($base . 'r/' . strtolower($package) . + '/latest.txt'); + } + if (PEAR::isError($latest)) { + $latest = false; + } + $info = array('stable' => $latest); + } else { // list-all command + $inf = $this->_rest->retrieveData($base . 'p/' . strtolower($package) . '/info.xml'); + if (PEAR::isError($inf)) { + PEAR::popErrorHandling(); + return $inf; + } + if ($searchpackage) { + $found = (!empty($searchpackage) && stristr($package, $searchpackage) !== false); + if (!$found && !(isset($searchsummary) && !empty($searchsummary) + && (stristr($inf['s'], $searchsummary) !== false + || stristr($inf['d'], $searchsummary) !== false))) + { + continue; + }; + } + $releases = $this->_rest->retrieveData($base . 'r/' . strtolower($package) . + '/allreleases.xml'); + if (PEAR::isError($releases)) { + continue; + } + if (!isset($releases['r'][0])) { + $releases['r'] = array($releases['r']); + } + unset($latest); + unset($unstable); + unset($stable); + unset($state); + foreach ($releases['r'] as $release) { + if (!isset($latest)) { + if ($dostable && $release['s'] == 'stable') { + $latest = $release['v']; + $state = 'stable'; + } + if (!$dostable) { + $latest = $release['v']; + $state = $release['s']; + } + } + if (!isset($stable) && $release['s'] == 'stable') { + $stable = $release['v']; + if (!isset($unstable)) { + $unstable = $stable; + } + } + if (!isset($unstable) && $release['s'] != 'stable') { + $latest = $unstable = $release['v']; + $state = $release['s']; + } + if (isset($latest) && !isset($state)) { + $state = $release['s']; + } + if (isset($latest) && isset($stable) && isset($unstable)) { + break; + } + } + $deps = array(); + if (!isset($unstable)) { + $unstable = false; + $state = 'stable'; + if (isset($stable)) { + $latest = $unstable = $stable; + } + } else { + $latest = $unstable; + } + if (!isset($latest)) { + $latest = false; + } + if ($latest) { + $d = $this->_rest->retrieveCacheFirst($base . 'r/' . strtolower($package) . '/deps.' . + $latest . '.txt'); + if (!PEAR::isError($d)) { + $d = unserialize($d); + if ($d) { + if (isset($d['required'])) { + if (!class_exists('PEAR_PackageFile_v2')) { + require_once 'PEAR/PackageFile/v2.php'; + } + if (!isset($pf)) { + $pf = new PEAR_PackageFile_v2; + } + $pf->setDeps($d); + $tdeps = $pf->getDeps(); + } else { + $tdeps = $d; + } + foreach ($tdeps as $dep) { + if ($dep['type'] !== 'pkg') { + continue; + } + $deps[] = $dep; + } + } + } + } + if (!isset($stable)) { + $stable = '-n/a-'; + } + if (!$searchpackage) { + $info = array('stable' => $latest, 'summary' => $inf['s'], 'description' => + $inf['d'], 'deps' => $deps, 'category' => $inf['ca']['_content'], + 'unstable' => $unstable, 'state' => $state); + } else { + $info = array('stable' => $stable, 'summary' => $inf['s'], 'description' => + $inf['d'], 'deps' => $deps, 'category' => $inf['ca']['_content'], + 'unstable' => $unstable, 'state' => $state); + } + } + $ret[$package] = $info; + } + PEAR::popErrorHandling(); + return $ret; + } + + function listLatestUpgrades($base, $state, $installed, $channel, &$reg) + { + $packagelist = $this->_rest->retrieveData($base . 'p/packages.xml'); + if (PEAR::isError($packagelist)) { + return $packagelist; + } + $ret = array(); + if (!is_array($packagelist) || !isset($packagelist['p'])) { + return $ret; + } + if (!is_array($packagelist['p'])) { + $packagelist['p'] = array($packagelist['p']); + } + if ($state) { + $states = $this->betterStates($state, true); + } + foreach ($packagelist['p'] as $package) { + if (!isset($installed[strtolower($package)])) { + continue; + } + $inst_version = $reg->packageInfo($package, 'version', $channel); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $info = $this->_rest->retrieveData($base . 'r/' . strtolower($package) . + '/allreleases.xml'); + PEAR::popErrorHandling(); + if (PEAR::isError($info)) { + continue; // no remote releases + } + if (!isset($info['r'])) { + continue; + } + $found = false; + $release = false; + if (!is_array($info['r']) || !isset($info['r'][0])) { + $info['r'] = array($info['r']); + } + foreach ($info['r'] as $release) { + if ($inst_version && version_compare($release['v'], $inst_version, '<=')) { + continue; + } + if ($state) { + if (in_array($release['s'], $states)) { + $found = true; + break; + } + } else { + $found = true; + break; + } + } + if (!$found) { + continue; + } + $relinfo = $this->_rest->retrieveCacheFirst($base . 'r/' . strtolower($package) . '/' . + $release['v'] . '.xml'); + if (PEAR::isError($relinfo)) { + return $relinfo; + } + $ret[$package] = array( + 'version' => $release['v'], + 'state' => $release['s'], + 'filesize' => $relinfo['f'], + ); + } + return $ret; + } + + function packageInfo($base, $package) + { + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $pinfo = $this->_rest->retrieveData($base . 'p/' . strtolower($package) . '/info.xml'); + if (PEAR::isError($pinfo)) { + PEAR::popErrorHandling(); + return PEAR::raiseError('Unknown package: "' . $package . '" (Debug: ' . + $pinfo->getMessage() . ')'); + } + $releases = array(); + $allreleases = $this->_rest->retrieveData($base . 'r/' . strtolower($package) . + '/allreleases.xml'); + if (!PEAR::isError($allreleases)) { + if (!class_exists('PEAR_PackageFile_v2')) { + require_once 'PEAR/PackageFile/v2.php'; + } + if (!is_array($allreleases['r'])) { + $allreleases['r'] = array($allreleases['r']); + } + $pf = new PEAR_PackageFile_v2; + foreach ($allreleases['r'] as $release) { + $ds = $this->_rest->retrieveCacheFirst($base . 'r/' . strtolower($package) . '/deps.' . + $release['v'] . '.txt'); + if (PEAR::isError($ds)) { + continue; + } + if (!isset($latest)) { + $latest = $release['v']; + } + $pf->setDeps(unserialize($ds)); + $ds = $pf->getDeps(); + $info = $this->_rest->retrieveCacheFirst($base . 'r/' . strtolower($package) + . '/' . $release['v'] . '.xml'); + if (PEAR::isError($info)) { + continue; + } + $releases[$release['v']] = array( + 'doneby' => $info['m'], + 'license' => $info['l'], + 'summary' => $info['s'], + 'description' => $info['d'], + 'releasedate' => $info['da'], + 'releasenotes' => $info['n'], + 'state' => $release['s'], + 'deps' => $ds ? $ds : array(), + ); + } + } else { + $latest = ''; + } + PEAR::popErrorHandling(); + return array( + 'name' => $pinfo['n'], + 'channel' => $pinfo['c'], + 'category' => $pinfo['ca']['_content'], + 'stable' => $latest, + 'license' => $pinfo['l'], + 'summary' => $pinfo['s'], + 'description' => $pinfo['d'], + 'releases' => $releases, + ); + } + + /** + * Return an array containing all of the states that are more stable than + * or equal to the passed in state + * + * @param string Release state + * @param boolean Determines whether to include $state in the list + * @return false|array False if $state is not a valid release state + */ + function betterStates($state, $include = false) + { + static $states = array('snapshot', 'devel', 'alpha', 'beta', 'stable'); + $i = array_search($state, $states); + if ($i === false) { + return false; + } + if ($include) { + $i--; + } + return array_slice($states, $i + 1); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/REST/11.php b/campcaster/src/tools/pear/src/PEAR/REST/11.php new file mode 100644 index 000000000..713fcbae7 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/REST/11.php @@ -0,0 +1,209 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: 11.php,v 1.4.2.3 2006/08/15 21:25:12 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.3 + */ + +/** + * For downloading REST xml/txt files + */ +require_once 'PEAR/REST.php'; + +/** + * Implement REST 1.1 + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.3 + */ +class PEAR_REST_11 +{ + /** + * @var PEAR_REST + */ + var $_rest; + + function PEAR_REST_11($config, $options = array()) + { + $this->_rest = &new PEAR_REST($config, $options); + } + + function listAll($base, $dostable, $basic = true) + { + $categorylist = $this->_rest->retrieveData($base . 'c/categories.xml'); + if (PEAR::isError($categorylist)) { + return $categorylist; + } + $ret = array(); + if (!is_array($categorylist['c']) || !isset($categorylist['c'][0])) { + $categorylist['c'] = array($categorylist['c']); + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + foreach ($categorylist['c'] as $progress => $category) { + $category = $category['_content']; + $packagesinfo = $this->_rest->retrieveData($base . + 'c/' . urlencode($category) . '/packagesinfo.xml'); + if (PEAR::isError($packagesinfo)) { + continue; + } + if (!is_array($packagesinfo) || !isset($packagesinfo['pi'])) { + continue; + } + if (!is_array($packagesinfo['pi']) || !isset($packagesinfo['pi'][0])) { + $packagesinfo['pi'] = array($packagesinfo['pi']); + } + foreach ($packagesinfo['pi'] as $packageinfo) { + $info = $packageinfo['p']; + $package = $info['n']; + $releases = isset($packageinfo['a']) ? $packageinfo['a'] : false; + unset($latest); + unset($unstable); + unset($stable); + unset($state); + if ($releases) { + if (!isset($releases['r'][0])) { + $releases['r'] = array($releases['r']); + } + foreach ($releases['r'] as $release) { + if (!isset($latest)) { + if ($dostable && $release['s'] == 'stable') { + $latest = $release['v']; + $state = 'stable'; + } + if (!$dostable) { + $latest = $release['v']; + $state = $release['s']; + } + } + if (!isset($stable) && $release['s'] == 'stable') { + $stable = $release['v']; + if (!isset($unstable)) { + $unstable = $stable; + } + } + if (!isset($unstable) && $release['s'] != 'stable') { + $latest = $unstable = $release['v']; + $state = $release['s']; + } + if (isset($latest) && !isset($state)) { + $state = $release['s']; + } + if (isset($latest) && isset($stable) && isset($unstable)) { + break; + } + } + } + if ($basic) { // remote-list command + if (!isset($latest)) { + $latest = false; + } + $ret[$package] = array('stable' => $latest); + continue; + } + // list-all command + $deps = array(); + if (!isset($unstable)) { + $unstable = false; + $state = 'stable'; + if (isset($stable)) { + $latest = $unstable = $stable; + } + } else { + $latest = $unstable; + } + if (!isset($latest)) { + $latest = false; + } + if ($latest) { + if (isset($packageinfo['deps'])) { + if (!is_array($packageinfo['deps']) || + !isset($packageinfo['deps'][0])) { + $packageinfo['deps'] = array($packageinfo['deps']); + } + } + $d = false; + if (isset($packageinfo['deps']) && is_array($packageinfo['deps'])) { + foreach ($packageinfo['deps'] as $dep) { + if ($dep['v'] == $latest) { + $d = unserialize($dep['d']); + } + } + } + if ($d) { + if (isset($d['required'])) { + if (!class_exists('PEAR_PackageFile_v2')) { + require_once 'PEAR/PackageFile/v2.php'; + } + if (!isset($pf)) { + $pf = new PEAR_PackageFile_v2; + } + $pf->setDeps($d); + $tdeps = $pf->getDeps(); + } else { + $tdeps = $d; + } + foreach ($tdeps as $dep) { + if ($dep['type'] !== 'pkg') { + continue; + } + $deps[] = $dep; + } + } + } + if (!isset($stable)) { + $stable = '-n/a-'; + } + $info = array('stable' => $latest, 'summary' => $info['s'], + 'description' => + $info['d'], 'deps' => $deps, 'category' => $info['ca']['_content'], + 'unstable' => $unstable, 'state' => $state); + $ret[$package] = $info; + } + } + PEAR::popErrorHandling(); + return $ret; + } + + /** + * Return an array containing all of the states that are more stable than + * or equal to the passed in state + * + * @param string Release state + * @param boolean Determines whether to include $state in the list + * @return false|array False if $state is not a valid release state + */ + function betterStates($state, $include = false) + { + static $states = array('snapshot', 'devel', 'alpha', 'beta', 'stable'); + $i = array_search($state, $states); + if ($i === false) { + return false; + } + if ($include) { + $i--; + } + return array_slice($states, $i + 1); + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Registry.php b/campcaster/src/tools/pear/src/PEAR/Registry.php new file mode 100644 index 000000000..b198eba3b --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Registry.php @@ -0,0 +1,2161 @@ + + * @author Tomas V. V. Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Registry.php,v 1.150.2.2 2006/03/11 04:16:48 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * for PEAR_Error + */ +require_once 'PEAR.php'; +require_once 'PEAR/DependencyDB.php'; + +define('PEAR_REGISTRY_ERROR_LOCK', -2); +define('PEAR_REGISTRY_ERROR_FORMAT', -3); +define('PEAR_REGISTRY_ERROR_FILE', -4); +define('PEAR_REGISTRY_ERROR_CONFLICT', -5); +define('PEAR_REGISTRY_ERROR_CHANNEL_FILE', -6); + +/** + * Administration class used to maintain the installed package database. + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Tomas V. V. Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Registry extends PEAR +{ + // {{{ properties + + /** + * File containing all channel information. + * @var string + */ + var $channels = ''; + + /** Directory where registry files are stored. + * @var string + */ + var $statedir = ''; + + /** File where the file map is stored + * @var string + */ + var $filemap = ''; + + /** Directory where registry files for channels are stored. + * @var string + */ + var $channelsdir = ''; + + /** Name of file used for locking the registry + * @var string + */ + var $lockfile = ''; + + /** File descriptor used during locking + * @var resource + */ + var $lock_fp = null; + + /** Mode used during locking + * @var int + */ + var $lock_mode = 0; // XXX UNUSED + + /** Cache of package information. Structure: + * array( + * 'package' => array('id' => ... ), + * ... ) + * @var array + */ + var $pkginfo_cache = array(); + + /** Cache of file map. Structure: + * array( '/path/to/file' => 'package', ... ) + * @var array + */ + var $filemap_cache = array(); + + /** + * @var false|PEAR_ChannelFile + */ + var $_pearChannel; + + /** + * @var false|PEAR_ChannelFile + */ + var $_peclChannel; + + /** + * @var PEAR_DependencyDB + */ + var $_dependencyDB; + + /** + * @var PEAR_Config + */ + var $_config; + // }}} + + // {{{ constructor + + /** + * PEAR_Registry constructor. + * + * @param string (optional) PEAR install directory (for .php files) + * @param PEAR_ChannelFile PEAR_ChannelFile object representing the PEAR channel, if + * default values are not desired. Only used the very first time a PEAR + * repository is initialized + * @param PEAR_ChannelFile PEAR_ChannelFile object representing the PECL channel, if + * default values are not desired. Only used the very first time a PEAR + * repository is initialized + * + * @access public + */ + function PEAR_Registry($pear_install_dir = PEAR_INSTALL_DIR, $pear_channel = false, + $pecl_channel = false) + { + parent::PEAR(); + $ds = DIRECTORY_SEPARATOR; + $this->install_dir = $pear_install_dir; + $this->channelsdir = $pear_install_dir.$ds.'.channels'; + $this->statedir = $pear_install_dir.$ds.'.registry'; + $this->filemap = $pear_install_dir.$ds.'.filemap'; + $this->lockfile = $pear_install_dir.$ds.'.lock'; + $this->_pearChannel = $pear_channel; + $this->_peclChannel = $pecl_channel; + $this->_config = false; + } + + function hasWriteAccess() + { + if (!@file_exists($this->install_dir)) { + $dir = $this->install_dir; + while ($dir && $dir != '.') { + $dir = dirname($dir); // cd .. + if ($dir != '.' && @file_exists($dir)) { + if (@is_writeable($dir)) { + return true; + } else { + return false; + } + } + } + return false; + } + return @is_writeable($this->install_dir); + } + + function setConfig(&$config) + { + $this->_config = &$config; + } + + function _initializeChannelDirs() + { + static $running = false; + if (!$running) { + $running = true; + $ds = DIRECTORY_SEPARATOR; + if (!is_dir($this->channelsdir) || + !file_exists($this->channelsdir . $ds . 'pear.php.net.reg') || + !file_exists($this->channelsdir . $ds . 'pecl.php.net.reg') || + !file_exists($this->channelsdir . $ds . '__uri.reg')) { + if (!file_exists($this->channelsdir . $ds . 'pear.php.net.reg')) { + $pear_channel = $this->_pearChannel; + if (!is_a($pear_channel, 'PEAR_ChannelFile') || !$pear_channel->validate()) { + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $pear_channel = new PEAR_ChannelFile; + $pear_channel->setName('pear.php.net'); + $pear_channel->setAlias('pear'); + $pear_channel->setServer('pear.php.net'); + $pear_channel->setSummary('PHP Extension and Application Repository'); + $pear_channel->setDefaultPEARProtocols(); + $pear_channel->setBaseURL('REST1.0', 'http://pear.php.net/rest/'); + $pear_channel->setBaseURL('REST1.1', 'http://pear.php.net/rest/'); + } else { + $pear_channel->setName('pear.php.net'); + $pear_channel->setAlias('pear'); + } + $pear_channel->validate(); + $this->_addChannel($pear_channel); + } + if (!file_exists($this->channelsdir . $ds . 'pecl.php.net.reg')) { + $pecl_channel = $this->_peclChannel; + if (!is_a($pecl_channel, 'PEAR_ChannelFile') || !$pecl_channel->validate()) { + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $pecl_channel = new PEAR_ChannelFile; + $pecl_channel->setName('pecl.php.net'); + $pecl_channel->setAlias('pecl'); + $pecl_channel->setServer('pecl.php.net'); + $pecl_channel->setSummary('PHP Extension Community Library'); + $pecl_channel->setDefaultPEARProtocols(); + $pecl_channel->setBaseURL('REST1.0', 'http://pecl.php.net/rest/'); + $pecl_channel->setBaseURL('REST1.1', 'http://pecl.php.net/rest/'); + $pecl_channel->setValidationPackage('PEAR_Validator_PECL', '1.0'); + } else { + $pecl_channel->setName('pecl.php.net'); + $pecl_channel->setAlias('pecl'); + } + $pecl_channel->validate(); + $this->_addChannel($pecl_channel); + } + if (!file_exists($this->channelsdir . $ds . '__uri.reg')) { + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $private = new PEAR_ChannelFile; + $private->setName('__uri'); + $private->addFunction('xmlrpc', '1.0', '****'); + $private->setSummary('Pseudo-channel for static packages'); + $this->_addChannel($private); + } + $this->_rebuildFileMap(); + } + $running = false; + } + } + + function _initializeDirs() + { + $ds = DIRECTORY_SEPARATOR; + // XXX Compatibility code should be removed in the future + // rename all registry files if any to lowercase + if (!OS_WINDOWS && $handle = @opendir($this->statedir)) { + $dest = $this->statedir . $ds; + while (false !== ($file = readdir($handle))) { + if (preg_match('/^.*[A-Z].*\.reg$/', $file)) { + rename($dest . $file, $dest . strtolower($file)); + } + } + closedir($handle); + } + $this->_initializeChannelDirs(); + if (!file_exists($this->filemap)) { + $this->_rebuildFileMap(); + } + $this->_initializeDepDB(); + } + + function _initializeDepDB() + { + if (!isset($this->_dependencyDB)) { + static $initializing = false; + if (!$initializing) { + $initializing = true; + if (!$this->_config) { // never used? + if (OS_WINDOWS) { + $file = 'pear.ini'; + } else { + $file = '.pearrc'; + } + $this->_config = &new PEAR_Config($this->statedir . DIRECTORY_SEPARATOR . + $file); + $this->_config->setRegistry($this); + $this->_config->set('php_dir', $this->install_dir); + } + $this->_dependencyDB = &PEAR_DependencyDB::singleton($this->_config); + if (PEAR::isError($this->_dependencyDB)) { + // attempt to recover by removing the dep db + @unlink($this->_config->get('php_dir', null, 'pear.php.net') . + DIRECTORY_SEPARATOR . '.depdb'); + $this->_dependencyDB = &PEAR_DependencyDB::singleton($this->_config); + if (PEAR::isError($this->_dependencyDB)) { + echo $this->_dependencyDB->getMessage(); + die('Unrecoverable error'); + } + } + $initializing = false; + } + } + } + // }}} + // {{{ destructor + + /** + * PEAR_Registry destructor. Makes sure no locks are forgotten. + * + * @access private + */ + function _PEAR_Registry() + { + parent::_PEAR(); + if (is_resource($this->lock_fp)) { + $this->_unlock(); + } + } + + // }}} + + // {{{ _assertStateDir() + + /** + * Make sure the directory where we keep registry files exists. + * + * @return bool TRUE if directory exists, FALSE if it could not be + * created + * + * @access private + */ + function _assertStateDir($channel = false) + { + if ($channel && $this->_getChannelFromAlias($channel) != 'pear.php.net') { + return $this->_assertChannelStateDir($channel); + } + static $init = false; + if (!@is_dir($this->statedir)) { + if (!$this->hasWriteAccess()) { + return false; + } + require_once 'System.php'; + if (!System::mkdir(array('-p', $this->statedir))) { + return $this->raiseError("could not create directory '{$this->statedir}'"); + } + $init = true; + } + $ds = DIRECTORY_SEPARATOR; + if (!@is_dir($this->channelsdir) || + !file_exists($this->channelsdir . $ds . 'pear.php.net.reg') || + !file_exists($this->channelsdir . $ds . 'pecl.php.net.reg') || + !file_exists($this->channelsdir . $ds . '__uri.reg')) { + $init = true; + } + if ($init) { + static $running = false; + if (!$running) { + $running = true; + $this->_initializeDirs(); + $running = false; + $init = false; + } + } else { + $this->_initializeDepDB(); + } + return true; + } + + // }}} + // {{{ _assertChannelStateDir() + + /** + * Make sure the directory where we keep registry files exists for a non-standard channel. + * + * @param string channel name + * @return bool TRUE if directory exists, FALSE if it could not be + * created + * + * @access private + */ + function _assertChannelStateDir($channel) + { + $ds = DIRECTORY_SEPARATOR; + if (!$channel || $this->_getChannelFromAlias($channel) == 'pear.php.net') { + if (!file_exists($this->channelsdir . $ds . 'pear.php.net.reg')) { + $this->_initializeChannelDirs(); + } + return $this->_assertStateDir($channel); + } + $channelDir = $this->_channelDirectoryName($channel); + if (!is_dir($this->channelsdir) || + !file_exists($this->channelsdir . $ds . 'pear.php.net.reg')) { + $this->_initializeChannelDirs(); + } + if (!@is_dir($channelDir)) { + if (!$this->hasWriteAccess()) { + return false; + } + require_once 'System.php'; + if (!System::mkdir(array('-p', $channelDir))) { + return $this->raiseError("could not create directory '" . $channelDir . + "'"); + } + } + return true; + } + + // }}} + // {{{ _assertChannelDir() + + /** + * Make sure the directory where we keep registry files for channels exists + * + * @return bool TRUE if directory exists, FALSE if it could not be + * created + * + * @access private + */ + function _assertChannelDir() + { + if (!@is_dir($this->channelsdir)) { + if (!$this->hasWriteAccess()) { + return false; + } + require_once 'System.php'; + if (!System::mkdir(array('-p', $this->channelsdir))) { + return $this->raiseError("could not create directory '{$this->channelsdir}'"); + } + } + if (!@is_dir($this->channelsdir . DIRECTORY_SEPARATOR . '.alias')) { + if (!$this->hasWriteAccess()) { + return false; + } + require_once 'System.php'; + if (!System::mkdir(array('-p', $this->channelsdir . DIRECTORY_SEPARATOR . '.alias'))) { + return $this->raiseError("could not create directory '{$this->channelsdir}/.alias'"); + } + } + return true; + } + + // }}} + // {{{ _packageFileName() + + /** + * Get the name of the file where data for a given package is stored. + * + * @param string channel name, or false if this is a PEAR package + * @param string package name + * + * @return string registry file name + * + * @access public + */ + function _packageFileName($package, $channel = false) + { + if ($channel && $this->_getChannelFromAlias($channel) != 'pear.php.net') { + return $this->_channelDirectoryName($channel) . DIRECTORY_SEPARATOR . + strtolower($package) . '.reg'; + } + return $this->statedir . DIRECTORY_SEPARATOR . strtolower($package) . '.reg'; + } + + // }}} + // {{{ _channelFileName() + + /** + * Get the name of the file where data for a given channel is stored. + * @param string channel name + * @return string registry file name + */ + function _channelFileName($channel, $noaliases = false) + { + if (!$noaliases) { + if (@file_exists($this->_getChannelAliasFileName($channel))) { + $channel = implode('', file($this->_getChannelAliasFileName($channel))); + } + } + return $this->channelsdir . DIRECTORY_SEPARATOR . str_replace('/', '_', + strtolower($channel)) . '.reg'; + } + + // }}} + // {{{ getChannelAliasFileName() + + /** + * @param string + * @return string + */ + function _getChannelAliasFileName($alias) + { + return $this->channelsdir . DIRECTORY_SEPARATOR . '.alias' . + DIRECTORY_SEPARATOR . str_replace('/', '_', strtolower($alias)) . '.txt'; + } + + // }}} + // {{{ _getChannelFromAlias() + + /** + * Get the name of a channel from its alias + */ + function _getChannelFromAlias($channel) + { + if (!$this->_channelExists($channel)) { + if ($channel == 'pear.php.net') { + return 'pear.php.net'; + } + if ($channel == 'pecl.php.net') { + return 'pecl.php.net'; + } + if ($channel == '__uri') { + return '__uri'; + } + return false; + } + $channel = strtolower($channel); + if (file_exists($this->_getChannelAliasFileName($channel))) { + // translate an alias to an actual channel + return implode('', file($this->_getChannelAliasFileName($channel))); + } else { + return $channel; + } + } + // }}} + // {{{ _getChannelFromAlias() + + /** + * Get the alias of a channel from its alias or its name + */ + function _getAlias($channel) + { + if (!$this->_channelExists($channel)) { + if ($channel == 'pear.php.net') { + return 'pear'; + } + if ($channel == 'pecl.php.net') { + return 'pecl'; + } + return false; + } + $channel = $this->_getChannel($channel); + if (PEAR::isError($channel)) { + return $channel; + } + return $channel->getAlias(); + } + // }}} + // {{{ _channelDirectoryName() + + /** + * Get the name of the file where data for a given package is stored. + * + * @param string channel name, or false if this is a PEAR package + * @param string package name + * + * @return string registry file name + * + * @access public + */ + function _channelDirectoryName($channel) + { + if (!$channel || $this->_getChannelFromAlias($channel) == 'pear.php.net') { + return $this->statedir; + } else { + $ch = $this->_getChannelFromAlias($channel); + if (!$ch) { + $ch = $channel; + } + return $this->statedir . DIRECTORY_SEPARATOR . strtolower('.channel.' . + str_replace('/', '_', $ch)); + } + } + + // }}} + // {{{ _openPackageFile() + + function _openPackageFile($package, $mode, $channel = false) + { + if (!$this->_assertStateDir($channel)) { + return null; + } + if (!in_array($mode, array('r', 'rb')) && !$this->hasWriteAccess()) { + return null; + } + $file = $this->_packageFileName($package, $channel); + $fp = @fopen($file, $mode); + if (!$fp) { + return null; + } + return $fp; + } + + // }}} + // {{{ _closePackageFile() + + function _closePackageFile($fp) + { + fclose($fp); + } + + // }}} + // {{{ _openPackageFile() + + function _openChannelFile($channel, $mode) + { + if (!$this->_assertChannelDir()) { + return null; + } + if (!in_array($mode, array('r', 'rb')) && !$this->hasWriteAccess()) { + return null; + } + $file = $this->_channelFileName($channel); + $fp = @fopen($file, $mode); + if (!$fp) { + return null; + } + return $fp; + } + + // }}} + // {{{ _closePackageFile() + + function _closeChannelFile($fp) + { + fclose($fp); + } + + // }}} + // {{{ _rebuildFileMap() + + function _rebuildFileMap() + { + if (!class_exists('PEAR_Installer_Role')) { + require_once 'PEAR/Installer/Role.php'; + } + $channels = $this->_listAllPackages(); + $files = array(); + foreach ($channels as $channel => $packages) { + foreach ($packages as $package) { + $version = $this->_packageInfo($package, 'version', $channel); + $filelist = $this->_packageInfo($package, 'filelist', $channel); + if (!is_array($filelist)) { + continue; + } + foreach ($filelist as $name => $attrs) { + if (isset($attrs['attribs'])) { + $attrs = $attrs['attribs']; + } + // it is possible for conflicting packages in different channels to + // conflict with data files/doc files + if ($name == 'dirtree') { + continue; + } + if (isset($attrs['role']) && !in_array($attrs['role'], + PEAR_Installer_Role::getInstallableRoles())) { + // these are not installed + continue; + } + if (isset($attrs['role']) && !in_array($attrs['role'], + PEAR_Installer_Role::getBaseinstallRoles())) { + $attrs['baseinstalldir'] = $package; + } + if (isset($attrs['baseinstalldir'])) { + $file = $attrs['baseinstalldir'].DIRECTORY_SEPARATOR.$name; + } else { + $file = $name; + } + $file = preg_replace(',^/+,', '', $file); + if ($channel != 'pear.php.net') { + $files[$attrs['role']][$file] = array(strtolower($channel), + strtolower($package)); + } else { + $files[$attrs['role']][$file] = strtolower($package); + } + } + } + } + $this->_assertStateDir(); + if (!$this->hasWriteAccess()) { + return false; + } + $fp = @fopen($this->filemap, 'wb'); + if (!$fp) { + return false; + } + $this->filemap_cache = $files; + fwrite($fp, serialize($files)); + fclose($fp); + return true; + } + + // }}} + // {{{ _readFileMap() + + function _readFileMap() + { + $fp = @fopen($this->filemap, 'r'); + if (!$fp) { + return $this->raiseError('PEAR_Registry: could not open filemap "' . $this->filemap . '"', PEAR_REGISTRY_ERROR_FILE, null, null, $php_errormsg); + } + clearstatcache(); + $rt = get_magic_quotes_runtime(); + set_magic_quotes_runtime(0); + $fsize = filesize($this->filemap); + if (function_exists('file_get_contents')) { + fclose($fp); + $data = file_get_contents($this->filemap); + } else { + $data = fread($fp, $fsize); + fclose($fp); + } + set_magic_quotes_runtime($rt); + $tmp = unserialize($data); + if (!$tmp && $fsize > 7) { + return $this->raiseError('PEAR_Registry: invalid filemap data', PEAR_REGISTRY_ERROR_FORMAT, null, null, $data); + } + $this->filemap_cache = $tmp; + return true; + } + + // }}} + // {{{ _lock() + + /** + * Lock the registry. + * + * @param integer lock mode, one of LOCK_EX, LOCK_SH or LOCK_UN. + * See flock manual for more information. + * + * @return bool TRUE on success, FALSE if locking failed, or a + * PEAR error if some other error occurs (such as the + * lock file not being writable). + * + * @access private + */ + function _lock($mode = LOCK_EX) + { + if (!eregi('Windows 9', php_uname())) { + if ($mode != LOCK_UN && is_resource($this->lock_fp)) { + // XXX does not check type of lock (LOCK_SH/LOCK_EX) + return true; + } + if (!$this->_assertStateDir()) { + if ($mode == LOCK_EX) { + return $this->raiseError('Registry directory is not writeable by the current user'); + } else { + return true; + } + } + $open_mode = 'w'; + // XXX People reported problems with LOCK_SH and 'w' + if ($mode === LOCK_SH || $mode === LOCK_UN) { + if (@!is_file($this->lockfile)) { + touch($this->lockfile); + } + $open_mode = 'r'; + } + + if (!is_resource($this->lock_fp)) { + $this->lock_fp = @fopen($this->lockfile, $open_mode); + } + + if (!is_resource($this->lock_fp)) { + return $this->raiseError("could not create lock file" . + (isset($php_errormsg) ? ": " . $php_errormsg : "")); + } + if (!(int)flock($this->lock_fp, $mode)) { + switch ($mode) { + case LOCK_SH: $str = 'shared'; break; + case LOCK_EX: $str = 'exclusive'; break; + case LOCK_UN: $str = 'unlock'; break; + default: $str = 'unknown'; break; + } + return $this->raiseError("could not acquire $str lock ($this->lockfile)", + PEAR_REGISTRY_ERROR_LOCK); + } + } + return true; + } + + // }}} + // {{{ _unlock() + + function _unlock() + { + $ret = $this->_lock(LOCK_UN); + if (is_resource($this->lock_fp)) { + fclose($this->lock_fp); + } + $this->lock_fp = null; + return $ret; + } + + // }}} + // {{{ _packageExists() + + function _packageExists($package, $channel = false) + { + return file_exists($this->_packageFileName($package, $channel)); + } + + // }}} + // {{{ _channelExists() + + /** + * Determine whether a channel exists in the registry + * @param string Channel name + * @param bool if true, then aliases will be ignored + * @return boolean + */ + function _channelExists($channel, $noaliases = false) + { + $a = file_exists($this->_channelFileName($channel, $noaliases)); + if (!$a && $channel == 'pear.php.net') { + return true; + } + if (!$a && $channel == 'pecl.php.net') { + return true; + } + return $a; + } + + // }}} + // {{{ _addChannel() + + /** + * @param PEAR_ChannelFile Channel object + * @param donotuse + * @param string Last-Modified HTTP tag from remote request + * @return boolean|PEAR_Error True on creation, false if it already exists + */ + function _addChannel($channel, $update = false, $lastmodified = false) + { + if (!is_a($channel, 'PEAR_ChannelFile')) { + return false; + } + if (!$channel->validate()) { + return false; + } + if (file_exists($this->_channelFileName($channel->getName()))) { + if (!$update) { + return false; + } + $checker = $this->_getChannel($channel->getName()); + if (PEAR::isError($checker)) { + return $checker; + } + if ($channel->getAlias() != $checker->getAlias()) { + @unlink($this->_getChannelAliasFileName($checker->getAlias())); + } + } else { + if ($update && !in_array($channel->getName(), array('pear.php.net', 'pecl.php.net'))) { + return false; + } + } + $ret = $this->_assertChannelDir(); + if (PEAR::isError($ret)) { + return $ret; + } + $ret = $this->_assertChannelStateDir($channel->getName()); + if (PEAR::isError($ret)) { + return $ret; + } + if ($channel->getAlias() != $channel->getName()) { + if (file_exists($this->_getChannelAliasFileName($channel->getAlias())) && + $this->_getChannelFromAlias($channel->getAlias()) != $channel->getName()) { + $channel->setAlias($channel->getName()); + } + if (!$this->hasWriteAccess()) { + return false; + } + $fp = @fopen($this->_getChannelAliasFileName($channel->getAlias()), 'w'); + if (!$fp) { + return false; + } + fwrite($fp, $channel->getName()); + fclose($fp); + } + if (!$this->hasWriteAccess()) { + return false; + } + $fp = @fopen($this->_channelFileName($channel->getName()), 'wb'); + if (!$fp) { + return false; + } + $info = $channel->toArray(); + if ($lastmodified) { + $info['_lastmodified'] = $lastmodified; + } else { + $info['_lastmodified'] = date('r'); + } + fwrite($fp, serialize($info)); + fclose($fp); + return true; + } + + // }}} + // {{{ _deleteChannel() + + /** + * Deletion fails if there are any packages installed from the channel + * @param string|PEAR_ChannelFile channel name + * @return boolean|PEAR_Error True on deletion, false if it doesn't exist + */ + function _deleteChannel($channel) + { + if (!is_string($channel)) { + if (is_a($channel, 'PEAR_ChannelFile')) { + if (!$channel->validate()) { + return false; + } + $channel = $channel->getName(); + } else { + return false; + } + } + if ($this->_getChannelFromAlias($channel) == '__uri') { + return false; + } + if ($this->_getChannelFromAlias($channel) == 'pecl.php.net') { + return false; + } + if (!$this->_channelExists($channel)) { + return false; + } + if (!$channel || $this->_getChannelFromAlias($channel) == 'pear.php.net') { + return false; + } + $channel = $this->_getChannelFromAlias($channel); + if ($channel == 'pear.php.net') { + return false; + } + $test = $this->_listChannelPackages($channel); + if (count($test)) { + return false; + } + $test = @rmdir($this->_channelDirectoryName($channel)); + if (!$test) { + return false; + } + $file = $this->_getChannelAliasFileName($this->_getAlias($channel)); + if (@file_exists($file)) { + $test = @unlink($file); + if (!$test) { + return false; + } + } + $file = $this->_channelFileName($channel); + $ret = @unlink($file); + return $ret; + } + + // }}} + // {{{ _isChannelAlias() + + /** + * Determine whether a channel exists in the registry + * @param string Channel Alias + * @return boolean + */ + function _isChannelAlias($alias) + { + return file_exists($this->_getChannelAliasFileName($alias)); + } + + // }}} + // {{{ _packageInfo() + + /** + * @param string|null + * @param string|null + * @param string|null + * @return array|null + * @access private + */ + function _packageInfo($package = null, $key = null, $channel = 'pear.php.net') + { + if ($package === null) { + if ($channel === null) { + $channels = $this->_listChannels(); + $ret = array(); + foreach ($channels as $channel) { + $channel = strtolower($channel); + $ret[$channel] = array(); + $packages = $this->_listPackages($channel); + foreach ($packages as $package) { + $ret[$channel][] = $this->_packageInfo($package, null, $channel); + } + } + return $ret; + } + $ps = $this->_listPackages($channel); + if (!count($ps)) { + return array(); + } + return array_map(array(&$this, '_packageInfo'), + $ps, array_fill(0, count($ps), null), + array_fill(0, count($ps), $channel)); + } + $fp = $this->_openPackageFile($package, 'r', $channel); + if ($fp === null) { + return null; + } + $rt = get_magic_quotes_runtime(); + set_magic_quotes_runtime(0); + clearstatcache(); + if (function_exists('file_get_contents')) { + $this->_closePackageFile($fp); + $data = file_get_contents($this->_packageFileName($package, $channel)); + } else { + $data = fread($fp, filesize($this->_packageFileName($package, $channel))); + $this->_closePackageFile($fp); + } + set_magic_quotes_runtime($rt); + $data = unserialize($data); + if ($key === null) { + return $data; + } + // compatibility for package.xml version 2.0 + if (isset($data['old'][$key])) { + return $data['old'][$key]; + } + if (isset($data[$key])) { + return $data[$key]; + } + return null; + } + + // }}} + // {{{ _channelInfo() + + /** + * @param string Channel name + * @param bool whether to strictly retrieve info of channels, not just aliases + * @return array|null + */ + function _channelInfo($channel, $noaliases = false) + { + if (!$this->_channelExists($channel, $noaliases)) { + return null; + } + $fp = $this->_openChannelFile($channel, 'r'); + if ($fp === null) { + return null; + } + $rt = get_magic_quotes_runtime(); + set_magic_quotes_runtime(0); + clearstatcache(); + if (function_exists('file_get_contents')) { + $this->_closeChannelFile($fp); + $data = file_get_contents($this->_channelFileName($channel)); + } else { + $data = fread($fp, filesize($this->_channelFileName($channel))); + $this->_closeChannelFile($fp); + } + set_magic_quotes_runtime($rt); + $data = unserialize($data); + return $data; + } + + // }}} + // {{{ _listChannels() + + function _listChannels() + { + $channellist = array(); + $dp = @opendir($this->channelsdir); + if (!$dp || !@is_dir($this->channelsdir)) { + return array('pear.php.net', 'pecl.php.net', '__uri'); + } + while ($ent = readdir($dp)) { + if ($ent{0} == '.' || substr($ent, -4) != '.reg') { + continue; + } + if ($ent == '__uri.reg') { + $channellist[] = '__uri'; + continue; + } + $channellist[] = str_replace('_', '/', substr($ent, 0, -4)); + } + closedir($dp); + if (!in_array('pear.php.net', $channellist)) { + $channellist[] = 'pear.php.net'; + } + if (!in_array('pecl.php.net', $channellist)) { + $channellist[] = 'pecl.php.net'; + } + if (!in_array('__uri', $channellist)) { + $channellist[] = '__uri'; + } + return $channellist; + } + + // }}} + // {{{ _listPackages() + + function _listPackages($channel = false) + { + if ($channel && $this->_getChannelFromAlias($channel) != 'pear.php.net') { + return $this->_listChannelPackages($channel); + } + $pkglist = array(); + $dp = @opendir($this->statedir); + if (!$dp) { + return $pkglist; + } + while ($ent = readdir($dp)) { + if ($ent{0} == '.' || substr($ent, -4) != '.reg') { + continue; + } + $pkglist[] = substr($ent, 0, -4); + } + closedir($dp); + return $pkglist; + } + + // }}} + // {{{ _listChannelPackages() + + function _listChannelPackages($channel) + { + $pkglist = array(); + $dp = @opendir($this->_channelDirectoryName($channel)); + if (!$dp) { + return $pkglist; + } + while ($ent = readdir($dp)) { + if ($ent{0} == '.' || substr($ent, -4) != '.reg') { + continue; + } + $pkglist[] = substr($ent, 0, -4); + } + closedir($dp); + return $pkglist; + } + + // }}} + + function _listAllPackages() + { + $ret = array(); + foreach ($this->_listChannels() as $channel) { + $ret[$channel] = $this->_listPackages($channel); + } + return $ret; + } + + /** + * Add an installed package to the registry + * @param string package name + * @param array package info (parsed by PEAR_Common::infoFrom*() methods) + * @return bool success of saving + * @access private + */ + function _addPackage($package, $info) + { + if ($this->_packageExists($package)) { + return false; + } + $fp = $this->_openPackageFile($package, 'wb'); + if ($fp === null) { + return false; + } + $info['_lastmodified'] = time(); + fwrite($fp, serialize($info)); + $this->_closePackageFile($fp); + if (isset($info['filelist'])) { + $this->_rebuildFileMap(); + } + return true; + } + + /** + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @return bool + * @access private + */ + function _addPackage2($info) + { + if (!$info->validate()) { + if (class_exists('PEAR_Common')) { + $ui = PEAR_Frontend::singleton(); + if ($ui) { + foreach ($info->getValidationWarnings() as $err) { + $ui->log(2, $err['message']); + } + } + } + return false; + } + $channel = $info->getChannel(); + $package = $info->getPackage(); + $save = $info; + if ($this->_packageExists($package, $channel)) { + return false; + } + if (!$this->_channelExists($channel, true)) { + return false; + } + $info = $info->toArray(true); + if (!$info) { + return false; + } + $fp = $this->_openPackageFile($package, 'wb', $channel); + if ($fp === null) { + return false; + } + $info['_lastmodified'] = time(); + fwrite($fp, serialize($info)); + $this->_closePackageFile($fp); + $this->_rebuildFileMap(); + return true; + } + + /** + * @param string Package name + * @param array parsed package.xml 1.0 + * @param bool this parameter is only here for BC. Don't use it. + * @access private + */ + function _updatePackage($package, $info, $merge = true) + { + $oldinfo = $this->_packageInfo($package); + if (empty($oldinfo)) { + return false; + } + $fp = $this->_openPackageFile($package, 'w'); + if ($fp === null) { + return false; + } + if (is_object($info)) { + $info = $info->toArray(); + } + $info['_lastmodified'] = time(); + $newinfo = $info; + if ($merge) { + $info = array_merge($oldinfo, $info); + } else { + $diff = $info; + } + fwrite($fp, serialize($info)); + $this->_closePackageFile($fp); + if (isset($newinfo['filelist'])) { + $this->_rebuildFileMap(); + } + return true; + } + + /** + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @return bool + * @access private + */ + function _updatePackage2($info) + { + if (!$this->_packageExists($info->getPackage(), $info->getChannel())) { + return false; + } + $fp = $this->_openPackageFile($info->getPackage(), 'w', $info->getChannel()); + if ($fp === null) { + return false; + } + $save = $info; + $info = $save->getArray(true); + $info['_lastmodified'] = time(); + fwrite($fp, serialize($info)); + $this->_closePackageFile($fp); + $this->_rebuildFileMap(); + return true; + } + + /** + * @param string Package name + * @param string Channel name + * @return PEAR_PackageFile_v1|PEAR_PackageFile_v2|null + * @access private + */ + function &_getPackage($package, $channel = 'pear.php.net') + { + $info = $this->_packageInfo($package, null, $channel); + if ($info === null) { + return $info; + } + $a = $this->_config; + if (!$a) { + $this->_config = &new PEAR_Config; + $this->_config->set('php_dir', $this->statedir); + } + if (!class_exists('PEAR_PackageFile')) { + require_once 'PEAR/PackageFile.php'; + } + $pkg = &new PEAR_PackageFile($this->_config); + $pf = &$pkg->fromArray($info); + return $pf; + } + + /** + * @param string channel name + * @param bool whether to strictly retrieve channel names + * @return PEAR_ChannelFile|PEAR_Error + * @access private + */ + function &_getChannel($channel, $noaliases = false) + { + $ch = false; + if ($this->_channelExists($channel, $noaliases)) { + $chinfo = $this->_channelInfo($channel, $noaliases); + if ($chinfo) { + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $ch = &PEAR_ChannelFile::fromArrayWithErrors($chinfo); + } + } + if ($ch) { + if ($ch->validate()) { + return $ch; + } + foreach ($ch->getErrors(true) as $err) { + $message = $err['message'] . "\n"; + } + $ch = PEAR::raiseError($message); + return $ch; + } + if ($this->_getChannelFromAlias($channel) == 'pear.php.net') { + // the registry is not properly set up, so use defaults + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $pear_channel = new PEAR_ChannelFile; + $pear_channel->setName('pear.php.net'); + $pear_channel->setAlias('pear'); + $pear_channel->setSummary('PHP Extension and Application Repository'); + $pear_channel->setDefaultPEARProtocols(); + $pear_channel->setBaseURL('REST1.0', 'http://pear.php.net/rest/'); + $pear_channel->setBaseURL('REST1.1', 'http://pear.php.net/rest/'); + return $pear_channel; + } + if ($this->_getChannelFromAlias($channel) == 'pecl.php.net') { + // the registry is not properly set up, so use defaults + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $pear_channel = new PEAR_ChannelFile; + $pear_channel->setName('pecl.php.net'); + $pear_channel->setAlias('pecl'); + $pear_channel->setSummary('PHP Extension Community Library'); + $pear_channel->setDefaultPEARProtocols(); + $pear_channel->setBaseURL('REST1.0', 'http://pecl.php.net/rest/'); + $pear_channel->setBaseURL('REST1.1', 'http://pecl.php.net/rest/'); + $pear_channel->setValidationPackage('PEAR_Validator_PECL', '1.0'); + return $pear_channel; + } + if ($this->_getChannelFromAlias($channel) == '__uri') { + // the registry is not properly set up, so use defaults + if (!class_exists('PEAR_ChannelFile')) { + require_once 'PEAR/ChannelFile.php'; + } + $private = new PEAR_ChannelFile; + $private->setName('__uri'); + $private->addFunction('xmlrpc', '1.0', '****'); + $private->setSummary('Pseudo-channel for static packages'); + return $private; + } + return $ch; + } + + // {{{ packageExists() + + /** + * @param string Package name + * @param string Channel name + * @return bool + */ + function packageExists($package, $channel = 'pear.php.net') + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_packageExists($package, $channel); + $this->_unlock(); + return $ret; + } + + // }}} + + // {{{ channelExists() + + /** + * @param string channel name + * @param bool if true, then aliases will be ignored + * @return bool + */ + function channelExists($channel, $noaliases = false) + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_channelExists($channel, $noaliases); + $this->_unlock(); + return $ret; + } + + // }}} + + // {{{ isAlias() + + /** + * Determines whether the parameter is an alias of a channel + * @param string + * @return bool + */ + function isAlias($alias) + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_isChannelAlias($alias); + $this->_unlock(); + return $ret; + } + + // }}} + // {{{ packageInfo() + + /** + * @param string|null + * @param string|null + * @param string + * @return array|null + */ + function packageInfo($package = null, $key = null, $channel = 'pear.php.net') + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_packageInfo($package, $key, $channel); + $this->_unlock(); + return $ret; + } + + // }}} + // {{{ channelInfo() + + /** + * Retrieve a raw array of channel data. + * + * Do not use this, instead use {@link getChannel()} for normal + * operations. Array structure is undefined in this method + * @param string channel name + * @param bool whether to strictly retrieve information only on non-aliases + * @return array|null|PEAR_Error + */ + function channelInfo($channel = null, $noaliases = false) + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_channelInfo($channel, $noaliases); + $this->_unlock(); + return $ret; + } + + // }}} + + /** + * @param string + */ + function channelName($channel) + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_getChannelFromAlias($channel); + $this->_unlock(); + return $ret; + } + + /** + * @param string + */ + function channelAlias($channel) + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_getAlias($channel); + $this->_unlock(); + return $ret; + } + // {{{ listPackages() + + function listPackages($channel = false) + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_listPackages($channel); + $this->_unlock(); + return $ret; + } + + // }}} + // {{{ listAllPackages() + + function listAllPackages() + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_listAllPackages(); + $this->_unlock(); + return $ret; + } + + // }}} + // {{{ listChannel() + + function listChannels() + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = $this->_listChannels(); + $this->_unlock(); + return $ret; + } + + // }}} + // {{{ addPackage() + + /** + * Add an installed package to the registry + * @param string|PEAR_PackageFile_v1|PEAR_PackageFile_v2 package name or object + * that will be passed to {@link addPackage2()} + * @param array package info (parsed by PEAR_Common::infoFrom*() methods) + * @return bool success of saving + */ + function addPackage($package, $info) + { + if (is_object($info)) { + return $this->addPackage2($info); + } + if (PEAR::isError($e = $this->_lock(LOCK_EX))) { + return $e; + } + $ret = $this->_addPackage($package, $info); + $this->_unlock(); + if ($ret) { + if (!class_exists('PEAR_PackageFile_v1')) { + require_once 'PEAR/PackageFile/v1.php'; + } + $pf = new PEAR_PackageFile_v1; + $pf->setConfig($this->_config); + $pf->fromArray($info); + $this->_dependencyDB->uninstallPackage($pf); + $this->_dependencyDB->installPackage($pf); + } + return $ret; + } + + // }}} + // {{{ addPackage2() + + function addPackage2($info) + { + if (!is_object($info)) { + return $this->addPackage($info['package'], $info); + } + if (PEAR::isError($e = $this->_lock(LOCK_EX))) { + return $e; + } + $ret = $this->_addPackage2($info); + $this->_unlock(); + if ($ret) { + $this->_dependencyDB->uninstallPackage($info); + $this->_dependencyDB->installPackage($info); + } + return $ret; + } + + // }}} + // {{{ updateChannel() + + /** + * For future expandibility purposes, separate this + * @param PEAR_ChannelFile + */ + function updateChannel($channel, $lastmodified = null) + { + if ($channel->getName() == '__uri') { + return false; + } + return $this->addChannel($channel, $lastmodified, true); + } + + // }}} + // {{{ deleteChannel() + + /** + * Deletion fails if there are any packages installed from the channel + * @param string|PEAR_ChannelFile channel name + * @return boolean|PEAR_Error True on deletion, false if it doesn't exist + */ + function deleteChannel($channel) + { + if (PEAR::isError($e = $this->_lock(LOCK_EX))) { + return $e; + } + $ret = $this->_deleteChannel($channel); + $this->_unlock(); + if ($ret && is_a($this->_config, 'PEAR_Config')) { + $this->_config->setChannels($this->listChannels()); + } + return $ret; + } + + // }}} + // {{{ addChannel() + + /** + * @param PEAR_ChannelFile Channel object + * @param string Last-Modified header from HTTP for caching + * @return boolean|PEAR_Error True on creation, false if it already exists + */ + function addChannel($channel, $lastmodified = false, $update = false) + { + if (!is_a($channel, 'PEAR_ChannelFile')) { + return false; + } + if (!$channel->validate()) { + return false; + } + if (PEAR::isError($e = $this->_lock(LOCK_EX))) { + return $e; + } + $ret = $this->_addChannel($channel, $update, $lastmodified); + $this->_unlock(); + if (!$update && $ret && is_a($this->_config, 'PEAR_Config')) { + $this->_config->setChannels($this->listChannels()); + } + return $ret; + } + + // }}} + // {{{ deletePackage() + + function deletePackage($package, $channel = 'pear.php.net') + { + if (PEAR::isError($e = $this->_lock(LOCK_EX))) { + return $e; + } + $file = $this->_packageFileName($package, $channel); + $ret = @unlink($file); + $this->_rebuildFileMap(); + $this->_unlock(); + $p = array('channel' => $channel, 'package' => $package); + $this->_dependencyDB->uninstallPackage($p); + return $ret; + } + + // }}} + // {{{ updatePackage() + + function updatePackage($package, $info, $merge = true) + { + if (is_object($info)) { + return $this->updatePackage2($info, $merge); + } + if (PEAR::isError($e = $this->_lock(LOCK_EX))) { + return $e; + } + $ret = $this->_updatePackage($package, $info, $merge); + $this->_unlock(); + if ($ret) { + if (!class_exists('PEAR_PackageFile_v1')) { + require_once 'PEAR/PackageFile/v1.php'; + } + $pf = new PEAR_PackageFile_v1; + $pf->setConfig($this->_config); + $pf->fromArray($this->packageInfo($package)); + $this->_dependencyDB->uninstallPackage($pf); + $this->_dependencyDB->installPackage($pf); + } + return $ret; + } + + // }}} + // {{{ updatePackage2() + + function updatePackage2($info) + { + if (!is_object($info)) { + return $this->updatePackage($info['package'], $info, $merge); + } + if (!$info->validate(PEAR_VALIDATE_DOWNLOADING)) { + return false; + } + if (PEAR::isError($e = $this->_lock(LOCK_EX))) { + return $e; + } + $ret = $this->_updatePackage2($info); + $this->_unlock(); + if ($ret) { + $this->_dependencyDB->uninstallPackage($info); + $this->_dependencyDB->installPackage($info); + } + return $ret; + } + + // }}} + // {{{ getChannel() + /** + * @param string channel name + * @param bool whether to strictly return raw channels (no aliases) + * @return PEAR_ChannelFile|PEAR_Error + */ + function &getChannel($channel, $noaliases = false) + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $ret = &$this->_getChannel($channel, $noaliases); + if (!$ret) { + return PEAR::raiseError('Unknown channel: ' . $channel); + } + $this->_unlock(); + return $ret; + } + + // }}} + // {{{ getPackage() + /** + * @param string package name + * @param string channel name + * @return PEAR_PackageFile_v1|PEAR_PackageFile_v2|null + */ + function &getPackage($package, $channel = 'pear.php.net') + { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $pf = &$this->_getPackage($package, $channel); + $this->_unlock(); + return $pf; + } + + // }}} + + /** + * Get PEAR_PackageFile_v[1/2] objects representing the contents of + * a dependency group that are installed. + * + * This is used at uninstall-time + * @param array + * @return array|false + */ + function getInstalledGroup($group) + { + $ret = array(); + if (isset($group['package'])) { + if (!isset($group['package'][0])) { + $group['package'] = array($group['package']); + } + foreach ($group['package'] as $package) { + $depchannel = isset($package['channel']) ? $package['channel'] : '__uri'; + $p = &$this->getPackage($package['name'], $depchannel); + if ($p) { + $save = &$p; + $ret[] = &$save; + } + } + } + if (isset($group['subpackage'])) { + if (!isset($group['subpackage'][0])) { + $group['subpackage'] = array($group['subpackage']); + } + foreach ($group['subpackage'] as $package) { + $depchannel = isset($package['channel']) ? $package['channel'] : '__uri'; + $p = &$this->getPackage($package['name'], $depchannel); + if ($p) { + $save = &$p; + $ret[] = &$save; + } + } + } + if (!count($ret)) { + return false; + } + return $ret; + } + + // {{{ getChannelValidator() + /** + * @param string channel name + * @return PEAR_Validate|false + */ + function &getChannelValidator($channel) + { + $chan = $this->getChannel($channel); + if (PEAR::isError($chan)) { + return $chan; + } + $val = $chan->getValidationObject(); + return $val; + } + // }}} + // {{{ getChannels() + /** + * @param string channel name + * @return array an array of PEAR_ChannelFile objects representing every installed channel + */ + function &getChannels() + { + $ret = array(); + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + foreach ($this->_listChannels() as $channel) { + $e = &$this->_getChannel($channel); + if (!$e || PEAR::isError($e)) { + continue; + } + $ret[] = $e; + } + $this->_unlock(); + return $ret; + } + + // }}} + // {{{ checkFileMap() + + /** + * Test whether a file or set of files belongs to a package. + * + * If an array is passed in + * @param string|array file path, absolute or relative to the pear + * install dir + * @param string|array name of PEAR package or array('package' => name, 'channel' => + * channel) of a package that will be ignored + * @param string API version - 1.1 will exclude any files belonging to a package + * @param array private recursion variable + * @return array|false which package and channel the file belongs to, or an empty + * string if the file does not belong to an installed package, + * or belongs to the second parameter's package + */ + function checkFileMap($path, $package = false, $api = '1.0', $attrs = false) + { + if (is_array($path)) { + static $notempty; + if (empty($notempty)) { + if (!class_exists('PEAR_Installer_Role')) { + require_once 'PEAR/Installer/Role.php'; + } + $notempty = create_function('$a','return !empty($a);'); + } + $package = is_array($package) ? array(strtolower($package[0]), strtolower($package[1])) + : strtolower($package); + $pkgs = array(); + foreach ($path as $name => $attrs) { + if (is_array($attrs)) { + if (isset($attrs['install-as'])) { + $name = $attrs['install-as']; + } + if (!in_array($attrs['role'], PEAR_Installer_Role::getInstallableRoles())) { + // these are not installed + continue; + } + if (!in_array($attrs['role'], PEAR_Installer_Role::getBaseinstallRoles())) { + $attrs['baseinstalldir'] = is_array($package) ? $package[1] : $package; + } + if (isset($attrs['baseinstalldir'])) { + $name = $attrs['baseinstalldir'] . DIRECTORY_SEPARATOR . $name; + } + } + $pkgs[$name] = $this->checkFileMap($name, $package, $api, $attrs); + if (PEAR::isError($pkgs[$name])) { + return $pkgs[$name]; + } + } + return array_filter($pkgs, $notempty); + } + if (empty($this->filemap_cache)) { + if (PEAR::isError($e = $this->_lock(LOCK_SH))) { + return $e; + } + $err = $this->_readFileMap(); + $this->_unlock(); + if (PEAR::isError($err)) { + return $err; + } + } + if (!$attrs) { + $attrs = array('role' => 'php'); // any old call would be for PHP role only + } + if (isset($this->filemap_cache[$attrs['role']][$path])) { + if ($api >= '1.1' && $this->filemap_cache[$attrs['role']][$path] == $package) { + return false; + } + return $this->filemap_cache[$attrs['role']][$path]; + } + $l = strlen($this->install_dir); + if (substr($path, 0, $l) == $this->install_dir) { + $path = preg_replace('!^'.DIRECTORY_SEPARATOR.'+!', '', substr($path, $l)); + } + if (isset($this->filemap_cache[$attrs['role']][$path])) { + if ($api >= '1.1' && $this->filemap_cache[$attrs['role']][$path] == $package) { + return false; + } + return $this->filemap_cache[$attrs['role']][$path]; + } + return false; + } + + // }}} + // {{{ apiVersion() + /** + * Get the expected API version. Channels API is version 1.1, as it is backwards + * compatible with 1.0 + * @return string + */ + function apiVersion() + { + return '1.1'; + } + // }}} + + + /** + * Parse a package name, or validate a parsed package name array + * @param string|array pass in an array of format + * array( + * 'package' => 'pname', + * ['channel' => 'channame',] + * ['version' => 'version',] + * ['state' => 'state',] + * ['group' => 'groupname']) + * or a string of format + * [channel://][channame/]pname[-version|-state][/group=groupname] + * @return array|PEAR_Error + */ + function parsePackageName($param, $defaultchannel = 'pear.php.net') + { + $saveparam = $param; + if (is_array($param)) { + // convert to string for error messages + $saveparam = $this->parsedPackageNameToString($param); + // process the array + if (!isset($param['package'])) { + return PEAR::raiseError('parsePackageName(): array $param ' . + 'must contain a valid package name in index "param"', + 'package', null, null, $param); + } + if (!isset($param['uri'])) { + if (!isset($param['channel'])) { + $param['channel'] = $defaultchannel; + } + } else { + $param['channel'] = '__uri'; + } + } else { + $components = @parse_url($param); + if (isset($components['scheme'])) { + if ($components['scheme'] == 'http') { + // uri package + $param = array('uri' => $param, 'channel' => '__uri'); + } elseif($components['scheme'] != 'channel') { + return PEAR::raiseError('parsePackageName(): only channel:// uris may ' . + 'be downloaded, not "' . $param . '"', 'invalid', null, null, $param); + } + } + if (!isset($components['path'])) { + return PEAR::raiseError('parsePackageName(): array $param ' . + 'must contain a valid package name in "' . $param . '"', + 'package', null, null, $param); + } + if (isset($components['host'])) { + // remove the leading "/" + $components['path'] = substr($components['path'], 1); + } + if (!isset($components['scheme'])) { + if (strpos($components['path'], '/') !== false) { + if ($components['path']{0} == '/') { + return PEAR::raiseError('parsePackageName(): this is not ' . + 'a package name, it begins with "/" in "' . $param . '"', + 'invalid', null, null, $param); + } + $parts = explode('/', $components['path']); + $components['host'] = array_shift($parts); + if (count($parts) > 1) { + $components['path'] = array_pop($parts); + $components['host'] .= '/' . implode('/', $parts); + } else { + $components['path'] = implode('/', $parts); + } + } else { + $components['host'] = $defaultchannel; + } + } else { + if (strpos($components['path'], '/')) { + $parts = explode('/', $components['path']); + $components['path'] = array_pop($parts); + $components['host'] .= '/' . implode('/', $parts); + } + } + + if (is_array($param)) { + $param['package'] = $components['path']; + } else { + $param = array( + 'package' => $components['path'] + ); + if (isset($components['host'])) { + $param['channel'] = $components['host']; + } + } + if (isset($components['fragment'])) { + $param['group'] = $components['fragment']; + } + if (isset($components['user'])) { + $param['user'] = $components['user']; + } + if (isset($components['pass'])) { + $param['pass'] = $components['pass']; + } + if (isset($components['query'])) { + parse_str($components['query'], $param['opts']); + } + // check for extension + $pathinfo = pathinfo($param['package']); + if (isset($pathinfo['extension']) && + in_array(strtolower($pathinfo['extension']), array('tgz', 'tar'))) { + $param['extension'] = $pathinfo['extension']; + $param['package'] = substr($pathinfo['basename'], 0, + strlen($pathinfo['basename']) - 4); + } + // check for version + if (strpos($param['package'], '-')) { + $test = explode('-', $param['package']); + if (count($test) != 2) { + return PEAR::raiseError('parsePackageName(): only one version/state ' . + 'delimiter "-" is allowed in "' . $saveparam . '"', + 'version', null, null, $param); + } + list($param['package'], $param['version']) = $test; + } + } + // validation + $info = $this->channelExists($param['channel']); + if (PEAR::isError($info)) { + return $info; + } + if (!$info) { + return PEAR::raiseError('unknown channel "' . $param['channel'] . + '" in "' . $saveparam . '"', 'channel', null, null, $param); + } + $chan = $this->getChannel($param['channel']); + if (PEAR::isError($chan)) { + return $chan; + } + if (!$chan) { + return PEAR::raiseError("Exception: corrupt registry, could not " . + "retrieve channel " . $param['channel'] . " information", + 'registry', null, null, $param); + } + $param['channel'] = $chan->getName(); + $validate = $chan->getValidationObject(); + $vpackage = $chan->getValidationPackage(); + // validate package name + if (!$validate->validPackageName($param['package'], $vpackage['_content'])) { + return PEAR::raiseError('parsePackageName(): invalid package name "' . + $param['package'] . '" in "' . $saveparam . '"', + 'package', null, null, $param); + } + if (isset($param['group'])) { + if (!PEAR_Validate::validGroupName($param['group'])) { + return PEAR::raiseError('parsePackageName(): dependency group "' . $param['group'] . + '" is not a valid group name in "' . $saveparam . '"', 'group', null, null, + $param); + } + } + if (isset($param['state'])) { + if (!in_array(strtolower($param['state']), $validate->getValidStates())) { + return PEAR::raiseError('parsePackageName(): state "' . $param['state'] + . '" is not a valid state in "' . $saveparam . '"', + 'state', null, null, $param); + } + } + if (isset($param['version'])) { + if (isset($param['state'])) { + return PEAR::raiseError('parsePackageName(): cannot contain both ' . + 'a version and a stability (state) in "' . $saveparam . '"', + 'version/state', null, null, $param); + } + // check whether version is actually a state + if (in_array(strtolower($param['version']), $validate->getValidStates())) { + $param['state'] = strtolower($param['version']); + unset($param['version']); + } else { + if (!$validate->validVersion($param['version'])) { + return PEAR::raiseError('parsePackageName(): "' . $param['version'] . + '" is neither a valid version nor a valid state in "' . + $saveparam . '"', 'version/state', null, null, $param); + } + } + } + return $param; + } + + /** + * @param array + * @return string + */ + function parsedPackageNameToString($parsed, $brief = false) + { + if (is_string($parsed)) { + return $parsed; + } + if (is_object($parsed)) { + $p = $parsed; + $parsed = array( + 'package' => $p->getPackage(), + 'channel' => $p->getChannel(), + 'version' => $p->getVersion(), + ); + } + if (isset($parsed['uri'])) { + return $parsed['uri']; + } + if ($brief) { + if ($channel = $this->channelAlias($parsed['channel'])) { + return $channel . '/' . $parsed['package']; + } + } + $upass = ''; + if (isset($parsed['user'])) { + $upass = $parsed['user']; + if (isset($parsed['pass'])) { + $upass .= ':' . $parsed['pass']; + } + $upass = "$upass@"; + } + $ret = 'channel://' . $upass . $parsed['channel'] . '/' . $parsed['package']; + if (isset($parsed['version']) || isset($parsed['state'])) { + $ret .= '-' . @$parsed['version'] . @$parsed['state']; + } + if (isset($parsed['extension'])) { + $ret .= '.' . $parsed['extension']; + } + if (isset($parsed['opts'])) { + $ret .= '?'; + foreach ($parsed['opts'] as $name => $value) { + $parsed['opts'][$name] = "$name=$value"; + } + $ret .= implode('&', $parsed['opts']); + } + if (isset($parsed['group'])) { + $ret .= '#' . $parsed['group']; + } + return $ret; + } +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Remote.php b/campcaster/src/tools/pear/src/PEAR/Remote.php new file mode 100644 index 000000000..a9e216c9b --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Remote.php @@ -0,0 +1,519 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Remote.php,v 1.76 2006/03/02 18:14:13 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * needed for PEAR_Error + */ +require_once 'PEAR.php'; +require_once 'PEAR/Config.php'; + +/** + * This is a class for doing remote operations against the central + * PEAR database. + * + * @nodep XML_RPC_Value + * @nodep XML_RPC_Message + * @nodep XML_RPC_Client + * @category pear + * @package PEAR + * @author Stig Bakken + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 0.1 + */ +class PEAR_Remote extends PEAR +{ + // {{{ properties + + var $config = null; + var $cache = null; + /** + * @var PEAR_Registry + * @access private + */ + var $_registry; + + // }}} + + // {{{ PEAR_Remote(config_object) + + function PEAR_Remote(&$config) + { + $this->PEAR(); + $this->config = &$config; + $this->_registry = &$this->config->getRegistry(); + } + + // }}} + // {{{ setRegistry() + + function setRegistry(&$reg) + { + $this->_registry = &$reg; + } + // }}} + // {{{ getCache() + + + function getCache($args) + { + $id = md5(serialize($args)); + $cachedir = $this->config->get('cache_dir'); + $filename = $cachedir . DIRECTORY_SEPARATOR . 'xmlrpc_cache_' . $id; + if (!file_exists($filename)) { + return null; + } + + $fp = fopen($filename, 'rb'); + if (!$fp) { + return null; + } + if (function_exists('file_get_contents')) { + fclose($fp); + $content = file_get_contents($filename); + } else { + $content = fread($fp, filesize($filename)); + fclose($fp); + } + $result = array( + 'age' => time() - filemtime($filename), + 'lastChange' => filemtime($filename), + 'content' => unserialize($content), + ); + return $result; + } + + // }}} + + // {{{ saveCache() + + function saveCache($args, $data) + { + $id = md5(serialize($args)); + $cachedir = $this->config->get('cache_dir'); + if (!file_exists($cachedir)) { + System::mkdir(array('-p', $cachedir)); + } + $filename = $cachedir.'/xmlrpc_cache_'.$id; + + $fp = @fopen($filename, "wb"); + if ($fp) { + fwrite($fp, serialize($data)); + fclose($fp); + } + } + + // }}} + + // {{{ clearCache() + + function clearCache($method, $args) + { + array_unshift($args, $method); + array_unshift($args, $this->config->get('default_channel')); // cache by channel + $id = md5(serialize($args)); + $cachedir = $this->config->get('cache_dir'); + $filename = $cachedir.'/xmlrpc_cache_'.$id; + if (file_exists($filename)) { + @unlink($filename); + } + } + + // }}} + // {{{ call(method, [args...]) + + function call($method) + { + $_args = $args = func_get_args(); + + $server_channel = $this->config->get('default_channel'); + $channel = $this->_registry->getChannel($server_channel); + if (!PEAR::isError($channel)) { + $mirror = $this->config->get('preferred_mirror'); + if ($channel->getMirror($mirror)) { + if ($channel->supports('xmlrpc', $method, $mirror)) { + $server_channel = $server_host = $mirror; // use the preferred mirror + $server_port = $channel->getPort($mirror); + } elseif (!$channel->supports('xmlrpc', $method)) { + return $this->raiseError("Channel $server_channel does not " . + "support xml-rpc method $method"); + } + } + if (!isset($server_host)) { + if (!$channel->supports('xmlrpc', $method)) { + return $this->raiseError("Channel $server_channel does not support " . + "xml-rpc method $method"); + } else { + $server_host = $server_channel; + $server_port = $channel->getPort(); + } + } + } else { + return $this->raiseError("Unknown channel '$server_channel'"); + } + + array_unshift($_args, $server_channel); // cache by channel + $this->cache = $this->getCache($_args); + $cachettl = $this->config->get('cache_ttl'); + // If cache is newer than $cachettl seconds, we use the cache! + if ($this->cache !== null && $this->cache['age'] < $cachettl) { + return $this->cache['content']; + } + if (extension_loaded("xmlrpc")) { + $result = call_user_func_array(array(&$this, 'call_epi'), $args); + if (!PEAR::isError($result)) { + $this->saveCache($_args, $result); + } + return $result; + } elseif (!@include_once 'XML/RPC.php') { + return $this->raiseError("For this remote PEAR operation you need to load the xmlrpc extension or install XML_RPC"); + } + + array_shift($args); + $username = $this->config->get('username'); + $password = $this->config->get('password'); + $eargs = array(); + foreach($args as $arg) { + $eargs[] = $this->_encode($arg); + } + $f = new XML_RPC_Message($method, $eargs); + if ($this->cache !== null) { + $maxAge = '?maxAge='.$this->cache['lastChange']; + } else { + $maxAge = ''; + } + $proxy_host = $proxy_port = $proxy_user = $proxy_pass = ''; + if ($proxy = parse_url($this->config->get('http_proxy'))) { + $proxy_host = @$proxy['host']; + if (isset($proxy['scheme']) && $proxy['scheme'] == 'https') { + $proxy_host = 'https://' . $proxy_host; + } + $proxy_port = @$proxy['port']; + $proxy_user = @urldecode(@$proxy['user']); + $proxy_pass = @urldecode(@$proxy['pass']); + } + $shost = $server_host; + if ($channel->getSSL()) { + $shost = "https://$shost"; + } + $c = new XML_RPC_Client('/' . $channel->getPath('xmlrpc') + . $maxAge, $shost, $server_port, $proxy_host, $proxy_port, + $proxy_user, $proxy_pass); + if ($username && $password) { + $c->setCredentials($username, $password); + } + if ($this->config->get('verbose') >= 3) { + $c->setDebug(1); + } + $r = $c->send($f); + if (!$r) { + return $this->raiseError("XML_RPC send failed"); + } + $v = $r->value(); + if ($e = $r->faultCode()) { + if ($e == $GLOBALS['XML_RPC_err']['http_error'] && strstr($r->faultString(), '304 Not Modified') !== false) { + return $this->cache['content']; + } + return $this->raiseError($r->faultString(), $e); + } + + $result = XML_RPC_decode($v); + $this->saveCache($_args, $result); + return $result; + } + + // }}} + + // {{{ call_epi(method, [args...]) + + function call_epi($method) + { + do { + if (extension_loaded("xmlrpc")) { + break; + } + if (OS_WINDOWS) { + $ext = 'dll'; + } elseif (PHP_OS == 'HP-UX') { + $ext = 'sl'; + } elseif (PHP_OS == 'AIX') { + $ext = 'a'; + } else { + $ext = 'so'; + } + $ext = OS_WINDOWS ? 'dll' : 'so'; + @dl("xmlrpc-epi.$ext"); + if (extension_loaded("xmlrpc")) { + break; + } + @dl("xmlrpc.$ext"); + if (extension_loaded("xmlrpc")) { + break; + } + return $this->raiseError("unable to load xmlrpc extension"); + } while (false); + $server_channel = $this->config->get('default_channel'); + $channel = $this->_registry->getChannel($server_channel); + if (!PEAR::isError($channel)) { + $mirror = $this->config->get('preferred_mirror'); + if ($channel->getMirror($mirror)) { + if ($channel->supports('xmlrpc', $method, $mirror)) { + $server_channel = $server_host = $mirror; // use the preferred mirror + $server_port = $channel->getPort($mirror); + } elseif (!$channel->supports('xmlrpc', $method)) { + return $this->raiseError("Channel $server_channel does not " . + "support xml-rpc method $method"); + } + } + if (!isset($server_host)) { + if (!$channel->supports('xmlrpc', $method)) { + return $this->raiseError("Channel $server_channel does not support " . + "xml-rpc method $method"); + } else { + $server_host = $server_channel; + $server_port = $channel->getPort(); + } + } + } else { + return $this->raiseError("Unknown channel '$server_channel'"); + } + $params = func_get_args(); + array_shift($params); + $method = str_replace("_", ".", $method); + $request = xmlrpc_encode_request($method, $params); + if ($http_proxy = $this->config->get('http_proxy')) { + $proxy = parse_url($http_proxy); + $proxy_host = $proxy_port = $proxy_user = $proxy_pass = ''; + $proxy_host = @$proxy['host']; + if (isset($proxy['scheme']) && $proxy['scheme'] == 'https') { + $proxy_host = 'ssl://' . $proxy_host; + } + $proxy_port = @$proxy['port']; + $proxy_user = @urldecode(@$proxy['user']); + $proxy_pass = @urldecode(@$proxy['pass']); + $fp = @fsockopen($proxy_host, $proxy_port); + $use_proxy = true; + if ($channel->getSSL()) { + $server_host = "https://$server_host"; + } + } else { + $use_proxy = false; + $ssl = $channel->getSSL(); + $fp = @fsockopen(($ssl ? 'ssl://' : '') . $server_host, $server_port); + if (!$fp) { + $server_host = "$ssl$server_host"; // for error-reporting + } + } + if (!$fp && $http_proxy) { + return $this->raiseError("PEAR_Remote::call: fsockopen(`$proxy_host', $proxy_port) failed"); + } elseif (!$fp) { + return $this->raiseError("PEAR_Remote::call: fsockopen(`$server_host', $server_port) failed"); + } + $len = strlen($request); + $req_headers = "Host: $server_host:$server_port\r\n" . + "Content-type: text/xml\r\n" . + "Content-length: $len\r\n"; + $username = $this->config->get('username'); + $password = $this->config->get('password'); + if ($username && $password) { + $req_headers .= "Cookie: PEAR_USER=$username; PEAR_PW=$password\r\n"; + $tmp = base64_encode("$username:$password"); + $req_headers .= "Authorization: Basic $tmp\r\n"; + } + if ($this->cache !== null) { + $maxAge = '?maxAge='.$this->cache['lastChange']; + } else { + $maxAge = ''; + } + + if ($use_proxy && $proxy_host != '' && $proxy_user != '') { + $req_headers .= 'Proxy-Authorization: Basic ' + .base64_encode($proxy_user.':'.$proxy_pass) + ."\r\n"; + } + + if ($this->config->get('verbose') > 3) { + print "XMLRPC REQUEST HEADERS:\n"; + var_dump($req_headers); + print "XMLRPC REQUEST BODY:\n"; + var_dump($request); + } + + if ($use_proxy && $proxy_host != '') { + $post_string = "POST http://".$server_host; + if ($proxy_port > '') { + $post_string .= ':'.$server_port; + } + } else { + $post_string = "POST "; + } + + $path = '/' . $channel->getPath('xmlrpc'); + fwrite($fp, ($post_string . $path . "$maxAge HTTP/1.0\r\n$req_headers\r\n$request")); + $response = ''; + $line1 = fgets($fp, 2048); + if (!preg_match('!^HTTP/[0-9\.]+ (\d+) (.*)!', $line1, $matches)) { + return $this->raiseError("PEAR_Remote: invalid HTTP response from XML-RPC server"); + } + switch ($matches[1]) { + case "200": // OK + break; + case "304": // Not Modified + return $this->cache['content']; + case "401": // Unauthorized + if ($username && $password) { + return $this->raiseError("PEAR_Remote ($server_host:$server_port) " . + ": authorization failed", 401); + } else { + return $this->raiseError("PEAR_Remote ($server_host:$server_port) " . + ": authorization required, please log in first", 401); + } + default: + return $this->raiseError("PEAR_Remote ($server_host:$server_port) : " . + "unexpected HTTP response", (int)$matches[1], null, null, + "$matches[1] $matches[2]"); + } + while (trim(fgets($fp, 2048)) != ''); // skip rest of headers + while ($chunk = fread($fp, 10240)) { + $response .= $chunk; + } + fclose($fp); + if ($this->config->get('verbose') > 3) { + print "XMLRPC RESPONSE:\n"; + var_dump($response); + } + $ret = xmlrpc_decode($response); + if (is_array($ret) && isset($ret['__PEAR_TYPE__'])) { + if ($ret['__PEAR_TYPE__'] == 'error') { + if (isset($ret['__PEAR_CLASS__'])) { + $class = $ret['__PEAR_CLASS__']; + } else { + $class = "PEAR_Error"; + } + if ($ret['code'] === '') $ret['code'] = null; + if ($ret['message'] === '') $ret['message'] = null; + if ($ret['userinfo'] === '') $ret['userinfo'] = null; + if (strtolower($class) == 'db_error') { + $ret = $this->raiseError(PEAR::errorMessage($ret['code']), + $ret['code'], null, null, + $ret['userinfo']); + } else { + $ret = $this->raiseError($ret['message'], $ret['code'], + null, null, $ret['userinfo']); + } + } + } elseif (is_array($ret) && sizeof($ret) == 1 && isset($ret[0]) + && is_array($ret[0]) && + !empty($ret[0]['faultString']) && + !empty($ret[0]['faultCode'])) { + extract($ret[0]); + $faultString = "XML-RPC Server Fault: " . + str_replace("\n", " ", $faultString); + return $this->raiseError($faultString, $faultCode); + } elseif (is_array($ret) && sizeof($ret) == 2 && !empty($ret['faultString']) && + !empty($ret['faultCode'])) { + extract($ret); + $faultString = "XML-RPC Server Fault: " . + str_replace("\n", " ", $faultString); + return $this->raiseError($faultString, $faultCode); + } + return $ret; + } + + // }}} + + // {{{ _encode + + // a slightly extended version of XML_RPC_encode + function _encode($php_val) + { + global $XML_RPC_Boolean, $XML_RPC_Int, $XML_RPC_Double; + global $XML_RPC_String, $XML_RPC_Array, $XML_RPC_Struct; + + $type = gettype($php_val); + $xmlrpcval = new XML_RPC_Value; + + switch($type) { + case "array": + reset($php_val); + $firstkey = key($php_val); + end($php_val); + $lastkey = key($php_val); + reset($php_val); + if ($firstkey === 0 && is_int($lastkey) && + ($lastkey + 1) == count($php_val)) { + $is_continuous = true; + reset($php_val); + $size = count($php_val); + for ($expect = 0; $expect < $size; $expect++, next($php_val)) { + if (key($php_val) !== $expect) { + $is_continuous = false; + break; + } + } + if ($is_continuous) { + reset($php_val); + $arr = array(); + while (list($k, $v) = each($php_val)) { + $arr[$k] = $this->_encode($v); + } + $xmlrpcval->addArray($arr); + break; + } + } + // fall though if not numerical and continuous + case "object": + $arr = array(); + while (list($k, $v) = each($php_val)) { + $arr[$k] = $this->_encode($v); + } + $xmlrpcval->addStruct($arr); + break; + case "integer": + $xmlrpcval->addScalar($php_val, $XML_RPC_Int); + break; + case "double": + $xmlrpcval->addScalar($php_val, $XML_RPC_Double); + break; + case "string": + case "NULL": + $xmlrpcval->addScalar($php_val, $XML_RPC_String); + break; + case "boolean": + $xmlrpcval->addScalar($php_val, $XML_RPC_Boolean); + break; + case "unknown type": + default: + return null; + } + return $xmlrpcval; + } + + // }}} + +} + +?> diff --git a/campcaster/src/tools/pear/src/PEAR/RunTest.php b/campcaster/src/tools/pear/src/PEAR/RunTest.php new file mode 100644 index 000000000..9f63f3a06 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/RunTest.php @@ -0,0 +1,409 @@ + + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: RunTest.php,v 1.20 2006/02/03 02:08:11 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.3.3 + */ + +/** + * for error handling + */ +require_once 'PEAR.php'; +require_once 'PEAR/Config.php'; + +define('DETAILED', 1); +putenv("PHP_PEAR_RUNTESTS=1"); + +/** + * Simplified version of PHP's test suite + * + * Try it with: + * + * $ php -r 'include "../PEAR/RunTest.php"; $t=new PEAR_RunTest; $o=$t->run("./pear_system.phpt");print_r($o);' + * + * + * @category pear + * @package PEAR + * @author Tomas V.V.Cox + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.3.3 + */ +class PEAR_RunTest +{ + var $_logger; + var $_options; + + /** + * An object that supports the PEAR_Common->log() signature, or null + * @param PEAR_Common|null + */ + function PEAR_RunTest($logger = null, $options = array()) + { + if (is_null($logger)) { + require_once 'PEAR/Common.php'; + $logger = new PEAR_Common; + } + $this->_logger = $logger; + $this->_options = $options; + } + + // + // Run an individual test case. + // + + function run($file, $ini_settings = '') + { + $cwd = getcwd(); + $conf = &PEAR_Config::singleton(); + $php = $conf->get('php_bin'); + if (isset($this->_options['phpunit'])) { + $cmd = "$php$ini_settings -f $file"; + if (isset($this->_logger)) { + $this->_logger->log(2, 'Running command "' . $cmd . '"'); + } + + $savedir = getcwd(); // in case the test moves us around + chdir(dirname($file)); + echo `$cmd`; + chdir($savedir); + return 'PASSED'; // we have no way of knowing this information so assume passing + } + //var_dump($php);exit; + global $log_format, $info_params, $ini_overwrites; + + $info_params = ''; + $log_format = 'LEOD'; + + // Load the sections of the test file. + $section_text = array( + 'TEST' => '(unnamed test)', + 'SKIPIF' => '', + 'GET' => '', + 'ARGS' => '', + 'CLEAN' => '', + ); + + $file = realpath($file); + if (!is_file($file) || !$fp = fopen($file, "r")) { + return PEAR::raiseError("Cannot open test file: $file"); + } + + $section = ''; + while (!feof($fp)) { + $line = fgets($fp); + + // Match the beginning of a section. + if (ereg('^--([A-Z]+)--',$line,$r)) { + $section = $r[1]; + $section_text[$section] = ''; + continue; + } elseif (empty($section)) { + fclose($fp); + return PEAR::raiseError("Invalid sections formats in test file: $file"); + } + + // Add to the section text. + $section_text[$section] .= $line; + } + fclose($fp); + + $shortname = str_replace($cwd . DIRECTORY_SEPARATOR, '', $file); + if (!isset($this->_options['simple'])) { + $tested = trim($section_text['TEST']) . "[$shortname]"; + } else { + $tested = trim($section_text['TEST']) . ' '; + } + + $tmp = realpath(dirname($file)); + $tmp_skipif = $tmp . uniqid('/phpt.'); + $tmp_file = ereg_replace('\.phpt$','.php',$file); + $tmp_post = $tmp . uniqid('/phpt.'); + + @unlink($tmp_skipif); + @unlink($tmp_file); + @unlink($tmp_post); + + // unlink old test results + @unlink(ereg_replace('\.phpt$','.diff',$file)); + @unlink(ereg_replace('\.phpt$','.log',$file)); + @unlink(ereg_replace('\.phpt$','.exp',$file)); + @unlink(ereg_replace('\.phpt$','.out',$file)); + + // Check if test should be skipped. + $info = ''; + $warn = false; + if (array_key_exists('SKIPIF', $section_text)) { + if (trim($section_text['SKIPIF'])) { + $this->save_text($tmp_skipif, $section_text['SKIPIF']); + //$extra = substr(PHP_OS, 0, 3) !== "WIN" ? + // "unset REQUEST_METHOD;": ""; + + //$output = `$extra $php $info_params -f $tmp_skipif`; + $output = `$php $info_params -f $tmp_skipif`; + unlink($tmp_skipif); + if (eregi("^skip", trim($output))) { + $skipreason = "SKIP $tested"; + $reason = (eregi("^skip[[:space:]]*(.+)\$", trim($output))) ? eregi_replace("^skip[[:space:]]*(.+)\$", "\\1", trim($output)) : FALSE; + if ($reason) { + $skipreason .= " (reason: $reason)"; + } + if (!isset($this->_options['quiet'])) { + $this->_logger->log(0, $skipreason); + } + if (isset($old_php)) { + $php = $old_php; + } + return 'SKIPPED'; + } + if (eregi("^info", trim($output))) { + $reason = (ereg("^info[[:space:]]*(.+)\$", trim($output))) ? ereg_replace("^info[[:space:]]*(.+)\$", "\\1", trim($output)) : FALSE; + if ($reason) { + $info = " (info: $reason)"; + } + } + if (eregi("^warn", trim($output))) { + $reason = (ereg("^warn[[:space:]]*(.+)\$", trim($output))) ? ereg_replace("^warn[[:space:]]*(.+)\$", "\\1", trim($output)) : FALSE; + if ($reason) { + $warn = true; /* only if there is a reason */ + $info = " (warn: $reason)"; + } + } + } + } + + // We've satisfied the preconditions - run the test! + $this->save_text($tmp_file,$section_text['FILE']); + + $args = $section_text['ARGS'] ? ' -- '.$section_text['ARGS'] : ''; + + $cmd = "$php$ini_settings -f $tmp_file$args 2>&1"; + if (isset($this->_logger)) { + $this->_logger->log(2, 'Running command "' . $cmd . '"'); + } + + $savedir = getcwd(); // in case the test moves us around + if (isset($section_text['RETURNS'])) { + ob_start(); + system($cmd, $return_value); + $out = ob_get_contents(); + ob_end_clean(); + @unlink($tmp_post); + $section_text['RETURNS'] = (int) trim($section_text['RETURNS']); + $returnfail = ($return_value != $section_text['RETURNS']); + } else { + $out = `$cmd`; + $returnfail = false; + } + chdir($savedir); + + if ($section_text['CLEAN']) { + // perform test cleanup + $this->save_text($clean = $tmp . uniqid('/phpt.'), $section_text['CLEAN']); + `$php $clean`; + @unlink($clean); + } + // Does the output match what is expected? + $output = trim($out); + $output = preg_replace('/\r\n/', "\n", $output); + + if (isset($section_text['EXPECTF']) || isset($section_text['EXPECTREGEX'])) { + if (isset($section_text['EXPECTF'])) { + $wanted = trim($section_text['EXPECTF']); + } else { + $wanted = trim($section_text['EXPECTREGEX']); + } + $wanted_re = preg_replace('/\r\n/',"\n",$wanted); + if (isset($section_text['EXPECTF'])) { + $wanted_re = preg_quote($wanted_re, '/'); + // Stick to basics + $wanted_re = str_replace("%s", ".+?", $wanted_re); //not greedy + $wanted_re = str_replace("%i", "[+\-]?[0-9]+", $wanted_re); + $wanted_re = str_replace("%d", "[0-9]+", $wanted_re); + $wanted_re = str_replace("%x", "[0-9a-fA-F]+", $wanted_re); + $wanted_re = str_replace("%f", "[+\-]?\.?[0-9]+\.?[0-9]*(E-?[0-9]+)?", $wanted_re); + $wanted_re = str_replace("%c", ".", $wanted_re); + // %f allows two points "-.0.0" but that is the best *simple* expression + } + /* DEBUG YOUR REGEX HERE + var_dump($wanted_re); + print(str_repeat('=', 80) . "\n"); + var_dump($output); + */ + if (!$returnfail && preg_match("/^$wanted_re\$/s", $output)) { + @unlink($tmp_file); + if (!isset($this->_options['quiet'])) { + $this->_logger->log(0, "PASS $tested$info"); + } + if (isset($old_php)) { + $php = $old_php; + } + return 'PASSED'; + } + + } else { + $wanted = trim($section_text['EXPECT']); + $wanted = preg_replace('/\r\n/',"\n",$wanted); + // compare and leave on success + $ok = (0 == strcmp($output,$wanted)); + if (!$returnfail && $ok) { + @unlink($tmp_file); + if (!isset($this->_options['quiet'])) { + $this->_logger->log(0, "PASS $tested$info"); + } + if (isset($old_php)) { + $php = $old_php; + } + return 'PASSED'; + } + } + + // Test failed so we need to report details. + if ($warn) { + $this->_logger->log(0, "WARN $tested$info"); + } else { + $this->_logger->log(0, "FAIL $tested$info"); + } + + if (isset($section_text['RETURNS'])) { + $GLOBALS['__PHP_FAILED_TESTS__'][] = array( + 'name' => $file, + 'test_name' => $tested, + 'output' => ereg_replace('\.phpt$','.log', $file), + 'diff' => ereg_replace('\.phpt$','.diff', $file), + 'info' => $info, + 'return' => $return_value + ); + } else { + $GLOBALS['__PHP_FAILED_TESTS__'][] = array( + 'name' => $file, + 'test_name' => $tested, + 'output' => ereg_replace('\.phpt$','.log', $file), + 'diff' => ereg_replace('\.phpt$','.diff', $file), + 'info' => $info, + ); + } + + // write .exp + if (strpos($log_format,'E') !== FALSE) { + $logname = ereg_replace('\.phpt$','.exp',$file); + if (!$log = fopen($logname,'w')) { + return PEAR::raiseError("Cannot create test log - $logname"); + } + fwrite($log,$wanted); + fclose($log); + } + + // write .out + if (strpos($log_format,'O') !== FALSE) { + $logname = ereg_replace('\.phpt$','.out',$file); + if (!$log = fopen($logname,'w')) { + return PEAR::raiseError("Cannot create test log - $logname"); + } + fwrite($log,$output); + fclose($log); + } + + // write .diff + if (strpos($log_format,'D') !== FALSE) { + $logname = ereg_replace('\.phpt$','.diff',$file); + if (!$log = fopen($logname,'w')) { + return PEAR::raiseError("Cannot create test log - $logname"); + } + fwrite($log, $this->generate_diff($wanted, $output, + isset($section_text['RETURNS']) ? array(trim($section_text['RETURNS']), + $return_value) : null)); + fclose($log); + } + + // write .log + if (strpos($log_format,'L') !== FALSE) { + $logname = ereg_replace('\.phpt$','.log',$file); + if (!$log = fopen($logname,'w')) { + return PEAR::raiseError("Cannot create test log - $logname"); + } + fwrite($log," +---- EXPECTED OUTPUT +$wanted +---- ACTUAL OUTPUT +$output +---- FAILED +"); + if ($returnfail) { + fwrite($log," +---- EXPECTED RETURN +$section_text[RETURNS] +---- ACTUAL RETURN +$return_value +"); + } + fclose($log); + //error_report($file,$logname,$tested); + } + + if (isset($old_php)) { + $php = $old_php; + } + + return $warn ? 'WARNED' : 'FAILED'; + } + + function generate_diff($wanted, $output, $return_value) + { + $w = explode("\n", $wanted); + $o = explode("\n", $output); + $w1 = array_diff_assoc($w,$o); + $o1 = array_diff_assoc($o,$w); + $w2 = array(); + $o2 = array(); + foreach($w1 as $idx => $val) $w2[sprintf("%03d<",$idx)] = sprintf("%03d- ", $idx+1).$val; + foreach($o1 as $idx => $val) $o2[sprintf("%03d>",$idx)] = sprintf("%03d+ ", $idx+1).$val; + $diff = array_merge($w2, $o2); + ksort($diff); + if ($return_value) { + $extra = "##EXPECTED: $return_value[0]\r\n##RETURNED: $return_value[1]"; + } else { + $extra = ''; + } + return implode("\r\n", $diff) . $extra; + } + + // + // Write the given text to a temporary file, and return the filename. + // + + function save_text($filename, $text) + { + if (!$fp = fopen($filename, 'w')) { + return PEAR::raiseError("Cannot open file '" . $filename . "' (save_text)"); + } + fwrite($fp,$text); + fclose($fp); + if (1 < DETAILED) echo " +FILE $filename {{{ +$text +}}} +"; + } + +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Common.php b/campcaster/src/tools/pear/src/PEAR/Task/Common.php new file mode 100644 index 000000000..136d63b86 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Common.php @@ -0,0 +1,208 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Common.php,v 1.15 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/**#@+ + * Error codes for task validation routines + */ +define('PEAR_TASK_ERROR_NOATTRIBS', 1); +define('PEAR_TASK_ERROR_MISSING_ATTRIB', 2); +define('PEAR_TASK_ERROR_WRONG_ATTRIB_VALUE', 3); +define('PEAR_TASK_ERROR_INVALID', 4); +/**#@-*/ +define('PEAR_TASK_PACKAGE', 1); +define('PEAR_TASK_INSTALL', 2); +define('PEAR_TASK_PACKAGEANDINSTALL', 3); +/** + * A task is an operation that manipulates the contents of a file. + * + * Simple tasks operate on 1 file. Multiple tasks are executed after all files have been + * processed and installed, and are designed to operate on all files containing the task. + * The Post-install script task simply takes advantage of the fact that it will be run + * after installation, replace is a simple task. + * + * Combining tasks is possible, but ordering is significant. + * + * + * + * + * + * + * This will first replace any instance of @data-dir@ in the test.php file + * with the path to the current data directory. Then, it will include the + * test.php file and run the script it contains to configure the package post-installation. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + * @abstract + */ +class PEAR_Task_Common +{ + /** + * Valid types for this version are 'simple' and 'multiple' + * + * - simple tasks operate on the contents of a file and write out changes to disk + * - multiple tasks operate on the contents of many files and write out the + * changes directly to disk + * + * Child task classes must override this property. + * @access protected + */ + var $type = 'simple'; + /** + * Determines which install phase this task is executed under + */ + var $phase = PEAR_TASK_INSTALL; + /** + * @access protected + */ + var $config; + /** + * @access protected + */ + var $registry; + /** + * @access protected + */ + var $logger; + /** + * @access protected + */ + var $installphase; + /** + * @param PEAR_Config + * @param PEAR_Common + */ + function PEAR_Task_Common(&$config, &$logger, $phase) + { + $this->config = &$config; + $this->registry = &$config->getRegistry(); + $this->logger = &$logger; + $this->installphase = $phase; + if ($this->type == 'multiple') { + $GLOBALS['_PEAR_TASK_POSTINSTANCES'][get_class($this)][] = &$this; + } + } + + /** + * Validate the basic contents of a task tag. + * @param PEAR_PackageFile_v2 + * @param array + * @param PEAR_Config + * @param array the entire parsed tag + * @return true|array On error, return an array in format: + * array(PEAR_TASK_ERROR_???[, param1][, param2][, ...]) + * + * For PEAR_TASK_ERROR_MISSING_ATTRIB, pass the attribute name in + * For PEAR_TASK_ERROR_WRONG_ATTRIB_VALUE, pass the attribute name and an array + * of legal values in + * @static + * @abstract + */ + function validXml($pkg, $xml, &$config, $fileXml) + { + } + + /** + * Initialize a task instance with the parameters + * @param array raw, parsed xml + * @param array attributes from the tag containing this task + * @param string|null last installed version of this package + * @abstract + */ + function init($xml, $fileAttributes, $lastVersion) + { + } + + /** + * Begin a task processing session. All multiple tasks will be processed after each file + * has been successfully installed, all simple tasks should perform their task here and + * return any errors using the custom throwError() method to allow forward compatibility + * + * This method MUST NOT write out any changes to disk + * @param PEAR_PackageFile_v2 + * @param string file contents + * @param string the eventual final file location (informational only) + * @return string|false|PEAR_Error false to skip this file, PEAR_Error to fail + * (use $this->throwError), otherwise return the new contents + * @abstract + */ + function startSession($pkg, $contents, $dest) + { + } + + /** + * This method is used to process each of the tasks for a particular multiple class + * type. Simple tasks need not implement this method. + * @param array an array of tasks + * @access protected + * @static + * @abstract + */ + function run($tasks) + { + } + + /** + * @static + * @final + */ + function hasPostinstallTasks() + { + return isset($GLOBALS['_PEAR_TASK_POSTINSTANCES']); + } + + /** + * @static + * @final + */ + function runPostinstallTasks() + { + foreach ($GLOBALS['_PEAR_TASK_POSTINSTANCES'] as $class => $tasks) { + $err = call_user_func(array($class, 'run'), + $GLOBALS['_PEAR_TASK_POSTINSTANCES'][$class]); + if ($err) { + return PEAR_Task_Common::throwError($err); + } + } + unset($GLOBALS['_PEAR_TASK_POSTINSTANCES']); + } + + /** + * Determines whether a role is a script + * @return bool + */ + function isScript() + { + return $this->type == 'script'; + } + + function throwError($msg, $code = -1) + { + include_once 'PEAR.php'; + return PEAR::raiseError($msg, $code); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Postinstallscript.php b/campcaster/src/tools/pear/src/PEAR/Task/Postinstallscript.php new file mode 100644 index 000000000..598e6bdcb --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Postinstallscript.php @@ -0,0 +1,329 @@ + + * + * PHP versions 4 and 5 + * + * LICENSE: This source file is subject to version 3.0 of the PHP license + * that is available through the world-wide-web at the following URI: + * http://www.php.net/license/3_0.txt. If you did not receive a copy of + * the PHP License and are unable to obtain it through the web, please + * send a note to license@php.net so we can mail you a copy immediately. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Postinstallscript.php,v 1.18 2006/02/08 01:21:47 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * Base class + */ +require_once 'PEAR/Task/Common.php'; +/** + * Implements the postinstallscript file task. + * + * Note that post-install scripts are handled separately from installation, by the + * "pear run-scripts" command + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Task_Postinstallscript extends PEAR_Task_Common +{ + var $type = 'script'; + var $_class; + var $_params; + var $_obj; + /** + * + * @var PEAR_PackageFile_v2 + */ + var $_pkg; + var $_contents; + var $phase = PEAR_TASK_INSTALL; + + /** + * Validate the raw xml at parsing-time. + * + * This also attempts to validate the script to make sure it meets the criteria + * for a post-install script + * @param PEAR_PackageFile_v2 + * @param array The XML contents of the tag + * @param PEAR_Config + * @param array the entire parsed tag + * @static + */ + function validateXml($pkg, $xml, &$config, $fileXml) + { + if ($fileXml['role'] != 'php') { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" must be role="php"'); + } + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $file = $pkg->getFileContents($fileXml['name']); + if (PEAR::isError($file)) { + PEAR::popErrorHandling(); + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" is not valid: ' . + $file->getMessage()); + } elseif ($file === null) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" could not be retrieved for processing!'); + } else { + $analysis = $pkg->analyzeSourceCode($file, true); + if (!$analysis) { + PEAR::popErrorHandling(); + $warnings = ''; + foreach ($pkg->getValidationWarnings() as $warn) { + $warnings .= $warn['message'] . "\n"; + } + return array(PEAR_TASK_ERROR_INVALID, 'Analysis of post-install script "' . + $fileXml['name'] . '" failed: ' . $warnings); + } + if (count($analysis['declared_classes']) != 1) { + PEAR::popErrorHandling(); + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" must declare exactly 1 class'); + } + $class = $analysis['declared_classes'][0]; + if ($class != str_replace(array('/', '.php'), array('_', ''), + $fileXml['name']) . '_postinstall') { + PEAR::popErrorHandling(); + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" class "' . $class . '" must be named "' . + str_replace(array('/', '.php'), array('_', ''), + $fileXml['name']) . '_postinstall"'); + } + if (!isset($analysis['declared_methods'][$class])) { + PEAR::popErrorHandling(); + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" must declare methods init() and run()'); + } + $methods = array('init' => 0, 'run' => 1); + foreach ($analysis['declared_methods'][$class] as $method) { + if (isset($methods[$method])) { + unset($methods[$method]); + } + } + if (count($methods)) { + PEAR::popErrorHandling(); + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" must declare methods init() and run()'); + } + } + PEAR::popErrorHandling(); + $definedparams = array(); + $tasksNamespace = $pkg->getTasksNs() . ':'; + if (!isset($xml[$tasksNamespace . 'paramgroup']) && isset($xml['paramgroup'])) { + // in order to support the older betas, which did not expect internal tags + // to also use the namespace + $tasksNamespace = ''; + } + if (isset($xml[$tasksNamespace . 'paramgroup'])) { + $params = $xml[$tasksNamespace . 'paramgroup']; + if (!is_array($params) || !isset($params[0])) { + $params = array($params); + } + foreach ($params as $param) { + if (!isset($param[$tasksNamespace . 'id'])) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" must have ' . + 'an ' . $tasksNamespace . 'id> tag'); + } + if (isset($param[$tasksNamespace . 'name'])) { + if (!in_array($param[$tasksNamespace . 'name'], $definedparams)) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" ' . $tasksNamespace . + 'paramgroup> id "' . $param[$tasksNamespace . 'id'] . + '" parameter "' . $param[$tasksNamespace . 'name'] . + '" has not been previously defined'); + } + if (!isset($param[$tasksNamespace . 'conditiontype'])) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" ' . $tasksNamespace . + 'paramgroup> id "' . $param[$tasksNamespace . 'id'] . + '" must have a ' . $tasksNamespace . + 'conditiontype> tag containing either "=", ' . + '"!=", or "preg_match"'); + } + if (!in_array($param[$tasksNamespace . 'conditiontype'], + array('=', '!=', 'preg_match'))) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" ' . $tasksNamespace . + 'paramgroup> id "' . $param[$tasksNamespace . 'id'] . + '" must have a ' . $tasksNamespace . + 'conditiontype> tag containing either "=", ' . + '"!=", or "preg_match"'); + } + if (!isset($param[$tasksNamespace . 'value'])) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" ' . $tasksNamespace . + 'paramgroup> id "' . $param[$tasksNamespace . 'id'] . + '" must have a ' . $tasksNamespace . + 'value> tag containing expected parameter value'); + } + } + if (isset($param[$tasksNamespace . 'instructions'])) { + if (!is_string($param[$tasksNamespace . 'instructions'])) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" ' . $tasksNamespace . + 'paramgroup> id "' . $param[$tasksNamespace . 'id'] . + '" ' . $tasksNamespace . 'instructions> must be simple text'); + } + } + if (!isset($param[$tasksNamespace . 'param'])) { + continue; // is no longer required + } + $subparams = $param[$tasksNamespace . 'param']; + if (!is_array($subparams) || !isset($subparams[0])) { + $subparams = array($subparams); + } + foreach ($subparams as $subparam) { + if (!isset($subparam[$tasksNamespace . 'name'])) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" parameter for ' . + $tasksNamespace . 'paramgroup> id "' . + $param[$tasksNamespace . 'id'] . '" must have ' . + 'a ' . $tasksNamespace . 'name> tag'); + } + if (!preg_match('/[a-zA-Z0-9]+/', + $subparam[$tasksNamespace . 'name'])) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" parameter "' . + $subparam[$tasksNamespace . 'name'] . + '" for ' . $tasksNamespace . 'paramgroup> id "' . + $param[$tasksNamespace . 'id'] . + '" is not a valid name. Must contain only alphanumeric characters'); + } + if (!isset($subparam[$tasksNamespace . 'prompt'])) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" parameter "' . + $subparam[$tasksNamespace . 'name'] . + '" for ' . $tasksNamespace . 'paramgroup> id "' . + $param[$tasksNamespace . 'id'] . + '" must have a ' . $tasksNamespace . 'prompt> tag'); + } + if (!isset($subparam[$tasksNamespace . 'type'])) { + return array(PEAR_TASK_ERROR_INVALID, 'Post-install script "' . + $fileXml['name'] . '" parameter "' . + $subparam[$tasksNamespace . 'name'] . + '" for ' . $tasksNamespace . 'paramgroup> id "' . + $param[$tasksNamespace . 'id'] . + '" must have a ' . $tasksNamespace . 'type> tag'); + } + $definedparams[] = $param[$tasksNamespace . 'id'] . '::' . + $subparam[$tasksNamespace . 'name']; + } + } + } + return true; + } + + /** + * Initialize a task instance with the parameters + * @param array raw, parsed xml + * @param array attributes from the tag containing this task + * @param string|null last installed version of this package, if any (useful for upgrades) + */ + function init($xml, $fileattribs, $lastversion) + { + $this->_class = str_replace('/', '_', $fileattribs['name']); + $this->_filename = $fileattribs['name']; + $this->_class = str_replace ('.php', '', $this->_class) . '_postinstall'; + $this->_params = $xml; + $this->_lastversion = $lastversion; + } + + /** + * Strip the tasks: namespace from internal params + * + * @access private + */ + function _stripNamespace($params = null) + { + if ($params === null) { + $params = array(); + if (!is_array($this->_params)) { + return; + } + foreach ($this->_params as $i => $param) { + if (is_array($param)) { + $param = $this->_stripNamespace($param); + } + $params[str_replace($this->_pkg->getTasksNs() . ':', '', $i)] = $param; + } + $this->_params = $params; + } else { + $newparams = array(); + foreach ($params as $i => $param) { + if (is_array($param)) { + $param = $this->_stripNamespace($param); + } + $newparams[str_replace($this->_pkg->getTasksNs() . ':', '', $i)] = $param; + } + return $newparams; + } + } + + /** + * Unlike other tasks, the installed file name is passed in instead of the file contents, + * because this task is handled post-installation + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @param string file name + * @return bool|PEAR_Error false to skip this file, PEAR_Error to fail + * (use $this->throwError) + */ + function startSession($pkg, $contents) + { + if ($this->installphase != PEAR_TASK_INSTALL) { + return false; + } + // remove the tasks: namespace if present + $this->_pkg = $pkg; + $this->_stripNamespace(); + $this->logger->log(0, 'Including external post-installation script "' . + $contents . '" - any errors are in this script'); + include_once $contents; + if (class_exists($this->_class)) { + $this->logger->log(0, 'Inclusion succeeded'); + } else { + return $this->throwError('init of post-install script class "' . $this->_class + . '" failed'); + } + $this->_obj = new $this->_class; + $this->logger->log(1, 'running post-install script "' . $this->_class . '->init()"'); + PEAR::pushErrorHandling(PEAR_ERROR_RETURN); + $res = $this->_obj->init($this->config, $pkg, $this->_lastversion); + PEAR::popErrorHandling(); + if ($res) { + $this->logger->log(0, 'init succeeded'); + } else { + return $this->throwError('init of post-install script "' . $this->_class . + '->init()" failed'); + } + $this->_contents = $contents; + return true; + } + + /** + * No longer used + * @see PEAR_PackageFile_v2::runPostinstallScripts() + * @param array an array of tasks + * @param string install or upgrade + * @access protected + * @static + */ + function run() + { + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Postinstallscript/rw.php b/campcaster/src/tools/pear/src/PEAR/Task/Postinstallscript/rw.php new file mode 100644 index 000000000..02b5aa665 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Postinstallscript/rw.php @@ -0,0 +1,176 @@ + - read/write version + * + * PHP versions 4 and 5 + * + * LICENSE: This source file is subject to version 3.0 of the PHP license + * that is available through the world-wide-web at the following URI: + * http://www.php.net/license/3_0.txt. If you did not receive a copy of + * the PHP License and are unable to obtain it through the web, please + * send a note to license@php.net so we can mail you a copy immediately. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: rw.php,v 1.11 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a10 + */ +/** + * Base class + */ +require_once 'PEAR/Task/Postinstallscript.php'; +/** + * Abstracts the postinstallscript file task xml. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a10 + */ +class PEAR_Task_Postinstallscript_rw extends PEAR_Task_Postinstallscript +{ + /** + * parent package file object + * + * @var PEAR_PackageFile_v2_rw + */ + var $_pkg; + /** + * Enter description here... + * + * @param PEAR_PackageFile_v2_rw $pkg + * @param PEAR_Config $config + * @param PEAR_Frontend $logger + * @param array $fileXml + * @return PEAR_Task_Postinstallscript_rw + */ + function PEAR_Task_Postinstallscript_rw(&$pkg, &$config, &$logger, $fileXml) + { + parent::PEAR_Task_Common($config, $logger, PEAR_TASK_PACKAGE); + $this->_contents = $fileXml; + $this->_pkg = &$pkg; + $this->_params = array(); + } + + function validate() + { + return $this->validateXml($this->_pkg, $this->_params, $this->config, $this->_contents); + } + + function getName() + { + return 'postinstallscript'; + } + + /** + * add a simple to the post-install script + * + * Order is significant, so call this method in the same + * sequence the users should see the paramgroups. The $params + * parameter should either be the result of a call to {@link getParam()} + * or an array of calls to getParam(). + * + * Use {@link addConditionTypeGroup()} to add a containing + * a tag + * @param string $id id as seen by the script + * @param array|false $params array of getParam() calls, or false for no params + * @param string|false $instructions + */ + function addParamGroup($id, $params = false, $instructions = false) + { + if ($params && isset($params[0]) && !isset($params[1])) { + $params = $params[0]; + } + $stuff = + array( + $this->_pkg->getTasksNs() . ':id' => $id, + ); + if ($instructions) { + $stuff[$this->_pkg->getTasksNs() . ':instructions'] = $instructions; + } + if ($params) { + $stuff[$this->_pkg->getTasksNs() . ':param'] = $params; + } + $this->_params[$this->_pkg->getTasksNs() . ':paramgroup'][] = $stuff; + } + + /** + * add a complex to the post-install script with conditions + * + * This inserts a with + * + * Order is significant, so call this method in the same + * sequence the users should see the paramgroups. The $params + * parameter should either be the result of a call to {@link getParam()} + * or an array of calls to getParam(). + * + * Use {@link addParamGroup()} to add a simple + * + * @param string $id id as seen by the script + * @param string $oldgroup id of the section referenced by + * + * @param string $param name of the from the older section referenced + * by + * @param string $value value to match of the parameter + * @param string $conditiontype one of '=', '!=', 'preg_match' + * @param array|false $params array of getParam() calls, or false for no params + * @param string|false $instructions + */ + function addConditionTypeGroup($id, $oldgroup, $param, $value, $conditiontype = '=', + $params = false, $instructions = false) + { + if ($params && isset($params[0]) && !isset($params[1])) { + $params = $params[0]; + } + $stuff = + array( + $this->_pkg->getTasksNs() . ':id' => $id, + ); + if ($instructions) { + $stuff[$this->_pkg->getTasksNs() . ':instructions'] = $instructions; + } + $stuff[$this->_pkg->getTasksNs() . ':name'] = $oldgroup . '::' . $param; + $stuff[$this->_pkg->getTasksNs() . ':conditiontype'] = $conditiontype; + $stuff[$this->_pkg->getTasksNs() . ':value'] = $value; + if ($params) { + $stuff[$this->_pkg->getTasksNs() . ':param'] = $params; + } + $this->_params[$this->_pkg->getTasksNs() . ':paramgroup'][] = $stuff; + } + + function getXml() + { + return $this->_params; + } + + /** + * Use to set up a param tag for use in creating a paramgroup + * @static + */ + function getParam($name, $prompt, $type = 'string', $default = null) + { + if ($default !== null) { + return + array( + $this->_pkg->getTasksNs() . ':name' => $name, + $this->_pkg->getTasksNs() . ':prompt' => $prompt, + $this->_pkg->getTasksNs() . ':type' => $type, + $this->_pkg->getTasksNs() . ':default' => $default + ); + } + return + array( + $this->_pkg->getTasksNs() . ':name' => $name, + $this->_pkg->getTasksNs() . ':prompt' => $prompt, + $this->_pkg->getTasksNs() . ':type' => $type, + ); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Replace.php b/campcaster/src/tools/pear/src/PEAR/Task/Replace.php new file mode 100644 index 000000000..84b23c667 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Replace.php @@ -0,0 +1,182 @@ + + * + * PHP versions 4 and 5 + * + * LICENSE: This source file is subject to version 3.0 of the PHP license + * that is available through the world-wide-web at the following URI: + * http://www.php.net/license/3_0.txt. If you did not receive a copy of + * the PHP License and are unable to obtain it through the web, please + * send a note to license@php.net so we can mail you a copy immediately. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Replace.php,v 1.15 2006/03/02 18:14:13 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * Base class + */ +require_once 'PEAR/Task/Common.php'; +/** + * Implements the replace file task. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Task_Replace extends PEAR_Task_Common +{ + var $type = 'simple'; + var $phase = PEAR_TASK_PACKAGEANDINSTALL; + var $_replacements; + + /** + * Validate the raw xml at parsing-time. + * @param PEAR_PackageFile_v2 + * @param array raw, parsed xml + * @param PEAR_Config + * @static + */ + function validateXml($pkg, $xml, &$config, $fileXml) + { + if (!isset($xml['attribs'])) { + return array(PEAR_TASK_ERROR_NOATTRIBS); + } + if (!isset($xml['attribs']['type'])) { + return array(PEAR_TASK_ERROR_MISSING_ATTRIB, 'type'); + } + if (!isset($xml['attribs']['to'])) { + return array(PEAR_TASK_ERROR_MISSING_ATTRIB, 'to'); + } + if (!isset($xml['attribs']['from'])) { + return array(PEAR_TASK_ERROR_MISSING_ATTRIB, 'from'); + } + if ($xml['attribs']['type'] == 'pear-config') { + if (!in_array($xml['attribs']['to'], $config->getKeys())) { + return array(PEAR_TASK_ERROR_WRONG_ATTRIB_VALUE, 'to', $xml['attribs']['to'], + $config->getKeys()); + } + } elseif ($xml['attribs']['type'] == 'php-const') { + if (defined($xml['attribs']['to'])) { + return true; + } else { + return array(PEAR_TASK_ERROR_WRONG_ATTRIB_VALUE, 'to', $xml['attribs']['to'], + array('valid PHP constant')); + } + } elseif ($xml['attribs']['type'] == 'package-info') { + if (in_array($xml['attribs']['to'], + array('name', 'summary', 'channel', 'notes', 'extends', 'description', + 'release_notes', 'license', 'release-license', 'license-uri', + 'version', 'api-version', 'state', 'api-state', 'release_date', + 'date', 'time'))) { + return true; + } else { + return array(PEAR_TASK_ERROR_WRONG_ATTRIB_VALUE, 'to', $xml['attribs']['to'], + array('name', 'summary', 'channel', 'notes', 'extends', 'description', + 'release_notes', 'license', 'release-license', 'license-uri', + 'version', 'api-version', 'state', 'api-state', 'release_date', + 'date', 'time')); + } + } else { + return array(PEAR_TASK_ERROR_WRONG_ATTRIB_VALUE, 'type', $xml['attribs']['type'], + array('pear-config', 'package-info', 'php-const')); + } + return true; + } + + /** + * Initialize a task instance with the parameters + * @param array raw, parsed xml + * @param unused + */ + function init($xml, $attribs) + { + $this->_replacements = isset($xml['attribs']) ? array($xml) : $xml; + } + + /** + * Do a package.xml 1.0 replacement, with additional package-info fields available + * + * See validateXml() source for the complete list of allowed fields + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @param string file contents + * @param string the eventual final file location (informational only) + * @return string|false|PEAR_Error false to skip this file, PEAR_Error to fail + * (use $this->throwError), otherwise return the new contents + */ + function startSession($pkg, $contents, $dest) + { + $subst_from = $subst_to = array(); + foreach ($this->_replacements as $a) { + $a = $a['attribs']; + $to = ''; + if ($a['type'] == 'pear-config') { + if ($this->installphase == PEAR_TASK_PACKAGE) { + return false; + } + if ($a['to'] == 'master_server') { + $chan = $this->registry->getChannel($pkg->getChannel()); + if (!PEAR::isError($chan)) { + $to = $chan->getServer(); + } else { + $this->logger->log(0, "$dest: invalid pear-config replacement: $a[to]"); + return false; + } + } else { + if ($this->config->isDefinedLayer('ftp')) { + // try the remote config file first + $to = $this->config->get($a['to'], 'ftp', $pkg->getChannel()); + if (is_null($to)) { + // then default to local + $to = $this->config->get($a['to'], null, $pkg->getChannel()); + } + } else { + $to = $this->config->get($a['to'], null, $pkg->getChannel()); + } + } + if (is_null($to)) { + $this->logger->log(0, "$dest: invalid pear-config replacement: $a[to]"); + return false; + } + } elseif ($a['type'] == 'php-const') { + if ($this->installphase == PEAR_TASK_PACKAGE) { + return false; + } + if (defined($a['to'])) { + $to = constant($a['to']); + } else { + $this->logger->log(0, "$dest: invalid php-const replacement: $a[to]"); + return false; + } + } else { + if ($t = $pkg->packageInfo($a['to'])) { + $to = $t; + } else { + $this->logger->log(0, "$dest: invalid package-info replacement: $a[to]"); + return false; + } + } + if (!is_null($to)) { + $subst_from[] = $a['from']; + $subst_to[] = $to; + } + } + $this->logger->log(3, "doing " . sizeof($subst_from) . + " substitution(s) for $dest"); + if (sizeof($subst_from)) { + $contents = str_replace($subst_from, $subst_to, $contents); + } + return $contents; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Replace/rw.php b/campcaster/src/tools/pear/src/PEAR/Task/Replace/rw.php new file mode 100644 index 000000000..390840969 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Replace/rw.php @@ -0,0 +1,67 @@ + - read/write version + * + * PHP versions 4 and 5 + * + * LICENSE: This source file is subject to version 3.0 of the PHP license + * that is available through the world-wide-web at the following URI: + * http://www.php.net/license/3_0.txt. If you did not receive a copy of + * the PHP License and are unable to obtain it through the web, please + * send a note to license@php.net so we can mail you a copy immediately. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: rw.php,v 1.3 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a10 + */ +/** + * Base class + */ +require_once 'PEAR/Task/Replace.php'; +/** + * Abstracts the replace task xml. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a10 + */ +class PEAR_Task_Replace_rw extends PEAR_Task_Replace +{ + function PEAR_Task_Replace_rw(&$pkg, &$config, &$logger, $fileXml) + { + parent::PEAR_Task_Common($config, $logger, PEAR_TASK_PACKAGE); + $this->_contents = $fileXml; + $this->_pkg = &$pkg; + $this->_params = array(); + } + + function validate() + { + return $this->validateXml($this->_pkg, $this->_params, $this->config, $this->_contents); + } + + function setInfo($from, $to, $type) + { + $this->_params = array('attribs' => array('from' => $from, 'to' => $to, 'type' => $type)); + } + + function getName() + { + return 'replace'; + } + + function getXml() + { + return $this->_params; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Unixeol.php b/campcaster/src/tools/pear/src/PEAR/Task/Unixeol.php new file mode 100644 index 000000000..dd17ed771 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Unixeol.php @@ -0,0 +1,83 @@ + + * + * PHP versions 4 and 5 + * + * LICENSE: This source file is subject to version 3.0 of the PHP license + * that is available through the world-wide-web at the following URI: + * http://www.php.net/license/3_0.txt. If you did not receive a copy of + * the PHP License and are unable to obtain it through the web, please + * send a note to license@php.net so we can mail you a copy immediately. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Unixeol.php,v 1.8 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * Base class + */ +require_once 'PEAR/Task/Common.php'; +/** + * Implements the unix line endings file task. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Task_Unixeol extends PEAR_Task_Common +{ + var $type = 'simple'; + var $phase = PEAR_TASK_PACKAGE; + var $_replacements; + + /** + * Validate the raw xml at parsing-time. + * @param PEAR_PackageFile_v2 + * @param array raw, parsed xml + * @param PEAR_Config + * @static + */ + function validateXml($pkg, $xml, &$config, $fileXml) + { + if ($xml != '') { + return array(PEAR_TASK_ERROR_INVALID, 'no attributes allowed'); + } + return true; + } + + /** + * Initialize a task instance with the parameters + * @param array raw, parsed xml + * @param unused + */ + function init($xml, $attribs) + { + } + + /** + * Replace all line endings with line endings customized for the current OS + * + * See validateXml() source for the complete list of allowed fields + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @param string file contents + * @param string the eventual final file location (informational only) + * @return string|false|PEAR_Error false to skip this file, PEAR_Error to fail + * (use $this->throwError), otherwise return the new contents + */ + function startSession($pkg, $contents, $dest) + { + $this->logger->log(3, "replacing all line endings with \\n in $dest"); + return preg_replace("/\r\n|\n\r|\r|\n/", "\n", $contents); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Unixeol/rw.php b/campcaster/src/tools/pear/src/PEAR/Task/Unixeol/rw.php new file mode 100644 index 000000000..584473795 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Unixeol/rw.php @@ -0,0 +1,62 @@ + - read/write version + * + * PHP versions 4 and 5 + * + * LICENSE: This source file is subject to version 3.0 of the PHP license + * that is available through the world-wide-web at the following URI: + * http://www.php.net/license/3_0.txt. If you did not receive a copy of + * the PHP License and are unable to obtain it through the web, please + * send a note to license@php.net so we can mail you a copy immediately. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: rw.php,v 1.4 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a10 + */ +/** + * Base class + */ +require_once 'PEAR/Task/Unixeol.php'; +/** + * Abstracts the unixeol task xml. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a10 + */ +class PEAR_Task_Unixeol_rw extends PEAR_Task_Unixeol +{ + function PEAR_Task_Unixeol_rw(&$pkg, &$config, &$logger, $fileXml) + { + parent::PEAR_Task_Common($config, $logger, PEAR_TASK_PACKAGE); + $this->_contents = $fileXml; + $this->_pkg = &$pkg; + $this->_params = array(); + } + + function validate() + { + return true; + } + + function getName() + { + return 'unixeol'; + } + + function getXml() + { + return ''; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Windowseol.php b/campcaster/src/tools/pear/src/PEAR/Task/Windowseol.php new file mode 100644 index 000000000..1182aeaca --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Windowseol.php @@ -0,0 +1,83 @@ + + * + * PHP versions 4 and 5 + * + * LICENSE: This source file is subject to version 3.0 of the PHP license + * that is available through the world-wide-web at the following URI: + * http://www.php.net/license/3_0.txt. If you did not receive a copy of + * the PHP License and are unable to obtain it through the web, please + * send a note to license@php.net so we can mail you a copy immediately. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Windowseol.php,v 1.7 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/** + * Base class + */ +require_once 'PEAR/Task/Common.php'; +/** + * Implements the windows line endsings file task. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Task_Windowseol extends PEAR_Task_Common +{ + var $type = 'simple'; + var $phase = PEAR_TASK_PACKAGE; + var $_replacements; + + /** + * Validate the raw xml at parsing-time. + * @param PEAR_PackageFile_v2 + * @param array raw, parsed xml + * @param PEAR_Config + * @static + */ + function validateXml($pkg, $xml, &$config, $fileXml) + { + if ($xml != '') { + return array(PEAR_TASK_ERROR_INVALID, 'no attributes allowed'); + } + return true; + } + + /** + * Initialize a task instance with the parameters + * @param array raw, parsed xml + * @param unused + */ + function init($xml, $attribs) + { + } + + /** + * Replace all line endings with windows line endings + * + * See validateXml() source for the complete list of allowed fields + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + * @param string file contents + * @param string the eventual final file location (informational only) + * @return string|false|PEAR_Error false to skip this file, PEAR_Error to fail + * (use $this->throwError), otherwise return the new contents + */ + function startSession($pkg, $contents, $dest) + { + $this->logger->log(3, "replacing all line endings with \\r\\n in $dest"); + return preg_replace("/\r\n|\n\r|\r|\n/", "\r\n", $contents); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Task/Windowseol/rw.php b/campcaster/src/tools/pear/src/PEAR/Task/Windowseol/rw.php new file mode 100644 index 000000000..10f22e8ca --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Task/Windowseol/rw.php @@ -0,0 +1,62 @@ + - read/write version + * + * PHP versions 4 and 5 + * + * LICENSE: This source file is subject to version 3.0 of the PHP license + * that is available through the world-wide-web at the following URI: + * http://www.php.net/license/3_0.txt. If you did not receive a copy of + * the PHP License and are unable to obtain it through the web, please + * send a note to license@php.net so we can mail you a copy immediately. + * + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: rw.php,v 1.4 2006/01/06 04:47:37 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a10 + */ +/** + * Base class + */ +require_once 'PEAR/Task/Windowseol.php'; +/** + * Abstracts the windowseol task xml. + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a10 + */ +class PEAR_Task_Windowseol_rw extends PEAR_Task_Windowseol +{ + function PEAR_Task_Windowseol_rw(&$pkg, &$config, &$logger, $fileXml) + { + parent::PEAR_Task_Common($config, $logger, PEAR_TASK_PACKAGE); + $this->_contents = $fileXml; + $this->_pkg = &$pkg; + $this->_params = array(); + } + + function validate() + { + return true; + } + + function getName() + { + return 'windowseol'; + } + + function getXml() + { + return ''; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/Validate.php b/campcaster/src/tools/pear/src/PEAR/Validate.php new file mode 100644 index 000000000..ed8adadae --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Validate.php @@ -0,0 +1,630 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Validate.php,v 1.46.2.3 2006/07/17 17:49:37 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ +/**#@+ + * Constants for install stage + */ +define('PEAR_VALIDATE_INSTALLING', 1); +define('PEAR_VALIDATE_UNINSTALLING', 2); // this is not bit-mapped like the others +define('PEAR_VALIDATE_NORMAL', 3); +define('PEAR_VALIDATE_DOWNLOADING', 4); // this is not bit-mapped like the others +define('PEAR_VALIDATE_PACKAGING', 7); +/**#@-*/ +require_once 'PEAR/Common.php'; +require_once 'PEAR/Validator/PECL.php'; + +/** + * Validation class for package.xml - channel-level advanced validation + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_Validate +{ + var $packageregex = _PEAR_COMMON_PACKAGE_NAME_PREG; + /** + * @var PEAR_PackageFile_v1|PEAR_PackageFile_v2 + */ + var $_packagexml; + /** + * @var int one of the PEAR_VALIDATE_* constants + */ + var $_state = PEAR_VALIDATE_NORMAL; + /** + * Format: ('error' => array('field' => name, 'reason' => reason), 'warning' => same) + * @var array + * @access private + */ + var $_failures = array('error' => array(), 'warning' => array()); + + /** + * Override this method to handle validation of normal package names + * @param string + * @return bool + * @access protected + */ + function _validPackageName($name) + { + return (bool) preg_match('/^' . $this->packageregex . '$/', $name); + } + + /** + * @param string package name to validate + * @param string name of channel-specific validation package + * @final + */ + function validPackageName($name, $validatepackagename = false) + { + if ($validatepackagename) { + if (strtolower($name) == strtolower($validatepackagename)) { + return (bool) preg_match('/^[a-zA-Z0-9_]+(?:\.[a-zA-Z0-9_]+)*$/', $name); + } + } + return $this->_validPackageName($name); + } + + /** + * This validates a bundle name, and bundle names must conform + * to the PEAR naming convention, so the method is final and static. + * @param string + * @final + * @static + */ + function validGroupName($name) + { + return (bool) preg_match('/^' . _PEAR_COMMON_PACKAGE_NAME_PREG . '$/', $name); + } + + /** + * Determine whether $state represents a valid stability level + * @param string + * @return bool + * @static + * @final + */ + function validState($state) + { + return in_array($state, array('snapshot', 'devel', 'alpha', 'beta', 'stable')); + } + + /** + * Get a list of valid stability levels + * @return array + * @static + * @final + */ + function getValidStates() + { + return array('snapshot', 'devel', 'alpha', 'beta', 'stable'); + } + + /** + * Determine whether a version is a properly formatted version number that can be used + * by version_compare + * @param string + * @return bool + * @static + * @final + */ + function validVersion($ver) + { + return (bool) preg_match(PEAR_COMMON_PACKAGE_VERSION_PREG, $ver); + } + + /** + * @param PEAR_PackageFile_v1|PEAR_PackageFile_v2 + */ + function setPackageFile(&$pf) + { + $this->_packagexml = &$pf; + } + + /** + * @access private + */ + function _addFailure($field, $reason) + { + $this->_failures['errors'][] = array('field' => $field, 'reason' => $reason); + } + + /** + * @access private + */ + function _addWarning($field, $reason) + { + $this->_failures['warnings'][] = array('field' => $field, 'reason' => $reason); + } + + function getFailures() + { + $failures = $this->_failures; + $this->_failures = array('warnings' => array(), 'errors' => array()); + return $failures; + } + + /** + * @param int one of the PEAR_VALIDATE_* constants + */ + function validate($state = null) + { + if (!isset($this->_packagexml)) { + return false; + } + if ($state !== null) { + $this->_state = $state; + } + $this->_failures = array('warnings' => array(), 'errors' => array()); + $this->validatePackageName(); + $this->validateVersion(); + $this->validateMaintainers(); + $this->validateDate(); + $this->validateSummary(); + $this->validateDescription(); + $this->validateLicense(); + $this->validateNotes(); + if ($this->_packagexml->getPackagexmlVersion() == '1.0') { + $this->validateState(); + $this->validateFilelist(); + } elseif ($this->_packagexml->getPackagexmlVersion() == '2.0') { + $this->validateTime(); + $this->validateStability(); + $this->validateDeps(); + $this->validateMainFilelist(); + $this->validateReleaseFilelist(); + //$this->validateGlobalTasks(); + $this->validateChangelog(); + } + return !((bool) count($this->_failures['errors'])); + } + + /** + * @access protected + */ + function validatePackageName() + { + if ($this->_state == PEAR_VALIDATE_PACKAGING || + $this->_state == PEAR_VALIDATE_NORMAL) { + if ($this->_packagexml->getPackagexmlVersion() == '2.0' && + $this->_packagexml->getExtends()) { + $version = $this->_packagexml->getVersion() . ''; + $name = $this->_packagexml->getPackage(); + $test = array_shift($a = explode('.', $version)); + if ($test == '0') { + return true; + } + $vlen = strlen($test); + $majver = substr($name, strlen($name) - $vlen); + while ($majver && !is_numeric($majver{0})) { + $majver = substr($majver, 1); + } + if ($majver != $test) { + $this->_addWarning('package', "package $name extends package " . + $this->_packagexml->getExtends() . ' and so the name should ' . + 'have a postfix equal to the major version like "' . + $this->_packagexml->getExtends() . $test . '"'); + return true; + } elseif (substr($name, 0, strlen($name) - $vlen) != + $this->_packagexml->getExtends()) { + $this->_addWarning('package', "package $name extends package " . + $this->_packagexml->getExtends() . ' and so the name must ' . + 'be an extension like "' . $this->_packagexml->getExtends() . + $test . '"'); + return true; + } + } + } + if (!$this->validPackageName($this->_packagexml->getPackage())) { + $this->_addFailure('name', 'package name "' . + $this->_packagexml->getPackage() . '" is invalid'); + return false; + } + } + + /** + * @access protected + */ + function validateVersion() + { + if ($this->_state != PEAR_VALIDATE_PACKAGING) { + if (!$this->validVersion($this->_packagexml->getVersion())) { + $this->_addFailure('version', + 'Invalid version number "' . $this->_packagexml->getVersion() . '"'); + } + return false; + } + $version = $this->_packagexml->getVersion(); + $versioncomponents = explode('.', $version); + if (count($versioncomponents) != 3) { + $this->_addWarning('version', + 'A version number should have 3 decimals (x.y.z)'); + return true; + } + $name = $this->_packagexml->getPackage(); + // version must be based upon state + switch ($this->_packagexml->getState()) { + case 'snapshot' : + return true; + case 'devel' : + if ($versioncomponents[0] . 'a' == '0a') { + return true; + } + if ($versioncomponents[0] == 0) { + $versioncomponents[0] = '0'; + $this->_addWarning('version', + 'version "' . $version . '" should be "' . + implode('.' ,$versioncomponents) . '"'); + } else { + $this->_addWarning('version', + 'packages with devel stability must be < version 1.0.0'); + } + return true; + break; + case 'alpha' : + case 'beta' : + // check for a package that extends a package, + // like Foo and Foo2 + if ($this->_state == PEAR_VALIDATE_PACKAGING) { + if (substr($versioncomponents[2], 1, 2) == 'rc') { + $this->_addFailure('version', 'Release Candidate versions ' . + 'must have capital RC, not lower-case rc'); + return false; + } + } + if (!$this->_packagexml->getExtends()) { + if ($versioncomponents[0] == '1') { + if ($versioncomponents[2]{0} == '0') { + if ($versioncomponents[2] == '0') { + // version 1.*.0000 + $this->_addWarning('version', + 'version 1.' . $versioncomponents[1] . + '.0 probably should not be alpha or beta'); + return true; + } elseif (strlen($versioncomponents[2]) > 1) { + // version 1.*.0RC1 or 1.*.0beta24 etc. + return true; + } else { + // version 1.*.0 + $this->_addWarning('version', + 'version 1.' . $versioncomponents[1] . + '.0 probably should not be alpha or beta'); + return true; + } + } else { + $this->_addWarning('version', + 'bugfix versions (1.3.x where x > 0) probably should ' . + 'not be alpha or beta'); + return true; + } + } elseif ($versioncomponents[0] != '0') { + $this->_addWarning('version', + 'major versions greater than 1 are not allowed for packages ' . + 'without an tag or an identical postfix (foo2 v2.0.0)'); + return true; + } + if ($versioncomponents[0] . 'a' == '0a') { + return true; + } + if ($versioncomponents[0] == 0) { + $versioncomponents[0] = '0'; + $this->_addWarning('version', + 'version "' . $version . '" should be "' . + implode('.' ,$versioncomponents) . '"'); + } + } else { + $vlen = strlen($versioncomponents[0] . ''); + $majver = substr($name, strlen($name) - $vlen); + while ($majver && !is_numeric($majver{0})) { + $majver = substr($majver, 1); + } + if (($versioncomponents[0] != 0) && $majver != $versioncomponents[0]) { + $this->_addWarning('version', 'first version number "' . + $versioncomponents[0] . '" must match the postfix of ' . + 'package name "' . $name . '" (' . + $majver . ')'); + return true; + } + if ($versioncomponents[0] == $majver) { + if ($versioncomponents[2]{0} == '0') { + if ($versioncomponents[2] == '0') { + // version 2.*.0000 + $this->_addWarning('version', + "version $majver." . $versioncomponents[1] . + '.0 probably should not be alpha or beta'); + return false; + } elseif (strlen($versioncomponents[2]) > 1) { + // version 2.*.0RC1 or 2.*.0beta24 etc. + return true; + } else { + // version 2.*.0 + $this->_addWarning('version', + "version $majver." . $versioncomponents[1] . + '.0 cannot be alpha or beta'); + return true; + } + } else { + $this->_addWarning('version', + "bugfix versions ($majver.x.y where y > 0) should " . + 'not be alpha or beta'); + return true; + } + } elseif ($versioncomponents[0] != '0') { + $this->_addWarning('version', + "only versions 0.x.y and $majver.x.y are allowed for alpha/beta releases"); + return true; + } + if ($versioncomponents[0] . 'a' == '0a') { + return true; + } + if ($versioncomponents[0] == 0) { + $versioncomponents[0] = '0'; + $this->_addWarning('version', + 'version "' . $version . '" should be "' . + implode('.' ,$versioncomponents) . '"'); + } + } + return true; + break; + case 'stable' : + if ($versioncomponents[0] == '0') { + $this->_addWarning('version', 'versions less than 1.0.0 cannot ' . + 'be stable'); + return true; + } + if (!is_numeric($versioncomponents[2])) { + if (preg_match('/\d+(rc|a|alpha|b|beta)\d*/i', + $versioncomponents[2])) { + $this->_addWarning('version', 'version "' . $version . '" or any ' . + 'RC/beta/alpha version cannot be stable'); + return true; + } + } + // check for a package that extends a package, + // like Foo and Foo2 + if ($this->_packagexml->getExtends()) { + $vlen = strlen($versioncomponents[0] . ''); + $majver = substr($name, strlen($name) - $vlen); + while ($majver && !is_numeric($majver{0})) { + $majver = substr($majver, 1); + } + if (($versioncomponents[0] != 0) && $majver != $versioncomponents[0]) { + $this->_addWarning('version', 'first version number "' . + $versioncomponents[0] . '" must match the postfix of ' . + 'package name "' . $name . '" (' . + $majver . ')'); + return true; + } + } elseif ($versioncomponents[0] > 1) { + $this->_addWarning('version', 'major version x in x.y.z may not be greater than ' . + '1 for any package that does not have an tag'); + } + return true; + break; + default : + return false; + break; + } + } + + /** + * @access protected + */ + function validateMaintainers() + { + // maintainers can only be truly validated server-side for most channels + // but allow this customization for those who wish it + return true; + } + + /** + * @access protected + */ + function validateDate() + { + if ($this->_state == PEAR_VALIDATE_NORMAL || + $this->_state == PEAR_VALIDATE_PACKAGING) { + if (!preg_match('/(\d\d\d\d)\-(\d\d)\-(\d\d)/', + $this->_packagexml->getDate(), $res) || + count($res) < 4 + || !checkdate($res[2], $res[3], $res[1]) + ) { + $this->_addFailure('date', 'invalid release date "' . + $this->_packagexml->getDate() . '"'); + return false; + } + + if ($this->_state == PEAR_VALIDATE_PACKAGING && + $this->_packagexml->getDate() != date('Y-m-d')) { + $this->_addWarning('date', 'Release Date "' . + $this->_packagexml->getDate() . '" is not today'); + } + } + return true; + } + + /** + * @access protected + */ + function validateTime() + { + if (!$this->_packagexml->getTime()) { + // default of no time value set + return true; + } + // packager automatically sets time, so only validate if + // pear validate is called + if ($this->_state = PEAR_VALIDATE_NORMAL) { + if (!preg_match('/\d\d:\d\d:\d\d/', + $this->_packagexml->getTime())) { + $this->_addFailure('time', 'invalid release time "' . + $this->_packagexml->getTime() . '"'); + return false; + } + if (strtotime($this->_packagexml->getTime()) == -1) { + $this->_addFailure('time', 'invalid release time "' . + $this->_packagexml->getTime() . '"'); + return false; + } + } + return true; + } + + /** + * @access protected + */ + function validateState() + { + // this is the closest to "final" php4 can get + if (!PEAR_Validate::validState($this->_packagexml->getState())) { + if (strtolower($this->_packagexml->getState() == 'rc')) { + $this->_addFailure('state', 'RC is not a state, it is a version ' . + 'postfix, use ' . $this->_packagexml->getVersion() . 'RC1, state beta'); + } + $this->_addFailure('state', 'invalid release state "' . + $this->_packagexml->getState() . '", must be one of: ' . + implode(', ', PEAR_Validate::getValidStates())); + return false; + } + return true; + } + + /** + * @access protected + */ + function validateStability() + { + $ret = true; + $packagestability = $this->_packagexml->getState(); + $apistability = $this->_packagexml->getState('api'); + if (!PEAR_Validate::validState($packagestability)) { + $this->_addFailure('state', 'invalid release stability "' . + $this->_packagexml->getState() . '", must be one of: ' . + implode(', ', PEAR_Validate::getValidStates())); + $ret = false; + } + $apistates = PEAR_Validate::getValidStates(); + array_shift($apistates); // snapshot is not allowed + if (!in_array($apistability, $apistates)) { + $this->_addFailure('state', 'invalid API stability "' . + $this->_packagexml->getState('api') . '", must be one of: ' . + implode(', ', $apistates)); + $ret = false; + } + return $ret; + } + + /** + * @access protected + */ + function validateSummary() + { + return true; + } + + /** + * @access protected + */ + function validateDescription() + { + return true; + } + + /** + * @access protected + */ + function validateLicense() + { + return true; + } + + /** + * @access protected + */ + function validateNotes() + { + return true; + } + + /** + * for package.xml 2.0 only - channels can't use package.xml 1.0 + * @access protected + */ + function validateDependencies() + { + return true; + } + + /** + * for package.xml 1.0 only + * @access private + */ + function _validateFilelist() + { + return true; // placeholder for now + } + + /** + * for package.xml 2.0 only + * @access protected + */ + function validateMainFilelist() + { + return true; // placeholder for now + } + + /** + * for package.xml 2.0 only + * @access protected + */ + function validateReleaseFilelist() + { + return true; // placeholder for now + } + + /** + * @access protected + */ + function validateChangelog() + { + return true; + } + + /** + * @access protected + */ + function validateFilelist() + { + return true; + } + + /** + * @access protected + */ + function validateDeps() + { + return true; + } +} +?> diff --git a/campcaster/src/tools/pear/src/PEAR/Validator/PECL.php b/campcaster/src/tools/pear/src/PEAR/Validator/PECL.php new file mode 100644 index 000000000..7591ff776 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/Validator/PECL.php @@ -0,0 +1,62 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: PECL.php,v 1.7 2006/02/03 02:02:22 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a5 + */ +/** + * This is the parent class for all validators + */ +require_once 'PEAR/Validate.php'; +/** + * Channel Validator for the pecl.php.net channel + * @category pear + * @package PEAR + * @author Greg Beaver + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a5 + */ +class PEAR_Validator_PECL extends PEAR_Validate +{ + function validateVersion() + { + if ($this->_state == PEAR_VALIDATE_PACKAGING) { + $version = $this->_packagexml->getVersion(); + $versioncomponents = explode('.', $version); + $last = array_pop($versioncomponents); + if (substr($last, 1, 2) == 'rc') { + $this->_addFailure('version', 'Release Candidate versions must have ' . + 'upper-case RC, not lower-case rc'); + return false; + } + } + return true; + } + + function validatePackageName() + { + $ret = parent::validatePackageName(); + if ($this->_packagexml->getPackageType() == 'extsrc') { + if (strtolower($this->_packagexml->getPackage()) != + strtolower($this->_packagexml->getProvidesExtension())) { + $this->_addWarning('providesextension', 'package name "' . + $this->_packagexml->getPackage() . '" is different from extension name "' . + $this->_packagexml->getProvidesExtension() . '"'); + } + } + return $ret; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/PEAR/XMLParser.php b/campcaster/src/tools/pear/src/PEAR/XMLParser.php new file mode 100644 index 000000000..1d2273209 --- /dev/null +++ b/campcaster/src/tools/pear/src/PEAR/XMLParser.php @@ -0,0 +1,261 @@ + + * @author Stephan Schmidt (original XML_Unserializer code) + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: XMLParser.php,v 1.11 2006/01/06 04:47:36 cellog Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 1.4.0a1 + */ + +/** + * Parser for any xml file + * @category pear + * @package PEAR + * @author Greg Beaver + * @author Stephan Schmidt (original XML_Unserializer code) + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: 1.4.11 + * @link http://pear.php.net/package/PEAR + * @since Class available since Release 1.4.0a1 + */ +class PEAR_XMLParser +{ + /** + * unserilialized data + * @var string $_serializedData + */ + var $_unserializedData = null; + + /** + * name of the root tag + * @var string $_root + */ + var $_root = null; + + /** + * stack for all data that is found + * @var array $_dataStack + */ + var $_dataStack = array(); + + /** + * stack for all values that are generated + * @var array $_valStack + */ + var $_valStack = array(); + + /** + * current tag depth + * @var int $_depth + */ + var $_depth = 0; + + /** + * @return array + */ + function getData() + { + return $this->_unserializedData; + } + + /** + * @param string xml content + * @return true|PEAR_Error + */ + function parse($data) + { + if (!extension_loaded('xml')) { + include_once 'PEAR.php'; + return PEAR::raiseError("XML Extension not found", 1); + } + $this->_valStack = array(); + $this->_dataStack = array(); + $this->_depth = 0; + + if (version_compare(phpversion(), '5.0.0', 'lt')) { + if (strpos($data, 'encoding="UTF-8"')) { + $data = utf8_decode($data); + } + $xp = @xml_parser_create('ISO-8859-1'); + } else { + if (strpos($data, 'encoding="UTF-8"')) { + $xp = @xml_parser_create('UTF-8'); + } else { + $xp = @xml_parser_create('ISO-8859-1'); + } + } + xml_parser_set_option($xp, XML_OPTION_CASE_FOLDING, 0); + xml_set_object($xp, $this); + xml_set_element_handler($xp, 'startHandler', 'endHandler'); + xml_set_character_data_handler($xp, 'cdataHandler'); + if (!xml_parse($xp, $data)) { + $msg = xml_error_string(xml_get_error_code($xp)); + $line = xml_get_current_line_number($xp); + xml_parser_free($xp); + include_once 'PEAR.php'; + return PEAR::raiseError("XML Error: '$msg' on line '$line'", 2); + } + xml_parser_free($xp); + return true; + } + + /** + * Start element handler for XML parser + * + * @access private + * @param object $parser XML parser object + * @param string $element XML element + * @param array $attribs attributes of XML tag + * @return void + */ + function startHandler($parser, $element, $attribs) + { + $type = 'string'; + + $this->_depth++; + $this->_dataStack[$this->_depth] = null; + + $val = array( + 'name' => $element, + 'value' => null, + 'type' => $type, + 'childrenKeys' => array(), + 'aggregKeys' => array() + ); + + if (count($attribs) > 0) { + $val['children'] = array(); + $val['type'] = 'array'; + + $val['children']['attribs'] = $attribs; + + } + + array_push($this->_valStack, $val); + } + + /** + * post-process data + * + * @param string $data + * @param string $element element name + */ + function postProcess($data, $element) + { + return trim($data); + } + + /** + * End element handler for XML parser + * + * @access private + * @param object XML parser object + * @param string + * @return void + */ + function endHandler($parser, $element) + { + $value = array_pop($this->_valStack); + $data = $this->postProcess($this->_dataStack[$this->_depth], $element); + + // adjust type of the value + switch(strtolower($value['type'])) { + + /* + * unserialize an array + */ + case 'array': + if ($data !== '') { + $value['children']['_content'] = $data; + } + if (isset($value['children'])) { + $value['value'] = $value['children']; + } else { + $value['value'] = array(); + } + break; + + /* + * unserialize a null value + */ + case 'null': + $data = null; + break; + + /* + * unserialize any scalar value + */ + default: + settype($data, $value['type']); + $value['value'] = $data; + break; + } + $parent = array_pop($this->_valStack); + if ($parent === null) { + $this->_unserializedData = &$value['value']; + $this->_root = &$value['name']; + return true; + } else { + // parent has to be an array + if (!isset($parent['children']) || !is_array($parent['children'])) { + $parent['children'] = array(); + if ($parent['type'] != 'array') { + $parent['type'] = 'array'; + } + } + + if (!empty($value['name'])) { + // there already has been a tag with this name + if (in_array($value['name'], $parent['childrenKeys'])) { + // no aggregate has been created for this tag + if (!in_array($value['name'], $parent['aggregKeys'])) { + if (isset($parent['children'][$value['name']])) { + $parent['children'][$value['name']] = array($parent['children'][$value['name']]); + } else { + $parent['children'][$value['name']] = array(); + } + array_push($parent['aggregKeys'], $value['name']); + } + array_push($parent['children'][$value['name']], $value['value']); + } else { + $parent['children'][$value['name']] = &$value['value']; + array_push($parent['childrenKeys'], $value['name']); + } + } else { + array_push($parent['children'],$value['value']); + } + array_push($this->_valStack, $parent); + } + + $this->_depth--; + } + + /** + * Handler for character data + * + * @access private + * @param object XML parser object + * @param string CDATA + * @return void + */ + function cdataHandler($parser, $cdata) + { + $this->_dataStack[$this->_depth] .= $cdata; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/System.php b/campcaster/src/tools/pear/src/System.php new file mode 100644 index 000000000..8a2f22f3b --- /dev/null +++ b/campcaster/src/tools/pear/src/System.php @@ -0,0 +1,587 @@ + + * @copyright 1997-2006 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: System.php,v 1.53.2.1 2006/06/16 13:55:16 pajoye Exp $ + * @link http://pear.php.net/package/PEAR + * @since File available since Release 0.1 + */ + +/** + * base class + */ +require_once 'PEAR.php'; +require_once 'Console/Getopt.php'; + +$GLOBALS['_System_temp_files'] = array(); + +/** +* System offers cross plattform compatible system functions +* +* Static functions for different operations. Should work under +* Unix and Windows. The names and usage has been taken from its respectively +* GNU commands. The functions will return (bool) false on error and will +* trigger the error with the PHP trigger_error() function (you can silence +* the error by prefixing a '@' sign after the function call). +* +* Documentation on this class you can find in: +* http://pear.php.net/manual/ +* +* Example usage: +* if (!@System::rm('-r file1 dir1')) { +* print "could not delete file1 or dir1"; +* } +* +* In case you need to to pass file names with spaces, +* pass the params as an array: +* +* System::rm(array('-r', $file1, $dir1)); +* +* @category pear +* @package System +* @author Tomas V.V. Cox +* @copyright 1997-2006 The PHP Group +* @license http://www.php.net/license/3_0.txt PHP License 3.0 +* @version Release: 1.4.11 +* @link http://pear.php.net/package/PEAR +* @since Class available since Release 0.1 +*/ +class System +{ + /** + * returns the commandline arguments of a function + * + * @param string $argv the commandline + * @param string $short_options the allowed option short-tags + * @param string $long_options the allowed option long-tags + * @return array the given options and there values + * @access private + */ + function _parseArgs($argv, $short_options, $long_options = null) + { + if (!is_array($argv) && $argv !== null) { + $argv = preg_split('/\s+/', $argv, -1, PREG_SPLIT_NO_EMPTY); + } + return Console_Getopt::getopt2($argv, $short_options); + } + + /** + * Output errors with PHP trigger_error(). You can silence the errors + * with prefixing a "@" sign to the function call: @System::mkdir(..); + * + * @param mixed $error a PEAR error or a string with the error message + * @return bool false + * @access private + */ + function raiseError($error) + { + if (PEAR::isError($error)) { + $error = $error->getMessage(); + } + trigger_error($error, E_USER_WARNING); + return false; + } + + /** + * Creates a nested array representing the structure of a directory + * + * System::_dirToStruct('dir1', 0) => + * Array + * ( + * [dirs] => Array + * ( + * [0] => dir1 + * ) + * + * [files] => Array + * ( + * [0] => dir1/file2 + * [1] => dir1/file3 + * ) + * ) + * @param string $sPath Name of the directory + * @param integer $maxinst max. deep of the lookup + * @param integer $aktinst starting deep of the lookup + * @return array the structure of the dir + * @access private + */ + + function _dirToStruct($sPath, $maxinst, $aktinst = 0) + { + $struct = array('dirs' => array(), 'files' => array()); + if (($dir = @opendir($sPath)) === false) { + System::raiseError("Could not open dir $sPath"); + return $struct; // XXX could not open error + } + $struct['dirs'][] = $sPath = realpath($sPath); // XXX don't add if '.' or '..' ? + $list = array(); + while (false !== ($file = readdir($dir))) { + if ($file != '.' && $file != '..') { + $list[] = $file; + } + } + closedir($dir); + sort($list); + if ($aktinst < $maxinst || $maxinst == 0) { + foreach($list as $val) { + $path = $sPath . DIRECTORY_SEPARATOR . $val; + if (is_dir($path) && !is_link($path)) { + $tmp = System::_dirToStruct($path, $maxinst, $aktinst+1); + $struct = array_merge_recursive($tmp, $struct); + } else { + $struct['files'][] = $path; + } + } + } + return $struct; + } + + /** + * Creates a nested array representing the structure of a directory and files + * + * @param array $files Array listing files and dirs + * @return array + * @see System::_dirToStruct() + */ + function _multipleToStruct($files) + { + $struct = array('dirs' => array(), 'files' => array()); + settype($files, 'array'); + foreach ($files as $file) { + if (is_dir($file) && !is_link($file)) { + $tmp = System::_dirToStruct($file, 0); + $struct = array_merge_recursive($tmp, $struct); + } else { + $struct['files'][] = $file; + } + } + return $struct; + } + + /** + * The rm command for removing files. + * Supports multiple files and dirs and also recursive deletes + * + * @param string $args the arguments for rm + * @return mixed PEAR_Error or true for success + * @access public + */ + function rm($args) + { + $opts = System::_parseArgs($args, 'rf'); // "f" do nothing but like it :-) + if (PEAR::isError($opts)) { + return System::raiseError($opts); + } + foreach($opts[0] as $opt) { + if ($opt[0] == 'r') { + $do_recursive = true; + } + } + $ret = true; + if (isset($do_recursive)) { + $struct = System::_multipleToStruct($opts[1]); + foreach($struct['files'] as $file) { + if (!@unlink($file)) { + $ret = false; + } + } + foreach($struct['dirs'] as $dir) { + if (!@rmdir($dir)) { + $ret = false; + } + } + } else { + foreach ($opts[1] as $file) { + $delete = (is_dir($file)) ? 'rmdir' : 'unlink'; + if (!@$delete($file)) { + $ret = false; + } + } + } + return $ret; + } + + /** + * Make directories. + * + * The -p option will create parent directories + * @param string $args the name of the director(y|ies) to create + * @return bool True for success + * @access public + */ + function mkDir($args) + { + $opts = System::_parseArgs($args, 'pm:'); + if (PEAR::isError($opts)) { + return System::raiseError($opts); + } + $mode = 0777; // default mode + foreach($opts[0] as $opt) { + if ($opt[0] == 'p') { + $create_parents = true; + } elseif($opt[0] == 'm') { + // if the mode is clearly an octal number (starts with 0) + // convert it to decimal + if (strlen($opt[1]) && $opt[1]{0} == '0') { + $opt[1] = octdec($opt[1]); + } else { + // convert to int + $opt[1] += 0; + } + $mode = $opt[1]; + } + } + $ret = true; + if (isset($create_parents)) { + foreach($opts[1] as $dir) { + $dirstack = array(); + while (!@is_dir($dir) && $dir != DIRECTORY_SEPARATOR) { + array_unshift($dirstack, $dir); + $dir = dirname($dir); + } + while ($newdir = array_shift($dirstack)) { + if (!is_writeable(dirname($newdir))) { + $ret = false; + break; + } + if (!mkdir($newdir, $mode)) { + $ret = false; + } + } + } + } else { + foreach($opts[1] as $dir) { + if (!@is_dir($dir) && !mkdir($dir, $mode)) { + $ret = false; + } + } + } + return $ret; + } + + /** + * Concatenate files + * + * Usage: + * 1) $var = System::cat('sample.txt test.txt'); + * 2) System::cat('sample.txt test.txt > final.txt'); + * 3) System::cat('sample.txt test.txt >> final.txt'); + * + * Note: as the class use fopen, urls should work also (test that) + * + * @param string $args the arguments + * @return boolean true on success + * @access public + */ + function &cat($args) + { + $ret = null; + $files = array(); + if (!is_array($args)) { + $args = preg_split('/\s+/', $args, -1, PREG_SPLIT_NO_EMPTY); + } + for($i=0; $i < count($args); $i++) { + if ($args[$i] == '>') { + $mode = 'wb'; + $outputfile = $args[$i+1]; + break; + } elseif ($args[$i] == '>>') { + $mode = 'ab+'; + $outputfile = $args[$i+1]; + break; + } else { + $files[] = $args[$i]; + } + } + if (isset($mode)) { + if (!$outputfd = fopen($outputfile, $mode)) { + $err = System::raiseError("Could not open $outputfile"); + return $err; + } + $ret = true; + } + foreach ($files as $file) { + if (!$fd = fopen($file, 'r')) { + System::raiseError("Could not open $file"); + continue; + } + while ($cont = fread($fd, 2048)) { + if (isset($outputfd)) { + fwrite($outputfd, $cont); + } else { + $ret .= $cont; + } + } + fclose($fd); + } + if (@is_resource($outputfd)) { + fclose($outputfd); + } + return $ret; + } + + /** + * Creates temporary files or directories. This function will remove + * the created files when the scripts finish its execution. + * + * Usage: + * 1) $tempfile = System::mktemp("prefix"); + * 2) $tempdir = System::mktemp("-d prefix"); + * 3) $tempfile = System::mktemp(); + * 4) $tempfile = System::mktemp("-t /var/tmp prefix"); + * + * prefix -> The string that will be prepended to the temp name + * (defaults to "tmp"). + * -d -> A temporary dir will be created instead of a file. + * -t -> The target dir where the temporary (file|dir) will be created. If + * this param is missing by default the env vars TMP on Windows or + * TMPDIR in Unix will be used. If these vars are also missing + * c:\windows\temp or /tmp will be used. + * + * @param string $args The arguments + * @return mixed the full path of the created (file|dir) or false + * @see System::tmpdir() + * @access public + */ + function mktemp($args = null) + { + static $first_time = true; + $opts = System::_parseArgs($args, 't:d'); + if (PEAR::isError($opts)) { + return System::raiseError($opts); + } + foreach($opts[0] as $opt) { + if($opt[0] == 'd') { + $tmp_is_dir = true; + } elseif($opt[0] == 't') { + $tmpdir = $opt[1]; + } + } + $prefix = (isset($opts[1][0])) ? $opts[1][0] : 'tmp'; + if (!isset($tmpdir)) { + $tmpdir = System::tmpdir(); + } + if (!System::mkDir(array('-p', $tmpdir))) { + return false; + } + $tmp = tempnam($tmpdir, $prefix); + if (isset($tmp_is_dir)) { + unlink($tmp); // be careful possible race condition here + if (!mkdir($tmp, 0700)) { + return System::raiseError("Unable to create temporary directory $tmpdir"); + } + } + $GLOBALS['_System_temp_files'][] = $tmp; + if ($first_time) { + PEAR::registerShutdownFunc(array('System', '_removeTmpFiles')); + $first_time = false; + } + return $tmp; + } + + /** + * Remove temporary files created my mkTemp. This function is executed + * at script shutdown time + * + * @access private + */ + function _removeTmpFiles() + { + if (count($GLOBALS['_System_temp_files'])) { + $delete = $GLOBALS['_System_temp_files']; + array_unshift($delete, '-r'); + System::rm($delete); + $GLOBALS['_System_temp_files'] = array(); + } + } + + /** + * Get the path of the temporal directory set in the system + * by looking in its environments variables. + * Note: php.ini-recommended removes the "E" from the variables_order setting, + * making unavaible the $_ENV array, that s why we do tests with _ENV + * + * @return string The temporal directory on the system + */ + function tmpdir() + { + if (OS_WINDOWS) { + if ($var = isset($_ENV['TEMP']) ? $_ENV['TEMP'] : getenv('TEMP')) { + return $var; + } + if ($var = isset($_ENV['TMP']) ? $_ENV['TMP'] : getenv('TMP')) { + return $var; + } + if ($var = isset($_ENV['windir']) ? $_ENV['windir'] : getenv('windir')) { + return $var; + } + return getenv('SystemRoot') . '\temp'; + } + if ($var = isset($_ENV['TMPDIR']) ? $_ENV['TMPDIR'] : getenv('TMPDIR')) { + return $var; + } + return '/tmp'; + } + + /** + * The "which" command (show the full path of a command) + * + * @param string $program The command to search for + * @param mixed $fallback Value to return if $program is not found + * + * @return mixed A string with the full path or false if not found + * @author Stig Bakken + */ + function which($program, $fallback = false) + { + // enforce API + if (!is_string($program) || '' == $program) { + return $fallback; + } + + // available since 4.3.0RC2 + if (defined('PATH_SEPARATOR')) { + $path_delim = PATH_SEPARATOR; + } else { + $path_delim = OS_WINDOWS ? ';' : ':'; + } + // full path given + if (basename($program) != $program) { + $path_elements[] = dirname($program); + $program = basename($program); + } else { + // Honor safe mode + if (!ini_get('safe_mode') || !$path = ini_get('safe_mode_exec_dir')) { + $path = getenv('PATH'); + if (!$path) { + $path = getenv('Path'); // some OSes are just stupid enough to do this + } + } + $path_elements = explode($path_delim, $path); + } + + if (OS_WINDOWS) { + $exe_suffixes = getenv('PATHEXT') + ? explode($path_delim, getenv('PATHEXT')) + : array('.exe','.bat','.cmd','.com'); + // allow passing a command.exe param + if (strpos($program, '.') !== false) { + array_unshift($exe_suffixes, ''); + } + // is_executable() is not available on windows for PHP4 + $pear_is_executable = (function_exists('is_executable')) ? 'is_executable' : 'is_file'; + } else { + $exe_suffixes = array(''); + $pear_is_executable = 'is_executable'; + } + + foreach ($exe_suffixes as $suff) { + foreach ($path_elements as $dir) { + $file = $dir . DIRECTORY_SEPARATOR . $program . $suff; + if (@$pear_is_executable($file)) { + return $file; + } + } + } + return $fallback; + } + + /** + * The "find" command + * + * Usage: + * + * System::find($dir); + * System::find("$dir -type d"); + * System::find("$dir -type f"); + * System::find("$dir -name *.php"); + * System::find("$dir -name *.php -name *.htm*"); + * System::find("$dir -maxdepth 1"); + * + * Params implmented: + * $dir -> Start the search at this directory + * -type d -> return only directories + * -type f -> return only files + * -maxdepth -> max depth of recursion + * -name -> search pattern (bash style). Multiple -name param allowed + * + * @param mixed Either array or string with the command line + * @return array Array of found files + * + */ + function find($args) + { + if (!is_array($args)) { + $args = preg_split('/\s+/', $args, -1, PREG_SPLIT_NO_EMPTY); + } + $dir = array_shift($args); + $patterns = array(); + $depth = 0; + $do_files = $do_dirs = true; + for ($i = 0; $i < count($args); $i++) { + switch ($args[$i]) { + case '-type': + if (in_array($args[$i+1], array('d', 'f'))) { + if ($args[$i+1] == 'd') { + $do_files = false; + } else { + $do_dirs = false; + } + } + $i++; + break; + case '-name': + if (OS_WINDOWS) { + if ($args[$i+1]{0} == '\\') { + // prepend drive + $args[$i+1] = addslashes(substr(getcwd(), 0, 2) . $args[$i + 1]); + } + // escape path separators to avoid PCRE problems + $args[$i+1] = str_replace('\\', '\\\\', $args[$i+1]); + } + $patterns[] = "(" . preg_replace(array('/\./', '/\*/'), + array('\.', '.*', ), + $args[$i+1]) + . ")"; + $i++; + break; + case '-maxdepth': + $depth = $args[$i+1]; + break; + } + } + $path = System::_dirToStruct($dir, $depth); + if ($do_files && $do_dirs) { + $files = array_merge($path['files'], $path['dirs']); + } elseif ($do_dirs) { + $files = $path['dirs']; + } else { + $files = $path['files']; + } + if (count($patterns)) { + $patterns = implode('|', $patterns); + $ret = array(); + for ($i = 0; $i < count($files); $i++) { + if (preg_match("#^$patterns\$#", $files[$i])) { + $ret[] = $files[$i]; + } + } + return $ret; + } + return $files; + } +} +?> diff --git a/campcaster/src/tools/pear/src/VERSIONS.txt b/campcaster/src/tools/pear/src/VERSIONS.txt new file mode 100644 index 000000000..515124691 --- /dev/null +++ b/campcaster/src/tools/pear/src/VERSIONS.txt @@ -0,0 +1,17 @@ +Last updated: +Nov 23, 2006 + +* Archive_Tar-1.3.1 +* Calendar-0.5.3 +* Console_Getopt-1.2 +* DB-1.7.6 +* File-1.2.2 +* File_Find-1.2.2 +* HTML_Common-1.2.3 +* HTML_Quickform-3.2.7 +* PEAR-1.4.11 +* XML_Beautifier-1.1 +* XML_Parser-1.2.6 +* XML_RPC-1.5.1 +* XML_Serializer-0.18.0 +* XML_Util-1.1.1 diff --git a/campcaster/src/tools/pear/src/XML/Beautifier.php b/campcaster/src/tools/pear/src/XML/Beautifier.php new file mode 100644 index 000000000..46c4d6507 --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Beautifier.php @@ -0,0 +1,340 @@ + | +// +----------------------------------------------------------------------+ + +if( !defined( 'XML_BEAUTIFIER_INCLUDE_PATH' ) ) { + define( 'XML_BEAUTIFIER_INCLUDE_PATH', 'XML/Beautifier' ); +} + +/** + * XML/Beautifier.php + * + * Package that formats your XML files, that means + * it is able to add line breaks, and indents your tags. + * + * @category XML + * @package XML_Beautifier + * @author Stephan Schmidt + */ + +/** + * element is empty + */ +define('XML_BEAUTIFIER_EMPTY', 0); + +/** + * CData + */ +define('XML_BEAUTIFIER_CDATA', 1); + +/** + * XML element + */ +define('XML_BEAUTIFIER_ELEMENT', 2); + +/** + * processing instruction + */ +define('XML_BEAUTIFIER_PI', 4); + +/** + * entity + */ +define('XML_BEAUTIFIER_ENTITY', 8); + +/** + * comment + */ +define('XML_BEAUTIFIER_COMMENT', 16); + +/** + * XML declaration + */ +define('XML_BEAUTIFIER_XML_DECLARATION', 32); + +/** + * doctype declaration + */ +define('XML_BEAUTIFIER_DT_DECLARATION', 64); + +/** + * default + */ +define('XML_BEAUTIFIER_DEFAULT', 128); + +/** + * overwrite the original file + */ +define('XML_BEAUTIFIER_OVERWRITE', -1); + +/** + * could not write to output file + */ +define('XML_BEAUTIFIER_ERROR_NO_OUTPUT_FILE', 151); + +/** + * could not load renderer + */ +define('XML_BEAUTIFIER_ERROR_UNKNOWN_RENDERER', 152); + +/** + * XML_Beautifier is a class that adds linebreaks and + * indentation to your XML files. It can be used on XML + * that looks ugly (e.g. any generated XML) to transform it + * to a nicely looking XML that can be read by humans. + * + * It removes unnecessary whitespace and adds indentation + * depending on the nesting level. + * + * It is able to treat tags, data, processing instructions + * comments, external entities and the XML prologue. + * + * XML_Beautifier is using XML_Beautifier_Tokenizer to parse an XML + * document with a SAX based parser and builds tokens of tags, comments, + * entities, data, etc. + * These tokens will be serialized and indented by a renderer + * with your indent string. + * + * Example 1: Formatting a file + * + * require_once 'XML/Beautifier.php'; + * $fmt = new XML_Beautifier(); + * $result = $fmt->formatFile('oldFile.xml', 'newFile.xml'); + * + * + * Example 2: Formatting a string + * + * require_once 'XML/Beautifier.php'; + * $xml = ''; + * $fmt = new XML_Beautifier(); + * $result = $fmt->formatString($xml); + * + * + * @category XML + * @package XML_Beautifier + * @version 1.0 + * @author Stephan Schmidt + */ +class XML_Beautifier { + + /** + * default options for the output format + * @var array + * @access private + */ + var $_defaultOptions = array( + "removeLineBreaks" => true, + "removeLeadingSpace"=> true, // not implemented, yet + "indent" => " ", + "linebreak" => "\n", + "caseFolding" => false, + "caseFoldingTo" => "uppercase", + "normalizeComments" => false, + "maxCommentLine" => -1, + "multilineTags" => false + ); + + /** + * options for the output format + * @var array + * @access private + */ + var $_options = array(); + + /** + * Constructor + * + * This is only used to specify the options of the + * beautifying process. + * + * @access public + * @param array $options options that override default options + */ + function XML_Beautifier($options = array()) + { + $this->_options = array_merge($this->_defaultOptions, $options); + $this->folding = false; + } + + /** + * reset all options to default options + * + * @access public + * @see setOption(), XML_Beautifier(), setOptions() + */ + function resetOptions() + { + $this->_options = $this->_defaultOptions; + } + + /** + * set an option + * + * You can use this method if you do not want to set all options in the constructor + * + * @access public + * @see resetOptions(), XML_Beautifier(), setOptions() + */ + function setOption($name, $value) + { + $this->_options[$name] = $value; + } + + /** + * set several options at once + * + * You can use this method if you do not want to set all options in the constructor + * + * @access public + * @see resetOptions(), XML_Beautifier() + */ + function setOptions($options) + { + $this->_options = array_merge($this->_options, $options); + } + + /** + * format a file or URL + * + * @access public + * @param string $file filename + * @param mixed $newFile filename for beautified XML file (if none is given, the XML string will be returned.) + * if you want overwrite the original file, use XML_BEAUTIFIER_OVERWRITE + * @param string $renderer Renderer to use, default is the plain xml renderer + * @return mixed XML string of no file should be written, true if file could be written + * @throws PEAR_Error + * @uses _loadRenderer() to load the desired renderer + */ + function formatFile($file, $newFile = null, $renderer = "Plain") + { + if ($newFile == XML_BEAUTIFIER_OVERWRITE) { + $newFile = $file; + } + + /** + * Split the document into tokens + * using the XML_Tokenizer + */ + require_once XML_BEAUTIFIER_INCLUDE_PATH . '/Tokenizer.php'; + $tokenizer = new XML_Beautifier_Tokenizer(); + + $tokens = $tokenizer->tokenize( $file, true ); + + if (PEAR::isError($tokens)) { + return $tokens; + } + + $renderer = $this->_loadRenderer($renderer, $this->_options); + + if (PEAR::isError($renderer)) { + return $renderer; + } + + $xml = $renderer->serialize($tokens); + + if ($newFile == null) { + return $xml; + } + + $fp = @fopen($newFile, "w"); + if (!$fp) { + return PEAR::raiseError("Could not write to output file", XML_BEAUTIFIER_ERROR_NO_OUTPUT_FILE); + } + + flock($fp, LOCK_EX); + fwrite($fp, $xml); + flock($fp, LOCK_UN); + fclose($fp); + return true; + } + + /** + * format an XML string + * + * @access public + * @param string $string XML + * @return string formatted XML string + * @throws PEAR_Error + */ + function formatString($string, $renderer = "Plain") + { + /** + * Split the document into tokens + * using the XML_Tokenizer + */ + require_once XML_BEAUTIFIER_INCLUDE_PATH . '/Tokenizer.php'; + $tokenizer = new XML_Beautifier_Tokenizer(); + + $tokens = $tokenizer->tokenize( $string, false ); + + if (PEAR::isError($tokens)) { + return $tokens; + } + + $renderer = $this->_loadRenderer($renderer, $this->_options); + + if (PEAR::isError($renderer)) { + return $renderer; + } + + $xml = $renderer->serialize($tokens); + + return $xml; + } + + /** + * load a renderer + * + * Renderers are used to serialize the XML tokens back + * to an XML string. + * + * Renderers are located in the XML/Beautifier/Renderer directory. + * + * @access private + * @param string $renderer name of the renderer + * @param array $options options for the renderer + * @return object renderer + * @throws PEAR_Error + */ + function &_loadRenderer($name, $options = array()) + { + $file = XML_BEAUTIFIER_INCLUDE_PATH . "/Renderer/$name.php"; + $class = "XML_Beautifier_Renderer_$name"; + + @include_once $file; + if (!class_exists($class)) { + return PEAR::raiseError( "Could not load renderer.", XML_BEAUTIFIER_ERROR_UNKNOWN_RENDERER ); + } + + $renderer = &new $class($options); + + return $renderer; + } + + /** + * return API version + * + * @access public + * @static + * @return string $version API version + */ + function apiVersion() + { + return "1.0"; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/XML/Beautifier/Renderer.php b/campcaster/src/tools/pear/src/XML/Beautifier/Renderer.php new file mode 100644 index 000000000..e86c9bc64 --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Beautifier/Renderer.php @@ -0,0 +1,188 @@ + | +// +----------------------------------------------------------------------+ + +/** + * XML/Beautifier/Renderer.php + * + * @category XML + * @package XML_Beautifier + * @author Stephan Schmidt + */ + +/** + * Renderer base class for XML_Beautifier + * + * @category XML + * @package XML_Beautifier + * @author Stephan Schmidt + */ +class XML_Beautifier_Renderer { + + /** + * options + * @var array + */ + var $_options = array(); + + /** + * create a new renderer + * + * @access public + * @param array options for the serialization + */ + function XML_Beautifier_Renderer($options = array()) + { + $this->_options = $options; + } + + /** + * Serialize the XML tokens + * + * @access public + * @param array XML tokens + * @return string XML document + * @abstract + */ + function serialize($tokens) + { + return ''; + } + + /** + * normalize the XML tree + * + * When normalizing an XML tree, adjacent data sections + * are combined to one data section. + * + * @access public + * @param array XML tree as returned by the tokenizer + * @return array XML tree + */ + function normalize($tokens) + { + $tmp = array(); + foreach ($tokens as $token) { + array_push($tmp, $this->_normalizeToken($token)); + } + return $tmp; + } + + /** + * normalize one element in the XML tree + * + * This method will combine all data sections of an element. + * + * @access private + * @param array $struct + * @return array $struct + */ + function _normalizeToken($token) + { + if ((isset($token["children"])) && !is_array($token["children"]) || empty($token["children"])) { + return $token; + } + + $children = $token["children"]; + $token["children"] = array(); + $cnt = count($children); + $inCData = false; + for ($i = 0; $i < $cnt; $i++ ) + { + // no data section + if ($children[$i]["type"] != XML_BEAUTIFIER_CDATA) { + $children[$i] = $this->_normalizeToken($children[$i]); + + $inCData = false; + array_push($token["children"], $children[$i]); + continue; + } + + /** + * remove whitespace + */ + if( $this->_options['removeLineBreaks'] == true ) + { + $children[$i]['data'] = trim($children[$i]['data']); + if( $children[$i]['data'] == '' ) { + continue; + } + } + + if ($inCData) { + $tmp = array_pop($token["children"]); + + if( $children[$i]['data'] != '' ) { + if( $tmp['data'] != '' && $this->_options['removeLineBreaks'] == true ) { + $tmp['data'] .= ' '; + } + $tmp["data"] .= $children[$i]["data"]; + } + array_push($token["children"], $tmp); + } else { + array_push($token["children"], $children[$i]); + } + + $inCData = true; + } + return $token; + } + + /** + * indent a text block consisting of several lines + * + * @access private + * @param string $text textblock + * @param integer $depth depth to indent + * @param boolean $trim trim the lines + * @return string indented text block + */ + function _indentTextBlock($text, $depth, $trim = false) + { + $indent = $this->_getIndentString($depth); + $tmp = explode("\n", $text); + $cnt = count($tmp); + $xml = ''; + for ($i = 0; $i < $cnt; $i++ ) { + if ($trim) { + $tmp[$i] = trim($tmp[$i]); + } + if( $tmp[$i] == '' ) + continue; + $xml .= $indent.$tmp[$i].$this->_options["linebreak"]; + } + return $xml; + } + + /** + * get the string that is used for indentation in a specific depth + * + * This depends on the option 'indent'. + * + * @access private + * @param integer $depth nesting level + * @return string indent string + */ + function _getIndentString($depth) + { + if ($depth > 0) { + return str_repeat($this->_options["indent"], $depth); + } + return ""; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/XML/Beautifier/Renderer/Plain.php b/campcaster/src/tools/pear/src/XML/Beautifier/Renderer/Plain.php new file mode 100644 index 000000000..29ab61b41 --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Beautifier/Renderer/Plain.php @@ -0,0 +1,258 @@ + | +// +----------------------------------------------------------------------+ + +/** + * XML/Beautifier/Renderer/Plain.php + * + * @category XML + * @package XML_Beautifier + * @author Stephan Schmidt + */ + +/** + * XML_Util is needed to create the tags + */ +require_once 'XML/Util.php'; + +/** + * Renderer base class + */ +require_once XML_BEAUTIFIER_INCLUDE_PATH . '/Renderer.php'; + +/** + * Basic XML Renderer for XML Beautifier + * + * @category XML + * @package XML_Beautifier + * @author Stephan Schmidt + * @todo option to specify inline tags + * @todo option to specify treatment of whitespac in data sections + * @todo automatically create sections + */ +class XML_Beautifier_Renderer_Plain extends XML_Beautifier_Renderer { + + /** + * Serialize the XML tokens + * + * @access public + * @param array XML tokens + * @return string XML document + */ + function serialize($tokens) + { + $tokens = $this->normalize($tokens); + + $xml = ''; + $cnt = count($tokens); + for($i = 0; $i < $cnt; $i++ ) + { + $xml .= $this->_serializeToken($tokens[$i]); + } + return $xml; + } + + /** + * serialize a token + * + * This method does the actual beautifying. + * + * @access private + * @param array $token structure that should be serialized + * @todo split this method into smaller methods + */ + function _serializeToken($token) + { + switch ($token["type"]) { + + /* + * serialize XML Element + */ + case XML_BEAUTIFIER_ELEMENT: + $indent = $this->_getIndentString($token["depth"]); + + // adjust tag case + if ($this->_options["caseFolding"] === true) { + switch ($this->_options["caseFoldingTo"]) { + case "uppercase": + $token["tagname"] = strtoupper($token["tagname"]); + $token["attribs"] = array_change_key_case($token["attribs"], CASE_UPPER); + break; + case "lowercase": + $token["tagname"] = strtolower($token["tagname"]); + $token["attribs"] = array_change_key_case($token["attribs"], CASE_LOWER); + break; + } + } + + if ($this->_options["multilineTags"] == true) { + $attIndent = $indent . str_repeat(" ", (2+strlen($token["tagname"]))); + } else { + $attIndent = null; + } + // check for children + switch ($token["contains"]) { + + // contains only CData or is empty + case XML_BEAUTIFIER_CDATA: + case XML_BEAUTIFIER_EMPTY: + if (sizeof($token["children"]) >= 1) { + $data = $token["children"][0]["data"]; + } else { + $data = ''; + } + + if( strstr( $data, "\n" ) ) + { + $data = "\n" . $this->_indentTextBlock( $data, $token['depth']+1, true ); + } + + $xml = $indent . XML_Util::createTag($token["tagname"], $token["attribs"], $data, null, XML_UTIL_REPLACE_ENTITIES, $this->_options["multilineTags"], $attIndent) + . $this->_options["linebreak"]; + break; + // contains mixed content + default: + $xml = $indent . XML_Util::createStartElement($token["tagname"], $token["attribs"], null, $this->_options["multilineTags"], $attIndent) + . $this->_options["linebreak"]; + + $cnt = count($token["children"]); + for ($i = 0; $i < $cnt; $i++) { + $xml .= $this->_serializeToken($token["children"][$i]); + } + $xml .= $indent . XML_Util::createEndElement($token["tagname"]) + . $this->_options["linebreak"]; + break; + break; + } + break; + + /* + * serialize CData + */ + case XML_BEAUTIFIER_CDATA: + if ($token["depth"] > 0) { + $xml = str_repeat($this->_options["indent"], $token["depth"]); + } else { + $xml = ""; + } + + $xml .= XML_Util::replaceEntities( $token["data"] ) . $this->_options["linebreak"]; + break; + + /* + * serialize entity + */ + case XML_BEAUTIFIER_ENTITY: + if ($token["depth"] > 0) { + $xml = str_repeat($this->_options["indent"], $token["depth"]); + } else { + $xml = ""; + } + $xml .= "&".$token["name"].";".$this->_options["linebreak"]; + break; + + + /* + * serialize Processing instruction + */ + case XML_BEAUTIFIER_PI: + $indent = $this->_getIndentString($token["depth"]); + + $xml = $indent."_options["linebreak"] + . $this->_indentTextBlock(rtrim($token["data"]), $token["depth"]) + . $indent."?>".$this->_options["linebreak"]; + break; + + /* + * comments + */ + case XML_BEAUTIFIER_COMMENT: + $lines = count(explode("\n",$token["data"])); + + /* + * normalize comment, i.e. combine it to one + * line and remove whitespace + */ + if ($this->_options["normalizeComments"] && $lines > 1){ + $comment = preg_replace("/\s\s+/s", " ", str_replace( "\n" , " ", $token["data"])); + $lines = 1; + } else { + $comment = $token["data"]; + } + + /* + * check for the maximum length of one line + */ + if ($this->_options["maxCommentLine"] > 0) { + if ($lines > 1) { + $commentLines = explode("\n", $comment); + } else { + $commentLines = array($comment); + } + + $comment = ""; + for ($i = 0; $i < $lines; $i++) { + if (strlen($commentLines[$i]) <= $this->_options["maxCommentLine"]) { + $comment .= $commentLines[$i]; + continue; + } + $comment .= wordwrap($commentLines[$i], $this->_options["maxCommentLine"] ); + if ($i != ($lines-1)) { + $comment .= "\n"; + } + } + $lines = count(explode("\n",$comment)); + } + + $indent = $this->_getIndentString($token["depth"]); + + if ($lines > 1) { + $xml = $indent . "" . $this->_options["linebreak"]; + } else { + $xml = $indent . sprintf( "", trim($comment) ) . $this->_options["linebreak"]; + } + break; + + /* + * xml declaration + */ + case XML_BEAUTIFIER_XML_DECLARATION: + $indent = $this->_getIndentString($token["depth"]); + $xml = $indent . XML_Util::getXMLDeclaration($token["version"], $token["encoding"], $token["standalone"]); + break; + + /* + * xml declaration + */ + case XML_BEAUTIFIER_DT_DECLARATION: + $xml = $token["data"]; + break; + + /* + * all other elements + */ + case XML_BEAUTIFIER_DEFAULT: + default: + $xml = XML_Util::replaceEntities( $token["data"] ); + break; + } + return $xml; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/XML/Beautifier/Tokenizer.php b/campcaster/src/tools/pear/src/XML/Beautifier/Tokenizer.php new file mode 100644 index 000000000..150b1bf20 --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Beautifier/Tokenizer.php @@ -0,0 +1,372 @@ + | +// +----------------------------------------------------------------------+ + +/** + * XML/Beautifier/Tokenizer.php + * + * @category XML + * @package XML_Beautifier + * @author Stephan Schmidt + * @todo tokenize DTD + * @todo check for xml:space attribute + */ + +/** + * XML_Parser is needed to parse the document + */ +require_once 'XML/Parser.php'; + +/** + * Tokenizer for XML_Beautifier + * + * This class breaks an XML document in seperate tokens + * that will be rendered by an XML_Beautifier renderer. + * + * @category XML + * @package XML_Beautifier + * @author Stephan Schmidt + */ +class XML_Beautifier_Tokenizer extends XML_Parser { + + /** + * current depth + * @var integer + * @access private + */ + var $_depth = 0; + + /** + * stack for all found elements + * @var array + * @access private + */ + var $_struct = array(); + + /** + * current parsing mode + * @var string + * @access private + */ + var $_mode = "xml"; + + /** + * Tokenize a document + * + * @param string $document filename or XML document + * @param boolean $isFile flag to indicate whether the first parameter is a file + */ + function tokenize( $document, $isFile = true ) + { + $this->folding = false; + $this->XML_Parser(); + $this->_resetVars(); + + if( $isFile === true ) { + $this->setInputFile($document); + $result = $this->parse(); + } + else { + $result = $this->parseString($document); + } + + if ($this->isError($result)) { + return $result; + } + + return $this->_struct; + } + + /** + * Start element handler for XML parser + * + * @access protected + * @param object $parser XML parser object + * @param string $element XML element + * @param array $attribs attributes of XML tag + * @return void + */ + function startHandler($parser, $element, $attribs) + { + $struct = array( + "type" => XML_BEAUTIFIER_ELEMENT, + "tagname" => $element, + "attribs" => $attribs, + "contains" => XML_BEAUTIFIER_EMPTY, + "depth" => $this->_depth++, + "children" => array() + ); + + array_push($this->_struct,$struct); + } + + /** + * End element handler for XML parser + * + * @access protected + * @param object XML parser object + * @param string + * @return void + */ + function endHandler($parser, $element) + { + $struct = array_pop($this->_struct); + if ($struct["depth"] > 0) { + $parent = array_pop($this->_struct); + array_push($parent["children"], $struct); + $parent["contains"] = $parent["contains"] | XML_BEAUTIFIER_ELEMENT; + array_push($this->_struct, $parent); + } else { + array_push($this->_struct, $struct); + } + $this->_depth--; + } + + /** + * Handler for character data + * + * @access protected + * @param object XML parser object + * @param string CDATA + * @return void + */ + function cdataHandler($parser, $cdata) + { + if ((string)$cdata === '') { + return true; + } + + $struct = array( + "type" => XML_BEAUTIFIER_CDATA, + "data" => $cdata, + "depth" => $this->_depth + ); + + $this->_appendToParent($struct); + } + + /** + * Handler for processing instructions + * + * @access protected + * @param object XML parser object + * @param string target + * @param string data + * @return void + */ + function piHandler($parser, $target, $data) + { + $struct = array( + "type" => XML_BEAUTIFIER_PI, + "target" => $target, + "data" => $data, + "depth" => $this->_depth + ); + + $this->_appendToParent($struct); + } + + /** + * Handler for external entities + * + * @access protected + * @param object XML parser object + * @param string target + * @param string data + * @return void + */ + function entityrefHandler($parser, $open_entity_names, $base, $system_id, $public_id) + { + $struct = array( + "type" => XML_BEAUTIFIER_ENTITY, + "name" => $open_entity_names, + "depth" => $this->_depth + ); + + $this->_appendToParent($struct); + return true; + } + + /** + * Handler for all other stuff + * + * @access protected + * @param object XML parser object + * @param string data + * @return void + */ + function defaultHandler($parser, $data) + { + switch ($this->_mode) { + case "xml": + $this->_handleXMLDefault($data); + break; + case "doctype": + $this->_handleDoctype($data); + break; + } + } + + /** + * handler for all data inside the doctype declaration + * + * @access private + * @param string data + * @todo improve doctype parsing to split the declaration into seperate tokens + */ + function _handleDoctype($data) + { + if (eregi(">", $data)) { + $last = $this->_getLastToken(); + if ($last["data"] == "]" ) { + $this->_mode = "xml"; + } + } + + $struct = array( + "type" => XML_BEAUTIFIER_DT_DECLARATION, + "data" => $data, + "depth" => $this->_depth + ); + $this->_appendToParent($struct); + } + + /** + * handler for all default XML data + * + * @access private + * @param string data + */ + function _handleXMLDefault($data) + { + /* + * handle comment + */ + if (strncmp("", $data, $regs); + $comment = trim($regs[1]); + + $struct = array( + "type" => XML_BEAUTIFIER_COMMENT, + "data" => $comment, + "depth" => $this->_depth + ); + /* + * handle XML declaration + */ + } elseif (strncmp(" XML_BEAUTIFIER_XML_DECLARATION, + "version" => $attribs["version"], + "encoding" => $attribs["encoding"], + "standalone" => $attribs["standalone"], + "depth" => $this->_depth + ); + } elseif (eregi("^_mode = "doctype"; + $struct = array( + "type" => XML_BEAUTIFIER_DT_DECLARATION, + "data" => $data, + "depth" => $this->_depth + ); + } else { + /* + * handle all other data + */ + $struct = array( + "type" => XML_BEAUTIFIER_DEFAULT, + "data" => $data, + "depth" => $this->_depth + ); + } + + $this->_appendToParent($struct); + return true; + } + + /** + * append a struct to the last struct on the stack + * + * @access private + * @param array $struct structure to append + */ + function _appendToParent($struct) + { + if ($this->_depth > 0) { + $parent = array_pop($this->_struct); + array_push($parent["children"], $struct); + $parent["contains"] = $parent["contains"] | $struct["type"]; + array_push($this->_struct, $parent); + return true; + } + array_push($this->_struct, $struct); + } + + /** + * get the last token + * + * @access private + * @return array + */ + function _getLastToken() + { + $parent = array_pop($this->_struct); + if (isset($parent["children"]) && is_array($parent["children"])) { + $last = array_pop($parent["children"]); + array_push($parent["children"], $last); + } else { + $last = $parent; + } + array_push($this->_struct, $parent); + + return $last; + } + + /** + * reset all used object properties + * + * This method is called before parsing a new document + * + * @access private + */ + function _resetVars() + { + $this->_depth = 0; + $this->_struct = array(); + $this->_mode = "xml"; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/XML/Parser.php b/campcaster/src/tools/pear/src/XML/Parser.php new file mode 100644 index 000000000..737fedc61 --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Parser.php @@ -0,0 +1,684 @@ + | +// | Tomas V.V.Cox | +// | Stephan Schmidt | +// +----------------------------------------------------------------------+ +// +// $Id: Parser.php,v 1.25 2005/03/25 17:13:10 schst Exp $ + +/** + * XML Parser class. + * + * This is an XML parser based on PHP's "xml" extension, + * based on the bundled expat library. + * + * @category XML + * @package XML_Parser + * @author Stig Bakken + * @author Tomas V.V.Cox + * @author Stephan Schmidt + */ + +/** + * uses PEAR's error handling + */ +require_once 'PEAR.php'; + +/** + * resource could not be created + */ +define('XML_PARSER_ERROR_NO_RESOURCE', 200); + +/** + * unsupported mode + */ +define('XML_PARSER_ERROR_UNSUPPORTED_MODE', 201); + +/** + * invalid encoding was given + */ +define('XML_PARSER_ERROR_INVALID_ENCODING', 202); + +/** + * specified file could not be read + */ +define('XML_PARSER_ERROR_FILE_NOT_READABLE', 203); + +/** + * invalid input + */ +define('XML_PARSER_ERROR_INVALID_INPUT', 204); + +/** + * remote file cannot be retrieved in safe mode + */ +define('XML_PARSER_ERROR_REMOTE', 205); + +/** + * XML Parser class. + * + * This is an XML parser based on PHP's "xml" extension, + * based on the bundled expat library. + * + * Notes: + * - It requires PHP 4.0.4pl1 or greater + * - From revision 1.17, the function names used by the 'func' mode + * are in the format "xmltag_$elem", for example: use "xmltag_name" + * to handle the tags of your xml file. + * + * @category XML + * @package XML_Parser + * @author Stig Bakken + * @author Tomas V.V.Cox + * @author Stephan Schmidt + * @todo create XML_Parser_Namespace to parse documents with namespaces + * @todo create XML_Parser_Pull + * @todo Tests that need to be made: + * - mixing character encodings + * - a test using all expat handlers + * - options (folding, output charset) + * - different parsing modes + */ +class XML_Parser extends PEAR +{ + // {{{ properties + + /** + * XML parser handle + * + * @var resource + * @see xml_parser_create() + */ + var $parser; + + /** + * File handle if parsing from a file + * + * @var resource + */ + var $fp; + + /** + * Whether to do case folding + * + * If set to true, all tag and attribute names will + * be converted to UPPER CASE. + * + * @var boolean + */ + var $folding = true; + + /** + * Mode of operation, one of "event" or "func" + * + * @var string + */ + var $mode; + + /** + * Mapping from expat handler function to class method. + * + * @var array + */ + var $handler = array( + 'character_data_handler' => 'cdataHandler', + 'default_handler' => 'defaultHandler', + 'processing_instruction_handler' => 'piHandler', + 'unparsed_entity_decl_handler' => 'unparsedHandler', + 'notation_decl_handler' => 'notationHandler', + 'external_entity_ref_handler' => 'entityrefHandler' + ); + + /** + * source encoding + * + * @var string + */ + var $srcenc; + + /** + * target encoding + * + * @var string + */ + var $tgtenc; + + /** + * handler object + * + * @var object + */ + var $_handlerObj; + + // }}} + // {{{ constructor + + /** + * Creates an XML parser. + * + * This is needed for PHP4 compatibility, it will + * call the constructor, when a new instance is created. + * + * @param string $srcenc source charset encoding, use NULL (default) to use + * whatever the document specifies + * @param string $mode how this parser object should work, "event" for + * startelement/endelement-type events, "func" + * to have it call functions named after elements + * @param string $tgenc a valid target encoding + */ + function XML_Parser($srcenc = null, $mode = 'event', $tgtenc = null) + { + XML_Parser::__construct($srcenc, $mode, $tgtenc); + } + // }}} + + /** + * PHP5 constructor + * + * @param string $srcenc source charset encoding, use NULL (default) to use + * whatever the document specifies + * @param string $mode how this parser object should work, "event" for + * startelement/endelement-type events, "func" + * to have it call functions named after elements + * @param string $tgenc a valid target encoding + */ + function __construct($srcenc = null, $mode = 'event', $tgtenc = null) + { + $this->PEAR('XML_Parser_Error'); + + $this->mode = $mode; + $this->srcenc = $srcenc; + $this->tgtenc = $tgtenc; + } + // }}} + + /** + * Sets the mode of the parser. + * + * Possible modes are: + * - func + * - event + * + * You can set the mode using the second parameter + * in the constructor. + * + * This method is only needed, when switching to a new + * mode at a later point. + * + * @access public + * @param string mode, either 'func' or 'event' + * @return boolean|object true on success, PEAR_Error otherwise + */ + function setMode($mode) + { + if ($mode != 'func' && $mode != 'event') { + $this->raiseError('Unsupported mode given', XML_PARSER_ERROR_UNSUPPORTED_MODE); + } + + $this->mode = $mode; + return true; + } + + /** + * Sets the object, that will handle the XML events + * + * This allows you to create a handler object independent of the + * parser object that you are using and easily switch the underlying + * parser. + * + * If no object will be set, XML_Parser assumes that you + * extend this class and handle the events in $this. + * + * @access public + * @param object object to handle the events + * @return boolean will always return true + * @since v1.2.0beta3 + */ + function setHandlerObj(&$obj) + { + $this->_handlerObj = &$obj; + return true; + } + + /** + * Init the element handlers + * + * @access private + */ + function _initHandlers() + { + if (!is_resource($this->parser)) { + return false; + } + + if (!is_object($this->_handlerObj)) { + $this->_handlerObj = &$this; + } + switch ($this->mode) { + + case 'func': + xml_set_object($this->parser, $this->_handlerObj); + xml_set_element_handler($this->parser, array(&$this, 'funcStartHandler'), array(&$this, 'funcEndHandler')); + break; + + case 'event': + xml_set_object($this->parser, $this->_handlerObj); + xml_set_element_handler($this->parser, 'startHandler', 'endHandler'); + break; + default: + return $this->raiseError('Unsupported mode given', XML_PARSER_ERROR_UNSUPPORTED_MODE); + break; + } + + + /** + * set additional handlers for character data, entities, etc. + */ + foreach ($this->handler as $xml_func => $method) { + if (method_exists($this->_handlerObj, $method)) { + $xml_func = 'xml_set_' . $xml_func; + $xml_func($this->parser, $method); + } + } + } + + // {{{ _create() + + /** + * create the XML parser resource + * + * Has been moved from the constructor to avoid + * problems with object references. + * + * Furthermore it allows us returning an error + * if something fails. + * + * @access private + * @return boolean|object true on success, PEAR_Error otherwise + * + * @see xml_parser_create + */ + function _create() + { + if ($this->srcenc === null) { + $xp = @xml_parser_create(); + } else { + $xp = @xml_parser_create($this->srcenc); + } + if (is_resource($xp)) { + if ($this->tgtenc !== null) { + if (!@xml_parser_set_option($xp, XML_OPTION_TARGET_ENCODING, + $this->tgtenc)) { + return $this->raiseError('invalid target encoding', XML_PARSER_ERROR_INVALID_ENCODING); + } + } + $this->parser = $xp; + $result = $this->_initHandlers($this->mode); + if ($this->isError($result)) { + return $result; + } + xml_parser_set_option($xp, XML_OPTION_CASE_FOLDING, $this->folding); + + return true; + } + return $this->raiseError('Unable to create XML parser resource.', XML_PARSER_ERROR_NO_RESOURCE); + } + + // }}} + // {{{ reset() + + /** + * Reset the parser. + * + * This allows you to use one parser instance + * to parse multiple XML documents. + * + * @access public + * @return boolean|object true on success, PEAR_Error otherwise + */ + function reset() + { + $result = $this->_create(); + if ($this->isError( $result )) { + return $result; + } + return true; + } + + // }}} + // {{{ setInputFile() + + /** + * Sets the input xml file to be parsed + * + * @param string Filename (full path) + * @return resource fopen handle of the given file + * @throws XML_Parser_Error + * @see setInput(), setInputString(), parse() + * @access public + */ + function setInputFile($file) + { + /** + * check, if file is a remote file + */ + if (eregi('^(http|ftp)://', substr($file, 0, 10))) { + if (!ini_get('allow_url_fopen')) { + return $this->raiseError('Remote files cannot be parsed, as safe mode is enabled.', XML_PARSER_ERROR_REMOTE); + } + } + + $fp = @fopen($file, 'rb'); + if (is_resource($fp)) { + $this->fp = $fp; + return $fp; + } + return $this->raiseError('File could not be opened.', XML_PARSER_ERROR_FILE_NOT_READABLE); + } + + // }}} + // {{{ setInputString() + + /** + * XML_Parser::setInputString() + * + * Sets the xml input from a string + * + * @param string $data a string containing the XML document + * @return null + **/ + function setInputString($data) + { + $this->fp = $data; + return null; + } + + // }}} + // {{{ setInput() + + /** + * Sets the file handle to use with parse(). + * + * You should use setInputFile() or setInputString() if you + * pass a string + * + * @param mixed $fp Can be either a resource returned from fopen(), + * a URL, a local filename or a string. + * @access public + * @see parse() + * @uses setInputString(), setInputFile() + */ + function setInput($fp) + { + if (is_resource($fp)) { + $this->fp = $fp; + return true; + } + // see if it's an absolute URL (has a scheme at the beginning) + elseif (eregi('^[a-z]+://', substr($fp, 0, 10))) { + return $this->setInputFile($fp); + } + // see if it's a local file + elseif (file_exists($fp)) { + return $this->setInputFile($fp); + } + // it must be a string + else { + $this->fp = $fp; + return true; + } + + return $this->raiseError('Illegal input format', XML_PARSER_ERROR_INVALID_INPUT); + } + + // }}} + // {{{ parse() + + /** + * Central parsing function. + * + * @return true|object PEAR error returns true on success, or a PEAR_Error otherwise + * @access public + */ + function parse() + { + /** + * reset the parser + */ + $result = $this->reset(); + if ($this->isError($result)) { + return $result; + } + // if $this->fp was fopened previously + if (is_resource($this->fp)) { + + while ($data = fread($this->fp, 4096)) { + if (!$this->_parseString($data, feof($this->fp))) { + $error = &$this->raiseError(); + $this->free(); + return $error; + } + } + // otherwise, $this->fp must be a string + } else { + if (!$this->_parseString($this->fp, true)) { + $error = &$this->raiseError(); + $this->free(); + return $error; + } + } + $this->free(); + + return true; + } + + /** + * XML_Parser::_parseString() + * + * @param string $data + * @param boolean $eof + * @return bool + * @access private + * @see parseString() + **/ + function _parseString($data, $eof = false) + { + return xml_parse($this->parser, $data, $eof); + } + + // }}} + // {{{ parseString() + + /** + * XML_Parser::parseString() + * + * Parses a string. + * + * @param string $data XML data + * @param boolean $eof If set and TRUE, data is the last piece of data sent in this parser + * @throws XML_Parser_Error + * @return Pear Error|true true on success or a PEAR Error + * @see _parseString() + */ + function parseString($data, $eof = false) + { + if (!isset($this->parser) || !is_resource($this->parser)) { + $this->reset(); + } + + if (!$this->_parseString($data, $eof)) { + $error = &$this->raiseError(); + $this->free(); + return $error; + } + + if ($eof === true) { + $this->free(); + } + return true; + } + + /** + * XML_Parser::free() + * + * Free the internal resources associated with the parser + * + * @return null + **/ + function free() + { + if (isset($this->parser) && is_resource($this->parser)) { + xml_parser_free($this->parser); + unset( $this->parser ); + } + if (isset($this->fp) && is_resource($this->fp)) { + fclose($this->fp); + } + unset($this->fp); + return null; + } + + /** + * XML_Parser::raiseError() + * + * Throws a XML_Parser_Error + * + * @param string $msg the error message + * @param integer $ecode the error message code + * @return XML_Parser_Error + **/ + function raiseError($msg = null, $ecode = 0) + { + $msg = !is_null($msg) ? $msg : $this->parser; + $err = &new XML_Parser_Error($msg, $ecode); + return parent::raiseError($err); + } + + // }}} + // {{{ funcStartHandler() + + function funcStartHandler($xp, $elem, $attribs) + { + $func = 'xmltag_' . $elem; + if (strchr($func, '.')) { + $func = str_replace('.', '_', $func); + } + if (method_exists($this->_handlerObj, $func)) { + call_user_func(array(&$this->_handlerObj, $func), $xp, $elem, $attribs); + } elseif (method_exists($this->_handlerObj, 'xmltag')) { + call_user_func(array(&$this->_handlerObj, 'xmltag'), $xp, $elem, $attribs); + } + } + + // }}} + // {{{ funcEndHandler() + + function funcEndHandler($xp, $elem) + { + $func = 'xmltag_' . $elem . '_'; + if (strchr($func, '.')) { + $func = str_replace('.', '_', $func); + } + if (method_exists($this->_handlerObj, $func)) { + call_user_func(array(&$this->_handlerObj, $func), $xp, $elem); + } elseif (method_exists($this->_handlerObj, 'xmltag_')) { + call_user_func(array(&$this->_handlerObj, 'xmltag_'), $xp, $elem); + } + } + + // }}} + // {{{ startHandler() + + /** + * + * @abstract + */ + function startHandler($xp, $elem, &$attribs) + { + return NULL; + } + + // }}} + // {{{ endHandler() + + /** + * + * @abstract + */ + function endHandler($xp, $elem) + { + return NULL; + } + + + // }}}me +} + +/** + * error class, replaces PEAR_Error + * + * An instance of this class will be returned + * if an error occurs inside XML_Parser. + * + * There are three advantages over using the standard PEAR_Error: + * - All messages will be prefixed + * - check for XML_Parser error, using is_a( $error, 'XML_Parser_Error' ) + * - messages can be generated from the xml_parser resource + * + * @package XML_Parser + * @access public + * @see PEAR_Error + */ +class XML_Parser_Error extends PEAR_Error +{ + // {{{ properties + + /** + * prefix for all messages + * + * @var string + */ + var $error_message_prefix = 'XML_Parser: '; + + // }}} + // {{{ constructor() + /** + * construct a new error instance + * + * You may either pass a message or an xml_parser resource as first + * parameter. If a resource has been passed, the last error that + * happened will be retrieved and returned. + * + * @access public + * @param string|resource message or parser resource + * @param integer error code + * @param integer error handling + * @param integer error level + */ + function XML_Parser_Error($msgorparser = 'unknown error', $code = 0, $mode = PEAR_ERROR_RETURN, $level = E_USER_NOTICE) + { + if (is_resource($msgorparser)) { + $code = xml_get_error_code($msgorparser); + $msgorparser = sprintf('%s at XML input line %d', + xml_error_string($code), + xml_get_current_line_number($msgorparser)); + } + $this->PEAR_Error($msgorparser, $code, $mode, $level); + } + // }}} +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/XML/Parser/Simple.php b/campcaster/src/tools/pear/src/XML/Parser/Simple.php new file mode 100644 index 000000000..aa60ec95c --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Parser/Simple.php @@ -0,0 +1,297 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Simple.php,v 1.6 2005/03/25 17:13:10 schst Exp $ + +/** + * Simple XML parser class. + * + * This class is a simplified version of XML_Parser. + * In most XML applications the real action is executed, + * when a closing tag is found. + * + * XML_Parser_Simple allows you to just implement one callback + * for each tag that will receive the tag with its attributes + * and CData + * + * @category XML + * @package XML_Parser + * @author Stephan Schmidt + */ + +/** + * built on XML_Parser + */ +require_once 'XML/Parser.php'; + +/** + * Simple XML parser class. + * + * This class is a simplified version of XML_Parser. + * In most XML applications the real action is executed, + * when a closing tag is found. + * + * XML_Parser_Simple allows you to just implement one callback + * for each tag that will receive the tag with its attributes + * and CData. + * + * + * require_once '../Parser/Simple.php'; + * + * class myParser extends XML_Parser_Simple + * { + * function myParser() + * { + * $this->XML_Parser_Simple(); + * } + * + * function handleElement($name, $attribs, $data) + * { + * printf('handle %s
', $name); + * } + * } + * + * $p = &new myParser(); + * + * $result = $p->setInputFile('myDoc.xml'); + * $result = $p->parse(); + * + * + * @category XML + * @package XML_Parser + * @author Stephan Schmidt + */ +class XML_Parser_Simple extends XML_Parser +{ + /** + * element stack + * + * @access private + * @var array + */ + var $_elStack = array(); + + /** + * all character data + * + * @access private + * @var array + */ + var $_data = array(); + + /** + * element depth + * + * @access private + * @var integer + */ + var $_depth = 0; + + /** + * Mapping from expat handler function to class method. + * + * @var array + */ + var $handler = array( + 'default_handler' => 'defaultHandler', + 'processing_instruction_handler' => 'piHandler', + 'unparsed_entity_decl_handler' => 'unparsedHandler', + 'notation_decl_handler' => 'notationHandler', + 'external_entity_ref_handler' => 'entityrefHandler' + ); + + /** + * Creates an XML parser. + * + * This is needed for PHP4 compatibility, it will + * call the constructor, when a new instance is created. + * + * @param string $srcenc source charset encoding, use NULL (default) to use + * whatever the document specifies + * @param string $mode how this parser object should work, "event" for + * handleElement(), "func" to have it call functions + * named after elements (handleElement_$name()) + * @param string $tgenc a valid target encoding + */ + function XML_Parser_Simple($srcenc = null, $mode = 'event', $tgtenc = null) + { + $this->XML_Parser($srcenc, $mode, $tgtenc); + } + + /** + * inits the handlers + * + * @access private + */ + function _initHandlers() + { + if (!is_object($this->_handlerObj)) { + $this->_handlerObj = &$this; + } + + if ($this->mode != 'func' && $this->mode != 'event') { + return $this->raiseError('Unsupported mode given', XML_PARSER_ERROR_UNSUPPORTED_MODE); + } + xml_set_object($this->parser, $this->_handlerObj); + + xml_set_element_handler($this->parser, array(&$this, 'startHandler'), array(&$this, 'endHandler')); + xml_set_character_data_handler($this->parser, array(&$this, 'cdataHandler')); + + /** + * set additional handlers for character data, entities, etc. + */ + foreach ($this->handler as $xml_func => $method) { + if (method_exists($this->_handlerObj, $method)) { + $xml_func = 'xml_set_' . $xml_func; + $xml_func($this->parser, $method); + } + } + } + + /** + * Reset the parser. + * + * This allows you to use one parser instance + * to parse multiple XML documents. + * + * @access public + * @return boolean|object true on success, PEAR_Error otherwise + */ + function reset() + { + $this->_elStack = array(); + $this->_data = array(); + $this->_depth = 0; + + $result = $this->_create(); + if ($this->isError( $result )) { + return $result; + } + return true; + } + + /** + * start handler + * + * Pushes attributes and tagname onto a stack + * + * @access private + * @final + * @param resource xml parser resource + * @param string element name + * @param array attributes + */ + function startHandler($xp, $elem, &$attribs) + { + array_push($this->_elStack, array( + 'name' => $elem, + 'attribs' => $attribs + ) + ); + $this->_depth++; + $this->_data[$this->_depth] = ''; + } + + /** + * end handler + * + * Pulls attributes and tagname from a stack + * + * @access private + * @final + * @param resource xml parser resource + * @param string element name + */ + function endHandler($xp, $elem) + { + $el = array_pop($this->_elStack); + $data = $this->_data[$this->_depth]; + $this->_depth--; + + switch ($this->mode) { + case 'event': + $this->_handlerObj->handleElement($el['name'], $el['attribs'], $data); + break; + case 'func': + $func = 'handleElement_' . $elem; + if (strchr($func, '.')) { + $func = str_replace('.', '_', $func); + } + if (method_exists($this->_handlerObj, $func)) { + call_user_func(array(&$this->_handlerObj, $func), $el['name'], $el['attribs'], $data); + } + break; + } + } + + /** + * handle character data + * + * @access private + * @final + * @param resource xml parser resource + * @param string data + */ + function cdataHandler($xp, $data) + { + $this->_data[$this->_depth] .= $data; + } + + /** + * handle a tag + * + * Implement this in your parser + * + * @access public + * @abstract + * @param string element name + * @param array attributes + * @param string character data + */ + function handleElement($name, $attribs, $data) + { + } + + /** + * get the current tag depth + * + * The root tag is in depth 0. + * + * @access public + * @return integer + */ + function getCurrentDepth() + { + return $this->_depth; + } + + /** + * add some string to the current ddata. + * + * This is commonly needed, when a document is parsed recursively. + * + * @access public + * @param string data to add + * @return void + */ + function addToData( $data ) + { + $this->_data[$this->_depth] .= $data; + } +} +?> diff --git a/campcaster/src/tools/pear/src/XML/RPC.php b/campcaster/src/tools/pear/src/XML/RPC.php new file mode 100644 index 000000000..f3baec277 --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/RPC.php @@ -0,0 +1,2077 @@ + + * @author Stig Bakken + * @author Martin Jansen + * @author Daniel Convissor + * @copyright 1999-2001 Edd Dumbill, 2001-2006 The PHP Group + * @version CVS: $Id: RPC.php,v 1.101 2006/10/28 16:42:34 danielc Exp $ + * @link http://pear.php.net/package/XML_RPC + */ + + +if (!function_exists('xml_parser_create')) { + include_once 'PEAR.php'; + PEAR::loadExtension('xml'); +} + +/**#@+ + * Error constants + */ +/** + * Parameter values don't match parameter types + */ +define('XML_RPC_ERROR_INVALID_TYPE', 101); +/** + * Parameter declared to be numeric but the values are not + */ +define('XML_RPC_ERROR_NON_NUMERIC_FOUND', 102); +/** + * Communication error + */ +define('XML_RPC_ERROR_CONNECTION_FAILED', 103); +/** + * The array or struct has already been started + */ +define('XML_RPC_ERROR_ALREADY_INITIALIZED', 104); +/** + * Incorrect parameters submitted + */ +define('XML_RPC_ERROR_INCORRECT_PARAMS', 105); +/** + * Programming error by developer + */ +define('XML_RPC_ERROR_PROGRAMMING', 106); +/**#@-*/ + + +/** + * Data types + * @global string $GLOBALS['XML_RPC_I4'] + */ +$GLOBALS['XML_RPC_I4'] = 'i4'; + +/** + * Data types + * @global string $GLOBALS['XML_RPC_Int'] + */ +$GLOBALS['XML_RPC_Int'] = 'int'; + +/** + * Data types + * @global string $GLOBALS['XML_RPC_Boolean'] + */ +$GLOBALS['XML_RPC_Boolean'] = 'boolean'; + +/** + * Data types + * @global string $GLOBALS['XML_RPC_Double'] + */ +$GLOBALS['XML_RPC_Double'] = 'double'; + +/** + * Data types + * @global string $GLOBALS['XML_RPC_String'] + */ +$GLOBALS['XML_RPC_String'] = 'string'; + +/** + * Data types + * @global string $GLOBALS['XML_RPC_DateTime'] + */ +$GLOBALS['XML_RPC_DateTime'] = 'dateTime.iso8601'; + +/** + * Data types + * @global string $GLOBALS['XML_RPC_Base64'] + */ +$GLOBALS['XML_RPC_Base64'] = 'base64'; + +/** + * Data types + * @global string $GLOBALS['XML_RPC_Array'] + */ +$GLOBALS['XML_RPC_Array'] = 'array'; + +/** + * Data types + * @global string $GLOBALS['XML_RPC_Struct'] + */ +$GLOBALS['XML_RPC_Struct'] = 'struct'; + + +/** + * Data type meta-types + * @global array $GLOBALS['XML_RPC_Types'] + */ +$GLOBALS['XML_RPC_Types'] = array( + $GLOBALS['XML_RPC_I4'] => 1, + $GLOBALS['XML_RPC_Int'] => 1, + $GLOBALS['XML_RPC_Boolean'] => 1, + $GLOBALS['XML_RPC_String'] => 1, + $GLOBALS['XML_RPC_Double'] => 1, + $GLOBALS['XML_RPC_DateTime'] => 1, + $GLOBALS['XML_RPC_Base64'] => 1, + $GLOBALS['XML_RPC_Array'] => 2, + $GLOBALS['XML_RPC_Struct'] => 3, +); + + +/** + * Error message numbers + * @global array $GLOBALS['XML_RPC_err'] + */ +$GLOBALS['XML_RPC_err'] = array( + 'unknown_method' => 1, + 'invalid_return' => 2, + 'incorrect_params' => 3, + 'introspect_unknown' => 4, + 'http_error' => 5, + 'not_response_object' => 6, + 'invalid_request' => 7, +); + +/** + * Error message strings + * @global array $GLOBALS['XML_RPC_str'] + */ +$GLOBALS['XML_RPC_str'] = array( + 'unknown_method' => 'Unknown method', + 'invalid_return' => 'Invalid return payload: enable debugging to examine incoming payload', + 'incorrect_params' => 'Incorrect parameters passed to method', + 'introspect_unknown' => 'Can\'t introspect: method unknown', + 'http_error' => 'Didn\'t receive 200 OK from remote server.', + 'not_response_object' => 'The requested method didn\'t return an XML_RPC_Response object.', + 'invalid_request' => 'Invalid request payload', +); + + +/** + * Default XML encoding (ISO-8859-1, UTF-8 or US-ASCII) + * @global string $GLOBALS['XML_RPC_defencoding'] + */ +$GLOBALS['XML_RPC_defencoding'] = 'UTF-8'; + +/** + * User error codes start at 800 + * @global int $GLOBALS['XML_RPC_erruser'] + */ +$GLOBALS['XML_RPC_erruser'] = 800; + +/** + * XML parse error codes start at 100 + * @global int $GLOBALS['XML_RPC_errxml'] + */ +$GLOBALS['XML_RPC_errxml'] = 100; + + +/** + * Compose backslashes for escaping regexp + * @global string $GLOBALS['XML_RPC_backslash'] + */ +$GLOBALS['XML_RPC_backslash'] = chr(92) . chr(92); + + +/**#@+ + * Which functions to use, depending on whether mbstring is enabled or not. + */ +if (function_exists('mb_ereg')) { + /** @global string $GLOBALS['XML_RPC_func_ereg'] */ + $GLOBALS['XML_RPC_func_ereg'] = 'mb_eregi'; + /** @global string $GLOBALS['XML_RPC_func_ereg_replace'] */ + $GLOBALS['XML_RPC_func_ereg_replace'] = 'mb_eregi_replace'; + /** @global string $GLOBALS['XML_RPC_func_split'] */ + $GLOBALS['XML_RPC_func_split'] = 'mb_split'; +} else { + /** @ignore */ + $GLOBALS['XML_RPC_func_ereg'] = 'eregi'; + /** @ignore */ + $GLOBALS['XML_RPC_func_ereg_replace'] = 'eregi_replace'; + /** @ignore */ + $GLOBALS['XML_RPC_func_split'] = 'split'; +} +/**#@-*/ + + +/** + * Should we automatically base64 encode strings that contain characters + * which can cause PHP's SAX-based XML parser to break? + * @global boolean $GLOBALS['XML_RPC_auto_base64'] + */ +$GLOBALS['XML_RPC_auto_base64'] = false; + + +/** + * Valid parents of XML elements + * @global array $GLOBALS['XML_RPC_valid_parents'] + */ +$GLOBALS['XML_RPC_valid_parents'] = array( + 'BOOLEAN' => array('VALUE'), + 'I4' => array('VALUE'), + 'INT' => array('VALUE'), + 'STRING' => array('VALUE'), + 'DOUBLE' => array('VALUE'), + 'DATETIME.ISO8601' => array('VALUE'), + 'BASE64' => array('VALUE'), + 'ARRAY' => array('VALUE'), + 'STRUCT' => array('VALUE'), + 'PARAM' => array('PARAMS'), + 'METHODNAME' => array('METHODCALL'), + 'PARAMS' => array('METHODCALL', 'METHODRESPONSE'), + 'MEMBER' => array('STRUCT'), + 'NAME' => array('MEMBER'), + 'DATA' => array('ARRAY'), + 'FAULT' => array('METHODRESPONSE'), + 'VALUE' => array('MEMBER', 'DATA', 'PARAM', 'FAULT'), +); + + +/** + * Stores state during parsing + * + * quick explanation of components: + * + ac = accumulates values + * + qt = decides if quotes are needed for evaluation + * + cm = denotes struct or array (comma needed) + * + isf = indicates a fault + * + lv = indicates "looking for a value": implements the logic + * to allow values with no types to be strings + * + params = stores parameters in method calls + * + method = stores method name + * + * @global array $GLOBALS['XML_RPC_xh'] + */ +$GLOBALS['XML_RPC_xh'] = array(); + + +/** + * Start element handler for the XML parser + * + * @return void + */ +function XML_RPC_se($parser_resource, $name, $attrs) +{ + global $XML_RPC_xh, $XML_RPC_valid_parents; + + $parser = (int) $parser_resource; + + // if invalid xmlrpc already detected, skip all processing + if ($XML_RPC_xh[$parser]['isf'] >= 2) { + return; + } + + // check for correct element nesting + // top level element can only be of 2 types + if (count($XML_RPC_xh[$parser]['stack']) == 0) { + if ($name != 'METHODRESPONSE' && $name != 'METHODCALL') { + $XML_RPC_xh[$parser]['isf'] = 2; + $XML_RPC_xh[$parser]['isf_reason'] = 'missing top level xmlrpc element'; + return; + } + } else { + // not top level element: see if parent is OK + if (!in_array($XML_RPC_xh[$parser]['stack'][0], $XML_RPC_valid_parents[$name])) { + $name = $GLOBALS['XML_RPC_func_ereg_replace']('[^a-zA-Z0-9._-]', '', $name); + $XML_RPC_xh[$parser]['isf'] = 2; + $XML_RPC_xh[$parser]['isf_reason'] = "xmlrpc element $name cannot be child of {$XML_RPC_xh[$parser]['stack'][0]}"; + return; + } + } + + switch ($name) { + case 'STRUCT': + $XML_RPC_xh[$parser]['cm']++; + + // turn quoting off + $XML_RPC_xh[$parser]['qt'] = 0; + + $cur_val = array(); + $cur_val['value'] = array(); + $cur_val['members'] = 1; + array_unshift($XML_RPC_xh[$parser]['valuestack'], $cur_val); + break; + + case 'ARRAY': + $XML_RPC_xh[$parser]['cm']++; + + // turn quoting off + $XML_RPC_xh[$parser]['qt'] = 0; + + $cur_val = array(); + $cur_val['value'] = array(); + $cur_val['members'] = 0; + array_unshift($XML_RPC_xh[$parser]['valuestack'], $cur_val); + break; + + case 'NAME': + $XML_RPC_xh[$parser]['ac'] = ''; + break; + + case 'FAULT': + $XML_RPC_xh[$parser]['isf'] = 1; + break; + + case 'PARAM': + $XML_RPC_xh[$parser]['valuestack'] = array(); + break; + + case 'VALUE': + $XML_RPC_xh[$parser]['lv'] = 1; + $XML_RPC_xh[$parser]['vt'] = $GLOBALS['XML_RPC_String']; + $XML_RPC_xh[$parser]['ac'] = ''; + $XML_RPC_xh[$parser]['qt'] = 0; + // look for a value: if this is still 1 by the + // time we reach the first data segment then the type is string + // by implication and we need to add in a quote + break; + + case 'I4': + case 'INT': + case 'STRING': + case 'BOOLEAN': + case 'DOUBLE': + case 'DATETIME.ISO8601': + case 'BASE64': + $XML_RPC_xh[$parser]['ac'] = ''; // reset the accumulator + + if ($name == 'DATETIME.ISO8601' || $name == 'STRING') { + $XML_RPC_xh[$parser]['qt'] = 1; + + if ($name == 'DATETIME.ISO8601') { + $XML_RPC_xh[$parser]['vt'] = $GLOBALS['XML_RPC_DateTime']; + } + + } elseif ($name == 'BASE64') { + $XML_RPC_xh[$parser]['qt'] = 2; + } else { + // No quoting is required here -- but + // at the end of the element we must check + // for data format errors. + $XML_RPC_xh[$parser]['qt'] = 0; + } + break; + + case 'MEMBER': + $XML_RPC_xh[$parser]['ac'] = ''; + break; + + case 'DATA': + case 'METHODCALL': + case 'METHODNAME': + case 'METHODRESPONSE': + case 'PARAMS': + // valid elements that add little to processing + break; + } + + + // Save current element to stack + array_unshift($XML_RPC_xh[$parser]['stack'], $name); + + if ($name != 'VALUE') { + $XML_RPC_xh[$parser]['lv'] = 0; + } +} + +/** + * End element handler for the XML parser + * + * @return void + */ +function XML_RPC_ee($parser_resource, $name) +{ + global $XML_RPC_xh; + + $parser = (int) $parser_resource; + + if ($XML_RPC_xh[$parser]['isf'] >= 2) { + return; + } + + // push this element from stack + // NB: if XML validates, correct opening/closing is guaranteed and + // we do not have to check for $name == $curr_elem. + // we also checked for proper nesting at start of elements... + $curr_elem = array_shift($XML_RPC_xh[$parser]['stack']); + + switch ($name) { + case 'STRUCT': + case 'ARRAY': + $cur_val = array_shift($XML_RPC_xh[$parser]['valuestack']); + $XML_RPC_xh[$parser]['value'] = $cur_val['value']; + $XML_RPC_xh[$parser]['vt'] = strtolower($name); + $XML_RPC_xh[$parser]['cm']--; + break; + + case 'NAME': + $XML_RPC_xh[$parser]['valuestack'][0]['name'] = $XML_RPC_xh[$parser]['ac']; + break; + + case 'BOOLEAN': + // special case here: we translate boolean 1 or 0 into PHP + // constants true or false + if ($XML_RPC_xh[$parser]['ac'] == '1') { + $XML_RPC_xh[$parser]['ac'] = 'true'; + } else { + $XML_RPC_xh[$parser]['ac'] = 'false'; + } + + $XML_RPC_xh[$parser]['vt'] = strtolower($name); + // Drop through intentionally. + + case 'I4': + case 'INT': + case 'STRING': + case 'DOUBLE': + case 'DATETIME.ISO8601': + case 'BASE64': + if ($XML_RPC_xh[$parser]['qt'] == 1) { + // we use double quotes rather than single so backslashification works OK + $XML_RPC_xh[$parser]['value'] = $XML_RPC_xh[$parser]['ac']; + } elseif ($XML_RPC_xh[$parser]['qt'] == 2) { + $XML_RPC_xh[$parser]['value'] = base64_decode($XML_RPC_xh[$parser]['ac']); + } elseif ($name == 'BOOLEAN') { + $XML_RPC_xh[$parser]['value'] = $XML_RPC_xh[$parser]['ac']; + } else { + // we have an I4, INT or a DOUBLE + // we must check that only 0123456789-. are characters here + if (!$GLOBALS['XML_RPC_func_ereg']("^[+-]?[0123456789 \t\.]+$", $XML_RPC_xh[$parser]['ac'])) { + XML_RPC_Base::raiseError('Non-numeric value received in INT or DOUBLE', + XML_RPC_ERROR_NON_NUMERIC_FOUND); + $XML_RPC_xh[$parser]['value'] = XML_RPC_ERROR_NON_NUMERIC_FOUND; + } else { + // it's ok, add it on + $XML_RPC_xh[$parser]['value'] = $XML_RPC_xh[$parser]['ac']; + } + } + + $XML_RPC_xh[$parser]['ac'] = ''; + $XML_RPC_xh[$parser]['qt'] = 0; + $XML_RPC_xh[$parser]['lv'] = 3; // indicate we've found a value + break; + + case 'VALUE': + if ($XML_RPC_xh[$parser]['vt'] == $GLOBALS['XML_RPC_String']) { + if (strlen($XML_RPC_xh[$parser]['ac']) > 0) { + $XML_RPC_xh[$parser]['value'] = $XML_RPC_xh[$parser]['ac']; + } elseif ($XML_RPC_xh[$parser]['lv'] == 1) { + // The element was empty. + $XML_RPC_xh[$parser]['value'] = ''; + } + } + + $temp = new XML_RPC_Value($XML_RPC_xh[$parser]['value'], $XML_RPC_xh[$parser]['vt']); + + $cur_val = array_shift($XML_RPC_xh[$parser]['valuestack']); + if (is_array($cur_val)) { + if ($cur_val['members']==0) { + $cur_val['value'][] = $temp; + } else { + $XML_RPC_xh[$parser]['value'] = $temp; + } + array_unshift($XML_RPC_xh[$parser]['valuestack'], $cur_val); + } else { + $XML_RPC_xh[$parser]['value'] = $temp; + } + break; + + case 'MEMBER': + $XML_RPC_xh[$parser]['ac'] = ''; + $XML_RPC_xh[$parser]['qt'] = 0; + + $cur_val = array_shift($XML_RPC_xh[$parser]['valuestack']); + if (is_array($cur_val)) { + if ($cur_val['members']==1) { + $cur_val['value'][$cur_val['name']] = $XML_RPC_xh[$parser]['value']; + } + array_unshift($XML_RPC_xh[$parser]['valuestack'], $cur_val); + } + break; + + case 'DATA': + $XML_RPC_xh[$parser]['ac'] = ''; + $XML_RPC_xh[$parser]['qt'] = 0; + break; + + case 'PARAM': + $XML_RPC_xh[$parser]['params'][] = $XML_RPC_xh[$parser]['value']; + break; + + case 'METHODNAME': + case 'RPCMETHODNAME': + $XML_RPC_xh[$parser]['method'] = $GLOBALS['XML_RPC_func_ereg_replace']("^[\n\r\t ]+", '', + $XML_RPC_xh[$parser]['ac']); + break; + } + + // if it's a valid type name, set the type + if (isset($GLOBALS['XML_RPC_Types'][strtolower($name)])) { + $XML_RPC_xh[$parser]['vt'] = strtolower($name); + } +} + +/** + * Character data handler for the XML parser + * + * @return void + */ +function XML_RPC_cd($parser_resource, $data) +{ + global $XML_RPC_xh, $XML_RPC_backslash; + + $parser = (int) $parser_resource; + + if ($XML_RPC_xh[$parser]['lv'] != 3) { + // "lookforvalue==3" means that we've found an entire value + // and should discard any further character data + + if ($XML_RPC_xh[$parser]['lv'] == 1) { + // if we've found text and we're just in a then + // turn quoting on, as this will be a string + $XML_RPC_xh[$parser]['qt'] = 1; + // and say we've found a value + $XML_RPC_xh[$parser]['lv'] = 2; + } + + // replace characters that eval would + // do special things with + if (!isset($XML_RPC_xh[$parser]['ac'])) { + $XML_RPC_xh[$parser]['ac'] = ''; + } + $XML_RPC_xh[$parser]['ac'] .= $data; + } +} + +/** + * The common methods and properties for all of the XML_RPC classes + * + * @category Web Services + * @package XML_RPC + * @author Edd Dumbill + * @author Stig Bakken + * @author Martin Jansen + * @author Daniel Convissor + * @copyright 1999-2001 Edd Dumbill, 2001-2006 The PHP Group + * @version Release: 1.5.1 + * @link http://pear.php.net/package/XML_RPC + */ +class XML_RPC_Base { + + /** + * PEAR Error handling + * + * @return object PEAR_Error object + */ + function raiseError($msg, $code) + { + include_once 'PEAR.php'; + if (is_object(@$this)) { + return PEAR::raiseError(get_class($this) . ': ' . $msg, $code); + } else { + return PEAR::raiseError('XML_RPC: ' . $msg, $code); + } + } + + /** + * Tell whether something is a PEAR_Error object + * + * @param mixed $value the item to check + * + * @return bool whether $value is a PEAR_Error object or not + * + * @access public + */ + function isError($value) + { + return is_a($value, 'PEAR_Error'); + } +} + +/** + * The methods and properties for submitting XML RPC requests + * + * @category Web Services + * @package XML_RPC + * @author Edd Dumbill + * @author Stig Bakken + * @author Martin Jansen + * @author Daniel Convissor + * @copyright 1999-2001 Edd Dumbill, 2001-2006 The PHP Group + * @version Release: 1.5.1 + * @link http://pear.php.net/package/XML_RPC + */ +class XML_RPC_Client extends XML_RPC_Base { + + /** + * The path and name of the RPC server script you want the request to go to + * @var string + */ + var $path = ''; + + /** + * The name of the remote server to connect to + * @var string + */ + var $server = ''; + + /** + * The protocol to use in contacting the remote server + * @var string + */ + var $protocol = 'http://'; + + /** + * The port for connecting to the remote server + * + * The default is 80 for http:// connections + * and 443 for https:// and ssl:// connections. + * + * @var integer + */ + var $port = 80; + + /** + * A user name for accessing the RPC server + * @var string + * @see XML_RPC_Client::setCredentials() + */ + var $username = ''; + + /** + * A password for accessing the RPC server + * @var string + * @see XML_RPC_Client::setCredentials() + */ + var $password = ''; + + /** + * The name of the proxy server to use, if any + * @var string + */ + var $proxy = ''; + + /** + * The protocol to use in contacting the proxy server, if any + * @var string + */ + var $proxy_protocol = 'http://'; + + /** + * The port for connecting to the proxy server + * + * The default is 8080 for http:// connections + * and 443 for https:// and ssl:// connections. + * + * @var integer + */ + var $proxy_port = 8080; + + /** + * A user name for accessing the proxy server + * @var string + */ + var $proxy_user = ''; + + /** + * A password for accessing the proxy server + * @var string + */ + var $proxy_pass = ''; + + /** + * The error number, if any + * @var integer + */ + var $errno = 0; + + /** + * The error message, if any + * @var string + */ + var $errstr = ''; + + /** + * The current debug mode (1 = on, 0 = off) + * @var integer + */ + var $debug = 0; + + /** + * The HTTP headers for the current request. + * @var string + */ + var $headers = ''; + + + /** + * Sets the object's properties + * + * @param string $path the path and name of the RPC server script + * you want the request to go to + * @param string $server the URL of the remote server to connect to. + * If this parameter doesn't specify a + * protocol and $port is 443, ssl:// is + * assumed. + * @param integer $port a port for connecting to the remote server. + * Defaults to 80 for http:// connections and + * 443 for https:// and ssl:// connections. + * @param string $proxy the URL of the proxy server to use, if any. + * If this parameter doesn't specify a + * protocol and $port is 443, ssl:// is + * assumed. + * @param integer $proxy_port a port for connecting to the remote server. + * Defaults to 8080 for http:// connections and + * 443 for https:// and ssl:// connections. + * @param string $proxy_user a user name for accessing the proxy server + * @param string $proxy_pass a password for accessing the proxy server + * + * @return void + */ + function XML_RPC_Client($path, $server, $port = 0, + $proxy = '', $proxy_port = 0, + $proxy_user = '', $proxy_pass = '') + { + $this->path = $path; + $this->proxy_user = $proxy_user; + $this->proxy_pass = $proxy_pass; + + $GLOBALS['XML_RPC_func_ereg']('^(http://|https://|ssl://)?(.*)$', $server, $match); + if ($match[1] == '') { + if ($port == 443) { + $this->server = $match[2]; + $this->protocol = 'ssl://'; + $this->port = 443; + } else { + $this->server = $match[2]; + if ($port) { + $this->port = $port; + } + } + } elseif ($match[1] == 'http://') { + $this->server = $match[2]; + if ($port) { + $this->port = $port; + } + } else { + $this->server = $match[2]; + $this->protocol = 'ssl://'; + if ($port) { + $this->port = $port; + } else { + $this->port = 443; + } + } + + if ($proxy) { + $GLOBALS['XML_RPC_func_ereg']('^(http://|https://|ssl://)?(.*)$', $proxy, $match); + if ($match[1] == '') { + if ($proxy_port == 443) { + $this->proxy = $match[2]; + $this->proxy_protocol = 'ssl://'; + $this->proxy_port = 443; + } else { + $this->proxy = $match[2]; + if ($proxy_port) { + $this->proxy_port = $proxy_port; + } + } + } elseif ($match[1] == 'http://') { + $this->proxy = $match[2]; + if ($proxy_port) { + $this->proxy_port = $proxy_port; + } + } else { + $this->proxy = $match[2]; + $this->proxy_protocol = 'ssl://'; + if ($proxy_port) { + $this->proxy_port = $proxy_port; + } else { + $this->proxy_port = 443; + } + } + } + } + + /** + * Change the current debug mode + * + * @param int $in where 1 = on, 0 = off + * + * @return void + */ + function setDebug($in) + { + if ($in) { + $this->debug = 1; + } else { + $this->debug = 0; + } + } + + /** + * Sets whether strings that contain characters which may cause PHP's + * SAX-based XML parser to break should be automatically base64 encoded + * + * This is is a workaround for systems that don't have PHP's mbstring + * extension available. + * + * @param int $in where 1 = on, 0 = off + * + * @return void + */ + function setAutoBase64($in) + { + if ($in) { + $GLOBALS['XML_RPC_auto_base64'] = true; + } else { + $GLOBALS['XML_RPC_auto_base64'] = false; + } + } + + /** + * Set username and password properties for connecting to the RPC server + * + * @param string $u the user name + * @param string $p the password + * + * @return void + * + * @see XML_RPC_Client::$username, XML_RPC_Client::$password + */ + function setCredentials($u, $p) + { + $this->username = $u; + $this->password = $p; + } + + /** + * Transmit the RPC request via HTTP 1.0 protocol + * + * @param object $msg the XML_RPC_Message object + * @param int $timeout how many seconds to wait for the request + * + * @return object an XML_RPC_Response object. 0 is returned if any + * problems happen. + * + * @see XML_RPC_Message, XML_RPC_Client::XML_RPC_Client(), + * XML_RPC_Client::setCredentials() + */ + function send($msg, $timeout = 0) + { + if (!is_a($msg, 'XML_RPC_Message')) { + $this->errstr = 'send()\'s $msg parameter must be an' + . ' XML_RPC_Message object.'; + $this->raiseError($this->errstr, XML_RPC_ERROR_PROGRAMMING); + return 0; + } + $msg->debug = $this->debug; + return $this->sendPayloadHTTP10($msg, $this->server, $this->port, + $timeout, $this->username, + $this->password); + } + + /** + * Transmit the RPC request via HTTP 1.0 protocol + * + * Requests should be sent using XML_RPC_Client send() rather than + * calling this method directly. + * + * @param object $msg the XML_RPC_Message object + * @param string $server the server to send the request to + * @param int $port the server port send the request to + * @param int $timeout how many seconds to wait for the request + * before giving up + * @param string $username a user name for accessing the RPC server + * @param string $password a password for accessing the RPC server + * + * @return object an XML_RPC_Response object. 0 is returned if any + * problems happen. + * + * @access protected + * @see XML_RPC_Client::send() + */ + function sendPayloadHTTP10($msg, $server, $port, $timeout = 0, + $username = '', $password = '') + { + /* + * If we're using a proxy open a socket to the proxy server + * instead to the xml-rpc server + */ + if ($this->proxy) { + if ($this->proxy_protocol == 'http://') { + $protocol = ''; + } else { + $protocol = $this->proxy_protocol; + } + if ($timeout > 0) { + $fp = @fsockopen($protocol . $this->proxy, $this->proxy_port, + $this->errno, $this->errstr, $timeout); + } else { + $fp = @fsockopen($protocol . $this->proxy, $this->proxy_port, + $this->errno, $this->errstr); + } + } else { + if ($this->protocol == 'http://') { + $protocol = ''; + } else { + $protocol = $this->protocol; + } + if ($timeout > 0) { + $fp = @fsockopen($protocol . $server, $port, + $this->errno, $this->errstr, $timeout); + } else { + $fp = @fsockopen($protocol . $server, $port, + $this->errno, $this->errstr); + } + } + + /* + * Just raising the error without returning it is strange, + * but keep it here for backwards compatibility. + */ + if (!$fp && $this->proxy) { + $this->raiseError('Connection to proxy server ' + . $this->proxy . ':' . $this->proxy_port + . ' failed. ' . $this->errstr, + XML_RPC_ERROR_CONNECTION_FAILED); + return 0; + } elseif (!$fp) { + $this->raiseError('Connection to RPC server ' + . $server . ':' . $port + . ' failed. ' . $this->errstr, + XML_RPC_ERROR_CONNECTION_FAILED); + return 0; + } + + if ($timeout) { + /* + * Using socket_set_timeout() because stream_set_timeout() + * was introduced in 4.3.0, but we need to support 4.2.0. + */ + socket_set_timeout($fp, $timeout); + } + + // Pre-emptive BC hacks for fools calling sendPayloadHTTP10() directly + if ($username != $this->username) { + $this->setCredentials($username, $password); + } + + // Only create the payload if it was not created previously + if (empty($msg->payload)) { + $msg->createPayload(); + } + $this->createHeaders($msg); + + $op = $this->headers . "\r\n\r\n"; + $op .= $msg->payload; + + if (!fputs($fp, $op, strlen($op))) { + $this->errstr = 'Write error'; + return 0; + } + $resp = $msg->parseResponseFile($fp); + + $meta = socket_get_status($fp); + if ($meta['timed_out']) { + fclose($fp); + $this->errstr = 'RPC server did not send response before timeout.'; + $this->raiseError($this->errstr, XML_RPC_ERROR_CONNECTION_FAILED); + return 0; + } + + fclose($fp); + return $resp; + } + + /** + * Determines the HTTP headers and puts it in the $headers property + * + * @param object $msg the XML_RPC_Message object + * + * @return boolean TRUE if okay, FALSE if the message payload isn't set. + * + * @access protected + */ + function createHeaders($msg) + { + if (empty($msg->payload)) { + return false; + } + if ($this->proxy) { + $this->headers = 'POST ' . $this->protocol . $this->server; + if ($this->proxy_port) { + $this->headers .= ':' . $this->port; + } + } else { + $this->headers = 'POST '; + } + $this->headers .= $this->path. " HTTP/1.0\r\n"; + + $this->headers .= "User-Agent: PEAR XML_RPC\r\n"; + $this->headers .= 'Host: ' . $this->server . "\r\n"; + + if ($this->proxy && $this->proxy_user) { + $this->headers .= 'Proxy-Authorization: Basic ' + . base64_encode("$this->proxy_user:$this->proxy_pass") + . "\r\n"; + } + + // thanks to Grant Rauscher for this + if ($this->username) { + $this->headers .= 'Authorization: Basic ' + . base64_encode("$this->username:$this->password") + . "\r\n"; + } + + $this->headers .= "Content-Type: text/xml\r\n"; + $this->headers .= 'Content-Length: ' . strlen($msg->payload); + return true; + } +} + +/** + * The methods and properties for interpreting responses to XML RPC requests + * + * @category Web Services + * @package XML_RPC + * @author Edd Dumbill + * @author Stig Bakken + * @author Martin Jansen + * @author Daniel Convissor + * @copyright 1999-2001 Edd Dumbill, 2001-2006 The PHP Group + * @version Release: 1.5.1 + * @link http://pear.php.net/package/XML_RPC + */ +class XML_RPC_Response extends XML_RPC_Base +{ + var $xv; + var $fn; + var $fs; + var $hdrs; + + /** + * @return void + */ + function XML_RPC_Response($val, $fcode = 0, $fstr = '') + { + if ($fcode != 0) { + $this->fn = $fcode; + $this->fs = htmlspecialchars($fstr); + } else { + $this->xv = $val; + } + } + + /** + * @return int the error code + */ + function faultCode() + { + if (isset($this->fn)) { + return $this->fn; + } else { + return 0; + } + } + + /** + * @return string the error string + */ + function faultString() + { + return $this->fs; + } + + /** + * @return mixed the value + */ + function value() + { + return $this->xv; + } + + /** + * @return string the error message in XML format + */ + function serialize() + { + $rs = "\n"; + if ($this->fn) { + $rs .= " + + + + faultCode + " . $this->fn . " + + + faultString + " . $this->fs . " + + + +"; + } else { + $rs .= "\n\n" . $this->xv->serialize() . + "\n"; + } + $rs .= "\n"; + return $rs; + } +} + +/** + * The methods and properties for composing XML RPC messages + * + * @category Web Services + * @package XML_RPC + * @author Edd Dumbill + * @author Stig Bakken + * @author Martin Jansen + * @author Daniel Convissor + * @copyright 1999-2001 Edd Dumbill, 2001-2006 The PHP Group + * @version Release: 1.5.1 + * @link http://pear.php.net/package/XML_RPC + */ +class XML_RPC_Message extends XML_RPC_Base +{ + /** + * Should the payload's content be passed through mb_convert_encoding()? + * + * @see XML_RPC_Message::setConvertPayloadEncoding() + * @since Property available since Release 1.5.1 + * @var boolean + */ + var $convert_payload_encoding = false; + + /** + * The current debug mode (1 = on, 0 = off) + * @var integer + */ + var $debug = 0; + + /** + * The encoding to be used for outgoing messages + * + * Defaults to the value of $GLOBALS['XML_RPC_defencoding'] + * + * @var string + * @see XML_RPC_Message::setSendEncoding(), + * $GLOBALS['XML_RPC_defencoding'], XML_RPC_Message::xml_header() + */ + var $send_encoding = ''; + + /** + * The method presently being evaluated + * @var string + */ + var $methodname = ''; + + /** + * @var array + */ + var $params = array(); + + /** + * The XML message being generated + * @var string + */ + var $payload = ''; + + /** + * Should extra line breaks be removed from the payload? + * @since Property available since Release 1.4.6 + * @var boolean + */ + var $remove_extra_lines = true; + + /** + * The XML response from the remote server + * @since Property available since Release 1.4.6 + * @var string + */ + var $response_payload = ''; + + + /** + * @return void + */ + function XML_RPC_Message($meth, $pars = 0) + { + $this->methodname = $meth; + if (is_array($pars) && sizeof($pars) > 0) { + for ($i = 0; $i < sizeof($pars); $i++) { + $this->addParam($pars[$i]); + } + } + } + + /** + * Produces the XML declaration including the encoding attribute + * + * The encoding is determined by this class' $send_encoding + * property. If the $send_encoding property is not set, use + * $GLOBALS['XML_RPC_defencoding']. + * + * @return string the XML declaration and element + * + * @see XML_RPC_Message::setSendEncoding(), + * XML_RPC_Message::$send_encoding, $GLOBALS['XML_RPC_defencoding'] + */ + function xml_header() + { + global $XML_RPC_defencoding; + + if (!$this->send_encoding) { + $this->send_encoding = $XML_RPC_defencoding; + } + return 'send_encoding . '"?>' + . "\n\n"; + } + + /** + * @return string the closing tag + */ + function xml_footer() + { + return "\n"; + } + + /** + * Fills the XML_RPC_Message::$payload property + * + * Part of the process makes sure all line endings are in DOS format + * (CRLF), which is probably required by specifications. + * + * If XML_RPC_Message::setConvertPayloadEncoding() was set to true, + * the payload gets passed through mb_convert_encoding() + * to ensure the payload matches the encoding set in the + * XML declaration. The encoding type can be manually set via + * XML_RPC_Message::setSendEncoding(). + * + * @return void + * + * @uses XML_RPC_Message::xml_header(), XML_RPC_Message::xml_footer() + * @see XML_RPC_Message::setSendEncoding(), $GLOBALS['XML_RPC_defencoding'], + * XML_RPC_Message::setConvertPayloadEncoding() + */ + function createPayload() + { + $this->payload = $this->xml_header(); + $this->payload .= '' . $this->methodname . "\n"; + $this->payload .= "\n"; + for ($i = 0; $i < sizeof($this->params); $i++) { + $p = $this->params[$i]; + $this->payload .= "\n" . $p->serialize() . "\n"; + } + $this->payload .= "\n"; + $this->payload .= $this->xml_footer(); + if ($this->remove_extra_lines) { + $this->payload = $GLOBALS['XML_RPC_func_ereg_replace']("[\r\n]+", "\r\n", $this->payload); + } else { + $this->payload = $GLOBALS['XML_RPC_func_ereg_replace']("\r\n|\n|\r|\n\r", "\r\n", $this->payload); + } + if ($this->convert_payload_encoding) { + $this->payload = mb_convert_encoding($this->payload, $this->send_encoding); + } + } + + /** + * @return string the name of the method + */ + function method($meth = '') + { + if ($meth != '') { + $this->methodname = $meth; + } + return $this->methodname; + } + + /** + * @return string the payload + */ + function serialize() + { + $this->createPayload(); + return $this->payload; + } + + /** + * @return void + */ + function addParam($par) + { + $this->params[] = $par; + } + + /** + * Obtains an XML_RPC_Value object for the given parameter + * + * @param int $i the index number of the parameter to obtain + * + * @return object the XML_RPC_Value object. + * If the parameter doesn't exist, an XML_RPC_Response object. + * + * @since Returns XML_RPC_Response object on error since Release 1.3.0 + */ + function getParam($i) + { + global $XML_RPC_err, $XML_RPC_str; + + if (isset($this->params[$i])) { + return $this->params[$i]; + } else { + $this->raiseError('The submitted request did not contain this parameter', + XML_RPC_ERROR_INCORRECT_PARAMS); + return new XML_RPC_Response(0, $XML_RPC_err['incorrect_params'], + $XML_RPC_str['incorrect_params']); + } + } + + /** + * @return int the number of parameters + */ + function getNumParams() + { + return sizeof($this->params); + } + + /** + * Sets whether the payload's content gets passed through + * mb_convert_encoding() + * + * Returns PEAR_ERROR object if mb_convert_encoding() isn't available. + * + * @param int $in where 1 = on, 0 = off + * + * @return void + * + * @see XML_RPC_Message::setSendEncoding() + * @since Method available since Release 1.5.1 + */ + function setConvertPayloadEncoding($in) + { + if ($in && !function_exists('mb_convert_encoding')) { + return $this->raiseError('mb_convert_encoding() is not available', + XML_RPC_ERROR_PROGRAMMING); + } + $this->convert_payload_encoding = $in; + } + + /** + * Sets the XML declaration's encoding attribute + * + * @param string $type the encoding type (ISO-8859-1, UTF-8 or US-ASCII) + * + * @return void + * + * @see XML_RPC_Message::setConvertPayloadEncoding(), XML_RPC_Message::xml_header() + * @since Method available since Release 1.2.0 + */ + function setSendEncoding($type) + { + $this->send_encoding = $type; + } + + /** + * Determine the XML's encoding via the encoding attribute + * in the XML declaration + * + * If the encoding parameter is not set or is not ISO-8859-1, UTF-8 + * or US-ASCII, $XML_RPC_defencoding will be returned. + * + * @param string $data the XML that will be parsed + * + * @return string the encoding to be used + * + * @link http://php.net/xml_parser_create + * @since Method available since Release 1.2.0 + */ + function getEncoding($data) + { + global $XML_RPC_defencoding; + + if ($GLOBALS['XML_RPC_func_ereg']('<\?xml[^>]*[:space:]*encoding[:space:]*=[:space:]*[\'"]([^"\']*)[\'"]', + $data, $match)) + { + $match[1] = trim(strtoupper($match[1])); + switch ($match[1]) { + case 'ISO-8859-1': + case 'UTF-8': + case 'US-ASCII': + return $match[1]; + break; + + default: + return $XML_RPC_defencoding; + } + } else { + return $XML_RPC_defencoding; + } + } + + /** + * @return object a new XML_RPC_Response object + */ + function parseResponseFile($fp) + { + $ipd = ''; + while ($data = @fread($fp, 8192)) { + $ipd .= $data; + } + return $this->parseResponse($ipd); + } + + /** + * @return object a new XML_RPC_Response object + */ + function parseResponse($data = '') + { + global $XML_RPC_xh, $XML_RPC_err, $XML_RPC_str, $XML_RPC_defencoding; + + $encoding = $this->getEncoding($data); + $parser_resource = xml_parser_create($encoding); + $parser = (int) $parser_resource; + + $XML_RPC_xh = array(); + $XML_RPC_xh[$parser] = array(); + + $XML_RPC_xh[$parser]['cm'] = 0; + $XML_RPC_xh[$parser]['isf'] = 0; + $XML_RPC_xh[$parser]['ac'] = ''; + $XML_RPC_xh[$parser]['qt'] = ''; + $XML_RPC_xh[$parser]['stack'] = array(); + $XML_RPC_xh[$parser]['valuestack'] = array(); + + xml_parser_set_option($parser_resource, XML_OPTION_CASE_FOLDING, true); + xml_set_element_handler($parser_resource, 'XML_RPC_se', 'XML_RPC_ee'); + xml_set_character_data_handler($parser_resource, 'XML_RPC_cd'); + + $hdrfnd = 0; + if ($this->debug) { + print "\n
---GOT---\n";
+            print isset($_SERVER['SERVER_PROTOCOL']) ? htmlspecialchars($data) : $data;
+            print "\n---END---
\n"; + } + + // See if response is a 200 or a 100 then a 200, else raise error. + // But only do this if we're using the HTTP protocol. + if ($GLOBALS['XML_RPC_func_ereg']('^HTTP', $data) && + !$GLOBALS['XML_RPC_func_ereg']('^HTTP/[0-9\.]+ 200 ', $data) && + !$GLOBALS['XML_RPC_func_ereg']('^HTTP/[0-9\.]+ 10[0-9]([A-Z ]+)?[\r\n]+HTTP/[0-9\.]+ 200', $data)) + { + $errstr = substr($data, 0, strpos($data, "\n") - 1); + error_log('HTTP error, got response: ' . $errstr); + $r = new XML_RPC_Response(0, $XML_RPC_err['http_error'], + $XML_RPC_str['http_error'] . ' (' . + $errstr . ')'); + xml_parser_free($parser_resource); + return $r; + } + + // gotta get rid of headers here + if (!$hdrfnd && ($brpos = strpos($data,"\r\n\r\n"))) { + $XML_RPC_xh[$parser]['ha'] = substr($data, 0, $brpos); + $data = substr($data, $brpos + 4); + $hdrfnd = 1; + } + + /* + * be tolerant of junk after methodResponse + * (e.g. javascript automatically inserted by free hosts) + * thanks to Luca Mariano + */ + $data = substr($data, 0, strpos($data, "") + 17); + $this->response_payload = $data; + + if (!xml_parse($parser_resource, $data, sizeof($data))) { + // thanks to Peter Kocks + if (xml_get_current_line_number($parser_resource) == 1) { + $errstr = 'XML error at line 1, check URL'; + } else { + $errstr = sprintf('XML error: %s at line %d', + xml_error_string(xml_get_error_code($parser_resource)), + xml_get_current_line_number($parser_resource)); + } + error_log($errstr); + $r = new XML_RPC_Response(0, $XML_RPC_err['invalid_return'], + $XML_RPC_str['invalid_return']); + xml_parser_free($parser_resource); + return $r; + } + + xml_parser_free($parser_resource); + + if ($this->debug) { + print "\n
---PARSED---\n";
+            var_dump($XML_RPC_xh[$parser]['value']);
+            print "---END---
\n"; + } + + if ($XML_RPC_xh[$parser]['isf'] > 1) { + $r = new XML_RPC_Response(0, $XML_RPC_err['invalid_return'], + $XML_RPC_str['invalid_return'].' '.$XML_RPC_xh[$parser]['isf_reason']); + } elseif (!is_object($XML_RPC_xh[$parser]['value'])) { + // then something odd has happened + // and it's time to generate a client side error + // indicating something odd went on + $r = new XML_RPC_Response(0, $XML_RPC_err['invalid_return'], + $XML_RPC_str['invalid_return']); + } else { + $v = $XML_RPC_xh[$parser]['value']; + if ($XML_RPC_xh[$parser]['isf']) { + $f = $v->structmem('faultCode'); + $fs = $v->structmem('faultString'); + $r = new XML_RPC_Response($v, $f->scalarval(), + $fs->scalarval()); + } else { + $r = new XML_RPC_Response($v); + } + } + $r->hdrs = split("\r?\n", $XML_RPC_xh[$parser]['ha'][1]); + return $r; + } +} + +/** + * The methods and properties that represent data in XML RPC format + * + * @category Web Services + * @package XML_RPC + * @author Edd Dumbill + * @author Stig Bakken + * @author Martin Jansen + * @author Daniel Convissor + * @copyright 1999-2001 Edd Dumbill, 2001-2006 The PHP Group + * @version Release: 1.5.1 + * @link http://pear.php.net/package/XML_RPC + */ +class XML_RPC_Value extends XML_RPC_Base +{ + var $me = array(); + var $mytype = 0; + + /** + * @return void + */ + function XML_RPC_Value($val = -1, $type = '') + { + $this->me = array(); + $this->mytype = 0; + if ($val != -1 || $type != '') { + if ($type == '') { + $type = 'string'; + } + if (!array_key_exists($type, $GLOBALS['XML_RPC_Types'])) { + // XXX + // need some way to report this error + } elseif ($GLOBALS['XML_RPC_Types'][$type] == 1) { + $this->addScalar($val, $type); + } elseif ($GLOBALS['XML_RPC_Types'][$type] == 2) { + $this->addArray($val); + } elseif ($GLOBALS['XML_RPC_Types'][$type] == 3) { + $this->addStruct($val); + } + } + } + + /** + * @return int returns 1 if successful or 0 if there are problems + */ + function addScalar($val, $type = 'string') + { + if ($this->mytype == 1) { + $this->raiseError('Scalar can have only one value', + XML_RPC_ERROR_INVALID_TYPE); + return 0; + } + $typeof = $GLOBALS['XML_RPC_Types'][$type]; + if ($typeof != 1) { + $this->raiseError("Not a scalar type (${typeof})", + XML_RPC_ERROR_INVALID_TYPE); + return 0; + } + + if ($type == $GLOBALS['XML_RPC_Boolean']) { + if (strcasecmp($val, 'true') == 0 + || $val == 1 + || ($val == true && strcasecmp($val, 'false'))) + { + $val = 1; + } else { + $val = 0; + } + } + + if ($this->mytype == 2) { + // we're adding to an array here + $ar = $this->me['array']; + $ar[] = new XML_RPC_Value($val, $type); + $this->me['array'] = $ar; + } else { + // a scalar, so set the value and remember we're scalar + $this->me[$type] = $val; + $this->mytype = $typeof; + } + return 1; + } + + /** + * @return int returns 1 if successful or 0 if there are problems + */ + function addArray($vals) + { + if ($this->mytype != 0) { + $this->raiseError( + 'Already initialized as a [' . $this->kindOf() . ']', + XML_RPC_ERROR_ALREADY_INITIALIZED); + return 0; + } + $this->mytype = $GLOBALS['XML_RPC_Types']['array']; + $this->me['array'] = $vals; + return 1; + } + + /** + * @return int returns 1 if successful or 0 if there are problems + */ + function addStruct($vals) + { + if ($this->mytype != 0) { + $this->raiseError( + 'Already initialized as a [' . $this->kindOf() . ']', + XML_RPC_ERROR_ALREADY_INITIALIZED); + return 0; + } + $this->mytype = $GLOBALS['XML_RPC_Types']['struct']; + $this->me['struct'] = $vals; + return 1; + } + + /** + * @return void + */ + function dump($ar) + { + reset($ar); + foreach ($ar as $key => $val) { + echo "$key => $val
"; + if ($key == 'array') { + foreach ($val as $key2 => $val2) { + echo "-- $key2 => $val2
"; + } + } + } + } + + /** + * @return string the data type of the current value + */ + function kindOf() + { + switch ($this->mytype) { + case 3: + return 'struct'; + + case 2: + return 'array'; + + case 1: + return 'scalar'; + + default: + return 'undef'; + } + } + + /** + * @return string the data in XML format + */ + function serializedata($typ, $val) + { + $rs = ''; + if (!array_key_exists($typ, $GLOBALS['XML_RPC_Types'])) { + // XXX + // need some way to report this error + return; + } + switch ($GLOBALS['XML_RPC_Types'][$typ]) { + case 3: + // struct + $rs .= "\n"; + reset($val); + foreach ($val as $key2 => $val2) { + $rs .= "${key2}\n"; + $rs .= $this->serializeval($val2); + $rs .= "\n"; + } + $rs .= ''; + break; + + case 2: + // array + $rs .= "\n\n"; + for ($i = 0; $i < sizeof($val); $i++) { + $rs .= $this->serializeval($val[$i]); + } + $rs .= "\n"; + break; + + case 1: + switch ($typ) { + case $GLOBALS['XML_RPC_Base64']: + $rs .= "<${typ}>" . base64_encode($val) . ""; + break; + case $GLOBALS['XML_RPC_Boolean']: + $rs .= "<${typ}>" . ($val ? '1' : '0') . ""; + break; + case $GLOBALS['XML_RPC_String']: + $rs .= "<${typ}>" . htmlspecialchars($val). ""; + break; + default: + $rs .= "<${typ}>${val}"; + } + } + return $rs; + } + + /** + * @return string the data in XML format + */ + function serialize() + { + return $this->serializeval($this); + } + + /** + * @return string the data in XML format + */ + function serializeval($o) + { + if (!is_object($o) || empty($o->me) || !is_array($o->me)) { + return ''; + } + $ar = $o->me; + reset($ar); + list($typ, $val) = each($ar); + return '' . $this->serializedata($typ, $val) . "\n"; + } + + /** + * @return mixed the contents of the element requested + */ + function structmem($m) + { + return $this->me['struct'][$m]; + } + + /** + * @return void + */ + function structreset() + { + reset($this->me['struct']); + } + + /** + * @return the key/value pair of the struct's current element + */ + function structeach() + { + return each($this->me['struct']); + } + + /** + * @return mixed the current value + */ + function getval() + { + // UNSTABLE + + reset($this->me); + $b = current($this->me); + + // contributed by I Sofer, 2001-03-24 + // add support for nested arrays to scalarval + // i've created a new method here, so as to + // preserve back compatibility + + if (is_array($b)) { + foreach ($b as $id => $cont) { + $b[$id] = $cont->scalarval(); + } + } + + // add support for structures directly encoding php objects + if (is_object($b)) { + $t = get_object_vars($b); + foreach ($t as $id => $cont) { + $t[$id] = $cont->scalarval(); + } + foreach ($t as $id => $cont) { + $b->$id = $cont; + } + } + + // end contrib + return $b; + } + + /** + * @return mixed the current element's scalar value. If the value is + * not scalar, FALSE is returned. + */ + function scalarval() + { + reset($this->me); + $v = current($this->me); + if (!is_scalar($v)) { + $v = false; + } + return $v; + } + + /** + * @return string + */ + function scalartyp() + { + reset($this->me); + $a = key($this->me); + if ($a == $GLOBALS['XML_RPC_I4']) { + $a = $GLOBALS['XML_RPC_Int']; + } + return $a; + } + + /** + * @return mixed the struct's current element + */ + function arraymem($m) + { + return $this->me['array'][$m]; + } + + /** + * @return int the number of elements in the array + */ + function arraysize() + { + reset($this->me); + list($a, $b) = each($this->me); + return sizeof($b); + } + + /** + * Determines if the item submitted is an XML_RPC_Value object + * + * @param mixed $val the variable to be evaluated + * + * @return bool TRUE if the item is an XML_RPC_Value object + * + * @static + * @since Method available since Release 1.3.0 + */ + function isValue($val) + { + return (strtolower(get_class($val)) == 'xml_rpc_value'); + } +} + +/** + * Return an ISO8601 encoded string + * + * While timezones ought to be supported, the XML-RPC spec says: + * + * "Don't assume a timezone. It should be specified by the server in its + * documentation what assumptions it makes about timezones." + * + * This routine always assumes localtime unless $utc is set to 1, in which + * case UTC is assumed and an adjustment for locale is made when encoding. + * + * @return string the formatted date + */ +function XML_RPC_iso8601_encode($timet, $utc = 0) +{ + if (!$utc) { + $t = strftime('%Y%m%dT%H:%M:%S', $timet); + } else { + if (function_exists('gmstrftime')) { + // gmstrftime doesn't exist in some versions + // of PHP + $t = gmstrftime('%Y%m%dT%H:%M:%S', $timet); + } else { + $t = strftime('%Y%m%dT%H:%M:%S', $timet - date('Z')); + } + } + return $t; +} + +/** + * Convert a datetime string into a Unix timestamp + * + * While timezones ought to be supported, the XML-RPC spec says: + * + * "Don't assume a timezone. It should be specified by the server in its + * documentation what assumptions it makes about timezones." + * + * This routine always assumes localtime unless $utc is set to 1, in which + * case UTC is assumed and an adjustment for locale is made when encoding. + * + * @return int the unix timestamp of the date submitted + */ +function XML_RPC_iso8601_decode($idate, $utc = 0) +{ + $t = 0; + if ($GLOBALS['XML_RPC_func_ereg']('([0-9]{4})([0-9]{2})([0-9]{2})T([0-9]{2}):([0-9]{2}):([0-9]{2})', $idate, $regs)) { + if ($utc) { + $t = gmmktime($regs[4], $regs[5], $regs[6], $regs[2], $regs[3], $regs[1]); + } else { + $t = mktime($regs[4], $regs[5], $regs[6], $regs[2], $regs[3], $regs[1]); + } + } + return $t; +} + +/** + * Converts an XML_RPC_Value object into native PHP types + * + * @param object $XML_RPC_val the XML_RPC_Value object to decode + * + * @return mixed the PHP values + */ +function XML_RPC_decode($XML_RPC_val) +{ + $kind = $XML_RPC_val->kindOf(); + + if ($kind == 'scalar') { + return $XML_RPC_val->scalarval(); + + } elseif ($kind == 'array') { + $size = $XML_RPC_val->arraysize(); + $arr = array(); + for ($i = 0; $i < $size; $i++) { + $arr[] = XML_RPC_decode($XML_RPC_val->arraymem($i)); + } + return $arr; + + } elseif ($kind == 'struct') { + $XML_RPC_val->structreset(); + $arr = array(); + while (list($key, $value) = $XML_RPC_val->structeach()) { + $arr[$key] = XML_RPC_decode($value); + } + return $arr; + } +} + +/** + * Converts native PHP types into an XML_RPC_Value object + * + * @param mixed $php_val the PHP value or variable you want encoded + * + * @return object the XML_RPC_Value object + */ +function XML_RPC_encode($php_val) +{ + $type = gettype($php_val); + $XML_RPC_val = new XML_RPC_Value; + + switch ($type) { + case 'array': + if (empty($php_val)) { + $XML_RPC_val->addArray($php_val); + break; + } + $tmp = array_diff(array_keys($php_val), range(0, count($php_val)-1)); + if (empty($tmp)) { + $arr = array(); + foreach ($php_val as $k => $v) { + $arr[$k] = XML_RPC_encode($v); + } + $XML_RPC_val->addArray($arr); + break; + } + // fall though if it's not an enumerated array + + case 'object': + $arr = array(); + foreach ($php_val as $k => $v) { + $arr[$k] = XML_RPC_encode($v); + } + $XML_RPC_val->addStruct($arr); + break; + + case 'integer': + $XML_RPC_val->addScalar($php_val, $GLOBALS['XML_RPC_Int']); + break; + + case 'double': + $XML_RPC_val->addScalar($php_val, $GLOBALS['XML_RPC_Double']); + break; + + case 'string': + case 'NULL': + if ($GLOBALS['XML_RPC_func_ereg']('^[0-9]{8}\T{1}[0-9]{2}\:[0-9]{2}\:[0-9]{2}$', $php_val)) { + $XML_RPC_val->addScalar($php_val, $GLOBALS['XML_RPC_DateTime']); + } elseif ($GLOBALS['XML_RPC_auto_base64'] + && $GLOBALS['XML_RPC_func_ereg']("[^ -~\t\r\n]", $php_val)) + { + // Characters other than alpha-numeric, punctuation, SP, TAB, + // LF and CR break the XML parser, encode value via Base 64. + $XML_RPC_val->addScalar($php_val, $GLOBALS['XML_RPC_Base64']); + } else { + $XML_RPC_val->addScalar($php_val, $GLOBALS['XML_RPC_String']); + } + break; + + case 'boolean': + // Add support for encoding/decoding of booleans, since they + // are supported in PHP + // by + $XML_RPC_val->addScalar($php_val, $GLOBALS['XML_RPC_Boolean']); + break; + + case 'unknown type': + default: + $XML_RPC_val = false; + } + return $XML_RPC_val; +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * c-hanging-comment-ender-p: nil + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/XML/RPC/Dump.php b/campcaster/src/tools/pear/src/XML/RPC/Dump.php new file mode 100644 index 000000000..97c30e27f --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/RPC/Dump.php @@ -0,0 +1,187 @@ + + * @version CVS: $Id: Dump.php,v 1.7 2005/01/24 03:47:55 danielc Exp $ + * @link http://pear.php.net/package/XML_RPC + */ + + +/** + * Pull in the XML_RPC class + */ +require_once 'XML/RPC.php'; + + +/** + * Generates the dump of the XML_RPC_Value and echoes it + * + * @param object $value the XML_RPC_Value object to dump + * + * @return void + */ +function XML_RPC_Dump($value) +{ + $dumper = new XML_RPC_Dump(); + echo $dumper->generateDump($value); +} + + +/** + * Class which generates a dump of a XML_RPC_Value object + * + * @category Web Services + * @package XML_RPC + * @author Christian Weiske + * @version Release: 1.5.1 + * @link http://pear.php.net/package/XML_RPC + */ +class XML_RPC_Dump +{ + /** + * The indentation array cache + * @var array + */ + var $arIndent = array(); + + /** + * The spaces used for indenting the XML + * @var string + */ + var $strBaseIndent = ' '; + + /** + * Returns the dump in XML format without printing it out + * + * @param object $value the XML_RPC_Value object to dump + * @param int $nLevel the level of indentation + * + * @return string the dump + */ + function generateDump($value, $nLevel = 0) + { + if (!is_object($value) && get_class($value) != 'xml_rpc_value') { + require_once 'PEAR.php'; + PEAR::raiseError('Tried to dump non-XML_RPC_Value variable' . "\r\n", + 0, PEAR_ERROR_PRINT); + if (is_object($value)) { + $strType = get_class($value); + } else { + $strType = gettype($value); + } + return $this->getIndent($nLevel) . 'NOT A XML_RPC_Value: ' + . $strType . "\r\n"; + } + + switch ($value->kindOf()) { + case 'struct': + $ret = $this->genStruct($value, $nLevel); + break; + case 'array': + $ret = $this->genArray($value, $nLevel); + break; + case 'scalar': + $ret = $this->genScalar($value->scalarval(), $nLevel); + break; + default: + require_once 'PEAR.php'; + PEAR::raiseError('Illegal type "' . $value->kindOf() + . '" in XML_RPC_Value' . "\r\n", 0, + PEAR_ERROR_PRINT); + } + + return $ret; + } + + /** + * Returns the scalar value dump + * + * @param object $value the scalar XML_RPC_Value object to dump + * @param int $nLevel the level of indentation + * + * @return string Dumped version of the scalar value + */ + function genScalar($value, $nLevel) + { + if (gettype($value) == 'object') { + $strClass = ' ' . get_class($value); + } else { + $strClass = ''; + } + return $this->getIndent($nLevel) . gettype($value) . $strClass + . ' ' . $value . "\r\n"; + } + + /** + * Returns the dump of a struct + * + * @param object $value the struct XML_RPC_Value object to dump + * @param int $nLevel the level of indentation + * + * @return string Dumped version of the scalar value + */ + function genStruct($value, $nLevel) + { + $value->structreset(); + $strOutput = $this->getIndent($nLevel) . 'struct' . "\r\n"; + while (list($key, $keyval) = $value->structeach()) { + $strOutput .= $this->getIndent($nLevel + 1) . $key . "\r\n"; + $strOutput .= $this->generateDump($keyval, $nLevel + 2); + } + return $strOutput; + } + + /** + * Returns the dump of an array + * + * @param object $value the array XML_RPC_Value object to dump + * @param int $nLevel the level of indentation + * + * @return string Dumped version of the scalar value + */ + function genArray($value, $nLevel) + { + $nSize = $value->arraysize(); + $strOutput = $this->getIndent($nLevel) . 'array' . "\r\n"; + for($nA = 0; $nA < $nSize; $nA++) { + $strOutput .= $this->getIndent($nLevel + 1) . $nA . "\r\n"; + $strOutput .= $this->generateDump($value->arraymem($nA), + $nLevel + 2); + } + return $strOutput; + } + + /** + * Returns the indent for a specific level and caches it for faster use + * + * @param int $nLevel the level + * + * @return string the indented string + */ + function getIndent($nLevel) + { + if (!isset($this->arIndent[$nLevel])) { + $this->arIndent[$nLevel] = str_repeat($this->strBaseIndent, $nLevel); + } + return $this->arIndent[$nLevel]; + } +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * c-hanging-comment-ender-p: nil + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/XML/RPC/Server.php b/campcaster/src/tools/pear/src/XML/RPC/Server.php new file mode 100644 index 000000000..ab1c55d52 --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/RPC/Server.php @@ -0,0 +1,685 @@ + + * @author Stig Bakken + * @author Martin Jansen + * @author Daniel Convissor + * @copyright 1999-2001 Edd Dumbill, 2001-2006 The PHP Group + * @version CVS: $Id: Server.php,v 1.37 2006/10/28 16:42:34 danielc Exp $ + * @link http://pear.php.net/package/XML_RPC + */ + + +/** + * Pull in the XML_RPC class + */ +require_once 'XML/RPC.php'; + + +/** + * signature for system.listMethods: return = array, + * parameters = a string or nothing + * @global array $GLOBALS['XML_RPC_Server_listMethods_sig'] + */ +$GLOBALS['XML_RPC_Server_listMethods_sig'] = array( + array($GLOBALS['XML_RPC_Array'], + $GLOBALS['XML_RPC_String'] + ), + array($GLOBALS['XML_RPC_Array']) +); + +/** + * docstring for system.listMethods + * @global string $GLOBALS['XML_RPC_Server_listMethods_doc'] + */ +$GLOBALS['XML_RPC_Server_listMethods_doc'] = 'This method lists all the' + . ' methods that the XML-RPC server knows how to dispatch'; + +/** + * signature for system.methodSignature: return = array, + * parameters = string + * @global array $GLOBALS['XML_RPC_Server_methodSignature_sig'] + */ +$GLOBALS['XML_RPC_Server_methodSignature_sig'] = array( + array($GLOBALS['XML_RPC_Array'], + $GLOBALS['XML_RPC_String'] + ) +); + +/** + * docstring for system.methodSignature + * @global string $GLOBALS['XML_RPC_Server_methodSignature_doc'] + */ +$GLOBALS['XML_RPC_Server_methodSignature_doc'] = 'Returns an array of known' + . ' signatures (an array of arrays) for the method name passed. If' + . ' no signatures are known, returns a none-array (test for type !=' + . ' array to detect missing signature)'; + +/** + * signature for system.methodHelp: return = string, + * parameters = string + * @global array $GLOBALS['XML_RPC_Server_methodHelp_sig'] + */ +$GLOBALS['XML_RPC_Server_methodHelp_sig'] = array( + array($GLOBALS['XML_RPC_String'], + $GLOBALS['XML_RPC_String'] + ) +); + +/** + * docstring for methodHelp + * @global string $GLOBALS['XML_RPC_Server_methodHelp_doc'] + */ +$GLOBALS['XML_RPC_Server_methodHelp_doc'] = 'Returns help text if defined' + . ' for the method passed, otherwise returns an empty string'; + +/** + * dispatch map for the automatically declared XML-RPC methods. + * @global array $GLOBALS['XML_RPC_Server_dmap'] + */ +$GLOBALS['XML_RPC_Server_dmap'] = array( + 'system.listMethods' => array( + 'function' => 'XML_RPC_Server_listMethods', + 'signature' => $GLOBALS['XML_RPC_Server_listMethods_sig'], + 'docstring' => $GLOBALS['XML_RPC_Server_listMethods_doc'] + ), + 'system.methodHelp' => array( + 'function' => 'XML_RPC_Server_methodHelp', + 'signature' => $GLOBALS['XML_RPC_Server_methodHelp_sig'], + 'docstring' => $GLOBALS['XML_RPC_Server_methodHelp_doc'] + ), + 'system.methodSignature' => array( + 'function' => 'XML_RPC_Server_methodSignature', + 'signature' => $GLOBALS['XML_RPC_Server_methodSignature_sig'], + 'docstring' => $GLOBALS['XML_RPC_Server_methodSignature_doc'] + ) +); + +/** + * @global string $GLOBALS['XML_RPC_Server_debuginfo'] + */ +$GLOBALS['XML_RPC_Server_debuginfo'] = ''; + + +/** + * Lists all the methods that the XML-RPC server knows how to dispatch + * + * @return object a new XML_RPC_Response object + */ +function XML_RPC_Server_listMethods($server, $m) +{ + global $XML_RPC_err, $XML_RPC_str, $XML_RPC_Server_dmap; + + $v = new XML_RPC_Value(); + $outAr = array(); + foreach ($server->dmap as $key => $val) { + $outAr[] = new XML_RPC_Value($key, 'string'); + } + foreach ($XML_RPC_Server_dmap as $key => $val) { + $outAr[] = new XML_RPC_Value($key, 'string'); + } + $v->addArray($outAr); + return new XML_RPC_Response($v); +} + +/** + * Returns an array of known signatures (an array of arrays) + * for the given method + * + * If no signatures are known, returns a none-array + * (test for type != array to detect missing signature) + * + * @return object a new XML_RPC_Response object + */ +function XML_RPC_Server_methodSignature($server, $m) +{ + global $XML_RPC_err, $XML_RPC_str, $XML_RPC_Server_dmap; + + $methName = $m->getParam(0); + $methName = $methName->scalarval(); + if (strpos($methName, 'system.') === 0) { + $dmap = $XML_RPC_Server_dmap; + $sysCall = 1; + } else { + $dmap = $server->dmap; + $sysCall = 0; + } + // print "\n"; + if (isset($dmap[$methName])) { + if ($dmap[$methName]['signature']) { + $sigs = array(); + $thesigs = $dmap[$methName]['signature']; + for ($i = 0; $i < sizeof($thesigs); $i++) { + $cursig = array(); + $inSig = $thesigs[$i]; + for ($j = 0; $j < sizeof($inSig); $j++) { + $cursig[] = new XML_RPC_Value($inSig[$j], 'string'); + } + $sigs[] = new XML_RPC_Value($cursig, 'array'); + } + $r = new XML_RPC_Response(new XML_RPC_Value($sigs, 'array')); + } else { + $r = new XML_RPC_Response(new XML_RPC_Value('undef', 'string')); + } + } else { + $r = new XML_RPC_Response(0, $XML_RPC_err['introspect_unknown'], + $XML_RPC_str['introspect_unknown']); + } + return $r; +} + +/** + * Returns help text if defined for the method passed, otherwise returns + * an empty string + * + * @return object a new XML_RPC_Response object + */ +function XML_RPC_Server_methodHelp($server, $m) +{ + global $XML_RPC_err, $XML_RPC_str, $XML_RPC_Server_dmap; + + $methName = $m->getParam(0); + $methName = $methName->scalarval(); + if (strpos($methName, 'system.') === 0) { + $dmap = $XML_RPC_Server_dmap; + $sysCall = 1; + } else { + $dmap = $server->dmap; + $sysCall = 0; + } + + if (isset($dmap[$methName])) { + if ($dmap[$methName]['docstring']) { + $r = new XML_RPC_Response(new XML_RPC_Value($dmap[$methName]['docstring']), + 'string'); + } else { + $r = new XML_RPC_Response(new XML_RPC_Value('', 'string')); + } + } else { + $r = new XML_RPC_Response(0, $XML_RPC_err['introspect_unknown'], + $XML_RPC_str['introspect_unknown']); + } + return $r; +} + +/** + * @return void + */ +function XML_RPC_Server_debugmsg($m) +{ + global $XML_RPC_Server_debuginfo; + $XML_RPC_Server_debuginfo = $XML_RPC_Server_debuginfo . $m . "\n"; +} + + +/** + * A server for receiving and replying to XML RPC requests + * + * + * $server = new XML_RPC_Server( + * array( + * 'isan8' => + * array( + * 'function' => 'is_8', + * 'signature' => + * array( + * array('boolean', 'int'), + * array('boolean', 'int', 'boolean'), + * array('boolean', 'string'), + * array('boolean', 'string', 'boolean'), + * ), + * 'docstring' => 'Is the value an 8?' + * ), + * ), + * 1, + * 0 + * ); + * + * + * @category Web Services + * @package XML_RPC + * @author Edd Dumbill + * @author Stig Bakken + * @author Martin Jansen + * @author Daniel Convissor + * @copyright 1999-2001 Edd Dumbill, 2001-2006 The PHP Group + * @version Release: 1.5.1 + * @link http://pear.php.net/package/XML_RPC + */ +class XML_RPC_Server +{ + /** + * Should the payload's content be passed through mb_convert_encoding()? + * + * @see XML_RPC_Server::setConvertPayloadEncoding() + * @since Property available since Release 1.5.1 + * @var boolean + */ + var $convert_payload_encoding = false; + + /** + * The dispatch map, listing the methods this server provides. + * @var array + */ + var $dmap = array(); + + /** + * The present response's encoding + * @var string + * @see XML_RPC_Message::getEncoding() + */ + var $encoding = ''; + + /** + * Debug mode (0 = off, 1 = on) + * @var integer + */ + var $debug = 0; + + /** + * The response's HTTP headers + * @var string + */ + var $server_headers = ''; + + /** + * The response's XML payload + * @var string + */ + var $server_payload = ''; + + + /** + * Constructor for the XML_RPC_Server class + * + * @param array $dispMap the dispatch map. An associative array + * explaining each function. The keys of the main + * array are the procedure names used by the + * clients. The value is another associative array + * that contains up to three elements: + * + The 'function' element's value is the name + * of the function or method that gets called. + * To define a class' method: 'class::method'. + * + The 'signature' element (optional) is an + * array describing the return values and + * parameters + * + The 'docstring' element (optional) is a + * string describing what the method does + * @param int $serviceNow should the HTTP response be sent now? + * (1 = yes, 0 = no) + * @param int $debug should debug output be displayed? + * (1 = yes, 0 = no) + * + * @return void + */ + function XML_RPC_Server($dispMap, $serviceNow = 1, $debug = 0) + { + global $HTTP_RAW_POST_DATA; + + if ($debug) { + $this->debug = 1; + } else { + $this->debug = 0; + } + + $this->dmap = $dispMap; + + if ($serviceNow) { + $this->service(); + } else { + $this->createServerPayload(); + $this->createServerHeaders(); + } + } + + /** + * @return string the debug information if debug debug mode is on + */ + function serializeDebug() + { + global $XML_RPC_Server_debuginfo, $HTTP_RAW_POST_DATA; + + if ($this->debug) { + XML_RPC_Server_debugmsg('vvv POST DATA RECEIVED BY SERVER vvv' . "\n" + . $HTTP_RAW_POST_DATA + . "\n" . '^^^ END POST DATA ^^^'); + } + + if ($XML_RPC_Server_debuginfo != '') { + return "\n"; + } else { + return ''; + } + } + + /** + * Sets whether the payload's content gets passed through + * mb_convert_encoding() + * + * Returns PEAR_ERROR object if mb_convert_encoding() isn't available. + * + * @param int $in where 1 = on, 0 = off + * + * @return void + * + * @see XML_RPC_Message::getEncoding() + * @since Method available since Release 1.5.1 + */ + function setConvertPayloadEncoding($in) + { + if ($in && !function_exists('mb_convert_encoding')) { + return $this->raiseError('mb_convert_encoding() is not available', + XML_RPC_ERROR_PROGRAMMING); + } + $this->convert_payload_encoding = $in; + } + + /** + * Sends the response + * + * The encoding and content-type are determined by + * XML_RPC_Message::getEncoding() + * + * @return void + * + * @uses XML_RPC_Server::createServerPayload(), + * XML_RPC_Server::createServerHeaders() + */ + function service() + { + if (!$this->server_payload) { + $this->createServerPayload(); + } + if (!$this->server_headers) { + $this->createServerHeaders(); + } + + /* + * $server_headers needs to remain a string for compatibility with + * old scripts using this package, but PHP 4.4.2 no longer allows + * line breaks in header() calls. So, we split each header into + * an individual call. The initial replace handles the off chance + * that someone composed a single header with multiple lines, which + * the RFCs allow. + */ + $this->server_headers = $GLOBALS['XML_RPC_func_ereg_replace']("[\r\n]+[ \t]+", + ' ', trim($this->server_headers)); + $headers = $GLOBALS['XML_RPC_func_split']("[\r\n]+", $this->server_headers); + foreach ($headers as $header) + { + header($header); + } + + print $this->server_payload; + } + + /** + * Generates the payload and puts it in the $server_payload property + * + * If XML_RPC_Server::setConvertPayloadEncoding() was set to true, + * the payload gets passed through mb_convert_encoding() + * to ensure the payload matches the encoding set in the + * XML declaration. The encoding type can be manually set via + * XML_RPC_Message::setSendEncoding(). + * + * @return void + * + * @uses XML_RPC_Server::parseRequest(), XML_RPC_Server::$encoding, + * XML_RPC_Response::serialize(), XML_RPC_Server::serializeDebug() + * @see XML_RPC_Server::setConvertPayloadEncoding() + */ + function createServerPayload() + { + $r = $this->parseRequest(); + $this->server_payload = 'encoding . '"?>' . "\n" + . $this->serializeDebug() + . $r->serialize(); + if ($this->convert_payload_encoding) { + $this->server_payload = mb_convert_encoding($this->server_payload, + $this->encoding); + } + } + + /** + * Determines the HTTP headers and puts them in the $server_headers + * property + * + * @return boolean TRUE if okay, FALSE if $server_payload isn't set. + * + * @uses XML_RPC_Server::createServerPayload(), + * XML_RPC_Server::$server_headers + */ + function createServerHeaders() + { + if (!$this->server_payload) { + return false; + } + $this->server_headers = 'Content-Length: ' + . strlen($this->server_payload) . "\r\n" + . 'Content-Type: text/xml;' + . ' charset=' . $this->encoding; + return true; + } + + /** + * @return array + */ + function verifySignature($in, $sig) + { + for ($i = 0; $i < sizeof($sig); $i++) { + // check each possible signature in turn + $cursig = $sig[$i]; + if (sizeof($cursig) == $in->getNumParams() + 1) { + $itsOK = 1; + for ($n = 0; $n < $in->getNumParams(); $n++) { + $p = $in->getParam($n); + // print "\n"; + if ($p->kindOf() == 'scalar') { + $pt = $p->scalartyp(); + } else { + $pt = $p->kindOf(); + } + // $n+1 as first type of sig is return type + if ($pt != $cursig[$n+1]) { + $itsOK = 0; + $pno = $n+1; + $wanted = $cursig[$n+1]; + $got = $pt; + break; + } + } + if ($itsOK) { + return array(1); + } + } + } + if (isset($wanted)) { + return array(0, "Wanted ${wanted}, got ${got} at param ${pno}"); + } else { + $allowed = array(); + foreach ($sig as $val) { + end($val); + $allowed[] = key($val); + } + $allowed = array_unique($allowed); + $last = count($allowed) - 1; + if ($last > 0) { + $allowed[$last] = 'or ' . $allowed[$last]; + } + return array(0, + 'Signature permits ' . implode(', ', $allowed) + . ' parameters but the request had ' + . $in->getNumParams()); + } + } + + /** + * @return object a new XML_RPC_Response object + * + * @uses XML_RPC_Message::getEncoding(), XML_RPC_Server::$encoding + */ + function parseRequest($data = '') + { + global $XML_RPC_xh, $HTTP_RAW_POST_DATA, + $XML_RPC_err, $XML_RPC_str, $XML_RPC_errxml, + $XML_RPC_defencoding, $XML_RPC_Server_dmap; + + if ($data == '') { + $data = $HTTP_RAW_POST_DATA; + } + + $this->encoding = XML_RPC_Message::getEncoding($data); + $parser_resource = xml_parser_create($this->encoding); + $parser = (int) $parser_resource; + + $XML_RPC_xh[$parser] = array(); + $XML_RPC_xh[$parser]['cm'] = 0; + $XML_RPC_xh[$parser]['isf'] = 0; + $XML_RPC_xh[$parser]['params'] = array(); + $XML_RPC_xh[$parser]['method'] = ''; + $XML_RPC_xh[$parser]['stack'] = array(); + $XML_RPC_xh[$parser]['valuestack'] = array(); + + $plist = ''; + + // decompose incoming XML into request structure + + xml_parser_set_option($parser_resource, XML_OPTION_CASE_FOLDING, true); + xml_set_element_handler($parser_resource, 'XML_RPC_se', 'XML_RPC_ee'); + xml_set_character_data_handler($parser_resource, 'XML_RPC_cd'); + if (!xml_parse($parser_resource, $data, 1)) { + // return XML error as a faultCode + $r = new XML_RPC_Response(0, + $XML_RPC_errxml+xml_get_error_code($parser_resource), + sprintf('XML error: %s at line %d', + xml_error_string(xml_get_error_code($parser_resource)), + xml_get_current_line_number($parser_resource))); + xml_parser_free($parser_resource); + } elseif ($XML_RPC_xh[$parser]['isf']>1) { + $r = new XML_RPC_Response(0, + $XML_RPC_err['invalid_request'], + $XML_RPC_str['invalid_request'] + . ': ' + . $XML_RPC_xh[$parser]['isf_reason']); + xml_parser_free($parser_resource); + } else { + xml_parser_free($parser_resource); + $m = new XML_RPC_Message($XML_RPC_xh[$parser]['method']); + // now add parameters in + for ($i = 0; $i < sizeof($XML_RPC_xh[$parser]['params']); $i++) { + // print '\n"; + $plist .= "$i - " . var_export($XML_RPC_xh[$parser]['params'][$i], true) . " \n"; + $m->addParam($XML_RPC_xh[$parser]['params'][$i]); + } + + if ($this->debug) { + XML_RPC_Server_debugmsg($plist); + } + + // now to deal with the method + $methName = $XML_RPC_xh[$parser]['method']; + if (strpos($methName, 'system.') === 0) { + $dmap = $XML_RPC_Server_dmap; + $sysCall = 1; + } else { + $dmap = $this->dmap; + $sysCall = 0; + } + + if (isset($dmap[$methName]['function']) + && is_string($dmap[$methName]['function']) + && strpos($dmap[$methName]['function'], '::') !== false) + { + $dmap[$methName]['function'] = + explode('::', $dmap[$methName]['function']); + } + + if (isset($dmap[$methName]['function']) + && is_callable($dmap[$methName]['function'])) + { + // dispatch if exists + if (isset($dmap[$methName]['signature'])) { + $sr = $this->verifySignature($m, + $dmap[$methName]['signature'] ); + } + if (!isset($dmap[$methName]['signature']) || $sr[0]) { + // if no signature or correct signature + if ($sysCall) { + $r = call_user_func($dmap[$methName]['function'], $this, $m); + } else { + $r = call_user_func($dmap[$methName]['function'], $m); + } + if (!is_a($r, 'XML_RPC_Response')) { + $r = new XML_RPC_Response(0, $XML_RPC_err['not_response_object'], + $XML_RPC_str['not_response_object']); + } + } else { + $r = new XML_RPC_Response(0, $XML_RPC_err['incorrect_params'], + $XML_RPC_str['incorrect_params'] + . ': ' . $sr[1]); + } + } else { + // else prepare error response + $r = new XML_RPC_Response(0, $XML_RPC_err['unknown_method'], + $XML_RPC_str['unknown_method']); + } + } + return $r; + } + + /** + * Echos back the input packet as a string value + * + * @return void + * + * Useful for debugging. + */ + function echoInput() + { + global $HTTP_RAW_POST_DATA; + + $r = new XML_RPC_Response(0); + $r->xv = new XML_RPC_Value("'Aha said I: '" . $HTTP_RAW_POST_DATA, 'string'); + print $r->serialize(); + } +} + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * c-hanging-comment-ender-p: nil + * End: + */ + +?> diff --git a/campcaster/src/tools/pear/src/XML/Serializer.php b/campcaster/src/tools/pear/src/XML/Serializer.php new file mode 100644 index 000000000..9b2e9f6cf --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Serializer.php @@ -0,0 +1,1025 @@ + + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Serializer.php,v 1.47 2005/09/30 13:40:30 schst Exp $ + * @link http://pear.php.net/package/XML_Serializer + * @see XML_Unserializer + */ + +/** + * uses PEAR error management + */ +require_once 'PEAR.php'; + +/** + * uses XML_Util to create XML tags + */ +require_once 'XML/Util.php'; + +/** + * option: string used for indentation + * + * Possible values: + * - any string (default is any string) + */ +define('XML_SERIALIZER_OPTION_INDENT', 'indent'); + +/** + * option: string used for linebreaks + * + * Possible values: + * - any string (default is \n) + */ +define('XML_SERIALIZER_OPTION_LINEBREAKS', 'linebreak'); + +/** + * option: enable type hints + * + * Possible values: + * - true + * - false + */ +define('XML_SERIALIZER_OPTION_TYPEHINTS', 'typeHints'); + +/** + * option: add an XML declaration + * + * Possible values: + * - true + * - false + */ +define('XML_SERIALIZER_OPTION_XML_DECL_ENABLED', 'addDecl'); + +/** + * option: encoding of the document + * + * Possible values: + * - any valid encoding + * - null (default) + */ +define('XML_SERIALIZER_OPTION_XML_ENCODING', 'encoding'); + +/** + * option: default name for tags + * + * Possible values: + * - any string (XML_Serializer_Tag is default) + */ +define('XML_SERIALIZER_OPTION_DEFAULT_TAG', 'defaultTagName'); + +/** + * option: use classname for objects in indexed arrays + * + * Possible values: + * - true (default) + * - false + */ +define('XML_SERIALIZER_OPTION_CLASSNAME_AS_TAGNAME', 'classAsTagName'); + +/** + * option: attribute where original key is stored + * + * Possible values: + * - any string (default is _originalKey) + */ +define('XML_SERIALIZER_OPTION_ATTRIBUTE_KEY', 'keyAttribute'); + +/** + * option: attribute for type (only if typeHints => true) + * + * Possible values: + * - any string (default is _type) + */ +define('XML_SERIALIZER_OPTION_ATTRIBUTE_TYPE', 'typeAttribute'); + +/** + * option: attribute for class (only if typeHints => true) + * + * Possible values: + * - any string (default is _class) + */ +define('XML_SERIALIZER_OPTION_ATTRIBUTE_CLASS', 'classAttribute'); + +/** + * option: scalar values (strings, ints,..) will be serialized as attribute + * + * Possible values: + * - true + * - false (default) + * - array which sets this option on a per-tag basis + */ +define('XML_SERIALIZER_OPTION_SCALAR_AS_ATTRIBUTES', 'scalarAsAttributes'); + +/** + * option: prepend string for attributes + * + * Possible values: + * - any string (default is any string) + */ +define('XML_SERIALIZER_OPTION_PREPEND_ATTRIBUTES', 'prependAttributes'); + +/** + * option: indent the attributes, if set to '_auto', it will indent attributes so they all start at the same column + * + * Possible values: + * - true + * - false (default) + */ +define('XML_SERIALIZER_OPTION_INDENT_ATTRIBUTES', 'indentAttributes'); + +/** + * option: use 'simplexml' to use parent name as tagname if transforming an indexed array + * + * Possible values: + * - XML_SERIALIZER_MODE_DEFAULT (default) + * - XML_SERIALIZER_MODE_SIMPLEXML + */ +define('XML_SERIALIZER_OPTION_MODE', 'mode'); + +/** + * option: add a doctype declaration + * + * Possible values: + * - true + * - false (default) + */ +define('XML_SERIALIZER_OPTION_DOCTYPE_ENABLED', 'addDoctype'); + +/** + * option: supply a string or an array with id and uri ({@see XML_Util::getDoctypeDeclaration()} + * + * Possible values: + * - string + * - array + */ +define('XML_SERIALIZER_OPTION_DOCTYPE', 'doctype'); + +/** + * option: name of the root tag + * + * Possible values: + * - string + * - null (default) + */ +define('XML_SERIALIZER_OPTION_ROOT_NAME', 'rootName'); + +/** + * option: attributes of the root tag + * + * Possible values: + * - array + */ +define('XML_SERIALIZER_OPTION_ROOT_ATTRIBS', 'rootAttributes'); + +/** + * option: all values in this key will be treated as attributes + * + * Possible values: + * - array + */ +define('XML_SERIALIZER_OPTION_ATTRIBUTES_KEY', 'attributesArray'); + +/** + * option: this value will be used directly as content, instead of creating a new tag, may only be used in conjuction with attributesArray + * + * Possible values: + * - string + * - null (default) + */ +define('XML_SERIALIZER_OPTION_CONTENT_KEY', 'contentName'); + +/** + * option: this value will be used in a comment, instead of creating a new tag + * + * Possible values: + * - string + * - null (default) + */ +define('XML_SERIALIZER_OPTION_COMMENT_KEY', 'commentName'); + +/** + * option: tag names that will be changed + * + * Possible values: + * - array + */ +define('XML_SERIALIZER_OPTION_TAGMAP', 'tagMap'); + +/** + * option: function that will be applied before serializing + * + * Possible values: + * - any valid PHP callback + */ +define('XML_SERIALIZER_OPTION_ENCODE_FUNC', 'encodeFunction'); + +/** + * option: function that will be applied before serializing + * + * Possible values: + * - string + * - null (default) + */ +define('XML_SERIALIZER_OPTION_NAMESPACE', 'namespace'); + +/** + * option: type of entities to replace + * + * Possible values: + * - XML_SERIALIZER_ENTITIES_NONE + * - XML_SERIALIZER_ENTITIES_XML (default) + * - XML_SERIALIZER_ENTITIES_XML_REQUIRED + * - XML_SERIALIZER_ENTITIES_HTML + */ +define('XML_SERIALIZER_OPTION_ENTITIES', 'replaceEntities'); + +/** + * option: whether to return the result of the serialization from serialize() + * + * Possible values: + * - true + * - false (default) + */ +define('XML_SERIALIZER_OPTION_RETURN_RESULT', 'returnResult'); + +/** + * option: whether to ignore properties that are set to null + * + * Possible values: + * - true + * - false (default) + */ +define('XML_SERIALIZER_OPTION_IGNORE_NULL', 'ignoreNull'); + +/** + * option: whether to use cdata sections for character data + * + * Possible values: + * - true + * - false (default) + */ +define('XML_SERIALIZER_OPTION_CDATA_SECTIONS', 'cdata'); + + +/** + * default mode + */ +define('XML_SERIALIZER_MODE_DEFAULT', 'default'); + +/** + * SimpleXML mode + * + * When serializing indexed arrays, the key of the parent value is used as a tagname. + */ +define('XML_SERIALIZER_MODE_SIMPLEXML', 'simplexml'); + +/** + * error code for no serialization done + */ +define('XML_SERIALIZER_ERROR_NO_SERIALIZATION', 51); + +/** + * do not replace entitites + */ +define('XML_SERIALIZER_ENTITIES_NONE', XML_UTIL_ENTITIES_NONE); + +/** + * replace all XML entitites + * This setting will replace <, >, ", ' and & + */ +define('XML_SERIALIZER_ENTITIES_XML', XML_UTIL_ENTITIES_XML); + +/** + * replace only required XML entitites + * This setting will replace <, " and & + */ +define('XML_SERIALIZER_ENTITIES_XML_REQUIRED', XML_UTIL_ENTITIES_XML_REQUIRED); + +/** + * replace HTML entitites + * @link http://www.php.net/htmlentities + */ +define('XML_SERIALIZER_ENTITIES_HTML', XML_UTIL_ENTITIES_HTML); + +/** + * Creates XML documents from PHP data structures like arrays, objects or scalars. + * + * this class can be used in two modes: + * + * 1. create an XML document from an array or object that is processed by other + * applications. That means, you can create a RDF document from an array in the + * following format: + * + * $data = array( + * 'channel' => array( + * 'title' => 'Example RDF channel', + * 'link' => 'http://www.php-tools.de', + * 'image' => array( + * 'title' => 'Example image', + * 'url' => 'http://www.php-tools.de/image.gif', + * 'link' => 'http://www.php-tools.de' + * ), + * array( + * 'title' => 'Example item', + * 'link' => 'http://example.com' + * ), + * array( + * 'title' => 'Another Example item', + * 'link' => 'http://example.org' + * ) + * ) + * ); + * + * to create a RDF document from this array do the following: + * + * require_once 'XML/Serializer.php'; + * + * $options = array( + * XML_SERIALIZER_OPTION_INDENT => "\t", // indent with tabs + * XML_SERIALIZER_OPTION_LINEBREAKS => "\n", // use UNIX line breaks + * XML_SERIALIZER_OPTION_ROOT_NAME => 'rdf:RDF', // root tag + * XML_SERIALIZER_OPTION_DEFAULT_TAG => 'item' // tag for values with numeric keys + * ); + * + * $serializer = new XML_Serializer($options); + * $rdf = $serializer->serialize($data); + * + * You will get a complete XML document that can be processed like any RDF document. + * + * 2. this classes can be used to serialize any data structure in a way that it can + * later be unserialized again. + * XML_Serializer will store the type of the value and additional meta information + * in attributes of the surrounding tag. This meat information can later be used + * to restore the original data structure in PHP. If you want XML_Serializer + * to add meta information to the tags, add + * + * XML_SERIALIZER_OPTION_TYPEHINTS => true + * + * to the options array in the constructor. + * + * @category XML + * @package XML_Serializer + * @author Stephan Schmidt + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: @package_version@ + * @link http://pear.php.net/package/XML_Serializer + * @see XML_Unserializer + */ +class XML_Serializer extends PEAR +{ + /** + * list of all available options + * + * @access private + * @var array + */ + var $_knownOptions = array( + XML_SERIALIZER_OPTION_INDENT, + XML_SERIALIZER_OPTION_LINEBREAKS, + XML_SERIALIZER_OPTION_TYPEHINTS, + XML_SERIALIZER_OPTION_XML_DECL_ENABLED, + XML_SERIALIZER_OPTION_XML_ENCODING, + XML_SERIALIZER_OPTION_DEFAULT_TAG, + XML_SERIALIZER_OPTION_CLASSNAME_AS_TAGNAME, + XML_SERIALIZER_OPTION_ATTRIBUTE_KEY, + XML_SERIALIZER_OPTION_ATTRIBUTE_TYPE, + XML_SERIALIZER_OPTION_ATTRIBUTE_CLASS, + XML_SERIALIZER_OPTION_SCALAR_AS_ATTRIBUTES, + XML_SERIALIZER_OPTION_PREPEND_ATTRIBUTES, + XML_SERIALIZER_OPTION_INDENT_ATTRIBUTES, + XML_SERIALIZER_OPTION_MODE, + XML_SERIALIZER_OPTION_DOCTYPE_ENABLED, + XML_SERIALIZER_OPTION_DOCTYPE, + XML_SERIALIZER_OPTION_ROOT_NAME, + XML_SERIALIZER_OPTION_ROOT_ATTRIBS, + XML_SERIALIZER_OPTION_ATTRIBUTES_KEY, + XML_SERIALIZER_OPTION_CONTENT_KEY, + XML_SERIALIZER_OPTION_COMMENT_KEY, + XML_SERIALIZER_OPTION_TAGMAP, + XML_SERIALIZER_OPTION_ENCODE_FUNC, + XML_SERIALIZER_OPTION_NAMESPACE, + XML_SERIALIZER_OPTION_ENTITIES, + XML_SERIALIZER_OPTION_RETURN_RESULT, + XML_SERIALIZER_OPTION_IGNORE_NULL, + XML_SERIALIZER_OPTION_CDATA_SECTIONS + ); + + /** + * default options for the serialization + * + * @access private + * @var array + */ + var $_defaultOptions = array( + XML_SERIALIZER_OPTION_INDENT => '', // string used for indentation + XML_SERIALIZER_OPTION_LINEBREAKS => "\n", // string used for newlines + XML_SERIALIZER_OPTION_TYPEHINTS => false, // automatically add type hin attributes + XML_SERIALIZER_OPTION_XML_DECL_ENABLED => false, // add an XML declaration + XML_SERIALIZER_OPTION_XML_ENCODING => null, // encoding specified in the XML declaration + XML_SERIALIZER_OPTION_DEFAULT_TAG => 'XML_Serializer_Tag', // tag used for indexed arrays or invalid names + XML_SERIALIZER_OPTION_CLASSNAME_AS_TAGNAME => false, // use classname for objects in indexed arrays + XML_SERIALIZER_OPTION_ATTRIBUTE_KEY => '_originalKey', // attribute where original key is stored + XML_SERIALIZER_OPTION_ATTRIBUTE_TYPE => '_type', // attribute for type (only if typeHints => true) + XML_SERIALIZER_OPTION_ATTRIBUTE_CLASS => '_class', // attribute for class of objects (only if typeHints => true) + XML_SERIALIZER_OPTION_SCALAR_AS_ATTRIBUTES => false, // scalar values (strings, ints,..) will be serialized as attribute + XML_SERIALIZER_OPTION_PREPEND_ATTRIBUTES => '', // prepend string for attributes + XML_SERIALIZER_OPTION_INDENT_ATTRIBUTES => false, // indent the attributes, if set to '_auto', it will indent attributes so they all start at the same column + XML_SERIALIZER_OPTION_MODE => XML_SERIALIZER_MODE_DEFAULT, // use XML_SERIALIZER_MODE_SIMPLEXML to use parent name as tagname if transforming an indexed array + XML_SERIALIZER_OPTION_DOCTYPE_ENABLED => false, // add a doctype declaration + XML_SERIALIZER_OPTION_DOCTYPE => null, // supply a string or an array with id and uri ({@see XML_Util::getDoctypeDeclaration()} + XML_SERIALIZER_OPTION_ROOT_NAME => null, // name of the root tag + XML_SERIALIZER_OPTION_ROOT_ATTRIBS => array(), // attributes of the root tag + XML_SERIALIZER_OPTION_ATTRIBUTES_KEY => null, // all values in this key will be treated as attributes + XML_SERIALIZER_OPTION_CONTENT_KEY => null, // this value will be used directly as content, instead of creating a new tag, may only be used in conjuction with attributesArray + XML_SERIALIZER_OPTION_COMMENT_KEY => null, // this value will be used directly as comment, instead of creating a new tag, may only be used in conjuction with attributesArray + XML_SERIALIZER_OPTION_TAGMAP => array(), // tag names that will be changed + XML_SERIALIZER_OPTION_ENCODE_FUNC => null, // function that will be applied before serializing + XML_SERIALIZER_OPTION_NAMESPACE => null, // namespace to use + XML_SERIALIZER_OPTION_ENTITIES => XML_SERIALIZER_ENTITIES_XML, // type of entities to replace, + XML_SERIALIZER_OPTION_RETURN_RESULT => false, // serialize() returns the result of the serialization instead of true + XML_SERIALIZER_OPTION_IGNORE_NULL => false, // ignore properties that are set to null + XML_SERIALIZER_OPTION_CDATA_SECTIONS => false // Whether to use cdata sections for plain character data + ); + + /** + * options for the serialization + * + * @access public + * @var array + */ + var $options = array(); + + /** + * current tag depth + * + * @access private + * @var integer + */ + var $_tagDepth = 0; + + /** + * serilialized representation of the data + * + * @access private + * @var string + */ + var $_serializedData = null; + + /** + * constructor + * + * @access public + * @param mixed $options array containing options for the serialization + */ + function XML_Serializer( $options = null ) + { + $this->PEAR(); + if (is_array($options)) { + $this->options = array_merge($this->_defaultOptions, $options); + } else { + $this->options = $this->_defaultOptions; + } + } + + /** + * return API version + * + * @access public + * @static + * @return string $version API version + */ + function apiVersion() + { + return '@package_version@'; + } + + /** + * reset all options to default options + * + * @access public + * @see setOption(), XML_Serializer() + */ + function resetOptions() + { + $this->options = $this->_defaultOptions; + } + + /** + * set an option + * + * You can use this method if you do not want to set all options in the constructor + * + * @access public + * @see resetOption(), XML_Serializer() + */ + function setOption($name, $value) + { + $this->options[$name] = $value; + } + + /** + * sets several options at once + * + * You can use this method if you do not want to set all options in the constructor + * + * @access public + * @see resetOption(), XML_Unserializer(), setOption() + */ + function setOptions($options) + { + $this->options = array_merge($this->options, $options); + } + + /** + * serialize data + * + * @access public + * @param mixed $data data to serialize + * @return boolean true on success, pear error on failure + */ + function serialize($data, $options = null) + { + // if options have been specified, use them instead + // of the previously defined ones + if (is_array($options)) { + $optionsBak = $this->options; + if (isset($options['overrideOptions']) && $options['overrideOptions'] == true) { + $this->options = array_merge($this->_defaultOptions, $options); + } else { + $this->options = array_merge($this->options, $options); + } + } else { + $optionsBak = null; + } + + // start depth is zero + $this->_tagDepth = 0; + + $rootAttributes = $this->options[XML_SERIALIZER_OPTION_ROOT_ATTRIBS]; + if (isset($this->options[XML_SERIALIZER_OPTION_NAMESPACE]) && is_array($this->options[XML_SERIALIZER_OPTION_NAMESPACE])) { + $rootAttributes['xmlns:'.$this->options[XML_SERIALIZER_OPTION_NAMESPACE][0]] = $this->options[XML_SERIALIZER_OPTION_NAMESPACE][1]; + } + + $this->_serializedData = ''; + // serialize an array + if (is_array($data)) { + if (isset($this->options[XML_SERIALIZER_OPTION_ROOT_NAME])) { + $tagName = $this->options[XML_SERIALIZER_OPTION_ROOT_NAME]; + } else { + $tagName = 'array'; + } + + $this->_serializedData .= $this->_serializeArray($data, $tagName, $rootAttributes); + } elseif (is_object($data)) { + // serialize an object + if (isset($this->options[XML_SERIALIZER_OPTION_ROOT_NAME])) { + $tagName = $this->options[XML_SERIALIZER_OPTION_ROOT_NAME]; + } else { + $tagName = get_class($data); + } + $this->_serializedData .= $this->_serializeObject($data, $tagName, $rootAttributes); + } else { + $tag = array(); + if (isset($this->options[XML_SERIALIZER_OPTION_ROOT_NAME])) { + $tag['qname'] = $this->options[XML_SERIALIZER_OPTION_ROOT_NAME]; + } else { + $tag['qname'] = gettype($data); + } + if ($this->options[XML_SERIALIZER_OPTION_TYPEHINTS] === true) { + $rootAttributes[$this->options[XML_SERIALIZER_OPTION_ATTRIBUTE_TYPE]] = gettype($data); + } + @settype($data, 'string'); + $tag['content'] = $data; + $tag['attributes'] = $rootAttributes; + $this->_serializedData = $this->_createXMLTag($tag); + } + + // add doctype declaration + if ($this->options[XML_SERIALIZER_OPTION_DOCTYPE_ENABLED] === true) { + $this->_serializedData = XML_Util::getDoctypeDeclaration($tagName, $this->options[XML_SERIALIZER_OPTION_DOCTYPE]) + . $this->options[XML_SERIALIZER_OPTION_LINEBREAKS] + . $this->_serializedData; + } + + // build xml declaration + if ($this->options[XML_SERIALIZER_OPTION_XML_DECL_ENABLED]) { + $atts = array(); + $this->_serializedData = XML_Util::getXMLDeclaration('1.0', $this->options[XML_SERIALIZER_OPTION_XML_ENCODING]) + . $this->options[XML_SERIALIZER_OPTION_LINEBREAKS] + . $this->_serializedData; + } + + if ($this->options[XML_SERIALIZER_OPTION_RETURN_RESULT] === true) { + $result = $this->_serializedData; + } else { + $result = true; + } + + if ($optionsBak !== null) { + $this->options = $optionsBak; + } + + return $result; + } + + /** + * get the result of the serialization + * + * @access public + * @return string serialized XML + */ + function getSerializedData() + { + if ($this->_serializedData == null) { + return $this->raiseError('No serialized data available. Use XML_Serializer::serialize() first.', XML_SERIALIZER_ERROR_NO_SERIALIZATION); + } + return $this->_serializedData; + } + + /** + * serialize any value + * + * This method checks for the type of the value and calls the appropriate method + * + * @access private + * @param mixed $value + * @param string $tagName + * @param array $attributes + * @return string + */ + function _serializeValue($value, $tagName = null, $attributes = array()) + { + if (is_array($value)) { + $xml = $this->_serializeArray($value, $tagName, $attributes); + } elseif (is_object($value)) { + $xml = $this->_serializeObject($value, $tagName); + } else { + $tag = array( + 'qname' => $tagName, + 'attributes' => $attributes, + 'content' => $value + ); + $xml = $this->_createXMLTag($tag); + } + return $xml; + } + + /** + * serialize an array + * + * @access private + * @param array $array array to serialize + * @param string $tagName name of the root tag + * @param array $attributes attributes for the root tag + * @return string $string serialized data + * @uses XML_Util::isValidName() to check, whether key has to be substituted + */ + function _serializeArray(&$array, $tagName = null, $attributes = array()) + { + $_content = null; + $_comment = null; + + // check for comment + if ($this->options[XML_SERIALIZER_OPTION_COMMENT_KEY] !== null) { + if (isset($array[$this->options[XML_SERIALIZER_OPTION_COMMENT_KEY]])) { + $_comment = $array[$this->options[XML_SERIALIZER_OPTION_COMMENT_KEY]]; + unset($array[$this->options[XML_SERIALIZER_OPTION_COMMENT_KEY]]); + } + } + + /** + * check for special attributes + */ + if ($this->options[XML_SERIALIZER_OPTION_ATTRIBUTES_KEY] !== null) { + if (isset($array[$this->options[XML_SERIALIZER_OPTION_ATTRIBUTES_KEY]])) { + $attributes = $array[$this->options[XML_SERIALIZER_OPTION_ATTRIBUTES_KEY]]; + unset($array[$this->options[XML_SERIALIZER_OPTION_ATTRIBUTES_KEY]]); + } + /** + * check for special content + */ + if ($this->options[XML_SERIALIZER_OPTION_CONTENT_KEY] !== null) { + if (isset($array[$this->options[XML_SERIALIZER_OPTION_CONTENT_KEY]])) { + $_content = $array[$this->options[XML_SERIALIZER_OPTION_CONTENT_KEY]]; + unset($array[$this->options[XML_SERIALIZER_OPTION_CONTENT_KEY]]); + } + } + } + + if ($this->options[XML_SERIALIZER_OPTION_IGNORE_NULL] === true) { + foreach (array_keys($array) as $key) { + if (is_null($array[$key])) { + unset($array[$key]); + } + } + } + + /* + * if mode is set to simpleXML, check whether + * the array is associative or indexed + */ + if (is_array($array) && !empty($array) && $this->options[XML_SERIALIZER_OPTION_MODE] == XML_SERIALIZER_MODE_SIMPLEXML) { + $indexed = true; + foreach ($array as $key => $val) { + if (!is_int($key)) { + $indexed = false; + break; + } + } + + if ($indexed && $this->options[XML_SERIALIZER_OPTION_MODE] == XML_SERIALIZER_MODE_SIMPLEXML) { + $string = ''; + foreach ($array as $key => $val) { + $string .= $this->_serializeValue( $val, $tagName, $attributes); + + $string .= $this->options[XML_SERIALIZER_OPTION_LINEBREAKS]; + // do indentation + if ($this->options[XML_SERIALIZER_OPTION_INDENT]!==null && $this->_tagDepth>0) { + $string .= str_repeat($this->options[XML_SERIALIZER_OPTION_INDENT], $this->_tagDepth); + } + } + return rtrim($string); + } + } + + $scalarAsAttributes = false; + if (is_array($this->options[XML_SERIALIZER_OPTION_SCALAR_AS_ATTRIBUTES]) && isset($this->options[XML_SERIALIZER_OPTION_SCALAR_AS_ATTRIBUTES][$tagName])) { + $scalarAsAttributes = $this->options[XML_SERIALIZER_OPTION_SCALAR_AS_ATTRIBUTES][$tagName]; + } elseif ($this->options[XML_SERIALIZER_OPTION_SCALAR_AS_ATTRIBUTES] === true) { + $scalarAsAttributes = true; + } + + if ($scalarAsAttributes === true) { + $this->expectError('*'); + foreach ($array as $key => $value) { + if (is_scalar($value) && (XML_Util::isValidName($key) === true)) { + unset($array[$key]); + $attributes[$this->options[XML_SERIALIZER_OPTION_PREPEND_ATTRIBUTES].$key] = $value; + } + } + $this->popExpect(); + } elseif (is_array($scalarAsAttributes)) { + $this->expectError('*'); + foreach ($scalarAsAttributes as $key) { + if (!isset($array[$key])) { + continue; + } + $value = $array[$key]; + if (is_scalar($value) && (XML_Util::isValidName($key) === true)) { + unset($array[$key]); + $attributes[$this->options[XML_SERIALIZER_OPTION_PREPEND_ATTRIBUTES].$key] = $value; + } + } + $this->popExpect(); + } + + // check for empty array => create empty tag + if (empty($array)) { + $tag = array( + 'qname' => $tagName, + 'content' => $_content, + 'attributes' => $attributes + ); + } else { + $this->_tagDepth++; + $tmp = $this->options[XML_SERIALIZER_OPTION_LINEBREAKS]; + foreach ($array as $key => $value) { + // do indentation + if ($this->options[XML_SERIALIZER_OPTION_INDENT]!==null && $this->_tagDepth>0) { + $tmp .= str_repeat($this->options[XML_SERIALIZER_OPTION_INDENT], $this->_tagDepth); + } + + if (isset($this->options[XML_SERIALIZER_OPTION_TAGMAP][$key])) { + $key = $this->options[XML_SERIALIZER_OPTION_TAGMAP][$key]; + } + + // copy key + $origKey = $key; + $this->expectError('*'); + // key cannot be used as tagname => use default tag + $valid = XML_Util::isValidName($key); + $this->popExpect(); + if (PEAR::isError($valid)) { + if ($this->options[XML_SERIALIZER_OPTION_CLASSNAME_AS_TAGNAME] && is_object($value)) { + $key = get_class($value); + } else { + $key = $this->_getDefaultTagname($tagName); + } + } + $atts = array(); + if ($this->options[XML_SERIALIZER_OPTION_TYPEHINTS] === true) { + $atts[$this->options[XML_SERIALIZER_OPTION_ATTRIBUTE_TYPE]] = gettype($value); + if ($key !== $origKey) { + $atts[$this->options[XML_SERIALIZER_OPTION_ATTRIBUTE_KEY]] = (string)$origKey; + } + } + + $tmp .= $this->_createXMLTag(array( + 'qname' => $key, + 'attributes' => $atts, + 'content' => $value ) + ); + $tmp .= $this->options[XML_SERIALIZER_OPTION_LINEBREAKS]; + } + + $this->_tagDepth--; + if ($this->options[XML_SERIALIZER_OPTION_INDENT]!==null && $this->_tagDepth>0) { + $tmp .= str_repeat($this->options[XML_SERIALIZER_OPTION_INDENT], $this->_tagDepth); + } + + if (trim($tmp) === '') { + $tmp = null; + } + + $tag = array( + 'qname' => $tagName, + 'content' => $tmp, + 'attributes' => $attributes + ); + } + if ($this->options[XML_SERIALIZER_OPTION_TYPEHINTS] === true) { + if (!isset($tag['attributes'][$this->options[XML_SERIALIZER_OPTION_ATTRIBUTE_TYPE]])) { + $tag['attributes'][$this->options[XML_SERIALIZER_OPTION_ATTRIBUTE_TYPE]] = 'array'; + } + } + + $string = ''; + if (!is_null($_comment)) { + $string .= XML_Util::createComment($_comment); + $string .= $this->options[XML_SERIALIZER_OPTION_LINEBREAKS]; + if ($this->options[XML_SERIALIZER_OPTION_INDENT]!==null && $this->_tagDepth>0) { + $string .= str_repeat($this->options[XML_SERIALIZER_OPTION_INDENT], $this->_tagDepth); + } + } + $string .= $this->_createXMLTag($tag, false); + return $string; + } + + /** + * get the name of the default tag. + * + * The name of the parent tag needs to be passed as the + * default name can depend on the context. + * + * @param string name of the parent tag + * @return string default tag name + */ + function _getDefaultTagname($parent) + { + if (is_string($this->options[XML_SERIALIZER_OPTION_DEFAULT_TAG])) { + return $this->options[XML_SERIALIZER_OPTION_DEFAULT_TAG]; + } + if (isset($this->options[XML_SERIALIZER_OPTION_DEFAULT_TAG][$parent])) { + return $this->options[XML_SERIALIZER_OPTION_DEFAULT_TAG][$parent]; + } elseif (isset($this->options[XML_SERIALIZER_OPTION_DEFAULT_TAG]['#default'])) { + return $this->options[XML_SERIALIZER_OPTION_DEFAULT_TAG]['#default']; + } elseif (isset($this->options[XML_SERIALIZER_OPTION_DEFAULT_TAG]['__default'])) { + // keep this for BC + return $this->options[XML_SERIALIZER_OPTION_DEFAULT_TAG]['__default']; + } + return 'XML_Serializer_Tag'; + } + + /** + * serialize an object + * + * @access private + * @param object $object object to serialize + * @return string $string serialized data + */ + function _serializeObject(&$object, $tagName = null, $attributes = array()) + { + // check for magic function + if (method_exists($object, '__sleep')) { + $propNames = $object->__sleep(); + if (is_array($propNames)) { + $properties = array(); + foreach ($propNames as $propName) { + $properties[$propName] = $object->$propName; + } + } else { + $properties = get_object_vars($object); + } + } else { + $properties = get_object_vars($object); + } + + if (empty($tagName)) { + $tagName = get_class($object); + } + + // typehints activated? + if ($this->options[XML_SERIALIZER_OPTION_TYPEHINTS] === true) { + $attributes[$this->options[XML_SERIALIZER_OPTION_ATTRIBUTE_TYPE]] = 'object'; + $attributes[$this->options[XML_SERIALIZER_OPTION_ATTRIBUTE_CLASS]] = get_class($object); + } + $string = $this->_serializeArray($properties, $tagName, $attributes); + return $string; + } + + /** + * create a tag from an array + * this method awaits an array in the following format + * array( + * 'qname' => $tagName, + * 'attributes' => array(), + * 'content' => $content, // optional + * 'namespace' => $namespace // optional + * 'namespaceUri' => $namespaceUri // optional + * ) + * + * @access private + * @param array $tag tag definition + * @param boolean $replaceEntities whether to replace XML entities in content or not + * @return string $string XML tag + */ + function _createXMLTag($tag, $firstCall = true) + { + // build fully qualified tag name + if ($this->options[XML_SERIALIZER_OPTION_NAMESPACE] !== null) { + if (is_array($this->options[XML_SERIALIZER_OPTION_NAMESPACE])) { + $tag['qname'] = $this->options[XML_SERIALIZER_OPTION_NAMESPACE][0] . ':' . $tag['qname']; + } else { + $tag['qname'] = $this->options[XML_SERIALIZER_OPTION_NAMESPACE] . ':' . $tag['qname']; + } + } + + // attribute indentation + if ($this->options[XML_SERIALIZER_OPTION_INDENT_ATTRIBUTES] !== false) { + $multiline = true; + $indent = str_repeat($this->options[XML_SERIALIZER_OPTION_INDENT], $this->_tagDepth); + + if ($this->options[XML_SERIALIZER_OPTION_INDENT_ATTRIBUTES] == '_auto') { + $indent .= str_repeat(' ', (strlen($tag['qname'])+2)); + + } else { + $indent .= $this->options[XML_SERIALIZER_OPTION_INDENT_ATTRIBUTES]; + } + } else { + $multiline = false; + $indent = false; + } + + if (is_array($tag['content'])) { + if (empty($tag['content'])) { + $tag['content'] = ''; + } + } elseif(is_scalar($tag['content']) && (string)$tag['content'] == '') { + $tag['content'] = ''; + } + + // replace XML entities (only needed, if this is not a nested call) + if ($firstCall === true) { + if ($this->options[XML_SERIALIZER_OPTION_CDATA_SECTIONS] === true) { + $replaceEntities = XML_UTIL_CDATA_SECTION; + } else { + $replaceEntities = $this->options[XML_SERIALIZER_OPTION_ENTITIES]; + } + } else { + $replaceEntities = XML_SERIALIZER_ENTITIES_NONE; + } + if (is_scalar($tag['content']) || is_null($tag['content'])) { + if ($this->options[XML_SERIALIZER_OPTION_ENCODE_FUNC]) { + if ($firstCall === true) { + $tag['content'] = call_user_func($this->options[XML_SERIALIZER_OPTION_ENCODE_FUNC], $tag['content']); + } + $tag['attributes'] = array_map($this->options[XML_SERIALIZER_OPTION_ENCODE_FUNC], $tag['attributes']); + } + $tag = XML_Util::createTagFromArray($tag, $replaceEntities, $multiline, $indent, $this->options[XML_SERIALIZER_OPTION_LINEBREAKS]); + } elseif (is_array($tag['content'])) { + $tag = $this->_serializeArray($tag['content'], $tag['qname'], $tag['attributes']); + } elseif (is_object($tag['content'])) { + $tag = $this->_serializeObject($tag['content'], $tag['qname'], $tag['attributes']); + } elseif (is_resource($tag['content'])) { + settype($tag['content'], 'string'); + if ($this->options[XML_SERIALIZER_OPTION_ENCODE_FUNC]) { + if ($replaceEntities === true) { + $tag['content'] = call_user_func($this->options[XML_SERIALIZER_OPTION_ENCODE_FUNC], $tag['content']); + } + $tag['attributes'] = array_map($this->options[XML_SERIALIZER_OPTION_ENCODE_FUNC], $tag['attributes']); + } + $tag = XML_Util::createTagFromArray($tag, $replaceEntities); + } + return $tag; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/XML/Unserializer.php b/campcaster/src/tools/pear/src/XML/Unserializer.php new file mode 100644 index 000000000..a5a03dcfc --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Unserializer.php @@ -0,0 +1,856 @@ + + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version CVS: $Id: Unserializer.php,v 1.39 2005/09/28 11:19:56 schst Exp $ + * @link http://pear.php.net/package/XML_Serializer + * @see XML_Unserializer + */ + +/** + * uses PEAR error managemt + */ +require_once 'PEAR.php'; + +/** + * uses XML_Parser to unserialize document + */ +require_once 'XML/Parser.php'; + +/** + * option: Convert nested tags to array or object + * + * Possible values: + * - array + * - object + * - associative array to define this option per tag name + */ +define('XML_UNSERIALIZER_OPTION_COMPLEXTYPE', 'complexType'); + +/** + * option: Name of the attribute that stores the original key + * + * Possible values: + * - any string + */ +define('XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY', 'keyAttribute'); + +/** + * option: Name of the attribute that stores the type + * + * Possible values: + * - any string + */ +define('XML_UNSERIALIZER_OPTION_ATTRIBUTE_TYPE', 'typeAttribute'); + +/** + * option: Name of the attribute that stores the class name + * + * Possible values: + * - any string + */ +define('XML_UNSERIALIZER_OPTION_ATTRIBUTE_CLASS', 'classAttribute'); + +/** + * option: Whether to use the tag name as a class name + * + * Possible values: + * - true or false + */ +define('XML_UNSERIALIZER_OPTION_TAG_AS_CLASSNAME', 'tagAsClass'); + +/** + * option: Name of the default class + * + * Possible values: + * - any string + */ +define('XML_UNSERIALIZER_OPTION_DEFAULT_CLASS', 'defaultClass'); + +/** + * option: Whether to parse attributes + * + * Possible values: + * - true or false + */ +define('XML_UNSERIALIZER_OPTION_ATTRIBUTES_PARSE', 'parseAttributes'); + +/** + * option: Key of the array to store attributes (if any) + * + * Possible values: + * - any string + * - false (disabled) + */ +define('XML_UNSERIALIZER_OPTION_ATTRIBUTES_ARRAYKEY', 'attributesArray'); + +/** + * option: string to prepend attribute name (if any) + * + * Possible values: + * - any string + * - false (disabled) + */ +define('XML_UNSERIALIZER_OPTION_ATTRIBUTES_PREPEND', 'prependAttributes'); + +/** + * option: key to store the content, if XML_UNSERIALIZER_OPTION_ATTRIBUTES_PARSE is used + * + * Possible values: + * - any string + */ +define('XML_UNSERIALIZER_OPTION_CONTENT_KEY', 'contentName'); + +/** + * option: map tag names + * + * Possible values: + * - associative array + */ +define('XML_UNSERIALIZER_OPTION_TAG_MAP', 'tagMap'); + +/** + * option: list of tags that will always be enumerated + * + * Possible values: + * - indexed array + */ +define('XML_UNSERIALIZER_OPTION_FORCE_ENUM', 'forceEnum'); + +/** + * option: Encoding of the XML document + * + * Possible values: + * - UTF-8 + * - ISO-8859-1 + */ +define('XML_UNSERIALIZER_OPTION_ENCODING_SOURCE', 'encoding'); + +/** + * option: Desired target encoding of the data + * + * Possible values: + * - UTF-8 + * - ISO-8859-1 + */ +define('XML_UNSERIALIZER_OPTION_ENCODING_TARGET', 'targetEncoding'); + +/** + * option: Callback that will be applied to textual data + * + * Possible values: + * - any valid PHP callback + */ +define('XML_UNSERIALIZER_OPTION_DECODE_FUNC', 'decodeFunction'); + +/** + * option: whether to return the result of the unserialization from unserialize() + * + * Possible values: + * - true + * - false (default) + */ +define('XML_UNSERIALIZER_OPTION_RETURN_RESULT', 'returnResult'); + +/** + * option: set the whitespace behaviour + * + * Possible values: + * - XML_UNSERIALIZER_WHITESPACE_KEEP + * - XML_UNSERIALIZER_WHITESPACE_TRIM + * - XML_UNSERIALIZER_WHITESPACE_NORMALIZE + */ +define('XML_UNSERIALIZER_OPTION_WHITESPACE', 'whitespace'); + +/** + * Keep all whitespace + */ +define('XML_UNSERIALIZER_WHITESPACE_KEEP', 'keep'); + +/** + * remove whitespace from start and end of the data + */ +define('XML_UNSERIALIZER_WHITESPACE_TRIM', 'trim'); + +/** + * normalize whitespace + */ +define('XML_UNSERIALIZER_WHITESPACE_NORMALIZE', 'normalize'); + +/** + * option: whether to ovverride all options that have been set before + * + * Possible values: + * - true + * - false (default) + */ +define('XML_UNSERIALIZER_OPTION_OVERRIDE_OPTIONS', 'overrideOptions'); + +/** + * option: list of tags, that will not be used as keys + */ +define('XML_UNSERIALIZER_OPTION_IGNORE_KEYS', 'ignoreKeys'); + +/** + * option: whether to use type guessing for scalar values + */ +define('XML_UNSERIALIZER_OPTION_GUESS_TYPES', 'guessTypes'); + +/** + * error code for no serialization done + */ +define('XML_UNSERIALIZER_ERROR_NO_UNSERIALIZATION', 151); + +/** + * XML_Unserializer + * + * class to unserialize XML documents that have been created with + * XML_Serializer. To unserialize an XML document you have to add + * type hints to the XML_Serializer options. + * + * If no type hints are available, XML_Unserializer will guess how + * the tags should be treated, that means complex structures will be + * arrays and tags with only CData in them will be strings. + * + * + * require_once 'XML/Unserializer.php'; + * + * // be careful to always use the ampersand in front of the new operator + * $unserializer = &new XML_Unserializer(); + * + * $unserializer->unserialize($xml); + * + * $data = $unserializer->getUnserializedData(); + * + * + * + * @category XML + * @package XML_Serializer + * @author Stephan Schmidt + * @copyright 1997-2005 The PHP Group + * @license http://www.php.net/license/3_0.txt PHP License 3.0 + * @version Release: @package_version@ + * @link http://pear.php.net/package/XML_Serializer + * @see XML_Serializer + */ +class XML_Unserializer extends PEAR +{ + /** + * list of all available options + * + * @access private + * @var array + */ + var $_knownOptions = array( + XML_UNSERIALIZER_OPTION_COMPLEXTYPE, + XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY, + XML_UNSERIALIZER_OPTION_ATTRIBUTE_TYPE, + XML_UNSERIALIZER_OPTION_ATTRIBUTE_CLASS, + XML_UNSERIALIZER_OPTION_TAG_AS_CLASSNAME, + XML_UNSERIALIZER_OPTION_DEFAULT_CLASS, + XML_UNSERIALIZER_OPTION_ATTRIBUTES_PARSE, + XML_UNSERIALIZER_OPTION_ATTRIBUTES_ARRAYKEY, + XML_UNSERIALIZER_OPTION_ATTRIBUTES_PREPEND, + XML_UNSERIALIZER_OPTION_CONTENT_KEY, + XML_UNSERIALIZER_OPTION_TAG_MAP, + XML_UNSERIALIZER_OPTION_FORCE_ENUM, + XML_UNSERIALIZER_OPTION_ENCODING_SOURCE, + XML_UNSERIALIZER_OPTION_ENCODING_TARGET, + XML_UNSERIALIZER_OPTION_DECODE_FUNC, + XML_UNSERIALIZER_OPTION_RETURN_RESULT, + XML_UNSERIALIZER_OPTION_WHITESPACE, + XML_UNSERIALIZER_OPTION_IGNORE_KEYS, + XML_UNSERIALIZER_OPTION_GUESS_TYPES + ); + /** + * default options for the serialization + * + * @access private + * @var array + */ + var $_defaultOptions = array( + XML_UNSERIALIZER_OPTION_COMPLEXTYPE => 'array', // complex types will be converted to arrays, if no type hint is given + XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY => '_originalKey', // get array key/property name from this attribute + XML_UNSERIALIZER_OPTION_ATTRIBUTE_TYPE => '_type', // get type from this attribute + XML_UNSERIALIZER_OPTION_ATTRIBUTE_CLASS => '_class', // get class from this attribute (if not given, use tag name) + XML_UNSERIALIZER_OPTION_TAG_AS_CLASSNAME => true, // use the tagname as the classname + XML_UNSERIALIZER_OPTION_DEFAULT_CLASS => 'stdClass', // name of the class that is used to create objects + XML_UNSERIALIZER_OPTION_ATTRIBUTES_PARSE => false, // parse the attributes of the tag into an array + XML_UNSERIALIZER_OPTION_ATTRIBUTES_ARRAYKEY => false, // parse them into sperate array (specify name of array here) + XML_UNSERIALIZER_OPTION_ATTRIBUTES_PREPEND => '', // prepend attribute names with this string + XML_UNSERIALIZER_OPTION_CONTENT_KEY => '_content', // put cdata found in a tag that has been converted to a complex type in this key + XML_UNSERIALIZER_OPTION_TAG_MAP => array(), // use this to map tagnames + XML_UNSERIALIZER_OPTION_FORCE_ENUM => array(), // these tags will always be an indexed array + XML_UNSERIALIZER_OPTION_ENCODING_SOURCE => null, // specify the encoding character of the document to parse + XML_UNSERIALIZER_OPTION_ENCODING_TARGET => null, // specify the target encoding + XML_UNSERIALIZER_OPTION_DECODE_FUNC => null, // function used to decode data + XML_UNSERIALIZER_OPTION_RETURN_RESULT => false, // unserialize() returns the result of the unserialization instead of true + XML_UNSERIALIZER_OPTION_WHITESPACE => XML_UNSERIALIZER_WHITESPACE_TRIM, // remove whitespace around data + XML_UNSERIALIZER_OPTION_IGNORE_KEYS => array(), // List of tags that will automatically be added to the parent, instead of adding a new key + XML_UNSERIALIZER_OPTION_GUESS_TYPES => false // Whether to use type guessing + ); + + /** + * current options for the serialization + * + * @access public + * @var array + */ + var $options = array(); + + /** + * unserialized data + * + * @access private + * @var string + */ + var $_unserializedData = null; + + /** + * name of the root tag + * + * @access private + * @var string + */ + var $_root = null; + + /** + * stack for all data that is found + * + * @access private + * @var array + */ + var $_dataStack = array(); + + /** + * stack for all values that are generated + * + * @access private + * @var array + */ + var $_valStack = array(); + + /** + * current tag depth + * + * @access private + * @var int + */ + var $_depth = 0; + + /** + * XML_Parser instance + * + * @access private + * @var object XML_Parser + */ + var $_parser = null; + + /** + * constructor + * + * @access public + * @param mixed $options array containing options for the unserialization + */ + function XML_Unserializer($options = null) + { + if (is_array($options)) { + $this->options = array_merge($this->_defaultOptions, $options); + } else { + $this->options = $this->_defaultOptions; + } + } + + /** + * return API version + * + * @access public + * @static + * @return string $version API version + */ + function apiVersion() + { + return '@package_version@'; + } + + /** + * reset all options to default options + * + * @access public + * @see setOption(), XML_Unserializer(), setOptions() + */ + function resetOptions() + { + $this->options = $this->_defaultOptions; + } + + /** + * set an option + * + * You can use this method if you do not want to set all options in the constructor + * + * @access public + * @see resetOption(), XML_Unserializer(), setOptions() + */ + function setOption($name, $value) + { + $this->options[$name] = $value; + } + + /** + * sets several options at once + * + * You can use this method if you do not want to set all options in the constructor + * + * @access public + * @see resetOption(), XML_Unserializer(), setOption() + */ + function setOptions($options) + { + $this->options = array_merge($this->options, $options); + } + + /** + * unserialize data + * + * @access public + * @param mixed $data data to unserialize (string, filename or resource) + * @param boolean $isFile data should be treated as a file + * @param array $options options that will override the global options for this call + * @return boolean $success + */ + function unserialize($data, $isFile = false, $options = null) + { + $this->_unserializedData = null; + $this->_root = null; + + // if options have been specified, use them instead + // of the previously defined ones + if (is_array($options)) { + $optionsBak = $this->options; + if (isset($options[XML_UNSERIALIZER_OPTION_OVERRIDE_OPTIONS]) && $options[XML_UNSERIALIZER_OPTION_OVERRIDE_OPTIONS] == true) { + $this->options = array_merge($this->_defaultOptions, $options); + } else { + $this->options = array_merge($this->options, $options); + } + } else { + $optionsBak = null; + } + + $this->_valStack = array(); + $this->_dataStack = array(); + $this->_depth = 0; + + $this->_createParser(); + + if (is_string($data)) { + if ($isFile) { + $result = $this->_parser->setInputFile($data); + if (PEAR::isError($result)) { + return $result; + } + $result = $this->_parser->parse(); + } else { + $result = $this->_parser->parseString($data,true); + } + } else { + $this->_parser->setInput($data); + $result = $this->_parser->parse(); + } + + if ($this->options[XML_UNSERIALIZER_OPTION_RETURN_RESULT] === true) { + $return = $this->_unserializedData; + } else { + $return = true; + } + + if ($optionsBak !== null) { + $this->options = $optionsBak; + } + + if (PEAR::isError($result)) { + return $result; + } + + return $return; + } + + /** + * get the result of the serialization + * + * @access public + * @return string $serializedData + */ + function getUnserializedData() + { + if ($this->_root === null) { + return $this->raiseError('No unserialized data available. Use XML_Unserializer::unserialize() first.', XML_UNSERIALIZER_ERROR_NO_UNSERIALIZATION); + } + return $this->_unserializedData; + } + + /** + * get the name of the root tag + * + * @access public + * @return string $rootName + */ + function getRootName() + { + if ($this->_root === null) { + return $this->raiseError('No unserialized data available. Use XML_Unserializer::unserialize() first.', XML_UNSERIALIZER_ERROR_NO_UNSERIALIZATION); + } + return $this->_root; + } + + /** + * Start element handler for XML parser + * + * @access private + * @param object $parser XML parser object + * @param string $element XML element + * @param array $attribs attributes of XML tag + * @return void + */ + function startHandler($parser, $element, $attribs) + { + if (isset($attribs[$this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_TYPE]])) { + $type = $attribs[$this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_TYPE]]; + $guessType = false; + } else { + $type = 'string'; + if ($this->options[XML_UNSERIALIZER_OPTION_GUESS_TYPES] === true) { + $guessType = true; + } else { + $guessType = false; + } + } + + if ($this->options[XML_UNSERIALIZER_OPTION_DECODE_FUNC] !== null) { + $attribs = array_map($this->options[XML_UNSERIALIZER_OPTION_DECODE_FUNC], $attribs); + } + + $this->_depth++; + $this->_dataStack[$this->_depth] = null; + + if (is_array($this->options[XML_UNSERIALIZER_OPTION_TAG_MAP]) && isset($this->options[XML_UNSERIALIZER_OPTION_TAG_MAP][$element])) { + $element = $this->options[XML_UNSERIALIZER_OPTION_TAG_MAP][$element]; + } + + $val = array( + 'name' => $element, + 'value' => null, + 'type' => $type, + 'guessType' => $guessType, + 'childrenKeys' => array(), + 'aggregKeys' => array() + ); + + if ($this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTES_PARSE] == true && (count($attribs) > 0)) { + $val['children'] = array(); + $val['type'] = $this->_getComplexType($element); + $val['class'] = $element; + + if ($this->options[XML_UNSERIALIZER_OPTION_GUESS_TYPES] === true) { + $attribs = $this->_guessAndSetTypes($attribs); + } + if ($this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTES_ARRAYKEY] != false) { + $val['children'][$this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTES_ARRAYKEY]] = $attribs; + } else { + foreach ($attribs as $attrib => $value) { + $val['children'][$this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTES_PREPEND].$attrib] = $value; + } + } + } + + $keyAttr = false; + + if (is_string($this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY])) { + $keyAttr = $this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY]; + } elseif (is_array($this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY])) { + if (isset($this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY][$element])) { + $keyAttr = $this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY][$element]; + } elseif (isset($this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY]['#default'])) { + $keyAttr = $this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY]['#default']; + } elseif (isset($this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY]['__default'])) { + // keep this for BC + $keyAttr = $this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_KEY]['__default']; + } + } + + if ($keyAttr !== false && isset($attribs[$keyAttr])) { + $val['name'] = $attribs[$keyAttr]; + } + + if (isset($attribs[$this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_CLASS]])) { + $val['class'] = $attribs[$this->options[XML_UNSERIALIZER_OPTION_ATTRIBUTE_CLASS]]; + } + + array_push($this->_valStack, $val); + } + + /** + * Try to guess the type of several values and + * set them accordingly + * + * @access private + * @param array array, containing the values + * @return array array, containing the values with their correct types + */ + function _guessAndSetTypes($array) + { + foreach ($array as $key => $value) { + $array[$key] = $this->_guessAndSetType($value); + } + return $array; + } + + /** + * Try to guess the type of a value and + * set it accordingly + * + * @access private + * @param string character data + * @return mixed value with the best matching type + */ + function _guessAndSetType($value) + { + if ($value === 'true') { + return true; + } + if ($value === 'false') { + return false; + } + if ($value === 'NULL') { + return null; + } + if (preg_match('/^[-+]?[0-9]{1,}$/', $value)) { + return intval($value); + } + if (preg_match('/^[-+]?[0-9]{1,}\.[0-9]{1,}$/', $value)) { + return doubleval($value); + } + return (string)$value; + } + + /** + * End element handler for XML parser + * + * @access private + * @param object XML parser object + * @param string + * @return void + */ + function endHandler($parser, $element) + { + $value = array_pop($this->_valStack); + switch ($this->options[XML_UNSERIALIZER_OPTION_WHITESPACE]) { + case XML_UNSERIALIZER_WHITESPACE_KEEP: + $data = $this->_dataStack[$this->_depth]; + break; + case XML_UNSERIALIZER_WHITESPACE_NORMALIZE: + $data = trim(preg_replace('/\s\s+/m', ' ', $this->_dataStack[$this->_depth])); + break; + case XML_UNSERIALIZER_WHITESPACE_TRIM: + default: + $data = trim($this->_dataStack[$this->_depth]); + break; + } + + // adjust type of the value + switch(strtolower($value['type'])) { + + // unserialize an object + case 'object': + if (isset($value['class'])) { + $classname = $value['class']; + } else { + $classname = ''; + } + // instantiate the class + if ($this->options[XML_UNSERIALIZER_OPTION_TAG_AS_CLASSNAME] === true && class_exists($classname)) { + $value['value'] = &new $classname; + } else { + $value['value'] = &new $this->options[XML_UNSERIALIZER_OPTION_DEFAULT_CLASS]; + } + if (trim($data) !== '') { + if ($value['guessType'] === true) { + $data = $this->_guessAndSetType($data); + } + $value['children'][$this->options[XML_UNSERIALIZER_OPTION_CONTENT_KEY]] = $data; + } + + // set properties + foreach ($value['children'] as $prop => $propVal) { + // check whether there is a special method to set this property + $setMethod = 'set'.$prop; + if (method_exists($value['value'], $setMethod)) { + call_user_func(array(&$value['value'], $setMethod), $propVal); + } else { + $value['value']->$prop = $propVal; + } + } + // check for magic function + if (method_exists($value['value'], '__wakeup')) { + $value['value']->__wakeup(); + } + break; + + // unserialize an array + case 'array': + if (trim($data) !== '') { + if ($value['guessType'] === true) { + $data = $this->_guessAndSetType($data); + } + $value['children'][$this->options[XML_UNSERIALIZER_OPTION_CONTENT_KEY]] = $data; + } + if (isset($value['children'])) { + $value['value'] = $value['children']; + } else { + $value['value'] = array(); + } + break; + + // unserialize a null value + case 'null': + $data = null; + break; + + // unserialize a resource => this is not possible :-( + case 'resource': + $value['value'] = $data; + break; + + // unserialize any scalar value + default: + if ($value['guessType'] === true) { + $data = $this->_guessAndSetType($data); + } else { + settype($data, $value['type']); + } + + $value['value'] = $data; + break; + } + $parent = array_pop($this->_valStack); + if ($parent === null) { + $this->_unserializedData = &$value['value']; + $this->_root = &$value['name']; + return true; + } else { + // parent has to be an array + if (!isset($parent['children']) || !is_array($parent['children'])) { + $parent['children'] = array(); + if (!in_array($parent['type'], array('array', 'object'))) { + $parent['type'] = $this->_getComplexType($parent['name']); + if ($parent['type'] == 'object') { + $parent['class'] = $parent['name']; + } + } + } + + if (in_array($element, $this->options[XML_UNSERIALIZER_OPTION_IGNORE_KEYS])) { + $ignoreKey = true; + } else { + $ignoreKey = false; + } + + if (!empty($value['name']) && $ignoreKey === false) { + // there already has been a tag with this name + if (in_array($value['name'], $parent['childrenKeys']) || in_array($value['name'], $this->options[XML_UNSERIALIZER_OPTION_FORCE_ENUM])) { + // no aggregate has been created for this tag + if (!in_array($value['name'], $parent['aggregKeys'])) { + if (isset($parent['children'][$value['name']])) { + $parent['children'][$value['name']] = array($parent['children'][$value['name']]); + } else { + $parent['children'][$value['name']] = array(); + } + array_push($parent['aggregKeys'], $value['name']); + } + array_push($parent['children'][$value['name']], $value['value']); + } else { + $parent['children'][$value['name']] = &$value['value']; + array_push($parent['childrenKeys'], $value['name']); + } + } else { + array_push($parent['children'], $value['value']); + } + array_push($this->_valStack, $parent); + } + + $this->_depth--; + } + + /** + * Handler for character data + * + * @access private + * @param object XML parser object + * @param string CDATA + * @return void + */ + function cdataHandler($parser, $cdata) + { + if ($this->options[XML_UNSERIALIZER_OPTION_DECODE_FUNC] !== null) { + $cdata = call_user_func($this->options[XML_UNSERIALIZER_OPTION_DECODE_FUNC], $cdata); + } + $this->_dataStack[$this->_depth] .= $cdata; + } + + /** + * get the complex type, that should be used for a specified tag + * + * @access private + * @param string name of the tag + * @return string complex type ('array' or 'object') + */ + function _getComplexType($tagname) + { + if (is_string($this->options[XML_UNSERIALIZER_OPTION_COMPLEXTYPE])) { + return $this->options[XML_UNSERIALIZER_OPTION_COMPLEXTYPE]; + } + if (isset($this->options[XML_UNSERIALIZER_OPTION_COMPLEXTYPE][$tagname])) { + return $this->options[XML_UNSERIALIZER_OPTION_COMPLEXTYPE][$tagname]; + } + if (isset($this->options[XML_UNSERIALIZER_OPTION_COMPLEXTYPE]['#default'])) { + return $this->options[XML_UNSERIALIZER_OPTION_COMPLEXTYPE]['#default']; + } + return 'array'; + } + + /** + * create the XML_Parser instance + * + * @access private + * @return boolean + */ + function _createParser() + { + if (is_object($this->_parser)) { + $this->_parser->free(); + unset($this->_parser); + } + $this->_parser = &new XML_Parser($this->options[XML_UNSERIALIZER_OPTION_ENCODING_SOURCE], 'event', $this->options[XML_UNSERIALIZER_OPTION_ENCODING_TARGET]); + $this->_parser->folding = false; + $this->_parser->setHandlerObj($this); + return true; + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/XML/Util.php b/campcaster/src/tools/pear/src/XML/Util.php new file mode 100644 index 000000000..7a4a4c71a --- /dev/null +++ b/campcaster/src/tools/pear/src/XML/Util.php @@ -0,0 +1,743 @@ + | +// +----------------------------------------------------------------------+ +// +// $Id: Util.php,v 1.24 2004/12/23 13:21:59 schst Exp $ + +/** + * error code for invalid chars in XML name + */ +define("XML_UTIL_ERROR_INVALID_CHARS", 51); + +/** + * error code for invalid chars in XML name + */ +define("XML_UTIL_ERROR_INVALID_START", 52); + +/** + * error code for non-scalar tag content + */ +define("XML_UTIL_ERROR_NON_SCALAR_CONTENT", 60); + +/** + * error code for missing tag name + */ +define("XML_UTIL_ERROR_NO_TAG_NAME", 61); + +/** + * replace XML entities + */ +define("XML_UTIL_REPLACE_ENTITIES", 1); + +/** + * embedd content in a CData Section + */ +define("XML_UTIL_CDATA_SECTION", 5); + +/** + * do not replace entitites + */ +define("XML_UTIL_ENTITIES_NONE", 0); + +/** + * replace all XML entitites + * This setting will replace <, >, ", ' and & + */ +define("XML_UTIL_ENTITIES_XML", 1); + +/** + * replace only required XML entitites + * This setting will replace <, " and & + */ +define("XML_UTIL_ENTITIES_XML_REQUIRED", 2); + +/** + * replace HTML entitites + * @link http://www.php.net/htmlentities + */ +define("XML_UTIL_ENTITIES_HTML", 3); + +/** + * Collapse all empty tags. + */ +define("XML_UTIL_COLLAPSE_ALL", 1); + +/** + * Collapse only empty XHTML tags that have no end tag. + */ +define("XML_UTIL_COLLAPSE_XHTML_ONLY", 2); + +/** + * utility class for working with XML documents + * + * @category XML + * @package XML_Util + * @version 1.1.0 + * @author Stephan Schmidt + */ +class XML_Util { + + /** + * return API version + * + * @access public + * @static + * @return string $version API version + */ + function apiVersion() + { + return '1.1'; + } + + /** + * replace XML entities + * + * With the optional second parameter, you may select, which + * entities should be replaced. + * + * + * require_once 'XML/Util.php'; + * + * // replace XML entites: + * $string = XML_Util::replaceEntities("This string contains < & >."); + * + * + * @access public + * @static + * @param string string where XML special chars should be replaced + * @param integer setting for entities in attribute values (one of XML_UTIL_ENTITIES_XML, XML_UTIL_ENTITIES_XML_REQUIRED, XML_UTIL_ENTITIES_HTML) + * @return string string with replaced chars + * @see reverseEntities() + */ + function replaceEntities($string, $replaceEntities = XML_UTIL_ENTITIES_XML) + { + switch ($replaceEntities) { + case XML_UTIL_ENTITIES_XML: + return strtr($string,array( + '&' => '&', + '>' => '>', + '<' => '<', + '"' => '"', + '\'' => ''' )); + break; + case XML_UTIL_ENTITIES_XML_REQUIRED: + return strtr($string,array( + '&' => '&', + '<' => '<', + '"' => '"' )); + break; + case XML_UTIL_ENTITIES_HTML: + return htmlentities($string); + break; + } + return $string; + } + + /** + * reverse XML entities + * + * With the optional second parameter, you may select, which + * entities should be reversed. + * + * + * require_once 'XML/Util.php'; + * + * // reverse XML entites: + * $string = XML_Util::reverseEntities("This string contains < & >."); + * + * + * @access public + * @static + * @param string string where XML special chars should be replaced + * @param integer setting for entities in attribute values (one of XML_UTIL_ENTITIES_XML, XML_UTIL_ENTITIES_XML_REQUIRED, XML_UTIL_ENTITIES_HTML) + * @return string string with replaced chars + * @see replaceEntities() + */ + function reverseEntities($string, $replaceEntities = XML_UTIL_ENTITIES_XML) + { + switch ($replaceEntities) { + case XML_UTIL_ENTITIES_XML: + return strtr($string,array( + '&' => '&', + '>' => '>', + '<' => '<', + '"' => '"', + ''' => '\'' )); + break; + case XML_UTIL_ENTITIES_XML_REQUIRED: + return strtr($string,array( + '&' => '&', + '<' => '<', + '"' => '"' )); + break; + case XML_UTIL_ENTITIES_HTML: + $arr = array_flip(get_html_translation_table(HTML_ENTITIES)); + return strtr($string, $arr); + break; + } + return $string; + } + + /** + * build an xml declaration + * + * + * require_once 'XML/Util.php'; + * + * // get an XML declaration: + * $xmlDecl = XML_Util::getXMLDeclaration("1.0", "UTF-8", true); + * + * + * @access public + * @static + * @param string $version xml version + * @param string $encoding character encoding + * @param boolean $standAlone document is standalone (or not) + * @return string $decl xml declaration + * @uses XML_Util::attributesToString() to serialize the attributes of the XML declaration + */ + function getXMLDeclaration($version = "1.0", $encoding = null, $standalone = null) + { + $attributes = array( + "version" => $version, + ); + // add encoding + if ($encoding !== null) { + $attributes["encoding"] = $encoding; + } + // add standalone, if specified + if ($standalone !== null) { + $attributes["standalone"] = $standalone ? "yes" : "no"; + } + + return sprintf("", XML_Util::attributesToString($attributes, false)); + } + + /** + * build a document type declaration + * + * + * require_once 'XML/Util.php'; + * + * // get a doctype declaration: + * $xmlDecl = XML_Util::getDocTypeDeclaration("rootTag","myDocType.dtd"); + * + * + * @access public + * @static + * @param string $root name of the root tag + * @param string $uri uri of the doctype definition (or array with uri and public id) + * @param string $internalDtd internal dtd entries + * @return string $decl doctype declaration + * @since 0.2 + */ + function getDocTypeDeclaration($root, $uri = null, $internalDtd = null) + { + if (is_array($uri)) { + $ref = sprintf( ' PUBLIC "%s" "%s"', $uri["id"], $uri["uri"] ); + } elseif (!empty($uri)) { + $ref = sprintf( ' SYSTEM "%s"', $uri ); + } else { + $ref = ""; + } + + if (empty($internalDtd)) { + return sprintf("", $root, $ref); + } else { + return sprintf("", $root, $ref, $internalDtd); + } + } + + /** + * create string representation of an attribute list + * + * + * require_once 'XML/Util.php'; + * + * // build an attribute string + * $att = array( + * "foo" => "bar", + * "argh" => "tomato" + * ); + * + * $attList = XML_Util::attributesToString($att); + * + * + * @access public + * @static + * @param array $attributes attribute array + * @param boolean|array $sort sort attribute list alphabetically, may also be an assoc array containing the keys 'sort', 'multiline', 'indent', 'linebreak' and 'entities' + * @param boolean $multiline use linebreaks, if more than one attribute is given + * @param string $indent string used for indentation of multiline attributes + * @param string $linebreak string used for linebreaks of multiline attributes + * @param integer $entities setting for entities in attribute values (one of XML_UTIL_ENTITIES_NONE, XML_UTIL_ENTITIES_XML, XML_UTIL_ENTITIES_XML_REQUIRED, XML_UTIL_ENTITIES_HTML) + * @return string string representation of the attributes + * @uses XML_Util::replaceEntities() to replace XML entities in attribute values + * @todo allow sort also to be an options array + */ + function attributesToString($attributes, $sort = true, $multiline = false, $indent = ' ', $linebreak = "\n", $entities = XML_UTIL_ENTITIES_XML) + { + /** + * second parameter may be an array + */ + if (is_array($sort)) { + if (isset($sort['multiline'])) { + $multiline = $sort['multiline']; + } + if (isset($sort['indent'])) { + $indent = $sort['indent']; + } + if (isset($sort['linebreak'])) { + $multiline = $sort['linebreak']; + } + if (isset($sort['entities'])) { + $entities = $sort['entities']; + } + if (isset($sort['sort'])) { + $sort = $sort['sort']; + } else { + $sort = true; + } + } + $string = ''; + if (is_array($attributes) && !empty($attributes)) { + if ($sort) { + ksort($attributes); + } + if( !$multiline || count($attributes) == 1) { + foreach ($attributes as $key => $value) { + if ($entities != XML_UTIL_ENTITIES_NONE) { + if ($entities === XML_UTIL_CDATA_SECTION) { + $entities = XML_UTIL_ENTITIES_XML; + } + $value = XML_Util::replaceEntities($value, $entities); + } + $string .= ' '.$key.'="'.$value.'"'; + } + } else { + $first = true; + foreach ($attributes as $key => $value) { + if ($entities != XML_UTIL_ENTITIES_NONE) { + $value = XML_Util::replaceEntities($value, $entities); + } + if ($first) { + $string .= " ".$key.'="'.$value.'"'; + $first = false; + } else { + $string .= $linebreak.$indent.$key.'="'.$value.'"'; + } + } + } + } + return $string; + } + + /** + * Collapses empty tags. + * + * @access public + * @static + * @param string $xml XML + * @param integer $mode Whether to collapse all empty tags (XML_UTIL_COLLAPSE_ALL) or only XHTML (XML_UTIL_COLLAPSE_XHTML_ONLY) ones. + * @return string $xml XML + */ + function collapseEmptyTags($xml, $mode = XML_UTIL_COLLAPSE_ALL) { + if ($mode == XML_UTIL_COLLAPSE_XHTML_ONLY) { + return preg_replace( + '/<(area|base|br|col|hr|img|input|link|meta|param)([^>]*)><\/\\1>/s', + '<\\1\\2 />', + $xml + ); + } else { + return preg_replace( + '/<(\w+)([^>]*)><\/\\1>/s', + '<\\1\\2 />', + $xml + ); + } + } + + /** + * create a tag + * + * This method will call XML_Util::createTagFromArray(), which + * is more flexible. + * + * + * require_once 'XML/Util.php'; + * + * // create an XML tag: + * $tag = XML_Util::createTag("myNs:myTag", array("foo" => "bar"), "This is inside the tag", "http://www.w3c.org/myNs#"); + * + * + * @access public + * @static + * @param string $qname qualified tagname (including namespace) + * @param array $attributes array containg attributes + * @param mixed $content + * @param string $namespaceUri URI of the namespace + * @param integer $replaceEntities whether to replace XML special chars in content, embedd it in a CData section or none of both + * @param boolean $multiline whether to create a multiline tag where each attribute gets written to a single line + * @param string $indent string used to indent attributes (_auto indents attributes so they start at the same column) + * @param string $linebreak string used for linebreaks + * @return string $string XML tag + * @see XML_Util::createTagFromArray() + * @uses XML_Util::createTagFromArray() to create the tag + */ + function createTag($qname, $attributes = array(), $content = null, $namespaceUri = null, $replaceEntities = XML_UTIL_REPLACE_ENTITIES, $multiline = false, $indent = "_auto", $linebreak = "\n") + { + $tag = array( + "qname" => $qname, + "attributes" => $attributes + ); + + // add tag content + if ($content !== null) { + $tag["content"] = $content; + } + + // add namespace Uri + if ($namespaceUri !== null) { + $tag["namespaceUri"] = $namespaceUri; + } + + return XML_Util::createTagFromArray($tag, $replaceEntities, $multiline, $indent, $linebreak); + } + + /** + * create a tag from an array + * this method awaits an array in the following format + * 
+    * array(
+    *  "qname"        => $qname         // qualified name of the tag
+    *  "namespace"    => $namespace     // namespace prefix (optional, if qname is specified or no namespace)
+    *  "localpart"    => $localpart,    // local part of the tagname (optional, if qname is specified)
+    *  "attributes"   => array(),       // array containing all attributes (optional)
+    *  "content"      => $content,      // tag content (optional)
+    *  "namespaceUri" => $namespaceUri  // namespaceUri for the given namespace (optional)
+    *   )
+    *
+ * + * + * require_once 'XML/Util.php'; + * + * $tag = array( + * "qname" => "foo:bar", + * "namespaceUri" => "http://foo.com", + * "attributes" => array( "key" => "value", "argh" => "fruit&vegetable" ), + * "content" => "I'm inside the tag", + * ); + * // creating a tag with qualified name and namespaceUri + * $string = XML_Util::createTagFromArray($tag); + * + * + * @access public + * @static + * @param array $tag tag definition + * @param integer $replaceEntities whether to replace XML special chars in content, embedd it in a CData section or none of both + * @param boolean $multiline whether to create a multiline tag where each attribute gets written to a single line + * @param string $indent string used to indent attributes (_auto indents attributes so they start at the same column) + * @param string $linebreak string used for linebreaks + * @return string $string XML tag + * @see XML_Util::createTag() + * @uses XML_Util::attributesToString() to serialize the attributes of the tag + * @uses XML_Util::splitQualifiedName() to get local part and namespace of a qualified name + */ + function createTagFromArray($tag, $replaceEntities = XML_UTIL_REPLACE_ENTITIES, $multiline = false, $indent = "_auto", $linebreak = "\n" ) + { + if (isset($tag['content']) && !is_scalar($tag['content'])) { + return XML_Util::raiseError( 'Supplied non-scalar value as tag content', XML_UTIL_ERROR_NON_SCALAR_CONTENT ); + } + + if (!isset($tag['qname']) && !isset($tag['localPart'])) { + return XML_Util::raiseError( 'You must either supply a qualified name (qname) or local tag name (localPart).', XML_UTIL_ERROR_NO_TAG_NAME ); + } + + // if no attributes hav been set, use empty attributes + if (!isset($tag["attributes"]) || !is_array($tag["attributes"])) { + $tag["attributes"] = array(); + } + + // qualified name is not given + if (!isset($tag["qname"])) { + // check for namespace + if (isset($tag["namespace"]) && !empty($tag["namespace"])) { + $tag["qname"] = $tag["namespace"].":".$tag["localPart"]; + } else { + $tag["qname"] = $tag["localPart"]; + } + // namespace URI is set, but no namespace + } elseif (isset($tag["namespaceUri"]) && !isset($tag["namespace"])) { + $parts = XML_Util::splitQualifiedName($tag["qname"]); + $tag["localPart"] = $parts["localPart"]; + if (isset($parts["namespace"])) { + $tag["namespace"] = $parts["namespace"]; + } + } + + if (isset($tag["namespaceUri"]) && !empty($tag["namespaceUri"])) { + // is a namespace given + if (isset($tag["namespace"]) && !empty($tag["namespace"])) { + $tag["attributes"]["xmlns:".$tag["namespace"]] = $tag["namespaceUri"]; + } else { + // define this Uri as the default namespace + $tag["attributes"]["xmlns"] = $tag["namespaceUri"]; + } + } + + // check for multiline attributes + if ($multiline === true) { + if ($indent === "_auto") { + $indent = str_repeat(" ", (strlen($tag["qname"])+2)); + } + } + + // create attribute list + $attList = XML_Util::attributesToString($tag['attributes'], true, $multiline, $indent, $linebreak, $replaceEntities ); + if (!isset($tag['content']) || (string)$tag['content'] == '') { + $tag = sprintf('<%s%s />', $tag['qname'], $attList); + } else { + switch ($replaceEntities) { + case XML_UTIL_ENTITIES_NONE: + break; + case XML_UTIL_CDATA_SECTION: + $tag['content'] = XML_Util::createCDataSection($tag['content']); + break; + default: + $tag['content'] = XML_Util::replaceEntities($tag['content'], $replaceEntities); + break; + } + $tag = sprintf('<%s%s>%s', $tag['qname'], $attList, $tag['content'], $tag['qname'] ); + } + return $tag; + } + + /** + * create a start element + * + * + * require_once 'XML/Util.php'; + * + * // create an XML start element: + * $tag = XML_Util::createStartElement("myNs:myTag", array("foo" => "bar") ,"http://www.w3c.org/myNs#"); + * + * + * @access public + * @static + * @param string $qname qualified tagname (including namespace) + * @param array $attributes array containg attributes + * @param string $namespaceUri URI of the namespace + * @param boolean $multiline whether to create a multiline tag where each attribute gets written to a single line + * @param string $indent string used to indent attributes (_auto indents attributes so they start at the same column) + * @param string $linebreak string used for linebreaks + * @return string $string XML start element + * @see XML_Util::createEndElement(), XML_Util::createTag() + */ + function createStartElement($qname, $attributes = array(), $namespaceUri = null, $multiline = false, $indent = '_auto', $linebreak = "\n") + { + // if no attributes hav been set, use empty attributes + if (!isset($attributes) || !is_array($attributes)) { + $attributes = array(); + } + + if ($namespaceUri != null) { + $parts = XML_Util::splitQualifiedName($qname); + } + + // check for multiline attributes + if ($multiline === true) { + if ($indent === "_auto") { + $indent = str_repeat(" ", (strlen($qname)+2)); + } + } + + if ($namespaceUri != null) { + // is a namespace given + if (isset($parts["namespace"]) && !empty($parts["namespace"])) { + $attributes["xmlns:".$parts["namespace"]] = $namespaceUri; + } else { + // define this Uri as the default namespace + $attributes["xmlns"] = $namespaceUri; + } + } + + // create attribute list + $attList = XML_Util::attributesToString($attributes, true, $multiline, $indent, $linebreak); + $element = sprintf("<%s%s>", $qname, $attList); + return $element; + } + + /** + * create an end element + * + * + * require_once 'XML/Util.php'; + * + * // create an XML start element: + * $tag = XML_Util::createEndElement("myNs:myTag"); + * + * + * @access public + * @static + * @param string $qname qualified tagname (including namespace) + * @return string $string XML end element + * @see XML_Util::createStartElement(), XML_Util::createTag() + */ + function createEndElement($qname) + { + $element = sprintf("", $qname); + return $element; + } + + /** + * create an XML comment + * + * + * require_once 'XML/Util.php'; + * + * // create an XML start element: + * $tag = XML_Util::createComment("I am a comment"); + * + * + * @access public + * @static + * @param string $content content of the comment + * @return string $comment XML comment + */ + function createComment($content) + { + $comment = sprintf("", $content); + return $comment; + } + + /** + * create a CData section + * + * + * require_once 'XML/Util.php'; + * + * // create a CData section + * $tag = XML_Util::createCDataSection("I am content."); + * + * + * @access public + * @static + * @param string $data data of the CData section + * @return string $string CData section with content + */ + function createCDataSection($data) + { + return sprintf("", $data); + } + + /** + * split qualified name and return namespace and local part + * + * + * require_once 'XML/Util.php'; + * + * // split qualified tag + * $parts = XML_Util::splitQualifiedName("xslt:stylesheet"); + * + * the returned array will contain two elements: + * 
+    * array(
+    *       "namespace" => "xslt",
+    *       "localPart" => "stylesheet"
+    *      );
+    *
+ * + * @access public + * @static + * @param string $qname qualified tag name + * @param string $defaultNs default namespace (optional) + * @return array $parts array containing namespace and local part + */ + function splitQualifiedName($qname, $defaultNs = null) + { + if (strstr($qname, ':')) { + $tmp = explode(":", $qname); + return array( + "namespace" => $tmp[0], + "localPart" => $tmp[1] + ); + } + return array( + "namespace" => $defaultNs, + "localPart" => $qname + ); + } + + /** + * check, whether string is valid XML name + * + *

XML names are used for tagname, attribute names and various + * other, lesser known entities.

+ *

An XML name may only consist of alphanumeric characters, + * dashes, undescores and periods, and has to start with a letter + * or an underscore. + *

+ * + * + * require_once 'XML/Util.php'; + * + * // verify tag name + * $result = XML_Util::isValidName("invalidTag?"); + * if (XML_Util::isError($result)) { + * print "Invalid XML name: " . $result->getMessage(); + * } + * + * + * @access public + * @static + * @param string $string string that should be checked + * @return mixed $valid true, if string is a valid XML name, PEAR error otherwise + * @todo support for other charsets + */ + function isValidName($string) + { + // check for invalid chars + if (!preg_match("/^[[:alnum:]_\-.]$/", $string{0})) { + return XML_Util::raiseError( "XML names may only start with letter or underscore", XML_UTIL_ERROR_INVALID_START ); + } + + // check for invalid chars + if (!preg_match("/^([a-zA-Z_]([a-zA-Z0-9_\-\.]*)?:)?[a-zA-Z_]([a-zA-Z0-9_\-\.]+)?$/", $string)) { + return XML_Util::raiseError( "XML names may only contain alphanumeric chars, period, hyphen, colon and underscores", XML_UTIL_ERROR_INVALID_CHARS ); + } + // XML name is valid + return true; + } + + /** + * replacement for XML_Util::raiseError + * + * Avoids the necessity to always require + * PEAR.php + * + * @access public + * @param string error message + * @param integer error code + * @return object PEAR_Error + */ + function raiseError($msg, $code) + { + require_once 'PEAR.php'; + return PEAR::raiseError($msg, $code); + } +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/XML_Beautifier-1.1.tgz b/campcaster/src/tools/pear/src/XML_Beautifier-1.1.tgz deleted file mode 100644 index d03d20f31600e5784a9976ef63723de2e5182914..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 9854 zcmV-^CV|->iwFP!000003+z2>ciXtJ_v`vsAiTb7*^%{r*pBS1*KxW&%_csH)9v1D zszZ^G#fB1fNy?7f?0>&A1Aqjdl3&TT6;Hd7NnkJ-3#?3@ zqtWa2*ncs68mWI-v(;)e7?f%BTm5FY--LI)R;R@t4WIQBKZEBm^6ZNHf#b~%jb^Q3 zFg~+9+nHS+8fWj`?C$M#_jj8Hdw#Src=F=S$;Gedr))0RhQ0gs-Not8%$S7X{GeW+ zbJMTQC-d5jhjlx&>$2P~!iD;(TB5z94aNpDbIOnY`tz&dkK9~@&e-AppiVFGYp|G3 zP5I2dKUC8GX!0(+knL2hDj|dgv z0M8Ybe~^PdsEe1Xi0`@l$c4TR>hx3KQBNYG|4pb4d=7O2Ra|n*QM1+@)YTv2lWm6l z2;@g+x6#^dz-M|PzPXOYX8`2_J3W4XarW}`?eOgN$*cD-PKW2m z7e4`e%%BOV3_QaCdl!p~-iMBh%r!5qJ23-M{M_^d zL^Y~FKNZq*-@9^vQDuD#=d;0(s}7CiBptq$y*5}qzw&r7Bib*ie{cZ!IHv3TgWn(2 z3}<^OsIo3yc%S$TDnp<6=MaDfqKKf`U9pRx9vp=7=bf-qy&RsqFcniMKEl9=c2*gl z60Glt#KD2j10KE+!t>5RA`th7aCaoc3iJ{dse6KW2O?*783Vy}&vk+@n)vvFp&XZD zW&|?YL7C>dw&N36gH7!&EW;o`#(ZyVkJ{FLtKIFj_qy$FcVzaPt-W5awKwW3Tw*-x ziZf7!&}7xEnzeYJ_u9R2XJlGduitC8+I!=U#mCmZHEuQcbDE7N(0$q+bz6Nt>W{nq zZnHUV_09IaWp{Xwx6Sc*wBIP{Zk;AVapRx{ENPtg`&NVZdV8J5UVAid@NtKC`u50# z5wJV9sT${>&FLJJnY#SZyicRhlx_0<$m;gG-R9Wp?KLfPZ@7;OF&=m9=3dVp*}Y7os5_y> zde^xMBiFS?*8Zs1?sxj5@qWMAAM-BAh*868nK^S+@7|!U3r0|EV`X(aa| zdXQ1alYMBy{~n_cno{0sHSUgm`3N+3Tdl{#{(9oTA9FM(ogi4iLS1=bUhx|+BSeAl z+G9`wfJdM1+S7JvKU=%a&SUg*hrMuY7I;&bmV9hlp@+)F!Nvs`xXKLxX6?+oX2INb zz{Z_{sRL$@T8znvR;Eu-V;2)BE-ZJ~^{zK;XFP^aU`|Da&{!IACJZqbaPn*H-3?fl zpLc(9E+;PhKUC)b*h46_jUDzf;-_!|mb_(x9c+WK=KG6z$X;B$2x@mDeY4hBLi*M{ zCPd_9&@maK$;Bcc6+QMr`jFoSk^I7?wWX%e*6I( z6eZLf)U~B?p!|YI8{gXh`JetIEx}#j8>1rui+UORR;IqV#;o%%+-&Ytc*$nz9o zePJjE{~{zP>##dMUmhN>6K{Uwqu#(O);4SI@Ar2>rneZXF^Kb@d~Y%T26&M+6nG0C zG)S_2@Xy8Q?;!0_BFn{ywQ3Dq2||gjTwtm?USEXTgIf%XneD3mg%BHv6tx+FpoU(Z zot(aYcUmR=49X;7nOCOclCA+T!wFF5aw0Z0Jm0lwtT zBs)-V4I8am_&Kbt#uH!I*_gI-P=7(y$LAJzt^i3`^X4}>B%f-t z01eO&4p?dn2$T|izvt*H@;ykYoej2w3QW-&1)s6R4;GN=((`YyEWJ>S%#!OJeKV=6 zfbNp6ZlK^(NT^oH(ZI+-O6)Ig1LyVqpK>w9xKI7#*@I%2CUkj+_~KHasvid7@k`pOX26 zRCHvDme4*k1KCBihHj`6ks~2Z<~#toRE>yIMAgl3N^Ae2LJOyf`Uu?2O>4qbWyDeZ z+}1!uoH3j)f=LA-RwE{j5TG3j320kuNnV^*m+0cg3hzz4&c zIIa!i%lNpx&A$JhJ#m7e7|NUy?8_I%r}HrPV|rAh5y6uBkj3nyYNHg&0DPvgS^AqU zmSbozo`*0-Yx&cqHDzK>o9~#e~7#k2U{Q2}L+m4DQ`v*(= z%uDb=;xp1Z!s5fG^YMd$dy#X~t)!Q)4_gAlE0~r) zQryxOkm(TS@`7svhtCq?e%Qj1#M;8Illw8J6HE}TgoMOZaxill z1|{;L8clDWH&Ju=qqrAON_!!OWI9h32RU-9fhvHmIut>#0d%&NC0UkiiRuPcH>i4Q zMv4#1#sHsX^8?yRamVkl9)N0`?b%)|mTO2xi)f69dIVHd$D&T>FRY^A1(f;`3stBmRf%R*HZR3$Mn96I zjRp5556|eGh&8DQF!~}TCNTdzcRia|jNfKPRZy>RsS~XC-FKT9$$A*6xYUi(g)POK zBwMgMMS?{xLP9>uzcUP)gjmrk3Q4l!(m|cU2`flgQ($Uo!D2))tNKLFP5^*cY~jGL z2+K?GiE;?hMi|mikCO$J5mx*;x4`zY1e<2nMtF^}W1wpiT!Adx5^%QiHN^Zml${wf zxiR6wtaMjobon8l#S54+M|qSe9I-}$wg=4&edxQ1e3=?3feDGYG}mW_%P`bn{l4-1 z=n?(D<^KOfWYnG8DEI%jy3J-^`u}^~4isd~PNUIb57)`{Q~0d?|K)hC{r_wK|Jwim zNA~|G)~LsJxU(NZ&laPo{EHYNl>A~%IG7NqH-XZ1Afmj?5Oj;t0@WLB7amNzK;q9t23vTw*$s2xwivP!k5 ztH;yLICto%sP{r%e4&D6tBeCRim~NUbf5z)7W$I z2xZpcD8I+7nDF6Bn}H6e`~^PiA2my)5@S*1M3SHav~A`KIv!GqdXchPH=(_StJ&!! ze=4~KN{&+}zj|a$W!wBcuTM-_Oipm>`<`EsU<)1V;&ZNNJ@Wbpa*7F(Hh*J(><$PS z(+{Iv5fC?^2u0FUh+|)tRaN3y0!zCUay$AU+0zr+*ruq>G)VGOx`Lbvn+grAAb+Qe z$~}=yv8)8~@Y0VL+{e8aW95e17q3S!I&> zhU}eUJ9_!_X=$U%@rm`M_%0}}`>hi$RGr7GazwUuSEtVCr}3Keux!2}cdyQquwoZ- zc>I`ThN?8`9 z*SR~(qM2<`f>!3Ot%AiXyWf56Zq3*hMCX)df6#g#lBqrhr-$%{T}jJg67!83QVOe9)BPjC)1-DOqH za>4mo`Fe^7NG6cjEawPv844G))U8$oNU+#(9&{YDB`fw zjr0hY@A5|@7kdMpDW+nGn@~O&JXuG_9;yAfU2zOD<9N#%_*??zs3qLzmrlhvG89i_ zJO!>9r1t1v!5a};l_ELm&R9MQDgiCW_-N$Du;^TtbQUFtD;_dY?Lmapi;Lll)00=n zZ;vm|-n{;%Yg?KgD=uv%{3~Xi@Qp=0cV}j;s}?iNm6_ow{;J0TZ3;`31S|efPp~5( zFteufiZOVyyQ_Gz$~xP~Nr`RsB$EOcC!*2ykCMd^Vx{(Udw2IJ222&x7MH{^3g*Bv zADZc4j%1ycxe}i;&OCYZ^Ac|dK}fKrM0jbP+j1v9TCelQlb9?e7^y%!uEK~+j_&h# z2wK^(#b*vwA5KkJkcPn2m92W^gSq>U33UkJ~%j zMtv(DSE`vASUoU^N@RyMa+(!zQ(4eZu9%bXK12;-pbpva;zf&Ilt!{4?ViZUWChNU zo47f##ffI)awudmqh5JTQcg=M&^Jm_Vl8eD8FoT z4>Ds}-lWApS6fdAm>LoZEN85iL5L`wh7b?IG7uW^k|1=dt}Ig6oux`F9;BfDTa-w$ zSSd;A4oY8q_8>!i4|PEh#ar%c|b1A*}8?{d7>@!#wC?{)n5A36RzyGDJzEHElRelmJnrbeM86y{}65W0=^WZ-s5QkiV! zlo6gt;8$Z?iF`O3>>tg*vB;SlwW8v_zFxi>El6G-38Z~6JWB`+KEtDoie#ll6KM{k z)AJ~%Qt3x@Fo35wHA4q=?i)2ogC`#-T;>D&`0+@uxFofXNM4_aEMFx7&mSO_%xzQ0 zsPrY#24OZWN=}S2onK`vbsm@e^Ym7o-Aw}+W8m*CGf_lmWt9P=x}@g<2~wwZOHatA z-8~URm7q4|(9x|r+rzZ`FuJA{E=*Tl+;RiMQ7iBRMUnPtPf(ougj&@dLAYiI6K~<7 z^%x@<2OlWDSKG{*-AP-_n7|b{RHk|@@F(SxvN)Fg!$9+LL%PO@;7V|mx@n=qKMS?hLv}9y8y4`@kLXQAcGM{sTFY>^t zxa%lK%}^wM9e(2Q6VR$;N>0M*#xx4Jh#H%`f+% zKsIYf_RVU%J6*V-oxo~*0gJH_WhyCRKHOP4i>8{KbT$1jyupkrtF)fND>srOI%&6a zx?Pw-B-7?>;kr5X^X77VI8V76Go{kWnLCzZj zl$F?V4=c!n@V|LUmc&Eis;X?(|2*2 zx+1Yr)h1~%#l=(0Ld#8Tl733Wp+5hnlqVhkOsg2`kug=p^F^kYDJC$TA(L9nij)>4 zen2|jm5jx`PNv$)Nv2g)^R{6$8CoyX=o2z0KP{Vj@{?mFS}GjY)0tg3sE;%nB}`rL zDcixEf~#udv`*bY4=-4vgocsOv-9?w)g$NGikWmW`g?{lrAmZo%P{gN`W-x3lS1-K z%q8+#&{KKNpc3OG0%W&u%?4uV#P5|&C=pvqQ%rXltMju*GICSuLk;6MYq7YavqI&$#|ng5v4Z5wJZk!6+0L>? zF@A&WKTpJ{G&d64~xj6v>$zS+iy*^GZ+ntAdA_Q{%NL zi?0*PRLnVb$q_5=Un)ybnnMeGa!twzofAn>5GR-?Q_$iFjE#c19>;1^z_1jz6{G%J z@LTY-9)Mv<)}@p@^ie41^22h1rUs>XTX7Vlm~5*^Jgqi>v89UM#Hsn&nJ%Ub%;(E+ zf_`tzMg%cF`Vg^* zc9tP}mpC1AFWv3_^h}-#$RTG;iX{vGEzpj`_!G&&Zi%^w%}=6S=;Mm}aSOY4Nhj6I z(v8-2%;-0Ma^gR8FA2X-8|Cqztl8>zDE_n2?e`m$|F?~=9;k=wr|ePjpF0~n>HLjy z_*ruUKT?Q;dSyES2!|UH=P;tkqD5d{@){MD5kcQAiw6Qp_8rGmZ)mr9J|^|9u+!o3 zt5;E0hiuqX@=k8KF|;|J(l#K!PIW>>uWKplpeUy218Y%d;iXK7FKRcoNTk3{X%@|DDM{j)R(!rc17-u=C z!yBo;$|7L@Cf-cKsY?-2ri*!$f{HVhYN=5jC%YEyuS!sL4OY}m`Ua0N82Lx|e=W76 zhGs-v`(Y7nm16pQeOK&bJS)im)}zb+ek}jn-R4^Uf5m47`QKV1|Aj1-=EF7=Rd z9BV?M%p)$2M$z@`A{tJm8G#Gn;lIb5B z6dLNW@1cLs*vW+RfE)Frf$3jPV6pI^%%Dzx4C+{M>#M9!$|Q>rS6#_jGXx>;B8(H@ zAAXIv2V!!OU9Sg^_pBiQ+m9{(d(EyU|GOmrd+YnZzsj?M{BJLj|65v!>ehz3WVXi6 z!nE+WyxA4^#aUSj^WPE2Y*g}MM(N?OB*mZ#--hQiipPY)_;-!Hm#Oi$5}~nM(KWK6 z2SxS60uwH3ek0>V2>A5Pw1wW#MBp%{KtShdams{LfG}3jLV$Ct>84Hb%A_#9j|H_h zaQ^59&I8Swa4HmdXFj)_!6Y7-OUXo=)W=O$tgg z7DYHl0Ty(r2-Kr%Mac6kt`%VzHsgw&ZdLeSMUrP@9?IqUS}?B#^H+XWkpJCB*Z(`3 z{@;`O|2qG}S9w;D|J`NsKN-}KG6CqWC~*eS^=6l`yiX>&6}Q&zh};8aPP9|H6|n}q zl+jTmn8i#8!k|j0=H=N))4fJK7i2Ry*eco)-t6z{h$A(a5!C+e*H76K%YRn50QB@b19O*v#DOIx{jti+g^!Ue zQ_ODW(1G=9(Dd=_`h-#yg0Q}x@EHhT<}JecB9xc0?U2PFE}747 z`6|!gIfnkp(9A>19?n!$=Am)+?#=GrUUz@DX}~m$vNp3h<^uXavvu%993W%3mHO`2 zcNeEWGXs7j;}}QDA|um}iokDKUj(B+55iM+D(HNOs^$Y9Dt6H{tpezQZ+ zdNHLnG;)YwR4bqO4aTAe^`n8!1Iu@48LC5Vv1}ZrmW@GOzTX&7uuf>cHm|UF9b1Ec zsh6%f;_jh=slkrtV8&SDnvM(4b3xVzi;*ml#+cSs#4D50MxLb|{^|5$J9~yeNnQGm zQS>!Klf4)(x$!;p{Mq-=^Jg0au%djA2tbj{v_wmFe`8_>3|C&N8Dh`Xk&#-i{=d6> z6ulRKX*7<0;VxKhl)el*l_7)NHOC04Cxg0H5lQHqF;J0&Z3}b(Tu$kp<51+0yC!4J zbw0(XS>pcCC9Nv3-K;;u#`0io+&ZwIsP-^OuZM6v@J|E*(c5a5S)?xJ{w&D33;?xg* z0mW$}hMR&Gyn#7;wOJB`7Fu*+G_QiQU2F%m)8GAYrXz|m1mv*wH&W?{?~Q>*LD8aKSusn%;)sP=3~(M z>3Itd6PrD|U(jjJWf&uA0-jfG^7+`K)l9woM={N zk14K1X=0#KQ>&D?>b|5sk?C;@?-YwG=U)v- zgb!GBh!`zao1_9wc~fONPKuCBFr_zB0)SwmWg4)>C0KP8Uc0OT&>MEiXSBC!W6^C9 zdjlc}g%rvls_fy?1WOQ9L>M@QD5)^n)S^AK0x=S2vY0|`C5X;KnHvO}oy|DTKNF-< zoG3&rpx9TfXM)A>iXv=D-jFoo0XpcJ%dfbr!PkT&<$ESUSY;wPUE#&xamtoz_7Z49 zN@ZRK5UzK*;Ht^&xGe%n5Iwgur66#&xE;yN0&DKoGIxej z^;QaX(ZM?*FR}(~4SdfF#ZeJPF3dw_%(>~~`H(t&yH97eGah-}y4`}W)PB~iHEyo~ zoOQ)W2R-(fs9eJjHy&MA?o zhuK9+Y9#{2qgrFr4N5zn3K&<7#X;kxH@oKsoGfiK6@((&+-;WDNp7p^-7BmmcTr<@ zeKa;r$LMImGjZ!Do?M$eU%Zj;m0O$A0;|&z`gsKfT^OdamX=9gt$(!y*a+#oYXf8| z`6#%E#Rn#EwMX^M#|zO@6I}M3rEiEXhzg47QFQfKs^DB}XLa{lI;B2glq^z4qkOvL zcb2+3lif=6>Q`?;>Rc2Cr)~m}UJ*~|+2)L#M`@Bt?~hf$%u7j@?DCzc7E^r_&jq&P%lhEe-wwOD07NcV7PD(8Ab4= zbH!)X$S9D_E6rM@tl@S|(w3D!k_~A5OYGq)@lTNw`(8lnP@@A+H zfHAW95KV8@lM0!rWQ=16Y#xA$Zl}=Cu0xv1uqkL8vBIIsuN~11G!77 zI5wGUPvf?z^>~%iGQUL^$%x*+lNYk^*jl7mXzeB+SyI@ak~L$)Q!5hZg1XfmQ4uID z^q9I6M#gQPArqsZ=QK&x4x(&WSaA19{j4xKJ}Uivg7~TQD)L^SG`Upb-xhf3#dLpnB!Ef#vPjd(x+uXs=M( z7Ku#dco0BVl9FpdCIy+I8Cf0=F3bMiWmv(5Yw@fiCBRHA{qmdYdmwgamF-+`uO1tj z)+Z*bqPJV0sI?NnAS%dpE>-q|J13b9oQitd`#U=G>9N kKN**Z1WJ*~>#U*cXZ<|r^Zx(<0RR63017RV!T{a?0CbE?X8-^I diff --git a/campcaster/src/tools/pear/src/XML_Parser-1.2.6.tgz b/campcaster/src/tools/pear/src/XML_Parser-1.2.6.tgz deleted file mode 100644 index 52d4c9d78183972c3b57054ca4e559bdf5889872..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 12944 zcmV;BGH=ZviwFP!000003+#RCb{jX+;QSq(<99$9jYTHBb@L)prj$6gJfpL|9ZSxB zb23?;W;aOnm}GOho02uLA7}R&_WwM~?lbJqtttTB=o?AhY{wx_Vv*fIp-?E)1t=62 zmi^9}aI^k?HvQ8*eT-(a+wHPHG5j=Be_6|H8~e;?nx@fgx0{^~JnObv2K&?YbN`>g z4>0iTg8PB%%@0dPy;=I!7YB{Tf?Ixl zalWX}dDw75ry;@A;<5*!6}($fgI?E+xcvLTjY?l$Ue+&Lbot?V@ga52KQ((EDfQOLWX$aKD!2xg~pCdEW zcTPeUEEfyU4+9ondRWV~*~|m@%o{Ur!F?Kw1NQJ=OD}vhUe0at4VrW0Lw>>Mq4-*7 z>|~xTivX+44cVnTowBLty<=m~XBNXU2%jMZ9cGO~K%HCmIpb441F)Cwmc>MhM z#qrBCss}vdhYX$ughjH%kcx14js+@JD&o$wxDr-~)G~nHS}fop_IbkR+y^4q)^s|8 z!4K*?JEt!2sG35|s3XIK=iKLNq%1b)mn>$9;i)@YOt~D}@Z1X7%z6jSs6mH@W?m4| zh&i6U#J&d5^T6ePm5r{LwG6!(&>qpaVhi89a2>2@Vef50KR`jz39x*&^bx0-=VPw| zHuo+WU>CR}KqT~7u$V$;v5sVsvG2|3H}EI$na{k@Ke-)NS>UlNZwYt-j1b;lP<>(> zN9!a|_DZxiXP)oC11LqX0ZY{>81nEO@Tm_PI@1CVPr2p5UpbvlL%sk!7zl=$>x9vq zVgnc+{|H1w01xRqJ_I@8PQ}w7VWQPS&zlBfx`|g<$O7KF;73oM zv!$QZI!cnu_oX9{hU~fcF;GuQq_h3FvCEaAqNEP@|@2>W}z@Z@kwF~8nGM)Fkfi)A#?_2J_?H0$B*AIG6jH* zsHdo`ym^R{gDC8{KFQ$2QUg^SJfX^{MMy_ar%>Xs1e3qSW=;oG(P7E5&EB}(8aLaW zHn%#x5pP*ezuoNZ_jh{{>p4IAi_q+Dkv0Lr6EyM4dwag8x*LRxjk-6WryN1F0mIHL)ZMy@n z%#|%mF?;iF@Anl-(3 z-t(UAjM3fcc6zqeHhcYjbJT1%+fIMn?!nVd8ozPRJEQK%arQ?er*C#z{eH)`I&I5r zIlSKninP}^etW*_19SJf<5siRH@o}X>GSreWA@Fl2`tevS_%hY7BqzIqc=xiHy>;Z zrqY;?N7e|2xM_{eW~_s#u&zXcMxKXRI&Zfj{k0+q6L_^^%R@zljNW@2$0N(b}jzHk@|1 zXY`xRku`3PI{TweciiuFK=e61Gdb7tCmEP;E}3-=O~-?Uxd8i}&uy0n(&GBp()GC` zP=o69g$-uz{HQIgHvB3dTJMj#-~;1B_)1k8s?Go%UfCsKkxDRP`N4<*4I0^^YV|_a zBRdx@me}NF>s@OC9m7HUG3p%}yNSMIXQh2f6eH*pFo!1zQqiEBy9WOm-N=Avx3`U1Y#l!%>v+b&>$_rr z;k($Ooq;o`d9q-1j=+^deh*lA=6m*eWk&%3i~3}~Scc^aAT?zU54l(c@cD$l*NQ(T zn^qM+4S{hcP-(`)bI$?KemeCovGIW31n7T`(7g?C?E`Fb7pt){xrqqx*!KZ3(uY{h z=a;@4!USPuaGkKg$=voit(>4a@4<*c8&MyF1&24PtUzw;a~`22n~GkN^PnM23juCG zYYXt2EO`Z7bD6>acB!21z6-~i{Ou4OWp5t)8w}hyrq9+P+IhuP{v>XK!TQ3c^ zf)8|dME`(R2$#M`!!1VD+Jp`KpB5&hd_n6z>HeetR)=zkc;->ALKp> zD6<8SNKCp+L#a-}OackIvvUR*z9YVT0gap^Gra-cCa3^#CMFAZ86~yvj+QtG;z{iO zGw}a+Xu)i;m|h8HnR>KZh5o82E(s|XgJL(2B|Yiuh&FSjXfr>LXzSgJXrm4tM9hox zQ?AkthY|bi?2t&0i){trRuFCl;nyt)3uWN7#b3_CX71AFIuU5Lw$|NNsBMMXR;b-f zsF^DrSM&2ZuAQ2(e=nj<3?lB(iv8H^J}pgMvB@g-f^+v+aq8l4+;#&-m|g))?hpgS zTRh0IQeMDwvGz)}LTe&;0eWcN%@~?1$I$#NV`#STWenpnL;HIiNg>)S13CNx8zWWjWgqzpiKvh;mmqNjWjo(oy!a}XT-B4!~6-$ixc-!tziAX1K{ z6*9Wq4!9F8Ypvw6*5~1}&OI4HmNH5tTf7?m69(e)+y%K#7D+&{5j3^ssK{`NfWsF+ zDH~TI#6fWD!6+Pu&t!|jF!X+Z!*GA%BWD7}t>Hd^w3vk&xl#c(W6Pa_4P;xOS5WIa z?s&{m44{SSEqyThTtGWlIDL((tn#Jh0kL?{MKx@%>(uXZAhT42>VC{ zw#ir!WEtB7Jzwx%I#nj_GHbXWJpY?T{9lYOT*Pq@7yRxG$eh4UwnTNm~@8L~JILeN%{BDH1iM^Io~0&fa+(byj1YO0u5 zWZ@5&{&YyIk>X+H*5lSK8n^Ce8n@Q{`LVy#K<0uW7Lh(OLPrbq`NN(6iX~-@7`L%1 zxcXks|1r}@pZ_!3rrF+}|NAuO|6uAr*lB$C-Gd$Womyoe<0PX*u>_U+(OQDj?u+3| z9kc-vmpw#tB&w-Xh4_h~i+90t6umx{Jcw@^4|ZboWDK6RJR^(97efzswDtgYBaUa> zdxRjwa>ndR9yJn&kAegmzhODVEpmKS@p47H_)Yx54>S*Q>);>;P_8@@uRlsS0&Dnu zr`9&aK{L5VBHyVZKUzX!0%+g8009}jAcctEqvad;;CT$WLZu#OD~O#=fiTKQTn*Az zX|fe8-?y%04~0HnhBOXXu92b+^+p=K<=yv-D%-_Is*x(sp&H;5j>~%qdVl~wV1Ee) zBcC;n_9T=)8ZmjazM_$GEdk}R#FgYD3hpl0A$y4HdNEJayx4^fqse>7b{DlHwR!#w zBz}1>=akDH)=JiqTe0x`hoh}P{c839%@YKy(f`b7wKDqO*q;CYH2Qz+c}GH23`Q0n z1Em0elx^^H(7fQtA_ez`4bFG@D58*q;!P45#Xc1Lntt4Ak-~!zn1y09r(Hr z`@h-A*#G-xXFLD5_WwQD|I)}JYkzB_Z*BB1(ne1?mAmJ$@vacKE9*VEZ?Sv6wePq3 zf5ln<`_TVpJEQ-*-PTtBf3f<1_ry71`TSA6U`D;gaR0s0>@>_CGr9-O{z1DZqQpVB zFWBzy(2~%y5Nx=h7*XxF%~ut7!*e&N9c6%Qu(p_0bE?2u{6-|q8mX`|r^=|GZnzgP zd+G(;xxSLVBb~dpn%+(-Xg0TMT6>EwAB!^OloIQ-g|lS_3!i775B+ky&zb{y(8#R@FB0wC)uN)7 z#$~&%_&d=5H(UZ-xBk~Mv--cYUH|(u`v03+tx%uCBhu$)tk2ubG!EM4L93*CSU!VPNei;sc4Ho(Yk6Uj&flWPup`zJ!T>`fEL{ZxfiVgSG14d-p4%Wtlg_vG{ zpk8AC)(ldCM`MxBCAx+y7={ z{~H_H|0;}Dn&e8bqBa{eqF)cRw0xPQ_Ybsa-0kRmQS<-CVF2sw|4!FP&Ht{s-`&pt z-{?+MrkN^JJCyyU3OZut3d zADBJy7FWJIIS*Oct}vtD->;#qLgE~;{;TgT7oP<)x_wJVy-{{|{J9jzjYBWGGpbc@ zD#?ua$|IZA1ZE$i41((7FFHVpD~#%17uw1`mn}U%d2;;n^jO|-6|fXA>%wxUlvmHf zYoCBZlXI$k>G@NqcIi62cF9Nhb{)+=u;Rn0jn=SP58sFNOz9XCgN1<)MG=`Z_Yx>yg7jvrL%oE+sL-3hvm2IihA5uuZHSsU}`U7hST3$rW93 zv7k8O>~m|%EMX1-O#YtRV0t-Ks!2zaEiwZs1A#TcGGh7F{g>kh%w)F+EnO$U`&NnW59B;#Gbqe<}uQ@_P-S>&kzYDteP?QJOsZe!;y z;fB$5f_Q8^33j8v?(LZ0#hAw!4KVfVk?tK!;@9i>KCrB}c|05x{*C@E-V_t>;!UN^i}=7cIa15v*~DV@=lT=+}~+UYX}rXM@6q!_#3mUr=A_T7@5McKY`=bhz9Ia zOxmKfa0LgdlRmZblqqN2#@_ISC0B;XxlMYY_-=Q|r>B&K?obqwQE17wF;i30wY@_G z$WL9>y6QQ_3|_xsOz||KVaqm6QHY1EsalPj1rRSlW>G>6OkPO$zDDT_quBvsMowPJ z#aCCABOn3~t@B9~6hPJg*tg%433b%c;9iamad;FJlRo)gRfDkbJtPkFVd%=l%z$$O zAVOHUd6k!QkwJ9`q<6zBpp`vM;ewS_u{;o9+L6G|tE=@u70UyGQv>sJDJ*G!^>!^m@bmNeEa-4<^d;`pq#bv zGy<6axdhF}FSwsbHiH@1ZB+0<5jvD^i?MU>Qh7zByJU8!;M`kI9W?#lRauE{`Yj>( z*5Hy*1$_#WvtR`mXj-Pq>RdyN>N9{36dQK?!ub7cpS-} zXmn3a>PRqTb*&n}LpEPdr&US8LttK{4r;}462=8Kh;LCKC9DWSdSy1j`Isj)NTg5A zGM*Bu37MMhV=Cur24Q#1%HO!bQ1C=q;;-iKtI77fGWH>byMhR1K- zym~Wy`||Yd>({T|oE<+MzIgTYxROLzeZ}=qn7ApTh}l!k>3^gV6SXBXt8!^DLYWA< zRoR|?l5ww+c^#k4+e-x6tHvVLPr7=;HYxvXF4*{6%$I`kP@q|k<05x~caX^Um$W~s zj6^=jC-@fHbsbD2{s9%q!dJK|b!!D|7kfv!u0Vn83iX}g3*;^FYRKQaK^WvPaW$%) zsZJanx5M@nMfX@ee(`8Ur3`<_rc!l)zyAE^k1J;V8_GBqZ`Bp3x}*a|Igsa3HfN=@ zqAKwn5uj~c*NS0K8?lAaN#Y|T$LCK=|Ha_e9^$w zY6;^axO78JS&Hk1QbNbZrF&^c9poskjCxc`H(EjB(_aL8|4RM;C1TZI)oN0XLL7mx zeD^316*BemFi|=;Y3-BdMXKjCg5nnj)INvN!P;QO)c5kWy50g*8Oo%aWvBqPhG@;> z+q|xP%x`!DGlL)&qJxgna7if(&~VVrv0Ols`qv(ckLyS0W_?p)MwV*sx?wuWNyFz-zBGgUJhzC2h+Ub8gd42K>3scyTSR12_AKX11PCW}| zX1N6Fs{|^Z+vgtJ3*Nbly+;h$w^n<0^87fe9&PuZ(M?7ejF8;lrI+v%m-?UxcMe!B z+S^6P6B?y5$&b7dEnXSSDUsX32JJ~FHa$zxrY9m)(jtC`LquD=GjevnSo+XkqC&Z{ zdQntc{oKT_1No|~ zD^YQk?9!)L`#le5Q?<5Lrm86$OrpgQ_~AcFSnVIBQoj2y%N~^qXp-xXKn^jALAJ8t9p%RCC zM!mTQ(|UlW$kEvI1`YaFsxqS@)_cXAKmM=R$4^MYWbqa=uWYm`tTY_rBp1`$C;@&N zVuLrYUY#99w1(Dz(1Qj&eXxVeZDm{?syx`)O7uI@|K=yu|NGsH{@>r`|M=|spBAMs zGW70sKLedy`>w{GeE&WE{rskY)>lNuK6hLn?_%|7V|6%0?1w`s*lu7VnAbHC%&m#A zH4%zUgaT8*yp}0oCQSi7294l|=WZ}mt59SVBtq3nI34LU3{3laNl;8TEeec^@`g5o zS!g4eU?U_jHl)q4wHEF||F=G!{_hw@M*nxW`v1$(|Jo|_AIA{TI(;t|LF>8}L2GLf zY%PLoTLi6ZSp==5ML@SD7MTKLjBlqB!U|}S6;Nd*KWhpoMV++<)Ek7CS(mt_@z5$X z9$H{Lh|U?Y6~T1V;16O-6zc!>C)59i(P?G%|2F^kXVm}VW@?fXU$)9mAiClDy(TC% z&08cT7g9>bc~61 z**TlJ!ORNnb50>mcmx>P$t9^e#oNt|t+Vy}lK-7gCjZ+_BWM42oB!c6%Kw@B9=BcM z*cWwDYBJLzLArxHaX4 zBteyTLl5Kcz)@b~kW!hdemKaxrjJ_SpvtBs()B~-t6tCDTL-eS8fH;s-Absbz@7v^ z{%iPE=7kK zO9Si38rlE(U;p{v|M{PTh6QGiEEw~1Nh|n&|KI;flu~n`lmKUW7L|IiBd?i=W_c86 z{ElCN(MBj@nfUCCz#7lYs3UAg@Ri6FQ9CXj1I8NiL|Xb-SOn=Xw+KZKdh^hoN9Pvu z7b$Rh>8B%M)=PK?OkdtWTl66rqnQawrK<`;BC=YUse-$R48O>7zoyS^6kDUI)9|HN zuU?<7G)ANDCX7<`iG6xr$&I_!z8x38*ut#%_#kZm=tMw6nj+G+~Lb+?w#*8bP*|7ch56WITZbu#up_yk+~ z|5JSO^*os7sj#jsrT%d9zx7$?zqy_N+xfr!eDe7pFDBes8>{DkyK6Sn@t@6(vCaSf ziRS+{|LZpY>o))EA2|Q3J7GUr@80n_8wA1V$FUWJ^|^Pn`P}>v{XX+%R=|F)|6G6K zy~j+F?|%e}+0gU4?ahv^2keW@OdG36aXV(`I;m;nZI;~pq;4vm8yi`8q!ng7@b6wg zJF+DfZMKL^qfr^;R5jN{vcIW2@-6?We!KLL1uT**wr23}B2Vlx-~naM0ZNG7Xmu@f zZn{`3nN1WMowTATwp~S_l2)<B-B#5_B^OUFFDg zgbqm11W2-$AQT4q^3@rT+QwVU@!$H z#JRpK`3&P%eSYDRnPAk7{i@LLYL^MaR|A|$4jWz3E179dk&6-~#Fl~Q&j3B_PH0Vr zv?W%mioC<(R-FUNv84(i_>u%e84sgdRK$&6@}4gY6QOHKC>I3!pg5erUopjg3_XVo z03k^9+=+OxNdVaMIN4Z~Urd-}b5$Z(2Me{l*r)x8QzASw52qC*&lS^HbnnklQwyW`(Yg;+*MsT&YZFc?obu zk=*>dbTUOw0(TtsR_1#W2hKLaNN;bv$ZhMtpL5J4ha3Q`L79c*cx2iDiZ$zP1= zDnU%(7*lY6m9qK46P1t^rm0A`qzOvqp@ zMRXnx+eFo0WTI+{xsoSa8lYe0*IIbB047H$K{X{?3m_Gyw$4pneP2ncZ=ao73u!(W z4kLcrAV;-6F|rc?*tnCNBwOzLI=C-~OKzPU9j#pHstVha!m;*}NwoE(;FxApSu?5k z5lXT4NtK9jinYi_JblV#3ig>a(N-m9e(ixZflIAq=A(ak5WTArHMO5at_+C3drMk4 zRXL!kS>d4I&w#@~IE==Whuqh4#ix}+f#wm094d)yo;i_KROYNBtrFEGJitP<*c9Dx zw(#6}xFT(II%~AbJf|m~!;g?O+$ED4fAB>?lMSDNf9oSone&OOzDy2Td8zpDG- z;Oi{W9aIQJwS{voG=p%7tSAYxxH^`ogA#WebWUNIWD;EBAv|mT6wQO zVXu?7d8DrI*f4drG<|bAa^E+htVkKHlYDzK$i3bSB9D-*!n&|u+ z5N^ad-uQ_7NVNQyvK`6(i&OuiQuRGBY-e&MUuq|x)ABY5;;goNw)D~bnt49CEYdz$ zDy1Yey4c=~jo2|IFbT;79b4{n^~EGf$$y78lO)&2Gt1+Jx+b}L{#)*CA<=0X=^kY? z!FxQ5{bSCW{MzFtg;f(x7hHCPC?@pa`$Z*pDkUANZ;JX6DMB3|lDo8vB94-wJbLx| z?BvzU;o0Lie?2~nHgT_ciADmc;>7#KB2(?%rX1otnVH^i-XQb-$6ReMC+Z;%Tna|^ z4w{4=qig*~g+mmba1y}s$x?VVO%C3hjU;Z944=JvPQ$41mzyA!jJD2NhWYp6&IOVxsM3P3tdf`qC~>${Wx`ZokS(r&t`QR6F-_+gWVs z6fJM2RynW{y8Wg+2000J!}Chc0O>blh@3sr@sn##WWpu3QrV9fx_22QR&>Sqr8am8 zC6$2)Ol|dDo}+~)GU3o#j>_>6V@mEKc3GB48;JHf$IF(02~^~#r3bqdSb@khU~Ej> z^4|X_V_fBjak!`)G#W6$gC$;@A=?2E^zP1blgqrsQzxgNcUJ&bd71 z&&87GO^j}!1?LF9sG?;Wh33$W*(9i(Tv;SSb1KDx_harIWt5icN0FCG_IuAC?WJc~ zDwS2C<4NGej(gtJOT5@fHb2XRSs|(gG{{6(Rjx6K6%!ZTAFJWf|M!s+%;~wowB6pVqF^J>Ti0Okd^hdxCJf0DH^Yk!!!3icsMj$ z*b{I!fDPqRvlR?ccwCpA!9xV!@x3QYn?SsBDJ3Hqcqj@M*NTkVnazq5z)r zY#EUJOi3Ww`W+3~CL;Z0I^`29l8O{DxynDH$kt6HdBpoUF%=*veQO#=lu7Q+v4JB? z3VWyQTr_EA40YVOAZz;4v|VNYZfp@HCh`g^$WM6=1!hmio|cC9YHPaCXgBf#g ztm9C8DWKpBwa%Vk_B@|npI$!ag=G|t3H-Iz27vMr<5jg0C>8FCTUfW+wBGv^AhQ$X89bMZO(L2%@=Y)?SK!%rU@|(^%F`TsJx5YUBI6I_aLdDo z>>A9Xtq@Z~$>J&Dzno)xsnzh6+Y=gopxO&?%d@}7_S6gX68WtNjB-n@bDs;wT<7HM zh@A;pV-?Gq0yV{UX92D+QmllYur^&@UVRF)!p6m@OnGLD^H50+N~6OH*-7gkp%g_0 ziuMj!GiQ}T6ht9}g{fkN{UDwnB>5qc2Zv zFg8GKy*HZ-Tq)p`;|*_@FX9gP3#0mn;E`K$#_%p!W4Kq0(grKlxspTE7@GT#xc@t6 zQLjkCJS-M5QUqco{RWFMJco5}geu>R#S5_0@xx2bKkA2;wS4$hCfPX9mT#i-wU6iV zu^8G%i-I>*{HI#{6$iM-QA`T+Y`k6@tGkYVHdQ|$&3#S*s^Bt!1!p-I)*P4xQ1S5e zfflt57&w;iXeg>9&yN8OsfuHy7Cs;2%C#&*8)g(gr5_eWC{@`AXi~g|TRzJM)w7BO z6*Xmx)$j?QhdN;o*xrUm#iZS*p&GrEC$|K{CBp!s!nj#7 zv#!*>h1~j3)*JSAo;PH;2RU~AAdKjvjttb%UDmcg&Q&-Vg2vs;$Y~aMVI;Hya&9fe zI-oXvWI6(LzSU&9>3#Gc^i6QRkGUajdVOW)>K`d3BKvl;@>;5mjq6N-0@Exji_#L9S%kJpG6-e9js zYdyzAkZmJV;SC{TF4*FbgjO*fv6SpmAX6ys{Uyk`C*v>9-ev(_h=f2uru8N4Dw|iP zJ5H89TK_|A8a$5Ki2ErTJX*C38Ox(YEjdc@X*n8=g2QqjG0pQf58LPZNVRoWsXlLz z|IciO+m|E~+rx@M=j&Hwl5^M96%db1RTcpfH__5X0RGx+A|t0!lFe|;RKk30SQ z>DloMR+8!57Tofqd~QzYG-SCN!iD;(TCzR))YqQ2>rJZ zb)-TYDX4_(r&K1MM4p{NL)8Ni4i9YKrC80Q^+|mYk~l<7~i12vvW%4t5gOSAsoIihstY-YXVK{V9R#>@-C zWB@1~gF^*0x?^lR(w30R=3@-4h-AS zITn7;ESI9FfTZwK|BXM{06qC5N?9~$(06)DGbokWD4JLBo?~vpqnu1fgNArTrF?J7 zkEYymFhlT^sty`S1Pbs8MmgBH6L$L0nk^oEYqpw?$f6gyoN_RO!YZR;79|Ib4V-e< z#mn~IXYfiSi^^hx$)j$CNFzCd1D{h~NqQ$I$`R$|9W>NWeC2>+dW1;_Yt2^8>;PZj z1AHSBP99;Bu;=3YKxNjX0>J!G6#fOK24NVgikQMOII1ynuh~z_3H!FyZ}$&mIELf# zKql9Wc6jvNJS#}#6tL8q3;^A!F`CQ7%y0O=mY7)zfHyk_YKcOMmAVuu#PQ<$P(H#v zNoyh#65)yLWfb*75(pZx9LyRbl?h#5AOi3xj|lEFl3F3Ei_Q`y`63Ww2HzOw9yl!F zMM{9#^sqGHrC3+BQDBv1t}6@P&b?A2Q}^9O)&=h|RhaB$oWlz-_NwgxqKVh$3Si>$ zVc?j<5|Fb*I*450>C|!k!xG4k5=r{QlFYysH1ypi%%g@~Xxtq*%w=~s;H0FyLj(h2 zF5?~`-d(Q+MDxyZH18b8H3LLbV+CNL*BU~37r?;Gaw~zTD+p;!!`nbGZw;Y!YY6RI zL+IQRLUftS?Lf2&Ky1bnF*6Jrn!E$u7^%F04a_$IojH+OG**TQb!dpg`9?w~YFe>f zga3?ftQ9xVi;-qT$eLc%G~+YUj59vNtdxM+yVw|=fgz_^p`dU^V9$s{5apTg+2@rV z1t5+cXG?#|93FCYaA?BcYsDXvKFdUWi~XIdI5~xli}jx%I)Q_0m8g%!s#2NkID~hc zSjB_pE`2uyiMFXr=>9+PUKa{7lnTArGr2Mqz&dwQN z_>TDU1vGMw%=89$Tby_IW-~Eau*-NDgmO+&)+UNpiwtiDmiG?%xr+s*Gogrcax&3Y z6~!eXr6WhvHa7ASLT0^OF;~l#-rdR-YVjcA9Go1|z131n?d*`ii;Hcg&{hg>!T_^ zW6bj+P#z?V?*Y5bc@R-DN;TzX^1kh4MkS}MWOgc;`tqhFOb8>6_E%OTh{=mEDUyYg z6&O95UjX5W2ts(u7vZ^>r7CtN8b1f$MRnlcGw&%NQjX^-MGJ{lty>OpYxNL!?s{3l zQo2w}C|JQ$fFMqi*-^wkQoQ{XaE!pgYzygqC@~R&TTo&(5qfuTg4`z=?rrYma9`XS z-Jl^1B_Y7B)P^7?@B-CmTa@o+tlfqYg?YJvcJ9plx`gTqg=93r+P!N&i}~PNj5|4C zPbhi3CwH4td*E{K35U$~KuFmkkO>T8Ya(tLDhOP^IXTQVO4=}Mrg_%_NYEshAtm6M zYtw#o_IOrxC$T$d_FMe}BBiS$gXP>o4?=KKz$dWtYcjq7 diff --git a/campcaster/src/tools/pear/src/XML_RPC-1.4.4.tgz b/campcaster/src/tools/pear/src/XML_RPC-1.4.4.tgz deleted file mode 100644 index 006253364ec9ba87d9a196d257f07a5315e40867..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 24447 zcmV(_K-9kKaNNL^|k)0 zmCDY}j`%Nuf0f98#b$MPrz)zI&DvINXRA`Hz;8RXZFv6l_x1k{e}a`4ch=0coypN^ zwOm;h)}-$Y?8(j1YO8&*zPGo%zg}GxKOL_eK0CcQ>HK!t6jLS}(f+O7X}%Gwx1Kkx zZ){90b5@?-PRkR^+ZcF*4cTrT;llgswNQV@D?%Jj%&~R+>zlLg)#b_I27SYy-T8QI z&K{00UtbD)JRMnMYvP$6yepic@NO*u@2tZ+Vmfm?r|*moH`F`${=jnkGkc0J95=*e zvvIX<4{d9pFhD5Rt~H#GL~GJFTp!%fnF;8$yt2~r#I5NHcRrmuGmjp;?sP6U@SnEu zX6D4j2PMSdqiwmuoD76H2izu}-6vejhZ{N~h}hV)VIcMd(7^AZU-$?3Y3{-o*Xq)28Cl08%N!hT&__mKBZ@&P zN&|CZTcdswTBr0#oH&y^+jX5;B5v~i&q7cCPE&X|v)~<9HJ1x~TrF>vw+=VdSAIA! zJ?pquscf%TE9=#5SRVX=pN;IkH32Y4a%cSca6|pbOysg+Rk2oXLqkQ=7+Gb@?u}pK=tH8o+)vQf5j??*g`d5qsh|beUXM5P&+N_wp zer2=T->YtI_xA_Y%5dM>wzm6wmcka_a^JzAZyc{|Px@LIY!&)y4n|8`N?UZ%iC4c?w>ZvgTA!Ek54 z2J&Hly9blMx!vp62AjS8;m+pJ+}REzj{kPQjjdEOt?K?(b#EK~v$?-D7;g4Ax3;Q- zO|uVE-s?vYhaTNO2WkGSju$vygCp~>e``)|tdVmgn}&|l$bq^UIZ#7KYGr@Dwxu7b zStq7;X1*~$kT{1TV3%Z2t58I#iceBNZvgX+U_18MD%-BJ2b-@f#Fh0AI8!~bU9Ikx zCDfJhsk#vs4zk8pTQIij-Xq4=7>%5JDFS>y@(zeKe1GE|fXIo`fiw5$ccKOU9R~Jd zej~OwtJ|MHsOo}2RdydSs8eTRc)}bEK+5R>sz`TYJ{eiAtA23>NWXF*)y z2Qjl;%kyxu))akw1c}@1-wF?S1*oet*SfMmQ3D|!3C{(}8jY-h8uRX6B{tyzvWsuS z-i*(9_~Bna-?atv{iqEd%=gp;4Q61w{gLC&XQ05(N1%6^J$qz(sPn=a;MiatXa=p> z4AkT?Z&BcIpbJZ~HsCSNbUx4z2pDwe{w+f7IX80`*Alpd2ZMz!dt=-4cy86g|BS4) zUI)$8Hb?e9gWc2$mu{9Z3gJ++OePsdm)y>CX zPfvyH7uKw8S-=BlBO3@t{^}Byv8V_82h=wtz*@QX`6~i6oXzyn*pfJ`9-LfhgZc$o z2LQE)56A*$e8#)NyfIOF5X1STPv$_^z5#Xu48$$rj>N4qnU8zCS2Uh6aF{fKr;y3+ z&K_8>xrI4JNfUSmoi4<0QV{vgdo0Nsb9KJCN z23(j03`miP@|+rW*Z}!W8d7!sX}k0RdWDI*b>O6Y36z5x3$6pqFd$%i))>!H4HtSz zB0@|zU{ohSh!YQ)?qtAc@Qr;3tBZg@+Mmr3_qDNm6D(Ir%uL&*_2DChENQg1*1Zq7 zd3AMh)xEsBcy-ly^QLwFN}%pQ9GhoL(Ba-1<8s4-%pBKU2ldK>y)YK2Ua&#2|6sT4txR4BC)+U6B{VC>uvaV`D=7`2cV}Sh%d0|Y6~`9WqavO zr!86%878mXqZX}oesXbj)ja8RFB`CU?byn_Y@D^5IMuIN{jic^l>XiD*}$*h}kzbVE!KMTCjtPbmHlz2FIJ0a=l7guRqS zqmN?L$aZh>#>O@ig>P;CHurZn6-#?*&PSd&L2}xuOBttgYbm+`fXvsFup;R#ovoIo z#1yPnWi!M;mz5j2f4(pBB|U4_o$|Z%yZY^x-;&l46uI?bS8GJp4Z2rQC%z#J5t@itt5iQHFa4@9H6XTfv1Nl;rr;)0i%zm_Y)omzc0={vjopFc0v zMe|a9jHM3d0Ms=L)%yOe)&HRA&iZJA#)?D7QGxU~MHv#NW9koTd++lHm8}}o)@zSh z>`N)EyQF7^-l(P5!fV9*c6T{-m4Z&K5Q)aVd9w|>x`(OlpsSKk-TZ#S^y0s zZS&zZelkkj(3z#YV9sXdLxEp2O2U8_`EwE9B;wxWqZK9Iz3P5VmvlF4yE}WduDu73 zFSm!lN#XQ^m*Gpu`u5Tu1p?XT=2qp4Ec#C7qF2{z%L~D5-A0>7h$Tu5?zMx;r)`Y} z$`R%AqTQhb6BR(|;ZXb%W7}Rdwynnq_-kZ{gp+=2Ym*LiQyZg;Lq~qi&N47&d7Q%; z;kxrNYz22z-`K$S_1XC%Yq|C1$4iHusY|7%=izOP7@GD7M5J5ujv1BQ(7xWNujLQo zjU$_>0dLSO(m4UUbHfGR$hJx))cH(68mL`X#F1A>84=INYK850x*jft3c#7~z)73e zks+=`DiDd_(g04}mR}7Ci~5^a)))t}_Ui271?X3A4b`W2@3_E$ZjJYnjoY5V!a1lm zg9wxta~9HWEs2J&=g9-)OK*hD1%y%EUz#w0jB#int&mxMYqLb7-P+pzBBWefgmHCg zjHMo|_TNNT9R!($!&=JIw#x?J{dX$Rgrvky$H?e>{GiE3MW`#6lrhxrF{HV~tp zI{@9rEBZ$>osogP5w8k*Kj)CZ8Qf3a-$gT?!modNK60(5SWMJEFu2@c}j>>b{*zQ)5CFEIwr1eG;< z1>Gg_4pzKV*RZwiS~aq|Z8(x~b%%KI1uO%NU1YgYI#PAFx)q}cvefX6HcgEy6*Br# z=J&StH>2+bx1FH4p_OzXRXA45_^wD^?2y2t_n=8qP3a(@Pz0eQIxL)iF`r5?9;w}$ zz}Yo3QTvw=HPf61Q3rDgQwj4eH<^u}AEJ})Ia8p(Io?EAZr_~ZDDi&()|{DrG&rDJtUQx&;r91- zBkbe+qSHDdtGgx5a0r7==$-}BH>1;Qz`}1}Fdy6&it?xU!KOMj-bdb|2M^tW#cLmV zI&z#3^Qml9!10};(PWH!P@dIrJ}Q}?OjP)@{{!s$nGM2~Z}^87fQf>X&n9Q(8d3X# z9JHFHLT;g6{HVKkU|P8DnisT-X9moSIZD``zW+{PJahWDICUq0@q~AzZV2{UDh1LM zJ=>G-mBiGBJz{B63-3HUuC(GhDR(mv=M?4(V;?D#;CRd>K0xX3__c>1l`;HTQ+)0yB6O308dtDi7Pai zJv4ibfJuP>2m9vt`Q(Ezhq!TAH1(~Lg|m6z1Qcd)RyZZ$10ZhhDRye1on8_jGaDF| zCxZz6*h zdEq-V`=5NhqiDC_!7_XxYHiFW=6oQ|>~YVT&u%_{T$@?r!W+=XTub8;p*I!LF)Gu1 z6RK`2h(ddggWHQd0o~6YMlEv~AcO5Z#+#(uI6K3^0D?RyS}OkT7sRUppsN+kYAvZ{3olh}|>9Dio~S9N>0QrlMXUz@d^UHEag zy1Dff|Mlm@f5CdMtZe)M!ppc$UPso)DI8O<4Fvqp1$pjh3yuYQ=-t}`?-su}L(hLy z7e8#^`#-FJ+>}2|3tHm~Id_zu9Ge9IQlhhR#$`z?5N&l`Cbp>IwtRF3qUd=Wq){0P zM3>)qII}E4E}L*PgSa<*U_TL@oqIS$@$JHD1n1SFGN^+d(nrw=zD=CTy7mjgl#VH6 zLqb4(XZkR+Z*Dy`pM10-Ht2MRS~!{M%*g{@O-QM8fY5=b+IKKq5S>u*Rb%eFZnZ`G z;$`QT##K|m=gX^$pIfKRQ}N(1+oE3w*W!_!sKI6sB|{U(~fUS2iZZD@CK zMGNre@~j2l0L)e6ywhs7OQLmta&~>%I)7CXFRnW%(8D~wX?37k=b}W=i-nhX+#b=pEN1VmkaVi+edBY?|UNwhDUCoTNY z{IvC#3!skwcMXl;p*U^4X}oH-MIk%`2rD`XFx@BDSIsww9}K&F{i5Az zb*?*2@#^B@v@OU_`08gMzxIJRyMWO{tLt`?5Ib#j8q_^NfysduIH>D(i>9e{-T|fb z`m)oyI4_FV7r($P0H%#=Ts54}i*p<^Q$h3M>Nf<9^FcFS62H7|!tYl&g)qF%RRbqR zUY=^rpv%t16%8&JuQ+eMI%~aZo}VQv21Yq;qT<q|@A93zQ7no-NXSX@&BFFZ@nGc>9Yp{4`HzSXscURL z2X^gJf9ja>y&q&arsfo=yGF1q4ezm~s$fK&mws-XwNASj5p9$}gsB1!u`XEM=i{PB zPKm&f`*h{P*Pw&}v_O?DqqmraiMp%>U7o-ZGM~t!O)9tP;9zH;1D^vH(S6xyoi!QU zW&jRJg>9bBOa`mcQEQIyZtsC@F)+6?IA=2YX`Ed(8>hd)WVMh*w*E)Of4~}oP!6(?DT3cv+0szU6#E~%UE#u(P;3r->e0)Y7z=uco@Pc*B)L#7O*ppO9 zAK%+484*)EQ;)GPwl_Y$t2RAI?Mgkyt{BE=j7o;DrH{*RKqHGpyM4yufnK%7&(hf}7PchQLco z%{EIbMQuf!`dx~2{?E0fa5SVYC_M`=r!k*=m^k;7E*oTx=mG(gg+tvQblHg@cwY0L z%k!>F=bdW^e?0QJH*?VY!t2Ve40^sLpQCiurSr@X{vSNwmd`A=~>R{G_Lu9G<+KiX4h!(1LeCRol)z;nowL!aCZ%Y z7(4S>us!oS2h$h9`pOb>(=X+AUaW#uQ%E!tyVGDDFG6mf|p8`p*DD4P+!`~bd6rgmeeTFic5m8Fg>wXspx3H zk|uK)j19=*GW;C+27p1oI2)u0C3jxU**WS*8GX}Z=(Yx>00fu70B0lk7`^q7CG zJF{-AkJDU>;KN8oLu&z;^lxW{{aR6!)h7+FpNX1aR@k>;$Rxuy$6O4G=~MzpMJUoL z!n9soT%0u<=d^>Q_arET*G=}Aga&ZLr$0OIq(4MM3#c8b&rdI|Uz{~Fo;NzpPU}sx z410$}#?+QC8tvvz2AXJ^`z;gE>ywOukWQvQmP(p>9)!T?jriA-#@SgIP&=hjNddZQ zwlC2br@?>oqIspiCNWkG;$71V+C(<=$2=YC>C49TStpKD3=5u|J z8DraXX1wQtrw`^cKCR>(8MXMw-0pusv;D}N_(pg1*>)yKyLD_M#E-)4Gf##O{rPx4 zGSOL=?GLKSKRnrFVD;?*heF|%y0TF4B|32de35!n@Ak+3yL2g~j0Vt{cVYpJ+@=Il zRIl0YkYBSW12kTc2LPP~s>SF|L|d$)XNHPCGIAC2cQs zfjV(m^N?m5P2NEiSPB3XTwV?B@VAwKLcTHn8}c{*4f!22TqpzO0ygzAomqao)fiHk zSny!qY_kcA384q+M3UIa+MHCenIW|K_$f1w|2>LF}rhVT| zHGpO6dlOm`okCFTp_CW!!tCO2p-FmXPrAI3GH3X0<$W5hzNM*rUyMy2&F~T4 z(A{*ULuSEv`*(BwpN;kZsjTmpyX)_f?;CPU6%W4h zE=rNSQO!~x1JTuyTwlo^M}KU*|M5q;-PJxq&V`2)yBH1^fcOWSf+`x2 zwf=mDOR2Nc=(D#5of2Vw8*enW$lSnUbkKm_0OgPF&r=ADPa&S!k`Gerr3WkcL88sG z#-hl7)TC9u`lOM#w`k7HK65D}3lhs|i$JN3TFnB*vfm<5`e>7;G!B==&P8xXcTo&e z`e!nToZSb@&*dU2(j=Xe$GbI3zNBXG?3bdMGd%Kn5t#P-bf zIF#A7Ziw%p69@;cpaGcR%>th@f&-9InpD?m=o6wPa>7VibhlvPIAa|^4Xo>5&pV;- zQrXjgQktdyo7DM2KSkBN5DeDr@)NtD7!Z|n$kz{?*-C;y0is5Nmie!LiQusuS3Yq< zE`L>HGC4Yo!p={bm|r#aB)c<#z@wCHQNlV}fM(i4Co13dB%rV>5elL=m`w_k+Ml7d_h z0rw@<_|F=D*MIhf-g=bnwlyqahFE*B0tM3KfChh-tuvyCWiwz{T0N``+^Q7oFyV2G)CdbX)yC50>-F`VBIn}a zfmZd_z>dSGRg7(Bbr=>NB%M$oH_SIR!IPzqq(dIEXan?P2dZeQt8lu$%h#7W2;Yqg zUYnE4>kvrK3JV7rj2<{uHRsu>P6q7ASa5)5Lm(7&5G$We2rw0=u)}~c%$)hnE#;<} zApfIKxX%;(K3m93Uj#nFLBuM?C6IegJS$`Nq_KBqQkn^jl)*^w8;m%1f}0?FsN`aF zDGr%ba_!I@w5`ctnM11OqpF~D_HI!Tf9a?c53=P!xzm>IKL6Mgmx@jZSd`Wl`YLzG zxGtD-5?Tl1Ad53(WUN$cn_JsEyLIDaGKX{w?sRjM(4u zEaw7<5fvk8U6lbFGc7nDI0=)DOSLpEc}OcPzAxm6pP|BM%AuR2ajN?qAXVcIgMH^1 zqQMKkgl!|8N!&>$5fLY&w1@zJ>5r^Q7C#WjVGH{gUzP?w&C!1WiB$8ENbm~_`RTkNrnh{p z<fkX)|rn6l!zQt7Gdn?a6Ti&tsk1(l^mi{s&v8Bq@(3oA3b>?VgPQx zqmn_FAxiqd>y;>s@WtZ<6Uni8O=W{Mqn9vwE)1f!ahw(NAyb}QD4W(2Ee3Q!!g)e8 zMTwRSU7brl;*_oq?lgH( zV5ZKmzaAtAiLw3B8i+Nvk%-6$qAr3`MQC5=Pb0lAS%Yxu;DzEO50lbmwitc6^v zb1Tb5;p&qmR-Qh%)+z-im01=K&RpD^?CRl1p1`iSao}H{im~XCE_Fx}rdmkU5g)2a zc<9}S0&ZyUaiZD0UC9^IJJS=gqp=={1-byu&QJLoLLuMy6wD(IGlIoS>s@75QTcN@ zhAORF{Z*BA6nM*Cg<#08v|PNddI47zvk|LiZe59VoTOBHr5xo)I3!spAYrID0F11O zkFP;RJ9sror0L5W{s>*APpNp09;WdkH{Qw28gPC*S0)w=A%*=)2hpTuZ%|a(y)zs9 z$$0tQ=A(Viv=)&598=y=d7y{9WC-tn4(aO{EZ=qai|hj(heg}quiOYcVznKX-w+Ao z%rnPxHq9#i4W@Ae=}rsq+VKP8`hunFv^h%q~TWTzD@7XXQ-9bydfh zd$&-9_NYl$@V~=hG2a*%Lh2YOdzLD8qHHm$cX^PObB##>k%NkM*0yAnj*LasOT;A0 zx-z;@9?dG4C$~(Xpk@B$lN%!V$ZmXmuCLB=hz8|c2(_fsYmk;^;8^g5$F} zs#T#S|1Sl({Br@~0sw<@WHMBh9tN%2=9V4uO@<5-rXa0!HtPFUEdsYBkB!qIv8Tj! z&o~zUQ`bE>TfXwTe=94`#~KWF=@T;%8l75HU2>W8FsjA65~)lrMV*neiNaoR>FMD zhMo`cOr#eg{As}*d)^hzyPBVg?Se&?Z^nru>86BH!JQSwW%->Y3)96mR?f{8MyI=A zn?>1#mT@JEy5rm>&(@2-m9Ysk*C>YeLTn>bk~SB~C?4rtKN!z`UOirD04=%io)9TQqh?-Ro5#h#z{t5aJxIHr!w8A7 z?fFxx>;YKk#V>0bWHe8jX?cl8Wz7RcF;WgPe8Z=cIAJU+E(>w%+>0@~dAJs=ITwh$ zH*L?i(?|ptT-|0Q^TNFR6o<&Aej_HVB;^vz8oA;YYgA6kSxhJZ=wJnJBObL)$+(MpDD+BFHcqzjVyz2Vf- zm7<$^84#iUUi>P1{Yq8OlO9=A+j`>3lC6=uP9_*V!bX9?{6Vbg+isAD4`T^O59Ke; zUKDc=jF&+{KQ7uXOIQY0&=dw0So|~y^kaS)k7jZiYcC5o-`ICJP`unuJ_OZCvA~j( zaOoB~Ce@*mZNy1Goc}UDt-LvayeU`Gf-A(yAdBxNa)XeSDa@1?Zszb+X(@6=8Rh94 zKLqfo(k*)_hDx1NY%Y2nI{gopmwt)IFjS#E+3e$Zw2n!1VhuOKBBLfPCmMZ{h5kiq zkggsWd9`@$rNnNtJk1$bxm;->FhdLic^(vy40)JLxE1qG z#$SeOaVZl~m`46|>i84rBFq!MDKhwis1^vO}s zleue9eJ<%Bu)4$t%bH>nQjn=SyV?J6Z_eOI#pIBtXZP%p9SRMLu&`%1Nth}wgO$a_ zQsX2jv&~5}f}1d7!BmEKAUSFpksoOzE(BvxWpAu&s=Y61Wo4Nl(O8{~#nQBI-NN}> zdcL%K>m0KsTly3A%}-9mPONrqH0a=mFdmqJ87ZC*>@FyQUHPU~+7{5a%yIZ(6buGL zQrhjoywAbJTjkAir9?YMOYo!$ifv&<>PYaUwo51zMjR(t_e72qjwiUBS?d^_iTS%< zoPcbG)ueHw4jpIY`szSZt$3vtgeTLNlb#(#HKx={kcdUaH_fa?RHiuk7Z^;=<$0ue zh;ZcCBbsPTX~GTAW@X*k&fJaQOu?xIRy!qtxXw*a8IYWaLSht~92B>F&F&`zI}}su zOhs_gDJPY(Sj9Tp_&+VPA-2UJ2_3zIFaULIv8sHIQ@%T_9eJdk&9b zi1}=+$g7Ei(>U3{9uPHMC!cBX_$*$OI4EW4Kz!5e27Wzg_GJorPm#?Q zh=a~)&Nt^fMM)Fx!xvNQlU)2Usf*}bT{m%Qoew66v@aWH?Ivf^v;5)?{?29p63ff0 zAV##mgpHSAaLcph_pr~bEvHI-fC?dHm zc|n|pe+Jjny4L(AfUglzZdA(^$=ottT*W#E>x~;qoJ%o5lIEg(F+SSYj_cL+3HBwE z)o8!bNsWq_-183-<3 zxZpOIxqk{U`gaI0@(rg+Ax1JNoV=Ak-W>#Ah7`1zRC*DAF%V$S%ON-nn!wHIn)GSeu8sa%}>y1Y;EE&U?Q3MRzD6%fEKi**v zfcWCeYc(Te-w$jU{oq1BGC}0vd4fzRY4kEsS`9Q!Uho^_3+AlkABXbQ42F{6_8uM# z=Nc-c1U~wUag(mk%j~4W$NPL-5DiP5p5|+th(`^4Upep;HaWvLQgjqdg zR;#waafsV%hutvlYa!2#Lz-ABZ_lX)xb8g{8abA)9CB)wV;{mH9%aWqfgNtp_uw&u zIs{TZUJc|I*iLY)9d6*yhZ|aV@Ww{Ci>w}*3ex)I2@iGaa<}qHX3x}0j@)l}xWSXO zx@b?UIpvHhup0acmnA^w;~hzIYGFlS3IQBdd-=%?^|=!52-`&{U^PM6a+f})snm_D z$NfsGeL9xE)ni$yuoy&4Rv5ae!EVo8|7L2vIcRbp2^ck6Dv03{y-j zKk=x%4OL?1%2C=ab5;}?1IY-KrMD>^R#GghEZY=RN=m>JxrRFD7)4NktyyjqmH8wE zzudB+oPM&w-Ih4tP?Fb@WX++Op?A_UnjxSfYS}I@ac8K0NVv2^LNBb@v^xa+_b~hl z{`TXK8TJozFrdok-2UyF{XXORD_It~WZS&!CxPMu>YQ$t6NUKqVu}W_5S87Vdsag1 zt>4IYsTLGj>jqpo0)8UCWXMe#qU_L~^bK}p8JcCKzv8#WF4^kom5`ArSot|ZImNoC z3u@6h!V^-8S|{dck(#P+0Z{lWfbG^C%{<96Y*%ZTCS}6WOlR~vVrLxm4&hT({aocQzp?!TQFZP&L^m= z{PIe=;zjq&oAk*ZI*ykx*%J6_2vQDgl01LsXer4&SW?cN5N;_ZX8#r_EnrMBWF^IF z-5#X1Mgx;vhI16wwRO~3Z8?}8YL#TN(jaQ$wbm}3%_;!+P71qSn`(|4)DZb>a@bG| z5hdMEBVxTS&aY-znL`jalExNqs4aq8+=KKb3#U?ii$+08qsSJLxodd|{1yXbkQP4T|rw8QG=O!aLUe#C6U>)CIjoE%njkka{E5rAlf_B z^8(LJ{kBfWD?Qq|741qzds`oE7o>*_U(ndOZetd;E5gW4dkgd?Wyg}uN#PS!^oB@Y zz8lMv%V#e-r2(>*R}&~Ta{Ci9=LI}$fmtt!*=3n4bsrm)1Z9FSD=0;-uB9oX3|-Oc z5%X>lZ&gX=1Hf^)rFGppY=@HzA?B`3eDZyc>VeJOSrsi^PU8$_z3H5upxrV zx2aTeJ|7dIxM>1L@?n=A29>A_817>EKjNTGS#ZOe1O2qH%>1L`ol<4wJnFXE#&1}M zHt$S(WMYAi=yt88ZP%zIPoq!ax-o$m+b(o@P^+S^1cpmws%FX)BC?v1iInWnhZ69` zK&8SplHX$Mr{HMISV|Q0{q(cSmA;%!LX@i59{^|Ul@Q1eXOKf-ORz9S-;xG4Wn7bX zHKY@ngqY9l2(f$ywZOIwD1|d7FQJHqn7bb3y>a*sb)~m|KYstiJNF0m27Ek%|Gj-@ ztiCV2{rl=W{N#Z=VlSuw(#{c2Wz zg9ICgtmNawhxSST^WPbvK7=dM-GN&K5t) zCGkkiOe&k~@fKxm_H+<&gTKFpwu0%KoWHR`IJ@rcRrhOgcRd6VPLiA@yNA#!;L8iO zlP@(1{+QyrN@mLQn4nf#w8Pgz#{`W#&O0>qE|N4I-imRtf)6wP;-c*9A%W-PZDPIQ zgap_zlW^c*_k5AB_!8J=ogpdba~Qf zH@hz{&Q4qBuS(=^qoIND5Rf!Qc4e~v1c<)f(6tQhn`IdZ;QUPNT_n3aQ2PTTwB)yg z*>ExlFPnB1O?O4{G$tq)qtOnIy5sfr^;Z`i_%~z)3ED|rr`v8`{oK5IYw&+DKDTpm za&d+Zwm&7fWzaqn^(gNN^$(pk&rjjs!wtkF!x^m&aw!bU_q?TC&$UX0>xWh01C>Ok z-%8B#Nqb@)v8;o7F_(43297Mp91gMb-C&i6WjXBqiABVWzhetS6=x9Ne;*p)Gp*6a z+sgVr))ymm(_abamI=REt>8zHG#cywW3K;Gy#KNIlQb;Fx_It)ktSd;7gS!(pj5(# zf|N}vQGRkMGlP!NjfOdTvpN5IDk~&HE-gJ=o^N5r-rARvz=W=hhfhma^>~CkCS> z&q{o=#T`tFFlp7@Vl-&OC$qGIF(uzf!Mq@$DoQY}OVUjL=3xBJ;S|4=Kj4?=J@erP z1RUum67efX9H=w_dp2}I=d-$OXo-`3YT-96bu4P6Y|{g+6rl-Fhq?OW_0?JKaL|CY z(LpmT1c2+}JJ$#P-5^(CBOE4kI@W>xar2K{g)=(bVqVC(C$N|m%NlUvWLCQbo3$rY zajDB(DL<=?TJ6G6BKR!HC9^qX4q%TLjV>Ek?dEBcbaZEe)HWYavnvG_6Gfk#g3rQA z;PEZ>m#=i$5Jou_X=rA;&LpKe?X#dnO7^5Cax;+sf*K^wU?6Tyl`z5@Bvo3X3S$_& zMG2Cn%M8eneVORQ9!U8yR!@rSesVyk-s3&K7pZ*uE$zMJ+lIU43i++U!FlnwqiRB= zQ97+AN7s`(_WChuxSRe_QSj?ooJsk)S-Dw&FBmUM>Wl6TUn z8a-B(WA&52>Nn}H%9pr{Vo2zsKV*X8pC9O!DbeFJzjvT4tIMTM@uFi*LS1a~qjHW1 zasRX`p5`|}}d5sxHT4q*%04x|9i?WS8LQB1;!&$7H-46De5>bg2$y(n*iyzq>@2td8e4A-Y8MxEXXMJ2P#!*&`^8~m zN9JsS6plKHB*hZ2bHB_nhhdnMc7kK4qK84)qFmI$Hu|qXLFf|Z+wBIuo9DH zV*I!6$FNWcr?e#64{V@H64MuJhzk|O1m$pf#gOMQi4FM_6&JwYFCr|!gJ~)`c3Z}O z$BgTek;Ij>N9<|8GZ}i$!R>2*;ESJRV0#P!?ZqG;5EBbp`?#}%^uAP_dkpZWq=_*6 zNce~mA?hZVv>Q=!48ljFh|nX9aYq`Dqmv%VLvx=VFPS|znURy>iIR97ZZM{+IVK>& zVFHf#5KC7{?IYW=p1y3P{(Yi+2I0&?d|FYMk!llPeTi&F|Geq*A;2X5lQ61=s0*WF ze18ATh4OVDcj>_?SRR8^kIrbPYkxoopVFXz%5Yztxd&hKbXbs}RxNKS*XOn_1cfVa5zkj@h z%}{t|Q>5&8mka5RMh)j4&z_i?wjU%WVYt5J8IHP6M2}W9Wkz_lAAzI3UWenXX^A zg5RM_ycxWQ8MVX7v{zD6F!YKEsTQOp)+0I09*`7oQK2n;y!A(=JI&^8yAesC7A7U2LQ2!yhoxmJLWkN6CySx9`FWJ!`B*@7k$x-^sCiyhx-C$SVO5 zjW9Zn|iX2WgajeDY&~$+qqOvVoncaoDyST%n}U4#&KWoO^3lAP-4&X5bg- zp36X=zuC0k<%`H-+>?dF$8m(M_Ql>#rOHPGT14dLr)IxUL>2mg{nNn(bLQyG!SgE5 z8f#Ee@sjJ55gc?P;R2b}C5+Wm2Ls)?zBnAg3R+pTJiVe8l|8pr>K?z)6i~HI30TFz z>CchUIStM|I@}P@Dc1(KJux;v0Fq`8%V_vWmsces9W?CB;2CEC% z0j7YAu{p4?oaMwnh0DqxC_(LERR_1jfC52*N@6Y}w(H>1`8qh_kHwb|b;>Kngu|Zi z@MAF)8O)yVLwu=VeD~XTxUq8_H8G1-r zGrUH}*Jm4TCk=qauz_D7;s;3DJc)3*Byww-^b&O>XVG(TLp;B?B~i35vwqKz-b zcOns+yvhoKr3w_i^vBkxqWo0TKXrnS^~8@zqpClE7dC%$-H`Cs*Y?l&1Cc$w_jc>O zgz$FT|Fq+Os`;Nb{ZG~Rxwh9A?Iq`qOV1rc8*gG#Sr&9S#QPsVlW4d;gL>Z=EfN6& zI9~S%U1`E2_QOG$$@HV>M(fb08NA2RWmG z%!d}gKwLv1FNTsPTe$Ul@OI=HebB)1;so*({4vD<$t6CHcty)t*_bMT26feLHpLfMWbQ zawRE`;A!+4IqGe=8=da_ZjA%9xQF=+rT{8s9Gfh;>TM$Uyk$54UtC(a^+`Q*dIxu4JxDTf=oyNxh& zt-e)QV%3^S*%i;iGgMmq6O%MK;hDYldwYP@aJEPVTJK@SpLJ(A1OdeV@fJ8N%Ftt53 zK2FWa0Qd^>7T0s8M_a8GquU=C`Bc_8lTptGZ20fwq25ndvzN{ZIlw$>J zCA(aM9!tDoWF{Gi<{1C%QB<-sQ3fDVRHV&OY*E8)`RJ^5(mZcB>*CDrTQZ{#)pg_Y zu~-3AAFJSw7OUsLVK$VB=5f~UO$?*>K@?UaIIk8}B@>YF&}9hUo;Z_r?H7azIN#Z5 zg$HzrvHJm(az14YCZ;i!m(+ALnv(}HuwDN)9hw0Dx9?c7yLV0CUwi@3fljl4zZuoLzH%s2A5AaemQ(d3@9AK(o$8iJ-?{Ltqy##hd2U$!qwf z@uGFs>ikCizHD{Qp-=G=@M(z4##N_va(&jg5|`Ikmltio6^3xyYM-1nT5p=COc>|T zuW0_&DrcKByN>KnR^47$gkqw1pX65q0^AVVuB>04`@G(Y|b+wD3do*CycJ zxcaRGGaybbfI9x)H8g^U;dw>Fy11)e+*XXZiaXx6qOX8Q;P5Au^rx1qMxoY6Vv^!U=laAgD zy6jwB(cpsdiu2~Hv(~HT`AHKSTp*xdTJ2^L)~MCS1}*9w79P62rm^F~0B-OxMwlg9 zLD70C8mB+Ei0ZgKEPJ~pNra~F6j2BZI3?es0&rT5C`jfqYQ9!z;=Pg4o`u z>~FvkUfHTwcIvf?kl2Xk$EjF*Z2Yx38 z0i&b50^!;>6B9jM*ze`R^{jCj4Q_l1>(-UrE%jyEOF^Pz{8`<~5L>2%6*MquNa7&5 zcsmCyz2s$7Ue=4)60u(*QOUpbWn zr!QwBc`Ef;Q8{z-j1%B4GcD8{V+u%6kPche0FHCApIAYe4a`!ek}^;hhS0SbODw3l zx#HHjCu6>O3#uM0&_WJc+M-H3C{l8WD7sA&=-ta*#;k zD^!YHhTQo9tspLuwjL%Ef0Ea|fLn}#@l*O7)k85KvA(uOQ;kktWybz8go@Df z(`e8-A9*Uu`!e(y;IKSR66U$dF=(w*;w}72m5#+ z=PV#F$;rgnoci#>3H&$*JE#PTBT80TUSjnJ0DjS2aGUT-8}akQKtr_F zgqo>q9Yf&LjB`PYDK-3EKp^uUwi*bZV)BEKR1qAmMr{8*Vu;$y%a1U++m;_-oa)oY z*AAidm_Y^*9y`*=+4tDt#txn+Kgr88C{dn089EEMNYGH#5>$Pi>7vc!q?wfa)CHNx zlP*=`WM5e0o-sLp+8t|Fs&S1+s7uki#IzCWPSlxujo9^8aJ9wQtREx5te9zrla``_ zF5~?)GP;>Q=qX_YU!z0J*%n+V5)k=3tE>!N(nWnb6NI2eau2>7uBfD{XA#`ia5-Uz zECW$_Cx?jh#VI(l(Z2!}V-M%502pP;=MqX4MaZEB@^eCngG^jQxo%anlFxf7c}*mF z!y1v|Q3`f}r_O_mRsMp!GqKA-ACSJO5+PJ{irv`ovvnRm!(;$|D7-(3_4Od|Oe+V4 zfZzJVdmr~xi!^wvoeQx9iEHr8P4Ndn-+D_v&jgw`)>nediudi$XV4@KA+9ztY1^`_ z0)dN{^$W20U1IUOh6TNkIQ*WBgN8>M2O z#{|IGX#jTN4fhhDW%>kd7UC|3v5m4!qEc_>pl7YumAA(El9fgimByhIlWvn|NvA-P z0+L(jKtK_-<12Azlscan^A}>wpU-gv5&C`cGxk?D;APUtM)DBFnbzm?f^Uuud?8K{ zj-t-kiKLi}-J3%C_KT`85#Pn=<0Sg`pOs<9aaH71LRaD2Q2GsWshQQc>^rJ3N4edm zqX(I^PNme9QR&Kc`w;!s=w?K2n8-3Q8if^Eom1(qL9I^1cFoBis*Wp>3ZC({2`VpY zytdojGfIgKLn>}kiv>MJn)rTKCGxE^ils-qR0`a;mVRGtm`A>suj}MT5k22%xuHye zV(%v-`dR=e_*C^jRqz7{RzyY{ijJNx6Tihw&Ag2zm(rq25h>jqTB7SBRj??qs8DPX zu?OjE;rc~;pJO)Xc=Rmgc$Q~zxRO?+dzJfJ75CBVW`?>5g;%H46xD04731h=McNGG zAR)vScrALTSfWsYHqLNZ5>@;#DTYvyZn+8LB?yTrt#PQ@5XtRER@_M+rUsg)zpIM$ zB#$7{3G)1K5$s%j1Xah`+7{^qHU-CAI5S@|4%3;siB1YTmPT_Vx;H=^GFy#Cf@RT| zV3?ZIx7iOzr>%6JX?>iIOnZW>OGYSl#FS}L(6!#LaUN8vUciFMWJ3k0XHMT5;N1~k zZn;#PR7U-l6g~>W(G{Ac({AFSY$|rwAUBH5aLHdM>~k+ z%Rn_gj;c6(4sb$Et}iV4mr0E94c05hyOp4pY&N`(Bh@b|odMINuB+?9pzrlMe>ckc zhpUMbDoam+tN5Wol9nYGa!eh-1^Y9*r?{n(8!2E7<*!_zVwIzF3`0A~Q-+bNYiXj_ zhH?p_mUR&NjqTdC4bG zAvp=Q-tsk{hlS!Jb9&N5pnipU11OKgQ2sawqygAbel6~_{AnaSEX?i_)#^%l7Cxi0 zRGLa^+}+)w*I$R6AH`Mkq}lqJy;Zr=rho>9R3~%k*5xEjbH0h4;N|__|NeK;JU`VC zgI_{ciIgf;F=aThxQ1L`wydLvwC@=w$9&p+ag8pOFE8rvCMg3i3#yrksxtXD6lT&{@Aw-%bssXbNlIX-F{D7eEk243eaeC? zh4UPcQ`r`&c=WK43_Ey%?~xM6mX<{5l`Kcbw9>C@F<>DUGTEvSic4=TdTk@WRbyo#$7R6&UIrGr`qObvwq1_pybMi7)_XJUr9z&JRKD=1)Kj0N;K?{j zR1vjz0c}ZxSCDJU`GA4sFB@lV`Whuwn^NSsmRJ62d?|S#8PpYKUXS5Uax%2g$i$@n zaVx=zrI z6%}^|Ah?ozDUOii*WGlvCcEaQl)VfPryINT`Is*4fZDLiZ{oGP?YS3!i&xbNhB=YL zoM4KPIADB|ahpzRgM5oG5Z5LN7v_H6P|Y7=Dx%_2tVF|9E18j!w<6}_Q`_RRJC@(j4*nDI#xHT;?}10D*%%4q@Nz0VxITJFk0 z#;7KA{RFTw8r^d!U!?Dh7qDtOPL`M6CLy_Z`V_{0p$VY@rcHs)0}9pRvZXd6m%}^- zX$h{mlS)af{=!qW_6NW4i7VKz{Q>`e!eY^E)>!)k=Ka&^LKWE@VcNn$nxl;7;|FAf zo^}akP{>L;86?#|(EA{N6-p+WRm?64tL}Va{{yeFk*m6GD|*ky|KmEjld1PqMI&tXTS~WcY`Jn4-V~QVn*6k-M1l0~N!P-*IuFN{r{5 z7FN)kds3Gpxl-JM2xH^`lE9Uhuz}?CL&=bzlC{JPi9Y%G4awB1p#9?7ogZ%#Ehq6+ z%;gCK&pkvN_AB zg-9Rq*Ws;#jTxe&;Iwfk6$(x)rJ7h!xIZ@D)8o)7l~txZUt8K~uCW9r@>bz}q&81- zW7jkLA41Uo&w@AjdLZF7ZO-uyR=?qsf&-?38G{gsVk3M)YQP&lN;{_5ho8PYv68)u zS;*<4AXd+wckTs+L3d9Y?PmAo#TmzBqlB$Z8^S|C^6H^`3(DRI?G-VIzAL|L8QM21 zREArDLz&;~d$^&1g!4e{4~$42tY`jM6W*h(Q38oLK}wfw5vP-C7;%+0zifE!((B8X zR%g!hBchENiK*|dOwJa@KezjrOY-!vVEBWni|*Ocq|Ud3g+_sdn}x^;f@P2Zzjc9^FL&mwYkkBVFNMXh zCC^7=k4WxeOp!NIxnBq`rbZ+bMNhxv%DU*{p=QIEt4cvMAVl8V-mP}Y9U&vl!8wz1 z4w6bJFX8aKoa1x41N1_>h2KGNtD6b8vT&`E-K5_J&Lr>STG0333)@xa$I`E=sm*u~ zX1iX8iGFq@6UZ$rES&*N9Ia&e8Ijrty_GV76u;s`q9+YzyUTug(G;LesXVU$A5KW0 zXkkgiR1Y;uH3z!d9ZJmHI(~#(dnO(tS7?qbY_@n*RO{TGy{)90*sxquIMz>4(yAF& z4+?%vH|NQ{mubSoDa1wZ&gn#iHD0hAXuc^l}U|`c! z-!C?|rcDGEk{VHRH*1PM3#^xgT^=4cXEGS1tB&$zW-L5gQAouls!OKbSvC8&j>|RF zsH)BcJ=@U3+wxc|mHtb5`MMnU@iI5ykaFCC@N~l^9g=KvSgN{(-4-6@td_A7y76VU ze*7^xoPE`3+`=$TdmvgsORLGgM~ShR(kCMM0{bar?9<<4^1q(W$I~yJ{dH0P*J`a= zt%z!+wz<2zU8`;Gz;C;oJC&#Wum67eUtju#9XTqEa z=MMeofFlp)R0z&<95J4wdJwqCexa0+C$}>UHG)omv26E)B@X-d^dTH#m6&l+?MTYE zxGU2wRyS%}qOw`v+O2PIe|zZ`!@hU4`a!l|jR=rP@C3$!B3^QV9gfh*F0C{7%VI4K zXvOJN^-xs(90U-H2Bn7bJVhK;GrWo9(dnQiey5eko#4!EP!Xeh%s-5 zl~rZGMkiaKr)}1A5 z?~LdpP@y*aDWY{KdLV!vDC#EFF*iADE` z8C&YpO5Dz1d1;mgohkF2%GghhujSyq^3^||1tW6}7eI)PB$YXbC@LVL1g;!m739<- zt$p$2THcJs96ShdNi$egvY($0!N@92m%)yr7?%UED+#`60R=}`(x=6zILU3yftH{b zYX5IWFUkBf8Z4q1R7$Nw`2B(-Rgba{6v@;R&WMD%i106YdmcslPbrBQAW=@of<4E} zoUt*EMFt>U?qSRV!RJR&%dEHPLtKgg!|we#2$03As{SvJIi8M`3u_WN5k`XyEf$e5W1~A0x>eY73*G6|GMux+pm$t1NVb%B!IC&$sf8 z_?2*4Lr$)aLARFagA3`FNrGP5sTc$QbOG@6_ZjwoOv>wSn4{5+3{raj!yi6J;@9*z@ zo22YxW3yW+dmp{Bzy#H3^&i*+Dy7S*11a5(GsQgDj1FU{>bX%>xS1v96UNN}!3h%) z;h7ae)asSQlx(O}d&9!_up4?u;-ajtFk$cloPHC`%{1b>2*$z&COfd>5RW1rcD}nBwa3 zB|lw#w8T9%k9*JZ`xIU%0R`cvb~G>`Y@DmxuFSYfug2vRhsDcP-wPN~xi?+qP|xqh zgi}nkVNd4C5!xIJ>E8fYzTdp5`%Q(rhHmRI_gw&_Ip}Koy3#?D6HWu*n9oFZo_vb` z1EFa_YEU6!H7%HslgeGt<8b~@orJXD1Szv~bqP6pK!a>kvCIk4Avw^|GoS;QAYim= zG3kP8m6J7d(p25#!cSi|T4&8ue+v1>CV{aA^>-5qGSUF>#And0Ovd_jV*cmLf0WgG zopnn#uza3R$O8Fq8=gnxzs=2^+LQeE=gWT`Tz@Vcqh0??p2%@(c#|ER6%=8hCxSJgWWx8fn4^&jhRmEXAOLa%r<)*7 zkIlz(7X>@2$R_2-53+>Wz(y}m6rw`Hjfs~J#Gu%-?AR%5{m;X1aw#nrHBt`UXM#KK;OpYE;E zs7x!5Vx|%E1v1DNu8Cz~xpMXiN?c6+K4D`eeqAk{%r=7B z!$w5FrI0jSi&+79JststZucdKyWMWFB-Z!ge>?0<057cz3~&gw#bs!f5bvc?14G>?KhamyOQrZo7HexN3ARuJ8t; zY{Y(!yn|ib#JXU6b%OU(_98@woUsOget7yQQGTY6;*hv0f5xo%$W-Mwgo>QX|B8!wJRA+G zha2=!zI(W#{wv!bZb&%l33a;R_bNXkG73!|2ag!FI98|BJT!m3T*=OncinlpzNgKL zQcmFq)t4Hz!kQIaHY$ipUEcPg0&3tGLFN4Z#yb!OXqv?p8WJ}5hvbhZ7>ycC&^e)w z+NWfWMp-it10_63(Eri;-xmo6Sfu||ws#`>U#+tJr2l=Z`k$6BfYd)thjX8lxF;p< zf0GjTq`f_9Z%^9WllJzcy)Cc3Mbwy>f}-hLkyj|6?BZsqr!8ue(Bj)v?hIpvKUd*1 zO@R8LhFJ)N`nE|;pR~QFzenqT)0yKrC;@z-Q1ER1ueQCty$kwZb$7eARo$vp(En>^ zcl$~I`>XUn5;bJ40^4#m;j4Q>CEn0wRyF`(2u@8Y^fx9C=yGe{*@HR84F%AKs4?7Q znaf-Aj>H^$Mu&4rSkeap6Q0aR^41XakiLg7_(u+xgf<{!f$-RNpi>J~sfnX1V%^_@ zOlN(x`g2dJjDh5anwq$As6rbj1K~hj6D3(xP{o}Mg4|h)TZ2&ufDbWXRDO8Cx!A!q5K9F$|OzlE9p*JZ$XX+XFOFUQ;E>zIYkvp zt%Ng8BObPa!iIB8tin2eVtj1u+fYMgWR=SwVH$*X0U679F73QVCd#c>vI}GS6M`ru zWZ#fyuJk_OuMzm=$R%seC7 zy)$QSK|YaQph(W_lgo7+2KI1R2;fS$%3|Egpp6EX&Ki{8P1t*~E>ej@@+%=kgI6@K*H7#P3dGoT&8bc36xcS>AK6CO9rO^m&aw2`1eNuppC*Ia7-V}O zr&L%Fwsr6WmVEq2@~eDEr&Qk=@nd=1_z!`{(}TTA(EQ^Aw>9*iy4i5JNdPSjkFqo- z0;Sry`tR0kHgV{uO7M$b8eTP|L~)^p*a^;Wq$B78B(Z`2D=gPqKjJRTLUJLPSbZYl z1)s1#0?GAD*gFO7y9W9HKCRSWxl(e3`4)^X!0?r?w{)&MN?N(Ct<9&Ui!Yt~h_!Q{ z7VocLJf5j#mJZ&ah5K_k=Faxh%B7ucC77M0b;IGpqd)(6ds?i8$J>H6`wLIFr^Q=* zz~x>&_i6dQxg##u;{7$JT#{aZz0kL((@rj5M*gy3wlW17zsb|`ezWIe)+z_hb1b&c zjKB7>FQawjS@sCL@Ty0k{->O)i&ouTe%alpb^q26eA@xOnv|M!!B=aYZu zw-hj__|Ko@ zYI>HD1Y-Qbv&UG~75}fgS*lh`wMu2Hh=wM3rvnemw(IQeRH{BiYce2s$w-AEZs&uD zc|heb75?&(Is0He$VUm26-|hlFiEaGo{lULo|fdc)!OFPHXv$GJfodg>;n03XKQ;alK-Uwvfz{a z_s!=2?9C@2QGtks?(-HMvwl(-O4ed}reG?1$_Mily7!+Ry65xDr%W(Uirtf9_mm0d zDHF`2GQmji2|R09)5(#(MW#6c8ieE3e=T<=nM2Uxj`t2X@IN_Pqmt}tO7bzX`pRBq zzf-B!H#h5BTZbF5HZi!_8B9r=^)r^DD5buH8_H~_I8M_avEOnd+%)aY-l8{YJPL!u z4Gp=()Tp14oK|N6`g{7z W|M&j|00030{{sLO3t^4`_5lF*_}{$% diff --git a/campcaster/src/tools/pear/src/XML_RPC-1.5.0.tgz b/campcaster/src/tools/pear/src/XML_RPC-1.5.0.tgz deleted file mode 100644 index 62772f5d9493025859d30300a3c66f1c643541d5..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 31619 zcmV)CK*GNtiwFP!000003+%o7d)i2{FnoS}{XF>}di;6^m;nqJ--zuQVv~fkj_nul z%+5)&JOT+@8<1E@*zxY>``f>&>TaoZMfj3r_ju0P86&l-yQ{0KtE%fV*T$c;E2B~U zJe&U46a7=K)pmAv*nctnrxy7y+umyI)LFgO+}^Hj?d)tf;MvYr6WTxj^Ys55`~nNl zZVbmYZR>EoUahS&!y4PVX=T*z_Hg!+m6hJCL+m@%fpEACn*OhwE{rH7~XSo3J8OFJX_T-vJo+0`>!D$~u|4q>hz zt+4}3n;Azip<(ah_+XQM!PD`zW?9DcNCk1QDW5_EcQKo3&fU?)+Y4sS=2K&4SRPHA z*%Rhn8w_Ap04AF|wr7v+>A|M_20qsfckGyRY=6{d7oB#mVopp$m&=SmE?r}?n6j=l z{!yFT?n~DPIk6oE9aq=Zx*ogMT;?w3bKCLg#oNK)ViW(>XP%>3F1{$^C_bBp%QQ=8 z+5*OBc_v?`>cOTu8W`Nv&~*5(z)jyXuh=W?(rZ0(9@>qD$?bNW|_v69oyE8>AJQP?N_Jw<5=I~c}Dkl zhMU;Gu6f20(DqKHwp*#!0VVhVUU=pVU$kobt$OodlYYWuu}lQoF#w8d9M!Aa)!M

z#qHqOH$cm?#ndw^qdU)#1X^XRZy2;a#HUmHil}yM<0gWZrUgG|k}~;da6{Ub2Q=#v zI&{-vND+tYo4AMJ$;6x*Y^HC+76XpiF!mbz%`I(jYioadG||Vk+IDSQpBVLVb5h?~ z7as#?&)w9f(<|Gnn$~!oIrdaMUuT;MkoQK7?Z#HE35Th^v$eaYZ|lu%eQRg3-Q3;N z_V&Y&joIA0tK4YQg;8-mXEFA0Jwm-uA3$Zu>ROI5pK4={&cpRz1-BXsiurY&dG_JD z_ys@i<^V;qG(?*}=1m-Q5@L3Y{n6ewhy&w^wly~P8@2uYraqqRZI4E^#$M|1zwx-6 z&7ECiduIeo*Z?%wc1F#e{l@NYt*-CyYx|SPxIY8mt4vMHaKG`mcel1Cd*fZBzBg&q zx0+)h%jRf2GIn;y&3&Mx@VM!qpk4B9N4>qjuh*MfBWB^-JPASNn?L&%h(wKUGF!V+IV+ctMBcM$9s`Yj~#p~>KFl6 zC%I`l1x9wb4yXDioa*ZVm)Qb7vtOT#YRx@eH};#gkyaly$78*@H_|nKDp9QCpWkc> z!SHK4^~q$iyH#&)kG07z5dQ9XXWVS=8%AwZA8pIw!<@gH(T5kHxwWrvHR~fC&JJy> zv84gS-`(HY-_i7)#$Izv&Y(|X`d6L=$R?&k5`c0h9^m;2hvrDMA$bYKN=0;9CeyNm znQ0y2F<#R^0>U5kQ2R^|_u&!z$vaj$16g)%SUTu5rr`=n=I;yBF?2p~=t*D%AvUWG zl!gRwfF)la;IPE1aG@?`K=@6p=>af(kYI#JCJ_LdOfY}=F4PDmEPtFR1BYgT!xj=4 zt-t}7S3q0|32Ovb5eB2;Ac#yMNiInyWFe`LMdU&S;>hr{BxwA304)5yD%i>Tr9!9fL89p z;nJc@I}McMyQ!^#WT|_s;cIWDvL!Ww%E(&@{re^F+G_Ny{G zeNAh6++!oh&^}3{nb-woP9O#&1(awUiJ0v)t1Q@~4_&g|?{LX#PrPJp9e3Jzy3mcG zZJ}(6=0uPcnK=O-0{aWND=|{ET>CrPNBj03vPOjB%S?9!Bh(x>v$ScW=&FAH&{f;{ z{#LEF`xRDAGWU0e>jGX|tqsSR**C_JOddlrc_4F~!)bX}WheZ=a&bL9X8}t9r!O1` z_PO*crA(BXj77a9m7aG2U4r@4F^ zV>84)@YWe{uI{o~YoNmTvgmG@F= z0!Z=p!lRdDWK~`Y5ny|(zWre2*S|mHKe-5S66iM?NnaztCK?IZ!kPjzmrvjXkkZ&XgGs&0~Mk1RCC=S8pz{LL&+O6P zjIrmcJE~TD_<>RT-WGN5=@0dH?f*XSv3}?HvezB_!CrU&(qhKcoS7CH3~(7>p$yn( z#S&jgvM|`=Plh+Vg8#wby@dUUyQk`4QEHS zR%RpEt+$3R_)9Af8EOR;HTP-{-LYF~2i4X$Tio5Jmj*iiLe4-?2U%;1itgwRrD4PK za49$B-ueuZf;PTp=wiTi;GPhfanrgCZB1xR<14beSBsGYfE?o2z<=ZP5Ptd1siE=x zQNxq-?|>TS8pwsZ>5iv188L4bQ?wA$(9lZ}%fro|{26`}d&?h4P}_SA`15zzg!2XJ+wjHlZ++kSt6tsR#^Hz?QreWdsr#q@ z4CP-_eAw%pcG~^Uus+-x)*rkt>)+eH+^ID7pLk#PjWIw2lA4&GtL$=)ov~~4>UxTd z8mMkYR|r2m6t}hS54ZKLr^YP}M;h~m|CgaTQ`7KG{M?Q&?GM25#<+tU54J!M4|qhe zBkd+{6_js3y?yt0JRV>|=H!kW-uO)i)2=j>{n-Sq@yKRe^9oK2I3L_HGF-YsTFgeA z6)H!9a<4*HYvfHzw}oixpQGLl=K={ibV9)@pPdgnEr1Ae3*D~WpnWm>Sc0#LJ!3+q z$iP9+g)VhN-VA}hf_FPJIH9T~!Al!kb!5vi()f|7a;`L_Jycv-sAr_<(jUrI+iM_hbT6Vywh0cv^o$wZw^`w@ z#X!V8Y5XeB(zz&jW!}INBOq&RI}VP0W9D83YgT5CX1cUKTz2s9Y1KQzPOo>~8(#Fz z-}Kt=-gVF3FuHKTQ<-Cnk&M~p{+w`9+pb%gPc;ucG#MIOxWhBZ6AO}4@Dicb!o$5I zuK~ger|xSp23ZJ34%jkn@J0xI*ozRS|`tlD0@P zRo#oAx@X7dydFuZ63VfABF^}2o9?;shx<%T+P7@pI4AXt?mdP=d9Gqk>BSwIBg z{XYQh3O>`wK!xt_tX``rw+^uLCN{o=Jq-k_v4-+m!m8KFTJqMI&e;k4>)I63BYXiu z7t%P4>0M{=_Wb0m{jNg{aB6D&1Ph)khLL9D5wxXrkCbmiuV3N5OL85dvvQ*@E&%x@ znBqE_lpzP*RxHpLh#S$Z2i=jF;_yK6*|Pn`#^=zB@Cy)b2WTf|?J>E(nC>-3VwhT@ z?yRis*8a|xJPKZuZ^$u{`c6y8|AWBM0Nvr~JO~N$Vnd{#NmZdz1mslP3Y|WyDpq_D zJPyQHg$&2PzQgD8nY>;SS9+kBs&lV5Xy3KzPD4s`g8l-5B3adn?QhP3YGqs}G*|(D z0j+Ul2n?Y!5MRYxpXsbNavvb9C24Wor-=KTki&tzHb5p~k>Ai2JRBK7Z-zMEK;_b0 z{#G|W6D2CZC5~4Euv#_jrH=2Uw6M@U7iFe--&UMOTPVCo+#a6>(fF zz$c^*N(lq@G%UmeIZh+ZKGXPSy2{qmvm6qf`ATaPFm+cZLp%3L;!#|5mkz(hHmF?o zx@CDZAbD6~>uV$ODKp@`*utpnlYfjMj;CskxpQMINn&Sr|G}$P{|;BJ{x#fLT-esI zcgEMo_>gEF! zlrEKh!Qkdf1hgOP71;4ek|g&dy6M5MUMH9X>S&#IL&0NH`-%%*_~=G+Onc$7-m!01 zc=+1(j(1a+m)?DK$qQDu@f9`{_qq1^pmKHsuUqwKLT%Ld$c68dj;MFOJ;0Y5wz(TH zzelF~M_(j?58-@t(e8>0C;>ox17MY>C4@`7WQ&V}sM+q-_ZzB4yVcm;*&{+lcWRQC zCUEG3pavh4o1Ajl^V*yS%FWhRv-TKNypuu2JKunc>y^g#*Sjo78++&s7uKY=Hd@0> zW9oYaU!3;`B!8kYN<$A&3XR z!@39w9t1DfUCe+9xlnQKAn&+W251VM_6qGjd>!)xI z&gp$Kpt2o+$-T2hGr1m{w9+Jf0o&em;Y{b(i&D+>PX}@BEyBw25D{7{%Ea{=zj9N} zszS|yF>}8;GR~@lq2r3IMr0Wf*Xn9mh^oG-U-rm(mTkN_J%80c?Z4*)DLeLVZ5Pg` zYyR}35JXJrxJM=gj7Eq6eYN0Px9Q4SnWh;Y>x4sD(*Pr^n4tN4$9`q@4 zO=xbFX)&73?Z@B?jSPe~z70a_PwrSuG%Is7Hve4^lRTzM$(A91nO;#l!N%H}&0m zGe)p_yTS%@ILL~o^tM^mJG)S+aj81vO?(dAPIzX{(b@(ahv+rTs2P~70K zDN!GYl2h#;cNF0iJH0vGhX8W5lzZPX^tR+tpHa+v_8iD?fzA$wI|dd2vqTqL86U?m zRZxf&c?c$f z^!9G38=Mp(Z>P5XX)za#ia65~wBXNhOA0Yf3PgTDr;JDS9{?wCOi%#)dwdM@gAS(} zzd@GH%8kck`t>x!T>aY^=9*{=eR6-(HiglK0=4lFhQ-sS2@J&#ohZ&6dwh+ndkizQ zI1f>8cKw#pET^%N>51>kY;MAaHWZnf^9qq*fkzo~GLhSm|KiQcG8~aJb7C0ifXaOk z!xzuW(O`_PZBj7k1yCxQsOWeI?cZQ-bRd#9BHEoW5)Hi+^boHpL-*$RnqL=*8zFQ! zf%8P3gDz8GVj#9X1qN$TVEEq_)+eS-aKCdE%D>Mmo-W2348ehO&Mq?_0G&jhJPHiF zf)|^F^GHmPRSfVuF+T^`nlKmGixCOb#Ip}r$5zAt?qOT0mKMlGFTVa(YG5E&?WwJx zJR+TLYUnD6vgX;2`48^%BKKGk*XwvkCuvK;rJNN%Jdx$%vV{1syMJHz(rDWckN1xFz=_x&UI zt+Pb`Lor-W!*KmuV7N{JicfnE2MI>Jkq6?_uT%V0g<}gZG}3G$JoS@EX>=fSqaLk2r|f;ye}r&Rq2xiE(Ug;4 zBmXnos_oXo`Je0XtMQ!w`Rn9=20pU3w)xXfYoJ!a|L{M^L8Pk`YmyMVEnc014tUlF zHITT73zEc`C(uBS;x4$SGDsVepKMiYb^rPbzzTkZpeSn(@*$au2c9_g;)H`cf#)M1vzIAljFu#NG@$v8>3f{?c5u*`bURHYK%a|AijlQDD{Dc-Ox8;Ff!>c#e^$B zY`T~+f-*26Hr~KQ=hRFdL_r4YETl6Pm-M|P3Hayuw|5JCr_(pKSKJ`4LAS*INvHh=`hp&^Lg6LTB6Gj*80oPcbLh_v=&D2^h+>YSXmgX9LNbb;fMhQAB4MxZd+`f zRncQ+XnaO3rig&blq04DFV_7*@UAv)v?+9>+5^N?0dScW_zgip^eFBO)z*F>D?);1 zU)I*-?Lru=a0Vqf+z-Q_M1d1>fgK)2U(stxJ=CC}l2D=Sw=D5LOKV7P0((G%7%M$S zor35P7ni>SIsgO#!*H>l!*C=?gQaK+@{l*X{0U=fp=Lf7l@~hTi&M36PNn zFiw02-Ez3kV%UGM{Fj^<{K@3M?b>dn{zrXlYj^8e{`>m!-+(SeuZ0`CpbZ(Xz|D<3 zP)?o^Wbr`bC*28gVv$K!5TItkQ#g&eTbZ=2a|cYg^8EV=ggy)wLLrL2UKi8C+{W}{z4|0#?>Cfs zpM~D9FZ8Y;^Ct7x?@<2Tlp9jL50_ICvA8BWHeo_m83T(c`jA!NrzpKCHD}BT-eZ5} zi6byF(*UwA^DQw0`Nrito%YqWMhia1%X`|lM5&YpQl{1h5+7iA6}r=xp<}NgxCAuC zZ)L-fbxSfeevje;qnhe?O(KRbFE20_xGGd)i2(@(OWNRuqH9ms{H|wu3ol3z8<}RA z?=xj$us=Q-n0vyXT$rUXpjwSpLG|FdDTy@)Grctmm@1EZAO@aXVlE;zk}~JD;KG#S z8ix=89f&%*i)R|uk)j}jUJUsceAO%l4KKRY-8mh}>cj=4 zn+oySrjX5*3%P>Gd%qc^u`fggCdS|u3o>mf5>Ej%k7{)j{=X2? z1gh+!J$O6pcQE>NaNdIlfXdk8$T!%g3K@Wbc_y+q#P7tky} z?6rR%qF?gxq&;XCK7z(_aB$E$$46@k#l^6e7{7Wv1`4t+5uqlBJ?+ye~OxIcl!aaw`I>wS*%SYMcd}V?l%p z6hO5stsaIkNWdGBYxaYfz=evtMdfc-D_pHD@D{#*W+_M6gPl1bQGBF)RQMn?Y zOiai1mNz4(ttD*|T6~}SU7@hX|E|N|gaG-V0S`dy6Th~o>9fN3{LjPmzi@@xr`G>= zYK>-0|J!=L|NDCS-;1>ur~$rs92F43ym)ja@I^i?(C<7+5AS`f=vdOpm ziwCHNFCMNNzIcdo_~KEtLxS?+5%j|s4^|LgJWxY?v66}?s9*&p@r6`SUffenl;3T> zNLLiOit@r&5ntR-M||-RCGkaAOXNSl;Eu_oD89IlruZVCs`x_aigGOZ7b80P%(Z}N zs7rypZJ5@a+*;RPqwc|`6ZeDl!Ri}hn-Y2AZwH>h|KL1z@DV<6UcNYalM=XOC=~oS`T0`$>s~5{m@iomcD{!z<;L@c^7DoAcXFYe zbd&rg30*DM+go{=~95)5a+M#Qal#JO#Paxhin5MQ{`U%HT`8z z)Gz2G5sZ0bn>tZhkjszbxF}{`mg6Zap#7LzG1Nm8ONM-)!yC9ql#Q?4dr7Xq043yd6(iwX7gT*5zTTF2)AQ@%o$T2Gst{hC8dP@EzG|=D^CDQc^ zkNgB;9J<=vlx2}|FOH{XAshmF0G#GXL~5?BZF~mYC_$+OGAL0XDl7;$VeuDS>hWKR zpW>y=rpsT8BgTITe4SqG)q>`q?|9pS`e>L9hc^kJh2agc-cce@*yQ2ohT~W^J*ovy zL@aQqA!YasHN;L3zmblh3lPF||0yij#yDaQ-~w_nK&*;L_`oOZ&p>kHGWJecO5Fm* z{64SLw_GVP!+Z0(Rg-ec|D=f(T>i^nmw%F@9Xv~XXS zWA1D}uUy*MRtD@OtsA8w+}Zy6$J_H_Ej`|rtl2j_;hq<7`2m-E_1x#>`|ggoT#NT@ zPPrt#0DGZd&!?SOzFK)L&9o9=D^rm1n>;V?cY8i&t#Z&j$71`;_^FqD6|E!BvPa;B zS3LstKjmCqw(9Qc%kDm}`}ckzXRW&5I`5ie5vX9rzrE)3a1Ot-9ftewude1f!OJx7 zEJ=;0-^W(phmQNa(y6-c3Wxdfb&s6rPfP(TC|VEZ?*A$4@2*M!?ma2MeI|i_6O}vv z5ubDU{c}E8{Ac;@dpqj==`1_zp<(KZW0hdb4oU>0HymI2q}TsGdi{SqAGoKCzk~tY zgB+w!M|VPgt5iE)dar79hUkm2p`-ho;YuGa?!3v@#Ov0S@awg<}c+IXsHDEa)0m)`9`R zb{UwSF)b+dC*)C&6-7=o&nP5;n0@lhnNh5j@&D>u<$Ar0Ab&j>_mdNfbt^-rJk!9IuX z{jUk#^ZDj;CfH{M?^(fn&IJ3M2{v~oSm8Z^rwrG4a-?q+xoCg};biqc%biK~0JOQI zy@O5sPmb28EPINwjODtwYkRf*L9O1}+G;hMylQu-O$=^!5fjpC{h}o(M#&%HhN9pJ z&QtSe?6=$uH%L?GW&ms!6XremH(mCHPA9|z!Ok#hdoc)cA z75nqc$Yf&cJ54qm+lp%T;m~GNvk>p8Nr+=xL%wXP#cFD@PK`#!rMmn%qPjKwgY8gt z8_h3mqwzZ}XzPDvJeRw9sQ&+mmp-}m|9S(o{jmPecDHu6pY{K*s{gYabJoIKJ}B;j z%(`K zD5#g9Sg~8}PAH0fUy#2xrt`@HySgn>o?s4Z+?aswA;tVqcf#f)K zxk5lz0^4w{0_w=n;Er9Po=jRQ$kI2ce;T(iI?`=D+Xi_N^a#_MU{5%WM^asnuN@N< z3+VKB!*o9x>|lILe}q-nM4eLZNKz?xNvGYc)i)bWRs+7e+uGiK43!dAP%h!cf>0SU z0MSZPv#fj^K8QDlWjKH_mw?df3#~Cs1V|((y<>4$FP!*7W}zS!&Jw=0ed`RuUz$%M zX4zgCr8SX00s+KIeN)4dQUY5v!;6MQP%}0cmIF)ZjYQk2~ zVsrxBmwfnMSCO|CQzr+clk1?bXq-pTxjxp$sN(Y`zryb3&qIm~KHboqE`7`gCjDv> zG$!mv)Eou{T4%7GMZetaNTd|%kxLBmF5&qrz>VnlkkPeQA>Lz;$W9@5lPHdHMk4DW z^K2hD2Ge6yADO=PN0LbSIY>YBxycc&c+KmN#gX?vg@{~@aQAmI+3`FKc=Ldt$ztwl40 zU_fdkeB5d|n&}!Hyv!^X2962DAde%<1|9oG$?g8B$Yg5fxI(lm5BZGegKZ>QCoe71l z^%%RPJDnO=n7a`daUJ(Ubdj<*1<=d7V1EI*C|fGa1J55)%9c_nNYX9*H)Ov{Vagn* zyg-G@*K+V)@#)uR!N^?0_U`CRQkipzq5>jH;K~tJf%$|Bd~z|ii(8wEHh2)?l4h`~ zL^c(IP*B%(1$Go2aWw$D7Nu7 zPOdCDF2gzZWK3rgxiK~;=2%b?*@IBiLsg%eOf=U6t$X1b$)t@`87IjcY6~9*P-22s zrx0C~9FkQQFd|NX%_f4S&&`h94Jo-MEd?=DWe@C(57+Gm4qr(b5>v*XjtlkVA@ zGJAD7U}!)(?Y`>{pxNNOOwi+>A+Yn;>|LjK{1%?HUv*ErgFmR>*WJMx^vPbsc-riu z-5Yd|FHhS&c5&IeIPb$)VG1YR{_$zM`>u1s3F8d9a zX}@c~>GWAKi~)odMFODv__Eh|hvS23_b*@d2i?Ktpu^srpP%#*cE8j64al$mlAWHz z?4i|Vze58<2Oa7jpa6291y1U+-z7A4&jy`d@A6{MJwGe4x97hD7GR|9OI$U?=lL1V znNvaMy!Qu!Mtl&)%k1~J9eCbD6vFfdy*47IKj?Lj2Wm6ua&X?G$p!OeXPq~v-8Y@H z;|?}BM?k-K`<)W3QMZo`y3{!=Jal_WbH{~&vB94)!YtDYvhHivKKZRnRL9%HviG}! zLC&#F>!{L~E@9*!U%WGX7ei?5K>uH{_iMNhI4xmfN{r$j^bq9{? zR;||BZa&tnBgxrPEFT)5fp@t@x&Qz*0QlOFSHUXy!nX99OSEfpdnQ)K>U{QqT?0%4 zRw&5?{{Q#apGl5IYbS73bYHYQezz&lFzLxI>e({g#w+BRh9+y@&7C{@(s#NsF)gE5 zkSaGfUUtuZYoB&chJ!yYI)yUGH+2|8tP9;3gL=%*5_D8tz##xi(@0bW5FdyL;N<;I;yA zgP;n5BTZg-4r^0bF8xmU(_*BXp=b2dKJ9hdCw~C4y2wAf|08;820eAHvF$ii@G$#)60epEa|+5tbB-mnD6=ocw1Qn$A*J^Hbcdc@WDoKcA`dw#S}6C1J8W}0N(*K zBbYlJ=KuY*qTZvQ_%RT)Ij*Mm2+np{AHjFLl%TuK!bj>e`4w7B%_d$w-V?m#rNhT} z)B*f)?;c)>FtW5>{P)Z71WXnVbyFX5qh9d7;lCH>-H-*#T~XXOYl`#K!k`5Iwwt{C=0?GZCG96XrrEG)+Y(y~~Nt!XpI7$ww)ZRbG9$-#6h<%m zm3IHQ+b!ifB|yTH@KVV#)CSKB>PtD9E&-WBgv4sUE*E?;%yX|+Q-?u!8cAG)vMOb8 z8U7yn27p1ohz-(`k~^>G>>Tx@jK1kLbX}*e)gov%^gIHs&Yfy5-t3@d%W%iq9C7U! zSH|agu0`-+qz*%A0V5e-JH`D5UZjb?#JGfR_d9uBN}bXbX1X%$@ws6U<$wlsdu>qu zrP)Xf%X9@V(78#@3&Q7O>gj9*h%v4Lr4%|}K1~F}zxycfqp}+TsfnIUq2I3758gOU zwXu<_Kc%tKum5z_{@wZ1^py zXO^HS3U~Kgvgz9Bcs?d)buMUgcIO|lJm_<5TNJ!KzJ_CF>M$a$BGSaG^YhbA`;3k@{=D#8`}DHoC%ysMJN@0+ApIqpN6+4*zdt#@ ze0AE%c;6m$2Hkg^DjaI0%cZt_)$Vt8GKPr;^*=HPdU>2N5i*vjuZ8tQzJJ#lygffT zYrhLkhCe-SpPq&R^-~&^C7@oXe}N`+1^&BNou2xc7_n>+@0vbP5ZP8=b9BhJuiKZW zgZP+Yqu@A+_fi%elqI6d5@snZvGhG)5Of%O=*;7AG175)`U-6E_k}tBgqLko&GN6x zFxQ}MA?>z!{m!46HkJTa-58rF1Hh^E_l50A(;*KXrsEku z6y7}i+wsi*)}k+jHP3cr;2mB~X#z+|erCE8{u$Q$9*YPE64GRg=?#mvSfAQ9Ch!nG zA~cEhR&Zm;{Ya+vl{t=AF9n{ZVZsb)6s7d5md#B9!hWhKA~*yto|F3pt%f3%n^JRN z$Zh>E#54a3@f)K=<+Z{RHuX7Oiuru4Fr+ZCpvWeep~$o15R$~zso>kW!(3dWxFPK4 zFbhg-f-WXhZ+%1aJja#MFJd+u!5GWIj}S8zVGjZ>%%cbrWr;=mkL~fb6pUgQ0Z_OQhj5!vB!w!mF%9!4ZUOv7r0O0`^j}BQwb-&>l341AR z@+1u6!jc}RK5cd4|Q{f{y)7DB6 zpCVcW3UY{W9*l;FzU2Hg>SdIH7Qo8Oe2rnfG}jj9*qKR~SI{69OkgA8HLfB%@KlPq z`~qGvwMGoL=w*PJHDvMvki5_T9C5s|hJ2S~V)%XSV;Zr(CsZc5Xc2}F^NE1P!u!8! zm4CD=|5K~%SBI64$n6VaBb8o0@v5wc*FX#%=#u9v0pd16Yy{f;=Q1RHSR;vmi-x#RJy@bTxLU#_WyK>P}iBvQX7lO-Vj&gJHs0%T*naE3fZqt8I2 z@7@=9#L&m=Mm$uXONaHK0j~!!cX-K`On7&oA_U@j@D%a zrw}cQc&dEYLXPeUH!nDJ;jFLYO{*uPJ_W6tGt54Qk=kRPifm#!m`N3HVqD{jSRndt z@hnMrHACI zV))}~gdE&1MME1S@kimI2<)yjxyF)^Ccyuh?el1$ND+3YGs?tOsh}%I^b3*y4|D4Y zZ$5d(1F2HZDiU0ypW&vW?I6O6$>@t27V}P~mgHO>r+uO7J_`3GWw{js?hCf@#|qb1 zANw+LE6R-f$|wOtT-h)JWfHK2TYhSK9?yChQ8OaJlo-S>K=rj75U~~xNvLvpC?k$0 zRwmEM7aV#*WL%5u0mA&EM!ID2|60i1|0m&;|Cq|7k*YkVD~+ouhmWJ(%@^)9KUw7D z>4Ga*A>5p===?z}5OJUxqU>vf_T0c!q?_ZZ?TY<-wb01B7j`fuKIC9vU+Ok#GuKEL zKnH{n8yjE+l5(q64k3Uj1&Lt}YLjG^ zSCWs5sZp_Um{+yTLGR*7ED8g#$ z8eusggOLL#s^>f#CFjSE3d>@CGa=9r3yBfl_ay{C#R=>%KdUWf1+tL8;iXFTVKUx> z<+=1l;79Z!#s|hE3?K!(&*6@2(y;4jbbkqFoP}9muQ2(m9bCs^>>U?@(dj>AVac^a zbI`UTV`WaMk&mi^&iO6UP&e@AD}!iDFSF%6vC~%VKL6Ykmx@jZSd?xPqX`B)0W7DS zgw}z$$Hf)0Io7D|!Org9ex-UqsceqOkRROl5tE3C-9KdBj274b`u^w2$6wwD;MoW7 zL-pg&8|&qaStn*JQC+yg86?hZt0MiFd0et^Lm|~mU_|Vs72;Nx_&Z0;ae3Bx3B;Uv zSJ2Rn*^2E?Wv*W08m>H+JTw=U+n2J+2dMFx0_YZLo$^u#GZ^0(B5$;&#(C#5b)<8T z8^Jx&?HEzAq!hxQGc~L%p23d7M)^lyp(R|AV=;lz3t~ctE0LNrPzyDXac6VyuDbHD z3xzxci6syL~nQWCcU(u9~q0tqI|!^7kykBXu1X`vArd6OAQ6`d@GYN}&IL?|>D!)s9xLO0#9 z=I9jWJy|%U0ggk+UCSX_rHUY&veaRD#%E7lq7-0ke?x7BE>NV1f>$z87~y+MtBm=3 z$xe5Rw?9gKvz0CxqDFMYiguSNe=e0}8;Pa|x>TXvu4-JgWavKy8a1qi+FG}L3l7W^ z-89iTDKVE!el06Eul|yUy<;{Zq>uRKM1d1sylm+a<;q&NbHnjW;n$5mI^iU~JS#9c zp*@FN-zVJqDKhV(Iu3LcP18iRT6oM3G2b9BQZ$p2$P^~hFwz$?KXFnXB}MVyn7LOd zpV+z)OQw_+vmH;A`YUBRD#i1@(g%8-_b%W1&nQJD!aB{|l> z0AiMb2Cj{}OWZPOsrZd#!J3($4Ly_w+XT7Yzkos=;G z64Mfqk7?bipUUzuz)$vS1VeP?!?G<`et@gmY;O6@+?EvG+-c;KYLo}zl<@ZE${&V0 zRh$6E!^P*l|~oYyEsUzx#lE+ zh)G2|>l-43M?{djiVT-5-^#?T{AiYuKDlKA2`%%Vd~!o%Jfa(aJeR%G9HK!r*MPdh zAvQ=RCF>ONthskg%LT`0bBHH?A_7$4GG)nCOg9%GUVl`t##8Vjy$R5=ZEo2iA2LK} zKSgk*vr*p}YZ#rVfTle`M-=c zQ9&ymr8E>hD*db1i_P!qGVFaBKJ7|$+H*ZUuEpd%teb0d+BH+C`rRb@(>Tz zb0Hc2mt~uI#Vx$r40FzI<(Yk1Z4a$LL90{Glg%+Nkqy&$L?-J_xg9yiS`$V{7Y#Jw zjG7>(MOPb+!6M4?%F>f-cqiCn5nv|O|G>w|JY6c>^_RJh07XAvh80qw{X3)Vq(36# z&y1>Q`Wb(GNLh)0q(i|dGwYBZvwQI{PP$4$zjDo?dw05?xpO^ZCdSHBCX**L&q5^A zY)MFlOwY`;8_k?z-mU7_TJttcm}j0`W#N}5Ji=&*W#o`IYf=s>VZO1M?#iTs5xF#r zt7O^2H-JsMzW&dl_DluEnOjj3^aTfJISid|$C@0z(+iorq7`<=+G8M+;gmh8f) zX{;>E*tLBNjKD%o64qQNwfa^QwU!ja*OF`hj8u+TvV{U%@dI?`51B%fj1;h`fgxOL z^SNPFvzGszG_OV%J)+;rI#)l1LjrPLgea6^>C#z2;xD6SttQ$QB7-fYm46ECzSL9c z1F%0@L2+%Ddp0Yqnmma5TX5EdXl}~6D|tMf$O5Evv7qYgL-Gq z2}TX=l3?&~<`yH<4YIIe5bN}=`snOMGWWm;PNn>O%O{RAVogtBP=V!Gfj|%Q!?-t- z%UJu7F~J0mSLO{)bTLmm1m#Jw#3Gn*c^f$<<)M;o3`{?qzZsvFoO=6LSa%J-rsOtBagjvlJ^_>3rpsoZXVVJiY>GA949k~_PL*gYOjZq-Da)!7S;%YrQ9erSHYFgj8xg zhA<%FR&(G;#SEmHXO7IN8HzWIu&^HxNtm)QgO$a_(!#NS5ht>-1UIUMC8!MVKyvae zL>|&cTneTDTDCbg^eR)n7qqgrN)U3aO44#^+P8rs{#M49;{T8XTcV|psP7&*k?RGy zYokFbKZVDE`S+3H`GGwIC2%Od1W|fqaLX7B-_T~^mr*bnWlKdD^u?G5t2e7#)moW$ zjFLo5)|zZq8`WAQB3IcZl!7HbCRq1GjuehRxp0gMM*L#+hF8ZRn~gtlgU-aZr>?IK z#AT|IuNH)n>B~t!97Z*!)Vs5YoxM|ICS22X8{6*KHafO#+qP}nwr%^0I<{@w{_f{J z+o$_itW{NWj43+8K5ZkSQucN?%M=YMIJJLzO2pr<1}kYW}(6)|(b(pwFxs|AHfGr7}#4SU^S-rK@LfD3wiYJ>{=JT!P^p zihjFDT3#i?JzU=xb=hdA&E#MFtb|?j45bDbBhh-{OMJe7C(kzKO;8-Qc;GHrSm^Fo zx>4pZEaw9MhWbob4f0Dt`rtf@B5`M?-g0V`c3Wy&X=^HlI5Y zC-3HBucW$9kIUw@6ZxSS9}JFc!^~Tpk(>wY9o%b)e=QY}`69@D#sx3>7+WfNWc|Yx z$h*n6*Ms0EPx}~B_0zeG!*TDLz3reH6J|;xB$KOHL)7AHBthm&@DQEW{&B!+uZx&w zYE*zLF^dE&g3ZQR+y6x`ygXA6Fw$S6Pdr|^dx!822xRF0FHA_3?Pt)A1zCrW43_A8 z$HbghvL0>V#W~OVXV5-@;jKN*AAez%Jwr<9pNI!DkF6>bnZk;GO1iYy3G$$z>)8?h z`EpVpX=FXKG!;gc2!I&XF{^hMxQh7~nP3zmlI{{Rr+0$R0qx*!0+>CL+c={6AOH#0 zM!c-JKn=1dXgcxjDB$#s^MMF=@80zYb#0LR8$r)m0aBn!{4#I~WD`2BDOlFWr=ijX zQr{-5``<;PvY=Kz?tY=2?oO>o@;XZ^3d<`FzKs)UEyLy_N;wZ3VhzMEY&sd%%qdRN z&Jmz#;0xF|<$6Tlu41;;LVS&02>22jCawEnUWP42hfPjL;rdbWix+Q1Np+edvR`!| zN8cz#JyolN*tNO$uFl2>A4x?5Q_Wb*2O@S~xS>C{m@HM)aZD=jUU>)0AW-DN_Z$?P z8$@SG)l72tm_q=mD_o~fE{amjczRA;*(;{lK{dlT5oEI1N$M?-Qn+l3+*}mTiSSS0 z@)O&!l5~_W2HQYTlQ#6Bh#b-EUp^597kG+Sq|!`MPoJV;5{0hfMyfOnatayDNLb-= zMt16BdUc!9ey~ehqm2|;Lv$Ei@<0AWFXT4UX0HEHV}_@Z@oBG|CHHXUCWT2q(U$-2 z;hldtk{408yc;Yto~u#B6@2_NwG%kjS?VWwR@IXrGdLcEmc(~UN^wO5$XYZy95^;m z-wF3Y&@v?*he#2I_xd6CQItRdtm)$_douuxq!Yk z4>^lHhVcI26>pttaL(Y;@sJSV@7SAksqDtm=5y6Qfy76=VuF#tImRRHKE~#&BGX%z z_#d>7(078b(~vZ$H9RmPyT$o!=@1J#~=#FiKpX%%BjdNLo z4r_P`=+E1D!nB-~h8=93B2qrXQ29ua2FEYf4EXKuVPY|(I{n-C>ebSIJ->3`HBnIE zu4)2&Fo-jCtEHOAnU45`lH@~>R*Oh9rq*|r>y{dO8-Yf<}_dzaTsn<6_K zBn|q5<$TjqdV+fALNZ4$JvPccF=l zwMsQ1(;%U5t68S|VMqhL$xdYUFsbttR}kTkj_>C-21+b@;m=p9>U!}WYEghWvRK;P zhfNSm7)i2r4T}z=;n&yL_g!_~&Zo&|I=_zyaDq^k-#Z@rH8%V2|8oBVCckvP!x>4= z@e_=?^0aA58!DD60t`ANW9YUjay)8MZ_IO59?S1)lX^1Wx#`i$wR6v}5hWGdIZKWi zsKWm3Wvj*+2iBy<##fO@1WihKSo9f-zjQ35#wC>GO%O*q`W#gv<+RMqh-3YpR`u=n zJA#6`Lnp}Hsh`9eg3ps{8oCmfmXzY;i$0L*tK9{w?pd@}o|4g@S9ui0(eUC)uy3Tw zgbU%+%}vyH;UEL z?C*LkPY`YOG7Mzhb=e4K;`xPY;Dg^vCP=+@6v6xzQDEmwm72j|Ax2}DU6aS4ZYl~u zO_>Sm*7*}Jl9%v=ofdGe*tp4Ge|2qptA1hX#_6HEKBUr+{w>w*zjd8<^XFe?Rl`Xm z!-VZu91i@Vt$1w9HFm0v}lj>6H07ruiccjaGRE?PqH;f?kn~}lp z02@lb(Iv$`<)nt3O6NDv6|-1HmaI@p%Wgi9yen>X|y1b=lx2v@(czPDOo9zFY9%#8i|@ry*0m@iD}E9oqh$AF^b> zV34X3+T0_wQe`Kyosdh`kD7w55a_c(3W=ngaFH6c;xF<$SF@n`M!6H%$x%@A70`q6 z7s~APl*`rlPoLtC`OLEf(%dy$i>VK)!Wk@~;%VHZ_w%=yPNg8yeiDc#h@XXq=vT+n z0}at&zOqi?cnuOt^2x;H+JM*@ZK3DbpO~U7ajBRAbtX0SEeVAmrxj{wNzwfJWa@c} z)aVG^lv1{%5!J_~*h4m7XI7n7g!zZCA{(Wh@$hImvLYc(l9-EzQwb;NRtuz$cks>} zg7(kc{maM2|4U5hHd74=ctA<$;KPa9=72@~j2~cwAEz6lp$xoB8ih%?c^1Sy3t5cU zyP6xF@0%)L3A+U2o5DInhMKoD&Eg$aC{^}w5)AYUlUEkxDnx{R%iXri-TDUpVm70~ z&BV{jGxhAHgF&)wh}WPW^A`RTF8&XW{xm=pPuh>#gxp6jJJz>XvdR{#9i4Pr*+;B# z7|KuOoTNaHrb$voU#bqJ+^yWysbn4k9`!>Ccw(rpBNqBX=coHeEPgdcAk6YhG`pI8 zYn|#_^D2qzL#y$O{R7=3)&0PKbvRq99}>v0QoL)J6#(e0h(QLPM*pFNSuYctXK~(4 zMKnlVm97C?K&SFs+J-5AR%sB1EZ#DAH}U!xhVpwE;gY{9MJ)--tZFM7;5~5U##g6+ zz+To+qeTtTU}(6aTYxy;Sym=65`{Vrp5rsz=iNo#2B)@p0u?&60jS1smBmFhxlF>V z79X^Q2j%^~kSTpbV8^Ay!D+C;G*g{cgt}HdfSV`_9p2`VNQodrw4)2Zrn2Tw_2fZEcX?;=4Jf_@#YPDhkX<8x zC*K|ad8ZZP0V}8U5q2lP{ZE4WdYoK)3Z|1CSXz@31Q;!MCPn=~yliw7F#_l3#B6f$ z-(kj-e;#TkeN6E~tL=~eGJP!}sJa&55_Za=rXpFykFM1E#W7Afm9_)J|yuXizyhH^oxoXMD z846%B#}V8+voV^Ddyp8Ul7={FuE|fK6;^#olwFR&hC)EFA`tM_F&NS`&;_XMPqsH- zlz%|A4#NNO*W(&)q2<~uFAi0|>%WQmRAq#RjfLz5q#A+#bGXI=U}mNlp*zxIkrHm_ z<_UxKWg`Lm#rDvu#OuHdz2N=4#octG7#t4@XmWNB>>^5H(0GFKq& z4kGvs;IH-nkbS%nwWa`tC#HRF5fG)nz)Ui;eGgP8_%q*>n8ON6IKiMk7fDNQ11cZV z`@hJ}naJb@jl;IB+&z>A$%nzHO-LgN`GdV|UG9Wn7)Z z_caOzMKp>Y!lbk&LE@mdp*c)covfLgHqs&+HCNsLUCCR#nQ^}y=QaNeUn8vLk#gmQ zrZZb{9PfT7SXW(|w}op$y@$NVevk5VMlh500DMX6K@{od3qD%#NLZQ4MpB_K=01)i;CbiK> zq*h|VB=faH4Ob&z9SO}31`WIaq^soaaao%6Fer3)@LVRmW>6=CL#i|HMh^|gv6@F# z#72b|OfcWMJV-(bZL>=44;d?s(0XpB)R9d_izHIuWf*;$==@#L_cP7IbntfP44;fx zQg8D;Xrpf__aKP=E4X-Q7t6JHS9H*OfcXvW()9@aj)=M70}ik$^xe2@k^cdDnZt7l z6#SB}8wHiTIbk>!X^w`0T04lAc=KKy^v2zvFMX80u`-67{)QWOh0q zo#5SHmP_Gkt7d4BX6ZO#RuvKEy$$mB5;ydIX}Hhx-_*<=rr)FPErll){-p%-sq zxlOgD4J_8y)i!pPKQj3(C4q|EUq=jwkyH+2{G3{3B09rS`!1*>&L!UV+?~A1_Ra?% z=XV&fKSBq;5txzy!gBV_tGG4R{e`)gA#;NS;!PTb7{>1*KBAA{Ib3=}fpQ6a{&7BV zjz;D(&;*-6&g%nXT>V!mY z{xDGT{84kIZ(?DLsGHIS?-ySo`MFQvdka5XMZ9Ztm5af4QMPHbKj zYmCSLLNXEALsTZ#ff=Ww=^T~T@0&`wDswoiEGPE~i{V|Eh$lOJPf%!zGi3AnG0Jw$ z6r>VQ=}1bpo?1leQc6Ja^JV@Zr{lG9z-eKcBnMY*^Xq5&^zf(365h{{O)NRor7z{q zV#AHW^|qf6vcQe<3#uWZw`M@IDH#HPyI+SZPQJh0q;# z;+p9Nsmp#2>Txh~1Q6GG{2Hl?a%Q=m5H5cX9|j{PzhoDRtursC-m#sFSki7RN|3jq z#~IL2Hk|z#5>Ba9j$U1)ceVT%-*ybO_)-}Ac(~HkJY59qXueoyo9=`eVp+y?MX-9yE$=`5v9LC1)&eO5qAqMWvJEJlh`sVBPUyv%$mr9hj7 zO^2KFD2@RI`V3HmKnw%Xdf(7#vC~pAbt9NVpHmSPM6VM*PoUS5p?qSZm$G`eFDaUj~{O4GftC!hVH!Iiw6q~zeOIPkujzZ>@ z{%aiuFCe}69C{;EM9#B7Wz;H#KrW~!AepUTG0&*fHn1c*2K%Z6TB)wQtpI}AAd*G> z_t4vbDp@J0X&3Jv0jbl<61#bp&;TV4XjSk%Nv{^tm2#llFug7L;Jad#K#5$)vw>c_5)C$rQbHlE`^tts!hi{EoxCpsU z&5nTmzN5PaG^d`uz9ZDH3XQi#0{^UUNrJC)+e`UdE&mHlkxq0?8#1@r)QrtTD{^3r zq${(*ONRxJVcPYX5c3$E@3}HG3232V+E*}UC7>e!X!RTy8tkt!CE4&u_}hoHX+GX# z4Vl2p8|Soc4YPw2683tjsUNu(I6ZSVzkRoT!}S-7E3y`BW#B#lyj=N3ZVA2*RrZUr z4>fXa7+xvvu9O%Y`n&nPl=R1{!XG|}UpvyD_TibiF0T~>XSY@LT^!;mu?huTXEE&s3P7e3a8OnDutzDW_=0(7viHtfW zP~m%6W7$Sn+N{cOyz@IYE0LYJw!xeXv4P#PqzJHIUI+w&{dr0;ps-)LC|eL$%hIT^ zOF2Y=uRjkmdziw_h3T&JiQ9Y7jtNReq9Ad)iB?tVp)Zj*@r>VK;426}#O#a4V>S_K zV->niFoEi**y^&k!~cZ{)2GpBxx$Fi!&4LyIYPO zNX<-T3ndt7^aX?t=s~trFUn%iXbXs)>x4B4;g8DE!lErvKeY^FCDey%oY0qoHPwAsTjae?}3&xBr}dE~r;8qhvq-e++yt7$anCPj2+&-C3f5fxc~ zMM;q`*8#wxQ2+4uCK~4M3c{oSU{Q_f&N0&&zY=f9Z0ILgn}&u=+D>-Jw55ulp_i8@ z`E<~X_=}nI(&vNq)%+tWrAVN4-~YG5!fod|$2>{E0#qeC3AE&Zz+mmtfz(bJmB*+7 zMB~I}b@w+_^`{>ZKQy<#dQmcxCH&fn_K_q&D5%d6O$r9(`%9~O&W&lz^sl&F520@1 ze=%~?zZU(};zYT9nI=hbF7O;#lQ^$-+8C*TzU~D0UBx94l>(LPKRdx??ssNy zqhLSv@b7Gr#S3fvUUOpbxY^Ba7yp-<#fU^TI%$kP`$tuSMh7STD#b!{TD;{Dm6gw+ zo4_^2W2@51=1S|hLdx633}CiH_htq*oc4!0@&Tu;i@E+oorFHL0AJ2*&or516dhOE zF0rNYd2DgrpZEK|`w>sr10!l{`!a42gsc_6F5auQxxQ}rE6QE;Kbf%I)y@A`CVX?V z^4D80r~YnskfCAipZ%UqR_i}CQ=hz{NC+PY&)CcL$02g(`sqk<8%X~()LH*!VshdZ zIyrt1L7qiMlX%Q&M+t3ab7#Nqp;&tWF`2C&Gew-0MX?T#hE)ro){A)qiLbZBL#jqu z(ZLsM4d*H3FB2=A(Orwzj{-Foq6-8jL2Bg(&uD1UvTfk}YMz7+L#p*unsl(U9Wk{5;fftw%e&8Dxr4) zKboKIx|*nG5ToG~JGq{%!iSf^liyp}KzRgE>DSlSOrD(VbeD10`Ns_S9M}x#V;Idy zd)uSr|8Hc%eWw`Q!`*QsR3E5pl@G^-`{m%b3W$AseA{hB?Ok0y*MprJ?t$b~@vh3nSA zhw=L7xcaAny93u{E&K5?nGY~3qAB3_oqqL%Ylc`$|A~jaCh0v_b^{DU2&uJKLjS2N zr2J|#cm7OIMWY$n%lnJh07PP|e^5olH#_SvlLNzb+RKl`dJxR0XV%|;J@ANMgjB|U z){4yZEm-f(qmV6_9{k@|fIfqP`?81gy6-#(&%I%g6Xc_J^ESmGw#(OMu5`w5zi?AJ zi<=%U2L2}o*(_5n!BxNcW!zr3h-(Kwt#=olROpP`kETK27vZ|k+~W1#{u^WS?1B#C zALKDk&+E1z(*G1F@Eib~+7G+x#>rs|jnl^*+bwpKEq-NsjK#_%0Zg1bE1@MBG=e`H z6+8t%{m{3_jLQ)yggTEC3v>73-N4(Oc}&$sjY+#U-E>sputSj7rG)1!d}->s!)a8y z5VA5y2}kqZ&{k;s))g*nA&muDu)?#uTkQW5W(aX>jP%<(FGH&e%V^w|But_;KpI-Y z(wqaOw(((QNQ;$5qNWIP%=3WU(OVRp;i3oy1>fooLDL({(r7UFHqDoTr$yJu+nlaV_-wwB$tl_=WTUkxvQX9w_{t%ph7)*opf!LiqEU zM}&#P@(D5~ra=4)7{g=>J3}T149$~KR?2?Y$`8`CP(j7am>NLabJaE6&_hi&=(rn9 z6+=w~)fI&S<|-Z(qKM9qs6O~=SP-K)^JF>U>QF2OUnxD}FA5XlHTJRRI)%!8VDVxV zP`v!H5Venq{V|dLeTCP80LnAI2*Fgr!mWwges7pWj}Mp4v9@iih(oT+o7`{q^^O@EhUrgWc? zL9Zm!mmHetZ|(6K!-IJ8_qOoGJxK2(1BT_Owh!KEkB-}V?=~8}C-&l!;>(;ufSQB) zICEOI{v7?=J8e*$ei4+1X7PwZU^3QmV383R{;WaacG<*sO_4ou1&k zEv?~76hXrgi3+DGhV99@(W&9XCLNB{CHe?hl1+swEK|BVDa)sM+Jl@jyOZaW@_XlKlhj8*luk{eYF?SmH|n?fQd^L*69ggEhjYSgCSRC%C;3bZ)hRUlnJaXjOLK z22IUi)luOAZbHr5I}E^zRcJCf=B~Icj2vR^nh^5ThmMDJiScQK&~D zidXWhQ})P2s6zZi;Zs4-tQ5rZW~ON3{WeGy7DDA;guJ7K42NuRsG3F{S&>8mm&z*x zPtWtGJO?M4Bb|qMuUClgJNjWp`M`@qD&V$NF~?dLzpq7+Q{)%t>;r@wv1X>Voc)1Kigqj;ZN!W){-`4 zd|`nX=kysF6JYznqIv|HVu$1)PrQVc_yI>DxI$tUKu>M-RV5`VLOW(@s{_3L{m2-6N$I0WE@L3&JC zgwNZ&!!#^swduc=p3@68#BBF*{8cEszQ-DgQ&Ody`Pu8O(=!T`5M!E5Ew0cU(I^`v zh46n4qv7p_)gNCE#~lK=d09HG1NAHRs}UVabA64oTM-;wUI;BRm20CBjDyiJVq@P{R-E2^AA3&5qvYu_S(joTpS^E` z61m=VR4H~5Mr|y73}Lm30(f-;%rdkrjwMxRyzBBneiw_-E3kLXXdLvx^( zkshjK72{2)UAn^DylE9an(dK!r^ppt+<8ApB2`sfi&ms}AMVMP=I&cJzpJwoLP|=R z;=WSgly(=U{YMhGroxnGz}*5SP7tZtqLgNOsbTXQEBnu=wg^*;Lv45ve2Gs3lF#Xe!1zo zROUi$QYEgxj94Ax%Sy4mNvb{_trDbYQ#rIfQo6+6B*dR}6oIdA3b$fFw7j>|0Z6+8r4qiN#}H$(m|3Hl7Mxq&)5zl+QGo;BmhmJpZN+@`qnOTiI^& z8z8L0T1$^WBdqZ!3-D?D9#fXfD8-sqz!Q;Na*MxLU`YlcNjtIOz>o3pk18OvC`=@{ z3sXwHb!4o){Iqi-lb$35rH1(QO`O>4cB=19({^bSk5-Xoi)EArt9ZXqT-QzMfi4#2 z&+}R+g)y$)Rmqcckjj%9Z-$gce?}mJ{E<>{Hlj-Gu)WoQGA|Ev4Go-{Y)8d?RUV=) zgM(#HO*Yql=QRco!r1n+2k`lK`T&88{h5HjZ9v-HZk$TgD7Di3n2gydpC z@+5)FxmlUTVCm9>v>IyKk3?WDJI(v$)XSjBC?hMgG$bzNFz`vmzs}Q1}99Pn$tYFTY^pwBOLu`N(wCHufBjTo@sXE zc}Jc;G=w@X>JD^KSot5UI|bX+8&RlR5OIQ-(hF{P`A>)A_?~wWvaE^`l z@^7!0wA8b)i8#MtJ^q^dR%^s;fsFZQ3uPXMAb$$CauggRZ~oHqR?0r zrAroL)6+iQo;eWbiQC#KPm5Y1L6?}2s2NI*6jt6V_Ux%!R4hf|b_80_8zTE9vwi%F zD$SPy|8+2MM)MG;8mwa+#b2Z?ye_+P*U_R5*nckr11gl8ilrlE492fw;4PN?h;cqf zr%mVN9c4Z$H(`+rt4i|u3QGxvr_M`Mxn;Nd{_@GSxQ(edqR(gZfJ~Ac9qVGcXRD)C zZyx~2p-M8-O>mNHSue_-O@un1z#w_3o*#53hQ;k~z?#R7@ zA$yg#!E(!wJb zv@q^mw0_hVi*@t+TUN(fFnU`9DS> z0Bd1_$l~ol47;wtc)E4yeeI6Ckx#56j5L_t;w(>2lVU9Av;Te-tumKw@>zOkWF?}rGux3h)0KCkJRQcMmI~Mwh$z9y8ek(65|g47B0uhtsRHx~Spckv zV9pC+q^~jjAOji1$hS5YTBQ&yJP0}hd}FKy|1*-vsOJ&T{8xjLeUE3*y$mAq>p-c* zPhTsW4;+J6XX*)=v;o2VtJ?SJFr(Y$@ciSI^Z{$%z4IBjcviCVs_K*OpdS`lc^j=D|3G2>^ zT9wUo2}oa#;|E77E&|p`&dq)%*=L_=zY3}fHh47S)~~+$wYi@^erI=D`Pl48?{D8} z(5PF%slF0yjD>qtpfa>?FxEg`l2o?Q$w+{^Qt9$d%^iO}F7@5xS(9R$M!na4*1j7; zpRuN&p1eO4>wddWUAy!ze}6ci{i_djc6M`CytEMtWq&u5Cl9mrcj0A@a-6>}pQrb> z*0oZb(5FC>+f;`Vp87m%->7=ITI<>_Kc9LQ#qCB5Q4ISB`_HVn2x7m^5AGIeU|w-f z@Vs=JfY&xXJXCbG-)wwdCn(^5!_mRR`aR2f96*0{{hbo`{f6=ozr`F#nDs4~D-7(v zPl8^2EqKE%xvtpX82UyN8ks>^H0F6lq({Tu$_)C6R^MJ&BZr1Ko`U^?e}^e>M(peI zg36%iWs7rUI(X8Roc1>sEzty*@};c_ygH@~bH((3z*H4@y!r+%o4 z^4SdWjc5FsWoZ9$Xc$&!3p3k}4AWi&Bspv;x3oTN3eOg6+!-P6n*N!DMCf~~AxUb& z(*C!tpJxnUpJ*`OFRx3Yt%=G8-PZ^Noa6GL@=QM2|ArC?9*_>ML^{Ty*V|%_kZR$b zQ3gnyaspxbcncYz=tIJ+KC$sjx|t5I-cmNL_7Yj)-QjK!p89r~ovT{8hcP zeQh(|2|XYPmS2dnyYXbfQVo{Eo`!3Eb2*B~`J>rvFm^a zXSxJz>i{;+`}d^ecC$y(@_Uh{f>GpEeJ5;M*vxvLLCL+}O@`Q|t=$qZ3=4`zDt2KtnO!Y){Bpz3+R~Ubej9sW2Hd462kyU}F2nGSQ zA)(#v7_>W*VgB^uw)->=jjdewY2|6bet*1Ry1E`0zXs1=w6;Ike7~Am!c0xyR5Y ziN$Kdkryi^orN4aBOgzkw)9tBXWC(ZCfu%N2a7sr$QCIQUYb0}jqw0F*&`1?G=Y@- zA97EP%Re`!*5^+G!&sp%&JBV0+d*TLJP0i;W*jCe`_GucM)fFY(>JgJjcBqj+pM^W zr7n{fXyS$?no(lgoXCD7&_Ns|VsvhcuG#V1Zg_r*%)1;otO&Q9hEb;d%r|BX!3R~) z73#e?YO3xtou(X-t{nT!=8TT+{JJ(kt8(Bv+gY1>sCD)O<0@w5dx+!&B=Vv<1L@f^ zq~Qq$;bSddLlM@9sP| zQfKEmdQ;fe6j9a{AhzRsoT;AYuc_=$Hv4TlP@`0wiW|y~qw)$(JvzZ!|! zokgvl%aZir--HblbR3V4GGIn^1p`5v0h>mlm%Qz8-OrZ7`yhl`Ap<814DAi-XI@zx z$&7-d^k_sC5h4-uOM-(ZD8UPRXG=SuX3nU@HfjP@?R>AC{2$!xbzFY_p))e&=KZ)F zCM2;%Of8}}X>PY6I_k;=Ll>q&pyUVxLmAE{i15N{u>wtn{0H78=kK`rlI?{?j!eS_ zeiU99il)6(mOBJPGHKZ8`P=$kY}a~^#~sU6q(3(wHr5G(<|0k;9JX+D<{b_lRNRXuu061~#r7F^xk-LXO55P%=F1{=qdDKcHqOhx&^IslV zy^35hVHrd$xe%o@3P*nCsAJ&YlkkSPvLpe^K|<>bgUC{35o@?J4wajR!k-#nhxI?) z@`TC?Q1)EtG_rO3rKR0YgK*2|o=>Nx<|jn zk(LtsJlH(A1uD9{H@jTf1zxB%Th$+5Rz+Se@9g+S__oF6T~EKk7`Wr-hm7IUh{eZD zviv?DpxJ3CuG&^|8FyJ$8u24Sep0T!r_3;h)+qBA1UJb14sC(l0gKdXJDRrJytfV? zf3^gLriS^DytnQN6b|gnmYv73DX)Td*5(HbPXu_QNipyFX)6!fN~1bG@{RD*t*q;BNQ5T`jVH24Ob+y)+PdT4{;WN77NS_O6Euu;&31# zAPj6mj)E(wum{U*!)Tu4%jH72*nR%#tW%$ygFh*T4qFRZ>ya|Dc3XLNQ8(PVnD(0I z%hkoz*DEBsy6z^~sJ|?oJ}^QGxWQ>$d~0zB^hk3Ckj=$5(1#b@EJd5RvK(Vj<*ZRH z(`}h8K5!xl?NVd`OMC1UQ`@_3{%3Nu2`Xsna~AsL6{Ai*het6Lz{^^E-#eK;9v_*1 z4|tcteFxY+UZ%Cqzx-9Ys>=DwHQ$y%wzS+?dz_Ah(wqpU+2CW8xo4rkU7D9U?VSfw2Vh`QYyi%nim^WY@VbU4Hs zsV56bO{h?5SnbpaKdjIu`7! zHz(Z`Un+Zqn{pPoF#hg|MC`*{)`{VxcrJ+bWF+)T!Pd6+g^qS52h5%-RE^MkYqeN0 zjk!yP?#=C~U4JjH*BKfIylb3~6FlszOT4Di7u zrQ;$y*bT(3*ehPa)n2X*^xvvhJ?l+h*4@UL>Y^v7`X-dS%ExroztxVR z;~yyJQ@v1}l3q0fw99GWKrnA2Tae_@DG)8yc5xKjp)Xx|bOrS5VBt zv=?`Z5zO?~3Iwhd#O-UlAgU{VcvzsA#kLX`t?s9#RKIKJ{Xo*hJy?m}Nkp*3e5BIp zM_GO)VI8A6nAKvwob;Ljl>GR@*f~$8{`V06$ zA88Wm6>YrkyUnT_X{+0p_a}!-`J!{Y_llK-n6c6LEsK;h%MEJP+gorfFVu`fwVs!j z-D$s`MP%H}brs|r*mXrt?ajOpc}86lzN`x)FgwUx@fWiMUWU+!1zq=`Fr?HW#> zD@_YF;|9wpJ<`_GTq4L2v*IGOmOcTb6)ixi(=T=3oU7wS)9tSE{(pz|Bb;x=na%}p zy$n=oW^Dw#H~ZXYl6L_BY#caV3}lg}*c6YF4vg59G)IVM66+&stO)ABgfKhhE!#HP zTCE}79pXaPKW3^nn+-*^epcL0BP$Ts?DcN}>ES*WbyAwf6wFiCoyo8Fof8GBQP{S=TNQ#GR`d9nkwT8{WETge8R>a^sW|=gKhG=$m#qCAKBzuopGz-zkSR*oFIfHNUX#exk==)r6 zd(_;n)phRGvgU;(BsiSG&s;!qBh~Qm{Z2uMEqfOI55OcNMzm|KWbt% z`B%-6^d7HMv$W1fQMUgzL=f)r#zizL-bFaT2|ZNsH$R1dGbxT2H^{PLGbF@@fM0GN zKb-X>e~9uM2}W1SgA@V2LoIw5jFPJGf>`z&{)l=810;oLB|^$>C9tB_KeJiB{;;zY zzL)%b;+~!(oOlHYGF2q@oZD{ImVpSkTkD8WlWVEUbcCNYYsmJted6}`G}d_WR>6j; zvHl2Gd{$dyv$5ZxQW2Clid~uXyQqgYfM8o%L>V$D9C!9;C~Xy)&OM8*hHw>FhRj^PrGxi4{C@&q#_TMXN-3VSjUu zfX~Ku|9M)H@!llWxbW%Y?id{;C71zkdNV5dV8}Ng-qyHKvs8;bFNS4yA4aaj%n-v* z(kBC>dNLqBfa}ZnGU94ugw``VD6xG?H};oyuT_3Hp2MXHDF@b)=_KiVQY8y~$|k;S ze49kTEvBefD5Fi7-FsmzwvQ#o>|>{nB{D)vNLmsZB%~s$47;A9fxUyS|EN(Hb&Ucy zsS-*2$f-d4iCy~(5poAy1ny%Ey-0^vwcO3>PrF_lO7sRwKGQl3R*T zgS(5A{1-sxTEm3wlRZ4#I*JSTmH+-0e7GANAwn_z6}xGF>du!nlXxfLmTLoKcFQuP zFYK{{{upvkSZT=}e(U>`B7C_c8EH18^p6A#X5M&ma@U*4?{7XL>m!oI%G1iQJoL4x zJW6*J?s*gDH~knhgkwAM;YXn2vjx}7Y2f2uZ208&C&S>S4k+Of?C zfp7U~iDRmxnI;w@Y_%Y$L;>eY*PUAt;5AZ2Zk>W-lKm|QN<)v~Q~#KISUQS*$I8FV qAMiA>rS?re=?@eA|CMCiUiSC@^#1|_0sa1h0@V}Jc>sBU0R2A;pz?eG diff --git a/campcaster/src/tools/pear/src/XML_Serializer-0.15.0.tgz b/campcaster/src/tools/pear/src/XML_Serializer-0.15.0.tgz deleted file mode 100644 index 0e829a330fdde708da3ccdc88e6d48166fe5beed..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 17218 zcmV(;K-<3`iwFP!000003+#PsciTpi=zg`%@qg%Wd_pNh@%@q_Y2t~MjdzkbYb$ei zZpKFk1V9O665s%!W$h&Yc7MbDv>$F&bvMurG#;cLi4$TTrhtA_S6A1otE*R*{m!~_ z+aH#Te|xB>*X@qSWA<+hpKj(~Ht3HB1J>*IyMtkG(jWHV-MBx3@4M&WpOZhq%(M4y z7JNe|rt1mD9_We0qak61={`ThL z{9D$zj^ovFr?Yacu)VrowS714II+_aCj938m*U0E4)2>bK^zPp%pG~**o8R@3MIive2~1u^XkY*gOoD%&}sNMRB;c<8=rxvG#k<=CE1qlaA~Y`*+;P4!u&H=h@8a5nMiy2Sv1@m+ir8(i zW>>E7hE~i6c&k;R@1gt8wHLbV#*43mb+L%-z*Vi#{>cXbVf{l>mtdQO}&5h~(BdkbFq3*b|SaS$vb zaR zKoS8V8|N)_fk=FsC0KUr1&}Q85h7PwXv$jO%TnSt?P=Vjl{DbEa|;T8NoH6+<4ijpLv>iu#r?vPSGuL262Zu- z7G4x5O%m_IRd(7yVbEYRSVEo;M7>x54V^Xs2MxA#Mj(<;8%M+0csS@f!|{=QG#FXd z;Aq;Lj^@L`a6GpM^9E4>G!@u?j|1SbF~Hd|b{5zbeYr=jHJdqe$DZ56VSnaMr_OLV z9uKGe?${pKvM=EC$mgQJiyx>?Z`-Hc?e|9R*qYdb>8$VcC!?8lG_)2C!KFal( zEUV|fbB?N;iz?W*-S@C-XXs4(quFrMpF;OX-TrLc9Zv^?QFmV2{cGX@cj+G1{bc6$ zN8{PR=}!9tr$6e?2b1xrYt4H{qq5PXu=_tCH(znNb{8nR^S*0O2J_j}ww(UVv8?IQ zXgZ(TlhM3C8V-x0I7f~`pxg-yN29T0_eS&X)EWX5t~KcP=C;+Fb&uSmvPpR9J1(%p zJ40|ZnoN423l0W-*K+6mac?*o&ZkF?4FowEPKqJm=)X(f6YHpJ566ACJ8=8csWll5 z`va>73t%`N0yPx({rbgMcjK<8htJ@#C-Qj5HjQf+`XyA^9^X}}(wWq}$Bi%iZ zcq7}+-Pqw$gD3~k{2v#v9N)BJsKbNy0g)dZBOUpBaqL1Sc6B? zQExICTIJoZmvpy^t@ zdA~dD4tmaLHk!%aR69`Z@1&zD_Fy)rrtpak7WtLC2(Cm?%}mw|<$lIWR_x@#VRw4i z9jJD4u^F5g!k+KJc$w&NPq+0ty1iZu*02IB-F&YB7B_HJT<(SLGI%d6S@Qn~Me~HarYL(DEZd&=UQ7 z%k?7mfL*Y_w%4KSBT9og_miP(0=*K@ljSpyYw_HH$Nj$+bW848#l;I%R_I7b{Kz)vO z$_Z5bQ{)H|m=6P>b-;W}P<2yy@h@Ojn~HlY>jIPIS3wkcGjHL=w~Axicca)%T-V$I zrlEaLEIouU@1*kPFxf0Xx4qa9fMU_gwY|CLIti%24Z_fK+*br;l!A*ikePZ|#WCLj zaHY>p6pv^HTZzNZ!k0-O@7&u&n$^L_Mc@PsrNFjSGcBc>qr-ky0^AGLWc{U|Y5vV) z7QuS9!sk(f3uUrlD&-bPBKPH#r#^U23$0wstI%D!zGAP?+V+WTE%_C_`p80PrqYu8 zFvc~X)LYv8aJ>244RQa5`cGNYLB8Xp9d0ra>sc&-#}J=dcs?H)?Xg(IoN)6aa$$Br zpr%lK&UclT!19Ubz`S~H$Z5`U*go!1@#O&Q@o&gn*qdwXdSykydjbpjn%Krt`F!H0k;*54 zbt00I-4zmah;q+QIk@AlfC~0w!LXwkw~=sHX0f`)of)8(775q*ItYXH)isI;!p*^+ z!O5N@6=dHEq1;@1_H|~+oW+|+vV;O6@)r@th{@dM*d!-o7>ejK1tPi*)(Zz&4KWy} zCWXt6j3kadijB`?8w(hbVF-2r#=akaNAgn#A1Wk`iDEb!PRg7`2DEttGGY-0%9wJ! z#AHRcXw8!(7*n5%Er0kuug000=yZ4I-sz0x<=H7?Io?$hgy}W?a%n2mKbwpaKfv*w)Wmu?K zJUG2RurV$m(X?1|R+F<|1n5`5Jf}Bk(CzPi$#%N!=_B)~wpqhU@TZO?2Il<4M z00W05y$AU?|BJI7pe`)thOvj@%4fR12x}3A7SI{ry=0aRYWmhxa#Thmz3yS}QIwfK zvb@Cxi-NQR#|6d^T6}j^6V=~XtAI6MTcFD|**9y9?C@w&a~4S3v&46mJz!9#)mQtn zNFodc2t*e#%1b~pGI?lNLWzwivLa~;dVNQ8SOAz>Uj>4bM@_mi*w|`a>*^|WuPjBk z-*j(s^ihru`w!xWP-7bY&>K#sY(G`dxRwON6M*R<5P#@Rx@`aTi?5jUO(MH< z);21tb`TOzL#OmX5@iAUb)s%f5U=#0uQk98Z)IBWnWVwrLNexlvEsPe(b~ z!E}rsemYVjq@hVy4VmL$CBaCyA7Q_o;Cj8hd;I}Mn44&BU1hY7i(qzpP(UOyK-r)h zEbSky`0dpKjBEJck4_N3_1$>;H9Dw9*@KAbBBJ<1e>|NY<6=yebJEzKaVr@^e`SQK zANYryQz-~?+@)vvh@{o^>YWFS+w}=eHuc)<2oBsfvmUcUoY`(_DCUSq4oGZ*eWK1ACYR?1AWJPa$?9-YGqvhE-DA4J6J z=v0|Kt!ekGwNLTMO>$7IRtt0xVUKh1LAYQ-%Z_og3S-B~5trHvGk1=DZdGe1pEnfE z5%3GX*~JzC7&IY|QFc@%tKyB^_qkS`)I3C;_WkwoX z;guVoi*}k>w-x`K_Jih&KH^M!V8PYG9Q?N&bKHBS8$5(M5!Wqcc;M1I_B8HK; z(jh^=Ik#9^zI8=RbZa!^W6N1-booQM8Fn$|#WCh3lY7!p!Xr-Pk*Tx2M>+qc&*34b zrVgz5j*OkYdmrWJ|5$I-9WgeU3@6=wuRns{z22lhVR!F%_f$R?uU@>$n*2}q4h_#! zS_UXFfUIx1DjB0UA#`cW(dO<{+6&V+$sC7yPRDbgpdxOtz0{Xaf`xB*r)R-h%q7W4 zp%nl1y#;!Y-~imstThoCH@%+10wc|M|Ec0DZ(OD&8tn8;6k&~d5YXR^nH4tJK})M- zgM4%v;x8;D+#rpl)WPTYQw1qF#y2NiIfvFyspT_X$g zE4;#{?(^@Pxq3k)wrs8a{2V)Oi3RxYCPm)ilxKf^WmM+sp?GzGvt^9 zkRX;%4i8`AyEry9h7ytHi68TWzd#56GVtf#)tY;u4+;j9AR_CPnJ1g;&??F)&(0iG zgaRlY02lCw*bJa<)Sw=PjQK{0q}ivcr9-a98L((*2idk4EuTIPr+%2n%>SkDu%n!3 z*}jho{?B^A?1BFey1niI&w{fao&;z2Hpbmk{G7ndN^XRa2ss{w&jox)|2l#7dxm9C zI`~Ue?%*5v02~wqYL?>%TvlbXl+48x6*j$!OR`jc_#Dt^Y@P zPW}WY;M2X%XP?13{*0aTi5HGS+CrlUw`<|}NZbsme6uhd(cyRB8 z6r|)_p}>r@xP|^X=oGd+zl$U*mIX2G8b#O|4gyZAT@*2%efsm{$a7cm@iX{_cQNUljnJ-B;jb4;q zC1pho#mjWcKE?iZCcZBxH8UXLF*#LRI6O=BWCTU8;?4KdYNw}!dUnA6^>pvalV`Z| zkZB8uHUYzV0joJd$j_40L1_-2G)`8bd)5%&RR%CrNxS4J$buc8i`>Bx5elqhH$$p7?k_l7d2%Ky`!3{n1%hXW`%7^3_i z@AUu2d5YveN?|%T#C@$e^RGDtr{37a_o}#MQwpT^v~)#YrbuFp|H9(>uA*=YAy`BF zsYp)*UoFX{@xu!Fpb5LYI`JQ*Mv%w?)&}as@XkWTz|!bdp8NB*t9jV&+5V}`{|(tS z>h@7({|!gn{_Bm${Sop13H-qxaMZg;J{kT`s;8KJJlS!>6Q8ALoq#7}aG~VsR7qri zn**moE=NZq$W@RwiHFhXki`tQlYNokjE9<^rJ*d_$N~06lg*i}uVQJCe(xQ>R zLGDjqO89>x5g6)@L%Gaops)RFJgA}6nFHR-45o(VI4@j#k-}GPWHn@TLPM$3_~GKK z!)fE8L{vuqCIR)e2({Tq$#r@D`t_^VmoHwPXFB7XFXa=Zn{fq0*9+AeXr+84pz4}k zvJ;YpI1id3rG7za3Pk7ODTn7#=G54)8Ay*nBX2a`z`_y5NO_~(H}ynEEA%>Gk$ z0J$F!Lsx@26)ZO0UglDdq%k(x)HYOs0)f(GHps;>4?_#%;&~*FJZ#T*1GRh%n7Kvl z2nI_pj(Ks9g25idt(a=8k7F!uWh(neT_P8KuSI%&AM3h5`z-U<8-%E|hV}Py9QW5(}3PQF_MF z`ys2f^wKa3I00B%+=p;;bJI@Ki~|NTHM}J#2aPAEXHN{hs~|j4LEyDohQjM`L9G?_ z-=V7QD{pSBP6H^b-^f)en{*=~V6w6XCxFt$p!89*m>E~tT>*^7u_tpUL*MLRSwNpP z&~V35JokA>?8iNdm&lR*cj7t=y#1ivZa>CwHY3gabD)y@J^6cp8GRIvkDWgMyLjsA z|7kkc&HJd@|LG0K$^H)p{xbME*!h1Rlq9w3hpIftk$ZVbt|d!g~C z{sI;SJS!c1q0;bmzFttU0M8S~7GPI|zlyE@k0So=zAb~oD&n-9aM*M0S7e%fS)zwf z-RuU`CSeO0gTT0&u5PqwfpRiNuJP?H4~}bSpItF8=_F~N(X_-48aC*&N(dQ!ggJV0 zTHG^C57p(j$3;jE8UKw!>r~)h01&lC_UdO1xx#5Vjj?Lfx zhzp&dALGz>e$n5`Q&<1b-)dC9k1GG)pf}3y|4+KR^FNRBWb}VLucO3!2|7sB^1|?d z7MTg=Xfdj(g#l=}!s+U9Ur7Y6Un?Tul%f0 z-g;o$8W3zN_n)kmaRCZ}l|Q80sIVV&F8|oB*C(}{jSuK@RGQz!WKgR8Qtm-0jg4g- zgY>SBXHc!I3svTVh03AHHvS}uPD~GjC8d&9o{-n_Hzt`M=h;sF_cu}is^tHum-YXR zC*$4z-=jRgi2R3j3sQ#e4oP(Yx@AbY_Ceg#vy<14A+M{QgjpvU@1?2Omu1JF8_JCV zsyncGDL$0sFy;D*4|XPBQlY zs6T=7yXWDb+WUW)8`NSi0vj(zWiOOlqhgBm(NcYEvyb;{k=Yx|>KZay-D0b;yN1R2 z^;}iPG!=JbS;jUMe(KX)haMLw!W)bhZCgxH$B7-8n);B0;T9cu4sZXk(*df3{{tJo z^Wx$K`~LZte|i4z=M30SEvcwH_1w=}rbJ=fLy+?|G?ct34Vf1u?d|~#bvdq`&wKaW z=d+3Y=l2A=&ZheSRq}sK`M(tT-|r44yZE0+c|Jz}|4X0yjFY(JB=7r@-*9gEbYpDV z$4od)t@gHgGT zgXY8RHsHtKhVLR5uf*zwEYKP2~S~ z@=}Hky#ST_|AP_b|Ll(jlWv#%|Ck2mK8Ck@DxR|ZpFHGOyH_Q>nB%cb{C4{RGIq+G zog1aCu934-mrLB(#SpjBeiD?X{g9uzmSMZep_!&+=}jZgZX(Zae!e>uQ*|oFoIj`5 zsTd_^P6{U|1r!^S_zK!FilO;fi2^YQ#miso07zJEm_@}D%dD1J}^`MtkM?0~e? z`Q^Fp2aNo0XDVUfe}V~R4@N}c1NkC70(x`LUE4wJ_V(qQf@I^_bTh;7RIWwN^Uj8akIFJTn(y|t`>E+m@-wrM^fFX z_4oNy=>JMi*ysK&6y7EPs6ziA^@rsD8;*yg$+%1U|FE~)|9h0DI{wG;=5#S`EN{+5 zRbLtl`la`oyq_Xv0I6H)rOs59ZfjQ~hN6c&n4|2vSR&a#He3n$FK3a>6M#RA&YG;P zDI&nz=?lBYO9wC^G(yuj%RqV3!9vxwm;Y#-eQP1O>_03(qF+++Dh$>ua=o55{%JMN za5ISg=W}-9TFa9TeKpoY=b-1DHYiNxOzL(V0teHpqO(c(EZIBvHnC++P=~8*vfnt9 z=Xmioi1UJad}z^GYLskvJ0hr(Xb&h<1p0z2@{PA>7yv#FPKzQ3QBPxS;tkN`G;6j% zN(u~MaR48q(W8_IYFbMT0n&vG(h`Zki|mz#ir&WdVOmYZWK-xdd~h2_Vl|0kxL(7N zvT+NSmx64BkK5TWY^yA4E17lVB{t0Se7zt$d~t)>Hty==~QD6YYI`v!7a?yDP-Z#FEs*|&~_@=gu5|auW+vgj*Uc`5G zMSBP4m@g`G%o?mMJ0>OWTQ`cVD>rqfCYqLPL7KdEa=a&Fmt8-}$C@RIAa6JuMV8z0 z#3oaODwnQ%F|)4lPI#P0Ok8orv8=2vap7E29TpHG5`rW~>Hy-f&e+KaCfkwQ0)Tb=| zLp%TB`SZovMRlFnE)s()E(t;=$!$GTdIfxHrE#;NfvX_A#R@={{H55tX5ytntNeSk zo+U*D@X^zX3x(3*(hav+HBeOF{Mw=OR~JwBPS9C;M(hiXr8B|cPEY~Cd%jOP^otkh zBqdJpHgSG~5WH*f>w`p7&@S~vNJmra>E6HS&K>>&YRVTdX#Ij880x+0(e-cIF1{^W zk#88SAfgq^>lEM2U0g@IJU6XC^JNxk`P-DZz3Kw)wV7B5_XHvb@CSg*QhYel+9wdJpc929d=!;*zwqtCHGbiz zzWhJOl#lK}$_{=lVC$O?1+6{p6biOsKt%=hI6Xk-Ojg`hTu{``QJy z=YOx^RVQ;yBKH43d-zo@;f^}%S+~1(%F4{0qqbVz@o0^n-wb+x_ zSqRs0Sl0Ia!d^=h~0N~UHl8#A>;_rNhPZbs^kuft=+`0o2>jK_uI?apf8 z)-RpS*<8+~fe7}xyJjw_^6R{2E-iFlsSxCi3u4OnKq);!0vWFWB+gw#SZfY?kq@=n zZFzhX_2Nd0HNwVSl3OX&em&ln^Lg?qEUAONog&EwI3^P9i?qP zSPYQh%E@K4T6i|dB%HLvGi<)qZOJB--hWnvw;2%>59CGs2nb@uN+yt5yMe~s_aJleqrBmT6Bc&Xl66JsuBQa};%=q19}Gu5^mz~v=H@^} z>jfSn+^@tZ6F8(ZhepidKXq~E(@OXiV-CT49JFnEn!PZRw(x)kKaH9i6x*iJO>Vek z$%U74m4o`OS%LDPl-w+~I9e%;NU{`k_=!!<5$s1wzz8_dyi5 z!zgOBc$^m>;bUvn0Km3NwJ;8^tqA7B^~I{-N3^mSJU*F)n);n>s>G3rAm%duD%yGO z3v`A5dyO=B!Qht6@bJOBq0gjORWNUhiBpiwJNwr+N6SR(h(5h zR4WmD1H<^BGPM-RPGOP3nz{~MSYGbJ1uZ4Yp%vC2U0RAz?;W6z{0OjhsVU5fk*uD@Lrxj zQe!_c0EGRO-?_zxMI5&3`RO4b`!ZPFhThe6%=YaA);l_y9QM22K3znMQ2#sSXZR%` zBY7>hjnFqh+pBA`bWwPSE6iBG-IZbj;YDwcj|Wm!$bL#35VJK;5J4&R$X1m{tb`|m zdiv(&m*?NTIp-&+y@+KRv))_Y0@MG2&Vaghu)eyc$~Qr{a1Mc%+`}7phF`02_7fA< z-_6ZUV*H6Qbo!UwemnjUw`-EdPweHK+#-(W(Ak~PwO#K$o|3U)nhj{80pc0AwNK-T z1EsNG7UQX8uWXDhwjv_~Ru{H}y^2;ckckeZeuO8HZ(Pc%vIJxj)B;LxxpW;5EZ@a# zcHj>}XU|EYi;hb)y2CgK77^)nkG2B%@ivg~FP&qi3$50B)@u)j3>NCJ)9ZKoQ`Q?F zk4DEM;ARLjJO8j^&vK^$DYpvW+Fe>c5WT$5Dt9ChOQs5D{zzf$EfmMO)RK)&k=_dB z^UZNc@I(T6g#0v(Cck{k34B*H$*{n}M9WF%b z$)bUDsM+?FH{Y=78aUddJtnS!Ev>KtB8?c7w-nTJpzWwcc+lV%Uwc`5sf3AvU9@eWdhB?8dqkf|dY~v%n*Ou_ZPBm-0Qe zWtmI}G7XY4Gx20il>dpFZai$0j5f#d5UJJzb5~lJ!-S+P&k{w=dVc28d2AtCgVqg3 zFv?}jJkJ$A5caX!1Pwn0J)+EG)F|Kr^qB;>AoQ+01R{?TFf-fIAic3*ZVdVpZxHX_ z%??6dy(===JC3S7AYYVWvP~sI_A{kXf=;Y{RXqX1@j0A<62=YBS8IY?_!R`g6bAuK zi|5;mwIfw8&Dq@I)9(asvW~I4bl&;6FnK->(FP0Qmev{|NZDUVQpM!+#F&!ANH+-H zFFS1a^gW8rHYpO*PN>dYBh3(}`ymEPpWBj@nuTfM9x?}q#Jt?<*Ki;Ue_`3UK+);^ z9!8zK#z-JOWzS?T##d@`Gr5045kr|0H8wzs?*eGHOvUlYJ1iquFiH3dZ$KH0xu3GD z18VgH%oN**$~sY2g4&75%Vy|Ar$AhM#A2>Beo@w=xbj)UUwMys!L~3~(%ZGmy2z#h z5MB7|#lnm^SwRGxc*1^?fj;$m%?e1-Yg1nXm+&1aMTkp{C_W%_r_`;C-T=c!UmT_u zE9;n++Vd#eaWO_wd(Z=FWWXVM>@+~i`c*Txs;b4M`%(xL1P7^D*88TeZIK12ylc)6K`cmA zZwW^JhR$aBWb1dz>~kgoQW1M>wc7_ufLp3zL@D%Tz^p=d1q@wg2siqt))GVD9N#Y6HN!NgZ9ixQ>CELt+57Sc{=`4Or;h)pZAc&oT@VAHBmL95`xsQ%I# zs>>3yU9bv99IaO?6f2TIc(5lI=VVTJ{Ak=d^w|EtzKC2m(L0WhLA4iSdXa*+fADh| zgjv(55<9+N7IId_}Wz97xlGC&&<30c8o+2G0|vCz50rr07UL&EdpLzY>6IAWT%Sv6YBnB z&EswP6`eYUN~KJ4|4RCl&KXK_64P9Zm*e5-cuNHuPpb5lhzw51qZn;T5V6)1xnR*X z>tc9b!peF6slv{)7i?B`o>UN=sg&@u*Wd8QjgI^lAyJsB(g)A2MQWrh54)byFdYT4 zGUF&xFTsI`DCOz##Q{EP>uQFVLV(2wD)C7IWfZ&SzU-Nx(2mJ^s!UMWV7&7LWmmwz zSMjyh1*ik=m5U}3e1D;Q*32dOP266Z?E(k3kV*v19lt<;V^E+KO?|Cn!Ren}>Jdk# z-t`jbE&@tb!^G6lriQwBl|?jTtMzQ**~xpn$8L$gmmbPc#R15K+m#rS<@qFA9Qy!g=l*OJ&H%Gqh>;zdWPej`6 z=jTE++(c(d^YfB{B&pQ}UVxEhTpP8A<_Z>;CLcX$8P3=i42M7wlVBLoX47XFDh<@v z^2;aR{wDVRcz`Ck3GtR3q+E(J;hXB@+ml%o6_n-OZ5yLZ8N5W=n`)G$b)KQLgVjJf zN)_^cq|$E@hg3er8UACy8}5?>En4Z2L7d~Z#7BTeo%UKPaaLh9N|{wPIU1N%P{gE+ z)G6KWiqP3y3W)7y`aji~pJzC;AXvCCSN!}x4tq_Vv=|=Gk+~>*P))qWI&=$hrEOxg zvQi?CI5cTcu6>m>SP-bMvgUQv*cdT_LR$9f81C zf*fBkDxbW7Ze$yP$yniU3pJ@sz0^X=pyNrV&mWr~mJ2^RZnjIB__6!egekQ|uM%An z8#!gT+5B8Xs=Di#bqMK$roGbKY!{PAI`8>f97I0%1rw1Y3mR+5(n?xu62Q&;vN6(W z7DesT{Fmn`23ko^tt>?u&U%}WtmY}g2S+3@%|CrasJ?Pz?%CGw{xx7>LyW&tFtItx zHRPjDveYAqc+H|k@qE5blJyj^y8J4uayKdi%5*H9p>NCl`{~opHIQxyzTK>a%qVos z>Wp}{_7)DqltmjM6gTwV=8u2|`mA5EX0g7^G9-kt-3#lAw1j zMi)p@G4Z)d+Qz4N&(z#!x(c*&^~S_6Mu%^@s#%t^Cbe>bYk1uHuNZN|^L0?bF*2(b zMypWlG;WY$E)w{H@e=D<6nini=2R|xzUn^Z=-htgKf4sPm$&{EHBOQO<0GX(5cWjQ zNb`=agdQKGnwQyOep{>>DCP_e<;TjlimV$AEwvl_Jl_%qQf>lHxw)gGxCqT+uCgUN zd1Pe)Qa95}@LUVmT3ZEpCR{7DRjVljmMbxx0mjh8&xMHBZ53q#K0_p6tPRhh%pKtr zL_=H4d}72JR%?-d!Gn7-jZGB5ti^cZH4Vp8if5KbDuC%9@=<=`E?2SkCOdwL2qK52 z66TW^q%w>rr?TUdCg9<~V*(!JOhObDQpqO(vggCpK;aTHNc*N8^nzI?Q>oVU8K_-$ zu{DASP{HIgj<365Np05Ty5Q;?)vuvCsZZU$Oy+1oll*|M6I6#2n>dUJVtxy}h0K+7 zDiSyAS+@{L8Q|d;CZYj7rm&w@uK6NV8N#&;uY}AG0fyzi0Hw^GUTErO;5CF-R(pxu z55VzbVa$Ej%)(JYiUk`Ng2`}zq|S}=v~N~eXj!MA7S5f{pP`bG4b$jSy3R53eB|fb zHZ_*r0WFzFvk!3k+;&WQ21TF@LKRAbPF>8xpQY-w>A zYzHZHtLhcoD&>YpwTY##%0K=w=cQY&49?|Z{LWixZ8%I zhHu46EQXU%Xxd~`s@DYv*AFJkfI0@bic$H0amnaAm0cTJuE+aCcL=?0`53AoLo}5@ zW*`mRpO!H)#!%O1{4m66fw@N9uNX=*Q<0A$;TH8)JRL@*T|b8L7AdjXX`%tkCt2Bg z;gyOcW#K+fror4!gnm+`NW&-yoHo2Jck~w_EIoTvB4V{Ja$-n74??@EfIWO$fjfc+ zv4h5yB>D2mF#@2Sfua7z35x^SXgP9gDLW>z=4{L8MA|k%FFrZB1_P{+O@&PvWLCLn zt)wlZ&#fq%Z_#6B5E>?H2)N7ymCMt^Lqo*N{fV%96<EgADDf*;VR5{`h7Fa)T_`^lFJ)qx7y7tc z+_|7)O!~KZ5gxiUAiBSW^$pFA!;5dSwf9Y+JmdM5=fut0 zlz>dvz?-buA~SH|`uiF>5B}Ic$iq?+kD0b#4Qz>aW_JClXgBTkXn4;S$df>3on;aB z#IO+a0de}7QA04a-l?+i5Y3V&8<$T0v5iykecb?=2iV@+d}EN4Qo}qPql%{Fln-NQx_%|SRk#w0v+giLdkil)l!ygORmg(9IT>z7e;Z_ zTrdPH<38Xb?ND!{rOS>g{1`*a?gZ5f#Z?}0M-8XO%&+>^irsTxkNN(O>>WCH>!bYskKwrAAF*Dy-yIBl{LQ`AO2Yl8~HT=#6EsY(ToF)_59ZYC>jXjU$=IIFo}{sN8ANU|9Bm zG^HLc>4Zz=Gk%CX+H3S7Uk5k5SCMQPuSUchm(vV#BC#=D2qDsLe^BqX5E;y<6_NWC z*$OpAe3tUMeMx8QIG0_f87p}%%XBCwNCrGHalQKwMZJ5vU69(UcekLDn!MzyKs@ZD zmfY;VJ`ExC=l4MrdC01>$*Z*a1uUdF^YOxv^v38Y*%0|jx$K^VE&SJaT?c3U<{F4Q zg;6^0Q98n;c2r`cB;Pz{pPCXo&1_%9C>^vYpN;QExKIRDh@5vsEm}%Xv604!si2z3 zzpBw?vXDZ|@h0|1Fz@^ET}UgRmaVCvl4sBt5R2*B{9ejx8fuzuhz=vVsJ5v#vC%!v z$awMo$;{ovcp<=#gSX0s<$$@4PK5n7Q=_I*3R+-RB%F%m+HWPNG$yVAwE@3}BCk75 zAn6|>o{+~ge#XjY4nrZ0g!^lE#&i*DrnaUJ6i<7J5Cr>NTCjN zr9_-O82<~ZqPBS2Ad%WQ%P0sZ9V}E(Bbs4(?~1)?vp-w!-nqV7od1qej9%b+yG;{C z9p59x>PepI3J`+wAxRe5o*E${E8wU%V}BXad#wEUipuvipCzAbGEcL4@--fu%as2# zvxEL|8OzOU*nD1feDwU;I&Hl!>s z&RCA{&~+h%A*k9BeB+j%XjLwrsgo?*kh{D%b-C=DhPPoyhD_zfiOOY1oDK~=v3){x z%#kZHiHUr-rJ2g1(DUd^>QlZG3C>N~!A16Kp-3jFuCJ9$^<|w2+Ely4F-NiUrD4>W zJkH8RY+jVy+9G09guYPLdFD>+^4#Q<2A%E<*K?CgU=X+R!nf))-ubl8HG5w2P9joW zJn+S7;MF|vDV6c`$*E^W&8T4R)R1wSleyTV$W8fb4P;I# z^c*j-;WzJ4gbO#zB4L$j%tqr#YO3rC($6N4F3umFlDchY*C!mybm0Wi2@_v#~B*{d03rc*bxg$dk>*5sFL@s)! zt(AnOzic{d?MkfTtkUa@YG_hyvSrdJ_H3u6nJlz^@vEsXs#Vy26k8&y7tL3ma#V;V z;#meXGCaDECEs9OquwSz@@?~Cl&o>>RulpO6$)XH->N{UOj0h!Ta=*O zDalT*I3IBtSovhT#i5bdIz7UI)b#iq6f54#$C;qqXt)*Tp4}xP-z6e9Cxec5Y02-J zPrDd}_nxNQfWuvi@@mq&V~TQZ2kah_l(QsFx!SUbI&F~$o~tk+lc8+~`9_mG=Fhz7 zE8NnS2cEKSJDDDuV%$WEoPTPdg{6Dd~qvLy|w z8a=yo>%YBp>*>#J@~-D;C((CJhvE}FB#L=yDRa(q?Pw)eMYZZVI^v7CECsb#ROX4z zrJ?0YE?&AEzw}q@7^|9-Ma%XxITm<}#VHYt*<#hll!>4aO!_yMo1lcm%3FG)V6#Qb zVZ-wmMQAjlaFb!(TiRj5{%IlOtX9gCCi01gGY~#h!r=|5u8`UaG8p5(#e)5TG8ik@ zog2IvY7XQ4mYC6W(`DV3$%}KY7*qOURUG# ze!qB%UW*dH%c;Rp6;H<-x(~!%xa1P%JI*0_GH@?`r8-`6(_%i|2v%f<}GSzI;ocE#EfO&)erKSXWn}d&P^ZTVCe!`f*zmfn|4Z69b11Y}&!vPgm0cJ7ZnLiUAD$ zn2aPn>Xg6pf(nYuM+^sG)p&{QfnL!GZD*4QM@(DpJaOIZ%>~D?O#`ZtGFf35wRLPI zSD<8_k!+x=FbIy2Md>?mG{m4%XBHH_+XH-4tqW z2B##?V<(l1Rj|sTMso>qCohU8%E(r(A?Tuy?#ueeI*RjmuB3&c8!xu6(O(<~i{QqU ziHD`k%9Dwjh@EjPWsWRlZ$)D&-sEHBF(4TYeVkvllv#mDTEHU+vm|3`5;w*YR-aTe z@%++kno4U03C9i2s8SXzQ@0){T%j<#YtnnY0hc9;O`9?gBL5Qo-LzjG(=|K+9s}Y0 zNyMCaz=ob>7+~sa!ZA}DNoukLtdaqWIppf-TN!MeR^5D73tBYiOZ~E#b_!5I%k`7u zl!+<~C2EX*YXZ)$qx;_!IE>SWdv0mWd!Zh-pNEAMGOSAK821loreL@n)<@OI+eo z(p)RWQ2}^0lJ@HDAD#*PCruZ%T#GL2nnk0MA)=MwATBkYRoKACY9 z@+f|82+6z1%&bmLAk3?1Oas$_eUj>@h7x82I$y9d_4_BDpY4WILrb1BlShJ*6Oko6 zO>bgDH<~v6W%Vd2n}nuRU?&Jkjb-`DINQnm*6}9Bz0@TpcoHwCD)x8hH#L&!7% zspt?iUVj}GHD5fKR#plbwV86gs20j9!T;jPYU5LM^>u>H<@nAJ$=0SlDy)I z6Dzqt!Qd18TJZy>=ZQ+fDDTA=$i95>{Nnir9zi;CmiGzL>*6rQ!fijy1#3H{!3^T$ zqD=l#_sl~EKLy#9WvE#W@@ytYHBPDUKtK}5G!NZ;be6cQOmC_{`_l@k2hjz<#*Bk> zWjrVy?t6Y>Fz>w54w}6+#pfj>2o?@crk>plGK6{wdU!Sa2M5fMMqN<`cWDQA&+d8D V=l=@;009600{}k5O(FoQ0RV!$3J3rI diff --git a/campcaster/src/tools/pear/src/XML_Util-1.1.1.tgz b/campcaster/src/tools/pear/src/XML_Util-1.1.1.tgz deleted file mode 100644 index 6fa3ffef35bc4e3e3ba2d06722142b12d3312984..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 8358 zcmV;XAX(oZiwFP!000003+z4HcH2gh^SVAK|IkKclXQ63U8ZPjWM!hW@?|VJldP@b zfrzGvF$gdKD2X%j-|c7Y<9@?F&BIpp1!w>bkd#O#nGtp;7Jo+6k5371w&F0qD7Wo6gr{rv8Tj5*nm)1Obz zj$RXE7>47$Mq^A(zdjz0>n;r&R%kUuxf-?$^<}k0f89rfbX;>pyFa}?>3s-or_*3R z@qI8EjZA-vpU4D0+2NG*9Ww~(ore5|U+(p8pw!ORnv3NU$Tz>rY114TC!Qe&VvGOxCmQ_MHiIMfyH9 zL#zWmm|^JK7n6_@#}2}P418|{J^AJ|sEUFdl+e6{H&@V<6}`jmaIgU}U5ku7pTfY@ z!QkLVrtOCCKfoIPPQ2kS;MF96A3=W@gq;TaTYg};JPql1Xu9OIKOEUs7-N_fq0pYg zE5C&4tA(ED1UQME2LB`r`kq6(4mGV#gZ;^&X{5o)h0ijt=u`*aEBruChvvZktObtM zd?{#43)YZ2W9kZ5os-j6QsdFsW~$Xy0@HCa5$b;ogU{QOeL8$~ zaCXo;Jvux)e*1=)0a;670$7g^)DhxLbIgh9q2nN;2lzq4>6q>t^d>X_ZO*G zmbtTS?yk4m7rUFL!I%xA#T<UO)v+AJv1}SL17Q;wdPK(*;3g<(dv)ZzwO#EQX=|%lqBv( zl1~)?HXF3|!k__50^YO-u#LQ{m_=o|$6cXr&w#m=hIux>ooisGg*t%LI`;N1Y52

d)Vt$sa~96lSBWzf zFQbWrhJ;IF&7EN<{&nV^!k;dvNmT`B2{KaYiGw`lh zpU7iQsc!=+VKGM2C8p9FVKaBe>`XS(-dZJYEjlm(rQD1G3y;Ps8YxSCr;pN;_wE!|ELU2sT6;x|2vul4wE_7Fbzk7Rpz*+{LPAGlFeK3wBxPpw z05Obg7ii>qXomuUxC*21cOCy$y?H@Hvw%1@KmgU+8+S(nwy#G)jeH+*6429jNI4>p z08ETfm>5t3mxmqvh*mMD2p|bC*4@t_uRLOL6x0Z(HAzkii9w;Pv4l100M~dpq`(71 zw6&=;A>t}C8rHFdxa}&s51@TNZaElw69-03We3(A^bIgLj(3f0ih_8yk}$;TNgg!N z8??tf4otj*eal=EW6t=?Kp!@53+(PHu?J-8O^D|@Q|1Q24~QYelmo!U-6LpVFZ-S~ z=_eE=-?YIB^?lFh5CF%sE!KcbVS)qnl>oxIy98lDg9+7eK$-10yl((o_)`G=E}_`m zJ!rj<%(rUI?bWRH2SR@!^sh?jh5WqLthIMmMd$}yXBpD|XGY9uP9U)Z;%!D9U}894 zpVJl)qECL2vYwTz=#3840hs>TYVNGxQQEcY&0-Gl6%dnk&dC)4s`b|T?wyC$nlZFi zt+l)2IrkjL9K+a9c{yXc%h(M2L;XT$YVz688v#AMnhXYa)?svh*kVuYGKc=)k6p|k zTQJ9+hT>c6$X%iCqhEXX>*0~2uEy3{L;7eNieLENeazVZ-D++%qy693b`xH;+s$oq z|G_;xGoQ{2;FI4xYCL=P%_H&*)FWVMAiyOZa5)d^j@(A&Tb7JuumY>Jc5Lktg%d^jE~wqc^OPD zqK^`2{-qDB^wRUEq7J@ne8X51Q^0z_$2=eRaLY%%gOiiW^KTyU&nUEQpY}W#Eb$Ul zZOBc8(sN#d|Ci$oo@YWjp#F#Zxl&0MUq!ED&|^bl2=cIi&kf)?uH!6unj887M9k;Imor%|#fu0nQdeEOb;dAm7CJ+9589rZp z5Em2MvE&%6*mtiTMqXjx&tBOax6 zx7pHw&u45rxd1Jb9KRxE%M-Rgy|II^vh?9G3%FdG_;!ixcjp@|AjP(L@miw+OdtLO zwrbty;P5{W{&Yl|^%h`dxoCl6)JHOgj_8&{Or7h6yC*JBfyzj7?*``yyv{2TR3Xm2-jnBM}z9J(x;Gj=`*ZKTE1LG+ygFCLIEkQP$)!XCPV`#4Q)~8*?wpG zp)6V;L?TYjMF|Ih7@z6XU{$Y7XF`z#xwv5+`x85SdPPCML8qiaD*CoX{EoqXVa4Op z2$ZbAw)hqh40$ez72%F8M`A$ug2_&$>mBZWNW5sL2Sn`{^~e>(fzgeD<7WaJ~Q_J+sg<5DBk}ko7>Gzf@QY1 zn$3-^b+-S%1>YZ@)j!ML|8GYD06TpDzq!?DZJ6EI-E&BccyY3k! zoE2a$&4;o?*+mILIm)Llf%{B%!VsS|-C3)B0pJto_l#p=j-)1Czt;%*{4m)p*hR60 zq2|>Dz)>^z0y$+{#K-eSp0%)A{_o=UB~NAe6tOU}*7qi0ieaq8*K`Ok%+QLQ6z`AT zog5qC|iDHJtS}+AFzF~T%?%2=j@xLHIOF*&+-;#A0XnEM3LpQsZQJ%8@ zq^7$x`vRY0`)_M=9c;cR{(Ea1-feGfKji=VDoOX<>9seqj@o;Ky; znSfWEhN>nYyX7g;pn;2tYdM%44b_4WdypnJNFi*4^>lK4c=YDRivKuffCO)v24ES%jE#fFg)onj1)cCXp4hc{t;PSUs~$NX5R zWm_yp*Qb4IUs0yaj;9(lu>oS{xQWZg19*)a^DdYUW*3dIO2+IY6s#_6340Z-q#zR= z$}DFvvE-VvttQNN#-J8Z+Msq@HmEetG(GT@(Afd=&;)yF_YCQ1lE!tv+6rI|!oxgJ zQg$)#Q+p$Q{G_$FnQ}kHZZGB$0?dMb%}!~%EJ+{Nr;+GoWS4Lv@l(-dBNp24-@kp| zJAU)y!O8Kf-r)}i?@vMX-)wQkdo{hBo*leD!(Q5jy||uR3;L#G`fB>0;x0h-=$#%O zoE*IG9lm{Y1}X{kv(=QkNN!&vJK)Mx94T7ZOYiL9PrWw>uaB_#Rs zbDyk9__J*bD{~-EZ<}LVD5TO5{YUIv5e=6B3-Vmx7u`6tEKD8AU$~k@=;!h z`bXvzzF=xw%*SE(hq8f!q#X5BUmfJt-59u8Cmo*=`7a3C%vfl!CqJ(V^zPsH+~PAl zEUo~#=zKGz5oNxmn`cOU4!Ss4B;;-uXW6Fk4AUj`BYuZVO7+adejDMVDSIxBw#t@u zV84=2)9MMCC?tuEFGdrkl5SHu3v!4*J$q}?CzZ(nu&*CbcF6<)V1G!;=@u$#A$_BqCnO>9e&A(CsDab zKrwdk^#v5`cG&_dHI|tI>RzYQA4Jv4MO7;4POhj*&f~wnsA9}daHIt}852>2*X=G^ z*NN+P7Og8dC)PC@H~f_Y>G_RI&e?~#py(t2!{72 zdtYWg%&5HhR6E? z;I}uA63>bVbO7n6PC;~ItiWvL_ytrpu`n8FiHb2h%v>Wo;`vWbm*bW zu$qAF&JW54yG`jy@SR$N{vVs*VvY5s~HdJNalPD#n$KQw~qF-p=P%nrUN5ta5xr z97=^ck452nw1Xb!O<28>U5P#&Kz+GpNQu1r@W+$mLt;FEb%*~c@t!{#wq=~lzu`Zy zSXJ)yg-}>G*yCg7RG+&)d1+bPm8RXCW{eb1NDf`VpDv%M?QXXp9G)W^HjUZ>8xb=oQ4aD7&<|QU>Er`0D6tCGD`&4;SD>>jU;EK7Kk+9B^IUwgo5xpwPf_P%ov7)(p*)4Br zEx;Qy5)XTmoMd7;ZDDW+54jeEES2NbMc2!cxJrF}&Uv|iB* zhctmCUI021Ip0}{Xqo7)ADP)p1a)pN@wn#iL^_K^Cy}2h?&SVnB;4fAaU-q3yOjIn za;>DQUt~6Dlke;H_jDMF8V)^+NB*!>_+mxja*6WW%XIeYBF*ef&QK}&+T9oNyvkD8 zm*KpUaQ6v%83+o(n8@}q(v;gNi#pCCfkF6yGnxL8KPZX()xwQDMFK~Ym8853&?qnP zQDGtH+0u-}RYYVfrTh$EW^^Z*R9;^Zf>Xs8>?LM^3k*uBv|x7;f6ePnA&E?t1^Z&G zKd&D_!HJ^j_O%+3S{vyn6H=i4fu;S zTrU|VO@m+Nru%{I2RVd~&u@SNz5HVhUdI<5!IHcW&$-2z}%VA01*q| zx)2_Vz@))NnryV3Z(et~3}XvY5piTGUK@1ZipVpfS5nvTI3W3pxQGa|W$2^yNLd?~ zSHb&eSOgxAz0;J6W9lks4Md~U`CwA;ruDPTg(+pMQ5AzwnO*|KlqW@$))iM_)q4a$ z(Y@@6m6dT5ml~b236yq=m+anN__qM??a;rqN0+y@JD!BM7-4w}8k>2`W};I5_}A|F zvr4z~sqyJktJ?^&ds3wieEIaLO&XegMI3+f-Q2#7nIrjh{oShJo8=WT70;sl#G(m! z;shQd+ZQpt`9~rvsmKXz04>ykLvQR0hb}c-B9m?=_VDs^wqG|1)5<);>`ZWCvJ<&z zc`DjCO>-vQug1rs^RB2aj>|&3d&F)Qf>x4Ap>(jTM{s#RAKo8JyEXb)z%|nm5G1!yMhIM02F}}wn0ayRo$ww8M#IN|3$nx1u`h>^!O=}HB*VCDP}rFUJvb^RPls~m7OOBBeua8VO6__2@FH7 zgm||hLHNFC`c7mVP4%9bycr-QGB7YW)Hiv%En+py zkzXK9Gb&v~^q^8f!A7hq?8yK+O1ZI~@#B(0=9|~1jZ8x(%af-kJ@otux9Z4@xIfFK zAb+IxF|v6rQc?{jC6&NI$OwfUq|#lpR^nL{tthuR`*dL6#8)^oe>v|JLp0=OJeL3( zsVP!sk44IC)?M_bD!Nnei;Mu~5_v|yN=Y}B((@)*NmN>H zdX+@ebEWas?F`2HsZ^a8OP~^=R}+Ywm!omnDsiN~BGAbP-^Ae!4+`ajLW$2J3T3e# zdDoyjwRcUkn(IASvlzvs$d<%nWWfrl2CCRAsk^i}r^nN-l;mh0tHWW!B_2%t zA-aBJ@uB>TXHzCYNW?YO0S;}NApuhUh2K(*%Y~6nd{Ir*d!?=$aCDG8f21HZV6d)w z)jFQ~k+%SWtGO4L`QrPJ|s9Rm#AB~%l;|38;D@|y~ zpN(X0T89DhOap0$Z08qr;IY5$Ss>jdCvB69(-a2-vO4)u70v? zmS`3M?aRDW(R~th8t_j(X;jmrNR>=&REj6#ie#1Ma2@J0O5fjUliAKo=AusdcG3j1 zXgYCHeb~n%OW37*aAka5SB7rw6*x7N1ml%zq02+>H%Kh2Svz3*4X@(JT{Z){&|OVj z?h@@!HP|p|cov01Y6m{c)YNS!SxPC{|& zvoZ>_iGnKVn$Q(V-g6OmOpB^;O(0s`;MLU=O5mG-Wc5K!co8mhAxuN}OH4+2fa%mkymsJ95Fo3Q05`6Gl^NT?k2qDF3yY-v zpb)=MI4~|dwE~Yk5RJvFkFh^-lh3i6B!E3)kh<)@*1e?RYnV3kl9uCczRal>%%>Hk z#ku&0LXvwvW~YrtX4oH=jmBR;e%v!1Ap5=Z z-ltmqe63+rCBpvE{IXyqiV?5rXo)F{fiDGI1MvbdGSMc9`ycXH;=RXR{%F?zeo*_b z-nsm%S=$8^e5#*6tGw8&yvYClUFC&}rX}D=YAzWb1bl@vm?{}g$3yB?(Zh`S5rEso zNDT6^$nNS$U@;Ym5iv!{vNLi=Icl4q0G^pTI0d>Lxe1gWQvER(P`p76C%aLLR( wOXD&~GIcr9Qq~s4PYF6wn~f*u%fl7s56{D+JpT^>0RR6301C$^@&LR50P*H3R{#J2 diff --git a/campcaster/src/tools/pear/src/data/PEAR/package.dtd b/campcaster/src/tools/pear/src/data/PEAR/package.dtd new file mode 100644 index 000000000..5bc04dd7d --- /dev/null +++ b/campcaster/src/tools/pear/src/data/PEAR/package.dtd @@ -0,0 +1,103 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/campcaster/src/tools/pear/src/data/PEAR/template.spec b/campcaster/src/tools/pear/src/data/PEAR/template.spec new file mode 100644 index 000000000..37b477f8f --- /dev/null +++ b/campcaster/src/tools/pear/src/data/PEAR/template.spec @@ -0,0 +1,72 @@ +Summary: PEAR: @summary@ +Name: @rpm_package@ +Version: @version@ +Release: 1 +License: @release_license@ +Group: Development/Libraries +Source: http://@master_server@/get/@package@-%{version}.tgz +BuildRoot: %{_tmppath}/%{name}-root +URL: http://@master_server@/package/@package@ +Prefix: %{_prefix} +BuildArchitectures: @arch@ +@extra_headers@ + +%description +@description@ + +%prep +rm -rf %{buildroot}/* +%setup -c -T +# XXX Source files location is missing here in pear cmd +pear -v -c %{buildroot}/pearrc \ + -d php_dir=%{_libdir}/php/pear \ + -d doc_dir=/docs \ + -d bin_dir=%{_bindir} \ + -d data_dir=%{_libdir}/php/pear/data \ + -d test_dir=%{_libdir}/php/pear/tests \ + -d ext_dir=%{_libdir} \@extra_config@ + -s + +%build +echo BuildRoot=%{buildroot} + +%postun +# if refcount = 0 then package has been removed (not upgraded) +if [ "$1" -eq "0" ]; then + pear uninstall --nodeps -r @possible_channel@@package@ + rm @rpm_xml_dir@/@package@.xml +fi + + +%post +# if refcount = 2 then package has been upgraded +if [ "$1" -ge "2" ]; then + pear upgrade --nodeps -r @rpm_xml_dir@/@package@.xml +else + pear install --nodeps -r @rpm_xml_dir@/@package@.xml +fi + +%install +pear -c %{buildroot}/pearrc install --nodeps -R %{buildroot} \ + $RPM_SOURCE_DIR/@package@-%{version}.tgz +rm %{buildroot}/pearrc +rm %{buildroot}/%{_libdir}/php/pear/.filemap +rm %{buildroot}/%{_libdir}/php/pear/.lock +rm -rf %{buildroot}/%{_libdir}/php/pear/.registry +if [ "@doc_files@" != "" ]; then + mv %{buildroot}/docs/@package@/* . + rm -rf %{buildroot}/docs +fi +mkdir -p %{buildroot}@rpm_xml_dir@ +tar -xzf $RPM_SOURCE_DIR/@package@-%{version}.tgz package@package2xml@.xml +cp -p package@package2xml@.xml %{buildroot}@rpm_xml_dir@/@package@.xml + +#rm -rf %{buildroot}/* +#pear -q install -R %{buildroot} -n package@package2xml@.xml +#mkdir -p %{buildroot}@rpm_xml_dir@ +#cp -p package@package2xml@.xml %{buildroot}@rpm_xml_dir@/@package@.xml + +%files + %defattr(-,root,root) + %doc @doc_files@ + / diff --git a/campcaster/src/tools/pear/src/data/XML_Serializer/doc/todo.txt b/campcaster/src/tools/pear/src/data/XML_Serializer/doc/todo.txt new file mode 100644 index 000000000..ab9b953bf --- /dev/null +++ b/campcaster/src/tools/pear/src/data/XML_Serializer/doc/todo.txt @@ -0,0 +1,25 @@ +TODO XML_Serializer: +-------------------- +- find a way to detect references in the structure and add id/idref attributes +- serialize some other structures, especially XPath return values +- serializes tags with attributes + array( + "_attributes" => array( "foo" => "bar" ), + "child" => "content" + ); + serializes to: + + content + +- custom serialization of objects +- namespace support + +TODO XML_Unserializer: +---------------------- +- add support to convert arrays into objects +- support for xml:space attribute +- set types for certain tags (like in patConfiguration) +- namespace support +- custom unserialization for objects (static unserialize() or fromXML() methods) +- unserialize references using id/idref +- implement callback mechanism diff --git a/campcaster/src/tools/pear/src/docs/Archive_Tar/docs/Archive_Tar.txt b/campcaster/src/tools/pear/src/docs/Archive_Tar/docs/Archive_Tar.txt new file mode 100644 index 000000000..d20507b34 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Archive_Tar/docs/Archive_Tar.txt @@ -0,0 +1,461 @@ +Documentation for class Archive_Tar +=================================== +Last update : 2001-08-15 + + + +Overview : +---------- + + The Archive_Tar class helps in creating and managing GNU TAR format + files compressed by GNU ZIP or not. + The class offers basic functions like creating an archive, adding + files in the archive, extracting files from the archive and listing + the archive content. + It also provide advanced functions that allow the adding and + extraction of files with path manipulation. + + +Sample : +-------- + + // ----- Creating the object (uncompressed archive) + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object->setErrorHandling(PEAR_ERROR_PRINT); + + // ----- Creating the archive + $v_list[0]="file.txt"; + $v_list[1]="data/"; + $v_list[2]="file.log"; + $tar_object->create($v_list); + + // ----- Adding files + $v_list[0]="dev/file.txt"; + $v_list[1]="dev/data/"; + $v_list[2]="log/file.log"; + $tar_object->add($v_list); + + // ----- Adding more files + $tar_object->add("release/newfile.log release/readme.txt"); + + // ----- Listing the content + if (($v_list = $tar_object->listContent()) != 0) + for ($i=0; $i"; + echo " .size :'".$v_list[$i][size]."'
"; + echo " .mtime :'".$v_list[$i][mtime]."' (".date("l dS of F Y h:i:s A", $v_list[$i][mtime]).")
"; + echo " .mode :'".$v_list[$i][mode]."'
"; + echo " .uid :'".$v_list[$i][uid]."'
"; + echo " .gid :'".$v_list[$i][gid]."'
"; + echo " .typeflag :'".$v_list[$i][typeflag]."'
"; + } + + // ----- Extracting the archive in directory "install" + $tar_object->extract("install"); + + +Public arguments : +------------------ + +None + + +Public Methods : +---------------- + +Method : Archive_Tar($p_tarname, $compress = null) +Description : + Archive_Tar Class constructor. This flavour of the constructor only + declare a new Archive_Tar object, identifying it by the name of the + tar file. + If the compress argument is set the tar will be read or created as a + gzip or bz2 compressed TAR file. +Arguments : + $p_tarname : A valid filename for the tar archive file. + $p_compress : can be null, 'gz' or 'bz2'. For + compatibility reason it can also be true. This + parameter indicates if gzip or bz2 compression + is required. +Return value : + The Archive_Tar object. +Sample : + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object_compressed = new Archive_Tar("tarname.tgz", true); +How it works : + Initialize the object. + +Method : create($p_filelist) +Description : + This method creates the archive file and add the files / directories + that are listed in $p_filelist. + If the file already exists and is writable, it is replaced by the + new tar. It is a create and not an add. If the file exists and is + read-only or is a directory it is not replaced. The method return + false and a PEAR error text. + The $p_filelist parameter can be an array of string, each string + representing a filename or a directory name with their path if + needed. It can also be a single string with names separated by a + single blank. + See also createModify() method for more details. +Arguments : + $p_filelist : An array of filenames and directory names, or a single + string with names separated by a single blank space. +Return value : + true on success, false on error. +Sample 1 : + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object->setErrorHandling(PEAR_ERROR_PRINT); // Optional error handling + $v_list[0]="file.txt"; + $v_list[1]="data/"; (Optional '/' at the end) + $v_list[2]="file.log"; + $tar_object->create($v_list); +Sample 2 : + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object->setErrorHandling(PEAR_ERROR_PRINT); // Optional error handling + $tar_object->create("file.txt data/ file.log"); +How it works : + Just calling the createModify() method with the right parameters. + +Method : createModify($p_filelist, $p_add_dir, $p_remove_dir = "") +Description : + This method creates the archive file and add the files / directories + that are listed in $p_filelist. + If the file already exists and is writable, it is replaced by the + new tar. It is a create and not an add. If the file exists and is + read-only or is a directory it is not replaced. The method return + false and a PEAR error text. + The $p_filelist parameter can be an array of string, each string + representing a filename or a directory name with their path if + needed. It can also be a single string with names separated by a + single blank. + The path indicated in $p_remove_dir will be removed from the + memorized path of each file / directory listed when this path + exists. By default nothing is removed (empty path "") + The path indicated in $p_add_dir will be added at the beginning of + the memorized path of each file / directory listed. However it can + be set to empty "". The adding of a path is done after the removing + of path. + The path add/remove ability enables the user to prepare an archive + for extraction in a different path than the origin files are. + See also addModify() method for file adding properties. +Arguments : + $p_filelist : An array of filenames and directory names, or a single + string with names separated by a single blank space. + $p_add_dir : A string which contains a path to be added to the + memorized path of each element in the list. + $p_remove_dir : A string which contains a path to be removed from + the memorized path of each element in the list, when + relevant. +Return value : + true on success, false on error. +Sample 1 : + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object->setErrorHandling(PEAR_ERROR_PRINT); // Optional error handling + $v_list[0]="file.txt"; + $v_list[1]="data/"; (Optional '/' at the end) + $v_list[2]="file.log"; + $tar_object->createModify($v_list, "install"); + // files are stored in the archive as : + // install/file.txt + // install/data + // install/data/file1.txt + // install/data/... all the files and sub-dirs of data/ + // install/file.log +Sample 2 : + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object->setErrorHandling(PEAR_ERROR_PRINT); // Optional error handling + $v_list[0]="dev/file.txt"; + $v_list[1]="dev/data/"; (Optional '/' at the end) + $v_list[2]="log/file.log"; + $tar_object->createModify($v_list, "install", "dev"); + // files are stored in the archive as : + // install/file.txt + // install/data + // install/data/file1.txt + // install/data/... all the files and sub-dirs of data/ + // install/log/file.log +How it works : + Open the file in write mode (erasing the existing one if one), + call the _addList() method for adding the files in an empty archive, + add the tar footer (512 bytes block), close the tar file. + + +Method : addModify($p_filelist, $p_add_dir, $p_remove_dir="") +Description : + This method add the files / directories listed in $p_filelist at the + end of the existing archive. If the archive does not yet exists it + is created. + The $p_filelist parameter can be an array of string, each string + representing a filename or a directory name with their path if + needed. It can also be a single string with names separated by a + single blank. + The path indicated in $p_remove_dir will be removed from the + memorized path of each file / directory listed when this path + exists. By default nothing is removed (empty path "") + The path indicated in $p_add_dir will be added at the beginning of + the memorized path of each file / directory listed. However it can + be set to empty "". The adding of a path is done after the removing + of path. + The path add/remove ability enables the user to prepare an archive + for extraction in a different path than the origin files are. + If a file/dir is already in the archive it will only be added at the + end of the archive. There is no update of the existing archived + file/dir. However while extracting the archive, the last file will + replace the first one. This results in a none optimization of the + archive size. + If a file/dir does not exist the file/dir is ignored. However an + error text is send to PEAR error. + If a file/dir is not readable the file/dir is ignored. However an + error text is send to PEAR error. + If the resulting filename/dirname (after the add/remove option or + not) string is greater than 99 char, the file/dir is + ignored. However an error text is send to PEAR error. +Arguments : + $p_filelist : An array of filenames and directory names, or a single + string with names separated by a single blank space. + $p_add_dir : A string which contains a path to be added to the + memorized path of each element in the list. + $p_remove_dir : A string which contains a path to be removed from + the memorized path of each element in the list, when + relevant. +Return value : + true on success, false on error. +Sample 1 : + $tar_object = new Archive_Tar("tarname.tar"); + [...] + $v_list[0]="dev/file.txt"; + $v_list[1]="dev/data/"; (Optional '/' at the end) + $v_list[2]="log/file.log"; + $tar_object->addModify($v_list, "install"); + // files are stored in the archive as : + // install/file.txt + // install/data + // install/data/file1.txt + // install/data/... all the files and sub-dirs of data/ + // install/file.log +Sample 2 : + $tar_object = new Archive_Tar("tarname.tar"); + [...] + $v_list[0]="dev/file.txt"; + $v_list[1]="dev/data/"; (Optional '/' at the end) + $v_list[2]="log/file.log"; + $tar_object->addModify($v_list, "install", "dev"); + // files are stored in the archive as : + // install/file.txt + // install/data + // install/data/file1.txt + // install/data/... all the files and sub-dirs of data/ + // install/log/file.log +How it works : + If the archive does not exists it create it and add the files. + If the archive does exists and is not compressed, it open it, jump + before the last empty 512 bytes block (tar footer) and add the files + at this point. + If the archive does exists and is compressed, a temporary copy file + is created. This temporary file is then 'gzip' read block by block + until the last empty block. The new files are then added in the + compressed file. + The adding of files is done by going through the file/dir list, + adding files per files, in a recursive way through the + directory. Each time a path need to be added/removed it is done + before writing the file header in the archive. + +Method : add($p_filelist) +Description : + This method add the files / directories listed in $p_filelist at the + end of the existing archive. If the archive does not yet exists it + is created. + The $p_filelist parameter can be an array of string, each string + representing a filename or a directory name with their path if + needed. It can also be a single string with names separated by a + single blank. + See addModify() method for details and limitations. +Arguments : + $p_filelist : An array of filenames and directory names, or a single + string with names separated by a single blank space. +Return value : + true on success, false on error. +Sample 1 : + $tar_object = new Archive_Tar("tarname.tar"); + [...] + $v_list[0]="dev/file.txt"; + $v_list[1]="dev/data/"; (Optional '/' at the end) + $v_list[2]="log/file.log"; + $tar_object->add($v_list); +Sample 2 : + $tar_object = new Archive_Tar("tarname.tgz", true); + [...] + $v_list[0]="dev/file.txt"; + $v_list[1]="dev/data/"; (Optional '/' at the end) + $v_list[2]="log/file.log"; + $tar_object->add($v_list); +How it works : + Simply call the addModify() method with the right parameters. + +Method : addString($p_filename, $p_string) +Description : + This method add a single string as a file at the + end of the existing archive. If the archive does not yet exists it + is created. +Arguments : + $p_filename : A string which contains the full filename path + that will be associated with the string. + $p_string : The content of the file added in the archive. +Return value : + true on success, false on error. +Sample 1 : + $v_archive = & new Archive_Tar($p_filename); + $v_archive->setErrorHandling(PEAR_ERROR_PRINT); + $v_result = $v_archive->addString('data/test.txt', 'This is the text of the string'); + + +Method : extract($p_path = "") +Description : + This method extract all the content of the archive in the directory + indicated by $p_path.If $p_path is optional, if not set the archive + is extracted in the current directory. + While extracting a file, if the directory path does not exists it is + created. + See extractModify() for details and limitations. +Arguments : + $p_path : Optional path where the files/dir need to by extracted. +Return value : + true on success, false on error. +Sample : + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object->extract(); +How it works : + Simply call the extractModify() method with appropriate parameters. + +Method : extractModify($p_path, $p_remove_path) +Description : + This method extract all the content of the archive in the directory + indicated by $p_path. When relevant the memorized path of the + files/dir can be modified by removing the $p_remove_path path at the + beginning of the file/dir path. + While extracting a file, if the directory path does not exists it is + created. + While extracting a file, if the file already exists it is replaced + without looking for last modification date. + While extracting a file, if the file already exists and is write + protected, the extraction is aborted. + While extracting a file, if a directory with the same name already + exists, the extraction is aborted. + While extracting a directory, if a file with the same name already + exists, the extraction is aborted. + While extracting a file/directory if the destination directory exist + and is write protected, or does not exist but can not be created, + the extraction is aborted. + If after extraction an extracted file does not show the correct + stored file size, the extraction is aborted. + When the extraction is aborted, a PEAR error text is set and false + is returned. However the result can be a partial extraction that may + need to be manually cleaned. +Arguments : + $p_path : The path of the directory where the files/dir need to by + extracted. + $p_remove_path : Part of the memorized path that can be removed if + present at the beginning of the file/dir path. +Return value : + true on success, false on error. +Sample : + // Imagine tarname.tar with files : + // dev/data/file.txt + // dev/data/log.txt + // readme.txt + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object->extractModify("install", "dev"); + // Files will be extracted there : + // install/data/file.txt + // install/data/log.txt + // install/readme.txt +How it works : + Open the archive and call a more generic function that can extract + only a part of the archive or all the archive. + See extractList() method for more details. + +Method : extractInString($p_filename) +Description : + This method extract from the archive one file identified by $p_filename. + The return value is a string with the file content, or NULL on error. +Arguments : + $p_filename : The path of the file to extract in a string. +Return value : + a string with the file content or NULL. +Sample : + // Imagine tarname.tar with files : + // dev/data/file.txt + // dev/data/log.txt + // dev/readme.txt + $v_archive = & new Archive_Tar('tarname.tar'); + $v_archive->setErrorHandling(PEAR_ERROR_PRINT); + $v_string = $v_archive->extractInString('dev/readme.txt'); + echo $v_string; + +Method : listContent() +Description : + This method returns an array of arrays that describe each + file/directory present in the archive. + The array is not sorted, so it show the position of the file in the + archive. + The file informations are : + $file[filename] : Name and path of the file/dir. + $file[mode] : File permissions (result of fileperms()) + $file[uid] : user id + $file[gid] : group id + $file[size] : filesize + $file[mtime] : Last modification time (result of filemtime()) + $file[typeflag] : "" for file, "5" for directory +Arguments : +Return value : + An array of arrays or 0 on error. +Sample : + $tar_object = new Archive_Tar("tarname.tar"); + if (($v_list = $tar_object->listContent()) != 0) + for ($i=0; $i"; + echo " .size :'".$v_list[$i][size]."'
"; + echo " .mtime :'".$v_list[$i][mtime]."' (". + date("l dS of F Y h:i:s A", $v_list[$i][mtime]).")
"; + echo " .mode :'".$v_list[$i][mode]."'
"; + echo " .uid :'".$v_list[$i][uid]."'
"; + echo " .gid :'".$v_list[$i][gid]."'
"; + echo " .typeflag :'".$v_list[$i][typeflag]."'
"; + } +How it works : + Call the same function as an extract however with a flag to only go + through the archive without extracting the files. + +Method : extractList($p_filelist, $p_path = "", $p_remove_path = "") +Description : + This method extract from the archive only the files indicated in the + $p_filelist. These files are extracted in the current directory or + in the directory indicated by the optional $p_path parameter. + If indicated the $p_remove_path can be used in the same way as it is + used in extractModify() method. +Arguments : + $p_filelist : An array of filenames and directory names, or a single + string with names separated by a single blank space. + $p_path : The path of the directory where the files/dir need to by + extracted. + $p_remove_path : Part of the memorized path that can be removed if + present at the beginning of the file/dir path. +Return value : + true on success, false on error. +Sample : + // Imagine tarname.tar with files : + // dev/data/file.txt + // dev/data/log.txt + // readme.txt + $tar_object = new Archive_Tar("tarname.tar"); + $tar_object->extractList("dev/data/file.txt readme.txt", "install", + "dev"); + // Files will be extracted there : + // install/data/file.txt + // install/readme.txt +How it works : + Go through the archive and extract only the files present in the + list. + diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/Readme b/campcaster/src/tools/pear/src/docs/Calendar/docs/Readme new file mode 100644 index 000000000..bba1ed66d --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/Readme @@ -0,0 +1,3 @@ +Readme + +See the PEAR manual at http://pear.php.net/manual/en/package.datetime.calendar.php for details. \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/1.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/1.php new file mode 100644 index 000000000..662a17da5 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/1.php @@ -0,0 +1,92 @@ +' ); +echo ( 'The time is now: '.date('Y M d H:i:s',$c->getTimestamp()).'
' ); + +$i = 1; +echo ( '

First Iteration

' ); +echo ( '

The first iteration is more "expensive", the calendar data + structures having to be built.

' ); +$start = getmicrotime(); +$c->build(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); + +$i = 1; +echo ( '

Second Iteration

' ); +echo ( '

This second iteration is faster, the data structures + being re-used

' ); +$start = getmicrotime(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/1.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/1.phps new file mode 100644 index 000000000..662a17da5 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/1.phps @@ -0,0 +1,92 @@ +' ); +echo ( 'The time is now: '.date('Y M d H:i:s',$c->getTimestamp()).'
' ); + +$i = 1; +echo ( '

First Iteration

' ); +echo ( '

The first iteration is more "expensive", the calendar data + structures having to be built.

' ); +$start = getmicrotime(); +$c->build(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); + +$i = 1; +echo ( '

Second Iteration

' ); +echo ( '

This second iteration is faster, the data structures + being re-used

' ); +$start = getmicrotime(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/10.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/10.php new file mode 100644 index 000000000..c9d92e026 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/10.php @@ -0,0 +1,93 @@ +build(); +?> + + + + + A Simple Decorator + + +

A Simple Decorator

+ + +fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "" ); + } else { + echo ( "" ); + } + if ( $Day->isLast() ) { + echo ( "\n\n" ); + } +} +?> + + + + + +
thisMonth() ); ?>
 ".$Day->thisDay()."
Prev Next
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/10.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/10.phps new file mode 100644 index 000000000..c9d92e026 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/10.phps @@ -0,0 +1,93 @@ +build(); +?> + + + + + A Simple Decorator + + +

A Simple Decorator

+ + +fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "" ); + } else { + echo ( "" ); + } + if ( $Day->isLast() ) { + echo ( "\n\n" ); + } +} +?> + + + + + +
thisMonth() ); ?>
 ".$Day->thisDay()."
Prev Next
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/11.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/11.php new file mode 100644 index 000000000..281dc8c70 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/11.php @@ -0,0 +1,109 @@ +entry = $entry; + } + function getEntry() { + return $this->entry; + } +} + +// Create a day to view the hours for +$Day = & new Calendar_Day(2003,10,24); + +// A sample query to get the data for today (NOT ACTUALLY USED HERE) +$sql = " + SELECT + * + FROM + diary + WHERE + eventtime >= '".$Day->thisDay(TRUE)."' + AND + eventtime < '".$Day->nextDay(TRUE)."';"; + +// An array simulating data from a database +$result = array ( + array('eventtime'=>mktime(9,0,0,10,24,2003),'entry'=>'Meeting with sales team'), + array('eventtime'=>mktime(11,0,0,10,24,2003),'entry'=>'Conference call with Widget Inc.'), + array('eventtime'=>mktime(15,0,0,10,24,2003),'entry'=>'Presentation to board of directors') + ); + +// An array to place selected hours in +$selection = array(); + +// Loop through the "database result" +foreach ( $result as $row ) { + $Hour = new Calendar_Hour(2000,1,1,1); // Create Hour with dummy values + $Hour->setTimeStamp($row['eventtime']); // Set the real time with setTimeStamp + + // Create the decorator, passing it the Hour + $DiaryEvent = new DiaryEvent($Hour); + + // Attach the payload + $DiaryEvent->setEntry($row['entry']); + + // Add the decorator to the selection + $selection[] = $DiaryEvent; +} + +// Build the hours in that day, passing the selection +$Day->build($selection); +?> + + + + Passing a Selection Payload with a Decorator + + +

Passing a Selection "Payload" using a Decorator

+ + + + + + +fetch() ) { + + $hour = $Hour->thisHour(); + $minute = $Hour->thisMinute(); + + // Office hours only... + if ( $hour >= 8 && $hour <= 18 ) { + echo ( "\n" ); + echo ( "\n" ); + + // If the hour is selected, call the decorator method... + if ( $Hour->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + echo ( "\n" ); + } +} +?> +
Your Schedule for thisDay(TRUE)) ); ?>
TimeEntry
$hour:$minute".$Hour->getEntry()." 
+

The query to fetch this data, with help from PEAR::Calendar, might be;

+
+
+
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/11.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/11.phps new file mode 100644 index 000000000..281dc8c70 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/11.phps @@ -0,0 +1,109 @@ +entry = $entry; + } + function getEntry() { + return $this->entry; + } +} + +// Create a day to view the hours for +$Day = & new Calendar_Day(2003,10,24); + +// A sample query to get the data for today (NOT ACTUALLY USED HERE) +$sql = " + SELECT + * + FROM + diary + WHERE + eventtime >= '".$Day->thisDay(TRUE)."' + AND + eventtime < '".$Day->nextDay(TRUE)."';"; + +// An array simulating data from a database +$result = array ( + array('eventtime'=>mktime(9,0,0,10,24,2003),'entry'=>'Meeting with sales team'), + array('eventtime'=>mktime(11,0,0,10,24,2003),'entry'=>'Conference call with Widget Inc.'), + array('eventtime'=>mktime(15,0,0,10,24,2003),'entry'=>'Presentation to board of directors') + ); + +// An array to place selected hours in +$selection = array(); + +// Loop through the "database result" +foreach ( $result as $row ) { + $Hour = new Calendar_Hour(2000,1,1,1); // Create Hour with dummy values + $Hour->setTimeStamp($row['eventtime']); // Set the real time with setTimeStamp + + // Create the decorator, passing it the Hour + $DiaryEvent = new DiaryEvent($Hour); + + // Attach the payload + $DiaryEvent->setEntry($row['entry']); + + // Add the decorator to the selection + $selection[] = $DiaryEvent; +} + +// Build the hours in that day, passing the selection +$Day->build($selection); +?> + + + + Passing a Selection Payload with a Decorator + + +

Passing a Selection "Payload" using a Decorator

+ + + + + + +fetch() ) { + + $hour = $Hour->thisHour(); + $minute = $Hour->thisMinute(); + + // Office hours only... + if ( $hour >= 8 && $hour <= 18 ) { + echo ( "\n" ); + echo ( "\n" ); + + // If the hour is selected, call the decorator method... + if ( $Hour->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + echo ( "\n" ); + } +} +?> +
Your Schedule for thisDay(TRUE)) ); ?>
TimeEntry
$hour:$minute".$Hour->getEntry()." 
+

The query to fetch this data, with help from PEAR::Calendar, might be;

+
+
+
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/12.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/12.php new file mode 100644 index 000000000..0096d21ce --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/12.php @@ -0,0 +1,116 @@ +build(); +?> + + + + <?php echo ( $Year->thisYear() ); ?> + + + + + +fetch() ) { + + switch ( $i ) { + case 0: + echo ( "\n" ); + break; + case 3: + case 6: + case 9: + echo ( "\n\n" ); + break; + case 12: + echo ( "\n" ); + break; + } + + echo ( "\n" ); + + $i++; +} +?> +
+thisYear() ); ?> + + +
\n\n" ); + echo ( "" ); + echo ( "\n\n" ); + $Month->build(); + while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } + } + echo ( "
".date('F',$Month->thisMonth(TRUE))."
MTWTFSS
 ".$Day->thisDay()."
\n
+

Took:

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/12.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/12.phps new file mode 100644 index 000000000..0096d21ce --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/12.phps @@ -0,0 +1,116 @@ +build(); +?> + + + + <?php echo ( $Year->thisYear() ); ?> + + + + + +fetch() ) { + + switch ( $i ) { + case 0: + echo ( "\n" ); + break; + case 3: + case 6: + case 9: + echo ( "\n\n" ); + break; + case 12: + echo ( "\n" ); + break; + } + + echo ( "\n" ); + + $i++; +} +?> +
+thisYear() ); ?> + + +
\n\n" ); + echo ( "" ); + echo ( "\n\n" ); + $Month->build(); + while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } + } + echo ( "
".date('F',$Month->thisMonth(TRUE))."
MTWTFSS
 ".$Day->thisDay()."
\n
+

Took:

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/13.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/13.php new file mode 100644 index 000000000..4fb0f317e --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/13.php @@ -0,0 +1,99 @@ +getTimestamp()); + +echo ( '

Using PEAR::Date engine

' ); +echo ( 'Viewing: '.@$_GET['view'].'
' ); +echo ( 'The time is now: '.$date->format('%Y %a %e %T').'
' ); + +$i = 1; +echo ( '

First Iteration

' ); +echo ( '

The first iteration is more "expensive", the calendar data + structures having to be built.

' ); +$start = getmicrotime(); +$c->build(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); + +$i = 1; +echo ( '

Second Iteration

' ); +echo ( '

This second iteration is faster, the data structures + being re-used

' ); +$start = getmicrotime(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/13.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/13.phps new file mode 100644 index 000000000..4fb0f317e --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/13.phps @@ -0,0 +1,99 @@ +getTimestamp()); + +echo ( '

Using PEAR::Date engine

' ); +echo ( 'Viewing: '.@$_GET['view'].'
' ); +echo ( 'The time is now: '.$date->format('%Y %a %e %T').'
' ); + +$i = 1; +echo ( '

First Iteration

' ); +echo ( '

The first iteration is more "expensive", the calendar data + structures having to be built.

' ); +$start = getmicrotime(); +$c->build(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); + +$i = 1; +echo ( '

Second Iteration

' ); +echo ( '

This second iteration is faster, the data structures + being re-used

' ); +$start = getmicrotime(); +while ( $e = $c->fetch() ) { + $class = strtolower(get_class($e)); + $link ="&y=".$e->thisYear()."&m=".$e->thisMonth()."&d=".$e->thisDay(). + "&h=".$e->thisHour()."&i=".$e->thisMinute()."&s=".$e->thisSecond(); + $method = 'this'.str_replace('calendar_','',$class); + echo ( "".$e->{$method}()." : " ); + if ( ($i % 10) == 0 ) { + echo ( '
' ); + } + $i++; +} +echo ( '

Took: '.(getmicrotime()-$start).' seconds

' ); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/14.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/14.php new file mode 100644 index 000000000..b1c520c80 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/14.php @@ -0,0 +1,141 @@ +build($selectedDays); + +// Construct strings for next/previous links +$PMonth = $month->prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); + +$thisDate = new Date($month->thisMonth('timestamp')); +?> + + + + Calendar using PEAR::Date Engine + + + + + +

Calendar using PEAR::Date Engine

+ + + + + + + + + + + +fetch()) { + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$day->thisYear(). + '&m='.$day->thisMonth(). + '&d='.$day->thisDay(); + + // isFirst() to find start of week + if ($day->isFirst()) + echo "\n"; + + if ($day->isSelected()) { + echo ''."\n"; + } else if ($day->isEmpty()) { + echo ''."\n"; + } else { + echo ''."\n"; + } + + // isLast() to find end of week + if ($day->isLast()) { + echo "\n"; + } +} +?> + + + + + +
+format('%B %Y'); ?> +
MTWTFSS
'.$day->thisDay().' '.$day->thisDay().'
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

'; +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/14.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/14.phps new file mode 100644 index 000000000..b1c520c80 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/14.phps @@ -0,0 +1,141 @@ +build($selectedDays); + +// Construct strings for next/previous links +$PMonth = $month->prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); + +$thisDate = new Date($month->thisMonth('timestamp')); +?> + + + + Calendar using PEAR::Date Engine + + + + + +

Calendar using PEAR::Date Engine

+ + + + + + + + + + + +fetch()) { + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$day->thisYear(). + '&m='.$day->thisMonth(). + '&d='.$day->thisDay(); + + // isFirst() to find start of week + if ($day->isFirst()) + echo "\n"; + + if ($day->isSelected()) { + echo ''."\n"; + } else if ($day->isEmpty()) { + echo ''."\n"; + } else { + echo ''."\n"; + } + + // isLast() to find end of week + if ($day->isLast()) { + echo "\n"; + } +} +?> + + + + + +
+format('%B %Y'); ?> +
MTWTFSS
'.$day->thisDay().' '.$day->thisDay().'
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

'; +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/15.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/15.php new file mode 100644 index 000000000..c13adc563 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/15.php @@ -0,0 +1,58 @@ +getValidator(); +if (!$Validator->isValidWeek()) { + die ('Please enter a valid week!'); +} +*/ +?> + + + + Paging Weeks + + +

Paging Weeks

+

Week: thisWeek().' '.date('F Y',$Week->thisMonth(true)); ?>

+build(); +while ($Day = $Week->fetch()) { + echo '

'.date('jS F',$Day->thisDay(true))."

\n"; +} +$days = $Week->fetchAll(); + +$prevWeek = $Week->prevWeek('array'); +$prevWeekLink = $_SERVER['PHP_SELF']. + '?y='.$prevWeek['year']. + '&m='.$prevWeek['month']. + '&d='.$prevWeek['day']; + +$nextWeek = $Week->nextWeek('array'); +$nextWeekLink = $_SERVER['PHP_SELF']. + '?y='.$nextWeek['year']. + '&m='.$nextWeek['month']. + '&d='.$nextWeek['day']; +?> +

<< | >>

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/15.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/15.phps new file mode 100644 index 000000000..c13adc563 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/15.phps @@ -0,0 +1,58 @@ +getValidator(); +if (!$Validator->isValidWeek()) { + die ('Please enter a valid week!'); +} +*/ +?> + + + + Paging Weeks + + +

Paging Weeks

+

Week: thisWeek().' '.date('F Y',$Week->thisMonth(true)); ?>

+build(); +while ($Day = $Week->fetch()) { + echo '

'.date('jS F',$Day->thisDay(true))."

\n"; +} +$days = $Week->fetchAll(); + +$prevWeek = $Week->prevWeek('array'); +$prevWeekLink = $_SERVER['PHP_SELF']. + '?y='.$prevWeek['year']. + '&m='.$prevWeek['month']. + '&d='.$prevWeek['day']; + +$nextWeek = $Week->nextWeek('array'); +$nextWeekLink = $_SERVER['PHP_SELF']. + '?y='.$nextWeek['year']. + '&m='.$nextWeek['month']. + '&d='.$nextWeek['day']; +?> +

<< | >>

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/16.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/16.php new file mode 100644 index 000000000..2551708a3 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/16.php @@ -0,0 +1,31 @@ +The current month is ' + .$Calendar->thisMonth().' of year '.$Calendar->thisYear().'

'); + +$Uri = & new Calendar_Decorator_Uri($Calendar); +$Uri->setFragments('jahr','monat'); +// $Uri->setSeperator('/'); // Default is & +// $Uri->setScalar(); // Omit variable names +echo ( "
Previous Uri:\t".$Uri->prev('month')."\n" );
+echo ( "This Uri:\t".$Uri->this('month')."\n" );
+echo ( "Next Uri:\t".$Uri->next('month')."\n
" ); +?> +

+Prev : +Next +

\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/16.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/16.phps new file mode 100644 index 000000000..2551708a3 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/16.phps @@ -0,0 +1,31 @@ +The current month is ' + .$Calendar->thisMonth().' of year '.$Calendar->thisYear().'

'); + +$Uri = & new Calendar_Decorator_Uri($Calendar); +$Uri->setFragments('jahr','monat'); +// $Uri->setSeperator('/'); // Default is & +// $Uri->setScalar(); // Omit variable names +echo ( "
Previous Uri:\t".$Uri->prev('month')."\n" );
+echo ( "This Uri:\t".$Uri->this('month')."\n" );
+echo ( "Next Uri:\t".$Uri->next('month')."\n
" ); +?> +

+Prev : +Next +

\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/17.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/17.php new file mode 100644 index 000000000..0cfebce3c --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/17.php @@ -0,0 +1,71 @@ +Calling: Calendar_Decorator_Textual::monthNames('long');
";
+print_r(Calendar_Decorator_Textual::monthNames('long'));
+echo '
'; + +echo "
Calling: Calendar_Decorator_Textual::weekdayNames('two');
";
+print_r(Calendar_Decorator_Textual::weekdayNames('two'));
+echo '
'; + +echo "
Creating: new Calendar_Day(date('Y'), date('n'), date('d'));
"; +$Calendar = new Calendar_Day(date('Y'), date('n'), date('d')); + +// Decorate +$Textual = & new Calendar_Decorator_Textual($Calendar); + +echo '
Previous month is: '.$Textual->prevMonthName('two').'
'; +echo 'This month is: '.$Textual->thisMonthName('short').'
'; +echo 'Next month is: '.$Textual->nextMonthName().'
'; +echo 'Previous day is: '.$Textual->prevDayName().'
'; +echo 'This day is: '.$Textual->thisDayName('short').'
'; +echo 'Next day is: '.$Textual->nextDayName('one').'
'; + +echo "Creating: new Calendar_Month_Weekdays(date('Y'), date('n'), 6); - Saturday is first day of week
"; +$Calendar = new Calendar_Month_Weekdays(date('Y'), date('n'), 6); + +// Decorate +$Textual = & new Calendar_Decorator_Textual($Calendar); +?> +

Rendering calendar....

+ + + +orderedWeekdays('short'); +foreach ($dayheaders as $dayheader) { + echo ''; +} +?> + +build(); +while ($Day = $Calendar->fetch()) { + if ($Day->isFirst()) { + echo "\n"; + } + if ($Day->isEmpty()) { + echo ''; + } else { + echo ''; + } + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
thisMonthName().' '.$Textual->thisYear(); ?>
'.$dayheader.'
 '.$Day->thisDay().'
\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/17.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/17.phps new file mode 100644 index 000000000..0cfebce3c --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/17.phps @@ -0,0 +1,71 @@ +Calling: Calendar_Decorator_Textual::monthNames('long');
";
+print_r(Calendar_Decorator_Textual::monthNames('long'));
+echo '
'; + +echo "
Calling: Calendar_Decorator_Textual::weekdayNames('two');
";
+print_r(Calendar_Decorator_Textual::weekdayNames('two'));
+echo '
'; + +echo "
Creating: new Calendar_Day(date('Y'), date('n'), date('d'));
"; +$Calendar = new Calendar_Day(date('Y'), date('n'), date('d')); + +// Decorate +$Textual = & new Calendar_Decorator_Textual($Calendar); + +echo '
Previous month is: '.$Textual->prevMonthName('two').'
'; +echo 'This month is: '.$Textual->thisMonthName('short').'
'; +echo 'Next month is: '.$Textual->nextMonthName().'
'; +echo 'Previous day is: '.$Textual->prevDayName().'
'; +echo 'This day is: '.$Textual->thisDayName('short').'
'; +echo 'Next day is: '.$Textual->nextDayName('one').'
'; + +echo "Creating: new Calendar_Month_Weekdays(date('Y'), date('n'), 6); - Saturday is first day of week
"; +$Calendar = new Calendar_Month_Weekdays(date('Y'), date('n'), 6); + +// Decorate +$Textual = & new Calendar_Decorator_Textual($Calendar); +?> +

Rendering calendar....

+ + + +orderedWeekdays('short'); +foreach ($dayheaders as $dayheader) { + echo ''; +} +?> + +build(); +while ($Day = $Calendar->fetch()) { + if ($Day->isFirst()) { + echo "\n"; + } + if ($Day->isEmpty()) { + echo ''; + } else { + echo ''; + } + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
thisMonthName().' '.$Textual->thisYear(); ?>
'.$dayheader.'
 '.$Day->thisDay().'
\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/18.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/18.php new file mode 100644 index 000000000..7ec2a4988 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/18.php @@ -0,0 +1,36 @@ +'.parent::thisDay().''; + } +} + +$Month = new Calendar_Month(date('Y'), date('n')); + +$Wrapper = & new Calendar_Decorator_Wrapper($Month); +$Wrapper->build(); + +echo '

The Wrapper decorator

'; +echo 'Day numbers are rendered in bold

'; +while ($DecoratedDay = $Wrapper->fetch('MyBoldDecorator')) { + echo $DecoratedDay->thisDay().'
'; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/18.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/18.phps new file mode 100644 index 000000000..7ec2a4988 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/18.phps @@ -0,0 +1,36 @@ +'.parent::thisDay().''; + } +} + +$Month = new Calendar_Month(date('Y'), date('n')); + +$Wrapper = & new Calendar_Decorator_Wrapper($Month); +$Wrapper->build(); + +echo '

The Wrapper decorator

'; +echo 'Day numbers are rendered in bold

'; +while ($DecoratedDay = $Wrapper->fetch('MyBoldDecorator')) { + echo $DecoratedDay->thisDay().'
'; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/19.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/19.php new file mode 100644 index 000000000..e46d10759 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/19.php @@ -0,0 +1,24 @@ +setFirstDay(0); // Make Sunday first Day + +echo 'Yesterday: '.$WeekDay->prevWeekDay().'
'; +echo 'Today: '.$WeekDay->thisWeekDay().'
'; +echo 'Tomorrow: '.$WeekDay->nextWeekDay().'
'; + +$WeekDay->build(); +echo 'Hours today:
'; +while ( $Hour = $WeekDay->fetch() ) { + echo $Hour->thisHour().'
'; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/19.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/19.phps new file mode 100644 index 000000000..e46d10759 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/19.phps @@ -0,0 +1,24 @@ +setFirstDay(0); // Make Sunday first Day + +echo 'Yesterday: '.$WeekDay->prevWeekDay().'
'; +echo 'Today: '.$WeekDay->thisWeekDay().'
'; +echo 'Tomorrow: '.$WeekDay->nextWeekDay().'
'; + +$WeekDay->build(); +echo 'Hours today:
'; +while ( $Hour = $WeekDay->fetch() ) { + echo $Hour->thisHour().'
'; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/2.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/2.php new file mode 100644 index 000000000..1f7654d70 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/2.php @@ -0,0 +1,142 @@ +build(); + +// Construct strings for next/previous links +$PMonth = $Month->prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $Month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); +?> + + + + Calendar + + + + +

Build with Calendar_Month_Weeks::build() then Calendar_Week::build()

+ + + + + + + + + + + +fetch()) { + echo "\n"; + // Build the days in the week, passing the selected days + $Week->build($selectedDays); + while ($Day = $Week->fetch()) { + + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$Day->thisYear(). + '&m='.$Day->thisMonth(). + '&d='.$Day->thisDay(); + + // Check to see if day is selected + if ($Day->isSelected()) { + echo ''."\n"; + // Check to see if day is empty + } else if ($Day->isEmpty()) { + echo ''."\n"; + } else { + echo ''."\n"; + } + } + echo ''."\n"; +} +?> + + + + + +
+getTimeStamp()); ?> +
MTWTFSS
'.$Day->thisDay().''.$Day->thisDay().''.$Day->thisDay().'
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

'; +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/2.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/2.phps new file mode 100644 index 000000000..1f7654d70 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/2.phps @@ -0,0 +1,142 @@ +build(); + +// Construct strings for next/previous links +$PMonth = $Month->prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $Month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); +?> + + + + Calendar + + + + +

Build with Calendar_Month_Weeks::build() then Calendar_Week::build()

+ + + + + + + + + + + +fetch()) { + echo "\n"; + // Build the days in the week, passing the selected days + $Week->build($selectedDays); + while ($Day = $Week->fetch()) { + + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$Day->thisYear(). + '&m='.$Day->thisMonth(). + '&d='.$Day->thisDay(); + + // Check to see if day is selected + if ($Day->isSelected()) { + echo ''."\n"; + // Check to see if day is empty + } else if ($Day->isEmpty()) { + echo ''."\n"; + } else { + echo ''."\n"; + } + } + echo ''."\n"; +} +?> + + + + + +
+getTimeStamp()); ?> +
MTWTFSS
'.$Day->thisDay().''.$Day->thisDay().''.$Day->thisDay().'
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

'; +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/20.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/20.php new file mode 100644 index 000000000..16a519fa8 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/20.php @@ -0,0 +1,240 @@ +entries[] = $entry; + } + + function getEntry() { + $entry = each($this->entries); + if ($entry) { + return $entry['value']; + } else { + reset($this->entries); + return false; + } + } +} + +class MonthPayload_Decorator extends Calendar_Decorator +{ + //Calendar engine + var $cE; + var $tableHelper; + + var $year; + var $month; + var $firstDay = false; + + function build($events=array()) + { + require_once CALENDAR_ROOT . 'Day.php'; + require_once CALENDAR_ROOT . 'Table/Helper.php'; + + $this->tableHelper = & new Calendar_Table_Helper($this, $this->firstDay); + $this->cE = & $this->getEngine(); + $this->year = $this->thisYear(); + $this->month = $this->thisMonth(); + + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $Day = new Calendar_Day(2000,1,1); // Create Day with dummy values + $Day->setTimeStamp($this->cE->dateToStamp($this->year, $this->month, $i)); + $this->children[$i] = new DiaryEvent($Day); + } + if (count($events) > 0) { + $this->setSelection($events); + } + Calendar_Month_Weekdays::buildEmptyDaysBefore(); + Calendar_Month_Weekdays::shiftDays(); + Calendar_Month_Weekdays::buildEmptyDaysAfter(); + Calendar_Month_Weekdays::setWeekMarkers(); + return true; + } + + function setSelection($events) + { + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $stamp1 = $this->cE->dateToStamp($this->year, $this->month, $i); + $stamp2 = $this->cE->dateToStamp($this->year, $this->month, $i+1); + foreach ($events as $event) { + if (($stamp1 >= $event['start'] && $stamp1 < $event['end']) || + ($stamp2 >= $event['start'] && $stamp2 < $event['end']) || + ($stamp1 <= $event['start'] && $stamp2 > $event['end']) + ) { + $this->children[$i]->addEntry($event); + $this->children[$i]->setSelected(); + } + } + } + } + + function fetch() + { + $child = each($this->children); + if ($child) { + return $child['value']; + } else { + reset($this->children); + return false; + } + } +} + +// Calendar instance used to get the dates in the preferred format: +// you can switch Calendar Engine and the example still works +$cal = new Calendar; + +$events = array(); +//add some events +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 1, 10), + 'end' => $cal->cE->dateToStamp(2004, 6, 1, 12), + 'desc' => 'Important meeting' +); +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 1, 21), + 'end' => $cal->cE->dateToStamp(2004, 6, 1, 23, 59), + 'desc' => 'Dinner with the boss' +); +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 5), + 'end' => $cal->cE->dateToStamp(2004, 6, 10, 23, 59), + 'desc' => 'Holidays!' +); + + + +$Month = & new Calendar_Month_Weekdays(2004, 6); +$MonthDecorator = new MonthPayload_Decorator($Month); +$MonthDecorator->build($events); + +?> + + + + Calendar + + + + + +

Sample Calendar Payload Decorator (using engine)

+ + + + + + + + + + + +fetch()) { + + if ($Day->isFirst()) { + echo "\n"; + } + + echo ''; + + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
+ thisMonth().' / '.$MonthDecorator->thisYear(); ?> +
MondayTuesdayWednesdayThursdayFridaySaturdaySunday
'; + echo '
'.$Day->thisDay().'
'; + + if ($Day->isEmpty()) { + echo ' '; + } else { + echo '
    '; + while ($entry = $Day->getEntry()) { + echo '
  • '.$entry['desc'].'
    • '; + //you can print the time range as well + } + echo '
'; + } + echo '
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/20.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/20.phps new file mode 100644 index 000000000..16a519fa8 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/20.phps @@ -0,0 +1,240 @@ +entries[] = $entry; + } + + function getEntry() { + $entry = each($this->entries); + if ($entry) { + return $entry['value']; + } else { + reset($this->entries); + return false; + } + } +} + +class MonthPayload_Decorator extends Calendar_Decorator +{ + //Calendar engine + var $cE; + var $tableHelper; + + var $year; + var $month; + var $firstDay = false; + + function build($events=array()) + { + require_once CALENDAR_ROOT . 'Day.php'; + require_once CALENDAR_ROOT . 'Table/Helper.php'; + + $this->tableHelper = & new Calendar_Table_Helper($this, $this->firstDay); + $this->cE = & $this->getEngine(); + $this->year = $this->thisYear(); + $this->month = $this->thisMonth(); + + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $Day = new Calendar_Day(2000,1,1); // Create Day with dummy values + $Day->setTimeStamp($this->cE->dateToStamp($this->year, $this->month, $i)); + $this->children[$i] = new DiaryEvent($Day); + } + if (count($events) > 0) { + $this->setSelection($events); + } + Calendar_Month_Weekdays::buildEmptyDaysBefore(); + Calendar_Month_Weekdays::shiftDays(); + Calendar_Month_Weekdays::buildEmptyDaysAfter(); + Calendar_Month_Weekdays::setWeekMarkers(); + return true; + } + + function setSelection($events) + { + $daysInMonth = $this->cE->getDaysInMonth($this->year, $this->month); + for ($i=1; $i<=$daysInMonth; $i++) { + $stamp1 = $this->cE->dateToStamp($this->year, $this->month, $i); + $stamp2 = $this->cE->dateToStamp($this->year, $this->month, $i+1); + foreach ($events as $event) { + if (($stamp1 >= $event['start'] && $stamp1 < $event['end']) || + ($stamp2 >= $event['start'] && $stamp2 < $event['end']) || + ($stamp1 <= $event['start'] && $stamp2 > $event['end']) + ) { + $this->children[$i]->addEntry($event); + $this->children[$i]->setSelected(); + } + } + } + } + + function fetch() + { + $child = each($this->children); + if ($child) { + return $child['value']; + } else { + reset($this->children); + return false; + } + } +} + +// Calendar instance used to get the dates in the preferred format: +// you can switch Calendar Engine and the example still works +$cal = new Calendar; + +$events = array(); +//add some events +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 1, 10), + 'end' => $cal->cE->dateToStamp(2004, 6, 1, 12), + 'desc' => 'Important meeting' +); +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 1, 21), + 'end' => $cal->cE->dateToStamp(2004, 6, 1, 23, 59), + 'desc' => 'Dinner with the boss' +); +$events[] = array( + 'start' => $cal->cE->dateToStamp(2004, 6, 5), + 'end' => $cal->cE->dateToStamp(2004, 6, 10, 23, 59), + 'desc' => 'Holidays!' +); + + + +$Month = & new Calendar_Month_Weekdays(2004, 6); +$MonthDecorator = new MonthPayload_Decorator($Month); +$MonthDecorator->build($events); + +?> + + + + Calendar + + + + + +

Sample Calendar Payload Decorator (using engine)

+ + + + + + + + + + + +fetch()) { + + if ($Day->isFirst()) { + echo "\n"; + } + + echo ''; + + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
+ thisMonth().' / '.$MonthDecorator->thisYear(); ?> +
MondayTuesdayWednesdayThursdayFridaySaturdaySunday
'; + echo '
'.$Day->thisDay().'
'; + + if ($Day->isEmpty()) { + echo ' '; + } else { + echo '
    '; + while ($entry = $Day->getEntry()) { + echo '
  • '.$entry['desc'].'
    • '; + //you can print the time range as well + } + echo '
'; + } + echo '
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/21.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/21.php new file mode 100644 index 000000000..dbdd68aec --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/21.php @@ -0,0 +1,139 @@ +build(); +?> + + + + <?php echo $Year->thisYear(); ?> + + + + + +fetch()) { + + switch ($i) { + case 0: + echo "\n"; + break; + case 3: + case 6: + case 9: + echo "\n\n"; + break; + case 12: + echo "\n"; + break; + } + + echo "\n"; + + $i++; +} +?> +
+thisYear(); ?> + + + +
\n\n"; + echo ''; + echo ''."\n"; + echo "\n\n"; + $Month->build(); + while ($Week = $Month->fetch()) { + echo "\n"; + echo '\n"; + $Week->build(); + + while ($Day = $Week->fetch()) { + if ($Day->isEmpty()) { + echo "\n"; + } else { + echo "\n"; + } + } + } + echo "
'.date('F', $Month->thisMonth(TRUE)).'
WeekMTWTFSS
'.$Week->thisWeek($_GET['week_type'])." ".$Day->thisDay()."
\n
+

Took:

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/21.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/21.phps new file mode 100644 index 000000000..dbdd68aec --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/21.phps @@ -0,0 +1,139 @@ +build(); +?> + + + + <?php echo $Year->thisYear(); ?> + + + + + +fetch()) { + + switch ($i) { + case 0: + echo "\n"; + break; + case 3: + case 6: + case 9: + echo "\n\n"; + break; + case 12: + echo "\n"; + break; + } + + echo "\n"; + + $i++; +} +?> +
+thisYear(); ?> + + + +
\n\n"; + echo ''; + echo ''."\n"; + echo "\n\n"; + $Month->build(); + while ($Week = $Month->fetch()) { + echo "\n"; + echo '\n"; + $Week->build(); + + while ($Day = $Week->fetch()) { + if ($Day->isEmpty()) { + echo "\n"; + } else { + echo "\n"; + } + } + } + echo "
'.date('F', $Month->thisMonth(TRUE)).'
WeekMTWTFSS
'.$Week->thisWeek($_GET['week_type'])." ".$Day->thisDay()."
\n
+

Took:

+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/22.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/22.php new file mode 100644 index 000000000..089c53606 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/22.php @@ -0,0 +1,46 @@ +The current month is ' + .$Calendar->thisMonth().' of year '.$Calendar->thisYear().'

'); + +$Uri = & new Calendar_Util_Uri('jahr','monat'); +$Uri->setFragments('jahr','monat'); + +echo "\"Vector\" URIs
";
+echo ( "Previous Uri:\t".htmlentities($Uri->prev($Calendar, 'month'))."\n" );
+echo ( "This Uri:\t".htmlentities($Uri->this($Calendar,  'month'))."\n" );
+echo ( "Next Uri:\t".htmlentities($Uri->next($Calendar, 'month'))."\n" );
+echo "
"; + +// Switch to scalar URIs +$Uri->separator = '/'; // Default is & +$Uri->scalar = true; // Omit variable names + +echo "\"Scalar\" URIs
";
+echo ( "Previous Uri:\t".$Uri->prev($Calendar, 'month')."\n" );
+echo ( "This Uri:\t".$Uri->this($Calendar,  'month')."\n" );
+echo ( "Next Uri:\t".$Uri->next($Calendar, 'month')."\n" );
+echo "
"; + +// Restore the vector URIs +$Uri->separator = '&'; +$Uri->scalar = false; +?> +

+Prev : +Next +

\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/22.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/22.phps new file mode 100644 index 000000000..089c53606 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/22.phps @@ -0,0 +1,46 @@ +The current month is ' + .$Calendar->thisMonth().' of year '.$Calendar->thisYear().'

'); + +$Uri = & new Calendar_Util_Uri('jahr','monat'); +$Uri->setFragments('jahr','monat'); + +echo "\"Vector\" URIs
";
+echo ( "Previous Uri:\t".htmlentities($Uri->prev($Calendar, 'month'))."\n" );
+echo ( "This Uri:\t".htmlentities($Uri->this($Calendar,  'month'))."\n" );
+echo ( "Next Uri:\t".htmlentities($Uri->next($Calendar, 'month'))."\n" );
+echo "
"; + +// Switch to scalar URIs +$Uri->separator = '/'; // Default is & +$Uri->scalar = true; // Omit variable names + +echo "\"Scalar\" URIs
";
+echo ( "Previous Uri:\t".$Uri->prev($Calendar, 'month')."\n" );
+echo ( "This Uri:\t".$Uri->this($Calendar,  'month')."\n" );
+echo ( "Next Uri:\t".$Uri->next($Calendar, 'month')."\n" );
+echo "
"; + +// Restore the vector URIs +$Uri->separator = '&'; +$Uri->scalar = false; +?> +

+Prev : +Next +

\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/23.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/23.php new file mode 100644 index 000000000..3f04b4486 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/23.php @@ -0,0 +1,66 @@ +Calling: Calendar_Util_Textual::monthNames('long');
";
+print_r(Calendar_Util_Textual::monthNames('long'));
+echo '
'; + +echo "
Calling: Calendar_Util_Textual::weekdayNames('two');
";
+print_r(Calendar_Util_Textual::weekdayNames('two'));
+echo '
'; + +echo "
Creating: new Calendar_Day(date('Y'), date('n'), date('d'));
"; +$Calendar = new Calendar_Day(date('Y'), date('n'), date('d')); + +echo '
Previous month is: '.Calendar_Util_Textual::prevMonthName($Calendar,'two').'
'; +echo 'This month is: '.Calendar_Util_Textual::thisMonthName($Calendar,'short').'
'; +echo 'Next month is: '.Calendar_Util_Textual::nextMonthName($Calendar).'
'; +echo 'Previous day is: '.Calendar_Util_Textual::prevDayName($Calendar).'
'; +echo 'This day is: '.Calendar_Util_Textual::thisDayName($Calendar,'short').'
'; +echo 'Next day is: '.Calendar_Util_Textual::nextDayName($Calendar,'one').'
'; + +echo "Creating: new Calendar_Month_Weekdays(date('Y'), date('n'), 6); - Saturday is first day of week
"; +$Calendar = new Calendar_Month_Weekdays(date('Y'), date('n'), 6); + +?> +

Rendering calendar....

+ + + +'.$dayheader.''; +} +?> + +build(); +while ($Day = $Calendar->fetch()) { + if ($Day->isFirst()) { + echo "\n"; + } + if ($Day->isEmpty()) { + echo ''; + } else { + echo ''; + } + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
thisYear(); ?>
 '.$Day->thisDay().'
\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/23.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/23.phps new file mode 100644 index 000000000..3f04b4486 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/23.phps @@ -0,0 +1,66 @@ +Calling: Calendar_Util_Textual::monthNames('long');
";
+print_r(Calendar_Util_Textual::monthNames('long'));
+echo '
'; + +echo "
Calling: Calendar_Util_Textual::weekdayNames('two');
";
+print_r(Calendar_Util_Textual::weekdayNames('two'));
+echo '
'; + +echo "
Creating: new Calendar_Day(date('Y'), date('n'), date('d'));
"; +$Calendar = new Calendar_Day(date('Y'), date('n'), date('d')); + +echo '
Previous month is: '.Calendar_Util_Textual::prevMonthName($Calendar,'two').'
'; +echo 'This month is: '.Calendar_Util_Textual::thisMonthName($Calendar,'short').'
'; +echo 'Next month is: '.Calendar_Util_Textual::nextMonthName($Calendar).'
'; +echo 'Previous day is: '.Calendar_Util_Textual::prevDayName($Calendar).'
'; +echo 'This day is: '.Calendar_Util_Textual::thisDayName($Calendar,'short').'
'; +echo 'Next day is: '.Calendar_Util_Textual::nextDayName($Calendar,'one').'
'; + +echo "Creating: new Calendar_Month_Weekdays(date('Y'), date('n'), 6); - Saturday is first day of week
"; +$Calendar = new Calendar_Month_Weekdays(date('Y'), date('n'), 6); + +?> +

Rendering calendar....

+ + + +'.$dayheader.''; +} +?> + +build(); +while ($Day = $Calendar->fetch()) { + if ($Day->isFirst()) { + echo "\n"; + } + if ($Day->isEmpty()) { + echo ''; + } else { + echo ''; + } + if ($Day->isLast()) { + echo "\n"; + } +} +?> +
thisYear(); ?>
 '.$Day->thisDay().'
\ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/3.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/3.php new file mode 100644 index 000000000..f92dcbbc9 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/3.php @@ -0,0 +1,134 @@ +prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $Month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); +?> + + + + Calendar + + + + + +build($selectedDays); +?> +

Built with Calendar_Month_Weekday::build()

+ + + + + + + + + + + +fetch() ) { + + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$Day->thisYear(). + '&m='.$Day->thisMonth(). + '&d='.$Day->thisDay(); + + // isFirst() to find start of week + if ( $Day->isFirst() ) + echo ( "\n" ); + + if ( $Day->isSelected() ) { + echo ( "\n" ); + } else if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + + // isLast() to find end of week + if ( $Day->isLast() ) + echo ( "\n" ); +} +?> + + + + + +
+getTimeStamp())); ?> +
MTWTFSS
".$Day->thisDay()." ".$Day->thisDay()."
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

' ); +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/3.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/3.phps new file mode 100644 index 000000000..f92dcbbc9 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/3.phps @@ -0,0 +1,134 @@ +prevMonth('object'); // Get previous month as object +$prev = $_SERVER['PHP_SELF'].'?y='.$PMonth->thisYear().'&m='.$PMonth->thisMonth().'&d='.$PMonth->thisDay(); +$NMonth = $Month->nextMonth('object'); +$next = $_SERVER['PHP_SELF'].'?y='.$NMonth->thisYear().'&m='.$NMonth->thisMonth().'&d='.$NMonth->thisDay(); +?> + + + + Calendar + + + + + +build($selectedDays); +?> +

Built with Calendar_Month_Weekday::build()

+ + + + + + + + + + + +fetch() ) { + + // Build a link string for each day + $link = $_SERVER['PHP_SELF']. + '?y='.$Day->thisYear(). + '&m='.$Day->thisMonth(). + '&d='.$Day->thisDay(); + + // isFirst() to find start of week + if ( $Day->isFirst() ) + echo ( "\n" ); + + if ( $Day->isSelected() ) { + echo ( "\n" ); + } else if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + + // isLast() to find end of week + if ( $Day->isLast() ) + echo ( "\n" ); +} +?> + + + + + +
+getTimeStamp())); ?> +
MTWTFSS
".$Day->thisDay()." ".$Day->thisDay()."
+<< +  + >> +
+Took: '.(getmicrotime()-$start).' seconds

' ); +?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/4.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/4.php new file mode 100644 index 000000000..034813ee3 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/4.php @@ -0,0 +1,49 @@ +Result: '.$Unit->thisYear().'-'.$Unit->thisMonth().'-'.$Unit->thisDay(). + ' '.$Unit->thisHour().':'.$Unit->thisMinute().':'.$Unit->thisSecond(); +if ($Unit->isValid()) { + echo ' is valid!

'; +} else { + $V= & $Unit->getValidator(); + echo ' is invalid:

'; + while ($error = $V->fetch()) { + echo $error->toString() .'
'; + } +} +?> +

Enter a date / time to validate:

+ +Year:
+Month:
+Day:
+Hour:
+Minute:
+Second:
+ + +

Note: Error messages can be controlled with the constants CALENDAR_VALUE_TOOSMALL and CALENDAR_VALUE_TOOLARGE - see Calendar_Validator.php

+ +Took: '.(getmicrotime()-$start).' seconds

'; ?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/4.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/4.phps new file mode 100644 index 000000000..034813ee3 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/4.phps @@ -0,0 +1,49 @@ +Result: '.$Unit->thisYear().'-'.$Unit->thisMonth().'-'.$Unit->thisDay(). + ' '.$Unit->thisHour().':'.$Unit->thisMinute().':'.$Unit->thisSecond(); +if ($Unit->isValid()) { + echo ' is valid!

'; +} else { + $V= & $Unit->getValidator(); + echo ' is invalid:

'; + while ($error = $V->fetch()) { + echo $error->toString() .'
'; + } +} +?> +

Enter a date / time to validate:

+
+Year:
+Month:
+Day:
+Hour:
+Minute:
+Second:
+ +
+

Note: Error messages can be controlled with the constants CALENDAR_VALUE_TOOSMALL and CALENDAR_VALUE_TOOLARGE - see Calendar_Validator.php

+ +Took: '.(getmicrotime()-$start).' seconds

'; ?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/5.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/5.php new file mode 100644 index 000000000..ce5ae7e00 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/5.php @@ -0,0 +1,132 @@ + + + + + Select and Update + + +

Select and Update

+isValid() ) { + $V= & $Second->getValidator(); + echo ('

Validation failed:

' ); + while ( $error = $V->fetch() ) { + echo ( $error->toString() .'
' ); + } + } else { + echo ('

Validation success.

' ); + echo ( '

New timestamp is: '.$Second->getTimeStamp().' which could be used to update a database, for example'); + } +} else { +$Year = new Calendar_Year($_POST['y']); +$Month = new Calendar_Month($_POST['y'],$_POST['m']); +$Day = new Calendar_Day($_POST['y'],$_POST['m'],$_POST['d']); +$Hour = new Calendar_Hour($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h']); +$Minute = new Calendar_Minute($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h'],$_POST['i']); +$Second = new Calendar_Second($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h'],$_POST['i'],$_POST['s']); +?> +

Set the alarm clock

+
+Year:   +Month:  +Day:  +Hour:  +Minute:  +Second:  +
+ +Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/5.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/5.phps new file mode 100644 index 000000000..ce5ae7e00 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/5.phps @@ -0,0 +1,132 @@ + + + + + Select and Update + + +

Select and Update

+isValid() ) { + $V= & $Second->getValidator(); + echo ('

Validation failed:

' ); + while ( $error = $V->fetch() ) { + echo ( $error->toString() .'
' ); + } + } else { + echo ('

Validation success.

' ); + echo ( '

New timestamp is: '.$Second->getTimeStamp().' which could be used to update a database, for example'); + } +} else { +$Year = new Calendar_Year($_POST['y']); +$Month = new Calendar_Month($_POST['y'],$_POST['m']); +$Day = new Calendar_Day($_POST['y'],$_POST['m'],$_POST['d']); +$Hour = new Calendar_Hour($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h']); +$Minute = new Calendar_Minute($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h'],$_POST['i']); +$Second = new Calendar_Second($_POST['y'],$_POST['m'],$_POST['d'],$_POST['h'],$_POST['i'],$_POST['s']); +?> +

Set the alarm clock

+ +Year:   +Month:  +Day:  +Hour:  +Minute:  +Second:  +
+ +Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/6.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/6.php new file mode 100644 index 000000000..591c05d7e --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/6.php @@ -0,0 +1,210 @@ +' ); +?> + + +Personal Planner Rendered with WML + +

Viewing getTimeStamp()) ); ?>

+

+ +Back to Month View +"/> + +

+ +build(); + while ( $Hour = & $Day->fetch() ) { + echo ( "\n" ); + echo ( "\n" ); + echo ( "\n" ); + } +?> +
".date('g a',$Hour->getTimeStamp())."Free time!
+ +

getTimeStamp()) ); ?>

+ + + + +build($selection); +while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else if ( $Day->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } +} +?> + + + + + +
MTWTFSS
".$Day->thisDay()."\nthisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&mime=wml\" />\n".$Day->thisDay()."\nthisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&mime=wml\" />
+ +<< +"/> + + + +>> +"/> + +
+ + +

Back to HTML

+Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + + + + + HTML (+WML) Personal Planner + + +

Personal Planner Rendered with HTML

+

To view in WML, click here or place a ?mime=wml at the end of any URL. +Note that Opera supports WML natively and Mozilla / Firefox has the WMLBrowser +plugin: wmlbrowser.mozdev.org

+ +

Viewing getTimeStamp()) ); ?>

+

+ +Back to Month View +

+ +build(); + while ( $Hour = & $Day->fetch() ) { + echo ( "\n" ); + echo ( "\n" ); + echo ( "\n" ); + } +?> +
".date('g a',$Hour->getTimeStamp())."Free time!
+ +

getTimeStamp()) ); ?>

+ + + + +build($selection); +while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else if ( $Day->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } +} +?> + + + + + +
MTWTFSS
thisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&wml\">".$Day->thisDay()."thisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "\">".$Day->thisDay()."
+ +<< + +>> +
+ + + + +Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/6.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/6.phps new file mode 100644 index 000000000..591c05d7e --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/6.phps @@ -0,0 +1,210 @@ +' ); +?> + + +Personal Planner Rendered with WML + +

Viewing getTimeStamp()) ); ?>

+

+ +Back to Month View +"/> + +

+ +build(); + while ( $Hour = & $Day->fetch() ) { + echo ( "\n" ); + echo ( "\n" ); + echo ( "\n" ); + } +?> +
".date('g a',$Hour->getTimeStamp())."Free time!
+ +

getTimeStamp()) ); ?>

+ + + + +build($selection); +while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else if ( $Day->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } +} +?> + + + + + +
MTWTFSS
".$Day->thisDay()."\nthisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&mime=wml\" />\n".$Day->thisDay()."\nthisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&mime=wml\" />
+ +<< +"/> + + + +>> +"/> + +
+ + +

Back to HTML

+Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + + + + + HTML (+WML) Personal Planner + + +

Personal Planner Rendered with HTML

+

To view in WML, click here or place a ?mime=wml at the end of any URL. +Note that Opera supports WML natively and Mozilla / Firefox has the WMLBrowser +plugin: wmlbrowser.mozdev.org

+ +

Viewing getTimeStamp()) ); ?>

+

+ +Back to Month View +

+ +build(); + while ( $Hour = & $Day->fetch() ) { + echo ( "\n" ); + echo ( "\n" ); + echo ( "\n" ); + } +?> +
".date('g a',$Hour->getTimeStamp())."Free time!
+ +

getTimeStamp()) ); ?>

+ + + + +build($selection); +while ( $Day = $Month->fetch() ) { + if ( $Day->isFirst() ) { + echo ( "\n" ); + } + if ( $Day->isEmpty() ) { + echo ( "\n" ); + } else if ( $Day->isSelected() ) { + echo ( "\n" ); + } else { + echo ( "\n" ); + } + if ( $Day->isLast() ) { + echo ( "\n" ); + } +} +?> + + + + + +
MTWTFSS
thisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "&wml\">".$Day->thisDay()."thisYear()."&m=".$Day->thisMonth()."&d=".$Day->thisDay(). + "\">".$Day->thisDay()."
+ +<< + +>> +
+ + + + +Took: '.(getmicrotime()-$start).' seconds

' ); ?> + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/7.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/7.php new file mode 100644 index 000000000..bdffd956c --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/7.php @@ -0,0 +1,92 @@ +__dispatch_map['getMonth'] = + array('in' => array('year' => 'int', 'month'=>'int'), + 'out' => array('month' => '{urn:PEAR_SOAP_Calendar}Month'), + ); + $this->__typedef['Month'] = array ( + 'monthname' => 'string', + 'days' => '{urn:PEAR_SOAP_Calendar}MonthDays' + ); + $this->__typedef['MonthDays'] = array (array ('{urn:PEAR_SOAP_Calendar}Day')); + $this->__typedef['Day'] = array ( + 'isFirst' => 'int', + 'isLast' => 'int', + 'isEmpty' => 'int', + 'day' => 'int' ); + } + + function __dispatch($methodname) + { + if (isset($this->__dispatch_map[$methodname])) + return $this->__dispatch_map[$methodname]; + return NULL; + } + + function getMonth($year, $month) + { + require_once(CALENDAR_ROOT.'Month'.DIRECTORY_SEPARATOR.'Weekdays.php'); + $Month = & new Calendar_Month_Weekdays($year,$month); + if (!$Month->isValid()) { + $V = & $Month->getValidator(); + $errorMsg = ''; + while ($error = $V->fetch()) { + $errorMsg .= $error->toString()."\n"; + } + return new SOAP_Fault($errorMsg, 'Client'); + } else { + $monthname = date('F Y', $Month->getTimeStamp()); + $days = array(); + $Month->build(); + while ($Day = & $Month->fetch()) { + $day = array( + 'isFirst' => (int)$Day->isFirst(), + 'isLast' => (int)$Day->isLast(), + 'isEmpty' => (int)$Day->isEmpty(), + 'day' => (int)$Day->thisDay(), + ); + $days[] = $day; + } + return array('monthname' => $monthname, 'days' => $days); + } + } +} + +$server = new SOAP_Server(); +$server->_auto_translation = true; +$calendar = new Calendar_Server(); +$server->addObjectMap($calendar, 'urn:PEAR_SOAP_Calendar'); + +if (strtoupper($_SERVER['REQUEST_METHOD'])=='POST') { + $server->service($GLOBALS['HTTP_RAW_POST_DATA']); +} else { + require_once 'SOAP'.DIRECTORY_SEPARATOR.'Disco.php'; + $disco = new SOAP_DISCO_Server($server, "PEAR_SOAP_Calendar"); + if (isset($_SERVER['QUERY_STRING']) && + strcasecmp($_SERVER['QUERY_STRING'], 'wsdl')==0) { + header("Content-type: text/xml"); + echo $disco->getWSDL(); + } else { + echo 'This is a PEAR::SOAP Calendar Server. For client try here
'; + echo 'For WSDL try here'; + } + exit; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/7.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/7.phps new file mode 100644 index 000000000..bdffd956c --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/7.phps @@ -0,0 +1,92 @@ +__dispatch_map['getMonth'] = + array('in' => array('year' => 'int', 'month'=>'int'), + 'out' => array('month' => '{urn:PEAR_SOAP_Calendar}Month'), + ); + $this->__typedef['Month'] = array ( + 'monthname' => 'string', + 'days' => '{urn:PEAR_SOAP_Calendar}MonthDays' + ); + $this->__typedef['MonthDays'] = array (array ('{urn:PEAR_SOAP_Calendar}Day')); + $this->__typedef['Day'] = array ( + 'isFirst' => 'int', + 'isLast' => 'int', + 'isEmpty' => 'int', + 'day' => 'int' ); + } + + function __dispatch($methodname) + { + if (isset($this->__dispatch_map[$methodname])) + return $this->__dispatch_map[$methodname]; + return NULL; + } + + function getMonth($year, $month) + { + require_once(CALENDAR_ROOT.'Month'.DIRECTORY_SEPARATOR.'Weekdays.php'); + $Month = & new Calendar_Month_Weekdays($year,$month); + if (!$Month->isValid()) { + $V = & $Month->getValidator(); + $errorMsg = ''; + while ($error = $V->fetch()) { + $errorMsg .= $error->toString()."\n"; + } + return new SOAP_Fault($errorMsg, 'Client'); + } else { + $monthname = date('F Y', $Month->getTimeStamp()); + $days = array(); + $Month->build(); + while ($Day = & $Month->fetch()) { + $day = array( + 'isFirst' => (int)$Day->isFirst(), + 'isLast' => (int)$Day->isLast(), + 'isEmpty' => (int)$Day->isEmpty(), + 'day' => (int)$Day->thisDay(), + ); + $days[] = $day; + } + return array('monthname' => $monthname, 'days' => $days); + } + } +} + +$server = new SOAP_Server(); +$server->_auto_translation = true; +$calendar = new Calendar_Server(); +$server->addObjectMap($calendar, 'urn:PEAR_SOAP_Calendar'); + +if (strtoupper($_SERVER['REQUEST_METHOD'])=='POST') { + $server->service($GLOBALS['HTTP_RAW_POST_DATA']); +} else { + require_once 'SOAP'.DIRECTORY_SEPARATOR.'Disco.php'; + $disco = new SOAP_DISCO_Server($server, "PEAR_SOAP_Calendar"); + if (isset($_SERVER['QUERY_STRING']) && + strcasecmp($_SERVER['QUERY_STRING'], 'wsdl')==0) { + header("Content-type: text/xml"); + echo $disco->getWSDL(); + } else { + echo 'This is a PEAR::SOAP Calendar Server. For client try here
'; + echo 'For WSDL try here'; + } + exit; +} +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/8.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/8.php new file mode 100644 index 000000000..f84887953 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/8.php @@ -0,0 +1,70 @@ +") ) { + die('PHP 5 has problems with PEAR::SOAP Client (8.0RC3) + - remove @ before include below to see why'); +} + +if (!@include('SOAP'.DIRECTORY_SEPARATOR.'Client.php')) { + die('You must have PEAR::SOAP installed'); +} + +// Just to save manaul modification... +$basePath = explode('/', $_SERVER['SCRIPT_NAME']); +array_pop($basePath); +$basePath = implode('/', $basePath); +$url = 'http://'.$_SERVER['SERVER_NAME'].$basePath.'/7.php?wsdl'; + +if (!isset($_GET['y'])) $_GET['y'] = date('Y'); +if (!isset($_GET['m'])) $_GET['m'] = date('n'); + +$wsdl = new SOAP_WSDL ($url); + +echo ( '
'.$wsdl->generateProxyCode().'
' ); + +$calendarClient = $wsdl->getProxy(); + +$month = $calendarClient->getMonth((int)$_GET['y'],(int)$_GET['m']); + +if ( PEAR::isError($month) ) { + die ( $month->toString() ); +} +?> + + + + Calendar over the Wire + + +

Calendar Over the Wire (featuring PEAR::SOAP)

+ + + + + +days as $day ) { + + if ( $day->isFirst === 1 ) + echo ( "\n" ); + if ( $day->isEmpty === 1 ) { + echo ( "" ); + } else { + echo ( "" ); + } + if ( $day->isLast === 1 ) + echo ( "\n" ); +} +?> + +
monthname );?>
MTWTFSS
".$day->day."
+

Enter Year and Month to View:

+ +Year:   +Month:   + + + + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/8.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/8.phps new file mode 100644 index 000000000..f84887953 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/8.phps @@ -0,0 +1,70 @@ +") ) { + die('PHP 5 has problems with PEAR::SOAP Client (8.0RC3) + - remove @ before include below to see why'); +} + +if (!@include('SOAP'.DIRECTORY_SEPARATOR.'Client.php')) { + die('You must have PEAR::SOAP installed'); +} + +// Just to save manaul modification... +$basePath = explode('/', $_SERVER['SCRIPT_NAME']); +array_pop($basePath); +$basePath = implode('/', $basePath); +$url = 'http://'.$_SERVER['SERVER_NAME'].$basePath.'/7.php?wsdl'; + +if (!isset($_GET['y'])) $_GET['y'] = date('Y'); +if (!isset($_GET['m'])) $_GET['m'] = date('n'); + +$wsdl = new SOAP_WSDL ($url); + +echo ( '
'.$wsdl->generateProxyCode().'
' ); + +$calendarClient = $wsdl->getProxy(); + +$month = $calendarClient->getMonth((int)$_GET['y'],(int)$_GET['m']); + +if ( PEAR::isError($month) ) { + die ( $month->toString() ); +} +?> + + + + Calendar over the Wire + + +

Calendar Over the Wire (featuring PEAR::SOAP)

+ + + + + +days as $day ) { + + if ( $day->isFirst === 1 ) + echo ( "\n" ); + if ( $day->isEmpty === 1 ) { + echo ( "" ); + } else { + echo ( "" ); + } + if ( $day->isLast === 1 ) + echo ( "\n" ); +} +?> + +
monthname );?>
MTWTFSS
".$day->day."
+

Enter Year and Month to View:

+
+Year:   +Month:   + +
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/9.php b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/9.php new file mode 100644 index 000000000..4b6a937a4 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/9.php @@ -0,0 +1,16 @@ +getTimeStamp())); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/9.phps b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/9.phps new file mode 100644 index 000000000..4b6a937a4 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/9.phps @@ -0,0 +1,16 @@ +getTimeStamp())); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/index.html b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/index.html new file mode 100644 index 000000000..869b8f3bd --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/Calendar/docs/examples/index.html @@ -0,0 +1,49 @@ + + + + PEAR::Calendar Examples + + + + +

PEAR::Calendar Examples

+

$Id: index.html,v 1.5 2004/08/16 13:15:48 hfuecks Exp $

+
    +
  • 1.php [src] - shows basic usage, passing all the way down from Calendar_Year to Calendar_Second - more of a quick test it's working
    • +
  • 2.php [src] - shows how to build a tabular month using Calendar_Month_Weeks, Calendar_Week, Calendar_Day as well as selecting some dates.
    • +
  • 3.php [src] - shows how to build a tabular month using Calendar_Month_Weekdays and Calendar_Day, as well as selecting some dates (this method is faster).
    • +
  • 4.php [src] - shows how to use PEAR::Calendar for validation.
    • +
  • 5.php [src] - shows PEAR::Calendar in use to help generate a form.
    • +
  • 6.php [src] - a month and day "planner" calendar, which can be rendered both as HTML and WML.
    • +
  • 7.php [src] - a simple SOAP Calendar Server, using PEAR::SOAP and PEAR::Calendar
    • +
  • 8.php [src] - a WSDL SOAP client for the SOAP Calendar Server
    • +
  • 9.php [src] - quick example of i18n with setlocale (not working on SF)
    • +
  • 10.php [src] - an example of extending Calendar_Decorator to modify output
    • +
  • 11.php [src] - attaching a "payload" (e.g. results of a DB query) to a calendar using Calendar_Decorator to allow the payload to be available inside the main loop.
    • +
  • 12.php [src] - a complete year with months.
    • +
  • 13.php [src] - same as 1.php but using Calendar_Engine_PearDate, (see PEAR::Date).
    • +
  • 14.php [src] - same as 3.php but using Calendar_Engine_PearDate
    • +
  • 15.php [src] - paging through weeks
    • +
  • 16.php [src] - demonstrates using the Uri decorator. Note you should prefer Calendar_Util_Uri (see below) in most cases, for performance
    • +
  • 17.php [src] - demonstrates using the Textual decorator
    • +
  • 18.php [src] - demonstrates using the Wrapper decorator
    • +
  • 19.php [src] - demonstrates using the Weekday decorator
    • +
  • 20.php [src] - shows how to attach a "payload" spanning multiple days, with more than one entry per day
    • +
  • 21.php [src] - same as 12.php but using Calendar_Month_Weeks instead of Calendar_Month_Weekdays to allow the week in the year or week in the month to be displayed.
    • +
  • 22.php [src] - demonstrates use of Calendar_Util_Uri.
    • +
  • 23.php [src] - demonstrates use of Calendar_Util_Textual.
    • +
+ + \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/DB/doc/IDEAS b/campcaster/src/tools/pear/src/docs/DB/doc/IDEAS new file mode 100644 index 000000000..afa661a30 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/DB/doc/IDEAS @@ -0,0 +1,90 @@ +Abstracted Types (Stig) +----------------------- + +DB needs a set of types representing the most commonly used types in +all backends. This type set could also be geared towards integration +with things like XML-RPC/SOAP implementations, HTML form classes, etc. + +Real Query Parser (Stig) +------------------------ + +With a real query parser, DB can implement more of its portability +based on the query, instead of having support functions for +everything. One example would be LIMIT, another "INSERT +... RETURNING". + +Portable transactions (Stig) +---------------------------- + +If DB can parse queries enough to determine what tables are affected +by queries, it should be possible to make a replayable transaction +log. GNOME uses an XML format for configuration data that lets you +checkpoint state once in a while, and revert to that state later. +With a similar approach for transactions in DB we can implement +portable transactions and checkpointing even for the databases that +don't support them. + + +Error reporting clean-up/debug (Tomas) +------------------------------------- +Now each driver has its own raiseError method, common has a raiseError and +DB has a DB_error class and its own isError() method. This error stuff +overhead could be simplified with only one raiseError, droping the DB Error +class and also the DB::isError() (use the PEAR.php ones instead). +Other idea could be to add a system for allowing people access to all the +queries sended by PEAR DB to the backend. Also a new PEAR_ERROR_DEBUG +flag that automatically (show|triggers) debug info, perhaps +with a new PEAR_(Warning|Debug) object. + +Quote clean-up (Stig) +--------------------- +1. Keep quote and quoteString, but move quoting of strings back into + quoteString and make quote call it for strings. + +2. Add an optional "operator" parameter to quote that is one of "=", + "<", ">" or "<>" that will be inserted in front of the quoted value + unless it is NULL, in which case it will be converted to "IS" (for + "=") or "IS NOT" (for the others). + +Auto free statements (Tomas) +---------------------------- +By setting a param in query() or for the hole DB instance, PEAR DB +could auto-free results in DB_result->fetch(Into|Row) when the driver +returns false. + +Datatypes in prepare syntax (Tomas) +----------------------------------- +Extend the actual prepare/execute placeholders to support data types, both +to check the data introduced to the query and to "cast" the result +to native php data types. Ex: + +$sql = "INSERT INTO table VALUES ({{int(4)}}, {{bool}}, {{date('Y-m-d')}})"; +$row = $db->query($sql, array(8, 't', '2001-04-1')); + +Format: {{(,)}} + +"param" could be the max lenght of the data, date formats, not_null +checks or default values. + +Other ideas could be: + +1) +$sql = "INSERT INTO table VALUES (?, ?, ?)"; +$sth = $db->prepare($sql, array('int(4)', 'bool', 'date'); +$res = $db->execute($sth, array($a, $b, $c); + +2) +$sql = "INSERT INTO table VALUES (?, ?, ?)"; +$params = array( + 0 => array($a, 'int(4)'), + 1 => array($b, 'bool') +); +$res = $db->query($sql, $params); + +Auto connect feature (Tomas) +---------------------------- +Add the ability to create for example a light and dump DB object which +will only set up the connection when needed. With that people could +create the DB object in a common prepend or default file without the +need to waste system resources if the use of the database is finally +not needed. diff --git a/campcaster/src/tools/pear/src/docs/DB/doc/MAINTAINERS b/campcaster/src/tools/pear/src/docs/DB/doc/MAINTAINERS new file mode 100644 index 000000000..750f6275f --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/DB/doc/MAINTAINERS @@ -0,0 +1,16 @@ +Maintainers for DB database backends/drivers: + +dbase : Daniel Convissor +fbsql : Daniel Convissor + Frank M. Kromann +ibase : Daniel Convissor +ifx : Daniel Convissor +msql : Daniel Convissor +mssql : Daniel Convissor +mysql : Daniel Convissor +mysqli : Daniel Convissor +oci8 : Daniel Convissor +odbc : Daniel Convissor +pgsql : Daniel Convissor +sqlite : Daniel Convissor +sybase : Daniel Convissor diff --git a/campcaster/src/tools/pear/src/docs/DB/doc/STATUS b/campcaster/src/tools/pear/src/docs/DB/doc/STATUS new file mode 100644 index 000000000..cabaeef56 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/DB/doc/STATUS @@ -0,0 +1,93 @@ +STATUS OF THE PEAR DB PACKAGE +============================= + +$Id: STATUS,v 1.33 2005/02/22 15:45:36 danielc Exp $ +------------------------------------------------------------------------ + +DB Driver Feature Matrix +------------------------ +Symbols: + x = implemented, but without tests + t = implemented, but one or more tests fail + T = implemented, passing all tests + e = emulated, without tests + l = emulated, but one or more tests fail + E = emulated, passing all tests + n = returns "not capable" + - = no implementation of this feature or status unknown + + fbsql ifx mssql mysqli odbc sqlite +FEATURE dbase | ibase | msql | mysql | oci8 | pgsql | sybase +simpleQuery - T T T T T T T T T T T T +numCols x T T T T T T T T T T T T +numRows x T E E T T T T E T T T T +errorNative n T T T T T T T T T T E T +prepare/execute e E T E E E E E T E E E E +sequences n T T n T T T T T E T E T +affectedRows n T E E T T T T T T E T T +fetch modes x T T T T T T T T T T T T +fetch row by no x x n n x x x x n x x x x +transactions - T T T n T T T T T T n T +auto-commit n T E E n E E E E T E n E +error mapping - T T T T T T T T T T T T +tableInfo x T T t T T T T T T T T T + +getListOf() TYPES +tables - T T T T T T T T T T T T +views - T T - - T - - - T T - T +users - T T - - - T T - - T - - +databases - - - - T - T T - T T - - +functions - T - - - - - - - - T - - +synonyms - - - - - - - - T - - - - + + +Test Conformance +---------------- +Symbols: + o = Test passed + X = Test failed + L = Some portions of the test failed due to limitations in PHP or DBMS + n = Test returns "not capable" + - = Not tested + + fbsql ifx mssql mysqli odbc sqlite + dbase | ibase | msql | mysql | oci8 | pgsql | sybase +01connect o o o o o o o o o o o o o +02fetch - o o o o o o o o o o o o +03simplequery - o o o o o o o o o o o o +04numcols - o o o o o o o o o o o o +05sequences - o o o o o o o o o o o o +06prepexec - o o o L o o o o o o o o +08affectedrows - o o o o o o o o o o o o +09numrows - o o o o o o o o o o o o +10errormap - o o o o o o o o o o o o +11transactions - o o o n o o o o o o n o +13limit - o o o o o o o o o o o o +14fetchmode_obje - o o o o o o o o o o o o +15quote - o o o o o o o o o o o o +16tableinfo - o o L o o o o o o o o o +17query - o o o o o o o o o o o o +18get - o o o o o o o o o o o o +19getlistof - o o o o o o o o o o o o + + +DBMS Versions Tested +-------------------- +dbase n/a +fbsql 4.1.6 +ibase Firebird 1.5.1 (PHP 5 only) +ifx 7.2 Standard Edtition +msql 3.6 (PHP snapshots dated 2005-02-18) +mssql 8.0.760 +mysql 4.0.21 +mysqli 4.1.5 (PHP 5 only) +oci8 9.2 +odbc DB2 ESE 8.1 and MS Access 2000 +pgsql 7.4.1 and 8.0.1 +sqlite PHP 5: extension. PHP 4: PECL snapshot. +sybase ASE 12.5.3 + +Tests were performed under both of the following PHP versions +unles otherwise noted: + 4.3.11-dev dated 2005-02-22 + 5.1.0-dev dated 2005-02-22 diff --git a/campcaster/src/tools/pear/src/docs/DB/doc/TESTERS b/campcaster/src/tools/pear/src/docs/DB/doc/TESTERS new file mode 100644 index 000000000..0eb4b20f7 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/DB/doc/TESTERS @@ -0,0 +1,156 @@ +=================== +HOW TO TEST PEAR DB +=================== + +$Id: TESTERS,v 1.20 2005/02/16 06:33:12 danielc Exp $ + + +INTRODUCTION +============ + +These are instructions for testing PEAR DB on a Windows machine using a +Cygwin Bash shell. Adjust the paths and commands to match your system. +This configuration is used because these precise steps are known to work. + +NOTE: You must log on as a user which has permissions to modify the +contents of your PHP executable's directory. This is necessary for both +configuring AND running the test system. + + +INSTALLATION +============ + +Obtain PHP's Test Framework +--------------------------- +If you don't have PHP's test framework, you need to obtain it. These +steps include changing the working directory, downloading run-tests.php +via CVS and copying the file into place. Change the revision flag in the +CVS command as appropriate for your present version of PHP. + + cd c:/progra~1/php + cvs -d :pserver:cvsread@cvs.php.net:/repository login # password is phpfi + cvs -d :pserver:cvsread@cvs.php.net:/repository co -r PHP_4_3 \ + -d test php-src/run-tests.php + cp test/run-tests.php . + rm -rf test + + +Obtain DB and its Test Framework +-------------------------------- +* IF PEAR DB IS ALREADY INSTALLED: + + If you have PEAR DB installed already, good. The test suite + is in place. Open up a command/shell prompt and move into + the test directory. + + cd /tests/DB/tests + +* VIA A NEW INSTALLATION USING THE PEAR INSTALLER: + + Installing PEAR has gotten fairly easy. Follow the instructions + from the manual: http://pear.php.net/manual/en/installation.php + Once PEAR and DB are installed, move to the test directory. + + cd pear/tests/DB/tests + +* VIA CVS: + + Create a location to store the test installation of DB and its + test scripts. + + mkdir d:/peartest + cd d:/peartest + cvs -d :pserver:cvsread@cvs.php.net:/repository co -P pear/DB + + We assume you already have the PEAR base package installed. If + you don't, you will need to do so, but the instructions for + doing that are beyond the scope of this document. See + http://pear.php.net/manual/en/installation.php for more info. + + Move to the test directory. + + cd pear/DB/tests + + +Copy the Starter Shell Script and Edit the Paths +------------------------------------------------ +To make starting up each test run easier, we have included two shell +scripts. The original files are named "run.cvs". They need to be +renamed to "run" so CVS won't bother you with tracking them. Then, +the paths and file names in them need to be set to those used by +your system. + + cp run.cvs run + chmod 755 run + vi run + + cd driver + cp run.cvs run + chmod 755 run + vi run + + +Copy the Setup File and Edit the DSN's +-------------------------------------- +The test suite contains a file that stores the DSN's needed to +connect to your database. The original file is "setup.inc.cvs" +and it needs to be renamed "setup.inc" so CVS won't track it. +Then you'll need to edit the DSN's in it. + + cp setup.inc.cvs setup.inc + vi setup.inc + + +RUN THE TESTS +============= + +To run all tests: ./run +To run one test: ./run +Example: ./run db_parsedsn.phpt + + +Test Types and Locations +------------------------ +tests Common PEAR DB tests +tests/driver Common tests for all the drivers + + +Results and What To Do With Them +-------------------------------- +Each test that fails generates a .php (which you can execute), a .exp +(the expected output), a .out (the test output) and a .diff (a diff -u +from the .exp and .out files). + +If you run the tests, please report or fill the TEST CONFORMANCE table +in the STATUS document. Before any commit to CVS be sure to run the +tests and nothing got broken with the change. + +If you get the message "SKIP", means that the test it's not executed. +Look at the DB/tests/driver/skipif.inc to see what's the problem +(probably a connection problem). + + +DB TESTER MATRIX +================ + fbsql ifx mssql mysqli odbc sqlite +TESTER dbase | ibase | msql | mysql | oci8 | pgsql | sybase +John Horton - - - X - - - - - - - - - +Tim Zickus - - - - - - - - X - - - - +Tim Parkin - - - - - - - - X - - - - +Paul Gardiner - - - X - - - - - - - - - +peterwb@iafrica.com - - - X - - - - - - - - - +Daniel, Adam - - - - - - - - X - - - - +szii@sziisoft.com - - - - - - - - - X¹ - - - +jmh3@linuxfreak.com - - - - - - - - - - X - - +Kevin Henrikson - - - - - - - - X - - - - +Stig Bakken - - - - - - X - - - X - - +Chuck Hagenbuch - - - - - X - - - - - - - +Ludovico Magnocavallo - - X - - - - - - - - - - +Daniel Convissor X X X - X X X X X X² X X X + +MISSING TESTERS - - - - - - - - - - - - - + +Comments: + +[1]: ODBC using IBM DB2 +[2]: ODBC using IBM DB2 and MS Access diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/elements.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/elements.php new file mode 100644 index 000000000..93fd51ded --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/elements.php @@ -0,0 +1,154 @@ + +* @author Bertrand Mansion +* @author Alexey Borzov +* @version 3.2 +* +* $Id: elements.php,v 1.2 2004/03/22 10:05:09 mansion Exp $ +*/ + +require_once 'HTML/QuickForm.php'; + +$form =& new HTML_QuickForm('frmTest', 'get'); + +// Use a two-label template for the elements that require some comments +$twoLabel = <<<_HTML + + + *{label} + + + {error}
{element} +
{label_2} + + +_HTML; + +$renderer =& $form->defaultRenderer(); +$renderer->setElementTemplate($twoLabel, 'iadvChk'); +$renderer->setElementTemplate($twoLabel, 'iautoComp'); + +// Fills with some defaults values +$form->setDefaults(array( + 'itxtTest' => 'Test Text Box', + 'itxaTest' => 'Hello World', + 'ichkTest' => true, + 'iradTest' => 1, + 'iselTest' => array('B', 'C'), + 'name' => array('first'=>'Adam', 'last'=>'Daniel'), + 'phoneNo' => array('513', '123', '3456'), + 'iradYesNo' => 'Y', + 'ichkABC' => array('A'=>true,'B'=>true), + 'dateTest1' => array('d'=>11, 'm'=>1, 'Y'=>2003) +)); + +$form->setConstants(array( + 'dateTest3' => time() +)); + +// Elements will be displayed in the order they are declared +$form->addElement('header', '', 'Normal Elements'); +// Classic form elements +$form->addElement('hidden', 'ihidTest', 'hiddenField'); +$form->addElement('text', 'itxtTest', 'Test Text:'); +$form->addElement('textarea', 'itxaTest', 'Test TextArea:', array('rows' => 3, 'cols' => 20)); +$form->addElement('password', 'ipwdTest', 'Test Password:'); +$form->addElement('checkbox', 'ichkTest', 'Test CheckBox:', 'Check the box'); +$form->addElement('radio', 'iradTest', 'Test Radio Buttons:', 'Check the radio button #1', 1); +$form->addElement('radio', 'iradTest', '(Not a group)', 'Check the radio button #2', 2); +$form->addElement('button', 'ibtnTest', 'Test Button', array('onclick' => "alert('This is a test');")); +$form->addElement('reset', 'iresTest', 'Test Reset'); +$form->addElement('submit', 'isubTest', 'Test Submit'); +$form->addElement('image', 'iimgTest', 'http://pear.php.net/gifs/pear-icon.gif'); +$select =& $form->addElement('select', 'iselTest', 'Test Select:', array('A'=>'A', 'B'=>'B','C'=>'C','D'=>'D')); +$select->setSize(5); +$select->setMultiple(true); + +$form->addElement('header', '', 'Custom Elements'); +// Date elements +$form->addElement('date', 'dateTest1', 'Date1:', array('format'=>'dmY', 'minYear'=>2010, 'maxYear'=>2001)); +$form->addElement('date', 'dateTest2', 'Date2:', array('format'=>'d-F-Y H:i', 'language'=>'de', 'optionIncrement' => array('i' => 5))); +$form->addElement('date', 'dateTest3', 'Today is:', array('format'=>'l d M Y')); + +$main[0] = "Pop"; +$main[1] = "Rock"; +$main[2] = "Classical"; + +$secondary[0][0] = "Belle & Sebastian"; +$secondary[0][1] = "Elliot Smith"; +$secondary[0][2] = "Beck"; +$secondary[1][3] = "Noir Desir"; +$secondary[1][4] = "Violent Femmes"; +$secondary[2][5] = "Wagner"; +$secondary[2][6] = "Mozart"; +$secondary[2][7] = "Beethoven"; + +$opts[] = $main; +$opts[] = $secondary; + +$hs =& $form->addElement('hierselect', 'ihsTest', 'Hierarchical select:', array('style' => 'width: 20em;'), '
'); +$hs->setOptions($opts); + +$form->addElement('advcheckbox', 'iadvChk', array('Advanced checkbox:', 'Unlike standard checkbox, this element has a value
when it is not checked.'), 'Check the box', null, array('off', 'on')); + +$form->addElement('autocomplete', 'iautoComp', array('Your favourite fruit:', 'This is autocomplete element.
Start typing and see how it suggests possible completions.'), array('Pear', 'Orange', 'Apple'), array('size' => 30)); + + +$form->addElement('header', '', 'Grouped Elements'); +// Grouped elements +$name['last'] = &HTML_QuickForm::createElement('text', 'last', null, array('size' => 30)); +$name['first'] = &HTML_QuickForm::createElement('text', 'first', null, array('size' => 20)); +$form->addGroup($name, 'name', 'Name (last, first):', ', '); +// Creates a group of text inputs +$areaCode = &HTML_QuickForm::createElement('text', '', null, array('size' => 3, 'maxlength' => 3)); +$phoneNo1 = &HTML_QuickForm::createElement('text', '', null, array('size' => 3, 'maxlength' => 3)); +$phoneNo2 = &HTML_QuickForm::createElement('text', '', null, array('size' => 4, 'maxlength' => 4)); +$form->addGroup(array($areaCode, $phoneNo1, $phoneNo2), 'phoneNo', 'Telephone:', '-'); + +// Creates a radio buttons group +$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'Yes', 'Y'); +$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'No', 'N'); +$form->addGroup($radio, 'iradYesNo', 'Yes/No:'); + +// Creates a checkboxes group +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C'); +$form->addGroup($checkbox, 'ichkABC', 'ABC:', '
'); +// Creates a group of buttons to be displayed at the bottom of the form +$buttons[] = &HTML_QuickForm::createElement('submit', null, 'Submit'); +$buttons[] = &HTML_QuickForm::createElement('reset', null, 'Reset'); +$buttons[] = &HTML_QuickForm::createElement('image', 'iimgTest', 'http://pear.php.net/gifs/pear-icon.gif'); +$buttons[] = &HTML_QuickForm::createElement('button', 'ibutTest', 'Test Button', array('onClick' => "alert('This is a test');")); +$form->addGroup($buttons, null, null, ' ', false); + + +// applies new filters to the element values +$form->applyFilter('__ALL__', 'trim'); +// Adds some validation rules +$form->addRule('itxtTest', 'Test Text is a required field', 'required'); +$form->addRule('itxaTest', 'Test TextArea is a required field', 'required'); +$form->addRule('itxaTest', 'Test TextArea must be at least 5 characters', 'minlength', 5); +$form->addRule('ipwdTest', 'Password must be between 8 to 10 characters', 'rangelength', array(8, 10)); + +// Tries to validate the form +if ($form->validate()) { + // Form is validated, then processes the data + $form->freeze(); + $form->process('myProcess', false); + echo "\n
\n"; +} + +// Process callback +function myProcess($values) +{ + echo '
';
+    var_dump($values);
+    echo '
'; +} + +$form->display(); +?> diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/filters.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/filters.php new file mode 100644 index 000000000..08f15d4f0 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/filters.php @@ -0,0 +1,61 @@ +addElement('text', 'txtTest', 'Test Text to trim:'); +$form->addRule('txtTest', 'Test text is required', 'required'); + +$phoneGrp[] =& $form->createElement('text', '', null, array('size' => 3, 'maxlength' => 3)); +$phoneGrp[] =& $form->createElement('text', '', null, array('size' => 3, 'maxlength' => 3)); +$phoneGrp[] =& $form->createElement('text', '', null, array('size' => 4, 'maxlength' => 4)); +$form->addGroup($phoneGrp, 'phone', 'Telephone (will be converted to numbers):', '-'); +$form->addGroupRule('phone', 'The phone is required', 'required', null, 3); + +$form->addElement('text', 'txtAustin', 'Text for custom filter:'); +$form->addRule('txtAustin', 'Custom filter text is required', 'required'); + +$form->addElement('submit', 'isubTest', 'Submit'); + +// now we apply the filters +$form->applyFilter('txtTest', 'trim'); +// the filter will be applied recursively +$form->applyFilter('phone', 'intval'); + +if ($form->validate()) { + // Here the filter is applied after validation + $form->applyFilter('txtAustin', '_filterAustin'); + + echo "
\n";
+    echo "Values before filter:\n\n";
+    var_dump($form->getElementValue('txtTest'));
+    echo "\n";
+    var_dump($form->getElementValue('phone'));
+    echo "\n";
+    var_dump($form->getElementValue('txtAustin'));
+
+    echo "\n\nValues after filter:\n\n";
+    var_dump($form->exportValue('txtTest'));
+    echo "\n";
+    var_dump($form->exportValue('phone'));
+    echo "\n";
+    var_dump($form->exportValue('txtAustin'));
+    echo "
\n"; +} + +$form->display(); +?> diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/formrule.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/formrule.php new file mode 100644 index 000000000..7e9517d7e --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/formrule.php @@ -0,0 +1,101 @@ + +* @version 3.2 +*/ + +require_once 'HTML/QuickForm.php'; + +function _validate_shipping($values) +{ + // In Real Life (tm) you will probably query your DB for these + $profiles = array('foo', 'bar', 'baz'); + $errors = array(); + switch ($values['profile']) { + case 'personal': + if (empty($values['persProfileName'])) { + $errors['persProfileName'] = 'Enter the profile name'; + } elseif (in_array($values['persProfileName'], $profiles)) { + $errors['persProfileName'] = 'The profile already exists'; + } + if (empty($values['persName']['first']) || empty($values['persName']['last'])) { + $errors['persName'] = 'Name is required'; + } + if (empty($values['persAddress'])) { + $errors['persAddress'] = 'Address is required'; + } + break; + + case 'company': + if (empty($values['compProfileName'])) { + $errors['compProfileName'] = 'Enter the profile name'; + } elseif (in_array($values['compProfileName'], $profiles)) { + $errors['compProfileName'] = 'The profile already exists'; + } + if (empty($values['compName'])) { + $errors['compName'] = 'Company name is required'; + } + if (empty($values['compAddress'])) { + $errors['compAddress'] = 'Address is required'; + } + break; + + case 'existing': + default: + if (empty($values['profileName'])) { + $errors['profileName'] = 'Enter the profile name'; + } elseif (!in_array($values['profileName'], $profiles)) { + $errors['profileName'] = 'The profile does not exist'; + } + break; + } // switch + return empty($errors)? true: $errors; +} + +$form =& new HTML_QuickForm('frmFancy'); +$form->setDefaults(array( + 'profile' => 'existing', + 'stuffAmount' => '1' +)); +$renderer =& $form->defaultRenderer(); +$renderer->setElementTemplate("\n\t\n\t\t{element}\n\t", 'profile'); + +$form->addElement('header', null, 'Choose stuff'); +$form->addElement('select', 'stuffName', 'Stuff to send:', array('' => '--select--', 'n' => 'Nuts', 'b' => 'Bolts', 'f' => 'Flotsam', 'j' => 'Jetsam')); +$form->addElement('text', 'stuffAmount', 'Amount of stuff:', array('size' => 2, 'maxlength' => 2)); + + +$form->addElement('header', null, 'Choose shipping profile'); +$form->addElement('static', 'note', 'Note:', 'profiles \'foo\', \'bar\' and \'baz\' are considered existing'); + +$form->addElement('radio', 'profile', null, 'Use existing profile', 'existing'); +$form->addElement('text', 'profileName', 'Profile name:', array('size' => 32, 'maxlength' => 32)); + +$form->addElement('radio', 'profile', null, 'New personal profile', 'personal'); +$form->addElement('text', 'persProfileName', 'Profile name:', array('size' => 32, 'maxlength' => 32)); +$name[] =& $form->createElement('text', 'first', null, array('size' => 14, 'maxlength' => 100)); +$name[] =& $form->createElement('text', 'last', null, array('size' => 14, 'maxlength' => 100)); +$form->addGroup($name, 'persName', 'Name (first, last):', ' '); +$form->addElement('text', 'persAddress', 'Address:', array('size' => 32, 'maxlength' => 255)); + +$form->addElement('radio', 'profile', null, 'New company profile', 'company'); +$form->addElement('text', 'compProfileName', 'Profile name:', array('size' => 32, 'maxlength' => 32)); +$form->addElement('text', 'compName', 'Company name:', array('size' => 32, 'maxlength' => 100)); +$form->addElement('text', 'compAddress', 'Address:', array('size' => 32, 'maxlength' => 255)); + +$form->addElement('submit', null, 'Send'); + +$form->addFormRule('_validate_shipping'); + +if ($form->validate()) { + echo "
\n";
+    var_dump($form->exportValues());
+    echo "
\n"; +} + +$form->display(); +?> diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/groups.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/groups.php new file mode 100644 index 000000000..2a99584bb --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/groups.php @@ -0,0 +1,95 @@ + +* @author Alexey Borzov +* @version 3.2 +*/ + +require_once 'HTML/QuickForm.php'; + +$form =& new HTML_QuickForm('frmGroups'); +$form->setDefaults(array( + 'id' => array('lastname' => 'Mamasam', 'code' => '1234'), + 'phoneNo' => array('513', '123', '3456'), + 'ichkABC' => array('A'=>true) +)); + +$renderer =& $form->defaultRenderer(); + +// Setting templates for form and headers +$renderer->setFormTemplate("\n\n{content}\n
\n"); +$renderer->setHeaderTemplate("\t\n\t\t{header}\n\t"); + +// Setting a special template for id element +$renderer->setGroupTemplate('{content}
', 'id'); +$renderer->setGroupElementTemplate('{element}
* {label}', 'id'); + + +$form->addElement('header', '', 'Tests on grouped elements'); + +// Creates a group of text inputs with templates +$id['lastname'] = &HTML_QuickForm::createElement('text', 'lastname', 'Name', array('size' => 30)); +$id['code'] = &HTML_QuickForm::createElement('text', 'code', 'Code', array('size' => 5, 'maxlength' => 4)); +$form->addGroup($id, 'id', 'ID:', ', '); + +// Add a complex rule for id element +$form->addGroupRule('id', array( + 'lastname' => array( + array('Name is required', 'required', null, 'client'), + array('Name is letters only', 'lettersonly', null, 'client') + ), + 'code' => array( + array('Code must be numeric', 'numeric', null, 'client') + ) +)); + + +// Creates a group of text inputs +$areaCode = &HTML_QuickForm::createElement('text', '', null, array('size' => 4, 'maxlength' => 3)); +$phoneNo1 = &HTML_QuickForm::createElement('text', '', null, array('size' => 4, 'maxlength' => 3)); +$phoneNo2 = &HTML_QuickForm::createElement('text', '', null, array('size' => 5, 'maxlength' => 4)); +$form->addGroup(array($areaCode, $phoneNo1, $phoneNo2), 'phoneNo', 'Telephone:', '-'); + +// Adds validation rules for groups +$form->addGroupRule('phoneNo', 'Please fill all phone fields', 'required', null, 3, 'client'); +$form->addGroupRule('phoneNo', 'Values must be numeric', 'numeric', null, 3, 'client'); + +// Creates a checkboxes group using an array of separators +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'D', null, 'D'); +$form->addGroup($checkbox, 'ichkABC', 'ABCD:', array(' ', '
')); + +// At least one element is required +$form->addGroupRule('ichkABC', 'Please check at least two boxes', 'required', null, 2, 'client', true); + +// Creates a standard radio buttons group +$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'Yes', 'Y'); +$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'No', 'N'); +$form->addGroup($radio, 'iradYesNo', 'Yes/No:'); + +// Validate the radio buttons +$form->addRule('iradYesNo', 'Check Yes or No', 'required', null, 'client'); + +// Creates a group of buttons to be displayed at the bottom of the form +$buttons[] =& $form->createElement('submit', null, 'Submit'); +$buttons[] =& $form->createElement('reset', null, 'Reset'); +$buttons[] =& $form->createElement('checkbox', 'clientSide', null, 'use client-side validation', array('checked' => 'checked', 'onclick' => "if (this.checked) {this.form.onsubmit = validate_" . $form->getAttribute('id') . ";} else {this.form.onsubmit = null;}")); +$form->addGroup($buttons); + + +// Tries to validate the form +if ($form->validate()) { + // Form is validated, then processes the data + $form->freeze(); + $form->process('var_dump'); + echo "\n
\n"; +} +$form->display(); + +?> diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/FlexyDynamic_example.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/FlexyDynamic_example.php new file mode 100644 index 000000000..4e0a1e5b6 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/FlexyDynamic_example.php @@ -0,0 +1,112 @@ + + * + * $Id: FlexyDynamic_example.php,v 1.2 2003/11/03 12:55:53 avb Exp $ + */ + +require_once 'HTML/QuickForm.php'; +require_once 'HTML/QuickForm/Renderer/Object.php'; +require_once 'HTML/Template/Flexy.php'; + +$form = new HTML_QuickForm('frmTest', 'post'); + +$form->setDefaults(array( + 'itxtTest' => 'Test Text Box', + 'itxaTest' => 'Hello World', + 'iselTest' => array('B', 'C'), + 'name' => array('first' => 'Thomas', 'last' => 'Schulz'), + 'iradYesNo' => 'Y', + 'ichkABCD' => array('A'=>true,'D'=>true) +)); + +$form->addElement('header', '', 'Normal Elements'); + +$form->addElement('hidden', 'ihidTest', 'hiddenField'); + +$form->addElement('text', 'itxtTest', 'Test Text'); + +$form->addElement('textarea', 'itxaTest', 'Test TextArea'); + +// will be later assigned to style green +$form->addElement('password', 'ipwdTest', array('Test Password', 'Please choose a password which is hard to guess')); +$select =& $form->addElement('select', 'iselTest', 'Test Select', array('A'=>'A', 'B'=>'B','C'=>'C','D'=>'D')); +$select->setSize(5); +$select->setMultiple(true); + +$form->addElement('submit', 'isubTest', 'Test Submit'); + +$form->addElement('header', '', 'Grouped Elements'); + +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'D', null, 'D'); +$form->addGroup($checkbox, 'ichkABCD', 'ABCD', '
'); + +// will be later assigned to style fancygroup +$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'Yes', 'Y'); +$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'No', 'N'); +$form->addGroup($radio, 'iradYesNo', 'Yes/No'); + +// will be later assigned to style fancygroup +$name['first'] = &HTML_QuickForm::createElement('text', 'first', 'First:'); +$name['first']->setSize(20); +$name['last'] = &HTML_QuickForm::createElement('text', 'last', 'Last:'); +$name['last']->setSize(30); +$form->addGroup($name, 'name', 'Name'); + +// add some 'required' rules to show "stars" and (possible) errors... +$form->addRule('itxtTest', 'Test Text is a required field', 'required'); +$form->addRule('itxaTest', 'Test TextArea is a required field', 'required'); +$form->addGroupRule('iradYesNo', 'Check Yes or No', 'required'); +$form->addGroupRule('name', array('last' => array(array('Last name is required', 'required')))); + +// try to validate the form +if ($form->validate()) { + $form->freeze(); +} + +$renderer =& new HTML_QuickForm_Renderer_Object(true); + +// give some elements aditional style informations +$renderer->setElementStyle(array( + 'ipwdTest' => 'green', + 'iradYesNo' => 'fancygroup', + 'name' => 'fancygroup' +)); + +$form->accept($renderer); + + +$options = &PEAR::getStaticProperty('HTML_Template_Flexy','options'); +$options = array( + 'templateDir' => './templates', + 'compileDir' => './templates/build', + 'debug' => 0 +); +$tpl =& new HTML_Template_Flexy($options); + +//$tpl->compile("styles/green.html"); +//$tpl->compile("styles/fancygroup.html"); + +// assign array with form data +$view = new StdClass; +$view->form = $renderer->toObject(); + +// capture the array stucture +// (only for showing in sample template) +ob_start(); +print_r($renderer->toObject()); +$view->dynamic_object = ob_get_contents(); +// XXX: dunno how to make Flexy ignore the placeholder +$view->formdata = '{formdata}'; +ob_end_clean(); + +// render and display the template +$tpl->compile('flexy-dynamic.html'); +$tpl->outputObject($view); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/FlexyStatic_example.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/FlexyStatic_example.php new file mode 100644 index 000000000..baf2afd1c --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/FlexyStatic_example.php @@ -0,0 +1,148 @@ + + * + * $Id: FlexyStatic_example.php,v 1.4 2004/06/24 19:23:10 ths Exp $ + */ + +require_once('HTML/Template/Flexy.php'); +require_once('HTML/QuickForm.php'); +require_once('HTML/QuickForm/Renderer/ObjectFlexy.php'); + +function myProcess($values) +{ + echo "
";
+	var_dump($values);
+	echo "
"; +} + +$form = new HTML_QuickForm('form', 'POST'); + +// Fills with some defaults values + +$defaultValues['company'] = 'Devils son in law'; +$defaultValues['country'] = array(); +$defaultValues['name'] = array('first'=>'Petey', 'last'=>'Wheatstraw'); +$defaultValues['phone'] = array('513', '123', '4567'); +$form->setDefaults($defaultValues); + +// Hidden + +$form->addElement('hidden', 'session', '1234567890'); + +// Personal information + +$form->addElement('header', 'personal', 'Personal Information'); + +$form->addElement('hidden', 'ihidTest', 'hiddenField'); +$form->addElement('text', 'email', 'Your email:'); +$form->addElement('password', 'pass', 'Your password:', 'size=10'); +$name['last'] = &HTML_QuickForm::createElement('text', 'first', 'First', +'size=10'); +$name['first'] = &HTML_QuickForm::createElement('text', 'last', 'Last', +'size=10'); +$form->addGroup($name, 'name', 'Name:', ', '); +$areaCode = &HTML_QuickForm::createElement('text', '', null,'size=4 +maxlength=3'); +$phoneNo1 = &HTML_QuickForm::createElement('text', '', null, 'size=4 +maxlength=3'); +$phoneNo2 = &HTML_QuickForm::createElement('text', '', null, 'size=5 +maxlength=4'); +$form->addGroup(array($areaCode, $phoneNo1, $phoneNo2), 'phone', +'Telephone:', '-'); + +// Company information + +$form->addElement('header', 'company_info', 'Company Information'); + +$form->addElement('text', 'company', 'Company:', 'size=20'); + +$str[] = &HTML_QuickForm::createElement('text', '', null, 'size=20'); +$str[] = &HTML_QuickForm::createElement('text', '', null, 'size=20'); +$form->addGroup($str, 'street', 'Street:', '
'); + +$addr['zip'] = &HTML_QuickForm::createElement('text', 'zip', 'Zip', 'size=6 +maxlength=10'); +$addr['city'] = &HTML_QuickForm::createElement('text', 'city', 'City', +'size=15'); +$form->addGroup($addr, 'address', 'Zip, city:'); + +$select = array('' => 'Please select...', 'AU' => 'Australia', 'FR' => +'France', 'DE' => 'Germany', 'IT' => 'Italy'); +$form->addElement('select', 'country', 'Country:', $select); + +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'D', null, 'D'); +$form->addGroup($checkbox, 'destination', 'Destination:', array(' ', +'
')); + +// Other elements + +$form->addElement('checkbox', 'news', '', " Check this box if you don't want +to receive our newsletter."); + +$form->addElement('reset', 'reset', 'Reset'); +$form->addElement('submit', 'submit', 'Register'); + +// Adds some validation rules + +$form->addRule('email', 'Email address is required', 'required'); +$form->addGroupRule('name', 'Name is required', 'required'); +$form->addRule('pass', 'Password must be between 8 to 10 characters', +'rangelength', array(8, 10),'client'); +$form->addRule('country', 'Country is a required field', 'required'); +$form->addGroupRule('destination', 'Please check at least two boxes', +'required', null, 2); +$form->addGroupRule('phone', 'Please fill all phone fields', 'required'); +$form->addGroupRule('phone', 'Values must be numeric', 'numeric'); + +$AddrRules['zip'][0] = array('Zip code is required', 'required'); +$AddrRules['zip'][1] = array('Zip code is numeric only', 'numeric'); +$AddrRules['city'][0] = array('City is required', 'required'); +$AddrRules['city'][1] = array('City is letters only', 'lettersonly'); +$form->addGroupRule('address', $AddrRules); + +// Tries to validate the form +if ($form->validate()) { + // Form is validated, then freezes the data + $form->freeze(); + $form->process('myProcess', false); + echo "\n
\n"; +} + +// setup a template object +$options = &PEAR::getStaticProperty('HTML_Template_Flexy','options'); +$options = array( + 'templateDir' => './templates', + 'compileDir' => './templates/build', + 'forceCompile' => 1, + 'debug' => 0, + 'local' => 'en' +); + +$template = new HTML_Template_Flexy($options); + +$renderer =& new HTML_QuickForm_Renderer_ObjectFlexy($template); +$renderer->setLabelTemplate("label.html"); +$renderer->setHtmlTemplate("html.html"); + +$form->accept($renderer); + +$view = new StdClass; +$view->form = $renderer->toObject(); + +$template->compile("flexy-static.html"); +// capture the array stucture +ob_start(); +print_r($view->form); +$view->static_object = ob_get_contents(); +ob_end_clean(); + +// render and display the template +$template->outputObject($view); +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITDynamic_example.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITDynamic_example.php new file mode 100644 index 000000000..5a1179fd5 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITDynamic_example.php @@ -0,0 +1,96 @@ + + * + * $Id: ITDynamic_example.php,v 1.3 2003/09/09 10:46:51 avb Exp $ + */ + +require_once 'HTML/QuickForm.php'; +require_once 'HTML/QuickForm/Renderer/ITDynamic.php'; +// can use either HTML_Template_Sigma or HTML_Template_ITX +require_once 'HTML/Template/ITX.php'; +// require_once 'HTML/Template/Sigma.php'; + +$form = new HTML_QuickForm('frmTest', 'post'); + +$form->setDefaults(array( + 'itxtTest' => 'Test Text Box', + 'itxaTest' => 'Hello World', + 'iselTest' => array('B', 'C'), + 'name' => array('first' => 'Alexey', 'last' => 'Borzov'), + 'iradYesNo' => 'Y', + 'ichkABCD' => array('A'=>true,'D'=>true) +)); + +$form->addElement('header', '', 'Normal Elements'); + +$form->addElement('hidden', 'ihidTest', 'hiddenField'); +// will be rendered in default qf_element block +$form->addElement('text', 'itxtTest', 'Test Text:'); +// will be rendered in qf_textarea block, as it exists in template +$form->addElement('textarea', 'itxaTest', 'Test TextArea:', array('rows' => 5, 'cols' => 40)); +// will be later assigned to qf_green, note that an array of labels is passed +$form->addElement('password', 'ipwdTest', array('Test Password:', 'The password is expected to be long enough.')); +$select =& $form->addElement('select', 'iselTest', 'Test Select:', array('A'=>'A', 'B'=>'B','C'=>'C','D'=>'D')); +$select->setSize(5); +$select->setMultiple(true); +$form->addElement('submit', 'isubTest', 'Test Submit'); + +$form->addElement('header', '', 'Grouped Elements'); + +// will be rendered in default qf_group block +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'D', null, 'D'); +$form->addGroup($checkbox, 'ichkABCD', 'ABCD:', array(' ', '
')); + +// fancygroup candidates +// will be rendered in qf_fancygroup_radio +$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'Yes', 'Y'); +$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'No', 'N'); +$form->addGroup($radio, 'iradYesNo', 'Yes/No:'); + +// will be rendered in qf_fancygroup_element +$name['first'] = &HTML_QuickForm::createElement('text', 'first', 'First:'); +$name['first']->setSize(20); +$name['last'] = &HTML_QuickForm::createElement('text', 'last', 'Last:'); +$name['last']->setSize(30); +$form->addGroup($name, 'name', 'Name'); + +// add some 'required' rules to show "stars" and (possible) errors... +$form->addRule('itxtTest', 'Test Text is a required field', 'required'); +$form->addRule('itxaTest', 'Test TextArea is a required field', 'required'); +$form->addRule('iradYesNo', 'Check Yes or No', 'required'); +$form->addGroupRule('name', array('last' => array(array('Last name is required', 'required')))); + +// try to validate the form +if ($form->validate()) { + $form->freeze(); +} + +// create a template object and load the template file +// can use either HTML_Template_Sigma or HTML_Template_ITX +$tpl =& new HTML_Template_ITX('./templates'); +// $tpl =& new HTML_Template_Sigma('./templates'); + +$tpl->loadTemplateFile('it-dynamic.html', true, true); + +// create a renderer +$renderer =& new HTML_QuickForm_Renderer_ITDynamic($tpl); + +// assign elements to blocks +$renderer->setElementBlock(array( + 'ipwdTest' => 'qf_green', + 'iradYesNo' => 'qf_fancygroup', + 'name' => 'qf_fancygroup' +)); + +// Black Magic :] +$form->accept($renderer); + +// display the results +$tpl->show(); +?> diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITDynamic_example2.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITDynamic_example2.php new file mode 100644 index 000000000..3f7bf07eb --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITDynamic_example2.php @@ -0,0 +1,119 @@ + +* @author Bertrand Mansion +* @author Alexey Borzov +* @version 3.0 +*/ +require_once 'HTML/QuickForm.php'; +require_once 'HTML/QuickForm/Renderer/ITDynamic.php'; +// can use either HTML_Template_Sigma or HTML_Template_ITX +require_once 'HTML/Template/ITX.php'; +//require_once 'HTML/Template/Sigma.php'; + +$form = new HTML_QuickForm('frmTest', 'POST'); + +// Fills with some defaults values +$defaultValues['company'] = 'Mamasam'; +$defaultValues['country'] = array(); +$defaultValues['name'] = array('first'=>'Alexey', 'last'=>'Borzov'); +$defaultValues['phone'] = array('513', '123', '4567'); +$form->setDefaults($defaultValues); + +// Hidden +$form->addElement('hidden', 'session', '1234567890'); +$form->addElement('hidden', 'timer', '12345'); +$form->addElement('hidden', 'ihidTest', 'hiddenField'); + +// Personal information +$form->addElement('header', 'personal_info', 'Personal Information'); + +$name['last'] = &HTML_QuickForm::createElement('text', 'first', 'First', 'size=10'); +$name['first'] = &HTML_QuickForm::createElement('text', 'last', 'Last', 'size=10'); +$form->addGroup($name, 'name', 'Name:', ', '); + +$areaCode = &HTML_QuickForm::createElement('text', '', null,'size=4 maxlength=3'); +$phoneNo1 = &HTML_QuickForm::createElement('text', '', null, 'size=4 maxlength=3'); +$phoneNo2 = &HTML_QuickForm::createElement('text', '', null, 'size=5 maxlength=4'); +$form->addGroup(array($areaCode, $phoneNo1, $phoneNo2), 'phone', 'Telephone:', '-'); + +$form->addElement('text', 'email', 'Your email:'); + +$form->addElement('password', 'pass', 'Your password:', 'size=10'); + +// to finish the first column: +$form->addElement('static', null, null, 'first column'); + + +// Company information +$form->addElement('header', 'company_info', 'Company Information'); + +$form->addElement('text', 'company', 'Company:', 'size=20'); + +$str[] = &HTML_QuickForm::createElement('text', '', null, 'size=20'); +$str[] = &HTML_QuickForm::createElement('text', '', null, 'size=20'); +$form->addGroup($str, 'street', 'Street:', '
'); + + +$addr['zip'] = &HTML_QuickForm::createElement('text', 'zip', 'Zip', 'size=6 maxlength=10'); +$addr['city'] = &HTML_QuickForm::createElement('text', 'city', 'City', 'size=15'); +$form->addGroup($addr, 'address', 'Zip, city:'); + +$select = array('' => 'Please select...', 'AU' => 'Australia', 'FR' => 'France', 'DE' => 'Germany', 'IT' => 'Italy'); +$form->addElement('select', 'country', 'Country:', $select); + +// Creates a checkboxes group using an array of separators +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'D', null, 'D'); +$form->addGroup($checkbox, 'destination', 'Destination:', array(' ', '
')); + +// to finish the second column: +$form->addElement('static', null, null, 'second column'); + +// can't render these elements properly, so they are in the template +//$form->addElement('reset', 'reset', 'Reset'); +//$form->addElement('submit', 'submit', 'Register'); + +// Adds some validation rules +$form->addRule('email', 'Email address is required', 'required'); +$form->addGroupRule('name', 'Name is required', 'required'); +$form->addRule('pass', 'Password must be between 8 to 10 characters', 'rangelength', array(8, 10)); +$form->addRule('country', 'Country is a required field', 'required'); +$form->addGroupRule('destination', 'Please check at least two boxes', 'required', null, 2); +$form->addGroupRule('phone', 'Please fill all phone fields', 'required'); +$form->addGroupRule('phone', 'Values must be numeric', 'numeric'); + + +$AddrRules['zip'][0] = array('Zip code is required', 'required'); +$AddrRules['zip'][1] = array('Zip code is numeric only', 'numeric'); +$AddrRules['city'][0] = array('City is required', 'required'); +$AddrRules['city'][1] = array('City is letters only', 'lettersonly'); +$form->addGroupRule('address', $AddrRules); + +// Tries to validate the form +if ($form->validate()) { + // Form is validated, then freezes the data + $form->freeze(); +} + + +// can use either HTML_Template_Sigma or HTML_Template_ITX +$tpl =& new HTML_Template_ITX('./templates'); +// $tpl =& new HTML_Template_Sigma('./templates'); + +$tpl->loadTemplateFile('it-dynamic-2.html'); + +$renderer =& new HTML_QuickForm_Renderer_ITDynamic($tpl); +$renderer->setElementBlock(array( + 'name' => 'qf_group_table', + 'address' => 'qf_group_table' +)); + +$form->accept($renderer); + +$tpl->show(); +?> diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITStatic_example.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITStatic_example.php new file mode 100644 index 000000000..577cd0be1 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/ITStatic_example.php @@ -0,0 +1,111 @@ + +* @version 2.0 +*/ + +// $Id: ITStatic_example.php,v 1.4 2004/10/02 09:54:41 ths Exp $ + +require_once('HTML/QuickForm.php'); +require_once('HTML/QuickForm/Renderer/ITStatic.php'); +require_once('HTML/Template/ITX.php'); + + +// Form name will be used to find the placeholders. + +$form = new HTML_QuickForm('form', 'POST'); + +// Fills with some defaults values + +$defaultValues['company'] = 'Mamasam'; +$defaultValues['country'] = array(); +$defaultValues['name'] = array('first'=>'Bertrand', 'last'=>'Mansion'); +$defaultValues['phone'] = array('513', '123', '4567'); +$form->setDefaults($defaultValues); + +// Hidden + +$form->addElement('hidden', 'session', '1234567890'); + +// Personal information + +$form->addElement('header', 'personal', 'Personal Information'); + +$form->addElement('hidden', 'ihidTest', 'hiddenField'); +$form->addElement('text', 'email', 'Your email:'); +$form->addElement('password', 'pass', 'Your password:', 'size=10'); +$name['last'] = &HTML_QuickForm::createElement('text', 'first', 'First', 'size=10'); +$name['first'] = &HTML_QuickForm::createElement('text', 'last', 'Last', 'size=10'); +$form->addGroup($name, 'name', 'Name:', ', '); +$areaCode = &HTML_QuickForm::createElement('text', '', null,'size=4 maxlength=3'); +$phoneNo1 = &HTML_QuickForm::createElement('text', '', null, 'size=4 maxlength=3'); +$phoneNo2 = &HTML_QuickForm::createElement('text', '', null, 'size=5 maxlength=4'); +$form->addGroup(array($areaCode, $phoneNo1, $phoneNo2), 'phone', 'Telephone:', '-'); + +// Company information + +$form->addElement('header', 'company_info', 'Company Information'); + +$form->addElement('text', 'company', 'Company:', 'size=20'); + +$str[] = &HTML_QuickForm::createElement('text', '', null, 'size=20'); +$str[] = &HTML_QuickForm::createElement('text', '', null, 'size=20'); +$form->addGroup($str, 'street', 'Street:', '
'); + +$addr['zip'] = &HTML_QuickForm::createElement('text', 'zip', 'Zip', 'size=6 maxlength=10'); +$addr['city'] = &HTML_QuickForm::createElement('text', 'city', 'City', 'size=15'); +$form->addGroup($addr, 'address', 'Zip, city:'); + +$select = array('' => 'Please select...', 'AU' => 'Australia', 'FR' => 'France', 'DE' => 'Germany', 'IT' => 'Italy'); +$form->addElement('select', 'country', 'Country:', $select); + +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C'); +$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'D', null, 'D'); +$form->addGroup($checkbox, 'destination', 'Destination:', array(' ', '
')); + +// Other elements + +$form->addElement('checkbox', 'news', '', " Check this box if you don't want to receive our newsletter."); + +$form->addElement('reset', 'reset', 'Reset'); +$form->addElement('submit', 'submit', 'Register'); + +// Adds some validation rules + +$form->addRule('email', 'Email address is required', 'required'); +$form->addGroupRule('name', 'Name is required', 'required'); +$form->addRule('pass', 'Password must be between 8 to 10 characters', 'rangelength', array(8, 10)); +$form->addRule('country', 'Country is a required field', 'required'); +$form->addGroupRule('destination', 'Please check at least two boxes', 'required', null, 2); +$form->addGroupRule('phone', 'Please fill all phone fields', 'required'); +$form->addGroupRule('phone', 'Values must be numeric', 'numeric'); + +$AddrRules['zip'][0] = array('Zip code is required', 'required'); +$AddrRules['zip'][1] = array('Zip code is numeric only', 'numeric'); +$AddrRules['city'][0] = array('City is required', 'required'); +$AddrRules['city'][1] = array('City is letters only', 'lettersonly'); +$form->addGroupRule('address', $AddrRules); + +// Tries to validate the form +if ($form->validate()) { + // Form is validated, then freezes the data + $form->freeze(); +} + +// Could be HTML_Template_Sigma('./templates') +$tpl =& new HTML_Template_ITX('./templates'); +$tpl->loadTemplateFile('it-static.html'); + +$renderer =& new HTML_QuickForm_Renderer_ITStatic($tpl); +$renderer->setRequiredTemplate('{label}*'); +$renderer->setErrorTemplate('{error}
{html}'); + +$form->accept($renderer); + +$tpl->show(); + +?> \ No newline at end of file diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/QuickHtml_example.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/QuickHtml_example.php new file mode 100644 index 000000000..72e1b1270 --- /dev/null +++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/QuickHtml_example.php @@ -0,0 +1,146 @@ + + + QuickForm Using QuickHtml Renderer + + +*/ + +require_once ("HTML/QuickForm.php"); +require_once ("HTML/QuickForm/Renderer/QuickHtml.php"); +$form =& new HTML_QuickForm('tmp_form','POST'); +// get our render +$renderer =& new HTML_QuickForm_Renderer_QuickHtml(); +// create the elements +createElements($form); +// set their values +setValues($form); + +// Do the magic of creating the form. NOTE: order is important here: this must +// be called after creating the form elements, but before rendering them. +$form->accept($renderer); + +// Because radio buttons have the same name we have to pass the value +// as well as the name in order to get the correct one. +$tmp_radio = ' Yes: ' . $renderer->elementToHtml('tmp_radio', 'Y'); +$tmp_radio .= ' No: ' . $renderer->elementToHtml('tmp_radio', 'N'); + +$tmp_submit = $renderer->elementToHtml('tmp_reset'); +$tmp_submit .= $renderer->elementToHtml('tmp_submit'); + +// Make our form table using some of the widget functions. +$data = ' + + ' . createHeaderCell('QuickForm using QuickHtml Renderer', 'center', 2) . ' + ' . createFormCell($renderer->elementToHtml('tmp_textarea'), 'center', 2) . ' + ' . createHeaderCell('Text box (element is part of an array)', 'left') . + createHeaderCell('Yes or no?', 'right') . ' + ' . createFormCell($renderer->elementToHtml('tmp_text[array]'), 'left') . + createFormCell($tmp_radio, 'right') . ' + ' . createHeaderCell('Phone Number (a group)', 'left') . + createHeaderCell('Advanced Check Box?', 'right') . ' + ' . createFormCell($renderer->elementToHtml('phone_num'), 'left') . + createFormCell($renderer->elementToHtml('tmp_checkbox'), 'right') . ' + ' . createHeaderCell('Today is:', 'left') . + createHeaderCell('Multiple Select', 'right') . ' + ' . createFormCell($renderer->elementToHtml('tmp_date'), 'left') . + createFormCell($renderer->elementToHtml('tmp_multipleSelect[0]'), 'right') . ' + ' . createFormCell($tmp_submit, 'center', 2) . ' +
'; + +// Wrap the form and any remaining elements (i.e. hidden elements) into the form tags. +echo $renderer->toHtml($data); + +echo "\n
Submitted Values:
\n"; +echo "
";
+print_r($_POST);
+// {{{ createElements()
+
+// creates all the fields for the form
+function createElements(&$form)
+{
+    // select list array
+    $selectListArray = array(
+        'windows'   => 'Windows',
+        'linux'     => 'Linux',
+        'irix'      => 'Irix',
+        'mac'       => 'Mac',
+    );
+
+    $form->addElement('text','tmp_text[array]',null,array('size' => 10));
+    $form->addElement('hidden','tmp_hidden', 'value');
+    $form->addElement('textarea','tmp_textarea',null,array('cols' => 50, 'rows' => 10, 'wrap' => 'virtual'));
+    $form->addElement('radio','tmp_radio',null,null,'Y');
+    $form->addElement('radio','tmp_radio',null,null,'N');
+    $text = array();
+    $text[] =& HTML_QuickForm::createElement('text','',null,array('size' => 3));
+    $text[] =& HTML_QuickForm::createElement('text','',null,array('size' => 4));
+    $text[] =& HTML_QuickForm::createElement('text','',null,array('size' => 3));
+    $form->addGroup($text, 'phone_num', null, '-');
+    $form->addElement('advcheckbox','tmp_checkbox',null,'Please Check',null,array('not checked', 'checked'));
+    $form->addElement('date', 'tmp_date', null, array('format'=>'D d M Y'));
+    $form->addElement('select', 'tmp_multipleSelect[0]', null, $selectListArray, array('multiple' => 'multiple', 'size' => 4));
+    $form->addElement('reset','tmp_reset','Reset Form');
+    $form->addElement('submit','tmp_submit','Submit Form');
+    $form->addRule('tmp_text[array]','Text length must be greater than 10','minlength',10,'client');
+}
+
+// }}}
+// {{{ setValues()
+
+// sets all the default and constant values for the form
+function setValues(&$form)
+{
+    // Fills with some defaults values
+    $defaultValues['tmp_textarea']  = '
+Test Text Area
+
+With line breaks';
+    $defaultValues['phone_num'] = array('513', '123', '3456');
+    $defaultValues['tmp_checkbox'] = 'checked';
+    $defaultValues['tmp_multipleSelect'][0] = array('linux', 'mac');
+    // Fill with some constant values.
+    // Constant is not overridden by POST, GET, or defaultValues
+    // when values are being filled in
+    $constantValues['tmp_radio'] = 'Y';
+    $constantValues['tmp_date'] = time();
+    $constantValues['tmp_text']['array'] = 'constant';
+
+    $form->setDefaults($defaultValues);
+    $form->setConstants($constantValues);
+}
+
+// }}}
+// {{{ createHeaderCell()
+
+// creates a header cell
+function createHeaderCell($text, $align, $colspan = 1)
+{
+    return '' . $text . '';
+}
+
+// }}}
+// {{{ createFormCell()
+
+// creates a form cell based on the element name
+function createFormCell($elementHtml, $align, $colspan = 1)
+{
+    return '' . 
+           $elementHtml .
+           '';
+}
+
+// }}}
+?>
+
+
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/SmartyDynamic_example.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/SmartyDynamic_example.php
new file mode 100644
index 000000000..b09c6581c
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/SmartyDynamic_example.php
@@ -0,0 +1,108 @@
+
+ * @author Alexey Borzov 
+ *
+ * $Id: SmartyDynamic_example.php,v 1.4 2004/10/15 20:31:00 ths Exp $
+ */
+
+require_once 'HTML/QuickForm.php';
+require_once 'HTML/QuickForm/Renderer/Array.php';
+// fix this if your Smarty is somewhere else
+require_once 'Smarty.class.php';
+
+$form = new HTML_QuickForm('frmTest', 'post');
+
+$form->setDefaults(array(
+    'itxtTest'  => 'Test Text Box',
+    'itxaTest'  => 'Hello World',
+    'iselTest'  => array('B', 'C'),
+    'name'      => array('first' => 'Thomas', 'last' => 'Schulz'),
+    'iradYesNo' => 'Y',
+    'ichkABCD'  => array('A'=>true,'D'=>true)
+));
+
+$form->addElement('header', '', 'Normal Elements');
+
+$form->addElement('hidden', 'ihidTest', 'hiddenField');
+
+$form->addElement('text', 'itxtTest', array('Test Text', 'note' => 'Note for Testtext element.'));
+
+$form->addElement('textarea', 'itxaTest', 'Test TextArea', 'cols="40" rows="2"');
+
+// will be later assigned to style green
+$form->addElement('password', 'ipwdTest', 'Test Password');
+$select =& $form->addElement(
+    'select',
+    'iselTest',
+    array('Test Select', 'note' => 'We recommend to check at least two categories!'),
+    array('A'=>'A * * * * (luxory)', 'B'=>'B * * *','C'=>'C * *','D'=>'D * (simple)')
+ );
+$select->setSize(4);
+$select->setMultiple(true);
+
+$form->addElement('submit', 'isubTest', 'Test Submit');
+
+$form->addElement('header', '', 'Grouped Elements');
+
+$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A');
+$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B');
+$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C');
+$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'D', null, 'D');
+$form->addGroup($checkbox, 'ichkABCD', 'ABCD', array(' ', '
'));
+
+// will be later assigned to style fancygroup
+$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'Yes', 'Y');
+$radio[] = &HTML_QuickForm::createElement('radio', null, null, 'No', 'N');
+$form->addGroup($radio, 'iradYesNo', 'Yes/No');
+
+// will be later assigned to style fancygroup
+$name['first'] = &HTML_QuickForm::createElement('text', 'first', 'First:');
+$name['first']->setSize(20);
+$name['last'] = &HTML_QuickForm::createElement('text', 'last', 'Last:');
+$name['last']->setSize(30);
+$form->addGroup($name, 'name', 'Name');
+
+// add some 'required' rules to show "stars" and (possible) errors...
+$form->addRule('itxtTest', 'Test Text is a required field', 'required');
+$form->addRule('itxaTest', 'Test TextArea is a required field', 'required');
+$form->addGroupRule('iradYesNo', 'Check Yes or No', 'required');
+$form->addGroupRule('name', array('last' => array(array('Last name is required', 'required'))));
+
+// try to validate the form
+if ($form->validate()) {
+    $form->freeze();
+}
+
+$renderer =& new HTML_QuickForm_Renderer_Array(true, true);
+
+// give some elements aditional style informations
+$renderer->setElementStyle(array(
+    'ipwdTest'  => 'green',
+    'iradYesNo' => 'fancygroup',
+    'name'      => 'fancygroup'
+));
+
+$form->accept($renderer);
+
+// setup a template object
+$tpl =& new Smarty;
+$tpl->template_dir = './templates';
+$tpl->compile_dir  = './templates';
+
+// assign array with form data
+$tpl->assign('form', $renderer->toArray());
+
+// capture the array stucture
+// (only for showing in sample template)
+ob_start();
+print_r($renderer->toArray());
+$tpl->assign('dynamic_array', ob_get_contents());
+ob_end_clean();
+
+// render and display the template
+$tpl->display('smarty-dynamic.tpl');
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/SmartyStatic_example.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/SmartyStatic_example.php
new file mode 100644
index 000000000..c10339ca7
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/SmartyStatic_example.php
@@ -0,0 +1,137 @@
+
+ * @author Thomas Schulz 
+ *
+ * $Id: SmartyStatic_example.php,v 1.4 2004/10/15 20:31:00 ths Exp $
+ */
+
+require_once 'HTML/QuickForm.php';
+require_once 'HTML/QuickForm/Renderer/ArraySmarty.php';
+// fix this if your Smarty is somewhere else
+require_once 'Smarty.class.php';
+
+// Form name will be used to find the placeholders.
+
+$form = new HTML_QuickForm('form', 'POST');
+
+// Fills with some defaults values
+
+$defaultValues['company']  = 'Mamasam';
+$defaultValues['country']  = array();
+$defaultValues['name']     = array('first'=>'Bertrand', 'last'=>'Mansion');
+$defaultValues['phone']    = array('513', '123', '4567');
+$form->setDefaults($defaultValues);
+
+// Hidden
+
+$form->addElement('hidden', 'session', '1234567890');
+
+// Personal information
+
+$form->addElement('header', 'personal', 'Personal Information');
+
+$form->addElement('hidden', 'ihidTest', 'hiddenField');
+$form->addElement('text', 'email', 'Your email:');
+$form->addElement('password', 'pass', array('Your password:', 'note'=>'Please, choose a 8-10 characters password.'), 'size=10');
+$name['last'] = &HTML_QuickForm::createElement('text', 'first', 'First', 'size=10');
+$name['first'] = &HTML_QuickForm::createElement('text', 'last', 'Last', 'size=10');
+$form->addGroup($name, 'name', 'Name:', ', ');
+$areaCode = &HTML_QuickForm::createElement('text', '', null,'size=4 maxlength=3');
+$phoneNo1 = &HTML_QuickForm::createElement('text', '', null, 'size=4 maxlength=3');
+$phoneNo2 = &HTML_QuickForm::createElement('text', '', null, 'size=5 maxlength=4');
+$form->addGroup(array($areaCode, $phoneNo1, $phoneNo2), 'phone', 'Telephone:', '-');
+
+// Company information
+
+$form->addElement('header', 'company_info', 'Company Information');
+
+$form->addElement('text', 'company', 'Company:', 'size=20');
+
+$str[] = &HTML_QuickForm::createElement('text', '', null, 'size=20');
+$str[] = &HTML_QuickForm::createElement('text', '', null, 'size=20');
+$form->addGroup($str, 'street', 'Street:', '
');
+
+$addr['zip'] = &HTML_QuickForm::createElement('text', 'zip', 'Zip', 'size=6 maxlength=10');
+$addr['city'] = &HTML_QuickForm::createElement('text', 'city', 'City', 'size=15');
+$form->addGroup($addr, 'address', 'Zip, city:');
+
+$select = array('' => 'Please select...', 'AU' => 'Australia', 'FR' => 'France', 'DE' => 'Germany', 'IT' => 'Italy');
+$form->addElement('select', 'country', 'Country:', $select);
+
+$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'A', null, 'A');
+$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'B', null, 'B');
+$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'C', null, 'C');
+$checkbox[] = &HTML_QuickForm::createElement('checkbox', 'D', null, 'D');
+$form->addGroup($checkbox, 'destination', 'Destination:', array(' ', '
'));
+
+// Other elements
+
+$form->addElement('checkbox', 'news', '', " Check this box if you don't want to receive our newsletter.");
+
+$form->addElement('reset', 'reset', 'Reset');
+$form->addElement('submit', 'submit', 'Register');
+
+// Adds some validation rules
+
+$form->addRule('email', 'Email address is required', 'required');
+$form->addGroupRule('name', 'Name is required', 'required');
+$form->addRule('pass', 'Password must be between 8 to 10 characters', 'rangelength', array(8, 10));
+$form->addRule('country', 'Country is a required field', 'required');
+$form->addGroupRule('destination', 'Please check at least two boxes', 'required', null, 2);
+$form->addGroupRule('phone', 'Please fill all phone fields', 'required');
+$form->addGroupRule('phone', 'Values must be numeric', 'numeric');
+
+$AddrRules['zip'][0] = array('Zip code is required', 'required');
+$AddrRules['zip'][1] = array('Zip code is numeric only', 'numeric');
+$AddrRules['city'][0] = array('City is required', 'required');
+$AddrRules['city'][1] = array('City is letters only', 'lettersonly');
+$form->addGroupRule('address', $AddrRules);
+
+// Tries to validate the form
+if ($form->validate()) {
+    // Form is validated, then freezes the data
+    $form->freeze();
+}
+
+// setup a template object
+$tpl =& new Smarty;
+$tpl->template_dir = './templates';
+$tpl->compile_dir  = './templates';
+
+$renderer =& new HTML_QuickForm_Renderer_ArraySmarty($tpl, true);
+
+$renderer->setRequiredTemplate(
+   '{if $error}
+        {$label|upper}
+    {else}
+        {$label}
+        {if $required}
+            *
+        {/if}
+    {/if}'
+    );
+
+$renderer->setErrorTemplate(
+   '{if $error}
+        {$error}

+    {/if}{$html}'
+    );
+
+$form->accept($renderer);
+
+// assign array with form data
+$tpl->assign('form', $renderer->toArray());
+
+// capture the array stucture
+ob_start();
+print_r($renderer->toArray());
+$tpl->assign('static_array', ob_get_contents());
+ob_end_clean();
+
+// render and display the template
+$tpl->display('smarty-static.tpl');
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/multiple-labels.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/multiple-labels.php
new file mode 100644
index 000000000..6451568dc
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/multiple-labels.php
@@ -0,0 +1,46 @@
+
+ *
+ * $Id: multiple-labels.php,v 1.1 2004/03/06 12:03:50 avb Exp $ 
+ */
+
+require_once 'HTML/QuickForm.php';
+
+$template =
+'
+    
+        *
+        {label}
+    
+    
+        {element}
+        
{error}

+        
{label_2}
+    
+';
+
+// Create the form, and add a header to it.
+$form = new HTML_QuickForm('labels_example', 'post');
+$form->addHeader('QuickForm Labels Example');
+
+// Do the magic! Just pass your label to the element as an array!
+$form->addElement('text', 'name', array('Name', 'The name that you would like to enter in this element.'));
+$form->addElement('checkbox', 'check', array('Check Me!', 'If you check this box, it will have tick in it.'));
+
+// More boring stuff.
+$form->addElement('submit', null, 'Submit');
+
+if ($form->validate()) {
+    $form->freeze();
+}
+
+// customize the element template
+$renderer =& $form->defaultRenderer();
+$renderer->setElementTemplate($template);
+
+// output the form
+$form->display();
+?>
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/flexy-dynamic.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/flexy-dynamic.html
new file mode 100644
index 000000000..fd3df2b1e
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/flexy-dynamic.html
@@ -0,0 +1,129 @@
+ 
+ 
+ 
+ 
+    Flexy template for Object renderer 
+     
+     
+ 
+ 
+ 
+{form.javascript:h}
+
+{form.outputHeader():h}
+ 
+    {form.outputHeader():h}
+    {form.hidden:h} 
+     
+    {foreach:form.sections,sec} 
+         
+             
+         
+               
+        {foreach:sec.elements,elem} 
+            {if:elem.style} 
+              {elem.outputStyle():h}
+            {else:}
+		{if:elem.isButton()} 
+                    {if:elem.notFrozen()} 
+                        
+                         
+                         
+                     
+                    {end:} 
+                {else:} 
+                     
+                    {if:elem.isType(#textarea#)}                
+                         
+                         
+                     
+                {end:} 
+            {end:}    
+        {end:} 
+     {end:}
+        {if:form.requirednote}
+         
+             
+             
+         
+        {end:} 
+     
+        
+
 
+            {sec.header}
 {elem.html:h}
 
+                            {if:elem.required}*{end:}
+                            {if:elem.error}{end:}
+                            {elem.label:h}:

+                            {if:elem.error}{end:}
+                    {else:} 
+                        		 
+                            {if:elem.required}*{end:}
+                            {if:elem.error}{end:}
+                            {elem.label:h}:
+                            {if:elem.error}{end:}
+                         
+                    {end:}  
+                    {if:elem.error}
{elem.error}
{end:} 
+                    {if:elem.isType(#group#)} 
+                        {foreach:elem.elements,gitem} 
+                            {gitem.label:h} 
+                            {gitem.html:h}{if:gitem.required}**{end:}
+                            {if:elem.separator}{elem.separator:h}{end:}
+                        {end:} 
+                    {else:} 
+                        {elem.html:h} 
+                    {end:} 
+                    
 {form.requirednote:h}
 
+
+  
+
Collected Errors:
 
+{foreach:form.errors,name,error} 
+    {error:h} in element [{name:h}]
 
+{end:} 
+
 
+ 
+  
+
Best Practice: 
 
+Use only one dynamic form template like this for your 
 
+Flexy driven project. You include this where 
 
+to place a form with the formdata object rendered by 
 
+Object QuickForm Renderer as option:
 
+ 
+
 
+<include file=form-dynamic.tpl form={formdata}> 
+
 
+ 
+  
+
The used "Dynamic" Object 
 
+
 
+{dynamic_object} 
+
 
+ 
+ 
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/flexy-static.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/flexy-static.html
new file mode 100644
index 000000000..a13e2996f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/flexy-static.html
@@ -0,0 +1,154 @@
+
+
+
+
+    Flexy template : 2 column layout example
+    
+{form.javascript:h}
+
+
+
+
+{form.outputHeader():h}
+{form.hidden:h}
+
+
+    
+        
+        
+        
+    
+

+            
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                
+                    
+                    
+                
+            
{form.header.personal:h}
{form.name.label:h}{form.name.error:h}
+                        
+                            
+                                
+                                
+                            
+                            
+                                
+                                
+                            
+                        
{form.name.first.html:h}{form.name.last.html:h}
{form.name.first.label:h}{form.name.last.label:h}

+                    
{form.phone.label:h}{form.phone.html:h}
{form.email.label:h}{form.email.html:h}
Please, choose a 8-10 characters password.
{form.pass.label:h}{form.pass.html:h}

+        		
+            
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+            
{form.header.company_info:h}
{form.company.label:h}{form.company.html:h}
{form.street.label:h}{form.street.html:h}
{form.address.label:h}{form.address.error:h}
+                        
+                            
+                                
+                                
+                            
+                            
+                                
+                                
+                            
+                        
{form.address.zip.html:h}{form.address.city.html:h}
{form.address.zip.label:h}{form.address.city.label:h}

+                    
{form.country.label:h}{form.country.html:h}
{form.destination.label:h}{form.destination.html:h}

+        

+
+
+    
+        
+        
+    
+    
+        
+    
+
{form.requirednote:h}{form.reset.html:h} {form.submit.html:h}

{form.news.html:h}

+
+
+
+

+Collected Errors:

+{foreach:form.errors,error}
+    {error} in element [{name}]

+{end:}
+
+ 
+
The used "Static" Object

+
+{static_object}
+

+
+
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/html.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/html.html
new file mode 100644
index 000000000..76f090f82
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/html.html
@@ -0,0 +1,4 @@
+{if:error}
+    {error:h}

+{end:}
+{html:h}
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-dynamic-2.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-dynamic-2.html
new file mode 100644
index 000000000..8f623ddda
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-dynamic-2.html
@@ -0,0 +1,110 @@
+
+
+
+
+IT dynamic renderer: 2 column layout example
+
+{qf_javascript}
+
+
+
+
+{qf_error}

+
+

+
+

+    
+    {qf_hidden}
+    
+

+
+
+
+
+
+    
+
+    
+
+
+

+    
+    
+    
+    
+    
+    
+    
+    
+    
+    
+    
+    
+        
+        
+    
+    
+    
+    
+        
+        
+    
+    
+    
+    
{qf_header}
* {qf_label}{qf_error}
{qf_element}
Please, choose a 8-10 characters password.
* {qf_label}{qf_error}
{qf_element}
* {qf_group_label}{qf_separator}{qf_element}
* {qf_group_label}
+            
+            
+            
+        
{qf_element}
{qf_label}* 

+

+
+
+
+  
+  
+
+
{qf_required_note} 

+

+
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-dynamic.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-dynamic.html
new file mode 100644
index 000000000..939ebbbdc
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-dynamic.html
@@ -0,0 +1,127 @@
+
+
+
+IT dynamic renderer
+
+
+
+
+{qf_javascript}
+

+
+

+    
+    {qf_hidden}
+    
+

+
+
+
+
+    
+        
+    
+
+
+
+    
+    
+        
+    
+    
+
+    
+    
+        
+        
+    
+    
+
+    
+    
+        
+    
+    
+
+    
+    
+        
+        
+    
+    
+
+    
+    
+        
+        
+    
+    
+
+    
+    
+        
+        
+    
+    
+    {qf_addblock}
+
+
+
+    
+        
+        
+    
+
+

+            
    
+                
+                
  • {qf_error}
    • 
+                
+            

+        
{qf_header}
*{qf_label}{qf_error}
{qf_element}
*{qf_label}

+        {qf_error}
{qf_element}
*{qf_group_label}
+            {qf_error}

+            {qf_separator}{qf_element}
+        
 style="font-weight: bold; color: red">{qf_group_label}
+            
+            
+                
+                
+                
+                
+                
+                
+                
+                
+                
+            
+            
*{qf_label}{qf_element}{qf_element}

+        
*{qf_label}{qf_error}
{qf_element}
+        
{qf_label_2}
 {qf_required_note}

+

+
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-static.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-static.html
new file mode 100644
index 000000000..797452bf0
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/it-static.html
@@ -0,0 +1,102 @@
+
+
+
+
+IT static render: 2 column layout example
+
+{form_javascript}
+
+
+
+{form_error}

+
+

+{form_session_html}
+
+
+
+
+

+  
+  
+   
+   
+  
+  
+  
+  
+  
+  
{form_header_personal}
{form_name_label}{form_name_error}
+    
+     
+     
+    
{form_name_first_html}{form_name_last_html}
{form_name_first_label}{form_name_last_label}

+   
{form_phone_label}{form_phone_html}
{form_email_label}{form_email_html}
Please, choose a 8-10 characters password.
{form_pass_label}{form_pass_html}

+		
+  
+  
+  
+  
+   
+   
+  
+  
+  
+  
{form_header_company_info}
{form_company_label}{form_company_html}
{form_street_label}{form_street_html}
{form_address_label}{form_address_error}
+    
+     
+     
+    
{form_address_zip_html}{form_address_city_html}
{form_address_zip_label}{form_address_city_label}

+   
{form_country_label}{form_country_html}
{form_destination_label}{form_destination_html}

+

+
+
+  
+  
+
+
+  
+
+
{form_required_note}{form_reset_html} {form_submit_html}

{form_news_html}

+

+
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/label.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/label.html
new file mode 100644
index 000000000..808a7253b
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/label.html
@@ -0,0 +1,4 @@
+{if:required}
+    *
+{end:}
+{label:h}
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic-fancygroup.tpl b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic-fancygroup.tpl
new file mode 100644
index 000000000..7fa5d276f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic-fancygroup.tpl
@@ -0,0 +1,28 @@
+
+
+
+    
+        {if $element.required}*{/if}{$element.label}:
+    
+    
+    
+        {foreach key=gkey item=gitem from=$element.elements}
+        
+            {if $gitem.type eq "radio"}
+            
+            {else}
+            
+                        
+            {/if}
+        
+        {/foreach}
+    

+                {$gitem.html}                         
+            
+                {if $gitem.required}*{/if}
+                {$gitem.label}
+            
+                {$gitem.html}                         
+            

+    
+
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic-green.tpl b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic-green.tpl
new file mode 100644
index 000000000..d4950eba3
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic-green.tpl
@@ -0,0 +1,9 @@
+
+
+
+    {$element.label}:
+    
+    {if $element.error}{$element.error}
{/if}
+    {$element.html}{if $element.required}*{/if}
+    
+
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic.tpl b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic.tpl
new file mode 100644
index 000000000..90d5dbcd6
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-dynamic.tpl
@@ -0,0 +1,134 @@
+
+
+
+
+    Smarty template for Array renderer
+    
+    
+
+
+
+{$form.javascript}
+
+
+    {$form.hidden}
+    
+    {foreach item=sec key=i from=$form.sections}
+        
+            
+        
+              
+        {foreach item=element from=$sec.elements}
+            
+            
+            {if $element.style}
+                {include file="smarty-dynamic-`$element.style`.tpl} 
+                
+            {*
+            NOTE: Another way ist to have smarty template code in
+            $element.style. In this case you can do:
+            
+            {if $element.style}
+                {eval var=$element.style}
+            *}   
+            
+            
+            {elseif $element.type eq "submit" or $element.type eq "reset"}
+                {if not $form.frozen}
+                   
+                    
+                    
+                
+                {/if}
+            
+            
+            {else}
+                
+                {if $element.type eq "textarea"}               
+                    
+                    
+                
+            
+            {/if}
+        {/foreach}   
+    {/foreach}
+    
+    {if $form.requirednote and not $form.frozen}
+    
+        
+        
+    
+    {/if}
+    
+       
+

+            {$sec.header}
 {$element.html}

+                        {if $element.required}*{/if}{$element.label}

+                {else}
+                    		
+                        {if $element.required}*{/if}{$element.label}:
+                {/if} 
+                    {if $element.error}{$element.error}
{/if}
+                    {if $element.type eq "group"}
+                        {foreach key=gkey item=gitem from=$element.elements}
+                            {$gitem.label}
+                            {$gitem.html}{if $gitem.required}*{/if}                           
+                            {if $element.separator}{cycle values=$element.separator}{/if}
+                        {/foreach}
+                    {else}
+                        {$element.html}
+                    {/if}
+                    
{$element.label_note}

+                    
 {$form.requirednote}

+
+ 
+
Collected Errors:

+{foreach key=name item=error from=$form.errors}
+    {$error} in element [{$name}]

+{/foreach}
+

+
+ 
+
Best Practice: 

+Use only one dynamic form template like this for your 

+Smarty driven project. You include this where 

+to place a form with the formdata-Array rendered by 

+SmartyDynamic QuickForm Renderer as option:

+
+
+{ldelim}include file=form-dynamic.tpl form=$formdata{rdelim}
+

+
+ 
+
The used "Dynamic" Array 

+
+{$dynamic_array|htmlentities}
+

+
+
+
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-static.tpl b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-static.tpl
new file mode 100644
index 000000000..ea3a45596
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/smarty-static.tpl
@@ -0,0 +1,156 @@
+
+
+
+
+    Smarty template for ArraySmarty renderer: 2 column layout example
+    
+{$form.javascript}
+
+
+
+
+

+{$form.hidden}
+
+
+    
+        
+
+        
+    
+

+            
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                
+                    
+                    
+                
+            
{$form.header.personal}
{$form.name.label}{$form.name.error}
+                        
+                            
+                                
+                                
+                            
+                            
+                                
+                                
+                            
+                        
{$form.name.first.html}{$form.name.last.html}
{$form.name.first.label}{$form.name.last.label}

+                    
{$form.phone.label}{$form.phone.html}
{$form.email.label}{$form.email.html}
{$form.pass.label_note}
{$form.pass.label}{$form.pass.html}

+        		
+            
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+                
+                    
+                    
+                
+            
{$form.header.company_info}
{$form.company.label}{$form.company.html}
{$form.street.label}{$form.street.html}
{$form.address.label}{$form.address.error}
+                        
+                            
+                                
+                                
+                            
+                            
+                                
+                                
+                            
+                        
{$form.address.zip.html}{$form.address.city.html}
{$form.address.zip.label}{$form.address.city.label}

+                    
{$form.country.label}{$form.country.html}
{$form.destination.label}{$form.destination.html}

+        

+
+
+    
+        
+        
+    
+    
+        
+    
+
{$form.requirednote}{$form.reset.html} {$form.submit.html}

{$form.news.html}

+
+

+
+

+Collected Errors:

+{foreach key=name item=error from=$form.errors}
+    {$error} in element [{$name}]

+{/foreach}
+
+ 
+
The used "Static" Array

+
+{$static_array|htmlentities}
+

+
+
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/styles/fancygroup.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/styles/fancygroup.html
new file mode 100644
index 000000000..d957d7e44
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/styles/fancygroup.html
@@ -0,0 +1,30 @@
+ 
+     
+        {if:required}*{end:}
+        {if:error}{end:}
+        {label:h}:
+        {if:error}{end:}
+     
+     
+    {if:error}
{error}
{end:} 
+     
+        {foreach:elements,gitem} 
+         
+            {if:gitem.isType(#radio#)} 
+             
+            {else:} 
+             
+                         
+            {end:} 
+         
+        {end:} 
+    
 
+                {gitem.html:h}
+             
+                {if:gitem.required}*{end:} 
+                {gitem.label:h} 
+             
+                {gitem.html:h}                          
+            
 
+     
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/styles/green.html b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/styles/green.html
new file mode 100644
index 000000000..36ef45d4c
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/renderers/templates/styles/green.html
@@ -0,0 +1,10 @@
+ 
+ 
+ 
+    {if:required}*{end:}{label:h}: 
+     
+    {if:error}{error:h}
{end:} 
+    {html:h}
+    {if:label_2}
{label_2:h}{end:}
+     
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/rules-builtin.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/rules-builtin.php
new file mode 100644
index 000000000..c5cf99014
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/rules-builtin.php
@@ -0,0 +1,87 @@
+
+ *
+ * $Id: rules-builtin.php,v 1.4 2004/11/26 10:24:54 avb Exp $ 
+ */
+
+require_once 'HTML/QuickForm.php';
+
+$form =& new HTML_QuickForm('builtin');
+
+// We need an additional label below the element
+$renderer =& $form->defaultRenderer();
+$renderer->setElementTemplate(<<
+    *{label}
+    
+        {error}
{element}
+        
{label_2}
+    
+
+
+EOT
+);
+
+$form->addElement('header', null, 'Required rule');
+$form->addElement('text', 'rRequired', array('Required:', 'Rule type \'required\'
Note: when the field is not \'required\' and is empty, other validation rules will not be applied to it'));
+$form->addRule('rRequired', 'The field is required', 'required', null, 'client');
+
+// RangeLength rules
+$form->addElement('header', null, 'Range based rules');
+$form->addElement('text', 'rMaxLength', array('Maximum length check (5):', 'Rule type \'maxlength\', $format = 5'));
+$form->addElement('text', 'rMinLength', array('Minimum length check (5):', 'Rule type \'minlength\', $format = 5'));
+$form->addElement('text', 'rRangeLength', array('Length range check (5-10):', 'Rule type \'rangelength\', $format = array(5, 10)'));
+
+$form->addRule('rMaxLength', 'Should be less than or equal to 5 symbols', 'maxlength', 5, 'client');
+$form->addRule('rMinLength', 'Should be more than or equal to 5 symbols', 'minlength', 5, 'client');
+$form->addRule('rRangeLength', 'Should be between 5 and 10 symbols', 'rangelength', array(5,10), 'client');
+
+// Email rule
+$form->addElement('header', null, 'Email rule');
+$form->addElement('text', 'rEmail', array('Email check:', 'Rule type \'email\''));
+$form->addRule('rEmail', 'Should contain a valid email', 'email', null, 'client');
+
+// RegEx rules
+$form->addElement('header', null, 'Regex based rules');
+$form->addElement('text', 'rRegex', array('Letters \'A\', \'B\', \'C\' only:', 'Rule type \'regex\' with $format = \'/^[ABCabc]+$/\''));
+$form->addElement('text', 'rLettersOnly', array('Letters only:', 'Rule type \'lettersonly\''));
+$form->addElement('text', 'rAlphaNumeric', array('Alphanumeric:', 'Rule type \'alphanumeric\''));
+$form->addElement('text', 'rNumeric', array('Numeric:', 'Rule type \'numeric\''));
+$form->addElement('text', 'rNoPunctuation', array('No punctuation:', 'Rule type \'nopunctuation\''));
+$form->addElement('text', 'rNonZero', array('Nonzero:', 'Rule type \'nonzero\''));
+
+$form->addRule('rRegex', 'Should contain letters A, B, C only', 'regex', '/^[ABCabc]+$/', 'client');
+$form->addRule('rLettersOnly', 'Should contain letters only', 'lettersonly', null, 'client');
+$form->addRule('rAlphaNumeric', 'Should be alphanumeric', 'alphanumeric', null, 'client');
+$form->addRule('rNumeric', 'Should be numeric', 'numeric', null, 'client');
+$form->addRule('rNoPunctuation', 'Should contain no punctuation', 'nopunctuation', null, 'client');
+$form->addRule('rNonZero', 'Should be nonzero', 'nonzero', null, 'client');
+
+// Compare rule
+$form->addElement('header', null, 'Compare rule');
+$form->addElement('password', 'cmpPasswd', 'Password:');
+$form->addElement('password', 'cmpRepeat', array('Repeat password:', 'Rule type \'compare\', added to array(\'cmpPasswd\', \'cmpRepeat\')'));
+$form->addRule(array('cmpPasswd', 'cmpRepeat'), 'The passwords do not match', 'compare', null, 'client');
+
+// File rules
+$form->addElement('header', null, 'Uploaded file rules');
+$form->addElement('file', 'tstUpload', array('Upload file:', 'Rule types: \'uploadedfile\', \'maxfilesize\' with $format = 10240, \'mimetype\' with $format = \'text/xml\', filename with $format = \'/\\.xml$/\'
Validation for files is obviously server-side only'));
+$form->addRule('tstUpload', 'Upload is required', 'uploadedfile');
+$form->addRule('tstUpload', 'File size should be less than 10kb', 'maxfilesize', 10240);
+$form->addRule('tstUpload', 'File type should be text/xml', 'mimetype', 'text/xml');
+$form->addRule('tstUpload', 'File name should be *.xml', 'filename', '/\\.xml$/');
+
+$form->addElement('header', null, 'Submit the form');
+$submit[] =& $form->createElement('submit', null, 'Send');
+$submit[] =& $form->createElement('checkbox', 'clientSide', null, 'use client-side validation', array('checked' => 'checked', 'onclick' => "if (this.checked) {this.form.onsubmit = oldHandler;} else {oldHandler = this.form.onsubmit; this.form.onsubmit = null;}"));
+$form->addGroup($submit, null, null, ' ', false);
+
+$form->applyFilter('__ALL__', 'trim');
+
+$form->validate();
+
+$form->display();
+?>
diff --git a/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/rules-custom.php b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/rules-custom.php
new file mode 100644
index 000000000..b6ba613ee
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/HTML_QuickForm/docs/rules-custom.php
@@ -0,0 +1,107 @@
+
+ *
+ * $Id: rules-custom.php,v 1.2 2003/11/03 20:45:23 avb Exp $ 
+ */
+
+require_once 'HTML/QuickForm.php';
+require_once 'HTML/QuickForm/Rule.php';
+
+class RuleNumericRange extends HTML_QuickForm_Rule
+{
+    function validate($value, $options)
+    {
+        if (isset($options['min']) && floatval($value) < $options['min']) {
+            return false;
+        }
+        if (isset($options['max']) && floatval($value) > $options['max']) {
+            return false;
+        }
+        return true;
+    }
+
+    function getValidationScript($options = null)
+    {
+        $jsCheck = array();
+        if (isset($options['min'])) {
+            $jsCheck[] = 'Number({jsVar}) >= ' . $options['min'];
+        }
+        if (isset($options['max'])) {
+            $jsCheck[] = 'Number({jsVar}) <= ' . $options['max'];
+        }
+        return array('', "{jsVar} != '' && !(" . implode(' && ', $jsCheck) . ')');
+    } // end func getValidationScript
+}
+
+// In case you are wondering, this checks whether there are too many
+// CAPITAL LETTERS in the string
+function countUpper($value, $limit = null)
+{
+    if (empty($value)) {
+        return false;
+    }
+    if (!isset($limit)) {
+        $limit = 0.5;
+    }
+    $upper = array_filter(preg_split('//', $value, -1, PREG_SPLIT_NO_EMPTY), 'ctype_upper');
+    return (count($upper) / strlen($value)) <= $limit;
+}
+
+// BC thingie: it expects the first param to be element name
+function countUpper_old($name, $value, $limit = null)
+{
+    if (empty($value)) {
+        return false;
+    }
+    if (!isset($limit)) {
+        $limit = 0.5;
+    }
+    $upper = array_filter(preg_split('//', $value, -1, PREG_SPLIT_NO_EMPTY), 'ctype_upper');
+    return (count($upper) / strlen($value)) <= $limit;
+}
+
+$form =& new HTML_QuickForm('custom');
+
+$form->addElement('header', null, 'Custom rule class');
+
+// registering the custom rule class
+$form->registerRule('numRange', null, 'RuleNumericRange');
+$form->addElement('text', 'rNumber_1_10', 'The number (1-10):');
+$form->addRule('rNumber_1_10', 'Enter number from 1 to 10', 'numRange', array('min' => 1, 'max' => 10), 'client');
+
+// adding an instance of the custom rule class without registering
+$form->addElement('text', 'rNonnegative', 'Nonnegative number:');
+$form->addRule('rNonnegative', 'Enter nonnegative number', new RuleNumericRange(), array('min' => 0), 'client');
+
+// adding a classname of the custom rule class without registering
+$form->addElement('text', 'rNonpositive', 'Nonpositive number:');
+$form->addRule('rNonpositive', 'Enter nonpositive number', 'RuleNumericRange', array('max' => 0), 'client');
+
+$form->addElement('header', null, 'Using callbacks');
+
+// using callback without registering
+$form->addElement('text', 'rUpper_0_5', 'Some (preferrably lowercase) text:');
+$form->addRule('rUpper_0_5', 'There are too many CAPITAL LETTERS', 'callback', 'countUpper');
+
+// register with 'callback' type
+$form->registerRule('upper', 'callback', 'countUpper');
+$form->addElement('text', 'rUpper_0_25', 'Some (mostly lowercase) text:');
+$form->addRule('rUpper_0_25', 'There are too many CAPITAL LETTERS', 'upper', 0.25);
+
+// BC feature: register with 'function' type
+$form->registerRule('upperOld', 'function', 'countUpper_old');
+$form->addElement('text', 'rUpper_0', 'Some lowercase text:');
+$form->addRule('rUpper_0', 'There are CAPITAL LETTERS, this is not allowed', 'upperOld', 0);
+
+$form->addElement('submit', null, 'Send');
+
+$form->applyFilter(array('rUpper_0_5', 'rUpper_0_25', 'rUpper_0'), 'trim');
+$form->applyFilter(array('rNumber_1_10', 'rNonnegative', 'rNonpositive'), 'floatval');
+
+$form->validate();
+
+$form->display();
+?>
diff --git a/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example1.php b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example1.php
new file mode 100644
index 000000000..4f5014d76
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example1.php
@@ -0,0 +1,31 @@
+
+*/
+	error_reporting( E_ALL );
+
+    require_once 'XML/Beautifier.php';
+    $fmt = new XML_Beautifier();
+    $result = $fmt->formatFile('test.xml', 'test2.xml');
+    
+    if (PEAR::isError($result)) {
+        echo $result->getMessage();
+        exit();
+    }
+
+    echo "
Original file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test.xml')));
+    echo "
";
+        
+    echo    "

";
+    
+    echo "
Beautified file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test2.xml')));
+    echo "
";
+?>
diff --git a/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example2.php b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example2.php
new file mode 100644
index 000000000..4922a6acc
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example2.php
@@ -0,0 +1,30 @@
+
+*/
+	error_reporting( E_ALL );
+
+    $xmlString = 'foobar';
+
+    require_once 'XML/Beautifier.php';
+    $fmt = new XML_Beautifier();
+    $result = $fmt->formatString($xmlString);
+
+    echo "
Original string
";
+    echo "
";
+    echo htmlspecialchars($xmlString);
+    echo "
";
+        
+    echo    "

";
+    
+    echo "
Beautified string
";
+    echo "
";
+    echo htmlspecialchars($result);
+    echo "
";
+?>
diff --git a/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example3.php b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example3.php
new file mode 100644
index 000000000..1680b8fdc
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example3.php
@@ -0,0 +1,36 @@
+
+*/
+	error_reporting( E_ALL );
+
+    require_once 'XML/Beautifier.php';
+    
+    $options = array(
+                        "caseFolding" => true,
+                        "caseFoldingTo" => "uppercase"
+                    );
+    
+    $fmt = new XML_Beautifier($options);
+    $result = $fmt->formatFile('test.xml', 'test2.xml');
+
+    echo "
Original file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test.xml')));
+    echo "
";
+        
+    echo    "

";
+    
+    echo "
Beautified file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test2.xml')));
+    echo "
";
+?>
diff --git a/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example4.php b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example4.php
new file mode 100644
index 000000000..011cb5a78
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example4.php
@@ -0,0 +1,33 @@
+
+*/
+	error_reporting( E_ALL );
+
+    require_once 'XML/Beautifier.php';
+    
+    $options = array(
+                        "normalizeComments" => true,
+                    );
+    
+    $fmt = new XML_Beautifier($options);
+    $result = $fmt->formatFile('test.xml', 'test2.xml');
+
+    echo "
Original file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test.xml')));
+    echo "
";
+        
+    echo    "

";
+    
+    echo "
Beautified file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test2.xml')));
+    echo "
";
+?>
diff --git a/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example5.php b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example5.php
new file mode 100644
index 000000000..29c83380a
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example5.php
@@ -0,0 +1,37 @@
+
+*/
+	error_reporting( E_ALL );
+
+    require_once 'XML/Beautifier.php';
+    
+    $options = array(
+                        "normalizeComments" => true,
+						"maxCommentLine"	=> 10
+                    );
+    
+    $fmt = new XML_Beautifier($options);
+    $result = $fmt->formatFile('test.xml', 'test2.xml');
+
+    echo "
Original file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test.xml')));
+    echo "
";
+        
+    echo    "

";
+    
+    echo "
Beautified file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test2.xml')));
+    echo "
";
+?>
diff --git a/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example6.php b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example6.php
new file mode 100644
index 000000000..2bd2a42c3
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/example6.php
@@ -0,0 +1,29 @@
+
+ */
+	error_reporting( E_ALL );
+
+    require_once 'XML/Beautifier.php';
+
+    $fmt = new XML_Beautifier( array( "multilineTags" => true ) );
+    $result = $fmt->formatFile('test.xml');
+
+    echo "
Original file
";
+    echo "
";
+    echo htmlspecialchars(implode("",file('test.xml')));
+    echo "
";
+        
+    echo    "

";
+    
+    echo "
Beautified file
";
+    echo "
";
+    echo htmlspecialchars($result);
+    echo "
";
+?>
diff --git a/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/test.xml b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/test.xml
new file mode 100644
index 000000000..c9764039d
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Beautifier/examples/test.xml
@@ -0,0 +1,46 @@
+
+
+    
+]>
+
+
+    
+Stephan Schmidt
+
+
+
+";
+    }
+?>
+&foo;&bar;
+
+   
+        Welcome to PHP
+Application Tools & PEAR!
+
+        If you're new to pat, and would like
+        
+         to know
+         
+         what we do
+         
+         here, take a look at
+         
+         
+         "About Pat" 
+or
+check out the
+"projects overview". Otherwise, you probably know your way 
+around
+the site already 
+
+                                            
+
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_file.php b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_file.php
new file mode 100644
index 000000000..a659db608
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_file.php
@@ -0,0 +1,54 @@
+
+ * @package     XML_Parser
+ * @subpackage  Examples
+ */
+
+/**
+ * require the parser
+ */
+require_once 'XML/Parser.php';
+
+class myParser extends XML_Parser
+{
+
+    function myParser()
+    {
+        parent::XML_Parser();
+    }
+
+   /**
+    * handle start element
+    *
+    * @access   private
+    * @param    resource    xml parser resource
+    * @param    string      name of the element
+    * @param    array       attributes
+    */
+    function startHandler($xp, $name, $attribs)
+    {
+        printf('handle start tag: %s
', $name);
+    }
+
+   /**
+    * handle start element
+    *
+    * @access   private
+    * @param    resource    xml parser resource
+    * @param    string      name of the element
+    * @param    array       attributes
+    */
+    function endHandler($xp, $name)
+    {
+        printf('handle end tag: %s
', $name);
+    }
+}
+
+$p = &new myParser();
+
+$result = $p->setInputFile('xml_parser_file.xml');
+$result = $p->parse();
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_file.xml b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_file.xml
new file mode 100644
index 000000000..f59af027c
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_file.xml
@@ -0,0 +1,5 @@
+
+    content of bar
+    
+    test
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_handler.php b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_handler.php
new file mode 100644
index 000000000..c6c5d036f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_handler.php
@@ -0,0 +1,50 @@
+
+ * @package     XML_Parser
+ * @subpackage  Examples
+ */
+
+/**
+ * require the parser
+ */
+require_once 'XML/Parser.php';
+
+class myHandler
+{
+   /**
+    * handle start element
+    *
+    * @access   private
+    * @param    resource    xml parser resource
+    * @param    string      name of the element
+    * @param    array       attributes
+    */
+    function startHandler($xp, $name, $attribs)
+    {
+        printf('handle start tag: %s
', $name);
+    }
+
+   /**
+    * handle start element
+    *
+    * @access   private
+    * @param    resource    xml parser resource
+    * @param    string      name of the element
+    * @param    array       attributes
+    */
+    function endHandler($xp, $name)
+    {
+        printf('handle end tag: %s
', $name);
+    }
+}
+
+$p = &new XML_Parser();
+$h = &new myHandler();
+
+$result = $p->setInputFile('xml_parser_file.xml');
+$result = $p->setHandlerObj($h);
+$result = $p->parse();
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple1.php b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple1.php
new file mode 100644
index 000000000..6eb4d896d
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple1.php
@@ -0,0 +1,50 @@
+
+ * @package     XML_Parser
+ * @subpackage  Examples
+ */
+
+/**
+ * require the parser
+ */
+require_once 'XML/Parser/Simple.php';
+
+class myParser extends XML_Parser_Simple
+{
+    function myParser()
+    {
+        $this->XML_Parser_Simple();
+    }
+
+   /**
+    * handle the element
+    *
+    * The element will be handled, once it's closed
+    *
+    * @access   private
+    * @param    string      name of the element
+    * @param    array       attributes of the element
+    * @param    string      character data of the element
+    */
+    function handleElement($name, $attribs, $data)
+    {
+        printf('handling %s in tag depth %d
', $name, $this->getCurrentDepth());
+        printf('character data: %s
', $data );
+        print 'Attributes:
';
+        print '
';
+        print_r( $attribs );
+        print '
';
+        print '
';
+    }
+}
+
+$p = &new myParser();
+
+$result = $p->setInputFile('xml_parser_simple1.xml');
+$result = $p->parse();
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple1.xml b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple1.xml
new file mode 100644
index 000000000..0696ef670
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple1.xml
@@ -0,0 +1,9 @@
+
+
+    content of bar
+    
+    
+        test
+        pizza
+    
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple2.php b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple2.php
new file mode 100644
index 000000000..f9f80fb46
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple2.php
@@ -0,0 +1,59 @@
+
+ * @package     XML_Parser
+ * @subpackage  Examples
+ */
+
+/**
+ * require the parser
+ */
+require_once 'XML/Parser/Simple.php';
+
+class myParser2 extends XML_Parser_Simple
+{
+    function myParser()
+    {
+        $this->XML_Parser_Simple();
+    }
+
+   /**
+    * handle the category element
+    *
+    * The element will be handled, once it's closed
+    *
+    * @access   private
+    * @param    string      name of the element
+    * @param    array       attributes of the element
+    * @param    string      character data of the element
+    */
+    function handleElement_category($name, $attribs, $data)
+    {
+        printf( 'Category is %s
', $data );
+    }
+
+   /**
+    * handle the name element
+    *
+    * The element will be handled, once it's closed
+    *
+    * @access   private
+    * @param    string      name of the element
+    * @param    array       attributes of the element
+    * @param    string      character data of the element
+    */
+    function handleElement_name($name, $attribs, $data)
+    {
+        printf( 'Name is %s
', $data );
+    }
+}
+
+$p = &new myParser2();
+$result = $p->setInputFile('xml_parser_simple2.xml');
+$p->setMode('func');
+$result = $p->parse();
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple2.xml b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple2.xml
new file mode 100644
index 000000000..ec56e6543
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple2.xml
@@ -0,0 +1,5 @@
+
+
+    XML
+    XML_Parser
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple_handler.php b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple_handler.php
new file mode 100644
index 000000000..e13bec21f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Parser/examples/xml_parser_simple_handler.php
@@ -0,0 +1,56 @@
+
+ * @package     XML_Parser
+ * @subpackage  Examples
+ */
+
+/**
+ * require the parser
+ */
+require_once 'XML/Parser/Simple.php';
+
+class myHandlerSimple
+{
+   /**
+    * handle the category element
+    *
+    * The element will be handled, once it's closed
+    *
+    * @access   private
+    * @param    string      name of the element
+    * @param    array       attributes of the element
+    * @param    string      character data of the element
+    */
+    function handleElement_category($name, $attribs, $data)
+    {
+        printf( 'Category is %s
', $data );
+    }
+
+   /**
+    * handle the name element
+    *
+    * The element will be handled, once it's closed
+    *
+    * @access   private
+    * @param    string      name of the element
+    * @param    array       attributes of the element
+    * @param    string      character data of the element
+    */
+    function handleElement_name($name, $attribs, $data)
+    {
+        printf( 'Name is %s
', $data );
+    }
+}
+
+$p = &new XML_Parser_Simple();
+$h = &new myHandlerSimple();
+$p->setHandlerObj($h);
+$result = $p->setInputFile('xml_parser_simple2.xml');
+$p->setMode('func');
+$result = $p->parse();
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/example.xml b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/example.xml
new file mode 100644
index 000000000..62aaac89f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/example.xml
@@ -0,0 +1,6 @@
+
+    
+        Test
+        test
+    
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeAndEncode.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeAndEncode.php
new file mode 100644
index 000000000..c5dbdb982
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeAndEncode.php
@@ -0,0 +1,52 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+    require_once 'XML/Unserializer.php';
+
+    // this is just to get a nested object
+    $pearError = PEAR::raiseError('This is just an error object',123);
+    
+    $options = array(
+                        'indent'             => '    ',
+                        'linebreak'          => "\n",
+                        'scalarAsAttributes' => true,
+                        'encodeFunction'     => 'strtoupper'
+                    );
+    
+    $foo = new stdClass();
+    $foo->bar = new stdClass();
+    $foo->bar->test = 'This is a test.';
+    $foo->bar->value = 'This is a value.';
+    
+    $serializer = &new XML_Serializer($options);
+    
+    $result = $serializer->serialize($foo);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+    }
+
+    echo	"
";
+    print_r( htmlspecialchars($xml) );
+    echo	"
";
+
+    $unserializer = &new XML_Unserializer();
+    $unserializer->setOption('parseAttributes', true);
+    $unserializer->setOption('decodeFunction', 'strtolower');
+
+    $result = $unserializer->unserialize($xml);
+    
+    echo '
';
+    print_r($unserializer->getUnserializedData());
+    echo '
';
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeAndReturn.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeAndReturn.php
new file mode 100644
index 000000000..a792e8d3f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeAndReturn.php
@@ -0,0 +1,27 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        'indent'       => '    ',
+                        'linebreak'    => "\n",
+                        'returnResult' => true
+                    );
+    
+    $serializer = new XML_Serializer($options);
+
+    $foo = PEAR::raiseError('Just a test', 1234);
+    
+    $result = $serializer->serialize($foo);
+    
+    echo '
';
+    echo htmlspecialchars($result);
+    echo '
';
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeArrayWithObjects.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeArrayWithObjects.php
new file mode 100644
index 000000000..ed28a5b24
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeArrayWithObjects.php
@@ -0,0 +1,47 @@
+ simplexml
+ *
+ * @author Stephan Schmidt 
+ * @see    serializeIndexedArray.php
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        "indent"          => "    ",
+                        "linebreak"       => "\n",
+                        "typeHints"       => false,
+                        "addDecl"         => true,
+                        "encoding"        => "UTF-8"
+                    );
+    
+    $serializer = new XML_Serializer($options);
+
+    $serializer->setErrorHandling(PEAR_ERROR_DIE);
+    
+    $array = array(
+                    new stdClass(),
+                    new stdClass()
+                    );
+    
+    $result = $serializer->serialize($array);
+    
+    if( $result === true ) {
+        echo    "
";
+        echo    htmlentities($serializer->getSerializedData());
+        echo    "
";
+    }
+
+    $result = $serializer->serialize($array, array( 'classAsTagName' => true ));
+    
+    if( $result === true ) {
+        echo    "
";
+        echo    htmlentities($serializer->getSerializedData());
+        echo    "
";
+    }
+    
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeEmptyArray.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeEmptyArray.php
new file mode 100644
index 000000000..8e8503f95
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeEmptyArray.php
@@ -0,0 +1,27 @@
+
+ */
+error_reporting(E_ALL);
+require_once 'XML/Unserializer.php';
+
+$xml = <<< EOF
+
+1.0
+
+
+EOF;
+
+$unserializer = new XML_Unserializer();
+$result = $unserializer->unserialize($xml);
+
+if( $result === true ) {
+    echo '
';
+    print_r($unserializer->getUnserializedData());
+    echo '
';
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeIndexedArray.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeIndexedArray.php
new file mode 100644
index 000000000..7630569bd
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeIndexedArray.php
@@ -0,0 +1,60 @@
+ simplexml
+ *
+ * It can be used to serialize an indexed array
+ * like ext/simplexml does, by using the name
+ * of the parent tag, while omitting this tag.
+ *
+ * @author Stephan Schmidt 
+ */
+    error_reporting(E_ALL);
+    
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        "indent"         => "    ",
+                        "linebreak"      => "\n",
+						"rootName"       => "rdf:RDF",
+                        "rootAttributes" => array("version" => "0.91"),
+                        "mode"           => "simplexml"
+                    );
+    
+    $serializer = new XML_Serializer($options);
+
+    
+    $rdf    =   array(
+						"channel" => array(
+											"title" => "Example RDF channel",
+											"link"  => "http://www.php-tools.de",
+											"image"	=>	array(
+																"title"	=> "Example image",
+																"url"	=>	"http://www.php-tools.de/image.gif",
+																"link"	=>	"http://www.php-tools.de"
+															),
+                                            "item"   =>  array(
+                    											array(
+                    												"title"	=> "Example item",
+                    												"link"	=> "http://example.com"
+                    											),
+                    											array(
+                    												"title"	=> "Another item",
+                    												"link"	=> "http://example.com"
+                    											),
+                    											array(
+                    												"title"	=> "I think you get it...",
+                    												"link"	=> "http://example.com"
+                    											)
+                                                              )
+										)
+                    );
+    
+    $result = $serializer->serialize($rdf);
+    
+    if( $result === true ) {
+        echo    "
";
+        echo    htmlentities($serializer->getSerializedData());
+        echo    "
";
+    }
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeObject.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeObject.php
new file mode 100644
index 000000000..b277e7a30
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeObject.php
@@ -0,0 +1,43 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+
+    // this is just to get a nested object
+    $pearError = PEAR::raiseError('This is just an error object',123);
+    
+    $options = array(
+                        "indent"         => "    ",
+                        "linebreak"      => "\n",
+                        "defaultTagName" => "unnamedItem",
+                        "typeHints"      => true
+                    );
+    
+    $foo    =   new stdClass;
+    $foo->value = "My value";
+    $foo->error = $pearError;
+    $foo->xml   = "cool";
+
+    $foo->obj	= new stdClass;
+    $foo->arr   = array();
+    $foo->zero  = 0;
+    
+    $serializer = &new XML_Serializer($options);
+    
+    $result = $serializer->serialize($foo);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+    }
+
+    echo	"
";
+    print_r( htmlspecialchars($xml) );
+    echo	"
";
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeRDF.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeRDF.php
new file mode 100644
index 000000000..274643ce7
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeRDF.php
@@ -0,0 +1,64 @@
+ simplexml
+ *
+ * @author Stephan Schmidt 
+ * @see    serializeIndexedArray.php
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        "indent"          => "    ",
+                        "linebreak"       => "\n",
+                        "typeHints"       => false,
+                        "addDecl"         => true,
+                        "encoding"        => "UTF-8",
+						"rootName"        => "rdf:RDF",
+                        "rootAttributes"  => array("version" => "0.91"),
+						"defaultTagName"  => "item",
+                        "attributesArray" => "_attributes"
+                    );
+    
+    $serializer = new XML_Serializer($options);
+
+    
+    $rdf    =   array(
+						"channel" => array(
+											"title" => "Example RDF channel",
+											"link"  => "http://www.php-tools.de",
+											"image"	=>	array(
+																"title"	=> "Example image",
+																"url"	=>	"http://www.php-tools.de/image.gif",
+																"link"	=>	"http://www.php-tools.de"
+															),
+                                            "_attributes" => array( "rdf:about" => "http://example.com/foobar.html" ),
+											array(
+												"title"	=> "Example item",
+												"link"	=> "http://example.com",
+                                                "_attributes" => array( "rdf:about" => "http://example.com/foobar.html" )
+											),
+											array(
+												"title"	=> "Another item",
+												"link"	=> "http://example.com",
+                                                "_attributes" => array( "rdf:about" => "http://example.com/foobar.html" )
+											),
+											array(
+												"title"	=> "I think you get it...",
+												"link"	=> "http://example.com",
+                                                "_attributes" => array( "rdf:about" => "http://example.com/foobar.html" )
+											)
+										)
+                    );
+    
+    $result = $serializer->serialize($rdf);
+    
+    if( $result === true ) {
+        echo    "
";
+        echo    htmlentities($serializer->getSerializedData());
+        echo    "
";
+    }
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithAttributes.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithAttributes.php
new file mode 100644
index 000000000..598ea6fb4
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithAttributes.php
@@ -0,0 +1,48 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        "indent"             => "    ",
+                        "linebreak"          => "\n",
+                        "defaultTagName"     => "unnamedItem",
+						"scalarAsAttributes" => true,
+                    );
+    
+    // this is just to get a nested object
+    $pearError = PEAR::raiseError('This is just an error object',123);
+	
+    $foo    =   new stdClass;
+    
+    $foo->value = "My value";
+    $foo->error = $pearError;
+    $foo->xml   = "cool";
+    
+    $serializer = new XML_Serializer($options);
+    
+    $result = $serializer->serialize($foo);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+
+	    echo	"
";
+	    print_r( htmlspecialchars($xml) );
+	    echo	"
";
+    } else {
+		echo	"
";
+		print_r($result);
+		echo	"
";
+	}
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithAttributes2.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithAttributes2.php
new file mode 100644
index 000000000..5e0ce92d5
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithAttributes2.php
@@ -0,0 +1,47 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        "indent"             => "    ",
+                        "linebreak"          => "\n",
+                        "defaultTagName"     => "unnamedItem",
+						"scalarAsAttributes" => false,
+                        "attributesArray"    => '_attributes',
+                        "contentName"        => '_content'
+                    );
+
+    $data = array(
+                    'foo' => array(
+                                    '_attributes' => array( 'version' => '1.0', 'foo' => 'bar' ),
+                                    '_content'    => 'test'
+                                  ),
+                    'schst' => 'Stephan Schmidt'
+                );    
+    
+    $serializer = new XML_Serializer($options);
+    
+    $result = $serializer->serialize($data);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+
+	    echo	"
";
+	    print_r( htmlspecialchars($xml) );
+	    echo	"
";
+    } else {
+		echo	"
";
+		print_r($result);
+		echo	"
";
+	}
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithDtd.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithDtd.php
new file mode 100644
index 000000000..7370fd888
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithDtd.php
@@ -0,0 +1,33 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        "indent"     => "    ",
+                        "linebreak"  => "\n",
+                        "addDecl"    => true,
+                        "addDoctype" => true,
+                        "doctype"    => array(
+                                                'uri' => 'http://pear.php.net/dtd/package-1.0',
+                                                'id' => '-//PHP//PEAR/DTD PACKAGE 0.1'
+                                             )
+                    );
+    
+    $serializer = new XML_Serializer($options);
+
+    $foo    =   PEAR::raiseError("Just a test", 1234);    
+    
+    $result = $serializer->serialize($foo);
+    
+    if( $result === true ) {
+        echo    "
";
+        echo    htmlentities($serializer->getSerializedData());
+        echo    "
";
+    }
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithIndentedAttributes.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithIndentedAttributes.php
new file mode 100644
index 000000000..5b63199ec
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithIndentedAttributes.php
@@ -0,0 +1,51 @@
+
+ */
+    error_reporting(E_ALL);
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        "indent"             => "    ",
+                        "linebreak"          => "\n",
+                        "typeHints"          => false,
+                        "defaultTagName"     => "unnamedItem",
+                        "scalarAsAttributes" => true,
+                        "indentAttributes"   => "_auto"
+                    );
+    
+    // this is just to get a nested object
+    $pearError = PEAR::raiseError('This is just an error object',123);
+	
+    $foo    =   new stdClass;
+    
+    $foo->value = "My value";
+    $foo->error = $pearError;
+    $foo->xml   = "cool";
+    
+    $serializer = new XML_Serializer($options);
+    
+    $result = $serializer->serialize($foo);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+
+	    echo	"
";
+	    print_r( htmlspecialchars($xml) );
+	    echo	"
";
+    } else {
+		echo	"
";
+		print_r($result);
+		echo	"
";
+	}
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithNamespace.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithNamespace.php
new file mode 100644
index 000000000..e157720a8
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithNamespace.php
@@ -0,0 +1,50 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once '../Serializer.php';
+
+    $options = array(
+                        'indent'         => '  ',
+                        'linebreak'      => "\n",
+                        'defaultTagName' => 'item',
+                        'namespace'      => 'foo'
+                    );
+    
+    $foo    =   new stdClass;
+    $foo->value = 'My value';
+    $foo->xml   = 'cool';
+
+    $foo->obj	= new stdClass;
+    $foo->arr   = array();
+    $foo->zero  = 0;
+    
+    $serializer = &new XML_Serializer($options);
+    
+    $result = $serializer->serialize($foo);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+    }
+
+    echo	'
';
+    print_r( htmlspecialchars($xml) );
+    echo	'
';
+    
+    // also pass the URI
+    $serializer->setOption('namespace', array('bar', 'http://pear.php.net/package/XML_Serializer'));
+    
+    $result = $serializer->serialize($foo);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+    }
+
+    echo	'
';
+    print_r( htmlspecialchars($xml) );
+    echo	'
';
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithTagMap.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithTagMap.php
new file mode 100644
index 000000000..6d3ad5520
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/serializeWithTagMap.php
@@ -0,0 +1,81 @@
+
+ */
+    error_reporting(E_ALL);
+    require_once 'XML/Serializer.php';
+
+    $options = array(
+                        'indent'             => '    ',
+                        'linebreak'          => "\n",
+                        'mode'               => 'simplexml',
+                        'rootName'			 => 'items'
+                    );
+
+    $data = array(
+					'item' => array( array(
+										'title'       => 'Foobar!',
+										'description' => 'This is some text....',
+										'link'        => 'http://foobar.com'
+									),
+									array(
+										'title'       => 'Foobar2!',
+										'description' => 'This is some text.ü ü ä ö',
+										'link'        => 'http://foobar.com'
+									)
+								)
+	    												
+    			);
+                    
+    
+    $serializer = new XML_Serializer($options);
+    
+    $result = $serializer->serialize($data);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+
+	    echo	'
';
+	    print_r( htmlspecialchars($xml) );
+	    echo	'
';
+    } else {
+		echo	'
';
+		print_r($result);
+		echo	'
';
+	}
+
+	$newOptions = array(
+						'rootName' => 'body',
+						'replaceEntities' => XML_SERIALIZER_ENTITIES_HTML,
+						'tagMap'   => array(
+						                      'item'        => 'div',
+						                      'title'       => 'h1',
+						                      'description' => 'p',
+						                      'link'        => 'tt'
+						                  )
+					);
+	
+    $result = $serializer->serialize($data, $newOptions);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+
+	    echo	'
';
+	    print_r( htmlspecialchars($xml) );
+	    echo	'
';
+    } else {
+		echo	'
';
+		print_r($result);
+		echo	'
';
+	}
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeAnyXML.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeAnyXML.php
new file mode 100644
index 000000000..a867d4c14
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeAnyXML.php
@@ -0,0 +1,81 @@
+
+ */
+    error_reporting(E_ALL);
+
+    // this is a simple XML document
+    $xml = '' .
+           '  Stephan Schmidt' .
+           '  Martin Jansen' .
+           '  PEAR QA Team' .
+           '  This is handled by the default keyAttribute' .
+           '  Another foo tag' .
+           '';
+
+    require_once 'XML/Unserializer.php';
+
+    // complex structures are arrays, the key is the attribute 'handle' or 'name', if handle is not present
+    $options = array(
+                     "complexType" => "array",
+                     "keyAttribute" => array(
+                                              'user'  => 'handle',
+                                              'group' => 'name',
+                                              '__default' => 'id'
+                                            )
+                    );
+ 
+    //  be careful to always use the ampersand in front of the new operator 
+    $unserializer = &new XML_Unserializer($options);
+
+    // userialize the document
+    $status = $unserializer->unserialize($xml, false);    
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $data = $unserializer->getUnserializedData();
+
+        echo	"
";
+        print_r( $data );
+        echo	"
";
+    }
+
+
+    // unserialize it again and change the complexType option
+    // but leave other options untouched
+    // now complex types will be an object, and the property name will be in the
+    // attribute 'handle'
+    $status = $unserializer->unserialize($xml, false, array("complexType" => "object"));    
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $data = $unserializer->getUnserializedData();
+
+        echo	"
";
+        print_r( $data );
+        echo	"
";
+    }
+
+
+    // unserialize it again and change the complexType option
+    // and reset all other options
+    // Now, there's no key so the tags are stored in an array
+    $status = $unserializer->unserialize($xml, false, array("overrideOptions" => true, "complexType" => "object"));    
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $data = $unserializer->getUnserializedData();
+
+        echo	"
";
+        print_r( $data );
+        echo	"
";
+    }
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeClassNames.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeClassNames.php
new file mode 100644
index 000000000..57080dfe4
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeClassNames.php
@@ -0,0 +1,57 @@
+
+ * @category    XML
+ * @package     XML_Serializer
+ * @subpackage  Examples
+ */
+error_reporting(E_ALL);
+
+/**
+ * uses XML_Unserializer
+ */
+require_once 'XML/Unserializer.php';
+
+$xml = <<
+   
+     bar
+   
+   
+
+EOT;
+
+class foo
+{
+}
+class bar
+{
+}
+
+echo '
';
+
+//  be careful to always use the ampersand in front of the new operator 
+$unserializer = &new XML_Unserializer();
+$unserializer->setOption('complexType', 'object');
+$unserializer->setOption('parseAttributes', true);
+$unserializer->setOption('returnResult', true);
+
+
+$data = $unserializer->unserialize($xml);    
+var_dump( $data );
+
+
+echo "Do not use tagname as class name\n";
+$unserializer->setOption('tagAsClass', false);
+$data = $unserializer->unserialize($xml);    
+var_dump( $data );
+
+echo "Use a different default class\n";
+$unserializer->setOption('defaultClass', 'foo');
+$data = $unserializer->unserialize($xml);    
+var_dump( $data );
+
+echo '
';
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeEncoded.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeEncoded.php
new file mode 100644
index 000000000..22d707cbe
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeEncoded.php
@@ -0,0 +1,40 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Unserializer.php';
+
+$xml = '
+   
+     chickenwings
+     '.utf8_encode('Hähnchenflügel').'
+   
+ ';
+    
+    // specify different source and target encodings
+    $options = array(
+                      'encoding'       => 'UTF-8',
+                      'targetEncoding' => 'ISO-8859-1'
+                    );
+    
+                    
+    //  be careful to always use the ampersand in front of the new operator 
+    $unserializer = &new XML_Unserializer($options);
+
+    // userialize the document
+    $status = $unserializer->unserialize($xml);
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $data = $unserializer->getUnserializedData();
+
+        echo	"
";
+        print_r( $data );
+        echo	"
";
+    }
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeEnum.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeEnum.php
new file mode 100644
index 000000000..6af1e14d2
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeEnum.php
@@ -0,0 +1,61 @@
+
+ * @uses    example.xml
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Unserializer.php';
+
+$xml1 = '
+   
+     schst
+   
+   
+     luckec
+   
+ ';
+    
+$xml2 = '
+   
+     schst
+   
+ ';
+    
+    $options = array(
+                      'forceEnum' => array('item')
+                    );
+    
+                    
+    //  be careful to always use the ampersand in front of the new operator 
+    $unserializer = &new XML_Unserializer($options);
+
+    // userialize the document
+    $status = $unserializer->unserialize($xml1);
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $data = $unserializer->getUnserializedData();
+
+        echo	"
";
+        print_r( $data );
+        echo	"
";
+    }
+
+    // userialize the document
+    $status = $unserializer->unserialize($xml2);
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $data = $unserializer->getUnserializedData();
+
+        echo	"
";
+        print_r( $data );
+        echo	"
";
+    }
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeObject.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeObject.php
new file mode 100644
index 000000000..b4f1a2c53
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeObject.php
@@ -0,0 +1,58 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Serializer.php';
+    require_once 'XML/Unserializer.php';
+    // this is just to get a nested object
+    $pearError = PEAR::raiseError('This is just an error object',123);
+    
+    $options = array(
+                        "indent"         => "    ",
+                        "linebreak"      => "\n",
+                        "defaultTagName" => "unnamedItem",
+                        "typeHints"      => true
+                    );
+    
+    $foo    =   new stdClass;
+    
+    $foo->value = "My value";
+    $foo->error = $pearError;
+    $foo->xml   = array( "This is" => "cool" );
+    $foo->resource   = fopen( "../package.xml", "r" );
+    
+    $serializer = new XML_Serializer($options);
+    
+    $result = $serializer->serialize($foo);
+    
+    if( $result === true ) {
+		$xml = $serializer->getSerializedData();
+    }
+
+    echo	"
";
+    print_r( htmlspecialchars($xml) );
+    echo	"
";
+    
+    //  be careful to always use the ampersand in front of the new operator 
+    $unserializer = &new XML_Unserializer();
+
+    $status = $unserializer->unserialize($xml);    
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $data = $unserializer->getUnserializedData();
+
+        echo	"
";
+        var_dump( $data );
+        echo	"
";
+    }
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeRDF.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeRDF.php
new file mode 100644
index 000000000..0621936a7
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeRDF.php
@@ -0,0 +1,93 @@
+
+ */
+    error_reporting(E_ALL);
+
+    require_once '../Unserializer.php';
+
+   /**
+    * class for the RDF docuemnt
+    *
+    *
+    */
+    class rdfDocument
+    {
+        var $channel;
+        var $item;
+
+        function getItems($amount)
+        {
+            return array_splice($this->item,0,$amount);
+        }
+    }
+
+
+   /**
+    * class that is used for a channel in the RSS file
+    *
+    * you could implement whatever you like in this class,
+    * properties will be set from the XML document
+    */
+    class channel
+    {
+        function getTitle()
+        {
+            return  $this->title;
+        }
+    }
+    
+   /**
+    * class that is used for an item in the RSS file
+    *
+    * you could implement whatever you like in this class,
+    * properties will be set from the XML document
+    */
+    class item
+    {
+        function getTitle()
+        {
+            return  $this->title;
+        }
+    }
+
+
+    $options = array(
+                     "complexType" => "object",
+                     "tagMap"      => array(
+                                                "rdf:RDF"   => "rdfDocument",   // this is used to specify a classname for the root tag
+                                            )
+                    );
+    
+    //  be careful to always use the ampersand in front of the new operator 
+    $unserializer = &new XML_Unserializer($options);
+
+    $status = $unserializer->unserialize("http://pear.php.net/feeds/latest.rss",true);    
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $rss = $unserializer->getUnserializedData();
+
+        echo "This has been returned by XML_Unserializer:
";
+        
+        echo "
";
+        print_r( $rss );
+        echo "
";
+
+        echo "

Root Tagname: ".$unserializer->getRootName()."
";
+        
+        echo "Title of the channel: ".$rss->channel->getTitle()."
";
+
+        $items = $rss->getItems(3);
+        echo "
Titles of the last three releases:
";
+        foreach ($items as $item) {
+            echo "Title : ".$item->getTitle()."
";
+        }
+    }
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeWithAttributes.php b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeWithAttributes.php
new file mode 100644
index 000000000..27bb06988
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Serializer/examples/unserializeWithAttributes.php
@@ -0,0 +1,33 @@
+
+ * @uses    example.xml
+ */
+    error_reporting(E_ALL);
+
+    require_once 'XML/Unserializer.php';
+
+    $options = array(
+                        "parseAttributes"   =>  true,
+                        "attributesArray"   =>  false
+                    );
+    
+    //  be careful to always use the ampersand in front of the new operator 
+    $unserializer = &new XML_Unserializer($options);
+
+    // userialize the document
+    $status = $unserializer->unserialize("example.xml", true);    
+
+    if (PEAR::isError($status)) {
+        echo    "Error: " . $status->getMessage();
+    } else {
+        $data = $unserializer->getUnserializedData();
+
+        echo	"
";
+        print_r( $data );
+        echo	"
";
+    }
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Util/examples/example.php b/campcaster/src/tools/pear/src/docs/XML_Util/examples/example.php
new file mode 100644
index 000000000..365205661
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Util/examples/example.php
@@ -0,0 +1,228 @@
+\n";
+    print XML_Util::replaceEntities("This string contains < & >.");
+    print "\n

\n";
+
+    /**
+    * reversing XML entities
+    */
+    print "replace XML entities:
\n";
+    print XML_Util::reverseEntities("This string contains < & >.");
+    print "\n

\n";
+
+    /**
+    * building XML declaration
+    */
+    print "building XML declaration:
\n";
+    print htmlspecialchars(XML_Util::getXMLDeclaration());
+    print "\n

\n";
+
+    print "building XML declaration with additional attributes:
";
+    print htmlspecialchars(XML_Util::getXMLDeclaration("1.0", "UTF-8", true));
+    print "\n

\n";
+
+    /**
+    * building document type declaration
+    */
+    print "building DocType declaration:
\n";
+    print htmlspecialchars(XML_Util::getDocTypeDeclaration('package', 'http://pear.php.net/dtd/package-1.0'));
+    print "\n

\n";
+
+    print "building DocType declaration with public ID (does not exist):
\n";
+    print htmlspecialchars(XML_Util::getDocTypeDeclaration('package', array('uri' => 'http://pear.php.net/dtd/package-1.0', 'id' => '-//PHP//PEAR/DTD PACKAGE 0.1')));
+    print "\n

\n";
+
+    print "building DocType declaration with internal DTD:
\n";
+    print "
";
+    print htmlspecialchars(XML_Util::getDocTypeDeclaration('package', 'http://pear.php.net/dtd/package-1.0', ''));
+    print "
";
+    print "\n

\n";
+
+    /**
+    * creating an attribute string
+    */
+    $att = array(
+                  "foo"   =>  "bar",
+                  "argh"  =>  "tomato"
+                );
+
+    print "converting array to string:
\n";
+    print XML_Util::attributesToString($att);
+    print "\n

\n";
+
+
+    /**
+    * creating an attribute string with linebreaks
+    */
+    $att = array(
+                  "foo"   =>  "bar",
+                  "argh"  =>  "tomato"
+                );
+
+    print "converting array to string (including line breaks):
\n";
+    print "
";
+    print XML_Util::attributesToString($att, true, true);
+    print "
";
+    print "\n

\n";
+
+
+    /**
+    * splitting a qualified tag name
+    */
+    print "splitting qualified tag name:
\n";
+    print "
";
+    print_r(XML_Util::splitQualifiedName("xslt:stylesheet"));
+    print "
";
+    print "\n
\n";
+
+
+    /**
+    * splitting a qualified tag name (no namespace)
+    */
+    print "splitting qualified tag name (no namespace):
\n";
+    print "
";
+    print_r(XML_Util::splitQualifiedName("foo"));
+    print "
";
+    print "\n
\n";
+
+    /**
+    * splitting a qualified tag name (no namespace, but default namespace specified)
+    */
+    print "splitting qualified tag name (no namespace, but default namespace specified):
\n";
+    print "
";
+    print_r(XML_Util::splitQualifiedName("foo", "bar"));
+    print "
";
+    print "\n
\n";
+
+    /**
+    * verifying XML names
+    */
+    print "verifying 'My private tag':
\n";
+    print "
";
+    print_r(XML_Util::isValidname('My Private Tag'));
+    print "
";
+    print "\n

\n";
+    
+    print "verifying '-MyTag':
\n";
+    print "
";
+    print_r(XML_Util::isValidname('-MyTag'));
+    print "
";
+    print "\n

\n";
+
+    /**
+    * creating an XML tag
+    */
+    $tag = array(
+                  "namespace"   => "foo",
+                  "localPart"   => "bar",
+                  "attributes"  => array( "key" => "value", "argh" => "fruit&vegetable" ),
+                  "content"     => "I'm inside the tag"
+                );
+
+    print "creating a tag with namespace and local part:
";
+    print htmlentities(XML_Util::createTagFromArray($tag));
+    print "\n

\n";
+
+    /**
+    * creating an XML tag
+    */
+    $tag = array(
+                  "qname"        => "foo:bar",
+                  "namespaceUri" => "http://foo.com",
+                  "attributes"   => array( "key" => "value", "argh" => "fruit&vegetable" ),
+                  "content"      => "I'm inside the tag"
+                );
+
+    print "creating a tag with qualified name and namespaceUri:
\n";
+    print htmlentities(XML_Util::createTagFromArray($tag));
+    print "\n

\n";
+
+    /**
+    * creating an XML tag
+    */
+    $tag = array(
+                  "qname"        => "bar",
+                  "namespaceUri" => "http://foo.com",
+                  "attributes"   => array( "key" => "value", "argh" => "fruit&vegetable" )
+                );
+
+    print "creating an empty tag without namespace but namespace Uri:
\n";
+    print htmlentities(XML_Util::createTagFromArray($tag));
+    print "\n

\n";
+
+    /**
+    * creating an XML tag with a CData Section
+    */
+    $tag = array(
+                  "qname"        => "foo",
+                  "attributes"   => array( "key" => "value", "argh" => "fruit&vegetable" ),
+                  "content"      => "I'm inside the tag"
+                );
+
+    print "creating a tag with CData section:
\n";
+    print htmlentities(XML_Util::createTagFromArray($tag, XML_UTIL_CDATA_SECTION));
+    print "\n

\n";
+
+    /**
+    * creating an XML tag with a CData Section
+    */
+    $tag = array(
+                  "qname"        => "foo",
+                  "attributes"   => array( "key" => "value", "argh" => "tütü" ),
+                  "content"      => "Also XHTML-tags can be created and HTML entities can be replaced Ä ä Ü ö <>."
+                );
+
+    print "creating a tag with HTML entities:
\n";
+    print htmlentities(XML_Util::createTagFromArray($tag, XML_UTIL_ENTITIES_HTML));
+    print "\n

\n";
+
+    /**
+    * creating an XML tag with createTag
+    */
+    print "creating a tag with createTag:
";
+    print htmlentities(XML_Util::createTag("myNs:myTag", array("foo" => "bar"), "This is inside the tag", "http://www.w3c.org/myNs#"));
+    print "\n

\n";
+
+    
+    /**
+    * trying to create an XML tag with an array as content
+    */
+    $tag = array(
+                  "qname"        => "bar",
+                  "content"      => array( "foo" => "bar" )
+                );
+    print "trying to create an XML tag with an array as content:
\n";
+    print "
";
+    print_r(XML_Util::createTagFromArray($tag));
+    print "
";
+    print "\n

\n";
+    
+    /**
+    * trying to create an XML tag without a name
+    */
+    $tag = array(
+                  "attributes"   => array( "foo" => "bar" ),
+                );
+    print "trying to create an XML tag without a name:
\n";
+    print "
";
+    print_r(XML_Util::createTagFromArray($tag));
+    print "
";
+    print "\n

\n";
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/docs/XML_Util/examples/example2.php b/campcaster/src/tools/pear/src/docs/XML_Util/examples/example2.php
new file mode 100644
index 000000000..9d818558b
--- /dev/null
+++ b/campcaster/src/tools/pear/src/docs/XML_Util/examples/example2.php
@@ -0,0 +1,95 @@
+";
+    print htmlentities(XML_Util::createStartElement("myNs:myTag", array("foo" => "bar"), "http://www.w3c.org/myNs#"));
+    print "\n

\n";
+
+
+    /**
+    * creating a start element
+    */
+    print "creating a start element:
";
+    print htmlentities(XML_Util::createStartElement("myTag", array(), "http://www.w3c.org/myNs#"));
+    print "\n

\n";
+
+    /**
+    * creating a start element
+    */
+    print "creating a start element:
";
+    print "
";
+    print htmlentities(XML_Util::createStartElement("myTag", array( "foo" => "bar", "argh" => "tomato" ), "http://www.w3c.org/myNs#", true));
+    print "
";
+    print "\n

\n";
+
+
+    /**
+    * creating an end element
+    */
+    print "creating an end element:
";
+    print htmlentities(XML_Util::createEndElement("myNs:myTag"));
+    print "\n

\n";
+
+    /**
+    * creating a CData section
+    */
+    print "creating a CData section:
";
+    print htmlentities(XML_Util::createCDataSection("I am content."));
+    print "\n

\n";
+
+    /**
+    * creating a comment
+    */
+    print "creating a comment:
";
+    print htmlentities(XML_Util::createComment("I am a comment."));
+    print "\n

\n";
+
+    /**
+    * creating an XML tag with multiline mode
+    */
+    $tag = array(
+                  "qname"        => "foo:bar",
+                  "namespaceUri" => "http://foo.com",
+                  "attributes"   => array( "key" => "value", "argh" => "fruit&vegetable" ),
+                  "content"      => "I'm inside the tag & contain dangerous chars"
+                );
+
+    print "creating a tag with qualified name and namespaceUri:
\n";
+    print "
";
+    print htmlentities(XML_Util::createTagFromArray($tag, XML_UTIL_REPLACE_ENTITIES, true));
+    print "
";
+    print "\n

\n";
+
+    /**
+    * create an attribute string without replacing the entities
+    */
+    $atts = array( 'series' => 'Starsky & Hutch', 'channel' => 'ABC' );
+    print "creating a attribute string, entities in values already had been replaced:
";
+    print htmlentities(XML_Util::attributesToString($atts, true, false, false, false, XML_UTIL_ENTITIES_NONE));
+    print "\n

\n";
+
+    /**
+    * using the array-syntax for attributesToString()
+    */
+    $atts = array( 'series' => 'Starsky & Hutch', 'channel' => 'ABC' );
+    print "using the array-syntax for attributesToString()
";
+    print htmlentities(XML_Util::attributesToString($atts, array('entities' => XML_UTIL_ENTITIES_NONE)));
+    print "\n

\n";
+
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/package.dtd b/campcaster/src/tools/pear/src/package.dtd
new file mode 100644
index 000000000..5bc04dd7d
--- /dev/null
+++ b/campcaster/src/tools/pear/src/package.dtd
@@ -0,0 +1,103 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/campcaster/src/tools/pear/src/pearcmd.php b/campcaster/src/tools/pear/src/pearcmd.php
new file mode 100644
index 000000000..56e22e5da
--- /dev/null
+++ b/campcaster/src/tools/pear/src/pearcmd.php
@@ -0,0 +1,437 @@
+                                   |
+// |          Tomas V.V.Cox                              |
+// |                                                                      |
+// +----------------------------------------------------------------------+
+//
+// $Id: pearcmd.php,v 1.33 2006/01/02 18:05:53 cellog Exp $
+
+ob_end_clean();
+if (!defined('PEAR_RUNTYPE')) {
+    // this is defined in peclcmd.php as 'pecl'
+    define('PEAR_RUNTYPE', 'pear');
+}
+define('PEAR_IGNORE_BACKTRACE', 1);
+if (!function_exists('file_get_contents')) {
+    function file_get_contents($filename)
+    {
+        $fp = fopen($filename, 'rb');
+        $ret = '';
+        while (!feof($fp)) {
+            $ret .= fread($fp, 8092);;
+        }
+        return $ret;
+    }
+}
+/**
+ * @nodep Gtk
+ */
+if ('/home/paul/software/campcaster/campcaster/usr/lib/pear' != '@'.'include_path'.'@') {
+    ini_set('include_path', '/home/paul/software/campcaster/campcaster/usr/lib/pear');
+    $raw = false;
+} else {
+    // this is a raw, uninstalled pear, either a cvs checkout, or php distro
+    $raw = true;
+}
+@ini_set('allow_url_fopen', true);
+if (!ini_get('safe_mode')) {
+    @set_time_limit(0);
+}
+ob_implicit_flush(true);
+@ini_set('track_errors', true);
+@ini_set('html_errors', false);
+@ini_set('magic_quotes_runtime', false);
+$_PEAR_PHPDIR = '#$%^&*';
+set_error_handler('error_handler');
+
+$pear_package_version = "1.4.11";
+
+require_once 'PEAR.php';
+require_once 'PEAR/Frontend.php';
+require_once 'PEAR/Config.php';
+require_once 'PEAR/Command.php';
+require_once 'Console/Getopt.php';
+
+
+PEAR_Command::setFrontendType('CLI');
+$all_commands = PEAR_Command::getCommands();
+
+// remove this next part when we stop supporting that crap-ass PHP 4.2
+if (!isset($_SERVER['argv']) && !isset($argv) && !isset($HTTP_SERVER_VARS['argv'])) {
+    die('ERROR: either use the CLI php executable, or set register_argc_argv=On in php.ini');
+}
+$argv = Console_Getopt::readPHPArgv();
+// fix CGI sapi oddity - the -- in pear.bat/pear is not removed
+if (php_sapi_name() != 'cli' && isset($argv[1]) && $argv[1] == '--') {
+    unset($argv[1]);
+    $argv = array_values($argv);
+}
+$progname = PEAR_RUNTYPE;
+if (in_array('getopt2', get_class_methods('Console_Getopt'))) {
+    array_shift($argv);
+    $options = Console_Getopt::getopt2($argv, "c:C:d:D:Gh?sSqu:vV");
+} else {
+    $options = Console_Getopt::getopt($argv, "c:C:d:D:Gh?sSqu:vV");
+}
+if (PEAR::isError($options)) {
+    usage($options);
+}
+
+$opts = $options[0];
+
+$fetype = 'CLI';
+if ($progname == 'gpear' || $progname == 'pear-gtk') {
+    $fetype = 'Gtk';
+} else {
+    foreach ($opts as $opt) {
+        if ($opt[0] == 'G') {
+            $fetype = 'Gtk';
+        }
+    }
+}
+//Check if Gtk and PHP >= 5.1.0
+if ($fetype == 'Gtk' && version_compare(phpversion(), '5.1.0', '>=')) {
+    $fetype = 'Gtk2';
+}
+
+$pear_user_config = '';
+$pear_system_config = '';
+$store_user_config = false;
+$store_system_config = false;
+$verbose = 1;
+
+foreach ($opts as $opt) {
+    switch ($opt[0]) {
+        case 'c':
+            $pear_user_config = $opt[1];
+            break;
+        case 'C':
+            $pear_system_config = $opt[1];
+            break;
+    }
+}
+
+PEAR_Command::setFrontendType($fetype);
+$ui = &PEAR_Command::getFrontendObject();
+$config = &PEAR_Config::singleton($pear_user_config, $pear_system_config);
+
+if (PEAR::isError($config)) {
+    $_file = '';
+    if ($pear_user_config !== false) {
+       $_file .= $pear_user_config;
+    }
+    if ($pear_system_config !== false) {
+       $_file .= '/' . $pear_system_config;
+    }
+    if ($_file == '/') {
+        $_file = 'The default config file';
+    }
+    $config->getMessage();
+    $ui->outputData("ERROR: $_file is not a valid config file or is corrupted.");
+    // We stop, we have no idea where we are :)
+    exit();    
+}
+
+// this is used in the error handler to retrieve a relative path
+$_PEAR_PHPDIR = $config->get('php_dir');
+$ui->setConfig($config);
+PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($ui, "displayFatalError"));
+if (ini_get('safe_mode')) {
+    $ui->outputData('WARNING: running in safe mode requires that all files created ' .
+        'be the same uid as the current script.  PHP reports this script is uid: ' .
+        @getmyuid() . ', and current user is: ' . @get_current_user());
+}
+
+$verbose = $config->get("verbose");
+$cmdopts = array();
+
+if ($raw) {
+    if (!$config->isDefinedLayer('user') && !$config->isDefinedLayer('system')) {
+        $found = false;
+        foreach ($opts as $opt) {
+            if ($opt[0] == 'd' || $opt[0] == 'D') {
+                $found = true; // the user knows what they are doing, and are setting config values
+            }
+        }
+        if (!$found) {
+            // no prior runs, try to install PEAR
+            if (strpos(dirname(__FILE__), 'scripts')) {
+                $packagexml = dirname(dirname(__FILE__)) . DIRECTORY_SEPARATOR . 'package2.xml';
+                $pearbase = dirname(dirname(__FILE__));
+            } else {
+                $packagexml = dirname(__FILE__) . DIRECTORY_SEPARATOR . 'package2.xml';
+                $pearbase = dirname(__FILE__);
+            }
+            if (file_exists($packagexml)) {
+                $options[1] = array(
+                    'install',
+                    $packagexml
+                );
+                $config->set('php_dir', $pearbase . DIRECTORY_SEPARATOR . 'php');
+                $config->set('data_dir', $pearbase . DIRECTORY_SEPARATOR . 'data');
+                $config->set('doc_dir', $pearbase . DIRECTORY_SEPARATOR . 'docs');
+                $config->set('test_dir', $pearbase . DIRECTORY_SEPARATOR . 'tests');
+                $config->set('ext_dir', $pearbase . DIRECTORY_SEPARATOR . 'extensions');
+                $config->set('bin_dir', $pearbase);
+                $config->mergeConfigFile($pearbase . 'pear.ini', false);
+                $config->store();
+                $config->set('auto_discover', 1);
+            }
+        }
+    }
+}
+foreach ($opts as $opt) {
+    $param = !empty($opt[1]) ? $opt[1] : true;
+    switch ($opt[0]) {
+        case 'd':
+            list($key, $value) = explode('=', $param);
+            $config->set($key, $value, 'user');
+            break;
+        case 'D':
+            list($key, $value) = explode('=', $param);
+            $config->set($key, $value, 'system');
+            break;
+        case 's':
+            $store_user_config = true;
+            break;
+        case 'S':
+            $store_system_config = true;
+            break;
+        case 'u':
+            $config->remove($param, 'user');
+            break;
+        case 'v':
+            $config->set('verbose', $config->get('verbose') + 1);
+            break;
+        case 'q':
+            $config->set('verbose', $config->get('verbose') - 1);
+            break;
+        case 'V':
+            usage(null, 'version');
+        case 'c':
+        case 'C':
+            break;
+        default:
+            // all non pear params goes to the command
+            $cmdopts[$opt[0]] = $param;
+            break;
+    }
+}
+
+if ($store_system_config) {
+    $config->store('system');
+}
+
+if ($store_user_config) {
+    $config->store('user');
+}
+
+$command = (isset($options[1][0])) ? $options[1][0] : null;
+
+if (empty($command) && ($store_user_config || $store_system_config)) {
+    exit;
+}
+
+if ($fetype == 'Gtk' || $fetype == 'Gtk2') {
+    if (!$config->validConfiguration()) {
+        PEAR::raiseError('CRITICAL ERROR: no existing valid configuration files found in files ' .
+            "'$pear_user_config' or '$pear_system_config', please copy an existing configuration" .
+            'file to one of these locations, or use the -c and -s options to create one');
+    }
+    Gtk::main();
+} else do {
+    if ($command == 'help') {
+        usage(null, @$options[1][1]);
+    }
+    if (!$config->validConfiguration()) {
+        PEAR::raiseError('CRITICAL ERROR: no existing valid configuration files found in files ' .
+            "'$pear_user_config' or '$pear_system_config', please copy an existing configuration" .
+            'file to one of these locations, or use the -c and -s options to create one');
+    }
+
+    PEAR::pushErrorHandling(PEAR_ERROR_RETURN);
+    $cmd = PEAR_Command::factory($command, $config);
+    PEAR::popErrorHandling();
+    if (PEAR::isError($cmd)) {
+        usage(null, @$options[1][0]);
+    }
+
+    $short_args = $long_args = null;
+    PEAR_Command::getGetoptArgs($command, $short_args, $long_args);
+    if (in_array('getopt2', get_class_methods('Console_Getopt'))) {
+        array_shift($options[1]);
+        $tmp = Console_Getopt::getopt2($options[1], $short_args, $long_args);
+    } else {
+        $tmp = Console_Getopt::getopt($options[1], $short_args, $long_args);
+    }
+    if (PEAR::isError($tmp)) {
+        break;
+    }
+    list($tmpopt, $params) = $tmp;
+    $opts = array();
+    foreach ($tmpopt as $foo => $tmp2) {
+        list($opt, $value) = $tmp2;
+        if ($value === null) {
+            $value = true; // options without args
+        }
+        if (strlen($opt) == 1) {
+            $cmdoptions = $cmd->getOptions($command);
+            foreach ($cmdoptions as $o => $d) {
+                if (@$d['shortopt'] == $opt) {
+                    $opts[$o] = $value;
+                }
+            }
+        } else {
+            if (substr($opt, 0, 2) == '--') {
+                $opts[substr($opt, 2)] = $value;
+            }
+        }
+    }
+    $ok = $cmd->run($command, $opts, $params);
+    if ($ok === false) {
+        PEAR::raiseError("unknown command `$command'");
+    }
+    if (PEAR::isError($ok)) {
+        PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($ui, "displayFatalError"));
+        PEAR::raiseError($ok);
+    }
+} while (false);
+
+// {{{ usage()
+
+function usage($error = null, $helpsubject = null)
+{
+    global $progname, $all_commands;
+    $stderr = fopen('php://stderr', 'w');
+    if (PEAR::isError($error)) {
+        fputs($stderr, $error->getMessage() . "\n");
+    } elseif ($error !== null) {
+        fputs($stderr, "$error\n");
+    }
+    if ($helpsubject != null) {
+        $put = cmdHelp($helpsubject);
+    } else {
+        $put =
+            "Commands:\n";
+        $maxlen = max(array_map("strlen", $all_commands));
+        $formatstr = "%-{$maxlen}s  %s\n";
+        ksort($all_commands);
+        foreach ($all_commands as $cmd => $class) {
+            $put .= sprintf($formatstr, $cmd, PEAR_Command::getDescription($cmd));
+        }
+        $put .=
+            "Usage: $progname [options] command [command-options] \n".
+            "Type \"$progname help options\" to list all options.\n".
+            "Type \"$progname help shortcuts\" to list all command shortcuts.\n".
+            "Type \"$progname help \" to get the help for the specified command.";
+    }
+    fputs($stderr, "$put\n");
+    fclose($stderr);
+    exit;
+}
+
+function cmdHelp($command)
+{
+    global $progname, $all_commands, $config;
+    if ($command == "options") {
+        return
+        "Options:\n".
+        "     -v         increase verbosity level (default 1)\n".
+        "     -q         be quiet, decrease verbosity level\n".
+        "     -c file    find user configuration in `file'\n".
+        "     -C file    find system configuration in `file'\n".
+        "     -d foo=bar set user config variable `foo' to `bar'\n".
+        "     -D foo=bar set system config variable `foo' to `bar'\n".
+        "     -G         start in graphical (Gtk) mode\n".
+        "     -s         store user configuration\n".
+        "     -S         store system configuration\n".
+        "     -u foo     unset `foo' in the user configuration\n".
+        "     -h, -?     display help/usage (this message)\n".
+        "     -V         version information\n";
+    } elseif ($command == "shortcuts") {
+        $sc = PEAR_Command::getShortcuts();
+        $ret = "Shortcuts:\n";
+        foreach ($sc as $s => $c) {
+            $ret .= sprintf("     %-8s %s\n", $s, $c);
+        }
+        return $ret;
+
+    } elseif ($command == "version") {
+        return "PEAR Version: ".$GLOBALS['pear_package_version'].
+               "\nPHP Version: ".phpversion().
+               "\nZend Engine Version: ".zend_version().
+               "\nRunning on: ".php_uname();
+
+    } elseif ($help = PEAR_Command::getHelp($command)) {
+        if (is_string($help)) {
+            return "$progname $command [options] $help\n";
+        }
+        if ($help[1] === null) {
+            return "$progname $command $help[0]";
+        } else {
+            return "$progname $command [options] $help[0]\n$help[1]";
+        }
+    }
+    return "Command '$command' is not valid, try 'pear help'";
+}
+
+// }}}
+
+function error_handler($errno, $errmsg, $file, $line, $vars) {
+    if ((defined('E_STRICT') && $errno & E_STRICT) || !error_reporting()) {
+        if (defined('E_STRICT') && $errno & E_STRICT) {
+            return; // E_STRICT
+        }
+        if ($GLOBALS['config']->get('verbose') < 4) {
+            return; // @silenced error, show all if debug is high enough
+        }
+    }
+    $errortype = array (
+        E_ERROR   =>  "Error",
+        E_WARNING   =>  "Warning",
+        E_PARSE   =>  "Parsing Error",
+        E_NOTICE   =>  "Notice",
+        E_CORE_ERROR  =>  "Core Error",
+        E_CORE_WARNING  =>  "Core Warning",
+        E_COMPILE_ERROR  =>  "Compile Error",
+        E_COMPILE_WARNING =>  "Compile Warning",
+        E_USER_ERROR =>  "User Error",
+        E_USER_WARNING =>  "User Warning",
+        E_USER_NOTICE =>  "User Notice"
+    );
+    $prefix = $errortype[$errno];
+    global $_PEAR_PHPDIR;
+    if (stristr($file, $_PEAR_PHPDIR)) {
+        $file = substr($file, strlen($_PEAR_PHPDIR) + 1);
+    } else {
+        $file = basename($file);
+    }
+    print "\n$prefix: $errmsg in $file on line $line\n";
+}
+
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * mode: php
+ * End:
+ */
+// vim600:syn=php
+
+?>
diff --git a/campcaster/src/tools/pear/src/peclcmd.php b/campcaster/src/tools/pear/src/peclcmd.php
new file mode 100644
index 000000000..61f2cede6
--- /dev/null
+++ b/campcaster/src/tools/pear/src/peclcmd.php
@@ -0,0 +1,45 @@
+                                   |
+// |          Tomas V.V.Cox                              |
+// |                                                                      |
+// +----------------------------------------------------------------------+
+//
+// $Id: peclcmd.php,v 1.1 2005/02/21 05:30:56 cellog Exp $
+
+/**
+ * @nodep Gtk
+ */
+if ('/home/paul/software/campcaster/campcaster/usr/lib/pear' != '@'.'include_path'.'@') {
+    ini_set('include_path', '/home/paul/software/campcaster/campcaster/usr/lib/pear');
+    $raw = false;
+} else {
+    // this is a raw, uninstalled pear, either a cvs checkout, or php distro
+    $raw = true;
+}
+define('PEAR_RUNTYPE', 'pecl');
+require_once 'pearcmd.php';
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * mode: php
+ * End:
+ */
+// vim600:syn=php
+
+?>
diff --git a/campcaster/src/tools/pear/src/scripts/pear.bat b/campcaster/src/tools/pear/src/scripts/pear.bat
new file mode 100644
index 000000000..ca0156fbd
--- /dev/null
+++ b/campcaster/src/tools/pear/src/scripts/pear.bat
@@ -0,0 +1,115 @@
+@ECHO OFF
+
+REM ----------------------------------------------------------------------
+REM PHP version 5
+REM ----------------------------------------------------------------------
+REM Copyright (c) 1997-2004 The PHP Group
+REM ----------------------------------------------------------------------
+REM  This source file is subject to version 3.0 of the PHP license, 
+REM  that is bundled with this package in the file LICENSE, and is
+REM  available at through the world-wide-web at
+REM  http://www.php.net/license/3_0.txt. 
+REM  If you did not receive a copy of the PHP license and are unable to
+REM  obtain it through the world-wide-web, please send a note to
+REM  license@php.net so we can mail you a copy immediately.
+REM ----------------------------------------------------------------------
+REM  Authors:     Alexander Merz (alexmerz@php.net)
+REM ----------------------------------------------------------------------
+REM
+REM  Last updated 12/29/2004 ($Id$ is not replaced if the file is binary)
+
+REM change this lines to match the paths of your system
+REM -------------------
+
+
+REM Test to see if this is a raw pear.bat (uninstalled version)
+SET TMPTMPTMPTMPT=@includ
+SET PMTPMTPMT=%TMPTMPTMPTMPT%e_path@
+FOR %%x IN ("@include_path@") DO (if %%x=="%PMTPMTPMT%" GOTO :NOTINSTALLED)
+
+REM Check PEAR global ENV, set them if they do not exist
+IF "%PHP_PEAR_INSTALL_DIR%"=="" SET "PHP_PEAR_INSTALL_DIR=@include_path@"
+IF "%PHP_PEAR_BIN_DIR%"=="" SET "PHP_PEAR_BIN_DIR=@bin_dir@"
+IF "%PHP_PEAR_PHP_BIN%"=="" SET "PHP_PEAR_PHP_BIN=@php_bin@"
+GOTO :INSTALLED
+
+:NOTINSTALLED
+ECHO WARNING: This is a raw, uninstalled pear.bat
+
+REM Check to see if we can grab the directory of this file (Windows NT+)
+IF %~n0 == pear (
+FOR %%x IN (cli\php.exe php.exe) DO (if "%%~$PATH:x" NEQ "" (
+SET "PHP_PEAR_PHP_BIN=%%~$PATH:x"
+echo Using PHP Executable "%PHP_PEAR_PHP_BIN%"
+"%PHP_PEAR_PHP_BIN%" -v
+GOTO :NEXTTEST
+))
+GOTO :FAILAUTODETECT
+:NEXTTEST
+IF "%PHP_PEAR_PHP_BIN%" NEQ "" (
+
+REM We can use this PHP to run a temporary php file to get the dirname of pear
+
+echo ^ > ~~getloc.php
+"%PHP_PEAR_PHP_BIN%" ~~getloc.php
+set /p PHP_PEAR_BIN_DIR=fakeprompt < ~a.a
+DEL ~a.a
+DEL ~~getloc.php
+set "PHP_PEAR_INSTALL_DIR=%PHP_PEAR_BIN_DIR%pear"
+
+REM Make sure there is a pearcmd.php at our disposal
+
+IF NOT EXIST %PHP_PEAR_INSTALL_DIR%\pearcmd.php (
+IF EXIST %PHP_PEAR_INSTALL_DIR%\scripts\pearcmd.php COPY %PHP_PEAR_INSTALL_DIR%\scripts\pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+IF EXIST pearcmd.php COPY pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+IF EXIST %~dp0\scripts\pearcmd.php COPY %~dp0\scripts\pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+)
+)
+GOTO :INSTALLED
+) ELSE (
+REM Windows Me/98 cannot succeed, so allow the batch to fail
+)
+:FAILAUTODETECT
+echo WARNING: failed to auto-detect pear information
+:INSTALLED
+
+REM Check Folders and files
+IF NOT EXIST "%PHP_PEAR_INSTALL_DIR%" GOTO PEAR_INSTALL_ERROR
+IF NOT EXIST "%PHP_PEAR_INSTALL_DIR%\pearcmd.php" GOTO PEAR_INSTALL_ERROR2
+IF NOT EXIST "%PHP_PEAR_BIN_DIR%" GOTO PEAR_BIN_ERROR
+IF NOT EXIST "%PHP_PEAR_PHP_BIN%" GOTO PEAR_PHPBIN_ERROR
+REM launch pearcmd
+GOTO RUN
+:PEAR_INSTALL_ERROR
+ECHO PHP_PEAR_INSTALL_DIR is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_INSTALL_DIR%
+GOTO END
+:PEAR_INSTALL_ERROR2
+ECHO PHP_PEAR_INSTALL_DIR is not set correctly.
+ECHO pearcmd.php could not be found there.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_INSTALL_DIR%
+GOTO END
+:PEAR_BIN_ERROR
+ECHO PHP_PEAR_BIN_DIR is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_BIN_DIR%
+GOTO END
+:PEAR_PHPBIN_ERROR
+ECHO PHP_PEAR_PHP_BIN is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_PHP_BIN%
+GOTO END
+:RUN
+"%PHP_PEAR_PHP_BIN%" -C -d output_buffering=1 -d safe_mode=0 -d open_basedir="" -d include_path="%PHP_PEAR_INSTALL_DIR%" -f "%PHP_PEAR_INSTALL_DIR%\pearcmd.php" -- %1 %2 %3 %4 %5 %6 %7 %8 %9
+:END
+@ECHO ON
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/scripts/pear.sh b/campcaster/src/tools/pear/src/scripts/pear.sh
new file mode 100644
index 000000000..bf1778779
--- /dev/null
+++ b/campcaster/src/tools/pear/src/scripts/pear.sh
@@ -0,0 +1,28 @@
+#!/bin/sh
+
+# first find which PHP binary to use
+if test "x$PHP_PEAR_PHP_BIN" != "x"; then
+  PHP="$PHP_PEAR_PHP_BIN"
+else
+  if test "@php_bin@" = '@'php_bin'@'; then
+    PHP=php 
+  else
+    PHP="@php_bin@"
+  fi
+fi
+
+# then look for the right pear include dir
+if test "x$PHP_PEAR_INSTALL_DIR" != "x"; then
+  INCDIR=$PHP_PEAR_INSTALL_DIR
+  INCARG="-d include_path=$PHP_PEAR_INSTALL_DIR"
+else
+  if test "@php_dir@" = '@'php_dir'@'; then
+    INCDIR=`dirname $0`
+    INCARG=""  
+  else
+    INCDIR="@php_dir@"
+    INCARG="-d include_path=@php_dir@"
+  fi
+fi
+
+exec $PHP -C -q $INCARG -d output_buffering=1 -d open_basedir="" -d safe_mode=0 $INCDIR/pearcmd.php "$@"
diff --git a/campcaster/src/tools/pear/src/scripts/pearcmd.php b/campcaster/src/tools/pear/src/scripts/pearcmd.php
new file mode 100644
index 000000000..530a0f7cd
--- /dev/null
+++ b/campcaster/src/tools/pear/src/scripts/pearcmd.php
@@ -0,0 +1,437 @@
+                                   |
+// |          Tomas V.V.Cox                              |
+// |                                                                      |
+// +----------------------------------------------------------------------+
+//
+// $Id: pearcmd.php,v 1.33 2006/01/02 18:05:53 cellog Exp $
+
+ob_end_clean();
+if (!defined('PEAR_RUNTYPE')) {
+    // this is defined in peclcmd.php as 'pecl'
+    define('PEAR_RUNTYPE', 'pear');
+}
+define('PEAR_IGNORE_BACKTRACE', 1);
+if (!function_exists('file_get_contents')) {
+    function file_get_contents($filename)
+    {
+        $fp = fopen($filename, 'rb');
+        $ret = '';
+        while (!feof($fp)) {
+            $ret .= fread($fp, 8092);;
+        }
+        return $ret;
+    }
+}
+/**
+ * @nodep Gtk
+ */
+if ('@include_path@' != '@'.'include_path'.'@') {
+    ini_set('include_path', '@include_path@');
+    $raw = false;
+} else {
+    // this is a raw, uninstalled pear, either a cvs checkout, or php distro
+    $raw = true;
+}
+@ini_set('allow_url_fopen', true);
+if (!ini_get('safe_mode')) {
+    @set_time_limit(0);
+}
+ob_implicit_flush(true);
+@ini_set('track_errors', true);
+@ini_set('html_errors', false);
+@ini_set('magic_quotes_runtime', false);
+$_PEAR_PHPDIR = '#$%^&*';
+set_error_handler('error_handler');
+
+$pear_package_version = "@pear_version@";
+
+require_once 'PEAR.php';
+require_once 'PEAR/Frontend.php';
+require_once 'PEAR/Config.php';
+require_once 'PEAR/Command.php';
+require_once 'Console/Getopt.php';
+
+
+PEAR_Command::setFrontendType('CLI');
+$all_commands = PEAR_Command::getCommands();
+
+// remove this next part when we stop supporting that crap-ass PHP 4.2
+if (!isset($_SERVER['argv']) && !isset($argv) && !isset($HTTP_SERVER_VARS['argv'])) {
+    die('ERROR: either use the CLI php executable, or set register_argc_argv=On in php.ini');
+}
+$argv = Console_Getopt::readPHPArgv();
+// fix CGI sapi oddity - the -- in pear.bat/pear is not removed
+if (php_sapi_name() != 'cli' && isset($argv[1]) && $argv[1] == '--') {
+    unset($argv[1]);
+    $argv = array_values($argv);
+}
+$progname = PEAR_RUNTYPE;
+if (in_array('getopt2', get_class_methods('Console_Getopt'))) {
+    array_shift($argv);
+    $options = Console_Getopt::getopt2($argv, "c:C:d:D:Gh?sSqu:vV");
+} else {
+    $options = Console_Getopt::getopt($argv, "c:C:d:D:Gh?sSqu:vV");
+}
+if (PEAR::isError($options)) {
+    usage($options);
+}
+
+$opts = $options[0];
+
+$fetype = 'CLI';
+if ($progname == 'gpear' || $progname == 'pear-gtk') {
+    $fetype = 'Gtk';
+} else {
+    foreach ($opts as $opt) {
+        if ($opt[0] == 'G') {
+            $fetype = 'Gtk';
+        }
+    }
+}
+//Check if Gtk and PHP >= 5.1.0
+if ($fetype == 'Gtk' && version_compare(phpversion(), '5.1.0', '>=')) {
+    $fetype = 'Gtk2';
+}
+
+$pear_user_config = '';
+$pear_system_config = '';
+$store_user_config = false;
+$store_system_config = false;
+$verbose = 1;
+
+foreach ($opts as $opt) {
+    switch ($opt[0]) {
+        case 'c':
+            $pear_user_config = $opt[1];
+            break;
+        case 'C':
+            $pear_system_config = $opt[1];
+            break;
+    }
+}
+
+PEAR_Command::setFrontendType($fetype);
+$ui = &PEAR_Command::getFrontendObject();
+$config = &PEAR_Config::singleton($pear_user_config, $pear_system_config);
+
+if (PEAR::isError($config)) {
+    $_file = '';
+    if ($pear_user_config !== false) {
+       $_file .= $pear_user_config;
+    }
+    if ($pear_system_config !== false) {
+       $_file .= '/' . $pear_system_config;
+    }
+    if ($_file == '/') {
+        $_file = 'The default config file';
+    }
+    $config->getMessage();
+    $ui->outputData("ERROR: $_file is not a valid config file or is corrupted.");
+    // We stop, we have no idea where we are :)
+    exit();    
+}
+
+// this is used in the error handler to retrieve a relative path
+$_PEAR_PHPDIR = $config->get('php_dir');
+$ui->setConfig($config);
+PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($ui, "displayFatalError"));
+if (ini_get('safe_mode')) {
+    $ui->outputData('WARNING: running in safe mode requires that all files created ' .
+        'be the same uid as the current script.  PHP reports this script is uid: ' .
+        @getmyuid() . ', and current user is: ' . @get_current_user());
+}
+
+$verbose = $config->get("verbose");
+$cmdopts = array();
+
+if ($raw) {
+    if (!$config->isDefinedLayer('user') && !$config->isDefinedLayer('system')) {
+        $found = false;
+        foreach ($opts as $opt) {
+            if ($opt[0] == 'd' || $opt[0] == 'D') {
+                $found = true; // the user knows what they are doing, and are setting config values
+            }
+        }
+        if (!$found) {
+            // no prior runs, try to install PEAR
+            if (strpos(dirname(__FILE__), 'scripts')) {
+                $packagexml = dirname(dirname(__FILE__)) . DIRECTORY_SEPARATOR . 'package2.xml';
+                $pearbase = dirname(dirname(__FILE__));
+            } else {
+                $packagexml = dirname(__FILE__) . DIRECTORY_SEPARATOR . 'package2.xml';
+                $pearbase = dirname(__FILE__);
+            }
+            if (file_exists($packagexml)) {
+                $options[1] = array(
+                    'install',
+                    $packagexml
+                );
+                $config->set('php_dir', $pearbase . DIRECTORY_SEPARATOR . 'php');
+                $config->set('data_dir', $pearbase . DIRECTORY_SEPARATOR . 'data');
+                $config->set('doc_dir', $pearbase . DIRECTORY_SEPARATOR . 'docs');
+                $config->set('test_dir', $pearbase . DIRECTORY_SEPARATOR . 'tests');
+                $config->set('ext_dir', $pearbase . DIRECTORY_SEPARATOR . 'extensions');
+                $config->set('bin_dir', $pearbase);
+                $config->mergeConfigFile($pearbase . 'pear.ini', false);
+                $config->store();
+                $config->set('auto_discover', 1);
+            }
+        }
+    }
+}
+foreach ($opts as $opt) {
+    $param = !empty($opt[1]) ? $opt[1] : true;
+    switch ($opt[0]) {
+        case 'd':
+            list($key, $value) = explode('=', $param);
+            $config->set($key, $value, 'user');
+            break;
+        case 'D':
+            list($key, $value) = explode('=', $param);
+            $config->set($key, $value, 'system');
+            break;
+        case 's':
+            $store_user_config = true;
+            break;
+        case 'S':
+            $store_system_config = true;
+            break;
+        case 'u':
+            $config->remove($param, 'user');
+            break;
+        case 'v':
+            $config->set('verbose', $config->get('verbose') + 1);
+            break;
+        case 'q':
+            $config->set('verbose', $config->get('verbose') - 1);
+            break;
+        case 'V':
+            usage(null, 'version');
+        case 'c':
+        case 'C':
+            break;
+        default:
+            // all non pear params goes to the command
+            $cmdopts[$opt[0]] = $param;
+            break;
+    }
+}
+
+if ($store_system_config) {
+    $config->store('system');
+}
+
+if ($store_user_config) {
+    $config->store('user');
+}
+
+$command = (isset($options[1][0])) ? $options[1][0] : null;
+
+if (empty($command) && ($store_user_config || $store_system_config)) {
+    exit;
+}
+
+if ($fetype == 'Gtk' || $fetype == 'Gtk2') {
+    if (!$config->validConfiguration()) {
+        PEAR::raiseError('CRITICAL ERROR: no existing valid configuration files found in files ' .
+            "'$pear_user_config' or '$pear_system_config', please copy an existing configuration" .
+            'file to one of these locations, or use the -c and -s options to create one');
+    }
+    Gtk::main();
+} else do {
+    if ($command == 'help') {
+        usage(null, @$options[1][1]);
+    }
+    if (!$config->validConfiguration()) {
+        PEAR::raiseError('CRITICAL ERROR: no existing valid configuration files found in files ' .
+            "'$pear_user_config' or '$pear_system_config', please copy an existing configuration" .
+            'file to one of these locations, or use the -c and -s options to create one');
+    }
+
+    PEAR::pushErrorHandling(PEAR_ERROR_RETURN);
+    $cmd = PEAR_Command::factory($command, $config);
+    PEAR::popErrorHandling();
+    if (PEAR::isError($cmd)) {
+        usage(null, @$options[1][0]);
+    }
+
+    $short_args = $long_args = null;
+    PEAR_Command::getGetoptArgs($command, $short_args, $long_args);
+    if (in_array('getopt2', get_class_methods('Console_Getopt'))) {
+        array_shift($options[1]);
+        $tmp = Console_Getopt::getopt2($options[1], $short_args, $long_args);
+    } else {
+        $tmp = Console_Getopt::getopt($options[1], $short_args, $long_args);
+    }
+    if (PEAR::isError($tmp)) {
+        break;
+    }
+    list($tmpopt, $params) = $tmp;
+    $opts = array();
+    foreach ($tmpopt as $foo => $tmp2) {
+        list($opt, $value) = $tmp2;
+        if ($value === null) {
+            $value = true; // options without args
+        }
+        if (strlen($opt) == 1) {
+            $cmdoptions = $cmd->getOptions($command);
+            foreach ($cmdoptions as $o => $d) {
+                if (@$d['shortopt'] == $opt) {
+                    $opts[$o] = $value;
+                }
+            }
+        } else {
+            if (substr($opt, 0, 2) == '--') {
+                $opts[substr($opt, 2)] = $value;
+            }
+        }
+    }
+    $ok = $cmd->run($command, $opts, $params);
+    if ($ok === false) {
+        PEAR::raiseError("unknown command `$command'");
+    }
+    if (PEAR::isError($ok)) {
+        PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($ui, "displayFatalError"));
+        PEAR::raiseError($ok);
+    }
+} while (false);
+
+// {{{ usage()
+
+function usage($error = null, $helpsubject = null)
+{
+    global $progname, $all_commands;
+    $stderr = fopen('php://stderr', 'w');
+    if (PEAR::isError($error)) {
+        fputs($stderr, $error->getMessage() . "\n");
+    } elseif ($error !== null) {
+        fputs($stderr, "$error\n");
+    }
+    if ($helpsubject != null) {
+        $put = cmdHelp($helpsubject);
+    } else {
+        $put =
+            "Commands:\n";
+        $maxlen = max(array_map("strlen", $all_commands));
+        $formatstr = "%-{$maxlen}s  %s\n";
+        ksort($all_commands);
+        foreach ($all_commands as $cmd => $class) {
+            $put .= sprintf($formatstr, $cmd, PEAR_Command::getDescription($cmd));
+        }
+        $put .=
+            "Usage: $progname [options] command [command-options] \n".
+            "Type \"$progname help options\" to list all options.\n".
+            "Type \"$progname help shortcuts\" to list all command shortcuts.\n".
+            "Type \"$progname help \" to get the help for the specified command.";
+    }
+    fputs($stderr, "$put\n");
+    fclose($stderr);
+    exit;
+}
+
+function cmdHelp($command)
+{
+    global $progname, $all_commands, $config;
+    if ($command == "options") {
+        return
+        "Options:\n".
+        "     -v         increase verbosity level (default 1)\n".
+        "     -q         be quiet, decrease verbosity level\n".
+        "     -c file    find user configuration in `file'\n".
+        "     -C file    find system configuration in `file'\n".
+        "     -d foo=bar set user config variable `foo' to `bar'\n".
+        "     -D foo=bar set system config variable `foo' to `bar'\n".
+        "     -G         start in graphical (Gtk) mode\n".
+        "     -s         store user configuration\n".
+        "     -S         store system configuration\n".
+        "     -u foo     unset `foo' in the user configuration\n".
+        "     -h, -?     display help/usage (this message)\n".
+        "     -V         version information\n";
+    } elseif ($command == "shortcuts") {
+        $sc = PEAR_Command::getShortcuts();
+        $ret = "Shortcuts:\n";
+        foreach ($sc as $s => $c) {
+            $ret .= sprintf("     %-8s %s\n", $s, $c);
+        }
+        return $ret;
+
+    } elseif ($command == "version") {
+        return "PEAR Version: ".$GLOBALS['pear_package_version'].
+               "\nPHP Version: ".phpversion().
+               "\nZend Engine Version: ".zend_version().
+               "\nRunning on: ".php_uname();
+
+    } elseif ($help = PEAR_Command::getHelp($command)) {
+        if (is_string($help)) {
+            return "$progname $command [options] $help\n";
+        }
+        if ($help[1] === null) {
+            return "$progname $command $help[0]";
+        } else {
+            return "$progname $command [options] $help[0]\n$help[1]";
+        }
+    }
+    return "Command '$command' is not valid, try 'pear help'";
+}
+
+// }}}
+
+function error_handler($errno, $errmsg, $file, $line, $vars) {
+    if ((defined('E_STRICT') && $errno & E_STRICT) || !error_reporting()) {
+        if (defined('E_STRICT') && $errno & E_STRICT) {
+            return; // E_STRICT
+        }
+        if ($GLOBALS['config']->get('verbose') < 4) {
+            return; // @silenced error, show all if debug is high enough
+        }
+    }
+    $errortype = array (
+        E_ERROR   =>  "Error",
+        E_WARNING   =>  "Warning",
+        E_PARSE   =>  "Parsing Error",
+        E_NOTICE   =>  "Notice",
+        E_CORE_ERROR  =>  "Core Error",
+        E_CORE_WARNING  =>  "Core Warning",
+        E_COMPILE_ERROR  =>  "Compile Error",
+        E_COMPILE_WARNING =>  "Compile Warning",
+        E_USER_ERROR =>  "User Error",
+        E_USER_WARNING =>  "User Warning",
+        E_USER_NOTICE =>  "User Notice"
+    );
+    $prefix = $errortype[$errno];
+    global $_PEAR_PHPDIR;
+    if (stristr($file, $_PEAR_PHPDIR)) {
+        $file = substr($file, strlen($_PEAR_PHPDIR) + 1);
+    } else {
+        $file = basename($file);
+    }
+    print "\n$prefix: $errmsg in $file on line $line\n";
+}
+
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * mode: php
+ * End:
+ */
+// vim600:syn=php
+
+?>
diff --git a/campcaster/src/tools/pear/src/scripts/peardev.bat b/campcaster/src/tools/pear/src/scripts/peardev.bat
new file mode 100644
index 000000000..5e32301e9
--- /dev/null
+++ b/campcaster/src/tools/pear/src/scripts/peardev.bat
@@ -0,0 +1,115 @@
+@ECHO OFF
+
+REM ----------------------------------------------------------------------
+REM PHP version 5
+REM ----------------------------------------------------------------------
+REM Copyright (c) 1997-2004 The PHP Group
+REM ----------------------------------------------------------------------
+REM  This source file is subject to version 3.0 of the PHP license, 
+REM  that is bundled with this package in the file LICENSE, and is
+REM  available at through the world-wide-web at
+REM  http://www.php.net/license/3_0.txt. 
+REM  If you did not receive a copy of the PHP license and are unable to
+REM  obtain it through the world-wide-web, please send a note to
+REM  license@php.net so we can mail you a copy immediately.
+REM ----------------------------------------------------------------------
+REM  Authors:     Alexander Merz (alexmerz@php.net)
+REM ----------------------------------------------------------------------
+REM
+REM  $Id: peardev.bat,v 1.3 2006/01/23 16:30:14 cellog Exp $
+
+REM change this lines to match the paths of your system
+REM -------------------
+
+
+REM Test to see if this is a raw pear.bat (uninstalled version)
+SET TMPTMPTMPTMPT=@includ
+SET PMTPMTPMT=%TMPTMPTMPTMPT%e_path@
+FOR %%x IN ("@include_path@") DO (if %%x=="%PMTPMTPMT%" GOTO :NOTINSTALLED)
+
+REM Check PEAR global ENV, set them if they do not exist
+IF "%PHP_PEAR_INSTALL_DIR%"=="" SET "PHP_PEAR_INSTALL_DIR=@include_path@"
+IF "%PHP_PEAR_BIN_DIR%"=="" SET "PHP_PEAR_BIN_DIR=@bin_dir@"
+IF "%PHP_PEAR_PHP_BIN%"=="" SET "PHP_PEAR_PHP_BIN=@php_bin@"
+GOTO :INSTALLED
+
+:NOTINSTALLED
+ECHO WARNING: This is a raw, uninstalled pear.bat
+
+REM Check to see if we can grab the directory of this file (Windows NT+)
+IF %~n0 == pear (
+FOR %%x IN (cli\php.exe php.exe) DO (if "%%~$PATH:x" NEQ "" (
+SET "PHP_PEAR_PHP_BIN=%%~$PATH:x"
+echo Using PHP Executable "%PHP_PEAR_PHP_BIN%"
+"%PHP_PEAR_PHP_BIN%" -v
+GOTO :NEXTTEST
+))
+GOTO :FAILAUTODETECT
+:NEXTTEST
+IF "%PHP_PEAR_PHP_BIN%" NEQ "" (
+
+REM We can use this PHP to run a temporary php file to get the dirname of pear
+
+echo ^ > ~~getloc.php
+"%PHP_PEAR_PHP_BIN%" ~~getloc.php
+set /p PHP_PEAR_BIN_DIR=fakeprompt < ~a.a
+DEL ~a.a
+DEL ~~getloc.php
+set "PHP_PEAR_INSTALL_DIR=%PHP_PEAR_BIN_DIR%pear"
+
+REM Make sure there is a pearcmd.php at our disposal
+
+IF NOT EXIST %PHP_PEAR_INSTALL_DIR%\pearcmd.php (
+IF EXIST %PHP_PEAR_INSTALL_DIR%\scripts\pearcmd.php COPY %PHP_PEAR_INSTALL_DIR%\scripts\pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+IF EXIST pearcmd.php COPY pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+IF EXIST %~dp0\scripts\pearcmd.php COPY %~dp0\scripts\pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+)
+)
+GOTO :INSTALLED
+) ELSE (
+REM Windows Me/98 cannot succeed, so allow the batch to fail
+)
+:FAILAUTODETECT
+echo WARNING: failed to auto-detect pear information
+:INSTALLED
+
+REM Check Folders and files
+IF NOT EXIST "%PHP_PEAR_INSTALL_DIR%" GOTO PEAR_INSTALL_ERROR
+IF NOT EXIST "%PHP_PEAR_INSTALL_DIR%\pearcmd.php" GOTO PEAR_INSTALL_ERROR2
+IF NOT EXIST "%PHP_PEAR_BIN_DIR%" GOTO PEAR_BIN_ERROR
+IF NOT EXIST "%PHP_PEAR_PHP_BIN%" GOTO PEAR_PHPBIN_ERROR
+REM launch pearcmd
+GOTO RUN
+:PEAR_INSTALL_ERROR
+ECHO PHP_PEAR_INSTALL_DIR is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_INSTALL_DIR%
+GOTO END
+:PEAR_INSTALL_ERROR2
+ECHO PHP_PEAR_INSTALL_DIR is not set correctly.
+ECHO pearcmd.php could not be found there.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_INSTALL_DIR%
+GOTO END
+:PEAR_BIN_ERROR
+ECHO PHP_PEAR_BIN_DIR is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_BIN_DIR%
+GOTO END
+:PEAR_PHPBIN_ERROR
+ECHO PHP_PEAR_PHP_BIN is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_PHP_BIN%
+GOTO END
+:RUN
+"%PHP_PEAR_PHP_BIN%" -C -d memory_limit="-1" -d safe_mode=0 -d open_basedir="" -d output_buffering=1 -d include_path="%PHP_PEAR_INSTALL_DIR%" -f "%PHP_PEAR_INSTALL_DIR%\pearcmd.php" -- %1 %2 %3 %4 %5 %6 %7 %8 %9
+:END
+@ECHO ON
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/scripts/peardev.sh b/campcaster/src/tools/pear/src/scripts/peardev.sh
new file mode 100644
index 000000000..b81a75258
--- /dev/null
+++ b/campcaster/src/tools/pear/src/scripts/peardev.sh
@@ -0,0 +1,28 @@
+#!/bin/sh
+
+# first find which PHP binary to use
+if test "x$PHP_PEAR_PHP_BIN" != "x"; then
+  PHP="$PHP_PEAR_PHP_BIN"
+else
+  if test "@php_bin@" = '@'php_bin'@'; then
+    PHP=php 
+  else
+    PHP="@php_bin@"
+  fi
+fi
+
+# then look for the right pear include dir
+if test "x$PHP_PEAR_INSTALL_DIR" != "x"; then
+  INCDIR=$PHP_PEAR_INSTALL_DIR
+  INCARG="-d include_path=$PHP_PEAR_INSTALL_DIR"
+else
+  if test "@php_dir@" = '@'php_dir'@'; then
+    INCDIR=`dirname $0`
+    INCARG=""  
+  else
+    INCDIR="@php_dir@"
+    INCARG="-d include_path=@php_dir@"
+  fi
+fi
+
+exec $PHP -d memory_limit="-1" -C -q $INCARG -d output_buffering=1 -d open_basedir="" -d safe_mode=0 $INCDIR/pearcmd.php "$@"
diff --git a/campcaster/src/tools/pear/src/scripts/pecl.bat b/campcaster/src/tools/pear/src/scripts/pecl.bat
new file mode 100644
index 000000000..7b7394465
--- /dev/null
+++ b/campcaster/src/tools/pear/src/scripts/pecl.bat
@@ -0,0 +1,115 @@
+@ECHO OFF
+
+REM ----------------------------------------------------------------------
+REM PHP version 5
+REM ----------------------------------------------------------------------
+REM Copyright (c) 1997-2004 The PHP Group
+REM ----------------------------------------------------------------------
+REM  This source file is subject to version 3.0 of the PHP license, 
+REM  that is bundled with this package in the file LICENSE, and is
+REM  available at through the world-wide-web at
+REM  http://www.php.net/license/3_0.txt. 
+REM  If you did not receive a copy of the PHP license and are unable to
+REM  obtain it through the world-wide-web, please send a note to
+REM  license@php.net so we can mail you a copy immediately.
+REM ----------------------------------------------------------------------
+REM  Authors:     Alexander Merz (alexmerz@php.net)
+REM ----------------------------------------------------------------------
+REM
+REM  Last updated 02/08/2004 ($Id$ is not replaced if the file is binary)
+
+REM change this lines to match the paths of your system
+REM -------------------
+
+
+REM Test to see if this is a raw pear.bat (uninstalled version)
+SET TMPTMPTMPTMPT=@includ
+SET PMTPMTPMT=%TMPTMPTMPTMPT%e_path@
+FOR %%x IN ("@include_path@") DO (if %%x=="%PMTPMTPMT%" GOTO :NOTINSTALLED)
+
+REM Check PEAR global ENV, set them if they do not exist
+IF "%PHP_PEAR_INSTALL_DIR%"=="" SET "PHP_PEAR_INSTALL_DIR=@include_path@"
+IF "%PHP_PEAR_BIN_DIR%"=="" SET "PHP_PEAR_BIN_DIR=@bin_dir@"
+IF "%PHP_PEAR_PHP_BIN%"=="" SET "PHP_PEAR_PHP_BIN=@php_bin@"
+GOTO :INSTALLED
+
+:NOTINSTALLED
+ECHO WARNING: This is a raw, uninstalled pear.bat
+
+REM Check to see if we can grab the directory of this file (Windows NT+)
+IF %~n0 == pear (
+FOR %%x IN (cli\php.exe php.exe) DO (if "%%~$PATH:x" NEQ "" (
+SET "PHP_PEAR_PHP_BIN=%%~$PATH:x"
+echo Using PHP Executable "%PHP_PEAR_PHP_BIN%"
+"%PHP_PEAR_PHP_BIN%" -v
+GOTO :NEXTTEST
+))
+GOTO :FAILAUTODETECT
+:NEXTTEST
+IF "%PHP_PEAR_PHP_BIN%" NEQ "" (
+
+REM We can use this PHP to run a temporary php file to get the dirname of pear
+
+echo ^ > ~~getloc.php
+"%PHP_PEAR_PHP_BIN%" ~~getloc.php
+set /p PHP_PEAR_BIN_DIR=fakeprompt < ~a.a
+DEL ~a.a
+DEL ~~getloc.php
+set "PHP_PEAR_INSTALL_DIR=%PHP_PEAR_BIN_DIR%pear"
+
+REM Make sure there is a pearcmd.php at our disposal
+
+IF NOT EXIST %PHP_PEAR_INSTALL_DIR%\pearcmd.php (
+IF EXIST %PHP_PEAR_INSTALL_DIR%\scripts\pearcmd.php COPY %PHP_PEAR_INSTALL_DIR%\scripts\pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+IF EXIST pearcmd.php COPY pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+IF EXIST %~dp0\scripts\pearcmd.php COPY %~dp0\scripts\pearcmd.php %PHP_PEAR_INSTALL_DIR%\pearcmd.php
+)
+)
+GOTO :INSTALLED
+) ELSE (
+REM Windows Me/98 cannot succeed, so allow the batch to fail
+)
+:FAILAUTODETECT
+echo WARNING: failed to auto-detect pear information
+:INSTALLED
+
+REM Check Folders and files
+IF NOT EXIST "%PHP_PEAR_INSTALL_DIR%" GOTO PEAR_INSTALL_ERROR
+IF NOT EXIST "%PHP_PEAR_INSTALL_DIR%\pearcmd.php" GOTO PEAR_INSTALL_ERROR2
+IF NOT EXIST "%PHP_PEAR_BIN_DIR%" GOTO PEAR_BIN_ERROR
+IF NOT EXIST "%PHP_PEAR_PHP_BIN%" GOTO PEAR_PHPBIN_ERROR
+REM launch pearcmd
+GOTO RUN
+:PEAR_INSTALL_ERROR
+ECHO PHP_PEAR_INSTALL_DIR is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_INSTALL_DIR%
+GOTO END
+:PEAR_INSTALL_ERROR2
+ECHO PHP_PEAR_INSTALL_DIR is not set correctly.
+ECHO pearcmd.php could not be found there.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_INSTALL_DIR%
+GOTO END
+:PEAR_BIN_ERROR
+ECHO PHP_PEAR_BIN_DIR is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_BIN_DIR%
+GOTO END
+:PEAR_PHPBIN_ERROR
+ECHO PHP_PEAR_PHP_BIN is not set correctly.
+ECHO Please fix it using your environment variable or modify
+ECHO the default value in pear.bat
+ECHO The current value is:
+ECHO %PHP_PEAR_PHP_BIN%
+GOTO END
+:RUN
+"%PHP_PEAR_PHP_BIN%" -C -n -d output_buffering=1 -d safe_mode=0 -d include_path="%PHP_PEAR_INSTALL_DIR%" -f "%PHP_PEAR_INSTALL_DIR%\peclcmd.php" -- %1 %2 %3 %4 %5 %6 %7 %8 %9
+:END
+@ECHO ON
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/scripts/pecl.sh b/campcaster/src/tools/pear/src/scripts/pecl.sh
new file mode 100644
index 000000000..0ad593e5b
--- /dev/null
+++ b/campcaster/src/tools/pear/src/scripts/pecl.sh
@@ -0,0 +1,28 @@
+#!/bin/sh
+
+# first find which PHP binary to use
+if test "x$PHP_PEAR_PHP_BIN" != "x"; then
+  PHP="$PHP_PEAR_PHP_BIN"
+else
+  if test "@php_bin@" = '@'php_bin'@'; then
+    PHP=php 
+  else
+    PHP="@php_bin@"
+  fi
+fi
+
+# then look for the right pear include dir
+if test "x$PHP_PEAR_INSTALL_DIR" != "x"; then
+  INCDIR=$PHP_PEAR_INSTALL_DIR
+  INCARG="-d include_path=$PHP_PEAR_INSTALL_DIR"
+else
+  if test "@php_dir@" = '@'php_dir'@'; then
+    INCDIR=`dirname $0`
+    INCARG=""  
+  else
+    INCDIR="@php_dir@"
+    INCARG="-d include_path=@php_dir@"
+  fi
+fi
+
+exec $PHP -C -n -q $INCARG -d output_buffering=1 -d safe_mode=0 $INCDIR/peclcmd.php "$@"
diff --git a/campcaster/src/tools/pear/src/scripts/peclcmd.php b/campcaster/src/tools/pear/src/scripts/peclcmd.php
new file mode 100644
index 000000000..bdccc7540
--- /dev/null
+++ b/campcaster/src/tools/pear/src/scripts/peclcmd.php
@@ -0,0 +1,45 @@
+                                   |
+// |          Tomas V.V.Cox                              |
+// |                                                                      |
+// +----------------------------------------------------------------------+
+//
+// $Id: peclcmd.php,v 1.1 2005/02/21 05:30:56 cellog Exp $
+
+/**
+ * @nodep Gtk
+ */
+if ('@include_path@' != '@'.'include_path'.'@') {
+    ini_set('include_path', '@include_path@');
+    $raw = false;
+} else {
+    // this is a raw, uninstalled pear, either a cvs checkout, or php distro
+    $raw = true;
+}
+define('PEAR_RUNTYPE', 'pecl');
+require_once 'pearcmd.php';
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * mode: php
+ * End:
+ */
+// vim600:syn=php
+
+?>
diff --git a/campcaster/src/tools/pear/src/template.spec b/campcaster/src/tools/pear/src/template.spec
new file mode 100644
index 000000000..37b477f8f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/template.spec
@@ -0,0 +1,72 @@
+Summary: PEAR: @summary@
+Name: @rpm_package@
+Version: @version@
+Release: 1
+License: @release_license@
+Group: Development/Libraries
+Source: http://@master_server@/get/@package@-%{version}.tgz
+BuildRoot: %{_tmppath}/%{name}-root
+URL: http://@master_server@/package/@package@
+Prefix: %{_prefix}
+BuildArchitectures: @arch@
+@extra_headers@
+
+%description
+@description@
+
+%prep
+rm -rf %{buildroot}/*
+%setup -c -T
+# XXX Source files location is missing here in pear cmd
+pear -v -c %{buildroot}/pearrc \
+        -d php_dir=%{_libdir}/php/pear \
+        -d doc_dir=/docs \
+        -d bin_dir=%{_bindir} \
+        -d data_dir=%{_libdir}/php/pear/data \
+        -d test_dir=%{_libdir}/php/pear/tests \
+        -d ext_dir=%{_libdir} \@extra_config@
+        -s
+
+%build
+echo BuildRoot=%{buildroot}
+
+%postun
+# if refcount = 0 then package has been removed (not upgraded)
+if [ "$1" -eq "0" ]; then
+    pear uninstall --nodeps -r @possible_channel@@package@
+    rm @rpm_xml_dir@/@package@.xml
+fi
+
+
+%post
+# if refcount = 2 then package has been upgraded
+if [ "$1" -ge "2" ]; then
+    pear upgrade --nodeps -r @rpm_xml_dir@/@package@.xml
+else
+    pear install --nodeps -r @rpm_xml_dir@/@package@.xml
+fi
+
+%install
+pear -c %{buildroot}/pearrc install --nodeps -R %{buildroot} \
+        $RPM_SOURCE_DIR/@package@-%{version}.tgz
+rm %{buildroot}/pearrc
+rm %{buildroot}/%{_libdir}/php/pear/.filemap
+rm %{buildroot}/%{_libdir}/php/pear/.lock
+rm -rf %{buildroot}/%{_libdir}/php/pear/.registry
+if [ "@doc_files@" != "" ]; then
+     mv %{buildroot}/docs/@package@/* .
+     rm -rf %{buildroot}/docs
+fi
+mkdir -p %{buildroot}@rpm_xml_dir@
+tar -xzf $RPM_SOURCE_DIR/@package@-%{version}.tgz package@package2xml@.xml
+cp -p package@package2xml@.xml %{buildroot}@rpm_xml_dir@/@package@.xml
+
+#rm -rf %{buildroot}/*
+#pear -q install -R %{buildroot} -n package@package2xml@.xml
+#mkdir -p %{buildroot}@rpm_xml_dir@
+#cp -p package@package2xml@.xml %{buildroot}@rpm_xml_dir@/@package@.xml
+
+%files
+    %defattr(-,root,root)
+    %doc @doc_files@
+    /
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/README b/campcaster/src/tools/pear/src/tests/Calendar/tests/README
new file mode 100644
index 000000000..ecc755b12
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/README
@@ -0,0 +1,7 @@
+These tests require Simple Test: http://www.lastcraft.com/simple_test.php
+
+Ideally they would use PEAR::PHPUnit but the current version has bugs and
+lacks alot of the functionality (e.g. Mock Objects) which Simple Test
+provides.
+
+Modifying the simple_include.php script for your simple test install dir
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/all_tests.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/all_tests.php
new file mode 100644
index 000000000..034dec085
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/all_tests.php
@@ -0,0 +1,34 @@
+GroupTest('All PEAR::Calendar Tests');
+        $this->AddTestCase(new CalendarTests());
+        $this->AddTestCase(new CalendarTabularTests());
+        $this->AddTestCase(new ValidatorTests());
+        $this->AddTestCase(new CalendarEngineTests());
+        $this->AddTestCase(new TableHelperTests());
+        $this->AddTestCase(new DecoratorTests());
+        $this->AddTestCase(new UtilTests());
+    }
+}
+
+$test = &new AllTests();
+$test->run(new HtmlReporter());
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_engine_tests.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_engine_tests.php
new file mode 100644
index 000000000..da01f8a2f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_engine_tests.php
@@ -0,0 +1,20 @@
+GroupTest('Calendar Engine Tests');
+        $this->addTestFile('peardate_engine_test.php');
+        $this->addTestFile('unixts_engine_test.php');
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new CalendarEngineTests();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_include.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_include.php
new file mode 100644
index 000000000..96fa9575e
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_include.php
@@ -0,0 +1,28 @@
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_tabular_tests.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_tabular_tests.php
new file mode 100644
index 000000000..1dd7be4d0
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_tabular_tests.php
@@ -0,0 +1,21 @@
+GroupTest('Calendar Tabular Tests');
+        $this->addTestFile('month_weekdays_test.php');
+        $this->addTestFile('month_weeks_test.php');
+        $this->addTestFile('week_test.php');
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new CalendarTabularTests();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_test.php
new file mode 100644
index 000000000..5ab63be94
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_test.php
@@ -0,0 +1,115 @@
+UnitTestCase($name);
+    }
+    function setUp() {
+        $this->cal = new Calendar(2003,10,25,13,32,43);
+    }
+    function tearDown() {
+        unset($this->cal);
+    }
+    function testPrevYear () {
+        $this->assertEqual(2002,$this->cal->prevYear());
+    }
+    function testPrevYear_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2002,
+                'month'  => 1,
+                'day'    => 1,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevYear('array'));
+    }
+    function testThisYear () {
+        $this->assertEqual(2003,$this->cal->thisYear());
+    }
+    function testNextYear () {
+        $this->assertEqual(2004,$this->cal->nextYear());
+    }
+    function testPrevMonth () {
+        $this->assertEqual(9,$this->cal->prevMonth());
+    }
+    function testPrevMonth_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 9,
+                'day'    => 1,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevMonth('array'));
+    }
+    function testThisMonth () {
+        $this->assertEqual(10,$this->cal->thisMonth());
+    }
+    function testNextMonth () {
+        $this->assertEqual(11,$this->cal->nextMonth());
+    }
+    function testPrevDay () {
+        $this->assertEqual(24,$this->cal->prevDay());
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 10,
+                'day'    => 24,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testThisDay () {
+        $this->assertEqual(25,$this->cal->thisDay());
+    }
+    function testNextDay () {
+        $this->assertEqual(26,$this->cal->nextDay());
+    }
+    function testPrevHour () {
+        $this->assertEqual(12,$this->cal->prevHour());
+    }
+    function testThisHour () {
+        $this->assertEqual(13,$this->cal->thisHour());
+    }
+    function testNextHour () {
+        $this->assertEqual(14,$this->cal->nextHour());
+    }
+    function testPrevMinute () {
+        $this->assertEqual(31,$this->cal->prevMinute());
+    }
+    function testThisMinute () {
+        $this->assertEqual(32,$this->cal->thisMinute());
+    }
+    function testNextMinute () {
+        $this->assertEqual(33,$this->cal->nextMinute());
+    }
+    function testPrevSecond () {
+        $this->assertEqual(42,$this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(43,$this->cal->thisSecond());
+    }
+    function testNextSecond () {
+        $this->assertEqual(44,$this->cal->nextSecond());
+    }
+    function testSetTimeStamp() {
+        $stamp = mktime(13,32,43,10,25,2003);
+        $this->cal->setTimeStamp($stamp);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(13,32,43,10,25,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_tests.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_tests.php
new file mode 100644
index 000000000..b6bee2080
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/calendar_tests.php
@@ -0,0 +1,25 @@
+GroupTest('Calendar Tests');
+        $this->addTestFile('calendar_test.php');
+        $this->addTestFile('year_test.php');
+        $this->addTestFile('month_test.php');
+        $this->addTestFile('day_test.php');
+        $this->addTestFile('hour_test.php');
+        $this->addTestFile('minute_test.php');
+        $this->addTestFile('second_test.php');
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new CalendarTests();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/day_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/day_test.php
new file mode 100644
index 000000000..69685c4f8
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/day_test.php
@@ -0,0 +1,107 @@
+UnitTestCase('Test of Day');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Day(2003,10,25);
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 10,
+                'day'    => 24,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testPrevHour () {
+        $this->assertEqual(23,$this->cal->prevHour());
+    }
+    function testThisHour () {
+        $this->assertEqual(0,$this->cal->thisHour());
+    }
+    function testNextHour () {
+        $this->assertEqual(1,$this->cal->nextHour());
+    }
+    function testPrevMinute () {
+        $this->assertEqual(59,$this->cal->prevMinute());
+    }
+    function testThisMinute () {
+        $this->assertEqual(0,$this->cal->thisMinute());
+    }
+    function testNextMinute () {
+        $this->assertEqual(1,$this->cal->nextMinute());
+    }
+    function testPrevSecond () {
+        $this->assertEqual(59,$this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(0,$this->cal->thisSecond());
+    }
+    function testNextSecond () {
+        $this->assertEqual(1,$this->cal->nextSecond());
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(0,0,0,10,25,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+}
+
+class TestOfDayBuild extends TestOfDay {
+    function TestOfDayBuild() {
+        $this->UnitTestCase('Test of Day::build()');
+    }
+    function testSize() {
+        $this->cal->build();
+        $this->assertEqual(24,$this->cal->size());
+    }
+    function testFetch() {
+        $this->cal->build();
+        $i=0;
+        while ( $Child = $this->cal->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual(24,$i);
+    }
+    function testFetchAll() {
+        $this->cal->build();
+        $children = array();
+        $i = 0;
+        while ( $Child = $this->cal->fetch() ) {
+            $children[$i]=$Child;
+            $i++;
+        }
+        $this->assertEqual($children,$this->cal->fetchAll());
+    }
+    function testSelection() {
+        require_once(CALENDAR_ROOT . 'Hour.php');
+        $selection = array(new Calendar_Hour(2003,10,25,13));
+        $this->cal->build($selection);
+        $i = 0;
+        while ( $Child = $this->cal->fetch() ) {
+            if ( $i == 13 )
+                break;
+            $i++;
+        }
+        $this->assertTrue($Child->isSelected());
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfDay();
+    $test->run(new HtmlReporter());
+    $test = &new TestOfDayBuild();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_test.php
new file mode 100644
index 000000000..05186431c
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_test.php
@@ -0,0 +1,268 @@
+UnitTestCase('Test of Calendar_Decorator');
+    }
+    function setUp() {
+        $this->mockengine = new Mock_Calendar_Engine($this);
+        $this->mockcal = new Mock_Calendar_Second($this);
+        $this->mockcal->setReturnValue('prevYear',2002);
+        $this->mockcal->setReturnValue('thisYear',2003);
+        $this->mockcal->setReturnValue('nextYear',2004);
+        $this->mockcal->setReturnValue('prevMonth',9);
+        $this->mockcal->setReturnValue('thisMonth',10);
+        $this->mockcal->setReturnValue('nextMonth',11);
+        $this->mockcal->setReturnValue('prevDay',14);
+        $this->mockcal->setReturnValue('thisDay',15);
+        $this->mockcal->setReturnValue('nextDay',16);
+        $this->mockcal->setReturnValue('prevHour',12);
+        $this->mockcal->setReturnValue('thisHour',13);
+        $this->mockcal->setReturnValue('nextHour',14);
+        $this->mockcal->setReturnValue('prevMinute',29);
+        $this->mockcal->setReturnValue('thisMinute',30);
+        $this->mockcal->setReturnValue('nextMinute',31);
+        $this->mockcal->setReturnValue('prevSecond',44);
+        $this->mockcal->setReturnValue('thisSecond',45);
+        $this->mockcal->setReturnValue('nextSecond',46);
+        $this->mockcal->setReturnValue('getEngine',$this->mockengine);
+        $this->mockcal->setReturnValue('getTimestamp',12345);
+
+    }
+    function tearDown() {
+        unset ( $this->engine );
+        unset ( $this->mockcal );
+    }
+    function testPrevYear() {
+        $this->mockcal->expectOnce('prevYear',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(2002,$Decorator->prevYear());
+    }
+    function testThisYear() {
+        $this->mockcal->expectOnce('thisYear',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(2003,$Decorator->thisYear());
+    }
+    function testNextYear() {
+        $this->mockcal->expectOnce('nextYear',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(2004,$Decorator->nextYear());
+    }
+    function testPrevMonth() {
+        $this->mockcal->expectOnce('prevMonth',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(9,$Decorator->prevMonth());
+    }
+    function testThisMonth() {
+        $this->mockcal->expectOnce('thisMonth',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(10,$Decorator->thisMonth());
+    }
+    function testNextMonth() {
+        $this->mockcal->expectOnce('nextMonth',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(11,$Decorator->nextMonth());
+    }
+    function testPrevWeek() {
+        $mockweek = & new Mock_Calendar_Week($this);
+        $mockweek->setReturnValue('prevWeek',1);
+        $mockweek->expectOnce('prevWeek',array('n_in_month'));
+        $Decorator =& new Calendar_Decorator($mockweek);
+        $this->assertEqual(1,$Decorator->prevWeek());
+    }
+    function testThisWeek() {
+        $mockweek = & new Mock_Calendar_Week($this);
+        $mockweek->setReturnValue('thisWeek',2);
+        $mockweek->expectOnce('thisWeek',array('n_in_month'));
+        $Decorator =& new Calendar_Decorator($mockweek);
+        $this->assertEqual(2,$Decorator->thisWeek());
+    }
+    function testNextWeek() {
+        $mockweek = & new Mock_Calendar_Week($this);
+        $mockweek->setReturnValue('nextWeek',3);
+        $mockweek->expectOnce('nextWeek',array('n_in_month'));
+        $Decorator =& new Calendar_Decorator($mockweek);
+        $this->assertEqual(3,$Decorator->nextWeek());
+    }
+    function testPrevDay() {
+        $this->mockcal->expectOnce('prevDay',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(14,$Decorator->prevDay());
+    }
+    function testThisDay() {
+        $this->mockcal->expectOnce('thisDay',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(15,$Decorator->thisDay());
+    }
+    function testNextDay() {
+        $this->mockcal->expectOnce('nextDay',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(16,$Decorator->nextDay());
+    }
+    function testPrevHour() {
+        $this->mockcal->expectOnce('prevHour',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(12,$Decorator->prevHour());
+    }
+    function testThisHour() {
+        $this->mockcal->expectOnce('thisHour',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(13,$Decorator->thisHour());
+    }
+    function testNextHour() {
+        $this->mockcal->expectOnce('nextHour',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(14,$Decorator->nextHour());
+    }
+    function testPrevMinute() {
+        $this->mockcal->expectOnce('prevMinute',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(29,$Decorator->prevMinute());
+    }
+    function testThisMinute() {
+        $this->mockcal->expectOnce('thisMinute',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(30,$Decorator->thisMinute());
+    }
+    function testNextMinute() {
+        $this->mockcal->expectOnce('nextMinute',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(31,$Decorator->nextMinute());
+    }
+    function testPrevSecond() {
+        $this->mockcal->expectOnce('prevSecond',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(44,$Decorator->prevSecond());
+    }
+    function testThisSecond() {
+        $this->mockcal->expectOnce('thisSecond',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(45,$Decorator->thisSecond());
+    }
+    function testNextSecond() {
+        $this->mockcal->expectOnce('nextSecond',array('int'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(46,$Decorator->nextSecond());
+    }
+    function testGetEngine() {
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertIsA($Decorator->getEngine(),'Mock_Calendar_Engine');
+    }
+    function testSetTimestamp() {
+        $this->mockcal->expectOnce('setTimestamp',array('12345'));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->setTimestamp('12345');
+    }
+    function testGetTimestamp() {
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual(12345,$Decorator->getTimestamp());
+    }
+    function testSetSelected() {
+        $this->mockcal->expectOnce('setSelected',array(true));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->setSelected();
+    }
+    function testIsSelected() {
+        $this->mockcal->setReturnValue('isSelected',true);
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertTrue($Decorator->isSelected());
+    }
+    function testAdjust() {
+        $this->mockcal->expectOnce('adjust',array());
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->adjust();
+    }
+    function testToArray() {
+        $this->mockcal->expectOnce('toArray',array(12345));
+        $testArray = array('foo'=>'bar');
+        $this->mockcal->setReturnValue('toArray',$testArray);
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual($testArray,$Decorator->toArray(12345));
+    }
+    function testReturnValue() {
+        $this->mockcal->expectOnce('returnValue',array('a','b','c','d'));
+        $this->mockcal->setReturnValue('returnValue','foo');
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $this->assertEqual('foo',$Decorator->returnValue('a','b','c','d'));
+    }
+    function testSetFirst() {
+        $mockday = & new Mock_Calendar_Day($this);
+        $mockday->expectOnce('setFirst',array(true));
+        $Decorator =& new Calendar_Decorator($mockday);
+        $Decorator->setFirst();
+    }
+    function testSetLast() {
+        $mockday = & new Mock_Calendar_Day($this);
+        $mockday->expectOnce('setLast',array(true));
+        $Decorator =& new Calendar_Decorator($mockday);
+        $Decorator->setLast();
+    }
+    function testIsFirst() {
+        $mockday = & new Mock_Calendar_Day($this);
+        $mockday->setReturnValue('isFirst',TRUE);
+        $Decorator =& new Calendar_Decorator($mockday);
+        $this->assertTrue($Decorator->isFirst());
+    }
+    function testIsLast() {
+        $mockday = & new Mock_Calendar_Day($this);
+        $mockday->setReturnValue('isLast',TRUE);
+        $Decorator =& new Calendar_Decorator($mockday);
+        $this->assertTrue($Decorator->isLast());
+    }
+    function testSetEmpty() {
+        $mockday = & new Mock_Calendar_Day($this);
+        $mockday->expectOnce('setEmpty',array(true));
+        $Decorator =& new Calendar_Decorator($mockday);
+        $Decorator->setEmpty();
+    }
+    function testIsEmpty() {
+        $mockday = & new Mock_Calendar_Day($this);
+        $mockday->setReturnValue('isEmpty',TRUE);
+        $Decorator =& new Calendar_Decorator($mockday);
+        $this->assertTrue($Decorator->isEmpty());
+    }
+    function testBuild() {
+        $testArray=array('foo'=>'bar');
+        $this->mockcal->expectOnce('build',array($testArray));
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->build($testArray);
+    }
+    function testFetch() {
+        $this->mockcal->expectOnce('fetch',array());
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->fetch();
+    }
+    function testFetchAll() {
+        $this->mockcal->expectOnce('fetchAll',array());
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->fetchAll();
+    }
+    function testSize() {
+        $this->mockcal->expectOnce('size',array());
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->size();
+    }
+    function testIsValid() {
+        $this->mockcal->expectOnce('isValid',array());
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->isValid();
+    }
+    function testGetValidator() {
+        $this->mockcal->expectOnce('getValidator',array());
+        $Decorator =& new Calendar_Decorator($this->mockcal);
+        $Decorator->getValidator();
+    }
+}
+?>
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_tests.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_tests.php
new file mode 100644
index 000000000..316d5bd57
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_tests.php
@@ -0,0 +1,21 @@
+GroupTest('Decorator Tests');
+        $this->addTestFile('decorator_test.php');
+        $this->addTestFile('decorator_textual_test.php');
+        $this->addTestFile('decorator_uri_test.php');
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new DecoratorTests();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_textual_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_textual_test.php
new file mode 100644
index 000000000..225ceedb5
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_textual_test.php
@@ -0,0 +1,174 @@
+UnitTestCase('Test of Calendar_Decorator_Textual');
+    }
+    function testMonthNamesLong() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $monthNames = array(
+            1=>'January',
+            2=>'February',
+            3=>'March',
+            4=>'April',
+            5=>'May',
+            6=>'June',
+            7=>'July',
+            8=>'August',
+            9=>'September',
+            10=>'October',
+            11=>'November',
+            12=>'December',
+        );
+        $this->assertEqual($monthNames,$Textual->monthNames());
+    }
+    function testMonthNamesShort() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $monthNames = array(
+            1=>'Jan',
+            2=>'Feb',
+            3=>'Mar',
+            4=>'Apr',
+            5=>'May',
+            6=>'Jun',
+            7=>'Jul',
+            8=>'Aug',
+            9=>'Sep',
+            10=>'Oct',
+            11=>'Nov',
+            12=>'Dec',
+        );
+        $this->assertEqual($monthNames,$Textual->monthNames('short'));
+    }
+    function testMonthNamesTwo() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $monthNames = array(
+            1=>'Ja',
+            2=>'Fe',
+            3=>'Ma',
+            4=>'Ap',
+            5=>'Ma',
+            6=>'Ju',
+            7=>'Ju',
+            8=>'Au',
+            9=>'Se',
+            10=>'Oc',
+            11=>'No',
+            12=>'De',
+        );
+        $this->assertEqual($monthNames,$Textual->monthNames('two'));
+    }
+    function testMonthNamesOne() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $monthNames = array(
+            1=>'J',
+            2=>'F',
+            3=>'M',
+            4=>'A',
+            5=>'M',
+            6=>'J',
+            7=>'J',
+            8=>'A',
+            9=>'S',
+            10=>'O',
+            11=>'N',
+            12=>'D',
+        );
+        $this->assertEqual($monthNames,$Textual->monthNames('one'));
+    }
+    function testWeekdayNamesLong() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $weekdayNames = array(
+            0=>'Sunday',
+            1=>'Monday',
+            2=>'Tuesday',
+            3=>'Wednesday',
+            4=>'Thursday',
+            5=>'Friday',
+            6=>'Saturday',
+        );
+        $this->assertEqual($weekdayNames,$Textual->weekdayNames());
+    }
+    function testWeekdayNamesShort() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $weekdayNames = array(
+            0=>'Sun',
+            1=>'Mon',
+            2=>'Tue',
+            3=>'Wed',
+            4=>'Thu',
+            5=>'Fri',
+            6=>'Sat',
+        );
+        $this->assertEqual($weekdayNames,$Textual->weekdayNames('short'));
+    }
+    function testWeekdayNamesTwo() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $weekdayNames = array(
+            0=>'Su',
+            1=>'Mo',
+            2=>'Tu',
+            3=>'We',
+            4=>'Th',
+            5=>'Fr',
+            6=>'Sa',
+        );
+        $this->assertEqual($weekdayNames,$Textual->weekdayNames('two'));
+    }
+    function testWeekdayNamesOne() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $weekdayNames = array(
+            0=>'S',
+            1=>'M',
+            2=>'T',
+            3=>'W',
+            4=>'T',
+            5=>'F',
+            6=>'S',
+        );
+        $this->assertEqual($weekdayNames,$Textual->weekdayNames('one'));
+    }
+    function testPrevMonthNameShort() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $this->assertEqual('Sep',$Textual->prevMonthName('short'));
+    }
+    function testThisMonthNameShort() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $this->assertEqual('Oct',$Textual->thisMonthName('short'));
+    }
+    function testNextMonthNameShort() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $this->assertEqual('Nov',$Textual->nextMonthName('short'));
+    }
+    function testThisDayNameShort() {
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $this->assertEqual('Wed',$Textual->thisDayName('short'));
+    }
+    function testOrderedWeekdaysShort() {
+        $weekdayNames = array(
+            0=>'Sun',
+            1=>'Mon',
+            2=>'Tue',
+            3=>'Wed',
+            4=>'Thu',
+            5=>'Fri',
+            6=>'Sat',
+        );
+        $Textual = new Calendar_Decorator_Textual($this->mockcal);
+        $this->assertEqual($weekdayNames,$Textual->orderedWeekdays('short'));
+    }
+
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfDecoratorTextual();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_uri_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_uri_test.php
new file mode 100644
index 000000000..48c212de2
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/decorator_uri_test.php
@@ -0,0 +1,37 @@
+UnitTestCase('Test of Calendar_Decorator_Uri');
+    }
+    function testFragments() {
+        $Uri = new Calendar_Decorator_Uri($this->mockcal);
+        $Uri->setFragments('year','month','day','hour','minute','second');
+        $this->assertEqual('year=&month=&day=&hour=&minute=&second=',$Uri->this('second'));
+    }
+    function testScalarFragments() {
+        $Uri = new Calendar_Decorator_Uri($this->mockcal);
+        $Uri->setFragments('year','month','day','hour','minute','second');
+        $Uri->setScalar();
+        $this->assertEqual('&&&&&',$Uri->this('second'));
+    }
+    function testSetSeperator() {
+        $Uri = new Calendar_Decorator_Uri($this->mockcal);
+        $Uri->setFragments('year','month','day','hour','minute','second');
+        $Uri->setSeparator('/');
+        $this->assertEqual('year=/month=/day=/hour=/minute=/second=',$Uri->this('second'));
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfDecoratorUri();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/helper_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/helper_test.php
new file mode 100644
index 000000000..cd03bf61b
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/helper_test.php
@@ -0,0 +1,83 @@
+UnitTestCase('Test of Calendar_Table_Helper');
+    }
+    function setUp() {
+        $this->mockengine = new Mock_Calendar_Engine($this);
+        $this->mockengine->setReturnValue('getMinYears',1970);
+        $this->mockengine->setReturnValue('getMaxYears',2037);
+        $this->mockengine->setReturnValue('getMonthsInYear',12);
+        $this->mockengine->setReturnValue('getDaysInMonth',31);
+        $this->mockengine->setReturnValue('getHoursInDay',24);
+        $this->mockengine->setReturnValue('getMinutesInHour',60);
+        $this->mockengine->setReturnValue('getSecondsInMinute',60);
+        $this->mockengine->setReturnValue('getWeekDays',array(0,1,2,3,4,5,6));
+        $this->mockengine->setReturnValue('getDaysInWeek',7);
+        $this->mockengine->setReturnValue('getFirstDayOfWeek',1);
+        $this->mockengine->setReturnValue('getFirstDayInMonth',3);
+        $this->mockcal = new Mock_Calendar_Second($this);
+        $this->mockcal->setReturnValue('thisYear',2003);
+        $this->mockcal->setReturnValue('thisMonth',10);
+        $this->mockcal->setReturnValue('thisDay',15);
+        $this->mockcal->setReturnValue('thisHour',13);
+        $this->mockcal->setReturnValue('thisMinute',30);
+        $this->mockcal->setReturnValue('thisSecond',45);
+        $this->mockcal->setReturnValue('getEngine',$this->mockengine);
+    }
+    function testGetFirstDay() {
+        for ( $i = 0; $i <= 7; $i++ ) {
+            $Helper = & new Calendar_Table_Helper($this->mockcal,$i);
+            $this->assertEqual($Helper->getFirstDay(),$i);
+        }
+    }
+    function testGetDaysOfWeekMonday() {
+        $Helper = & new Calendar_Table_Helper($this->mockcal);
+        $this->assertEqual($Helper->getDaysOfWeek(),array(1,2,3,4,5,6,0));
+    }
+    function testGetDaysOfWeekSunday() {
+        $Helper = & new Calendar_Table_Helper($this->mockcal,0);
+        $this->assertEqual($Helper->getDaysOfWeek(),array(0,1,2,3,4,5,6));
+    }
+    function testGetDaysOfWeekThursday() {
+        $Helper = & new Calendar_Table_Helper($this->mockcal,4);
+        $this->assertEqual($Helper->getDaysOfWeek(),array(4,5,6,0,1,2,3));
+    }
+    function testGetNumWeeks() {
+        $Helper = & new Calendar_Table_Helper($this->mockcal);
+        $this->assertEqual($Helper->getNumWeeks(),5);
+    }
+    function testGetNumTableDaysInMonth() {
+        $Helper = & new Calendar_Table_Helper($this->mockcal);
+        $this->assertEqual($Helper->getNumTableDaysInMonth(),35);
+    }
+    function testGetEmptyDaysBefore() {
+        $Helper = & new Calendar_Table_Helper($this->mockcal);
+        $this->assertEqual($Helper->getEmptyDaysBefore(),2);
+    }
+    function testGetEmptyDaysAfter() {
+        $Helper = & new Calendar_Table_Helper($this->mockcal);
+        $this->assertEqual($Helper->getEmptyDaysAfter(),33);
+    }
+    function testGetEmptyDaysAfterOffset() {
+        $Helper = & new Calendar_Table_Helper($this->mockcal);
+        $this->assertEqual($Helper->getEmptyDaysAfterOffset(),5);
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfTableHelper();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/hour_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/hour_test.php
new file mode 100644
index 000000000..9e220f44e
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/hour_test.php
@@ -0,0 +1,98 @@
+UnitTestCase('Test of Hour');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Hour(2003,10,25,13);
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 10,
+                'day'    => 24,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testPrevMinute () {
+        $this->assertEqual(59,$this->cal->prevMinute());
+    }
+    function testThisMinute () {
+        $this->assertEqual(0,$this->cal->thisMinute());
+    }
+    function testNextMinute () {
+        $this->assertEqual(1,$this->cal->nextMinute());
+    }
+    function testPrevSecond () {
+        $this->assertEqual(59,$this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(0,$this->cal->thisSecond());
+    }
+    function testNextSecond () {
+        $this->assertEqual(1,$this->cal->nextSecond());
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(13,0,0,10,25,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+}
+
+class TestOfHourBuild extends TestOfHour {
+    function TestOfHourBuild() {
+        $this->UnitTestCase('Test of Hour::build()');
+    }
+    function testSize() {
+        $this->cal->build();
+        $this->assertEqual(60,$this->cal->size());
+    }
+    function testFetch() {
+        $this->cal->build();
+        $i=0;
+        while ( $Child = $this->cal->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual(60,$i);
+    }
+    function testFetchAll() {
+        $this->cal->build();
+        $children = array();
+        $i = 0;
+        while ( $Child = $this->cal->fetch() ) {
+            $children[$i]=$Child;
+            $i++;
+        }
+        $this->assertEqual($children,$this->cal->fetchAll());
+    }
+    function testSelection() {
+        require_once(CALENDAR_ROOT . 'Minute.php');
+        $selection = array(new Calendar_Minute(2003,10,25,13,32));
+        $this->cal->build($selection);
+        $i = 0;
+        while ( $Child = $this->cal->fetch() ) {
+            if ( $i == 32 )
+                break;
+            $i++;
+        }
+        $this->assertTrue($Child->isSelected());
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfHour();
+    $test->run(new HtmlReporter());
+    $test = &new TestOfHourBuild();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/minute_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/minute_test.php
new file mode 100644
index 000000000..49327ca7a
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/minute_test.php
@@ -0,0 +1,99 @@
+UnitTestCase('Test of Minute');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Minute(2003,10,25,13,32);
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 10,
+                'day'    => 24,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testPrevSecond () {
+        $this->assertEqual(59,$this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(0,$this->cal->thisSecond());
+    }
+    function testThisSecond_Timestamp () {
+        $this->assertEqual($this->cal->cE->dateToStamp(
+                2003, 10, 25, 13, 32, 0),
+            $this->cal->thisSecond('timestamp'));
+    }
+    function testNextSecond () {
+        $this->assertEqual(1,$this->cal->nextSecond());
+    }
+    function testNextSecond_Timestamp () {
+        $this->assertEqual($this->cal->cE->dateToStamp(
+                2003, 10, 25, 13, 32, 1),
+            $this->cal->nextSecond('timestamp'));
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(13,32,0,10,25,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+}
+
+class TestOfMinuteBuild extends TestOfMinute {
+    function TestOfMinuteBuild() {
+        $this->UnitTestCase('Test of Minute::build()');
+    }
+    function testSize() {
+        $this->cal->build();
+        $this->assertEqual(60,$this->cal->size());
+    }
+    function testFetch() {
+        $this->cal->build();
+        $i=0;
+        while ( $Child = $this->cal->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual(60,$i);
+    }
+    function testFetchAll() {
+        $this->cal->build();
+        $children = array();
+        $i = 0;
+        while ( $Child = $this->cal->fetch() ) {
+            $children[$i]=$Child;
+            $i++;
+        }
+        $this->assertEqual($children,$this->cal->fetchAll());
+    }
+    function testSelection() {
+        require_once(CALENDAR_ROOT . 'Second.php');
+        $selection = array(new Calendar_Second(2003,10,25,13,32,43));
+        $this->cal->build($selection);
+        $i = 0;
+        while ( $Child = $this->cal->fetch() ) {
+            if ( $i == 43 )
+                break;
+            $i++;
+        }
+        $this->assertTrue($Child->isSelected());
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfMinute();
+    $test->run(new HtmlReporter());
+    $test = &new TestOfMinuteBuild();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/month_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/month_test.php
new file mode 100644
index 000000000..d0ef8faba
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/month_test.php
@@ -0,0 +1,119 @@
+UnitTestCase('Test of Month');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Month(2003,10);
+    }
+    function testPrevMonth_Object() {
+        $this->assertEqual(new Calendar_Month(2003, 9), $this->cal->prevMonth('object'));
+    }
+    function testPrevDay () {
+        $this->assertEqual(30,$this->cal->prevDay());
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 9,
+                'day'    => 30,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testThisDay () {
+        $this->assertEqual(1,$this->cal->thisDay());
+    }
+    function testNextDay () {
+        $this->assertEqual(2,$this->cal->nextDay());
+    }
+    function testPrevHour () {
+        $this->assertEqual(23,$this->cal->prevHour());
+    }
+    function testThisHour () {
+        $this->assertEqual(0,$this->cal->thisHour());
+    }
+    function testNextHour () {
+        $this->assertEqual(1,$this->cal->nextHour());
+    }
+    function testPrevMinute () {
+        $this->assertEqual(59,$this->cal->prevMinute());
+    }
+    function testThisMinute () {
+        $this->assertEqual(0,$this->cal->thisMinute());
+    }
+    function testNextMinute () {
+        $this->assertEqual(1,$this->cal->nextMinute());
+    }
+    function testPrevSecond () {
+        $this->assertEqual(59,$this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(0,$this->cal->thisSecond());
+    }
+    function testNextSecond () {
+        $this->assertEqual(1,$this->cal->nextSecond());
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(0,0,0,10,1,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+}
+
+class TestOfMonthBuild extends TestOfMonth {
+    function TestOfMonthBuild() {
+        $this->UnitTestCase('Test of Month::build()');
+    }
+    function testSize() {
+        $this->cal->build();
+        $this->assertEqual(31,$this->cal->size());
+    }
+    function testFetch() {
+        $this->cal->build();
+        $i=0;
+        while ( $Child = $this->cal->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual(31,$i);
+    }
+    function testFetchAll() {
+        $this->cal->build();
+        $children = array();
+        $i = 1;
+        while ( $Child = $this->cal->fetch() ) {
+            $children[$i]=$Child;
+            $i++;
+        }
+        $this->assertEqual($children,$this->cal->fetchAll());
+    }
+    function testSelection() {
+        require_once(CALENDAR_ROOT . 'Day.php');
+        $selection = array(new Calendar_Day(2003,10,25));
+        $this->cal->build($selection);
+        $i = 1;
+        while ( $Child = $this->cal->fetch() ) {
+            if ( $i == 25 )
+                break;
+            $i++;
+        }
+        $this->assertTrue($Child->isSelected());
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfMonth();
+    $test->run(new HtmlReporter());
+    $test = &new TestOfMonthBuild();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/month_weekdays_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/month_weekdays_test.php
new file mode 100644
index 000000000..ba0be7313
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/month_weekdays_test.php
@@ -0,0 +1,130 @@
+UnitTestCase('Test of Month Weekdays');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Month_Weekdays(2003,10);
+    }
+    function testPrevDay () {
+        $this->assertEqual(30,$this->cal->prevDay());
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 9,
+                'day'    => 30,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testThisDay () {
+        $this->assertEqual(1,$this->cal->thisDay());
+    }
+    function testNextDay () {
+        $this->assertEqual(2,$this->cal->nextDay());
+    }
+    function testPrevHour () {
+        $this->assertEqual(23,$this->cal->prevHour());
+    }
+    function testThisHour () {
+        $this->assertEqual(0,$this->cal->thisHour());
+    }
+    function testNextHour () {
+        $this->assertEqual(1,$this->cal->nextHour());
+    }
+    function testPrevMinute () {
+        $this->assertEqual(59,$this->cal->prevMinute());
+    }
+    function testThisMinute () {
+        $this->assertEqual(0,$this->cal->thisMinute());
+    }
+    function testNextMinute () {
+        $this->assertEqual(1,$this->cal->nextMinute());
+    }
+    function testPrevSecond () {
+        $this->assertEqual(59,$this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(0,$this->cal->thisSecond());
+    }
+    function testNextSecond () {
+        $this->assertEqual(1,$this->cal->nextSecond());
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(0,0,0,10,1,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+}
+
+class TestOfMonthWeekdaysBuild extends TestOfMonthWeekdays {
+    function TestOfMonthWeekdaysBuild() {
+        $this->UnitTestCase('Test of Month_Weekdays::build()');
+    }
+    function testSize() {
+        $this->cal->build();
+        $this->assertEqual(35,$this->cal->size());
+    }
+    function testFetch() {
+        $this->cal->build();
+        $i=0;
+        while ( $Child = $this->cal->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual(35,$i);
+    }
+    function testFetchAll() {
+        $this->cal->build();
+        $children = array();
+        $i = 1;
+        while ( $Child = $this->cal->fetch() ) {
+            $children[$i]=$Child;
+            $i++;
+        }
+        $this->assertEqual($children,$this->cal->fetchAll());
+    }
+    function testSelection() {
+        require_once(CALENDAR_ROOT . 'Day.php');
+        $selection = array(new Calendar_Day(2003,10,25));
+        $this->cal->build($selection);
+        $i = 1;
+        while ( $Child = $this->cal->fetch() ) {
+            if ( $i == 27 )
+                break;
+            $i++;
+        }
+        $this->assertTrue($Child->isSelected());
+    }
+    function testEmptyCount() {
+        $this->cal->build();
+        $empty = 0;
+        while ( $Child = $this->cal->fetch() ) {
+            if ( $Child->isEmpty() )
+                $empty++;
+        }
+        $this->assertEqual(4,$empty);
+    }
+    function testEmptyDaysBefore_AfterAdjust() {
+        $this->cal = new Calendar_Month_Weekdays(2004,0);
+        $this->cal->build();
+        $this->assertEqual(0,$this->cal->tableHelper->getEmptyDaysBefore());
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfMonthWeekdays();
+    $test->run(new HtmlReporter());
+     $test = &new TestOfMonthWeekdaysBuild();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/month_weeks_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/month_weeks_test.php
new file mode 100644
index 000000000..1cfb8e8df
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/month_weeks_test.php
@@ -0,0 +1,125 @@
+UnitTestCase('Test of Month Weeks');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Month_Weeks(2003,10);
+    }
+    function testPrevDay () {
+        $this->assertEqual(30,$this->cal->prevDay());
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 9,
+                'day'    => 30,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testThisDay () {
+        $this->assertEqual(1,$this->cal->thisDay());
+    }
+    function testNextDay () {
+        $this->assertEqual(2,$this->cal->nextDay());
+    }
+    function testPrevHour () {
+        $this->assertEqual(23,$this->cal->prevHour());
+    }
+    function testThisHour () {
+        $this->assertEqual(0,$this->cal->thisHour());
+    }
+    function testNextHour () {
+        $this->assertEqual(1,$this->cal->nextHour());
+    }
+    function testPrevMinute () {
+        $this->assertEqual(59,$this->cal->prevMinute());
+    }
+    function testThisMinute () {
+        $this->assertEqual(0,$this->cal->thisMinute());
+    }
+    function testNextMinute () {
+        $this->assertEqual(1,$this->cal->nextMinute());
+    }
+    function testPrevSecond () {
+        $this->assertEqual(59,$this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(0,$this->cal->thisSecond());
+    }
+    function testNextSecond () {
+        $this->assertEqual(1,$this->cal->nextSecond());
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(0,0,0,10,1,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+}
+
+class TestOfMonthWeeksBuild extends TestOfMonthWeeks {
+    function TestOfMonthWeeksBuild() {
+        $this->UnitTestCase('Test of Month_Weeks::build()');
+    }
+    function testSize() {
+        $this->cal->build();
+        $this->assertEqual(5,$this->cal->size());
+    }
+
+    function testFetch() {
+        $this->cal->build();
+        $i=0;
+        while ( $Child = $this->cal->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual(5,$i);
+    }
+/* Recusive dependency issue with SimpleTest
+    function testFetchAll() {
+        $this->cal->build();
+        $children = array();
+        $i = 1;
+        while ( $Child = $this->cal->fetch() ) {
+            $children[$i]=$Child;
+            $i++;
+        }
+        $this->assertEqual($children,$this->cal->fetchAll());
+    }
+*/
+    function testSelection() {
+        require_once(CALENDAR_ROOT . 'Week.php');
+        $selection = array(new Calendar_Week(2003, 10, 12));
+        $this->cal->build($selection);
+        $i = 1;
+        while ($Child = $this->cal->fetch()) {
+            if ($i == 2) {
+                break;  //12-10-2003 is the 2nd day of the week
+            }
+            $i++;
+        }
+        $this->assertTrue($Child->isSelected());
+    }
+    function testEmptyDaysBefore_AfterAdjust() {
+        $this->cal = new Calendar_Month_Weeks(2004,0);
+        $this->cal->build();
+        $this->assertEqual(0,$this->cal->tableHelper->getEmptyDaysBefore());
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfMonthWeeks();
+    $test->run(new HtmlReporter());
+    $test = &new TestOfMonthWeeksBuild();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/peardate_engine_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/peardate_engine_test.php
new file mode 100644
index 000000000..4606185eb
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/peardate_engine_test.php
@@ -0,0 +1,124 @@
+UnitTestCase('Test of Calendar_Engine_PearDate');
+    }
+    function setUp() {
+        $this->engine = new Calendar_Engine_PearDate();
+    }
+    function testGetSecondsInMinute() {
+        $this->assertEqual($this->engine->getSecondsInMinute(),60);
+    }
+    function testGetMinutesInHour() {
+        $this->assertEqual($this->engine->getMinutesInHour(),60);
+    }
+    function testGetHoursInDay() {
+        $this->assertEqual($this->engine->getHoursInDay(),24);
+    }
+    function testGetFirstDayOfWeek() {
+        $this->assertEqual($this->engine->getFirstDayOfWeek(),1);
+    }
+    function testGetWeekDays() {
+        $this->assertEqual($this->engine->getWeekDays(),array(0,1,2,3,4,5,6));
+    }
+    function testGetDaysInWeek() {
+        $this->assertEqual($this->engine->getDaysInWeek(),7);
+    }
+    function testGetWeekNInYear() {
+        $this->assertEqual($this->engine->getWeekNInYear(2003, 11, 3), 45);
+    }
+    function testGetWeekNInMonth() {
+        $this->assertEqual($this->engine->getWeekNInMonth(2003, 11, 3), 2);
+    }
+    function testGetWeeksInMonth0() {
+        $this->assertEqual($this->engine->getWeeksInMonth(2003, 11, 0), 6); //week starts on sunday
+    }
+    function testGetWeeksInMonth1() {
+        $this->assertEqual($this->engine->getWeeksInMonth(2003, 11, 1), 5); //week starts on monday
+    }
+    function testGetWeeksInMonth2() {
+        $this->assertEqual($this->engine->getWeeksInMonth(2003, 2, 6), 4); //week starts on saturday
+    }
+    function testGetWeeksInMonth3() {
+        // Unusual cases that can cause fails (shows up with example 21.php)
+        $this->assertEqual($this->engine->getWeeksInMonth(2004,2,1),5);
+        $this->assertEqual($this->engine->getWeeksInMonth(2004,8,1),6);
+    }
+    function testGetDayOfWeek() {
+        $this->assertEqual($this->engine->getDayOfWeek(2003, 11, 18), 2);
+    }
+    function testGetFirstDayInMonth() {
+        $this->assertEqual($this->engine->getFirstDayInMonth(2003,10),3);
+    }
+    function testGetDaysInMonth() {
+        $this->assertEqual($this->engine->getDaysInMonth(2003,10),31);
+    }
+    function testGetMinYears() {
+        $this->assertEqual($this->engine->getMinYears(),0);
+    }
+    function testGetMaxYears() {
+        $this->assertEqual($this->engine->getMaxYears(),9999);
+    }
+    function testDateToStamp() {
+        $stamp = '2003-10-15 13:30:45';
+        $this->assertEqual($this->engine->dateToStamp(2003,10,15,13,30,45),$stamp);
+    }
+    function testStampToSecond() {
+        $stamp = '2003-10-15 13:30:45';
+        $this->assertEqual($this->engine->stampToSecond($stamp),45);
+    }
+    function testStampToMinute() {
+        $stamp = '2003-10-15 13:30:45';
+        $this->assertEqual($this->engine->stampToMinute($stamp),30);
+    }
+    function testStampToHour() {
+        $stamp = '2003-10-15 13:30:45';
+        $this->assertEqual($this->engine->stampToHour($stamp),13);
+    }
+    function testStampToDay() {
+        $stamp = '2003-10-15 13:30:45';
+        $this->assertEqual($this->engine->stampToDay($stamp),15);
+    }
+    function testStampToMonth() {
+        $stamp = '2003-10-15 13:30:45';
+        $this->assertEqual($this->engine->stampToMonth($stamp),10);
+    }
+    function testStampToYear() {
+        $stamp = '2003-10-15 13:30:45';
+        $this->assertEqual($this->engine->stampToYear($stamp),2003);
+    }
+    function testAdjustDate() {
+        $stamp = '2004-01-01 13:30:45';
+        $y = $this->engine->stampToYear($stamp);
+        $m = $this->engine->stampToMonth($stamp);
+        $d = $this->engine->stampToDay($stamp);
+
+        //the first day of the month should be thursday
+        $this->assertEqual($this->engine->getDayOfWeek($y, $m, $d), 4);
+
+        $m--; // 2004-00-01 => 2003-12-01
+        $this->engine->adjustDate($y, $m, $d, $dummy, $dummy, $dummy);
+
+        $this->assertEqual($y, 2003);
+        $this->assertEqual($m, 12);
+        $this->assertEqual($d, 1);
+
+        // get last day and check if it's wednesday
+        $d = $this->engine->getDaysInMonth($y, $m);
+
+        $this->assertEqual($this->engine->getDayOfWeek($y, $m, $d), 3);
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfPearDateEngine();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/second_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/second_test.php
new file mode 100644
index 000000000..ea93da6c7
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/second_test.php
@@ -0,0 +1,34 @@
+UnitTestCase('Test of Second');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Second(2003,10,25,13,32,43);
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 10,
+                'day'    => 24,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfSecond();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/simple_include.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/simple_include.php
new file mode 100644
index 000000000..c32abeecc
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/simple_include.php
@@ -0,0 +1,10 @@
+
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/table_helper_tests.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/table_helper_tests.php
new file mode 100644
index 000000000..8ffcb192a
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/table_helper_tests.php
@@ -0,0 +1,19 @@
+GroupTest('Table Helper Tests');
+        $this->addTestFile('helper_test.php');
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TableHelperTests();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/unixts_engine_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/unixts_engine_test.php
new file mode 100644
index 000000000..69e61f408
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/unixts_engine_test.php
@@ -0,0 +1,104 @@
+UnitTestCase('Test of Calendar_Engine_UnixTs');
+    }
+    function setUp() {
+        $this->engine = new Calendar_Engine_UnixTs();
+    }
+    function testGetSecondsInMinute() {
+        $this->assertEqual($this->engine->getSecondsInMinute(),60);
+    }
+    function testGetMinutesInHour() {
+        $this->assertEqual($this->engine->getMinutesInHour(),60);
+    }
+    function testGetHoursInDay() {
+        $this->assertEqual($this->engine->getHoursInDay(),24);
+    }
+    function testGetFirstDayOfWeek() {
+        $this->assertEqual($this->engine->getFirstDayOfWeek(),1);
+    }
+    function testGetWeekDays() {
+        $this->assertEqual($this->engine->getWeekDays(),array(0,1,2,3,4,5,6));
+    }
+    function testGetDaysInWeek() {
+        $this->assertEqual($this->engine->getDaysInWeek(),7);
+    }
+    function testGetWeekNInYear() {
+        $this->assertEqual($this->engine->getWeekNInYear(2003, 11, 3), 45);
+    }
+    function testGetWeekNInMonth() {
+        $this->assertEqual($this->engine->getWeekNInMonth(2003, 11, 3), 2);
+    }
+    function testGetWeeksInMonth0() {
+        $this->assertEqual($this->engine->getWeeksInMonth(2003, 11, 0), 6); //week starts on sunday
+    }
+    function testGetWeeksInMonth1() {
+        $this->assertEqual($this->engine->getWeeksInMonth(2003, 11, 1), 5); //week starts on monday
+    }
+    function testGetWeeksInMonth2() {
+        $this->assertEqual($this->engine->getWeeksInMonth(2003, 2, 6), 4); //week starts on saturday
+    }
+    function testGetWeeksInMonth3() {
+        // Unusual cases that can cause fails (shows up with example 21.php)
+        $this->assertEqual($this->engine->getWeeksInMonth(2004,2,1),5);
+        $this->assertEqual($this->engine->getWeeksInMonth(2004,8,1),6);
+    }
+    function testGetDayOfWeek() {
+        $this->assertEqual($this->engine->getDayOfWeek(2003, 11, 18), 2);
+    }
+    function testGetFirstDayInMonth() {
+        $this->assertEqual($this->engine->getFirstDayInMonth(2003,10),3);
+    }
+    function testGetDaysInMonth() {
+        $this->assertEqual($this->engine->getDaysInMonth(2003,10),31);
+    }
+    function testGetMinYears() {
+        $test = strpos(PHP_OS, 'WIN') >= 0 ? 1970 : 1902;
+        $this->assertEqual($this->engine->getMinYears(),$test);
+    }
+    function testGetMaxYears() {
+        $this->assertEqual($this->engine->getMaxYears(),2037);
+    }
+    function testDateToStamp() {
+        $stamp = mktime(0,0,0,10,15,2003);
+        $this->assertEqual($this->engine->dateToStamp(2003,10,15,0,0,0),$stamp);
+    }
+    function testStampToSecond() {
+        $stamp = mktime(13,30,45,10,15,2003);
+        $this->assertEqual($this->engine->stampToSecond($stamp),45);
+    }
+    function testStampToMinute() {
+        $stamp = mktime(13,30,45,10,15,2003);
+        $this->assertEqual($this->engine->stampToMinute($stamp),30);
+    }
+    function testStampToHour() {
+        $stamp = mktime(13,30,45,10,15,2003);
+        $this->assertEqual($this->engine->stampToHour($stamp),13);
+    }
+    function testStampToDay() {
+        $stamp = mktime(13,30,45,10,15,2003);
+        $this->assertEqual($this->engine->stampToDay($stamp),15);
+    }
+    function testStampToMonth() {
+        $stamp = mktime(13,30,45,10,15,2003);
+        $this->assertEqual($this->engine->stampToMonth($stamp),10);
+    }
+    function testStampToYear() {
+        $stamp = mktime(13,30,45,10,15,2003);
+        $this->assertEqual($this->engine->stampToYear($stamp),2003);
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfUnixTsEngine();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/util_tests.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/util_tests.php
new file mode 100644
index 000000000..fd578abb0
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/util_tests.php
@@ -0,0 +1,20 @@
+GroupTest('Util Tests');
+        $this->addTestFile('util_uri_test.php');
+        $this->addTestFile('util_textual_test.php');
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new UtilTests();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/util_textual_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/util_textual_test.php
new file mode 100644
index 000000000..3fd80274e
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/util_textual_test.php
@@ -0,0 +1,191 @@
+UnitTestCase('Test of Calendar_Util_Textual');
+    }
+    function setUp() {
+        $this->mockengine = new Mock_Calendar_Engine($this);
+        $this->mockcal = new Mock_Calendar_Second($this);
+        $this->mockcal->setReturnValue('prevYear',2002);
+        $this->mockcal->setReturnValue('thisYear',2003);
+        $this->mockcal->setReturnValue('nextYear',2004);
+        $this->mockcal->setReturnValue('prevMonth',9);
+        $this->mockcal->setReturnValue('thisMonth',10);
+        $this->mockcal->setReturnValue('nextMonth',11);
+        $this->mockcal->setReturnValue('prevDay',14);
+        $this->mockcal->setReturnValue('thisDay',15);
+        $this->mockcal->setReturnValue('nextDay',16);
+        $this->mockcal->setReturnValue('prevHour',12);
+        $this->mockcal->setReturnValue('thisHour',13);
+        $this->mockcal->setReturnValue('nextHour',14);
+        $this->mockcal->setReturnValue('prevMinute',29);
+        $this->mockcal->setReturnValue('thisMinute',30);
+        $this->mockcal->setReturnValue('nextMinute',31);
+        $this->mockcal->setReturnValue('prevSecond',44);
+        $this->mockcal->setReturnValue('thisSecond',45);
+        $this->mockcal->setReturnValue('nextSecond',46);
+        $this->mockcal->setReturnValue('getEngine',$this->mockengine);
+        $this->mockcal->setReturnValue('getTimestamp',12345);
+    }
+    function tearDown() {
+        unset ( $this->engine );
+        unset ( $this->mockcal );
+    }    
+    function testMonthNamesLong() {
+        $monthNames = array(
+            1=>'January',
+            2=>'February',
+            3=>'March',
+            4=>'April',
+            5=>'May',
+            6=>'June',
+            7=>'July',
+            8=>'August',
+            9=>'September',
+            10=>'October',
+            11=>'November',
+            12=>'December',
+        );
+        $this->assertEqual($monthNames,Calendar_Util_Textual::monthNames());
+    }
+    function testMonthNamesShort() {
+        $monthNames = array(
+            1=>'Jan',
+            2=>'Feb',
+            3=>'Mar',
+            4=>'Apr',
+            5=>'May',
+            6=>'Jun',
+            7=>'Jul',
+            8=>'Aug',
+            9=>'Sep',
+            10=>'Oct',
+            11=>'Nov',
+            12=>'Dec',
+        );
+        $this->assertEqual($monthNames,Calendar_Util_Textual::monthNames('short'));
+    }
+    function testMonthNamesTwo() {
+        $monthNames = array(
+            1=>'Ja',
+            2=>'Fe',
+            3=>'Ma',
+            4=>'Ap',
+            5=>'Ma',
+            6=>'Ju',
+            7=>'Ju',
+            8=>'Au',
+            9=>'Se',
+            10=>'Oc',
+            11=>'No',
+            12=>'De',
+        );
+        $this->assertEqual($monthNames,Calendar_Util_Textual::monthNames('two'));
+    }
+    function testMonthNamesOne() {
+        $monthNames = array(
+            1=>'J',
+            2=>'F',
+            3=>'M',
+            4=>'A',
+            5=>'M',
+            6=>'J',
+            7=>'J',
+            8=>'A',
+            9=>'S',
+            10=>'O',
+            11=>'N',
+            12=>'D',
+        );
+        $this->assertEqual($monthNames,Calendar_Util_Textual::monthNames('one'));
+    }
+    function testWeekdayNamesLong() {
+        $weekdayNames = array(
+            0=>'Sunday',
+            1=>'Monday',
+            2=>'Tuesday',
+            3=>'Wednesday',
+            4=>'Thursday',
+            5=>'Friday',
+            6=>'Saturday',
+        );
+        $this->assertEqual($weekdayNames,Calendar_Util_Textual::weekdayNames());
+    }
+    function testWeekdayNamesShort() {
+        $weekdayNames = array(
+            0=>'Sun',
+            1=>'Mon',
+            2=>'Tue',
+            3=>'Wed',
+            4=>'Thu',
+            5=>'Fri',
+            6=>'Sat',
+        );
+        $this->assertEqual($weekdayNames,Calendar_Util_Textual::weekdayNames('short'));
+    }
+    function testWeekdayNamesTwo() {
+        $weekdayNames = array(
+            0=>'Su',
+            1=>'Mo',
+            2=>'Tu',
+            3=>'We',
+            4=>'Th',
+            5=>'Fr',
+            6=>'Sa',
+        );
+        $this->assertEqual($weekdayNames,Calendar_Util_Textual::weekdayNames('two'));
+    }
+    function testWeekdayNamesOne() {
+        $weekdayNames = array(
+            0=>'S',
+            1=>'M',
+            2=>'T',
+            3=>'W',
+            4=>'T',
+            5=>'F',
+            6=>'S',
+        );
+        $this->assertEqual($weekdayNames,Calendar_Util_Textual::weekdayNames('one'));
+    }
+    function testPrevMonthNameShort() {
+        $this->assertEqual('Sep',Calendar_Util_Textual::prevMonthName($this->mockcal,'short'));
+    }
+    function testThisMonthNameShort() {
+        $this->assertEqual('Oct',Calendar_Util_Textual::thisMonthName($this->mockcal,'short'));
+    }
+    function testNextMonthNameShort() {
+        $this->assertEqual('Nov',Calendar_Util_Textual::nextMonthName($this->mockcal,'short'));
+    }
+    function testThisDayNameShort() {
+        $this->assertEqual('Wed',Calendar_Util_Textual::thisDayName($this->mockcal,'short'));
+    }
+    function testOrderedWeekdaysShort() {
+        $weekdayNames = array(
+            0=>'Sun',
+            1=>'Mon',
+            2=>'Tue',
+            3=>'Wed',
+            4=>'Thu',
+            5=>'Fri',
+            6=>'Sat',
+        );
+        $this->assertEqual($weekdayNames,Calendar_Util_Textual::orderedWeekdays($this->mockcal,'short'));
+    }
+
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfUtilTextual();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/util_uri_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/util_uri_test.php
new file mode 100644
index 000000000..7b4afe1ad
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/util_uri_test.php
@@ -0,0 +1,54 @@
+UnitTestCase('Test of Calendar_Util_Uri');
+    }
+    
+    function setUp() {
+        $this->MockCal = & new Mock_Calendar_Day($this);
+        $this->MockCal->setReturnValue('getEngine',new Mock_Calendar_Engine($this));
+    }
+    
+    function testFragments() {
+        $Uri = new Calendar_Util_Uri('y','m','d','h','m','s');
+        $Uri->setFragments('year','month','day','hour','minute','second');
+        $this->assertEqual(
+            'year=&month=&day=&hour=&minute=&second=',
+            $Uri->this($this->MockCal, 'second')
+        );
+    }
+    function testScalarFragments() {
+        $Uri = new Calendar_Util_Uri('year','month','day','hour','minute','second');
+        $Uri->scalar = true;
+        $this->assertEqual(
+            '&&&&&',
+            $Uri->this($this->MockCal, 'second')
+        );
+    }
+    function testSetSeperator() {
+        $Uri = new Calendar_Util_Uri('year','month','day','hour','minute','second');
+        $Uri->separator = '/';
+        $this->assertEqual(
+            'year=/month=/day=/hour=/minute=/second=',
+            $Uri->this($this->MockCal, 'second')
+        );
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfUtilUri();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_error_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_error_test.php
new file mode 100644
index 000000000..aafc99c51
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_error_test.php
@@ -0,0 +1,34 @@
+UnitTestCase('Test of Validation Error');
+    }
+    function setUp() {
+        $this->vError = new Calendar_Validation_Error('foo',20,'bar');
+    }
+    function testGetUnit() {
+        $this->assertEqual($this->vError->getUnit(),'foo');
+    }
+    function testGetValue() {
+        $this->assertEqual($this->vError->getValue(),20);
+    }
+    function testGetMessage() {
+        $this->assertEqual($this->vError->getMessage(),'bar');
+    }
+    function testToString() {
+        $this->assertEqual($this->vError->toString(),'foo = 20 [bar]');
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfValidationError();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_tests.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_tests.php
new file mode 100644
index 000000000..6749b1173
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_tests.php
@@ -0,0 +1,20 @@
+GroupTest('Validator Tests');
+        $this->addTestFile('validator_unit_test.php');
+        $this->addTestFile('validator_error_test.php');
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new ValidatorTests();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_unit_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_unit_test.php
new file mode 100644
index 000000000..3f4a58a40
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/validator_unit_test.php
@@ -0,0 +1,210 @@
+UnitTestCase('Test of Validator');
+    }
+    function setUp() {
+        $this->mockengine = new Mock_Calendar_Engine($this);
+        $this->mockengine->setReturnValue('getMinYears',1970);
+        $this->mockengine->setReturnValue('getMaxYears',2037);
+        $this->mockengine->setReturnValue('getMonthsInYear',12);
+        $this->mockengine->setReturnValue('getDaysInMonth',30);
+        $this->mockengine->setReturnValue('getHoursInDay',24);
+        $this->mockengine->setReturnValue('getMinutesInHour',60);
+        $this->mockengine->setReturnValue('getSecondsInMinute',60);
+        $this->mockcal = new Mock_Calendar_Second($this);
+        $this->mockcal->setReturnValue('getEngine',$this->mockengine);
+    }
+    function tearDown() {
+        unset ($this->mockengine);
+        unset ($this->mocksecond);
+    }
+    function testIsValidYear() {
+        $this->mockcal->setReturnValue('thisYear',2000);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertTrue($Validator->isValidYear());
+    }
+    function testIsValidYearTooSmall() {
+        $this->mockcal->setReturnValue('thisYear',1969);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidYear());
+    }
+    function testIsValidYearTooLarge() {
+        $this->mockcal->setReturnValue('thisYear',2038);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidYear());
+    }
+    function testIsValidMonth() {
+        $this->mockcal->setReturnValue('thisMonth',10);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertTrue($Validator->isValidMonth());
+    }
+    function testIsValidMonthTooSmall() {
+        $this->mockcal->setReturnValue('thisMonth',0);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidMonth());
+    }
+    function testIsValidMonthTooLarge() {
+        $this->mockcal->setReturnValue('thisMonth',13);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidMonth());
+    }
+    function testIsValidDay() {
+        $this->mockcal->setReturnValue('thisDay',10);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertTrue($Validator->isValidDay());
+    }
+    function testIsValidDayTooSmall() {
+        $this->mockcal->setReturnValue('thisDay',0);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidDay());
+    }
+    function testIsValidDayTooLarge() {
+        $this->mockcal->setReturnValue('thisDay',31);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidDay());
+    }
+    function testIsValidHour() {
+        $this->mockcal->setReturnValue('thisHour',10);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertTrue($Validator->isValidHour());
+    }
+    function testIsValidHourTooSmall() {
+        $this->mockcal->setReturnValue('thisHour',-1);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidHour());
+    }
+    function testIsValidHourTooLarge() {
+        $this->mockcal->setReturnValue('thisHour',24);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidHour());
+    }
+    function testIsValidMinute() {
+        $this->mockcal->setReturnValue('thisMinute',30);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertTrue($Validator->isValidMinute());
+    }
+    function testIsValidMinuteTooSmall() {
+        $this->mockcal->setReturnValue('thisMinute',-1);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidMinute());
+    }
+    function testIsValidMinuteTooLarge() {
+        $this->mockcal->setReturnValue('thisMinute',60);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidMinute());
+    }
+    function testIsValidSecond() {
+        $this->mockcal->setReturnValue('thisSecond',30);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertTrue($Validator->isValidSecond());
+    }
+    function testIsValidSecondTooSmall() {
+        $this->mockcal->setReturnValue('thisSecond',-1);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidSecond());
+    }
+    function testIsValidSecondTooLarge() {
+        $this->mockcal->setReturnValue('thisSecond',60);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValidSecond());
+    }
+    function testIsValid() {
+        $this->mockcal->setReturnValue('thisYear',2000);
+        $this->mockcal->setReturnValue('thisMonth',5);
+        $this->mockcal->setReturnValue('thisDay',15);
+        $this->mockcal->setReturnValue('thisHour',13);
+        $this->mockcal->setReturnValue('thisMinute',30);
+        $this->mockcal->setReturnValue('thisSecond',40);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertTrue($Validator->isValid());
+    }
+    function testIsValidAllWrong() {
+        $this->mockcal->setReturnValue('thisYear',2038);
+        $this->mockcal->setReturnValue('thisMonth',13);
+        $this->mockcal->setReturnValue('thisDay',31);
+        $this->mockcal->day = 31;
+        $this->mockcal->setReturnValue('thisHour',24);
+        $this->mockcal->setReturnValue('thisMinute',60);
+        $this->mockcal->setReturnValue('thisSecond',60);
+        $Validator = & new Calendar_Validator($this->mockcal);
+        $this->assertFalse($Validator->isValid());
+        $i = 0;
+        while ( $Validator->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual($i,6);
+    }
+}
+
+class TestOfValidatorLive extends UnitTestCase {
+    function TestOfValidatorLive() {
+        $this->UnitTestCase('Test of Validator Live');
+    }
+    function testYear() {
+        $Unit = new Calendar_Year(2038);
+        $Validator = & $Unit->getValidator();
+        $this->assertFalse($Validator->isValidYear());
+    }
+    function testMonth() {
+        $Unit = new Calendar_Month(2000,13);
+        $Validator = & $Unit->getValidator();
+        $this->assertFalse($Validator->isValidMonth());
+    }
+/*
+    function testWeek() {
+        $Unit = new Calendar_Week(2000,12,7);
+        $Validator = & $Unit->getValidator();
+        $this->assertFalse($Validator->isValidWeek());
+    }
+*/
+    function testDay() {
+        $Unit = new Calendar_Day(2000,12,32);
+        $Validator = & $Unit->getValidator();
+        $this->assertFalse($Validator->isValidDay());
+    }
+    function testHour() {
+        $Unit = new Calendar_Hour(2000,12,20,24);
+        $Validator = & $Unit->getValidator();
+        $this->assertFalse($Validator->isValidHour());
+    }
+    function testMinute() {
+        $Unit = new Calendar_Minute(2000,12,20,23,60);
+        $Validator = & $Unit->getValidator();
+        $this->assertFalse($Validator->isValidMinute());
+    }
+    function testSecond() {
+        $Unit = new Calendar_Second(2000,12,20,23,59,60);
+        $Validator = & $Unit->getValidator();
+        $this->assertFalse($Validator->isValidSecond());
+    }
+    function testAllBad() {
+        $Unit = new Calendar_Second(2000,13,32,24,60,60);
+        $this->assertFalse($Unit->isValid());
+        $Validator = & $Unit->getValidator();
+        $i = 0;
+        while ( $Validator->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual($i,5);
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfValidator();
+    $test->run(new HtmlReporter());
+    $test = &new TestOfValidatorLive();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/week_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/week_test.php
new file mode 100644
index 000000000..8073b985a
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/week_test.php
@@ -0,0 +1,214 @@
+UnitTestCase('Test of Week');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Week(2003, 10, 9, 1); //force firstDay = monday
+        //print_r($this->cal);
+    }
+    function testPrevDay () {
+        $this->assertEqual(8, $this->cal->prevDay());
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2003,
+                'month'  => 10,
+                'day'    => 8,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testThisDay () {
+        $this->assertEqual(9, $this->cal->thisDay());
+    }
+    function testNextDay () {
+        $this->assertEqual(10, $this->cal->nextDay());
+    }
+    function testPrevHour () {
+        $this->assertEqual(23, $this->cal->prevHour());
+    }
+    function testThisHour () {
+        $this->assertEqual(0, $this->cal->thisHour());
+    }
+    function testNextHour () {
+        $this->assertEqual(1, $this->cal->nextHour());
+    }
+    function testPrevMinute () {
+        $this->assertEqual(59, $this->cal->prevMinute());
+    }
+    function testThisMinute () {
+        $this->assertEqual(0, $this->cal->thisMinute());
+    }
+    function testNextMinute () {
+        $this->assertEqual(1, $this->cal->nextMinute());
+    }
+    function testPrevSecond () {
+        $this->assertEqual(59, $this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(0, $this->cal->thisSecond());
+    }
+    function testNextSecond () {
+        $this->assertEqual(1, $this->cal->nextSecond());
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(0,0,0,10,9,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+    function testNewTimeStamp() {
+        $stamp = mktime(0,0,0,7,28,2004);
+        $this->cal->setTimestamp($stamp);
+        $this->assertEqual('30 2004', date('W Y', $this->cal->prevWeek(true)));
+        $this->assertEqual('31 2004', date('W Y', $this->cal->thisWeek(true)));
+        $this->assertEqual('32 2004', date('W Y', $this->cal->nextWeek(true)));
+    }
+    function testPrevWeekInMonth() {
+        $this->assertEqual(1, $this->cal->prevWeek());
+    }
+    function testThisWeekInMonth() {
+        $this->assertEqual(2, $this->cal->thisWeek());
+    }
+    function testNextWeekInMonth() {
+        $this->assertEqual(3, $this->cal->nextWeek());
+    }
+    function testPrevWeekInYear() {
+        $this->assertEqual(40, $this->cal->prevWeek('n_in_year'));
+    }
+    function testThisWeekInYear() {
+        $this->assertEqual(41, $this->cal->thisWeek('n_in_year'));
+    }
+    function testNextWeekInYear() {
+        $this->assertEqual(42, $this->cal->nextWeek('n_in_year'));
+    }
+    function testPrevWeekArray() {
+        $testArray = array(
+            'year'=>2003,
+            'month'=>9,
+            'day'=>29,
+            'hour'=>0,
+            'minute'=>0,
+            'second'=>0
+            );
+        $this->assertEqual($testArray, $this->cal->prevWeek('array'));
+    }
+    function testThisWeekArray() {
+        $testArray = array(
+            'year'=>2003,
+            'month'=>10,
+            'day'=>6,
+            'hour'=>0,
+            'minute'=>0,
+            'second'=>0
+            );
+        $this->assertEqual($testArray, $this->cal->thisWeek('array'));
+    }
+    function testNextWeekArray() {
+        $testArray = array(
+            'year'=>2003,
+            'month'=>10,
+            'day'=>13,
+            'hour'=>0,
+            'minute'=>0,
+            'second'=>0
+            );
+        $this->assertEqual($testArray, $this->cal->nextWeek('array'));
+    }
+    function testPrevWeekObject() {
+        $testWeek = new Calendar_Week(2003,9,29);
+        $Week = $this->cal->prevWeek('object');
+        $this->assertEqual($testWeek->getTimeStamp(),$Week->getTimeStamp());
+    }
+    function testThisWeekObject() {
+        $testWeek = new Calendar_Week(2003,10,6);
+        $Week = $this->cal->thisWeek('object');
+        $this->assertEqual($testWeek->getTimeStamp(),$Week->getTimeStamp());
+    }
+    function testNextWeekObject() {
+        $testWeek = new Calendar_Week(2003,10,13);
+        $Week = $this->cal->nextWeek('object');
+        $this->assertEqual($testWeek->getTimeStamp(),$Week->getTimeStamp());
+    }
+}
+
+class TestOfWeekBuild extends TestOfWeek {
+    function TestOfWeekBuild() {
+        $this->UnitTestCase('Test of Week::build()');
+    }
+    function testSize() {
+        $this->cal->build();
+        $this->assertEqual(7, $this->cal->size());
+    }
+
+    function testFetch() {
+        $this->cal->build();
+        $i=0;
+        while ($Child = $this->cal->fetch()) {
+            $i++;
+        }
+        $this->assertEqual(7, $i);
+    }
+    function testFetchAll() {
+        $this->cal->build();
+        $children = array();
+        $i = 1;
+        while ( $Child = $this->cal->fetch() ) {
+            $children[$i]=$Child;
+            $i++;
+        }
+        $this->assertEqual($children,$this->cal->fetchAll());
+    }
+
+    function testSelection() {
+        require_once(CALENDAR_ROOT . 'Day.php');
+        $selection = array(new Calendar_Day(2003, 10, 7));
+        $this->cal->build($selection);
+        $i = 1;
+        while ($Child = $this->cal->fetch()) {
+            if ($i == 2) {
+                break; //07-10-2003 is the 2nd day of the week
+            }
+            $i++;
+        }
+        $this->assertTrue($Child->isSelected());
+    }
+    function testSelectionCornerCase() {
+        require_once(CALENDAR_ROOT . 'Day.php');
+        $selectedDays = array(

+            new Calendar_Day(2003, 12, 28),

+            new Calendar_Day(2003, 12, 29),

+            new Calendar_Day(2003, 12, 30),

+            new Calendar_Day(2003, 12, 31),

+            new Calendar_Day(2004, 01, 01),

+            new Calendar_Day(2004, 01, 02),

+            new Calendar_Day(2004, 01, 03)
+        );
+        $this->cal = new Calendar_Week(2003, 12, 31, 0);
+        $this->cal->build($selectedDays);

+        while ($Day = $this->cal->fetch()) {

+            $this->assertTrue($Day->isSelected());
+        }
+        $this->cal = new Calendar_Week(2004, 1, 1, 0);

+        $this->cal->build($selectedDays);

+        while ($Day = $this->cal->fetch()) {

+            $this->assertTrue($Day->isSelected());
+        }
+    }
+}
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfWeek();
+    $test->run(new HtmlReporter());
+    $test = &new TestOfWeekBuild();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/Calendar/tests/year_test.php b/campcaster/src/tools/pear/src/tests/Calendar/tests/year_test.php
new file mode 100644
index 000000000..8e7d6bd91
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/Calendar/tests/year_test.php
@@ -0,0 +1,142 @@
+UnitTestCase('Test of Year');
+    }
+    function setUp() {
+        $this->cal = new Calendar_Year(2003);
+    }
+    function testPrevYear_Object() {
+        $this->assertEqual(new Calendar_Year(2002), $this->cal->prevYear('object'));
+    }
+    function testThisYear_Object() {
+        $this->assertEqual(new Calendar_Year(2003), $this->cal->thisYear('object'));
+    }
+    function testPrevMonth () {
+        $this->assertEqual(12,$this->cal->prevMonth());
+    }
+    function testPrevMonth_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2002,
+                'month'  => 12,
+                'day'    => 1,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevMonth('array'));
+    }
+    function testThisMonth () {
+        $this->assertEqual(1,$this->cal->thisMonth());
+    }
+    function testNextMonth () {
+        $this->assertEqual(2,$this->cal->nextMonth());
+    }
+    function testPrevDay () {
+        $this->assertEqual(31,$this->cal->prevDay());
+    }
+    function testPrevDay_Array () {
+        $this->assertEqual(
+            array(
+                'year'   => 2002,
+                'month'  => 12,
+                'day'    => 31,
+                'hour'   => 0,
+                'minute' => 0,
+                'second' => 0),
+            $this->cal->prevDay('array'));
+    }
+    function testThisDay () {
+        $this->assertEqual(1,$this->cal->thisDay());
+    }
+    function testNextDay () {
+        $this->assertEqual(2,$this->cal->nextDay());
+    }
+    function testPrevHour () {
+        $this->assertEqual(23,$this->cal->prevHour());
+    }
+    function testThisHour () {
+        $this->assertEqual(0,$this->cal->thisHour());
+    }
+    function testNextHour () {
+        $this->assertEqual(1,$this->cal->nextHour());
+    }
+    function testPrevMinute () {
+        $this->assertEqual(59,$this->cal->prevMinute());
+    }
+    function testThisMinute () {
+        $this->assertEqual(0,$this->cal->thisMinute());
+    }
+    function testNextMinute () {
+        $this->assertEqual(1,$this->cal->nextMinute());
+    }
+    function testPrevSecond () {
+        $this->assertEqual(59,$this->cal->prevSecond());
+    }
+    function testThisSecond () {
+        $this->assertEqual(0,$this->cal->thisSecond());
+    }
+    function testNextSecond () {
+        $this->assertEqual(1,$this->cal->nextSecond());
+    }
+    function testGetTimeStamp() {
+        $stamp = mktime(0,0,0,1,1,2003);
+        $this->assertEqual($stamp,$this->cal->getTimeStamp());
+    }
+}
+
+class TestOfYearBuild extends TestOfYear {
+    function TestOfYearBuild() {
+        $this->UnitTestCase('Test of Year::build()');
+    }
+    function testSize() {
+        $this->cal->build();
+        $this->assertEqual(12,$this->cal->size());
+    }
+    function testFetch() {
+        $this->cal->build();
+        $i=0;
+        while ( $Child = $this->cal->fetch() ) {
+            $i++;
+        }
+        $this->assertEqual(12,$i);
+    }
+    function testFetchAll() {
+        $this->cal->build();
+        $children = array();
+        $i = 1;
+        while ( $Child = $this->cal->fetch() ) {
+            $children[$i]=$Child;
+            $i++;
+        }
+        $this->assertEqual($children,$this->cal->fetchAll());
+    }
+    function testSelection() {
+        require_once(CALENDAR_ROOT . 'Month.php');
+        $selection = array(new Calendar_Month(2003,10));
+        $this->cal->build($selection);
+        $i = 1;
+        while ( $Child = $this->cal->fetch() ) {
+            if ( $i == 10 )
+                break;
+            $i++;
+        }
+        $this->assertTrue($Child->isSelected());
+    }
+}
+
+if (!defined('TEST_RUNNING')) {
+    define('TEST_RUNNING', true);
+    $test = &new TestOfYear();
+    $test->run(new HtmlReporter());
+    $test = &new TestOfYearBuild();
+    $test->run(new HtmlReporter());
+}
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/db_error.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/db_error.phpt
new file mode 100644
index 000000000..66de08bd2
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/db_error.phpt
@@ -0,0 +1,79 @@
+--TEST--
+DB::DB_Error
+--SKIPIF--
+
+--FILE--
+ 'Error',
+        E_WARNING => 'Warning',
+        E_PARSE => 'Parsing Error',
+        E_NOTICE => 'Notice',
+        E_CORE_ERROR => 'Core Error',
+        E_CORE_WARNING => 'Core Warning',
+        E_COMPILE_ERROR => 'Compile Error',
+        E_COMPILE_WARNING => 'Compile Warning',
+        E_USER_ERROR => 'User Error',
+        E_USER_WARNING => 'User Warning',
+        E_USER_NOTICE => 'User Notice',
+        E_STRICT => 'Strict Notice',
+    );
+    $prefix = $errortype[$errno];
+    print "\n$prefix: $errmsg in " . basename($file) . " on line XXX\n";
+}
+
+error_reporting(E_ALL);
+set_error_handler('test_error_handler');
+
+print "testing different error codes...\n";
+$e = new DB_Error(); print strtolower($e->toString())."\n";
+$e = new DB_Error("test error"); print strtolower($e->toString())."\n";
+$e = new DB_Error(DB_OK); print strtolower($e->toString())."\n";
+$e = new DB_Error(DB_ERROR); print strtolower($e->toString())."\n";
+$e = new DB_Error(DB_ERROR_SYNTAX); print strtolower($e->toString())."\n";
+$e = new DB_Error(DB_ERROR_DIVZERO); print strtolower($e->toString())."\n";
+
+print "testing different error modes...\n";
+$e = new DB_Error(DB_ERROR, PEAR_ERROR_PRINT); print strtolower($e->toString())."\n";
+$e = new DB_Error(DB_ERROR_SYNTAX, PEAR_ERROR_TRIGGER);
+
+print "testing different error serverities...\n";
+$e = new DB_Error(DB_ERROR_SYNTAX, PEAR_ERROR_TRIGGER, E_USER_NOTICE);
+$e = new DB_Error(DB_ERROR_SYNTAX, PEAR_ERROR_TRIGGER, E_USER_WARNING);
+$e = new DB_Error(DB_ERROR_SYNTAX, PEAR_ERROR_TRIGGER, E_USER_ERROR);
+
+?>
+--GET--
+--POST--
+--EXPECT--
+testing different error codes...
+[db_error: message="db error: unknown error" code=-1 mode=return level=notice prefix="" info=""]
+[db_error: message="db error: test error" code=-1 mode=return level=notice prefix="" info=""]
+[db_error: message="db error: no error" code=1 mode=return level=notice prefix="" info=""]
+[db_error: message="db error: unknown error" code=-1 mode=return level=notice prefix="" info=""]
+[db_error: message="db error: syntax error" code=-2 mode=return level=notice prefix="" info=""]
+[db_error: message="db error: division by zero" code=-13 mode=return level=notice prefix="" info=""]
+testing different error modes...
+DB Error: unknown error[db_error: message="db error: unknown error" code=-1 mode=print level=notice prefix="" info=""]
+
+User Notice: DB Error: syntax error in PEAR.php on line XXX
+testing different error serverities...
+
+User Notice: DB Error: syntax error in PEAR.php on line XXX
+
+User Warning: DB Error: syntax error in PEAR.php on line XXX
+
+User Error: DB Error: syntax error in PEAR.php on line XXX
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/db_error2.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/db_error2.phpt
new file mode 100644
index 000000000..2cc01ff2b
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/db_error2.phpt
@@ -0,0 +1,92 @@
+--TEST--
+DB::Error 2
+--SKIPIF--
+
+--FILE--
+toString()) . "\n";
+}
+function myfunc2(&$obj) {
+    print 'myfunc2 here, obj='
+          . strtolower($obj->toString()) . "\n";
+}
+class myclass {
+    function myfunc(&$obj) {
+        print 'myclass::myfunc here, obj='
+          . strtolower($obj->toString()) . "\n";
+    }
+}
+function test_error_handler($errno, $errmsg, $file, $line, $vars) {
+    if (defined('E_STRICT')) {
+        if ($errno & E_STRICT
+            && (error_reporting() & E_STRICT) != E_STRICT) {
+            // Ignore E_STRICT notices unless they have been turned on
+            return;
+        }
+    } else {
+        define('E_STRICT', 2048);
+    }
+    $errortype = array (
+        E_ERROR => 'Error',
+        E_WARNING => 'Warning',
+        E_PARSE => 'Parsing Error',
+        E_NOTICE => 'Notice',
+        E_CORE_ERROR => 'Core Error',
+        E_CORE_WARNING => 'Core Warning',
+        E_COMPILE_ERROR => 'Compile Error',
+        E_COMPILE_WARNING => 'Compile Warning',
+        E_USER_ERROR => 'User Error',
+        E_USER_WARNING => 'User Warning',
+        E_USER_NOTICE => 'User Notice',
+        E_STRICT => 'Strict Notice',
+    );
+    $prefix = $errortype[$errno];
+    print strtolower("$prefix: $errmsg in " . basename($file)
+                     . " on line XXX\n");
+}
+
+$obj = new myclass;
+
+$dbh = DB::factory("mysql");
+
+print "default: ";
+$e = $dbh->raiseError("return testing error");
+print strtolower($e->toString()) . "\n";
+
+print "global default: ";
+PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, "myfunc2");
+$e = $dbh->raiseError("global default test");
+
+$dbh->setErrorHandling(PEAR_ERROR_PRINT);
+print "mode=print: ";
+$e = $dbh->raiseError("print testing error");
+print "\n";
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, "myfunc");
+print "mode=function callback: ";
+$e = $dbh->raiseError("function callback testing error");
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, array($obj, "myfunc"));
+print "mode=object callback: ";
+$e = $dbh->raiseError("object callback testing error");
+
+set_error_handler("test_error_handler");
+$dbh->setErrorHandling(PEAR_ERROR_TRIGGER);
+print "mode=trigger: ";
+$e = $dbh->raiseError("trigger testing error");
+
+?>
+--EXPECT--
+default: [db_error: message="db error: return testing error" code=-1 mode=return level=notice prefix="" info=" [db error: unknown error]"]
+global default: myfunc2 here, obj=[db_error: message="db error: global default test" code=-1 mode=callback callback=myfunc2 prefix="" info=" [db error: unknown error]"]
+mode=print: DB Error: print testing error
+mode=function callback: myfunc here, obj=[db_error: message="db error: function callback testing error" code=-1 mode=callback callback=myfunc prefix="" info=" [db error: unknown error]"]
+mode=object callback: myclass::myfunc here, obj=[db_error: message="db error: object callback testing error" code=-1 mode=callback callback=myclass::myfunc prefix="" info=" [db error: unknown error]"]
+mode=trigger: user notice: db error: trigger testing error in pear.php on line xxx
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/db_factory.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/db_factory.phpt
new file mode 100644
index 000000000..e359485e3
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/db_factory.phpt
@@ -0,0 +1,53 @@
+--TEST--
+DB::factory
+--SKIPIF--
+
+--FILE--
+getMessage() . "\n";
+    } else {
+	    print 'object: ' . $obj->toString() . "\n";
+    }
+}
+
+?>
+--GET--
+--POST--
+--EXPECT--
+testing dbase: object: db_dbase: (phptype=dbase, dbsyntax=dbase)
+testing fbsql: object: db_fbsql: (phptype=fbsql, dbsyntax=fbsql)
+testing ibase: object: db_ibase: (phptype=ibase, dbsyntax=ibase)
+testing ifx: object: db_ifx: (phptype=ifx, dbsyntax=ifx)
+testing msql: object: db_msql: (phptype=msql, dbsyntax=msql)
+testing mssql: object: db_mssql: (phptype=mssql, dbsyntax=mssql)
+testing mysql: object: db_mysql: (phptype=mysql, dbsyntax=mysql)
+testing mysqli: object: db_mysqli: (phptype=mysqli, dbsyntax=mysqli)
+testing oci8: object: db_oci8: (phptype=oci8, dbsyntax=oci8)
+testing odbc: object: db_odbc: (phptype=odbc, dbsyntax=sql92)
+testing pgsql: object: db_pgsql: (phptype=pgsql, dbsyntax=pgsql)
+testing sqlite: object: db_sqlite: (phptype=sqlite, dbsyntax=sqlite)
+testing sybase: object: db_sybase: (phptype=sybase, dbsyntax=sybase)
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/db_ismanip.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/db_ismanip.phpt
new file mode 100644
index 000000000..c6a275366
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/db_ismanip.phpt
@@ -0,0 +1,57 @@
+--TEST--
+DB::isManip
+--SKIPIF--
+
+--FILE--
+
+--GET--
+--POST--
+--EXPECT--
+testing DB::isManip...
+SELECT : 0
+Select : 0
+select : 0
+sElECt : 0
+SELECT : 0
+UPDATE : 1
+DELETE : 1
+delete : 1
+create : 1
+CREATE : 1
+"CREATE : 1
+GRANT : 1
+REVOKE : 1
+SHOW : 0
+DROP : 1
+ALTER : 1
+ : 0
+ : 1
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/db_parsedsn.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/db_parsedsn.phpt
new file mode 100644
index 000000000..20955ac7e
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/db_parsedsn.phpt
@@ -0,0 +1,480 @@
+--TEST--
+DB::parseDSN
+--SKIPIF--
+
+--FILE--
+ 'mysql',
+    'hostspec' => 'foobar',
+);
+testArray($array);
+
+?>
+--GET--
+--POST--
+--EXPECT--
+testing DB::parseDSN...
+
+DSN: mysql
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => 
+    [password] => 
+    [protocol] => 
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: odbc(mssql)
+Array
+(
+    [phptype] => odbc
+    [dbsyntax] => mssql
+    [username] => 
+    [password] => 
+    [protocol] => 
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: odbc(db2)://user:password@/database
+Array
+(
+    [phptype] => odbc
+    [dbsyntax] => db2
+    [username] => user
+    [password] => password
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => database
+)
+DSN: odbc(access):///database
+Array
+(
+    [phptype] => odbc
+    [dbsyntax] => access
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => database
+)
+DSN: odbc://admin@/datasourceName
+Array
+(
+    [phptype] => odbc
+    [dbsyntax] => odbc
+    [username] => admin
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => datasourceName
+)
+DSN: mysql://localhost
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => localhost
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: mysql://remote.host.com/db
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => remote.host.com
+    [port] => 
+    [socket] => 
+    [database] => db
+)
+DSN: oci8://system:manager@
+Array
+(
+    [phptype] => oci8
+    [dbsyntax] => oci8
+    [username] => system
+    [password] => manager
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: oci8://user:pass@tns-name
+Array
+(
+    [phptype] => oci8
+    [dbsyntax] => oci8
+    [username] => user
+    [password] => pass
+    [protocol] => tcp
+    [hostspec] => tns-name
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: odbc(solid)://foo:bar@tcp+localhost+1313
+Array
+(
+    [phptype] => odbc
+    [dbsyntax] => solid
+    [username] => foo
+    [password] => bar
+    [protocol] => tcp
+    [hostspec] => localhost+1313
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: pgsql://user@unix+localhost/pear
+Array
+(
+    [phptype] => pgsql
+    [dbsyntax] => pgsql
+    [username] => user
+    [password] => 
+    [protocol] => unix
+    [hostspec] => 
+    [port] => 
+    [socket] => localhost
+    [database] => pear
+)
+DSN: ibase://user%40domain:password@host
+Array
+(
+    [phptype] => ibase
+    [dbsyntax] => ibase
+    [username] => user@domain
+    [password] => password
+    [protocol] => tcp
+    [hostspec] => host
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: ibase://user@domain:pass@word@/database
+Array
+(
+    [phptype] => ibase
+    [dbsyntax] => ibase
+    [username] => user@domain
+    [password] => pass@word
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => database
+)
+DSN: ifx://user@domain:pass@word@host.com//usr/db/general.db
+Array
+(
+    [phptype] => ifx
+    [dbsyntax] => ifx
+    [username] => user@domain
+    [password] => pass@word
+    [protocol] => tcp
+    [hostspec] => host.com
+    [port] => 
+    [socket] => 
+    [database] => /usr/db/general.db
+)
+DSN: ifx://remote.host.com/c:\windows\my.db
+Array
+(
+    [phptype] => ifx
+    [dbsyntax] => ifx
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => remote.host.com
+    [port] => 
+    [socket] => 
+    [database] => c:\windows\my.db
+)
+DSN: oci8://SHOOTOUT:******@(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=192.168.101.161)(PORT=1521)))(CONNECT_DATA=(SERVICE_NAME=TIS)))
+Array
+(
+    [phptype] => oci8
+    [dbsyntax] => oci8
+    [username] => SHOOTOUT
+    [password] => ******
+    [protocol] => tcp
+    [hostspec] => (DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=192.168.101.161)(PORT=1521)))(CONNECT_DATA=(SERVICE_NAME=TIS)))
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: odbc(solid)://foo:bar@localhost:1313
+Array
+(
+    [phptype] => odbc
+    [dbsyntax] => solid
+    [username] => foo
+    [password] => bar
+    [protocol] => tcp
+    [hostspec] => localhost
+    [port] => 1313
+    [socket] => 
+    [database] => 
+)
+DSN: pgsql://user@unix()/pear
+Array
+(
+    [phptype] => pgsql
+    [dbsyntax] => pgsql
+    [username] => user
+    [password] => 
+    [protocol] => unix
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => pear
+)
+DSN: mysql://user@unix(/path/to/socket)/pear
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => user
+    [password] => 
+    [protocol] => unix
+    [hostspec] => 
+    [port] => 
+    [socket] => /path/to/socket
+    [database] => pear
+)
+DSN: pgsql://user@tcp()/pear
+Array
+(
+    [phptype] => pgsql
+    [dbsyntax] => pgsql
+    [username] => user
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => pear
+)
+DSN: pgsql://user@tcp(somehost)/pear
+Array
+(
+    [phptype] => pgsql
+    [dbsyntax] => pgsql
+    [username] => user
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => somehost
+    [port] => 
+    [socket] => 
+    [database] => pear
+)
+DSN: pgsql://user:pass@word@tcp(somehost:7777)/pear
+Array
+(
+    [phptype] => pgsql
+    [dbsyntax] => pgsql
+    [username] => user
+    [password] => pass@word
+    [protocol] => tcp
+    [hostspec] => somehost
+    [port] => 7777
+    [socket] => 
+    [database] => pear
+)
+DSN: ibase://user:pass@localhost//var/lib/dbase.dbf?role=foo
+Array
+(
+    [phptype] => ibase
+    [dbsyntax] => ibase
+    [username] => user
+    [password] => pass
+    [protocol] => tcp
+    [hostspec] => localhost
+    [port] => 
+    [socket] => 
+    [database] => /var/lib/dbase.dbf
+    [role] => foo
+)
+DSN: dbase://@/?role=foo&dialect=bar
+Array
+(
+    [phptype] => dbase
+    [dbsyntax] => dbase
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => 
+    [role] => foo
+    [dialect] => bar
+)
+DSN: sqlite:////unix/path/to/database?option=value&anotheroption=anothervalue
+Array
+(
+    [phptype] => sqlite
+    [dbsyntax] => sqlite
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => /unix/path/to/database
+    [option] => value
+    [anotheroption] => anothervalue
+)
+DSN: sqlite:///c:/win/path/to/database?option=value
+Array
+(
+    [phptype] => sqlite
+    [dbsyntax] => sqlite
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => c:/win/path/to/database
+    [option] => value
+)
+DSN: mysql://username@hostspec
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => username
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => hostspec
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: mysql://hostspec/database
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => hostspec
+    [port] => 
+    [socket] => 
+    [database] => database
+)
+DSN: mysql://hostspec
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => hostspec
+    [port] => 
+    [socket] => 
+    [database] => 
+)
+DSN: mysql:///database
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => 
+    [password] => 
+    [protocol] => tcp
+    [hostspec] => 
+    [port] => 
+    [socket] => 
+    [database] => database
+)
+DSN: array
+Array
+(
+    [phptype] => mysql
+    [dbsyntax] => mysql
+    [username] => 
+    [password] => 
+    [protocol] => 
+    [hostspec] => foobar
+    [port] => 
+    [socket] => 
+    [database] => 
+)
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/01connect.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/01connect.phpt
new file mode 100644
index 000000000..dbeae1e91
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/01connect.phpt
@@ -0,0 +1,76 @@
+--TEST--
+DB_driver::connect
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+toString());
+    }
+    if (is_object($dbh)) {
+        print "$name is an object\n";
+    }
+    switch ($dbh->phptype) {
+        case 'dbase':
+            if (is_int($dbh->connection)) {
+                print "$name is connected\n";
+            } else {
+                print "$name NOT connected\n";
+            }
+            break;
+        case 'mysqli':
+            if (is_a($dbh->connection, 'mysqli')) {
+                print "$name is connected\n";
+            } else {
+                print "$name NOT connected\n";
+            }
+            break;
+        default:
+            if (gettype($dbh->connection) == 'resource') {
+                print "$name is connected\n";
+            } else {
+                print "$name NOT connected\n";
+            }
+    }
+}
+
+
+check_dbh($dbh, '$dbh');
+
+
+$test_array_dsn = DB::parseDSN($dsn);
+foreach ($test_array_dsn as $key => $value) {
+    if ($value === false) {
+        unset($test_array_dsn[$key]);
+    }
+}
+
+$dbha =& DB::connect($test_array_dsn, $options);
+check_dbh($dbha, '$dbha');
+
+
+$tmp  = serialize($dbha);
+$dbhu = unserialize($tmp);
+check_dbh($dbhu, '$dbhu');
+
+?>
+--EXPECT--
+$dbh is an object
+$dbh is connected
+$dbha is an object
+$dbha is connected
+$dbhu is an object
+$dbhu is connected
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/02fetch.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/02fetch.phpt
new file mode 100644
index 000000000..af6c39c28
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/02fetch.phpt
@@ -0,0 +1,40 @@
+--TEST--
+DB_driver::fetch
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+
+--EXPECT--
+testing fetchrow:
+row 1: 42, bing, This is a test, 1999-11-21
+row 2: 1, one, One, 2001-02-16
+row 3: 2, two, Two, 2001-02-15
+row 4: 3, three, Three, 2001-02-14
+row 5: NULL
+testing fetchmodes: fetchrow default default, portability mode DB_PORTABILITY_ALL ^ DB_PORTABILITY_RTRIM
+0 1 2 3
+output matched expected format
+testing fetchmodes: fetchinto default default
+0 1 2 3
+42 bing This is a test 1999-11-21
+testing fetchmodes: fetchrow ordered default
+0 1 2 3
+testing fetchmodes: fetchrow assoc default
+a b c d
+testing fetchmodes: fetchrow ordered default with assoc specified
+a b c d
+testing fetchmodes: fetchrow assoc default with ordered specified
+0 1 2 3
+testing fetchmodes: fetchinto ordered default
+0 1 2 3
+testing fetchmodes: fetchinto assoc default
+a b c d
+testing fetchmodes: fetchinto ordered default with assoc specified
+a b c d
+testing fetchmodes: fetchinto assoc default with ordered specified
+0 1 2 3
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/03simplequery.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/03simplequery.phpt
new file mode 100644
index 000000000..c0b450ab0
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/03simplequery.phpt
@@ -0,0 +1,13 @@
+--TEST--
+DB_driver::simpleQuery
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+
+--EXPECT--
+passed
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/04numcols.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/04numcols.phpt
new file mode 100644
index 000000000..f9a275af2
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/04numcols.phpt
@@ -0,0 +1,16 @@
+--TEST--
+DB_driver::numCols
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+
+--EXPECT--
+1
+2
+3
+4
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/05sequences.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/05sequences.phpt
new file mode 100644
index 000000000..17ec2f27f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/05sequences.phpt
@@ -0,0 +1,28 @@
+--TEST--
+DB_driver::sequences
+--INI--
+error_reporting = 2047
+--SKIPIF--
+dropSequence('ajkdslfajoijkadie');
+if (DB::isError($tableInfo) && $tableInfo->code == DB_ERROR_NOT_CAPABLE) {
+    die("skip $tableInfo->message");
+}
+?>
+--FILE--
+
+--EXPECT--
+an error is the proper response here
+an error cought by the error handler is good
+a=1
+b=2
+b-a=1
+c=1
+d=1
+e=1
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/06prepexec.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/06prepexec.phpt
new file mode 100644
index 000000000..3feb0ebbf
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/06prepexec.phpt
@@ -0,0 +1,50 @@
+--TEST--
+DB_driver::prepare/execute
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+
+--EXPECT--
+------------1------------
+sth1,sth2,sth3,sth4 created
+sth1: ? as param, passing as array... sth1 executed
+sth2: ! and ? as params, passing as array... sth2 executed
+sth3: ?, ! and & as params, passing as array... sth3 executed
+sth4: no params... sth4 executed
+results:
+|72 - a -  - |
+|72 - direct -  - |
+|72 - it's good - opaque placeholder's test - |
+|72 - that's right -  - |
+
+------------2------------
+results:
+|72 - set1 - opaque placeholder's test - 1234-56-78|
+|72 - set2 - opaque placeholder's test - |
+|72 - set3 - opaque placeholder's test - |
+
+------------3------------
+TRUE
+FALSE
+
+------------4------------
+|72 - set1 - opaque placeholder's test - 1234-56-78|
+|72 - set2 - opaque placeholder's test - |
+|72 - set3 - opaque placeholder's test - |
+~~
+~~
+|72 - set1 - opaque placeholder's test - 1234-56-78|
+~~
+|72 - set1 - opaque placeholder's test - 1234-56-78|
+|72 - set2 - opaque placeholder's test - |
+|72 - set3 - opaque placeholder's test - |
+~~
+
+------------5------------
+insert: okay
+a = 11, b = three, d = got expected outcome
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/08affectedrows.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/08affectedrows.phpt
new file mode 100644
index 000000000..2624ac845
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/08affectedrows.phpt
@@ -0,0 +1,62 @@
+--TEST--
+DB_driver::affectedRows
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    die($o->toString());
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+// Clean table
+$dbh->query("DELETE FROM phptest");
+
+// Affected rows by INSERT statement
+$dbh->query("INSERT INTO phptest (a,b) VALUES(1, 'test')");
+$dbh->query("INSERT INTO phptest (a,b) VALUES(2, 'test')");
+printf("%d after insert\n", $dbh->affectedRows());
+
+// Affected rows by SELECT statement
+$dbh->query("SELECT * FROM phptest");
+printf("%d after select\n", $dbh->affectedRows());
+$dbh->query("DELETE FROM phptest WHERE b = 'test'");
+printf("%d after delete\n", $dbh->affectedRows());
+
+// Affected rows by DELETE statement
+$dbh->query("INSERT INTO phptest (a,b) VALUES(1, 'test')");
+$dbh->query("INSERT INTO phptest (a,b) VALUES(2, 'test')");
+$dbh->query("DELETE FROM phptest");
+printf("%d after delete all\n", $dbh->affectedRows());
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
+
+?>
+--EXPECT--
+1 after insert
+0 after select
+2 after delete
+2 after delete all
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/09numrows.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/09numrows.phpt
new file mode 100644
index 000000000..bc08f7763
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/09numrows.phpt
@@ -0,0 +1,22 @@
+--TEST--
+DB_driver::numRows
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+
+--EXPECT--
+(want 1) got 1 from first
+(want 2) got 2 from 0
+(want 3) got 3 from 1
+(want 4) got 4 from 2
+(want 5) got 5 from 3
+(want 6) got 6 from 4
+(want 5) got 5 from > 0 (passing params to query)
+(want 4) got 4 from < 4 (doing prepare/execute)
+(want 2) got 2 from 5 and 6 not deleted
+(want 0) got 0 from < 0
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/10errormap.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/10errormap.phpt
new file mode 100644
index 000000000..d953bef42
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/10errormap.phpt
@@ -0,0 +1,37 @@
+--TEST--
+DB_driver::error mapping
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+
+--EXPECT--
+DB_ERROR_NOSUCHTABLE for select:  matches expected outcome
+DB_ERROR_NOSUCHTABLE for drop:  matches expected outcome
+DB_ERROR_NOT_FOUND for drop index:  matches expected outcome
+DB_ERROR_ALREADY_EXISTS for create table:  matches expected outcome
+DB_ERROR_ALREADY_EXISTS for create index:  matches expected outcome
+DB_ERROR_CONSTRAINT for primary key insert duplicate:  matches expected outcome
+DB_ERROR_CONSTRAINT for primary key update duplicate:  matches expected outcome
+DB_ERROR_CONSTRAINT for unique key insert duplicate:  matches expected outcome
+DB_ERROR_CONSTRAINT for unique key update duplicate:  matches expected outcome
+DB_ERROR_CONSTRAINT for foreign key on insert:  matches expected outcome
+DB_ERROR_CONSTRAINT for foreign key on delete:  matches expected outcome
+DB_ERROR_CONSTRAINT_NOT_NULL on insert:  matches expected outcome
+DB_ERROR_CONSTRAINT_NOT_NULL on update:  matches expected outcome
+DB_ERROR_NOSUCHFIELD joining ON bogus column:  matches expected outcome
+DB_ERROR_NOSUCHFIELD joining USING bogus column:  matches expected outcome
+DB_ERROR_DIVZERO:  matches expected outcome
+DB_ERROR_INVALID_NUMBER putting chars in INT column:  matches expected outcome
+DB_ERROR_INVALID_NUMBER putting float in INT column:  matches expected outcome
+DB_ERROR_INVALID_NUMBER putting excessive int in INT column:  matches expected outcome
+DB_ERROR_INVALID_NUMBER putting int in CHAR column:  matches expected outcome
+DB_ERROR_NOSUCHFIELD:  matches expected outcome
+DB_ERROR_SYNTAX:  matches expected outcome
+DB_ERROR_VALUE_COUNT_ON_ROW:  matches expected outcome
+DB_ERROR_INVALID on CHAR column data too long:  matches expected outcome
+DB_ERROR_INVALID on VARCHAR column data too long:  matches expected outcome
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/11transactions.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/11transactions.phpt
new file mode 100644
index 000000000..888417df8
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/11transactions.phpt
@@ -0,0 +1,26 @@
+--TEST--
+DB_driver::transaction test
+--INI--
+error_reporting = 2047
+--SKIPIF--
+features['transactions']) {
+    die('skip this driver does not support transactions');
+}
+?>
+--FILE--
+
+--EXPECT--
+1) after autocommit: bing one.  ops=ok
+2) before commit: bing one two three.  ops=ok
+3) after commit: bing one two three.  ops=ok
+4) before rollback: bing one two three four five.  ops=ok
+5) after rollback: bing one two three.  ops=ok
+6) before autocommit+rollback: bing one two three six seven.  ops=ok
+7) after autocommit+rollback: bing one two three six seven.  ops=ok
+8) testing that select doesn't disturbe opcount: ok
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/13limit.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/13limit.phpt
new file mode 100644
index 000000000..69bc5f2e2
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/13limit.phpt
@@ -0,0 +1,54 @@
+--TEST--
+DB_driver::row limit
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+
+--EXPECT--
+======= From: 0 || Number of rows to fetch: 10 =======
+1.- result 0
+2.- result 1
+3.- result 2
+4.- result 3
+5.- result 4
+6.- result 5
+7.- result 6
+8.- result 7
+9.- result 8
+10.- result 9
+======= From: 10 || Number of rows to fetch: 10 =======
+11.- result 10
+12.- result 11
+13.- result 12
+14.- result 13
+15.- result 14
+16.- result 15
+17.- result 16
+18.- result 17
+19.- result 18
+20.- result 19
+======= From: 20 || Number of rows to fetch: 10 =======
+21.- result 20
+22.- result 21
+23.- result 22
+24.- result 23
+25.- result 24
+26.- result 25
+27.- result 26
+28.- result 27
+29.- result 28
+30.- result 29
+======= From: 30 || Number of rows to fetch: 10 =======
+31.- result 30
+32.- result 31
+33.- result 32
+======= Passing $params || From: 11 || Number of rows to fetch: 3 =======
+12.- result 11
+13.- result 12
+14.- result 13
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/14fetchmode_object.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/14fetchmode_object.phpt
new file mode 100644
index 000000000..fda4799d3
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/14fetchmode_object.phpt
@@ -0,0 +1,24 @@
+--TEST--
+DB_driver::fetchmode object
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+
+--EXPECT--
+--- fetch with param DB_FETCHMODE_OBJECT ---
+stdclass -> a b c d
+stdclass -> a b c d
+--- fetch with default fetchmode DB_FETCHMODE_OBJECT ---
+stdclass -> a b c d
+stdclass -> a b c d
+--- fetch with default fetchmode DB_FETCHMODE_OBJECT and class DB_row ---
+db_row -> a b c d
+db_row -> a b c d
+--- fetch with default fetchmode DB_FETCHMODE_OBJECT with no class then DB_row ---
+stdclass -> a b c d
+db_row -> a b c d
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/15quote.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/15quote.phpt
new file mode 100644
index 000000000..e80aaa979
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/15quote.phpt
@@ -0,0 +1,273 @@
+--TEST--
+DB_driver::quote
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'pearquote');
+
+    die($o->toString());
+}
+
+// DBMS boolean column type simulation...
+$boolean_col_type = array(
+    'dbase'  => 'Logical',
+    'fbsql'  => 'BOOLEAN',
+    'ibase'  => 'SMALLINT',
+    'ifx'    => 'SMALLINT',
+    'msql'   => 'INTEGER',
+    'mssql'  => 'BIT',
+    'mysql'  => 'TINYINT(1)',
+    'mysqli' => 'TINYINT(1)',
+    'oci8'   => 'NUMBER(1)',
+    'odbc'   => 'SMALLINT',
+    'pgsql'  => 'BOOLEAN',
+    'sqlite' => 'INTEGER',
+    'sybase' => 'TINYINT',
+);
+
+// adjust things for specific DBMS's
+
+if ($dbh->phptype == 'odbc') {
+    if ($dbh->dbsyntax == 'odbc') {
+        $type = $dbh->phptype;
+    } else {
+        $type = $dbh->dbsyntax;
+    }
+} else {
+    $type = $dbh->phptype;
+}
+
+switch ($type) {
+    case 'access':
+        $decimal = 'SINGLE';
+        $null = '';
+        $chr  = 'VARCHAR(8)';
+        $identifier = 'q\ut "dnt';
+        break;
+    case 'db2':
+    case 'ibase':
+        $decimal = 'DECIMAL(3,1)';
+        $null = '';
+        $chr  = 'VARCHAR(8)';
+        $identifier = 'q\ut] "dn[t';
+        break;
+    case 'ifx':
+        // doing this for ifx to keep certain versions happy
+        $decimal = 'DECIMAL(3,1)';
+        $null = '';
+        $chr  = 'CHAR(8)';
+        $identifier = '';
+        break;
+    case 'msql':
+        $decimal = 'REAL';
+        $null = '';
+        $chr  = 'CHAR(8)';
+        $identifier = '';
+        break;
+    case 'fbsql':
+    case 'oci8':
+        $decimal = 'DECIMAL(3,1)';
+        $null = '';
+        $chr  = 'VARCHAR(8)';
+        $identifier = 'q\ut] dn[t';
+        break;
+    default:
+        $decimal = 'DECIMAL(3,1)';
+        $null = 'NULL';
+        $chr  = 'VARCHAR(8)';
+        $identifier = 'q\ut] "dn[t';
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'pearquote');
+
+
+if ($identifier) {
+    switch ($dbh->phptype) {
+        case 'sybase':
+            $res = $dbh->query('set quoted_identifier on');
+            if (DB::isError($res) ) {
+                pe($res);
+            }
+            break;
+        default:
+    }
+    $create = $dbh->query("
+        CREATE TABLE pearquote (
+          n $decimal $null,
+          s $chr $null,
+          " . $dbh->quoteIdentifier($identifier) . " $decimal $null,
+          b {$boolean_col_type[$dbh->phptype]} $null
+        )
+    ");
+
+    if (DB::isError($create) ) {
+        pe($create);
+    }
+
+    $info = $dbh->tableInfo('pearquote');
+    if (DB::isError($info) ) {
+        if ($info->code == DB_ERROR_NOT_CAPABLE) {
+            print "Got outcome expected from delimited identifier.\n";
+        } else {
+            print "tableInfo() failed.\n";
+        }
+    } else {
+        if ($identifier == $info[2]['name']) {
+            print "Got outcome expected from delimited identifier.\n";
+            // print "COLUMN NAME IS: {$info[2]['name']}\n";
+        } else {
+            print "Expected column name: '$identifier' ... ";
+            print "Actual column name: '{$info[2]['name']}'\n";
+        }
+    }
+
+} else {
+    $dbh->query("
+        CREATE TABLE pearquote (
+          n $decimal $null,
+          s $chr $null,
+          plainidentifier $decimal $null,
+          b {$boolean_col_type[$dbh->phptype]} $null
+        )
+    ");
+    print "Got outcome expected from delimited identifier.\n";
+}
+
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+$strings = array(
+    "'",
+    "\"",
+    "\\",
+    "%",
+    "_",
+    "''",
+    "\"\"",
+    "\\\\",
+    "\\'\\'",
+    "\\\"\\\""
+);
+
+$nums = array(
+    12.3,
+    15,
+);
+
+$bools = array(
+    TRUE,
+    FALSE,
+);
+
+
+echo "String escape test: ";
+foreach ($strings as $s) {
+    $quoted = $dbh->quoteSmart($s);
+    $dbh->query("INSERT INTO pearquote (s) VALUES ($quoted)");
+}
+$diff = array_diff($strings, $res = $dbh->getCol("SELECT s FROM pearquote"));
+if (count($diff) > 0) {
+    echo "FAIL";
+    print_r($strings);
+    print_r($res);
+} else {
+    echo "OK";
+}
+
+$dbh->query("DELETE FROM pearquote");
+
+
+echo "\nNumber escape test: ";
+foreach ($nums as $n) {
+    $quoted = $dbh->quoteSmart($n);
+    $dbh->query("INSERT INTO pearquote (n) VALUES ($quoted)");
+}
+
+$diff = array();
+$res =& $dbh->getCol('SELECT n FROM pearquote ORDER BY n');
+foreach ($nums as $key => $val) {
+    if ($val != $res[$key]) {
+        $diff[] = "$val != {$res[$key]}";
+    }
+}
+
+if (count($diff) > 0) {
+    echo "FAIL\n";
+    print_r($diff);
+} else {
+    echo 'OK';
+}
+
+$dbh->query('DELETE FROM pearquote');
+
+
+echo "\nBoolean escape test: ";
+$i = 1;
+foreach ($bools as $b) {
+    $quoted = $dbh->quoteSmart($b);
+    $dbh->query("INSERT INTO pearquote (n, b) VALUES ($i, $quoted)");
+    $i++;
+}
+
+$diff = array();
+$res =& $dbh->getCol('SELECT b, n FROM pearquote ORDER BY n');
+foreach ($bools as $key => $val) {
+    if ($val === true) {
+        if ($res[$key] == 1 || $res[$key] == true ||
+            substr(strtolower($res[$key]), 0, 1) == 't')
+        {
+            // good
+        } else {
+            $diff[] = "in:true != out:{$res[$key]}";
+        }
+    } else {
+        if ($res[$key] == 0 || $res[$key] == false ||
+            substr(strtolower($res[$key]), 0, 1) == 'f')
+        {
+            // good
+        } else {
+            $diff[] = "in:false != out:{$res[$key]}";
+        }
+    }
+}
+
+if (count($diff) > 0) {
+    echo "FAIL\n";
+    print_r($diff);
+} else {
+    echo "OK\n";
+}
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'pearquote');
+
+?>
+--EXPECT--
+Got outcome expected from delimited identifier.
+String escape test: OK
+Number escape test: OK
+Boolean escape test: OK
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/16tableinfo.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/16tableinfo.phpt
new file mode 100644
index 000000000..fb2fe9509
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/16tableinfo.phpt
@@ -0,0 +1,1340 @@
+--TEST--
+DB_driver::tableInfo
+--INI--
+error_reporting = 2047
+--SKIPIF--
+$quirks array, which has the following format:
+ *
+ * 
+ * 'driver' => array(
+ *     'clob' => DBMS's column type for creating CLOB fields
+ *     'date' => DBMS's column type for creating DATE fields
+ *     'dateliteral' => The SQL keyword necessary for defining dates
+ *     'finds_table' => Can this DBMS determine table names from queries?
+ *     'size_from_table' => Does this DBMS know the column size via table name?
+ *     'handles_results' => Can the DBMS get info from query results?
+ *     'commands' => array(
+ *         Extra commands to be passed to PHP's eval() function
+ *     )
+ *     0 => array(
+ *         //  Info expected to be reported for phptest_fk.a
+ *         //  (INTEGER NOT NULL) (UNIQUE KEY with d)
+ *         'type' => Column type reported by the DBMS
+ *         'len' => Column size reported by the DBMS
+ *         'flags' => Flags reported by the DBMS
+ *     )
+ *     1 => array()  Info expected to be reported for phptest_fk.fk
+ *                   (INTEGER NOT NULL) (PRIMARY KEY)
+ *     2 => array()  Info expected to be reported for phptest_fk.c
+ *                   (CLOB/CHAR/VARCHAR NULL)
+ *     3 => array()  Info expected to be reported for phptest_fk.d
+ *                   (DATE NOT NULL) (UNIQUE KEY with a)
+ *     4 => array()  Info expected to be reported for phptest_fk.e
+ *                   (CHAR(2) DEFAULT ' e' NOT NULL)
+ *     5 => array()  Info expected to be reported for phptest_fk.f
+ *                   (DECIMAL(2,1) NULL)
+ *     9 => array()  Info expected to be reported for phptest.d
+ *                   (VARCHAR(20) NULL)
+ * )
+ * 

+ *
+ * @category Database
+ * @package  DB
+ * @version  $Id: 16tableinfo.phpt,v 1.32 2005/02/14 17:04:17 danielc Exp $
+ * @author   Daniel Convissor 
+ * @see      DB_common::tableInfo()
+ */
+
+error_reporting(E_ALL);
+chdir(dirname(__FILE__));
+require_once './skipif.inc';
+$tableInfo = $db->tableInfo('ajkdslfajoijkadie');
+if (DB::isError($tableInfo) && $tableInfo->code == DB_ERROR_NOT_CAPABLE) {
+    die("skip $tableInfo->message");
+}
+
+?>
+--FILE--
+getMessage() == "DB Error: can't distinguish duplicate field names") {
+        print "NOTICE: $dbh->phptype can't distinguish duplicate field names";
+        return;
+    }
+
+    if ($o->getCode() == DB_ERROR_NOT_CAPABLE &&
+        !$quirks[$dbh->phptype . ':' . $dbh->dbsyntax]['handles_results'])
+    {
+        return;
+    }
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+    drop_table($dbh, 'phptest_fk');
+
+    die($o->toString());
+}
+
+/**
+ * Loop through an array returned from tableInfo(), compare the actual
+ * contents to the expected contents.  If the actual results match the
+ * expectations, say so.  If not, say so and show the information.
+ *
+ * @param array   $array     the array to be examined
+ * @param string  $expected  the expected contents of the array
+ * @param string  $field     field index number of $quriks and table
+ * @param boolean $query     true if array is from a query or false if array
+ *                           is tableInfo()
+ * @return void
+ */
+function examineArrayData($array, $expected, $field = false, $query = true) {
+    global $dbh, $quirks;
+
+    $quirk_key = $dbh->phptype . ':' . $dbh->dbsyntax;
+
+    if (DB::isError($array) && $array->getCode() == DB_ERROR_NOT_CAPABLE) {
+        print "matched expected result\n";
+        return;
+    }
+
+    if (!is_array($array)) {
+        print "This DMBS didn't produce proper results\n";
+        return;
+    }
+
+    if (is_int($field)) {
+        $array = $array[$field];
+    }
+
+    $actual = '';
+    foreach ($array as $key => $value) {
+        if ($field !== false &&
+            isset($quirks[$quirk_key][$field][$key]))
+        {
+            if ($key == 'flags' && $value == '' && $query &&
+                !$quirks[$quirk_key]['finds_table'])
+            {
+                $actual .= "$key ... matched expected value\n";
+            } else {
+                if ($quirks[$quirk_key][$field][$key] == $value) {
+                    $actual .= "$key ... matched expected value\n";
+                } else {
+                    if ($value == 0
+                        && !$quirks[$quirk_key]['size_from_table'])
+                    {
+                        $actual .= "$key ... matched expected value\n";
+                    } else {
+                        $actual .= "$key ... was '$value' but we expected ";
+                        $actual .= "'{$quirks[$quirk_key][$field][$key]}'\n";
+                    }
+                }
+            }
+        } else {
+            if ($key == 'table') {
+                if ($field <= 5) {
+                    if ($value == 'phptest_fk') {
+                        $actual .= "$key ... matched expected value\n";
+                    } else {
+                        if ($value == '' && $query &&
+                            !$quirks[$quirk_key]['finds_table'])
+                        {
+                            $actual .= "$key ... matched expected value\n";
+                        } else {
+                            $actual .= "$key ... was '$value' but we expected 'phptest_fk'\n";
+                        }
+                    }
+                } else {
+                    if ($value == 'phptest') {
+                        $actual .= "$key ... matched expected value\n";
+                    } else {
+                        if ($value == '' && $query &&
+                            !$quirks[$quirk_key]['finds_table'])
+                        {
+                            $actual .= "$key ... matched expected value\n";
+                        } else {
+                            $actual .= "$key ... was '$value' but we expected 'phptest_fk'\n";
+                        }
+                    }
+                }
+            } else {
+                $actual .= "$key => $value\n";
+            }
+        }
+    }
+    if ($actual == $expected) {
+        print "matched expected result\n";
+    } else {
+        print "DIDN'T match expected values...\n";
+        print "~~~~~~~~\nExpected:\n$expected\n";
+        print "~~~~\nActual:\n$actual\n~~~~~~~~\n\n";
+    }
+}
+
+/**
+ * Loop through an array of table info data and return the results.
+ *
+ * @param array  $array  the array to be examined
+ * @return string
+ */
+function returnArrayData($array) {
+    global $dbh, $quirks;
+
+    $quirk_key = $dbh->phptype . ':' . $dbh->dbsyntax;
+
+    if (!$quirks[$quirk_key]['handles_results']) {
+        return "\n";
+    }
+
+    $out = '';
+    foreach ($array as $key => $value) {
+        $out .= "$key => $value\n";
+    }
+    return $out;
+}
+
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+$quirks = array(
+    'fbsql:fbsql' => array(
+        'clob' => 'CHAR(29)',
+        'date' => 'DATE',
+        'dateliteral' => ' DATE ',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'INTEGER',
+            'len' => 0,
+            'flags' => '',
+        ),
+        1 => array(
+            'type' => 'INTEGER',
+            'len' => 0,
+            'flags' => 'not_null',
+        ),
+        2 => array(
+            'type' => 'CHARACTER',
+            'len' => 29,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'DATE',
+            'len' => 0,
+            'flags' => '',
+        ),
+        4 => array(
+            'type' => 'CHARACTER',
+            'len' => 2,
+            'flags' => '',
+        ),
+        5 => array(
+            'type' => 'DECIMAL',
+            'len' => 0,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'CHARACTER',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'ibase:ibase' => array(
+        'clob' => 'VARCHAR(50)',
+        'date' => 'DATE',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'INTEGER',
+            'len' => 4,
+            'flags' => 'unique_key not_null',
+        ),
+        1 => array(
+            'type' => 'INTEGER',
+            'len' => 4,
+            'flags' => 'primary_key not_null',
+        ),
+        2 => array(
+            'type' => 'VARCHAR',
+            'len' => 50,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'DATE',
+            'len' => 4,
+            'flags' => 'unique_key not_null',
+        ),
+        4 => array(
+            'type' => 'CHAR',
+            'len' => 2,
+            'flags' => 'not_null default',
+        ),
+        5 => array(
+            'type' => 'NUMERIC(9,1)',
+            'len' => 4,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'VARCHAR',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'ibase:firebird' => array(
+        'clob' => 'VARCHAR(50)',
+        'date' => 'DATE',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'INTEGER',
+            'len' => 4,
+            'flags' => 'unique_key not_null',
+        ),
+        1 => array(
+            'type' => 'INTEGER',
+            'len' => 4,
+            'flags' => 'primary_key not_null',
+        ),
+        2 => array(
+            'type' => 'VARCHAR',
+            'len' => 50,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'DATE',
+            'len' => 4,
+            'flags' => 'unique_key not_null',
+        ),
+        4 => array(
+            'type' => 'CHAR',
+            'len' => 2,
+            'flags' => 'not_null default',
+        ),
+        5 => array(
+            'type' => 'NUMERIC(9,1)',
+            'len' => 4,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'VARCHAR',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'ifx:ifx' => array(
+        'clob' => 'CHAR(29)',
+        'date' => 'CHAR(10)',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'SQLINT',
+            'len' => 4,
+            'flags' => 'not_null',
+        ),
+        1 => array(
+            'type' => 'SQLINT',
+            'len' => 4,
+            'flags' => 'not_null',
+        ),
+        2 => array(
+            'type' => 'SQLCHAR',
+            'len' => 29,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'SQLCHAR',
+            'len' => 10,
+            'flags' => 'not_null',
+        ),
+        4 => array(
+            'type' => 'SQLCHAR',
+            'len' => 2,
+            'flags' => 'not_null',
+        ),
+        5 => array(
+            'type' => 'SQLDECIMAL',
+            'len' => 513,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'SQLCHAR',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'msql:msql' => array(
+        'clob' => 'TEXT(255)',
+        'date' => 'CHAR(10)',
+        'dateliteral' => '',
+        'finds_table' => true,
+        'size_from_table' => true,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'int',
+            'len' => 4,
+            'flags' => 'not_null',
+        ),
+        1 => array(
+            'type' => 'int',
+            'len' => 4,
+            // for some reason, the unique property always contains 0
+            // 'flags' => 'unique_key not_null',
+            'flags' => 'not_null',
+        ),
+        2 => array(
+            'type' => 'text',
+            'len' => 255,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'char',
+            'len' => 10,
+            'flags' => 'not_null',
+        ),
+        4 => array(
+            'type' => 'char',
+            'len' => 2,
+            'flags' => 'not_null',
+        ),
+        5 => array(
+            'type' => 'real',
+            'len' => 8,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'char',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'mssql:mssql' => array(
+        'clob' => 'TEXT',
+        'date' => 'SMALLDATETIME',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+            'ini_set("mssql.datetimeconvert", "Off");',
+            '$dbh->query("SET DATEFORMAT ymd");',
+        ),
+        0 => array(
+            'type' => 'int',
+            'len' => 4,
+            'flags' => 'multiple_key unique_key not_null',
+        ),
+        1 => array(
+            'type' => 'int',
+            'len' => 4,
+            'flags' => 'primary_key not_null',
+        ),
+        2 => array(
+            'type' => 'text',
+            'len' => 4096,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'datetime',
+            'len' => 4,
+            'flags' => 'multiple_key unique_key not_null',
+        ),
+        4 => array(
+            'type' => 'char',
+            'len' => 2,
+            'flags' => 'not_null',
+        ),
+        5 => array(
+            'type' => 'real',
+            'len' => 19,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'char',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'mysql:mysql' => array(
+        'clob' => 'TEXT',
+        'date' => 'DATE',
+        'dateliteral' => '',
+        'finds_table' => true,
+        'size_from_table' => true,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'int',
+            'len' => 11,
+            'flags' => 'not_null multiple_key',
+        ),
+        1 => array(
+            'type' => 'int',
+            'len' => 11,
+            'flags' => 'not_null primary_key',
+        ),
+        2 => array(
+            'type' => 'blob',
+            'len' => 65535,
+            'flags' => 'blob',
+        ),
+        3 => array(
+            'type' => 'date',
+            'len' => 10,
+            'flags' => 'not_null multiple_key',
+        ),
+        4 => array(
+            'type' => 'string',
+            'len' => 2,
+            'flags' => 'not_null',
+        ),
+        5 => array(
+            'type' => 'real',
+            'len' => 4,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'string',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'mysqli:mysqli' => array(
+        'clob' => 'TEXT',
+        'date' => 'DATE',
+        'dateliteral' => '',
+        'finds_table' => true,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'int',
+            'len' => 2,
+            'flags' => 'not_null multiple_key group_by',
+        ),
+        1 => array(
+            'type' => 'int',
+            'len' => 0,
+            'flags' => 'not_null primary_key group_by',
+        ),
+        2 => array(
+            'type' => 'blob',
+            'len' => 0,
+            'flags' => 'blob',
+        ),
+        3 => array(
+            'type' => 'date',
+            'len' => 10,
+            'flags' => 'not_null multiple_key',
+        ),
+        4 => array(
+            'type' => 'char',
+            'len' => 0,
+            'flags' => 'not_null',
+        ),
+        5 => array(
+            'type' => 'decimal',
+            'len' => 0,
+            'flags' => 'group_by',
+        ),
+        9 => array(
+            'type' => 'varchar',
+            'len' => 10,
+            'flags' => '',
+        ),
+    ),
+
+    'oci8:oci8' => array(
+        'clob' => 'CLOB',
+        'date' => 'DATE',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+            '$dbh->query("ALTER SESSION SET NLS_DATE_FORMAT = \'YYYY-MM-DD\'");',
+        ),
+        0 => array(
+            'type' => 'NUMBER',
+            'len' => 22,
+            'flags' => 'not_null',
+        ),
+        1 => array(
+            'type' => 'NUMBER',
+            'len' => 22,
+            'flags' => 'not_null',
+        ),
+        2 => array(
+            'type' => 'CLOB',
+            'len' => 4000,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'DATE',
+            'len' => 7,
+            'flags' => 'not_null',
+        ),
+        4 => array(
+            'type' => 'CHAR',
+            'len' => 2,
+            'flags' => 'not_null',
+        ),
+        5 => array(
+            'type' => 'NUMBER',
+            'len' => 22,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'VARCHAR',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'odbc:access' => array(
+        'clob' => 'TEXT',
+        'date' => 'DATETIME',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'INTEGER',
+            'len' => 10,
+            'flags' => 'not_null',
+        ),
+        1 => array(
+            'type' => 'INTEGER',
+            'len' => 10,
+            'flags' => 'not_null',
+        ),
+        2 => array(
+            'type' => 'LONGCHAR',
+            'len' => 255,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'DATETIME',
+            'len' => 19,
+            'flags' => 'not_null',
+        ),
+        4 => array(
+            'type' => 'VARCHAR',
+            'len' => 2,
+            'flags' => 'not_null',
+        ),
+        5 => array(
+            'type' => 'DECIMAL',
+            'len' => 15,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'VARCHAR',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'odbc:db2' => array(
+        'clob' => 'CLOB',
+        'date' => 'DATE',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'INTEGER',
+            'len' => 10,
+            'flags' => 'not_null',
+        ),
+        1 => array(
+            'type' => 'INTEGER',
+            'len' => 10,
+            'flags' => 'not_null',
+        ),
+        2 => array(
+            'type' => 'CLOB',
+            'len' => 1048576,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'DATE',
+            'len' => 10,
+            'flags' => 'not_null',
+        ),
+        4 => array(
+            'type' => 'CHAR',
+            'len' => 2,
+            'flags' => 'not_null',
+        ),
+        5 => array(
+            'type' => 'DECIMAL',
+            'len' => 2,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'VARCHAR',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'pgsql:pgsql' => array(
+        'clob' => 'TEXT',
+        'date' => 'DATE',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+            '$dbh->query("SET DATESTYLE = ISO");',
+        ),
+        0 => array(
+            'type' => 'int4',
+            'len' => 4,
+            'flags' => 'not_null unique_key multiple_key',
+        ),
+        1 => array(
+            'type' => 'int4',
+            'len' => 4,
+            'flags' => 'not_null primary_key',
+        ),
+        2 => array(
+            'type' => 'text',
+            'len' => -1,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'date',
+            'len' => 4,
+            'flags' => 'not_null unique_key multiple_key',
+        ),
+        4 => array(
+            'type' => 'bpchar',
+            'len' => -1,
+            'flags' => 'not_null default_%20e',
+        ),
+        5 => array(
+            'type' => 'numeric',
+            'len' => -1,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'varchar',
+            'len' => -1,
+            'flags' => '',
+        ),
+    ),
+
+    'sqlite:sqlite' => array(
+        'clob' => 'CLOB',
+        'date' => 'DATE',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => false,
+        'commands' => array(
+        ),
+        0 => array(
+            'type' => 'INTEGER',
+            'len' => 0,
+            'flags' => 'not_null',
+        ),
+        1 => array(
+            'type' => 'INTEGER',
+            'len' => 0,
+            'flags' => 'primary_key not_null',
+        ),
+        2 => array(
+            'type' => 'CLOB',
+            'len' => 0,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'DATE',
+            'len' => 0,
+            'flags' => 'not_null',
+        ),
+        4 => array(
+            'type' => 'CHAR',
+            'len' => 2,
+            'flags' => 'not_null default_%20e',
+        ),
+        5 => array(
+            'type' => 'DECIMAL',
+            'len' => 2,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'VARCHAR',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+
+    'sybase:sybase' => array(
+        'clob' => 'TEXT',
+        'date' => 'SMALLDATETIME',
+        'dateliteral' => '',
+        'finds_table' => false,
+        'size_from_table' => false,
+        'handles_results' => true,
+        'commands' => array(
+            '$dbh->query("SET DATEFORMAT ymd");',
+        ),
+        0 => array(
+            'type' => 'int',
+            'len' => 11,
+            'flags' => 'multiple_key unique_key',
+        ),
+        1 => array(
+            'type' => 'int',
+            'len' => 11,
+            'flags' => 'unique_key',
+        ),
+        2 => array(
+            'type' => 'string',
+            'len' => 32768,
+            'flags' => '',
+        ),
+        3 => array(
+            'type' => 'datetime',
+            'len' => 29,
+            'flags' => 'multiple_key unique_key',
+        ),
+        4 => array(
+            'type' => 'string',
+            'len' => 2,
+            'flags' => '',
+        ),
+        5 => array(
+            'type' => 'real',
+            'len' => 4,
+            'flags' => '',
+        ),
+        9 => array(
+            'type' => 'string',
+            'len' => 20,
+            'flags' => '',
+        ),
+    ),
+);
+
+
+$quirk_key = $dbh->phptype . ':' . $dbh->dbsyntax;
+
+if (!isset($quirks[$quirk_key])) {
+    die("This test does not yet support $quirk_key");
+}
+
+if (count($quirks[$quirk_key]['commands'])) {
+    foreach ($quirks[$quirk_key]['commands'] as $value) {
+        eval($value);
+    }
+}
+
+
+$dbh->query('DELETE FROM phptest');
+$dbh->query("INSERT INTO phptest VALUES (1, 'one', 'One', '2001-02-16')");
+$dbh->query("INSERT INTO phptest VALUES (2, 'two', 'Two', '2001-02-15')");
+$dbh->query("INSERT INTO phptest VALUES (3, 'three', 'Three', '2001-02-14')");
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest_fk');
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+if ($quirk_key == 'odbc:access') {
+    $default_e = '';
+    $decimal   = 'NUMERIC';
+} elseif ($quirk_key == 'msql:msql') {
+    $default_e = '';
+    $decimal   = 'REAL';
+} else {
+    $default_e = "DEFAULT ' e'";
+    $decimal   = 'DECIMAL(2,1)';
+}
+
+// $null is set in mktable.inc
+
+switch ($dbh->phptype) {
+    case 'msql':
+        $dbh->query("
+            CREATE TABLE phptest_fk (
+                a INTEGER NOT NULL,
+                fk INTEGER NOT NULL,
+                c {$quirks[$quirk_key]['clob']} $null,
+                d {$quirks[$quirk_key]['date']} NOT NULL,
+                e CHAR(2) $default_e NOT NULL,
+                f $decimal $null
+            )
+        ");
+        $dbh->query('CREATE UNIQUE INDEX fkpk ON phptest_fk (fk)');
+        $dbh->query('CREATE UNIQUE INDEX fkuk ON phptest_fk (a, d)');
+        break;
+    default:
+        $dbh->query("
+            CREATE TABLE phptest_fk (
+                a INTEGER NOT NULL,
+                fk INTEGER NOT NULL,
+                c {$quirks[$quirk_key]['clob']} $null,
+                d {$quirks[$quirk_key]['date']} NOT NULL,
+                e CHAR(2) $default_e NOT NULL,
+                f $decimal $null,
+                PRIMARY KEY (fk),
+                UNIQUE (a, d)
+            )
+        ");
+}
+
+$dbh->query("CREATE INDEX thedidx ON phptest_fk (d)");
+$dbh->query("INSERT INTO phptest_fk VALUES (10, 1, 'One',"
+            . $quirks[$quirk_key]['dateliteral'] . "'2001-02-16',  'c1', 1.1)");
+$dbh->query("INSERT INTO phptest_fk VALUES (20, 2, 'Two',"
+            . $quirks[$quirk_key]['dateliteral'] . "'2001-02-15', 'c2', 2.2)");
+$dbh->query("INSERT INTO phptest_fk VALUES (30, 3, 'Three',"
+            . $quirks[$quirk_key]['dateliteral'] . "'2001-02-14', 'c3', 3.3)");
+
+function &runQuery() {
+    global $dbh, $resultobj;
+
+    $quirk_key = $dbh->phptype . ':' . $dbh->dbsyntax;
+
+    switch ($quirk_key) {
+        case 'odbc:db2':
+            // can't extract blob's this way so make a fake column
+            $query = "SELECT phptest_fk.a, phptest_fk.fk, 'tempxyz' AS c,"
+                   . ' phptest_fk.d, phptest_fk.e, phptest_fk.f,'
+                   . ' phptest.a, phptest.b, phptest.c, phptest.d'
+                   . ' FROM phptest_fk, phptest'
+                   . ' WHERE phptest.a = phptest_fk.fk';
+            break;
+        case 'msql:msql':
+            $query = 'SELECT phptest_fk.a, phptest_fk.fk, phptest_fk.c,'
+                   . ' phptest_fk.d, phptest_fk.e, phptest_fk.f,'
+                   . ' phptest.a, phptest.b, phptest.c, phptest.d'
+                   . ' FROM phptest_fk, phptest'
+                   . ' WHERE phptest.a = phptest_fk.fk';
+            break;
+        default:
+            $query = 'SELECT phptest_fk.a, phptest_fk.fk, phptest_fk.c,'
+                   . ' phptest_fk.d, phptest_fk.e, phptest_fk.f,'
+                   . ' phptest.a, phptest.b, phptest.c, phptest.d'
+                   . ' FROM phptest_fk, phptest'
+                   . ' WHERE phptest.a = phptest_fk.fk';
+    }
+    $resultobj =& $dbh->query($query);
+    return $resultobj;
+}
+
+
+$expected01 = 'table ... matched expected value
+name => a
+type ... matched expected value
+len ... matched expected value
+flags ... matched expected value
+';
+
+$expected02 = 'table ... matched expected value
+name => fk
+type ... matched expected value
+len ... matched expected value
+flags ... matched expected value
+';
+
+$expected03 = 'table ... matched expected value
+name => c
+type ... matched expected value
+len ... matched expected value
+flags ... matched expected value
+';
+
+$expected04 = 'table ... matched expected value
+name => d
+type ... matched expected value
+len ... matched expected value
+flags ... matched expected value
+';
+
+$expected05 = 'table ... matched expected value
+name => e
+type ... matched expected value
+len ... matched expected value
+flags ... matched expected value
+';
+
+$expected06 = 'table ... matched expected value
+name => f
+type ... matched expected value
+len ... matched expected value
+flags ... matched expected value
+';
+
+$expected10 = 'table ... matched expected value
+name => d
+type ... matched expected value
+len ... matched expected value
+flags ... matched expected value
+';
+
+
+
+print "\n==========================================\n";
+print "Passing result OBJECT to method in DB_.\n";
+print "Output = default.\n";
+print "------------------------------------------\n";
+$resultobj =& runQuery();
+$array = $dbh->tableInfo($resultobj);
+
+print "\ncolumn 0:\n";
+examineArrayData($array, $expected01, 0);
+
+print "\ncolumn 9:\n";
+examineArrayData($array, $expected10, 9);
+
+
+print "\n==========================================\n";
+print "Passing result ID to method in DB_.\n";
+print "Output = DB_TABLEINFO_ORDER.\n";
+print "------------------------------------------\n";
+$resultobj =& runQuery();
+$array = $dbh->tableInfo($resultobj->result, DB_TABLEINFO_ORDER);
+
+print "\ncolumn 0:\n";
+examineArrayData($array, $expected01, 0);
+
+print "\ncolumn 3:\n";
+examineArrayData($array, $expected04, 3);
+
+print "\nnum_fields: ";
+if ($quirks[$quirk_key]['handles_results'] && $array['num_fields'] == 10) {
+    print "matched expected result\n";
+} elseif (DB::isError($array) && $array->getCode() == DB_ERROR_NOT_CAPABLE) {
+    print "matched expected result\n";
+} else {
+    print "This DMBS didn't produce proper results\n";
+}
+
+print "\norder:\n";
+if ($quirks[$quirk_key]['handles_results'] && is_array($array['order'])) {
+    $expected = 'a => 6
+b => 7
+c => 8
+d => 9
+e => 4
+f => 5
+fk => 1
+';
+    ksort($array['order']);
+    examineArrayData($array['order'], $expected);
+} elseif (DB::isError($array) && $array->getCode() == DB_ERROR_NOT_CAPABLE) {
+    print "matched expected result\n";
+} else {
+    print "This DMBS didn't produce proper results\n";
+}
+
+
+
+print "\n==========================================\n";
+print "Passing DB_TABLEINFO_ORDERTABLE to method in DB_result.\n";
+print "Output = DB_TABLEINFO_ORDERTABLE.\n";
+print "------------------------------------------\n";
+$resultobj =& runQuery();
+$array = $resultobj->tableInfo(DB_TABLEINFO_ORDERTABLE);
+// Free this to keep interbase happy.
+$resultobj->free();
+
+print "\ncolumn 0:\n";
+examineArrayData($array, $expected01, 0);
+
+print "\ncolumn 3:\n";
+examineArrayData($array, $expected04, 3);
+
+print "\nnum_fields: ";
+if ($quirks[$quirk_key]['handles_results'] && $array['num_fields'] == 10) {
+    print "matched expected result\n";
+} elseif (DB::isError($array) && $array->getCode() == DB_ERROR_NOT_CAPABLE) {
+    print "matched expected result\n";
+} else {
+    print "This DMBS didn't produce proper results\n";
+}
+
+
+print 'ordertable[phptest]: ';
+$expected = 'a => 6
+b => 7
+c => 8
+d => 9
+';
+if ($quirks[$quirk_key]['handles_results']
+    && isset($array['ordertable']['phptest'])) {
+    $actual = returnArrayData($array['ordertable']['phptest']);
+} else {
+    $actual = '';
+}
+if ($actual == $expected) {
+    print "matched expected result\n";
+} else {
+    if (($quirks[$quirk_key]['finds_table'] === false 
+        || DB::isError($array) && $array->getCode() == DB_ERROR_NOT_CAPABLE)
+        && $actual == '') {
+        print "matched expected result\n";
+    } else {
+        print "DIDN'T match expected values...\n";
+        print "~~~~~~~~\nExpected:\n$expected\n";
+        print "~~~~\nActual:\n$actual\n~~~~~~~~\n\n";
+    }
+}
+
+
+print 'ordertable[phptest_fk]: ';
+$expected = 'a => 0
+fk => 1
+c => 2
+d => 3
+e => 4
+f => 5
+';
+if ($quirks[$quirk_key]['handles_results']
+    && isset($array['ordertable']['phptest_fk'])) {
+    $actual = returnArrayData($array['ordertable']['phptest_fk']);
+} else {
+    $actual = '';
+}
+if ($actual == $expected) {
+    print "matched expected result\n";
+} else {
+    if (($quirks[$quirk_key]['finds_table'] === false 
+        || DB::isError($array) && $array->getCode() == DB_ERROR_NOT_CAPABLE)
+        && $actual == '') {
+        print "matched expected result\n";
+    } else {
+        print "DIDN'T match expected values...\n";
+        print "~~~~~~~~\nExpected:\n$expected\n";
+        print "~~~~\nActual:\n$actual\n~~~~~~~~\n\n";
+    }
+}
+
+
+print "\n==========================================\n";
+print "Passing TABLE NAME 'phptest_fk' to method in DB_.\n";
+print "Output = default.\n";
+print "------------------------------------------\n";
+$array = $dbh->tableInfo('phptest_fk');
+
+print "\ncolumn 0:\n";
+examineArrayData($array, $expected01, 0, false);
+
+print "\ncolumn 1:\n";
+examineArrayData($array, $expected02, 1, false);
+
+print "\ncolumn 2:\n";
+examineArrayData($array, $expected03, 2, false);
+
+print "\ncolumn 3:\n";
+examineArrayData($array, $expected04, 3, false);
+
+print "\ncolumn 4:\n";
+examineArrayData($array, $expected05, 4, false);
+
+print "\ncolumn 5:\n";
+examineArrayData($array, $expected06, 5, false);
+
+
+print "\n==========================================\n";
+print "Passing TABLE NAME 'phptest_fk' to method in DB_.\n";
+print "Output = DB_TABLEINFO_FULL.\n";
+print "------------------------------------------\n";
+$array = $dbh->tableInfo('phptest_fk', DB_TABLEINFO_FULL);
+
+print "\ncolumn 0:\n";
+examineArrayData($array, $expected01, 0, false);
+
+print "\norder:\n";
+$expect ='a => 0
+fk => 1
+c => 2
+d => 3
+e => 4
+f => 5
+';
+examineArrayData($array['order'], $expect, false, false);
+
+print "\nordertable[phptest_fk]:\n";
+$expect ='a => 0
+fk => 1
+c => 2
+d => 3
+e => 4
+f => 5
+';
+examineArrayData($array['ordertable']['phptest_fk'], $expect);
+
+
+
+print "\n==========================================\n";
+print "Passing TABLE NAME 'phptest_fk' to method in DB_ AGAIN.\n";
+print "Output = DB_TABLEINFO_FULL, lowercasing turned off.\n";
+print "------------------------------------------\n";
+$dbh->setOption('portability', DB_PORTABILITY_ALL ^ DB_PORTABILITY_LOWERCASE);
+$array = $dbh->tableInfo('phptest_fk', DB_TABLEINFO_FULL);
+
+// testing non-lowercasing above to ensure program doesn't die.
+// lowercase the names here to ensure test uniformity.
+$array[0]['table'] = strtolower($array[0]['table']);
+$array[0]['name'] = strtolower($array[0]['name']);
+
+print "\ncolumn 0:\n";
+examineArrayData($array, 0, false);
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
+drop_table($dbh, 'phptest_fk');
+
+?>
+--EXPECT--
+==========================================
+Passing result OBJECT to method in DB_.
+Output = default.
+------------------------------------------
+
+column 0:
+matched expected result
+
+column 9:
+matched expected result
+
+==========================================
+Passing result ID to method in DB_.
+Output = DB_TABLEINFO_ORDER.
+------------------------------------------
+
+column 0:
+matched expected result
+
+column 3:
+matched expected result
+
+num_fields: matched expected result
+
+order:
+matched expected result
+
+==========================================
+Passing DB_TABLEINFO_ORDERTABLE to method in DB_result.
+Output = DB_TABLEINFO_ORDERTABLE.
+------------------------------------------
+
+column 0:
+matched expected result
+
+column 3:
+matched expected result
+
+num_fields: matched expected result
+ordertable[phptest]: matched expected result
+ordertable[phptest_fk]: matched expected result
+
+==========================================
+Passing TABLE NAME 'phptest_fk' to method in DB_.
+Output = default.
+------------------------------------------
+
+column 0:
+matched expected result
+
+column 1:
+matched expected result
+
+column 2:
+matched expected result
+
+column 3:
+matched expected result
+
+column 4:
+matched expected result
+
+column 5:
+matched expected result
+
+==========================================
+Passing TABLE NAME 'phptest_fk' to method in DB_.
+Output = DB_TABLEINFO_FULL.
+------------------------------------------
+
+column 0:
+matched expected result
+
+order:
+matched expected result
+
+ordertable[phptest_fk]:
+matched expected result
+
+==========================================
+Passing TABLE NAME 'phptest_fk' to method in DB_ AGAIN.
+Output = DB_TABLEINFO_FULL, lowercasing turned off.
+------------------------------------------
+
+column 0:
+matched expected result
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/17query.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/17query.phpt
new file mode 100644
index 000000000..4cbd33399
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/17query.phpt
@@ -0,0 +1,140 @@
+--TEST--
+DB_driver::query
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+ * @internal
+ */
+
+chdir(dirname(__FILE__));
+require_once './skipif.inc';
+
+?>
+--FILE--
+setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    die($o->toString());
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+$dbh->setFetchMode(DB_FETCHMODE_ASSOC);
+
+
+$res =& $dbh->query('DELETE FROM phptest WHERE a = 17');
+print '1) delete: ' . ($res === DB_OK ? 'okay' : 'error') . "\n";
+
+$res =& $dbh->query("INSERT INTO phptest (a, b, c) VALUES (17, 'one', 'One')");
+print '2) insert: ' . ($res === DB_OK ? 'okay' : 'error') . "\n";
+
+$res =& $dbh->query('INSERT INTO phptest (a, b, c) VALUES (?, ?, ?)', array(17, 'two', 'Two'));
+print '3) insert: ' . ($res === DB_OK ? 'okay' : 'error') . "\n";
+
+
+$res =& $dbh->query('SELECT a, b FROM phptest WHERE a = 17');
+$row = $res->fetchRow();
+print "4) a = {$row['a']}, b = {$row['b']}\n";
+$res->free();  // keep fbsql happy.
+
+$res =& $dbh->query('SELECT a, b FROM phptest WHERE c = ?', array('Two'));
+$row = $res->fetchRow();
+print "5) a = {$row['a']}, b = {$row['b']}\n";
+
+
+$array = array(
+    'foo' => 11,
+    'bar' => 'three',
+    'baz' => null,
+);
+$res =& $dbh->query('INSERT INTO phptest (a, b, d) VALUES (?, ?, ?)', $array);
+print '6) insert: ' . ($res === DB_OK ? 'okay' : 'error') . "\n";
+
+$res =& $dbh->query('SELECT a, b, d FROM phptest WHERE a = ?', 11);
+$row = $res->fetchRow();
+print "7) a = {$row['a']}, b = {$row['b']}, d = ";
+if ($dbh->phptype == 'msql') {
+    if (array_key_exists('d', $row)) {
+        $type = gettype($row['d']);
+        if ($type == 'NULL' || $row['d'] == '') {
+            print "got expected value\n";
+        } else {
+            print "ERR: expected d's type to be NULL but it's $type and the value is ";
+            print $row['d'] . "\n";
+        }
+    } else {
+        // http://bugs.php.net/?id=31960
+        print "Prior to PHP 4.3.11 or 5.0.4, PHP's msql extension silently"
+              . " dropped columns with null values. You need to upgrade.\n";
+    }
+} else {
+    $type = gettype($row['d']);
+    if ($type == 'NULL' || $row['d'] == '') {
+        print "got expected value\n";
+    } else {
+        print "ERR: expected d's type to be NULL but it's $type and the value is ";
+        print $row['d'] . "\n";
+    }
+}
+
+
+$res =& $dbh->query('DELETE FROM phptest WHERE a = ?', array(17));
+print '8) delete: ' . ($res === DB_OK ? 'okay' : 'error') . "\n";
+
+$res =& $dbh->query('DELETE FROM phptest WHERE a = ?', array(0));
+print '9) delete with array(0) as param: ' . ($res === DB_OK ? 'okay' : 'error') . "\n";
+
+$res =& $dbh->query('DELETE FROM phptest WHERE a = ?', 0);
+print '10) delete with 0 as param: ' . ($res === DB_OK ? 'okay' : 'error') . "\n";
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
+
+?>
+--EXPECT--
+1) delete: okay
+2) insert: okay
+3) insert: okay
+4) a = 17, b = one
+5) a = 17, b = two
+6) insert: okay
+7) a = 11, b = three, d = got expected value
+8) delete: okay
+9) delete with array(0) as param: okay
+10) delete with 0 as param: okay
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/18get.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/18get.phpt
new file mode 100644
index 000000000..36c8355f0
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/18get.phpt
@@ -0,0 +1,661 @@
+--TEST--
+DB_driver::get
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+ * @internal
+ */
+
+chdir(dirname(__FILE__));
+require_once './skipif.inc';
+
+?>
+--FILE--
+phptest table.
+ */
+require_once './mktable.inc';
+
+
+/**
+ * Local error callback handler.
+ *
+ * Drops the phptest table, prints out an error message and kills the
+ * process.
+ *
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o){
+    global $dbh;
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    die($o->toString());
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+$dbh->query("INSERT INTO phptest VALUES (2, 'two', 'Two', '2002-02-22')");
+$dbh->query("INSERT INTO phptest VALUES (42, 'three', 'Three', '2003-03-23')");
+
+
+print "===================================================\n";
+print 'testing getOne: ';
+$ret =& $dbh->getOne("SELECT * FROM phptest WHERE c = 'Two'");
+print_r($ret);
+print "\n";
+
+print 'testing getOne with string params: ';
+$ret =& $dbh->getOne('SELECT * FROM phptest WHERE c = ?', 'Three');
+print_r($ret);
+print "\n";
+
+print 'testing getOne with array params: ';
+$ret =& $dbh->getOne('SELECT * FROM phptest WHERE c = ?', array('Two'));
+print_r($ret);
+print "\n";
+
+print "\n===================================================\n";
+print "testing getRow:\n";
+$ret =& $dbh->getRow("SELECT * FROM phptest WHERE c = 'Two'");
+print_r($ret);
+
+print "testing getRow with null params, DB_FETCHMODE_ORDERED:\n";
+$ret =& $dbh->getRow("SELECT * FROM phptest WHERE c = 'Two'",
+        null, DB_FETCHMODE_ORDERED);
+print_r($ret);
+
+// THIS DOESN'T WORK DUE TO BACKWARDS COMPATIBILITY CRAP
+// print "testing getRow with string params, DB_FETCHMODE_ORDERED:\n";
+// $ret =& $dbh->getRow('SELECT * FROM phptest WHERE c = ?',
+//         'Two', DB_FETCHMODE_ORDERED);
+// print_r($ret);
+//
+// testing getRow with string params, DB_FETCHMODE_ORDERED:
+// Array
+// (
+//     [0] => 2
+//     [1] => two
+//     [2] => Two
+//     [3] => 2002-02-22
+// )
+
+   print "testing getRow with REVERSED args: DB_FETCHMODE_ASSOC, array params:\n";
+   $ret =& $dbh->getRow('SELECT * FROM phptest WHERE c = ?',
+           DB_FETCHMODE_ASSOC, array('Two'));
+   print_r($ret);
+   
+   print "testing getRow with REVERSED args: DB_FETCHMODE_ASSOC:\n";
+   $ret =& $dbh->getRow("SELECT * FROM phptest WHERE c = 'Two'",
+           DB_FETCHMODE_ASSOC);
+   print_r($ret);
+
+print "testing getRow with array params, DB_FETCHMODE_ASSOC:\n";
+$ret =& $dbh->getRow('SELECT * FROM phptest WHERE c = ?',
+        array('Two'), DB_FETCHMODE_ASSOC);
+print_r($ret);
+
+print "testing getRow with array params, DB_FETCHMODE_OBJECT:\n";
+$ret =& $dbh->getRow('SELECT * FROM phptest WHERE c = ?',
+        array('Two'), DB_FETCHMODE_OBJECT);
+print_r($ret);
+
+
+print "\n===================================================\n";
+print "testing getCol:\n";
+$ret =& $dbh->getCol("SELECT * FROM phptest ORDER BY b");
+print_r($ret);
+
+print "testing getCol on query with no records:\n";
+$ret =& $dbh->getCol('SELECT * FROM phptest WHERE a > 200');
+print_r($ret);
+
+print "testing getCol with invalid column id:\n";
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+$ret =& $dbh->getCol('SELECT b FROM phptest ORDER BY b', 1);
+if (DB::isError($ret)) {
+    echo $ret->getMessage() . "\n";
+} else {
+    print ">> Should have produced 'no such field' error\n";
+}
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+print "testing getCol with 1 col:\n";
+$ret =& $dbh->getCol("SELECT * FROM phptest ORDER BY b", 1);
+print_r($ret);
+
+print "testing getCol with b col:\n";
+$ret =& $dbh->getCol("SELECT * FROM phptest ORDER BY b", 'b');
+print_r($ret);
+
+print "testing getCol with b col, scalar params:\n";
+$ret =& $dbh->getCol("SELECT * FROM phptest WHERE a < ? ORDER BY b",
+        'b', 100);
+print_r($ret);
+
+print "testing getCol with b col, array params:\n";
+$ret =& $dbh->getCol("SELECT * FROM phptest WHERE a < ? ORDER BY b",
+        'b', array(100));
+print_r($ret);
+
+
+print "\n===================================================\n";
+print "testing getAssoc:\n";
+$ret =& $dbh->getAssoc('SELECT a, b, c FROM phptest WHERE a < 100 ORDER BY b');
+print_r($ret);
+
+print "testing getAssoc with false force, null params, DB_FETCHMODE_ORDERED:\n";
+$ret =& $dbh->getAssoc("SELECT a, b, c FROM phptest WHERE a < 100 ORDER BY b",
+                        false, null, DB_FETCHMODE_ORDERED);
+print_r($ret);
+
+print "testing getAssoc with false force, scalar params, DB_FETCHMODE_ASSOC:\n";
+$ret =& $dbh->getAssoc('SELECT a, b, c FROM phptest WHERE a < ? ORDER BY b',
+                        false, 100, DB_FETCHMODE_ASSOC);
+print_r($ret);
+
+print "testing getAssoc with two cols, false force, scalar params, DB_FETCHMODE_ASSOC:\n";
+$ret =& $dbh->getAssoc('SELECT a, b FROM phptest WHERE a < ? ORDER BY b',
+                        false, 100, DB_FETCHMODE_ASSOC);
+print_r($ret);
+
+print "testing getAssoc with two cols, true force, scalar params, DB_FETCHMODE_ASSOC:\n";
+$ret =& $dbh->getAssoc('SELECT a, b FROM phptest WHERE a < ? ORDER BY b',
+                        true, 100, DB_FETCHMODE_ASSOC);
+print_r($ret);
+
+print "testing getAssoc with false force, scalar params, DB_FETCHMODE_ASSOC, true group:\n";
+$ret =& $dbh->getAssoc('SELECT a, b, c FROM phptest WHERE a < ? ORDER BY b',
+                        false, 100, DB_FETCHMODE_ASSOC, true);
+print_r($ret);
+
+print "testing getAssoc with false force, array params, DB_FETCHMODE_OBJECT:\n";
+$ret =& $dbh->getAssoc('SELECT a, b, c FROM phptest WHERE a < ? ORDER BY b',
+                        false, array(100), DB_FETCHMODE_OBJECT);
+print_r($ret);
+
+print "testing getAssoc with true force, array params, DB_FETCHMODE_OBJECT, true group:\n";
+$ret =& $dbh->getAssoc('SELECT a, b, c FROM phptest WHERE a < ? ORDER BY b',
+                        false, array(100), DB_FETCHMODE_OBJECT, true);
+print_r($ret);
+
+
+print "\n===================================================\n";
+print "testing getAll:\n";
+$ret =& $dbh->getAll("SELECT * FROM phptest WHERE c = 'Two' OR c = 'Three'");
+print_r($ret);
+
+print "testing getAll with null params, DB_FETCHMODE_ORDERED:\n";
+$ret =& $dbh->getAll("SELECT * FROM phptest WHERE c = 'Two' OR c = 'Three'",
+        null, DB_FETCHMODE_ORDERED);
+print_r($ret);
+
+// THIS DOESN'T WORK DUE TO BACKWARDS COMPATIBILITY CRAP
+// print "testing getAll with string params, DB_FETCHMODE_ORDERED:\n";
+// $ret =& $dbh->getAll('SELECT * FROM phptest WHERE c = ?',
+//         'Two', DB_FETCHMODE_ORDERED);
+// print_r($ret);
+//
+// testing getAll with string params, DB_FETCHMODE_ORDERED:
+// Array
+// (
+//     [0] => 2
+//     [1] => two
+//     [2] => Two
+//     [3] => 2002-02-22
+// )
+
+   print "testing getAll with REVERSED args: DB_FETCHMODE_ASSOC, array params:\n";
+   $ret =& $dbh->getAll('SELECT * FROM phptest WHERE c = ? OR c = ? ORDER BY c',
+           DB_FETCHMODE_ASSOC, array('Two', 'Three'));
+   print_r($ret);
+   
+   print "testing getAll with REVERSED args: DB_FETCHMODE_ASSOC:\n";
+   $ret =& $dbh->getAll("SELECT * FROM phptest WHERE c = 'Two' OR c = 'Three'",
+           DB_FETCHMODE_ASSOC);
+   print_r($ret);
+
+print "testing getAll with array params, DB_FETCHMODE_ASSOC:\n";
+$ret =& $dbh->getAll('SELECT * FROM phptest WHERE c = ? OR c = ? ORDER BY c',
+        array('Two', 'Three'), DB_FETCHMODE_ASSOC);
+print_r($ret);
+
+print "testing getAll with array params, DB_FETCHMODE_OBJECT:\n";
+$ret =& $dbh->getAll('SELECT * FROM phptest WHERE c = ? OR c = ? ORDER BY c',
+        array('Two', 'Three'), DB_FETCHMODE_OBJECT);
+print_r($ret);
+
+
+print "\n===================================================\n";
+print 'testing getOne with null value in column: ';
+$dbh->query("INSERT INTO phptest VALUES (9, 'nine', '', NULL)");
+$ret =& $dbh->getOne('SELECT d FROM phptest WHERE a = 9');
+if ($ret === '') {
+    print "matches expected result\n";
+} else {
+    if ($dbh->phptype == 'msql') {
+        if (gettype($ret) == 'NULL') {
+            // msql doesn't even return the column.  Joy! :)
+            // http://bugs.php.net/?id=31960
+            print "matches expected result\n";
+        } else {
+            print "WOW, mSQL now returns columns that have NULLS in them\n";
+        }
+    } else {
+        print 'type=' . gettype($ret) . ", value=$ret\n";
+    }
+}
+
+print 'testing getOne with empty string in column: ';
+$ret =& $dbh->getOne('SELECT c FROM phptest WHERE a = 9');
+if ($ret === '') {
+    print "empty string\n";
+} else {
+    print 'type=' . gettype($ret) . ", value=$ret\n";
+}
+
+
+print "\n===================================================\n";
+
+
+drop_table($dbh, 'phptest');
+
+
+?>
+--EXPECT--
+===================================================
+testing getOne: 2
+testing getOne with string params: 42
+testing getOne with array params: 2
+
+===================================================
+testing getRow:
+Array
+(
+    [0] => 2
+    [1] => two
+    [2] => Two
+    [3] => 2002-02-22
+)
+testing getRow with null params, DB_FETCHMODE_ORDERED:
+Array
+(
+    [0] => 2
+    [1] => two
+    [2] => Two
+    [3] => 2002-02-22
+)
+testing getRow with REVERSED args: DB_FETCHMODE_ASSOC, array params:
+Array
+(
+    [a] => 2
+    [b] => two
+    [c] => Two
+    [d] => 2002-02-22
+)
+testing getRow with REVERSED args: DB_FETCHMODE_ASSOC:
+Array
+(
+    [a] => 2
+    [b] => two
+    [c] => Two
+    [d] => 2002-02-22
+)
+testing getRow with array params, DB_FETCHMODE_ASSOC:
+Array
+(
+    [a] => 2
+    [b] => two
+    [c] => Two
+    [d] => 2002-02-22
+)
+testing getRow with array params, DB_FETCHMODE_OBJECT:
+stdClass Object
+(
+    [a] => 2
+    [b] => two
+    [c] => Two
+    [d] => 2002-02-22
+)
+
+===================================================
+testing getCol:
+Array
+(
+    [0] => 42
+    [1] => 42
+    [2] => 2
+)
+testing getCol on query with no records:
+Array
+(
+)
+testing getCol with invalid column id:
+DB Error: no such field
+testing getCol with 1 col:
+Array
+(
+    [0] => bing
+    [1] => three
+    [2] => two
+)
+testing getCol with b col:
+Array
+(
+    [0] => bing
+    [1] => three
+    [2] => two
+)
+testing getCol with b col, scalar params:
+Array
+(
+    [0] => bing
+    [1] => three
+    [2] => two
+)
+testing getCol with b col, array params:
+Array
+(
+    [0] => bing
+    [1] => three
+    [2] => two
+)
+
+===================================================
+testing getAssoc:
+Array
+(
+    [42] => Array
+        (
+            [0] => three
+            [1] => Three
+        )
+
+    [2] => Array
+        (
+            [0] => two
+            [1] => Two
+        )
+
+)
+testing getAssoc with false force, null params, DB_FETCHMODE_ORDERED:
+Array
+(
+    [42] => Array
+        (
+            [0] => three
+            [1] => Three
+        )
+
+    [2] => Array
+        (
+            [0] => two
+            [1] => Two
+        )
+
+)
+testing getAssoc with false force, scalar params, DB_FETCHMODE_ASSOC:
+Array
+(
+    [42] => Array
+        (
+            [b] => three
+            [c] => Three
+        )
+
+    [2] => Array
+        (
+            [b] => two
+            [c] => Two
+        )
+
+)
+testing getAssoc with two cols, false force, scalar params, DB_FETCHMODE_ASSOC:
+Array
+(
+    [42] => three
+    [2] => two
+)
+testing getAssoc with two cols, true force, scalar params, DB_FETCHMODE_ASSOC:
+Array
+(
+    [42] => Array
+        (
+            [b] => three
+        )
+
+    [2] => Array
+        (
+            [b] => two
+        )
+
+)
+testing getAssoc with false force, scalar params, DB_FETCHMODE_ASSOC, true group:
+Array
+(
+    [42] => Array
+        (
+            [0] => Array
+                (
+                    [b] => bing
+                    [c] => This is a test
+                )
+
+            [1] => Array
+                (
+                    [b] => three
+                    [c] => Three
+                )
+
+        )
+
+    [2] => Array
+        (
+            [0] => Array
+                (
+                    [b] => two
+                    [c] => Two
+                )
+
+        )
+
+)
+testing getAssoc with false force, array params, DB_FETCHMODE_OBJECT:
+Array
+(
+    [42] => stdClass Object
+        (
+            [a] => 42
+            [b] => three
+            [c] => Three
+        )
+
+    [2] => stdClass Object
+        (
+            [a] => 2
+            [b] => two
+            [c] => Two
+        )
+
+)
+testing getAssoc with true force, array params, DB_FETCHMODE_OBJECT, true group:
+Array
+(
+    [42] => Array
+        (
+            [0] => stdClass Object
+                (
+                    [a] => 42
+                    [b] => bing
+                    [c] => This is a test
+                )
+
+            [1] => stdClass Object
+                (
+                    [a] => 42
+                    [b] => three
+                    [c] => Three
+                )
+
+        )
+
+    [2] => Array
+        (
+            [0] => stdClass Object
+                (
+                    [a] => 2
+                    [b] => two
+                    [c] => Two
+                )
+
+        )
+
+)
+
+===================================================
+testing getAll:
+Array
+(
+    [0] => Array
+        (
+            [0] => 2
+            [1] => two
+            [2] => Two
+            [3] => 2002-02-22
+        )
+
+    [1] => Array
+        (
+            [0] => 42
+            [1] => three
+            [2] => Three
+            [3] => 2003-03-23
+        )
+
+)
+testing getAll with null params, DB_FETCHMODE_ORDERED:
+Array
+(
+    [0] => Array
+        (
+            [0] => 2
+            [1] => two
+            [2] => Two
+            [3] => 2002-02-22
+        )
+
+    [1] => Array
+        (
+            [0] => 42
+            [1] => three
+            [2] => Three
+            [3] => 2003-03-23
+        )
+
+)
+testing getAll with REVERSED args: DB_FETCHMODE_ASSOC, array params:
+Array
+(
+    [0] => Array
+        (
+            [a] => 42
+            [b] => three
+            [c] => Three
+            [d] => 2003-03-23
+        )
+
+    [1] => Array
+        (
+            [a] => 2
+            [b] => two
+            [c] => Two
+            [d] => 2002-02-22
+        )
+
+)
+testing getAll with REVERSED args: DB_FETCHMODE_ASSOC:
+Array
+(
+    [0] => Array
+        (
+            [a] => 2
+            [b] => two
+            [c] => Two
+            [d] => 2002-02-22
+        )
+
+    [1] => Array
+        (
+            [a] => 42
+            [b] => three
+            [c] => Three
+            [d] => 2003-03-23
+        )
+
+)
+testing getAll with array params, DB_FETCHMODE_ASSOC:
+Array
+(
+    [0] => Array
+        (
+            [a] => 42
+            [b] => three
+            [c] => Three
+            [d] => 2003-03-23
+        )
+
+    [1] => Array
+        (
+            [a] => 2
+            [b] => two
+            [c] => Two
+            [d] => 2002-02-22
+        )
+
+)
+testing getAll with array params, DB_FETCHMODE_OBJECT:
+Array
+(
+    [0] => stdClass Object
+        (
+            [a] => 42
+            [b] => three
+            [c] => Three
+            [d] => 2003-03-23
+        )
+
+    [1] => stdClass Object
+        (
+            [a] => 2
+            [b] => two
+            [c] => Two
+            [d] => 2002-02-22
+        )
+
+)
+
+===================================================
+testing getOne with null value in column: matches expected result
+testing getOne with empty string in column: empty string
+
+===================================================
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/19getlistof.phpt b/campcaster/src/tools/pear/src/tests/DB/tests/driver/19getlistof.phpt
new file mode 100644
index 000000000..8be58f236
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/19getlistof.phpt
@@ -0,0 +1,208 @@
+--TEST--
+DB_driver::getListOf
+--INI--
+error_reporting = 2047
+--SKIPIF--
+
+--FILE--
+ array(
+        'dbase:dbase' => DB_ERROR_UNSUPPORTED,
+        'fbsql:fbsql' => 'array',
+        'ibase:ibase' => 'array',
+        'ibase:firebird' => 'array',
+        'ifx:ifx' => 'array',
+        'msql:msql' => 'array',
+        'mssql:mssql' => 'array',
+        'mysql:mysql' => 'array',
+        'mysqli:mysqli' => 'array',
+        'oci8:oci8' => 'array',
+        'odbc:access' => 'array',
+        'odbc:db2' => 'array',
+        'pgsql:pgsql' => 'array',
+        'sqlite:sqlite' => 'array',
+        'sybase:sybase' => 'array',
+    ),
+    'views' => array(
+        'dbase:dbase' => DB_ERROR_UNSUPPORTED,
+        'fbsql:fbsql' => 'array',
+        'ibase:ibase' => 'array',
+        'ibase:firebird' => 'array',
+        'ifx:ifx' => DB_ERROR_UNSUPPORTED,
+        'msql:msql' => DB_ERROR_UNSUPPORTED,
+        'mssql:mssql' => 'array',
+        'mysql:mysql' => DB_ERROR_UNSUPPORTED,
+        'mysqli:mysqli' => DB_ERROR_UNSUPPORTED,
+        'oci8:oci8' => DB_ERROR_UNSUPPORTED,
+        'odbc:access' => 'array',
+        'odbc:db2' => 'array',
+        'pgsql:pgsql' => 'array',
+        'sqlite:sqlite' => DB_ERROR_UNSUPPORTED,
+        'sybase:sybase' => 'array',
+    ),
+    'users' => array(
+        'dbase:dbase' => DB_ERROR_UNSUPPORTED,
+        'fbsql:fbsql' => 'array',
+        'ibase:ibase' => 'array',
+        'ibase:firebird' => 'array',
+        'ifx:ifx' => DB_ERROR_UNSUPPORTED,
+        'msql:msql' => DB_ERROR_UNSUPPORTED,
+        'mssql:mssql' => DB_ERROR_UNSUPPORTED,
+        'mysql:mysql' => DB_ERROR_ACCESS_VIOLATION,
+        'mysqli:mysqli' => DB_ERROR_ACCESS_VIOLATION,
+        'oci8:oci8' => DB_ERROR_UNSUPPORTED,
+        'odbc:access' => DB_ERROR_UNSUPPORTED,
+        'odbc:db2' => DB_ERROR_UNSUPPORTED,
+        'pgsql:pgsql' => 'array',
+        'sqlite:sqlite' => DB_ERROR_UNSUPPORTED,
+        'sybase:sybase' => DB_ERROR_UNSUPPORTED,
+    ),
+    'databases' => array(
+        'dbase:dbase' => DB_ERROR_UNSUPPORTED,
+        'fbsql:fbsql' => DB_ERROR_UNSUPPORTED,
+        'ibase:ibase' => DB_ERROR_UNSUPPORTED,
+        'ibase:firebird' => DB_ERROR_UNSUPPORTED,
+        'ifx:ifx' => DB_ERROR_UNSUPPORTED,
+        'msql:msql' => 'array',
+        'mssql:mssql' => DB_ERROR_UNSUPPORTED,
+        'mysql:mysql' => 'array',
+        'mysqli:mysqli' => 'array',
+        'oci8:oci8' => DB_ERROR_UNSUPPORTED,
+        'odbc:access' => 'array',
+        'odbc:db2' => 'array',
+        'pgsql:pgsql' => 'array',
+        'sqlite:sqlite' => DB_ERROR_UNSUPPORTED,
+        'sybase:sybase' => DB_ERROR_UNSUPPORTED,
+    ),
+    'functions' => array(
+        'dbase:dbase' => DB_ERROR_UNSUPPORTED,
+        'fbsql:fbsql' => 'array',
+        'ibase:ibase' => DB_ERROR_UNSUPPORTED,
+        'ibase:firebird' => DB_ERROR_UNSUPPORTED,
+        'ifx:ifx' => DB_ERROR_UNSUPPORTED,
+        'msql:msql' => DB_ERROR_UNSUPPORTED,
+        'mssql:mssql' => DB_ERROR_UNSUPPORTED,
+        'mysql:mysql' => DB_ERROR_UNSUPPORTED,
+        'mysqli:mysqli' => DB_ERROR_UNSUPPORTED,
+        'oci8:oci8' => DB_ERROR_UNSUPPORTED,
+        'odbc:access' => DB_ERROR_UNSUPPORTED,
+        'odbc:db2' => DB_ERROR_UNSUPPORTED,
+        'pgsql:pgsql' => 'array',
+        'sqlite:sqlite' => DB_ERROR_UNSUPPORTED,
+        'sybase:sybase' => DB_ERROR_UNSUPPORTED,
+    ),
+    'procedures' => array(
+        'dbase:dbase' => DB_ERROR_UNSUPPORTED,
+        'fbsql:fbsql' => 'array',
+        'ibase:ibase' => DB_ERROR_UNSUPPORTED,
+        'ibase:firebird' => DB_ERROR_UNSUPPORTED,
+        'ifx:ifx' => DB_ERROR_UNSUPPORTED,
+        'msql:msql' => DB_ERROR_UNSUPPORTED,
+        'mssql:mssql' => DB_ERROR_UNSUPPORTED,
+        'mysql:mysql' => DB_ERROR_UNSUPPORTED,
+        'mysqli:mysqli' => DB_ERROR_UNSUPPORTED,
+        'oci8:oci8' => DB_ERROR_UNSUPPORTED,
+        'odbc:access' => DB_ERROR_UNSUPPORTED,
+        'odbc:db2' => DB_ERROR_UNSUPPORTED,
+        'pgsql:pgsql' => 'array',
+        'sqlite:sqlite' => DB_ERROR_UNSUPPORTED,
+        'sybase:sybase' => DB_ERROR_UNSUPPORTED,
+    ),
+    'schema.tables' => array(
+        'dbase:dbase' => DB_ERROR_UNSUPPORTED,
+        'fbsql:fbsql' => DB_ERROR_UNSUPPORTED,
+        'ibase:ibase' => DB_ERROR_UNSUPPORTED,
+        'ibase:firebird' => DB_ERROR_UNSUPPORTED,
+        'ifx:ifx' => DB_ERROR_UNSUPPORTED,
+        'msql:msql' => DB_ERROR_UNSUPPORTED,
+        'mssql:mssql' => DB_ERROR_UNSUPPORTED,
+        'mysql:mysql' => DB_ERROR_UNSUPPORTED,
+        'mysqli:mysqli' => DB_ERROR_UNSUPPORTED,
+        'oci8:oci8' => DB_ERROR_UNSUPPORTED,
+        'odbc:access' => 'array',
+        'odbc:db2' => 'array',
+        'pgsql:pgsql' => 'array',
+        'sqlite:sqlite' => DB_ERROR_UNSUPPORTED,
+        'sybase:sybase' => DB_ERROR_UNSUPPORTED,
+    ),
+    'synonyms' => array(
+        'dbase:dbase' => DB_ERROR_UNSUPPORTED,
+        'fbsql:fbsql' => DB_ERROR_UNSUPPORTED,
+        'ibase:ibase' => DB_ERROR_UNSUPPORTED,
+        'ibase:firebird' => DB_ERROR_UNSUPPORTED,
+        'ifx:ifx' => DB_ERROR_UNSUPPORTED,
+        'msql:msql' => DB_ERROR_UNSUPPORTED,
+        'mssql:mssql' => DB_ERROR_UNSUPPORTED,
+        'mysql:mysql' => DB_ERROR_UNSUPPORTED,
+        'mysqli:mysqli' => DB_ERROR_UNSUPPORTED,
+        'oci8:oci8' => 'array',
+        'odbc:access' => DB_ERROR_UNSUPPORTED,
+        'odbc:db2' => DB_ERROR_UNSUPPORTED,
+        'pgsql:pgsql' => DB_ERROR_UNSUPPORTED,
+        'sqlite:sqlite' => DB_ERROR_UNSUPPORTED,
+        'sybase:sybase' => DB_ERROR_UNSUPPORTED,
+    ),
+);
+
+/**
+ * Determine if the output from the driver matches what we expect
+ *
+ * If things are as we expect, nothing is printed out.
+ *
+ * If things go wrong, print "UNEXPECTED OUTCOME" and display
+ * what happened.
+ *
+ * @param mixed  $result    the result from getListOf
+ * @param mixed  $expected  the expected result
+ * @param string $name      the name of the current test
+ *
+ * @return void
+ */
+function check_output($result, $expected, $name) {
+    if (is_object($result)) {
+        if ($result->getCode() !== $expected) {
+            echo "UNEXPECTED OUTCOME FOR $name...\n";
+            echo $result->getDebugInfo() . "\n";
+        }
+    } else {
+        $type = gettype($result);
+        if ($type != $expected) {
+            if ($expected === DB_ERROR_ACCESS_VIOLATION
+                && $type == 'array')
+            {
+                // This user has access to the mysql table.
+                // Not a problem
+            } else {
+                echo "UNEXPECTED OUTCOME FOR $name...\n";
+                echo "  Expected: $expected\n";
+                echo '  Result: ';
+                print_r($result);
+                echo "\n";
+            }
+        }
+    }
+}
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+foreach ($tests as $test => $dbms) {
+    check_output($dbh->getListOf($test),
+                 $dbms[$dbh->phptype . ':' . $dbh->dbsyntax],
+                 $test);
+}
+
+
+drop_table($dbh, 'phptest');
+
+?>
+--EXPECT--
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/connect.inc b/campcaster/src/tools/pear/src/tests/DB/tests/driver/connect.inc
new file mode 100644
index 000000000..70cfbc387
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/connect.inc
@@ -0,0 +1,46 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: connect.inc,v 1.12 2005/02/02 00:40:23 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+error_reporting(E_ALL);
+
+// Setting of $options and requiring DB are done in setup.inc
+
+/**
+ * Establish the include_path, DSN's and connection $options
+ */
+require_once './setup.inc';
+
+if (empty($dsns)) {
+    die('At least one element of $dsns must be defined in setup.inc');
+}
+
+list($dbms, $dsn) = each($dsns);
+
+if ($dbms == 'mssql') {
+    ini_set('mssql.textlimit', 4096);
+    ini_set('mssql.textsize', 4096);
+}
+
+$dbh =& DB::connect($dsn, $options);
+if (DB::isError($dbh)) {
+    die('connect.inc: ' . $dbh->toString());
+}
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/mktable.inc b/campcaster/src/tools/pear/src/tests/DB/tests/driver/mktable.inc
new file mode 100644
index 000000000..c09cb90ab
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/mktable.inc
@@ -0,0 +1,161 @@
+phptest table
+ *
+ * Tries to drop the table first, in case it already exists.
+ *
+ * 
+ * CREATE TABLE phptest (
+ *   a INTEGER NULL,
+ *   b CHAR(40) DEFAULT 'def' NOT NULL,
+ *   c VARCHAR(255) NULL,
+ *   d VARCHAR(20) NULL)
+ * 

+ *
+ * Need NOT NULL on b to test
+ * DB_PORTABILITY_RTRIM.  MS SQL and Sybase trim output from
+ * VARCHAR, but not on CHAR.
+ *
+ * Need DEFAULT value on b because Oracle considers
+ * an empty string to be NULL.
+ *
+ * In Oracle, when using placeholders in WHERE clauses on 
+ * CHAR columns, the column must have RTRIM() run on
+ * the column:
+ * 
+ *    SELECT * FROM phptest WHERE RTRIM(b) = ?
+ * 
+ *
+ * PHP versions 4 and 5
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Database
+ * @package    DB
+ * @author     Daniel Convissor 
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: mktable.inc,v 1.19 2005/02/14 23:33:20 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Establishes the DB object and connects to the database
+ */
+require_once './connect.inc';
+
+/**
+ * Get the drop_table() function
+ */
+require_once './droptable.inc';
+
+/**
+ * The error handler for the drop table procedure
+ *
+ * Prints out an error message and dies.
+ */
+function debug_die($o){
+    die($o->toString());
+}
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
+
+//$dbh->setErrorHandling(PEAR_ERROR_TRIGGER);
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'debug_die');
+
+if ($dbh->phptype == 'odbc') {
+    if ($dbh->dbsyntax == 'odbc') {
+        $type = $dbh->phptype;
+    } else {
+        $type = $dbh->dbsyntax;
+    }
+} else {
+    $type = $dbh->phptype;
+}
+
+
+switch ($type) {
+    case 'access':
+        $null = 'NULL';
+        $chrc = 'VARCHAR(255)';
+        $chrd = 'VARCHAR(20)';
+        $default = '';
+        $tabletype = '';
+        break;
+    case 'db2':
+    case 'ibase':
+        $null = '';
+        $chrc = 'VARCHAR(255)';
+        $chrd = 'VARCHAR(20)';
+        $default = "DEFAULT 'def' NOT NULL";
+        $tabletype = '';
+        break;
+    case 'fbsql':
+        $null = '';
+        $chrc = 'CHAR(255)';
+        $chrd = 'CHAR(20)';
+        $default = "DEFAULT 'def' NOT NULL";
+        $date_literal = ' DATE ';
+        $tabletype = '';
+        break;
+    case 'ifx':
+        // doing this for ifx to keep certain versions happy
+        $null = '';
+        $chrc = 'CHAR(255)';
+        $chrd = 'CHAR(20)';
+        $default = "DEFAULT 'def' NOT NULL";
+        $tabletype = '';
+        break;
+    case 'msql':
+        $null = '';
+        $chrc = 'CHAR(255)';
+        $chrd = 'CHAR(20)';
+        $default = '';
+        $tabletype = '';
+        break;
+    case 'mysql':
+    case 'mysqli':
+        $null = 'NULL';
+        $chrc = 'VARCHAR(255)';
+        $chrd = 'VARCHAR(20)';
+        $default = "DEFAULT 'def' NOT NULL";
+        if (!empty($needinnodb)) {
+            $tabletype = 'TYPE=INNODB';
+        } else {
+            $tabletype = '';
+        }
+        break;
+    default:
+        $null = 'NULL';
+        $chrc = 'VARCHAR(255)';
+        $chrd = 'VARCHAR(20)';
+        $default = "DEFAULT 'def' NOT NULL";
+        $tabletype = '';
+}
+
+switch ($dbh->phptype) {
+    case 'dbase':
+        // file exists or was created in DB_dbase::connect()
+        break;
+    default:
+        $test_mktable_query = "
+            CREATE TABLE phptest (
+              a INTEGER $null,
+              b CHAR(40) $default,
+              c $chrc $null,
+              d $chrd $null) $tabletype
+        ";
+}
+
+
+$dbh->query($test_mktable_query);
+$dbh->query("INSERT INTO phptest VALUES(42, 'bing', 'This is a test', '1999-11-21')");
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/multiconnect.php b/campcaster/src/tools/pear/src/tests/DB/tests/driver/multiconnect.php
new file mode 100644
index 000000000..0405d79b0
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/multiconnect.php
@@ -0,0 +1,83 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: multiconnect.php,v 1.2 2005/02/03 05:49:45 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ * @since      File available since Release 1.7.0
+ */
+
+/**
+ * Establish the include_path, DSN's and connection $options
+ */
+require_once './setup.inc';
+
+foreach ($dsns as $dbms => $dsn) {
+    echo "======== $dbms ========\n";
+    $options['persistent'] = false;
+    $dbh =& DB::connect($dsn, $options);
+    if (DB::isError($dbh)) {
+        echo 'PROBLEM: ' . $dbh->getUserInfo() . "\n";
+        continue;
+    }
+
+    if ($dbh->provides('new_link')
+        && version_compare(phpversion(), $dbh->provides('new_link'), '>='))
+    {
+        $probs = false;
+        $dsn = DB::parseDSN($dsn);
+        $dsn['new_link'] = true;
+        $dbh =& DB::connect($dsn, $options);
+        if (DB::isError($dbh)) {
+            echo 'NEW LINK PROBLEM: ' . $dbh->getUserInfo() . "\n";
+            $probs = true;
+        }
+
+        if ($dbh->provides('pconnect')) {
+            $options['persistent'] = true;
+            $dbh->disconnect();
+            $dbh =& DB::connect($dsn, $options);
+            if (DB::isError($dbh)) {
+                echo 'PERSIST NEWCON PROBLEM: ' . $dbh->getUserInfo() . "\n";
+                $probs = true;
+            }
+
+            unset($dsn['new_link']);
+            $dbh->disconnect();
+            $dbh =& DB::connect($dsn, $options);
+            if (DB::isError($dbh)) {
+                echo 'PERSIST OLDCON PROBLEM: ' . $dbh->getUserInfo() . "\n";
+                $probs = true;
+            }
+        }
+        if ($probs) {
+            continue;
+        }
+        $dbh->disconnect();
+
+    } elseif ($dbh->provides('pconnect')) {
+        $options['persistent'] = true;
+        $dbh->disconnect();
+        $dbh =& DB::connect($dsn, $options);
+        if (DB::isError($dbh)) {
+            echo 'PERSIST PROBLEM: ' . $dbh->getUserInfo() . "\n";
+            continue;
+        }
+        $dbh->disconnect();
+    }
+    echo "GOOD\n";
+}
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/run.cvs b/campcaster/src/tools/pear/src/tests/DB/tests/driver/run.cvs
new file mode 100644
index 000000000..56a1cd04d
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/run.cvs
@@ -0,0 +1,40 @@
+#! /bin/sh
+
+# $Id: run.cvs,v 1.2 2004/02/20 18:57:52 danielc Exp $
+
+# vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
+# PEAR DB TEST STARTER
+#
+#   To run all tests:  ./run
+#   To run one test:   ./run 
+#   Example:           ./run db_parsedsn.phpt
+#
+# Before running the tests you must adjust the
+# following three variables:
+
+#   The full path to your PHP directory:
+    DB_TEST_PHP_PATH=c:/progra~1/php
+
+#   The name of your PHP CLI executable
+#   (examples php.exe, php-cli.exe, cli/php.exe):
+    DB_TEST_PHP_CLI=php.exe
+
+#   The full path to the present directory
+#   (not using $PWD due to Cygwin):
+    DB_TEST_DIR=d:/peartest/pear/DB/tests/driver
+
+# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+
+
+
+TEST_PHP_EXECUTABLE=$DB_TEST_PHP_PATH/$DB_TEST_PHP_CLI
+export TEST_PHP_EXECUTABLE
+
+if [ $# -gt 0 ]
+then
+    test=$1
+else
+    test=*.phpt
+fi
+
+$TEST_PHP_EXECUTABLE $DB_TEST_PHP_PATH/run-tests.php $DB_TEST_DIR/${test}
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/setup.inc.cvs b/campcaster/src/tools/pear/src/tests/DB/tests/driver/setup.inc.cvs
new file mode 100644
index 000000000..efc864a96
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/setup.inc.cvs
@@ -0,0 +1,115 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: setup.inc.cvs,v 1.6 2005/02/14 23:33:20 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+if (!defined('PATH_SEPARATOR')) {
+    if (stristr(PHP_OS, 'WIN')) {
+        /**
+         * The string used to delimit elements of the path.
+         */
+        define('PATH_SEPARATOR', ';');
+    } else {
+        /**
+         * The string used to delimit elements of the path.
+         */
+        define('PATH_SEPARATOR', ':');
+    }
+}
+
+/*
+ * If the path to your PEAR installation is found in the left hand
+ * portion of the if() expression below, that means this file has
+ * come from the PEAR installer.  Therefore, let's use the
+ * installed version of DB, which should be found via the
+ * computer's default include_path.  Add '.' to the include_path
+ * to ensure '.' is in there.
+ * 
+ * If the path has not been substituted in the if() expression,
+ * this file has likely come from a CVS checkout or a .tar file.
+ * Therefore, we'll assume the tests should use the version of
+ * DB that has come from there as well.
+ */
+if ('/home/paul/software/campcaster/campcaster/usr/lib/pear' != '@'.'include_path'.'@') {
+    ini_set('include_path', ini_get('include_path')
+            . PATH_SEPARATOR . '.'
+    );
+} else {
+    ini_set('include_path', realpath(dirname(__FILE__) . '/../..')
+            . PATH_SEPARATOR . '.' . PATH_SEPARATOR
+            . ini_get('include_path')
+    );
+}
+
+/**
+ * Grab the PEAR DB classes.
+ */
+require_once 'DB.php';
+
+// Options used when connecting
+$options = array(
+    //'optimize' => 'portability',
+    'portability' => DB_PORTABILITY_ALL,
+    'debug' => 2,
+);
+
+$dbasedsn = array(
+    'phptype'  => 'dbase',
+    'database' => '/path/and/name/of/dbase/file',
+    'mode'     => 2,
+    'fields'   => array(
+        array('a', 'N', 5, 0),
+        array('b', 'C', 40),
+        array('c', 'C', 255),
+        array('d', 'C', 20),
+    ),
+);
+
+/*
+ * Uncomment at least one of the following elements.
+ * When running the .phpt tests, the first uncommented element is used.
+ * When running the multiconnect.php test, all uncommented elements are used.
+ */
+$dsns = array(
+    // 'dbase'    => $dbasedsn,
+    // 'fbsql'    => 'fbsql://_system:@/db',
+    // 'firebird' => 'ibase(firebird)://SYSDBA:masterkey@//opt/interbase/examples/employee.gdb?dialect=3',
+    // 'ifx'      => 'ifx://user:pw@localhost/db',
+    // 'msql'     => 'msql:///db',
+
+    // It's advisable to use only one of the following at a time:
+    // 'mssql'    => 'mssql://sa@somehost/pubs',
+    // 'sybase'   => 'sybase://sa@somehost/pubs',
+
+    // 'mysql'    => 'mysql://root@localhost/test',
+    // 'mysqli'   => 'mysqli://root@localhost/test',
+    // 'oci8'     => 'oci8://system:manager@',
+    // 'access'   => 'odbc(access)://admin@/SystemDsnName',
+    // 'db2'      => 'odbc(db2)://db2inst1:XXXX@/SAMPLE',
+    // 'pgsql'    => 'pgsql://postgres@localhost/test',
+    // 'sqlite'   => 'sqlite://dummy:@localhost/' . getcwd() . DIRECTORY_SEPARATOR . 'test.db?mode=0644',
+);
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/driver/skipif.inc b/campcaster/src/tools/pear/src/tests/DB/tests/driver/skipif.inc
new file mode 100644
index 000000000..00c3015dd
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/driver/skipif.inc
@@ -0,0 +1,37 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: skipif.inc,v 1.7 2005/02/02 00:40:23 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Establish the include_path, DSN's and connection $options
+ */
+require_once './setup.inc';
+
+if (empty($dsns)) {
+    die('skip At least one element of $dsns must be defined in setup.inc');
+}
+
+list($dbms, $dsn) = each($dsns);
+
+$dbh =& DB::connect($dsn, $options);
+if (DB::isError($dbh)) {
+    die('skip ' . $dbh->message);
+}
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/errors.inc b/campcaster/src/tools/pear/src/tests/DB/tests/errors.inc
new file mode 100644
index 000000000..f44718984
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/errors.inc
@@ -0,0 +1,466 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: errors.inc,v 1.35 2005/02/28 02:02:41 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Determine if the error from the driver matches the error we expect
+ *
+ * If things are as we expect, print out "matches expected outcome"
+ *
+ * If things go wrong, print "UNEXPECTED OUTCOME" and display the
+ * error's information.
+ *
+ * @param object  $e                 the DB_Error object from the query
+ * @param int     $expected_db_code  the DB_ERROR* constant to expect
+ * @param boolean $should_be_error   does the DBMS consider this an error?
+ *
+ * @return void
+ */
+function check_error($e, $expected_db_code, $should_be_error = true) {
+    if ($should_be_error) {
+        if (DB::isError($e)) {
+            if ($e->getCode() == $expected_db_code) {
+                print "matches expected outcome\n";
+            } else {
+                print "UNEXPECTED OUTCOME...\n";
+                print '    PEAR::DB errorcode: ' . $e->getCode() . "\n";
+                print '    ' . $e->getUserInfo() . "\n";
+            }
+        } else {
+            print "\n    UNEXPECTED OUTCOME... expected error but it wasn't\n";
+        }
+    } else {
+        if (DB::isError($e)) {
+            print "UNEXPECTED OUTCOME... didn't expect error but it was\n";
+            print '    PEAR::DB errorcode: ' . $e->getCode() . "\n";
+            print '    ' . $e->getUserInfo() . "\n";
+        } else {
+            print "matches expected outcome\n";
+        }
+    }
+}
+
+/**
+ * Local error callback handler
+ * 
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o) {
+    print "\n---------------\n";
+    print "Having problems creating a table for testing...\n";
+    print $o->getDebugInfo() . "\n";
+    print "---------------\n";
+}
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+
+
+print 'DB_ERROR_NOSUCHTABLE for select:  ';
+$res = $dbh->query('SELECT * FROM tableThatsBogus');
+check_error($res, DB_ERROR_NOSUCHTABLE);
+
+print 'DB_ERROR_NOSUCHTABLE for drop:  ';
+$res = drop_table($dbh, 'tableThatsBogus');
+check_error($res, DB_ERROR_NOSUCHTABLE);
+
+print 'DB_ERROR_NOT_FOUND for drop index:  ';
+switch ($dbh->phptype . ':' . $dbh->dbsyntax) {
+    case 'fbsql:fbsql':
+    case 'ibase:firebird':
+    case 'ibase:ibase':
+    case 'ifx:ifx':
+    case 'odbc:db2':
+    case 'oci8:oci8':
+    case 'pgsql:pgsql':
+    case 'sqlite:sqlite':
+        $res = $dbh->query('DROP INDEX fakeindex');
+        break;
+    case 'mssql:mssql':
+    case 'sybase:sybase':
+        $res = $dbh->query('DROP INDEX phptest.fakeindex');
+        break;
+    case 'msql:msql':
+        $res = $dbh->query('DROP INDEX fakeindex FROM phptest');
+        break;
+    default:
+        $res = $dbh->query('DROP INDEX fakeindex ON phptest');
+}
+check_error($res, DB_ERROR_NOT_FOUND);
+
+
+print 'DB_ERROR_ALREADY_EXISTS for create table:  ';
+$res = $dbh->query($test_mktable_query);
+check_error($res, DB_ERROR_ALREADY_EXISTS);
+
+print 'DB_ERROR_ALREADY_EXISTS for create index:  ';
+$res = drop_table($dbh, 'a');
+$dbh->pushErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+$res = $dbh->query('CREATE TABLE a (a INTEGER)');
+$dbh->popErrorHandling();
+$res = $dbh->query('CREATE INDEX aa_idx ON a (a)');
+$res = $dbh->query('CREATE INDEX aa_idx ON a (a)');
+switch ($dbh->phptype) {
+    case 'fbsql':
+        // FrontBase doesn't assign a specific code for this yet.
+        check_error($res, DB_ERROR_ALREADY_EXISTS, false);
+        break;
+    default:
+        check_error($res, DB_ERROR_ALREADY_EXISTS);
+}
+$res = drop_table($dbh, 'a');
+
+
+print 'DB_ERROR_CONSTRAINT for primary key insert duplicate:  ';
+$res = drop_table($dbh, 'a');
+$dbh->pushErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+switch ($dbh->phptype) {
+    case 'msql':
+        $res = $dbh->query('CREATE TABLE a (a INTEGER NOT NULL)');
+        $res = $dbh->query('CREATE UNIQUE INDEX apk ON a (a)');
+        break;
+    default:
+        $res = $dbh->query('CREATE TABLE a (a INTEGER NOT NULL, PRIMARY KEY (a))');
+}
+$dbh->popErrorHandling();
+$res = $dbh->query('INSERT INTO a VALUES (1)');
+$res = $dbh->query('INSERT INTO a VALUES (1)');
+check_error($res, DB_ERROR_CONSTRAINT);
+
+
+print 'DB_ERROR_CONSTRAINT for primary key update duplicate:  ';
+$res = $dbh->query('INSERT INTO a VALUES (2)');
+$res = $dbh->query('UPDATE a SET a=1 WHERE a=2');
+check_error($res, DB_ERROR_CONSTRAINT);
+
+
+print 'DB_ERROR_CONSTRAINT for unique key insert duplicate:  ';
+$res = drop_table($dbh, 'a');
+$dbh->pushErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+switch ($dbh->phptype) {
+    case 'msql':
+        $res = $dbh->query('CREATE TABLE a (a INTEGER NOT NULL)');
+        $res = $dbh->query('CREATE UNIQUE INDEX auk ON a (a)');
+        break;
+    default:
+        $res = $dbh->query('CREATE TABLE a (a INTEGER NOT NULL, UNIQUE (a))');
+}
+$dbh->popErrorHandling();
+$res = $dbh->query('INSERT INTO a VALUES (1)');
+$res = $dbh->query('INSERT INTO a VALUES (1)');
+check_error($res, DB_ERROR_CONSTRAINT);
+
+
+print 'DB_ERROR_CONSTRAINT for unique key update duplicate:  ';
+$res = $dbh->query('INSERT INTO a VALUES (2)');
+$res = $dbh->query('UPDATE a SET a=1 WHERE a=2');
+check_error($res, DB_ERROR_CONSTRAINT);
+
+
+print 'DB_ERROR_CONSTRAINT for foreign key on insert:  ';
+$res = drop_table($dbh, 'b');
+$res = drop_table($dbh, 'a');
+$dbh->pushErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+switch ($dbh->phptype) {
+    case 'mysql':
+    case 'mysqli':
+        $res = $dbh->query('CREATE TABLE a (a INT NOT NULL, '
+                    . 'PRIMARY KEY (a)) '
+                    . 'TYPE=INNODB');
+        $res = $dbh->query('CREATE TABLE b (b INT, '
+                    . 'INDEX par_ind (b), '
+                    . 'FOREIGN KEY (b) REFERENCES a (a)) '
+                    . 'TYPE=INNODB');
+        $dbh->popErrorHandling();
+        break;
+
+    case 'msql':
+        // msql does not support foreign keys
+        $res = $dbh->query('CREATE TABLE a (a INTEGER NOT NULL)');
+        $res = $dbh->query('CREATE UNIQUE INDEX auk ON a (a)');
+        $dbh->popErrorHandling();
+        $res = $dbh->query('CREATE TABLE b (b INTEGER REFERENCES a (a))');
+        if (DB::isError($res)) {
+            print "matches expected outcome\n";
+            print "DB_ERROR_CONSTRAINT for foreign key on delete:  matches expected outcome\n";
+        } else {
+            print "WOW, it seems mSQL now supports references\n";
+            print "WOW, it seems mSQL now supports references\n";
+        }
+        break;
+
+    default:
+        $res = $dbh->query('CREATE TABLE a (a INTEGER NOT NULL, PRIMARY KEY (a))');
+        $res = $dbh->query('CREATE TABLE b (b INTEGER REFERENCES a (a))');
+        $dbh->popErrorHandling();
+}
+
+if ($dbh->phptype != 'msql') {
+    $res = $dbh->query('INSERT INTO a (a) values (1)');
+    $res = $dbh->query('INSERT INTO b (b) values (2)');
+    switch ($dbh->phptype) {
+        case 'sqlite':
+            check_error($res, DB_ERROR_CONSTRAINT, false);
+            break;
+        default:
+            check_error($res, DB_ERROR_CONSTRAINT);
+    }   
+
+    print 'DB_ERROR_CONSTRAINT for foreign key on delete:  ';
+    $res = $dbh->query('INSERT INTO b (b) values (1)');
+    $res = $dbh->query('DELETE FROM a WHERE a = 1');
+    switch ($dbh->phptype) {
+        case 'sqlite':
+            check_error($res, DB_ERROR_CONSTRAINT, false);
+            break;
+        default:
+            check_error($res, DB_ERROR_CONSTRAINT);
+    }
+}
+
+
+print 'DB_ERROR_CONSTRAINT_NOT_NULL on insert:  ';
+$res = drop_table($dbh, 'peartestnull');
+$dbh->pushErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+$res = $dbh->query('CREATE TABLE peartestnull (a CHAR(3) NOT NULL)');
+$dbh->popErrorHandling();
+$res = $dbh->query('INSERT INTO peartestnull VALUES (NULL)');
+check_error($res, DB_ERROR_CONSTRAINT_NOT_NULL);
+
+
+print 'DB_ERROR_CONSTRAINT_NOT_NULL on update:  ';
+$res = $dbh->query("INSERT INTO peartestnull VALUES ('one')");
+$res = $dbh->query("UPDATE peartestnull SET a = NULL WHERE a = 'one'");
+switch ($dbh->phptype) {
+    case 'mysql':
+    case 'mysqli':
+        check_error($res, DB_ERROR_CONSTRAINT_NOT_NULL, false);
+        break;
+    default:
+        check_error($res, DB_ERROR_CONSTRAINT_NOT_NULL);
+}
+
+
+print 'DB_ERROR_NOSUCHFIELD joining ON bogus column:  ';
+$res = $dbh->query('SELECT * FROM phptest JOIN a ON (phptest.a = a.b)');
+switch ($dbh->phptype . ':' . $dbh->dbsyntax) {
+    case 'msql:msql':
+    case 'odbc:access':
+        check_error($res, DB_ERROR_SYNTAX);
+        break;
+    default:
+        check_error($res, DB_ERROR_NOSUCHFIELD);
+}
+
+
+print 'DB_ERROR_NOSUCHFIELD joining USING bogus column:  ';
+$res = $dbh->query('SELECT * FROM phptest JOIN a USING (b)');
+switch ($dbh->phptype . ':' . $dbh->dbsyntax) {
+    case 'ibase:ibase':
+    case 'ibase:firebird':
+    case 'msql:msql':
+    case 'odbc:access':
+    case 'odbc:db2':
+    case 'sybase:sybase':
+        check_error($res, DB_ERROR_SYNTAX);
+        break;
+    default:
+        check_error($res, DB_ERROR_NOSUCHFIELD);
+}
+
+
+print 'DB_ERROR_DIVZERO:  ';
+// Interbase detects the error on fetching
+$res = $dbh->getAll('SELECT 0/0 FROM phptest');
+switch ($dbh->phptype) {
+    case 'odbc':
+        switch ($dbh->dbsyntax) {
+            case 'access':
+                check_error($res, DB_ERROR_DIVZERO, false);
+                break;
+            case 'db2':
+                check_error($res, DB_ERROR_DIVZERO);
+                break;
+        }
+        break;
+    case 'ibase':
+    case 'ifx':
+    case 'fbsql':
+    case 'mssql':
+    case 'mysql':
+    case 'mysqli':
+    case 'sqlite':
+    case 'sybase':
+        check_error($res, DB_ERROR_DIVZERO, false);
+        break;
+    case 'msql':
+        check_error($res, DB_ERROR_SYNTAX);
+        break;
+    default:
+        check_error($res, DB_ERROR_DIVZERO);
+}
+
+
+print 'DB_ERROR_INVALID_NUMBER putting chars in INT column:  ';
+$res = $dbh->query("UPDATE phptest SET a = 'abc' WHERE a = 42");
+switch ($dbh->phptype) {
+    case 'mysql':
+    case 'mysqli':
+    case 'sqlite':
+        check_error($res, DB_ERROR_INVALID_NUMBER, false);
+        break;
+    default:
+        check_error($res, DB_ERROR_INVALID_NUMBER);
+}
+
+
+print 'DB_ERROR_INVALID_NUMBER putting float in INT column:  ';
+$res = $dbh->query("UPDATE phptest SET a = 8.9 WHERE a = 42");
+switch ($dbh->phptype) {
+    case 'fbsql':
+    case 'ibase':
+    case 'ifx':
+    case 'mssql':
+    case 'mysql':
+    case 'mysqli':
+    case 'oci8':
+    case 'odbc':
+    case 'pgsql':
+    case 'sqlite':
+        check_error($res, DB_ERROR_INVALID_NUMBER, false);
+        break;
+    default:
+        check_error($res, DB_ERROR_INVALID_NUMBER);
+}
+
+
+print 'DB_ERROR_INVALID_NUMBER putting excessive int in INT column:  ';
+$res = $dbh->query("UPDATE phptest SET a = 18446744073709551616 WHERE a = 42");
+switch ($dbh->phptype . ':' . $dbh->dbsyntax) {
+    case 'ibase:ibase':
+    case 'ibase:firebird':
+        check_error($res, DB_ERROR_SYNTAX);
+        break;
+    case 'fbsql:fbsql':
+    case 'msql:msql':
+    case 'mssql:mssql':
+    case 'mysql:mysql':
+    case 'mysqli:mysqli':
+    case 'oci8:oci8':
+    case 'odbc:access':
+    case 'sqlite:sqlite':
+        check_error($res, DB_ERROR_INVALID_NUMBER, false);
+        break;
+    default:
+        check_error($res, DB_ERROR_INVALID_NUMBER);
+}
+
+
+print 'DB_ERROR_INVALID_NUMBER putting int in CHAR column:  ';
+$res = $dbh->query("UPDATE phptest SET b = 8 WHERE a = 42");
+switch ($dbh->phptype . ':' . $dbh->dbsyntax) {
+    case 'ibase:ibase':
+    case 'ibase:firebird':
+    case 'ifx:ifx':
+    case 'mssql:mssql':
+    case 'mysql:mysql':
+    case 'mysqli:mysqli':
+    case 'oci8:oci8':
+    case 'odbc:access':
+    case 'pgsql:pgsql':
+    case 'sqlite:sqlite':
+        check_error($res, DB_ERROR_INVALID_NUMBER, false);
+        break;
+    default:
+        check_error($res, DB_ERROR_INVALID_NUMBER);
+}
+
+
+print 'DB_ERROR_NOSUCHFIELD:  ';
+$res = $dbh->query('SELECT e FROM phptest');
+check_error($res, DB_ERROR_NOSUCHFIELD);
+
+
+print 'DB_ERROR_SYNTAX:  ';
+$res = $dbh->query('CREATE');
+check_error($res, DB_ERROR_SYNTAX);
+
+
+print 'DB_ERROR_VALUE_COUNT_ON_ROW:  ';
+$res = $dbh->query('INSERT INTO phptest (a) VALUES (678, 2)');
+switch ($dbh->phptype) {
+    case 'msql':
+        check_error($res, DB_ERROR_VALUE_COUNT_ON_ROW, false);
+        break;
+    default:
+        check_error($res, DB_ERROR_VALUE_COUNT_ON_ROW);
+}
+
+
+print 'DB_ERROR_INVALID on CHAR column data too long:  ';
+$res = $dbh->query("INSERT INTO phptest (b) VALUES ('123456789.123456789.123456789.123456789.1')");
+switch ($dbh->phptype . ':' . $dbh->dbsyntax) {
+    case 'msql:msql':
+    case 'mssql:mssql':
+    case 'mysql:mysql':
+    case 'mysqli:mysqli':
+    case 'odbc:access':
+    case 'sqlite:sqlite':
+    case 'sybase:sybase':
+        check_error($res, DB_ERROR_INVALID, false);
+        break;
+    case 'fbsql:fbsql':
+        check_error($res, DB_ERROR_TRUNCATED);
+        break;
+    default:
+        check_error($res, DB_ERROR_INVALID);
+}
+
+
+print 'DB_ERROR_INVALID on VARCHAR column data too long:  ';
+$res = $dbh->query("INSERT INTO phptest (d) VALUES ('123456789.123456789.1')");
+switch ($dbh->phptype . ':' . $dbh->dbsyntax) {
+    case 'msql:msql':
+    case 'mssql:mssql':
+    case 'mysql:mysql':
+    case 'mysqli:mysqli':
+    case 'odbc:access':
+    case 'sqlite:sqlite':
+    case 'sybase:sybase':
+        check_error($res, DB_ERROR_INVALID, false);
+        break;
+    case 'fbsql:fbsql':
+        check_error($res, DB_ERROR_TRUNCATED);
+        break;
+    default:
+        check_error($res, DB_ERROR_INVALID);
+}
+
+
+
+drop_table($dbh, 'phptest');
+drop_table($dbh, 'b');
+drop_table($dbh, 'a');
+drop_table($dbh, 'peartestnull');
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/fetchmode_object.inc b/campcaster/src/tools/pear/src/tests/DB/tests/fetchmode_object.inc
new file mode 100644
index 000000000..710a057d3
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/fetchmode_object.inc
@@ -0,0 +1,111 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: fetchmode_object.inc,v 1.11 2005/02/03 05:49:44 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+error_reporting(E_ALL);
+
+/**
+ * Local error callback handler
+ *
+ * Drops the phptest table, prints out an error message and kills the
+ * process.
+ *
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o) {
+    global $dbh;
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    die($o->toString());
+}
+
+/**
+ * Print out the object
+ */
+function print_obj(&$obj) {
+    if (!is_object($obj)) {
+        echo "ERROR: no object!\n";
+    } else {
+        echo strtolower(get_class($obj)) . ' -> ' . implode(' ', array_keys((array)$obj)) . "\n";
+    }
+}
+
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+echo "--- fetch with param DB_FETCHMODE_OBJECT ---\n";
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = $sth->fetchRow(DB_FETCHMODE_OBJECT);
+print_obj($row);
+$sth->free();  // keep fbsql happy.
+
+$sth = $dbh->query("SELECT * FROM phptest");
+$sth->fetchInto($row, DB_FETCHMODE_OBJECT);
+print_obj($row);
+$sth->free();  // keep fbsql happy.
+
+echo "--- fetch with default fetchmode DB_FETCHMODE_OBJECT ---\n";
+$dbh->setFetchMode(DB_FETCHMODE_OBJECT);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = $sth->fetchRow();
+print_obj($row);
+$sth->free();  // keep fbsql happy.
+
+$sth = $dbh->query("SELECT * FROM phptest");
+$sth->fetchInto($row);
+print_obj($row);
+$sth->free();  // keep fbsql happy.
+
+echo "--- fetch with default fetchmode DB_FETCHMODE_OBJECT and class DB_row ---\n";
+$dbh->setFetchMode(DB_FETCHMODE_OBJECT, 'DB_row');
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = $sth->fetchRow();
+print_obj($row);
+$sth->free();  // keep fbsql happy.
+
+$sth = $dbh->query("SELECT * FROM phptest");
+$sth->fetchInto($row);
+print_obj($row);
+$sth->free();  // keep fbsql happy.
+
+echo "--- fetch with default fetchmode DB_FETCHMODE_OBJECT with no class then DB_row ---\n";
+$dbh->setFetchMode(DB_FETCHMODE_OBJECT);
+$sth = $dbh->query('SELECT * FROM phptest');
+$row = $sth->fetchRow();
+print_obj($row);
+$sth->free();  // keep fbsql happy.
+
+$dbh->setFetchMode(DB_FETCHMODE_OBJECT, 'DB_row');
+$sth = $dbh->query('SELECT * FROM phptest');
+$row = $sth->fetchRow();
+print_obj($row);
+
+$sth->free();  // keep fbsql happy.
+               // keep ibase happy: can't drop tbl that has results open against it.
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/fetchmodes.inc b/campcaster/src/tools/pear/src/tests/DB/tests/fetchmodes.inc
new file mode 100644
index 000000000..761c6754b
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/fetchmodes.inc
@@ -0,0 +1,170 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: fetchmodes.inc,v 1.11 2005/02/14 17:04:14 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Local error callback handler
+ *
+ * Drops the phptest table, prints out an error message and kills the
+ * process.
+ *
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o) {
+    global $dbh;
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    die($o->toString());
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+$dbh->setOption('autofree', true);
+
+$dbh->query("INSERT INTO phptest VALUES (1, 'one', 'One', '2001-02-16')");
+$dbh->query("INSERT INTO phptest VALUES (2, 'two', 'Two', '2001-02-15')");
+$dbh->query("INSERT INTO phptest VALUES (3, 'three', 'Three', '2001-02-14')");
+
+print "testing fetchrow:\n";
+$sth = $dbh->query("SELECT * FROM phptest");
+for ($i = 1; $i <= 5; $i++) {
+    print "row $i: ";
+    $row = $sth->fetchRow();
+    if (DB::isError($row)) {
+        print $row->toString() . "\n";
+        continue;
+    }
+    if (is_array($row)) {
+        print implode(', ', $row) . "\n";
+    } else {
+        var_dump($row);
+    }
+}
+$sth->free();  // keep fbsql happy.
+
+$dbh->query('DELETE FROM phptest WHERE a <> 42');
+
+
+print "testing fetchmodes: fetchrow default default, portability mode DB_PORTABILITY_ALL ^ DB_PORTABILITY_RTRIM\n";
+$dbh->setOption('portability', DB_PORTABILITY_ALL ^ DB_PORTABILITY_RTRIM);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = $sth->fetchRow();
+print implode(" ", array_keys($row))."\n";
+$actual = implode(' ', array_values($row));
+switch ($dbh->phptype) {
+    case 'fbsql':
+    case 'msql':
+    case 'mysql':
+    case 'mysqli':
+    case 'sqlite':
+        $expected = '42 bing This is a test 1999-11-21';
+        break;
+    case 'ifx':
+        $expected = '42 bing                                     This is a test                                                                                                                                                                                                                                                  1999-11-21          ';
+        break;
+    default:
+        $expected = '42 bing                                     This is a test 1999-11-21';
+}
+if ($actual == $expected) {
+    echo "output matched expected format\n";
+} else {
+    echo "DIDN'T MATCH!  Expected output: '$expected'.  Actual output: '$actual'.\n";
+}
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchinto default default\n";
+$dbh->setOption('portability', DB_PORTABILITY_ALL);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = array();
+$sth->fetchInto($row);
+print implode(" ", array_keys($row))."\n";
+print implode(' ', array_values($row))."\n";
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchrow ordered default\n";
+$dbh->setFetchMode(DB_FETCHMODE_ORDERED);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = $sth->fetchRow();
+print implode(" ", array_keys($row))."\n";
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchrow assoc default\n";
+$dbh->setFetchMode(DB_FETCHMODE_ASSOC);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = $sth->fetchRow();
+print implode(" ", array_keys($row))."\n";
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchrow ordered default with assoc specified\n";
+$dbh->setFetchMode(DB_FETCHMODE_ORDERED);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = $sth->fetchRow(DB_FETCHMODE_ASSOC);
+print implode(" ", array_keys($row))."\n";
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchrow assoc default with ordered specified\n";
+$dbh->setFetchMode(DB_FETCHMODE_ASSOC);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = $sth->fetchRow(DB_FETCHMODE_ORDERED);
+print implode(" ", array_keys($row))."\n";
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchinto ordered default\n";
+$dbh->setFetchMode(DB_FETCHMODE_ORDERED);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = array();
+$sth->fetchInto($row);
+print implode(" ", array_keys($row))."\n";
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchinto assoc default\n";
+$dbh->setFetchMode(DB_FETCHMODE_ASSOC);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = array();
+$sth->fetchInto($row);
+print implode(" ", array_keys($row))."\n";
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchinto ordered default with assoc specified\n";
+$dbh->setFetchMode(DB_FETCHMODE_ORDERED);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = array();
+$sth->fetchInto($row, DB_FETCHMODE_ASSOC);
+print implode(" ", array_keys($row))."\n";
+$sth->free();  // keep fbsql happy.
+
+print "testing fetchmodes: fetchinto assoc default with ordered specified\n";
+$dbh->setFetchMode(DB_FETCHMODE_ASSOC);
+$sth = $dbh->query("SELECT * FROM phptest");
+$row = array();
+$sth->fetchInto($row, DB_FETCHMODE_ORDERED);
+print implode(" ", array_keys($row))."\n";
+
+$sth->free();  // keep fbsql happy.
+               // keep ibase happy: can't drop tbl that has results open against it.
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/include.inc b/campcaster/src/tools/pear/src/tests/DB/tests/include.inc
new file mode 100644
index 000000000..1234a2793
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/include.inc
@@ -0,0 +1,62 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: include.inc,v 1.5 2005/02/03 05:49:44 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+error_reporting(E_ALL);
+
+if (!defined('PATH_SEPARATOR')) {
+    if (stristr(PHP_OS, 'WIN')) {
+        /**
+         * Define the path separator for windows
+         */
+        define('PATH_SEPARATOR', ';');
+    } else {
+        /**
+         * Define the path separator for other systems
+         */
+        define('PATH_SEPARATOR', ':');
+    }
+}
+
+/*
+ * If the path to your PEAR installation is found in the left hand
+ * portion of the if() expression below, that means this file has
+ * come from the PEAR installer.  Therefore, let's use the
+ * installed version of DB, which should be found via the
+ * computer's default include_path.  Add '.' to the include_path
+ * to ensure '.' is in there.
+ * 
+ * If the path has not been substituted in the if() expression,
+ * this file has likely come from a CVS checkout or a .tar file.
+ * Therefore, we'll assume the tests should use the version of
+ * DB that has come from there as well.
+ */
+if ('/home/paul/software/campcaster/campcaster/usr/lib/pear' != '@'.'include_path'.'@') {
+    ini_set('include_path', ini_get('include_path')
+            . PATH_SEPARATOR . '.'
+    );
+} else {
+    ini_set('include_path', realpath(dirname(__FILE__) . '/..')
+            . PATH_SEPARATOR . '.' . PATH_SEPARATOR
+            . ini_get('include_path')
+    );
+}
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/limit.inc b/campcaster/src/tools/pear/src/tests/DB/tests/limit.inc
new file mode 100644
index 000000000..558e2b1fb
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/limit.inc
@@ -0,0 +1,86 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: limit.inc,v 1.11 2005/02/03 05:49:44 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+error_reporting(E_ALL);
+
+/**
+ * Local error callback handler
+ *
+ * Drops the phptest table, prints out an error message and kills the
+ * process.
+ *
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o) {
+    global $dbh;
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    die($o->toString());
+}
+
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'php_limit');
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+$dbh->query('CREATE TABLE php_limit (a CHAR(20))');
+
+
+$from    = 0;
+$count   = 10;
+$numrows = 30;
+
+for ($i=0; $i<=$numrows+2; $i++) {
+    $dbh->query("INSERT INTO php_limit VALUES('result $i')");
+}
+for ($i = 0; $i <= 3; $i++) {
+    $from = 10 * $i;
+    $res = $dbh->limitQuery("select * from php_limit", $from, $count);
+    echo "======= From: $from || Number of rows to fetch: $count =======\n";
+    while ($row = $res->fetchRow(DB_FETCHMODE_ASSOC)) {
+        echo $res->getRowCounter() . '.- ' . $row['a'] . "\n";
+    }
+    $res->free();  // keep fbsql happy.
+}
+
+
+$from  = 11;
+$count = 3;
+
+echo "======= Passing \$params || From: $from || Number of rows to fetch: $count =======\n";
+$res = $dbh->limitQuery('SELECT * FROM php_limit WHERE a < ?', $from, $count, array('result 99'));
+while ($row = $res->fetchRow(DB_FETCHMODE_ASSOC)) {
+    echo $res->getRowCounter() . '.- ' . $row['a'] . "\n";
+}
+
+$res->free();  // keep fbsql happy.
+               // keep ibase happy: can't drop tbl that has results open against it.
+
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'php_limit');
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/numcols.inc b/campcaster/src/tools/pear/src/tests/DB/tests/numcols.inc
new file mode 100644
index 000000000..367a89c09
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/numcols.inc
@@ -0,0 +1,67 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: numcols.inc,v 1.7 2005/02/03 05:49:44 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Local error callback handler
+ *
+ * Drops the phptest table, prints out an error message and kills the
+ * process.
+ *
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o) {
+    global $dbh;
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    die($o->toString());
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+$sth = $dbh->query("SELECT a FROM phptest");
+printf("%d\n", $sth->numCols());
+$sth = $dbh->query("SELECT a,b FROM phptest");
+printf("%d\n", $sth->numCols());
+$sth = $dbh->query("SELECT a,b,c FROM phptest");
+printf("%d\n", $sth->numCols());
+$sth = $dbh->query("SELECT * FROM phptest");
+printf("%d\n", $sth->numCols());
+
+
+switch ($dbh->phptype) {
+    case 'ibase':
+        /*
+         * Interbase doesn't allow dropping tables that have result
+         * sets still open.
+         */
+        $dbh->freeResult($sth->result);
+        break;
+}
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/numrows.inc b/campcaster/src/tools/pear/src/tests/DB/tests/numrows.inc
new file mode 100644
index 000000000..64210c66c
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/numrows.inc
@@ -0,0 +1,110 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: numrows.inc,v 1.12 2005/02/09 07:07:24 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Local error callback handler
+ *
+ * Drops the phptest table, prints out an error message and kills the
+ * process.
+ *
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o) {
+    global $dbh;
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    print "\n------------\n";
+    if ($o->getCode() == DB_ERROR_NOT_CAPABLE) {
+        print "This DBMS does not support numRows().";
+    } elseif ($o->getCode() == DB_ERROR_MISMATCH) {
+        print "Mismatch between the number of placeholders and parameters.\n";
+        foreach ($o->backtrace as $item => $detail) {
+            if ($detail['function'] == 'query') {
+                echo 'QUERY: ' . $detail['args'][0] . "\n";
+                echo "PARAMETERS:\n";
+                print_r($detail['args'][1]);
+            }
+        }
+    } else {
+        print $o->getDebugInfo() . "\n";
+    }
+    exit;
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+$res = $dbh->query("SELECT a FROM phptest");
+if (!DB::isError($rows = $res->numRows())) {
+    print "(want 1) got $rows from first\n";
+} else {
+    print "\n";
+}
+for ($i = 0; $i < 5; $i++) {
+    $dbh->query("INSERT INTO phptest (a) VALUES ($i)");
+    $res = $dbh->query("SELECT a FROM phptest");
+    if (!DB::isError($rows = $res->numRows())) {
+        print '(want ' . ($i + 2) . ") got $rows from $i\n";
+    } else {
+        print "\n";
+    }
+}
+
+$res = $dbh->query('SELECT a FROM phptest WHERE a > ?', 0);
+if (!DB::isError($rows = $res->numRows())) {
+    print "(want 5) got $rows from > 0 (passing params to query)\n";
+} else {
+    print "\n";
+}
+
+$sth = $dbh->prepare('SELECT a FROM phptest WHERE a < ?');
+$res = $dbh->execute($sth, array(4));
+if (!DB::isError($rows = $res->numRows())) {
+    print "(want 4) got $rows from < 4 (doing prepare/execute)\n";
+} else {
+    print "\n";
+}
+
+$dbh->query("DELETE FROM phptest WHERE a < 4");
+$res = $dbh->query("SELECT a FROM phptest");
+if (!DB::isError($rows = $res->numRows())) {
+    print "(want 2) got $rows from 5 and 6 not deleted\n";
+} else {
+    print "\n";
+}
+$res = $dbh->query("SELECT a FROM phptest where a < 0");
+if (!DB::isError($rows = $res->numRows())) {
+    print "(want 0) got $rows from < 0\n";
+} else {
+    print "\n";
+}
+
+
+$res->free();  // keep ibase happy
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/prepexe.inc b/campcaster/src/tools/pear/src/tests/DB/tests/prepexe.inc
new file mode 100644
index 000000000..40d65953d
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/prepexe.inc
@@ -0,0 +1,241 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: prepexe.inc,v 1.25 2005/02/16 13:54:51 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+$tmpfile = tempnam("/tmp", "phptmp");
+register_shutdown_function("my_shutdown");
+$fp = fopen($tmpfile, "w");
+$filedata = "opaque placeholder's test";
+fwrite($fp, $filedata);
+fclose($fp);
+
+
+/**
+ * Local error callback handler
+ *
+ * Prints out an error message and kills the process.
+ *
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o) {
+    print "\n" . $o->toString();
+    exit;
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+// 1) Multiple prepare/exec INSERT queries
+echo "------------1------------\n";
+
+$sth1 = $dbh->prepare("INSERT INTO phptest (a, b) VALUES (?, 'a')");
+$sth2 = $dbh->prepare("INSERT INTO phptest (a,b) VALUES (!,?)");
+$sth3 = $dbh->prepare("INSERT INTO phptest (a,b,c) VALUES (?,!,&)");
+$sth4 = $dbh->prepare("INSERT INTO phptest (a, b) VALUES (72, 'direct')");
+print "sth1,sth2,sth3,sth4 created\n";
+print 'sth1: ? as param, passing as array... ';
+if (($res = $dbh->execute($sth1, array(72))) === DB_OK) {
+    print "sth1 executed\n";
+} else {
+    print "sth1 failed\n";
+}
+
+print 'sth2: ! and ? as params, passing as array... ';
+if (($res = $dbh->execute($sth2, array(72, "that's right"))) === DB_OK) {
+    print "sth2 executed\n";
+} else {
+    print "sth2 failed\n";
+}
+
+print 'sth3: ?, ! and & as params, passing as array... ';
+switch ($dbh->phptype) {
+    case 'msql':
+        $res = $dbh->execute($sth3, array(72, "'it\\'s good'", $tmpfile));
+        break;
+    default:
+        $res = $dbh->execute($sth3, array(72, "'it''s good'", $tmpfile));
+}
+if ($res === DB_OK) {
+    print "sth3 executed\n";
+} else {
+    print "sth3 failed\n";
+}
+
+print 'sth4: no params... ';
+if (($res = $dbh->execute($sth4)) === DB_OK) {
+    print "sth4 executed\n";
+} else {
+    print "sth4 failed\n";
+}
+print_results();
+
+
+// 2) One prepared, multiple time executed
+echo "\n------------2------------\n";
+
+$dbh->query('DELETE FROM phptest');
+$sth = $dbh->prepare('INSERT INTO phptest (a, b, c, d) VALUES (?, ?, &, ?)');
+$data = array(
+    0 => array(72, 'set1', $tmpfile, '1234-56-78'),
+    1 => array(72, 'set2', $tmpfile, null),
+    2 => array(72, 'set3', $tmpfile, null)
+);
+$res = $dbh->executeMultiple($sth, $data);
+print_results();
+
+
+// 3) freePrepared() test
+echo "\n------------3------------\n";
+
+if ($dbh->freePrepared($sth)) {
+    echo 'TRUE';
+} else {
+    echo 'FALSE';
+}
+echo "\n";
+if ($dbh->freePrepared(666)) {
+    echo 'TRUE';
+} else {
+    echo 'FALSE';
+}
+echo "\n";
+
+
+// 4) SELECTs tests
+echo "\n------------4------------\n";
+$sth1 = $dbh->prepare("SELECT * FROM phptest WHERE a = ? ORDER BY b");
+print_4($sth1, 72);
+print_4($sth1, 71);
+$sth2 = $dbh->prepare("SELECT * FROM phptest WHERE d = ? ORDER BY b");
+print_4($sth2, '1234-56-78');
+$sth3 = $dbh->prepare("SELECT * FROM phptest WHERE c = & ORDER BY b");
+print_4($sth3, $tmpfile);
+
+
+// 5) ASSOCIATIVE ARRAY queries
+echo "\n------------5------------\n";
+
+$sth5 = $dbh->prepare('INSERT INTO phptest (a, b, d) VALUES (?, ?, ?)');
+$array = array(
+    'foo' => 11,
+    'bar' => 'three',
+    'baz' => null,
+);
+$res = $dbh->execute($sth5, $array);
+print 'insert: ' . ($res === DB_OK ? 'okay' : 'error') . "\n";
+
+$sth6 = $dbh->prepare('SELECT a, b, d FROM phptest WHERE a = ?');
+$res = $dbh->execute($sth6, array(11));
+$row = $res->fetchRow(DB_FETCHMODE_ASSOC);
+print "a = {$row['a']}, b = {$row['b']}, d = ";
+if ($dbh->phptype == 'msql') {
+    if (array_key_exists('d', $row)) {
+        $type = gettype($row['d']);
+        if ($type == 'NULL' || $row['d'] == '') {
+            print "got expected outcome\n";
+        } else {
+            $type = gettype($row['d']);
+            print "UN-expected outcome: $type\n";
+        }
+    } else {
+        // http://bugs.php.net/?id=31960
+        print "Prior to PHP 4.3.11 or 5.0.4, PHP's msql extension silently"
+              . " dropped columns with null values. You need to upgrade.\n";
+    }
+} else {
+    $type = gettype($row['d']);
+    if ($type == 'string') {
+        print "got expected outcome\n";
+    } else {
+        print "UN-expected outcome: $type\n";
+    }
+}
+
+/**
+ * Automatically free the prepared statements and results when the script
+ * terminates
+ *
+ * @return void
+ */
+function my_shutdown() {
+    global $tmpfile, $dbh, $sth1, $sth2, $sth3, $sth4, $sth5, $sth6, $res;
+
+    switch ($dbh->phptype) {
+        case 'ibase':
+            /*
+             * Interbase doesn't allow dropping tables that have result
+             * sets still open.
+             */
+            $dbh->freePrepared($sth1);
+            $dbh->freePrepared($sth2);
+            $dbh->freePrepared($sth3);
+            $dbh->freePrepared($sth4);
+            $dbh->freePrepared($sth5);
+            $dbh->freePrepared($sth6);
+            $dbh->freeResult($res->result);
+            break;
+    }
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    unlink($tmpfile);
+}
+
+/**
+ * Print out the data in test table
+ *
+ * @return void
+ */
+function print_results() {
+    global $dbh;
+    print "results:\n";
+    $res = $dbh->query("SELECT * FROM phptest WHERE a = 72 ORDER BY b");
+    $i = 0;
+    while ($row = $res->fetchRow(DB_FETCHMODE_ORDERED)) {
+        print '|' . implode(" - ", $row) . "|\n";
+        $i++;
+    }
+    if (!$i) {
+        print "The records were not found.  Did they get inserted?\n";
+    }
+}
+
+/**
+ * Execute the prepared statement and print out the data in the result
+ *
+ * @param resource     $sth   the statement handle to process
+ * @param string|array $bind  the data that will replace the placeholders
+ *
+ * @return void
+ */
+function print_4($sth, $bind) {
+    global $dbh;
+    $res = $dbh->execute($sth, $bind);
+    while ($row = $res->fetchRow(DB_FETCHMODE_ORDERED)) {
+        print '|' . implode(" - ", $row) . "|\n";
+    }
+    echo "~~\n";
+}
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/run.cvs b/campcaster/src/tools/pear/src/tests/DB/tests/run.cvs
new file mode 100644
index 000000000..3a939c450
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/run.cvs
@@ -0,0 +1,40 @@
+#! /bin/sh
+
+# $Id: run.cvs,v 1.3 2004/02/20 18:57:51 danielc Exp $
+
+# vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
+# PEAR DB TEST STARTER
+#
+#   To run all tests:  ./run
+#   To run one test:   ./run 
+#   Example:           ./run db_parsedsn.phpt
+#
+# Before running the tests you must adjust the
+# following three variables:
+
+#   The full path to your PHP directory:
+    DB_TEST_PHP_PATH=c:/progra~1/php
+
+#   The name of your PHP CLI executable
+#   (examples php.exe, php-cli.exe, cli/php.exe):
+    DB_TEST_PHP_CLI=php.exe
+
+#   The full path to the present directory
+#   (not using $PWD due to Cygwin):
+    DB_TEST_DIR=d:/peartest/pear/DB/tests
+
+# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+
+
+
+TEST_PHP_EXECUTABLE=$DB_TEST_PHP_PATH/$DB_TEST_PHP_CLI
+export TEST_PHP_EXECUTABLE
+
+if [ $# -gt 0 ]
+then
+    test=$1
+else
+    test=*.phpt
+fi
+
+$TEST_PHP_EXECUTABLE $DB_TEST_PHP_PATH/run-tests.php $DB_TEST_DIR/${test}
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/sequences.inc b/campcaster/src/tools/pear/src/tests/DB/tests/sequences.inc
new file mode 100644
index 000000000..9e6aa8432
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/sequences.inc
@@ -0,0 +1,129 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: sequences.inc,v 1.11 2005/02/18 22:38:43 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Local error handler
+ */
+function error_handler(&$obj) {
+    print "sequences.inc error_handler:\n    ";
+    print $obj->getDebugInfo() . "\n\n";
+}
+ob_implicit_flush(true);
+
+$drop = $dbh->dropSequence('test');
+if (DB::isError($drop) &&
+    $drop->getCode() != DB_ERROR_NOSUCHTABLE)
+{
+    print "Could not drop sequence...\n";
+    print $drop->getDebugInfo() . "\n\n";
+    if ($dbh->phptype == 'ibase' &&
+        $drop->getCode() == DB_ERROR_ACCESS_VIOLATION)
+    {
+        print "Use this query to provide the permissions needed:\n";
+        print '   grant all on RDB$GENERATORS to ';
+    }
+    exit;
+}
+
+// 1) test that sequences are not created if "ondemand" is false
+
+$e = $dbh->nextId("test", false);
+if (DB::isError($e) && $e->getCode() == DB_ERROR_NOSUCHTABLE) {
+    print "an error is the proper response here\n";
+} else {
+    if (DB::isError($e)) {
+        if ($dbh->phptype == 'ibase' && $e->getCode() == DB_ERROR_SYNTAX) {
+            print "an error is the proper response here\n";
+        } else {
+            print "test 1) we expected to get back 'DB Error: no such table'.\n";
+            print "Here is the error we got:\n";
+            print 'Code: ' . $e->getCode() . "\n";
+            print 'Message: ' . $e->getMessage() . "\n";
+            print 'Debug: ' . $e->getDebugInfo() . "\n\n";
+        }
+    } else {
+        print "test 1) we expected to get back 'DB Error: no such table'.\n";
+        print "But an error wasn't generated\n\n";
+    }
+}
+
+// 2) test that the sequence is not created but the error is
+// handled by the class error handler
+$dbh->setErrorHandling(PEAR_ERROR_PRINT,
+                       "an error cought by the error handler is good\n");
+$e = $dbh->nextId("test", false);
+if (!DB::isError($e)) {
+    print "test 2) failed!\n";
+}
+$dbh->_default_error_mode = null;
+
+// 3) test that sequences are created if "ondemand" is true, and that
+// two successive nextIds return adjacent values
+$a = $dbh->nextId("test");
+$b = $dbh->nextId("test");
+if (DB::isError($a)) {
+    print 'a: ' . $a->getDebugInfo() . "\n\n";
+} else {
+    print "a=$a\n";
+}
+if (DB::isError($b)) {
+    print 'b: ' . $b->getDebugInfo() . "\n\n";
+} else {
+    print "b=$b\n";
+}
+if (!DB::isError($a) && !DB::isError($b)) {
+    print 'b-a=' . ($b-$a) . "\n";
+}
+
+// 4) test that the user-specified error handler is really disabled
+// during nextId, with per-object handler as well as global handler
+$dbh->dropSequence("test");
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'error_handler');
+$c = $dbh->nextId("test");
+if (!DB::isError($c)) {
+    print "c=$c\n";
+}
+$dbh->dropSequence("test");
+$dbh->_default_error_mode = null;
+$d = $dbh->nextId("test");
+if (!DB::isError($d)) {
+    print "d=$d\n";
+}
+
+// 5) test that the sequence is handled right when the table is empty
+
+// Backend with real sequences may don't like that
+PEAR::pushErrorHandling(PEAR_ERROR_RETURN);
+$dbh->query('DELETE FROM test_seq');
+PEAR::popErrorHandling();
+$e = $dbh->nextID('test');
+if (DB::isError($d)) {
+    print 'e: ' . $d->getDebugInfo() . "\n\n";
+} else {
+    print "e=$d\n";
+}
+
+// final clean-up
+$dbh->dropSequence("test");
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/simplequery.inc b/campcaster/src/tools/pear/src/tests/DB/tests/simplequery.inc
new file mode 100644
index 000000000..2cdfd9f1a
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/simplequery.inc
@@ -0,0 +1,76 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: simplequery.inc,v 1.8 2005/02/03 05:49:44 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Local error callback handler
+ *
+ * Drops the phptest table, prints out an error message and kills the
+ * process.
+ *
+ * @param object  $o  PEAR error object automatically passed to this method
+ * @return void
+ * @see PEAR::setErrorHandling()
+ */
+function pe($o) {
+    global $dbh;
+
+    $dbh->setErrorHandling(PEAR_ERROR_RETURN);
+    drop_table($dbh, 'phptest');
+
+    die($o->toString());
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'pe');
+
+
+$sth = $dbh->simpleQuery("SELECT * FROM phptest");
+
+switch ($dbh->phptype) {
+    case 'mysqli':
+        if (is_a($sth, 'mysqli_result')) {
+            print "passed\n";
+        } else {
+            print "PROBLEM\n";
+        }
+        break;
+    default:
+        if (gettype($sth) == 'resource') {
+            print "passed\n";
+        } else {
+            print "PROBLEM\n";
+        }
+}
+
+
+switch ($dbh->phptype) {
+    case 'ibase':
+        /*
+         * Interbase doesn't allow dropping tables that have result
+         * sets still open.
+         */
+        $dbh->freeResult($sth);
+        break;
+}
+$dbh->setErrorHandling(PEAR_ERROR_RETURN);
+drop_table($dbh, 'phptest');
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/skipif.inc b/campcaster/src/tools/pear/src/tests/DB/tests/skipif.inc
new file mode 100644
index 000000000..84b729d5f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/skipif.inc
@@ -0,0 +1,30 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: skipif.inc,v 1.2 2005/02/03 05:49:44 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+/**
+ * Set up the include_path, error_reporting and PATH_SEPARATOR
+ */
+require_once './include.inc';
+
+if (!include_once 'DB.php') {
+    print 'skip could not find DB.php';
+}
diff --git a/campcaster/src/tools/pear/src/tests/DB/tests/transactions.inc b/campcaster/src/tools/pear/src/tests/DB/tests/transactions.inc
new file mode 100644
index 000000000..ca1817d2d
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/DB/tests/transactions.inc
@@ -0,0 +1,101 @@
+
+ * @copyright  1997-2005 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    $Id: transactions.inc,v 1.9 2005/02/03 05:49:44 danielc Exp $
+ * @link       http://pear.php.net/package/DB
+ */
+
+// Testing here due to skip not working currently in head
+if (!$dbh->features['transactions']) {
+    die('this driver does not support transactions');
+}
+
+// View the table from a separate connection so we don't disturb
+// the transaction.
+$dbh2 = DB::connect($dbh->dsn);
+
+function error_handler(&$obj) {
+    print "\n" . $obj->getDebugInfo() . "\n";
+}
+
+function dumptable($expected) {
+    global $dbh, $dbh2;
+    print implode(' ', $dbh->getCol('SELECT b FROM phptest'));
+
+    if (isset($dbh->transaction_opcount)) {
+        if ($expected == $dbh->transaction_opcount) {
+            print ".  ops=ok\n";
+        } else {
+            print ".  ops=$dbh->transaction_opcount\n";
+        }
+    } else {
+        print ".  ops=ok\n";
+    }
+}
+
+$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, 'error_handler');
+
+
+$dbh->autoCommit(true);
+$dbh->query("INSERT INTO phptest VALUES(1, 'one', 'One', '2001-02-19')");
+
+print '1) after autocommit: ';
+dumptable(0);
+
+$dbh->autoCommit(false);
+$dbh->query("INSERT INTO phptest VALUES(2, 'two', 'Two', '2001-02-20')");
+$dbh->query("INSERT INTO phptest VALUES(3, 'three', 'Three', '2001-02-21')");
+print '2) before commit: ';
+dumptable(2);
+
+$dbh->commit();
+print '3) after commit: ';
+dumptable(0);
+
+$dbh->query("INSERT INTO phptest VALUES(4, 'four', 'Four', '2001-02-22')");
+$dbh->query("INSERT INTO phptest VALUES(5, 'five', 'Five', '2001-02-23')");
+print '4) before rollback: ';
+dumptable(2);
+
+$dbh->rollback();
+print '5) after rollback: ';
+dumptable(0);
+$dbh->rollback();
+
+$dbh->autoCommit(true);
+$dbh->query("INSERT INTO phptest VALUES(6, 'six', 'Six', '2001-02-24')");
+$dbh->query("INSERT INTO phptest VALUES(7, 'seven', 'Seven', '2001-02-25')");
+print '6) before autocommit+rollback: ';
+dumptable(0);
+
+$dbh->rollback();
+print '7) after autocommit+rollback: ';
+dumptable(0);
+
+print '8) testing that select doesn\'t disturbe opcount: ';
+$dbh->autoCommit(false);
+$dbh->simpleQuery("SELECT * FROM phptest");
+$dbh->simpleQuery("SELECT a,c FROM phptest");
+$dbh->simpleQuery("SELECT b,d FROM phptest");
+if (empty($dbh->transaction_opcount)) {
+    print "ok\n";
+} else {
+    print "failed (count=$dbh->transaction_opcount)\n";
+}
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/001.csv b/campcaster/src/tools/pear/src/tests/File/tests/CSV/001.csv
new file mode 100644
index 000000000..d217fb0fc
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/001.csv
@@ -0,0 +1,4 @@
+"Field 1-1", "Field 1-2", "Field 1-3", "Field 1-4"
+"Field 2-1", "Field 2-2", "Field 2-3"
+"Field 3-1", "Field 3-2"
+"Field 4-1"
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/001.phpt b/campcaster/src/tools/pear/src/tests/File/tests/CSV/001.phpt
new file mode 100644
index 000000000..1ec4dca08
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/001.phpt
@@ -0,0 +1,73 @@
+--TEST--
+File_CSV Test Case 001: Fields count less than expected
+--FILE--
+
+--EXPECT--
+Format:
+Array
+(
+    [fields] => 4
+    [sep] => ,
+    [quote] => "
+)
+
+Data:
+Array
+(
+    [0] => Array
+        (
+            [0] => Field 1-1
+            [1] => Field 1-2
+            [2] => Field 1-3
+            [3] => Field 1-4
+        )
+
+    [1] => Array
+        (
+            [0] => Field 2-1
+            [1] => Field 2-2
+            [2] => Field 2-3
+            [3] => 
+        )
+
+    [2] => Array
+        (
+            [0] => Field 3-1
+            [1] => Field 3-2
+            [2] => 
+            [3] => 
+        )
+
+    [3] => Array
+        (
+            [0] => Field 4-1
+            [1] => 
+            [2] => 
+            [3] => 
+        )
+
+)
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/002.csv b/campcaster/src/tools/pear/src/tests/File/tests/CSV/002.csv
new file mode 100644
index 000000000..bcd6ce0ca
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/002.csv
@@ -0,0 +1,4 @@
+"Field 1-1", "Field 1-2", "Field 1-3", "Field 1-4"
+"Field 2-1", "Field 2-2", "Field 2-3", "Field 2-4", "Extra Field"
+"Field 3-1", "Field 3-2"
+"Field 4-1"
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/002.phpt b/campcaster/src/tools/pear/src/tests/File/tests/CSV/002.phpt
new file mode 100644
index 000000000..958ded195
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/002.phpt
@@ -0,0 +1,73 @@
+--TEST--
+File_CSV Test Case 002: Fields count more than expected
+--FILE--
+
+--EXPECT--
+Format:
+Array
+(
+    [fields] => 4
+    [sep] => ,
+    [quote] => "
+)
+
+Data:
+Array
+(
+    [0] => Array
+        (
+            [0] => Field 1-1
+            [1] => Field 1-2
+            [2] => Field 1-3
+            [3] => Field 1-4
+        )
+
+    [1] => Array
+        (
+            [0] => Field 2-1
+            [1] => Field 2-2
+            [2] => Field 2-3
+            [3] => Field 2-4
+        )
+
+    [2] => Array
+        (
+            [0] => Field 3-1
+            [1] => Field 3-2
+            [2] => 
+            [3] => 
+        )
+
+    [3] => Array
+        (
+            [0] => Field 4-1
+            [1] => 
+            [2] => 
+            [3] => 
+        )
+
+)
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/003.csv b/campcaster/src/tools/pear/src/tests/File/tests/CSV/003.csv
new file mode 100644
index 000000000..2309d7257
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/003.csv
@@ -0,0 +1,4 @@
+"Field 1-1","Field 1-2","Field 1-3","Field 1-4"
+"Field 2-1","Field 2-2","Field 2-3","I'm multiline
+Field"
+"Field 3-1","Field 3-2","Field 3-3"
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/003.phpt b/campcaster/src/tools/pear/src/tests/File/tests/CSV/003.phpt
new file mode 100644
index 000000000..be572b3b8
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/003.phpt
@@ -0,0 +1,66 @@
+--TEST--
+File_CSV Test Case 003: Windows EOL
+--FILE--
+
+--EXPECT--
+Format:
+Array
+(
+    [fields] => 4
+    [sep] => ,
+    [quote] => "
+)
+
+Data:
+Array
+(
+    [0] => Array
+        (
+            [0] => Field 1-1
+            [1] => Field 1-2
+            [2] => Field 1-3
+            [3] => Field 1-4
+        )
+
+    [1] => Array
+        (
+            [0] => Field 2-1
+            [1] => Field 2-2
+            [2] => Field 2-3
+            [3] => I'm multiline
+Field
+        )
+
+    [2] => Array
+        (
+            [0] => Field 3-1
+            [1] => Field 3-2
+            [2] => Field 3-3
+            [3] => 
+        )
+
+)
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/004.csv b/campcaster/src/tools/pear/src/tests/File/tests/CSV/004.csv
new file mode 100644
index 000000000..62cb0f7a6
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/004.csv
@@ -0,0 +1,4 @@
+"Field 1-1","Field 1-2","Field 1-3","Field 1-4"
+"Field 2-1","Field 2-2","Field 2-3","I'm multiline
+Field"
+"Field 3-1","Field 3-2","Field 3-3"
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/004.phpt b/campcaster/src/tools/pear/src/tests/File/tests/CSV/004.phpt
new file mode 100644
index 000000000..6a85f7a58
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/004.phpt
@@ -0,0 +1,66 @@
+--TEST--
+File_CSV Test Case 004: Unix EOL
+--FILE--
+
+--EXPECT--
+Format:
+Array
+(
+    [fields] => 4
+    [sep] => ,
+    [quote] => "
+)
+
+Data:
+Array
+(
+    [0] => Array
+        (
+            [0] => Field 1-1
+            [1] => Field 1-2
+            [2] => Field 1-3
+            [3] => Field 1-4
+        )
+
+    [1] => Array
+        (
+            [0] => Field 2-1
+            [1] => Field 2-2
+            [2] => Field 2-3
+            [3] => I'm multiline
+Field
+        )
+
+    [2] => Array
+        (
+            [0] => Field 3-1
+            [1] => Field 3-2
+            [2] => Field 3-3
+            [3] => 
+        )
+
+)
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/005.csv b/campcaster/src/tools/pear/src/tests/File/tests/CSV/005.csv
new file mode 100644
index 000000000..3b26aa998
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/005.csv
@@ -0,0 +1 @@
+"Field 1-1","Field 1-2","Field 1-3","Field 1-4"
"Field 2-1","Field 2-2","Field 2-3","I'm multiline
Field"
"Field 3-1","Field 3-2","Field 3-3"
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/005.phpt b/campcaster/src/tools/pear/src/tests/File/tests/CSV/005.phpt
new file mode 100644
index 000000000..c982c6585
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/005.phpt
@@ -0,0 +1,84 @@
+--TEST--
+File_CSV Test Case 005: Mac EOL
+--FILE--
+ $row) {
+        if (strpos($row, "\r") !== false) {
+            $row = str_replace("\r", "_r_", $row);
+        }
+        if (strpos($row, "\n") !== false) {
+            $str = str_replace("\n", "_n_", $row);
+        }
+        if (strpos($row, "\t") !== false) {
+            $row = str_replace("\t", "_t_", $row);
+        }
+        $data[$key] = $row;
+    }
+    return $data;
+}
+
+$data = array_map('_dbgBuff', $data);
+
+print "Data:\n";
+print_r($data);
+?>
+--EXPECT--
+Format:
+Array
+(
+    [fields] => 4
+    [sep] => ,
+    [quote] => "
+)
+
+Data:
+Array
+(
+    [0] => Array
+        (
+            [0] => Field 1-1
+            [1] => Field 1-2
+            [2] => Field 1-3
+            [3] => Field 1-4
+        )
+
+    [1] => Array
+        (
+            [0] => Field 2-1
+            [1] => Field 2-2
+            [2] => Field 2-3
+            [3] => I'm multiline_r_Field
+        )
+
+    [2] => Array
+        (
+            [0] => Field 3-1
+            [1] => Field 3-2
+            [2] => Field 3-3
+            [3] => 
+        )
+
+)
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/CSV/tests.txt b/campcaster/src/tools/pear/src/tests/File/tests/CSV/tests.txt
new file mode 100644
index 000000000..5d6ffe41c
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/CSV/tests.txt
@@ -0,0 +1,12 @@
+File_CSV Test Case
+==================
+
+     Case                                   Covered  Notes
+--------------------------------------------------------------------------------
+001  Fields count less than expected        [x]
+002  Fields count more than expected        [x]      High risk possibility
+                                                     discovered fields count
+                                                     wrong
+003  Windows EOL                            [x]
+004  Unix EOL                               [x]
+005  Mac EOL                                [x]
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/FileTest.php b/campcaster/src/tools/pear/src/tests/File/tests/FileTest.php
new file mode 100644
index 000000000..1a10e118b
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/FileTest.php
@@ -0,0 +1,226 @@
+PHPUnit_TestCase($name);
+    }
+
+    function getTestString()
+    {
+        static $str;
+        isset($str) or $str = str_repeat(str_repeat("0123456789", 1000)."\n", 100);
+        return $str;
+    }
+    
+    function getTestLine()
+    {
+        static $str;
+        isset($str) or $str = str_repeat("0123456789", 1000);
+        return $str;
+    }
+    
+    function setUp()
+    {
+        $this->tearDown();
+        if (PEAR::isError($e = File::write('test.txt', $this->getTestString(), FILE_MODE_WRITE))) {
+            die("Cannot start test: ". str_replace($this->getTestString(),'...', $e->getMessage()));
+        }
+    }
+
+    function tearDown()
+    {
+        File::closeAll();
+        file_exists('test.txt') and unlink('test.txt');
+    }
+
+    function testlocking()
+    {
+        $this->assertFalse(PEAR::isError(File::write('test.txt', 'abc', FILE_MODE_APPEND, true)));
+        $this->assertTrue(PEAR::isError(File::write('test.txt', 'def', FILE_MODE_WRITE, true)));
+        $this->assertFalse(PEAR::isError(File::unlock('test.txt', FILE_MODE_APPEND)));
+        $this->assertFalse(PEAR::isError(File::unlock('test.txt', FILE_MODE_WRITE)));
+    }
+
+    function testclose()
+    {
+        $this->assertFalse(PEAR::isError(File::close('test.txt', FILE_MODE_WRITE)));
+        $this->assertFalse(PEAR::isError(File::close('test.txt', FILE_MODE_APPEND)));
+        $this->assertFalse(PEAR::isError(File::close('test.txt', FILE_MODE_READ)));
+    }
+
+    function testreadAll()
+    {
+        $this->assertEquals($this->getTestString(), File::readAll('test.txt'));
+        $this->assertEquals($this->getTestString(), File::readAll('test.txt'));
+        $this->assertEquals($this->getTestString(), File::readAll('test.txt'));
+    }
+
+    function testread()
+    {
+        $this->assertEquals($this->getTestLine(), File::read('test.txt', 10000));
+        $this->assertEquals("\n", File::read('test.txt', 1));
+        $this->assertEquals('0123456789', File::read('test.txt', 10));
+    }
+
+    function testwrite()
+    {
+        $this->assertFalse(PEAR::isError($bytes = File::write('test.txt', '0123456789')));
+        $this->assertEquals(10, $bytes);
+    }
+
+    function testreadChar()
+    {
+        $this->assertFalse(PEAR::isError(File::rewind('test.txt', FILE_MODE_READ)));
+        $this->assertEquals('0', File::readChar('test.txt'));
+        $this->assertEquals('1', File::readChar('test.txt'));
+        $this->assertEquals('2', File::readChar('test.txt'));
+        $this->assertEquals('3', File::readChar('test.txt'));
+        $this->assertEquals('4', File::readChar('test.txt'));
+        $this->assertEquals('5', File::readChar('test.txt'));
+        $this->assertEquals('6', File::readChar('test.txt'));
+        $this->assertEquals('7', File::readChar('test.txt'));
+        $this->assertEquals('8', File::readChar('test.txt'));
+        $this->assertEquals('9', File::readChar('test.txt'));
+        $this->assertEquals('0', File::readChar('test.txt'));
+    }
+
+    function testwriteChar()
+    {
+        $this->assertEquals(1, File::writeChar('test.txt', 'a'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'b'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'c'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'd'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'e'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'f'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'g'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'h'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'i'));
+        $this->assertEquals(1, File::writeChar('test.txt', 'j'));
+    }
+
+    function testreadLine()
+    {
+        $this->assertFalse(PEAR::isError(File::rewind('test.txt', FILE_MODE_READ)));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+        $this->assertEquals($this->getTestLine(), File::readLine('test.txt'));
+    }
+
+    function testwriteLine()
+    {
+        $line = $this->getTestLine();
+        $length = strlen($line) + 1;
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+        $this->assertEquals($length, File::writeLine('test.txt', $line));
+    }
+
+    function testrewind()
+    {
+        $this->assertFalse(PEAR::isError(File::rewind('test.txt', FILE_MODE_WRITE)));
+        $this->assertFalse(PEAR::isError(File::rewind('test.txt', FILE_MODE_READ)));
+    }
+
+    function testbuildPath()
+    {
+        $path = array(
+            'some',
+            DIRECTORY_SEPARATOR,
+            DIRECTORY_SEPARATOR,
+            DIRECTORY_SEPARATOR,
+            DIRECTORY_SEPARATOR,
+            'weird'.DIRECTORY_SEPARATOR,
+            DIRECTORY_SEPARATOR,
+            DIRECTORY_SEPARATOR,
+            DIRECTORY_SEPARATOR,
+            DIRECTORY_SEPARATOR.'path'.DIRECTORY_SEPARATOR.DIRECTORY_SEPARATOR,
+        );
+        $built = implode(DIRECTORY_SEPARATOR, array('some','weird','path','',''));
+        $this->assertEquals($built, File::buildPath($path));
+    }
+
+    function testskipRoot()
+    {
+        if (OS_WINDOWS) {
+            $this->assertEquals('WINDOWS', File::skipRoot('C:\\WINDOWS'));
+            $this->assertEquals('WINDOWS', File::skipRoot('C:\\\\WINDOWS'));
+            $this->assertEquals('WINDOWS', File::skipRoot('C:/WINDOWS'));
+        } else {
+            $this->assertEquals('usr/share/pear', File::skipRoot('/usr/share/pear'));
+        }
+    }
+
+    function testgetTempDir()
+    {
+        $dir = File::getTempDir();
+        $this->assertTrue(is_dir($dir), "is_dir($dir)");
+    }
+
+    function testgetTempFile()
+    {
+        $tmp = File::getTempFile();
+        $this->assertTrue(file_exists($tmp));
+    }
+
+    function testisAbsolute()
+    {
+        $this->assertFalse(File::isAbsolute('abra/../cadabra'));
+        $this->assertFalse(File::isAbsolute('data/dir'));
+        if (OS_WINDOWS) {
+            $this->assertTrue(File::isAbsolute('C:\\\\data'));
+            $this->assertTrue(File::isAbsolute('d:/data'));
+            $this->assertFalse(File::isAbsolute('\\'));
+        } else {
+            $this->assertTrue(File::isAbsolute('/'));
+            $this->assertFalse(File::isAbsolute('\\'));
+            $this->assertTrue(File::isAbsolute('~mike/bin'));
+        }
+    }
+
+    function testrelativePath()
+    {
+        $this->assertEquals('tests/File', File::relativePath('/usr/share/pear/tests/File', '/usr/share/pear', '/'));
+        $this->assertEquals('../etc', File::relativePath('/etc', '/usr', '/'));
+        $this->assertEquals('D:\\Data', File::relativePath('D:\\Data', 'C:\\Data', '\\'));
+        if (OS_WINDOWS) {
+            $this->assertEquals('data\\dir', File::relativePath('/var/data/dir', '/var'));
+        } else {
+            $this->assertEquals('data/dir', File::relativePath('/var/data/dir', '/var'));
+        }
+        $this->assertEquals('../', File::relativePath('data', 'data/dir', '/'));
+    }
+
+    function testrealpath()
+    {
+        $drive = OS_WINDOWS ? substr(getcwd(),0, 2) :'';
+        $this->assertEquals($drive . '/a/weird/path/is', File::realpath('/a\\weird//path\is/that/./../', '/'));
+        $this->assertEquals($drive . '/a/weird/path/is/that', File::realpath('/a\\weird//path\is/that/./../that/.', '/'));
+    }
+}
+
+$result = &PHPUnit::run(new PHPUnit_TestSuite('FileTest'));
+echo $result->toString();
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/parser.php b/campcaster/src/tools/pear/src/tests/File/tests/parser.php
new file mode 100644
index 000000000..0c764db88
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/parser.php
@@ -0,0 +1,31 @@
+ 4,
+    'sep'    => "\t",
+    'quote'  => '"',
+    'header' => false
+);
+//*/
+ob_implicit_flush(true);
+$argv = $_SERVER['argv'];
+$file = $argv[1];
+$write = (isset($argv[2])) ? $argv[2] : false;
+PEAR::setErrorHandling(PEAR_ERROR_PRINT, "warning: %s\n");
+
+$conf = File_CSV::discoverFormat($file);
+while ($fields = File_CSV::read($file, $conf)) {
+    if ($write) {
+        File_CSV::write($write, $fields, $conf);
+    }
+    print_r($fields);
+}
+
+var_dump($conf);
+echo "\n"
+
+?>
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File/tests/test.csv b/campcaster/src/tools/pear/src/tests/File/tests/test.csv
new file mode 100644
index 000000000..e74f4a25f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File/tests/test.csv
@@ -0,0 +1,18 @@
+f1	f2	f3	f4
+good1	good2	good3	good4
+;;;;;	;;;;;	;;;;;	;;;;;
+: : :	; ; "	".	"	::::;;;;"
+no"quote	no"qu"ote	n"quote"	n"q"u"o"t"
+"quote1"	"quote2"	noquote3"	noquote4
+test1	"long
+test2"	"long test3	with	seps"	"I'm
+					silly
+					long"
+less1	"less2	."	less3
+isvalid1	isvalid2	isvalid3	isvalid4
+more21	"more22		."	more23	more24	more25	more26
+isvalid21	isvalid22	isvalid23	isvalid24
+lessnoq31	lessnoq32	lessnoq33
+isvalid31	isvalid32	isvalid33	isvalid34
+morenoq41	morenoq42	morenoq43	morenoq44	morenoq45
+isvalid41	isvalid42	isvalid43	isvalid44
diff --git a/campcaster/src/tools/pear/src/tests/File_Find/tests/01glob.phpt b/campcaster/src/tools/pear/src/tests/File_Find/tests/01glob.phpt
new file mode 100644
index 000000000..5f55173b0
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File_Find/tests/01glob.phpt
@@ -0,0 +1,46 @@
+--TEST--
+File_Find::glob()
+--SKIPIF--
+
+--FILE--
+glob( '/.*txt/', $tmpdir.'/File_Find/dir/', 'perl' ) ;
+$result1  = &$ff->glob( '/.*txt/', $tmpdir.'/File_Find/dir', 'perl' ) ;
+$result2 = &File_Find::glob( '/.*txt/', $tmpdir.'/File_Find/dir/', 'perl' ) ;
+$result3 = &File_Find::glob( '/.*txt/', '/nosuch/', 'perl' ) ;
+
+print_r($result0);
+print_r($result1);
+print_r($result2);
+print $result3->getMessage();
+
+?>
+--GET--
+--POST--
+--EXPECT--
+Array
+(
+    [0] => 1.txt
+    [1] => 2.txt
+    [2] => txtdir
+)
+Array
+(
+    [0] => 1.txt
+    [1] => 2.txt
+    [2] => txtdir
+)
+Array
+(
+    [0] => 1.txt
+    [1] => 2.txt
+    [2] => txtdir
+)
+Cannot open directory
+
diff --git a/campcaster/src/tools/pear/src/tests/File_Find/tests/02maptree.phpt b/campcaster/src/tools/pear/src/tests/File_Find/tests/02maptree.phpt
new file mode 100644
index 000000000..5146d5c39
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File_Find/tests/02maptree.phpt
@@ -0,0 +1,97 @@
+--TEST--
+File_Find::mapTree()
+--SKIPIF--
+
+--FILE--
+mapTree('File_Find/dir/') ;
+$result[1]  = $ff->mapTree('File_Find/dir') ;
+$result[2] = File_Find::mapTree('File_Find/dir') ;
+
+if (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
+    foreach($result as $k => $r) {
+        $result[$k][0] = str_replace("\\", '/', $result[$k][0]);
+        $result[$k][1] = str_replace("\\", '/', $result[$k][1]);
+    }
+}
+
+print_r($result[0]);
+print_r($result[1]);
+print_r($result[2]);
+
+?>
+--GET--
+--POST--
+--EXPECT--
+Array
+(
+    [0] => Array
+        (
+            [0] => File_Find/dir
+            [1] => File_Find/dir/txtdir
+            [2] => File_Find/dir/dir3
+            [3] => File_Find/dir/dir2
+        )
+
+    [1] => Array
+        (
+            [0] => File_Find/dir/1.txt
+            [1] => File_Find/dir/2.txt
+            [2] => File_Find/dir/txtdir/5.txt
+            [3] => File_Find/dir/dir3/4.bak
+            [4] => File_Find/dir/dir3/4.txt
+            [5] => File_Find/dir/dir2/3.bak
+            [6] => File_Find/dir/dir2/3.txt
+        )
+
+)
+Array
+(
+    [0] => Array
+        (
+            [0] => File_Find/dir
+            [1] => File_Find/dir/txtdir
+            [2] => File_Find/dir/dir3
+            [3] => File_Find/dir/dir2
+        )
+
+    [1] => Array
+        (
+            [0] => File_Find/dir/1.txt
+            [1] => File_Find/dir/2.txt
+            [2] => File_Find/dir/txtdir/5.txt
+            [3] => File_Find/dir/dir3/4.bak
+            [4] => File_Find/dir/dir3/4.txt
+            [5] => File_Find/dir/dir2/3.bak
+            [6] => File_Find/dir/dir2/3.txt
+        )
+
+)
+Array
+(
+    [0] => Array
+        (
+            [0] => File_Find/dir
+            [1] => File_Find/dir/txtdir
+            [2] => File_Find/dir/dir3
+            [3] => File_Find/dir/dir2
+        )
+
+    [1] => Array
+        (
+            [0] => File_Find/dir/1.txt
+            [1] => File_Find/dir/2.txt
+            [2] => File_Find/dir/txtdir/5.txt
+            [3] => File_Find/dir/dir3/4.bak
+            [4] => File_Find/dir/dir3/4.txt
+            [5] => File_Find/dir/dir2/3.bak
+            [6] => File_Find/dir/dir2/3.txt
+        )
+
+)
diff --git a/campcaster/src/tools/pear/src/tests/File_Find/tests/03maptreemultiple.phpt b/campcaster/src/tools/pear/src/tests/File_Find/tests/03maptreemultiple.phpt
new file mode 100644
index 000000000..2dd7ad2ad
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File_Find/tests/03maptreemultiple.phpt
@@ -0,0 +1,91 @@
+--TEST--
+File_Find::mapTreeMultiple()
+--SKIPIF--
+
+--FILE--
+mapTreeMultiple('File_Find//dir/') ;
+$result1  = $ff->mapTreeMultiple('File_Find/dir') ;
+$result2 = File_Find::mapTreeMultiple('File_Find/dir') ;
+
+print_r($result0);
+print_r($result1);
+print_r($result2);
+
+?>
+--GET--
+--POST--
+--EXPECT--
+Array
+(
+    [0] => 1.txt
+    [1] => 2.txt
+    [dir2] => Array
+        (
+            [0] => 3.bak
+            [1] => 3.txt
+        )
+
+    [dir3] => Array
+        (
+            [0] => 4.bak
+            [1] => 4.txt
+        )
+
+    [txtdir] => Array
+        (
+            [0] => 5.txt
+        )
+
+)
+Array
+(
+    [0] => 1.txt
+    [1] => 2.txt
+    [dir2] => Array
+        (
+            [0] => 3.bak
+            [1] => 3.txt
+        )
+
+    [dir3] => Array
+        (
+            [0] => 4.bak
+            [1] => 4.txt
+        )
+
+    [txtdir] => Array
+        (
+            [0] => 5.txt
+        )
+
+)
+Array
+(
+    [0] => 1.txt
+    [1] => 2.txt
+    [dir2] => Array
+        (
+            [0] => 3.bak
+            [1] => 3.txt
+        )
+
+    [dir3] => Array
+        (
+            [0] => 4.bak
+            [1] => 4.txt
+        )
+
+    [txtdir] => Array
+        (
+            [0] => 5.txt
+        )
+
+)
+
diff --git a/campcaster/src/tools/pear/src/tests/File_Find/tests/04search.phpt b/campcaster/src/tools/pear/src/tests/File_Find/tests/04search.phpt
new file mode 100644
index 000000000..c9b1dd4ef
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File_Find/tests/04search.phpt
@@ -0,0 +1,53 @@
+--TEST--
+File_Find::search()
+--SKIPIF--
+
+--FILE--
+search('/txt/', 'File_Find/dir/', 'perl') ;
+$result[1] = $ff->search('/txt/', 'File_Find/dir', 'perl') ;
+$result[2] = File_Find::search('/3/', 'File_Find/dir/', 'perl') ;
+
+if (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
+    foreach($result as $k => $r) {
+        $result[$k] = str_replace("\\", '/', $result[$k]);
+    }
+}
+
+print_r($result[0]);
+print_r($result[1]);
+print_r($result[2]);
+
+?>
+--GET--
+--POST--
+--EXPECT--
+Array
+(
+    [0] => File_Find/dir/1.txt
+    [1] => File_Find/dir/2.txt
+    [2] => File_Find/dir/txtdir/5.txt
+    [3] => File_Find/dir/dir3/4.txt
+    [4] => File_Find/dir/dir2/3.txt
+)
+Array
+(
+    [0] => File_Find/dir/1.txt
+    [1] => File_Find/dir/2.txt
+    [2] => File_Find/dir/txtdir/5.txt
+    [3] => File_Find/dir/dir3/4.txt
+    [4] => File_Find/dir/dir2/3.txt
+)
+Array
+(
+    [0] => File_Find/dir/dir3/4.bak
+    [1] => File_Find/dir/dir3/4.txt
+    [2] => File_Find/dir/dir2/3.bak
+    [3] => File_Find/dir/dir2/3.txt
+)
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/File_Find/tests/05search_inside.phpt b/campcaster/src/tools/pear/src/tests/File_Find/tests/05search_inside.phpt
new file mode 100644
index 000000000..db36a3cab
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File_Find/tests/05search_inside.phpt
@@ -0,0 +1,63 @@
+--TEST--
+File_Find::search() inside another object
+--SKIPIF--
+
+--FILE--
+search('/txt/', 'File_Find/dir/', 'perl') ;
+$result[1] = $f->search('/txt/', 'File_Find/dir', 'perl') ;
+$result[2] = Foo::search('/txt/', 'File_Find/dir/', 'perl') ;
+
+if (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
+    foreach($result as $k => $r) {
+        $result[$k] = str_replace("\\", '/', $result[$k]);
+    }
+}
+
+print_r($result[0]);
+print_r($result[1]);
+print_r($result[2]);
+
+?>
+--GET--
+--POST--
+--EXPECT--
+Array
+(
+    [0] => File_Find/dir/1.txt
+    [1] => File_Find/dir/2.txt
+    [2] => File_Find/dir/txtdir/5.txt
+    [3] => File_Find/dir/dir3/4.txt
+    [4] => File_Find/dir/dir2/3.txt
+)
+Array
+(
+    [0] => File_Find/dir/1.txt
+    [1] => File_Find/dir/2.txt
+    [2] => File_Find/dir/txtdir/5.txt
+    [3] => File_Find/dir/dir3/4.txt
+    [4] => File_Find/dir/dir2/3.txt
+)
+Array
+(
+    [0] => File_Find/dir/1.txt
+    [1] => File_Find/dir/2.txt
+    [2] => File_Find/dir/txtdir/5.txt
+    [3] => File_Find/dir/dir3/4.txt
+    [4] => File_Find/dir/dir2/3.txt
+)
diff --git a/campcaster/src/tools/pear/src/tests/File_Find/tests/bug2773.phpt b/campcaster/src/tools/pear/src/tests/File_Find/tests/bug2773.phpt
new file mode 100644
index 000000000..70b887ebb
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File_Find/tests/bug2773.phpt
@@ -0,0 +1,58 @@
+--TEST--
+File_Find bug #2773
+--SKIPIF--
+
+--FILE--
+mapTreeMultiple('File_Find/dir2') ;
+$result2 = File_Find::mapTreeMultiple('File_Find/dir2') ;
+
+print_r($result);
+print_r($result2);
+
+?>
+--GET--
+--POST--
+--EXPECT--
+Array
+(
+    [0] => Array
+        (
+            [0] => 1.txt
+        )
+
+    [1] => Array
+        (
+            [0] => 1.txt
+        )
+
+    [2] => Array
+        (
+            [0] => 1.txt
+        )
+
+)
+Array
+(
+    [0] => Array
+        (
+            [0] => 1.txt
+        )
+
+    [1] => Array
+        (
+            [0] => 1.txt
+        )
+
+    [2] => Array
+        (
+            [0] => 1.txt
+        )
+
+)
diff --git a/campcaster/src/tools/pear/src/tests/File_Find/tests/setup.php b/campcaster/src/tools/pear/src/tests/File_Find/tests/setup.php
new file mode 100644
index 000000000..e64ad2f48
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/File_Find/tests/setup.php
@@ -0,0 +1,46 @@
+
diff --git a/campcaster/src/tools/pear/src/tests/XML_Parser/tests/001.phpt b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/001.phpt
new file mode 100644
index 000000000..79f5af6ad
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/001.phpt
@@ -0,0 +1,49 @@
+--TEST--
+XML Parser: parse simple string
+--SKIPIF--
+
+--FILE--
+XML_Parser();
+    }
+    function startHandler($xp, $element, $attribs) {
+        print "<$element";
+        reset($attribs);
+        while (list($key, $val) = each($attribs)) {
+            $enc = htmlentities($val);
+            print " $key=\"$enc\"";
+        }
+        print ">";
+    }
+    function endHandler($xp, $element) {
+        print "\n";
+    }
+    function cdataHandler($xp, $cdata) {
+        print "";
+    }
+    function defaultHandler($xp, $cdata) {
+
+    }
+}
+error_reporting(1023);
+print "new __TestParser1 ";
+var_dump(get_class($o = new __TestParser1()));
+print "parseString ";
+var_dump($o->parseString("foo", 1));
+
+?>
+--EXPECT--
+new __TestParser1 string(13) "__testparser1"
+parseString 
+bool(true)
diff --git a/campcaster/src/tools/pear/src/tests/XML_Parser/tests/002.phpt b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/002.phpt
new file mode 100644
index 000000000..d40d341a3
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/002.phpt
@@ -0,0 +1,52 @@
+--TEST--
+XML Parser: parse from file
+--SKIPIF--
+
+--FILE--
+XML_Parser();
+    }
+    function startHandler($xp, $element, $attribs) {
+        print "<$element";
+        reset($attribs);
+        while (list($key, $val) = each($attribs)) {
+            $enc = htmlentities($val);
+            print " $key=\"$enc\"";
+        }
+        print ">";
+    }
+    function endHandler($xp, $element) {
+        print "\n";
+    }
+    function cdataHandler($xp, $cdata) {
+        print "";
+    }
+    function defaultHandler($xp, $cdata) {
+
+    }
+}
+print "new __TestParser2 ";
+var_dump(get_class($o = new __TestParser2()));
+print "setInputFile ";
+print is_resource($o->setInputFile("test2.xml"))."\n";
+print "parse ";
+var_dump($o->parse());
+
+?>
+--EXPECT--
+new __TestParser2 string(13) "__testparser2"
+setInputFile 1
+parse 
+bool(true)
diff --git a/campcaster/src/tools/pear/src/tests/XML_Parser/tests/003.phpt b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/003.phpt
new file mode 100644
index 000000000..6b54e689a
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/003.phpt
@@ -0,0 +1,55 @@
+--TEST--
+XML Parser: parse from file resource
+--SKIPIF--
+
+--FILE--
+XML_Parser();
+    }
+    function startHandler($xp, $element, $attribs) {
+        print "<$element";
+        reset($attribs);
+        while (list($key, $val) = each($attribs)) {
+            $enc = htmlentities($val);
+            print " $key=\"$enc\"";
+        }
+        print ">";
+    }
+    function endHandler($xp, $element) {
+        print "\n";
+    }
+    function cdataHandler($xp, $cdata) {
+        print "";
+    }
+    function defaultHandler($xp, $cdata) {
+
+    }
+}
+print "new __TestParser3 ";
+var_dump(get_class($o = new __TestParser3()));
+print "fopen ";
+print is_resource($fp = fopen("test3.xml", "r"))."\n";
+print "setInput ";
+var_dump($o->setInput($fp));
+print "parse ";
+var_dump($o->parse());
+
+?>
+--EXPECT--
+new __TestParser3 string(13) "__testparser3"
+fopen 1
+setInput bool(true)
+parse 
+bool(true)
diff --git a/campcaster/src/tools/pear/src/tests/XML_Parser/tests/004.phpt b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/004.phpt
new file mode 100644
index 000000000..b4631454a
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/004.phpt
@@ -0,0 +1,26 @@
+--TEST--
+XML Parser: error class
+--SKIPIF--
+
+--FILE--
+parseString("", true);
+if (PEAR::isError($e)) {
+    printf("error message: %s\n", $e->getMessage());
+} else {
+    print "no error\n";
+}
+
+?>
+--EXPECT--
+new XML_Parser string(10) "xml_parser"
+error message: XML_Parser: mismatched tag at XML input line 1
diff --git a/campcaster/src/tools/pear/src/tests/XML_Parser/tests/005.phpt b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/005.phpt
new file mode 100644
index 000000000..b900606f0
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/005.phpt
@@ -0,0 +1,75 @@
+--TEST--
+XML Parser: mixing character encodings
+--SKIPIF--
+
+--FILE--
+ ISO-8859-1
+// 2 UTF-8      -> US-ASCII
+// 3 ISO-8859-1 -> UTF-8
+// 4 ISO-8859-1 -> US-ASCII
+// 5 US-ASCII   -> UTF-8
+// 6 US-ASCII   -> ISO-8859-1
+//
+
+require_once "../Parser.php";
+
+class TestEncodings1 extends XML_Parser {
+    var $output = '';
+
+    function TestEncodings1($to, $from) {
+        $this->XML_Parser($from, 'event', $to);
+    }
+    function startHandler($xp, $elem, $attribs) {
+        $this->output .= "<$elem>";
+    }
+    function endHandler($xp, $elem) {
+        $this->output .= "";
+    }
+    function cdataHandler($xp, $data) {
+        $this->output .= $data;
+    }
+    function test($data) {
+        // $this->output = '';
+        $this->parseString($data, true);
+        return $this->output;
+    }
+}
+
+$xml = "";
+$input = array(
+    "UTF-8"      => "abcæøå",
+    "ISO-8859-1" => "abcæøå",
+    "US-ASCII"   => "abcaoa"
+);
+
+$encodings = array_keys($input);
+foreach ($input as $srcenc => $string) {
+    foreach ($encodings as $tgtenc) {
+        if ($srcenc == $tgtenc) {
+            continue;
+        }
+        print "Testing $srcenc -> $tgtenc: ";
+        $p =& new TestEncodings1($tgtenc, $srcenc);
+        $e = $p->test($input[$srcenc]);
+        if (PEAR::isError($e)) {
+            printf("OOPS: %s\n", $e->getMessage());
+        } else {
+            var_dump($e);
+        }
+    }
+}
+
+?>
+--EXPECT--
+Testing UTF-8 -> ISO-8859-1: string(13) "abcæøå"
+Testing UTF-8 -> US-ASCII: string(13) "abc???"
+Testing ISO-8859-1 -> UTF-8: string(16) "abcæøå"
+Testing ISO-8859-1 -> US-ASCII: string(13) "abc???"
+Testing US-ASCII -> UTF-8: string(13) "abcaoa"
+Testing US-ASCII -> ISO-8859-1: string(13) "abcaoa"
diff --git a/campcaster/src/tools/pear/src/tests/XML_Parser/tests/test2.xml b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/test2.xml
new file mode 100644
index 000000000..b21ff3540
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/test2.xml
@@ -0,0 +1,2 @@
+
+foo
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/XML_Parser/tests/test3.xml b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/test3.xml
new file mode 100644
index 000000000..b21ff3540
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_Parser/tests/test3.xml
@@ -0,0 +1,2 @@
+
+foo
\ No newline at end of file
diff --git a/campcaster/src/tools/pear/src/tests/XML_RPC/tests/allgot.inc b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/allgot.inc
new file mode 100644
index 000000000..3a74d531c
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/allgot.inc
@@ -0,0 +1,58 @@
+
+ * @copyright  2005-2006 The PHP Group
+ * @license    http://www.php.net/license/3_01.txt  PHP License
+ * @version    CVS: $Id: allgot.inc,v 1.2 2006/06/11 00:25:17 danielc Exp $
+ * @link       http://pear.php.net/package/XML_RPC
+ * @since      File available since Release 1.4.4
+ */
+
+ob_start();
+
+function returnAllGot($params) {
+    $out = '';
+    $count = count($params->params);
+    for ($i = 0; $i < $count; $i++) {
+        $param = $params->getParam($i);
+        if (!XML_RPC_Value::isValue($param)) {
+            $out .= "parameter $i was error: $param\n";
+            continue;
+        }
+        $got = XML_RPC_Decode($param);
+        $out .= "param $i: " . var_export($got, true) . "\n";
+    }
+    $val = new XML_RPC_Value($out, 'string');
+    return new XML_RPC_Response($val);
+}
+
+$server = new XML_RPC_Server(
+    array(
+        'allgot' => array(
+            'function' => 'returnAllGot',
+        ),
+    )
+);
+
+$got = ob_get_clean();
+
+if ($got == $expect) {
+    echo "passed\n";
+} else {
+    echo "FAILED\n";
+    echo "Expected:\n$expect\n";
+    echo "Got:\n$got\n";
+}
diff --git a/campcaster/src/tools/pear/src/tests/XML_RPC/tests/empty-value-struct.php b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/empty-value-struct.php
new file mode 100644
index 000000000..81473476a
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/empty-value-struct.php
@@ -0,0 +1,90 @@
+
+ * @copyright  2005-2006 The PHP Group
+ * @license    http://www.php.net/license/3_0.txt  PHP License
+ * @version    CVS: $Id: empty-value-struct.php,v 1.2 2006/06/11 00:25:17 danielc Exp $
+ * @link       http://pear.php.net/package/XML_RPC
+ * @since      File available since Release 1.4.4
+ */
+
+/*
+ * If the package version number is found in the left hand
+ * portion of the if() expression below, that means this file has
+ * come from the PEAR installer.  Therefore, let's test the
+ * installed version of XML_RPC which should be in the include path.
+ * 
+ * If the version has not been substituted in the if() expression,
+ * this file has likely come from a CVS checkout or a .tar file.
+ * Therefore, we'll assume the tests should use the version of
+ * XML_RPC that has come from there as well.
+ */
+if ('1.5.0' != '@'.'package_version'.'@') {
+    /**
+     * Get the needed class from the PEAR installation
+     */
+    require_once 'XML/RPC/Server.php';
+} else {
+    if (substr(dirname(__FILE__), -9, -6) != 'XML') {
+        echo "The parent directory must be named 'XML'.\n";
+        exit;
+    }
+
+    ini_set('include_path', '../../'
+            . PATH_SEPARATOR . '.' . PATH_SEPARATOR
+            . ini_get('include_path')
+    );
+
+    /**
+     * Get the needed class from the parent directory
+     */
+    require_once '../Server.php';
+}
+
+$GLOBALS['HTTP_RAW_POST_DATA'] = <<
+
+ allgot
+  
+   
+    
+     
+      
+      fld1
+   
+  
+ 
+EOPOST;
+
+$expect = <<
+
+
+
+param 0: array (
+  'fld1' => '',
+)
+
+
+
+
+EOEXP;
+
+include './allgot.inc';
diff --git a/campcaster/src/tools/pear/src/tests/XML_RPC/tests/empty-value.php b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/empty-value.php
new file mode 100644
index 000000000..576b0aa3e
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/empty-value.php
@@ -0,0 +1,88 @@
+
+ * @copyright  2005-2006 The PHP Group
+ * @license    http://www.php.net/license/3_01.txt  PHP License
+ * @version    CVS: $Id: empty-value.php,v 1.2 2006/06/11 00:25:17 danielc Exp $
+ * @link       http://pear.php.net/package/XML_RPC
+ * @since      File available since Release 1.4.4
+ */
+
+/*
+ * If the package version number is found in the left hand
+ * portion of the if() expression below, that means this file has
+ * come from the PEAR installer.  Therefore, let's test the
+ * installed version of XML_RPC which should be in the include path.
+ * 
+ * If the version has not been substituted in the if() expression,
+ * this file has likely come from a CVS checkout or a .tar file.
+ * Therefore, we'll assume the tests should use the version of
+ * XML_RPC that has come from there as well.
+ */
+if ('1.5.0' != '@'.'package_version'.'@') {
+    /**
+     * Get the needed class from the PEAR installation
+     */
+    require_once 'XML/RPC/Server.php';
+} else {
+    if (substr(dirname(__FILE__), -9, -6) != 'XML') {
+        echo "The parent directory must be named 'XML'.\n";
+        exit;
+    }
+
+    ini_set('include_path', '../../'
+            . PATH_SEPARATOR . '.' . PATH_SEPARATOR
+            . ini_get('include_path')
+    );
+
+    /**
+     * Get the needed class from the parent directory
+     */
+    require_once '../Server.php';
+}
+
+$GLOBALS['HTTP_RAW_POST_DATA'] = <<
+
+ allgot
+  
+   
+   first
+     
+   
+  
+ 
+EOPOST;
+
+$expect = <<
+
+
+
+param 0: ''
+param 1: 'first'
+param 2: '  '
+param 3: ''
+
+
+
+
+EOEXP;
+
+include './allgot.inc';
diff --git a/campcaster/src/tools/pear/src/tests/XML_RPC/tests/extra-lines.php b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/extra-lines.php
new file mode 100644
index 000000000..33f588351
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/extra-lines.php
@@ -0,0 +1,109 @@
+
+ * @copyright  2005-2006 The PHP Group
+ * @license    http://www.php.net/license/3_01.txt  PHP License
+ * @version    CVS: $Id: extra-lines.php,v 1.2 2006/06/11 00:25:17 danielc Exp $
+ * @link       http://pear.php.net/package/XML_RPC
+ * @since      File available since Release 1.4.4
+ */
+
+/*
+ * If the package version number is found in the left hand
+ * portion of the if() expression below, that means this file has
+ * come from the PEAR installer.  Therefore, let's test the
+ * installed version of XML_RPC which should be in the include path.
+ * 
+ * If the version has not been substituted in the if() expression,
+ * this file has likely come from a CVS checkout or a .tar file.
+ * Therefore, we'll assume the tests should use the version of
+ * XML_RPC that has come from there as well.
+ */
+if ('1.5.0' != '@'.'package_version'.'@') {
+    /**
+     * Get the needed class from the PEAR installation
+     */
+    require_once 'XML/RPC.php';
+} else {
+    if (substr(dirname(__FILE__), -9, -6) != 'XML') {
+        echo "The parent directory must be named 'XML'.\n";
+        exit;
+    }
+
+    ini_set('include_path', '../../'
+            . PATH_SEPARATOR . '.' . PATH_SEPARATOR
+            . ini_get('include_path')
+    );
+
+    /**
+     * Get the needed class from the parent directory
+     */
+    require_once '../RPC.php';
+}
+
+$input = "First lfs\n\nSecond crlfs\r\n\r\nThird crs\r\rFourth line";
+
+$expect_removed = "
+
+nada
+
+
+First lfs
+Second crlfs
+Third crs
+Fourth line
+
+
+
+";
+
+$expect_not_removed = "
+
+nada
+
+
+First lfs
+
+Second crlfs
+
+Third crs
+
+Fourth line
+
+
+
+";
+
+
+$msg = new XML_RPC_Message('nada', array(XML_RPC_encode($input)));
+$msg->createPayload();
+if ($msg->payload == $expect_removed) {
+    echo "passed\n";
+} else {
+    echo "PROBLEM\n";
+}
+
+$msg = new XML_RPC_Message('nada', array(XML_RPC_encode($input)));
+$msg->remove_extra_lines = false;
+$msg->createPayload();
+if ($msg->payload == $expect_not_removed) {
+    echo "passed\n";
+} else {
+    echo "PROBLEM\n";
+}
diff --git a/campcaster/src/tools/pear/src/tests/XML_RPC/tests/protoport.php b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/protoport.php
new file mode 100644
index 000000000..178b49c3f
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/protoport.php
@@ -0,0 +1,437 @@
+
+ * @copyright  2005-2006 The PHP Group
+ * @license    http://www.php.net/license/3_01.txt  PHP License
+ * @version    CVS: $Id: protoport.php,v 1.6 2006/06/11 00:25:17 danielc Exp $
+ * @link       http://pear.php.net/package/XML_RPC
+ * @since      File available since Release 1.2
+ */
+
+/*
+ * If the package version number is found in the left hand
+ * portion of the if() expression below, that means this file has
+ * come from the PEAR installer.  Therefore, let's test the
+ * installed version of XML_RPC which should be in the include path.
+ * 
+ * If the version has not been substituted in the if() expression,
+ * this file has likely come from a CVS checkout or a .tar file.
+ * Therefore, we'll assume the tests should use the version of
+ * XML_RPC that has come from there as well.
+ */
+if ('1.5.0' != '@'.'package_version'.'@') {
+    /**
+     * Get the needed class from the PEAR installation
+     */
+    require_once 'XML/RPC.php';
+} else {
+    /**
+     * Get the needed class from the parent directory
+     */
+    require_once '../RPC.php';
+}
+
+/**
+ * Compare the test result to the expected result
+ *
+ * If the test fails, echo out the results.
+ *
+ * @param array  $expect     the array of object properties you expect
+ *                            from the test
+ * @param object $actual     the object results from the test
+ * @param string $test_name  the name of the test
+ *
+ * @return void
+ */
+function compare($expect, $actual, $test_name) {
+    $actual = get_object_vars($actual);
+    if (count(array_diff($actual, $expect))) {
+        echo "$test_name failed.\nExpect: ";
+        print_r($expect);
+        echo "Actual: ";
+        print_r($actual);
+        echo "\n";
+    }
+}
+
+if (php_sapi_name() != 'cli') {
+    echo "
\n";
+}
+
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 80,
+    'proxy' => '',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'theserver');
+compare($x, $c, 'defaults');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 80,
+    'proxy' => '',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'http://theserver');
+compare($x, $c, 'defaults with http');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 443,
+    'proxy' => '',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'https://theserver');
+compare($x, $c, 'defaults with https');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 443,
+    'proxy' => '',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'ssl://theserver');
+compare($x, $c, 'defaults with ssl');
+
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 65,
+    'proxy' => '',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'theserver', 65);
+compare($x, $c, 'port 65');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 65,
+    'proxy' => '',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'http://theserver', 65);
+compare($x, $c, 'port 65 with http');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 65,
+    'proxy' => '',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'https://theserver', 65);
+compare($x, $c, 'port 65 with https');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 65,
+    'proxy' => '',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'ssl://theserver', 65);
+compare($x, $c, 'port 65 with ssl');
+
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 80,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'theserver', 0,
+                        'theproxy');
+compare($x, $c, 'defaults proxy');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 80,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 8080,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'http://theserver', 0,
+                        'http://theproxy');
+compare($x, $c, 'defaults with http proxy');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 443,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'ssl://',
+    'proxy_port' => 443,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'https://theserver', 0,
+                        'https://theproxy');
+compare($x, $c, 'defaults with https proxy');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 443,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'ssl://',
+    'proxy_port' => 443,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'ssl://theserver', 0,
+                        'ssl://theproxy');
+compare($x, $c, 'defaults with ssl proxy');
+
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 65,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 6565,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'theserver', 65,
+                        'theproxy', 6565);
+compare($x, $c, 'port 65 proxy 6565');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 65,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'http://',
+    'proxy_port' => 6565,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'http://theserver', 65,
+                        'http://theproxy', 6565);
+compare($x, $c, 'port 65 with http proxy 6565');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 65,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'ssl://',
+    'proxy_port' => 6565,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'https://theserver', 65,
+                        'https://theproxy', 6565);
+compare($x, $c, 'port 65 with https proxy 6565');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 65,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'ssl://',
+    'proxy_port' => 6565,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'ssl://theserver', 65,
+                        'ssl://theproxy', 6565);
+compare($x, $c, 'port 65 with ssl proxy 6565');
+
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'ssl://',
+    'port' => 443,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'ssl://',
+    'proxy_port' => 443,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'theserver', 443,
+                        'theproxy', 443);
+compare($x, $c, 'port 443 no protocol and proxy port 443 no protocol');
+
+$x = array(
+    'path' => 'thepath',
+    'server' => 'theserver',
+    'protocol' => 'http://',
+    'port' => 80,
+    'proxy' => 'theproxy',
+    'proxy_protocol' => 'ssl://',
+    'proxy_port' => 6565,
+    'proxy_user' => '',
+    'proxy_pass' => '',
+    'errno' => 0,
+    'errstring' => '',
+    'debug' => 0,
+    'username' => '',
+    'password' => '',
+);
+$c = new XML_RPC_Client('thepath', 'theserver', 0,
+                        'ssl://theproxy', 6565);
+compare($x, $c, 'port 443 no protocol and proxy port 443 no protocol');
+
+echo "\nIf no other output was produced, these tests passed.\n";
diff --git a/campcaster/src/tools/pear/src/tests/XML_RPC/tests/test_Dump.php b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/test_Dump.php
new file mode 100644
index 000000000..242601cbc
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/test_Dump.php
@@ -0,0 +1,50 @@
+new XML_RPC_Value('das ist der Titel', 'string'),
+    'startDate'=>new XML_RPC_Value(mktime(0,0,0,13,11,2004), 'dateTime.iso8601'),
+    'endDate'  =>new XML_RPC_Value(mktime(0,0,0,15,11,2004), 'dateTime.iso8601'),
+    'error'    =>'string',
+    'arkey'    => new XML_RPC_Value( array(
+        new XML_RPC_Value('simple string'),
+        new XML_RPC_Value(12345, 'int')
+        ), 'array')
+    )
+    ,'struct');
+
+XML_RPC_Dump($val);
+
+echo '==============' . "\r\n";
+$val2 = new XML_RPC_Value(44353, 'int');
+XML_RPC_Dump($val2);
+
+echo '==============' . "\r\n";
+$val3 = new XML_RPC_Value('this should be a string', 'string');
+XML_RPC_Dump($val3);
+
+echo '==============' . "\r\n";
+$val4 = new XML_RPC_Value(true, 'boolean');
+XML_RPC_Dump($val4);
diff --git a/campcaster/src/tools/pear/src/tests/XML_RPC/tests/types.php b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/types.php
new file mode 100644
index 000000000..8de7d8369
--- /dev/null
+++ b/campcaster/src/tools/pear/src/tests/XML_RPC/tests/types.php
@@ -0,0 +1,132 @@
+
+ * @copyright  2005-2006 The PHP Group
+ * @license    http://www.php.net/license/3_01.txt  PHP License
+ * @version    CVS: $Id: types.php,v 1.2 2006/06/11 00:25:17 danielc Exp $
+ * @link       http://pear.php.net/package/XML_RPC
+ * @since      File available since Release 1.4.4
+ */
+
+/*
+ * If the package version number is found in the left hand
+ * portion of the if() expression below, that means this file has
+ * come from the PEAR installer.  Therefore, let's test the
+ * installed version of XML_RPC which should be in the include path.
+ * 
+ * If the version has not been substituted in the if() expression,
+ * this file has likely come from a CVS checkout or a .tar file.
+ * Therefore, we'll assume the tests should use the version of
+ * XML_RPC that has come from there as well.
+ */
+if ('1.5.0' != '@'.'package_version'.'@') {
+    /**
+     * Get the needed class from the PEAR installation
+     */
+    require_once 'XML/RPC/Server.php';
+} else {
+    if (substr(dirname(__FILE__), -9, -6) != 'XML') {
+        echo "The parent directory must be named 'XML'.\n";
+        exit;
+    }
+
+    ini_set('include_path', '../../'
+            . PATH_SEPARATOR . '.' . PATH_SEPARATOR
+            . ini_get('include_path')
+    );
+
+    /**
+     * Get the needed class from the parent directory
+     */
+    require_once '../Server.php';
+}
+
+$GLOBALS['HTTP_RAW_POST_DATA'] = <<
+
+ allgot
+  
+   default to string
+   inside string
+   8
+   20050809T01:33:44
+
+   
+    
+     
+      
+       
+        a
+       
+       
+        b
+       
+      
+     
+    
+   
+
+   
+    
+     
+      
+       a
+       
+        ay
+       
+      
+      
+       b
+       
+        be
+       
+      
+     
+    
+   
+
+  
+ 
+EOPOST;
+
+$expect = <<
+
+
+
+param 0: 'default to string'
+param 1: 'inside string'
+param 2: '8'
+param 3: '20050809T01:33:44'
+param 4: array (
+  0 => 'a',
+  1 => 'b',
+)
+param 5: array (
+  'a' => 'ay',
+  'b' => 'be',
+)
+
+
+
+
+EOEXP;
+
+include './allgot.inc';