-- CeetOS signed release. Generated; do not edit.
-- CEETOS_RELEASE_MANIFEST:e2NoYW5uZWw9InJlbGVhc2UiLHByb2ZpbGU9ImRlc2t0b3AiLHZlcnNpb249IjAuMTYuMiIsc2l6ZT02MTM0NTEsZGlnZXN0PSJiZDg1YjFhODAyZmNhY2EyODVmOWQ4YzM3NjkyZDNiMjE2NGUwYjg3Y2JhNmY5ZTg4MzVlNWU1Y2E3YmU2YzYxIixrZXlfaWQ9ImRlc2t0b3AtcmVsZWFzZS0wLjE2LjEiLG5leHRfa2V5X2lkPSJkZXNrdG9wLXJlbGVhc2UtMC4xNi4yIixuZXh0X3B1YmxpYz0iU211TEJCRXd6MHlqV0N6Y2hKd2txMkVTdDVQSHFENUZGWTdaOVBZa0hQcXpkUkpzRW1OZWdwTkt5ZTBRNFZYUnd6TU9YMTdJS3RFdllDakZhUUw4dmVoMXdvRnI1YmRneGFSSkIxb1BRRm5XWkhac3N5TzI2UVFJeWNIaE1Ra29IMHNTS3JUVFhLakVld0NJd3JMTjZtbFM1QkdWaE5vYWdQU1dIbzFyZ1dIeUJWaTBscjJJeE9UN3FBazRCZURPV2NNRkIvUHVta1N0VXFjMGliVy9BUlhERHNaRlZMa2tRVVhXUzN5RGFuRE9iVlo1Y0hTTDFMRlkrRU9NWngxc3duYWFuMkxlSkN3dU1UZ2x2cUhsSit0UnVOa0xuQWFNd3cySE5YbXdTZy9ha3Z4eVRNZmxnai9rNDFpL2F4UGpiMkM5SjB4VGsrd2pCK1pqMGhXVldmTlE2R2xMUmk2TXg3Wkg2d1doOFhsRGZrQlRzVmJrQlR2TlpxUmowWnlNc2lUSnoySnNxSW9mK05GSkRZQ1ZETDlqZ0pQQm16YnBNdUFmVEk5d1RhTFhITlVzK2o3allKdEc5Mll0UWY4cUZWVUo4OFp5TU5qcWpGR0ViTE0wOFl3NGw5R1NrV0MwRWtEclFOTHpUb2VmS2NJSSs0NE5Ga2xQbnJUUk1GT0kzcHFLTU4vOTg5VVJLSDVMbnhWdkdlSFdLL2IvdmNwS3pSSU5mc0YzT1NGRG53dzVQT2xabHVhdmpSQVpnN1BJV1dUbExCKzc3WG1WRFlSZDA4Sy9QQ1hBODkzV3AwY1VGazFPSjdaV0JIdXlac3N4TWtXUExPMVVub1JkOHVEMUNPbGd2b01FT1phSDV5d0Fpbmp4TWVYalpRQ2ZsK2FqRGNwODl2MmhRRzE0MUd5YUdUWndqb0x6RVlYTlRHbkhOMnh0aWFja3pSN0tPTXhOOFBCRm9ZTU16UzF5T1FVMEJHSDBSUVFmRW93OFhtM2dQcDRST2wwM1dSalVzMU1CTER0Vjl4aitVYWhtKzFMRmNmODhGcUlxU0NVbWlOc0tYV0lXcldjd2pCYnBQeHBuV2pHNWtCZUtqdFJDdkFPWVR2NDJiN3F4VCtMUG9zdU1PQ2lqWEE4NUhZTE81UVdkRU9oeXlVQlYwRW83WWY3NjRrVWdKNTF1RS9VUGsrQ1JSaDRCeDdYd3cxcklQci9sKy9abDBpOVlFQmFSa1VtMnViekhZSXJ5M1ZhS2cyL0V0eUlUMnVsUnBEWXNVQW9PRWpBWmlpS2JTL3lkbDl6OTBBMmpLMlBWY0t0dkdLQlIxdS9xc3p0Y2tjcUd4dWZndG5oYUgyanViWHFrZnhNKzRMUXdFRDMxcE1Xa1RibFVrbDllZ2tyNHk3aVNBZ0t0WkhvYStqYm5PZGtNK2daRWVFc2t2NUtEUkRXZHdHSDhZd1RWRVJKL1Q0OXNtbzd1K05kR0JEeEJHOFpxN04xVkgyTW1FTWM1TmRwMG44a3VKTEJUS25zNS80aXhCUlRHWTRtQmlRSWpQZkpJaUtsVzhJRGlkY1BLK0p5amUzMVBBWlZ3M2taSjlSY3Rja2tGZTBPMWNKOHV6RUdpblpzc200VitETFVmMHJkY2JaNEQ2MENxbGxZb1BLalAvemlhZk1Yenc0QTBjbnNTSGIxMTBWWXRGMWgxSlZBQ0FLY3crQVVqZ1p1SGNONk5GZTBWLzdBaEs1NWVHY1RQVFVGa3NlWnRWWC9YQ3kzb015cGR1Ti9vZXdGUWZCVnM4bVJ3eVBxSkhPc1pwci9PbzFhZURVaEZVOTc3Q2NHenhVbS9rZU5udzc1TUhUWnNyZGNkamprN3JGVExkYlRmNGEremRCYnhjV0xsMmRieGxObnJIMENMZXJaVVltanMwa215ZTBNOVRDbyttVGNlMjMzeGN3cW4wb251RUZIVnYxMCt6b1RLUE9rOCtWbjdGaDdvQkdEbmtDL3g4bnRDcnUzV1VDQ1g4RUpqem5sNDhKNEdqTEZDSmdzRGlxbnJpd0hmeFZYZ0ZVV0lLbWtLK0VIMUNHVUJ6SklyeTMxejFoTlpTVTkxSGVGNWFQQTZET1V1QnJGSFJmRnY2SzY2cTYybGFsVHFlWEpsSXk1VVZ0VjRITDRyODE4R1lQMEZ4M2pYWU81QUpVVTh1NUw0VldJcDFlcXRnRER3MnlJc2tMeXZsVEhQaUR1cGhraUo1R0xYT0h5aHVFU2krNWg2dHNtekY5VFp2c0I2SXR1WHR1VE5WK2dJK2ZCNUJsK0xkeFBYWUJwekVJUnF2UEpCRTRNMHRGRUNoSkx3N1VHNk1BYzUyOTZrdGduZDhzb09PS3FuQmpNaENrUU8yM1ROb3pyaHpwRWQyaXNwVEJwSmpLcytDYlJNYm9XUmlBcGpidTRBWlB2ZnFzYWMvWXBrR3NiMm5sWjVrS09naEc0Q21QbzlOenBCYk1MVlk4T3NpUTBybkN3UW82aW9jUTJDNllmL00zQ2VPc1o5WDBHQkdUWDN4dTd6ckk3dDBiR2dxMytKSTJldDk2TjB0eng4cFF4WndMOElkS3Zza2dDZWk2OG00T3h3TWV5KzNvaXJJWGVUSHFHWldGM1htV1FyVkgrM0NXeko5Qm9WUVhQbmNiWEVCaktqdTVqMjgzTVBMbXVmWmcvQzRLa3hyTGNPNHdvK3pGWjJIRTZCUUNMSFcvdFlRT3BtWXR3VTlFNE5lajRPWnBLMklPM2FVN2NOakJFT0FZWktKaEtvV3d0Y3NCZ3FFcmtqUzZpQnpHK0VGaFpOMHJOOFFkVHBKcUpxWHJWQ0NaNXRESU5zQWhhc1JVK0pyRTZiT2tkQUF1VGZjVVJhZU5vb2sxNVMrOHAzTFBiUVhFTWFiVnFTMldkNXowZkRXZVRaams3WjdZRTN0TmZ5dGE2WjdvVEVuaHkrcEdud2xpZ09QOTVhRjhhczhyaEFQSDNGZG9nMHZxTG5LNTB4YnlldDVrVWhsdG9mZ1BIOHBmZklwcU5hOWxDZWtvRjJjK1RPekZSUUJQVDd2MVpOSWZXOFJUNS9vdUZjV3BjVkEwY1R0T0sxcFI4Rk9la2xVREhRN1JxMHZzaW5iRTB6TlNtNXBJQ2h2bk5PK2dSbFBpTEpIOExBYzV6SmRXZVhUdWIyMzNQeks4UHhuZTBkZXBSSUg1a3lnVE1qazFOMlR5eEk0YmRya0lGQjBVbFg2c2lWWWhFTzE5akh2V3JzRjZ0ejhsTVRzK2tXRG1NSitiR2hVem1jUVFXRDBqYlA1NjdGNFhFamhhYmtwNkMyTWo5ak91TEVaelgvZ1VzMFB2UEhuSmsyOVlGajZJVkZyclRTelNSdWgrZWlkUDVDMkhTQVc1VUM5K0JJSjNBaUdzb21Jak1QMmlPZTNJSDZadGZEbko2ZG0vZ0QyaGR3cWtsR0VDUHd2elNUMHNLZUk1eTNSb3VBellqSVpuQnNyMEFwdEpKTVZHWEVmNHArRzhLZ2RvVWFaVk9oSkc2aS90NEhxeE55VjlycG44dnFiRjZ0MzdLQTNNOWJLRlBSNFIrSGI5UW1rbFovekRYWjB2cjB2NFRNZmhONFRLVVo3THJ1dWxOdmpzN1M1RTRncGFtMGpibERic2l3RlozcEtjeVVJODk2UXYzSmRVY3R4cStHdFBKT3BaVjQwZVhvMG5aVGdGSkMyMHhzeDNJUjRoMkNpenV0b0lOSjMyaFRIS0pkVk5HeWxvcXovOGFnVTRpKzdJUGxMeTJVSVM1L0ZhVjBoTVNpSSs3bUhNRGRqSFFXdmhFNlZyZlovYU8zM09EV1VFMjdHYm12N09jSzR0UFoxWS9ZK0IvRjZxRXBjeGkwempobXhiY2owNm0xdVhtMlBteU1lUVFYamtNeFpRenZ3RXdRK2dTTVZTSW5wQWNHZjNlNkJFZ21vdG0vSktFa2FIYWxHc1QwR2YzZmlwOGU1aFlyaTk2Tkw4WGpiV0szYWZsUmI0YzFPU2c4d0poeTA2MUticThpdnZBakZ5cFNKRXQ4OVZBdncyVy9zSC9XU0lnSzJOZEIwdWRIRzd5dm1PNVNWM0g3UjJLbE9WOU5MbHBaTkEwYmdQT2tVRDlmUnJUOEkxZTl6SW5oT0Mrc1c4WTVJVmUrbVpmTWgwSjNzWHIrQ0YvRGpTcW02THNoSmtmK1ZOM0ZLdUFuem52c3hadW9ncHQwTnZneHZHVGVtNklJc2JXZi81SERnV2t0MHJVU2RhaHlhbGVHRWJlZ2crK0xWd3p4N0NOWFk2amhZUXJRMERPNEhCRkowR1JVQU9sV1FwSTdNUFdBNXg3UUMxamwwTnVIRnFnQm9YWU1QeDZFMHBzU0F5MzBNOWdQbWc2eW5DRVBSb0pGdTZXbGQ1TEoxTEVJZjRwRU51Vm8wWGdjcG9pTVpDaE1KbjlJb21vWjd6NHFoT0FMdlB3czhkVzRwSFU2WE5OK2hBMXNENjJ6Z1c1U3UveGIyNm5Qc2wzWDUrelhjRmVGN01ZNS9abVlJWThoaFd3cDFTQUpMSkVvU2F5TlQyR2l5ZWRRdzNtMXZPblpRVnM4K2hiOTVIRGkySlE0dUdGRWFjaEJ5YTZHOVhwT1FtOW9EbFFRU2pUbUs2azBxZFV1UTVpOTAzMjZmS05PNWhOVG1VaE15VDZEUzFpTlRpUXUxajhvazhFTWdtTWNhY3FrRGxyQkZjOUlTSEFZTnByd05iekNSbGU5WWNETHRrQnU4ODZqZGY0Q0dnOU9ldDlTb2tTWFIzNWZaOXlvZUhZWWdoZFpVdnVIOTZ5R3hnWVBuM0VDU2FnbUwrcWhzRHAxaW5PWExBTEJhYkRLZkF6Z0laWHgwem9lbERYRzJxQWkzNGpJZmxnN01lZ094dFE1SWlSWXlFbCswaXRZQnMzSFc4MW0rRms0Ni9tY1BNMncvd280bm0vMTFNVmFCSnpsSlNrNWZlVURXdmxJWUMrS0xEaEx2RTNwQ3dmbmNMQUdJMS9TYlZyUVlrSjJ4ajN0Qll0VU4xRGhOTmU1R0Z6di9PYUVUZ2VVQm9LYkJxc1ZKT01nRC9HMytjTVFZSm9TcWk1a3R3WFVMUXdaV0RKbkRzRE52ZndIK2hTVjdYMWV3WUZHTm5QcFZqZ1hWcGV3WEVGRHdKOFdKME5FUDk0UXd5ZHR6OFR2UFZPRFhLUmVyelNFZ1VDR2kzc0FiMVVWTHQ1Rzk3Zm5ZZ1RVQVZQVXBmTlNaVkFGWVZjNUNKSVZSdmFiZC9PT0Z5MzhtbHk5bzhUYzZKZFRFSXgwWUVjK0QvUHhJdkUxaE8zNm53T1QxSDFGY3NHMmNPNHphZHBxWjgzTktIWC8zYkxvWVRSeFRnRmRzVUpsc2hkcnJ2VUc2YUFLMTd4Ry8waDJncHpSSGlzaVgrL05qYU16TnR3RC9hV0xONVJvSitNem5Jb2c0c0xER0pBTWswenN1MzloVDAxa3NXV0pzK2RKbkZMUXZlamQyTlIxeWRJZjRqSy9Lc3o0ZXpDUHZrMnZLempwMnF5ZllNRGFNZkhNNUErdlY2K1pMdUpNUjkrcklvNGtUQlBwdDRhWmFXZkt5ZnF2by9ZaytVVlBBQ2xBZ2srMVdUVFl5SzlPWU05dGljRzU4RmZyUDltbFJ1ZW5uaHdlVXpqblNoYmxhMUI5STNuT3lLOFAwQkUzY25ISW83U0ZsN0ZZUHdQdWI1WjAyZHNleEF1a09sZnJwNzh0M2pVYW4vaW14L29hMXg4UjYyN0RmRS9GR2tGMlpwOWEvQUY1N3R6dHhKaXFtRUU3ZFRla0t6NE5TS1JkVUpqa0wyRC9XaC9YQUNYVGlNTWU4amVMUURMaFAveWQwYjhIdEpUMkFsazZrVnM3bjRoazVXK0dwZ2ZIVTRONmpZcEZWdlZvbmtubHZvNllQakY5Qjg3WTI4MFFqSnh0Y1gvbGxVSC93REpGMG9jMDhIYTU2N2hINlVzcFBFS3RieG5WTC9uTWk3Qlk1UWYwd0lpOWlVcTBsd0RYd09Lbk4zUTY2VlpmUHkzQ2tJZFM4ZDYwRWlPbk9aNlhlU3dCK3lFTFVvYjVySTN6a1hZc0NVR0hkOEdMdW0yTFBxZWdVNDFrbDl3c01SYXU3dUVWaFI3VjBiaDZOUVVwV2o1Q3pMQm81MzJvQlQxTlRtYmVEazJJS3BUTlgycFhiTGJCNlpoSzBTc1NIQXBBcTBKeDh4RW96NHBvRWZmb0ZMcFluQnhZaWx1eFJYeVRjSEJNRDRLNkJBeUJLYzhEd21VZVJEY0lTUk90MmpZdWQrVDNiRC9FMGk5dHROYUJoY0FCQXBjWlRKVkxMcVYrc3YrT0wxRXdrM3FHdmRDb0M3anZBR20waXpGRE8xMk5Oblozb2VhK0daZjBScTFGeGRKampyQkZ6bnljd3hneCtrd3NVZjB3ckdFQ3RZY2puYVhXOGVnaGZoMEV0dzY5WGxKV3REZlJMamlqcFgvMjJnb0N0dDMvTmpFK2VzUFV2UkZaZVBXWG1QbXFYTjJzQlhMTExlRTVCU1NaVHlKRkdRUG44d1pUdFM4YkZnUWRDeEVsUEMvS0MzM1NYVFZlSW9UeW0xWGJ4T2IvY3Y2SXdQMTNTbkFUZnp2TFZPQU41WUNacXdLQmRJM09nVWJ2UEs3Q2RMQWE3MXhQenRUcG9PRm1RS2ordUlFTHUrMWE4bVEwQ0JpN1daMW1vTjdpWS9aV2U1eDNlcjdJWlBQYjAzQTExWitVV3ZRemVlSFFmQnNOTHVNK1RNU0FTMStvYXdPUjFHOGFHWWFraW5EcU9LUlFrLzBGUTAvd1Nid2IvbHdWWnlSVjIyQldJaUhPN1cybTI1SGxtK084WHhEa2lleVU3NzVKcitDYUtwOXJyUktETTVqZThmd3IrZTdnVXJibk80N1FkK1pwK2VkMjZzb295ZWF5bE1POVprSFArQmpDT3ZnNkxrQnZvQld4ZTFBU2VkT1RJRHBydWZPRjRSb2lFY0xBQ2JmZFM0UWxXYmVTTmhSU3YrZThtaUtYTzBsTkxJcXhSdlIwVlZURm10QU5FeGo4NC9tRGJ5SVkrbkpYWjlGcUVxQktMMHpOZ3laN290Mk5lZ2pjU1FlUmxYQzdyMjl5dURXZ0dQM1ZLalZyRmp0VDFQQUlxZGRWa2djM1ErRWw4Si9xNkVPRWRCN1NXaUhlNW9FWkZhN1lKY2JlY2tMdDBhWUliUjdPSVR4Z2MrSHg1MTFRRVNVS21SZy9Ld3d2K0djTTYwWkRWa1ltS3N4ajY4YnJSY2JiNWpjR1Q3OHFiT0lSdnB4Nit5S1ZvVDg2U3NrWlpHM2Q3SE9TN2JkYm03ZkxrMnBHSGxxY29EREtTWnFSK3kwS0M2OUdJZVNrVllidXljcHF3bWJjcGlmdHpCMGpQWEFudEtuZXZ5V0Q0Zi9NcmdKd3ZCcEZqNzVLZ0J1N2l5NDREdlpNb2lNUS8vRzRNb3BJMGRUM3ZDUWpMVGduK1VCUFRiUmwxQVFiYjgrbGFkV1JCa2NiRitpZW9MRndvZGRuS1VLeW9LNEc3WGlGazR5dVNXdHd4UVNCSUtndG5iM2RzSzN5RXY5WHI2MnhaRDJxenZsMllTK2lLSkxMZk0xcnFVNGYzNXdpQWhudVB2OEJUcjNIVndJU3ZoR1VkaW1ETjl1ZVVWQ21mV2Q5MjVlRHIzN2tBR09hQ1hSenBsQzVmd2xNMTVuZ2I3RlZUMThqd0ZlNStHcktWSDZlS1JTU0lCRjhFKzBhK00wWFFDbUpqYUVWZm02NjdzalhIbXArVGx1Ymo0Z0hnaWxBZVdZTmZSUUFacmdHT1poVlkrRzI2MzBWYjZTWm5SdmxwbE9pc2xVRjRvUEF1RlNIUGJQUTRhaGpGQk9OYkRtcmVha2kvN1VieG5VMnpxMDhESkRVUTVsTVNuYnNjcWVDRU5KN2tVMG0vMitIMGt6U1Jna3g5RGxIV0dtR0VGZFAzM0lGTk9PcHc4blJ3dFVSVlFYNklEQ0k0aSt2dWNqV3F4dlNnRlVGMGpFcWowMVg1bDAzYzVMd0RXN0hYSGJma2RxYjJjelZreVBadUJob2lOQ0FKQVljWFBsY3E4cnR2M05aRlovR1V3clJUT1pEYVVIZ0k0VEZGRXJNQUJHbnY5WW8wN09mZjJYbTYvcGZ2bG16L1EzSFpQMklWc0NrNVcyUVNpUTNtWjRoLzZUMUUyZEhWR3h6QkppMVZ4SjlKRU54VUVCWkovUWVBNkFNSnJBSGkraDhLOEYxTkFJT2ZXRFdhNWxiUlB5U09SVE5mU0hraWNTMWhWcTFBRkZzZnlpMEV3ZnM5S0RKbXc0Q2JBSUVNQnhPaGQ0QStHdVNJL3NjWTlDYWxwRjB0cnBTcy9Ga3llTjd3M3dFQXVQWURYUG5vTTRwaWJjSC9jbjhyQzJTZ3QrN2c2R0lGRzFrTllDc2krRWpBMVA4T2VTN3hBMHU5R3B4NS80RmhGcEpmRzgwdUpLMVlBd3Y1ZEV3WXJJK25XQmV5dDFLT28vcy9GRlFaYm9qbEY0UGZLdUZlUE94ekVJbUtjckVJQnVpUGRkcG43NEdjTjI1QlZ3MjQ3bnM5TUU1L2djZGV2TVZQN3BEZ2NuZ2NaVjRMTHJQdzhoTWdjdzJveFd0d3NPbWZyTGFjVzFOZmdHanZ3RlVzMWdURVJuOHFHemZoZ3lYLy84aVJBRDlneE1Vd1VFTC94SzZ3WTZDM3o1ZnVvS1JCR3AwcG90T21QZ0RpYzFpZ2NGUmF1Z1YwdHNLNnVFWE9EUGNIdmpDekhDVEF1ZkZhSGZHb25seUR0T3VSeWE5a0czdDc1TFE4Zk9ZWktvdXJ3Rlh2amZYMXd1MTA1YksyU3hJblNkYU5ISGtsbzBvODVIaHhXdHJ4SGpKdGNOcWgwQi9SQ3JQQlRYdTEyajVVeStkS1NZWE1KVkZ4ZXFRc3hsdFc2R0FXMlpweE1RVHRPRmsrRjZSNm5qaHdKZnVLdjQ0cUJ6RE16THROeUU1Tm9uY0k0RHY2NVlMZ3hnTERMZjVPZ0kvWXJpNmRXKzlnNFlZRFRmKzBUeE1SdFZNalMzdmlFdjBoZE44QWY0WWdoNVBscnBDRUM4Tkk0WkhVNFVEa0tIbW9MTFRvd1hkRXdTOGNHVFI4RGJCRnhQYkNPWXhlSFVWZ1dTd21CeCtkbXZKbW95WUZSR1E0Y2dyYzJqcHo3a2ZYL1lESFEyTkZWNTh5OWxIR0N3NXpkOUgvM0M5T3BWbE5qbURlK3RjTnFxNlU3TUlHeVBoc1FURGVIN1F0U1VPWUJiZnhGdFFLcm9mZGt0OUNTTnBCTUdTYStNbEJiK1k2eVJ2eVZBaUxhSzZVSDZudUlqbkpHczJUejdLajFGekVRU1BTQ2xTWVh0a2xwaXNTTUZCTSsreUlYQ2x4a3VIaWJWVG9YTmg4VGdDMVpIV2kyM09EejVSam04QXVMVTZwMFRxZXJTU2pXNms0SGFCK0NUaUxPdHM0ZWtZbFRDTnJpcEhlWlZPUGwrQjBYcWF4dm0rcWFtME1McFV0a3RLWnZKaUdZVElNWFVabWpxdnV3L2pFcmtmTDJXb0lOWVMvUGpuKzNlNnNDNjlyRHZSUTRIZWJLZEFPUkcwd1R6YlNSMmxaOWtXL0RXRkpicDhkaEkwRnZ6VVBhSFd5emxoc3VGT2Z1eE9neHptWXp4RDdiTzRDS3RYRTN4bDBUUnN4U1M2Tk53UjVyemNDdTBSckNGT0dHbmxKU3UyUXI0WkU5azZ1RVcrY0J2Tkk4NDFSTHFiWFU1NDR3UnFWNHNlNmVRUUh1c0M2cHZjZCtWMEpEOFhaN3k0QnVHcmtkVUdpWENlZC9ZdnJsTG1PZGZLcXU5am03SW9MLzRkRlJqWEVQcXNBNk5PUWo5eUR5L0xJWkVyeCtOQXlzc01HZmJsQTB5Skw1NUVyZlc0a0dYMGFUQU9FV0FGNmZzMEhqQjNNT05RWloydmFzcU9KRjVCdVZDdzZYdjRhK2JCODlTSWhKMGtUZGJEdEdiRU1ZZWhCZEJLdE1qN3VBZy9sdGY3WjlXWk56eGpwZm5RT2lXSzRNVnFUK2E5VjhweHlVVXN5L0o1Z0JPR0F3L1JBTGNGbUVjYlMvdkZJTFhzWmF2OXJFdm5WZWZSb2NUSi9aQlYxRTVzbzc2L0JUNUNWNjQ5U0RiQkZtMnhLZ1hIdGxCbTNFb0RHNEZCR3hkUFNMai9zMDVVcVY2bmZVanRGcWY1ZlBqcWR5aHEwUW0xdUJiK0ZCbzRKSzFMYVdxaW83d3B0bDlFV081elphdEdoMTVqMEtGby9RRi8yNzNObG1DMlBaZlZGa2pBRko5Ym9QdmlZQVJUSmxtbDRvamZVNXI5dVNtbEkxaXFDWXBqZ3gzMUJqUzE0SlA4cXdkTWxBc1lKd2l5cmRIejJvU3crdlliWTBXYmttbEtpT2RZM29iV0pxYVo4dERrS24rZ3J2L0pxVVhRazEwREs1T3NOSFVSN3NEcW9Tc0lsSW9DWmNsTWlHSTU5R0MvVGpkclo0QjIvQXdKLzdWeDlyNU5RQ0d4RUNDSmtyNnhnTFRkd1NiM3gvcmg4MTd1TUFHN2FQUHBWVmVLaTdFRGozNzRqOFlMMUNVSmtULy9VNFNLMnZnOW0wVnJkZkh0Wkg4SjRlWVg5TFpIaWxUbDVSSTNjOTdTZVVKdUs2NFd6dVNOODdFdkpGcG1HSEtZOHlqM0JaWUJuUVhOVjdsM1B6aHhudk5ySkFQbHQvS0dwOWNrdi9FQXY3SVZKSEV5ZUxVQk5CS3p1ZDE1dFFscWxuSDlFSnlrL1hKTnBwK284U2w1VURUMEdkc1ZWeUV0N3JrZWxoNmlUWW5FYXJhMXgvcGF6TXJqM1k3OXBNYXpUMVRMeEhXSEdRQnJ0aXV5bkNpMlRGNDRRckhHbGc5TnJCdG9raW9oOGR1Z3JSRzNCMU5kdVlSeGY0TGxMbk9mMjVwZDVVejR1Y0owUml0ZnFsVVAzRnhYQ2JyLy9wQlcxZ1hvRjJicEFhNnJhWjhHa2Y2Y1V2YnRBVytSeFc1THNkcmVpMjU1OUsyNGpvOENBS3FWa1NBOGg5WE5wZWE0clF4QmN1RldrZGlJbnlFNDhGTVhxaTRYZUNuZ0hUS0pQODVZU0p1clp6VlNHNEx0YjQySzFhYzN4Sjh1UThEc1BUZDF6eFQyZ0wyOVhORm9BOG4yQnFSUzdzcGxNc3dhYU90ejFNbzVIaEdudnNINE83UkpJc1gxRGlUd0dERjl2Smp4TFFVYVFqeFR4WTIrbE5nZmxnMTVGemIrQ2hTTHFscVN4UW1pZ0o3cGJ0Q0NPK2puQjQ3RitOYkJ0UzR1SDVUemNaTUFDYTRQZkxjU1V4bHlPdGliQUJTazlpZjRMdUJMMURVc3djTytvMy9sTXIwWDluMmhTdStUbnZEanRuZms2MHJpOEIrR0pBZzZyRVgrZ1lBWUx5VjJzaFBvNDQ4OXpOZ3Y3NTlrRFRCVnUwZjI1NnkrMzEzOHNMb0VZTGRSYU1UeHQybkdtU0duUmo5TlZhYW9qSUk4aFhhZHQ0dzBXVm1yNHhITnVFelMyeFIrWHg5Y0N6RmpuWlRVREdCRVRTbC9ZT1l6ZHBGUG9wTENhU3MrZjNra3g2K2YrcFQ2bzRaejNha28waVBHWXlGMVFFSFBvRHp5NmFxUTFLdGpoZmN3T1A1TUFkS0Y2dzJDU0o4S3BzaUY4QlZxTVpVRG9Yc29iZW00SlNrbmRRbWFnRTlDbnFKMWNoWEwzV2tlQUZORGU4UHlXU3NJL1ZmL1JHZGVNRjJqQitTakRVMGdvMFMzRHlCSUhrTU02QXRWYzFuWjNCV1pFSEgwUzg5Njc5TXphdGh3TXRia0dyWE8xZTZpVkJEWkRlcHRINlIrODRzNnVJZzdnOGJ0WVJkamc5UzFnT1dRS3RtNzBYNDdvVHExYjU4VTN3Q0FmREx4Zmh2NW5NUzJPcXlqMC80clQ2VDIzdnZHbzdweUNzQ1h4cVpFb0NKUHBDS2hlVEdvMFA5ODltYVBLOU0vd0daVkI0aVFJelE2VUplakh4RHExcmYwYWtqci9BWnBWbVZCV0lrYkt6UmY0R093VmxWZGx6YUMwLzZ3Z1VsUW9LeERVSEhCYmZ3aktIYXdpVTZTU2E1SW5QS0tkUTB1Ni9KamhETGJiOEhsR2xCSUFoSXBXbUxGcXpQdUhuazlUT2NYYmpPTGhkMnlMSlFsekF5dDVoN0RJNjZ0Z3ZYSUZWdVh6bEQ2b1h1YmlxSmhlajlDbjV6cDh1dkxUdHVWZlZoelpuTk5LMmxTVFByb1dRaU0xSWdTeHhFM25pZDJYbWNlMlYwbmhDM0dGdlRSQUFnTlNqdlQvaEZscFBMajFRRElOUC8rSzl4ZEZIY3hvMkNRb1dwbGlRMG81NjM4MW5iakRvV1RyOFd6M1Q2TW1jb2tWVzlOamdVN1IwQkY2VW52KzYvcG9pVExCN3pZNmRiL0UwUDgwZ0dBVVFXbHNxd29rNkdxdzJNcmk0WjNURnFNamhiY3FwSjJLQTJ3dURmSHlCdUV6NjFaSzgvbGpibWpvQldxNGd4bzUyc0FVWjVZQmxqUTdwbmJNMFZYbHRiSXZiMFdqdXhVZGRsNXZ1RlFaZVBsbkg4N0RNem5WaElxdnBSOWROTXpaaVhWZVBHR3QyVjAra3JwdWl6c3E5QzFGQmVLY3RkUG5BdGdQMWFuQUNra0V6ajRwNTNCTkRyV1ZXOVhhUWdBYmhhK0E2ZzVIYWRWMTBjVU9ZNUZqbjY1NDhRdlhqWjBRYjduTCtEUG1iaWpSc2YrcStHb0xLL05NNHlXUWdzL1c5RkVINWo2bFpIM2lyYysvcU5PeDIyV0pSR0N4TGJIdUFGOUU2MEczREN5NjllMFowb2Z3TXMwVXhtcmFxd1FJQUdYNDkrQlJtMXRJblIyam1jNldpMEdVdGhCWmVVTHF0N3JWdS9nNTBNOU9acTkvQUdpc3ZLZGk3R2lkby9ycWQ4c1FZVTc5SHhyWmsvV1I5Q0JyajNlRk1SdGgrMy9LNWV6Zy8rSTdvK0VMZWN1TGZVaE84SS9PRlp4SWF0dFpUYjlYWG13Sk92YmRRMnpPUTFZbTJ5aWxWTUdEdVdtRjdUMDV4bEM5MjR2ZlhOVVk5cDdjOTErSGhoNlZmaWxFeklSNXJCRHBiUnFIckw1OVlBWk03cUNJMGxmQjhZYWpIaFZnaGhRdHJIaHNyeHlJdkRnNVpTaTUwNFpWMUtrOEtEQndnTkdhVW5Za1RVcGRKcDd0SmtWUGY1anhIdC9KWnVyWWMxeTVybGZqbzlkWGNQKzcxN1ZXY0lyMjBPVlArdE1vNGUwYWxRNEVMOE00MzBDYU9BaDhIVUZwN25UcTYrQWVzL200OFZDanFsOW85WDhxUmFieVJndkMwMzBYN3BpM0REZUt5VEdNdmtlQUR3RW9ROHdQQ2UyK2wvZUNjSTk1QnFkeTJidlZ0NHgyVHFtQW1zR3pyK0JqcnlsdWgvMUp5TWVoUDVDSU9rS2cvaXM4cm1NZ3BjSVVGMjdGRmE1Y0gxQzhmekE1M3dFbHAxNjFPa284YTFhb0UybXNzUkJUUWFmK0JjbDg4OGlRYWgzOURVaDRwVWJlOVFGc0tvMi9FYktnWDRVTFFDZHUyU3IxTitDZDczb2g2MHJGTFBqbnpPUFYzWTZSTUNwL05pVXlPaTdrYUlPdW5RT1ZZQkRCVEFIck9OVHhVbUp4U0FzSEU5MlJSVUI3Z0VRdGRQVllaUm50bWhQSXI3TGRJN3FTUTd1OERvT0dldm1YaG9NMHZsVW9zS2NRb1ZRMHhmZ0lWSkQ0NnpuYTVRcWt4YkZjcGs3ZmRRdUErSEZoUUVzNHdTVlord0F2SVpqa3FMNDlVUXlHc09lRGxqTlVMaVBWWEgvaUZuYU1sZk9QQzNDZll5aFBMazhZS2s1SjcvanlZWm9jYytURWY0ZWZITWE4dUdnSlEwY2I2NjFPRUJDK2I0M05naDdyOURVT0N6UkpjeXl6eFBERjE5RzRiYkpLTGJqc29BU09xaEVhRFNleE9uaVB2RnkxYlJkY20wSTgzak54elkxOTEvbEdlbVRsR2dsL0dlTzcxRGxNMktZMXVMTGROaHFZbmx3MFVOZjJ3Z25Bcm5FTTlCVFU4cXN5dE1HUlFNUFk4Q2hjSUwwdWErTDJYb2o1Q1htOXdaZFdHOXZ2bCs0QVU2emJITlVQL3dCdE1rZGM2dm9aZ25tcW9aQ096UFFtM0tweU5LZGlxMkIzcmFyYVdxa2o4RDNza25EcG5ERkdWd1J2QURGTUJWZ3JnOERveFcvMVZQaGUvalNkUFBDK1lqU1hpdjlrdnVxK2dNNlFPeGVZVTlic1MzbFZ2YTUwaFFWWm5SREJDZFM2ckZEMU95b3FmY3pDYzhDVzNIRXJnUGswNUxRcEJ0a2IzZjhkMHR3RitDZjdOUWJlV3o1cm0vQkJqdWJlR2w5ckxqNm0vYVQ3VFQ3NGhRQVNoVnlVN3N6RnVERDV0eXFPbC8zWGNJc3VGUWpTVlVLTExIWlZJbjlkdDcvZ1lqbzJoczhjcmR4aGpjUGdrdWJJYkZoSXFrK1RkNUlWMmFRTTJnU2dQN1BSdkhjZ0ErekJQVWNTUmR4a1NPNk9DclR4QTN1Q1drSUY4cXVhU1BRSE1TZG1XMkl2SExnQU0rejZlZ3UxVW1lWkdyOFc4RGJRNnRlbEMrK0NKZGtvMWlobllKZFE0WWVoSnZKd0Nsak1NY1RjQ0pGZkRja1NKajdmdHRKYklWSWplUEpWeWhtejVQRFpPQmNKQnB5S1l4akV4ZzBKc0FaUEFNZnV6NEw1U2VoNlUxZjJUdHN4WTZoNytYYlg2N0FTK2NsbEpEZGM2QmpNTWlHRjZmZkxDemhiL3JQUHJnZmd2RzRvdXVPQ1QvYzZhOVFkd045UldydTZDaHRIeDg0aUl2WGhtVUpYM1hKK3FueHVRekF5VkVrV0E0cXRkNzdKUFNqcUYxSS9lWFZJT1RWTW5IZkFHY0IyYllJTzR3Y2RRYWpnVDA3OEViNEZOZy90US9tWDk3c0ZSc2ZWY1IrMW50alJxaTdrQnpTTWVDVU9PT1hKSFZyOE1uNU9XeEhzZHVLaEFWbHo3TEFTM3d6UklMdUFzV0ttYzVGN1l4MmxlT1JlZWFEWVV5U3M2aWtyNEpjcnZrdW5Wb2NIWW9OdUZRdmg1cmJZMlNUaTFrZEJMUllveUhXSlk2aXlDY2REUVM1TmNrRm9ZYWNvZWVhS0E4aml0TDlBVUNxSlRRTjNJdURjSy9Lbk5wZGRIYkFacTErdVJoZ1A1VjVLRndEVXBwbldzWmI0YVJMTVltN0VJVFBjYlFFZitSYmhKeExsNVFSNDl1L1ljeGtpN0dPTzUrTEpUdXR6RDBnL3Bmai9LaU0xV2xvS1RxRW5LOTBJWXNkcTYvWnYyck54aDc2blBrQ2gwekozZFNLcUsvWklHcVJtOXNuVXRsWjNhMVZEeU1McW5YUlF5NHpwTG5WencyeXNPeEN1TllaWjY0K2lBMDZNNUJCcDg3TDFMMENMQkN1czFxKzAzUURHVkdGVVhFWldVTGVrWG9pUDUrWnR0ZDNBSEZkdnozRnRldFFNYUpYVzNHUTlvME9JN2lXSHdBcFQ5dnNTazJRcmI5cGxLR2hnZjRRTG1BS255MVZyaVF0RTJlMTRpU1hPUWZiNWQzN0R1TVhISmh5V0dlZ1dtVEpRKzlLN2pRT0RuZ0lJOFFnNktqejZua3o4RFVoRHI1YkUrQnFZMGEzelNrTEtQSmdZNnVLVmZrSFp0NHhIRnB3bFU1cjRFdElEWXRhcUtrbFgrdEhVU1RCN1FESi9NelR1VkJ3T0dBckx6eFVjdzZnRTdBS2VUSWdzWVdUUUZvczFCM2c2R2JwQmFZREFyZW5iaXgzeDU0TzhuTDdESU5ZRXkyeGlhZXRTVWJLaXUzRjJ4Z1FIUk1ESGhkZlV4dmJ6Q1BOYkZOTlUzUnBHbzVweTNrSjBzcEJ5WjlENTI4R0gvdjFZVHluTnZJak9QOTdzSVhKL0dtZ0xXcGlzU1pFb3ZBcVZZdlZwY1htdTl0YnJwWWFiMUc4YkxlUmtDQUYrUWdiNVFKZGJGcFYrQkZrRGM5cUVnMTlUNHh1ajkzdDF2KytXVXd3c2xYT3c3cDJEOE85YXRWVCtLL1dZL0ZJT01yM0J1VTVrNXMyU0h2QTBwMjBjeWR3aklLK1gwUysrOFhvR1JzL1lFUzZEMmN5YmVBa2s2WjM5TjhPRCs2ZXlGczFxekRzTTNtdThJdG1wZnJwY3JlK2FnZi9XYmNCNlkxYndrVzNMQ2xpRGhYb2MzWkVFR2VQNEg2STRHMnZ6TlJ0L3JXRlo1SEdVTlNHTkoyYWhOQUdidDQ5aTVpMVFaQWRxWFk0bXZkeUwrZDIraThDc051K3d1cTF3aFY0UHZiMzhncW9XU2llcjBMWDZGSEI3MnlKa0xtbEw5eWg4c0NHa0UzSldLd3pSbWxrTHNlSWZLWUIvd3lTY2Z3QzdqUmNxVEVTcHFMZTFPMjl3SWxTcjZBbXRMdmJOSkxSbE5iV2loUE90TS9TUEVNWlo2Vk9uRDlrQWw1aWRPNmNERTUwVXgwOW0wVlV3UFRyOVBIZmEyb0hjWCtBSDR6djZHdm5SZ2hsZzRvYW9CVUd3akc5Qm5NNHY0OCswd1RZeUVqbU1PSXhUcUxUdVF2aVFOMWV2R3oxeElCbm1MUUdpYzlia1FDSkg4TnpHZXFwSE8xSmRBeDVESTNnT0pUaXp3RTcvdng3MXVFeFJ1ZFRYWVZhYmlaNDFWZzVSZEZxVlE1NTZqYlU5Tk9Tcnh6ZW81TlUrTC9tZXdYYlhBZFl5WXhmNS9qeDYrOG9XMEU0dlRCS1NmZHVHdXBNMEJCSGNTaW0wS2xKKzEvTm9YOFVXcGxTeFQ4eXZUMHFmSUkvZGtuSnBORW96RURoV3hQaFJYVWRNV3NRQVZ2aVV4eXAyaDdaVUNjVm40RzUzeDlrUEdPK2MwY2pxVExLUGUrSDQyL0J4MFpRUEhGZEtzVzZleTBYN3o0WVJnL1pueDZFV0tnQytPcERzT3J6T2NGZ2NnbmhGMWFaellMR0pVNG9FOUxXcXVXMzRUWnZjWG9jS2o5VXJyZ29XTlZEVUhJTFFTN1pSeGV5eUJMMTAxUVpabWk3RVhaTmpEb0lEUEN0RDVkVmpXbk1MSXQrQVBScGhSU3FFSWJPcUJnMm9td1c5ZFBOVXNPWUNHSUl1c2VVRXB5SHVzVDhPSzh3c1hwaWljcWk1RmxveXYzYUpESWxZclUrUDhDRDRybFNDM1hDKzhQcnBwMHFjakVpdkhrYUpRKzVzcmNoZmFvWHlENW9mcVpGWVBJbVp1VDF2OWZDRWpoUGxIamg1RDZPY3JyOHorYm9wMDVPSUVvaUgwN3plUFlqTjgrZzgvVDhGVTlTRlhaWXFsV2F2eTA5ZVVkT1lqWnUxeEtkQ05JQ05kd3o2eThlTzUxNE9uUjhPeTBYa3NqTnZBUWEzSUVvN2ZJc2NTbHRYM1hSTHhpU1E2UEgrWnBvVkhscThySHpSaTAxODZ6QTJkdjI2SEFSNC9TK3NVTTZpN1pvTHh2NHh0TUxxZ1lhcm9LNDhpUjg3alp3QldiVzhUQndBRHM4M1N3QkZJdy9LUG10YTEvWXkyMVgrelA0dzFybm5MdFFCNzZwN0h3ODZxc01mVHNBUlNqWEY5UmFqUzMzMVNCdVNOM1Y0WFgvVmdZc3UyY1RtR2RQOFFTM2QzbG4vVWhHaUpQVGI3UzhkM3VlUG11WC9ZeHdjS0E5NmtzY200MTBLTWZjYXR4S3pDQm9VYmtJOXVoNTRUVlZDTGZlUnhWOGw2Nm5TdHZkY2xtNnhSVFJZbUpZMGpzYzkzZWl2U0pzdUk4Q3MvaHZEM2hMU3BGbmdIMlBGVU9ZTXdpb241ODR3aXR4Y1pYSkJkMjd0eXdlWDZ6ZkIrYmpyUTNGVTkyOU1RQzZNaG5hLy85czgwSCtBb09oeStZYTVPMmpBdnNWWkRJd1JOZVdhdFhZYzZaYXEvVUNvUExiZGFKOEE1TjZ4Y1hQWW9iOEU0OS8yL29RWEVrQmIvalRvTzViWjZsRmNMWEtiZlhyS0dPVzJhOTU0aHdGK2RaZXNaRkNCcVNsK0M3anVOY2NNRUg2TnhFb1BUSTdoWk13eEdZQ0tWc0VtZEdDYjlyMURlY0owVGJkaDBpcjd6Znl5eXNCQXFjQWZHZHpoelZnM0l5TC91SW9Hbk8vZUI2RHhLck1vU1VFLy9qcXlTUUlvQnV1ZTNsZHdOR0VxUHhuUHlsZ1RCOE1NSkRWUGNxNUM5cUpVVkpjTENMU0dMbnZkbW9hbVdweGkwUTNCZUd3R0pLMFJVT3ZuWlFOZ1VKK0h2aTZlRm5jRTRoSGpub3o5NVRIT3M2bVZnU2s3QWVaZDVkclhVTmw0RjJRZk16NzFBQlRvMGJTOGJMWnk4Y2Z5M0kwTGN0dTlqV0RRY0w1Ry9BQ05laXFURU91Ulh5VUVCdDd5b1VmZWVaWlJpVllnN1JwOFRrYm02UERoaysvbW1nS1B3SVNRREhxNWpqZllmOVJBQ3BMM1VJWkJZSG1tbVJWMVd5TzMxb3daVmorQVpsTW1malpDSjJJK0loeVZzQ1VxTFVUeHAzdElCOVhpVlVRSGE3Y3N1NVUvd1JncWVENjhlNUhZSmtFcmNpMlE0UjN5dC9wTml6MEtlWEtJQ3NBZDhOdXNQOHZOdzRhSGFjUjZmakF3bVlScHh1NEs2SGR1bWwzcElVTEpzbTBvZjg1NGczdGtQMTdFWmRGcDVVYzNKc3F2dEpMNjl6Rlc3dllzSGVKMlkyWTkreVp1bS8zeUd5ZzJZTDljRXBWUVJlU2l0WG95SDhoaVlRSXlrN3l5Nmt4T09GcnNoUTJWVjFHZUsrOTdwQU8wN3EzYit1QjNWTlYzMHRGRkpGaDhxZ1FpWWNYRi95Zml4YkQvSHFGTVUwaGc5aTVJSnlyUm9COUFiRFFvQVFOalZRa3RCeFdFdWFnSUJqRDhmZG5qdDBKUTlIVU5oZHRyWTdpcTFnRTAwT0tWVXZRcnNBNVBrVExmb21MNmxYRkZyNXBHZmpqODkzMzVSNi9adXhINmF1d2ZSYWI1citIeTFiS2VZRTJpdTlUY0JscEZmN0E0YVl3TWFrL1VEM25YaWNtSGI3b20rUEhEajhySHI0cXRjdDlta1BPK20zeTNyL296RnkrU3VqQ0lJNzdTbDFiM3RqalpXWi9WejRnMDFlRTZMNXFKOFMwVG9jMHZ1WTVhU2lzd3ZqVDU1QXJFSVZJbUlUeWJSenQrYmU4T1hUQldGU2F4WjB2ZG5nZHJraDF0b0p4dmU4OHFTa0JwOVBMQ3pHNSt1ajhCREFrUTBiYUhVTlhkUFV4bVlzOFl6NlFvYUJDY3NvMlNhV1l6dHRhYWFHYnFWb1JUSFlUdms3cExGczF4aEhUWllYQjVWdXVoQmJBR3hBcUdXZ0NJUVhydlZFazdOcjhHelZRNmFUNlkrYytjWUNhbUExRytqblBGdkdETVM4V0Z1NkVjSjlUeVRrby91cUQ3cG5LV2Z5TmQwMU9mK2s3SXdSRWJlRlUxVUc5SWpwV0ttUXZpY1NYUVIra0ZjM2oxMllkSE1xN3Q1ZG9iU0NFNlpMUGJtbVlURnlmemI1cjQyRlFZc3FkZDRESjRHVUIzMExDZnZFdnczdEptU2t5RXBkVGtNcUVHUGFuNldsSVY3OTl0U0NuVVZrV3N1QTZidFZWMG9UY3grMFlLQnNVbm5KdnlHL2FSdjRQRzNtWTlQeXJLTFVDVjlzVWpKeDdQQTB6SDFON2hqa0ppelAydEwzN0Y5UUtzQ1FSK2tOa2dQQ0J6S0VmT0J5dlE1cFBTbnp6ektiYzF3aURkd0hSVEVRcVVicnY1VlhUNW9sMnFYaVZ4ZGFoUFNSRjF4L1pWaUNnQjVMSzBDY2ZPbUtXZEd4eEU5K2cyNktLQkxhQkxHQUdFOWVOc2x0aEJtbmdjOU0walM0Vkhob3RSN05Sb0hLVXY2Y0NOVEdvSDVJNDRLeTJ6eGFjTGtNdkxhdkttTVJNRnladmFvcGRoMThVdmhXTVF2YmszWnVuanFCT3R1ckZ1Nmppclhna2ovN0tkczRzbWxNSkJGUkNEcTBrYXVJQXptNkkzb2NuUzZwUjhYV0VoZ1hhcVpUcyt6U1R1YkNZd1lMWkJYV3FadzY2WVovK3YrblhsWWYweDAyTzNIMWR0QVM4MnA4Q2tDYnVmMWp3SU5XOGUvUHgyV1pUc3BsM1VhVmFGWDB3dkpYYSs2S3p5eE03QWtiN3BJOVdnL09idXYrbDVOQVQ4SFIwOE96QTNpRnZVeitsVUtpWm8zTHltazZVWXFEOFp5T1puWm5pNzd0RWRXZTV0djdpSk42ZXJzQklqY1hOcEFTTVptVW9iRFhuRkxMNGNGbnlmaWpNbVdDUGZZT210TXMybEtrZjVVNCtmWHFIWGt6UzRTM2tCbkNDZmVUeUJBUVBtVkZHaTF5NGIva3kwRTVVSWpPNmtoNkxnQnl1QzZqU3VzcW54Vk9SMUovczZRMk5xRXAvWGdhZjRYeEYvbU9idkpja2QzQndKTTM5VHNrUmV5TzBEalE4WXEreEI2b0RsamQwMUZicVpOMUJTVmRyQ212aHlaWEIwelAxdWx4M0ZzejJtQnowWklpazliSGF0UW9GbUpseU03d2dzeFUwc3BjMUpoV1Z6cENzMy96RDl5N2hJSnZ0WWtKM0w5YXRmckVZMCtrTDR1em9Yb1U0SjBMM2ZuM2I5OEptbTd6ZVZoSGExaDlBK1E5T3A1Y01FM3E4RWZobWFCZktRQ0FCRVp3UUVZSXZUVjlObkJOemNaOVlMYlIyMGtqT1NIVjV0Lzdib2lMa1liRmpiU3NES3dyL2hTTHJCb1VqcVltWXljVmgvTDl3YjRqcHE0RW1DT3NrZXpzMzFsQVVXZy9hL3p4L3pyMFZzaCtReERJUjQ3cnlqRWtoUmxXTDZIdllUdkxTL1hDZVVVbjlac1ZUU0p1a1Uyb1pUWUdIN3I0WlVpRkNGMDZKYnJ4WmJxeXZxVkd2Ly9QTFlteU5kdTd2NDJOWU5wRExVVWtNOEJ1WG5YcDMrUEJDbUFOZ29OUjdBK1VUTlRUM3FSRDJzUEdaZEhDUzdaYmIwTjByK1h6YlZPSzRLZGl0L3dhak1hYW9sd3pTYnVseWFlU1gwblN6R2dhazc2V2FvOVU1b1VpUzMvTjVndmtlcFQxM2ZxRWVXZ2RGYk9SN2Y5ckQ3S3RKNm9qWTBUbEg5QXN5NDJMV2UvZ0x2d1piazRVZFFPeFVPZjFVdDloSGYxY25sdFE3M1dtRUxQeURCSjRiNEZwcWNnTUJlMk1IbXJOQ1pLdXI1bmlBOFN5cyt0OGFIVG4wc3MxYXpJYXNPdlhYWFJSdUxnQXlkLy9OK0VyTzViemdHdE00aGs3MEdtVWVGOTVudE9iSEI4R1dweDJKek8rT1NmWnBkSmpqbW1DQmFCb01pUGVPcTArZVRNSnVOeGg1ekh6emxuSDFhUUw3SkpkR1BmVUgyRG44RVNSVEVMWFVhdE01NTY1Z1ZDelc4L1lBRFIrTjRpdEZUcTNUVkJmOW1lWHFQWnV0QkRpNFJrYzh3R3FzSkt4c3dNanBDMnpyUTlWNWR0dFR5WVBuU0dKRHRNR3BYbldBNGZxVklpVXVyYnJFUzFHbDBpSXZ1aGgyYkRYbFNyUWVvMTNHSHdEWjh2R2c4SVBydEpTb1FDOVpDZCtrUWRBSWZERnExNm1HQml5SjU3cWYyRm1Bb204R2tGYXdvb3BoNVBPUWROdXNTZWt3V1pFbHBMUFozY1EwSXBuVmdGSHBTZjVZL0crSXlWbjJvNFpqSjBxMms2L3diRGMva3c2dndKT0lJRkRrcW9HT1pZdFpIZ05QMmFLMlkrQ25UUmJSdDIrdjA1QjVndlZuQTViYnV3UUhpQkNRSW1qOU83OW16dit4N0R0T2k3eVNrQnhvRnRFaGNacVdEblgwQkNmMXVJWllva1UrOHVFdmxUN2V4aU8vWG5GM1BOd0hIQngxVitPL0xnYW1rOGdIenJKOTd1ODRiakQzQ2p2WlFrTUJsclZ2YmpmcE8waG5wQmIzL2lwclpxZVZ2dHRMaEJOamI5TTI0aVZtWGJCS0lHYm1VcDdyMlVQcWZqYVVqN2Q2RjVPa21xcXdiTGpzVC9SNDFoaVdOZDhDZTluUENoN1VCUkZIVC80d013Yk9tRzltekw5cFJhazVxekhpRW5OUjllcGQrUmtVT2RmaU5POEcxd0FYa21OMFpFSmhyNWowTDZ2bDVTY09FWDQzNXJxM2xhL1ZFeVVRN2dqQUJXYjF3T2ROOE0vbVZJS1NxbE0xSWtDOFNRMy9OY1g1Qis3bHI3cmR2NFdFOTEveGlrZC9YRHlGajlIZS9IN3VSd3pLaWwvMjl1aGcveUViZ1ROSy82Q1BWSmROTStNakFvUzVwTERyYlFVYXJXMERvWGlkNGgrV0dRSnVkUzd6K2FuNGlUbU82Z3lxZG5IUUx0MW1ER3RmS2dyeVRSYmNNM0x6R2YzWEFBdzFyM3lQMkoxMVRqcHIvNEJiVmsrSjd3NEYzSlBCcktXOUZDTTA3UzhMdVpKZmVDcFl1cURFMGkxWWtlaWdTMURsL25oYnVWMVZPUEVnUGY4MjU2Q0h1eDk2MTJsZjIyQlVRUmY2aUVvVlEvcStRYll1ajdUbVZkY0hKWWM0R001OVo3VzhRbHJzNGdicStza3F5SFJqM0ZNYVRrZkZjOFYvbDJRRzVhWXY4eFU4WXR1b2FoZExZU2tMQ1NrZ1lqMzUxRmRrRWgwbWpEck16UWVjRTZEOHRVelZOU25MU2tsU0w1RzEyNEszdjMxYnAwbUpiL1M1VnBBMkJ4b0N0R0Iwa3dueTBKNGFscTNpS0lNc1VNVkJiakRuZXIzQmR2YTAvbUt5QVlmNlVJWGxjaE53MTI1UmRkUk9hMm40ekRQSGYzenpMM1VycWlTOXhmTDZUbnFKSGliRm1vQTBOY05qL243dmJQZTBYQjVLZXhjdWxTVG5BdWZQb0hPUnhyQ0ZPRW5FZVRwQytjUEJWazA5Tmp1eTZPVHFQMUhyb3pVUUM5bE1VRmp6OFZOOUNYSk80MUliK1ZheVVlaTZrbHhHenFWU1FQSTRpNCtYMjFnOHpkdHZLcmtXbHlrNHY1Yzk3Nm1WNUpnZFBVN3ZHd2g3eklObkIyMWZ0U0hjWHJtTXJQdzJZQ0F4RVMzSTg1R3BRZjhqcU5IRkZvdmljYVdBZER2OCtQSWtNY0c5RmhUUEJEZkY1VStuM1B2N1BqUWRhTEFLSFZFSk4xK3BNSWpHSG9IanBwNCs0SVQzV2ZKanBtaVF2TjJKV0xoUC9tZFgveTFGbTloOUxoNWtqMGhLNitMNHcxODZzTnhBSW9SWDFkU29sUk12dFJsMnFYejNoakpjdDluUTN2U21oVmhFNjBOdlhvdXk2Sy9hNG1BSG8rSm1DcG9xUzNLaWdSQ2E3QWRCSk5LT2pQT0ZQRW1qVEdRTVdmR2o0M1B2aUFTT1FHOWxpRms5WlRlMnN3TTRXRmZXZmtxMTRzbnBMKytUL1pwenJuamVmUUQrUUtreTcwS2o3YjVhVFQyeGNYM2lvMmJ0RGNRNzU2SkdZTnZURW55WGFSb1puclFLY3hXYXNWNTFDaFlSak50dWUzUnd5T2JSV3FiRmpoUVpUWUNRbk9Cam9LS1RlTmhTY1V4WGt1ajg2SEVOSzl4MzZrbENhblZsa21RTWc1NE9KaHJleGEvRjFyZUJHb2l6N01oZUMvRy81OXp1K21OSXdaR0RML3pISmsyWC9kVzUzbFdwa2Jyd29GMXQrWVBNeGpXaldDZGhrUDZxVkpnbExJcnhDR2VoTVl5dnZ3cGN0dXM0bU5YZGxzcnREQlFMMW5FeEhQaFlLaEc5UjJDdm4vMmxONkVBWGMzQ0gybXBiZHhoaFVDQlRVSXQzTkNFTnFWSHMwZVR4KzMrRUdWSFV2dlZqZVRsVFJsVUQ4a2djMys5RG44K2c1ZmZSOEpPRkdkNmI2RXlPSDNjaDdMZE5HRGtUYTNzcEpsSExHMlk3SW1acGJPdlFSQ3VOdG1jUEgwZ3FKczg2TXhQMTFtVXZha3BDVHF2aWdDOHhqWlhhQXRxK0JjN0hLbmxsc3pWYlFENUpnZDJtckpmTkNkY3VCNjVQMzZjZUtXN1VwVmVRUUZJR0xsNUtraWhtSUhVUGVpMUF6MFpmUk0zY2RmUlhXSEQ1S1RYNTZZOU5zQU1ST1NqemVpekUvSGdsZ2NzSjhtMEg2TERXWEJGWklocUd3a0o2YzVGMTJ6dUN1RmRQWHpmVUlZTmtiSmw2UHlzSGJacjZtaU1UUHhtUXkrMW05M1lMcCtpYituOWUvNVQ0YUVaakVNYWR1b0c3MDVodDRLNDNCVVdFbXpDMFBQampBajBCdEtEaWgrQ3Z5S1NrMy9NVUVyczVFa05iazBORlE2Zkl2TGw5WEhIUk9RUTNZTXFWTWh3NDBQVE0ranI3aW9JMWFJK2R0Vk1iVTcrWUxGMEd0cGo0empjZ1EyZlYrOHlZZ204ajdtSnNaSnhXNEVCUUZkeXhMYWVVRkF3eXVEUGlJekZMcWFpUWI0Z040c0R0bzF1aDA3eTNHZmRKNnNRL1JhcHRCaGU3ODdscUwreS93WnVJMGRPR0FITFh5S2cyMUJGeExrZmhzQ2ZhdVJ3c3g0cmxzQTV1VkdwbzRwYmlHb3pUNVUyWWJKSWRka0d2ZkE2dVFYRFUxY2dTQXVWUjNCbFFMZ0I5VlZsbnVaNTFMTzlVbThyY2Y4bE93N3Q3R05iK3Q4VWxRNkxhN3h5SUtqL0svZmRvcXBvV1E4RGlsbW9mWXFlSkNCcS9la3RqVThmUldkcVdqVU5wSDNkOUo2LzVSUjVGMytpSWlVU0hhV3VnY0tQNFZHdnlnaHAzUzRydUlrTXNROThUdFp6WHJjcWhTd0NzVGhnNWtXRXVXQyttMHh4WlpOYkJud3RTdkxGaVNMS2Z5THM3eHNSZlM3eUhJYUZEQUZyMkRmMS9oS3NCZkt1RE5kbDUrOWlQZVRlMnRwK3FPUWt0S2Z1alAzSEZ1QXI5WHdDWU9LaDNBdUx2dGZsa0JPYUQ3b3J4VGZ2YkdwU0oyenVMMHcvRFcxWFRDQ2p4a2tPSDA3eHNtNlFUdTVxd3YxTDgxT2grQWphSEVuakFwb0JNQU1JZ3ZDZS9DM0U3YVlXaGUyRnU5RXc5TWlCbXN2dlJjOXRyVEM1Mnh4dmhFa05tM05EanQwem5SQlVDMlFEWE8xYyt2VVRnSHEyZm5Uclo5YjUvVUdsNjlWUDI2Rm1TMlRNOWJCUDd0dlJOckJjeWxHYVhBUVB5MFY3NU5QalVqYVhkVCtDUVM0TktVRnk1R1NwK0Z5NDRQVFUrQlBxUmRMdCtsSXppdkRmc0dqcFBuRGFGT2FOR3F3S1hENU5SRG0yTmtwQ0w2SlFIRHZWNkZ6UzBkcHFEbkRDVW0wUU9CYURmVUZnVjRibThxVUFjS1JVYUFabkRJS2VTWTMvZnNRbzFhZFBjQVp1M0hHekIrZWN6NmdBQkJGa3YrWDNDMDBnM2dRYUduZE8xODFWekZkMDJ6REZtcEdEc0VvUWZJSDBCNk9wc0hxdXRtdlN5ZGptZXhEY1RuVUdWVWgxRGJuWnR3TGNscEFMcS9OUEVQU0hPQkVkZGZiZm5LTkJuYnVmWnluQWp2T1AyeXl0OUNqT09jZDR1WVFUVllkUTA2a3BYRzhIYmNqb3ZUbW9oVkdJcXRGcUp1TGt5bTJTc1VrWnF2eGtoZkRLeENnVFdaeHU5RHdDbk9Na09HT2s4TDNxVWtMUHZ2QlJUcXJ0U01lZTAxVHdNbnVJcjFvNWpvSmFzR20wbFp3OENtT2wvTTMxemYyNWQvOHN2RmZUR0Y3WjBYWEhTSEJNWUZuN0ZxMERUbHNoRytmSDJFTjNVUWdEdGxGL0xwMTl6SFRCTnNDVVdzeTZsMXlnZ2ZwQm5wL2xpSTdIbGM1bXJSVFh2aWs2NDdTZzhISHZsQmZDdUlKTHQ4a1RLRGVlWkUzSTZKUDl5aFdUS1cxVEJydURacUMvQ1dJOUlHSEFQbkNkL3FveEJQUVFDNENmWTRuTGhRc0dKamt0bjQ1c0RiY2IyYWtFalMzNmw0VlFibkVycENRNWtrNitLUXc5R0JjUlZ6eWMwUUgzUjNLNVpUNlUvditONFFQWUJJMzB1dDNPTm5RTU5ndlJLWVpxVjZ5UHVjd0hXY1FWK0M4dzg5RHdtTzR3SVQrdWk3WUtsY1dQUUFIa3UwUTFMc1JxakNyU1dQd3c0TDBsUjcvNXo2MTc4aVd6OThPOVRORzVjSHB1dkdMWlo0NUlVdEZ4VDlSV1RRV3JKTVhtcnZxUXppQlFGY3I0NE1RdCt2SnVwT2F5SE1ISE1QQTJSVTl1YUdaNm1QRWYxMU0vRUJGZ0ZPSWV3eFVpcm03a2o4N2NtUVlncTQ2RGZ6Q281RytvcWJVbDAyQlJWTHlmQnRTWHdzbDRPMEtybkxsNGRqSWRGeklrVHNGT3Y2L2p2VElKWFo4OHJWTEIvdU5mUGVMdW1lWEZvU083RzdvTkJqeWlxUHFMdGNWdzhUbDdQUzhiamo3aE5LWkpEOUxsMzdqWjNKc1Iwb1loTlJ5MTc2ck1wVUFldDl0dHFTVnpHbVZZZmFpRjhCNVlFYmdJdSsvdGt4MHpoaC9HcnZlT2wyNklrMFM4SHZpYkdWL2x3NjNJVUNuRHlSeElNVjFUdEZuVExFR2VsNk5qRVVWWStWWmoyQUdPVHE4RHBqTzZycnN1cUthNVZvRjdhZGZHZWpmRTYzc0xSM0pxT25uTEpGRUZwcFEzSEt1NDcrQmg0SUdmZVNKeHBGeERyblN6aHpXSXpQM2RvSEY5M2Z4VStVVDEyU2Y1N3dEVmEzanNEMEZnZ0Y2azZvQVlqRFBTcE5DbWxFQWxQWEoyYWRScXE1NGY1NWlFNFVyMmhMOTRqVlZobG1VeWdHdHZuVXJaemVteWkxZ2tsMmJxOXowZjVkQmd4Qy9jc0hXOHpUdnZlZmpDVi9Sb0J1YmhQVlVtOUM1emwvNHlySllnMHdvR3ovaWVGY0pLUVU5Z2FhNGdzUjVoZ2FsQjlZa1daZ2VLblFRZEhFZy9CT2RtbVFsMDZ6ZGV2WDd3ZzB6Smw3U0c5S093eEJQZ0FiSXdtakFKallxWHpZWUFBc3RzakcrOUdFUGQrWXlBcU9vMHdPbEt5VnFPOEpBOGJaUTBuTDJPaHhoS1ZGc25Wc0gyUGQxYStYMkdaNEV6OEh4SDAxdXRlVjJNK1NnR3lLbjI2My9jUldabHFiK3NDalBuTU84U3F5STB4MHUwQTdQbkNpUGE4QXFndXd3TVFZa3NoREc5YWw0L0F6Z2FjRHpKVG5HQThXZ21yZDdkOUw1RlpaZFA4SzdLa3VkOThpN2w4MHgrYUszOUduUkZrblZIQk1sT3RZS3dBN2RvWmlwOHFIR3VwZGJQSlJHZWRQdTlIZFZPaG8wM1dPcjcrYTN2QWRLZERXM0hLOHJvMHNNUmFqSDh3b1h1c3h1cUFsY2F3RXU0Ukl2eVFsWW5XQXpqWEwrOHcyRC90REVCWUFCd21aOEJsNXh6MTRIWHVOcU9jeERVK0FHSXVldVZSeGtaaFE3UzlhQ2VXOEpoMTZkS1ZDeURySWJyb1Q0QVhOaStJMVJNYUNYbGVRZ28xTXpkOVpTQ2RCMjF2dUhpZ3h4akhmTzNlWFdYeDRjVWYzVUhyMzB0STRmdC85Y2QxMmY1NEFpRUJWWk5IU0J4OUFFaWpHbklhU3A0TERDYUV3UjhHK0JBTHRVSWtCV2tXUW5IWkx6dU1YbzkwOUtnekxvQUNEQ2xSTEczNlQ5bGVsbmF2em12dk5QclgrQWx5V1BLMVRPSkRUelU2YkdTQm43aVVjMytBMUFVK1BjYU0rdHAzWlhZNkF0RDNSY0VRb0d3ajQyOHhxVGtSQXdNbmNkS3I2MVBIUVFFT2IzQk9VRTdoTnpTUFVwVVU1Ni9ra0pRSVBWVHJhd0JSem9iczlrNGFjbnAyc1gvbnN4MDNKV1Z0TExQUlRUdEpUcndudXlKTWZMa0VQN2NubTFCVUJhRGJZVUIvbUc5Rm8yazA1VnNOWWp4dDlJM04vaTExcVkxdUpzRkVnL21JQ1pxR2tkTDQxbWM1eUo1TFNvU3pPVEFaeGRIRlhJYlc3c2U1b2pTUmhwNllycDNHSFNWdlJ0THdhZE1LNlpTT0V2QUNkUE1KK0RHak83UkU3cmUraGpibmlFR0JDZUlNRVZBZGxvQnNrcVI0YTBxaWJJQ05KL09LMGFtaitJcURabnYvaERqVm02U2JjenpyS0k3R2VIQzlvQkhqSndTQlY1OHdLaFBIYjdNWG0xMmVLN2hxVjlZWVQ2c2I2MDhQengyVHltbFJaOURxOFRkQ01MZk8wb1czR0c5cFNQRjRDMWlFTnJ3R2lqTjVJQXdoME9ZZm1POHhadEpXZ3Rvc20yNWRReFZGZHBSTWYxU1NnQ01PcUZ0ZVJKM3pETzdLZ1ZMcWdCYml5ZDJkV3grNHVFNU9yQkpMNHFjKzdJdWpXK3k4Y2l3TXdadXE5M3NodzhwY1pZSTVJTVVxZC9OT3cwUG9TK0xMN3V6QzFIMXV3PT0ifQ==
-- CEETOS_RELEASE_SIGNATURE:Oxwa020AjE7k9ozLybtYYed6oDA7pO6xidcz9JYaJClOiWCJW9wi6hOp/KwAswSgTnQXbOlbr85wk4YFgU7SHAqo5R9W6LfXEd27t7WikCw4dCQTWSOUSivP8EECelfEvEIMkaDe+U5ij/kwHuUkvfhmENU0tW9RmoJpNYWZxzr3PxQfl//sxCXAzLhpEwYw2U7ZwLEPHgMRr/WIhDvBTIkbjCiwsPu1mRcyG6mO6nDZZVdj7G81o4YqPkyLVTLnaq4TJGmiX85KxxAB2ESRXHbg6DrIFMDEtk6IgDFRjYL1DfV7ox0B4IAKGb2wlSY6+1IOIB205vIG70eYHmdCtOBEk6lQ04ZEVotZpk5EhSuVUJLmMswlab+fR+e00nemGMs94LqlH1PW6VgiORysSHCqKWL8Re5QQ86LaDoJFE2cI33RqykeZt0HqSfbKJ2zDIw9le+ZSxWjaB0lQYI9uvIJGx2uy8db+yLmtcXwQynsl06MoTVJUAmUjBuoAD7rNlCOgzwTvHZOCYN6ZfUJ47cW92v6Lo2IPHlaQlE+VRNyLKdUVtz7zEswao7lAXdRjnqSuG0V41x+4lSK7uLFcYSp9DIyyQy6nRPllYHdlqlTFHQRunqymK712fbwrJxm8NFdP3kaPfNnkpcx+8P0oNiCzPRZ+uD8EWlg0pbm0t2ULHE4GUVAoS1fQKq0RtWwayo+4eZLw6UY/+yEorNi1jTGjhvwU6eQb+qLenPwCHx/NpeBvdyXSP2qMyiky7kmmjESnZ5+et+5K3ZAEMfuSFEGG+jRk6kQceKKPy/i7EfwCYfeEi8wfJRTVbVuF2Nu2gIyivl4n/roEsvYiqhJJBDwrd5iJ3B05ErqSY3LzlA0u/5uAzkaZ1T6x4bD5ggl3wOgTDqBjgJ8YCoVj1mcHgyM7zO7eFv6uJZZCnGtF6gZ1OhIvTSu9/y/WB8gcFY04vCBlaqdxYMd+BHXXyvN7lcQWU5lAtH97nvrOucYklRV2X2rIs/n4qS9qkR4Yg8y3fe4ORgiC0Y+yGsmPDYaqXbcD9qJgEx/+oa45SPxI6TzIc1nhrb+Dk8i8B4yywOOedCI4VBple26NwUMd9kpNIaDGEhs9PIuEcROSkLgn/u3k5AAKaMditiNWI/++lCV7ebRhFJQqIgmD3eGFnkxGwCADKm9W4mDFmFXVaNryHhtG3GrDNY1i4Dfe9JH4trk3D11ShgiXyKrsYtq6ZP/9/9GE+immRUt2r3zNpYEbzOA+bFKSMOGyEyYK9COA7ASwnMWlNrmJlcUcZFb2EuG/GOrwP5nJsxUv+7XWP61qIhxrAFqNlOa9EGF+MYycTiNOpMJ9siPryI35oWtKfUn6oeOCgA8P4gsYoLMjmdrJv/6TWFl1P7da1FGWizdVJRBx5GsoKNl4ztsixsv5wXO6PrwO+0uUYa8ioxgdW4hsE7/k7rAm1KfgyhbQPfFU9LF9lEZSZBCEp4IPaxNcJ2PrOZS1HckobZPa8ikogRRkk/QIrjRPVAljiNYEaft1finMqBsD4i1dFgcPoQwemk2oD4+JenMKlGzg9EoO/vDnRMrcBnnxd2cKrNsLZHH0w0bA+Yueqrmu6isn0BeXbdGHvt8Iwjn7HbBsv+XVNQYpPnCWLIuAQzDnWL6HsPgORMzbG++sSqvP3wR2Ki8xdrE9W8lsjuIe07ADu7+XLlMGkgregFsiN3jZ7MfYtnvTYQiXWJW78k2kujNCPRPAt1pN3cVZtFLhICz6+UoanpO7Od2iWIMfyy/gXfytYW9nX1rAQLsiTb4QvFZv7lY1+BCguQ+GNkAQSNBmz3a5qKCzyYYmHfEW2kTDWi8u/K0UFKwS5F4kstdHch94wnOKMK945/bHK6F618Un801EoPJc9cvoTWv94peFbcHmrveqkDuq3PfA5dyMpSGSy6V7WA9F55qdOjYl9Atms6eyQd4Ghai0S14XQHP2PquYRPq1edga7+CqTfN19Bt2pl7p7DyLE7MD/r7rpTIa/GOW/xKfxUyxK8DVHYA3hn3FE4mLrR/n5oAYvKuC3w1yyGvrzQ41QM10gyX9BRG+aXsLSPSA3wjEb1/oma/mqxgr8uBVx4yuXDCht2rvLVXjVt+rADe8aEbhmJ1HcHduyGe6/juAc2X3H/O5uk1dlrizebI66Z4kwepa2LKK8iiEPsI+5ExdWdR4MlreVhlg7msKA5oJKd0h8RzGyyGIeCR9tlsMUdcuS48UE0l7QO0+7RYvFCOmU8GryJ997sv4FB9ZYEYBpLnX0E2MwftrkxZ5nRwHY9frdU/yLJjcZlCk1KSHiuh+t4P2nweoSOd//NGsIdlSZfK3dQptOD6JfRZq5Q3wSM2qEyAIQU3dfvw3jceroeslHDYoX0Tyd4FmGyxyXe2toD606ykLLMLBlGf2/XIPBZItIspxE+QkE5bE52keFcMSmQF/EBcQKzMdh/Uy1P1eA6lM97+sd21kB62J7A5kY87LUWK5i8PDrhmefPJpKZObDdRp/bldIeCAnuL8pMRhS2F4aklU06HwTZsIgRSqbZLT8nkOYrhP9T1Dn4D6zbpzXMOjpvQBAWpnmRccMQ97sXYhEmZneEygfX+RIzOivW4jHnp7oWF6OaJfhC3YS31Xf5MjBMNfjlKgGHK7XFKZ83P/dZi+pZhValOm6dx/QQ6NVqJMBqiZxi3CdsjpVIHx0z+laZa6xn+o9EwZgMSJNx8n8UbTqW/iv+6FZjypaGOJZFxszhtmUNEnG2/+BNugfgKwn9UWdrBL7SamJLCV9ZDeRJCT4Jzuo7YNOPe8E774GTkE1/gy3XmEcY6hk/FNetCA09DBc4xMNIZWW2pETZkehwJDhy/bK9BV1JTtuvU6eCzT4/np2CgE0oXooCqb/xDbwVqrK+GVWmFbRE8dutBJ5kmZ/6w7NRrKo05wYXwIt5JkzKD+IaHcSOsXJeSW84+YU41s28lqkb/IEXajpkQsGDyGZygZoeshRx5qIdT9XcLEdpj7LOTu7bGzw9Z9+Nhq3O+cnTZDP3j12BABu4zlUKQB6QH1mjm9m7aflz9X5FLji8Ob1U6SE34RTW/xAUEzimhGlUdRQ5NJRaGFkJRjbvl6yksKDsjfkXswBJwn5aJJaCs+poMlo98qwoHtUL5cqRiKJAP8oXf2/RxNpip/aBclBnqFM8LT+x/tMZUS7FGx7ja4kd/DTExj0Uu2lTWmUKOeFgEWb+9McYq7Y/rjPCDj5IpAyBouFQKz4u5lpQObPH4ET1+STGp32nxY8q9/jX0M2azWv6SFZi/Dz5amyAfR8Tii0la8i//DpCs2FJjJ1NSOHBCfWp8MnCcLvKGvahD3mWBrRGOhHrV9l2D6qi3Bs2z8JWumjGjPjSqccjRi+cAJHrD0WxMeaJiEFLBXKQD3grexJrktRtkX/RuSs/3V5KSl8c8XBBF73WCGP0ZP2+WfS/EUUGDwxcPaiJUJIkiSYuVCY2dGVKEgDZ8/DivVhW25UsdL8Krsx/lIGDuOjoUuTWoLbj8dRJ4YFuprRx06IzyqvRdGCQN7varmbFslkreQ9KTUCiAVMRoWmYFUm5cR+EvwSZlggVX4rY2rddPmidF5KkxyRrR5q7m6PN718Ww2wLa+1hxKIWVTj45V2mpKAanifjsNtp37hHCFKNL47i5D2TE0kzY4cgCpTmoisiNcwzTrricZ8Fha6xSX5ibvlMMxwhMCdMN7W+yqCJsmDtpd7GICL/omkAXjY+UV8Ce4jYo9ot7f+XzSTXeAc4PxMJY6+o/oAi6gyy5QFJWKM4zVRs864yTItqt8oIK3SelyPqSAI+DfW35+rExOKC4SukmgnoOF5KoIi6/yvc9WhcNaa2DSzlPcfL8/a8tuysRflk+CRQW6501bdYtH096/RdHGK0NOylPMnP7Tl/C52FvhKQUx1u+/8nbNcxr+DRFpJdzPcHHPEzcSKfmvODfk0xBS8rbfcr8QcYXDN5jCIVmXJIcrUKsd0ta+/lGXRyu9c+9Z9BuODiuIy5Y0NGUuwEJtDy1Kf5dbOA+C4l4KEXm1KSGDUZKQQER644E1dIAer3P2GpFheXZjymDns6+7xFKUrXzzS5Jb11tkFqHoPs3oCEKR34LFkYBh5L8EDVwVmcsqivGcq/enzHww5Rx1+vCVHUSSfLmRqdI52FZEkfQOIlwJ4Wq/and9xACLneDEK1vFsTVhv9cUQFEL/BvLJG2DspTgZD2kpDARYdW4mUA2zgEl8EOGUTQ+YnCWPC31pbr/76BpLy83lq6YDJCGDCGQMjpAs2gXapqGXayeNCF8sVaYl9i6tSVRTOKnw+vcEwdOEh2ROokntvV8lTW5kbF13f0c4UWrby3fV/aRu8r5j1nts6R5KNWsWu/KNLQgq5dYHghux51npDIYQbYf9TnC6sKnYgNZej3lcUrYBlVieDhUpN/gOo8esWI/KZhormrEfSpH4F8vjar56n0RKvkMt+VX4jT5rpl45EwyWTut82sIfgiWgOsi9nJM1hhWIApTo23JazM+D/OlvP9McFzajNb2ilVqJbbNsuiPZtAtmy7No+tUzuvIffd+QgyclGz5jdRRp8wnfmSOtqypN9bC+Oxv9lXq/6RFyBu4nhqkBSYS4KqI4yfoe9hPyji8tCb+dL7l2mYg4bMOV7wZPLCMTIXEmb8E2mTdBSFdpt75FYMGFVDf7aaVOHVUTY/lNJ27OJxKLkpXtlfWNh71RkcnK/JN8K5eKUAcTjzUO9AWH6Mb3pterPXvmEtC+2XTNWqr2NOGQ52KulyCgY9DI5LbZGJSQeNh9xk3sfkU7/jrnOt1a4dhSipB2NJqk4Or/srtcGHKjwa2iRfuxJjyL8J8/PlTNOWmTtlA8CuWT/8Qsvs0KLf0/i6sejjgY6CdfRSxmnrCqqaGJhoEZQoqA7VvcgM+D9xO1mShYf5DUOw/U/eGdGKqk9m5fc3gON2j8c2Gk1tKVyClm86JsJu/Unc12rIFkkvIDe1Cl2M6WccZo6kPAoY+jeJFX3/0iJ9vToUR0I2Tpk5y9uCtOk48UUYI+szZx6L2vs1LsgEipP/J1JvvrJIqIPUD3G5XiIpZVq7YwFLS2FkbAGeT2ttFuXKPNQ1JwW16nw052SDbh9bzLsyLMabsASaXjEKxY0l2WU5ZqiZwLCnD8QJEPFFROYTmh9QlVrSyFv7Tku/g5VPCGBT6y+PV301OasRzvrWybo+9v5YZxcPTVbZfON6+NeG1zCaigFpES5idSSdoVpexvMZpKi7kIApsq3NT17YOF8Bc+V/DVY9jK/IGAieh0m9iVLqGLFjtZH8C70/NcP1zB+EmiwmThoEsnO6LmKfSFLi0BSCLdfEF0cEPpsHB9ProMD+X0shHZ/WV9RO73K94I8DBIXRsM+z/2L8Gxs/z1s4wysyqxcBE/Fb03wjObl3zJwijdBzi/xR2XrXYI93hWtSlgcE1m7ldufjl18hLSwc6cHga7Nz4fdZtoIZs6YtJVFLSjoq95pczQUhYwF2l+4M8l2W9iKun8oci4sLJ77AXmqnlmIY/0iDCuBDANbJ3lEABP1/F+/VaG3CdLUKUiXVw2rKxP33W6HYA6Lb5n0YLtX+MctQJvgLcqQ+teuFrHcUR1eM1RytIhGY/hrKpCzSvia5CzLAbEH8eC8TkUTfEGm4EZwGQeT7t7W2Cy6ELDq63HvVK2qc/i52KbV5MwUqHi6MKCthjy0m2aljYlUDlFVk35S9auFU06eLZnh7pBl2r8LqpKWQkv9BHkCljkBkJqKjQBl4lEB/zh7q4BxJQ6ja8h98j82EHGHk2nQ47RbrqMiwHmX3nWfG8gBuGzPiABxPheTT403GH4tHMGV9FO3Yjpi7Ih4qqu607HLYYwWPMEnieks6WfFSf6Iv2yG61EAeUCYWZctGJBCgFBm9l5wJ6MGQ+pRj/kkDwq5NCTGPobBfohVgRy+c73Zl7C4AfguCsFWgUzR2ErcZ+ZO+XUT2D14o6SDWpprkG2/GN23hB84pRVf3TyIUHEdAKTEq86ERZZIP9FNcI00dix8apBwH4JXkhQX9BQy+Rs+47wMW3rXnxpzs1DhkmyLqgVKeB3us54/e6+r+yB4ixYgB5MfNRi+Iwk876fRHXJqau17mfwAfg8GRfSKTdzS6asWV4Ozt2jJa7hIRsPB1lVOGOiDMCZm+3poYdZUAlndCNsl6yag8icbqflZQ6q81dWdhbvFZiTpBf6nGZfuWl5I+aUFUOLHAbY35ElfJQjeJ1cintSVsqzNT1nHGyr8VdgbgufEmeRYi2/jphjPbSvtdc9Sh9hu32aOc6Tq3Oz2zWnBoLWihUZ+LD1IohpX7vp+aCMiSw4MDIO2HzUuscDMl/R2qN+pFaXPHg+Vpa2Rxnr5mLlOMUGgA+0nqfSMwCcbZyi82Xz4WTVn/UqO31CHQfKpVUY2SzgiyVwWLBSH7Ef+xXMfWE9hIryne7Nr/9zhPtcZdUb3wj+DfwK/37tDylfJ/oIWa8sOYxCly0mQSIt31kvtA6TXj+ng8ObruJ1fWipH8j++bT3N/+SyhfoKb2EV9X+qtoBSDUbqsCFtIXDcH4YGUIu2SuKvgKde3da3+ycxwGeCkB8xqHTXPQjoCv4dN6wsARy18PeDFpO1gWl9aff+dNCk7rPOhgSfHE4FkoWPbWtOJQ/kqY/+71Xz79t/1Bm+HjBBtWHy7uL7VEP7HzGFRxR4oNQw3wlLamotDlaXu2M2Ie9GxMVLojoSx+XocYl0ljhYNrU2Cz0SDA1QoHYtMcXJPepYjuIib3+UykIz2wQT4FrxyxTmbVrUpDWSkKOIZ6TBfcyyH2W01gsXbSzeMJ1QOHyh2/zmaYfPpehRo/K9mky/c0WzadW5AmFSWQrf7gM/nc3DEDs/I7j/mI2Wy7Zc7YR+38kv+kx7Tyyr/B3OgmBApiMIL/922B+OuEh0NK94MQTw/+VqSUvDxOgu1ipJXCRlbioynCEwq5wRBHdbMVZMjQB9NWm8qpUe/r5SP7bDhHXNHOKvk3rOhQGl8A9wxpq+KSq6SPlExpEJACCoX5Hh5V+NmU2rmAq5sDaetfQTTR+FkrPjUpGkPi/1lQrB14MHL3zG945K2aHnNf2GiCTk6znnArc6s44t4mPQfXIIHaHtN6NWKkGVp49kMOTsmLEgtRawvElriL5caUkuNkReIJDfH3mOroofqV7AvMTp14Zgtenw+eJw08W7n35Z3xYNLYWbGp4qDawMOMnYtsc1OncrD3oSl9/KeJcio43kLn/vt1iKAHRdenSmWzPtwmL5VRXBdwvKxesaXlPt1MkEdxochCPBRFdSQtH2lOV6wcTW6d/mem3FkJCaj7cOIs7T/FpOszUnpNDI5PlzedzDgXw8mhaBDUHV4+6yXn6GMS05/jiBUwckMStnMGaNoj9Xnyihj/qgzCEZSxQlhyoSbSxPxtGhgj/YSySKDKTGFRohHodQ0sMv7bF1x0NJAXUsNIhJS1agpVfYbVAERKXlHeNsoXHi6S5btdTSZTCr+k1ftKG9+64YHPkzEwUDPomctOoqntvH+CmKCCQYL1RnoWRyCIRPqvx8CaR5xufpbfPgO3OM612Y3raCdf3Mpmyr8V0CNMSNMuzLVfS3bfZd4X0NaMb4hTUFZ6d9n9ZdHwrhf9qAG8FvU4zK8dZi9FjSomZZxIIsjdH+HekMYQFA46APNTA1wR3fRypVCtvcAE9zEPCaphcykHVsbdiys7AU9tjAsBu3pA7gIA6FjKWtbzpspm10vUIekwsd+DwcBx2fSrW1qhYS3FEJ/hqHDVFrLHfmQ5Y4IQJEl2XtXJf8MLYeWqOavsKJ8blJhelXrIN+AZKS8OeAe0M4iIMGGkfYNmUqE8tFfecDcrnonFlLr/re4wxpSPynBNnM1qGMvhVdyWITZX2SWw2xZVDVJUCw0WZn/GAPeMliKZjVXsfNHeBRiudSznIBJq0eDEgxAU0Lt6AOcKPXxAIBoniFzqL3g2lTN3jei1rywqBQIv5PfJCnkMgpttmP5empXuYt+AuUJWoFKqb6jSlC8wNI7VEJ2q1HeDzdAQBeRqOXo+ffz6t94Kqo33fEwJY/FNCHoz/jKKiSpYyb6iGbL6RsVaEBhGX1kNePynwyPMKvtIRijRfw5PZjJQjhkdvo9sNiq7BsI0bDtEvE+mkjeQKZ5vLZZOPW3ZX7dAKhmXElCWMQNzZbWoYwk3Yg3zBq19g/3okRy7RJ0xGHqqmMKC5pOmzGBi9Q3CCavaExvEfb+dnDB8E8q5Dg2yRmOf1vWqDq/bzcvhQlDAWlmH35TbuSAvcP04wVsr+T8rpt+LcYGJi7GCg3vV/OIDACrgTmeUAM1cxdfCxzV9Lqnfxmj/Pj9uzPjDK3izJWA0zRYIOvyJovQebA6furpbblwKvsViN3yIEoQkyO1vAz4dboKlVPWq9SVzv4ZpVy7Ll/sO0fouB9QI5RGqgPbUrLugTC3I+zBqOXWNIImcyR5GWJV1EWfGxX3Y9QC/pLQPGw7YevREjh+nWjWe69xy9YMeJXlhvLqBTXhToBarwIoSfis30aUmpLrlfrorbqtaoVDBsdFKOuld+WaxQWwnV/RCGCzApcQd7/jT1W6MoH2Lsmmd+fCCsj2a0a3jsgOZMGlCuPxqxAkqLNxlBeagWPh//7rYMdAF/uOoWGdnYAfVn8HURXwc5p6CLBiVMyMxV509KhSAWLJaxRCHwAqnn677ycij7HaFUQr1flHlXh8HaMY0CknPk2rxMZ9uVQ/4MHmjUJAm/tVKTF8g8MLzQhycc/XLyJP1aTTTlGI5NGfRKj6yLB4osc0Y+XANbCeKDF/qI+nnTPoYdS53A1oasyxO9ohHQdd/psBxl1pTeS/FOAYyO+N7OXkUzqBoPEeYB8mkzKp/MooM2F/MOPubosiq4BXvwRA83UJQt6lBj1pMhQkFjf452kj0bmhwPcJgXiV4LJUKUpKH/KuqsAZ4rZzzYR7r7buHjJ2Quu5NW66KzPEGxMeQy7t0g5qs2a6EwcHG/yncowuKeCS3ZlYnUBLfOVXmxGVCizQkOTwP0LEIwoH3FwwSxazzZJH7smJTRsC4mAb4e29zBmqJzfflVkj69EautvzM5eyDSSPoL/T1HddfTpen3w3sVLYJUWWAsGjGkjc4EIPWBddYUCGSsY8C4O1ajHhvsPT3YxGXrYQn/LpueDgjE0R4FXgGFC8PU9S+gMzn2gj1UnBytg/A1gd35UP8k7VdrH28PmVSgUyiFw/Z+uTcGmVVxzqSGhz8y6rQYg+OEJGRytGQ4k9tsb/WaGlz7Y3rpR5PfyMVxxuCcfg1F57SqEdtHYHgT//IaJoY7YZIWAqL13beUHnMKNAVJlIoGJLqlqir+tFYsQLfk3tZZcLPP/2oUliOlk+TvPypzqenFdoOXmUOLZ+5atnAMN1QN9LfWaqfpQbC9ASAyYkCpWleV1+VrsaA1nGpSGz+l4AiWeeJ66xwjmSiPneaPmOK3+EDBj6OxbOiXtAaI0IbdMYMjK8WTD/80tu9ljHrJDT2gIYDhlEbqSDshRPtp85R9VssEv44cM/pjUxM9hRMB6BXC4ZCTV+QBI+pd9n/0iLeiEWR9Fmg/3UHP7dJMvRCvfo8SkHYI65UEY4JXcS0oy+EXD2FLs1hBW3eYbh+E6aHUl2b7YCtj8zRaeoaPAwgTATP1BNFokYghQWLIYb9qgoAndIB94iz2cMvkjCbuPqGHYAXzMtanvFH9uRBNqQv2jgSDGbnpeWvkeiQYJQ8H24SFlJgDrO8kx6kdVyZRqauY32ljRAFBXKYLRrweAjmpsXVRviGAWh4DzlwXiMXTEa2wZCK6gxZzACyAlvWsijlzEtAJE5RwFMwSeQ1e02Fy9pANv2le/xpBrqgIcqLxw1ak20K3IwIjrGCXdfZwMwQOEcMhtoEjSh+Ppm1jvhyT7BKBohmmogVhXOo3usBo25VKzaquEycVF4NjbxSTkEnSptiBNVbPT1hZBO/K/J2If8P8G4648AKeTxvJLASbcNkbGl2aCtP9fcve59PFklcL5hYvZhctnWA0QT0nhbCJJfBnH8kiIgCRrOr4kwyhqbjZqjS3BucaX/sYNEXrqxeNeSBKm6tuA27qgARGN3EDA6QsMxUe9GFqM1IkWzgyR+TaRmaMi7Ly666TckPM5QOReLCshh7Lbv9pLutqLkO8Mb+XKV/F95i3UzU/YgksO8iILkDrYdpKIYeNkGuqRxDCFjM1ONlqeSRb1VTPbVZuP7kKKSb9/vb2lumJ9xGhyOPrBWCJSLjcxyrByiBWigHSXDT8BAXboGWCrHhK+uE9T5zSiqYRHM2XbmX9re2LVPaV7fi0g3w4Fyj2vurXuBT5hXLWp2x99dTfE0zhZBUup3r9XGbMuXcN+v/k+WScCYHAe6how7pnL6haAo0g/3VZHz/OFtvSLrxKk0P/rFz7UXa6pSRVMwdkc8iPe/La2JARcWzyoqGQ70eO0KZW0/LG/aMQab0wvqxMze33l++KoMhzcEoR/hmhPVyzRl280/MyOKTBNx5GjtA8TrTJK3KySmM2S4GFhG2EUjtOevLPJRKmwhqBdb5VksV5sHEMRuo3ne3UfxA3JbSEL6uMPQxBDKBVth0oHY0zdw5CLGzqcnRYLYy7ZKlh0cbr+RazcYbsAApxIe0ERG8owEVNRPHxdY1ejTp9fX4X9gI98PhonCJeyxE+yXb9dSTqzLz4CMuqKBvaFa/g4586sbAIaVqUl02/FvSyBYDD0zDa2U7Iu0K8OyRDljVy5jtzkXs+AzuRAPeW9nOPbqgvSUVwdneZOTxl4ImT+9QVoFX/SgSL+XRRzEdvVkWQUEZUU0Ngy9oEZdSnjoe43sB4fnARI=
-- CEETOS_RELEASE_PAYLOAD_BEGIN
-- CeetOS installer. Generated; do not edit.
local files = {
  ["startup.lua"] = "local pendingPath,releasePath=\"/ceetos-updates/pending.lua\",\"/ceetos-updates/release.lua\"local pending if fs.exists(pendingPath)then local loader=loadfile(pendingPath)if loader then local ok,value=pcall(loader)if ok and type(value)==\"table\"then pending=value end end end if pending and pending.state==\"apply\"and fs.exists(releasePath)then shell.run(releasePath,\"--ceetos-apply\")elseif fs.exists(\"/ceetos/startup.lua\")then shell.run(\"/ceetos/startup.lua\")else shell.run(\"shell\")end",
  ["ceetos/startup.lua"] = "local root=\"/ceetos\"local profile={id=\"desktop\"}if fs.exists(root..\"/profile.lua\")then local loader=loadfile(root..\"/profile.lua\")if loader then local ok,value=pcall(loader);if ok and type(value)==\"table\"then profile=value end end end if profile.id~=\"desktop\"and fs.exists(root..\"/server.lua\")then shell.run(root..\"/server.lua\")elseif fs.exists(root..\"/ceet.lua\")then shell.run(root..\"/ceet.lua\")else printError(\"CeetOS is incomplete; starting CraftOS shell.\")shell.run(\"shell\")end",
  ["ceetos/profile.lua"] = "return {schema=1,id=\"desktop\"}",
  ["ceetos/ceet.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local auth=require(\"ceetos.lib.auth\")local net=require(\"ceetos.lib.net\")local peripherals=require(\"ceetos.lib.peripherals\")local telemetry=require(\"ceetos.lib.telemetry\")local ownerService=require(\"ceetos.lib.owner_service\")local audit=require(\"ceetos.lib.audit\")local store=require(\"ceetos.lib.store\")local jobs=require(\"ceetos.lib.jobs\")local crafting=require(\"ceetos.lib.crafting\")local craftSources=require(\"ceetos.lib.craft_sources\")local networkIpc=require(\"ceetos.lib.network_ipc\")local updater=require(\"ceetos.lib.updater\")local profile=require(\"ceetos.lib.profile\")local cloudSync=require(\"ceetos.lib.cloud_sync\")local okVersion,version=pcall(require,\"ceetos.lib.version\")version=okVersion and version or{string=\"0.16.2\"}local SHELL_REPLY_PATH=\"/ceetos/data/shell-replies.lua\"local CRAFT_REPLY_PATH=\"/ceetos/data/craft-replies.lua\"local DEV_NETWORK_STATUS=\"/ceetos/data/network-status.lua\"local DEV_NETWORK_HEALTH=\"/ceetos/data/network-service.lua\"local DEV_NETWORK_IPC_DIAG=\"/ceetos/data/network-ipc-status.lua\"local JOB_INBOX=\"/ceetos/data/job-inbox.lua\"local JOB_OUTBOX=\"/ceetos/data/job-outbox.lua\"local CRAFT_STATE=\"/ceetos/data/crafting-state.lua\"local CRAFT_COMMANDS=\"/ceetos/data/crafting-commands\"local CRAFT_COMMAND_LEGACY=\"/ceetos/data/crafting-commands.lua\"local CRAFT_RECIPES=\"/ceetos/data/recipes.lua\"local PROFILE_CACHE=\"/ceetos/data/profile-cache.lua\"local lastJobTemplateSync=0 local lastProfileAdvert=0 local craftRecoveryChecked=false local function writeDevValue(path,value)if not fs.exists(\"/ceetos/data\")then fs.makeDir(\"/ceetos/data\")end local encoded,serialised=pcall(textutils.serialise,value)if not encoded then return false,tostring(serialised)end local handle=fs.open(path,\"w\")if not handle then return false,\"could not open diagnostic state file\"end handle.write(serialised);handle.close()return true end local function craftDefault()return{config={ticker=nil,requester=nil,recipeServer=nil,stockName=nil,requesterName=nil,orderAddress=\"Order\",timeout=120},sources={tickers={},requesters={},recipeServers={},updated=0},stock={},stockUpdated=0,cart={},craftMode=false,queue={},retries={},history={},sequence=0,acknowledgements={}}end local function craftState()local value=store.read(CRAFT_STATE,craftDefault())local defaults=craftDefault()for key,fallback in pairs(defaults)do if value[key]==nil then value[key]=fallback end end for key,fallback in pairs(defaults.config)do if value.config[key]==nil then value.config[key]=fallback end end if not value.config.ticker and value.config.stockName then value.config.ticker={transport=\"local\",name=value.config.stockName}end if not value.config.requester and value.config.requesterName then value.config.requester={transport=\"local\",name=value.config.requesterName}end if not craftRecoveryChecked then craftRecoveryChecked=true if value.active then local active,item=value.active,value.active.items and value.active.items[value.active.index]value.history[#value.history+1]={id=active.id,status=\"interrupted-unconfirmed\",name=item and item.name,requested=active.requested or(item and item.count),accepted=active.accepted,dispatched=active.delivered or 0,destination=active.destination,reason=\"CeetOS restarted; request was not replayed\",finished=os.epoch(\"utc\")}while#value.history>24 do table.remove(value.history,1)end value.active,value.nextRefresh,value.recoveryNotice=nil,0,\"An active Create request was interrupted and not replayed.\"store.write(CRAFT_STATE,value)end end return value end local function saveCraft(value)store.write(CRAFT_STATE,value)end local function craftRecipes()if not profile.capability(\"recipes\")then return nil,nil,\"Craft mode requires a reachable Recipe Server\"end local recipeDb=require((\"ceetos.lib.recipe_db\"))local base,databaseOrErr=recipeDb.loadBase()if not base then return nil,nil,databaseOrErr end local database,overlay=databaseOrErr,{recipes={},tags={}}if fs.exists(CRAFT_RECIPES)then local file=fs.open(CRAFT_RECIPES,\"r\");local raw=file and file.readAll()or nil if file then file.close()end local parsed,err=crafting.parseRecipeOverlay(raw or\"\")if not parsed then return nil,nil,err end overlay=parsed end return recipeDb.mergeOverlay(base,overlay.recipes),recipeDb.mergeTags(database.tags,overlay.tags),nil,overlay end local function peerSourceCandidates()local tickers,requesters={},{}for _,peer in ipairs(net.peers())do local cache=store.read(\"/ceetos/data/remote/\"..tostring(peer.id)..\".lua\",{})for _,item in ipairs(cache.peripherals or{})do local source={transport=\"peer\",peer=tostring(peer.id),name=item.name,type=item.type,mode=item.mode,label=\"Peer \"..tostring(peer.label or peer.id)..\" / \"..tostring(item.name)}local kind=tostring(item.type or\"\"):lower()if kind:find(\"stockticker\",1,true)then tickers[#tickers+1]=source elseif kind:find(\"redstonerequester\",1,true)then requesters[#requesters+1]=source end end end return tickers,requesters end local function recordProfile(peerId,body)if type(body)~=\"table\"or type(body.profile)~=\"string\"or not profile.IDS[body.profile]then return false end local cache=store.read(PROFILE_CACHE,{})cache[tostring(peerId)]={profile=body.profile,version=tostring(body.version or\"\"):sub(1,24),seen=os.epoch(\"utc\")}store.write(PROFILE_CACHE,cache)return true end local function refreshCraftSources(state,queryPeers)local tickers,requesters=craftSources.discoverLocal()local recipeServers={}local peerTickers,peerRequesters=peerSourceCandidates()for _,item in ipairs(peerTickers)do tickers[#tickers+1]=item end for _,item in ipairs(peerRequesters)do requesters[#requesters+1]=item end local profiles=store.read(PROFILE_CACHE,{})for _,peer in ipairs(net.peers())do local advertised=profiles[tostring(peer.id)]if advertised and advertised.profile==\"recipe-server\"then recipeServers[#recipeServers+1]={transport=\"peer\",peer=tostring(peer.id),label=\"Recipe Server \"..tostring(peer.label or peer.id)}end end if cloudSync.recipeOnline()then recipeServers[#recipeServers+1]={transport=\"cloud\",label=\"Cloud Recipe Server\"}end table.sort(recipeServers,function(a,b)return tostring(a.label)<tostring(b.label)end)state.sources={tickers=tickers,requesters=requesters,recipeServers=recipeServers,updated=os.epoch(\"utc\")}if queryPeers then for _,peer in ipairs(net.peers())do net.request(peer.id,\"peripheral_list\",{},{safe=true});net.request(peer.id,\"profile_query\",{},{safe=true})end end end local function sourceAvailable(source,needle)source=craftSources.kind(source)if not source then return false end if source.transport==\"peer\"then local tickers,requesters=peerSourceCandidates()local candidates=needle==\"stockticker\"and tickers or requesters for _,candidate in ipairs(candidates)do if craftSources.key(candidate)==craftSources.key(source)then return true end end return false end return peripheral.isPresent(source.name)and tostring(peripheral.getType(source.name)or\"\"):lower():find(needle,1,true)~=nil end local function pushCraftHistory(state,row)state.history[#state.history+1]=row while#state.history>24 do table.remove(state.history,1)end end local function failCraft(state,reason)local active=state.active local message=tostring(reason or\"unspecified crafting queue failure\")state.error=message if active then local item=active.items and active.items[active.index]pushCraftHistory(state,{id=active.id,status=\"failed\",name=item and item.name,requested=item and item.count,accepted=active.accepted,delivered=active.delivered,destination=active.destination,error=message,finished=os.epoch(\"utc\")})end state.active=nil end local function cancelCraft(state)local active=state.active if not active then return false end local item=active.items and active.items[active.index]pushCraftHistory(state,{id=active.id,status=crafting.cancellationStatus(active.issued),name=item and item.name,requested=active.requested or(item and item.count),accepted=active.accepted,delivered=active.delivered or 0,remaining=active.remaining,destination=active.destination,issued=active.issued==true,reason=active.issued and\"Create package may still arrive\"or\"Cancelled before dispatch\",finished=os.epoch(\"utc\"),})state.active=nil return true end local function completeCraftItem(state)local active=state.active;active.index=active.index+1;active.plan,active.step,active.requested,active.accepted,active.delivered,active.remaining,active.deadline,active.issued,active.issuedKind,active.issuedAt,active.requesterConfigured,active.requesterStrict,active.waitingFor,active.expectedOutput,active.craftStep,active.pendingCraftRequests,active.craftBaseline,active.nextCraftDispatch,active.packageIndex,active.packageRequest,active.peerRequest,active.planRequest=nil,1,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil active.packageRemaining,active.stepAddress,active.stepRoute,active.packageCount=nil,nil,nil,nil if active.index>#active.items then state.active=nil else active.phase=\"prepare\"end end local function applyCraftCommand(state,command)local status,detail=\"ignored\",nil if auth.allowed(\"operator\")then if command.action==\"add\"and type(command.name)==\"string\"and tonumber(command.count)and command.count>0 then crafting.addToCart(state.cart,command.name,command.count);status=\"ok\"elseif command.action==\"remove\"then table.remove(state.cart,tonumber(command.index)or 0);status=\"ok\"elseif command.action==\"edit\"and state.cart[tonumber(command.index)or 0]then state.cart[tonumber(command.index)].count=math.max(1,math.floor(tonumber(command.count)or 1));status=\"ok\"elseif command.action==\"mode\"then if command.value==true and not sourceAvailable(state.config.requester,\"redstonerequester\")then detail=\"Craft mode needs an available Redstone Requester source\"else state.craftMode=command.value==true;status=\"ok\"end elseif command.action==\"destination\"and type(command.value)==\"string\"and#command.value>0 and#command.value<=64 then state.config.orderAddress=command.value;status=\"ok\"elseif command.action==\"submit\"and#state.cart>0 and not state.active then state.sequence=state.sequence+1;state.queue[#state.queue+1]={id=\"craft-\"..tostring(os.epoch(\"utc\"))..\"-\"..tostring(state.sequence),items=state.cart,craftMode=state.craftMode,destination=state.config.orderAddress};state.cart,state.error={},nil;status=\"ok\"elseif command.action==\"retry\"and state.retries[tonumber(command.index)or 0]and not state.active then local retry=table.remove(state.retries,tonumber(command.index));state.queue[#state.queue+1]=retry;status=\"ok\"elseif command.action==\"cancel_active\"and state.active then cancelCraft(state);status=\"ok\"elseif command.action==\"refresh\"then state.nextRefresh,state.nextSourceRefresh=0,0;status=\"ok\"elseif command.action==\"source\"and(command.target==\"requester\"or command.target==\"recipes\")and command.value==false then if command.target==\"recipes\"then state.config.recipeServer=nil else state.config.requester,state.craftMode=nil,false end state.nextRefresh=0;status=\"ok\"elseif command.action==\"source\"and command.target==\"recipes\"then local source=type(command.value)==\"table\"and command.value or nil if source and source.transport==\"peer\"and type(source.peer)==\"string\"then state.config.recipeServer={transport=\"peer\",peer=source.peer,label=source.label};status=\"ok\"elseif source and source.transport==\"cloud\"then state.config.recipeServer={transport=\"cloud\",label=\"Cloud Recipe Server\"};status=\"ok\"else detail=\"invalid recipe server\"end elseif command.action==\"source\"and(command.target==\"ticker\"or command.target==\"requester\")then local source=craftSources.kind(command.value)if source and type(source.name)==\"string\"then state.config[command.target]=source;state.nextRefresh=0;status=\"ok\"else detail=\"invalid source\"end else detail=\"action unavailable\"end else detail=\"permission denied\"end if type(command.token)==\"string\"and#command.token<=80 then state.acknowledgements[command.token]={ok=status==\"ok\",error=detail,at=os.epoch(\"utc\")}end end local function takeCraftReply(requestId)if not requestId then return nil end store.invalidate(CRAFT_REPLY_PATH)local replies=store.read(CRAFT_REPLY_PATH,{})local reply=replies[requestId]if reply then replies[requestId]=nil;store.write(CRAFT_REPLY_PATH,replies)end return reply end local function newCraftRequestId(prefix)return prefix..\":\"..tostring(os.getComputerID())..\":\"..tostring(os.epoch(\"utc\"))..\":\"..tostring(math.random(1000,9999))end local function requestPeerCraft(source,typeName,body)local requestId=newCraftRequestId(typeName)body.request_id=requestId local ok,err=net.request(source.peer,typeName,body)return ok and requestId or nil,err end local function refreshCraftStock(state,source,now)if not source then return false,\"No Stock Ticker source selected\"end if source.transport~=\"peer\"then if not sourceAvailable(source,\"stockticker\")then return false,\"Selected Stock Ticker is unavailable\"end local ticker=peripheral.wrap(source.name)local ok,stock=pcall(ticker.stock,true)if not ok then return false,tostring(stock)end state.stock,state.stockUpdated,state.error=stock,now,nil return true end local pending=state.stockRequest if pending then local reply=takeCraftReply(pending.id)if reply then state.stockRequest=nil if not reply.ok then return false,tostring(reply.result or\"peer Stock Ticker request failed\")end state.stock,state.stockUpdated,state.error=reply.result or{},now,nil return true end if now-pending.sent>5000 then state.stockRequest=nil;return false,\"Peer Stock Ticker did not respond\"end return false,nil end local requestId,err=requestPeerCraft(source,\"craft_stock_request\",{name=source.name})if not requestId then return false,err end state.stockRequest={id=requestId,sent=now}return false,nil end local function consumeCraftCommands(state)if auth.refreshSession then auth.refreshSession()end if fs.exists(CRAFT_COMMAND_LEGACY)then store.invalidate(CRAFT_COMMAND_LEGACY)for _,command in ipairs(store.read(CRAFT_COMMAND_LEGACY,{}))do applyCraftCommand(state,command)end store.write(CRAFT_COMMAND_LEGACY,{})end if fs.exists(CRAFT_COMMANDS)and fs.isDir(CRAFT_COMMANDS)then local names=fs.list(CRAFT_COMMANDS);table.sort(names)for _,name in ipairs(names)do local path=fs.combine(CRAFT_COMMANDS,name)local handle=fs.open(path,\"r\");local raw=handle and handle.readAll()or nil if handle then handle.close()end fs.delete(path)local command=raw and textutils.unserialise(raw)or nil if type(command)==\"table\"then applyCraftCommand(state,command)end end end local count=0;for _ in pairs(state.acknowledgements)do count=count+1 end while count>32 do for key in pairs(state.acknowledgements)do state.acknowledgements[key]=nil;count=count-1;break end end end local function tickCraftQueue()local state=craftState();consumeCraftCommands(state)local now=os.epoch(\"utc\")if now>=(state.nextSourceRefresh or 0)then refreshCraftSources(state,true)state.nextSourceRefresh=now+8000 end local tickerSource,requesterSource,recipeServer=craftSources.kind(state.config.ticker),craftSources.kind(state.config.requester),state.config.recipeServer local recipes,recipeTags,recipeError,recipeOverlay=craftRecipes()state.recipes,state.recipeTags,state.recipeOverlay=recipes or{},recipeTags or{},recipeOverlay or{recipes={},tags={}}if recipeError then state.error=recipeError end if not tickerSource then state.error=\"Select a Stock Ticker source\";saveCraft(state);return end if now>=(state.nextRefresh or 0)then local ok,err=refreshCraftStock(state,tickerSource,now)if not ok and err then state.error=err end state.nextRefresh=now+(state.active and 500 or 5000)end if not state.active and#state.queue>0 then state.active=table.remove(state.queue,1);state.active.index,state.active.phase,state.active.step=1,\"prepare\",1 end local active=state.active if active then local item=active.items[active.index]local timeout=(tonumber(state.config.timeout)or 120)*1000 if active.deadline and now>active.deadline and active.phase:find(\"^await_\")then local waiting=active.phase==\"await_crafted_output\"and\"recipe output in Stock Ticker\"or active.phase==\"await_package_confirmation\"and\"Stock Ticker package confirmation\"or\"Stock Ticker delivery confirmation\"failCraft(state,\"timed out waiting for \"..waiting)saveCraft(state)return end if not item then completeCraftItem(state)elseif active.phase==\"prepare\"then if active.craftMode then if recipeServer and recipeServer.transport==\"peer\"then if not active.planRequest then local requestId,err=requestPeerCraft(recipeServer,\"recipe_plan_request\",{item=item.name,quantity=item.count,stock=state.stock})if not requestId then failCraft(state,err)else active.planRequest,active.phase={id=requestId,sent=now,source=recipeServer.peer},\"await_peer_plan\"end saveCraft(state);return end elseif recipeServer and recipeServer.transport==\"cloud\"then local plan,planErr=cloudSync.recipePlan(item.name,item.count,state.stock)if not plan then failCraft(state,planErr or\"cloud Recipe Server is unavailable\")else active.plan,active.step,active.phase=plan,1,\"craft\"end else local plan,planErr=recipes and crafting.plan(recipes,state.stock,item.name,item.count,{forceRoot=true,tags=recipeTags})or nil,recipeError if not plan then failCraft(state,planErr or\"recipe database is unavailable\")else active.plan,active.step,active.phase=plan,1,\"craft\"end end else active.phase=\"deliver\"end elseif active.phase==\"await_peer_plan\"then local pending=active.planRequest;local reply=takeCraftReply(pending and pending.id)if reply then active.planRequest=nil local plan,planErr=reply.ok and crafting.validateExecutionPlan(reply.result)or nil,(reply and reply.result)if not plan then failCraft(state,planErr or\"recipe database did not return a valid plan\")else active.plan,active.step,active.phase=plan,1,\"craft\"end elseif pending and now-(pending.sent or now)>5000 then failCraft(state,\"recipe database did not respond\")end elseif active.phase==\"craft\"then local step=active.plan[active.step]if step then active.stepAddress,active.stepRoute=step.address,(step.dispatch==\"requester\"and\"Requester -> \"or\"Stock Ticker -> \")..tostring(step.address)active.packageCount=step.inputs and#step.inputs or nil end if not step then active.phase=\"deliver\"elseif step.dispatch==\"requester\"and(not requesterSource or not sourceAvailable(requesterSource,\"redstonerequester\"))then failCraft(state,\"Recipe \"..tostring(step.name)..\" needs an available Redstone Requester for Crafter\")elseif step.dispatch==\"package\"then if active.craftStep~=active.step then active.craftStep,active.packageIndex,active.craftBaseline=active.step,1,crafting.normalise(state.stock)[step.name]or 0 end local input=step.inputs and step.inputs[active.packageIndex]if not input then active.phase,active.baseline,active.waitingFor,active.expectedOutput,active.deadline=\"await_crafted_output\",active.craftBaseline,step.name,step.produced,now+timeout state.nextRefresh=0 elseif not active.packageRequest then local baseline=crafting.normalise(state.stock)[input.name]or 0 local requested=active.packageRemaining or input.count local ok,result if tickerSource.transport==\"peer\"then local requestId,err=requestPeerCraft(tickerSource,\"craft_request\",{name=tickerSource.name,destination=step.address,filters={{name=input.name,_requestCount=requested}}})if not requestId then failCraft(state,err)else active.packageRequest,active.phase={id=requestId,input=input,requested=requested,baseline=baseline,sent=now},\"await_peer_package\"end saveCraft(state);return else ok,result=peripherals.craftRequest(\"local\",tickerSource.name,step.address,{{name=input.name,_requestCount=input.count}})end local accepted,acceptErr=ok and crafting.acceptedCount(result,requested)or nil,result if not accepted then failCraft(state,acceptErr or\"Stock Ticker rejected package\")else active.issued,active.issuedKind,active.issuedAt=true,\"package\",now active.packageRequest={input=input,baseline=baseline,requested=requested,accepted=accepted,remaining=requested-accepted}active.phase,active.waitingFor,active.deadline=\"await_package_confirmation\",input.name,now+timeout state.nextRefresh=0 end end else if active.craftStep~=active.step then active.craftStep,active.pendingCraftRequests,active.craftBaseline,active.nextCraftDispatch=active.step,step.batches,crafting.normalise(state.stock)[step.name]or 0,0 end if now>=(active.nextCraftDispatch or 0)then local ok,result if requesterSource.transport==\"peer\"then if not active.peerRequest then local requestId,err=requestPeerCraft(requesterSource,\"craft_recipe_request\",{name=requesterSource.name,address=step.address,batches=1,grid=step.grid})if not requestId then failCraft(state,err)else active.peerRequest,active.phase={id=requestId,kind=\"craft\",sent=now},\"await_peer_craft\"end end saveCraft(state);return else ok,result=peripherals.craftingRecipeRequest(\"local\",requesterSource.name,step.address,1,step.grid)end if not ok then failCraft(state,result)else active.issued,active.issuedKind,active.issuedAt=true,\"craft\",now active.requesterConfigured=type(result)==\"table\"and result.configured==true active.requesterStrict=type(result)==\"table\"and result.strict==true active.pendingCraftRequests=active.pendingCraftRequests-1 active.nextCraftDispatch=now+100 if active.pendingCraftRequests<=0 then active.phase,active.baseline,active.waitingFor,active.expectedOutput,active.deadline=\"await_crafted_output\",active.craftBaseline,step.name,step.produced,now+timeout active.craftStep,active.craftBaseline,active.nextCraftDispatch=nil,nil,nil state.nextRefresh=0 end end end end elseif active.phase==\"await_peer_craft\"then local reply=takeCraftReply(active.peerRequest and active.peerRequest.id)if reply then active.peerRequest=nil if not reply.ok then failCraft(state,reply.result)else local step=active.plan[active.step]active.issued,active.issuedKind,active.issuedAt=true,\"craft\",now active.pendingCraftRequests=active.pendingCraftRequests-1 active.nextCraftDispatch=now+100 if active.pendingCraftRequests<=0 then active.phase,active.baseline,active.waitingFor,active.expectedOutput,active.deadline=\"await_crafted_output\",active.craftBaseline,step.name,step.produced,now+timeout;active.craftStep,active.craftBaseline,active.nextCraftDispatch=nil,nil,nil else active.phase=\"craft\"end end elseif active.peerRequest and now-(active.peerRequest.sent or now)>5000 then failCraft(state,\"Redstone Requester did not respond\")end elseif active.phase==\"await_peer_package\"then local pending=active.packageRequest local reply=takeCraftReply(pending and pending.id)if reply then active.packageRequest=nil local accepted,err=reply.ok and crafting.acceptedCount(reply.result,pending.requested or pending.input.count)or nil,reply.result if not accepted then failCraft(state,err or\"peer Stock Ticker rejected package\")else active.issued,active.issuedKind,active.issuedAt=true,\"package\",now active.packageRequest={input=pending.input,baseline=pending.baseline,requested=pending.requested or pending.input.count,accepted=accepted,remaining=(pending.requested or pending.input.count)-accepted}active.phase,active.waitingFor,active.deadline=\"await_package_confirmation\",pending.input.name,now+timeout state.nextRefresh=0 end elseif pending and now-(pending.sent or now)>5000 then failCraft(state,\"peer Stock Ticker did not respond to package request\")end elseif active.phase==\"await_package_confirmation\"then local package=active.packageRequest if not package then failCraft(state,\"lost package confirmation state\")elseif(crafting.normalise(state.stock)[package.input.name]or 0)<=package.baseline-package.accepted then if package.remaining and package.remaining>0 then active.packageRemaining,active.packageRequest,active.phase=package.remaining,nil,\"craft\"else active.packageIndex,active.packageRemaining,active.packageRequest,active.phase=(active.packageIndex or 1)+1,nil,nil,\"craft\"end else state.nextRefresh=0 end elseif active.phase==\"await_crafted_output\"then local step=active.plan[active.step]if(crafting.normalise(state.stock)[active.waitingFor]or 0)>=active.baseline+step.produced then active.step=active.step+1;active.phase=\"craft\"else state.nextRefresh=0 end elseif active.phase==\"deliver\"then local baseline=crafting.normalise(state.stock)[item.name]or 0 local ok,result if tickerSource.transport==\"peer\"then if not active.peerRequest then local requestId,err=requestPeerCraft(tickerSource,\"craft_request\",{name=tickerSource.name,destination=active.destination,filters={{name=item.name,_requestCount=item.count}}})if not requestId then failCraft(state,err)else active.peerRequest,active.phase={id=requestId,kind=\"delivery\",baseline=baseline,sent=now},\"await_peer_delivery\"end end saveCraft(state);return else ok,result=peripherals.craftRequest(\"local\",tickerSource.name,active.destination,{{name=item.name,_requestCount=item.count}})end local accepted,acceptError if ok then accepted,acceptError=crafting.acceptedCount(result,item.count)else acceptError=result end if not accepted then failCraft(state,acceptError or result)else active.requested,active.accepted,active.delivered,active.remaining=item.count,accepted,0,item.count-accepted active.issued,active.issuedKind,active.issuedAt=true,\"delivery\",now active.phase,active.baseline,active.waitingFor,active.deadline=\"await_delivery_confirmation\",baseline,item.name,now+timeout state.nextRefresh=0 end elseif active.phase==\"await_peer_delivery\"then local reply=takeCraftReply(active.peerRequest and active.peerRequest.id)if reply then local baseline=active.peerRequest.baseline;active.peerRequest=nil local accepted,err=reply.ok and crafting.acceptedCount(reply.result,item.count)or nil,reply.result if not accepted then failCraft(state,err or\"peer Stock Ticker rejected the request\")else active.requested,active.accepted,active.delivered,active.remaining=item.count,accepted,0,item.count-accepted active.issued,active.issuedKind,active.issuedAt=true,\"delivery\",now active.phase,active.baseline,active.waitingFor,active.deadline=\"await_delivery_confirmation\",baseline,item.name,now+timeout;state.nextRefresh=0 end end elseif active.phase==\"await_delivery_confirmation\"then if(crafting.normalise(state.stock)[active.waitingFor]or 0)<=active.baseline-active.accepted then active.delivered=active.accepted local itemResult={id=active.id,status=active.remaining>0 and\"partial-dispatched\"or\"dispatched\",name=item.name,requested=active.requested,accepted=active.accepted,dispatched=active.delivered,remaining=active.remaining,destination=active.destination,finished=os.epoch(\"utc\")}pushCraftHistory(state,itemResult)if active.remaining>0 then state.sequence=state.sequence+1 state.retries[#state.retries+1]={id=\"craft-retry-\"..tostring(os.epoch(\"utc\"))..\"-\"..tostring(state.sequence),items={{name=item.name,count=active.remaining}},craftMode=active.craftMode,destination=active.destination,retryOf=active.id}end completeCraftItem(state)else state.nextRefresh=0 end end end saveCraft(state)end local function craftingStatus()store.invalidate(CRAFT_STATE)local state=store.read(CRAFT_STATE,craftDefault())local active,item=state.active,state.active and state.active.items and state.active.items[state.active.index]local history=state.history or{}return{active=active and{id=active.id,phase=active.phase,name=item and item.name,requested=active.requested or(item and item.count),accepted=active.accepted,dispatched=active.delivered,remaining=active.remaining,destination=active.destination,issued=active.issued,issuedKind=active.issuedKind,requesterConfigured=active.requesterConfigured,requesterStrict=active.requesterStrict,waitingFor=active.waitingFor,expectedOutput=active.expectedOutput,pendingCraftRequests=active.pendingCraftRequests,stepAddress=active.stepAddress,stepRoute=active.stepRoute,packageIndex=active.packageIndex,packageCount=active.packageCount}or nil,queue=#(state.queue or{}),retries=#(state.retries or{}),error=state.error,recoveryNotice=state.recoveryNotice,recipeServer=state.config and state.config.recipeServer,last=history[#history],stockUpdated=state.stockUpdated,}end local function craftingPeripheralStatus()local state=craftState()refreshCraftSources(state,false)local tickerSource,requesterSource=craftSources.kind(state.config.ticker),craftSources.kind(state.config.requester)local requester=requesterSource and requesterSource.transport~=\"peer\"and peripheral.wrap(requesterSource.name)or nil local encoded=nil if requester and type(requester.getRequest)==\"function\"then local ok,value=pcall(requester.getRequest)if ok and type(value)==\"table\"then for _ in pairs(value)do encoded=(encoded or 0)+1 end end end local configuration=requester and type(requester.getConfiguration)==\"function\"and select(2,pcall(requester.getConfiguration))or nil local address=requester and type(requester.getAddress)==\"function\"and select(2,pcall(requester.getAddress))or nil return{ticker=tickerSource and{name=tickerSource.name,transport=tickerSource.transport,peer=tickerSource.peer,available=sourceAvailable(tickerSource,\"stockticker\")}or nil,requester=requesterSource and{name=requesterSource.name,transport=requesterSource.transport,peer=requesterSource.peer,available=sourceAvailable(requesterSource,\"redstonerequester\"),configuration=configuration,address=address,encodedSlots=encoded}or nil,sources=state.sources}end local function processDevNetworkCommand()local command=networkIpc.take()if type(command)~=\"table\"then return end writeDevValue(DEV_NETWORK_IPC_DIAG,{id=command.id,action=command.action,phase=\"received\",at=os.epoch(\"utc\")})local ok,result,detail=pcall(function()if command.action==\"network_status\"then return net.statusSnapshot()elseif command.action==\"route_status\"then return net.routeStatus(command.target)elseif command.action==\"network_trace\"then return net.transportTrace(command.kind)elseif command.action==\"peripheral_status\"then return{localDevices=peripherals.listLocal(),sharedDevices=peripherals.describe(),crafting=craftingPeripheralStatus()}elseif command.action==\"craft_status\"then return craftingStatus()elseif command.action==\"update_status\"then auth.require(\"operator\");return updater.status()elseif command.action==\"update_check\"then auth.require(\"operator\");return updater.check()elseif command.action==\"update_offers\"then auth.require(\"operator\");return updater.status().offers elseif command.action==\"update_download\"then auth.require(\"operator\");return updater.download(command.source)elseif command.action==\"update_cancel\"then auth.require(\"operator\");return updater.cancel()elseif command.action==\"update_clear_cache\"then auth.require(\"operator\");return updater.clearCache()elseif command.action==\"update_apply\"then auth.require(\"operator\")local applied,detail=updater.prepareApply()if not applied then return false,detail end return{reboot=true,detail=detail}elseif command.action==\"discovery_start\"then auth.require(\"operator\");return net.startDiscovery(command.mode or\"peer\",command.master or\"initiator\",command.phrase)elseif command.action==\"discovery_join\"then auth.require(\"operator\");return net.joinDiscovery(command.phrase)elseif command.action==\"discovery_confirm\"then auth.require(\"operator\");return net.confirmDiscovery()elseif command.action==\"discovery_cancel\"then auth.require(\"operator\");return net.cancelDiscovery()elseif command.action==\"remote_request\"then auth.require(\"operator\");return net.request(command.target,command.type,command.body or{})elseif command.action==\"auth_send\"then if type(command.target)~=\"string\"or type(command.type)~=\"string\"or type(command.body)~=\"table\"then return false,\"invalid authority request\"end return net.request(command.target,command.type,command.body,{safe=true,confidential=true})end error(\"unknown development network command\")end)if not ok then detail,result=result,nil elseif result==true and detail~=nil then result,detail=detail,nil elseif result==false then ok,detail=false,detail or\"network command failed\"end local replied,replyErr=networkIpc.reply(command.id,{id=command.id,ok=ok,result=ok and result or nil,error=ok and nil or tostring(detail)})if not replied then error(\"could not write network IPC result: \"..tostring(replyErr),0)end writeDevValue(DEV_NETWORK_IPC_DIAG,{id=command.id,action=command.action,phase=\"replied\",ok=ok,at=os.epoch(\"utc\")})networkIpc.prune(32)writeDevValue(DEV_NETWORK_STATUS,net.statusSnapshot())end math.randomseed(os.epoch(\"utc\"))auth.bootstrap()net.start()updater.recover()shell.setPath(\"/ceetos/bin:\"..shell.path())shell.setAlias(\"craftos-programs\",\"/rom/programs/programs.lua\")shell.setAlias(\"craftos-list\",\"/rom/programs/list.lua\")shell.setAlias(\"craftos-delete\",\"/rom/programs/delete.lua\")shell.setAlias(\"craftos-edit\",\"/rom/programs/edit.lua\")shell.setAlias(\"craftos-shell\",\"/ceetos/bin/craftos-shell.lua\")shell.setAlias(\"devices\",\"/ceetos/bin/ceetdevices.lua\")shell.setAlias(\"shareall\",\"/ceetos/bin/ceetshareall.lua\")shell.setAlias(\"unshareall\",\"/ceetos/bin/ceetunshareall.lua\")shell.setAlias(\"craft\",\"/ceetos/bin/ceetcraft.lua\")local function commandArgs(command)local result={}for token in tostring(command or\"\"):gmatch(\"%S+\")do result[#result+1]=token end return result end local function runCaptured(command)local output,old={},term.current()local capture={}function capture.write(text)output[#output+1]=tostring(text or\"\")end function capture.blit(text)output[#output+1]=tostring(text or\"\")end function capture.setCursorPos()end function capture.setCursorBlink()end setmetatable(capture,{__index=old})term.redirect(capture)local args=commandArgs(command)local ok,result=pcall(function()return shell.run(args[1],table.unpack(args,2))end)term.redirect(old)return ok,result,table.concat(output)end local function jobStatus()local state=jobs.state()local running=0;for _ in pairs(state.running or{})do running=running+1 end return{label=os.getComputerLabel(),capacity=state.capacity or 1,inFlight=running,queueDepth=#(state.queue or{}),available=true}end local function writeJobInbox(job)local inbox=store.read(JOB_INBOX,{})inbox[#inbox+1]=job while#inbox>16 do table.remove(inbox,1)end store.write(JOB_INBOX,inbox)end local function workerJobLoop()while true do store.invalidate(JOB_INBOX)local inbox=store.read(JOB_INBOX,{})local job=table.remove(inbox,1)if job then store.write(JOB_INBOX,inbox)local template=jobs.listTemplates()[job.template]local valid=template and template.revision==job.revision and template.command==job.command local ok,result,output=false,\"template mismatch\",\"\"if valid then ok,result,output=runCaptured(job.command)end local outbox=store.read(JOB_OUTBOX,{})outbox[#outbox+1]={id=job.id,controller=job.controller,ok=valid and ok and result~=false,output=output,error=valid and(ok and nil or tostring(result))or result}while#outbox>16 do table.remove(outbox,1)end store.write(JOB_OUTBOX,outbox)else sleep(0.15)end end end local function chooseWorker()local choices={}for workerId,worker in pairs(jobs.workers())do if worker.healthy and(worker.slots or 0)>0 then choices[#choices+1]=worker end end table.sort(choices,function(a,b)local aLoad,bLoad=(a.inFlight or 0)/math.max(1,a.capacity or 1),(b.inFlight or 0)/math.max(1,b.capacity or 1)if aLoad~=bLoad then return aLoad<bLoad end if(a.hops or 0)~=(b.hops or 0)then return(a.hops or 0)<(b.hops or 0)end return tostring(a.id)<tostring(b.id)end)return choices[1]end local function syncJobTemplates()if tostring(net.controller())~=tostring(os.getComputerID())then return end local payload={controller=net.controller(),templates=jobs.listTemplates()}for _,peer in ipairs(net.peers())do net.request(peer.id,\"job_sync\",payload)end end local function processJobOutbox()store.invalidate(JOB_OUTBOX)local outbox=store.read(JOB_OUTBOX,{})if#outbox==0 then return end store.write(JOB_OUTBOX,{})for _,row in ipairs(outbox)do if tostring(row.controller)==tostring(os.getComputerID())then if row.ok then pcall(jobs.complete,row.id,{output=row.output,ok=true})else pcall(jobs.fail,row.id,row.error or\"worker failed\")end else net.request(row.controller,\"job_result\",row)end end end local function dispatchJobs()if tostring(jobs.controller())~=tostring(net.controller())then jobs.setController(net.controller())end jobs.heartbeat(os.getComputerID(),jobStatus())if tostring(net.controller())~=tostring(os.getComputerID())then net.request(net.controller(),\"job_heartbeat\",jobStatus(),{safe=true})return end jobs.tick()if os.epoch(\"utc\")-lastJobTemplateSync>=10000 then syncJobTemplates();lastJobTemplateSync=os.epoch(\"utc\")end while true do local queued,worker=jobs.nextDispatch(),chooseWorker()if not queued or not worker then break end local ok,assigned=pcall(jobs.assign,queued,worker.id)if not ok then break end assigned.controller=tostring(os.getComputerID())if tostring(worker.id)==tostring(os.getComputerID())then writeJobInbox(assigned)else local sent,err=net.request(worker.id,\"job_dispatch\",assigned)if not sent then pcall(jobs.fail,assigned.id,err)end end end end local function syncAccounts()if auth.centralActive and auth.centralActive()then return end local snapshot=auth.snapshot()for _,peer in ipairs(net.directPeers())do net.request(peer.id,\"account_sync\",snapshot)end end net.publicHandler=function(packet,distance)local ok,err=pcall(updater.publicPacket,packet,distance)if not ok then audit.log(\"system\",\"update.public_packet_error\",{error=tostring(err):sub(1,120)})end end net.handler=function(from,peer,packet)if packet.type==\"update_query\"or packet.type==\"update_offer\"or packet.type==\"update_chunk_request\"or packet.type==\"update_chunk\"then local ok,err=pcall(updater.authenticatedPacket,from,peer,packet)if not ok then audit.log(\"system\",\"update.packet_error\",{error=tostring(err):sub(1,120)})end return end if packet.type==\"announce\"then print(\"[peer] \"..from..\" is online\"..((packet.body and packet.body.label)and(\" (\"..packet.body.label..\")\")or\"\"))elseif packet.type==\"profile_query\"then net.reply(packet,\"profile_status\",{profile=profile.id(),version=version.string},{safe=true})elseif packet.type==\"profile_status\"then recordProfile(packet.origin or from,packet.body)elseif packet.type==\"peripheral_list\"then net.reply(packet,\"peripheral_list_result\",peripherals.describe(),{safe=true})elseif packet.type==\"peripheral_list_result\"then local origin=packet.origin or from local cache=store.read(\"/ceetos/data/remote/\"..origin..\".lua\",{})cache.peripherals,cache.updated=packet.body or{},os.epoch(\"utc\")store.write(\"/ceetos/data/remote/\"..origin..\".lua\",cache)elseif packet.type==\"peripheral_call\"then local body=packet.body or{}local ok,result=peripherals.call(peer.master,body.name,body.method,body.args)net.reply(packet,\"peripheral_result\",{ok=ok,result=result})elseif packet.type==\"peripheral_result\"then local origin=packet.origin or from local cache=store.read(\"/ceetos/data/remote/\"..origin..\".lua\",{})cache.last_result,cache.updated=packet.body,os.epoch(\"utc\")store.write(\"/ceetos/data/remote/\"..origin..\".lua\",cache)elseif packet.type==\"craft_stock_request\"then local body=packet.body or{}local origin=tostring(packet.origin or from)local ok,result=peripherals.call(peer.master,body.name,\"stock\",{true})net.reply(packet,\"craft_stock_result\",{request_id=body.request_id,ok=ok,result=result},{safe=true})elseif packet.type==\"craft_stock_result\"then local body=packet.body or{}if type(body.request_id)==\"string\"then local replies=store.read(CRAFT_REPLY_PATH,{})replies[body.request_id]={ok=body.ok==true,result=body.result,received=os.epoch(\"utc\"),from=packet.origin or from}store.write(CRAFT_REPLY_PATH,replies)end elseif packet.type==\"recipe_plan_request\"then local body=packet.body or{}local valid=type(body.request_id)==\"string\"and#body.request_id<=120 and type(body.item)==\"string\"and#body.item<=128 and tonumber(body.quantity)and tonumber(body.quantity)>=1 and tonumber(body.quantity)<=256 and type(body.stock)==\"table\"local stockCount=0 for _,row in pairs(type(body.stock)==\"table\"and body.stock or{})do stockCount=stockCount+1 if stockCount>512 or type(row)~=\"table\"or type(row.name or row.id)~=\"string\"or tonumber(row.count or row.amount or row.quantity or 0)==nil then valid=false;break end end local ok,result=false,\"invalid recipe plan request\"if valid then local recipes,tags,err=craftRecipes()if recipes then local plan,planErr=crafting.plan(recipes,body.stock,body.item,math.floor(tonumber(body.quantity)),{forceRoot=true,tags=tags})if plan and#plan<=96 then local encoded=textutils.serialise(plan)if#encoded<=12*1024 then ok,result=true,plan else result=\"recipe plan exceeds remote reply limit\"end else result=planErr or\"recipe plan exceeds remote reply limit\"end else result=err or\"recipe database is unavailable\"end end net.reply(packet,\"recipe_plan_result\",{request_id=body.request_id,ok=ok,result=result},{safe=true})elseif packet.type==\"recipe_plan_result\"then local body=packet.body or{}if type(body.request_id)==\"string\"then local replies=store.read(CRAFT_REPLY_PATH,{})replies[body.request_id]={ok=body.ok==true,result=body.result,received=os.epoch(\"utc\"),from=packet.origin or from}store.write(CRAFT_REPLY_PATH,replies)end elseif packet.type==\"craft_request\"then local body=packet.body or{}local origin=tostring(packet.origin or from)local allowed=net.isDirectController(from,packet)and(peer.role==\"admin\"or peer.role==\"operator\")local ok,result=false,\"craft request is not authorised\"if allowed then ok,result=peripherals.craftRequest(peer.master,body.name,body.destination,body.filters)end net.reply(packet,\"craft_result\",{request_id=body.request_id,ok=ok,result=result})elseif packet.type==\"craft_recipe_request\"then local body=packet.body or{}local origin=tostring(packet.origin or from)local allowed=net.isDirectController(from,packet)and(peer.role==\"admin\"or peer.role==\"operator\")local ok,result=false,\"craft recipe request is not authorised\"if allowed then ok,result=peripherals.craftingRecipeRequest(peer.master,body.name,body.address,body.batches,body.grid)end net.reply(packet,\"craft_result\",{request_id=body.request_id,ok=ok,result=result})elseif packet.type==\"craft_result\"then local body=packet.body or{}if type(body.request_id)==\"string\"then local replies=store.read(CRAFT_REPLY_PATH,{})replies[body.request_id]={ok=body.ok==true,result=body.result,received=os.epoch(\"utc\"),from=packet.origin or from}local count=0;for _ in pairs(replies)do count=count+1 end if count>32 then local oldest,oldestTime for key,row in pairs(replies)do if not oldestTime or(row.received or 0)<oldestTime then oldest,oldestTime=key,row.received or 0 end end if oldest then replies[oldest]=nil end end store.write(CRAFT_REPLY_PATH,replies)end elseif packet.type==\"shell_request\"then if peer.role~=\"admin\"and peer.role~=\"operator\"then return end local command=packet.body and packet.body.command if type(command)~=\"string\"or#command>240 or command:match(\"^%s*nx%s+recover\")then return end audit.log(\"peer:\"..from,\"shell.request\",{command=command,session=packet.body and packet.body.session})print(\"[remote \"..from..\"] \"..command)local ok,result,output=runCaptured(command)if packet.body and packet.body.session then net.reply(packet,\"shell_result\",{session=packet.body.session,ok=ok and result~=false,output=output,error=ok and nil or tostring(result)})end elseif packet.type==\"shell_result\"then local replies=store.read(SHELL_REPLY_PATH,{})replies[#replies+1]={from=from,body=packet.body or{},received=os.epoch(\"utc\")}while#replies>20 do table.remove(replies,1)end store.write(SHELL_REPLY_PATH,replies)elseif packet.type==\"auth_seed_request\"then net.reply(packet,\"auth_seed\",{snapshot=auth.authoritySnapshot(),request_id=packet.body and packet.body.request_id},{safe=true,confidential=true})elseif packet.type==\"auth_authority\"then local ok,err=pcall(auth.acceptAuthority,packet.body)if not ok then audit.log(\"system\",\"auth.authority_rejected\",{error=tostring(err):sub(1,120)})end elseif packet.type==\"auth_login_begin_result\"or packet.type==\"auth_login_proof_result\"or packet.type==\"auth_mutate_result\"then require((\"ceetos.lib.auth_client\")).receive(packet.body)elseif packet.type==\"account_sync\"then local changed,mergeError=auth.merge(packet.body)if changed then audit.log(\"peer:\"..from,\"accounts.sync\",{});syncAccounts()elseif mergeError then audit.log(\"peer:\"..from,\"accounts.sync_rejected\",{})end elseif packet.type==\"job_heartbeat\"then if tostring(net.controller())==tostring(os.getComputerID())then local body=packet.body or{};body.hops=1 jobs.heartbeat(from,body)end elseif packet.type==\"job_sync\"then local body=packet.body or{}if net.isDirectController(from,packet)and tostring(body.controller)==tostring(net.controller())and type(jobs.syncTemplates)==\"function\"then jobs.syncTemplates(body.controller,body.templates or{})end elseif packet.type==\"job_dispatch\"then local body=packet.body or{}if not net.isDirectController(from,packet)or tostring(body.controller)~=tostring(net.controller())then audit.log(\"peer:\"..from,\"jobs.rejected\",{reason=\"not_controller\"});return end local template=jobs.listTemplates()[body.template]if not template or template.revision~=body.revision or template.command~=body.command then audit.log(\"peer:\"..from,\"jobs.rejected\",{reason=\"template_mismatch\"});return end writeJobInbox(body)elseif packet.type==\"job_result\"then if tostring(net.controller())==tostring(os.getComputerID())then local body=packet.body or{}if body.ok then pcall(jobs.complete,body.id,{output=body.output,ok=true})else pcall(jobs.fail,body.id,body.error or\"worker failed\")end end end end local function serviceLoop()local timer,pollTimer,discoveryTimer,accountTimer,jobTimer,craftTimer,updateTimer,cloudTimer=os.startTimer(60),os.startTimer(5),os.startTimer(2),os.startTimer(2),os.startTimer(2),os.startTimer(0.1),os.startTimer(1),os.startTimer(5)local started,lastError=os.epoch(\"utc\"),nil local function health(errorText)if errorText then lastError=tostring(errorText):sub(1,240)end writeDevValue(DEV_NETWORK_HEALTH,{started=started,lastEvent=os.epoch(\"utc\"),healthy=lastError==nil,error=lastError,ipc=networkIpc.status()})end health()while true do local event={os.pullEventRaw()}local handled,handleErr=pcall(net.handle,event)if not handled then health(handleErr)audit.log(\"system\",\"network.packet_error\",{error=tostring(handleErr):sub(1,120)})else health()end local ipcOk,ipcErr=pcall(processDevNetworkCommand)if not ipcOk then health(ipcErr)audit.log(\"system\",\"network.ipc_error\",{error=tostring(ipcErr):sub(1,120)})end if event[1]==\"timer\"and event[2]==discoveryTimer then local tickOk,tickErr=pcall(net.tick)if not tickOk then health(tickErr)audit.log(\"system\",\"network.tick_error\",{error=tostring(tickErr):sub(1,120)})end local snapshotOk,snapshot=pcall(net.statusSnapshot)if snapshotOk then local wrote,writeErr=writeDevValue(DEV_NETWORK_STATUS,snapshot)if not wrote then health(writeErr)audit.log(\"system\",\"network.status_persist_error\",{error=tostring(writeErr):sub(1,120)})end else health(snapshot)audit.log(\"system\",\"network.status_error\",{error=tostring(snapshot):sub(1,120)})end discoveryTimer=os.startTimer(2)end if event[1]==\"timer\"and event[2]==timer then telemetry.post(\"shell\")timer=os.startTimer(60)end if event[1]==\"timer\"and event[2]==pollTimer then telemetry.poll(function(job)if type(job)~=\"table\"or type(job.id)~=\"string\"then return end if job.kind==\"owner_service\"then local ok,result=ownerService.dispatch(job.request)audit.log(\"owner-service\",ok and\"request.accepted\"or\"request.rejected\",{job=job.id,action=type(job.request)==\"table\"and job.request.action or nil})telemetry.postResult(job.id,{ok=ok,result=ok and result or nil,error=ok and nil or tostring(result)})return end local c=store.read(\"/ceetos/data/config.lua\",{})if not c.dashboard_terminal or type(job.command)~=\"string\"then return end audit.log(\"dashboard\",\"shell.request\",{command=job.command,job=job.id})local ok,result if job.command:match(\"^%s*nx%s+recover\")then ok,result=false,\"recovery commands are local-only\"else print(\"[dashboard] \"..job.command)local commandOk,commandResult=runCaptured(job.command)ok,result=commandOk,commandResult end telemetry.postResult(job.id,{ok=ok and result~=false,error=ok and nil or tostring(result)})end)pollTimer=os.startTimer(5)end if event[1]==\"timer\"and event[2]==accountTimer then syncAccounts()if os.epoch(\"utc\")-lastProfileAdvert>=30000 then for _,peer in ipairs(net.peers())do net.request(peer.id,\"profile_status\",{profile=profile.id(),version=version.string},{safe=true})end lastProfileAdvert=os.epoch(\"utc\")end accountTimer=os.startTimer(10)end if event[1]==\"timer\"and event[2]==jobTimer then processJobOutbox()local ok,err=pcall(dispatchJobs)if not ok then audit.log(\"system\",\"jobs.scheduler_error\",{error=tostring(err)})end jobTimer=os.startTimer(2)end if event[1]==\"timer\"and event[2]==craftTimer then local ok,err=pcall(tickCraftQueue)if not ok then local state=craftState()failCraft(state,\"crafting queue service error: \"..tostring(err))saveCraft(state)audit.log(\"system\",\"crafting.queue_error\",{error=tostring(err)})end craftTimer=os.startTimer(0.1)end if event[1]==\"timer\"and event[2]==updateTimer then local ok,err=pcall(updater.tick)if not ok then health(err)audit.log(\"system\",\"update.service_error\",{error=tostring(err):sub(1,120)})end updateTimer=os.startTimer(1)end if event[1]==\"timer\"and event[2]==cloudTimer then local ok,err=pcall(cloudSync.tick,\"desktop\")if not ok then audit.log(\"system\",\"cloud.sync_error\",{error=tostring(err):sub(1,120)})end cloudTimer=os.startTimer(5)end end end local function userDesktop()print(\"CeetOS \"..version.string..\" | computer \"..os.getComputerID()..\" -- starting Desktop\")while true do if fs.exists(\"/ceetos/data/desktop-stop\")then fs.delete(\"/ceetos/data/desktop-stop\")end local ok=shell.run(\"/ceetos/bin/ceetui.lua\")if ok==false and not fs.exists(\"/ceetos/data/desktop-stop\")then printError(\"CeetUI stopped; restarting in 2 seconds...\")sleep(2)elseif fs.exists(\"/ceetos/data/desktop-stop\")then fs.delete(\"/ceetos/data/desktop-stop\")return end end end local function devBridgeLoop()local path=\"/ceetos-dev/connection.lua\"while true do if fs.exists(path)then local handle=fs.open(path,\"r\")local cfg=handle and textutils.unserialise(handle.readAll())or nil if handle then handle.close()end if type(cfg)==\"table\"and type(cfg.url)==\"string\"then local token=type(cfg.token)==\"string\"and cfg.token or\"\"if token~=\"\"then pcall(shell.run,\"/ceetos/bin/ceetdev.lua\",cfg.url,token)else pcall(shell.run,\"/ceetos/bin/ceetdev.lua\",cfg.url)end sleep(3)else sleep(5)end else sleep(5)end end end parallel.waitForAny(serviceLoop,workerJobLoop,userDesktop,devBridgeLoop)",
  ["ceetos/bin/nx.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local auth=require(\"ceetos.lib.auth\")local net=require(\"ceetos.lib.net\")local peripherals=require(\"ceetos.lib.peripherals\")local telemetry=require(\"ceetos.lib.telemetry\")local cloudSync=require(\"ceetos.lib.cloud_sync\")local ownerService=require(\"ceetos.lib.owner_service\")local store=require(\"ceetos.lib.store\")local audit=require(\"ceetos.lib.audit\")local jobs=require(\"ceetos.lib.jobs\")local networkIpc=require(\"ceetos.lib.network_ipc\")local args={...}local requestSequence=0 local function networkRequest(action,body)requestSequence=requestSequence+1 local request=body or{}request.id=\"nx-\"..tostring(os.getComputerID())..\"-\"..tostring(os.epoch(\"utc\"))..\"-\"..tostring(requestSequence)request.action=action local submitted,submitErr=networkIpc.submit(request)if not submitted then return false,submitErr or\"CeetOS network service is unavailable\"end local deadline=os.epoch(\"utc\")+5000 while os.epoch(\"utc\")<deadline do local response=networkIpc.poll(request.id,true)if response and response.id==request.id then return response.ok==true,response.result or response.error end sleep(0.1)end return false,\"CeetOS network service did not respond\"end local function usage()print(\"CeetOS: help, gui, craft, whoami, login, logout, users, user add/edit/delete, discover, network, peers, share, unshare, peripherals, remote, jobs, update, telemetry, cloud status|enroll <code>|retry|clear, owner-service, dashboard, recover\")end local function requireArgs(n)if#args<n then error(\"missing argument\",0)end end local command=args[1]or\"help\"if command==\"help\"then usage()elseif command==\"gui\"then shell.run(\"ceetui\")elseif command==\"craft\"then shell.run(\"ceetcraft\",table.unpack(args,2))elseif command==\"whoami\"then print(auth.current and(auth.current.name..\" (\"..auth.current.role..\")\")or\"not logged in\")elseif command==\"login\"then requireArgs(2);term.write(\"Password: \");local pass=read(\"*\")if auth.login(args[2],pass)then print(\"Logged in.\")else printError(\"Invalid credentials.\")end elseif command==\"logout\"then auth.logout();print(\"Logged out.\")elseif command==\"users\"then auth.require(\"operator\");for _,user in ipairs(auth.list())do print(user.name..\"\\t\"..user.role)end elseif command==\"user\"and args[2]==\"add\"then auth.require(\"operator\");requireArgs(4);term.write(\"Password for \"..args[3]..\": \");local pass=read(\"*\")auth.add(args[3],args[4],pass);audit.log(auth.current.name,\"user.add\",{name=args[3],role=args[4]});print(\"User created.\")elseif command==\"user\"and args[2]==\"edit\"then auth.require(\"operator\");requireArgs(4);auth.setRole(args[3],args[4]);audit.log(auth.current.name,\"user.role\",{name=args[3],role=args[4]});print(\"User role updated.\")elseif command==\"user\"and args[2]==\"delete\"then auth.require(\"operator\");requireArgs(3);auth.remove(args[3]);audit.log(auth.current.name,\"user.delete\",{name=args[3]});print(\"User deleted.\")elseif command==\"peers\"then local ok,result=networkRequest(\"network_status\",{})if not ok then printError(result)else for _,peer in ipairs(result.peers or{})do print(peer.id..\"\\t\"..peer.role..(peer.master and\"\\tmaster\"or\"\")..(peer.routed and\"\\trouted\"or\"\"))end end elseif command==\"discover\"then auth.require(\"operator\")if args[2]==\"status\"then local ok,result=networkRequest(\"network_status\",{});if not ok then printError(result)else print(textutils.serialize(result.discovery or{}))end elseif args[2]==\"cancel\"then local ok,result=networkRequest(\"discovery_cancel\",{});if ok then print(\"Discovery cancelled.\")else printError(result)end elseif args[2]==\"join\"then local ok,result=networkRequest(\"discovery_join\",{phrase=args[3]})if not ok then printError(result)elseif type(result)==\"table\"and result.state==\"candidate\"then print(\"Matching computer found. Run 'nx discover confirm' to pair.\")else print(\"Searching for a matching discovery session.\")end elseif args[2]==\"confirm\"then local ok,err=networkRequest(\"discovery_confirm\",{});if not ok then printError(err)else print(\"Pairing confirmation sent.\")end elseif args[2]==\"start\"then requireArgs(3)local phrase=args[3];local mode=args[4]==\"master\"and\"master\"or\"peer\";local master=args[5]or\"initiator\"local ok,err=networkRequest(\"discovery_start\",{phrase=phrase,mode=mode,master=master})if not ok then printError(err)else print(\"Discovery started. Keep this phrase private and have the other computer enter it.\")end else printError(\"use discover start <phrase> [peer|master] [initiator|joiner], join <phrase>, confirm, cancel, or status\")end elseif command==\"network\"and args[2]==\"status\"then local ok,result=networkRequest(\"network_status\",{});if not ok then printError(result)else print(textutils.serialize(result.transport or{}))end elseif command==\"network\"and args[2]==\"routes\"then local ok,result=networkRequest(\"route_status\",{target=args[3]});if not ok then printError(result)else for _,route in ipairs(result or{})do print(tostring(route.id)..\" via \"..tostring(route.next)..\" / \"..tostring(route.hops)..\" hop [\"..tostring(route.health)..\"]\"..(route.reason and(\" - \"..tostring(route.reason))or\"\"))end end elseif command==\"network\"and args[2]==\"trace\"then local ok,result=networkRequest(\"network_trace\",{kind=args[3]});if not ok then printError(result)else print(textutils.serialize(result))end elseif command==\"update\"then auth.require(\"operator\")local sub=args[2]or\"status\"if sub==\"status\"then local ok,result=networkRequest(\"update_status\",{})if not ok then printError(result)else print(\"CeetOS \"..tostring(result.version)..\" | \"..tostring(result.status or\"idle\"))if result.message then print(tostring(result.message))end if result.cache then print(\"Cached release: \"..tostring(result.cache.version)..\"  \"..tostring(result.cache.fingerprint)..\"  key \"..tostring(result.cache.keyId))end if result.transfer then print(\"Download: \"..tostring(result.transfer.received or 0)..\"/\"..tostring(result.transfer.size)..\" bytes from \"..tostring(result.transfer.label or result.transfer.source))end end elseif sub==\"check\"then local ok,result=networkRequest(\"update_check\",{})if ok then print(\"Checking directly reachable installations and authenticated routes for signed releases...\")else printError(result)end elseif sub==\"offers\"then local ok,result=networkRequest(\"update_offers\",{})if not ok then printError(result)elseif#result==0 then print(\"No newer signed releases discovered.\")else for _,offer in ipairs(result)do print(tostring(offer.id)..\"\\t\"..tostring(offer.label)..\"\\t\"..tostring(offer.version)..\"\\t\"..tostring(offer.size)..\" bytes\\t\"..tostring(offer.fingerprint)..\"\\t\"..tostring(offer.keyId)..\"\\t\"..tostring(offer.transport))end end elseif sub==\"download\"then requireArgs(3)local ok,result=networkRequest(\"update_download\",{source=args[3]})if ok then print(\"Download started. Run 'nx update status' to follow verified progress.\")else printError(result)end elseif sub==\"cancel\"then local ok,result=networkRequest(\"update_cancel\",{});if ok then print(\"Update download cancelled.\")else printError(result)end elseif sub==\"clear-cache\"then local ok,result=networkRequest(\"update_clear_cache\",{});if ok then print(\"Verified release cache cleared.\")else printError(result)end elseif sub==\"apply\"then local ok,status=networkRequest(\"update_status\",{})if not ok then printError(status)elseif not status.cache then printError(\"No verified signed release is cached.\")else print(\"Apply CeetOS \"..tostring(status.cache.version)..\" from verified cache\")print(\"Fingerprint: \"..tostring(status.cache.fingerprint)..\"  Key: \"..tostring(status.cache.keyId))term.write(\"Type APPLY to reboot and install locally: \")if read()~=\"APPLY\"then print(\"Cancelled.\")else local prepared,result=networkRequest(\"update_apply\",{})if not prepared then printError(result)else print(\"Verified update approved; rebooting locally.\");os.reboot()end end end else printError(\"use update status|check|offers|download <source>|apply|cancel|clear-cache\")end elseif command==\"pair\"then printError(\"legacy ID/code pairing is disabled. Use 'nx discover start <phrase>' and 'nx discover join <phrase>'.\")elseif command==\"share\"then auth.require(\"operator\");requireArgs(2)if args[2]==\"all\"then print(\"Shared \"..peripherals.shareAll(args[3]==\"master\"and\"master\"or\"peer\")..\" peripherals\")else peripherals.share(args[2],args[3]or\"peer\");print(\"Shared \"..args[2])end elseif command==\"unshare\"then auth.require(\"operator\");requireArgs(2)if args[2]==\"all\"then print(\"Unshared \"..peripherals.unshareAll()..\" peripherals\")else peripherals.unshare(args[2]);print(\"Unshared \"..args[2])end elseif command==\"peripherals\"then for _,p in ipairs(peripherals.describe())do print(p.name..\"\\t\"..p.type..\"\\t\"..p.mode)end elseif command==\"remote\"then auth.require(\"operator\");requireArgs(3)local peer,mode=args[2],args[3]if mode==\"peripherals\"then local ok,err=networkRequest(\"remote_request\",{target=peer,type=\"peripheral_list\",body={}});if not ok then printError(err)else print(\"Peripheral query sent. Run 'nx remote \"..peer..\" cache' after the reply arrives.\")end elseif mode==\"cache\"then local cache=store.read(\"/ceetos/data/remote/\"..peer..\".lua\",{})if not cache.peripherals then print(\"No peripheral cache for peer \"..peer..\"; run 'nx remote \"..peer..\" peripherals' first.\")else for _,p in ipairs(cache.peripherals)do print(p.name..\"\\t\"..p.type..\"\\t\"..p.mode)end end elseif mode==\"call\"then requireArgs(5)local values={}for i=6,#args do values[#values+1]=tonumber(args[i])or args[i]end local ok,err=networkRequest(\"remote_request\",{target=peer,type=\"peripheral_call\",body={name=args[4],method=args[5],args=values}})if not ok then printError(err)else print(\"Peripheral call sent; the result will be displayed and cached when it arrives.\")end else local cmd=table.concat(args,\" \",3);local ok,err=networkRequest(\"remote_request\",{target=peer,type=\"shell_request\",body={command=cmd}});if not ok then printError(err)else print(\"Request sent.\")end end elseif command==\"jobs\"then local sub=args[2]or\"status\"local function controllerOnly()auth.require(\"admin\")assert(tostring(net.controller())==tostring(os.getComputerID()),\"this computer is not the network job controller (\"..tostring(net.controller())..\")\")end if sub==\"status\"then auth.require(\"operator\")local state=jobs.state();print(\"Controller: \"..tostring(net.controller())..\" | queue: \"..#(state.queue or{}))for id,worker in pairs(jobs.workers())do print(tostring(id)..\"\\t\"..tostring(worker.inFlight or 0)..\"/\"..tostring(worker.capacity or 1)..\"\\t\"..(worker.healthy and\"healthy\"or\"stale\"))end elseif sub==\"history\"then auth.require(\"operator\")for _,item in ipairs(jobs.history())do print(item.id..\"\\t\"..item.template..\"\\t\"..item.status..\"\\t\"..tostring(item.result and(item.result.error or item.result.output)or\"\"):sub(1,100))end elseif sub==\"templates\"then auth.require(\"operator\")for name,item in pairs(jobs.listTemplates())do print(name..\"\\t\"..(item.enabled==false and\"off\"or\"on\")..\"\\t\"..(item.retrySafe and\"retry-safe\"or\"no-retry\"))end elseif sub==\"template\"and args[3]==\"add\"then controllerOnly();requireArgs(5);local commandLine=table.concat(args,\" \",5)local template=jobs.addTemplate(args[4],commandLine,{});audit.log(auth.current.name,\"jobs.template_add\",{name=template.name});print(\"Template added.\")elseif sub==\"template\"and args[3]==\"retry-safe\"then controllerOnly();requireArgs(5);jobs.setTemplateRetrySafe(args[4],args[5]==\"on\");print(\"Retry policy updated.\")elseif sub==\"template\"and args[3]==\"enable\"then controllerOnly();requireArgs(5);jobs.setTemplateEnabled(args[4],args[5]~=\"off\");print(\"Template state updated.\")elseif sub==\"run\"then controllerOnly();requireArgs(3);local job=jobs.enqueue(args[3]);print(\"Queued \"..job.id)elseif sub==\"schedule\"then controllerOnly();requireArgs(4);local schedule=jobs.schedule(args[3],tonumber(args[4]));print(\"Scheduled \"..schedule.id)elseif sub==\"cancel\"then controllerOnly();requireArgs(3);jobs.cancel(args[3]);print(\"Schedule cancelled.\")elseif sub==\"capacity\"then auth.require(\"admin\");requireArgs(3);print(\"Worker capacity: \"..jobs.setCapacity(tonumber(args[3])))elseif sub==\"controller\"then controllerOnly();requireArgs(3);print(\"Controller: \"..net.setController(args[3]))else printError(\"use jobs status|history|templates|template add <name> <fixed command>|template retry-safe <name> on|off|run <name>|schedule <name> <seconds>|cancel <id>|capacity <slots>|controller <id>\")end elseif command==\"telemetry\"then auth.require(\"admin\");requireArgs(2);if args[2]==\"status\"then print(telemetry.status()and\"enabled\"or\"disabled\")elseif args[2]==\"on\"or args[2]==\"off\"then telemetry.setEnabled(args[2]==\"on\");audit.log(auth.current.name,\"telemetry\",{enabled=args[2]==\"on\"});print(\"Telemetry \"..args[2])else error(\"use on, off, or status\",0)end elseif command==\"cloud\"then local sub=args[2]or\"status\"if sub==\"status\"then auth.require(\"operator\")local status=cloudSync.status()print(\"Cloud: \"..(status.enrolled and\"enrolled\"or\"not enrolled\")..\" | auth \"..(status.authOnline and\"online\"or\"offline\")..\" | recipes \"..(status.recipeOnline and\"online\"or\"offline\"))if status.node then print(\"Node: \"..status.node)end if status.lastError then print(\"Last error: \"..status.lastError)end print(\"Dashboard: https://dash.ceet.uk (Cloudflare Access)\")elseif sub==\"enroll\"then auth.require(\"admin\");requireArgs(3)local status,err=cloudSync.enroll(args[3]);if not status then printError(err)else audit.log(auth.current.name,\"cloud.enroll\",{node=status.node});print(\"Cloud node enrollment saved. Background sync is enabled.\")end elseif sub==\"retry\"then auth.require(\"operator\")local ok,err=cloudSync.tick(\"manual\");if ok then print(\"Cloud sync requested.\")else printError(err)end elseif sub==\"clear\"then auth.require(\"admin\")local ok,err=cloudSync.clear();if ok then audit.log(auth.current.name,\"cloud.clear\",{});print(\"Cloud enrollment removed.\")else printError(err)end else error(\"use cloud status|enroll <one-time-code>|retry|clear\",0)end elseif command==\"owner-service\"then auth.require(\"admin\")local sub=args[2]or\"status\"if sub==\"status\"then local status=ownerService.status()print(\"Owner service: \"..(status.enabled and\"enabled\"or\"disabled\")..\" | \"..(status.provisioned and\"provisioned\"or\"sealed\"))if status.owner then print(\"Owner: \"..status.owner)end print(\"Actions: \"..table.concat(status.actions or{},\", \"))elseif sub==\"on\"or sub==\"off\"then ownerService.setEnabled(sub==\"on\")audit.log(auth.current.name,\"owner-service.enabled\",{enabled=sub==\"on\"})print(\"Owner service \"..sub..\".\")elseif sub==\"set-token\"then term.write(\"Owner-service token: \");local token=read(\"*\")term.write(\"Repeat token: \");local repeatToken=read(\"*\")assert(token==repeatToken,\"tokens do not match\")ownerService.provision(token,auth.current.name)audit.log(auth.current.name,\"owner-service.provision\",{})print(\"Owner service provisioned. Configure the same secret in CEETOS_SERVICE_TOKENS on the dashboard.\")elseif sub==\"rotate-token\"then local token=ownerService.rotate(auth.current.name)audit.log(auth.current.name,\"owner-service.rotate\",{})print(\"New owner-service token (shown once): \"..token)print(\"Update CEETOS_SERVICE_TOKENS on the dashboard before making remote requests.\")else error(\"use owner-service status|on|off|set-token|rotate-token\",0)end elseif command==\"dashboard\"and args[2]==\"configure\"then auth.require(\"admin\");requireArgs(5)local c=store.read(\"/ceetos/data/config.lua\",{})c.dashboard_url,c.dashboard_poll_url,c.dashboard_token=args[3],args[4],args[5]c.dashboard_terminal=args[6]==\"terminal\"store.write(\"/ceetos/data/config.lua\",c)audit.log(auth.current.name,\"dashboard.configure\",{terminal=c.dashboard_terminal})print(\"Dashboard configured. Terminal polling is \"..(c.dashboard_terminal and\"enabled\"or\"disabled\")..\".\")elseif command==\"recover\"and args[2]==\"enable\"then auth.require(\"admin\");local minutes=tonumber(args[3])or 10;assert(minutes>0 and minutes<=60,\"minutes must be 1-60\")store.write(\"/ceetos/data/recovery.lua\",{until_ts=os.epoch(\"utc\")+minutes*60000});audit.log(auth.current.name,\"recovery.enable\",{minutes=minutes});print(\"Recovery access enabled for \"..minutes..\" minutes.\")elseif command==\"recover\"and args[2]==\"reset\"then requireArgs(3)local recovery=store.read(\"/ceetos/data/recovery.lua\",{})assert((recovery.until_ts or 0)>os.epoch(\"utc\"),\"recovery window is not active\")term.write(\"New password for \"..args[3]..\": \");local pass=read(\"*\")assert(#pass>=8,\"password must contain at least 8 characters\")auth.resetPassword(args[3],pass)audit.log(\"local-recovery\",\"password.reset\",{name=args[3]})print(\"Password reset. The recovery window remains active until it expires.\")else usage()end",
  ["ceetos/bin/ceetui.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local gui=require(\"ceetos.lib.gui\")local auth=require(\"ceetos.lib.auth\")local net=require(\"ceetos.lib.net\")local peripherals=require(\"ceetos.lib.peripherals\")local telemetry=require(\"ceetos.lib.telemetry\")local cloudSync=require(\"ceetos.lib.cloud_sync\")local audit=require(\"ceetos.lib.audit\")local store=require(\"ceetos.lib.store\")local files=require(\"ceetos.lib.files\")local clipboard=require(\"ceetos.lib.clipboard\")local networkIpc=require(\"ceetos.lib.network_ipc\")local terminalUi=require(\"ceetos.lib.terminal_ui\")local release=require(\"ceetos.lib.release_verify\")local launch={...}local state=gui.newState()local page=launch[1]==\"files\"and\"files\"or\"home\"if page==\"files\"and launch[2]and fs.exists(launch[2])then local target=launch[2]state.path=fs.isDir(target)and target or fs.getDir(target)state.selected=\"file:\"..target end local banner,targets,currentModel=nil,{},nil local remotePending=nil local function deps()return{auth=auth,net=net,peripherals=peripherals,telemetry=telemetry,cloud=cloudSync,audit=audit,files=files}end local function refresh(message,error)banner=message and{text=message,error=error}or nil currentModel=gui.model(page,deps(),state)targets=gui.draw(currentModel,state,banner)end local function prompt(label,secret)local _,height=term.getSize()term.setCursorPos(1,height);term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clearLine()term.write(label..\": \")return read(secret and\"*\"or nil)end local function fill(x,y,width,height,background)return terminalUi.fill(x,y,width,height,background)end local function choose(label,options)if#options==0 then return nil end local selected=1 local function draw()gui.draw(currentModel,state,banner)local width,height=term.getSize();local boxWidth=math.max(28,math.min(width-4,42));local x=math.max(2,math.floor((width-boxWidth)/2));local y=math.max(3,math.floor((height-math.min(#options+4,height-4))/2))fill(x,y,boxWidth,math.min(#options+4,height-4),colors.black)term.setTextColor(colors.white);term.setCursorPos(x+2,y+1);term.write(label:sub(1,boxWidth-4))for index,option in ipairs(options)do if y+index+1<height then term.setBackgroundColor(index==selected and colors.gray or colors.black);term.setTextColor(colors.white);term.setCursorPos(x+2,y+index+1);term.write(tostring(option.label or option):sub(1,boxWidth-4))end end return x,y,boxWidth end local x,y,boxWidth=draw()while true do local event,first,second,third=os.pullEvent()if event==\"key\"then local key=keys.getName(first)if key==\"up\"then selected=math.max(1,selected-1);x,y,boxWidth=draw()elseif key==\"down\"then selected=math.min(#options,selected+1);x,y,boxWidth=draw()elseif key==\"enter\"then return options[selected].value or options[selected]elseif key==\"backspace\"then return nil end elseif event==\"mouse_click\"and second>=x and second<=x+boxWidth and third>=y+2 and third<=y+#options+1 then local index=third-y-1;if options[index]then return options[index].value or options[index]end elseif event==\"term_resize\"then x,y,boxWidth=draw()end end end local networkRequestCounter=0 local function networkRequest(action,payload)networkRequestCounter=networkRequestCounter+1 local request=payload or{}request.id=\"ui-\"..tostring(os.epoch(\"utc\"))..\"-\"..tostring(networkRequestCounter)request.action=action local submitted,submitErr=networkIpc.submit(request)if not submitted then return false,submitErr or\"CeetOS network service is unavailable\"end local deadline=os.epoch(\"utc\")+5000 while os.epoch(\"utc\")<deadline do local result=networkIpc.poll(request.id,true)if result and result.id==request.id then return result.ok==true,result.result or result.error end sleep(0.1)end return false,\"CeetOS network service did not respond\"end local function displayRemoteResult(result)if type(result)~=\"table\"then return tostring(result or\"\")end if result.ok==false then return tostring(result.result or result.error or\"request failed\")end local value=result.result local text=type(value)==\"table\"and textutils.serialise(value,{compact=true})or tostring(value)return terminalUi.clean(text):sub(1,240)end local function confirm(label)local function draw()gui.draw(currentModel,state,banner)local width,height=term.getSize()local boxWidth=math.min(width-4,math.max(28,#label+4))local boxHeight,x,y=6,math.floor((width-boxWidth)/2)+1,math.max(3,math.floor((height-6)/2))fill(x,y,boxWidth,boxHeight,colors.black)term.setTextColor(colors.white);term.setCursorPos(x+2,y+1);term.write(label:sub(1,boxWidth-4))local confirmX,cancelX=x+2,x+math.floor(boxWidth/2)+1 term.setBackgroundColor(colors.green);term.setTextColor(colors.black);term.setCursorPos(confirmX,y+4);term.write(\" Confirm \")term.setBackgroundColor(colors.gray);term.setTextColor(colors.white);term.setCursorPos(cancelX,y+4);term.write(\" Cancel \")term.setBackgroundColor(colors.black);term.setTextColor(colors.lightGray);term.setCursorPos(x+2,y+2);term.write(\"Click a choice or press Enter / Backspace\")term.setTextColor(colors.white)return{confirmX=confirmX,cancelX=cancelX,y=y+4}end local modal=draw()while true do local event,first,second,third=os.pullEvent()if event==\"mouse_click\"and third==modal.y then if second>=modal.confirmX and second<=modal.confirmX+8 then return true end if second>=modal.cancelX and second<=modal.cancelX+7 then return false end elseif event==\"key\"then local key=keys.getName(first)if key==\"enter\"or key==\"y\"then return true end if key==\"backspace\"or key==\"n\"then return false end elseif event==\"char\"then if first:lower()==\"y\"then return true elseif first:lower()==\"n\"then return false end elseif event==\"term_resize\"then modal=draw()end end end local function chooseRole()local roles={\"viewer\",\"operator\",\"admin\"}local function draw()local width,height=term.getSize();local boxWidth=30;local x,y=math.max(2,math.floor((width-boxWidth)/2)),math.max(3,math.floor((height-8)/2))fill(x,y,boxWidth,8,colors.black)term.setTextColor(colors.white);term.setCursorPos(x+2,y+1);term.write(\"Choose account role\")for index,roleName in ipairs(roles)do term.setBackgroundColor(index==1 and colors.gray or colors.black);term.setTextColor(colors.white);term.setCursorPos(x+2,y+index+1);term.write(\"[\"..index..\"] \"..roleName)end term.setBackgroundColor(colors.black);term.setTextColor(colors.gray);term.setCursorPos(x+2,y+6);term.write(\"Click a role or press 1-3 / Backspace\")return x,y end local x,y=draw()while true do local event,first,second,third=os.pullEvent()if event==\"char\"then local index=tonumber(first);if index and roles[index]then return roles[index]end elseif event==\"mouse_click\"and second>=x+1 and second<=x+18 and third>=y+2 and third<=y+4 then return roles[third-y-1]elseif event==\"key\"and keys.getName(first)==\"backspace\"then return nil elseif event==\"term_resize\"then x,y=draw()end end end local function values(text)local out={}for item in(text or\"\"):gmatch(\"[^,]+\")do out[#out+1]=tonumber(item)or item end return out end local function openMenu(item)local items=gui.context(item)if#items==0 then return refresh(\"No actions available for \"..tostring(item and item.label or\"item\"),true)end state.menu={items=items,selected=1}refresh()end local function cacheFor(peer)local cachePath=\"/ceetos/data/remote/\"..tostring(peer)..\".lua\"store.invalidate(cachePath)return store.read(cachePath,{}),cachePath end local function beginRemoteRequest(kind,peer,body,continueCall)networkRequestCounter=networkRequestCounter+1 local requested=os.epoch(\"utc\")local request={id=\"ui-remote-\"..tostring(requested)..\"-\"..tostring(networkRequestCounter),action=\"remote_request\",target=peer,type=kind==\"list\"and\"peripheral_list\"or\"peripheral_call\",body=body,}local sent,err=networkIpc.submit(request)if not sent then state.remoteResult={status=\"error\",error=true,peer=tostring(peer),text=err or\"CeetOS network service is unavailable\"}return false end local cache,cachePath=cacheFor(peer)remotePending={kind=kind,peer=peer,body=body,continueCall=continueCall==true,id=request.id,requested=requested,cachePath=cachePath,phase=\"dispatch\",deadline=requested+5000,cache=cache}state.remoteResult={status=\"pending\",pending=true,peer=tostring(peer),device=body and body.name,method=body and body.method,text=kind==\"list\"and\"Requesting peripheral list...\"or\"Calling remote peripheral...\"}return true end local function chooseRemoteCall(peer,cache)local choices={}for _,item in ipairs(cache.peripherals or{})do choices[#choices+1]={label=tostring(item.name)..\" (\"..tostring(item.type or\"unknown\")..\")\",value=item}end local device=choose(\"Choose peripheral\",choices);if not device then return false end local methods={};for _,method in ipairs(device.methods or{})do methods[#methods+1]={label=method,value=method}end local method=choose(\"Choose function\",methods);if not method then return false end return beginRemoteRequest(\"call\",peer.id or peer,{name=device.name,method=method,args=values(prompt(\"Arguments (comma separated)\"))})end local function pollRemoteRequest()if not remotePending then return false end local pending,now=remotePending,os.epoch(\"utc\")if now>=pending.deadline then state.remoteResult={status=\"error\",error=true,peer=tostring(pending.peer),device=pending.body and pending.body.name,method=pending.body and pending.body.method,text=pending.kind==\"list\"and\"No peripheral-list reply received\"or\"No peripheral-call reply received\"}remotePending=nil return true end if pending.phase==\"dispatch\"then local result=networkIpc.poll(pending.id,true)if result then if result.ok~=true then state.remoteResult={status=\"error\",error=true,peer=tostring(pending.peer),text=tostring(result.error or\"Remote request was rejected\")}remotePending=nil return true end pending.phase=\"reply\"return true end return false end store.invalidate(pending.cachePath)local cache=store.read(pending.cachePath,{})if cache.updated and cache.updated>=pending.requested and(pending.kind~=\"list\"or type(cache.peripherals)==\"table\")and(pending.kind~=\"call\"or cache.last_result~=nil)then remotePending=nil if pending.kind==\"list\"and pending.continueCall then state.remoteResult={status=\"ready\",peer=tostring(pending.peer),text=\"Peripheral list received. Choose a device.\"}chooseRemoteCall({id=pending.peer},cache)elseif pending.kind==\"list\"then state.remoteResult={status=\"ready\",peer=tostring(pending.peer),text=tostring(#(cache.peripherals or{}))..\" shared peripherals available\"}else local result=cache.last_result state.remoteResult={status=result and result.ok==false and\"error\"or\"complete\",error=result and result.ok==false or false,peer=tostring(pending.peer),device=pending.body and pending.body.name,method=pending.body and pending.body.method,text=displayRemoteResult(result)}end return true end return false end local function run(action)state.menu=nil if action:sub(1,5)==\"page:\"then page=action:sub(6);state.selected=nil;return refresh()end if action==\"terminal\"then term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear();term.setCursorPos(1,1)local ok,result=pcall(shell.run,\"/ceetos/bin/ceetshell.lua\")if not ok or result==false then return refresh(\"Terminal failed to start: \"..tostring(result or\"runtime error\"),true)end return refresh()end if action==\"crafting\"then term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear();term.setCursorPos(1,1)local ok,result=pcall(shell.run,\"/ceetos/bin/ceetcraft.lua\")if not ok or result==false then return refresh(\"Crafting console failed to start\",true)end return refresh()end if action==\"peripheral_view\"then state.peripheralView=true;state.selected=nil;return refresh()end if action==\"trash_open\"then state.trash=true;state.selected=nil;return refresh()end if action:sub(1,3)==\"up:\"then state.path=table.remove(state.history)or action:sub(4);state.selected=nil;return refresh()end if action:sub(1,4)==\"dir:\"then state.history[#state.history+1]=state.path;state.path=action:sub(5);state.selected=nil;return refresh()end if action:sub(1,4)==\"run:\"then if not auth.allowed(\"viewer\")then return refresh(\"Login required to run programs\",true)end local path=action:sub(5)if not files.runnable(path)then return refresh(\"This file is not a runnable Lua program\",true)end term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear();term.setCursorPos(1,1)shell.run(\"/ceetos/bin/ceetlaunch.lua\",path)return refresh()end if action:sub(1,5)==\"edit:\"then local path=action:sub(6)term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear();term.setCursorPos(1,1)shell.run(\"/ceetos/bin/ceetedit.lua\",path)return refresh()end local ok,result=pcall(function()if action:sub(1,11)==\"copy_label:\"then local id=action:sub(12);local item=currentModel and gui.selected(currentModel,state)if item and item.id==id then clipboard.set(item.label or\"\");return\"Copied\"end return\"Nothing selected\"elseif action:sub(1,11)==\"copy_text:\"then clipboard.set(action:sub(12));return\"Copied\"elseif action==\"remote_result_copy\"then local result=state.remoteResult if not result or not result.text then return\"No remote result to copy\"end clipboard.set(result.text);return true elseif action==\"remote_result_clear\"then state.remoteResult=nil;return true elseif action:sub(1,7)==\"rename:\"then auth.require(\"operator\")local path,name=action:sub(8),prompt(\"New name\")if not confirm(\"Rename \"..fs.getName(path)..\" to \"..name)then return\"Cancelled\"end local target=files.rename(path,name);state.selected=\"file:\"..target;return target elseif action:sub(1,6)==\"trash:\"then auth.require(\"operator\")local path=action:sub(7)if not confirm(\"Move \"..fs.getName(path)..\" to Trash\")then return\"Cancelled\"end local id=files.moveToTrash(path);state.selected=nil;return\"Moved to Trash\"elseif action:sub(1,8)==\"restore:\"then auth.require(\"operator\")local path=files.restore(action:sub(9));return\"Restored \"..fs.getName(path)elseif action:sub(1,13)==\"delete_trash:\"then auth.require(\"operator\")if not confirm(\"Delete this Trash item permanently\")then return\"Cancelled\"end files.deleteTrash(action:sub(14));return true elseif action==\"new_folder\"then auth.require(\"operator\")local name=prompt(\"Folder name\")if not confirm(\"Create folder \"..name)then return\"Cancelled\"end return files.makeDirectory(state.path,name)elseif action==\"empty_trash\"then auth.require(\"operator\")if not confirm(\"Permanently delete all Trash items\")then return\"Cancelled\"end files.emptyTrash();return true elseif action==\"start_discovery\"then local phrase=prompt(\"Choose discovery phrase\")local mode=prompt(\"Mode (peer/master)\")local master=mode==\"master\"and prompt(\"Master side (initiator/joiner)\")or\"initiator\"if not confirm(\"Start \"..(mode==\"master\"and\"master/slave\"or\"peer\")..\" discovery with this phrase\")then return\"Cancelled\"end local ok,err=networkRequest(\"discovery_start\",{phrase=phrase,mode=mode,master=master});if ok then return\"Discovery active (waiting for join)\"end;return err elseif action==\"join_discovery\"then local phrase=prompt(\"Discovery phrase\",true);local ok,result=networkRequest(\"discovery_join\",{phrase=phrase})if not ok then return result end if type(result)==\"table\"and result.state==\"candidate\"then local candidate=result.candidate or{}local peerLabel=tostring(candidate.label or(\"Computer \"..tostring(candidate.id or\"?\")))local relationship=candidate.mode==\"master\"and\"master/slave\"or\"equal-peer\"if not confirm(\"Pair directly with \"..peerLabel..\" (\"..relationship..\")\")then return\"Pairing confirmation cancelled\"end local confirmed,confirmErr=networkRequest(\"discovery_confirm\",{})return confirmed and\"Pairing confirmation sent\"or confirmErr end return\"Searching for a matching discovery session\"elseif action==\"confirm_discovery\"then if not confirm(\"Confirm the selected direct pairing\")then return\"Cancelled\"end local ok,err=networkRequest(\"discovery_confirm\",{})return ok and\"Pairing confirmation sent\"or err elseif action==\"cancel_discovery\"then networkRequest(\"discovery_cancel\",{});return\"Discovery cancelled\"elseif action==\"discover\"then return net.discover()elseif action==\"pair_offer\"then local id,code=prompt(\"Peer ID\"),prompt(\"Pair code\",true);if not confirm(\"Send pairing offer\")then return\"Cancelled\"end;return net.offer(id,code)elseif action==\"pair_accept\"then local id,code=prompt(\"Peer ID\"),prompt(\"Pair code\",true);local peerRole=prompt(\"Role (viewer/operator/admin)\");local master=confirm(\"Is this peer the master\")if not confirm(\"Accept pairing\")then return\"Cancelled\"end;return net.accept(id,code,peerRole==\"\"and\"operator\"or peerRole,master)elseif action==\"remote_refresh\"then local live=store.read(\"/ceetos/data/network-status.lua\",{});local choices={}for _,peer in ipairs(live.peers or net.peers())do choices[#choices+1]={label=(peer.label or(\"Computer \"..peer.id))..\" (\"..peer.id..\")\",value=peer.id}end local peer=choose(\"Refresh peripherals from\",choices);if not peer then return false end return beginRemoteRequest(\"list\",peer)elseif action:sub(1,15)==\"peripheral_set:\"then local name,mode=action:match(\"^peripheral_set:(.-):(.+)$\")if mode~=\"peer\"and mode~=\"master\"then return\"Invalid sharing mode\"end local current for _,item in ipairs(peripherals.describe())do if item.name==name then current=item.mode end end if current==mode then peripherals.unshare(name);return\"Unshared \"..name end peripherals.share(name,mode);return\"Shared \"..name..(mode==\"master\"and\" (master only)\"or\" (peers)\")elseif action:sub(1,19)==\"peripheral_unshare:\"then local name=action:sub(20)peripherals.unshare(name);return\"Unshared \"..name elseif action==\"share_all:peer\"or action==\"share_all:master\"then local mode=action:sub(11)if not confirm(\"Share every detected peripheral\"..(mode==\"master\"and\" with master only\"or\" with peers\"))then return\"Cancelled\"end return\"Shared \"..peripherals.shareAll(mode)..\" peripherals\"elseif action==\"unshare_all\"then if not confirm(\"Stop sharing every peripheral\")then return\"Cancelled\"end return\"Unshared \"..peripherals.unshareAll()..\" peripherals\"elseif action==\"remote_cache\"then local live,choices=store.read(\"/ceetos/data/network-status.lua\",{}),{}for _,peer in ipairs(live.peers or net.peers())do choices[#choices+1]={label=(peer.label or(\"Computer \"..peer.id))..\" (\"..peer.id..\")\",value=peer.id}end local peer=choose(\"View cached peripherals from\",choices);if not peer then return false end local cache=cacheFor(peer)state.remoteResult={status=\"ready\",peer=tostring(peer),text=tostring(#(cache.peripherals or{}))..\" cached peripherals\"}return true elseif action==\"remote_call\"then local live,peers=store.read(\"/ceetos/data/network-status.lua\",{}),{}for _,peer in ipairs(live.peers or net.peers())do peers[#peers+1]={label=(peer.label or(\"Computer \"..peer.id))..\" (\"..peer.id..\")\",value=peer}end local peer=choose(\"Choose peer\",peers);if not peer then return false end local cache=cacheFor(peer.id)if not cache.peripherals or#cache.peripherals==0 then return beginRemoteRequest(\"list\",peer.id,nil,true)end return chooseRemoteCall(peer,cache)elseif action==\"update_check\"then auth.require(\"operator\")local checked,err=networkRequest(\"update_check\",{})return checked and\"Checking for signed releases...\"or err elseif action:sub(1,16)==\"update_download:\"then auth.require(\"operator\")local source=action:sub(17)local started,err=networkRequest(\"update_download\",{source=source})return started and\"Verified download started\"or err elseif action==\"update_cancel\"then auth.require(\"operator\")local cancelled,err=networkRequest(\"update_cancel\",{})return cancelled and\"Update download cancelled\"or err elseif action==\"update_clear\"then auth.require(\"operator\")if not confirm(\"Clear the verified release cache\")then return\"Cancelled\"end local cleared,err=networkRequest(\"update_clear_cache\",{})return cleared and\"Release cache cleared\"or err elseif action==\"update_apply\"then auth.require(\"operator\")local statusOk,update=networkRequest(\"update_status\",{})if not statusOk or not update.cache then return(statusOk and\"No verified release is cached\"or update)end local label=\"Apply CeetOS \"..tostring(update.cache.version)..\" (\"..tostring(update.cache.fingerprint)..\", key \"..tostring(update.cache.keyId)..\")\"if not confirm(label)then return\"Cancelled\"end local prepared,err=networkRequest(\"update_apply\",{})if not prepared then return err end term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear();term.setCursorPos(1,1)print(\"Verified release approved. Rebooting locally...\")sleep(0.3);os.reboot()elseif action==\"telemetry_toggle\"then if not confirm(\"Change telemetry state\")then return\"Cancelled\"end;telemetry.setEnabled(not telemetry.status());audit.log(auth.current.name,\"telemetry\",{enabled=telemetry.status()});return true elseif action==\"dashboard_configure\"then local url,poll,token=prompt(\"Telemetry URL\"),prompt(\"Poll URL\"),prompt(\"Dashboard token\",true);local terminal=confirm(\"Enable terminal polling\")if not confirm(\"Save dashboard configuration\")then return\"Cancelled\"end;telemetry.configure(url,poll,token,terminal);audit.log(auth.current.name,\"dashboard.configure\",{terminal=terminal});return true elseif action==\"cloud_enroll\"then auth.require(\"admin\")local code=prompt(\"One-time Cloud enrollment code\",true)if not confirm(\"Enroll this computer with auth.ceet.uk\")then return\"Cancelled\"end local enrolled,enrollErr=cloudSync.enroll(code)if not enrolled then return enrollErr end audit.log(auth.current.name,\"cloud.enroll\",{node=enrolled.node})return\"Cloud enrollment saved; syncing in the background\"elseif action==\"cloud_retry\"then auth.require(\"operator\")local synced,syncErr=cloudSync.tick(\"manual\")return synced and\"Cloud sync requested\"or syncErr elseif action==\"cloud_clear\"then auth.require(\"admin\")if not confirm(\"Remove this computer's Cloud enrollment\")then return\"Cancelled\"end local cleared,clearErr=cloudSync.clear()if cleared then audit.log(auth.current.name,\"cloud.clear\",{})end return cleared and\"Cloud enrollment removed\"or clearErr elseif action==\"login\"then return auth.login(prompt(\"User\"),prompt(\"Password\",true))elseif action==\"logout\"then if not confirm(\"Logout\")then return\"Cancelled\"end;auth.logout();return true elseif action==\"user_add\"then local name,userRole,password=prompt(\"User name\"),chooseRole(),prompt(\"Password\",true)if not userRole then return\"Cancelled\"end if not confirm(\"Create user \"..name)then return\"Cancelled\"end;auth.add(name,userRole,password);audit.log(auth.current.name,\"user.add\",{name=name,role=userRole});return true elseif action:sub(1,10)==\"user_role:\"then local name,userRole=action:match(\"^user_role:(.-):(.+)$\")if not confirm(\"Change \"..name..\" to \"..userRole)then return\"Cancelled\"end;auth.setRole(name,userRole);audit.log(auth.current.name,\"user.role\",{name=name,role=userRole});return true elseif action:sub(1,11)==\"user_reset:\"then local name,password=action:sub(12),prompt(\"New password for \"..action:sub(12),true)if not confirm(\"Reset password for \"..name)then return\"Cancelled\"end;auth.adminResetPassword(name,password);audit.log(auth.current.name,\"user.password\",{name=name});return true elseif action:sub(1,11)==\"user_delete:\"then local name=action:sub(12)if not confirm(\"Delete user \"..name)then return\"Cancelled\"end;auth.remove(name);audit.log(auth.current.name,\"user.delete\",{name=name});return true elseif action==\"recovery_enable\"then local minutes=tonumber(prompt(\"Recovery minutes (1-60)\"))or 10 if not confirm(\"Enable recovery window\")then return\"Cancelled\"end;store.write(\"/ceetos/data/recovery.lua\",{until_ts=os.epoch(\"utc\")+minutes*60000});audit.log(auth.current.name,\"recovery.enable\",{minutes=minutes});return true elseif action==\"recovery_reset\"then local recovery=store.read(\"/ceetos/data/recovery.lua\",{});assert((recovery.until_ts or 0)>os.epoch(\"utc\"),\"recovery window is not active\")local name,password=prompt(\"User name\"),prompt(\"New password\",true);if not confirm(\"Reset password for \"..name)then return\"Cancelled\"end;auth.resetPassword(name,password);audit.log(\"local-recovery\",\"password.reset\",{name=name});return true end end)if not ok then return refresh(tostring(result),true)end if result==false then return refresh(\"Request failed\",true)end return refresh()end local function activateSelected()local item=gui.selected(currentModel,state)if item and item.action then run(item.action)elseif item then refresh(\"This file cannot be opened\",true)end end local function nextEvent()while true do local event,first,second,third=os.pullEventRaw()if event~=\"terminate\"then return event,first,second,third end if auth.allowed(\"operator\")then if fs.exists(\"/ceetos/data\")then local marker=fs.open(\"/ceetos/data/desktop-stop\",\"w\")if marker then marker.write(\"terminate\");marker.close()end end return false end refresh(\"Viewer mode: Ctrl+T is disabled\",true)end end refresh()local uiTimer=os.startTimer(0.2)while true do local event,first,second,third=nextEvent()if event==false then return false end if event==\"timer\"and first==uiTimer then uiTimer=os.startTimer(0.2)if pollRemoteRequest()or page==\"updates\"then refresh()end elseif event==\"key\"then local name=keys.getName(first)if state.menu then if name==\"up\"then state.menu.selected=math.max(1,state.menu.selected-1);refresh()elseif name==\"down\"then state.menu.selected=math.min(#state.menu.items,state.menu.selected+1);refresh()elseif name==\"enter\"then run(state.menu.items[state.menu.selected].action)elseif name==\"backspace\"or name==\"m\"then state.menu=nil;refresh()end elseif name==\"q\"then if page==\"home\"then refresh(\"CeetOS Desktop stays active. Open Terminal for commands.\")else page=\"home\";state.selected=nil;refresh()end elseif name==\"r\"then refresh()elseif name==\"up\"or name==\"down\"or name==\"left\"or name==\"right\"then gui.move(currentModel,state,name);refresh()elseif name==\"enter\"then activateSelected()elseif name==\"m\"then openMenu(gui.selected(currentModel,state))elseif name==\"n\"and page==\"files\"and not state.trash then run(\"new_folder\")elseif name==\"t\"and page==\"files\"and not state.trash then run(\"trash_open\")elseif name==\"e\"and page==\"files\"and state.trash then run(\"empty_trash\")elseif name==\"backspace\"then if page==\"peripherals\"and state.peripheralView then state.peripheralView=false;state.selected=nil;refresh()elseif page==\"files\"and state.trash then state.trash=false;state.selected=nil;refresh()elseif page==\"files\"and state.path~=\"/\"then state.path=table.remove(state.history)or\"/\";state.selected=nil;refresh()else page=\"home\";state.selected=nil;refresh()end end elseif event==\"mouse_click\"then local target=terminalUi.hit(targets,second,third)if target then if target.kind==\"menu\"then run(target.item.action)elseif target.item.toggle then gui.select(currentModel,state,target.item);run(target.item.action)elseif first==2 then gui.select(currentModel,state,target.item);openMenu(target.item)elseif state.selected==target.item.id then if target.item.kind==\"account\"then openMenu(target.item)else activateSelected()end else gui.select(currentModel,state,target.item);refresh()end end elseif event==\"file_transfer\"then local ok,result=pcall(function()local transfers=first.getFiles();local imported,updated={},0 for _,transfer in ipairs(transfers)do local name=transfer.getName and transfer.getName()or\"\"local devBuild=name:match(\"^ceetos%-devbuild[%w%._%-]*%.lua$\")or name==\"ceetos-pastebin.lua\"local releaseBuild=name:match(\"^ceetos%-release[%w%._%-]*%.lua$\")or name==\"ceetos-release.lua\"if devBuild or releaseBuild then auth.require(\"operator\")local chunks={};while true do local chunk=transfer.read(8192);if not chunk then break end;chunks[#chunks+1]=chunk end local source=table.concat(chunks)if releaseBuild then local metadata,cacheErr=release.cache(source,\"file transfer\")assert(metadata,cacheErr or\"not a signed CeetOS release\")if confirm(\"Verified CeetOS \"..tostring(metadata.version)..\" received. Apply locally now\")then local prepared,applyErr=networkRequest(\"update_apply\",{})assert(prepared,applyErr or\"could not prepare update\")term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear();term.setCursorPos(1,1)print(\"Verified release approved. Rebooting locally...\")sleep(0.3);os.reboot()end updated=updated+1 else assert(source:find(\"CeetOS installer\",1,true)and source:find(\"local files\",1,true),\"not a CeetOS installer\")local installer=assert(load(source,name,\"t\"));installer();updated=updated+1 end else local importedFiles=files.import({transfer},\"/programs/imports\")for _,path in ipairs(importedFiles)do imported[#imported+1]=path end end end return{imported=imported,updated=updated}end)if ok then refresh()else refresh(tostring(result),true)end elseif event==\"term_resize\"then refresh()end end term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear();term.setCursorPos(1,1)",
  ["ceetos/bin/ceetshell.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local history=require(\"ceetos.lib.terminal\")local clipboard=require(\"ceetos.lib.clipboard\")local inputState=require(\"ceetos.lib.input\")local terminalUi=require(\"ceetos.lib.terminal_ui\")local auth=require(\"ceetos.lib.auth\")auth.require(\"operator\")local net=require(\"ceetos.lib.net\")local store=require(\"ceetos.lib.store\")local launch={...}local remoteId,remoteLabel,remoteSession if launch[1]==\"--remote\"and launch[2]then remoteId=tostring(launch[2]);remoteLabel=\"peer-\"..remoteId for _,peer in ipairs(net.peers())do if tostring(peer.id)==remoteId and peer.label and peer.label~=\"\"then remoteLabel=peer.label end end for _,peer in ipairs(net.seenPeers())do if tostring(peer.id)==remoteId and peer.label and peer.label~=\"\"then remoteLabel=peer.label end end remoteSession=tostring(os.epoch(\"utc\"))..\"-\"..tostring(math.random(1000,9999))end local function localLabel()return(os.getComputerLabel and os.getComputerLabel())or(\"computer-\"..tostring(os.getComputerID()))end local promptIdentity=(auth.current and auth.current.name or\"guest\")..\"@\"..(remoteLabel or localLabel())local function parse(line)local out,token,quote,escaped={},\"\",nil,false for index=1,#line do local char=line:sub(index,index)if escaped then token,escaped=token..char,false elseif char==\"\\\\\"then escaped=true elseif quote then if char==quote then quote=nil else token=token..char end elseif char=='\"'or char==\"'\"then quote=char elseif char:match(\"%s\")then if token~=\"\"then out[#out+1],token=token,\"\"end else token=token..char end end if token~=\"\"then out[#out+1]=token end return out end local function candidates(word)local result,seen={},{}local function add(value)if value and not seen[value]then result[#result+1],seen[value]=value,true end end if word:find(\"/\")then local directory,prefix=fs.getDir(word),fs.getName(word)directory=directory==\"\"and\"/\"or directory if fs.exists(directory)and fs.isDir(directory)then for _,name in ipairs(fs.list(directory))do if name:sub(1,#prefix)==prefix then add(fs.combine(directory,name))end end end else for directory in shell.path():gmatch(\"[^:]+\")do if fs.exists(directory)and fs.isDir(directory)then for _,name in ipairs(fs.list(directory))do add(name:gsub(\"%.lua$\",\"\"))end end end end return result end local function readCommand()local input,cursor,entries,index,draft,anchor,viewOffset=\"\",0,history.history(),nil,\"\",nil,0 local held=inputState.modifiers()local selection=require(\"ceetos.lib.selection\")local promptX,promptY=1,select(2,term.getCursorPos())local function draw()local width,height=term.getSize()local prompt=promptIdentity..\":~$ \"local available=math.max(1,width-#prompt)if cursor<viewOffset then viewOffset=cursor elseif cursor>viewOffset+available then viewOffset=cursor-available end viewOffset=math.max(0,math.min(math.max(0,#input-available),viewOffset))terminalUi.clearLine(promptY,colors.black);terminalUi.write(promptX,promptY,prompt,colors.lime,colors.black,width)local visible=input:sub(viewOffset+1,viewOffset+available)local lo,hi=anchor and math.min(anchor,cursor)or nil,anchor and math.max(anchor,cursor)or nil if lo and hi and lo~=hi then local from,to=math.max(lo,viewOffset),math.min(hi,viewOffset+#visible)if from<to then terminalUi.write(#prompt+1,promptY,input:sub(viewOffset+1,from),colors.white,colors.black,available)terminalUi.write(#prompt+1+from-viewOffset,promptY,input:sub(from+1,to),colors.black,colors.white,available-(from-viewOffset))terminalUi.write(#prompt+1+to-viewOffset,promptY,input:sub(to+1,viewOffset+#visible),colors.white,colors.black,available-(to-viewOffset))else terminalUi.write(#prompt+1,promptY,visible,colors.white,colors.black,available)end term.setBackgroundColor(colors.black)else terminalUi.write(#prompt+1,promptY,visible,colors.white,colors.black,available)end term.setCursorPos(math.min(width,#prompt+cursor-viewOffset+1),promptY);if term.setCursorBlink then term.setCursorBlink(true)end terminalUi.clearLine(height,colors.black);terminalUi.write(1,height,\"Cursor \"..tostring(cursor+1)..\"/\"..tostring(#input+1)..\"  |  Enter run  |  Tab complete  |  exit returns\",colors.gray,colors.black,width)term.setTextColor(colors.white);term.setCursorPos(math.min(width,#prompt+cursor-viewOffset+1),promptY)end draw()while true do local event,first,second,third=os.pullEvent()if event==\"char\"then if held.ctrl and held.shift and(first==\"c\"or first==\"C\")and anchor then local s=require(\"ceetos.lib.selection\").new({input});require(\"ceetos.lib.selection\").start(s,1,anchor);require(\"ceetos.lib.selection\").update(s,1,cursor);require(\"ceetos.lib.selection\").copy(s,clipboard)elseif held.ctrl and held.shift and(first==\"v\"or first==\"V\")then local text=clipboard.get();input=input:sub(1,cursor)..text..input:sub(cursor+1);cursor=cursor+#text;anchor=nil else if anchor and anchor~=cursor then input=input:sub(1,math.min(anchor,cursor))..input:sub(math.max(anchor,cursor)+1);cursor=math.min(anchor,cursor);anchor=nil end;input=input:sub(1,cursor)..first..input:sub(cursor+1);cursor=cursor+#first end;draw()elseif event==\"paste\"then if anchor and anchor~=cursor then input=input:sub(1,math.min(anchor,cursor))..input:sub(math.max(anchor,cursor)+1);cursor=math.min(anchor,cursor);anchor=nil end;input=input:sub(1,cursor)..first..input:sub(cursor+1);cursor=cursor+#first;draw()elseif event==\"key_down\"then inputState.key(held,keys.getName(first)or first)elseif event==\"key_up\"then inputState.keyUp(held,keys.getName(first)or first)elseif event==\"key\"then local key=tostring(keys.getName(first)or first or\"\"):lower()local copyShortcut=held.ctrl and held.shift and key==\"c\"local pasteShortcut=held.ctrl and held.shift and key==\"v\"if key==\"leftctrl\"or key==\"rightctrl\"or key==\"ctrl\"or key==\"leftshift\"or key==\"rightshift\"or key==\"shift\"then inputState.key(held,key);draw()elseif copyShortcut then held.ctrl,held.shift=false,false if anchor and anchor~=cursor then local s=selection.new({input});selection.start(s,1,anchor);selection.update(s,1,cursor);selection.copy(s,clipboard)end;draw()elseif pasteShortcut then held.ctrl,held.shift=false,false local text=clipboard.get();if anchor and anchor~=cursor then input=input:sub(1,math.min(anchor,cursor))..input:sub(math.max(anchor,cursor)+1);cursor=math.min(anchor,cursor);anchor=nil end;input=input:sub(1,cursor)..text..input:sub(cursor+1);cursor=cursor+#text;draw()elseif key==\"enter\"then term.setCursorPos(1,promptY+1);return input elseif key==\"backspace\"then if anchor and anchor~=cursor then input=input:sub(1,math.min(anchor,cursor))..input:sub(math.max(anchor,cursor)+1);cursor=math.min(anchor,cursor);anchor=nil elseif cursor>0 then input=input:sub(1,cursor-1)..input:sub(cursor+1);cursor=cursor-1 end;draw()elseif key==\"delete\"and cursor<#input then if anchor and anchor~=cursor then input=input:sub(1,math.min(anchor,cursor))..input:sub(math.max(anchor,cursor)+1);cursor=math.min(anchor,cursor);anchor=nil else input=input:sub(1,cursor)..input:sub(cursor+2)end;draw()elseif key==\"left\"then if held.shift then anchor=anchor or cursor end;cursor=math.max(0,cursor-1);if not held.shift then anchor=nil end;draw()elseif key==\"right\"then if held.shift then anchor=anchor or cursor end;cursor=math.min(#input,cursor+1);if not held.shift then anchor=nil end;draw()elseif key==\"home\"then if held.shift then anchor=anchor or cursor end;cursor=0;if not held.shift then anchor=nil end;draw()elseif key==\"end\"then if held.shift then anchor=anchor or cursor end;cursor=#input;if not held.shift then anchor=nil end;draw()elseif key==\"up\"then if#entries>0 then if not index then draft,index=input,#entries else index=math.max(1,index-1)end;input,cursor=entries[index],#entries[index];draw()end elseif key==\"down\"and index then index=index+1;input=index>#entries and draft or entries[index];if index>#entries then index=nil end;cursor=#input;draw()elseif key==\"tab\"then local word=input:match(\"([^%s]*)$\")or\"\";local matches=history.complete(word,candidates(word))if#matches==1 then input=input:sub(1,#input-#word)..matches[1];cursor=#input;draw()end end elseif event==\"mouse_click\"and first==2 and anchor and anchor~=cursor then local s=selection.new({input});selection.start(s,1,anchor);selection.update(s,1,cursor);selection.copy(s,clipboard);draw()elseif event==\"mouse_click\"and first==1 and third==promptY then local prompt=promptIdentity..\":~$ \";anchor=math.max(0,math.min(#input,viewOffset+second-#prompt-1));cursor=anchor;draw()elseif event==\"mouse_drag\"and first==1 and third==promptY then local prompt=promptIdentity..\":~$ \";cursor=math.max(0,math.min(#input,viewOffset+second-#prompt-1));draw()end end end local function banner()local width=select(1,term.getSize())term.setBackgroundColor(colors.black);term.setTextColor(colors.cyan);term.clear();terminalUi.write(1,1,\"CeetOS Terminal  |  \"..promptIdentity..\"  |  Tab complete  |  exit returns to Desktop\",colors.cyan,colors.black,width)term.setCursorPos(1,3)term.setTextColor(colors.white)end local function waitRemote()if not remoteSession then return end local timer,deadline=os.startTimer(0.2),os.epoch(\"utc\")+2000 while os.epoch(\"utc\")<deadline do local event,value=os.pullEvent()if event==\"timer\"and value==timer then local replies,pending=store.read(\"/ceetos/data/shell-replies.lua\",{}),{}for _,reply in ipairs(replies)do if reply.from==remoteId and reply.body and reply.body.session==remoteSession then if reply.body.output and reply.body.output~=\"\"then print(reply.body.output)end if not reply.body.ok and reply.body.error then printError(reply.body.error)end else pending[#pending+1]=reply end end store.write(\"/ceetos/data/shell-replies.lua\",pending)if#pending<#replies then return end timer=os.startTimer(0.2)end end printError(\"Remote command timed out\")end local function configureDevBridge(url,token)if not url or url==\"\"then printError(\"usage: ceetdev <ws://bridge:port/dev> [token]\");return end if not fs.exists(\"/ceetos-dev\")then fs.makeDir(\"/ceetos-dev\")end local handle=assert(fs.open(\"/ceetos-dev/connection.lua\",\"w\"))handle.write(textutils.serialize({url=url,token=token or\"\",auth=(token and token~=\"\")and\"token\"or\"none\"}));handle.close()print(\"Development bridge configured; connection continues in the background.\")end banner()while true do local line=readCommand()if line==nil or line==\"exit\"then break end if line==\"clear\"then banner()else local args=parse(line)if#args>0 then history.add(line)if remoteId then local ok,err=net.request(remoteId,\"shell_request\",{command=line,session=remoteSession})if not ok then printError(err)else waitRemote()end else local ok,result if args[1]==\"ceetdev\"then configureDevBridge(args[2],args[3]);ok,result=true,true else ok,result=pcall(shell.run,args[1],table.unpack(args,2))end if not ok then printError(result)elseif result==false then printError(\"Command failed\")end end end end end",
  ["ceetos/bin/ceetlaunch.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local auth=require(\"ceetos.lib.auth\")local capabilities=require(\"ceetos.lib.program_capabilities\")local audit=require(\"ceetos.lib.audit\")local args={...}local requestedPath=table.remove(args,1)assert(requestedPath and requestedPath~=\"\",\"usage: ceetlaunch <program> [args]\")if auth.refreshSession then auth.refreshSession()end local current=auth.current local actor=current and current.name or\"anonymous\"local normalized,pathErr=capabilities.normaliseProgramPath(requestedPath)if not normalized then audit.log(actor,\"program.launch_denied\",{path=tostring(requestedPath),reason=tostring(pathErr)})error(pathErr,0)end local runner if auth.allowed(\"operator\")then audit.log(actor,\"program.launch\",{path=normalized,mode=\"full\",role=auth.current and auth.current.role})runner=function()return shell.run(normalized,table.unpack(args))end elseif auth.allowed(\"viewer\")then local chunk,record=capabilities.loadViewer(normalized,actor)if not chunk then audit.log(actor,\"program.launch_denied\",{path=normalized,reason=tostring(record)})error(record,0)end audit.log(actor,\"program.launch\",{path=normalized,mode=\"sandbox\",trust=record.trust,stale=record.stale==true,})runner=function()return chunk(table.unpack(args))end else audit.log(actor,\"program.launch_denied\",{path=normalized,reason=\"requires viewer\"})error(\"permission denied (requires viewer)\",0)end local child=coroutine.create(runner)local function resume(...)local ok,result=coroutine.resume(child,...)if not ok then audit.log(actor,\"program.failed\",{path=normalized,reason=\"program error\"})error(result,0)end return coroutine.status(child)==\"dead\",result end local done,result=resume()while not done do local event={os.pullEventRaw()}if event[1]==\"key\"and event[2]==keys.backspace then term.setTextColor(colors.gray)print(\"Backspace: returned to CeetOS Desktop\")return true end done,result=resume(table.unpack(event))end return result",
  ["ceetos/bin/craftos-shell.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local auth=require(\"ceetos.lib.auth\")auth.require(\"operator\")shell.run(\"/rom/programs/shell.lua\")",
  ["ceetos/bin/ceetedit.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local editor=require(\"ceetos.lib.editor\")local clipboard=require(\"ceetos.lib.clipboard\")local inputState=require(\"ceetos.lib.input\")local terminalUi=require(\"ceetos.lib.terminal_ui\")local auth=require(\"ceetos.lib.auth\")local files=require(\"ceetos.lib.files\")local args={...}local path=args[1]assert(path and path~=\"\",\"usage: ceetedit <file>\")auth.require(\"operator\")assert(not files.isProtected(path),\"protected files must be edited with craftos-edit\")local buffer=editor.new(fs.exists(path)and files.readText(path)or\"\")local scroll,ctrl,shift=1,false,false local held=inputState.modifiers()local tokenColours={text=colors.white,comment=colors.gray,string=colors.orange,keyword=colors.purple,number=colors.cyan,builtin=colors.lightBlue}local function fitCursor(height)local visible=math.max(1,height-3)if buffer.line<scroll then scroll=buffer.line elseif buffer.line>=scroll+visible then scroll=buffer.line-visible+1 end end local function render(message)local width,height=term.getSize();fitCursor(height)term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear()if width<24 or height<8 then terminalUi.minimum(\"CeetOS Editor\",\"Editor needs 24x8\",\"Resize | Ctrl+Q exit\");return end terminalUi.clearLine(1,colors.blue);terminalUi.write(2,1,\"CeetOS Editor | \"..path..(buffer.changed and\" *\"or\"\"),colors.white,colors.blue,width-2)local digits=math.max(2,#tostring(#buffer.lines));local gutter=digits+3 local lua=path:sub(-4):lower()==\".lua\"for row=2,height-1 do local lineNumber,line=scroll+row-2,buffer.lines[scroll+row-2]if line then local selected=lineNumber==buffer.line term.setBackgroundColor(selected and colors.gray or colors.black);terminalUi.write(1,row,(\"%\"..digits..\"d \"):format(lineNumber),colors.lightGray,selected and colors.gray or colors.black,gutter-1)term.setTextColor(colors.white)local x=gutter for _,token in ipairs(editor.tokens(line,lua))do if x<width then terminalUi.write(x,row,token.text,tokenColours[token.kind]or colors.white,selected and colors.gray or colors.black,width-x+1);x=x+#token.text end end end end local range=buffer.selection and require(\"ceetos.lib.selection\").range(buffer.selection)if range then for line=range.first.line,range.last.line do local row=line-scroll+2 if row>=2 and row<height then local from=line==range.first.line and range.first.column or 0 local to=line==range.last.line and range.last.column or#(buffer.lines[line]or\"\")if to>from and gutter+from<=width then terminalUi.write(gutter+from,row,(buffer.lines[line]or\"\"):sub(from+1,to),colors.black,colors.white,width-gutter-from+1)term.setBackgroundColor(colors.black)end end end end terminalUi.clearLine(height,colors.black);terminalUi.write(1,height,message or\"Ctrl+S save | F2 save as | Ctrl+F find | Ctrl+G line | F5 run | Ctrl+Q exit\",colors.gray,colors.black,width)local cursorY=buffer.line-scroll+2 if cursorY>=2 and cursorY<height then term.setCursorPos(math.min(width,gutter+buffer.column),cursorY)end term.setTextColor(colors.white)end local function prompt(label)local _,height=term.getSize();term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.setCursorPos(1,height);term.clearLine();term.write(label..\": \");return read()end local function save(target)target=target or path local ok,err=pcall(files.writeText,target,editor.text(buffer))if ok then path,buffer.changed=target,false;return true else render(tostring(err));return false end end local function leaveChoice()if not buffer.changed then return\"discard\"end local function draw()render()local width,height=term.getSize();local boxWidth=math.max(20,math.min(32,width-2));local x,y=math.max(1,math.floor((width-boxWidth)/2)+1),math.max(2,math.floor((height-5)/2))terminalUi.fill(x,y,boxWidth,5,colors.black)terminalUi.write(x+2,y+1,\"Unsaved changes\",colors.white,colors.black,boxWidth-4)local compact=boxWidth<31 local saveText,discardText,cancelText=compact and\"[S]\"or\" Save \",compact and\"[D]\"or\" Discard \",compact and\"[C]\"or\" Cancel \"local saveX,discardX,cancelX=x+2,x+2+#saveText+2,x+2+#saveText+#discardText+4 terminalUi.write(saveX,y+3,saveText,colors.black,colors.green)terminalUi.write(discardX,y+3,discardText,colors.white,colors.red)terminalUi.write(cancelX,y+3,cancelText,colors.white,colors.gray)return{y=y+3,saveX=saveX,saveWidth=#saveText,discardX=discardX,discardWidth=#discardText,cancelX=cancelX,cancelWidth=#cancelText}end local modal=draw()while true do local event,first,second,third=os.pullEvent()if event==\"mouse_click\"and third==modal.y then if second>=modal.saveX and second<modal.saveX+modal.saveWidth then return\"save\"elseif second>=modal.discardX and second<modal.discardX+modal.discardWidth then return\"discard\"elseif second>=modal.cancelX and second<modal.cancelX+modal.cancelWidth then return\"cancel\"end elseif event==\"key\"then local key=keys.getName(first);if key==\"enter\"then return\"save\"elseif key==\"d\"then return\"discard\"elseif key==\"backspace\"then return\"cancel\"end end if event==\"term_resize\"then modal=draw()end end end render()while true do local event,first,second,third=os.pullEvent()if event==\"char\"then editor.insert(buffer,first);render()elseif event==\"paste\"then editor.insert(buffer,first);render()elseif event==\"key_up\"then local released=tostring(keys.getName(first)or first or\"\"):lower()inputState.keyUp(held,released);ctrl,shift=held.ctrl,held.shift elseif event==\"key\"then local key=tostring(keys.getName(first)or first or\"\"):lower()if key==\"leftctrl\"or key==\"rightctrl\"or key==\"ctrl\"or key==\"leftshift\"or key==\"rightshift\"or key==\"shift\"then inputState.key(held,key);ctrl,shift=held.ctrl,held.shift elseif ctrl and key==\"c\"then editor.copySelection(buffer,clipboard);ctrl,shift,held.ctrl,held.shift=false,false,false,false;render(\"Copied\")elseif ctrl and key==\"v\"then editor.insert(buffer,clipboard.get());ctrl,shift,held.ctrl,held.shift=false,false,false,false;render()elseif ctrl and key==\"s\"then save();render(\"Saved\")elseif ctrl and key==\"q\"then local choice=leaveChoice();if choice==\"save\"then if save()then break end elseif choice==\"discard\"then break else render()end end elseif ctrl and key==\"f\"then local needle=prompt(\"Find\");if not editor.find(buffer,needle)then render(\"Not found\")else render()end elseif ctrl and key==\"g\"then editor.gotoLine(buffer,prompt(\"Go to line\"));render()elseif key==\"f2\"then local target=prompt(\"Save as\");if target~=\"\"then save(target);render(\"Saved\")else render()end elseif key==\"f5\"then if not auth.allowed(\"operator\")then render(\"Operator role required to run programs\")elseif save()then term.clear();term.setCursorPos(1,1);shell.run(\"/ceetos/bin/ceetlaunch.lua\",path);render(\"Returned from program\")end elseif key==\"left\"then if shift and not buffer.selection.anchor then editor.selectStart(buffer)end;editor.move(buffer,0,-1);if shift then editor.selectTo(buffer,buffer.line,buffer.column)else editor.clearSelection(buffer)end;render()elseif key==\"right\"then if shift and not buffer.selection.anchor then editor.selectStart(buffer)end;editor.move(buffer,0,1);if shift then editor.selectTo(buffer,buffer.line,buffer.column)else editor.clearSelection(buffer)end;render()elseif key==\"up\"then if shift and not buffer.selection.anchor then editor.selectStart(buffer)end;editor.move(buffer,-1,0);if shift then editor.selectTo(buffer,buffer.line,buffer.column)else editor.clearSelection(buffer)end;render()elseif key==\"down\"then if shift and not buffer.selection.anchor then editor.selectStart(buffer)end;editor.move(buffer,1,0);if shift then editor.selectTo(buffer,buffer.line,buffer.column)else editor.clearSelection(buffer)end;render()elseif key==\"home\"then if shift and not buffer.selection.anchor then editor.selectStart(buffer)end;editor.gotoLine(buffer,buffer.line,0);if shift then editor.selectTo(buffer,buffer.line,buffer.column)else editor.clearSelection(buffer)end;render()elseif key==\"end\"then if shift and not buffer.selection.anchor then editor.selectStart(buffer)end;editor.gotoLine(buffer,buffer.line,#editor.current(buffer));if shift then editor.selectTo(buffer,buffer.line,buffer.column)else editor.clearSelection(buffer)end;render()elseif key==\"pageup\"then editor.move(buffer,-10,0);render()elseif key==\"pagedown\"then editor.move(buffer,10,0);render()elseif key==\"enter\"then editor.insert(buffer,\"\\n\");render()elseif key==\"tab\"then editor.insert(buffer,\"  \");render()elseif key==\"backspace\"then if not editor.deleteSelection(buffer)then editor.backspace(buffer)end;render()elseif key==\"delete\"then if not editor.deleteSelection(buffer)then editor.delete(buffer)end;render()elseif event==\"mouse_click\"and first==2 then if buffer.selection and require(\"ceetos.lib.selection\").range(buffer.selection)then editor.copySelection(buffer,clipboard);render(\"Copied\")else editor.insert(buffer,clipboard.get());render()end elseif event==\"mouse_click\"and first==1 then local width,height=term.getSize()local digits=math.max(2,#tostring(#buffer.lines));local gutter=digits+3 local line=scroll+third-2 if third>=2 and third<height and line>=1 and line<=#buffer.lines then local column=math.max(0,math.min(#(buffer.lines[line]or\"\"),second-gutter))editor.gotoLine(buffer,line,column);editor.selectStart(buffer);render()end elseif event==\"mouse_drag\"and first==1 then local width,height=term.getSize()local digits=math.max(2,#tostring(#buffer.lines));local gutter=digits+3 local line=math.max(1,math.min(#buffer.lines,scroll+third-2))local column=math.max(0,math.min(#(buffer.lines[line]or\"\"),second-gutter))editor.selectTo(buffer,line,column);editor.gotoLine(buffer,line,column);render()elseif event==\"term_resize\"then render()end end term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear();term.setCursorPos(1,1)",
  ["ceetos/bin/edit.lua"] = "local args={...}if#args==0 then shell.run(\"/ceetos/bin/ceetui.lua\",\"files\")else shell.run(\"/ceetos/bin/ceetedit.lua\",args[1])end",
  ["ceetos/bin/programs.lua"] = "shell.run(\"/ceetos/bin/ceetui.lua\")",
  ["ceetos/bin/files.lua"] = "shell.run(\"/ceetos/bin/ceetui.lua\",\"files\")",
  ["ceetos/bin/list.lua"] = "shell.run(\"/ceetos/bin/ceetui.lua\",\"files\")",
  ["ceetos/bin/delete.lua"] = "shell.run(\"/ceetos/bin/ceetui.lua\",\"files\")",
  ["ceetos/lib/store.lua"] = "local M={}local cache={}local function internalPath(path)return type(path)~=\"string\"or path:sub(-4)==\".new\"or path:sub(-4)==\".bak\"end local function call(fn,...)local result={pcall(fn,...)}if not result[1]then return false,tostring(result[2])end if result[2]==false then return false,tostring(result[3]or\"operation failed\")end return true,result[2],result[3]end local function exists(path)local ok,value=call(fs.exists,path)return ok and value==true end local function remove(path)if not exists(path)then return true end local ok,err=call(fs.delete,path)return ok,err end local function ensureDirectory(path)local dir=fs.getDir(path)if dir==\"\"or exists(dir)then return true end local ok,err=call(fs.makeDir,dir)return ok,err end local function readRaw(path)local ok,handleOrErr=call(fs.open,path,\"r\")if not ok or not handleOrErr then return false,nil,tostring(handleOrErr or\"could not open file\")end local handle=handleOrErr local readOk,content=call(handle.readAll)local closeOk,closeErr=call(handle.close)if not readOk then return false,nil,content end if not closeOk then return false,nil,closeErr end return true,content end local function writeRaw(path,content)local ok,handleOrErr=call(fs.open,path,\"w\")if not ok or not handleOrErr then return false,tostring(handleOrErr or\"could not open file\")end local handle=handleOrErr local writeOk,writeErr=call(handle.write,content)local closeOk,closeErr=call(handle.close)if not writeOk then return false,writeErr end if not closeOk then return false,closeErr end return true end local function move(source,destination)local ok,err=call(fs.move,source,destination)return ok,err end local function decode(raw)local ok,value=pcall(textutils.unserialise,raw)if not ok or value==nil then return false,nil,\"invalid serialised value\"end return true,value end local function readValue(path)local ok,raw,err=readRaw(path)if not ok then return false,nil,err end return decode(raw)end local function recoverValue(path)local activeOk,activeValue=false,nil if exists(path)then activeOk,activeValue=readValue(path)end if activeOk then remove(path..\".new\")remove(path..\".bak\")return true,activeValue end local backupOk,backupValue=false,nil if exists(path..\".bak\")then backupOk,backupValue=readValue(path..\".bak\")end if backupOk then if exists(path)then remove(path)end if not exists(path)then move(path..\".bak\",path)end remove(path..\".new\")return true,backupValue end remove(path..\".new\")return false,nil end local function validLines(raw)for line in(raw..\"\\n\"):gmatch(\"(.-)\\n\")do if line~=\"\"then local ok,value=pcall(textutils.unserialise,line)if not ok or value==nil then return false,\"invalid appended value\"end end end return true end local function recoverAppend(path)if exists(path)then local activeOk,raw=readRaw(path)if activeOk then local valid=validLines(raw)if valid then remove(path..\".new\")remove(path..\".bak\")return true,raw end end end if exists(path..\".bak\")then local backupOk,raw=readRaw(path..\".bak\")if backupOk and validLines(raw)then if exists(path)then remove(path)end if not exists(path)then move(path..\".bak\",path)end remove(path..\".new\")return true,raw end end remove(path..\".new\")return false,\"no valid appended value\"end local function commitRaw(path,raw,validator)local dirOk,dirErr=ensureDirectory(path)if not dirOk then return false,dirErr end local temporary,backup=path..\".new\",path..\".bak\"local removeOk,removeErr=remove(temporary)if not removeOk then return false,removeErr end local writeOk,writeErr=writeRaw(temporary,raw)if not writeOk then remove(temporary);return false,writeErr end local checkOk,checkedRaw,checkErr=readRaw(temporary)if not checkOk then remove(temporary);return false,checkErr end local valid,validErr=validator(checkedRaw)if not valid then remove(temporary);return false,validErr or\"temporary validation failed\"end local backupRemoveOk,backupRemoveErr=remove(backup)if not backupRemoveOk then remove(temporary);return false,backupRemoveErr end if exists(path)then local backupOk,backupErr=move(path,backup)if not backupOk then remove(temporary);return false,backupErr end local activateOk,activateErr=move(temporary,path)if not activateOk then if not exists(path)then move(backup,path)end remove(temporary)return false,activateErr end else local activateOk,activateErr=move(temporary,path)if not activateOk then remove(temporary);return false,activateErr end end return true end function M.readCached(path,fallback)if internalPath(path)then return fallback end local entry=cache[path]if entry~=nil then return entry.value end return M.readFresh(path,fallback)end function M.readFresh(path,fallback)if internalPath(path)then return fallback end local ok,value=recoverValue(path)if not ok then value=fallback end cache[path]={value=value}return value end function M.read(path,fallback)return M.readCached(path,fallback)end function M.writeAtomic(path,value)if internalPath(path)then return false,\"cannot write store temporary or backup path\"end if value==nil then return false,\"cannot store nil\"end local serialisedOk,raw=pcall(textutils.serialise,value,{compact=true})if not serialisedOk or type(raw)~=\"string\"then return false,tostring(raw or\"could not serialise value\")end local valid=decode(raw)if not valid then return false,\"could not validate serialised value\"end recoverValue(path)local ok,err=commitRaw(path,raw,decode)if ok then cache[path]={value=value}end return ok,err end function M.write(path,value)return M.writeAtomic(path,value)end function M.append(path,value,limits)if internalPath(path)then return false,\"cannot append to store temporary or backup path\"end if value==nil then return false,\"cannot append nil\"end local serialisedOk,line=pcall(textutils.serialise,value,{compact=true})if not serialisedOk or type(line)~=\"string\"then return false,tostring(line or\"could not serialise value\")end local valid=validLines(line..\"\\n\")if not valid then return false,\"could not validate appended value\"end local recovered,current=recoverAppend(path)if not recovered then if exists(path)or exists(path..\".bak\")then return false,current end current=\"\"end local lines={}for existing in(current..\"\\n\"):gmatch(\"(.-)\\n\")do if existing~=\"\"then lines[#lines+1]=existing end end lines[#lines+1]=line local maxEntries=limits and tonumber(limits.maxEntries)local maxBytes=limits and tonumber(limits.maxBytes)if maxEntries then maxEntries=math.max(1,math.floor(maxEntries))end if maxBytes then maxBytes=math.max(1,math.floor(maxBytes))end while maxEntries and#lines>maxEntries do table.remove(lines,1)end local raw=table.concat(lines,\"\\n\")if#raw>0 then raw=raw..\"\\n\"end while maxBytes and#raw>maxBytes and#lines>1 do table.remove(lines,1)raw=table.concat(lines,\"\\n\")..\"\\n\"end if maxBytes and#raw>maxBytes then return false,\"appended value exceeds byte limit\"end local ok,err=commitRaw(path,raw,validLines)if ok then cache[path]=nil end return ok,err end function M.readAppend(path)if internalPath(path)then return\"\"end local ok,raw=recoverAppend(path)return ok and raw or\"\"end function M.invalidate(path)cache[path]=nil end return M",
  ["ceetos/lib/profile.lua"] = "local store=require(\"ceetos.lib.store\")local M={}M.PATH=\"/ceetos/profile.lua\"M.IDS={desktop=true,[\"recipe-server\"]=true,[\"router-server\"]=true,[\"auth-server\"]=true}local cache local function normalise(value)if type(value)~=\"table\"then value={}end local id=tostring(value.id or value.profile or\"desktop\")if not M.IDS[id]then id=\"desktop\"end return{schema=1,id=id,installedAt=tonumber(value.installedAt)or 0}end function M.current()if not cache then cache=normalise(store.read(M.PATH,{id=\"desktop\"}))end return cache end function M.id()return M.current().id end function M.is(id)return M.id()==id end function M.isServer()return M.id()~=\"desktop\"end function M.set(id)assert(M.IDS[id],\"invalid CeetOS profile\")cache={schema=1,id=id,installedAt=os.epoch(\"utc\")}return store.write(M.PATH,cache)end function M.capability(name)local id=M.id()local tableFor={desktop={desktop=true,craftingClient=true,orders=true},[\"recipe-server\"]={server=true,recipes=true,recipeImport=true,recipePlan=true},[\"router-server\"]={server=true,routing=true},[\"auth-server\"]={server=true,authAuthority=true},}return tableFor[id][name]==true end return M",
  ["ceetos/lib/auth.lua"] = "local store=require(\"ceetos.lib.store\")local password=require(\"ceetos.lib.password\")local audit=require(\"ceetos.lib.audit\")local M={current=nil}local USERS=\"/ceetos/data/users.lua\"local SESSION=\"/ceetos/data/session.lua\"local TOMBSTONES=\"/ceetos/data/user-tombstones.lua\"local THROTTLE=\"/ceetos/data/login-throttle.lua\"local RECOVERY=\"/ceetos/data/recovery.lua\"local AUTHORITY=\"/ceetos/data/auth-authority.lua\"local CENTRAL_SESSION=\"/ceetos/data/auth-session.lua\"local DIRECTORY=\"/ceetos/data/auth-directory.lua\"local rank={viewer=1,operator=2,admin=3}M.SESSION_TTL_MS=8*60*60*1000 M.LOGIN_THROTTLE={failures=5,windowMs=5*60*1000,lockMs=60*1000,maxEntries=64}local configuredWorkFactor=password.DEFAULT_WORK_FACTOR local sessionPathDelete local function now()return os.epoch(\"utc\")end local function accountName(name)return type(name)==\"string\"and name:match(\"^[%w_%-]+$\")and#name<=32 end local function users()store.invalidate(USERS);return store.read(USERS,{})end local function save(value)return store.write(USERS,value)end local function tombstones()store.invalidate(TOMBSTONES);return store.read(TOMBSTONES,{})end local function saveTombstones(value)return store.write(TOMBSTONES,value)end local function authority()store.invalidate(AUTHORITY)local value=store.read(AUTHORITY,nil)return type(value)==\"table\"and value.active==true and type(value.id)==\"string\"and value or nil end function M.authority()return authority()end function M.centralActive()return authority()~=nil end local function centralDirectory()store.invalidate(DIRECTORY)local value=store.read(DIRECTORY,{})return type(value)==\"table\"and type(value.users)==\"table\"and value or{users={}}end function M.acceptAuthority(record)assert(type(record)==\"table\"and type(record.id)==\"string\"and#record.id<=64,\"invalid auth authority\")local public={schema=1,active=true,id=record.id,term=math.max(0,math.floor(tonumber(record.term)or 0)),revision=math.max(0,math.floor(tonumber(record.revision)or 0)),seen=now()}assert(store.write(AUTHORITY,public),\"could not save auth authority\")if type(record.directory)==\"table\"then assert(store.write(DIRECTORY,{schema=1,revision=public.revision,users=record.directory}),\"could not save account directory\")end local loaded,profile=pcall(require,\"ceetos.lib.profile\")if not loaded or not profile.is(\"auth-server\")then if fs.exists(USERS)then fs.delete(USERS)end if fs.exists(TOMBSTONES)then fs.delete(TOMBSTONES)end sessionPathDelete()end return public end function M.updateDirectory(directory,revision)if type(directory)~=\"table\"then return false,\"invalid account directory\"end return store.write(DIRECTORY,{schema=1,revision=math.max(0,math.floor(tonumber(revision)or 0)),users=directory})end function M.saveCentralSession(value)if type(value)~=\"table\"or not accountName(value.name)or type(value.role)~=\"string\"then return false,\"invalid central session\"end local session={sessionVersion=3,name=value.name,role=value.role,token=value.token,issued=value.issued,expires=value.expires,accountRevision=value.accountRevision,authority=value.authority}if type(session.token)~=\"string\"or#session.token<16 then return false,\"invalid central session token\"end store.write(CENTRAL_SESSION,session)M.current=nil return true end local function safeAudit(action,detail)pcall(audit.log,\"auth\",action,detail or{})end local function stamp(account)account.updated=now()account.origin=tostring(os.getComputerID())account.revision=math.max(0,math.floor(tonumber(account.revision)or 0))+1 return account end local function makeAccount(role,plainPassword,context)local record,err=password.record(plainPassword,password.newSalt(context),configuredWorkFactor)assert(record,err)record.role=role return stamp(record)end sessionPathDelete=function()if fs.exists(SESSION)then fs.delete(SESSION)end store.invalidate(SESSION)end local function saveSession()if M.current==nil then sessionPathDelete();return end local durable={sessionVersion=2,name=M.current.name,nonce=M.current.nonce,issued=M.current.issued,expires=M.current.expires,accountRevision=M.current.accountRevision,}store.write(SESSION,durable)end local function makeSession(name,account)local issued=now()M.current={name=name,role=account.role,nonce=password.newSalt(\"session:\"..name),issued=issued,expires=issued+M.SESSION_TTL_MS,accountRevision=tonumber(account.revision)or 0,}saveSession()return M.current end local function liveAccount(name)local all=users()return all[name],all end local function normaliseSession(saved,account)if type(saved)~=\"table\"or not account or account.disabled then return nil end if saved.sessionVersion==2 then local issued,expires,revision=tonumber(saved.issued),tonumber(saved.expires),tonumber(saved.accountRevision)if type(saved.nonce)~=\"string\"or#saved.nonce<16 or not issued or not expires or not revision then return nil end if expires<=now()or revision~=(tonumber(account.revision)or 0)then return nil end return{name=saved.name,role=account.role,nonce=saved.nonce,issued=issued,expires=expires,accountRevision=revision}end if saved.sessionVersion==nil and type(saved.role)==\"string\"then return\"legacy\"end return nil end function M.refreshSession()local central=authority()if central then store.invalidate(CENTRAL_SESSION)local saved=store.read(CENTRAL_SESSION,nil)local entry=type(saved)==\"table\"and centralDirectory().users[saved.name]or nil if type(saved)~=\"table\"or saved.sessionVersion~=3 or saved.authority~=central.id or type(saved.token)~=\"string\"or(tonumber(saved.expires)or 0)<=now()or type(entry)~=\"table\"or entry.disabled==true or saved.accountRevision~=entry.revision then M.current=nil if fs.exists(CENTRAL_SESSION)then fs.delete(CENTRAL_SESSION)end return nil end M.current={name=saved.name,role=entry.role,nonce=saved.token,issued=saved.issued,expires=saved.expires,accountRevision=saved.accountRevision,authority=central.id,central=true}return M.current end store.invalidate(SESSION)local saved=store.read(SESSION,nil)if type(saved)~=\"table\"or not accountName(saved.name)then M.current=nil;return nil end local account=liveAccount(saved.name)local session=normaliseSession(saved,account)if session==\"legacy\"then return makeSession(saved.name,account)end if not session then M.current=nil sessionPathDelete()return nil end M.current=session return M.current end local function throttleState()store.invalidate(THROTTLE)local data=store.read(THROTTLE,{})return type(data)==\"table\"and data or{}end local function saveThrottle(data)local entries={}for name,entry in pairs(data)do if accountName(name)and type(entry)==\"table\"and type(entry.last)==\"number\"then entries[#entries+1]={name=name,last=entry.last}end end table.sort(entries,function(a,b)return a.last>b.last end)local kept={}for index,entry in ipairs(entries)do if index<=M.LOGIN_THROTTLE.maxEntries then kept[entry.name]=data[entry.name]end end store.write(THROTTLE,kept)end local function locked(name)if not accountName(name)then return false end local entry=throttleState()[name]return entry and(tonumber(entry.lockedUntil)or 0)>now()or false end local function noteFailure(name,reason)if not accountName(name)then return end local data,entry,time=throttleState(),nil,now()entry=data[name]or{failures=0,first=time}if time-(tonumber(entry.first)or 0)>M.LOGIN_THROTTLE.windowMs then entry.failures,entry.first=0,time end entry.failures=math.max(0,math.floor(tonumber(entry.failures)or 0))+1 entry.last=time if entry.failures>=M.LOGIN_THROTTLE.failures then entry.lockedUntil=time+M.LOGIN_THROTTLE.lockMs end data[name]=entry saveThrottle(data)safeAudit(\"login.failure\",{account=name,reason=reason or\"invalid\",throttled=(entry.lockedUntil or 0)>time})end local function clearFailures(name)local data=throttleState()if data[name]~=nil then data[name]=nil;saveThrottle(data)end end function M.throttleStatus(name)local entry=accountName(name)and throttleState()[name]or nil if not entry then return{failures=0,lockedUntil=0}end return{failures=tonumber(entry.failures)or 0,lockedUntil=tonumber(entry.lockedUntil)or 0}end function M.setPasswordWorkFactor(value)local work,err=password.normaliseWorkFactor(value)assert(work,err)configuredWorkFactor=work return work end function M.passwordWorkFactor()return configuredWorkFactor end function M.bootstrap(initialPassword)if authority()then return false end local all=users()if next(all)then return false end local plainPassword=initialPassword if plainPassword==nil then term.write(\"Create CeetOS admin password: \");plainPassword=read(\"*\")end local account=makeAccount(\"admin\",plainPassword,\"admin\")all.admin=account assert(save(all),\"could not save administrator account\")makeSession(\"admin\",account)safeAudit(\"bootstrap\",{account=\"admin\"})return true end function M.login(name,plainPassword)if authority()then local client=require((\"ceetos.lib.auth_client\"))return client.login(name,plainPassword)end if not accountName(name)or type(plainPassword)~=\"string\"then noteFailure(name,\"invalid\")return false,\"invalid credentials\"end if locked(name)then safeAudit(\"login.failure\",{account=name,reason=\"throttled\",throttled=true})return false,\"too many failed attempts; try again later\"end local account,all=liveAccount(name)if not account or account.disabled then noteFailure(name,\"invalid\")return false,\"invalid credentials\"end local valid,state=password.verify(account,plainPassword)if not valid then noteFailure(name,\"invalid\")return false,\"invalid credentials\"end if state==\"legacy\"then local upgraded=makeAccount(account.role,plainPassword,\"upgrade:\"..name)upgraded.updated=account.updated or upgraded.updated upgraded.origin=account.origin or upgraded.origin upgraded.revision=math.max(tonumber(account.revision)or 0,upgraded.revision)stamp(upgraded)all[name]=upgraded assert(save(all),\"could not upgrade password record\")account=upgraded safeAudit(\"password.upgraded\",{account=name})end clearFailures(name)makeSession(name,account)safeAudit(\"login.success\",{account=name})return true end function M.logout()M.current=nil sessionPathDelete()if fs.exists(CENTRAL_SESSION)then fs.delete(CENTRAL_SESSION)end end function M.add(name,role,plainPassword)if authority()then assert(rank[role]and accountName(name),\"invalid user or role\")local record,err=makeAccount(role,plainPassword,\"central:\"..name)assert(record,err)return require((\"ceetos.lib.auth_client\")).mutate(\"add\",{name=name,role=role,record=record})end M.require(\"operator\")assert(rank[role],\"invalid role\")if role==\"admin\"then M.require(\"admin\")end assert(accountName(name),\"invalid user name\")local all=users()assert(not all[name],\"user exists\")all[name]=makeAccount(role,plainPassword,name)assert(save(all),\"could not save user\")safeAudit(\"user.add\",{account=name,role=role})end local function adminCount(all)local count=0 for _,account in pairs(all)do if account.role==\"admin\"and not account.disabled then count=count+1 end end return count end function M.setRole(name,role)if authority()then return require((\"ceetos.lib.auth_client\")).mutate(\"role\",{name=name,role=role})end M.require(\"operator\")assert(accountName(name)and rank[role],\"invalid user or role\")local all,account=users(),users()[name]assert(account,\"unknown user\")if role==\"admin\"or account.role==\"admin\"then M.require(\"admin\")end assert(not(M.current and M.current.name==name),\"cannot change the active account role\")assert(not(account.role==\"admin\"and role~=\"admin\"and adminCount(all)<=1),\"cannot remove the last administrator\")account.role=role stamp(account)all[name]=account assert(save(all),\"could not save account role\")safeAudit(\"user.role\",{account=name,role=role})end function M.setDisabled(name,disabled)if authority()then return require((\"ceetos.lib.auth_client\")).mutate(\"disable\",{name=name,disabled=disabled==true})end M.require(\"admin\")assert(accountName(name),\"invalid user name\")local all,account=users(),users()[name]assert(account,\"unknown user\")assert(not(M.current and M.current.name==name),\"cannot disable the active account\")if disabled then assert(not(account.role==\"admin\"and adminCount(all)<=1),\"cannot disable the last administrator\")end account.disabled=disabled==true stamp(account)all[name]=account assert(save(all),\"could not save account state\")safeAudit(\"user.disabled\",{account=name,disabled=account.disabled})end function M.remove(name)if authority()then return require((\"ceetos.lib.auth_client\")).mutate(\"remove\",{name=name})end M.require(\"operator\")assert(accountName(name),\"invalid user name\")local all,account=users(),users()[name]assert(account,\"unknown user\")if account.role==\"admin\"then M.require(\"admin\")end assert(not(M.current and M.current.name==name),\"cannot delete the active account\")assert(not(account.role==\"admin\"and adminCount(all)<=1),\"cannot delete the last administrator\")all[name]=nil local removed=tombstones()removed[name]=now()assert(saveTombstones(removed),\"could not save account tombstone\")assert(save(all),\"could not remove account\")safeAudit(\"user.remove\",{account=name})end local function recoveryActive()store.invalidate(RECOVERY)local recovery=store.read(RECOVERY,{})return type(recovery)==\"table\"and(tonumber(recovery.until_ts)or 0)>now()end local function setPassword(name,plainPassword)assert(accountName(name),\"invalid user name\")local all,account=users(),users()[name]assert(account,\"unknown user\")local replacement=makeAccount(account.role,plainPassword,\"reset:\"..name)replacement.updated=account.updated or replacement.updated replacement.origin=account.origin or replacement.origin replacement.revision=math.max(tonumber(account.revision)or 0,replacement.revision)replacement.disabled=account.disabled==true stamp(replacement)all[name]=replacement assert(save(all),\"could not save password\")if M.current and M.current.name==name then M.current=nil;sessionPathDelete()end safeAudit(\"password.reset\",{account=name})return true end function M.resetPassword(name,plainPassword)if authority()then local account=centralDirectory().users[name];assert(account,\"unknown user\")local record,err=makeAccount(account.role,plainPassword,\"central-reset:\"..name);assert(record,err)return require((\"ceetos.lib.auth_client\")).mutate(\"reset\",{name=name,record=record})end if not M.allowed(\"admin\")and not recoveryActive()then error(\"permission denied (requires admin or active recovery window)\",2)end return setPassword(name,plainPassword)end function M.adminResetPassword(name,plainPassword)if authority()then local account=centralDirectory().users[name];assert(account,\"unknown user\")local record,err=makeAccount(account.role,plainPassword,\"central-reset:\"..name);assert(record,err)return require((\"ceetos.lib.auth_client\")).mutate(\"reset\",{name=name,record=record})end M.require(\"operator\")local account=users()[name]assert(account,\"unknown user\")if account.role==\"admin\"then M.require(\"admin\")end return setPassword(name,plainPassword)end function M.allowed(role)if not rank[role]then return false end local current=M.refreshSession()return current~=nil and rank[current.role]>=rank[role]end function M.require(role)if not M.allowed(role)then error(\"permission denied (requires \"..tostring(role)..\")\",2)end end function M.list()local out={}local source=authority()and centralDirectory().users or users()for name,account in pairs(source)do out[#out+1]={name=name,role=account.role,disabled=account.disabled==true,revision=account.revision}end table.sort(out,function(a,b)return a.name<b.name end)return out end function M.snapshot()if authority()then return{users={},tombstones={},source=tostring(os.getComputerID()),schema=3,central=true}end return M.authoritySnapshot()end function M.authoritySnapshot()local copy={users={},tombstones={},source=tostring(os.getComputerID()),schema=2}for name,account in pairs(users())do copy.users[name]={role=account.role,salt=account.salt,verifier=account.verifier,passwordVersion=account.passwordVersion,scheme=account.scheme,workFactor=account.workFactor,revision=tonumber(account.revision)or 0,disabled=account.disabled==true,updated=account.updated or 0,origin=account.origin or copy.source,}end for name,removed in pairs(tombstones())do copy.tombstones[name]=removed end return copy end local function validIncomingPassword(account)if password.isModern(account)then local work=password.normaliseWorkFactor(account.workFactor)return work~=nil and type(account.verifier)==\"string\"and#account.verifier==64 and account.verifier:match(\"^[0-9a-f]+$\")~=nil end return type(account.salt)==\"string\"and#account.salt>0 and#account.salt<=256 and type(account.verifier)==\"string\"and account.verifier:match(\"^[0-9a-fA-F]+$\")~=nil and#account.verifier==8 end function M.merge(snapshot,authoritySeed)if authority()and authoritySeed~=true then return false,\"distributed account sync is disabled by central authority\"end if type(snapshot)~=\"table\"or type(snapshot.users)~=\"table\"then return false,\"invalid account sync\"end local all,removed,changed=users(),tombstones(),false for name,deletedAt in pairs(snapshot.tombstones or{})do if accountName(name)and type(deletedAt)==\"number\"and deletedAt>(removed[name]or 0)then local localAccount=all[name]if not localAccount or(localAccount.updated or 0)<=deletedAt then all[name],removed[name],changed=nil,deletedAt,true end end end for name,account in pairs(snapshot.users)do if accountName(name)and type(account)==\"table\"and rank[account.role]and validIncomingPassword(account)then local updated=tonumber(account.updated)or 0 local localAccount,incomingOrigin=all[name],tostring(account.origin or snapshot.source or\"\")local localOrigin=localAccount and tostring(localAccount.origin or os.getComputerID())or\"\"local wins=not localAccount or updated>(localAccount.updated or 0)or(updated==(localAccount.updated or 0)and incomingOrigin~=\"\"and incomingOrigin<localOrigin)if(removed[name]==nil or updated>removed[name])and wins then all[name]={role=account.role,salt=account.salt,verifier=account.verifier,passwordVersion=account.passwordVersion,scheme=account.scheme,workFactor=account.workFactor,revision=math.max(0,math.floor(tonumber(account.revision)or 0)),disabled=account.disabled==true,updated=updated,origin=incomingOrigin,}changed=true end end end if changed then assert(save(all),\"could not save account sync\")assert(saveTombstones(removed),\"could not save account tombstones\")M.refreshSession()end return changed end function M.authorityAccount(name)if not accountName(name)then return nil end return users()[name]end function M.authorityDirectory()local out={}for name,account in pairs(users())do out[name]={role=account.role,disabled=account.disabled==true,revision=tonumber(account.revision)or 0}end return out end function M.authorityMutate(action,fields)fields=type(fields)==\"table\"and fields or{}local name=fields.name assert(accountName(name),\"invalid user name\")local all,account=users(),users()[name]if action==\"add\"then assert(not account,\"user exists\")assert(rank[fields.role],\"invalid role\")local record=fields.record assert(type(record)==\"table\"and password.isModern(record),\"central account mutation requires a verifier record\")record.role,record.disabled=fields.role,false;all[name]=stamp(record);assert(save(all),\"could not save user\")elseif action==\"role\"then assert(account and rank[fields.role],\"unknown user or invalid role\")if account.role==\"admin\"and fields.role~=\"admin\"then local admins=0;for _,candidate in pairs(all)do if candidate.role==\"admin\"and not candidate.disabled then admins=admins+1 end end assert(admins>1,\"cannot demote the last active admin\")end account.role=fields.role;stamp(account);all[name]=account;assert(save(all),\"could not save role\")elseif action==\"disable\"then if account and account.role==\"admin\"and fields.disabled==true then local admins=0;for _,candidate in pairs(all)do if candidate.role==\"admin\"and not candidate.disabled then admins=admins+1 end end assert(admins>1,\"cannot disable the last active admin\")end assert(account,\"unknown user\");account.disabled=fields.disabled==true;stamp(account);all[name]=account;assert(save(all),\"could not save user state\")elseif action==\"remove\"then assert(account,\"unknown user\")if account.role==\"admin\"and not account.disabled then local admins=0;for _,candidate in pairs(all)do if candidate.role==\"admin\"and not candidate.disabled then admins=admins+1 end end assert(admins>1,\"cannot remove the last active admin\")end all[name]=nil;local removed=tombstones();removed[name]=now();assert(saveTombstones(removed),\"could not save tombstone\");assert(save(all),\"could not remove user\")elseif action==\"reset\"then assert(account,\"unknown user\")local replacement=fields.record assert(type(replacement)==\"table\"and password.isModern(replacement),\"central password reset requires a verifier record\")replacement.role,replacement.disabled=account.role,account.disabled==true;all[name]=stamp(replacement);assert(save(all),\"could not save password\")else error(\"unsupported account mutation\")end safeAudit(\"authority.\"..action,{account=name})return M.authorityDirectory()end M.refreshSession()return M",
  ["ceetos/lib/password.lua"] = "local M={}M.SCHEME=\"pbkdf2-hmac-sha256\"M.PASSWORD_VERSION=2 M.DEFAULT_WORK_FACTOR=256 M.MIN_WORK_FACTOR=64 M.MAX_WORK_FACTOR=2048 M.MIN_LENGTH=8 M.MAX_LENGTH=128 local MOD=4294967296 local band,bor,bxor,bnot=bit32.band,bit32.bor,bit32.bxor,bit32.bnot local rshift,lshift=bit32.rshift,bit32.lshift local unpack=table.unpack or unpack local K={0x428a2f98,0x71374491,0xb5c0fbcf,0xe9b5dba5,0x3956c25b,0x59f111f1,0x923f82a4,0xab1c5ed5,0xd807aa98,0x12835b01,0x243185be,0x550c7dc3,0x72be5d74,0x80deb1fe,0x9bdc06a7,0xc19bf174,0xe49b69c1,0xefbe4786,0x0fc19dc6,0x240ca1cc,0x2de92c6f,0x4a7484aa,0x5cb0a9dc,0x76f988da,0x983e5152,0xa831c66d,0xb00327c8,0xbf597fc7,0xc6e00bf3,0xd5a79147,0x06ca6351,0x14292967,0x27b70a85,0x2e1b2138,0x4d2c6dfc,0x53380d13,0x650a7354,0x766a0abb,0x81c2c92e,0x92722c85,0xa2bfe8a1,0xa81a664b,0xc24b8b70,0xc76c51a3,0xd192e819,0xd6990624,0xf40e3585,0x106aa070,0x19a4c116,0x1e376c08,0x2748774c,0x34b0bcb5,0x391c0cb3,0x4ed8aa4a,0x5b9cca4f,0x682e6ff3,0x748f82ee,0x78a5636f,0x84c87814,0x8cc70208,0x90befffa,0xa4506ceb,0xbef9a3f7,0xc67178f2,}local initial={0x6a09e667,0xbb67ae85,0x3c6ef372,0xa54ff53a,0x510e527f,0x9b05688c,0x1f83d9ab,0x5be0cd19,}local function add(...)local value=0 for i=1,select(\"#\",...)do value=(value+(select(i,...)or 0))%MOD end return value end local function rrotate(value,amount)if bit32.rrotate then return bit32.rrotate(value,amount)end return bor(rshift(value,amount),lshift(value,32-amount))end local function word(bytes,index)return bytes:byte(index)*16777216+bytes:byte(index+1)*65536+bytes:byte(index+2)*256+bytes:byte(index+3)end local function packWord(value)return string.char(band(rshift(value,24),0xff),band(rshift(value,16),0xff),band(rshift(value,8),0xff),band(value,0xff))end local function sha256Raw(value)local bitLength=#value*8 value=value..string.char(0x80)value=value..string.rep(\"\\0\",(56-(#value%64))%64)value=value..packWord(math.floor(bitLength/MOD))..packWord(bitLength%MOD)local h={unpack(initial)}for offset=1,#value,64 do if#value>16384 and offset>1 and((offset-1)/64)%128==0 and type(sleep)==\"function\"then sleep(0)end local w={}for i=1,16 do w[i]=word(value,offset+(i-1)*4)end for i=17,64 do local x,y=w[i-15],w[i-2]local s0=bxor(rrotate(x,7),rrotate(x,18),rshift(x,3))local s1=bxor(rrotate(y,17),rrotate(y,19),rshift(y,10))w[i]=add(w[i-16],s0,w[i-7],s1)end local a,b,c,d,e,f,g,hh=unpack(h)for i=1,64 do local s1=bxor(rrotate(e,6),rrotate(e,11),rrotate(e,25))local choice=bxor(band(e,f),band(bnot(e),g))local t1=add(hh,s1,choice,K[i],w[i])local s0=bxor(rrotate(a,2),rrotate(a,13),rrotate(a,22))local majority=bxor(band(a,b),band(a,c),band(b,c))local t2=add(s0,majority)hh,g,f,e,d,c,b,a=g,f,e,add(d,t1),c,b,a,add(t1,t2)end h[1],h[2],h[3],h[4]=add(h[1],a),add(h[2],b),add(h[3],c),add(h[4],d)h[5],h[6],h[7],h[8]=add(h[5],e),add(h[6],f),add(h[7],g),add(h[8],hh)end local result={}for i=1,8 do result[i]=packWord(h[i])end return table.concat(result)end local function hmac(key,message)if#key>64 then key=sha256Raw(key)end key=key..string.rep(\"\\0\",64-#key)local inner,outer={},{}for i=1,64 do local byte=key:byte(i)inner[i],outer[i]=string.char(bxor(byte,0x36)),string.char(bxor(byte,0x5c))end return sha256Raw(table.concat(outer)..sha256Raw(table.concat(inner)..message))end local function xorBytes(left,right)local out={}for i=1,#left do out[i]=string.char(bxor(left:byte(i),right:byte(i)))end return table.concat(out)end local function cooperate(round)if round%32~=0 or not(os and os.queueEvent and os.pullEvent)then return end os.queueEvent(\"ceetos_password_yield\")os.pullEvent(\"ceetos_password_yield\")end local function toHex(value)return(value:gsub(\".\",function(byte)return string.format(\"%02x\",byte:byte())end))end local function constantEqual(left,right)if type(left)~=\"string\"or type(right)~=\"string\"then return false end local differing=bxor(#left,#right)local length=math.max(#left,#right)for i=1,length do differing=bor(differing,bxor(left:byte(i)or 0,right:byte(i)or 0))end return differing==0 end function M.hmacSha256(key,message)if type(key)~=\"string\"or type(message)~=\"string\"then return nil,\"HMAC key and message must be strings\"end return toHex(hmac(key,message))end function M.sha256(value)if type(value)~=\"string\"then return nil,\"SHA-256 input must be a string\"end return toHex(sha256Raw(value))end function M.constantTimeEqual(left,right)return constantEqual(left,right)end function M.legacyDigest(value)local h=2166136261 for i=1,#value do h=bxor(h,value:byte(i))h=(h*16777619)%MOD end return string.format(\"%08x\",h)end function M.normaliseWorkFactor(value)value=tonumber(value)if not value or value%1~=0 then return nil,\"invalid password work factor\"end if value<M.MIN_WORK_FACTOR or value>M.MAX_WORK_FACTOR then return nil,\"password work factor must be \"..M.MIN_WORK_FACTOR..\"-\"..M.MAX_WORK_FACTOR end return value end function M.policy(password)if type(password)~=\"string\"then return false,\"password is required\"end if#password<M.MIN_LENGTH or#password>M.MAX_LENGTH then return false,\"password must contain \"..M.MIN_LENGTH..\"-\"..M.MAX_LENGTH..\" characters\"end if password:find(\"[%z\\1-\\31\\127]\")then return false,\"password contains control characters\"end return true end function M.derive(password,salt,workFactor)local work,err=M.normaliseWorkFactor(workFactor)if not work then return nil,err end if type(password)~=\"string\"or type(salt)~=\"string\"or#salt<16 or#salt>256 then return nil,\"invalid password record\"end local block=string.char(0,0,0,1)local value=hmac(password,salt..block)local result=value for _=2,work do value=hmac(password,value)result=xorBytes(result,value)cooperate(_)end return toHex(result)end local saltCounter=0 function M.newSalt(context)saltCounter=saltCounter+1 local now=os.epoch and os.epoch(\"utc\")or 0 local computer=os.getComputerID and os.getComputerID()or 0 local label=os.getComputerLabel and os.getComputerLabel()or\"\"local random=math.random and math.random(0,2147483647)or 0 return toHex(sha256Raw(table.concat({tostring(now),tostring(computer),tostring(label),tostring(context or\"\"),tostring(saltCounter),tostring(random)},\":\"))):sub(1,32)end function M.record(password,salt,workFactor)local valid,err=M.policy(password)if not valid then return nil,err end local work,workErr=M.normaliseWorkFactor(workFactor or M.DEFAULT_WORK_FACTOR)if not work then return nil,workErr end salt=salt or M.newSalt()local verifier,deriveErr=M.derive(password,salt,work)if not verifier then return nil,deriveErr end return{passwordVersion=M.PASSWORD_VERSION,scheme=M.SCHEME,salt=salt,verifier=verifier,workFactor=work,}end function M.isModern(record)return type(record)==\"table\"and record.passwordVersion==M.PASSWORD_VERSION and record.scheme==M.SCHEME end function M.verify(record,password)if type(record)~=\"table\"or type(password)~=\"string\"or type(record.salt)~=\"string\"or type(record.verifier)~=\"string\"then return false,\"invalid password record\"end if M.isModern(record)then local verifier,err=M.derive(password,record.salt,record.workFactor)if not verifier then return false,err end return constantEqual(record.verifier,verifier),nil end return constantEqual(record.verifier,M.legacyDigest(record.salt..password)),\"legacy\"end return M",
  ["ceetos/lib/release_keys.lua"] = "return{algorithm=\"lamport-sha256-v1\",roots={[\"auth-server-release-0.16.0\"]={public=\"9dV0L2UANwIV77Ag6hJ86CJczS7juk/mVrcJB7RXmILoJy+ni6NNG7JR7HuNCD71E29lnX8fdv3bYwVHk5+t6K/yrkmZ6yy+aPmiRkLa+j7NdZnr4q+cCj74iwnvPGNUwjr59gAo5EB1ZkBWhLUbel6sis9xyTPARiyfWLMxEsEJj0PTK0wOHg7UDRZWCO4G6z6IGcKQtd8lC27rt7AzupjSFLb84CfchgpN0O9wDpxp5jZBeZg0myUPCMD9+a5E6dGz3XdlHsZii4L4OAasVEtr2uw8XIC8TcsrOLClG0gElnr8B7UK0kP7/XiWWjFsRMkPVqcVCLddNLqhA6R78IC1a4z3sAOs42ki6pIOMwYzONdBsg8s8K5klSOQfZ7VlFCmb4qWWBinksJWJtQQbxEcdB6ID8WXTWpNHLEFZOTfHRqbZbxNgLmSH1Ku+pPyTlZo2NRm7Jmdp2G+fZg7SZ11jLzv4NA/EOAFX0lo8XdiD6WCkbnY7eHwqILSgyysZ0FvqPIG/qKCn9G/+P8EfHyUWD1SjgF8BFSgoXfacuHVissA8LOK3h1g72HSBhzPN/+o3K+rTlNt9Row0+XBx8h5Iz7/v+qzxZmYJpm53wYK/f1zr9lQMKLznJ7KWM9DGGtSehb+yGXfWa2VJSiZeZQdQsRVz1r2Hs7747sUlhFHT8L3DmRH7fcgxacb9fLurIdL+w+OU7AzWqeRPNUA6ocvzywffhI7wyLt3ZJxgm8YILuJktt9owihplnui2AfMUEG4MdH135iu7mrKQ3hkspNPG6AGAYack2FCx2bWh3Shpi6oQfb6mKid4IdK3S72LSMJIpRvU5ma3KJtMfDUjgWKe98Fh+lHPqrGmE7gEtb9XY/GpvuRuWn0S4JZXrv8ujHs4Jt0/HmOrvsDK9ec7OEmGysz3itc0dLGUSGcvbBdOgXgRaqetpzsiPz8uPY7NLcrSNjPg6k6L3cC/qw69gxvIO3+V8eycj4mEVrNGQD211uy+G6FoWyBqRWgcYZkXXaiJeLVYMpPxk8nvrvrvrCaXZIj1L3hXh5hWW840AHbjUuZs6nDWepCi3UJAM1jxkxEvzlHZuH4PM0i4YrmpMyg7okDHBOYAClv3DMmPUZ0mg8G3tNrq7Vv2+MLr35Hgb2++t/trtP3ySYcQmCRAc/Y3tdBKnUXo6nOzmcIkqzvGmPgAUFKKujGElj+oMN8x/qsPyBGSsWl2Ww36mIk/AgYoZRNoZd2q5R9wueGI4GxFBR9sDtUo730cNTlDiOarGOPUk4gYRgnkBGmwL8QJcnwk3+1AEPtvvx6APvzd3Pz1p9h5r76JVhsgFnRQQ/6YSp15EnOt7Bc8w7ag+qNWt2OH5gCwjx1mhmTVMAGTm4jfyJnHMsrHooM87P7dG4Hd/Bks60RasRwfdOQR+PGF8/Eh4U8M5U/bpA9dv0ci6xnvMwcezZbQ/9M/bhayvSJm0SdmcsdGTPfSC0xjiRf0wNUSTu9iUG/VD8i36BsZPE86kwY4qm8sV+9Zs8VPO+nLoyr/+VFLv5CFD/k9os+8ujOIFZOHeCekYJv8LKKqtpm8hJX6nt2Iqg8fNl32P4l5ksLGlblAAYuITigMn51D5+s84fMKfd4y0mPy2mlFtnqgt5Abcoc7MuMnfEKrf3JbA+1zF+/tqkjjAKrqexCwtyr07EccmPKdRnVupHyrb6ci9M4dp4A5XlXLeY6KH63I/v4zgu45sIhRmEojQk34uHG0OvAlr2G1oiBt2CWjIWyXvJIa1JLsbZg5LDRUjnyJKvI1SBNrw1Jx/AiDB+CoU7mxaNWFrc5iTSBdJORUDTQuZcWN6Ag7PElJU+94B6O+4rp2dK/EJVyKW1xW6ZyDkoJHokKpQEGhwwq3jrBKuqhb18HifQVkuSaPRyp8FlfTvMJVmLoph1Rt/OtjpHAS0TpU9kiuhu+4FAAiaoguypNAI7BGoYuELC1YstT9ha9i9XiGqZ+aWkvZRfZPIPEN6u4E5xBfoeKs8aFU34TzXrpqAtd+nwHarh5YlPE8lHMeDAJUxS/3+UqGwj33kPib6y4ncMSDNB0UdkVB1z0pbdL32ARRRhNrDgtCYVK19Nm1ULCaDf9jckgR87YWEuamDjUQnudwVtBtyY7PKXV6k/NlyPIEOWgGRty/52OMs2rq/bs7HCqLFvnG5dwVpGmF4k1KuacBZyw8e7n0LNbxrlREu15KBALa0+xhYw1D/x/aCyFMbIPR0Ybt46HllCpFGndDYwdxamleYfKJvgKDW7njWUC3GXC9QE8XdHmORe5ctC3JRF5+EeOtpn/2ZWFZdjwvGb1DL0brVnVBGuDIHg43AcaekBcuEXm1l+LRHQN+q9iPj5waFaGUtOSfZ31ANFcoD5t5NUg9NlfAh6n6RO3QjLLj5IVDdeRSEytXoFMfXXOE9hCYbb/NY3/CPek3Dq5MM2/vzBbRwBFLtmSIUlmjpa9dIMlplpQhHt0AV7pgBfEqyHZXc2yLMnsZQPJiyipQiyEGKhcnHl9jfwK63HGEicDhKVxm4fB8CCazwJpur1obq7CgthLE815JohQyL+Xx44G4bYyIQcthe9kgg81zAPXY9G2bVMh4hdSjOwXBmJXyvDJEnDYwxC9mGlL83xW+JTEO/fq7onjhGYHVXiP/qgmXmDpm/gTopgIF/W+asuNO9uPDCKureHMWCJXqF5E0r9v4CSmaA7XEEy5+hTw9x39XZI2JBaZwB6VFi4syOZW2lWU1DX6qRMza602KWyI7ckP2NYhj9PDVWkTs3L+pnF1L/dPyrFkRWOeyPKgEeXuAbTCN1s6QfgbYe8iIQqZE+eZ2ZOz94EGS/kUB3zB7NNslc6OysiJGNhXIq/3fp7vvH3VMiNM9oLgPAIY47kqfzepxiwzt7eOPYdXjzTT4Tek7NY9sGvmWyZJAu9dbZfN6usbASEbZQqMi4E8JO4dUnGJjWeQXDCNocx4wYWc9dxhow9CYKhqJC2Swz96FeqXlx6lpz/8F5m9XeUrlSAKzwMepXz52zHujaoEXV33d5vVCJFlfBMNDU17RR+RtcHt4JVNRhsuyMq3VnOkujA4WnL0d8V7cCJ6YjzOSazNZC6rbfk/E4/FgpX/lboE2VhYCh4Acyd2AlpjJSZ1m0rrpjb8T6uUdOyyKWdMmZzcST6gBBa5IAOqEOXpexslHnsOMk8zA++c8liF0f+7azKXPeDYpqRHKCc1mHyrMXbI0Egi9A+OSdDZJ7KZyUznA1u1EwRbeXphpOJ30C0+vnwqt+NAkZ02JQWWFj+6APn72k6068dtfyK7J5ZR5oK+s4/X8T7gVBjEobWW6dmYdp+Ixmmu6A2wQgvVhGFnA1x5np81280qNOLdpgamcX5CNeU3s2Su8rX7wqECguLu2nTp5CITdBSFwLHaA0nq4bi7fRDugfGbtm7ZFemy+dNsSySEGjg0xZS15kyX85iblmn2HOfHRshollR6N2r/LBDCGtv99XF/Zpa8gEvI9IsmRxC7oyJlep2wA2mm1z0pUptystxB8cJJT1nbVhzL9GVJNi7W1qK/BSoodHMYcW9i0Z4gGOe40j3oQRQ/ypb28WmzQaRvPTwlJT+uVBdarLF8IvdTbnpJ+qlcpREOo+CYHSE6SORveFlHCmjv6C+N/ppainKQIhFHWZSUC2w8uUn8QYRp3OuZy8hY99uUG94InGJUFSqWxzKi8PNI51TTMtloSTrZT1Obabc/FdWQSLWEl+PYQ7GE/4y7rmoauZB5VaklYtdBn2ibvw/BDcg54xiEtgr79TIsene5Fh/seYY/FMQBMNEjIPlbPkaUmj+L0Ai6jfHKkITHDEVM2ZEwR61ZQvjr3uNYxvUJg30WvuRu6UbSuOXurnwtlkQedzInsqPP9vT1mx+mK5T0OTNHwrq/i0O/RKFS46skzwDX7e4uZUicQLK/8aCDChknetQquIwjffnzPjKBWJNaF8foZypGdqQwsgONPHtFt1Z/vpA4BkuLZdiuVaoyiK5ixihfIBjrInrz/OZXlI0WQCx0mLY/z2lkzonOpgqNX84GTLGrAyZbSW7KNG97bNulsRMTG+xZwAbDlMFIVuT6ofabOF/cGXuInLcdSo45KJxPnvs0xHtg8EV1RW3Qsw1Ptu6qPPO9WIoVEuowwEIwC/kbcseMX/Bpit3IsuNVFnJdU6tzKSQZe2EH8nnOkCVOtNN83RUkCS0KV3FvI9T8MAspgq13aPrNGSa5j/fd99NSbqdW+4FhkvzFDJGKLCB0xsw2dfEKNAlZ3WFdUGaCHgVzVvvQPUiUB+JRi78HLmxKjOhQUUTbj2DWlPk1h3UbbG10TlPG6jiO+/poYTw/3mEfCq3AxE9tSE/4UN5ulo7h0J4Suz+ax8tQm/yRi8oEIweMGKr/JIVkNocKWFvGSbEKY8Os9X7kG/4P7q27o9w51tGo4gOOGOg1Pqwswdg2ztvRu6fJwHgY2pdO0opo3dy/pVyA5bJUnFbFQfwOs58z/Vq/SvVM8B56ce2BEOlnhNIIo5zb7PtueGCog9njbKnrHo8VLmOKYDdPOTKau6k1JPKNK4krs7DCa9v22kRKpdF9jnYaYifv1d/tC2gAW+IMCcwTUcQAJ1cjAGyYQN7324jZefGMUYLevdI9nI4O3Q5G7rmv097YmopjzgYLsBx3LivgHAbX8LNYcTK2mYTGmdvt+NBjXYna3U9WGvidAgZgsct6Es2FgbxzDB+TSuFrppCSMsOOtLsDkVoZs0IjQvRL3OUHANx5loySnajua2WHq+RMFLdlGlzeuZ9z9KoG4cfyEfIHrgd6whUTmJCe/00aZ+zUj8k64uEf3xAlihQqCPC904QG9NS4Xofi7L2iW8TCIt41+d2yfTj1z9LBEMrAGilsAySE0kZEDkWl3L+Yr6ZXaYJvxRHWSE5u/TIYIa/GUhxjuVOCxlk3mvUMkrKW17RCTdBaAaLEtEJ4sUxjMNILtXQAIifYVnYcCJwEKccAzlvG7PCjwZvZPX5KIfRDMWMZLYsphSIjbSgFgW3WiqP7QR/giwuin+zgWtsjPG2iYOSQ8hY2Hiql/ylqqaOw3xV3Ga/VDbqXKR0IzFcEozeWvVZvGEFcd/nMW65/Agqloyjzj5Qz2DxjKqJMcagatVEKxOsXKWLHvxglqxnL39i+VFR2t4MkYeK+P6cRXhzUjD8wC33+cabZB2eufVXOwkO8bjGFDk/Um49kwqyYG3Rzv4SOWIHxi46YJ2o9YeMHWJMj14JK/i/67NxiPHOufmmY6oVYtuP/NOUIZlZ+ArboU4A+uvrtOxCmnJ8BkkB1rdeH2d7hwv0HR4nlzoLGYz/IpITNbIN7wpMFoiNryh31dShORPXDvv1QwoGcw01NWXxRUWZ9NwdcwSTi93CoAYbe23bhN6f11WNv+lhPwQpZugoMb95V+yKo94UGhTKj3IsLYEIe5nUvzPpJ/X7ctULh2qnVIXohT7Qr9AvpdK86UZ8bMRDO5Ay0O7tRn+Qn0z4di1jx+h9hR4tf+YMiYDDOyhzEXVUGbFQlW//ZLlUeXLn3LS0wVmc+M31bPjsJMKAcvC4m8UvDTkKNOzd9ig75S4FvprZPjiu0qmMJGbsb6L6wzVudCRlqoeC5F9lkJiWhrw+12+N9CMXh9pYxLWHK73ZLUFTbYkW9vZ+XNJn8Uo1X9ieFub3eALCNnv393B1Pq9AumTbJWtayIBeDQmSc1WLtHM2rYw3Rrp4QNoVH27OaJmyPRTweUyNHWtFdO0EJAY+VLQ8sqaN6j6eBo09O0bBE0rd2XRIjIYcpeQ5Plmsg3YKhAdciy+/08VlZoCHCjwqmYR1M0Kjd9I13MTEXt5aTEZmbDeX3HKkIziuR6c0gJpFyqx9o7v4vw6O18aGJX2lwVNRlcr/9rH/ah3cr9LZem6J+5hMOy/DeiVvWN3BSmcUvkmiurNJ8LChiKtS8SKMuN0JDWzoUZcvAOR3WaP6tCAJlg37tzgu+Vuee1ixWTPY5qRC2plDDGmGcEE3RetTHLEZnZo42MfpJniRHhMAc4+srz7IjHMOwUeUHUteEgO2NVz6Jcx6O+FmEj+MrbkjIdT8ChaBDPi6562c7JQQruFVkNjxSc4eyNd4lIevQlH/g3PBlGIp9ucbCoaCBfD3aqNFgmR6Rd1kl0T9ovhQ22jRHa8wuTkDCUryeHI6/cmxXWVuGK1yvRkdo7VSUg3GHthDRuc/9TcimDUDn2j1s8OOTZNqBUbB/229vcUhaOGGd++iDL/hKR58OT1bvydXevtTjirP5izrHK/UFVxcYwwgn3l2KkjGbTRPflDcNVPUPw5aBRda1b73MkalfBLGwcbKDDX4/tNXC2EcWnxkcekgkzvhBnfZy+MhvpRl4CJwmp3J9Z0TdqNKCgHpnT7iYlVPejr5Mn+wLOB8zbPpP3m95IImjH1wGj39VLmpSsdCazULNWHyEWbefHYbKmz7wmqG8R55t2MX4XsH57VQ1IaS9JHYsOGvIVtgZBTxTdb/DY4fAdy84rme0PmnHhTzWR7l8Ntn/sv0HTbCFh0rgEkPSwrE+2EgR3kRWUkVyIFag+FP/8pUOWAQwxTdbizRSvmgLzqi5PrTMUBbpJbGPNvxk+xiVmCJpJshttqkANG5K0JUCpgGhQMTtMCsewsgSHJvud++FdDyEb3Fb4S4hiaegePKb1HxRnFLogYT+TA+G6VusJuFII+cD2xz+uhTjULtI8Ly7eeBtDfG1pU/boKpFA3O6ms32Wzss4r13lotHoC4AD+eMwrsCnQ3Id1pCuvpt/w3bMbCJXeLeWh6y88U5kxzNFeirRbwoIf0pr0eCLM2lKCzfpOPzX0KuwDCSFq0rw/Fh6uNOaCfmLjKEKVRUGF8IU00hyVyOXCYEvK3f1aA+XclMCrBfP0gMTBwujhdvPOrSQR/OLFcLRg890y2IcwGYzzqGoChhrFN/pMq53rGg1QhwNOIMhax6gxnSHrLPgZJq8+a40ODzld5GKRPEwt7XsBeQ90st0juNTzmFZKWTRqtDNznJIUQ7vPrkQJV06ZHm4rbQ9BTGEY4Fo77pv7+5sHkUUhJxZp2Zu79hD1aNtEHMhL5t2RscjP5jzWWXcDw2LfbWqrVZRsgJQJRzkIg6Qi29Go9fIZzseLvqL+n41R8nS0wurOgJAU0aMwIPBhgNI/XyR5tiCMCVAgH91ElRNjPninQn3Zbfc7nFoG/mCrqpeYZbw74egqub9c6scg4JjnrLui3hqVXa59pOifaeUgbU82TcFda4jSR2TUp5BXSJ+Kf8IGSm88K0LXUrbp6rNMhfFYsHJTu1ZlWuOrWjpcQMFTuKwSVmuN9z4P5i2CX8RbJ//EA0FNXEDp+/JcllQB2RuYFGeowdR2E4y+aaDJnHaiLQDPI7HkUIXlmmmv9oIOSQ3HW+juV7CbgvcEk5TjFD7TZtcE4OP0IOU7TL+8CYEmG45VCHdJR+w0Y8p1oJwuyIWFeAnfdpTCLJNalMNRnOH9FadHdK9kRsKk4mR0STqRkJQl3SNEZ9BIK1+vI7UNNbiI9isSOlDNGHYdQhIVJRx0gBBqYld+MQrHghe+0wHb/9sEjJUo7GSXtzfnKPdDMMublGAbSEVtAdF0hDp+2IPMuYD+U1bHKv+K9HeSfDIIXpMjZ4ueRuXptaOk0Sal9x9WIp6XEruiJ4IrKk04wy/KIl5QpgeDmroMDpguxMOOKSnglKD1uJ0zJ98X4q+bGMuqyuqDB/gP4felvYwLl85Z17iGtUBFrKbdY1begULDchSWFyKGESKbpgn/+jQ+Mem26l7/cbHFgJYiwMvvWfo4eKTCkozSDt4wpzYeil4Z2Svi8C29BAYXxPpQjphXfODa0oCSkedsajdlLQVRHVS8vZoN6/v410K8M6BMyBmG9bff4h8r9NBPnzobbsFPN/TdzOjfnqWsyB45GaruNel/dzngrMhYeM1CI5FSy0HMq1NrI1fzSNp2noEmtlVn+u2NRc6jP9SSnH5J4+yWEpA1j4+GznVatlYKHPI+qov2/SxXfFVXq8dHI0QwmfirexxiYGJ5iPlXztTGIvDmbZSH2/oDfGWUt+GiUkXySIq69i+oECOo2GKhhvJZ108jhH2zzjuMR2f4TbNVWbPsXCPLobe9uY6t1e231+Lfg9C8uEfWWrAa+JowD4DLH7vLaeGTUbBqu7mIBSvqKAAT2XgB2O2DEpwdZm7e5TtzZI+FTj3uC1rTCfI+nWKQh+DogDFMiA8oYK4cQciCbz6X0YELMncEuhfgMb31Xthm3x/4vkRW55xlSYfkzDCxOqAbQwCcxlSoip3c33b0+0Yt0s6N2x4jzDQaSzKp4nWcx3yH703nrh0jUpikmeEtTaqX2wJxR6cPffewPvFrfc1is2R+lGCWbxiD5CJBH9kJk4PYx4p7IANiKGgA5fM/UOM3/j7v7vsZzlxFZL6kMivtdqJpx8zf725vnUTywXcCWXFgHO3vkB62lrvDxdBLQtND3eQchaQ2fEDfoS38Xo0Rt1v40YT07Ll+VglMTpMTKaHV68L4XPyy6Fl5EcxV6T9VkkGY8S9EFDP3y8AUKVweklAtashYtZ+oo9/YG8WZmb6hr/KpFnThy0Jz5NumnJhxK/zLhOGrZkNIW42RTaZgfs53E4WLZ6j+HNSSnvogregQdy/jscNh9VUQi6JaVQXxXUuyI2rE10Z/h8elOPmbmllAGWKvWwkVGlkMgnGhXpUTKLJTGZQ/wMhFczhr3eRLCOGa8oW8kSiDYilbxEh1k3hZSo0vfG5wyXL0TiAWGJxAKc+tmazNNvrNVKcX4iSUS6DbX41rBMiv3RxwUxYrmp/p5GE1RRjnbe1/+9ac72GQNrxWINqhTa1E4U7hBDqvvP9fpRiHQXoLbm17as8aQhi6SA6Cr/qyC5Sgpy3gQ9vut4ML7Ir5YQ6KqFNSoqZUZvWsWpk97lesNMQH5oTpBZLZHy6+EDnaQHTmmvYuuX+SLn615Qn3FeDhLL0YeD6luka7gc2u/cwc+DcGIo/6ZL7hVMdJQ7b0aThX3QGt6X7SSsJCRJy+Iw9TP06fKWYDqhptwXz8awAD2eq5bMHcyezJxEE5dYjeXJYcMRgTabm4QanfdkUAzm1ZmmqUYHhuo0xJjTWeEs5fY3+ghCEesMmTEH+m4zou3VbWXDBLuezAmNJQ1G348zjztre0yutnWwyT/t8tOmno1EpiafzvLuwJyG++lMrysbPUe5XgiSNB5k5bQPLTsoXafR8/N3+EYD0BU9RRuIAFdpto4B0NPB1nn7GsI4c930clNzQTZAF9JAlCXSpK8lj+B8xyNNLl1Uo18wxxbF7vC24s9BnLs0hjqFRy+PwkrVJopgW2YvKOTqer30QptmPdBwXBtxNKSao3/aaVHRTOAZPI/APedceEHymJCQ2HnYR7y0m98iQUw5ELO4d6VqcZTQoXHwvkJ91l8E5b3Nz+04l6vsds3zWwhqKgxBGN/s1/bYGnHizb2B2R059BijXunlHDQNzYe7NL7NVr2LXZhspbvSqNwMzrGw/+1JzuS3GOBvpZ90FaE/fCGoJdGwhIbkAbzgKCyh6JGLpSNPaiQwUDdSER8huhsFxJB0WqS384gIARafIkVZuDGKD8Hr78Gsoyo3OgcZ+mialRAx8LUwZFwfGcJ1+2vXkNMagIsDon5n5TAa1QNcvqU97oiCwKh5K1OjZMswq6E9qL7QgKh/VDKkL6Gs46LfKXqHzkSfJqWJJLPv3DOXlEWyZpZikCZ42o2TJ69NGWCKDuLHPiSQ1GptD91Rbx0sQVVdLtkJjU1B+rsaD9Y91adf5wrE63PWZ5mRUgVhmWV6mgz/Z6HxPWU4yRa5cer9YqL3oxsdbJra4hjxBffkPHyXgWdHSV9sR+jeUlGpdpR72kwYaPELNVX4isliEZmm/oDgj6hglMDpYTY9T4DXtTlbyEVCLDyBq2ebtPHFTKse2w29iC8iPtaUQQY+j0HXA9vsQV7pSuOFSfPXuy+cz/freO9xIQz6no2WjYZQjSmIUVtfnG/dOkRdNYeJ21jZlXppGu9KB6v2ksrY52Txl1Ygi7uTVLUpq13B4tkvnzwL0yfnBpafiSPfOdvmMLwpOhTCOzDLlhjiDpZlRwWNADi6UUeDQgO32y4CXmlgUYYZ92vtxQHIJu6cmOGxFhP0Jr1cSgV6L9c4eTJs9JWAm4cVzdJdMSh+5+tDYQW7TOrytJhhwyQAD1MuZiwS2vqULjiksHEGWV+X4crr7FZb41OJwqp0BLZtgEnAvi6ZBaDMoDdLiTUSPIhnSWnl4jlPGBBmEEwzXQYbO7QyOXigQBh4SYAXx4NFDd88sJcjYdVJSL1gTMDAOW9cNsIiS7VrR9rQWaxGL4lQvbnFDjNQZNaV0o6D7iB9pUPq7Yh1NSmT5j0dmkBTFhGbNAvj6LzSecxi+fbx9E8CnJ9aql/j6+vblvWsQ8V0+Z4kapprGYCvRKfaKdS1ZH2H0AvO7PVn9yoECiChUNn8RI+ZixinLy398XBtcBbNMhxI2dhMv3Pr58nusi96LzqYMUZ+Z33m2WxQezlN9tFSzpmsbClDjQkqmAe76LmzqLnaqdkxEHvRuugrZZ0oPamHcLy0MTFB6BOHr9iWM/2vk6yvYBsK/7e9+choUbK+3jZEYccG59GHqO4jUEtW6vaS7lwI6OwELPVcwGQEXA/vxGGwatAUskO8GFgbK1REYOSdM6Cb2cPS3YHIFnCAxjXDgNk1CNTXk3y7owz0+k5MDRFNRUTpd8bfiqfZ3pbYrjBkCA99jxZtu8Kg0lNb3MXWx8HQjKcrX9mVK41U9YsfQTgFJry1ZLle5cHufdJxUZv9QFLd7q1eXoWj+m1HXeNFrZU/iFREuif00KNwCNy7yizH2KgHjAblwFF9uT33vi9OaowX2rsVrgWS1zbbM3RZhL9BxXLmJWHGLKFZbjpJp93ugGbD15CLN6WslbcbYPFIW3V3ZTu8yKBiHBm5d+UdKMzo60KIIR+qRCcSYAgIWmCnt2gDVH/FfsPCLh0Sv89MWCpUZi8+9BmXKle4F9HWamuNJGX+vpM4+guJZZb6AwICipRcTqivEXVf5vo1xywzh20FSsTpfKoT6KhAsVTkFemE/adQEzAWfMHbVGk69dBCC3DM6sh2v0LasATdl8XYW0AKv7N9mR3IY+oJmNEclM46FE0N33hgKZ3YPLzxxXv7o/YIwHBkR7DB8PDK3Ch5Lk4mp4rKtkwu8gFyYDPb3iC4V8DhztZxhCSYOuFr3BgOLaocVjr2n6tAKOUjgGVMEaz4YT0AOmvfV9va/5IaQWY0SDpzdlX8lRNJ+Nt1H2EMo7piXNK2s9UxZUC1wwNxmpXLhDQJkKbg2lPxTCN5KL9fI8kac5/QZTk6Q6+e1yNszIHViWOXU+glReVQzXp6cFdwL4AGUp2S2SrcBJyXKiDEPquKnaGkOVRzunu84smmz1S3Nnas+Dje4UhQ1lOnr0KFn04G3JtEtXdwaYcERsTcb/Krtds0N8lFrZAkMU6UUrsMphhewGR5fX/aktF2rUMgPHktzwWyNqxoQycDIceuBW79vgIJ4215/+J6xJ1n8HYpiF0WKYKmBVB4JNp0E88nNCiaDdkxaro534jyRT62D6fLKSriFdDP7t2u/LKaBIYLO/i7+DXq2DJn5jaNdJzFYSTTQu5eGpMvC9KXfuMN6Ug5VFQk0vl0yD1ny36xKNBwMyhghKumo1plveXi/j7KA2fs4myX7CP/PGDpddbOH34AV/f1RyKRR4dd2LYmBsI7WahGLX/VZ7xObRibIxoMMpubIX3atxR75Uu3X1ATiikLoCWYKB64Yg9Xk4s9mrclmJTaOSLmxiYHclbAmIPcNqg+ylLra3hyiQ7j9D9xHOGpgrmrcK/2Ms/rePxJLz173KSR47K8dbewrnmBORjjXpgLckAr1pGVQkybFYnbwoWhgwB8zbuuYZ8uJjvwFSndQNdU/dyVItsFY9Lp7gwX1N44wGTxJ8iiCZpXTzTExIL4eWp2uB2PnhgL02Ogfevs5VINbEStDasHMF7Ooo0bnPYcs7SJ56Aj2t2R4CRGrzAGh4c0f3A3hP+q855N+5jfezDvLOS8J54nW6/RQL3ZOuyU/EgzDgXiwZIWs+KUiMD9Qtq6IIKXoCYvQ9UD9CRf56ORMi4e+nSOsCq36sz/K8pW79oXVKAMRVMCmEWUn8/qjPipPicrWRNjegtYNTnhjUFpJC6gcuAp6bFJXrNW0Cr+re0ThE5ETZX1D8Oj1xTvS6Z/nR0xL+4XygQQorE6Npm8cb5L/z+PRAtgycws7udIBxOvh8GUPFLMtf2ejGsQkwLXZ6tpjLi8etFJxtVEMkKHjDPHaIaUWVI6ZDi49QSMAhcUFwAue7yzAd4ykG2PnuBnDNweO7tcSLiMEdfqjCfhNXiNAOFwX1m/yNbwcMo+i9keqzl/sKBPdXKb8x7UGR75oiPMUrm9UnZ+F+8WPKeNIxWO8WOGeIAu0EfZ10OB2gXT9Aqnb2rvtcRbvFei0DicLqdYFvvkA4sPHA5NXsCgSHcV/tYOTLXRA2BQbx8fHya9uC/fCWPiUAm/DX5mXh1SM9U+DwsI6P47sh9txWJfk7TXK25L/rWqopZ+VbUKo7xQSbWlNq7gwLeJZZzubb47EoiDASJAH9r9durKkbUG5yz/BvMIsjRjCqXhn/jDCzZy6vj0moAh6Dr4JcnLPJW78UVCvg510sfJ60aASHESbAvHm4NQPMsVgrcYEuJk6TxjRMPxsoaEAfZ3lxuRAFqjKX00argJ8hMBZeIQAyTsWdfwMIrS+bN7z6Wvz5P6W/7ovNuo+2BXSkqlyl7gWIPlbIRWAuKhnH3SMkdyrJmDI0eGpMYb1CM19x0/8lF5Z7NGvYtmIgudGTE3U58NVOG/KH3bVWLYoo22jrVMSP3B83Cunn9zLws5GuslVwLcqJPnsR479dNThXeu0lW/BDent3pxw6UCHVLe7UXzt97DVjKjqQiQlzsqTgaVL9I54zJlJjGLhW6Ckbh73/g+L+WBgj9h/8MagH7fphUEJp8Z3xbjFnHAAFzfsrrEDoQWUW2NbNk0NK51jVRQnoBkr3ToLGTTBDf/NJEVkIloLcZzl0PjILbUpPbFBITeceB9axY3KM+Ms7/qtBzG1iUCu3GZ5D/ITA28hLaVa8xf2RIbVI6NVjSZLGpTAdYQ70tqxK8I2IjCrKbuHOwD+/bq3nZV2C+7RpgkiXo8zzN90EfY3k2cfp9xN+ONm4OSgfI7P4vyTmuYDnXuapSy4ujfdClAKX6kiGdYuflKLJBuCCxTOChAyNLtXr7o119SHTmkh8ck+eQzAUWYvaEl6szPyktrww3RC8ziEjjyXjDuPNNov17jg6BqVPihlwiBwj99Co55/NBVNp2ukUL7Y9c1s0xrY3Ae70TH7nVC4yo7npy5F0upIIRfrtZ0+eASaM+v/0sZCJF4wpQVZTZeRx0grk0sl8nOeGgV22JFWjF5jLzqQCq4BzZELDrN93JOQ67C68h53TcE1DKnvGX3IIHXUmzc2EoUl9Hq8ibjjU8nQsgq6Oq1HsAsVWLnqUIRMtxy65RjFrxx+zXQrXW9oHIXtAHBlysy5AfgEQfkl9ZBBgGtlQ0gY/JmjGX9CY/oHi35iyRLuHIR6KUmPkMBof0SAjDR1LGeLi84DYVL8tGNDjHqrqBM/S5rwySXcbe2p+dGqsaKQskw88N5YsvNu8XvT829uP/sH9SQewHeLCGLRgSg+DNHiLTKpuhU3rR7DYX87rmJk3uzOClJJeCtVvXT3KZ0KSFuEavmBOd5eG/zrsnOTjpsunWrJdkRo3Qs7UpRjpmS2GIlndpO1XVzRvsJ4Gi4rsl64+WvnSahD5cuS6gzF4aQkv22xMDwgctdfWG6TS+TkcV6/7fjjivXd6d1FeCoK73c6vA4LSdRFWAHF9tm15TT6D2xpNKd0OE3cKrCOjrHW7ugC+g1UrWUyOpARX8ZZJrdmiqJTnaKYxKlyvah3K2FiNWgQjBos/iUz6PfhbL6y2m9OsFF6bDMVSRy/sX3Wc4QJi3I0zuMRYwfxhuYcWb/Vgt+dB5qw1TcS2tjIVHY13R9VD78qI04B5vnWjwy2na/k+p/1kxxQ/4Cl08sgl1E4WIKpg85ZdgOrT8A5jSVRYP6nW2fB7QP4LW0zRJpGMwqx+GNemAwse1BhK9cs1IJ2yN3HLI07wjdyRcyd/cG82Z1B7Gbegy91s7jSttSw6qtuJe8QbTMzmBjXLCLQKEbCMJA6ezEzTgTy8muOOh1Dj2fDgL9c5izQWz0ubtI2DE1Q0tzUM4zINqXUk9HtbXfYkXIutGGPVq4WAW72e1TImo6gBO0KcqzIK2m4gbsz7QQnZwOtwF/5eWHxUTFZUy9ismFfoU7qTIh1Nc5dbGBM8vJNNEciRQmSQ70E2J0sRJip4fnmqN4H6Mq68fWibsjTuVaO1ldd2kDMPEzd5BSILRNsQ/WJ4HjTUQuHaH9di5yy76Jh679CrWV5LRjoKuFuHovMRobQyVomVyqedKL7fix6BATS3aMoBrGzrc9VWqwvhdOhh7f7FIQak+MVndRPCk54ExJsXihsHVzhb2Fe5dMVpmYTRFyw3CFZsKvzAw59r1dOUI1aJJDqQRe/ePuyaOO4n9MBK1m+upA2B8PhTGV+buoJ/4AFcZeFhaTwztiFCrMhsnBd7xJUKhs/Q0LXY/RE6ahjXfFB1nv5PtzHt1A293MqeXrb9cahYZGvhbcHM+S5eJ1cZmK0Zl83WB7Q8Sq7NfAI7g/C4Ilv2xCVY+l4S2ecyTsHQvito2i6IyksN8ObtDs3bCoXbBEe+tVfV8UfqjZ/DSzEJkJCiEh8DByvCKmGbvSiaanigBkxDJDwhBIxih2s8uAvVxHxysfVLo+Ean3X7KMRA10rWRIxuw/fVxsAGzS30Qui5z2RsGysuywfsMRxmooQ7D8+/qOZYU3LvpQ5ULqpiiFi8puLrHdmzbSHZeXAB5Vzb7e0eFREZS047PM87TW3/AT4+A8jgenbX57Ux97Q1qNE5B6SNTuIVDOVa+Iwlzt9VtCNLSiaQSKdYYJOWNiRruqYuPln+G+mgNFXIjIXa6OHQUF6UlaMhgwty8Xt8IgjP9jaSD1V5yoevEvZ0gbOpAmbRugIzXaZ5ASso98yBP+LL93sNUPMzhlD7340mEFJdIu+j4v+vQz17ZkyHAsfcx3HI4+4butZcMEz/LxDCB2/kK0Y2EnXq7Gk+2MZnRzfa0F28o0oLJGRyKrd7ieSCJd3o/CKypnxc4CR7W7pMrt8EJ3IQGZXnI0FxUp5N9hfMvIUvse7anN8eBA69RqfbBx3FYHeuy6hfa0s+Qa8femX/RvZ9rqU3b5duZStUWP6Bi9In7he9J/VLcWT15zSx0bR5qzbaTmblV46o+Zg1sLYJHOM6MbJY7YNJDgCrjMYtaEIhlk7tduEjVESXchzdECGYuXZ1VlRYaCiEfYuird8MxkU6KllxAnEk/hm4RBZxhN6K8LmnSNdmgFUvF7hn+vvXzksYI6DiBMJdaYsNQPBqYn3cVX/RkGE0VC/00opDdxJAtM4KoJm47uG2bjp9iohbFUPyZ8BZQbqsG1O+O/OEd9DnB96bGD3fqQl85IWqD02LkNjH+vsXLr3wmEqzmpM8DdPzjYCGIbyduCMJCwwdKFtq3oJzwAC5SdeRD0UIHa/whsqU6fHaxi8J0HZGlRJQS2Wn13BmB483QD4HblAjgeMQweDou/MGnVihFlKyzWmhKnxXOSFJ0dRFGeFrWYj2rtB5WdroRz8P+5SZU9JEN6lQTQy7PGVGO1Ob6rK6TcinH27MPJD0Q2cI7buNOWcVLZOCjawkRPgx52BP9u/JXZt0YcX9/k3oMG0ypAdu37M4iKjNUZH7oLAvOObCySxDwq0TjrNutbguDh1kY09gp2m2RA9ruViXOh4XOwQLDnllYR6oO8dGaa6euEluJ0QQRtEiA+v/LOi/yhR9D6mtTaxd6KbmPGiha7w973e7FMz8FRUd0A8SeWfMNivFtqdaTuH6RUP5RFhBYLriP2l9idDrR31zKlFViQyNSPGxvYrU5H3Bn2n8F3nQokmjWLTAnx1eIA5mG543l4Sh4o1MgJ3pRTFAd6CpMeYVlw6Eudkzw9/rEIfAGCz/lovvSGyuUDKcyEU0o8heCmOUD9mHoq8/jEtW0SLWithjbTXq7oK1W9woUqmunYr3WIAF2H8G5gAxkzM8H5VWHjiJSw18K7n1EBC63ExEC5WteH9E0J7jcR52+/HGYg6hld5NzUqfyU9jZtol571ZAEtBolI49aDkE6yBOd68UYexrR0g4A0to3wTUSLyihlFIZ+sZKlLO8ANu6GSlaHvfenrrhZ3o2oVXYbL6BUlIril0VQ6Y5dfMGBueQDFraRoB4gKSYRf2BV+MGgozt9RuAAKE1fWTkXDkm5MzT0AlftkS2HKiOlqqmOKu7wXGlF995CnLGBMmCowsO1dv6JcTNbYKVxfZiTXilxnOrDR3i743d9soK8h46hHlmDqIjaK3hgDFTp8dU4P5bW3X0GdZEn4QrrgvtszBO99+LG4p0cXrTtasoPAEQ7TQI693lPGWYNX1ETQV90+HrmYs9TI/T4V10rTSi87D26aib+508eZNTVcA63TaiJBobMRvtwauhZ0CoyL1Dmx5GYBWznVDK9eSW/GiQ6ShKmfXM7XPy7W86Pn+2tN4UBcK76mv0YdZytnIzhODWcb9DbDtFNySqSBPbEGB6n/a1erMtTPThfPZJ4WViGp5dZJkWgEnCjTkni++S1kW9nTBR3rVKFIOf0Ulh8LRP+umBptchHWGACFk/xcK+ENFNf1/0yRIHeRhuLienPTauTeFuE+aht05kaECpQq+mRXfWKhRsBqN/Lzoc+iT0rbI0zJLXYCNCONeGud+4GrzCfysVRLV42hgyHh+iTGNRrJVkvPJfzJrpAr41hg0w32H9AQ1/PYSNQXauSt2b/dXRvu1IpJFBfg8HsUXyagLr1CqA73bIGCrHol5/JWAPCM6AHqxKNGHMOvgZrxZFVPX/uBXWJqGru6vnjQOcEFlIpgcpyNmu7tP+TWFFvYyMTEbCpb+vSUVRdqNkfkzXVYPWTvI/8p5HRg0vOailN8nIgQCv8ppBDLDbIg0ofEXrlTt8cTPuG/0FXcIugGheAyrJ0/gFRb/lZMy4qMm8fbqULrfJStUr4IB/aj7ZpzCyjy0RsGD7YyVJhFG9hzILBdSQO8xXrMPhIFb2brCLa9oc/ZAxvro0rUIWiXEbmZ8PaPQ0JJzCWFrLq0K8wk4JtFZKDHp+mSQLqOHzZkclTTcLCCjZqDxtvx8Lk9de3tjc7jADPyVLMCx/2qsm+r4LWGrLgGh3WuOZu67twXjdVWuYoPSH6Fl2ZUHH1JeZl/cNgoyqQfKdJn/XVDX2Y482hRlK4iqxPYTqIQM48WvK5ZmrwxvQD8SQlfQW913gwu2/QuTBfciXUQCBllMAOeYE7NWYRIww2PaiU13T5aOzdgrApuQ0nsG+p0kJDY/5LMZCIhpPKDCjuPUBnogsPmmUjKf1PUQ6aRehmSDjuMgmdAhLPofIfD7fV3tLswC5xqYExkuHZMv0kydTNopRRSxJuPDUcEEVznqP81OLs5yUwGNl1f9YTgsAcMwgdA/fQeGEQrGmO/ASBnA8mmMD1yqj98Fs0v3PIPbAToF5C+gScMBx+Ud8uKWKIGiCBuoGrtXMYhsVuFcKoFIPdPZhmCuDh9SoDSGa+7tSiU1Zrs8HCQE6CNLv9BlKHAOhxU67aClLGbzYnNQppbrQItIbpFoVr2rSFFQ8HmLoTxsIX3YuxIABfKFIO6arLp77KjPRDKCmew6Zv9wq2Y/1Lsf3zjOGvAAs1hiG2xzcGC/9n/35TZJyEwNFY682W9mNZHJga8JQIKXgi2RgiOwTHUNnO4jNmk9hg7xJZl+B0VTL8QkruhsgMSr1ZvyQFmIXFMbiWVYHFoTZlb2Eh4NX0kNJSlsUilbbTCY4IeJb7CGIEgJIl4smoT1BYWEHO/fApMqszzslqf1pdiYBtCQfIWsZi0Klda8gKYqB0p27lmj/XtvgEohukvkh19n3wlMJYyFWJetZTHqvYawbg/iaVmzHcxJ2OjwHRuodgj7FeI7ldkxtvCQc3T0VfhWs3/vJLwLEvHZ3oRIl9QkdEAO1HWzkyBM5LascfLH1cFOB35KXd5X1dHLx+nkOEvZChN7Zm8SMGOi8+6JImVGvSXjmHBeisuNt8XGTadmG/51GUROGQky+gjLdQAjTtkwBQy06LhCiDbnHKeEiqFke6NxdVgAOs5vxOa3reiVNSHJB8U2MIbZyfC2811Xghwm4+7yKjFVFWEzUOncYRAUbLq18U3WRFa9+kRbZbDFd/K0e+CnKw7NtbGXmG/R2jq4COSyEwBoBP4jAbpyDl6uDaCVIu84UZllzNjWuO0ZCbNXYXgPSfYe1JKlTRz/7LrE5ItokRQuQJ/+4629hqdwC8Scoyq6sa2aoFZFuU5qtqqgGODqGpzMzrhX+ULMQC7Yu3O2sR762a6KaBc5RhI9DtKXp2+Ly9GeBCm9Mw/7fAX1f6u4rZwK6swUlKJ1bjrGXHI2zrhfoI+1sHh7tbQM6QIdxc78tZJDWGMOT+ouUz/4fs8PdT7QwhHHuC86tir0j9m2G78+S/Mp4yYTKGzu4E3BWDd6r/TIk8tOIT0o4f5Ava9A1GRhs7W1JTqPQY7Qh9go9ojyvxBghw1+/0Q2TlKf5Ab1KZFtgnizOMk7tVyPl00EZzLsjWubo9YQ6tKvetdMN8aqyBtHeCrSDPBLzRiDJdxXhkuz+pgFpo4ApaXEdQZMMh5hdarhts4DBDRv5R65KUqw7yXXM4xKhhSiRyY0Jb4p9rXgVrXjazL+aFHtkuhWyU4zCsN3zQODuncym/ARKKA1Dfdw9Q9xgAM7BgfJoJQB+K7rWkvPCT6GfULuSh5sbbm9J/t46uuxBFW9e74/PY/VpPpoB8/G4lFArx+ObhJP/zMoT+AtQsVewXfXC7OVpazxUOrwwnxjcjv9xvbKz5P6boMqjJZ7B/zrMs7aM+C7anzcmp7jK7hglZOaAacLwzm2jZy0nUrMTdh05ycNeH2FA5PmOuSbJx2PAwu9jb8+DbHjVadaFsVq7C9TzsMMbMicox7nZ3tHb7aPeMauaM57PiKtuCMNmP/gXG3OOekQM5SBDqftWX3NJdyDcqfkRLsyR+MJVJM/gUqRaxXERYr+1H6yXE0I9/FQy3ZPYCYeDcoyNvTOGJZ/EEuu39vDpXePt2GLqCeGpVYwluhpXgbwvqZj8qlftnH5is4FcSmpLz8IJghC3kbeDTZ7lmOWTkQBEIduIHVnDRlsKqwFlqQoaiJSKW4l4GaaekiTLv8/H4EawDVnmWhH0RVybdupQNSqI4kHk/H3PbXxC314ZDpem1ZNVBwT9s9a/S+SANy/OwtyRCzE7ZWj8wyVJEoipFjJ1fx7UZNP9SZmFrtzMpeiGGKscrIDfR5aPme5+j3u2FbbFFoOSKPfs4yDSkWOKaWqx/o3H9YKopoB/PVr2mhsAIvZiqQVWKlPBrQc5rZ8tXLTr29WSY41JAPjbMWxGWRp3eCFT9reWbpCkEsdIQ1Xqc7gTzsn2iQSHeNAMw+BAo9SfCA8A1BHesfqkk7TQdlenFjbEH3oh7S2VdC5abNzbnuA2Bz/sczYV2ByXzpPYcvE4QvvPGxkoYa5BnPi+oPLMeRUNk+RLg1kvzawL0/WHA7NWOagILgo3WAXcDLTmTfrbtaahk45WM/5xJKVxH24UYM0O9rGj/XAvA64w4vSg+wvP0R2rSqJ+n4B3GnP6WAdTPkzilJV14/nal2fA08arm0oW20RAKd/uVw3N2cGcgmV14J+Y+lTR4B1GKyeRGpk5Tg3dXFVKpIboPkPVAYHuovsKD8VOFeEvMHLhftcKy1j8Ci5pvSCVEa3jmczmX/9uXLB26zO2t/nyOjZn4huo0V6GLpcgm2sZMhY3r5W0cOgv7I0aOnBodi9n3KTkGMqGc5JBX+/TWlcWeX3AYKp4EXsYxTO71AbiIi3w5UEZUOW4TKFWKih90e4kmndSwpTiGttdZjKdhgq7cJO7GYr/AfAriYWg5hhD4b69eAxVExkpJQXJzMhX1G9t+Hbgr8EjGkSOWaTajLOpiXS/OWNfleN4BgJNGrUx742exLWEX1may+Q069G5TElZjwfmFkdbGt3g0WD4LQGa6qJyJJYRbxBb+11jrGgsK8DsRqMzYe5/p7Mwi24UPHXOCT3qyHI4vIWGrK1swpS+OznWgst5JyWxPLay+howRtf3m9O5AI+Wc4+5sT9jFlXNvdAFXSOXN+pyMdRQfSFQ8gpj4x4xzES9NwMLNx4HFRgu3UYraxlfPsUr0AquX9BTVyjTBOmgjRj0cGA5GIQoKiBIVY7yfHyI+iGbUZ6krsxvl1SS/RJcbmKTRKBlCqVSaP1fY9szf4ceVziuvLjROC/77I7juVf+FjLdYwB+wXjCAFwat9XJtUmboLEX9eDQay7gzftw62POiH0paweetn4SSqYzeEhyldnmGT1dYHwZDWy8WZv/4j2CTj03KPUEuZ43bUm0U02YBvitTHZyA3BxzpbZXoD1mgPfKaK7h3J1prsVgw4i5ZQBg18jRAADGcfXyi9iKUw9IaMVQDoCT8VFylpPm/eAuFf6O8XI+Ppfy+pTPExJvMsEcws0JT6f/n+1cHpwLK3r5rVRqSrp/x+QLHmXXTvrNrL99owBe085kpWYI5C9alqm+igt0Bk+HtvdC8erA7YN8Ok0L9vJHBmtjK9Ltb06fvif/GQV/o/9fPK2pjWTsuVhf8D4PjhZt21Xg32eEjZ5NnwTivqeQ/OnDNtHxih6Gve7cLqOj+l2qBiRd7Jq9Vju+3WjDreAbR7cELAfNGg9XmvOGB2rqb/UfIlI3g7kVYLeYTad0ikSG9ckKfPStVsbDZ3jwaY9wSAbK1qHhsL/6WW/RVWnZfxgIv8cnmmGf7M4mbZ6f39xvT5WRIbDhON3KqQHoqJS9lhSwbPwODmaJxIgGO81NYzUl3/+e7Of2QBGQ4fq4Jts4LLhLVXekLqSx25B0tiW+idiPRnNlhcisjZ5Jm7o9caIVFzpx6Cm7tUbIqNrHtgdfU/GMl7Z7VyTLouAmT2x+OwIL53L6KpzkTE+iXo4DqM1bkLUpqtqxfiilZTuRvI0yFkChdpazy26t1yqWYEb0uDGdInH7PUIoQ5tepmOuIhg0Ec9Ea3ykyIYXI4yQ7oeXZF9ucqE4iJ/wIlzrUBD4Sw3o54kdDakabfXFAnlEW+AdFV+cknU0ZtFcyzIILMB4MR2Fb6fAp77efLdbPO9eed94Htm+U+CU66AyNNm2x1li3RM20vP/yfjYg5NgD8YI7zLDnefhrPwhtSX2JvjfjChHP/AegQhmA/rCwpCESUk4TG9sadfAJQIOD9WwUJlo1VlaifLNdjROC8/+vzJuSdwthOe+PkGAvZhbPObsLpGnUYZG3WS8M+hIp+2tTUdducYa6O5dv+wqHf38sHmtCF0phQqmNWvf5HIxr4Qz0OBJk/roRvM43mPTW0Qgf/z14fPVCl/Q561sPk3jQoBK1+uFo0V/Mg+7SqozXzBxpkXoSO1xZVqfwlXJ6t6qYeqT7/h2M8bCVveEMrnPM1KJZF/vI56eB3hg5NB24ypw==\",profile=\"auth-server\"},[\"auth-server-release-0.16.1\"]={public=\"je8/RRCrH9+xgk8frtvZXgKgFdrAQiYSfdIHvoSu6h9as1oFV+alPcDcQz2D25yS3gKlEcfsl6Gwm4P2P0OxBlVC6xiBubjlzrdOBOBKDB9Hwirb7roQ1dL6mjRI1ETZwRsTyUvHyKTtaG3V8ieU9TELfOWrr3b50bGud5d12I3lgP3n933kH8RvpuBgs/ko35DdJaaNimR3m8sKAAY+oJqxKtv/bUJCe91kP/dlW2ii1eiUwqAH4ixamQLPCv99gsy6O0JmGk+AERANPyoFyFd0Hp/baGnqiHrfjW6k9cRj/GbKvyOZrXCQDbfdHA/LLKMoDv08hXFTophZ4XvIjxp1Dnx1L7AP1B9MOJiRBFgHQhGIMrxRVTT0dv8+pWqr5fwRPMrhzz29pqpSN/j9N5JNQSeNSgtyfUMYoLWssR7/B9JYruO5Aiu67tO4QY1qUSvJ/NQIyWgb940cXscvwNwvES68Gr2sthcnzecOdZNM5/6Ji1AH9W5cExFr2cW215/2WbczJpqsRGy6JcKC5jcAUXH5QLX36oFsDOGhha/zia6O6F1bB1OtyeAzCgooSxWOz1kRi5uv2ffw3IAKH1YlEYyhzH88oxWgKQk2vIuW6kxacBr+uylD17tCgPZkk4rKxugynLrEtXrbYXJNfH3quJWiTc4JQijoBSCX4b6BdUZSd9JIDUC1tCUHQsMEX/E2v1n2oaHgwF5n9lK+WaX9HLwmyiqNdcO2vctYY08JYmOy1YVXL0QlJYfN+ljBaADBOHEZMXqyBlIoqKHbZ8gRYecXY55r1+Z1gD66QD7pmM+0DnGvzfE7OorCuA/YDFgJRGUwK0REfhbSuKHEfyXVaUu7bsCfXudZ19uFz5cslHzeUQsgMpdO85KPqoK6T0AUKFYBPR0HNv9GaRLcJr0tMQTesOr6vIVHqe1w7bXrRsdJu017bqPp/I/F0Zxi6S5WiUhDmYMbO8PXAvwddpjK7389RwGvBkekCbwcCBZP6vxFjql8xYHocajJM+MHdj1tI/UYp6iKiKyaSXe3PgMdom2fg1uvKW+c5+859VEcqi+8ksvgbHxC+KSiN7Btn6GY2QNaGYEhtZaRJ+L/nlrpSCgIKwvQ2K93zHBlkMgXiABvqWZgxJYhdGyVJw99B6mkmzSIxC0dcMJSKM0pYKau03bs8l2/m/oy+O5oyvJVIKUM08hivEXQH+7UXsN/xXAEXxHVhntOO2hdGMH65uBt2VfD/cs0MbnTFCAbWgraPKrBjkfepmhMQz9b3QB2Z3GUF0be7xC8Wy36jmX092il1djqa3IEXQ6jUUWSCVelRnu3dF7T06Za3N0ojEudGbKwU2Cp5+AyAX/Med0Rqn1LSrxLOJo6OXqU+kd87Plcty4eRi2z067Js+Sci1lCylo7487pLxbCXCWTZ2Lhf403Xa2K7sIzHGJ16Z8/kmqJFHKi3N0yLJ/jplOIPb24b1ebngSOSDjoQz7/4lvVWa5CEVJE2279/+Gjo24imasMMOpmh1YOViDT6AelQqsO5fZsLESI+te8+caXhL2r9T7OwxRpBrGnKIHG2Um6YqBGA9Ryy3xFB68DZIc0bgPD6wHs05vf6w9DSvZ7xtmMRU9bbhYX1GMOEFW8R/cgtuDzV5q2fYsWM6jzbSsbqm0UcVow21AVEJJYUUMjx3p72Xq5AKBPiYZ8TjCdKrNRlDu48mOLudHSQFU/GdMktiRzIpSe4tk+sv4zN7jXwTI6zySPyUUlL9uC/AWtSlUJlWGAIR0RlSt/U0BxC//++U+U48Fewn5l/L76QrDFWdQjt5/mMXCePf5xoWFb/5HnihCamfdgcEsFjgC+PrfYuUBL0lFlc1ypk0FN4m7e/wnxHLB5qRh45ZVXTFnu5quKUTeamVQs1jNtniqTbnWuXo9sgMHMoMitrKxINWxcbpIyqz505QRAOjN+wFJ8IxN06f3rAvGQssdfNXiBFkQ7KIo0Ykw9UjbK2QcEQVqs9BVTJvEtQkbqHZF+l0BJtB4YgF2z4d0Y3f2gue6uDALvRz0E1JjnEu5kATTQ7bc6ahF0ugpKrL80XKCVzQ59QIInIhAbbXtkoE5ZuunLcuJvs8yPiKkfcNySk8TGBrnGs7ZswGA3NSqRDajyPmeACwp2C/BZnwTZDymWGaZ6ZywEoJBxPjgOwXDt21sCYeYTWi4qeG7XR7RQXzHaXRwlfUgu+NRa6R4SLTjydHOocA384BnD6n0T9Xjp7Pe2+HsjFXOTOHJMGym0JgLgAMn7cRXmPoR7fhmNvoaN2HlNvGCF0E0mJS173cctygAhBDnXNj88Tlm7fZtymdx4USq0U62sJZYSCRPucR/3uQfNwXwG1OThKHdhhDTP6YtTLkdsSJhF8L+5tPTkjZ0+KEnYlcMNfnyP+GWR3sUbZotcggrbCRXRRDnwHYNe4reZrNWn0yX/XAbIdQLP3uV1ixk65JVAsrPAURMeRMYgE9oeY9WZD1VXGiVPic6r/FWnJQdf3RGFPnvgiXgTGnG8/AmnSJZKy1aBY8+wbxlOEsMh1dhju1JRgiQMgMYUyWB1MuTv5/rYKONNDgbJqPllobpEE8/5O8vO9/G3WVukR8EhAJ5q5nZnbejJzf1h/wqRnTj5T6jb7UofZnUkSDQjk8v9qBpkMfswDOJHs7HilQLhgqNLg4POQshG2Gm0yM4etAvF3T220nGtw07ORHIRqb8zBr+OEnJerQaQMmCRlGf7PodIqj5bC7aHQ/DzPZWnsXWGMN83HTGlOtCLEDyWdJx+vxLrQ4k5sgB5gaPJVxoRo2otnMBILdKOp7HSRTl/QYzhpBYZb0ABYg+7ELEIfHy9kK666oYSiO0eF8xAhWow3JA3FjRzdC3t8uOLJ6pbHwmcyhrn02EF+Uir1D8qVCG08ALdlEQyx3Ai+oAWBWz6xEFaVf2oy9y1Hig0XdtJGBhfGe2UtdW1FVVlFhsv5wwUx3yUWKAKd0UxIpyZ+BAJ/JEYqe9uK9vJ9oP0PAURbllM8bMxzP8IP58Y0w15++KYzHau58ESOe0NxuntDz3MGhyHrILO6I9mX8DBuBy5+9rEiXVBepf0IV18cekTlgLmHRUwpeXnr+WzMjOqTqwz3PJQ7yPecMUvzS9vk1wiRwOKPI6H/vEm5kWdtmpWH39ztIuOvOhp7JLrGNzXZVA6on8KVWscyG0qAx9gCTdoRKHX+nXT7E9WMKbJH49akcL7YCHCgkQ/DoYiu2qrrKc6MH8WHcVGIFGGQRNyfENtk4pGmQitp8+IZByUDJzz0/A1vNq7/jqyqqrWAA0ijL5ox8P3v5Y/GYcKAroHTYG3Kjccbh+zckFvrPDVjPXHr4A5ALsEV5sLu3SCYfQG5c9TaOGqzgYVQ8W2AjaszcdHYhtagJGxRWDRXG7Q/OE6zkI3tCqxy6LOij6NDrqbCxL3BKPB36nJ7UxhaAvt+lLhQIIu4wpPRW3UtAfUAzB7/jy76AEawcNB6BIx1grgYxM7bWfyoVGaPLUidwa1b44rLrQO/7UMOTU/Ry+3AKJVMqqBRRNwOgIbG9vQZeZ8tJcJzeFQB8bsd5lP87OC/fua+Cjv5WGAoOSbJQyuZNvcpw6fyelCXk9S6bV85+xhHd8u2NJnyiAT4sjFRKKUJwrhmU6tXNrLMbO/EmWitMoynaRebvjOIkMCzrGXqcrVJMupF7RjXrRTuEJgZP75IZadKB1BSDtJ8EZIpNcIEWjShk1/ZZJT8o96y40vmTHbMaCk1RYe34NoAwWIN1an8oMX8BRYFeepNuCO489I8JfTivVYgix+xk9z2accgFXY5yoihNQYnnWK+ouVwslOeFIQchBOppmdfd3MtLrxVOf/MuoglITDecXlppJPiKimUMEyvW0s24pF2xo7LZrN9RpB7KBiyC/qE1LXgRF8wond3qYT5aCP4ucbCRZ6dM5Lw11uQLTAV4Vanf3YHyicQdx5O/0L8Ic4Go3iVYi/gnexPs8K/c+ZewKf6lBdNH6v2pydtZxRau8TkC/gZfJNLfii4LGE/fl2X95CuwU+n5oTammKa+gwREvS+hJxBe9upPSqJRxP1yFY4X5xcxCJfclfutf7bOfXqcrOdgftgoujKtT3JLqTzAL1NBJ0Y/Gr7CVLhGmYY+REvSROo71MXkQGwNNqLFwTJDUrmKyanHSjLjK2pQq7jALw8/BWW6uGr1ZdcBQ+VAqSPS22t9j5/SPvTlyH2ja+uN5+l/x9UofGicEX/lHCu5bZ1SZglS/aOgYlcypdllXA8DfcOflHcOMw7AthgDr6/jWM/ZALPg6gj+bff6uzhd4YJvXcolws5h5qX404mtpRb3crZu7dQ6j+EG0fLO6UkTIf2+MZ1LX93uQjmTFHLD8DBX/E9oSTbKJUUwj3RBaP7V55C1ODVrKiA7mjIzTvm4tXIG/WUp2DbnX4tJATxYWk/NNTYC0H2muWV8/VOXEfzJ0gECqz89yaqCgx03iZiZBMBrdjmYMcI9JBy4YDW+P1CH+xyl0K97PeQJ+8nLkVmsNmSBvnjnNt6pWzM0UI6oKtieKRQeE5yDgGigr5/9HUd/Gis5agOCFBxb2MkD0JZauHYIWvLSPXUMYAt/i5C3hD3VcABv7yB/y07TNyUOy7HJ9LJzIt+5d2gYbJQ9vWFT36uvmWaALpbkH7sKWqPjP6eZZbvwH7KdmdVY+ZiRFuOSJWvgarIJeaquCinFoNCh78O4crzayASOxuDseiac4rCaQFuZa+BvVvX4Vp2lBqRbHVZimy3dxLnh8T6FvJtmx5AXzA3Yfz4+UO5cX+vkuDeeoVAqDwbfw3tHKCYVYWOVxpUMKMMXEoTwlewh6ASlCLMsf1HKWHVCwHb6SDi5sXI9Xx9LEvBaCYkt8OqdeyP6Ae4yzoNbiHhAPmClsAiiNkty2IPSCT8cWwbSjVql99awawRJPNCvKv0ZTgPosUnuGwYxu7hSFnJd0P8nyXcNGXFGWP3bDqb1d2ZV8hNAOZ99bmZ5/v2DnOse+JI3BW60r/GE/3UzgSh6S54l2YfSIgPgHLdAM3mNtNx9vxc78sBcGm1ubYufbG5uZpJEBJsY9FXjun59DwVElSg7/iPZJMcFvsqzsiV3RrxAT/CqhZRwxteE/Kgp6ctAUFsRfWww5OIcRCSxgMfsX9wGu4dubdq1G3c754599z1msCLD494isncByH5ntF9sWzf4P7PgLX6Q73xbQqj+vrL6kRWhIL0rH7FtTcXmIT0BjDCpopxOwFFFiU3fqAw19uealjq44szdWV85OcaMKfUyfaCzTf60WurMrN2s6oNl/BMHDUPOHbytpyA3hr0UM1p9IRb/4tSmidLwMnWBQigJTJ+0dQv+nHE10Ex4XE1xVLQX40oZ5W9D3fjSRTP3C7BNVBKok12JMPaB05W4K7ZSdsOmTeZYHBmiwRcjs1Mo9SIg2TJcXvSJSqn3fgVcolIrxTD56DVwoPWi8qEGkBvrNW9Yt+qnYQp0Ye8CeUuJ7drud0ZP/GhThttCqdRWJnagq7oVyVsb4Pk3KB1ixkuZbWRRHknMPYARqj/L3xyTz402/GIDu/X9puPlzYnHpyeAdxgUSBzMdNPpx20Jq2PAmgZPbdKNsQ+/TTZvcQlvxv9FIIojX/Wgsn3SoDFwfowHAxQNHsb/S36/n1n7k6WfJqUHRB/8EpefEg0/l2GzGUPAv31q3Xx7jpS/stVXjfgFYhoVtG8TJhH2dUkn8qxLhIhCH+YyOBMgrA0xUnIS3YIUmelmzSkhfwV32NO0IWLiyOTkTnlo6N11+lEOFW/rgU9Y3gaxLskVwpfdl1LSWCI5Ux6bYNvBnRkNt58PWuHDrsbdMGiUfPU6Qagi6tCpk24l9XFeXsLgY+HgYOHJfic9W3DfXHDvE6bjj2sfZoSu0C5uKBPlHV7PrEAQcYe9ZS2FjeEg/Xy5cENw72S7ZaKQ3a+Dx1XawyzFg0ioyKPtCY5+2VmINFa4+p7OA0TqMTxADqUf/JdVZWE3fH552Qp/MCXAmems9Wb8iji981kG5DS28g2LFZtcw2EKzdlCVNmvwUb3ll5ng6uLrotWTnXVUiJsqHvhjGXCCAJKFY7GdoA/T2fNWdEUCBa8uXBWEnXSqHQHZQnok3CGVnp8AltSDRlPkaHoEkchqlpfy2031Ml2KBagy1CJS6vRqdW7VbEWYqs5cmCX3eIYMtltYsXfRq3fs1WBNsuopSaoKejQUzjpWsDmzU8uEzDb8e4q9c7aEGRHr1otCRCRHRwQaMzTKaiAAEoasY5hsEniFeyikvu1zVtyyzF847Wa7PmmUegtrrYYLpYJBSRjk3C+e0DTv0MMF///mFoRpVfC8nBiEq8yMUhZAGBF3lkhaNTvQfrLRz8ZkFubyy3FXyx706IggtKoc3EDKp7QxxckGAoyIKJAE2cZcxwHDW6+0cZe6amjBHH6cMfUF8lsz8VuxxcDMFi6Af/SDCtOzcvDvWb0/q+gMUdYW95oW2LmQh6dOibK09yN+yItXE7T0aD9ZK0ME0em5L1ApLhmHswxrfIolMGWpzxIPTJqEVGjztLAdgD0WkYkP+yqhbMoGIXPocwKpwpewBuSgBuR7U4bxZTET8RpbXPM0n16UzRTGe+lZHMvbl9RQJWEog4zpKqJl8X7nz5H2bbKIjQxnYPWKVCE6ChHWxy0Ryk9PWiFRX7CB7vvzp/nFr0eChTjFdnUJyrsMg5yd/2gcj+wuCtP0OME0OA2XNFObEGJh2yQ/O8GfOVc71zDtEZ0ItCYetfHYgVRLHM5EShTTo7Yk76ctmts4GOmcl20mavaJNiz8DpXhRMUAqJc2Vd7ZAJuOh7Fb0X8P7gkAUIQ2l0Z3a9hgh76xb54zHJyfoR8A+5dXbRRvei9hCRxQavgvl35XGYMlwgDPNEQnFgmildD5gXz9yXUR+kmyBe18mE2OgUxk/EBPKrvDk+tgHtNs9W4DLXoW6n+EYvqLVuwv6/Neu7dGkoVoZ1DSbfTUUQRpqu2khIL2OrePXvUYkx5TaJmse7OOi8jdX12FrsmgaRUra5skhUZhGelmaom4cc32psoINuey6DnyfekvHQm0xE/QeLEW1/a0SglTY46IqerWEnwU66HO+Bw8Fx6EIFHX8iolD/rcBwwY6juGKQKrBFgqT3nTxisDRuuddHXO+QHVx79D2EyOe+UBGcImozANFbsdRQweA0ksky1KONs59AtPVvbh9vX3PS7Yz+xOFzV1vkVe+YAYrRHvK4bjp7KSod0WoS7cv+qtddceM4pRfoj0W1XjTKyKLe0WXPYeF9aYfj1TH63r+RyNNzLr7VjVBBMtpiiXC8p1kGieKUbzDac0pSqJ4r4wZGPcSAmamOYpYaTOM/NxXCEgKIFULcryb3R+fuNpL35S49H0CyUeOut/E7NcogdxliuBWyDDEArDF4NeEwKmISqhmoJfQPRtFokb+HGVFEHFmiMUF6uPk1bFUfxBPdtCg6f4PhnWKE9w+y2r0npeAmbUHclk2lPvkYjWPhhdiKXiFYyq+/QR4JayfMltVlHYX0vs7m5SDb7ftZfCA2/mka6M9t8+CRHaIvFIBhbTNyEU/t7hE98iOIK1UiM+QEMu2sqjV2Cx1/nDsAZOqwmoMHLFsUHh1aRibmEJckUHL8CsB8s70Zy9RrT1zvOtJTOX6JS9EWtGkLNQiYXI42PN1xYAQT595OjcI+csZa0oRGLFtHirK71CghC/L9OYLDHqcQm9UhejPf27/dV/zs7YcUydAIFuU/jpNIPYogAf2/5nfcfrJbMwmn8Ma8giX8PjzUJvrkbaDOvjZGO8l8mr+3DWpH3zumRQYygDRYNYHnf8s65ca8Tm4fgLbI8n0X/7nRQQ1nW8NgAI7ukt8dTGUNslDQkaAxyP0YslGqIDCjpTc2Xhj5QlTj++kuoygDHlUP3jjHENp6gii6dbM2eB3UofEppVUXvpWyb/Zm6AszJBKIaTpGDUKWXEsxMWwuXwSeRub3fFqCCQ1a3+m8BYVANPtbtRRJUxlD6OaNuTUSCbE7bQiYY9Q0UC8fioRODQN/L3tHg2SaR530IOvikOotS8X6LXn6T/s9tLQ8Jp47DaEvUykBNSFi89A7L5GU5+8X13IFF+7zxxhHv0b2sV5+77kucE79ABrb+HOWbTnNo70jDURkaNvOyofbv2ZdAL1ZFiQmUPK29/AKP4SR3jnOsxY+DiTCXe6vEd4HwWv8QLHcrYAnV11wddu4oyhxTcvwzlPn0CDFv2zD6LkECgKDcHgoQ0iwf3k4RhUpnjtfjPsls3h3Y2ynKa4rlCTOXcmdvng6pnX/KsfiI4O4wvjwPvZREpzaIfu9uqPeDeEC1zWHP7JlNtPTdmEvFgwWVELlXP8eColYAyT9sYS6RijCjtvARGaOHnHWKA02CUObKpgSen20FUGuwPETULGJ3e0bu+3nZpOp6iPl4JF/IGbAdoym2cciEnoR6SfCh14mcvk34hMSYBuQ5ny0uoLve/ogvuwvIGp2n5AMmOip76cA1piR7cmn9xE06JY7zBxD8QjVViXg+BsJE1CBsR4lSRebbMwMMn32AfcRC6Qb2zTcNj2WEs1PuIjjqQY0ksmMhoWQnLOgL1nP0SSeEUBt1yNPpJab9dEz0gvwjXAJBxiKaGEtbnMuTTky/7lovp9sAk8bTcuaBnW0jUd1JOrVPnEYOa/pcqlqAT4dahafKJSZnlBUt2MzjD99Ta4hYhbuTiHvgY9/u+jMmcJZYBrKxJ/T3EoR9nw/ZNpJmfgzQlboxHhJlDUu4CI4XJZVfRlSvQ3TEvXKEma7iFeeQHaiywLi5YB8ySSTPuB5NTSBwrvy8rifgTt7ff2QbJ5xUhCBqyuSwW3LlJgUXwJW+xck3aZA7EypV77dbSO6/AoUiYDBmIu7bBnmohFdHNvuPtfnw32MMtaHavOzRq9ETgNrkbeOVXMqk/eeWjQUSAUZdSY7qR3d5mx0qhgHY8mKWKQtMer/w4qBvC33r2YGnV2gv8DQ3Tu0RjAV5UYwvgss2zMt3cJAIPDSG9w+LpiREYjqVtbbybcrox0vsJ8io9Vpqj+MWkQmGGrMsqyjOlBJybClUCvCbYsHRVqQsiEenDtcxrt+CoziNlI/0g5zIXcFdbZLYUgKx46LNCkUoQPMJLGk7Oqb3HRodb5gV9QVY0Vfq6cyM/+RHQ0lh9vRwBFtqZMPcre1ZCxEz+RkwPVIIQ4o+cPyUuRkUprUgOgMrc2AJddK+0YXvGBAe/vhk50hgu/ttUK0ERRRPAwnDSob2sD2008bbLQ4wzMEjK3VRlUdKbtaU8pSFZwTCx0AZPfUmyGh1F8ho3hz76ii4jslAe4dric35VgJkN8r2wIOXfmkWxD+NywtBxdJb1H/9y9En0IsHyNXMCFsZsKrglO7ZgR6iYIQR/KxFFU09ioHseILKtf1AX2x3g2w3gaSWoEE6lCRy5eQ5txXF+KjuxzlBiq/X+y3UcGcPtx7opXOKHnCFTO3qJiyYg8SMNcJok97WFWIbQNgspc042h88WiwUoP8/MTY5snMITa8nWk2gDWkqKnzZODU/FYs+3MtTo/SO1JXZ0r9PcIxKbU8AJQfxZjM3uCPp9zGFZ/vygctJ0qHb7QvZLZBZuEpFemWdMzZf7qZbJQeH0/xpwQ1E75B/5IgzIvMOdD1cH8WSso+48iTN2k6+1zlkeOS5ChR1uFc9hsZfSJXHtLC3hHHkOZ3+gJw3PanDKc9OieDTplWk3iX+mYLzN2+WCmAbPNYzoBts5t1qBU6pdiYQjlFOE6KlYnmAZYp49jc8XyuPZMYos+92i/W2n4yrxR/0vUeUQEB3D2N9FJCBdm0Pv4AYpCwaKiCO6OaFgxroamLhwmJkfJexZAVmqv143mSKOhN3LAOZKB7cB5M5UPaYVHXYjX/J6a9vC9uS9uqwXh/IX9v7Lw1wsQsIBhh+K2IR6a85PObwfJxitAhygpocE+qrXIqD9ehoKp93xQXMUyBZRbsxciW10pQSVpksgRCkiueipeJQKk1L1/MBI5lh94RDZqFqE1wHf0KyHRmgltZP5cPpQCxsdGMUHHZFrId+5lSE9iZls8mqu2V+f7fgzkxlaYD8AQX5TtgAl0GaQm+8d+nbljc+we8g2RFPwuA/lyj//vAcgubJHmPaLGGLLtt2TESFVj/tcuAH578zpguK7UjcMpc2uuUcQPXm2uz9Z18YSpx/qRfOF3mKISrKLqB67dbncAWsWv9svEShTU5r+jHaJBBqvnDwf1uW5PscpAyeaYjCaH31np+M3+EtxW08t1cFyxxp9s5PGCJH57NGYDuBKiV82kTG1xFFTKPa1KUURPeW9xfY13oXAYKSKWzCB7tXZ8Gxcf3PQlN4SVPYPt8OZAoC8SdVdS64ocHWz03xcE39EsfLdHByPdkYDTp4GGAzk1fP9cAjSUOrWW55UT9ODW/oQt8aPPLFOIuzIQXRsquODRzg3RIpP7FnFekz3cPk83r+xhdKtJDBS/AK/cleXeCfyLHWDLQDDl2UcgxjESoBj++rj8ow4rTYuArFQn8xA18RRblif3XLnV1KQ207/iYgzRET2a46naiUeNckzkXNcMPCHwd//4GxIqEgFcZ6uj1UvaVnUPLP6oLL+fTU7RrhG6/STuwGPlHxnwt0U8k9CmOxBXSw5e3H4Rb2R06NOxXvYswXc/X0/fAr4YiQvonuRzIazvu6MDADjXfQTQlzkzQZ8Jli4yKVUi6SK47BU7Y5pupQ2ReIUQaVO9zDw54hn4wK4pSa2RfAPDLjHa47z86XtuEV6LcE3isC/gqSH3pOk5SwGi0nOFjg4kkllYvpOPaY51mm/9bzHdfmMw08rla12Td5aBIstm1OT6qpwlqlE7nlNUTAP2EjyhCIAaYCmSKmet+RZKHEyRsxK8vlj2p2g/rL6UfdEqiBHwZv4KwI962n1Q5MFUeUoI5AXN828c4y1ZSUBpF8uJ5QelElgQH0I7xjx0m+vXFkvbm3nY/6RAegv8viPpTxXK4NsS6qNTmoY+kzdXpAgK68AZml8o7cyqakHZ5kXgX4Drvw4xGv6BsGJxYGmeoYSPuN22iKtb3etnrwoby7cTQPuE6yJLmwfIz1lgCr7u4aQCX4Lu9/dnvqLLha7dgRyF3tZECVdDxHj9pscShdw7fpRvMOrt4+iyFkgYv77SzrdEVIB6d+RDJqFh/vrix92FFwWu5bPNo0eum55Q0/2QsewUUwIwcJelR4U9Tc2k8vsNTyX3YTmr3evxO0yDyvnZzsLbhu/Jh+mNqTfPUe7lny9HhHtopf8Tws+qrHW8BELN4FASqqnn5p92L4fuu+V6eMsxKXW3s375//I8JDMJ55eGbUU6t5xnZeTbQmSx2/rJxMSHmvlEwOVnhvqpzLfzuMwN5BrOnF7vppp8EnSdy/ZD508VQVsnOIN61xW1dMvNzcczdMZXWogZf0g2G7mmIIMinMiWW14K5lXljQiGU7iPKI3Hc0ZM6Qxfg+nC5mOHEqWlcORb7mipAt182qJ05aJrp6EseDhOKkjVQrxe9G/bJct+z1E9KkCsBf0MagQtvyfHGZxXMsZ8WzXZVP+7blQz6L4gL152b9X3pSBu/eXEP2Q9VYoj5EHp62yBPAv2hFOVMQ/D+BHCCuzyJEEZBQJzz9Bye6l5HgGXMQyw4QqisdzrzQPBArjJO9rW5lwNRpSumNOak3E14w7SK4Q8fv1Nm1QAb+ddMziE0JMBHqvhj25AcnEfpkbJHsdXeCFTEsbq055+n1p4eKHt+7v0Tu4CzoK1spVCEhleOcOHF2ASgHja9NTebbheDhqACd3f5MgXDMzQO1NqtOHvq7VT8Tu5WpCxJ6Pkw2TG/a1uGJIAa6ljSZ1aqSE8XM4yxtVLFir7VVCyJ3q2cRW71EoH2dHdsA5MmfYXvliltuYDzN1G7c/E6Wc+LImjIT2hBFZj+7OatYfjmQ9vJX6M4v8+aSwAJ//UMPIos/aRg6atHJ2pARENuOID9w8TXrLxMm+D7KYeQDMHYOEfJKGrQEjROj9wgbvn3yRxTHzzVT7RYslUOaltbqUAmeXuHrNjxgdQu6hBsT1oY9wL1ugnlohL2BKimVolTDB4YrOn35qr7+IQhfWUAe16lxrCbbUZuY/O3NRwLoTdU+ZnvehrWGiEDZMl5KtRpj5tTYLrMgCkz6p4M8tg20e2fG54hVJy9YLbTg4fwf1JRwlVaij1VqsYimydUi7ARWWYbOQFz7hjhzYbKc0l17rp6d5vTWvljLRZKpyJbMdzobclDilfoDdheNXpk2DBEBoNXp52cy2OmVMoIxrLgZVd3Kl6tu95knvZfYLx5C560XETzjpGRu4mKOoJ+sQIiesyDHu58Cc2VfmQzESgMlFLT0ewxZf1bf3DyBjlArNrQqcvmn0jk08WVKVuoa2xGFFclEv1DJhrXVByvu1Fhtq9Jsjq+twWywc0H31turEd+Z46eA4HWxUh2BCHcGhPBa8GrHvm+w1yDrq0s+etHPnjLuoY4iwtOkMne/I8vB4bm9GjyY3C5xBjlEIkbG1HY6EQwa/nUVvIjuUAGUCjKIMjiRJxDQM5PD444gjRXNo43pRcuZR9h99sVmUmb56k72MNVPwWRKXR/fYvcX5kE5Xv03WIhRcMtjLTf+NACkiyUIw9xNu3vQTnL+ndHWYNB+0iliOilkvcjllmgCy5DhnhNzKYzxBhbxGCy7jo/K84nqdQM5PCklC7jlGTFQcXuMJyrCF4gwpO3TxTQ9RFeFkUsEeSUpPSUMiwU8EsqHaJTNy55kvpaFC3d8zREO1wP9XIkcRtTlkHrVw0RE1URiQ7Ew8zjk0nd1E+rHH4WY7GdjRXpDdLDe7Wi9aZa7R6GMKMM0itF+KbVcbjaGBnPf1uk8rIbPA4yw+f5ybwJ+toJgM416/zB2x9JDx6zMbylL8mhbcbP5RjWDgRWpnGOjnFNztKnSneJaJS5P2vcEHnm1ExSu5IH4UmEHzI0XQymBmm2x3g+zwspHN+GY4QfgGcKm0wZtXgRT5yiGNBXQYeXDFSYiPHSnVo+UHecsetIHOlqM46P9OczcGMSKLA4QF7Py8ewyes8YWfVRmCHxFXp3YxhMx8l70Izgp0uwYOy9JQMaZkLiy1R7ExRPOcWkd7cpDQSzwmGcpu5wqoBMrPCTvy7PDr38oQAfsAL0Ff9NcDg+mFnluTjc/FKCIwdBLoKj+7D4bGmN6QTV+0nXp7M0ZXnsb12VNDsc+r8qWQoY58DQokyaEqQzqKjs0McGLw6q2cdwsrYolBjHVmr/NMINHIPCQA9syXKBiDR7oqZMY+MpbrafEBrJWaNo6pHnhDdGJpqV9Nut79PxNEirogeK7U45sw+BNs+e/NprOFk5UnMQuEIfmUcUwu9P8HdzI3s0cd5hzvwE2QH+311ak+fqUGZF38Maxm/3MF8a4lwU+Nh2omSZ2Jo2mLv3Ss/ThnqlbG8m4GocaDF2k+TBgmk2R36ZAqGWdEyVH7HBZLKi++Er5LAEA64xPzb9NMGo0baTH8LqYCF2VUvTTI5BSSN1xQHX/uAqw/6CVJTiGdZBNtBFd4GUjH1qwxFKbdAkLmCm4ZQw74Uggk8qa2e7wBMLKETm9dmJJe5/vuwNkFQwzkTAk8qVGXnMjxNEDGpZRLi6JIWd7SHsETO3EKWFn9olYiQyu7SwL3DS/nFit3sIWf4TIfN1cFLlPq1+ZJN6kVECNuAfyUfxvxpu78eXVDxQbBYhYl2OoELGeZ7jNHHsnns3VBcpxOl0vvbIVGAOls85wBQWJGfRkb7ydwn1Qoay4UeSpWu9D1eW61SFzCVg9hq3LBkjMqYat6AHLWJ01aUQqg/TG2nHTR8CDQ5EbRV0kgTo4hzsNS3HxG0ExX6rnG7Ev6z5mTnWkLmIPxQJSznu1ZBmH3i5j93K3YffQgLQ5Hj9qmav8B1YKzXomO0vDIU7qJreBNo/aSA1N6fpPu8jzgZ3uK7T7Le/os6/crntemDSIkEy+1BJTLiUod8DxGjcgpH0yvwCWzWBB/HbfC+J6ENHSKilvSuPjVa+1vXC8edBhZDmG+SnZbwNn9mZ+PtBloFE0L69hfDZd3MhDe1RtlK1IgrL2irkGzzWKIiw9TKyBb6XrylpEPF9jtAzz2i2nXu8S0bBtpHAM1Yu3bBuxIL/7klzKDpSkHYAgRnHcKOLfiCCC0ix1swG7RarIkrsvmRq7U3Yes9oW9FTS2ewxunF1MYCE7i2nLilXc8fj5Iy7Fz6Lw7SfALak0mAYKLzhHL94eGCPIhNtXIUE5AAdgYJApocdAy3rg74XXWeH4g/KhG+mWXe02aQ9KliEzPf+ImQE+jCXY1KMMpoUQxKOePTBybKpWoFDX7mQ6ld2CVAogLVdKcoOvsf02Q1Y3o+Xh0o3c+0HPje/nRX6ZA5eGPkeR3fNFa3aNEHV3BOzB3RjlNhZTLqHInEAGwoZvSe++1Y3IOGAj+7jAOjFcDCqVTiJtMfMCWDkOgkjGl8OS3Mb/3nVFu+Z7bBd0J93BDw6OPNMiceVysAHvMrqowx4Zpz+K65QWcz80mYj9oKKmwJsG8wFmx6v2gP1SFCvzHFKcQSigLi2rqLUlqfhL97WoHbATMUxFAc0FLvwa6akdxVtAk9whky8CZFUykIDL/PkRwl6o9eYKRL4SvmFlKcz5Gv/bF5SWZEYe0CfG3CM9too76Ak5KwZnHUGFZKzZ4Q1/N13U6GcMCy1fV2RpCv1Kn4mgXsu39IjIchkZtnl8JTnBpUQXObD4YMcXy+BheG94McIqnqEv63NiTrttxZdnGHS2tVDSOGFwBPv5PlVDAYeG0tQ4ZTKuN6J8FBT5w4JTXoRQfv1/8Q3oQEGetBB7mBNFYn3puXIJtx46DuOJK3g6GCCVyBgAtKbk5p21hJg1Kn7CVUYZhfvo7y1LYHjlPemWyHeY5XKOQ9zCdUNxqf2UZhmoM28V4KgXHbHKFOuClZaPtZtlH+V0ITDHUdyjY6DSRzxM5UTmWcqtpGhGKQoDa4fMtnhkcgNkgw3GbJcmhabF3yQLkee8gyjzbSn+x3qlEvqZbooZtN48Lc7cVCKSeiVxNbBQYXehzBVmt2hxCjlVim5coZs0hEdQvmTzR+7Q/VbUPGCSGkFcJys+0zR3rr43nSq21sh5s7pLTb41/URK07SKpvocr0ZKmuzA1UZNdE51+/FWxIWZNSsb4wqcfFc8BTCUU6+tJeBlE4uVCfojjWaGdaXDHxep4KbwfqMvwcEFoJm/K+CP+oYs0duin+20uCt2FXDJ5Re22pbGexadf+pNHEZAyBUcPc53xvHhVk7S8i9eWODdNXwz6jxSnDwOxZRHvRgujgrO2dZLxKJ6JNY7ts3NFa6zY5j4wJqZfRWjWpWgzejT6Z54ZWhjyzEoddcP6H7MCpuqI1WitPl8plWYeQ1d3Sy8JjmyDi/BKvXrKaqVuoBLMvHP9rs4gnOmsnAnSbgoBxt2+dhgcTY/kMUPYK6oT/TVdx/yJKxgOy8hVI0IuX7xckM2OGgySs5aEj9pLikdLYdzG6xrcQ9LAPztWjOrK/CvMxQbg6yrmdl2A+b3OFT4xHMc4nt+GHZJZ6xHKLtaDMJt9byeoJi3IUsxRi0LoOyKI75mYls0HbfyPBD16E35JP2z1FAjIFO7qHd/PAyiaHZr5DGOO3K5TVkT+oSzUVJDwtnonmzwP22T05cXYG5daZv+3m7L4yJYCNkf+uJvP8jnnKoca/2aIGVtIqVlyyIbAJ+m/W+n+rTvnkoFX/pPJwZvMZjZLYBzRfeBqLZHmcYY34BzgJzKICXs7gA77g3AKZ16i0/uSir/rgudmqwfTWZBVvuW+6zoBmqwbg6FhiPQicu8lbD/O1RMoSl3DbvfU9ynGGi4o8biKE7ef1/++wHDXkKZxvdsLYMabB4RtQXWIteCp4kNrfKZUOiQfGenDJLtMgsZbj3eI/d8rvG9IUVSbgqANonlSpzRcCaScCCzrFlz1w/wnZLGfTdj/znnUbDOpKcYQLGBKXUeAql3vVBzOE12z6JQ/8HuD3gatMJhOQ2XZoSp+eXS80SONSl6g0wh0qy+vRKyd8HNdixHSB6nWk4Hyv3wjZwJOGHABEfm//YLwlsf6YknLc9Zq+IEMlu+zH5y3UqgDH7CaQtgcdEgwHnobPKL0aDDSPYpwcc6zt+8l32risfCJ6i6namAHI3fuPxau93635qeq2gJxMfqGxbi2FoShvtqL0m4Pgyy6Lt4S8DDIOaNY6mIuHDfmhUSlBdBsAiyg62wK20XB/vwK72s3Wd2ftKoCWuBIM/khjQRn/xpzEyUK13Ad8MrQRycBFaZAxwY1nUxQ8hywo9zYUdxkvh3qBDU5D4L0ZoQCMJ9K5TZ54VIqu2HMQFxeFOaJbwMxWLte7cSZv55U4HQ5nP1rv2Ejz1s3wVtQ9FsZt75AwcVXTPsnd3Ck7tWdvcRdIIc/by0+Kbrl3ObNO7KfuVzpF1m/SVjRUewlWU1lzbhFbfTrBRccA/ZxHN2bm+rWBeSX5ny6eKyFzuy+WIU7mz+JT7HHgOkSyjNzREmyIAVarnj5x+4xehsUuRNISvndajTT4C0KtF01xImOteR4vqXXXDW71Ms1YbRkz4aZnXBdazZ5L+bj4xOWacwFeNUitMWdQF7SSKA5+JIxlVdroIJIumJ7wsxGN0+EXYtrxDO6YcKDMbhmaXTTHHhjVJdFR1PdeUQANQMkL9EeLvU6txsZTb9MY5tCr4RTvvQp+EPi1eVT2C0wpcj+1I3qaIvFD8EyvDuNCLiuiI/+1tAeWWl2FZYmBvcB1hOzVRkDSIxSvMaSP2CDWHbPy62Ht9QpzdZAKp0087v3vcHGIAFDDlH7CulxYbDAIV+oCBoutZCigJ9GgTUfshjBpBaCMBt/wNg5eyyS/jBEGPzrILk6cL5pB3l5dk5w5LNyRFSyo5kPSy7HmCpFSwgeXNLJkUMmnSouPbWzS8/mxWrOw0FZSwWMxbqC6TbkK8hDngwmPSybnKst5P2/VeabNFubNE294vvBZrVJE2yBYceTLJtqwjtQSMnMOFmQk/q9aOfnP8qW3A10Fju35XJjl2HNMWa1sjMxXulJ71+GUbPeX86BuzFq22x15gvQVxZpLinF8T1dgnjN/CvNr8eGmJgH7lHWIXFXk+QUB7urThnQT/VUlQugGRkCZZh2u0a6mKFUDTpfJ5/UAbUu/l5PzZu3H/IRZtW5reJMNAicadKvgperN+t47pNFfbLmwszn8Y4sBrHzuu7rgUfUmzERxqevLfuohFbhLqVRqljUzwZDRLdYpZEcDuI6AR/8aPRie1YmfkJhZJIHp+dQWK7EBNYOLD9B8V7TB6pfFhqNfUuuCzSLo6dvAA9PG+wsXKuOzcACzh3hU4PM/EOV9+zB3Ps5MiqctBb/beQRZHtF1YeldvpfbeN1fBFZF11xXStxkelrcuKQE8fJelp9xrWMzJ0OCV0rSTS62gM9E0ZzljYXSbYj1D9ErDb1F2BPFy88fzX3ijyly4wJPsqOhfzOVKeFCgIKkaDe/zq56/+aWTn9LpHir69/q4N13cgq8ouMUMUkeF5/EYqEkP75FlflEPDofHCjaEgh5NdiG7UnW+ywQTOhoAmjwisz+WU4VaBAcDgXg8zvuORZrCDLigwqBNTBAjPAIFcE6+nVH6vgxYHkVS3ytul32o/LhggoIXcknrvu/Te7AkI1Hw8iWDZ++TM4LWc7sTFVCELAAQY2aL69NrZbhEm83iPpHP+neT9fIppnJXtLc8AHCx/bmYNoIfuypJwvjeTtJcggtVdT0vQR9b9fWjLdfuqGYRNvDxO823lE0ZItXIrB9FumnF12Z0S7whm63LE84jGQd9BhPvx7F5AtQcSWyHoNUm2rd3Jci0jGtodeBicQSdgyIJeiF5jgwq7fnEd5p/7Odrlygxk7HIOTrPLsHgX79mF0QSWMAEIDSJgj2GkUCA+ptZFCwGP3SggQBO7CshKMA96W0ziV+xn8mw1EGw5HS/ghXdpIEU1/4ydo92yJCB2+IX4hIpOAasJFgEOsrWmQ6RfP0ORYWF6ZXN4j14V9LHQZAYpDX9cAKruVN8K5u684qa+o9KfR23pSwtWX7QuwuRadETqSlFJD/mtyo5bvfR8Wr8+hE5tLMPtXq8bnhPoTvEzCB4F7PfLpXUI74IHm1cBEmca5evfnpcB/r3bVqAGr+jajEd/wdMaM2090in0Csj1zbqb7rcEBVLaXI7T+1W5WLmeSVMtzl4PHWoGNaPj7IkbvGNsUYR93NAUDiq1jhIsQhdCwKBXYehfmR169UCloHX72NymVt6R3udLzxGMNHf13Nmw/5BV8P5rEpQ27v2ldJ8j0U2zIA3fMQyY2BDsZXDDuYNtSwWKaxNXoFoLqrqMUeXT4eeRMVEQWsZiass3UbAO1ys1Ekck8i3dIqRb/bkGuWa8xZ4ERmt47COM72eu0RluiUKKBMTB+Ya0w6EHRGS22LzLLFfmhcgQpnMbypVB2lKMHn6TOkTR5VKD59OW1jVuZNLdcnO3Od1+Mp+kA6uUzqwagX2AA3caR2g0dg3w7H04DYWGYLXc0C/T1jcj8nTogbzWpx+X6RMKloZWE9sjViqiA023EbDlBaaGdNXzFlUixQk02yttqUSsfo7vn4LMcoz6WwjybTVRJlQQat+xARpwXKWerF9F0DBzy5Wu6t6nCjj0N5TujM89bOkAueKiPQYDhsPzeLF2EVPAtvbu24M/45mg6DnXlT229SLVLnNmcZxPDH8iKHxDeIzY7UMwA2qxYbcRf+WWja2RXwefhXNsZv1PjG2gR0kVM6/LvkHygvB1MtzMA0TPRlPL514GRf+06G8CoLGkJwtX4Yjhr6ExOYtkQDjszkXJc2HXIn/zdOCPJj2aWVrxzGB3fu5FVh9QUmclQtxN5RYKCLHxiqBhGhnJmms+/iSFQk/9RJrkDRqDZu3ulLRHzBvUZPmhuaWqi6wh6sK1m/k3l+9WXKU4FiehvtFEhWmYtOXHYNQ0ONt4tL5PBmxsEGUK3Ie9EwVLb+Sb3Wm7B1XDL2Z7/dmIjozET2XZY2xmrNjj4IOpZ43+1MzWlYvkVpnOUPIXwZqQuFn2+4OSgQvkqgoLwDu9nYOmz32fu0TCLT7+zSKOqxLMCovCl4RPubjS5+mrIipu+qYOIhbl5H69njmKN0GjXchNJIcXO6HA3ArofgOgTl/MBI2xwoTy7/JQtvg7V5TwZB5Q8kAgR2eYYp+5DYbih0cjG4xXHjmBnrolOBnxq3YEseXhlENQVPRyHZCmiEMAkoz+n7T7rOkYJjxnmEtbEvwnx9FWtP9u66AljeEqU0m46GAPEk/KSFyZPpm+2X6baLsLe83MkBMHogqJx5QqOu/a/M4HCdbbncsdf6PamceWPRyinW8NlRcJR69eKzRQ1DGOir6lI1mCOhLKzHKO3ES3Uf2vnPCG6rF6xCL1OiHdLsZUuPl0FifLSxTWZMVJ8LkMSIzTwQ6RgpJX4FuaxNgvQQ197k8nLBlhxggajPYwk3IjIJXmS6kwKGjs6SSwOexqeKFeNtVL+pw3Xh+I621ahpQT2r9ZVzvUYRfZd3K2I0hmI75bIUYvqCnUg3+I80AQd58uTS6cGRoKhdYLg6gjS0kmpMbWrLhW17vLc0Iu/zJHnFXmRE70Ak4dCbvKWdUh42C8UHmXYK+WUH8yj4sirWWw1LoK39plES8yoI133l+vPbX2EetyX2DMn7Y0furZWIGr5VYUUYlk32X1nZSC69VCPT70WkAjLvruLilOFa0QUQ5jgb9YBBlk5L6omnwL/EyUt5vElg5IQ++DyAq/8rpGtx95Y+i1Xk3sYhC4rwjYwZq4rviS4cse5LcD6bzg3tBhOmDmBXuL5n2OzU4blJIcKv3u5GeMMwBuV+0r+iob0rTOQuWulkPVRQ7jGj25Ku1BxWpgBnjbF92Wg8OZo89tew+Veyo3bTEJd+WJJBllHSH+g7CRMvhOVd4FyPZG9iaZHhk1VPbK2aWwJyOZ4Ku6+I89WF9Yjq2A3EnSaKJl2rG/k9YVKT6ma1sRnnM4RNG/m1xYq8o5kKunZAU5/pVvn/UBNWauCD4HBVckowNLng9K043DRzY9aOtwgco/qU5uhvG2AVajJ7DKfNpqTx17qrUAZkIjczd6ym90gz+t7rhH+2RAToEb8iPaFzUVo8kjAXW9TwJEMjQdakQLdPh6SJJvTpAZm4kUWRHy+WOY8YCCKNMnQrpIJJ0mqqqED0PCU/dgRqfiiZ20L1lmI7vWHff8IdSiNmNtal1o+Y6PqCvWYmhyhD6uekE4b7FQb3EUjYozn8INAOkRBxgXtw35IsaPczfzXSStnil730wWE8G3uaB6a+Yqd4vD9f+ovnb3HBm0d8RNph7hs1MiAfEuNBtFgOhbBw6o+XYGBBoaSV14qWO5h/JWp/VbckJy4ZsIM2nQ107jIT+MPPgd1tr2udFwLDm1ZjZ1OInZ5FI7+mskULBa+D+GoZzfqgzx+nz4VA3WJuio7ZviUy6I5OFB4fVdS2KqQs9h5Ca0xLP3rKTCT9hvW42gfkDge08CxVV3bFbHCQG1/npNuPG/KZDdWCPtTlBa9PvLOk4K5luGj/YKX7MmCIbN4GcKZJLLUPQlL67Ok5kYosBB7oDwiZwEUpx1RLbIZEHYyBn1+avM9LCPPd1Q/jjen2zIanQNUa4FSbVxZnMntjrk5kd8ZYPFxfB0Zq8UbsV7iSgcvlYL0eMCRToX78IPg8rl94EaIyEYlQDrm4Dz6R4NUYiqE7Y0rLPGVxv88zJDdUM0+5fjY2wzndtVQssKDenBBvkgaBC2P0cv5XCIhD8J1EQGwF2bCyY5FCw1HdjFZt85nwTQAAPX4KuMuPUqZbTRP3iBpZUnCVbRJkRBDP7UW+wgkZo7cNKG+F62GAcPuZRVpOMy4CwmOPkMZ+4LjEljAYkemg5y9r5geBbZZd4JAiBUAHz29YLXNUVoNyUQkKDOrtldQfFp1FLl4UUCIYv7u+HfP0tDB7Li5nXKCrMDvjH3cIaWfR9WM46HgI72qTc015xfRuA3Y8nTn+17MpNMKmjY9g9nBGLczPoHoVfIJpsrUAMTMQGqRJN5nYuJruPlErhaHR6qZ5soscmCHKN5YHjarhW4zs9vR1bW3PViiv7CVZWXM5PNbSqzRuXqWZcGLIh15RyvfvQzaNZAZ6Uifvd2wog8cyhJ/qNCYNu/brMgLUwjqWYYLJHuq+DFhfgVUSu1JNrA9XRvXYglwFEvX39KzYT9f7GlRxIKzCSwY17+KnKPdXvIXOY4KVpV+ScmSiGAsKGZRv5rDRh9hw9xCiT03qUb9BuXNya7k7XucTopNF6xQ7SgKU+F2CSW4vK/QmLECd1D+mT9p5xr//ljj6F81vEa5fA3k9RdqG22TiiWy2e3Vtd5xq9U8HDE+6zmi+imsn3QMmQly0KjcNy2Tu0Qa5tGTK5m4d/V0Z8dKYpBcxQztZ3SLePCoq+1uqQxriByz5y+YcYGJkNBlUG9tE2p7uI7knM6Y7cha7+VSiYWgEgwrRsVBxJaEMsKnV9AeDBoiM4j2ec3okaG1fmaD6CF3bbYqFp/lndnVAoH3/7RlLvWJypbw2jnD78iB6DSYZfHstTnf1VaOXbhsQ6ckpvCGuby8mVr4OhxV8ygjoubdmSWZGH3tV0cMiSCT8OeUh3iqhtFfrRGjjKp2Kzz3OKy0kSxOw==\",profile=\"auth-server\"},[\"desktop-release-0.16.0\"]={public=\"2s+eqEtheQnRi8zzCXg6fYavF7Vu7rYEdLf6hbNSgyi5Q1ben8bAy5qV5Ic7jyxruupolE3xiKur658sdBEfbzdzAZ+o0iTKfmEIOCyEQ9a6xEtzJVdW9HtqR/Vf0D6qZVNV/pIqd4jVItQ9zBttpkuVl6Vp+ZPZkMk/QlrI1tP/2gZo7/6HHbbIgiBOoxpoE65utrfP1e4VE0HUugwHJqXyxxnMV62rdsVW7xh5GPq6PZab1HLY+XnUZ50KifPFYL31XO8YMTq5Wrj8HQtGrO/aFPGEfHJ62lM6Vb3vw8UTUw1/fG75GiN9aqHgjRJwy+ULuVArUYdohl4leiy7FLsvAFZTfRHAQeFQ3785fRBmfgFe8vtOL2HApkDSw9qr6ujJk4JSgUCeHNaPRnY0dn11Zt8XnFfvn6lfZtxR5hbFODtInJZjk3yb3yrZWkxzBrpGYX7WD+JqCIMQfgaHEEgGKqSh29rqUhc2tw3kcXIugBDfroyN6TxmRHhKNYHAP8ToCwlh2I+pA8VErtqw+2vr0WLMWbXEqmb8CNQnNHWhif9u+muZKIjpi8e6QhZh9/8z/8pX8fUnbPr161R+ay6RaWLhCxB7d8lmCv1Y3XTqAxd3Y1KHl9Ujd7507LQBxTNCO2tm/DvznEudmlI/ko3XlY8j7sORZ+DKn5SYVZLO56vfM/dKSAQKPL/GoB6FTORMT1plSxLdX1jut5qT6pzjwVadyEN4JWSqCL3GJb1IO32toRvDdSBbUfUVo1+Ryit+gZAw2LA3U2EZbQqyJxi4xz5Xcx+Xuo8BCVbDipT1zJtIUT35Lgt4uWPWk8c9tOMpwwHsaB5b2E3cpYBWQHIPFZPXKmIGcjyhxJUGsaT7Np3Z5NlImjssx4zz8dYH+iN9MyxlnaA95n7Wq+6zsXogzQriULqMuOrmnOddgRUHo3f2s+DI/tGvkQUdWSYROjv2nRzls+Wbzw9l+n5uYl5CYNbW+kwGpLLawNda7UZxIsTaeRH1ASH+bhjITprbUk2SLtcIB87ZZB1yPLuCbbvehxPKLzFjDNzO2n0D9mBUzNwJPTW7r3fO3HrM1q1FmChDF9p6bWWwRG7ZQG17xG8MDg0r5nAcFqEZsQag0yKBCYNdtmY1CK7khFUwn2MOfufX6ZdDivpvfxZ0RXkgVqa8sM7RvKhlwyZY+oQIs+AOziDPqsm75iZwANK7DaPxrp5fyk1A5ED9waL03ZodSvJv5I5vkYeAgMuqsEyDUVUf0RBbKsJmIIxVJkSQtf1r0NIQcOWadxdFgoKvrDUsQYY6oHX1MB55P2EFjYYeo+rheMa9952152TYCg+IYZyDOWtLPVxDULodtXVcQ3qgE+61N+vR2kzdvf5Sb+GEASrVhGjvta5sIDpKeZlRaFZp6PRB5gNzDUGUm2OairKCYtoEN7PQlDh0+6Niz3K8iopq+7k9bLmd/3gh4ycGYuDMuVDvyZzp7/fqdtI2rp75lYT4VKLY62LpEWty37v0BVD0lIfrUwmGLbTRvvKEY32GQxjmvnQ9Yt9ey4IZwLJVDtxGIva9aYhD9ricEphxcyn2b8B1yRuGefSC0H5URfz92VCIrK6/90UGbyMlWsp5f53pxHk1tyo9suDxB6uvOkSypAn3FvIKV0B1OrS3ZXk1TDg1/ZujSJD4XXEvLePqbqwVPYkCj60YDRrQ5DsrVY2SiXf74ZJiBIzc6DOW8d/Fetr6LnadFgO8dk0yVK/DPf0fq6I7ev0Mc4DmFpQu0aI7Vswq7Z3Hk3QP2f0qKGaTpm8lj/eultxf8gzUEjminyjWQQrvjpBz3ZsLcL8GRKB5LZh41KYJcIwcj7ibboOTfr/S4oMtYmZ9zrx1ENuJfDGXvoJfXpklmOIQH25+xmSe7ZSOZ/8b2xlhvwGgGDzeztQPd6N0O6lnhxmhTOI80jo8vzBZERh2VtDfaQ33jJZlnj2uLGImw3EBiEBlOCr64C/67B8WvJ3kE+9nsuKFDKnaEgYGfOONcWPWXC+0QAlwq0uf/kyYFFVUHp2jyRh21eznYT0Y76VxMHwiOjqkTC7NU+/X0pqopz6YEReSExW4fm6asPFvtv7SXFlBoDrT+pPV8ZqWD6QidWsn2ZG4IGbgg/hL8uFWelCpacUxSn9RCCO+tfW78w+E+Dsz4wHtzXUFD3twi7+HTxAVy9EQzQLAILq6oZ+bhj/e+NO7O5H0/nCICgyhcmZcEnY+ZQYRqLO1IrQcSzvTLZTA0wKMk0UamSbUmplogiWV+8SYsJfV+ap/rbiZhEQrje6OxpBFxfL+03wLpxgR/pctCeUaBAEjY7X79IrrH4J3Q8rvjb2JyWcP+zCUIShwuTx0zOuSiiDVLtD3A0b+VSTdODO2M/Pc7c4AEjoDLEsYhsrvO9rDXYy2YGeklM5wbneANzzyImnp5k3GaLOp22cQXAdCbTpvN578uRK4o3JhNKqP2taEQu6QtKQFmxubpUJzHAmHuUwT5VBqkiZY7C9gBINm4AbzkVqU4f8JmJNM38k0S41lqzdH2bdR3kKVmwJSB1WtDr6yx71y/0+u77k/eQQ7WiNJnOEQvsXk8lmtGC5PdUMwMltbv6rbS7ztavF2ev8fFOKxdkfgGsbkl9SLdG9zHSas7c45yvr/SIOrcV+4H4M6+JrfNO3O5LHSqQHJr1qSfnu8YvbhvTzPiXbWuQHSIdhmYXbDhLqWGzwoNHzGJvilYaKH5ZGcEk57pcFO6LGWGmQmQYoEZoXyoCvlQ7+C4IPq/9xMtHq7JIGQDNNc4nYYRJj7cPtuX2bRgiUbWdfa36ivddB9XB/khT1AYswcz7bcmyPzv5WWiQgf0xNA6vEc+cgiRZluAGaYzmxnGE0EqQE6XF8DCN1AUEKn+7lyD7gxOfhRnqYutYAb7srenu1dIt6T5qtqUnTM/hlUP2ivV2TCBTfnyQ2rY0fjeznDJToxNTFjrDcF16PTCb4te6THJ4QlajRaMAyRfm6APATJLKzwz5LnR9w6DJvKbCrbP9h1+TCsiBZHPLza31qHwg9aFELOoAan72JZDGCLrnPxvXvspfsxvTk6sfegzyr5D0vVES8y/hjEorg2s3sLZv43wi4am9eDzNRl11CS3OAbHTE0lqxmysbcaoaGpreeDUKTP7W40jhVZHvhzGPTw2dQ25YM4iryC2WAnibRb5fLlzFSyGFdpupbTIhlc2eJrBFXDqR5hNRw0/04ZmsZcvJ6aHCtzMLrNSLvWNF5Q4KKbt77oXalzAVWYh84ng7Db88sWko3L6dmfLX48uaZT1sw7CWkWNSL6Kf8jJYQRkJnW1RxFwfO1Uc/IrvJakNuDAl3wwUokAYhDTqYTgFGZR9M9aN1Mnna9B34B+dPnjYjJjm8J6s1DoqCIMEjFO8u9FqEvp5qYh9A0rjhxnoFyt7hJnyhfOimzkOmnPBd6/YFaQROVGXIjTM0YIkMbFjwh+E2MCS9O5KUyio2a34dK1SYySiCA7aEWzzHJWfKXM6dIiMm5IRCdU7MUoGOGzaXIL/jTwkcE27s7TESzoFo3d8lnkS7eT9fRNWkCU1JMYeCS/8bIIvQsG2799PyHXFVKCVXUgl+Cp5rjewDaEvPt7XPAtPTUxtC9Q/Ezejbaa7rKlFh9ltR+ODNo0aC7Oc6wHc6ItDDT4kyFZ4fEA5GWWv/braqhMYP3k9HKarHi26czU/0yL6eGbDDDQSe/eklpzlt7E2OCf4GOs2LEvJjoxeqdlpB+Hn3CTOss5ddb+G6fVwd/aWWjA64xoP/88g9YvvlZN8mnB0up4tbnAw73ellUIU4sv61AoTyzr3N21J8xo52gA5MGdXgkkEsBeFYSb/tbLYbsRyf0HjNVwZ4AF/fg3arBnCbIGeLThHlDhKYySPRgeuMtJ2UjVof2CrsX4hzTY5n2EguBnyfVtJyFRBvlufQ+Cjp1wnsNMDIvAGUOabmyR69S/Gv9Vo6YPfyvtnInJ3c4xQeB0oCr+Db1J1hUBoOQpHv9gTmWEcECETgte6ALOlomn6HbSAfuntyrzokRnY/KhatJSm3lQty7K7lO/kEbJDwI/R07G4pCOnM0OCHepNt1ccaTdYDUnEe2OUEPsY6gUr4H5+sGUmSyy6sxNfYuvlRT59hoWFFXEk2BdACqYBDOnP45xNntfmqrJExSMoR55ighDUikcF7WOgbfCE5RDbpUw44JExJGYm+j5ZWtdYaAA5bk6i8IhJMDWKnBG51Muq5h5aAXsKvMWsdBf/kh3B1iJ54z9CCG8R9eZDHEULhlGPLJqTp4bdbcog9cEwdN7rGqocOyZ8dFojQdrxZ8xTKeOCgdWd0H2+XtFmNroZzOr//DpjWKdwC/GRiKBws2VZgbR47q97fvzro9EKu8CgM5qezYHcppDAiSve+MUTpDe4P25YTrrO/VaG63YBHF33QLi+W5asT51RPSAQNZvCPEbb2WsQU+OTIu9bDM1bqrV1+PW4d2PLfOj/jTTUR4U/IDiPWL20ih57+K/XvLYVN6BVF3a3/N5akWJb+VFk8kgEVpY/stcu9LEIbhDMVFNWFNkFA4FXDx4weFxnjuDkBIqmJex/4FkK/krehwHcuV2dw/1II/K/aAGGinvcuwbtmRPa+h0gFwvd9tZoFjLZQwyLG40x3c1CutG9M2qBo6LUKJOPBN4uDrTo9BsiQL3NOMUis8MJYp+eOgmZt8++9K/LNmV6WMmRV3wSuW6inLqo4CHlNLelp9buPCPBRMywLblZ9L4RP6v8haQwIP2pbjvgKItj7cpZ7zSNIqY1Zy9ddrl2TFfvDeGLrAf9qxDVXoCznp6dgifWGvia6MWk7KjR2KUNR8dd+JbCBblPyQtFmGbF7jPO4jtpUBksn9424SNuRgAHI6Df7S2dnSePPEJWBjH3GGamiX1a/WqkSXAWWb88q9ufegHfzxSuZu5WSGKUebtoO+MtBwMDUZsRE1csxDPB0h4L3FTu5xvSjkB/c2B8EYgsHGVCe0gncFdht1rgdkZ58xLoPJokMngv/BEJ2yihQFVZKD+OwMggG5daE3XIpHFCf0CwH5Rrwo+E21IxSlhwGDEOdkEPUCX20uSgkw0lqH9FymLjGcbQgv05BJEbJlcbDUfhcwMCSrXyE5NYxmz1S4t4Pqz9dTZ3SwZHClz3udR12SWzeFhbiQnhOvpgXUJ8pwY3WnMtqxq4L1kQObQXxuu7Gv74NFDe/UnwTSCFsxGY2Ci59ZB1g3JVLiKWXziOcsXH1Q/yCckjrDxSSpDZjpuIeFfq44mbqZ/jvY42cM/ME5BOlMT9XU9rtM/ZPGnpqrt0d8GDQxNnZ7IlFvJTz/+pu+5waxr4hgKqdH8N+AODcCy0glMSyQotC4lOfXxzHUJ04WEeb8ERugo6hUZFlTb35pkfSJVQWOxbGrg4/4bxDBfFJNjBy1Z9d7If9fgZTewdzzenb3sC9vGEOVOHJCmIr8LksN57WbvL1KQT8GU1Mdl+tXu7YZ2q3EjFUS+zMBH+j5jCFTRmRsekO6Kk2FS7WHk3dCaU8K+FwkAbxYy6LhR+AAH9QtLePGLyF2ZWY21hQ0zNAcEco8tpEmyQZarMisZhTWGqFswODsN0zB6NTETk0ZKlGFWebaHAqkr4LZZLtgiX+qbfRTswQHGBhJItTu1skS4SQiJ9pwgNMb57bW3B1n/WqYj9lKfHQtammJll1WuLuFUNLtQvjybUxOhHpdovpUt+YEca/Grn3yU3O3QmiVcZ/oq++B1XoZson+WGN3RuNYNHRKXtii9Utsqxj+Xp68KXFN2VgGuMUn4zpjLU7HVGo818EuTeK2rUvnz53xdwThQuxLPbmqwSuO4VHujlGFLpA4CaOgj4ozW8gdWcoX+zqDujjspiEwxQx32Zz9r1+ZPIwHP4Y8rnm5Ggr1ARgJB8GkXN0W2COplqHt0fp0aVddkU5MDsiIdtv2W9Sn9/1xqrB7TQTo/Se6OfQDQ38huRe8MJZlZymIoULVyacyB0kBowW8Ytkn4QYWhmX3xlmqngsba68b4szO/qWdpswyzGWn0zWkNhYio6KvUHNInbKlgMehvRu8kdosWGGdxGNA6iBavIuy+w7hL8MJBpZNcQZjyCa8ME817FV5TYdba71YWCmIvchjiZqQ6j93AB76TsqZqTNqmgkyjJ+0GhDLL90xB72CRthpdcsvGAOsCUL5qExVv8uVUHWjpi0Sbb1FBC0BuJskeigmlb9wQsDgqXrvb3W+X9y8HaLupGpcBk3uQ5q8b9D1n9s3JB2JD83sSlU+d8Dl5iqLjTNtvcynxpmOiWJ9C4Cw7lhixlidMdYmPVQPTzjjLkb1Q36xDG+AaavD+BNcMOEAQb/1ATrHBipT8VyHlm5HOvKknrTVZ5ijLsRQ2O6VBqxgIj/XzN8eyFfbsVIYWMQ4JiYWy5f1c7SlORAR0DN56hnPl9xKuMqtwGaUTTCgMiKGRURBki4NyEV0slgcKQ67+HnNQJ1FSO6UkUY4zfEZVGnwt84X74txXvachqiFU3P7VNotLynP6Xrto2twJ227RaGLW0J/j+Ktnyl+XI/W84Ku6e47/rbyYCv7TxxF8XU/wyYa5ga+hlCpmjc/wgw/Z0FyJO9Olu28kJ75NE+JIMy8xOA9McU0IUb+kYd7jZ6xygaAeoCYLvN9SdQAAEr5FhHAe/u7mewQIkPXUaws/0KrsXSPUxl/ry87V5prHS2kE96/y/tHkwmwraQGXL/xZ+EQhnQXuRx1rM/pzx5ALD+JCJy6XaoAfZIFd4RZaLkCWuTHWWhIhjp0IgE7fzFldldOP6nCegaaHobOh9EvUyKTsctofq54CbMNY3iwuWXRb+TamvAYI+JdJw4n4KilEQqZy6q6G4BkCgjxa59hxs0MKeIHWBdclojGOSk0G+3/QiIFGgtVJr09ch45KVXrvLUci6vWXteV9DXDDUZgBQdl6q2N2mvZUqpvY0gLRdbvnC6cGYDz4BbRl1jvAYUfkR/bvj4IwIAULjEdwcPvnBTKItB24AZy6zT0XgiyNvb+OdO9PWDX7hX9kqJaZjdNsbavC7Vxb/Tjr/ieKclLyMvs0y9f96OmyPqX3uLYwl7U6JIh8ivjoDZUZvEuP90Wt4nHSwH7HFibpPdRT2EC28UniICIzHvZVRJHUKZXkhDMet7Io+BYJv84YCWV/WPgdKR1kybB/MjayfXnRGOOOsczd43JWH5d52q/QkKXpsgeG4iDbOAwce37zo9jNbGjXWtfLRJl105exqO/1/ZhpGFK6KobsJ844+jtmty3t+s67SBCbtUDzgaunzGJrbJ/3CBNMc9/z8vpQSgTTWvgwKvxmBul92sRTHvzyr+bRzUdGB+vzzQcZXnv718FRfabiZclCadW7v/wOcSiAnB2rcdU0tTXaKD2mm+0g4/jTYMA9inyGYfBpbYqcm8i5hdgiv/PrVz5urxIeFoyBV0tcP96fzoeyCv4kA6dSXHi+nPKMA9ed+t7GVaF/fLPNQVRj0CIbwrNdQHTJWfpBYeNM/+mqV0yjz9Gj/d0LYXeunuoMK0LQt9HxkRVrgIpUe53UhSbDaovPxEsJTCYYDEAsAtadNlZqB7WqGG4Lze0VW1268sv8jnLaGO0WxEYFFCEOcs491H3JlUr/ia5AvBx5hR/K1k5gHq8UIpKUjhC8vGiw/BR81uM8DcBFC7BuKBwhJQX5Szw/ekmnVVdLryf4yIv/I0SmOgs04/X8eMdvkNk+KgutKIDO6wGjKyf6Sn5tdJqfKSXrczCMB9GfO44AekSfO+wrTotBapxttjb87OCg4qZwKgCq9jvoPuxK0Xc3NOFcWG1rlg8uaXjkpQvsKy0HbL8RetxZTiQm6QfecruRV59jqmZUiYr97wa23S53QoHrM9jKV4g2ZBXLCF+bWfWiblAXGK6VQ53JIVrnqEDQyDR2XAB/H1IdyKMr5hAD/FFj2YPlct7EfNdbUaydkwXrSWbnWJ3fJUdIhBF15pD1s0TJmGlsm9JIqU7bK9piSUPas6HRttqgNWhYW+g3P8BIxyTSgjI96WZQk4piZMTikCRz4s3alXxhYz7pVlai+0mJHdfzn4Y13WQC9X7xa3dFBTDfcyIJfjeaWPFDylySXDvYGHEJVDu1Kl8H+0g2lTV09tIlaufJCY/ZGldaybvZeEKD4GvTIngTnYQtaS+p28p55sjXHg/Zf/0ce1H6DJi0KQbMcc29Xr0t3zLCrnjUzFFODwGPm8dsXkXWRXLVowyBlL/RN60Qka4vBK+6x9XdxifnjrlBrf2Q1wTrjwnIVtB8JUjn7m8gwcHuRHfumUYRvveh1wR5024JNN7CkuSazvzu0MGvwM5C9QqrqbG7+aAWVYiPPMZRXpl7d0TMTr2ulf6EHhuAIWctXXj1vd3E0sOlucwEAnbYu1isT5Xo4a/CkN4b80qUAaZBp0Dsn3WaGEywV8hz/etxCA+2fi/lsV6gVl3A9v+LM8y8NX/Z8es5vbFsmjnFowTWRXvT/+C55gx4dlb3N7hmebyrsm59kQFi0rcF8x6KnTSb09nKHkU5O7JZBs/3NXzmGyn6wZOR4rjDiFePgauJtqAAcl558cK3RCAhfXjiO6QsoSAWdkTbcXuzSEsGfjWn/426qsuNCqY+o9+WdEZ6ZrjikD7tG8lRGJsdFjNQGxkxZ/wVaikn5PuyBH6sZIaKD2CA3Xve6Ek2u4XVc6FisFAEUUwEBi6M+8uA5jsHQwd7DcV0pfBCrW+SvUcaJC6RRHi2GPmV8UzzSfJXue/oCJDuwFrGxYdL9dHyYp82TdN8MywXbs2OPmnIwwGkBmC/BE7VjygskmKygAHfGcSiBWc4Da6e3Zr7NgZ2XyRNsHqH4n5+urCK9kKI3GIkYh9xSAhvDQ/mrmtoGks1VbqdGVv2k9tU5d5No2sQKbo3rIWhkX6nYb4kxocYvzf8Vt+J/Lf3ykiP9fGLm8om5i3+vknq+Yh/6hTBecD2c1ATum/VfwYy0HCkEL2jNKn4uYIiWaqOlUxp6SRjqS4gCCCaIRGXrMRm7JjnoIQeHZQZPGMz0J4UGU2Z8O3AApyG2CP6mznIGU6egAS7WqLzAo7l2FCbzyysCtVlBZgHhgBJLK86DMh0INBAnPp38Ojsq+vOWXDbeBvU0kXEjr7nqWzVr/EiRko2zYy98qhvFqwAP3bnhYiMuPLnqGyo+DASlksTUC69SFmV/5ZqRaUXs092+CRUH4RijfDrz+6L+5YL6zD0N9jVD/Y4FtN1vxSt7bRX8qcNoU/JsB8EqhxwKac1qvQNLjClUWqItFBu4bKt/X4AfydCpJvZE2yFTVb3AwUbf4teqGhvyOjaz7XjRkxsiJUoJ4kGoJ6xYEkN+WF9Dw+SKQ9ONZyxJoNA9mBHPHEtGW65kBdZnbrxpHvYxjdSTyoLKJSeJZMMNjZRK+C/eA/bH0Jw2rthWAl5YQ7c+EvHn3faPa9rb28OKC0lA7/Z7uzadv0Gfy7hT2Kl6UOvSQjlte/n2R/4Lgi7zI17IFANx6I8dFsV7dAeUWbg8YRcxhnDOXZOF7qb8uupPNhwAtNEM+ZzDIpNQ3Fd8n+r+O4c9D7vL0zuCEJI13bUsR3PYBMe7gaWwBLm8dM1/giGoyMMBj4JeWRUeg0SmaBBQJ64+UdwchtSP93EXfpIBJhdvTHzh7anjDawmS6JzH8zmDMALEY4T8IuT39+Rl3l1Jz0sxUVCX3PqRk0uQnlxgAJfPv6G3Pnew0hH3nCz2feku/ZF9oP9VzjgHtTPE70K9QwuOrZyW/onTpxAxapzY9gXxAoDZtBBHDV7zRUlLzyHjsq0c2i8o8TLcgiOGgShr9iD4wEbCqtnCSuytUmQ/DIhSl3RzC0rMP6U+qBz078oO++lNkgIiczXAWc+CmNhAYdrDreRmvikJ4Ip4mGQfeRwU/ADwPHerPu0Zf45LeS/0nSz3d42H+ShfHjXUPAT1SHTmooTn49hPCPV6nhtFQ7Rr+3Ua+weUcFCU9EudeqBr1mlBnxqdp/YDW0nf2SuQvE5Dtgl4Pu0LuMOG37IZ8gpy4+LBK9CpX3z+C/LtWC0olBH8lk9LlDbdNUBISo3qVELHIkwuBcdFAOA207Lm80diCLXfDnmJ6r3qxeJ9esQc+f87K+yBdv3Ukw4yTi7eHKyhRoHAlLJARGYsyEQoPPSxPQjXmdNQq10PqDg5v9rBm/JreqopYrLlq0AAk0Lhdeq3f/uAE7saHuiTC14ZEtI0BoxRJWOKW8NY0yLgmg2pS3qn3tSvtKR2SuzwrfrQb1gwCxRKQe690ajphxoa+3QZQteX6duOWuIIEwnEoSiG+JOpmZDJkaO1qNIm1IvrbyEmWa/Rv9rgfXGsL637QZPwVM9dsPIoskAklQAh1vUZjBAaAFt8xxRYq7lQnGMhJnJDJjgBvVxfVgw7+oyBEbuYdB24288pyFwvAZNp3Of0HjO3azCqn9pnPh3spRl0enc0VjUS2REOQJo9IY1CRDCWt5iEJsxpGNhVihmfUIFC0BRwbhSzhLUBmE8A3LDcqjkUuxtVThAnJ8YEcdpCXYOQzH0I96DFQrlWgDE2OdwQGD/Xth6q0jfWp20n8dHLyxJb/3CkCbs2j91N56netDSxUCMlSH7/dFFPfl+w41VpchTHIbvtDhhCbNWJtBJ5WrvJQaeiRTMCvHQndY4llAdnqO3H/UF0PEjOVT+ger+KP7KktefFOBV6XMjoHxOwiaj7JZ73fmIQy14mKaR8Vd1G4eijWtUrz/9NtJG2Z4VWfcFleH7b1ekzsIZWC2uHMGkU4WlAAS/cplXsmdxaErZkyMq8fyVR+ru426r4C9g4lxcPl5mESeFGaEjjXWfw3SmaOHXjmWG7Hpt8pEHH6GHNjWlzWG+qlZloepz6XtcODQfkBolFcN0zo62q16ReTy6IZTfORBRuxVxQ15+CwpPHl7/PtQ+gw7OJQntjuTEr+naw2/auxMUFmULr26u3W92ftdP71C6njVi3sxn8UYNpRqBaZo9xcaQ3FCdvOOvtYQLMsOd2IlC3+giRPCE5hglvKLYU8754mincLHFStXIONFvEc/eh10ldPaEzK+F6rA7pr2/Auy/KRc5roV4se+IJDFlv4I24OrLkM/b153HQVcrgjG4iaCAdFprnRmRW9ka294+rPDRBA5TpU925oUe6kCrMgKe+1bw0dLlcnBtlqJVMH+weoQgXJUSSPOZOvepp7sDZwVyY813pBzz4NXuQH/yYIytgqiv7hJtB3+cKHgj4KMlimKCxiWIhupLN4oKlbbjHnNXqo3arJPlo0jsXDg5h9A7lfDU6kk1nrZ1KVemTDLeQBXKhuitH6tM3sj9k7+KxaL5rcHHDS6ZourmisM6aEPz9p/aoA3ctxEtoi9e8ijALMFNBMrR32n+wjkP9KvKlT5axETq3IPDgFfxzw7PM3decMMqzgv+TI5ZhZ4j+rmCT+LJgalOd3zZY8WZTpKgGIXxV8DRtoWfOggqC+JkAmNwpZ5eVbP4orhHu6LvbuLNLQzi6KO9RAMstDDqzu73DYN2+0EpssHkAZRb1up5gVwLRtjKahF1nHRJHvMx2MUV+dwVQ4NDXYICkG1MpuGTeuCx0Wc4jrByEzg0/t3S2mGZTZt+2mYM84EN3jo1PEVX9QPD+l9xf1zmhlrHzqL6bPUjYjkzfG4j+R5KGvEAhKPwkeM1OR95z1aCT4gFRQ6QTIETAIO7M5BG56uqaG16fj/qPhG93zA9wpbGSBoXS76OuQTRqPmNDge6wi8Smxxoyx+rS7+73r5zyhKnBSXotmjomDj/oChWjLcbXDyM9R7w0GBshDcqqtkdEOv6DNijl2ts5gVHaVeQUoSkmzEL9XMW0UXf8ndCZgUGzG8YCI7fIltkrTKGiC7dbOzYDpiqBH7ieMtzdph6HIH3KA3ZsYt/H/ES6Mj4SeZqBEwcC81KePbuQLtlwUs/uo+Syf9YZIcIhM1SNBWgHU6mpailNgbOQprKuP+1zIgHquFAv7pUzCZea/J0BhrHfTFQc6KvdRyGbSNxBdH9njT82rN9m3d/YTHOSJYLC/sqXL9axZfnJoVD1mjMk/crvsKskpSPXSW7g4qyuUVxX8NQt2w/9FV1+JEu25/Sq2j38Oygixfhxfm+ars/rhf+b6S7aHWQSBNwWK7xD837PssmaZGKPT4MWEB6sGR1TWZjalRNOg8XuSawho089i+Tf62+5e6qcToVCAI5atAGq6Bn8wk2zr9dsf6Be6y2WVSCtnRADw6U+/EK4zZcFYQN9Yt9paUtAf31NZOEmad2zTYYwTFNOsIzny5i90seJ2HtD0pP5EDWnyJ6qC6VStcYC9XmMkfZ6P+iIZ89npZNtzmoqg3j/dLaibTGGCB+szYQ7ERU3cAbukqgwTEj0luznt7VeNfKaox/b8Cn+pyver3V5olThxYw68Qh4iFad6ZcKXVA9xuXUKZg1SwylikwY1EzTbWJal34E9Y0WpV7U/51cIeb/lCZc/Kg31dL3FV0IKy1HctUxIupQmZmJhNMfdwhF4Cw9mxReZ3Y62zqAshwed15fy61qh3KjLGlYqRUwIU6WkxfTgfZHZ3iZzotAoYb0XpXbLmfR806H/f4BZY/d80qLvKkungL6UN4IiBUMm3+p5Aij9X28lPQXJ3q92Xr+VyovbkcLub7tuKoWnflsbAzrvZFb/EYM4ibC5+9jZiuLADPghpHFBdejukU+jgqfrRzEZQMtJ6sDrSRD7jdqydIyh8bsRJVonICZev78YGR69Q3os/wmQ6bNRGStpKCilk7QUbOtMJieaxvlBszdXd1rk6rnLGg6mbZR1E2aORWhxPsbLuUne3Bn4h6b35V58x6dbHvYqDxglyKmNtlxOgu9g/d/67ykEZBxFvRXllyFB2YpsFXgh9TV1retOjRnXX6deYSx87kUVXny/6ZN4KR5KC0IJcHeCB3XRFN+ZkMQ1ssZqBtA+dmQlZYy0iTm6H3I9QNoZyQ2yDGviqqjhpgKutdVa/B5OnPm8LsS68hocMTDdj1vNVbakdp/OtqaDylHtDjZzGWC1U7stnLvwA7SZhCVRfSJ8ExN7t7TXN7Df5Oyevz1QMDbhcP+kE96SJfzyhg83VtXfNsgUKJVez9zlMlUNYWS0J1cGNOkLXDXbMt2RqI4kWrGzoWIZu3YdUIa+QsDipHwD+oyjDL7yK4wOrZ+gOauZde6pKhpsNLe2JwAN0c1jT15F6S6r29L+NMfKbmwGgMsv2JWzs2sD0Any0Z6ql7lKelOiEZ1AgMUtAcgLJ9raVkErUmQUm7Z9HQEjgrEGVtA9nES8aFdOZGd86ibPf1kDzJqRTjMdefoCGh6opIDcb7CIw7tKeVflAm6NYVgiYzIrzVZjiWSYCocraXZ67/n0PlN4wnVr0d8016uaw8UQ9oJY9lKFXxauv+3CwYzwoTSOnKUux9pnmL+CSIirlRBwyuOf99uXLpf8LU7kCx4x4oQhPbqVWgWVYIe/RZKE766YL7pPXt5tGFZmLpb4sJSK7Rq2LJXoX+SOWk67BcEUlGlnl9rCv03w6ujEjr6jyQ2OiCuCeSIa/U/Z29jdBhcYJKacN4eTFpgGK39HcgWrai56fdpCNnj23Pxsor1sSLCxI3/017TzLajYGU8EY28lj4e5e+bVDHptd26udNgkU2V70vDCCNnA24Nak/z44wKNIz0BsWGc3VnM8vOFhoVCPn06rPd2Uoa/p77JSUU3sn5G3dsHhoAVCIYUF8xpF+HLUwcdvggdqhBNef+CJ+WbASFNKxUDwYsD2Rl011Ncc3gtmpBoONYR0ESFDdBNjnfnkvpDmbL6hKSOXds6W0JViTn7Xq5QOoI0LTwaE24yNAffi0UCG8SIgNswgIYrWLy7tw5n38wz4I0QjjWEmOljTPRQEJGUjhSxKikjMq+n68+7NoHHyiEDUzjQREIOhyMjfZLtBg2zyIMyg+bRSoCF8rwAa+x1JoIKMQoN11gsVEandDgOPS+ljA6bCZLYku1nOQu2F02cSIZ5y/ZfFs0zVW+hvWZGvgiG4wNi9zXjgc+kGB/H/VK9XlZd7gkiX7ksP/Odjc3Iw5RDviPzFPzAFy/LE2TiX7IrObe4lhFoXwE8pNuOEmnJ++D53XlUIr/jY2LfeoPUnd0RLO7tGyKfvzCnKU6JXmRQaUYoZo4oKS9HORV5lXi/pZVYRE3McrjI4DsZiQISCazpRi9uE4r5hWGg6i0JJyhLW0BXxt9vl3fI/gS/nKgwEw5Ur/TGWaD6BjjdffurCAiozaLdeBPWqGCsOGCCETvrOvrU3AZAOjHzNGAD28Xr+4MXU/RHrFj1EbdTJHCwtCqGO+hxQ2WLEEYte/vIJ07qgwqDtgELLNFLXZnwvjNxAGMgdSnVvjoR4hC/Om9O7yW1iaMiVjWpSbApBvBjQ7R7N3mntp7l5WHrc0qzXCWTDMf5mWu9y4RYI2xeJ0D5X2uBgnOEIBfBKr6enAYUC+EQA4uqyz021p2XMtvwBqvee1ubLiKJqlXNk0+GCsTn6XhoBI/LqkKvvZhqNXxf8JBY1DfUT3DS8AXLiEWq3IEGfv+6GARnHFxoGrGzSlVcXMxyRFXbSUsGrprfIhmiQIIqW7FoGg1XPk0HQv9hP5yQFYY39HwxbBjlMEg1+NAL/ZTzR7jVHGPv7TQbZP/p7e/MGnrjAVrzew59br2F1GyUTFO0mH5mnWKXt+oDJbbXjiqxVWnNCDCjmx3oxE9bShbodagRmsuk6+Z/Pr9ucRnNdK7OYs2tb2tj2Qsv3EtYNY5WbzojqSc9o8kDJLUF6GnO0MmUoaUM5C5QOU8iTsi+wJyW5nxCBGwPTshuvESiVNuWMWvmWtCoVMl57jJcxck/1qenawviz0mn3klrds6xNRlWaoyHoMzBsmyj2PEuVpEE++MDlTqmr7Hk31vNAS2bhUNWBJGHH8fD7T4cEg3G0Oc68lstcdhsfw/Fxh8tTRPiaNeNBodwL7lLTLPcEZj1AKA4pdtr+PErcWUD0ftFZNIWHaxOI+ykcluYjpEIwBCutsZPoWuLVLLbhaC29bh7XydJn2DBlakqrGFDXIRSz0mbjNbiou0BfrEdUt3w7EcbklRJNerr+hAvRKwschstdZwpOWeTwqJiS0kXVsayYLB5icLjb7wylE15ylwJtW7FXE23zJd4T5Q13eQreuha0Zg+CSaGUY2Q8wfnjMq+cGO6VoQOaymJ1zngQ7mO8mGB7f4LHyaP7pB4kkrhBAru6FWxfeUXDGOXeGEWdrhanHrKQmbrxu+7W2VFw8Xs5PoM6zTm0g+bOyU65Gff/vq+0H5Fln3XoSVgKfO7EX/aGmY64wVoqj6dc/v24im2JWpeQAGDll1dVF+29V/F564RlaWduVV0ILF9IbI+afCMCHJosVnm4RzO3YlYxH/g4YLQKv4trqZJu0mlwzbd2UAPuBrw7/3GspX5gqA0XEDBHKzPZn0SFRjhIdRfTwY0u2bY7mygUIRb+OErJtQ7epy38V2DOgulmR8lczkR6+CudW8Zt+nXK9yZmu7cwdjpXXrcLtCKFgjqgzIk+AcHhxozPnf+ynqs6X4Phq3+n83A5vtv4c/5BltGN1+fVvCR3YbTvnURjl5nmuH3pxwEA5alEO59x5g9Yd6sP6ubiitI3vp2jF1VibLRVcTiKCnh2c/z9BlYzy0H9tBgYdgtYbqNhjPIU/30nlHcQ7Nha7BrXSXa6BrM4AYOVKhwF58J3JwG6aGQ0ZKla42GvZZQF3LmeU27eaWf4YimVyVhnPRDpl3majptDU/vneaovbYAATqXgRcqu7KYQdBJ9haq111ImnpXaTjXP08mZL/0mCF0sJXyNmMNBWKIhaVox0eNdlWPm9kv83zHcnVVO0/BWkiaw0YDp6mglNbc/8ILk+NGYLWyDOZ19WtG+ueFThFlXRrj/uRoVbaVW3R/1ICXH4fB/BitDQAStIdBMeK7b2XGLm9c7xZIwe5GFN8EVqOn7EvBI2lvGmamNGr9KweXQkhEFGQfpiyd/6QMsyIKqEQT5bvXFoeBAZ4DEJkQAJZi8iWJ9dD7XqO7LHCalS2y4fMRydQ8a8z9Sl1drFGhFlHANmxTsk2KPVQig2OPgGgECGwuKATLGtNCPcNbRvJ2v3gdp6/pRCnpIYh1wjLVBymRRjt0bjmMO/8N5JY/7lfURzYpDAbu9+Uuq2CsHn7nfaaxMVnlLv+Bs2OVzSDrXbxWrXnHtAKiJeB8nL+n3EIpQWI4scVgzM+uMJ8APtGVdrTZVnb4CA1YVlapRKpeQu/UWZD/Ju+0j41nMdILOkBW0zk7PXKo1UMCel2eObCLyR4cCHVFfxk3VQxielBNhzzYXK5MtbjMcKgQBk6bCg+ngNy74JVFWYGIsx4jghyQH5E2gd0GIcWpDjvLjLpXAMpi4MJTbwCLkRsEsDp4l+dGiGMVRiz2xbaHQiJg+k+/GyOv4XPJsmwyEfClFS2YDS3ipoSKn4L+MMrTK4jdFGl4SN5iUykUYCNeuTkYP8E135lK8oV8jPRD/bO3ni/CrIdn8CPYbf9TtE58OdRPHMqH/zvTYSD076RgeOrL7ILSkAEAPFC8N5Cgt7JEZP1SytoIWNVfyYc0/ceaS0LuMyc325ekHH9PM6qvVBE4wtojXqCx3V/3oxCMzwk9XBZAtyEHZdKpKSRdV1uLYeWXKCJNlty6TcsKIEiVmuxzinvpeRh5mrjfcsn4dzlK1SUZHQNsUp6ND5xZ4ozlD7PUreAn+SH/R6KeUZAilgTbrwVm6/q0ASl0Cu0mzlVHT2FU1UstOhT7zXsN/14ykjsMiZmRnK0xRm5WYNvW5JD4m7Qn1i+82NCzdWSspxoW9l1dX1qkwD6JKqO46lh7CGwS620i2F7GRjhNDUxecClNzm/CsEDL94KuxyN8jb9h91LwtbKWPooEsYJWdXIxwJf7XGgx3Z5raPRt8Y0n8CVhEFVt/RUwtYfHkOmaLciLE7205Wk4xNvWmdBLJekfqwcXsZRJ8l4N2HbKEupzdNmIgH8+lSPsHDCdPU8O8UMPZxG1VOahTetzyOJAv5xfggV2jxZ0+7s98+cGIJn1yRg42vEPwZ89Me2NjChsyTTAz2UoXoxqvQc8d8LV2gfZwdpfXW0zI2Bl+0Bx5nmc3eCkAXLsTyimuISlBujWnly4+DS1qCVVBjHIU0RfWgs/gb3Ttu3tLdlmGgWHl0x43suNJ3VBK45lFAtND2jKXDMGcdp+yA+J9W5m6vGIVib3YXfkpm4L77rfGay0QeW8FRKVfYAuNe2w++INOZp6kt2DTE/+tl49Ul5MJgvZH4bFCYk7/FoHe4iBid2tPwY8udpmtZ8gREZWF1hl+Kd+EPy0NzD1BN5gbK8qssiDhgGX6HryiCEreUcyh68IqVM7VlL++Sek1KG9YTsWuLyaCJu22nXDOQBWZpbUZ9OUcQTcw1KmqyDcMuZ2lDxGbmj+h38PHU+sXI3VHFwH/Sm5ZRh3093KgablSZSjz5e0eaxb7ND77Bi6+BYIheVYDOodNNz48vQmg/4IOMRiJmT7+xCIgJgIiyz2KgaXJ7yxM/s5bUeP8w7Ul5fyjUv6x/Z/DxAKwyHk3efrl+09IhumfDv+ptJfabqBIJAqDUuj9QZ1xmND7QwjYNBrIe3mQDXiexvLAOKbeRDyu04fUp3pEbqc5+LaOeeRWw/fVpVdttioZZOZEBF9wLzVp+voMPjgVpOfg6tWlk/K3zB2myu5CtyJzrVnylPTpmbdTOVFmo9G1BgohXXWASQvgf31Xeub7vt/X8haQA2jk3El8qbN36b/MXCIr0Lt9gUsptmwuXQZ/AkfzJ7kf706cSI8stFMsfeNia1EItzt2Kso6SZEdEPI42RnPlkjF0xytDAKHcm/6ejbaEdUtgsQ/6e7QcofQ32pj5lqqCsXMjFNtZ7clDQsGNoM4VQ5gu0hgdb5crLEFiDCVKFMQWdG73sOjMBDwpcv6xmh7GHfVox1od/R0mgZ8OtCRWK35l7xDZdcEB4zrwswNfFcvYmofcvhsvOUpEmSvKaN1Z9V6OZAGd2KkwhTDXB32dgoupITbSFMlsdpE0PiGOBDaRp0glxtlMrty44qUTbfvxGrAQJl3kJD6AcTQEgzDjRn6NRiRipmtPhse9KdIu1C/vNklR4U+g8Ttm8wFp55wRUOE6w5DCjajkBA62WZpIQ0h1feacGu03K2U4WtWjHKfEqvd7s6lH2h+Cu/m61XypeQSucadWsycziZUMHMfNz+pJEGuK7kJCCNrFNL8hMazZuVx0pALJiCL1iV4FRwitpsQ5JIE7JwGKH3IwctzYmjVRKzzUYqsHbMJYGywnjKeNwfaJBqlUQuK8zRXQEs9XL2wuXe9YJd7wGzdMT8dpNub3SVOi6rW8rx4BFeGq6BHIJzYJjCdR1KHayRBEHwc6ZMk6RmvqinkLrZ2JiKJRW8zIsIJFgdDH37yBbfxEc57ytvx9S6arEhZDtqXncbVr4PYGCFMtX/vyvcvIe8Dnms8buSXNDLUH5iQrsY+uxPntiTk9C7RFjGOMs+ySUkT+hpM2/6eEDCRJdTN48GErVDx+LYqV1iGjJWECIV97Ma05CwLIvCsFUdN6AaB0jM/1Hr8iOi797l/oTIJAKInXFvEQ4mE64W0+3s5cMap/KR9hZJ8XiVex5zUv0fVTmw1SLUbx+J3q/NXE+femu9KiS8PNksdXy65B2K8HYpcwi/Zyhcdq5XQuVLOe62Uk1nrhnGRmmoj5quWqzOn0f1ZX452gesAs59q6mEkV3xZoE1HFhACuWAZk4ikCc7x1daPsgjPmMigPLzHF/UeYVcLc8kwnLD+nRdedA8eJifwzjNnKwdi9ekijLXAcWuDnEdduxHPAg845I5Zi7rd/sBXKwnuxWcoq+f6TRlNkRgn156+zWkAnbtmB1nwyLrH22L4/0UPAJfDWBFS1L2s1fag4njQGzG8LmqMaQxxwCKaXVSaoahCN+AYKwkiUJWKpmN8XY/94+F0ktCpgNXhlTzHVP0i7yi9tOBC5CTedpqaYG3IzDGJ4SzR6bjd2oG1jQv5uLv3cuvh/QtjXQNM5ERfmMBT5daxcEvgmtHe5mvcH08RbPw2bePqPgz/XWFDTj2U3YVjeuxG84PRNscGfqlGycAZSx7ixYIyIq2m2c4/K/dipQ6IfHFdOoHHFAlIIQbv2kEydBeXOZkmd8pKTPh3UgKUeS5LdZWQIMHS4Oq6FktFIC2RR4gNgq8uK6zVU3u+Y8OirTrl+rEGxk+kyHkCwBFaeeTxpcpy7paunTd0AtVhs421WskhfuzryxMo7Elhs9IDTPjisPqvs/Y5IkBspuRCKTjNGZLD1XtW7hfdZ8KF3TXAceTYfPx9lKNwEc09v3Jdm26Q02qy+hyDmSAkYW9Sn7g3sm7QegiSM3IDrspWyp+fd2uYZThU5fZMtGsqDflzwc0yOCQW4minU0A1BZGNMc7hTMD0wWy3WXCuAePWX24WnmY0FjKG7qDWCudAulFjoMc7/+2qSDy6vsSH86vmSsgKLhzDUputQ85XMzaIYAcy/+pRfmJt30rUhu5gKPhhcYRwdsy4PmfaxX5AsqKktBFIaL9ZZiEuGuYhDBZIPwW6cYegoU15viMEAX69eTQi9Ljv3tiEUzz5WrmWN2eK1gzgwn/Zafk1/6vlIiZgCExWvd6KDB4EnAIVngglJS1cI7LQhJ4+gKDiq/NMvyKwy4WbZkXFjgOBe9GxaB69WTPek/qEnJZrD7pje9nbEjj58SzPgE1INPi88/+2EQxknDyCgvaBHCyJbV3NWk64GKiHWUVe0t+FXWJELSCfLLgrHWoCYPmQGh9u9tMdDJ8aV5U1Vi1jcBu/z9MVu/A+GoFADQ4NESdeB7b0X2wwYrUAtVWcoe0B5xUOo51W83pF9qsCvPT5NLpSKWE8k4imASkQZscT9WL0uTEh5E4t3j/NJA7VYRMMeT6yEFMm6Pp7DGOdVJ/zZSwapLmGod3c/g89eIXG6F1cw6b8TlkL9BVSt5hd8USLIsX2l0diipH8my1udtIUF/O+9uxjmltHwqVw30n/Gt2R1khT7PHjcsusPiqRDXv6ZiBCOYNheABM0pVeEocTEPVhAxJ0E0wvKD52k3R6M4haGfI4TIVmXpbm7qjJSJa4E7YZQ6HoIlqKVtrmns8+bPBeGEhtNGBPilEG4wQNtLg5NyFU7JVNnf1I9knFcPt6UD2+DVaXEkLDJxFC0Bg/xXQt8iaY8DXI3j9qBwRvUv6TohI7NuLJKO4f/uvu4bQN/VVPgI+WkQowCGS9fl43aOtXNlbAarR9j66Cn5V3ISC3gI4nh2Pm6Mab1weMW8NkQe3/CWe6RzsorEtdrqkEvQA3sqr8MGHQ/6JLGi+8+1KUgHUtWToJprZkc9STbnsawB77SDVtGmRqXJoBh0NkaznpCfJDQFYAA2GpsJGQU8+SjboyES4VJBAPEIJAt5C2Vi/CqX58GLHLPVxp+rTNidWXdUerR0aykYDNrmgKHHejeTaZIrEBBSEyWQKWnBDQ4aiMQx2r/N9Zdg/yDy2bxOEOlHdAN4T3jgqGrrYi3/rigcEV8fgAzc/OS5HrL60sXeCx43CvTVVLo2WPqNtTrVVu7G+80p/3tt5sXbmQ/NeTlil5tqEJUMX8+IzEQ+h3oEUpw7P8i1QwEPVhcb7KW6mcpCUzd1s6swHmvN7bn12gRUetZIbLQLyViDgDPHVknqqY4hxhdRWxXkK/z3zUZtBgI7R1WNKQ1pQYADo/Pc66M3JQu1yner84n4MLLhSoWzmjMgDpX71PceqsPF3s150jYEF9CwrEQxf44GYEaVz2GcADFEWd3D/vRIapiairOflrw/+NgYo1SnamW9oSLjIBOBAP+sua1/woSY7I0KZ6ZNiFm1Wdl1WKwRfNiRReZ7atVWRU6+/j/DamivM9cYcY90FVz4qabpU3OPNzxu8J9zAeyER1EV0nphw8R19aIf/jALz3iIbu1yj9Q4lUashrFE/6iB/fLsiBgZUg6Zby2SV35i+T1uEuKJVWiyO1ipG1jZ/hswc8bjVxG9S/eYdyaao+9vlDY+d0YweA/JtwkW4AoMrEF5qIn667TouS8Te98rQTVtd4DU2Zg80nHG+m6bKjDEfFxA8X75ica+a9gKmhbad82pQ7p8PWsWTk0CnFFurwA43otiffKfXkBr0HNjSIzTam0k/nGuCUCteDCQa7DB9z/BWO86JpW4CSkJOdYs84zC3SNbD3TZriDO+f/ioStMuSSVFcE6ethdfvCN4hJjlMLFFaJ6UOfuEzvsLgBz/r6sRs9FVU9lOk9eSXIQfNwUNWPG6WLL7YfCn+cWCdF+1RVavGF5taP+N5qh7KFVW13ym2C7EsZFXE9VY2RgnCFjsBeMGSR7QQ9wVBlq75+q1h5tWU55NM4yg4lolZ+ZxZyfcTtq7eGw7c9EgrO9Q4VxFK2AqJ86RFu1C8g2rrg3f3Pn/c6CycIZACV6sxGKR1E0axBIr1udKXxROZXE1fg2Ymwe2A4klC4O9Hj2YQUVWLdiHAqxejJ3dYMrpB8UfhB/m4BY/ZKUrfN/WyuSDP/QBtukU3IySEH8Dz+3vcer9ZgB7S3dFORnGNUipDX8gWE6rZ8nQAijTEEqtarvso/iy0ooUxpv1WN1MxHTu9Pywxax9W2GVLE1UsJvSkglKt6QkHRbJE3Z9xjRoFfq/LT+WHFqPB2obrT3zJ3oCN38pg==\",profile=\"desktop\"},[\"desktop-release-0.16.1\"]={public=\"j7TYBbBv9ZJZWidJKvNNrQU1nh8JFS3sGNg9LHV60j9yvU8s6oYv+yBJtKz1SNNOSH7n8uCn7quoHFagvAb9iEaIaGlTh2pAZhhk8zReihRzwEQeUZMp5Vo+c9Mai2eC1dohqQy96gv6erHmlHPKaHNs58MmcQHc5R7oSIhGz/9uNzhbcC+jPoYx9T9ZyofH2mqv1gl4W9GEhVJ4MCQYrqH+pYVnawqWH4kwPdVBU2On0NyKJu6sXwKDeDwxwYAhSbI8zPEvcZlW4FoZY21Ssf/0F5YcjSI+7xd3Eh/qMrAPeHwXav5Lf9dsWzDwNYMRNz9CTDhcLxrKTzQTBt42PiIZH4LOj0/ZD0Ri1sHeNDDXohQUv5b3m6SVQ/Zy7Fx23+mRE4WuvEp6DJNjPXq7mFb6FaeL0bfByyDvygv99jto7HVwLvk/2NVCkZjogXT2f2RkCUjV8gJecjvBA18inGpUh8CfBLj0fZ30y6f6PMDJ2dgU4NipiP51Ylh+pifD7H3L22RxO4CKQfy/iV6tIomkDMgV7WbWjcEPQB7RPfFI22pCXqnyeiaggpMBkcAEmtU+yzEvb/Lxnl2gRl/7Jcomm+2R4RgitsHez/qvJDois4+NY0TX6l8MvauYmMk6hVBG+zWPjkE29br7oRSkiv8tfkS82YftQOq7Iy/3FVrhJeJ9pTJPLeasaxEWHrNm+CPMqitWRizrj+pNV4EJgUhx2zrIPUweGC1ZFR6P5l1fbSHMbyoN9PQYlEH177wSO+fVU9FGxjlvB+qNiOxNDB/5JR+W6rQawWoi0cD6k2TKG0p6+hkqqhKx0n9s99VGHn0o5w31eTzOJFKVjPRznmfhr3EMr+z1FFLrKDZBWF0PGYOX59g5DztZqKjG2cBrHddFmfgGgo2UMfMDes9eUXrh8XvT8gey++V3uSbHCjV5qX42+Rp8fgCiAZYqUuJs9LcQHJGOeyzFfxei6E3d+DRTwkMb5Tf7LPe8z/DKMWeAA84/2VlwEZKF2qz7YJqcUoiGriWu7mnlH7MgVd1RqGo9Z449dysoR4szCZJjLBwklQqHqhT2Rn6a65Uq3WJXrCQHhNjOUNBkMmgWSBj8gFa0JXfczMeJkWdIP4bfx+5SYz9EJPWKdL1I/Vqg/0xw3gc+/vXXwYla1wG8QC1k+GBO02aW2RAOh7DJLpQpLWH8R/2gue4uDpfiki5CK1TbjOdxqpvreJfWZxmbFPhqODYNxllqI30C6y850Uk45rYmUaJz2tZj0lEvgmEHUSfe0bP5n0Z50AR2yIKzWPLDWLRZOcxqqGE3RUn9y6jpbgEnArn4PY51zABnjYBd2qSBOEWyFhq8vNVf6YaU36hl86HFp/JwdD4kD3RQYTlCrBTP9Yjc19oV2vZ9e1hPx8fjR450lg9UjEJBfHrAYwHOYCYPDUcjFDR2tHcPW741WSpx13EVuK0FeGoNyvMDjJLaN8/sc+FjI35BFhVLm8HfUli2WbnFqRgqOTa/tFZcdADeqGo9OR4hDaXHU4V9lv9nld+7Y33pZGr2PeAyTY6J27nWdnMvoXSlk1DDzOqax+CNeCnRJoxg+UF/BzllMw3D0KXLYhau/ipCOii9bPiCLkrFZ2ab0fjvQhVQCCm9aU/adtkFn2D07Ju0dFOlGuf3HvgVoiDtTu7W50/pZdEPbrwExSDh9lgboQ8LkVop/6RRqxtBxzGY2gchOFA650A0gGWW6zNFUxhTmkAV1IUNuJ5VbJAxqzwSOwLimXwtvRLHyCKEMwTjLOTa0XrW+9FlUP5mRxLA7LsEXSYxG76J88y1uMo+d2pOULYuODEScxXHxqV6QjZB08PyHa2afvk4aAxdMiQdMEYOgojigQX6oVF1uyIFlUayM9ddwvJk1YGv/Nf05ahBrp8okzg5RkVwVoW+u9wD0EGt+tUty5m8r7Is1ACh8Fr8hJHGEaiLhlZBuXfcdp41M4uPzpAmoVUtZF5giftQlFfKb8cpuAJQsp2wCOnJ/6xUPWJ/e1wwM0gsZal4yZsrs1xyXWEOLYAvGvNLWqDHm3aOmFrRaYqMOHw97vq6mWMYGDE5IjH8uGDVi0jhYS+ruzeBwJYxxfiYpF5V46tUddyWgSpXgdk2fDD6OgfLX+sc8ymoMmk1kzMAhA7eINLkjknlNstw3Zah5lBKIF3eoF4urJTqrZ+yR2pHKMnafCST5bIdiS3uUMkLzeZ1Fa2patOLGRiGtbAPQjh0ns5en7Q3sQxXpRcR+/5svL/oJimbEgnPPfBV6ZZJTnCVzJlGAnsTSPL/EMztgaw8GUG4LvUsQtM1o/7Gsx8yBQBwGcP4wQpEIsExi6oNCBRkHfxed1er6yvWXXIEoAHXBQxt+6W32rHwZc7jxpIV6CiDaf2RgXlRNX8hDg7SMPcecy8EYypgRlqHVh3rduC8/a4PqBX4qRzg+MrxljJSCg1A+TLGk23H9fnGfEAtRgrjZColl1nZohv07o1ZuOZVwfnKV8eEJbXr7/jRltTbNkuXHP4qSyJDPsvD6qG8LMnJyKKbF6LVJ6nhdWef2pc8ICP17WnOuJSPCyJZpG5KG4hJ3SSaEdefHuc+NppweLQUg9GqmmanOyr9YIAdDlISJb6iCu23gUAA0JChy5TuVZ7jP8lCxHneolWh5rVbnSywQpItjaMxWQBl+hAP3is/cF5JRnoL8vRXrCWoEuxl+/xm9l16Gi4I8VVzKZsLtWBxg4eKf4APcRF1fg6PWLadM02Ki4MsSXGOAGTBo2kql7M7RRxRczk0Tbxcn5aSHd9k085x/jJ7W8qUEvm8XEPRGNrjHAEfwvH5DqfFxxsGzs7GUEWl9mSnFWML98vGRy3n/LuTn5Obc+IYRn08XGey1RmAVvPMQCGDX9EkHowtkSDk0GWPDpiSuHCDzc/EFrY2unvL8aJC2iZNKzWODz7jqBH2VfSpehs9flNNXgwTniBbnjpukxDbqGCF9VJW2ZQdMi3laFJKtBlNZXmrE1xP+9RT8MOZuE612X1GDGTMEP/JVNTcDW28NaUw3tuiveB/EiHwJy9IBdQXG4nO/yR6Y9YUgtPY4iWB1dTzwNDPH2N4c2yHRTy+pBehyhycENBMkth3pJkS5k7evMejPbF13AVqRB6ETYap2lXKqvD4fx3vzfWWBnrl4Yn9Cn3hFoxioWGD9570rV9+FBw3ob+bIHdcajRxR2KpoqVd1JzQu62D0rGLaEsvpL4qarkbC/UWCIfweF2/lu6zckovJTQkykUWCk30mEnZpGP/4rnLmt9dLlKtCP2uv4HbiGDuTGZ4AxEB/c8AvAtpK2L6jQmFVlTndvctOXo8JXGCFxLayZCgcbSSeBCQriVJIgW6OPk0hDJ8n/cSXJZ8U/uURIhiO05J23+N/Y7MgfkT4RimMNgHGauQWdytE54rcrrcoL9RaBHzgmUM0a7xSmFCUfmGSesoKsIkLPgq9kDPjFzfgDKwyly3gqJWl2JQz/Npa5QGugGSxItPAOZBbbrohC/Kw/YWQKaXRZz+KOE2rUOX+QpsbC/G5o0z9cY01Yt8vdoO4mqIxsceZqjbUTWaartQ+g3FKon55Vjr8RaotGo5FbtK8fTvsGMGmTnc9TnyfGpi0W48i4YaUu8DiHkL5Xsb23jg63eL7BpqqAWpcXV099c4ojMlgSzAdcN+3Sv0OImWxRbGCxNrcM4uopGYhNt1Q3Nk16PjN8ixs1IDT9ScsPjFTQxQPxTE+AUcFLA3DHCL3N/2oNzzKmNgW8pJV1XNLfM6mtppWu0NfbKmCPp/wBNt1z6MH3V7p4+RDBA36e8Ku+LcWJQKwon8+2nMx3itxVjW164XcZ4nIzBR42/NNJznP3ra9hHKZV/BXV+CDoG7Lh1Z81s/Bm/03MGGvLSM6daV4pWzl9DV5uj75yjIRMzBeiHWDELqGXU00f++d/UoyK7B13j9Kokqr332zIcSH9voTGsFu+f/QwE9qnf+HkU3KVhouF1yvAbMrC4NuvV8wzlw4dKewSp71f1AcZANpmZhTwMbUddVkMlwOZDTHh2TubnqBOFLdVwxDQYVllvi1dEo+lipITwHPp69GDG7I+IwHjHb4LhSmdWIqqBntibtIuSLW7Iqaui3UpIgGKGKPzpkx9SR/m/+K3sQ9kjqOkAquUXYGVoXe7Mrvz2iUcYzy9hACs02YG+goDPoJW2nSNQ4R5PuazD7MUgM7eI/zdxAYCLltZXdqHdzOMo5bIKnhS4iJqWhNELgtlAdrZWQvaDQn3GMde/WpsJE2taMt9qtMnXyplpwBlmV2Gq/i5ur5hwZBdotGU1K34UTSbHD0XOlx8HZadf0fmiowoxL80SEAfTRkaVLkznImWEsJX0rHQvRxgTRnjvu1JewrD5TRq5BxqVCb55lJET6BuvzWQKBL+YnmaO6o+pXSnL3pyGKWqS3UUTXxqcLCAGL4OGozrrDixrw5cMuiBOrh/UuNhG9Pf5P8xs8NGKZ5MVJvh40RR28V5Xfgx4ueB56UORPuzOJz5ipa7o29/OCZTj2EwFLetWhHmmKb54piJv7mz+F6WQateddpSFjD2b8u7m8pYrp7msAOztvDAyTTCKVMRE4izJJ7ZT44B0wu7SXEZFgjfCZRg9bCFAXdxsC8jBSZADOjalZkL7WnYrI/C0UNmcXKMlAY6wgiuhmUOMYWSCJUYAo6JCELSBhR9yTmNAHBN3Kh8vRPbBW8PLPsolVswa9WCuX93jtfzPzT/uMU37d6QkT8ZDcceZpNU8x7aR8beSs1b7h7LEF4ujF8qkrJtduTZDDRQMjSuJoDWoPnBdja25HI1CSbxwy3vLKDYhSmWpr4d32w8REd3yKjkf30kmUuZoup4fxpsv+ooDhwbjj0+Wtuub4Ejsnzf07QnFqtdplkbRRhObflcjVhtALqW0ePdLY0mXUCV7qgiZ7PUmvPVeMfZCKCi/yAgrfS5glPPpjvRp+BEynEyUoYfL9yhEOj+0teYrhevXyGhX6yJzwOeMdj3sj8gR/BHRg3fxMqCHymQ9G4cqcpun0+2p9Vz+xpx6j1dHT1/uJGPIUIguUbGv+5R0/zwkzFOrRpqDMlQiCjZNjfwQ26GW8VPqjuujxRlvktal++FdDYaWEmnZug/anPWqJzEGs43uSUKL9hMXmyBjdzsQo+B6lvischeqQ1l2My4DI2uvpyKjd809yQ+pCjprSAuDx7q84YEB3oNkJwOvj/mrzdSONlqvVioeWDlogqXy6uRD4lr3aHdmb24TqLTkXEvLzzib2qqo99TKHcqoMBxUhEAIFu564KvCQD3WrdJd37cYDwECOE+xAguAmN3SgZKl12Tq8VWNU4gJmGEGI5DXNLcI8WtGk49jWXafXBWWmMYxr8CFY+LCpLhqPhIRbguviHawbGcvSffBNMAnupgZbp3fFz7RakX7Ha12NM2wkbgq4laUFXubTfJ6kw5JwsLOoooHL1t28sZ/un/Ou2kRRekphNDAczozoRv/ao5f1pk43DF8J+lcuP9ijq4zWgnFW79HlEVwBVDUclM3AMSEZgFuFY5cTakY1r2tPrQD92dzRLj4Kwce3/4lePkYNyaoLNsuS2ZAgsFDaAdIVkX5nbT07hhFFXcQC2vnnGBIwC+i/ALbY3AYPUELnw55IjxTfaKUi83GMUwYBRSfOthcV9fNOR22x1yUu6kxbyuDMins5BKZ5j264msLV42Vmiq8inNZnvxyxOjNppLtUE1QCTPMqoU4vvc8v7G1G/2Sj52/E9ylughN3IQxR0sN7YLC6eAKhxkzVwy8uy/Qmi6vs7G1Ekc9nzu6GXurpM4OJ/HFK7ng9jwFwb5fw23+24MOwwqYhqtsQ/7qS3y3ap8pj/UelliQ9X41gQu4gchqJSuQ8HAvi9u8/IfleYMRbWvDz2778HHP+31WV2CZVjViyQR4w8dQ3pPQ1N+vSR+QwZTKdhgHqfuspiU8OKtHeFHC/YCU0O6JH2KgNk2JYouJwBQPvWcfE5zYefHjpyjcixG3++wC6mPFBWWyAmFTWbRfHFPwVKzk9NvgHBI86LOUF+zZARk3tSfg0uICrYbZX+Qe5QYKR9nGZo45xLWX2v/IfYyrr9R6JqI7czE7X6ZJV/baMP3TkFdfWtUpPe5dYANIyzMfept3nM3aFVy3BrGa4Mqw1bYHOfRbTX58xETmLcJERIQYydqsgWcBMcXHrVQjV1N1EmfungwCxXPehwBKRS3lGuy9i4s5HuB53cvN1GNWWGSgOxs5SAmQDGcP2h6yI2IXTs6I4nzUkyEL4NHVyVRqhsk2lNhjmauJNNuNWzrQ0OuQBcd68Tvvmg6ffjRttic4+RlWmbhdlLNhf2HHGN0k/J4yU8QhAA4U9OBpt93cXsifa5yLWZ41FqNVpZBiHaMslrlMFhD9bGwcIlvY7IOszKtW5S7XSOa1yfHmpNSMcaLvQiOy9+woAj9d5wmKFG1jNd8fBxGvNMXorMVE2Zp+H6ut0rB7F5bYrVq6YWIX087lgLgJkK0j1UTqhRvd5OvSjBc8L+GfmtCEaSfK1/avFCBYcZdkSqFWv7hVozU3Q8zqXRXfM+wNuvoxMgmGuxsgXJEtLtRNov8t8fdTKjfh8PLVBdWJgDmrAlKH8bgOvpH/TupeQIZX82ErYoxjAuH5GNy5xBBUYWlUnJBr+cj+tATHa+6U3N4pVMuAmkf0UyYw5HDEqhEbHOkWAKtTlvHhgK48FwrFLHlQmaECgn1BIdvKkXmKVjeKJwM1VJCvoBwrgEqQsQbBymLntumP/k2q8XpOBOHa8g02dCIhhqs93VnfXSYP4tvIfM22Nzxm1uGgzDQMANHyQAM74eye9IVffSdjN0f2WvnEkE8NwRB8CikiC0qqlkGwFoqGNes9hrZMvEGYXqbakYR5lP3aVUYpm8PAFXADHOEzYgk63ok/FhxfyBFFcGow2a1LMvrykh84eFOSzg6pYOtub17ZXH5BRDm2+fTwAfP6SutrUxzim1uiu5E1DinbC/ndDMhjoO7nqkFo/qpM7UcfmpsFH+PFEDvEsgOuv5j2t6+UR8LSHM01n/5Wrw4bB9HuOQAPkl8N02VQit/HvKT25geOstQzExQXbVICCrsKn0SvOzxwV+rz0cm9XvEFO2fJKEmQrbrRF0aRzbes/oX7fuJWw/pJnbbsYWuwpHP1mXJCJGab4XNdfrwtR0QDxDKwrGTHX4WED56e2bWmzpT2foXUJsqvzoizBJ9tzvDptFW8yidMCwYKj5x75ee4qbS4tkghywCdt7DzIkHlFtcekWODwhLNCXzEW5TDk1tvb+qUYJz9Jc85FZRooVeA/fOK1h+1pwkUS7dQIQssEO/6Pd1y7jJkuQuT5pXop8tIrvq+w/G4Adbc2fdgEuUIT+TReocgjU4I95bSjphLQIZsaKR2oItY1MRymguaIQUP93CGOvrCcv8LSnOyn1EhBMRYXzPIdxnPzZPvm3YRFwOcw2QaGqlql8e+ITILTuOPxHr7vjNt4lWMywUmySaS0Ga+djeX8RiPAqPoVwarcSZNFwgAh+d3IcgcplhpkcKl2w4+eA6UlgfzrpjoQcKE8HePNsLCVJznvwCTbGuCAJk+YotYWddHbyBMb1zOBbQnO1ncL74M39bIh3rlI5eGfmUIMmZn8x76oV0ipF7kssXdqydxdF53MtWt7u8MlIqNQAvViBBGagYTTFc3j/3NGqrI7YjvnMzYn+4ku9p2qwwdnNnI2o1eVtGgdjcRCrIaNhxsrM3bZePEbWLNohCOulMztqxDd7fQ92Rd0ldsmlIDK+t0XqbpkXKm1bby/nJTsRyEKt8ZZXzAHzhNHJ3o6L4KqhZkvEzvHxMU2ZiE9du8QF19QD9hQpYyF5D2rbMMObKYxHv3GgE+XJyYZIjjkM6jiQrVRzLZaPGxfgoxpmvpeU/o/jYMHiqslRKBBffqNRZ4y6mmvZzA/MifvHDayUwjs8gPr3aPvfkcbGbdoUyUiNvxYoMETEoGD9X5fzgpKeSxxthzAhcYudde15NSc/eeAgRBdhC0JAYMhWMssl1rfoDe7ATduBZ+MzOkLsKbZtBSOk9QVcwRnt54bogYsSseTP8EN7mQo3kNuyNG3fCij1gUJHq6Z+qCAQo3K2jhX4HHrOLuJLR1OzkW86EAF7WF+PGU/JVjy1oGLIidfyRwZid8ayErBILGUJ+HpfNNowGeogUNeYuEgYRH2qLU+8nVAM3TiW5YpObf0ZmC+M9EElE7pwVWRPv1v9hVcaC3V+qfOWwsHjmAs8YbfddJUanIjU/kVJvDzNHr6DcYawfSTZfqAXP089sA6YwskQFkNry1bvUK6bJTjhYA4GeuPuc32iwAxQ4CzjY7aarYxDrzWp9qEBdD3bonAOIei48OB9woNiKStq9XocR+4KWyD1qAXSsiZ8YI4jKgBmx0nQauqNSIMrocim3jlDvzlbq7NhWWorhZfDhPyvDo0YRUe5ItvmXxkXCYMRBjIFfnjDMbEOg+EXNQKMx2ZVe0PImj28gIcxjiBpsU80TXRGrrgRKxu/sqx4574N4EMRSXo+BtlmZFuxFV1dWezY7yuoXqhd5VGs8DFZ4gkTU51ypxs1/II6VT+5NFP2a4ZVG9ib2ZG8C79ar+UGIUVsr7DVlAFSRIMPwI6aZi2S43rUHZzC+6aY0H6YoXaNy4+zM+VOD6xPTJdtw1JyFs1Rekke5KxNsHDnW3OS5deSUoEORdASP0/bMOmBhBA00hXKd6+lLuIA80KDAMHnUs02xmcKjIoNN0rZOfYEYIHFwO5pODPPiimyVIIUXwM9H8Ggre9iz6c4dooozl8zI8yB7FQxpwMowpf76mnoT5LeHdfYrUUF16Huia0tBYjr8OcEV/xrX5TYS19vMzd9J2kVmS0kDb3Kxx03wU1DGudnhQ+9pVJymYenoj7imVge3taxXXo2WvMUYrhaYrqDB/LThtYv+1kOSxy6SEe4GPynkFP/Zbot9hldWtHb+wlGRrPBO4w0QZsoBzml7YZEc+vj30g7BCjnocJsK2ZoMVdH/nRlW7UN3YdG4OxP/CR4hAlct3Uxx08B+2j05dH0tVEjwUR3qyWQDnwQkvnPT/p1au7ShWu4fiIiXFvWjLhWPEyxZKfZa/IYEIuapIpjgD00woubueClfotFdNwOhI/06BZP/2en9hQwsJLMAnxkBqJD1tu7zxVc7OPBgWf4L0K0lAkvh3mp44P1EaDpcFSrsO/d+Z2mJ1hOe2Xzgm8IYfnW8vawci5GHXG9PrHxTx+oSoGLsX1KY1zeB4OyWabpwbNF38y2t0zB2z8mxk5yWhR46BiLuCUJbEFc74mbVBjtB5/pTuhTiB83kf8NUjPgrZpQKEq6giKcW6z+8aCttyoIaQbQYV7DOCsUbZEXcKy5XQmX+41GGrL8NzO81Kg+OIt5BG354UbcxRt9qQ0ZilylIzED2cLsVqRHY1BbAoydd/f83txQlvYUgVAur+LFW+ImdUTfbo0ZvnA21NABrSTIp2sv7AEsPYAuX78qk6GHDtrrcE7oE57sgw9UJ3CPabUQaOGEIIr2QZb1XTNYGQA5eWtDt0gtFnvQEJG9lpZ953fCvCPIRwowxjx+9ncB3aKx740E2e1aMNNrIoD00JUoXzvRHKHfFBPTFMjKg1mVCWxgaoiLCG0aWx04O570QaCGlyHFpevhzjjHNMRKp+m1Ed8+uBG3eaLk+FXXjGh09M7AC5jF3ij1lorFAaBGRX+xMDLQZOjs+jmIRxc49KSLsv7x8KEYohCMM4GgMKspxi6hO8zIbogrVowqUPnXGrDCVMFkyIWWHQW4FV7vDXDHpT0qfH/plBa/eNiw7lgQVUAk7qwawNwQTxCA6/6rNTm4p/6aXiCQWK06Q0F/KGDVcOefB7l8X43P7hLNFm8OS2w6hGLWi/B8LYH17Jidg8MTadnAV0+kuAk6zGHZ9eeqs46morGl24Pyqvrk3QbEtuvCZAi8FnU+GxO7XyhlAkfBS0WUMv5yGSyYzf6vLcsFU5gL2gzVw3xdZXLnWNeJVawacqllvvSAXf0fX/pXz/3JR6xJ+z+tbSXSxbUJdiOK9pDrcpPGZTVLN7mbhz36C08t+TC2mqmVs0BPvD0VlIECcTqmH16h6FB4TfBaNmn9Wwh6P2zRMKkkcpCG8bYY/PeKCbMEgqFIHIud2/9IooLJVOCEycN2j6q4/Jt+nv4PnXWKU59WiR6ZSSgMW+SdIkPd8eTFmvIyrdOKEc7oLbTgi52s7L2K1Yd8xzjrFeJyW0Q6AkTKcHEEIXGH3I1Id5D4o5lLhcbDIAE0JYmHvGUGgPemhgUPLN/FMx8s1qcwiTX1EmZrp1bcpw4UupKtvwvJcHmVDIQEsJC/7mjIKdSLwBY1bAo5EWa9e1oHbDWsqT4zvAxRRyNbWvxCBtpDW2atki2HcZjgfM3jUuVE2rW6m1fTTf26mJ2GlQWUxYx+UM1xZtE2QrMJgAjZ9DgVICaTO5lpfVTiXq7R7G4w1bzyHOPN61CJc8WH6/vz4kZ0d/hO061ZcS1FIkrqqBNsGwbAn4ohdq16c652CXEIqp7wyQ60ViN9e5OCnTjDYwNp2Lk/wlnJ0ueXsrrjduwZv2qjzJfnl5b++7eDAYrxRhpr/P2NZ/pp30Aac+xZvKxg2qu09xEToOimc3VeHVCvsoQ+Z3tHw70hMapLxZTkM7N5NiGQNnSDOBmB3pH7PXwj4cQPQPDUA9eLaLn713l1DLsV2xKtoT8FiBWxbFFf1u/D4s+zaBJRzsnHwx4MeJHBZ6eWQnj4YfmE9nBoIZW6sq2R2YJe4M/4S7TTLfWIXqflVRS8uyOU/ZtkgVMtJznJYrdwqF5T50NN5VCaX3wX2Sa3kJCFcAvm3D7QYWczKBXZ+YaI2JxX7d0v759mp/mAxUJ5mlVEP4aRncmiJRLi6TX5i9jvSoEhTBWY2BRzrLhPgmoK0UL9M74gUq2pPPUeG3BaJOjnQYgrjFZKATvWaU/PCGxS0uqUl6JFohcRiIEaj0LKTH7+Z7816amJgHj1aQZ8OEXcc13i2OtY+tdLcR1ZUCIAKQHiYldgxltV3LpN++1ALG6e4hgBneloxVcIq4dnLKphG2XIvl1Pn2layHqkbhq00fEt0x5NfmpjRePqkHz3VTQoDipVClvDn/4+zkB7tGoHAKPQoV7hwsQLG/GdomDvKXMnSTQ7l8sbjtIK+noMFPq3aXpy+mxNb54P3D1gkcAADcYC3Dmrv95BsX/H0dwxxWRxhbYs+jqbHD9uO3jRdg/HNadVapRCtT9Umix4gQZOc1wCm6g/obYQu9GUdKxMGYRYhqAxKXf6ol7ZPYddzCfd/4IwCTwcBTtkF+r3yTGYJh+wyVm6J4Si7Dqy3dZfqFJeD5WDKnpr06nh6PvL20s0g/bvizGwTgoMtvIeT+S0IQdVxnuntbVwbm+y7Z1puS4v2Z0cjXPtiOOAT+okXlLNJ48HK9rFLNMzW0lnbtxdHhnsedPhEoTP2GfsVULyDIJMsk6hYJHGb/CFUfwdw5DmKoSjyWhWHWycJTXj5J1Gb0BjZVjp4s5RWXMv1tchnMV8NIAkcodyH36oOYJjY+LPJyFtQzdDoRgCG+uKtoD48Hee/gv3wwzkwbsXYvWAzlPnFs/yfvkSC/9GoyaajC+Ypt7ApeznsQ8MV3/QgaF8tzWUHWVNzFDThrRBBxMUXU9FhTfGO7yWunEoAHAoMdPb7dDIHOLekjHyeujW8q6mWPbBf/IVSL5g7vEifLpxgUUjQRbMz6AkSWn6Z6+3Ou1jm5vr+W/JFtc/WljlQYmKwSZy+BajQ0AT8qtfDnk7aHY8gAwNObpnQK7lLIV+lhsPt/xKQ74LNq8xbMoa6GZEKTWbL+XIrI7B8eJgn8SdMSeZPYdf0oiRvMzjDl+H1P3gSrbWXHm+INXXyj+hboISvb9XW6JD1A7/nbM18uQVpx0Xf/5bFZSQGSMPI0GnD5y7vDLJ2ivbr5Xq7JJOtLzTsSUwHzsxi6nTl5xrd0g5hv69IIy0CDPMvswSmyEBdkqub15KLNHk43ljV6VJlcnj715ReU+lsivpHQMqzoRlByAYfztZNybFviWY25mBgqSmZA6RrY2JZX23MZr2wnxvmNkasMzAelqTAkIxg2wJQ517Xce+1si6lFurlMLCJULKSJrPMyVoRC6SLt1e+Wy60oPv9ZFGR7cTv2/0wFjWqVhEEKDn7cjtP9hezDS+8nS7r/Afsdq76hFeE/DnmE6njjir9wGYOFvb6Mi8oV2nX+0q7aVqbMVxyhqXZrY7p0Lu8T/mZ8jyFPKjWq9U+TxAZ/AZsXZ41siuNugKjBuovRA/pL2THoxW1Y8hDm0TnpzggCAoEPCh+msZUS9HeotPBYa0smXauxAsyWysTeYMcjJKffFDVoiqLfsBaHBC5ndJBxojPXtJ1NhqVtCi26j39+FcMj/poaEr5ME9cW5LTWqu6rYxK1Y3zvxOVmGHWXEbvnzjiAe3WRPNs0q/q/VQ8GBh/8x/i5MxBbH921EDafJgmJu0jC5kUz13q0v81Dept0KBXFSdk0DiBAG8x7wRmw8Rtqflk8VzMp8KsrMXLC9oPE8Rq+a35czDztpiEVq3oP4kpWPWbpa8ntUz7UVpZjGHuVI7RMNixa7PvESCFD85PJTCzorsM+kiFm1phQ/IUAzN5GKNfibpMS4tfWmRSssVFw4znRMNYNkd53+7gMZQ7KbWYIP+bNxWh38e/Srx1lhLTGOHiB3Zu2ms9MCH4swP5CXbSRpj7w01JgGAqYN5Sy8V0pCicUWtfwfGKbDFQ6mzm0/8jMrv5A0WRoojlw3KEOLkMaPXr44eP6nJylznbuO5g5sOUI8LJ87jQZtJSkZPDAy3oCni/oBGMRPrEx5QTg1i6PdKsa9br8aOZlBYePYjP2A6ZqYjkctSTZ32LERnWPlbkKktgaGKgqb13LfiuwprGp3ze124O9Op0u1in7K/xOos0iMGA0NI7xtKI6Ny4v/QNp4LGtUBX/4OkjMkJjhlhqXHd7xngHaK/rSytpsloTVArUgPA9o7fxYyS/nk3/rXsX1EImagnAYqibZ3yRzZlmbHtevsviOC7yHmE0+2V5LB6UQQzGSf8BcnVh17kYQRWfPuKFe3KA7zwIebSL+GoG0tY08c7A6flqOJ15Xe46CI87KbZjnGVoTSE8Cyzq+NstGmLreOtDSdn7ZT4rpBM/mZTn64NVx8AK9WpbuoApULtmxAq6tAUmAMidc5Xs9xD4hpAYNnOXhtqkvfFYlw82D7BR54/z/HbowSmFrCUlDD0AWJTldCT4Nfa8QhvJopmX0wffS0POKW0QwM/dOlHhwjK3ajOGjDSxNOqeWkoDc3xgJlw9iAo61bxd22GU36sfnY++pFEV6Wm79aEoyQxXI3D3Y4ENMBMRLZZXhQPBTy/kPIy69XqRZ6/ziar0LyyEAPk4j6utArfOhkFeu4O7efL1buzqjmGqwyh+A9WrW/BA0XCVMMT6kRxZt7Dg/FFgEhSuDsU0OQaMM5DNV02tBfvLyGNRsQPoDyGvCL7PY5yHtgSXPQJZHtPSjvuVpPjzDtg+34feVyQw3Vu8FgwqhypRPbzzYsyYLbtgJxCc7P6rHvH58DJ+sXSyGmlLJB0f8MVfJGDmUoxwI0ePP6xr1qludLdvDo0lrQNSNXnTSaLWEviN0aGVq0cpEAeNSwZ0uN+UMR9+jNV7u/a7HcTw+w6dLTN2LNvGsnEVj/1c12ayQYxjO80XHAeMM2Q8NP5b3RGF8NStX7ptIcNw7GirPAB+OE+/6vlDcUaB1JI/wwGe0EzMRazj8FbBXJo+IdPGn+t4R/eWsDHztulTDQWOHM9DcEK7sFPtRjUHjpqCv0pcxEhO89c1BdAR1XWRgyoGjp4KArpzeT5QNTie8vzOqqW7/zCWXyinX6EYQDm/zUo9PKZilMj7rRfMVtnXBuC+EBJ7TVUBpwh8L5vsoAaZCl/CQtoGEFBJxDcLTDtgAP9x6aC5DsXQjQWFGePFCzgz9y0hVfyr10LRQbN+SJ0rwFkW3TFn2wFbjc3A6lYG0OjqC3KGUdksVnQSLox74p20y7JFiwfQhRr9P5gj8ZrGdFAxWfTw1n/dQpgsQ9WdZ+H6aFu0N5bRHtfK63I2U1qomtzABmyQuWldDZxRtvZtpeCV7Vk0nX6FERXbzKCyAsRI9ItHiho9CUW5Kl6uJV+htW+UJYuT7i+SMbcCtZOfclTpBusaUZNpStNeSinTNEev78C918DuAZSeSbrgL7Dgqe0VdMZSrjPDD4vCZsX3V36RcVMvGLRLy2L3Zy2uTWzyEhffYk9MohBQJiwJHHorIUm063lHuQpf/Sn91uj3XzndSIOvsrllX9yobOjZlmVgUCt7w5dzxrfMM074nUGjhiREsUlhYbpPjM28xIHhNVWtTdCyx+T5PGv4VeDbZS7dxUWpbdjyRoeNUPEeXyfyG/BvkZz1D1bUnEC3/l1F2nlqDGcaob1VBFBlGJsOk1HSQjJx9PKAyqm5ogKZpRzEEj7/I9QXVlXCu9pWEGxcrBGR6EBmpkwNve3pqf07FbSuSAJHNAEMrp3/2APz+u4luImPZYKZf8jp/Bqu9ajpoy8UX3pBhTWWRegban1n7+uhIbRimxDqr2yEiJqyyllvro35N6VwxfKOat7zGDEzJaAxm34st1J0FeIoNfyIOb9H0ssFa3VUEnQXmN/iYrzm8pLt8zaV+qylRurk2qN9fl++JQYtD0XRLDO+AJtn8VUHavEDJK1+do/dFaCSH5Ob0wDRBA4lj8JjVi7ShHD3Jt0jzpeEHaqthOtQwg9mcgFiJaWAEZbG5tLyvs4H9jnjq6xp9vn9jlliZn8qZNDamYf42ORc7qWT0OqeP6A7fUhh8Jc5DHA26lMxc8sQsdhq/ZhHFlPjuPoln4qLDfwkfnYTUrklrleIdYXP6DeHiJiB0CMI0qhOhj25p85SYTYICRhPrqnvY3qkTkUdUZ/YjchQcOfvV2m9vZlYSBvUVTbt6KRgXKSpB+pNhMvHyIHceD2yio4B3hZUXUqluuboU6hI7fcSJQzOyPlamdykU8WtIycJLQvsh2jx8yGWzbcjaRGciiMeVcb1fn5rjrYV8DYoyVVp23gXVumKz7fyakkWO2p0yBxZfYvnOnPrC5jdepdV2608moQCVtD4vCP87phWd9bDhS6Us5wtHTfRrlbOf4o6bUfEM3ZqD8noQUcznUDwGY3syJWRD3oKJ6nt/QIDFWzPQZwAbGoNTI/PzUnDWW6sJdan4lt2n2nfky+A57JT+cwpNvao5rGbwhL6ISxHM1MWKsIMXf2A4iBVrEl8sGavVXnM35cuIFlp1LDP/+h/0tq2xtjGiIFtQoSaIQAvPi66vPdda0Wj9CPk4vBlYh8tFJBXlfFFrtA8WI6+UXCbwAj/LBLsZlJe+67286H1Y+gvC0ARQIpgTzXi5W7ZDamUgX+MOY4rIy9+CnGQ0JBgoS8ozI5FbsTN7CEsCgQ8lk5uJtXPxEqO8fohHH+z2wrAjs5Y6SYExFq7QkDMAoJ6HR7cJ47rcXqrP5nTpUD7KgRvqSAayjIWAdeF05Er6jGQmzOfHwU3gC8dXlbVMgSq+ZqGWL9PD1SIolqAzpNrQWBJNc9XMXMTUZ3L/Wx8o1bTB4RsWCwmYpWX4FdXZyO52kd3vmExsxOw2q93DIc4zSCYiu9czk0YM3VWbOFRDijjKNdUm8dphAZQjVlucfkzabYqV5Lco6m3xvCyFndvP8kww4AUSAEZjj5x5pnInerwRkuVvJnR5TX/qNgXVDLt6vhu7ms1dgl0bx5xS2yIjEm+lo4Q9EIK4aZFZyzOZHNdyZnABdyW73w7/NOtO3tu6biyCMmYk6dsfwG5ybBwZwQ5S1SVSgCLRpvfFwyTi7FpTSJWOr2wUGcSWNkvwd80HLKWlK3sj+GgmQTztTD6imRDRvDMas1qUa9a/9GhR3iBAQ1rsK5OrMIl6IaHnYBnIcWUmVgP7CUvhMXXXNnMkoHpaJT5tLVK1tKMJBTaK0TO3fZhZ9lwHL+o7Xsm+G/MhhkLkq3v0yCQNQaU0aEoHRHtLpHSqg7eaNh27ncsg45wnEDxLLRVUqtF28yX0OMumlwGc/aupCBawYgigM8yUvUWcnJlr90MNXBsAB5fzsN88WYYYXbXH53cnfe8c5uzO/5up3l+ntmeir2XoFMMCu9ZVIL/6SaHgI0okKhjr1LwKrEmJmZui0dYCcXTa1fm6pDT0yUmmfOp+qY3qGPDHJo3pBRua8H6pOAMRsMEwd54Q/yeEh9ovDbPXtsQicepngBryH5uqe2HMTUZiDGywkQJ8lEDyUxGodsF+rvKq/7K3ZdtXjUINSHN90vDJ/hqA8PVrQUwb691VnUd+jG6wkE5CD8IE3RzUaaY9nXe0AZXGrEVs72vnhHoLdD6mUfjZG1viudd0Z/wPW2jRuXsTpy3YxLUcJGwg/LgH7qo6RtBsl0aUsDwhqBZ9SrPLmuypyVY/eg8IS4MQ5MIdh4viDvmmyysNtq6Cf0BRhnuhwqZ75WLJMeGM/YxfwYCAgHAjoLPy1QSdU+BuLxTrI0C48BtoLG3385dHg/y6hlIm2NpjA2k8ODpipZoV3oaFmb9+Od8nITQtVRb7egnPVnQDCGiakegw8iyn4IqAyZeo5DX8od40QeBHLHouM2cBYKClyQGxEpfDZR1D6aG65wAeDf1Zkl2QeGSEPdukPXofLfRPftf4mjXR4+vTG63xCizLqyO0Sory8L86YgEM2WLs5Xitk0ciBiEFGVPIoK1SWb1WJ09Qp2kD+6HDlwyVLLg0UpnVYMlxiP10okG8XGmcKe3OWDoGdDLjfs6+5rq3bhW/Enn0lgNz1oRgX7tMhpJUnHs6r5gqsI2qGIsG9R9xn9Y0VdozaQ4RPjckS1CozsWqodR2YUcVme5WZIa2aoGSzZoNzEgo1qTAWUD+KBF9vib6u8s8AngWO16hYp8LgMuHP/5YCqm3gnCdNuWiMHml2labzUmnfetvVE9oN/qIUOHNWjPOMR01N3XydvL5oDeu/apuI07pZn+4mazkBJoe1nVfaWTJ1fnCWGFepDoEv/XykrqXTJHkI8eug9A5PQr1DbQsLnluI8o2Xt7I0468Q6UiBw2PpxHMXBgHwE4T3q5qqJfyVYU54inDP9cG3J4Tk1mIwjcVUQ9oNbYUUkhwDxw5T6xm7pzBsS+vsQN4xe8iqLqJJgn4l/nRz95ypzrVP7gGcWaJJl05g8NT7QsDw1FGTplsi76SzdtJtoEaeLa+oRnaWQaVom2O1mSScqAtxDcbpr0wAjF9DVjMfS8o9Y8EvPkBXjMzf6IiaVmB3XoE9+e2RGqXis8PBeViS36WregFMa9iM9hhIEQ98cnb8FRdWdKs3AS4d5tm2lSH0fMsEbuD6yBkN4ADLbHT0SvC8WN4buoEnI320qCWOUgFDcKQWdPyqNEB31kZj3nGFKnFn33c6YWFWQhzGkLNZ1jfWmfT00JOykqdExFqly+FtJRAe+vQgnlc3S2tUFh9MQ3cU/vt4AjbbAoraeGeJbyJ436tg1495FqYUhT38jgPX6OC2254ua5qoZyvKkj581+v0KcYvNRR9FnoxLPP9D/tNeWpTZoQUBPHJx52jwsoODBhnXstUSeIIaeQtlRmtxUfM+z20QxoWRs4CXgrwDVFACKnzE7P51OqbsmTDmxD+wVJLO/q/zdHmcwDvcHgBvXqCDXvLzBsDga4W5FZ4Nj3jLUUD3V3HSyWqVB+rciKuvGkbyF8oPizK9guEMktFkQLe/gneNO9k6wI38sznwQdjRLp5PDIitOfzms7C68eaqN/nA7iS+7/SkPIUtRthcHm6g+ruY03Rqu1aYHHbgbSxbj3F2p0ANp+IeeHGFKYceEkF3uOV7VWzQ/FIFcl2nWtuSqie7MdDw3ewgJMoKgjG+xfMoZasdpj91OC/ppuB1NAAYXbZEdgb+FGzfRqkZZEBu+I87x2AWGqQ3EYNMax+LFqAG8nWrg1UVxlhoTLM7MmCQC6ngQ19HO/qmp1AlVAzChVmr+KAi9BA76dahQEdyEYI5UjCc1PfblJODcs6hpE0p85PSH5G/E9B9mNaaKAX7ndnIY730vtLgguYNrUjzdDzrsNcKrynMwkxhuJwzY4nptiA4p6AXqpxBu1x4MONFdDb2Rumi4HxvNY/QrcNWgZ1g3zDlRq0mQARfW6MPRpitBoAvfId+WmJmn4O+swSoLe/GymIJTDSkhoX38gnCNLmh30NRoNvhZ/oz6Q+li6oZSW9bdOdA0D3VR4cWDYH4b26WDKQ/06WdVI/MqLiQQYBD3bIgzhvU6O0q6PgVyMlG1m1GGhHdc4e7HefSyJFL5KuYB079f8eDXITp4ZjO7zD+cXS5JwcFEJcMZJzFcV2ymElBe5Rn0GqlmFQlJEn8GBz+oSKhTATndiw3U5WzUNT7gphimzt1b4ifBAHP+kEXbEjE9VyLRb1Cq/UD7/zTinKJ4LzAvoOvxEfgne1ZZHWj0MpZl1K+MwfZmEC5XHvK5M8vyM0L/kZgAX7s0RspfajZNkV/eGXJTi428l0Ncq1oizlP3sOBC448OXvjVfAE5RX0+Mp9I202P0alq8X0mwjdw2UyIt6wpuwksVIphtv8Blw5pBH8g8/yrmOUitYKhM/twVYmflenIxvRiC2Olyw4X2xrJJnjgiLcvjy1LFqW/InR/ZHStG2DEVxHIGK7vv8ZLDBRF1X0t42dI+FC57TdrfDTztRq1EpsKViMcRSC7lSJcWdgEB1r+nMqM3wik3S0J8uXrU/6xTx1TR2Z/QNTAw4qI8pWWONaMlLyukcy3pHodL/iiQ7lrHvfQwL8yHVSGTT+KpcgoDiGeBEgUqb9bXVUqqUNcK+jzAc5rFIeJ7kN7IZDpGKNSLAktupRqVsVzWK/iG1iWe1LsHBZCW3PztbZR6XC5vH8SkZeIAngMhwhFpiFCnWWuGx5V6j6KP3xmWriXa6RxlTK4TspqpcXr9NZmagIiY2dRbdR+DCGPPT+M3jKH2h2gNPaG+ojufIoZ5miM3Dn8ithtnrQlWQxrDFl+zA79LoUF44M4z3WxQ0poU6nHQKey6pajBhIeeKOoTnhOkPM/6sE6zNTpYlbUiiuEaY2AG43re/tWZKx1DlU5Rubygaza1D+Wa+oUsoEy0sWqL3X0aiD0mAI6WznOuReK2bPSOoSQakSDYo6iknPmJ/vYCOzgtEkaAXk8oDiqNL5/VBUcaK1S0XZsi9AV1A81qP1kBcnxy+/Dkx4lWvOikcqeT/DsKXrhGo8IyANz7CM731665J0GTevdKrAJ+jVHsad4s915fs7JdGLE7YwWzQ5hAmdjE01Ranlcu3GTznVE3DWQ2fct0elc06hn8hP2Mub9ZN1Gh75UK9W73WCLLAB8XUBZmsPly4x7B9WuJnRw+ZOxHoXiG+g5ONgmC9pn61yYcjLlsgdSV+E39RdF0QdBleeUgXvE+e/jPFyUCULhd2skHPWQMzSqBKV/VHkTLei5OFArgLg6wSiXV3F54vmrvv4GOfZ9CjJdkmiA0l1a7dkNtIxNuMyEENncnJIE1eX6Ve13PzFzs+nNY/eZ/ySqui84czNxwgX4Ave0IleiN7xaolQbp7Uute8wZMcG5lBQ3VPAjTqFVA0j0EFf2ZZCSY2yyAUko+5i5JcPsFHYedqtMh8uSxQHThZctyNZcNJ9rjuu06d/AlP03Cs9DddRcSmK6Y0Em8NnHuIx59egPOvd/XSR4ogyuXDnfOe6zOaOcp16D2d6G5O5ERvTZ4XgaC0SeiD9wAamZ3GIIUNxK9N9QB1VcxzTnrSGNX20KB8X9sR5j/XLkn+dx6M/IrgSqvKCtumNloRA8dNcnjH6dH/Yc199DszlhKb9U7Ec2E28dl5W/jh427pH65q/e29jHG08XMiLl6+9IdeCjUOV08VsTDb+0Urlkc/ejXTSEgFNwbyu9UaJ8LaVKJg4fGo/gCm8x+dzan7RxoKnISzS42u+ICvG8Z6g4z6kJ8j0Tmmwuhv0x4cy9lXd3/Ku2Zt2WytaC9op3J4XUhuJkywfP+o9OX5qojuz+ChHudIhiZfphDTo57rinXTJJ6O298s4S6qTh3UYR9kZcwE1s7PibHLKXlq+XLiXsZxvbY0GwhgSeBJbV9pW5/QDuUQFIt0EkGhpM3Jyvu0me1f0YlD8586WqFTuBAShrulcxpqmrAUcYyQEKMoKiDfJSSe2ZTKf2/olSa1FTYYKGRyoS+uNNvaCSMXzFtk1asZ2DkVkQv/7AF0grcgXrOtS+xagw1Xd89ciItpWSQdw1YxrlJUr2TM5Wl89pwmkdY3nGD2rF4KZ0//U48PlkoI4oSlhwzSMPXVpk/IbIGnFOgVG+THrK2MYswAOCYrl4fqVGqd1U4uyowgGrL0cS1pR8v+tL8qfTD1a969/fAK8y/9eNFJCvLJ0EIicIEJitoPThJicR6cHzoiV1l1B+3D9vijA8LWRXEr7JfFr1ZPGrXg5BET5rXrhnOEdqjGwLufwJF+PKjno+dMnATLIbK+40BhT43ELiMKHrj+NbyhGr+oHDLzuX+iLfKlsdS5WiWw6HaUDOwWK0c50tUDIkxZ4BUr0wFrEcEG/c3yEubbrGXrQ0q0DSJUSTtWVEjh/UIQRqyVf5+wvIdaHW+hyqw5TpdkChFZ2E6fh4s0jSNah8G+BMiKR87Y9p/r5SzNgbdzdc1pje4WaMqcAm+QNG1EbQLcQdNZa6+sukb+Rrdr1i8x3fzNgTKlTGhIG0I8GO5sHy+fhSuNr991+G5OuNdCI4pn5JnPCj+Iuin5151SJXfDKOS6tRyZM24ZW5KxwCRTQZqy92AcANW/nFQeIf1yF/iWfmGOXgBNBo5eYGrQhOXH2MGL1ybPujZlHoNtsBKQ/HPxKCWYad3twUhGerwoGbKQIaCIep1h+xxuCHD+qvdTIEyLbwzLEDDWWgS4DKlosGDoocaKpnwmUQxtWfm8jXO3SYEQ7UzADGj5Q3oXVNncd6cxDAH1bZMygC6hiquKEk+hAMQj4uQMvvj6JA7eOFwmhC59Azg0dKzLUym5KEDhoxAQ7qY8Y2g36Q7ZcJC3OXS3+RAjM+/cJ/QhXXhA1Oo0JksFyP8m83C50QW5ons9LECaGjJsB3hcdbywSy4S8LnKs67JLws/lfS6CxPUU0c5/jOoW3yYwBC/gwK4FaEpxB3xTHvOdPNxa94Hlpt0BcYHtc9Wp5PTMnSEzBG8T58PSfmXLRKcQr+K++Y7qyQKaxOj0ZMdD1PGgqpqH8ZB8aCh2EKITgEm9UtJlda4S0BJc6BsrqtJR/r5G7Xyec/LNtBxvnPQa0+wIj8VnCI6d7byLvUMZgaO6ApzgAze79IeDN6Fc8D96fqgApitG3ljSkAxXrennk/nH7cSbXYueHgxfVHHTynRmYPFdXOtk42xwiL6JB5UW9XxkA0apCH+R4wXxFywB9VLljtp9zeFEuapUmiCSbAd7H/nonJKJnA4/At+UQpkCHFvEx9G+fVjbyjDTS7y+exxGhk8uppWkbrhCIVi8ayp29q7lE0yvYgwL4JfYGWW2+u6Lr/q2/fHy3kV8cQa6dOjvLOagvYrlW1TVdwF+SxnJxDPSmKBGv0JsAUDdH5soJCuR4BMb963oERP346Tfa2ZlF0Dk33NGQZQTQjaZ+IsxYjtx4dxjejylMn1dRz6yhWYTH3Y8hnw==\",profile=\"desktop\"},[\"recipe-server-release-0.16.0\"]={public=\"EJNo+zJeQKv/Ud6OQM7uO6tb9A6M96npMI2vuOSVK2VmX8y9j+MTgpNCLM7r+Bx3wqRhKkK1f0PYbPLftG2Xoi9I36++BMy6k8FcYOnFZOZpNiXlHEsa2NrtKzDkZeSMgEL+ms5336tHXN2vwmx40A3zRq/TrF4q7Hh7RBa3gWWFpELcJvnvalBIx6XcqbvOYhO6g784XHiD/Kwxx+duGp53+kBbbmT9lYxzC/8J4kssYBqs/q2A0VJIqht4LtIz8JjsYeKWDVv+9Z03b3xEMNHNF7FImuDbJlriPD30VQpZzKrofWW273wqphXigPzroz4YCBSaMwyr1oYlPozZ6KFSonh7aW9+VQChjPqhGuD1nbOWqb4aw2qf+uUGxyhYIJ/yphY1r6nRP8FSuJT1JvZ21nLIEU6iDbzjmArFf3j6m8A+rbhFYia6bI2dH66Imt8oPLA8XaINk8aarFk49f3FKhBbDEyNLRU1+VmVin5belNYCUpLNNLAWXWJgXLQh1SnlVaKRMiwrmCY+n6g+5TGTOxgkRzyjeHhoYKsvJASLwuj12R63tjlY0W9zlnohWLuFcMbuQBdNRK9QzLpNgScNTT0sZB9nVrHbfZJU7uMO9WHSdqQ96x78wl2h7kCQc0Gc8846dmAZTtA7OMuU7kNSoB+7J1stDlU42cIcueYD/kXO4BBpINHuY8sCDyCMlBSsraGEWNUJtWeHiNaUVPalpala99yfMCMby6IZF8WwoJ12QUHaOr8bW4yZYw7BV9JG5OJDynYPjc9/DjzATXyS4HsBRgHNBGkwXjhp9pken+8qPjLvVmxixY+C/n+aW73NFPQQOz3VNjKCIMaZn710rxynnUPTaCmXHqJaCFyn8o1a0gVMxNqSu/uGQmNlSRYL9zlgo+YvY8XF8Te5HYA/rA4RZXy9LIeLa2D11sztK+GX9q16LebDRFuXLq1WKawd4sUVRTc6WXKhF9gzH5OAfwY05ET2pTARjTFQDkggsYnMPxbk3mnsAo1c3pVDxH9E97swI3MdtIGB6bEGxmU09rYBgZO0/1GkKi1LjhSz4bn3ssl9CUY2ETcma694n6qr4VU4OR527zkKKL4iiaOBT98nAb7iXL+e+rpx+EAAwuGF0zuah111SSMDNrvIw9H8blHWDZ+Xv0jDRACwOJEzxNbcx8uGDeVXXWBhWQ4XmsOEaCrAYJI3OkPcfmLrrwqLk01XVcW61SkirwVzQY/YCb+u7Kd6OKSnJ9P5AAmGezFb+rSNfHAQtoxbncDXny0IpVkMr4qiqQqhvvtpnLS9iLtVYQS6AY9NZP4hKcx9+Zzj2aZUYrkOTJ02oc+PIsKM62Mx1Hf48h3+7hKcr7ZY0NQVxGa+FVzd9WTJuZKgOoLKXe8lagk9qKlGonslbkSIMKkPziNb1nBg8y5zdmLTayLgpt21vsU7ltpIvIWzQxXd8gRysHfXpx5QKqfPumDF7G5eNrJkhXAaqTWavgdLP/NBHFUBxLY606EvmNkHEwbAHxYYzFFVsKbujOe+grvocEiSmf7lvlgk3588nBpROz3SFlM0Fh2stUVh87wxAUkihb9n573UPToLsJxRq6W/yr64MFUgYRC7pYvdvSoL93FngRnh6ezDh4m1ypGlBB2OYbLF4IKtuJ8yWZNzlKX5isiNVyNIQfb/PmDyjqq9eS/s+6YVHKjGnu3TvQmWs9hGHvLjvJU6rcipbljpGu88XoOtUK99NudHSgCHakONqzOZKYwC5lmgphnLfMUKu7D28CBwhcc97nvbxt5I+VMXAjgOPmkYcptaox+L5Noa/+PU9lRZOHUC1kVbM8ApiUJPthBt9MvlygOAy5gmxCT5DskgqgreJGl3afIZQDUGLVC/XFAMYU3XM628uMptBGGLH2sRpee6kS2x1Djnd5OqE0j9m/QWhNOSl44+VnHjat41kaCF6iSATa5QjC7eTP6zjeMsZcRXMTaRPPkz5ahCXaw8NR9u5Hn3Fad9uYbmOUFJibhQA6bbrYAV58XmSB1gVLDc4rouDTGggq8ZiAM6IDatrwCdIuV8wOnQpNBzaXp4R0HgWFdY80XzgbQg0HyptkkMRYga6JcECQ2tvcm7L5jdW02/dzANbiW6FrXpOHylbJtnGeDrA4gvx0jOSdo0kJ2+5SMWvxCU1pWCGAm97WsP7J02CGBqdp+OGP85JRp9FwQso/A7HlRfIXFWa0xdqG/zAKIL+Wbs6YsyESZHcpOYZpg2AX315GV8uYDJX1/7I64jMI7vgFddIrhpdcGkIkYPPXEKmOwVt3Lm3RW23SwMDRg0DySKw4ODhQjiACUslumZrwPUWl1f8GU2BCgXOjgMTF1TGb59vCV31YgCufjgo+fJj06oLGDPnbN8M5ixc02pgpK0hXkFji4O1lipKPlut3i5ZfkrRXCbI37j3k3hUbAe1eoN0AVM+YUPVukQf404FrMR2PlNRk8eHSc2zMS9n9bEEfzGXaKt2ea3mmjoBemkTrPa9/On69fAghf+M4DttzeC7ja6HmZWYTWC+tuUQMOfsR2HeBFVrMcYnSkIdruszTngsoefSafrAlzEgkgnQDeJddXwtfN3J5fpF97+zANqHb9MklzyHn50ONatJB974+0ICY3gCvPJwK1HFAEORJU+bFjNT6M1IpF1xfL382FlgvI566ohuTkCNI6hgmDxMMilMmEiCWwMpNboKxDr+Hi6Zorexjl8uWG2t+F2bYck+aCl96gZ2ADjJkG6RKxePZCrS5iD7mRHW1EiEOtqc1ioPco5t+QVY4hhYE2UsurBs31JrHUkYg64hrrJkWnOzbUAkrP70JNmVVqNTfitZlLS7EJNwTxqMQCj5ppovE+kF60qmtgUO83aWzXW3jtNgE2gAVpQiUq68YVNmqGzHoMWICcSK3qeceroaUV8bKF5Miay1M0nF6lNWPmrW5VxaSOEQOWTf1Z+8PbgDG+fCZg3Wu+R6IU6JBT9ty8+M7oWhMNNhKYUq/8k6k9kK3rMUeUSOMjKhBRLT1dr38VOkMarh3Z/yaQObLiC7KuV750imAh3AGHMLBqPgmKI4Zsz6tz+y8PgI2o9CMDycSBV5ff6w/B/MrenE/HcKdbv9EXTK8Y6bWhUA44jmNFTCvsYl4g3l1jRc8t+F1+MyZHrHm6wYkCIo3YjoFwCFXcLJAGxoilTSFT+H8ZFDXVH4lFzWjni20Cilp9jqbDOOBG5PHTETeueIWutBFS5SPKepSitgl0ClVtwmuFoYD67N65/zXspX0LY0MuoBPieHTHFtFMGqaGm7DprE/BEIdiH3V36C2w2CKbUBRWMQDQNHT8Hq4hoMRi2ec6FZ4tNKA9rX0TbBvnndoW/L+CEbLiLXU3r9MUXHNM4c6rRUFP/5v5yPAdqNV0aiyyaSA1RnYPTc+Po6MKoVFuqwMbOYEoXVNB4wvxjElgY6t2XjYzEaWh3/NX3qJUARz8v5VrRRE2xHb4KXRIGNIA/oWAzu9TdA6mJcNb63KzoWKf1i33XlLkHTkykN0m2QlePmouPyo9+U6JlFOjlVS167F/nrdMp7VF9qn8v1YYVhfoUNerpfn3A/bLvzd5AjhHt/MQWojHtytWzgkXgSblcnXZdOlL83p/l2aJdPGp0CMNKvyQKQJZ/edi/QWngFaTz7pQQAxeJazEo/BCZo28v2H3rT0OdvqYodS4xShl6/WpuRRt6TgYO3zRme3fMhWDbRAQEnz6GooS2Ee+jKNu/bU7XxeS3haoiB1b75Rm38Q68+YqNDW7iCCaZEjoVjAvWEuUZjYKS/+U5LtODQfhIAfUeu2WcHDlAmNwkl9xd7pHB9TRN/AmRlRopMnXFBEJEofVTroeHzq1i6E4DigY5taMQZITC/m1mOGuPUWAeYFoxUnUYhCH8FX2rDhPzlBtO4lzRsFnWjgLw5oOUu0DBJkl4vo4ybkh+bhZELsq5m3SCk7nvIWHw8b/2LMLjKa3K/dBpV5kfvDeoarpx6ymQKHjY2oWHNLobaM0NCO9hzkWiiTNYgyqYXmRk9F1jE/Tv+sHt8nnaZhxEmBrJYpyU8CZLI5k8U1j+2j4qH5RAXzEoCE1t/Mu5bufEEoCq/WMLvsystltyOf0RacZ4RzlTdnL08QEjpwIBs3qknhxDdS0KHxotSi9/0U+hPeFVTZhRLhpKhLB7xM1OFHbT3zneXQNh7oNdiMNNhePUK3wS0JNvGD8wXFcxlGXOoLVXU7ICABS2MQNVXKG0TpuZX+oTBhvg8ynIl0TtJT4iTHcdo8RW96FZ4eQe3c1Vy0yS/KSd16PyLNbJYK66zW4boNi8FxueJqhXHXZJM17rA7eebtpMYYquXsYEffn2fQ5ut+NrzKhMyBu9UXSIdp5cOiyrDnTymsYB6tQsLX/vu04xsZb4+fv2leyfrKh+Ft0cHOCrElQtSGZZQnND13JdGdHgXPyaH6BTaxpr0hZ0GRnAuYZNvto9dcovLAvIHMRONBEiT5JS7QBtq3pUWdXt8gge7evoxeUa5MD+xYkoTd1ol0uuMIGfKIXPE7kh4hPgJMp7BpydPyqeE1ktVsGRt0Xs6IvtAhaiIXzZmA0EeHvjpn6Zo0mSx6Kc6ito+vfoOLXFaznjsGy4ZfsKAHuJSsE+k6BaijcFtQC9J1R3YVzfjcPGNf/sA5zhoN5nbmwRdjAil7VNb0ugZGG5F3x72w5EVsjFGwza3+MAlKBGWYgtVAm+toVa5XgsqPZXHov+kd4tIRtmcAunnH4TMeaoUDzCi9qkLmattg0E8R9ThKq4ezIOVBBG/vph8WoOBwD36BBg7FuL+GIeY8wYeKkoQuL/1S5QKQVuT/7qElHHadOgo5cZBheN/zw0sFNKPDjjs2EyXMAoIqw5OkVjezygFYPDHjhHVWPBGbLVAUHqU6TB3/rq2RUdsKx0F9v/w1cCchKYGyyaM169oQxceasshjDPZZIpJvLWktsv9bxcTjTA7WypXppCkh9smlBsNSIhGDmE9zHmLsMFUcPJx/SqZazYSdmoXhiZcmTQkMPn0DYYxEnVm3jVUdea989lfUqhrKENwsa5VeBAUFBeyYO9le9LJIp/Zyzsy07AmMZ56ynz0+H+3ib8T1dWVvFYN6tcNnpT8wnTlAKjb9CnvZvW2rG8+gZ6YadwaCqpXWT3NDIKSBWWPcCZqPWriSzRXjrhVEUTrltvyGijvHyp+ENDhRExmRbdeBIBxdJQ98g5YPG+oQ864cptvADtBm+TxyF9d+1JiLs3IZTrKQLIWLXgoY1zBRAr6faX5NZrc3hqJNo78nAQ9re0adkL99AbhgoOyOgWZuvdJhHrlMhTH7QbG1VfP53Nu6c9D1k47WvmMAdl1QAS+2aiQTQrkAaaEDK84RYXZbwLCildFOI1/4Mg6BSXBTuYWSKKZSSEsf9uc+oeh1PUHbP17UpwPoSFCrCVXbiy2Ubn58PivkIsAs+7ZFEeYpfCewbX/vQFnhiTw5IiiQBXzr9UnRzCV+ErmCh7xBdNoRnf3Ciz74i4/ZOtLoZq8bHD2M5ncDjcWVEsJtSsKApb9/kqR9KA2DW99LIbmf+TMpJbD8168FTxI4gKKrfFf7eSYVpVtohUv1nZKIzBkzHpkej2ZgkMFLMJ8FX0YrabzugH29CinBCPdf5OcGySSwfbG1zjU3LXNQhWxtbQodObPsb+L58gmm/o37Xk7XetnIyDfwsTe+jQYnCZCYsRMis4mRyxKprUOjgB8vqgHF1X4wXG4YwjrlEL8+qGmZGTkF9CF8QKqNbTbNOyQWBnuZH2uy33+/T/kQFI2+b6rbbLVHDgs0bHEU5+x8ma+s9wldrAdXOyQ75qBxuMUvCHQwNK4NY1qVY8rK1pBL2+1nNJ4cnIiwNTQnPKnaWiUmBWRIJc7VZ58yNopF9E8PXzCgsZzIUXB3BYuYlOPV5EOilPme6qs6XAgbt4qZRXp8CbHE8FCk3LnDL1ALUslwU8zx4oiRMz7V7VMHwkZSsuRfTDySw9r9W0PA9I+dGdTdZ1wCXpuGcc28Q1EBBZXzHO2A+1k2vxBzXU2baXC+OJQgE4qp8EEUv9jSaE5lo1rGG0z9i3AubwVF9Y0e5eohdIIo+ABkme5djcm6hrWF75TTGMxcIb6UxTKuXi4MkqufgSOtdT/jv1ia26c658YmYeVIFpcyFxPwkWbIdOcuXqDfqtDv3gHG6yvyf+lAiZNKXoDPPb7yo0aQb/fQr0NT6XesNwkJZXAxMQSyKgkY80NzJQ7eb7XKJMIU4AhBtAnA3YUR3/b3I02DjYi73jYNTQENJ0ZarwEquFM6eFmnkpyrjDBcnwm1qEbvF1XKS/LwtlIIa+IGwtPjgle9cRM8aWqH7bPtx3lSUbk1o5oq6lHzR5BAIAHajrjUFhJinvbWZpZ0MeWL/p3NFWlmc6DSyyFtsE9k8cLhA8fImDVSPJmA2ecMv+SgK0t7vKRMKGfGFaZ67tdJSQxHvBZNRlpuxOenKDF/r+JPqLefQQXINN+yk9+hJOs9cqny3vG7D3+oGAFORkXby4H6wzq5r1nnS5yCiRmkpT3B80qE3PkK2RXpPKV8TMotU+77sMVdj9rx3iRYvvhQOxv/5sMDDajf2uUVr15JsCKmg7kGRg9GpPxDY2AExBhY18U7XbKiUDyy1Y4i0rN8mv3aFQxpfDN3KcTfVkW8XW1/WzMU6iXGo5AU196phRWofvmTgXTluNqLsRUYriCu2Ot1kIdutBqMomlCUWcg5+b6Krg4U3TOWRb26+ohA4lShLrLie+hCvUP2YcXK9OjFYq2GeaVJrnCBPnNWUPa8jdksIZC6Qda8jpxkkRs3fhXLcUVUKOwMa31mdmFLXOQWoHIHq0SzWUhS0tNGevLG13swi1XwKcGO5hgMkijwpnFLPYFR6b8tlDxGH43D78UWxMru26c5zgi6W8822DxWm4lMaDS5WrdK5q+vYGIGl+m6ojpmksQ0sZfao7Zd9bEf5nEUiaZA5RUNewMukbcaYFQ2tiNSaixWhGy4BAGO2X1oRJufHQHCbgMH0A7fhpXRm/3Yb7kK2lSSmJWqWfhionztWiBY/cWag9pz7kIz4vgF4P6poOXF+/cYB2Jyp4JKyWWyyFCY/Hvs/hMssYR8nirnJR6tDC8v5nUZz4k+r00+JEBwAKv2FcSV88szskvs6ewfda5tTH2ravK4ZXGol//YlS6WrKwFEdXdNweEa39GcjgzWDGfJ+5akynMPQopYlz4Z1RoisvPcX/p2WfUgflmJhWP2ccLONbgm+HRUb05iqZ0OFPnzyHQiHQ8j3o1Qrn2I8dzJTbZQaQzZopcOS3XBdoOmiMEzI7xJgAU+FTRTxgGYowFOJFat1gINJbddf2pmCGu3mhWnL5+l7VZvkPoW4PBkPlMK0AXG0dmqsMAD1McwHBlfL2EpvJKYF67QUTZZJDoeVY29gAETcEWc1CbVkLlCxCAdkD/9yiigiSoL+cVY3nF7vXY1rvaxE4zQrdTaENKfrHUgfFl6i24GVQpM2VKjpMMC0u4EjpLdvOrO9wEEckcwUDlg72R/jHjK5jFuLtnaHreCu8olWH7u19NCud4PMn3mpREDoGCq8utYivC7JTjzy+oQTno9KguI1JCz7EGPNtWT8WHtDDbHhe70iViaDye9U5yKo04+7uhVIiloyPL9XP53FmmCwDU9MwkiJel3J8a0+N9PRyZYquCvNph5A9JTPMMBgFLpk2x0S0HICTfHd1uUjbfSRqdfgTPHnBUwzQO4dCc+bM8JezzrnbdIJLS+xg1iAvdJfLoq1Cxr6B9t0JiBmqq/fpZdmqj7dqEudLMfmvM3nND6EbFcJjdDh/0y85WSv5zQU/i+afOLGTDZ+hopmaVf8uX0P3zHy8UfiAFOxgI/B6PVbSOFJVWM9zTXt0u7+84tAegPqiNhAbklaUDvHHqDfXlxDpoYc9TQBxMRdk8utfUzqNO24I3kGVQl+Udn5XS3jFuBHVGtDnjTK90I15xnraUhc5InFp/+xj4ZxZxIzDBYvJEymC/DdyzJqdWqVLKvwsJAo6yTdXL6Nj6weRTlRBWyqhsxbcI8H80VMH53XQ+q9N5xECsd95LJA3B9nP/BrpzV8yjGR2GMR617AYZS2m6A8WHqgwDWxWuwFt46ioqKCKNzFo0Sh5g32TV1HWDX2uD/MfHd0MVuyUe0yaoW3bXeSG9qDBbPr08sQ873hyBXrdS3et31ug0gUY6oK9mKy8H7MPlruM81iKB78+P4BxJUlwr6kpLwkzcbL/OZvwsciNMtpa4kMBjhPAC29XQlK3Jpz4rvyvCypbFKuJN3GI6hx/5ojHFhPtJPcAR4H4HVYodaV63DEEXC5U06Fjy5ZpLgh9cYtYVWFaro4onU10fZyPhkwjq3Bf2dTcPUuZDDvbx8QA1cy8Yzt6bfe7jn2PI10ZCIMrubZ2kmuNpv67Wo/d2e7JbZKy+qKdGQ55jBI/OPajCyem7rl5Xtyejyzj3jzgJgE09v9BzGs2OrllCsL2G5jLg3/UIJRxmTOLVYOK4yVVVi0H77Eh5nS3qYRSzqOdEcml9ym6g2xSdbex9cCyJ5pvq3k/wOsyvhbNGeUIsoEdvtufcKkvCQeWwUpzGKy1arCsdzg7gZEEtyFxSuKWySqemKtq0//WAB6Tv5O/VK22OMaDgp0lOfWRscg7DVRjTb4b949U+a7C4I3+ogp36px6tiI+hQlTrpN6cQUE9Y50BxfBD//6Ah7q5sm5nGy/W2jC69DmQCTMJhYR6875sneYUaIqn6yzmPvH04+oV3zak+y3o3/hXltRa+WinlINSPvHO3hFL/FWQX1qQFCyGiYwSF7Ert5GkXgVhxDejREnQ9n2Y+niv6/jVpafYo/yhaqnUAj9regI5Qq+LjBs4fzT4eVbHVSgtBEIM63aIrZIecYegdeKvYPyjxFV6jQa1QgU272m0M95mGu2NtaFsUzMdteuZVllGIvWQ4SSI5Pe9Ix54NWZg84cEaKJk7vOAZhSBK/ddT9WUI11R5VbpYc3NoEGzH1M/p2sWb5FfY2JbmMsIpzOwSUD/EsTKA1hbv03S/ga3MZ5kGsmKRw7ICVTvZrLvgm0xmXCbucjaIAGZW3Gx/ro00AFQPVfwW3PGMTlQ2wGU2U6WxzCh3ySPhlNCVbtzepMDQfkfgK8mKJbgVh9LH1QgvAYxuffJkSZDYvIQQe1YLqNXxyRuOZKs/kQQWoBdD7O8q91UQxor8drP1wKrtflgnxTH9ZjU1tMyDhGPzCKG2kmJTQW0hB9ofKmGqWiyip7KPjmiIxKQ8npnB/atKlvxc1rECx6Z8efrLV2LxJd+k9nwSJq9xI+5adF2+e2Wz+tZgWCrlUztUc4kaOk3ZIgLYmX7Vaq9Xy/h8b9+umQg07cAPbMimgYXoUbvmgFtOxKllgZp5x/qkhl4p31mpnmt3VFCavAp2fzt7cgcNlD5jZdwPwpUIznGMfIMBLhdNBDW/kVS2Z+/Pvk7CMPDK1oGNJpAAL3DB9SeV7zRhM6KbX+Hs5J7ay+B0WXTq4+oaSbujfBvZzfqhaTfrI/UHUeo/b0QwTPUIq2oaiYBaxSNdgSuFOFqFuCy8j6gfMXu9ETg2TeVCWmNFmPu9dFSCpXSW74N4ouZ/bI/ng2RiVEzLaQdrHahPwtg79SeCJMlevH0jWAcytzTiM+DwUbCSA9HXpODx9R5J0xwpJsm5XhGF3GmSkoGrQ/+7bjdjYjVMJQ+wU141WSCMGG44ygBWOlD65aBLPJcO6rkd8gFNuMZFSCvYZPlj798Ln00zU/BxZ5o0ovxh2ul63B9hVaq6XCe/icYeh+HyNizH5pkmV1IPVsoz177NyrHvtg2NV840U2icOwN5b1Rsrg1OuvB8yBZDue0tY4ZXNAkoM9E6bg7YOUiCEnm8pNksM0viH6RbKclTabYb/8feP41rZohY9BKyxHa0A5cGhKMhQSfq+C6mOyT6d+iIYHnv+BoiLz20ojnrVEAi1Mp7L1+2Z7GFdtWr6xd6kjCg2p9i/qa7NRdQEyjzQLnwyMKowz9yibqTRTgCu0XnrgMcOqpm8oqiUyhvOhpqlsfePAQsxPGDnF4NRDgQ5DykUSZ3+Mbi4EKUekW4jbey0MzbBeic5gOZP7P7ZRTqFP8D8NOYwBoQLkvGUKrgM3bxsl3Dkpfqkiz3MrVlMQa7oRnmBzs5vjY8uJQhTczberkMr6uM6aZy50g8xtcx0cIYO044H8eumm/DgR7iS8IHhxkU8lKGDSNE6+XSZdminWNsnQB8+3xjZweSosjAANjmWs0GB25bKMW5Y4xhXw9jbl3QTNxhOA9nk+QpbZ9qikKlIpn/64LNpapPoJRiWWIMJSpgn8u7nb1zm3wb6IQ7FRaTLumnLM8KXDUkSqrfU+5/KP10Ca+hoq6fKoSdbiIiZhcLzSGwOkBnsF3KrRcG/gvoyXrPeIleZJyXC8+AyuqklC+YQtpQCkHGjwAjDjQQJQ5EXT9P537XLpC08vCEGTlBDOnZmbN9pmagajwF9M4pxgHSaNOe+2uJwDidAEwb76YathZlJ0nOY4XgW1S8EYHJMqecCbvyUhM/mo347Fe5Mu7e+IEjvlSrFGizq87gYlQZoXtB60VQZsuxoB78wPKHIWyaGooo0YKA/ZoCIr9ZUuGQYXPQkgDGxuFkghXDhKEbWntUM4uAkNdfVrDR531PTTzQtZuKfOF4kiXFGKNKqjlwGsyLCBgvajVlDOM8cfKy/r36CG2za1/2x+uCtSLIlmRYqblfxF+TKVbgX2YEv8Kr0qLQgZuEVqi+B46t2BmoJ/TAemuFORdT2E+xAQUqxnUbj8KM8Dt8fL36abo2EVfH6RtPufRJyarydJoxiQMU5FwqwE9wv8E6jSRASZbT9FGAi3S/D//ixc8oq05BggZLW+sbPbI1bYCJViYoUG395AX/BfIXtdfgLCCDt3QeyQFpl/DYd4P9iwPCyrq4VebOyrtEwuhWPyMLjKLvLf8lymwK7CbK7KghM+0HisNgDLPtBDgtD+9t/9OnNLSQzi6+/cGy1Pqh48e3P58+/bZwirXcWoknHmYeA+0Y0tQvxf7nEt233iouMqCCHeyyMby4aWjHL76wX1w8fbxMxKKXy+Eu1ezkQ1dVuvLmEzdYBN3mojkXxuH69dhLaJpi187StcxU8RUwilwTnN58w6GDFlQK+bGYSPp+oaFAKqms8oVOkvV9BFlG+lW08p/DODcF/sJOrHYkJuCiBYe3DPk6DTzv9JM1Xqm1Bwj4WaXufz5H5mlD8sVCD3GlckKGy+Y1F/O+j9A4QZLqpAqHmkpm7mg+MnlgQZeMf0kJhKqi+YzArbkkNVdDRVWX5VwYwsFwOUe8ZOnjCxeefTNHv66EartQiGAJ/JMMEkkKN6J608kwIDdtds8RlzEbjYH4+b4x9XIFRRn9GK/9AHAIqvAGbN3YXOOPW/elcJ+xfZwD4tDGngoJWxFpTpYFffMe6ObgzYMrDiSE+H9/TRo4mSHvfhNcDQch+Qbsq14Tcc6bWlsrIX+NVAUZDiEwHLWDbUFzqBy9D1HhqcqHZO9WZLVlWFqhU7UeJmCz2Ko+x5I+jALH4Fs2miwib05JAlw4MzbcojaAv9UuBjNa/awZBOxRl9YEKiMf07f2M0Ueb6ljkHvMAg22yDijwVm2NxNaHkAop6eN48egT5GVjmJGm7X1FRcWmvuA9Jh/uIYAhWPzjJPTD+G1uTzdob09OGO6MDCtODC92BnFWVI9y1CW5anCLerVqS/um10eykTWl0Kj80huK7HWwzA/GV/1GCghpcBs6LyXv8DG1ByT3foK8sLZW7fHimJPM9+tU53cpSM/B1w7SqiD81LzQbe6NLLjKsenLHGs7fiNvaCfdgoI9TuETVUN31TcYeIZDwwa612HxntCgCFTX8StmNynVR3S/rKkIsUHCm2zvYzq4qYeB8cOUuXmxfccQ40kpOFkeM7XAF2UxY9IsiYhSntCFKKJ+8uX0rL8YwrZCIpZJBk5OqE49BD8YXS1wuDsqgKWMz86HdXGGKTCiE4OPQmbvdpEuWzu5V/tpJReGNy4Ly3tjufRY2kW1JUSSD5kcBqTCopRkVMdwI4MAA3olLXyBP6qtYtRpLp8hSLCw0GGaUSUGTk451WoMFJeC18367qS7SfnxCuneftXuFTEp+zW/faZ2tAMBuFgxcio3tJ/3a+nw64W09yxWpVFFftBY26FyVot58Wy2+9yytpNi3WRpgMp2EryoBT8HPlppuiFZrCz1OgV9NguwYn98xMj5B0IT/0ud6p0EsAAOTRulSVFSgew63IDq7v/wOdMfpG5YQMPIqnNp0XrYrmVipXD3IrfHp8th9hLaGbOuFLJDWTJEAho0/iS5EoJpix9PFZ0o1Vvuvg6wreji0YQMstMdLTEGrTcGIKLBGVWCNNU3gaNRgjrC6BHrhjgnUSGhi2gQ6lAn546fuHmN5nYG/eUR8hccRunqpZV7v5VbrXIPCmhQtWI3q2OzLo6TyNEXY+giPHT9Kt0R+3gw0suYX22LPC89dKSCOKl6J8uazV8PNlnRgpzAE58xEdnjLtV0K0sg8CxfwKpk+Q/HVliISJaHUYZOWZYGSae4ZIxGwAKt3mGGSUhVbXIJshqBABgNR4T5A5CqIcCMdFrM56PRVSp1bUmdYP3SUk3BeA7o/epYiDArH7UfCxBlLQLIEhSzQvUUt6GpRF07YCpxTcszsvlTXjKfWzrL/8CTmyDWTA+keldRw7qPjx62BnI2az6SWzCGe0PUYr6IILRqRv43eiBHWDJktUV14F85mwYeeOCwgzyDAjiwsnUOedlR7fwYEkrdi6QJxMIAj+KFoKG/FRSHPlbZJO93idjo7aw2+tjMyenk6AINknvtNtyzJaOvQvmxpSV4RevLAuZ24TdxENCToLvq3IYD8ky7AIbMhrVRMVJIBl8W3qCm4LXWt6cVKPIeNABS7PkljEipEg7xwUOP4v14N7dNbISTRaK85IBIXL+UZL82zKRk+5O1w1gDeWVe0e7s8m3vhJr73NGWiHaOl6knujSv5HKJQFRUlokta3JpwaUWwSYdAbZ2WDwaH4obb/QF2KASn5cskel30MA1RJItrLEFiM40A6P2Y1FB0m8FA1wDNoji9hUiadSe0ObmgWJGU6sJJqrf1uuknxL8faqgqv4yxcCkM0mDw7obU1DbQZ1btGQYTq+OvwELJtAGo9a2bp1Kv6uB1iFlnhOHOGYaNuVEd2gF0m0dKiU0b9py8IZIKl59ThK6KyAZIDsXjtjiYt7SPH7Do8heqAHOlFIrdqoYKpmIcqAJl/B6Vb/FBjSWKjF1QxFZsGFIp+ZSqMjUWvBKJ/GP0Ns1ACYUgdVlwraSQxPGvJkNTcGL+IMlouN4L0UQb47PBauP3u4U3bHoV6ZQsglcRpcfUaNpJtxSIBKKijWbcH/QBLE3lnqAn8Sx8ai6ww+fOUl7kvcRJj7BYuFROlE5/HBLmb21qSXzUEGIa4mHTsCMMMcfZaYKVRL4F0SY/A5vbc8W9Pqc/C7ulNMk4DmIAdvDrLQQYMJDoq03GOtSikDiGylk23cISfsOInmm6oWFe0Y/BYMVOegsRhs4SZEBJhkaOJ/yppu4wHM3dWD3I98Q5ko+hjnbEZxhsHKMgMUhjrg+Pv4RnxSL8vHvHY/U2S9EGGzaj/RwGW6UhYICEqSNPOA/jLVQ584mJRZzb8ot7k427yw0IHGdXUf1g/zTyWoY0yJJTmvUpmjQ11HUgcaCXflzhZUUwoTpvTcUxkoGlqmNDiYAhpiwA4Yu38T0LMNWqLaUviNKUtr1hshdIY6lbw5YL7CYxdo0N/rSujL/qntuyUfMPzrDjAVVbS+XXbYiQStEdV7Q13elwdwORHUmyJSzZ0u3nWDrBdJtrsuMrRkQw0ghnX8zmILxVQTzD8GHq2X0p2yqgyLLb7mrPeQaVQBJFYeI7R4ZAalUym/e2LWYWalCVnXM3otxpTjZM0MY018iRGk4s8eqyc5jNgEbCv5Li7Fy2BMDgTCG4LVJAfSUUh2TuHKVDnCsd2f7sDBLeGaKi8wPwowhIFcGDZxLuBsvu4/W1keqTHKtRcvsZO50VG29cR+k1wV/bikzvXUlfnh30o28gHLGtfAkPsA3xMpdoWpEltSzshubDR6Oe+FDJgGUZ7dULNqeZSWTT5pxRyuov3Yz38xa8Gfx+Q/hN/8lv/42+5qWqcO8YVB0pMBD1L2PJDZf33MiyKaran5WtHEr1agIlovZ1NpEvl88UYomxaaesiLX1VMqVFUw4U+Rcu/8I1iftVLn76uqR4xCr4ofiXlSG09+p9EwAUUUVVF32vCY3XHvva3WPbWysraK5A4ni4W6uyJN9OvItBpUoLR55MRkcAa5d2UcZ+QrV7+Qu56vVmlPpWj8ykd6YqdNIW1g8/Caz4ACxYTVqVZAKeydKgX+9xDxzJumc62hY8/68/e7ALYmo7vXjgkT8nK8Jy7YdDo8gYeezESp/x/0IfuY6m2Dx1ncLJJ1cDrqHNaCk0wjA+Ft/DWWOwFtr/pMUWb9faaNFCeCLSdMBGEqH/Duluh6kCVgQ13OwBW0j7YUWzSQp6D0Xx6I+6dtgNiJvtG/w8MGgqu7f8fmMkP1KjsVu6ME9GbYFwcOg4Fg6FqSPJewYUQvn+4cAvbjf6N0kWSqslGPmXYyIp9YTo7VZvN+myPN/KUzFah9cKvetk6lMpIfA1tgKiS56y9qX25ohSDCU6YCRB5+z2yZXCsewYWAf/uYj2+1v3pfHIlPpUyJOcvYFkZW03DFKXdee6yqyuk752G02KWflN70N9ISbApb986dAfgVNGh7YTgV3n7m1zUpLLIkvJOj8cJEsvK2SA9sQ9sZsgh4a1Pqr8CsMjjbf3ZDHBMjzJxKm5a0VtK3QA9uhbeoxyxNBDZDZDB8w2t8baJ6ZHx15ZQM1oY3CEqtTfKN+VBHIUV4znwPgXNyB3ap3HtoelqIk6AAMSUOeR538vRq0wB93Nefy96OO8rzXBInr+rjrTlHNw4VVseFtVODNNEIZliYT6tb3zkTcov4l7tKV2KNo+8iT6obWMKBs7Q3a/arYCYWLAPM3jH7xlr2mUhwm89/zItBGTVm2WZu8cHx9n3G6YfpMoneXxbyKJNH/JCYBya0rV2qmdKOJ9We+RhobemIpoDbrwNbcWVe+Dih7dDYjkidBzJCA8FQMFGgwVqAQ1JvYl3RC7nYa2QlKlHugRsHosQuamUPohMxf2EpJU8etIvYgqK4Ayzu2vZ4Qs/KWe+oGDmgq6QLsJXcDad2/bZdrxqe3YQ7QjAikCgNSK5pkpKeeH0ZKN7naWaJ8xWwtOA5x6C+w406xAuwejfP/5CG7GF44GP9goV4EAbWVJi2b6cHpMVbwf1kotZs/IsX11UnWWnkCzzIPWy46plg034mbX+QhTsjUiiaSzWUDJYWwIaVxFI2+JTXyFNk84voxTvITEcHtVb18wLmRTS8e4CwraI4+Y99yeoUkGK8IcGhNZ4EeYnORaNok7gSdsuXVJZqePpxCsOD1OOJZDSEUOrXJ08eGeaP+NrVCvwFi0b8uL5EQ26QWR+U74q8CkT4jVhXMvwXvhypWvsqFnQUKFuA20unJdvQcCYxN922WcY5HzKt6G2GEskK9Lx4697HxtjBhcLZLhXLyLDq1ymyUmXgGg8lMEDp0LD5TtZ5vcMGrAH2w7jOaX6moKJ+fk9Y45mSY601SV1Ioz6ghDDsCkfSFK/c2rGzJac5uyXwCavK7yPuUx+hsIKFNoWGF5EKXx5T48MIpr4zrkJHrJQUf2GWlRi3YtnX9VF1b8/VC6G3A8MYTMdZl+oVyBA4lRw9TwONQ5XXSsPgfcl9rdTSbI/ew8HiiVqwUsp8JV0laUsMJYyBFzG034hbcGMMlVl4s0xYJjDm59xjavqXQQc3b/u5sfjqloPh8iglmmtY70J/P7kH91rKGcezlluKJj/LlhKyCQn+TR064ewv6jmgXWJ1jPGATeXLBuBqzK/4HDSu6Pu4ah+mK4/+YvIl9ynfAcOOZvUtN/P/n8s2AafSde1a9FcnO0Mj2Tqmp6kAIHZpsk28lP6OdzYbrKY3apK2+8nxpckKkAtGO6FFD5hXDjgg/HmATQD3cpZQmDv4BBy6KDi1iaSVra2cprGnx3FoQCP0tFXzmq+GSUynRt/1ni6XX3z7QpfasHraLI/oC0vA6f36jNf6RIMzYO3Z0NP5HkDMs8RMpDSNghe3XZWGvt2bod+aQEm4aVpB4sPYcPa1syxhpfyKq33VOUa0crJl2mo92KPbAAXQUfMom1Z68G9uzwzEbSDIGIghlj1xrdjZeJycsm8dYbmlqpF8IU6VUc76S0exIE67J2aJ6fNFZL2NQpxiAXYFXW0YwtcMd0Hb8TSuO4VeLQpWQ+vXDLjVwPzQLQdpklk76azlT5drnxxwy4xfUVE87MjqIB7tUHTAg9/aqGBer6ySXxO592q418JsM1SwLeSLH0dDWC/IMtN8IqEBtcx3YTcB6pyuSA8EhT0JLOJPpGPKrCN/yRRXQdKJ7SZNTFFlq35x13rP1Fy65MMp2pTnLO1wGfMDPyu6yqhmS0a8D+BVX+yIC54bz2fR5RFunNLKL9bg4jKw4sQwNOwLjGv2Eld80P+mfos3orDRTAyHH5bDFVpv0ENA1D3LiWOmmirZ1+aKuoloInD/HmDHQv6VrxRnEDaWcwy8tV1TrgHpx+/bGi/2L1Q1qRO8b5nYpUglrLEjMPc9ergfbBjhuJzoIhLOeSEdJeFsI9LuTAVQJzXluzbcLAfwv/i99IELQ2tm889uZ9HVNmq9G89QYM+xPyKefLvj7JXPilbpnm7ge6g0LhIVodBxCB61C0XIXRxgHLStFwdPFYm+GXpC2OdDu3ByJOesIKtbncrsFHuHr+1qpsTSL7d3iJW/w/z0CK2q852olZ8ZFTWsXPnCoieX5NgyaVzVL0qJO7vc2iqk4amYyTGQEPzlifZL+gp9EIUilORG32irS/vsQ8UuAAON3YIOb+2+fnw5LRTS0/tkUE+2TqU1tgg5lIfT+4gHGW30NOmpf5i2aPFV4+4AHSDASubZUaKvz0uqaTaqgIDS0jYYl24jdOoJldlHie1vSWLKUX/LD/3o+WuiACItiGBk7HBc/xOL3S4ayeq7tFqp1E8Qnp9K285UcaHq5s8nPwy17h8s8Fy2uOPXNBXJj9sImy/E6MKCeQxVovhgNlFjqm6cr1wSz9jLwjY2hgjR9yF5g/VwIdMnsm/W+f7t8QZt5xneuR2TEXT6StcAA2DI4OJqTHisXKF+iUr0BZ1Ln4MBGGlUJIJUrSyWj3KQIiAF9gsxeCbWsoFR5RD3S0aK2ifFlfsie6WNiMcMtFgrGGZWtjeXKYuvz/7xmBCbLuWR0B7zWtCB2bS58syKD3Vg12Lkx8gVfqJX8hM5ZIWoHFXunvwDj31vOK+cDqwqBYr8k281ELzB0zUpwd+BHoXoelXKYImcQMwsBj4H8q+VFNo/c4D5i1QcS4H1rrC885OwxRvwzGOjCIzSuoCiaPyjLdDzVOw43APah3sI0kV5yNtmNjpW3IlvSns3fFSLQ1orUHDFHs4O9lZSwneIenUng8Yhx6K1Em4iDuZV67KmsmOPaLR9blOJEoSLW9M99s28k0D7hdFtnFYrtkjMJxjaW4c+awX0H43yslfkbcNyjtWl0aTD6TyLqg2VrTm2OFMtzLyUQFg9bBYM7oJeiFLNec6+ZiQsspnI62DmvqK9ZvR0RkMNN2ImhBJR0uKPpfS837wJVf066q9QqcUm4oWWV2/aDgFGC2HFaJWmb3BKZ4mN32Bry0xd2AsfM7glzJ1pK0ymDFvOBqaQsAPem8w4J22Q1OZZ7EuAg6K77bETbOzK1fXL08Oq2Y9a2ZtwdIeYmiCLzXqv/kN32Hnfr4bHvg2JiooLv1Usa/71VGl5hCBlb4mrPvnp8c8eNYmFkwpndj+/Ya2bc6E0trpbRM3rIaE94O3+pO9hDV3j92/D/smzOigoqzt5CDuMoAvFJDlI3z6rfHg0fWTibpmmbZOG2q3YDDj0lXhJ7Hizi8RhNJgPtoHQh67XiNMgEZyk1IQCb0TaXZ7YjYblGJPwPJ8YZmVylMyStWXQfITRPBH03Pr9JfzIFZwB3LuaQFo8YSPB8uTeyyPj16xnECp++XCiCwk5oevelyJMPLGBrJyYNDdK6YNO19ZJ2IxcKikriOOphY50YzLFQW/8yCNpgP82SzVKviP3j6VFrCimn1/Ac85P3J1uBIex8A3JjvZJQ90DPb2BLnnFxRBQViw4joiHviecyhm61d6XfMXjYpYdGUie0XWpA0FkIQb6/7R43Zt+W3wj2IxCU02MPi0tcdHeFno+HOXsWuZCyoEs46e38Wm9R7e6YOY9AJUBrQoNqPlMHnFNVBRnRmFkK7KhpzlYD7rlLGnpQe8NkyxVvsky7T1LDMSJC1ygu8HyLn5mSAwDc1LEPfDh7sFz9DEafwEQpbLxlG3EbaMH8IOn+jMrnMHiLv1yxCehImyoThotHZYzgqglWdxYWbwzb+Yp5KQgA1xbeaz7za2l82IwRRlgPmep2248jLKODOp3z5UXYKaaOpp+/Q5g41Ue25zqLEmdzVXzq7/ZVYCViqxxawgvqmjEfRW+sWsBuI0KApl0ZqsRgZvzfWlwUY8dP68g+9CGrdMdeTb5Ru+m2jmDeTnZL4kQ9XImE/5UP72CTZ33n7yiZEWg2wpPyJ09vFgV70/zmKdF/gQhqcaOhxGQ+3HRnamCPIkxm70drPpcxbrrxsj5PyF3tCCtdrqPpT2pfbOzWwLtMCb8syUOTpne2/NjzqP9GFp9wj/5g/MA5SDfciqT9pWGHVqyKW3SfKzbrvsdnu5SmrjNvkrAF1H8AS4NK/liis0e6eUcDxz11qfCWO7T12Ooc08YO+0HE1j6C8c0SDxrV1GEK4ZDJV90nfysdKM2nsyjTIr5e2knP6+8wr/aNPJcwUkayuii6YyM4Wx2vmqgYTbAOdjV/gUFRHS5J4YgeIzPSt5nd3rPzZ8nEQ6qfAo1jzv0+uXVNZkc4QVnrOwjPIZib471W9kG+MrNZHkDb9jMFzYI7y53p7SC3NH+IFavEzi4q57sT0gJu9cKceRGE7xgZg2YU4weWerBjTadeSI/paQCZ2WRH4JNtp/hu6BXxq87aL1K2P7R/Dqr59IpMNRBTbMU65fvB7hgsaoQix0X9opLZioIzQO0EKBmJPEDiG/Of2H4deu2Jx6ogQXT+xPcdlHSoU5CNkcRrtVsfPxuDGsQPH1fK99Fu2RCP5ocZytP0LrVC5K3hQRMXAHmaGaAUlhsxaavh+acnT8Yr6ZW/UcZR85tpC8ozeg5SgRQ6wIJ+9IXScetNvBPIjoevnbDIDDIaoNyS5dFHkI4uEBvCyaWGlIr7QgBJdpKAiaSpPyZpMSvjMiraSGBuYTN6ZwJB6A22Sr5sPsjB1ZOHG5TKhLbKR+0vfQPgk3wRBiY/IgFUH/aDChATJA3m3Ei4RTJHbDY1tbuRD5QG2VHQF0yCQqQJ+TCLhSQWtTwjHyUmu/C1cL9QWJ8i39ZpTyVvdnupmT/3ET7ZPVp9oj+3run/ZIhePSOHiUnRqQq5kNnD6oRnJ7svqL1eJS3jABRcxKTMcpIyOwqR5Y/Y0oh1XHkhf+IqwkNsb6hKjgUmNA2AAiNQAYOStyFbiqvK0R5ayvUp4byuR/3QzlUqVR0XmbwkaiKkY/NNeppBAA8BI3Gv5lLtpjnfTT+kyBlxCI2SEBq6jfTRw7Bbw4mt/fu8uQqjVGNybwFRZrMmGcvoS31pxhx8OnonpEPPTStOmhpJImewljmVzccFgQciDM/9idTq/4cZOC1RwwvyDHXkF8gZES9LubBXihzpL4W6kaRlLBF0U+7J4FSkoEC4+cGLSzBLsYR6Gs7LoP5rzyJA3VA7HilgLShQVDI9p5nTGI0HU1NXEo1gJdFuUfZ0/b1U4aDK6+dyybUUK9noiIB07q5cIBrMyIN0qTUM/QhWoohgU/cYlslVNU8s+fbc7QKrkJmnWvav33zZ3DUQ3IeAQNOAWCBES/WdN/I+P3luJgQtqYBNjanfXeat33PE6fzoigc2o0cvTWJurPFBymzp4mgL+ZKVrzs05U01BCMWq3C64gEbONDHnGUHfdG/oQ5TMzLqfqySCCu7Kn6VX2WLfhy0qHVS03dHCsRQYof3OsHCmbWl9ZvbGK/Ch2NYnPAdl4JeX3dRZ1H91PnofnMuuINtEd/yjc4SmT25NU5jItVJvvXBjJHXFPu6NJH/Kq/JtsZv1J0x3iAdulDBKWyRZuWsqtBMZjPmREQnszAs8uGvdtJMfFnS46hXjJ4yagLIKRmNQqoeqCwHsiOGbQdV1+mF0dxtSELSet+nPtYfnbleeEJYLo1FTNY62dJB7kSw0oLDAGdxsg8en4dz8+77SBMNtLca3k8r1uUM8wwj/yVo83Ar5mMtaQdvZ8lIK1p2BRlmZiXSd+d4H7MD1WrfbmELPjSwPQoeL17bQt7GeLbf2I9uUlRTJkRA2wt4SJxivrOzmy3DO2kma+ytyrquYqH/q+heQdpaW+9K67tZyWHijC7SUs3nmWXPV8TFIP0NvcLXEvqrD/smqrTPcBDRGiuxipJ00FMCMlVYG1mKpJTYt5urLh7AAlwtOjZ5wSOddDRvAXrNJWcn0d6QJCkbfOysZzPlsYjXHCgHq6furo0N00hhX5koiUIamWSLZH3qmKYRbGWyP2VVKDukMVynrbcP17n1eaXcGMd5o0ULzCjBT0KRf7jrxRxujGoO3+ItmO3q8obV4EWP09fWdjEC0BFn2jFeYKpzXYCX9HN5Ru2pMylUMHW5dwQBMRy/rcthm8OohEzPLsEFDAWVOl7ob8ij+IWbYzGu2zEKYjwboxEIVSSbpTUAT2+3U7TYfp2A7z35xJc9sG7zsKGD3wWRZXOTiRdFbA6kgP94Mi6mds0cCgL/pvSxB5S4Kcsp49ydXWWTnJt2tyYlXdhHvjgyDP8j6fxlqmmX/Nw+kDXjClCtELNZ3TeZPMXIZjee87eOpEVq2f5YeQ2Bl+FxK9EwCEpzW1+UEud9qI0NHbRPn5ngl1QP1FWtJrFXMV/8SziWBMnCFDJtnl8e+x6ppMHAgko4ymenWJy/wsXGwvHNjRZO4/gg3WPapXEA6oQirg7SThZVni2Ksb72GZhCRmINRyBZqFo72iX/VLyB28K9Rvs9D/1sBlCBOnSBGin0kejr6zt2B/QxDiyl+uEt8KzRlekIjvoeIL8BMOMr1NcFvBcNB4y69f+TTqEswJpsp8YEFemxiRR19lxWtScPkYNBhj8dCIfHfggV42vHH9bTROvAGi7d1a8ibeJLrcnmAh0dxQphaOLL9lljAySlnfLeK6HDbIIUuqoy+JNg+FeXz/5gjoR2F4I+QYLh5y2MKoKD0N3kX0HKPiwUpBONOXcGC17A+XjCfCuLaO1/W4xbekidqmNN/QeuzFKnZXb+IS7v3HEBCsw0XeW6tKMp3sKfOmo1MKloq5MNf9LUqId5jO1vv3X6hQG2rciHxzvs2gsjraodZMZLWTEo1sEOpckVqZvEe/XeGArrwKArj2zP3RzmT7jh2jAQogSTKiKIhIEjdnOjqPacdlq0BnxZiAzZ5NlZFtafoyK+QwnOovomkybrZlVcL8kpBW17YZVyyPnYrQpgWo5g15oIymQ==\",profile=\"recipe-server\"},[\"recipe-server-release-0.16.1\"]={public=\"JoT/ZvLACbMz17ZMmlTCoVU6XK/e88ifV7wnvr+Z0eBbz6LaPYBTViRg0RtxfAix1j51wjdF0HjURR0CvQB1FfzajaqnbI0oCJ9A3ya3fqxGoh/Mqb92j2ejgQidNYjc8NiXc+lbFRutmvJFvC3gmyOn/iYKwjTfDywt4sD+1KvI+idBnUI68Zn3VF0KxDgSC5nY1ZsN7RlbDkjnImsA5P2g360FS8l3a4UuFv1+6vpaFTIT7XNZwxu0lBvc9i9ABJHet6ykWfyl/Hr3OdMP+ALG+ly//OQ5dPHbhTZqdMnjZ4B25Scbw1/Gy2igCM5PbdMx/F62Ir1spj3nlrGwSgWuaScE094NWYHptQpXPj1eHCigcHTzQr1IJySM/HOs9Dxuj1mGL8JwAncrSoJmh3KfLTpnou1+OqOHNW7sr0i3yAk+I6e0Qr5R0g/ia/TCJ4LKaDHlJBsmrFAGSQbUu1hW1Org2pwN+1+AmoUthoj4MnaVzcDOxZfFW9LuKcczuSfUtbEIXbBCDVLVG8lvVI8QqWkh34CHl5g75M68QuoaJjduj9hCLxLpJRJ4h6/3jXcDZ5Si63ojj3hR/nFPli6a5IfUdh1NWwgSUqh8sQkyO8B4DXOx6eD8iTVA86mCs7eDuv2MHWCW6667lwUYrMOrVYApo3XRemQvBapIoe6zgFPpvG7/U2Mj1I3bRSE5lwihP55iDuUjRU7YDgH38iEJkxRe3Hs7grcarILdgVUWdu5DDTnBRcXTg1HnuTDSy+ueJ8bUf48l/4t/6ER6TguBypuUDo2SyRbynUoq2hBu2zz//FfmZ2RW0iLxDa0wcbqlHFYz909bpDX18FZZuMBNCYxTvWCUQSTWwcm8vf2Js1cdlGF65A0Kk8atKvlS6XM4Cj7iOhKJEibtR6NMBIE4P3+Jx5+6fIxuCNvJHDQKG6vLMhBiHYyGAnoq+DavDwA5cqb1Chsn4PRMqU494zlSWl6Qj3obglZMm96QNPxcD1klqsc0nlpNj9lmW7T4b775rLfhbrD+i7o9r60QIEW64esxWiF52UhgTu2NfpjEreu6OweHbI/5hTcZOobeM3hnNpnRqJU/VMJ+QwSWbeyfowitlEW7lKZHBSR9PPBSioLS7uyOopXTeklZfgnIDPFl1hswI2PsdspwSk1HEFikTlN22fvgbivk0KLhRHe38GYK9bX1QFTJfqFy9rS7V9GJNjguqG0HdSHaDkX4BjZg1KBsotSnDrkpNv2l9ra88tH9KoQTvnzgf+3DQVBfoMX4wnghaoqaqs71bqs7m9PNYUeVc0Kq6bC+pvOBhAL7NFxNKnhMIKNUhNj1FAR8Wxo/VF5r5bGPqrWDYAbNbQQWPZDFJw90lh7lSwsyHAO/WG88fw7jRNEgl4eAmADuCtsd30Af26PQmpj6Jom63pJL6pSi8nz1XfHty0+QVMNj5PBijkHKFDcbUEJQzOgpYh+aljEknqtBkepA6SQmZ5sfbQmE4MosS0gbVQ2PTJe/uUv8ZAjJWVf5NiQ7nG9WZ6ufuGi74+E18w2VlSc6M0KBLVZQjX+FyhnodjqgR4aa+TDMF0NRSE26oZOh1tWGFl11lDbNKUa4fmZma0wxm72v3nQkPs6yBnjolV/ZirGQ3QW3b6f46tmaBawGFBq+x75wtLEDRlHF9l4isDqlMejcxcNt97s6Hq16WNB1lYk6W6mrYJSZdr5+Fw3dlSLnYVC1BPEzAvgJQb5suZLpI8BysQt9OriMEJlkcNZA7nKbTNKqxxTaKQfayBHhbuObgXUxIeUKTfHq73/CE3z5LGxHG5vBTxW9QlN+tuuIEckNAIEOLNm3+UtJ+hOmCeiUKma9zSjEFrIOn4V0vZILnVXt0BPOniBEX2DBimgud+itd8HAHd6Fy7Y4XZnOPgXErbzxcWhfynzNGw6iaK/2a7cbkkiDKu+oK7DS/27kErxmF57amynYii/wzo0riEMNZaml641kHfbX7DRyXfmZct67h1PT71FdXBFf76x+VF8vOS8QKynzgbH6smW+wOSNH+el/HRpkeMR79IK+jUGGnYn7ZkCFojpwSYKgme5cCCm2V3RYJts2QAvaUdV9pH7u7W6U4kqj5x40KW9izhs77Gos6hVY9rzTXQyBJZWELcGLwXgXiXDfor1GUSGnBhh0MMZeQ9McFhMJsJJsy/hLSiGIfDgfHl7q/vBbocpaCqwO+OiXU1DL0HIEZAXRPJrD8zJiIg25yQVwE9joBoXAiRdwZEFHZTf2/hvAckpRZZ5ZlCRoLBIinfbheQbulLnfW0g0/+GAzh6PMZWV6F/uAn5nGXcAdKb3d98FuQjHOvAFvFJr0jSzWOxXHktAmf8xV7tTuOBEjcHeTyontBfnHSBUhh+viyfeT1pF1eigskZQk/coVnHB+dszaAERWYWzOVnN2FZToZU88CJZTNjKtvoHZZFnVVbdRPx0pAYsD8NwioaNpZo4PRiy76iyLxBPwIV9oJJYSgvZ3OaR3tdomzl9HxrFb200bO2luX8+i2qx3HkfUb+WOJbLH+U1KWqndjcCiG9UZsYQjXx4M/jTfExOLBwTQA0KoioKkExkhEHf4Jt4JOZuxbrAnp8sxiK1FbOOiwD+EZNKB3yvpXEBWB6jsfxM2rzLdIEuA2VdS9iDwbK/SQcaIAVFKS04SBzrTKLlCjG251EvlxcIn6tMs+ZDPysRsEfnxj7a+QQoyAsjzV891IrBrWYUH3SD/5vujV0M9S9LWJPEjV8pp5unwxPqJ3JYXNS5unrWOf4lNgykXcs7FQMD/OdyxnvCxdgZ+lAV0j3WCbYBetXI6Xu1FkRICQxP8cHmn3/d516D7n2PtlGy876t6+kDnx9CC7sVMJQnhOcIlRqwPfyeAztKUsKDh3YPflrKRosqzz+dec+PBUM5DPFZYxr2+m8iRXPBc6tH6DpMNkYxiwF8CynNrK28E9cEt/Y6d68Q9bXH9fVHibS2M2EUliUSZIOizC7oMHrJIW0xOsXw7XwecOJQUec7IV8ap5n+ZKH8n5lfqZ/GtUVENKuDqZ4KoqVuWpAEImZHOhTbFrkssEkBao5tCBA8z4yNaApB+Rac5NPNQ5IHlhFs8GeInzM55KdeTGIkDaPQBH45CRhmmPxe+lFO3AgrHAlg3XlsseAOf91gtBdHCOC4jFksPVYZyXhNv/7WAPa+NrQ2syil7c+9XsFq+mzogoqdKDJatw+1bbXKkPsS0gtgj1E+BbhwxMDmnxGYcoUx9+U9CWZde2LINwD7PQZ/RrPMrd9cbOEBeu+aRiXtBbWCemUV4q2pYESIJa7wE+rPOtih/SxEXwZetW6vQzCnRT5g0KP7BLVmWVR8J5zPlIW0ny9LfZUqwAmd/Cv11ffav5oHTJnSELIe48/rDbYUUzQ3reygQ9oD1V9eTqke0JTwvzx3f0s/4zWouRNqDuJsnRiDQD56Bk7+izNrbS870wW5wQcWBK2S8W2J3O5iBh0KYBlte0nG2DiJkagvBXpehL9AfkHCe7lr6UayLrdognID/fvfkiPeVCv9mYWpdmjB1gaKo3MPRq6X7h6GzmBnIK8xo6pNxommibvKNllbcw2bTb3IAZHIaSB1yhbEn/N5qlpmKHIamR1edJLf1eKWBQ1qdD/6AFxnpKBY0kps/4wTJwkDUEZrzxOxrwIIH/qsS43HBuA3tV3ZGIZgUW6n+EgK3wfi92/X1P2w3LhIauelw6dnTPnDdGHOG0UM75bu36T6BoRf0MgdXBRgBVSRtqRFVksTUYFjfftmQzXVu6dp3vgrLD7yxOFcWrpugGUrBgS20lE+Wys/bO9hZZz1bKVO4wIUQ18sd0HpofDfeEc/Z1sSZVziekjRqIGPumijgibKmGSvp5fMVqybngDuNvOS3P3zjtwm3CDMny6T/K2HgPTOViUCiAJhUOBmjqgEQ3SSHlFGU43myFSfjGv7UpO0eDjb0x73d/L/cIK8cFYBTK+HfwdsrBVSKoJdw6E1YbtbOLF5wixLmijNh1f3iocDOTS/ohPviy4K9HkPgR02e6dPZxtFrWgrOOq3sgAYJJh2Ko8WjWA5U02TQWdw/FWmF1fbJrGyG/wB1kSAkO909c7dGlprEIYdzsCmxfmuOxSDrAqf+0qk+lNVZ39KOPkH00IVXaC2oHptD+jcM1iGViOdaA7DtKtAiHqt4ahmHaPFi9K2XRUNwgv35W/+rQbaFY2/LMv75drC8C0df/IxOT31M4FDnLQo1s2M62GbuXz24RSmB/ZYr8Ek8+brfHB4sKOOmoJP/KE3qhu/Aa4Dx6DXL/9qQhtzkKLL92F3ORAAgGdVNZxw2QuTKVqP3x0Q86vWFdGaQH3A4O1AaQCptr2JgVY77sikr2KrLvGNnsimWmBjhHANZHv1Yh1BUycJCqRn/4aQft2gkGY5pyOjw/AYCrdul9YX1IOpR5ptFISEg/K4nvTECj/f2/n/mCASQncof7DRF+/9AS0l4EIM8dsFW/u/z81ShhSFkr4qYYqi5PwR7Ve0wJNjM35Kj8nqNT6XJv7EpQwT+n9O4SHGtblsANxV0MnP6zKQ1NAMHoN7iYNgJTqvamptGz9H0t4Ydx9frRURFE69EH4oJVMVnwHOrtXv3gMb+kyNsXmZHZvQTnfYbFKvRozgwapKXouw2W7K5I58b4PjiXSy1NR7eqParQInCP0E6EVxLrwNg2iHNoHuKlCLtUolNpYuFR1816Aoesjs46qZeBjQ0hjzgUHWaXRNYlvH8GtM8FW9vqS3CiE++TJENl4tmlyj+ims0iiGI1RhMFdKKzG9mSS3ddawE67zp7hjhxqvqo4hM2OaMKnDwUkDt2DpKuZJDiXwUfzlp8/TIU7RHruDs/lBAwTQKEPEkdvCUGCiPvQfk+l6hJuhOl5xRMaGsYvoIFVuD77uY2sk71r14n13cZEXy9tVssJT87/PZ0aLIFdEart/Ql8Zrxqf3FzfhaZoVyJMKI06+p0FKdmfXAeWgzfp4iDVbvnpZ/aor6m202Kez4T1qOl1twMA6TsAJjTCd6jKA0DoUbV1+I9oCSAvv9tbkSth+m9ZpBDD7FV6C4rIMRCsisdqa1iZ//oAuv1u2c2UVQWN4d9kHWboQnZkBbqBYdwSZ/WYivjQ0sBk09MwU7MRA5t/uMsiN6FJ6cxLwhoTONo/XlScZrrv74ul3QsbVJ680vs4YpidP34BoVV9ZExc4s+EGloX/mPUtrQA7EVzgmC4HOXo+cBbPJh7V+IYdquZxxBBQ7LG9s86Hifvm0KlIHqMbzJK4G2k//Zl6rv3cg4g1fIvHfRvlvzT6NiQWopET5QkhQehsfifaX+M01FCpqlRXr3lnJfLAfMW8rsXetGD9iAemmNxeOuE7SaBZe9bMHVOu/RGlg1TSejnn4x0LoSK6/oUiE8/w7h2xFaxztX2ZPYr4HFs06X7udPcyaeYqHh+OsHxm+W1Qokj1N2di6p9/AyIl54KDJGmyfOlzK3XnPZcAgl5BCQf7KAh9Bjf/bqXjtkb6R1ljC+LNOrLLbkDUS3OJLStB+nYUrCc8PqRJzaD9ZpB5ulFQO2RsmHznyfJ0GlFX/ntTkSzXP7W8rZ1solmd81hdkWRwli8TS6V+AJjqhjhh7YIN8R07twfB3zkwoFB9442k4irhCPF8+lczvJX5YFJ3ruVza4Om/iALGPyM8onSntK2e6z4xvFbTKU6k9elq6MEubf63C4lxOt7ODg26rA5tKrxmGoiriAMs4ggFYq/LgOnsmxfjXfSKuXNXIT/2NJH0kJhBhQqTo/yvBTlHhBQGSE9X6J2GxpDnw8ed/jX/G6udEW2xElaMLDENlKffIFtzqxKazHKnpDvmaEKOfrprgjKCAPCX0AHtcVr8l3y7xM/SwWiOxi/+jXvBGN6x5jhPQdWumQiCl3BKpsmc6T1soPqqxRjjXPyux28O7hEFl4IxhyI9NQ5Pvx9coA7bc4FR1nPcZb+e84Lgr5Ma7mMfZ2C+4dBdqLTt5Gb5WdC9KYhHFP6gWknLsavkoJ7j1LI6KZ9bsoR8QSLyhaupySMjpBCegJN99pYkKwMMVk7Ylu6d3vakjsgw7Tbxml943yVQTUgckprqn3eIp0JzcTbTYI8MtpnvleXMEdppANZvgZ2SksHwqV9qRqXZJDaOEUVULtI2Xdeh2C11i6YPUckde0tKx9LSwrktCt7pHsi4TWgnlxzJA5xpxxDVw64pdvRsJdWY5GNt5GgYqeQwSpEGoMl5gF+6MuU9PbLQF4tWeGHh8bMa7zoXfvSybSuKfwO6TZaXwhbd3dxOZae4pynAqQHHXBCosFSkofHpyjK/wDpyld95Jqjpju7Nn3cWSvQiPrtsSGDr20Egvxuz/g7yGdsSdWipwt6dgi/OsBkDGZEyU994zaDund/UAEkmNXkduldVgNKaRzerHJcxVMPqBPi0I4p3zbAAeQkWxUW7SVr34av1rC1uKpJ+j8Gtq9y83+nVt63HORSTQPfe5hAu+1HTvnCrgXWIazfT7ciLGtlolRi4yXQJdLeWlcN7XYuf6o6nkGuNwMG9r0TxRDbcmBHQfOODK5xo83YVK5SC8siCvwUeuZbtMcfzSFPs/WpouQHZX9ocT8XAp77/ecvd5VuMwMQ5ng5Vh8fFugKQNmXP8Jg2LKuitNeGlxeshrSAJ2uj4XW4SpzovkGNmyrzwotFi3fFXY3EJ1Ay1KaNgGvHSVifQZ8b57kRoGt008wc43r1PsEQgf9X6AE39/k7UKespUQh6H4LV4NcOxfgaXBSaSsbfjT4PmhvmLINOOieDvNGNs3Wx9b2hK4t+NpL4MhWjeQqoBcAb837VenvCOMd2j43yZkfXh8LQNye9vlHGvGLG+TZsKld/kL8Gc+7QZfF53iVWaoaNnT3fYVbABMmVjsMvo+7yDZc/Sh5D9SeCtMEPpfzAhuMGxSk1Xh3+iLTW9vN4cWXxTwnaaTtNzwkLPCbZ3EGnz+X4zk+at4hAf4dcr/xtzAdCS2qph8n/dkNO38hBIsN4/Mxj28Ft1aOFFbQo+2UC1LSpy9rOdEKucOrl1LcMXLl8IJO1cRAL5L9ucCpF5Tcrim2J6WG9LM+wAjUI0dklO1gDIoTNmK9jumSbiXaT0hTy9Qsivs1RkiNX1+nxafs5fYNtlnMFFlI/n9Bwsu+6z9nKUHlZLUKiGiXkLkOHuO/Ip7QdOAVnuvdVL0jPMHlhtvnpDCyoRdpFtv5INmyYe2SoXeHYLBiV/dgbn9NfhGK+w8fGIiYPuLQPtuFLBt2KEy5LsgwziElJc1K/egPkTT2hs6gNvATW9jTiLDKHVDTGhDNQNgGbVGtjVgOMEoD21UKiAEivQHp9tVp9iJnrBCPsRvZzroyPoTAwB7tY/eogJmWeAdCZxOTE3Wk6+r4xyv4ciTxpowoDxR3yIY1u/GBwQW+VtynOWnlsBSQjc+lP0iBNWtXnnQjr6T7238JaqNVvi6bmoBrso34jGQhzLa0fbUugUjCd8HbtIuQ4a0DIOsFg6oM4LeJFnHtf2+CKAyFN+vcmW/R3sdTNFoTnAdQhzpltqTjw9jbXPUCpkzv44XcJyS5cJZkkiz9XsUN4wtxN60wQ10Rtzl3bQ5F2CvoFJ4XuRdDAljL3CvI9ParJ3dDGIYbtTmF9Py2SR7KiCqSi1+NwIsmJEJ+0Mmn0QRC094dgSlcmwK9IDYpBHH5sVJRzuzLGN54BcsUfaUend+/Ad1/NorWUwFJxRAhxpKx5WtVyIXcaPbvZ14hWwFTjX+FTWGpgP70NPN9C9YSqp/37bqJ+BzvoXicycqEFuImls8O6CukSriS2a8riW73BxEF6NtLg3ASifurguEMCMKP7R0PgoN39SsWbd2QhHEeC4mSQ3OLX84lAXDpm7JIHj3oXnllsuorITep2CMDJD9cTJ5Rj7UdSyo+xGN0Trhkgz7XtcD2VwDkn4GSM74QpZxNPcjm9J72lnbEugDOTtunxnFOEPi7KhqAnnyPg19SmwXel6/4j1IU7AOHdEKCcFw9/Ah+s3jrGDSKuJSj8gG8doQn0JdzGJF15DKm5yB9DMuRK/dyeaFzqT9KghrbuOjgIKysoGQTDyx2LfPseJcV8UHVkupmKNJWn+CXKNn3zvH/v10iehxDaTNIM/vGJ+TzxxZaLUcmgO7klvPB9OftMeVeqbuuNs0ogjXt3/kcg3jIOSkwmQ+5IEfbgTaMekN4o1c5yJZcTwNtWM1Jday6Un5u/lYMZhk6pkcMfVXal+q71V+r+DF/XaTU68hn8xSAYwolFFTv/FLidXU1+/aIzwY/wErnlAEfGy1HNhSDB7Mn5p5mtIhrZJYjujmq/Lp0vNeo2T610arUk1DBCl6n2gWj9vvvyXbbOgNiGMg448JBkgaU/Schiuj8MzS36ycFbxj3RKOBIV7cVKXvgLnxh0Xcro3Hk8QbhIDg9lGHFRPnXp/SBgd15kM75mOLOSmt5YIvwnqZ2X5VKMPmkpMO+TQx2jgWTyrtPu51ooxqu4OBJNaeeSY2jWKnFZTWnBZBc8svqUu6kvhIA/w/JDZBCn8lXtD8ZENPRulHutC+cqgaiQgoqBdBvqYda96abWiEQApjjTkJPdr8vye7PBjywLJh52/RoQ/qEXrfzuq7TbiT6MB8qoPXVSehYVLHNNzCgF+l0J3UQhYUwfbl2eT2NYfNM3vbfCgm6TrdJFUGOBKOHssD/ehdfP+GSC9RnjFpiJg9POQ3tCxrbkWnEJFEjUBUeQK6Ek6lNBIEkGX2x8BKxIoADvUAmGpnFXyMItba0W7zcVQIc93nwXQ0xR4fe58Q17KmUDyUJ1sef0Uyr4cwyT8tKKgArIWPnL/yGbmKp6m5Kgpceiwt1qfysGe1EcvM/NDfPW0UZzqeeVpws/ABsWtbhr+9F9lqEl75dGRX6TGybcR3l0y2+vML+vF/17IDA3TkF0CBQPergkpm/k+BQU/oI9Gz0vuU31ola+lLzYug9n4HvMqdT39OPe+IUKni5zk50AC3NScapTaFZMhchBi6Up4iAIVRoA6NtwGEaqhV+BQTL/2nurJqZ/i0U2IyXrSV7WjRrw6SI/uYbu+UTzkSkS29Y8QaBghVm5Rp84ZsuRlW00hkvVyuBeApsyp7fcoI1N0cUG2FcSymslVfJpffHRtrZBrxANCOkl9dyZ9xhJ7BYqVRl0992GTHBkcKNeyLohRJVTeOA87F4TsXViVzSd+blLS7FvgUKGJM1nsghjnpFVfF8Sj8w2UoxgD3ee7GsPBFVfxajfkgS9PzSJslTKrFJJITmZYsnEZOY4emIEfmnbPRYXIMbxntfEzRQ0ayTjEHjQy7ncMhBw98AXEUNV9IX3gv1tCaqDU8wCA92QO2HG5V/Geeplmv5SU3lP2vxnHJCWWLtU7/nHTt77Qi/6XbrOis9fqSkFymFPrpqfZgrq6Xu4jLfa0ZA6sxVQK5ZSW1ApOJVV31wJYnR+gdhuRlybvwvrwMQ4ksJDqQNm2RfEwDdOH4b0Y8LIQ5QD//konpzuIUuSI04L2T7z8TxjWd/x5A+mhPac7JC+KZrh/Qd6IaSDQtoxC8pqudusobLzlU0tuMbNGAIhALT1bkg/8FU1Tl3qJCccfyssWvOXJ6R/4o4WdjP+a4Y9LRVOYOS1pFO17T7HT79eKJJ7s/TQwiOPsRhNBV4mXlQH0vVk4CD0j5bhsaIi0+vTDY3GTYkJPmEoOZWYKed51wt48EGuAAIpyiITCbygelYct9RybXdnVmX2nLAGaf5d/xPYAsbkeoO4hjldCxFHdm3rYEZ6aKpOmIRN8vczWdv4A8enp2kNi92R3FY37FAMDiBPQpKmklu/2PQtrthoa4Pgj57Gmg2Iw3VLOpxjnUuOh3sz7YYbNV6MomgBT94miIU23Z9iT853XzIC/0iFfxrKF6KJdXs7bDcYItJOV4UKnzIkSwd90U+4o55jyh5hCsoO3MzSnLWsBiGGZ9st1LIPCYWUQ4QBlfoQSw3KANdY/rRCgtNmFleM0G7b0hmJRItMFQqG7GSX2zbhBp210u+xxo+q9iNU4MgSZRTq53Dxvqon7xylCyNagh7xRy4yj141nGJHaoTIABDa0CWqP30nA606aHfzibe4VaSTNqhTdFM30F5iyjFn7oIK9h7xBOJaIf9hJtC7v0ya/7tYMkDPARHERN5VueZ6mkDvOKH8dbvszAdmis069sB7+P4y+FSHpohwT8T8nM7aOG6s+QzBj2J+3/S+8bCXkiCGjHuh4hNvnRj622UBuO9SXP8mtCx2rIY5/rI5u0wWv8w/acRdq+9W22xAtdhBJQvTN/Q8Q/fbW1H9FGYcZmyYcABB3oDIR5zZNBjg7HREyHviqdy7kPoq59MadlLbt7A5MNkEajJ8OPb2tFTF06mpAFk/3WW8e1F6gl60vCTSRndMiwC5un7/d5K0VzN4SxlfMCe5sZ2NAhWzSTxPRssAQILTv6lRFKymz2whmM6CZuNuaP5DwudpatjG3Zf6zU3poQh5xvuD+EQq8sJEl3N3yQRhRZagdQl1EDto7nS0qRPqJJeAMJ1mDDPwrdaehLSc8Wb74paB1v1W64kmAs0/LQini3RWu+FC023qJ2gyaMt8xvfayKrQkrdqtExbKwoemJNePcJoscLD4Lt+YXA/HgjB2B/VHSSlrYk2Q08tW6xcE/IDchutC/B6ezVRNG7q7CpceIIOystr+81KDsOYgFM76zTR2V7/rJfXJmEw8Qmy/na8P7KW++dvuoBP19cZS+HVepDWTfqKS1p+sv93ngaGtA7m3kPN3vTOOioCxl9gn45j3CciOuGYwHt24v1tpmkoBY1eoioTx/B+aCvhOlWxU6Vfr75BAuFSsNsoxcWIDpZRjushu0NFOACtyGfT8mO+tw4GKhxZ2gsBsyCpl7kUTbIp0ALAlQUgMzTwL7riwXwxshHFe+q5OMKG7f8LpUxUgDCrcwmuploU/XYvKAyBDg2s+7ceWMkD6XTy30rG1w9RYNjpJQ4K8gCJGW4vfehVbWwzzeIIrvGNxVKNOrxR+FdyYEFsLMEQm9GKkffuZHpxqdS07JwACeJj7QFkg1GH6zPERCdjXMob7d3dGL6uVj3TbKFuwa3Y5AoBhX5oAmkk90pBzFERI3fIiok6/5uSjBOIRP5IQ+q4WUvKVk8S0lUM2UR843bpeOl2L9oaQ/rPxGuHFO2vkww8ubRe+RIvsK6FyiJA3KRYUyDz+Nth3sYub4k6/8Qw+QC0iBZv1JzXy2Jb+o6N786WHO3jNabJylNjRWHS1omIYCy0O1MlHzRLSDrr5MgobRr5Dr0kV61uQ05oYIvHOvr+lWcu7QOstRuerXHLmrfx6cnNSZ35RGQivoEsX8HPgn2/TCuWP72bPxeBRlEoGyURSQYSea0qBOO4eJlVkpjv5l8zTUlbQQe0FM5N5NfLEjOYcpm+LnNBQEUmV/TNUmod932gPonlL4qnpic5iowR8880dls01a85YwvIvvmZWEQNiGGIcs9DY3frePqkrs3EH7XH2ay+bknqff4fDqRjNSwXtDKwYRVQ2bZBp41RY1kacSen66tVQHS88fBiAFUfh/gcJnggM2Gfux6FdYkddBPBMNtaD/wdUvb6PT8OSo8Ipbw31bC9ZmyHYfuSMTNY0YuOpxySLs+VGxzzkK6uQR46Yj9GyKWfAInz1DbP6SRJk0dwBRJK2NiQ3a75NVECch5UcBjU0mCUPpa8Ow2yAHp5jWWPgm55alkxusSiSasVBLBtOJUBN2gPqrow5AlpOQZASotOvQ8O5OkS/aZhDvouJatw2UuVm3ohyXOvwVF1kEEGKJD6k+cLviK24DiRndwl8+ms1d2GxqscrK++BE+ZNGjtI8ts/bVjj45VRg3Q3HyIn6FEKhJe2ymXEfRUs/+j/3dWBlSoEOZti3PE4pNeDvMnk4xOb/4rbpcssLe5Y8NgDCkQ8ahkzpHYUoRyvnlmHtpuQ9fdpZ1w8P9Ftkp+kKDAmFgqi+B5hLPHLoVP62zyMwO/6U/aseMA6B0YhgukaHgbgTe/U0Aaj+gCQV20n0aimJfWCEAGTqp6jyhJk4oAnJjB8teeNPyIyj6CmZYVOvya2+htVOjnjOxtJ6lPDu10ZUQiCYsvBlhYNUuhyfa85hKfM3YY7+MqsqXUgj91bMAIQ7QyzOcd84HFUuNuUoGxcVXHsSPkiAw1RCvcT+4ilAas+39SxOHzIV4ySiDfppLCOeSAA3qZenwfJxT6uF8CO1WonUWovckJGnr02jRErY3Il7Lck1Kcdr5Mo1nZApbZdA324SWnqH8z3FYaIubwrkD4fJlMtrld2sZ4q+jQhDZKKzf2IuEBHSEt6ZfzLzn+pDPbJUufal9zkJUCoS/PfmAsgNXxBrs05qLg8zoHyroRWy2ervopDXOlAQA9oquvC4PSdh0RR9uG/0l18HFva7yC5A2MsIy6VzwBbs06hIwJV7o8lCBggW2fAOoEOVwaQshG7jNSgUTeHs2OYHUBCRNVbV0YLWE5amH1EnxZ4cEmhqcn30n+euHnLyqYI9WiHKBT5QWjoTUWbxjjLCEPGkA/r75ZuNTqtr1HxVW30ZTCBZjzMpMr4/q+nwmpgNVdjV6Fb6Fz1KKirzx0s+GY4vVtoBNboOyG4AviD2Zvf9eGA52Sa9NlMIPgMb4QGjH1FWfIb2NYePh7n6L04VrW9LnlhlznFifLwcDzSz2wCXj+d656ENGDa41QsVFAkBTFb0l2Vo35dSe71TMSFDVFqI1uPvEsqsYRXOsKEdAQS+AFBxABD8nwUEPDV2+B3visyU5R3sCGMn+YCTy1huANOs9RMkxlw0mariku/SWi+EpigpJsnYU2f+vSSBUB3R11TLllWVUv7nlUjuUH4xNfywhni6dTvN9nL5XKr0Vu+4wYT5p550qjrUBkKa6IaMmdayH9c4sU+kiqw5VW511SvXRlxoFzED0VBmhH3pfS5tkGgJGFmOigE+q1K2yEfPT35yMiEcfYGceP37UPeXYQCUJszqSbnclQzwzWVN/E1RuRRMC39QNeYmt1ld2HokUWQAAl0xt2oBLKwqBijOxzeK/uR1U+0zhxRzq7Yab7LwCpYKaRiC9LQMc1hK+0YIwSqeCT4EWMqi6RzoAxMFa7CNuPQXsdta23yK5u308lfTZFBePzJzGLver0My7Ugwk2+e5iybdRpvRffnRpkqt/xWd3YcKMGKrpSzunnGl7F7a9vEX1VJl2Yzlt9epQZshW49DjLYWX+Jdq8scdQISHBvemtlNueZmid9Zl9YYJtkzOXoG0bLJUzIHQB9vJZcDrcTs69pkmgLJvff5apbKz31heXbeYEkctHWdAnIyvJ6CaNVpk50h9y7nPOiAj/8jgzdqjc2QDwBK5wHplp17BZ1okedxLLm/OoZ4Q08YGgeSN3YdxJcA3W/KF8kdSD3D1i4TXjOouG2cRGjfVn7gPbeMpgW4iBO8Wlwv8VVg/wQ3c0WI9IsTq3scjKiJoA+J/y0xSJIO2tABQDi9Zj19vr/TlLjWkz6XxOJYlDQorchzdfTwuUhoUtjIqHkm4BgFTgJP/jjJV8qb5u2het+cZeaiEXkNLpa8v57eLd3mhhYLUTjBWvq55nwiiZ8otwLearIocACtKSLzutK5OENZgQ2ndy5kh/5IIlrbKFstDePh7Pw8OQlMcx+eakpkO9+aN0Suu6NJ4CJZkpPaXPXcDsJhdbCg7hVi9v+BaV4aNOIJJ7jRsU3WPtgktxQvAWTZKJVYoaGSNSWv1xF+v61GogYWMC+7xJowm2xvo86J+i5rB9oQy6fOoWwZ1KxurBilhwqnvO7kHJUPZWU/+ISwRHYM+5cQrI0qz90IoKiSL0fuRqmfrzGQkQjPeeJx2bB6gjVy8qQ6HDm8dGlJGGPUgvbkbuq0+OiyxOhwGf1pRB6/A4LMeSQnR6ZwqLjo+ESa8idbpH0NENWzDggjQ4LE0tURdgZymMAcPXpaRPeniaEeXMpTyQIwZmG4xBTg1TUQqdaJA7HR4IbDj8DB1eKnr2i0z2ZQvtVM6YETYm7OL8s9seg9Eps31uS1apr4w8Zto3PzjcmjArgMYUg7fjnK9gRoBiB481tF+jFOEIDA8vWwzrEmI0URL1MTZ6PEOoZqBOa1eLJzQpZAzp9SemTRLBCHWFGEyBxG/T5ZeNfSTstm5NKE+X8klmOmmWyKWupcwf9PrC3KgTf5twjeSl0olayOO7abD+Q+flWymBIc0uaf4p3ciXMCFOeFqf6qcXckPnhQWAKmQM5wdM9pBp7eDfiIEYtrL0pbgFap1T9uaI6H7wCLpVdxkA1LPiJZ+xZOY/TsD6nF7bF94FS3epUv8qLPJBeuSYPc6Wf3zZFAmQuiClxcxz/3WiMmTsBGfBcR8sMmb6GFCqWEuTbEAmaICGqNyaihX3qf5a57rZu4BqVSe3YnhlB9b+S6RJC+/uFzDUDEx1BkwDO0/ZKG1q1xuV7urjrQFL5N0lnmKMxvFSoHYIM27lkTMxIv2gEJ2UctKN4QOBKLtQfo0yczMaMS7E9aSYek8TZf4Mo0QAI0zFiT86/tl4NbZvSN/7ViE7/YjIhotJaHd6vz1HOOb00HfqhhhbrqVqgHEFjsK2Hlbunk6OyX7Mh892r3pqEzoErw51L23UE8tvB3PipjPqgbPRHisXEyiqPTE1KGKdEknY5qUSQMOfSrsEhr8EKeQEEz1IZDJ51x50f9FtKsWKFZnEYfp5hELxYyw+JVgqYmSX+xPKWy061WmJUA83fb0qR65XQcnEIqifHEJuIiUwu/6fV2dGlvTxfDN1n2JZVGrHDl+8cvtbDptfMTbmfOi7I+ySfw+zdQOCro5nbIvTxJymPu2Ew5XG141oclsM9jjFOn5dPxYFjNoBv1kG6TIDmF5y+iMj6fObo5CZPxZ8flyNU2tczeVoVaCv2IbLOAjVYucryLnbJal/z7FsIBQafhL0QCJaKzMLs24hB8MFMzOBNyzVGOg/iaGv1ErG50laq5QNNMpdfHay2M0SdHDoca5ccB/P3bi1kcObkE6++OZoL4AX6cw05YytO863bpGz18/YE1Sit4Mb4EMUC3pstSOPDuh63Ob7Q1dF/p+E2XpTWjIKHzPAsoDmZiU+ifpbFcu+kpX12o92Uyjv3R+g5KVcC2M/IwcMydXhHJ8skb4rII26Q5spA2++STpSd+w5pZYJWfv+uyWW9apQNMBpUeCcwuaSUfu5+z4seCeRTdHzFX1AZHgqHeFLbBUhMYV76fwUQt/MoX+qbqUn2Zh9mFSm3ArWH8PVtX02L0CC9EHXrxWU5YcOjaIzckFECq3WWze1SotHytttucBQxCgqQHHxoqQDmPImAB4K4AtvySHwXP7LRNcDogPSERHEk+TOvj0qZ2vDdvyzH3KhnZJbg5Fk1GLQl9/jAN4Z7N81VDfju3KYnGxA+P7eTKiFyA7+0vlEK8z667ZvXaSecLg2rv7z//Uu3t/y8FdJ8KrChx5L5szv8HBUPJBQkCGhoqbQHadnwCyTbwQ65b+ascO+VEkTcJPX9X9arUC+LTPxd8RfHabCHc/hk57Ahqotvysbse3jX56mfdgw0Vi2ixXcOlo0oSWwdsQNQ9D9FgZRGnDr5SNkkOd/LYdff1Ypnj+1kx7okthVN+OPgl0i6+rEiyj2ecoFlhGt51ktmYNgDWaB/hcHH9Vyus1unIXmVr2edioA44E1UJlsxfciSxuUuNB2zk3ZBq5Fm+i9MOI/iQD3CiGcd4G9g6NdNsMEXMTTZ4UKhNk9BACt2oHbPcpAHJv0ytZa86p2Ns/LI6egYeNZ36vGOhxlLmGke9RqGTBHvx+KPneFgdOLsBsCUXid2F5RhZCzya+0eMTbCK6SNG4yHvI0KyAgRSCzbUoeFpxPWrZVoUJ4GjjsnhBRzNWSu4tIRQOkJz7/WxsvrqSyTI0oG2kKT6GYXAYcq9xpQE1J0xtoEM+oyuuxbKQ8zMnpBDrCYlR6bB3fGh+ms3+FNldYBot7uekFlc/ch7PuyUvpE4YE0BVoKhdkTvsLKXYWjrZWnHYVpU4HLyYSaNsjkmh2w4hj2GIeu0fVp2e/YDbV2OYlcgkAFHGR6Imp3RgIk0xFAKiGmpKFqusVLhVJxhnxvBBnNuBocckIpbV4QQ0VV/I6VkNDKp+p5FQ2ZtkK3OEW7A7p2dhjhRUCXC82vwBpth9JBs3qfV8Pw/LsA7043Md5CNNxaey0vxh2CZckJupAB8/IOQRYsI1UJ5H4KgkzaV3KRg4s5GE//ucVzvuaJnALyYXWMDM+OLzT994WHbv60kM570PRsX7yBHVK1B5+tgiR2HE6UdGhv/XQ2d4kaXF1iVgeXHb0KK3U4QwsLpwxqhart0Y9zYKbcIPRuuG1ZToQNi474jqySrC0sYMhlRakH0sN74I6t7t/aj+jga01s9tjG60G0W9aezgeH3cbv7Li3rpQTa12mgKrH9EjcUvd9Km7P07EbTpJ451Ix5oBwHu1Zv3ZRbSu8yKul3ztpxtgywO0SjmSA9S5S5S5TB1PR7l7ovIppDYcfPKWSl5kxd38KTcp0u8F3bBj7CbASwKBBZSFHGQAU/GPa3Nt8R5oXG9DkLeBun8zOdMvU0qzS0BraTLX8dmSTzqPubSnvSMmELBCIAoZ6BxXN7oYlucb16OSi5o0NaIw1TTF1rBlBHa9gwMNw7RJthpig4lt6BtxX3Mq5zONUnKmjtlOzY2Nje5nTJHOjCNSxUCRxo6pAT/wUjsV76D0qZNOfdcNZQz9ARe3ZW5r4FUu6A9Fms4NnYo5COHUnmJloWO2OmFo4mCw3Dp43/WbqDDgqGJnn7etu/d30Rm7XNRNjwxTuapA1ui8+2Bzhikzc0/gqv0Mq4gwh8tqsRVAx1VbAIhuevJZ8XGqSX+a2CMU+CrjLFJ5mJuwEwjBIhlu+KlvXaGgsxnnoQ18qlH8TC4rWlPSpLg7Ma1vM1bx1yBhfBAB/qA4vZEYfXwwt9z1jKCfFfp0fXFMAGE9P5uhg1LHvhCYrjSOgVn6psyaUA8d4rg4WLr3PrMg6Ec2MZMc3aVQyqLs/vJPAKdadatkFSXxuUs3o35ECmofOmJZTh/bSCSZZvFJCsL5fe2dNEf4CRUFZaz28X5OaE8FOhFnecJlouMIAp20XaAYeAjqUg6X6LCSDjl5iTzxynFd69Trok7QP4RavOdRJ2GnWAR2iv3wqo8cCAKTo/hnMzCqRSY2HJMbqUp+WPNuTIRwwGbYxB8sSnIoa3ZLtpfq9eQwN0TrUzfCeTLIyB22Rc41Ec+WnQZtA/zrefwNgCFEA/T+Vx/zKf0Gfu7cebIuX6I6nJg/OoEULg+ilbM+N1jsmeRR0WN2cySwB0ftyXbPFn0H7Hc1v2RqBehOIaw0dflZ0nnSQCthW//b57B3Z8GVAmGXRxYtuX003JShiQfoWvOoJxfY8/OA0SpSrtH5zcBKWLGw3uZNML1HWM+Gsm5S+EobwPVBPtMvB7MoYRyJ0QUQq1A9xIKBqg7H0cYJfuLE7t+RenRBoD2yWpv/xP3e4QZwM9SZtjWaxFN9PB5FTEQXLTJV4QBoUiOkABHQ/Rqp5Uh9sjpGCiZy/kQrUM3iAWx0cvRZYlytP5/5zL5FZVn2s2msOPj4xEq+j0ueaokJ3AjPedZCwglZv6RZBpKpk1RXImLv2sCzcT7ylyibjFaHw6hWIgqAXhA3XKWkyhBnNr/a5BUVi3T3UBm+2Z2ZxKTENj3tVHGARqDkNByvGCEj+HD/d2s3zADTX7O36XWQJbW7gLc6LXQtxXBCOJdjdfZnppviqXeFIqdV1Sdy6hX/6ReQiN8xgXi0gl1gcr4tWyRofn4OVNYtiyhdLoczwxHp658tdyKy63/t0cCqGRkm9j5s/A4g6Xhqw3U8PM3ZlWyKFyM1a94amFhv2oJSCwjylAB/r5Ve1VCEdbci5lhuJLhReOI8uro/6jVv3KsNIhpzJhk2qrKw72+os1IqmpXIjjQ5G0FF2B3+a6OuziaDDzN5aVknczBmzxLjq4McrnSBbp26M8Uwbc3oyUcPl7g8QFM8JWIWsOAcLGIU0irLfOoXv9p/4Tmpf+qzIkU7RHJmr5GQVKCp2yj3UKpOC8IzftjUpwiCjk2/Iqd93MHuVRntVoEWtsNx5YnglBxnKmntazZUPv9OMFJtdr4GaBaMbyjJD9yCW76mEQqAziH4g0SnB3yfk5o63P9Cdvm40oK1oL7r/6K1imZGuXUspq7lRCBUYPOpWSfcEh/4xGtsClGISwxtBS+1hNTbaxJ48mbofMrep/UztaaRJsU267U4ZkCtJNXTdoglq+8Ytsr4QOvAy7bZoRTa2WucMIEvjhg7l3yovKXwuNibu1mqoBM8NeGMX91w//Q233cSBVP0YgGWr8drPXr4Tj8+U1Gj18dILx9IKB8bZmDIuCqUnrrN6qg/Q3I4kIba1bI0DPoOG+EIluYnRtXBbDcxfpNZcU0EMHFBpnIy26yypsCf6fC7aIrw3W/2PGZuSvSasHFvK0CZVPAppO+hCxlf8abeqAJ+hLAQSj0GMg5Gm4MV629bID56cSL1SwKw5RbD936pRab4ipN9iZw0MOL7BHcBwCvKvDvfMuMNgG1WJL80ZPrZhsqGSnTuuUHtKJKbbDwd9TDG5D+5Zd4S80JksiBv219YiKj8C2yb8s7X3iUtaicuehiKJohR/F0W9pyX+D1C+alTjWGi44UcinKGhUy+pc10mh8bcyIphwFZZTHVC/tx0qf/NeRd0nAHUf5lEB0TW57uHV+Nnz/ZPCEA3PxtF/ltbh6/viBcghaQgy5Dgd2E74/RGFnlPxKUcJ4gCgmgCoXtsSWzDwSZB7X2fYVDa6vEBEmbYAJYsi6A5oc318ujQdKG0ugPier5/5zB3ZiR/Jb59AUKybglwUHW3Q7qh5IaCczeuWxNnLMBGyf6DGV9INpxuMHQaqME/YBKxRwk8yuDSj46e3vgwGivXE2K5diQBTvsYDL7Q1ka3cjZCHjvUgYE1SeAyijusffF9H7QkO3kosVxCWICwCpJDB4ysTNjbuDyfqUm0+tGAdmg77ksI1pXuM9AMHAHC+rJhY8S9/oQFMR1r3ZgL57J+pIGFmNv/1OHpAvxbbOB5i30G5Qah/E/Zk0nXi0XbkmAjgI9gyrZPxcDTNTuy1tWKlfBNty+z/lmVIbUtlD+hLZsGZ447eUp0EVxpAedx2h4NtYy3KygXUxifRGbql1agDCWZDEtiJDApVsem5oKQe7OYVNuM7pUCCv4PHRMcHj+KEb5cDj7bpMZmHm9ziw/udO4JV11my/cxjuVq0Y8Ie1yQgLqXPSSH9Sp3+wCOYVOFXh/b8T+JbweSdeAgd+/L4Ugs/jSVrRCafFtn1maIfv8qZlEiVuILLl1pkKoIbdeUOZvBnA63FVODq7FDiiqA8Oe8rKfvkmv24HUSH9TxAvj3QNtBFl5/j9Q+fZs5mAKjB2SsuTHv/qtOmAZbhxub9B7JHT54spuAKhET/QEmrZUz1yxPkpVWNlQ7F03pJNAaqXJJ+VZnbRpKSbVqkakALjsz07Vv5CRMJdHFt/Dbvyp3n0ZJaTkqkhc9t2qQzO7Anf2yT1wlA+du6gOZxpG37fOg5usvmEc0zpYmC4JT6iIZqr/AwJAaAEOu8/RsiYi42c5HnsJk08DyNiLPZpi2j5KUnoSltZCZNfb4cEwDCxxdI3Et/9UW57FyHQE7Doiw+ZKJhoDntGvROFMBrrw7LNQJITHKOeySREXUBFHoZ9kfKGtYYF22aQt6LGS+gy/BcGsBpz7nokDEuRUttmfQwSVWsMoZ72M7Yl5Wsf0y0ACMUfMNtxCBaYOyHITvL23sxZUf7cqJZI0WQQ5nrs+3UupKl+za3fgNOgaCuwkD6JqD5x7pBqrD1IAIccUNfd3S+vI5Lo94WGe0QzKnD+kVKDIKq/IA/CWkwKnzzRMgj5sSl0ipLA8ai+XlvELt1Ds3l0ppW1PQD3vNG3yfRlHkp2p3i27Tfsf2Cy3IWa0dfCxgN8Tt6ZBWlbHDB99XPL1j/818MLLN52CBS55+EtLVltkF6UQ3sqlvFS+wtSrDrPcqz8C17mF/Tts+fBoOuWRvKyegs1pzOyWZGRGauWXh6+aRJqnTKIGjMmfTbleo7hgi1nfR2y3L+Nm+Lmq1+Na6tB18x0671dAMUJ+m3gdY1zg5O+TAuBExvqTLclpsfJEczwMQWNFsbGDDMVghUOiYOlYjw6PLYiEOftC7aF92pa4da3hgV1gt3OleQrE2sGkImD3mFZYgleXHy1Kfk8ljfI9jMwQtCFZCPmA1GPxMuoDbfWL2X3geyOLqoT2MBwB0CMD9VB0/UNnBvWLSKT19DDq9qjq0XN+Zp1yUmW3LT5xXMvCSts6hRw98P6QOFocbZbkdG1Ai4mZO2jITUm/4hGJ+110E6wNcA/K5qNncd0erXav5ZL4HG/D2baTedeWhQfUCOmnKYkMIMSaFf8n61GzKjaUNRGeuXUjQq2wmy4dkVS1OfjiI6sLhaokj0iBOXpsiQTHak/Ih/SIs9QjaYSRZD5UxWyeZSQ8Z6SwpZJNvjtZZMjZsD3JwYCCfGJsTx3uAeSIVCVedzp6zouEe+cNGnDji7nPrXZZw26b6MQOQqpBe9XBFgPLsL749azh+6ITJDOJd43YLZmqmA0obn5O7pn7bLd0+itxiRZVv6hOXA793SeILg4JoiXTTazVzAjlkxojMBRXKC5WMd7HYH6MHSOEr2gMq5cXGf0yHCXur6NqLOd2sDoZTDUrqK+QZ2Fse8iRgdqsbhELem1L+d7l5r7Qb0sxf26BWi6rLGyjM+AjXw/ZTAniT30B59eGIfpdBa7YV1uUTFH5sSQ78olGN0kJbp+J+Xzf3PsXS3ZRSqkIHZgBMNfESlEbf9WLyLnGhCdE/MUGvq9M3d8f+z+AjRtsjUDdAs+232sNXwumIrHCptsJ0513z+N9cX7HSa8GMW7GwIqUYzzJTXKDduukglrBvNCfTJ3+ppu6AFDD0lRoCKNn36VNapAOWcpk7+QolyFh3ovRGtmFTFr4+aOhFrb6d/tkRjS+zxpw6uq3A6dE2ZBrconP2V3iWczBphrsjy4f/VmgrsDhKAvMnGmV09/f+hRuxwSZPTTBgzia5E6XXmZbuy0d4gei28sCWsUTAkeZK+6h0syhc2aX3a50R46wb/2neLaKzt4tBT656bXkOap+nT5FCLPNArAsjmYrA2+9OraSmjTeFz5PoCbhAocPQtw12up7nJ2CCZxTsQ3PmY8OjXagAHKk801+JVub1DhJpbygmC+T4A4zowuqCkfIT6eaeFL8/GIWxhfLX34zOuGaye/lacAWMsY/W/YHucjO7qFV16x1OAh4TZFuJsHa1UAZy/Dar8rMQRJuRJGKmq6KJoQAeO2Pw2wQj6GSyg/ysSeiTGm/aXpbaahsFWFXHoqp4o4nHtLj1hUYRbvuTBUM2VSKD56NIlyjr3OZ99jOmdEbFoMOYhak1hOB4MTcvgXeLCa7MT61JLWwGTOMRY03FGJMVgpMQnKsZgwRicjLGT04GIYaUf00erLmuprFcKfinM8h1oDl06x7M50QyLnN1Efnr66yzelBj8E4Pc8oZ8iumSazfcs1y5dVsh4nvAV4uPT+tBgaCqvhdhBrj1T6VX/pa8zeZ3X5qs/fHU/omGkHN2N1Eb+xCqUVdSLpstZNoLuBcJsyf3rg0GOlBDog==\",profile=\"recipe-server\"},[\"router-server-release-0.16.0\"]={public=\"u9o0obNm/HqLqUXrR9m1iI24e/eI2+9pBMERyuRhaVnKm+jfaB24EzXvJ4Ij9KkPiXYJqDWJAS2CGNdI4tVsE3Rr7S+mEusXk2OYT8bIyVgb8P53o/CT7tnrq+NREzisSy1HKUNdune7X9n/oC2dOeq8reVsx7mZBlzbIYIpGZOISab6pPEpW4ntFBDYL/zijoSD/Ud1tp9uBxLZyYHBouOPlqL1HSm8aJXK/18ug6Qp8QAJ1JQgEPAmjWFe/RBACn+Kh0YKpvD20Uzu+OHNNCDaNPVG1PGJWLTEvY23ZW1LmjVi15NU1EK2VyrrS0oE1OQtylVrq0J8v4RJ/NEdSErntI9SqI/If7oa2hRsSBSHIGa+xs43G/ZgAwuyFGJxHh1Epl42yyA0qJj9dBr4gvFAihnob/wHswRuphZ8Sagqoe4neNQE4oqjDN5h7HgQQzIFA+Q+LohcBLbk5NT0OyLVDdpCfmKz73NXAWafVeVujCqhCaBBi9pfNw3iQdhAZjj7iy2YbXoKiy8C2u7dHJykofOsCZG3pzv9d/Tqdjthzjw4UaGFF7WkSx8YM/BTXItUTcOA52nPMsvJn0D7uGRojoE4G9Jf+N/HaSNqdwOxZULpYSxIRkQLpcyIg8rphi9HYo84WYJM4EAS/oJVt/cm0Gei+uP8ui8lnmdkwFTo/G5zrIMixF/6nFDsV4HMQzQuQHvwU9B/jWV9KBALXmDff7mQaz9BSvcfIwtND07dxadImIF+Iagmyzs+eUN7lYEsWqbUjroQP5GKiWTH8fBZzYIPYr0DAURhgehn7HFe7d3+/p0iCiGAcWyky0twZDJ/NhzJrJaQooQiZt6HHZ7tAftyGW9Q8+7n5rQwEEmpx8Ug4wEhMJWzkeEHP9YI/6yX4B/qy/pJ+Vac6pz7jwim48nlfd0ILw38zuBPkFIzfPx0iP2+9lkfiAHuQCyXs4NeJJAZ0Hq26RFrLD2KJaOTG+7GVjVRauEbUwcLgeTtcztZb26mDZEQkozmfZUezxOxMzao9DsiZvIuCguY2b7FGVvovFE471dz3YFqEDnL0ZmHoHNBPqztMQmJa5B0D98BySgUc4K4T9ELAUnjyDFZk6nh/WTMrkJbbbf5XnlnltCYM410QVJ+3kp86hLKC6X/wAWGGPKHM9XCKTDkgsddFSgiNP2Ef9umCFSrum8pCkULbPRSczA9d6N0+iokGk6oFFyp9f5d4JXlCfzjKF7FaveAYoYCev/rBJ5O2TGccCr78mb7Gp3+C9oNiZnYpC2xIEbXy7zOjhVqiJmaOn80hGfz7gGyzKJdD9Ph+ekFlWrgvgNi5GhQ4WYmeOoyUZ85q0eG3gXBgbwfRe8PchQB1yIK7p9qJv+FiH2gRTIqEXC7F8gHD9+Q5sQRkP5/0MbhPFUbZJ+CiqqYsmwEjIquP+ksCM4YsZZW/xqkYzNNgVba3u/pCf3oXKUBi+++Pr8GHX54VZaSNI32IPM+XToATa+L3qoPzvSyqhcHqj7nwqao2u8ojkGrlXW+cPeW8QyYEWy2iPzbWb/+dqoSVc//boC2hZrtSIOy+TSSWpMYNrTyYs9jEtxfH0P49EVJiWlgztN1GNw4z52Y/20RTTV9rSslQTHYjJqZF80TK7GwQ71gJWUjCnDM0z71yVTCUVEU2gf/pk1NQZjIc9qILvVbR3aepDKtk/8lwQxtopRq5mVZw1K8xATbga6W5dDfrUvRrSI9kihO9E26mNiuO/OknVQzgrdkxKaO9sqbYaf3VvWQ2Bb2qCaNm09g+SrkvQsfF5Ikv2GHFrT5ZwKDOIm/rR/WCSxFXPH+1/dpTdTLVj4pAFJ/on7LlKWfTBBYcdcxPrJGQl9PvbcGwfLl9nAIC4DSkG3W+lBR5cC6AVi/IaAR8NMRG/C9OGgAR3Es7iWsnjvifMNWI2/macS8hS/G6si9BuFDrfEvN/yTcJuN2DVrr1AzuJlIQhDcWqXt3QYkiJ7UYm80RUWBhwNPeeNfc/95I7skwUp0QhJE+JBEsaZj/bV52QeJxsufiqLoKu9i81k4549g1KLM02NXUg/vzwZB818tshq4kZRE+lLFEFgE8afupgyQvEitm6J42Rew0C7uMqfiW0Iqo7pAVi8WV39PsfxFxwjJWYmjB8ZT3HbQNSKY5uDQnCo3lm0c/WjU4ANTbPdEc2e6jnS2MwjqsTDUu+EHXD8ub3MSpOopUU2ebJycrFMHEUoAj6Ab8jsdXCMY4us/4HQ3udGQvpVJxyKWUs0Z/ISxqpjxxrLuJHchIekxjqIk7ayqXm+zzSwPT+bdzsDyJLVt/DVx3/12mnbVG0TiyQ/tKU3k/FWcK0R2MQcXXQ3BS1u/7ytEA7JaOlVp68LqfHd+/wiD0P/5EXhkuErrhSboIkyRp8pRmzPiMsjPza7T63OB7qNm7Qvocm3/f8We8Okryx755dw6oopyWzuQiRPAxP48YBOgRQmcYYX8S9gjeyQFaYcuMNiyZuBFqVccShMY4P9cjUE03T3Vf4qDzqXQ2H1bJMt8wvpvKSwt290LDVfdCyZ7xye2U1XK8pbLcInNxynGr9qnl5z37toANZepI5MB1Gfi9hvxxnlWy+ebCZDChd9T3nJ4qRrI8cpuZRiDILt58a58xp2TDRfNRBT+8HGi+2gTLwBVZOPSJ3k1LrtiXpJYNyy2StIF7h4gvPvqIKvXJyIB59mpiDt1agB9r5g8rJJ++jjCgtWn81EpiRNbU12ZV5FTZTeaYPNG5sO9yasLAKJal1dG+3DNQO3gTZJj9TE1iUOel34zUNHLYLmW2lA2eM36UwWia8DZtBPyQX6HGX74vJatknq4mdEt1mJ9qsIsGZPdDV+dOvxBZFVzVvAjIq9eozHjl7cIog4xfSpp/GmkojHt25sIkHTVtud7XosDaiyBuVBtPE/S0/k/K+wPwAAfE2jsx6FTTV17Bk0r50MzHEnSbR9B1YR9lXk2LHqcynvb3QzFPzNsYjbOnsZ3EIstAc9aMbzKSuUWWu+e9I9NopU6q7i1j2+dJAHD32XTMZeoDcLt21XR62ly/CfIH+MY9TEN7mtJ3W/VrSWDL89kDq6A7bcsUjOsial6/hr6tyrYvBRKcVomeKJw8dlwKTgkOE8OxrBOgZlR/BRvOB5hU/N0jgAlZiDs35//kkTjkZesZopWkl1tYquxYxTtTKhkzOoatUYINo9tzb2bIkVBjikRUPgd82jCAWHa4ENNVyOQxRbnOEC1qygFE5CO+pX1dDMKhwzJCWDvK63y9Fu8V5UQk0HUmgEXpQJZxNz1BPhSAgjDRiwjeexDGBvbhXKRH14FroWVfei/l7tiLUYNNP/1V6VU/JLpsdn8Njny1O0r6UBLVHSvKklL11cobPlaxC1y25Vn5lhXW86jmTNZiezPAa7dQi83oj1S/4z8AkVFzjeNlSWKgWRa+gSaRzQ2an45INQIrg9DSsZnWPNm+HFKix7OJ3rwNT6OhpQvXfBrAKtGttCsYaTCBzqNTBGUSwQmsyr5DB7STF3gjcAHz8f3NyeejJ8JFp2zXUMX1A2Vnch6eeMvBdw8oLkWpwjSBe3+ByS/UpCVb3/8hf9H4ALtvzKqGpQseXODo/9RrNOiGiH7nj//hOA6ZxTOY108xHnteIyasMdzeLJv1bZg/jbz0nTOAIyBfNrNPbcdUGEqaeo2WmGAaOHW3ZuZBoJJrLiO7sVFIXdTQbB51Z0OP+5Ce7ssphuGwuRfaOrgqES05URek7AjDM16GhnmrkpUQEAeGCfE19rad9ymunrYSMvWo/7oSyK0ZJgfdZgbCQIBxzrlK9YPuIhy6dcmEKWpDv6AXYre04lwF7dQW6QV6+I59MR05D7lGcZg54YXhsr8dF94750t7bwmCsFRyjW+GttPHigEo3c78Ho72nI4/7gKDGkZcLy0oF8+xFy4Mh3Aj63sygG4NS7cJlw5a/SgBm6o/Uf9TKL5H8VmJB7qL6h4Ow6K7QjnynMjGxgPeqEhom+Pr1HZayC6T/Sz/Idu1lQcS4daReIUR8Q8aLoHPmoQy+ZMZH0wJAW7Sc2DSS30iorgkucvb5On6yZi5R3v3GUOZMh6fKt7Li80o0vQtNor3pd1kzEaEw9jr4jYPgqH6p4bEMOR6uP3OCt1jIRXOL82H+gOM5oeJ8ScKmPVI5wGGYNdIGSAiwV7MwTtARy4N9r8bUrwy7H2+A4bBqym5Kow+ZKlIejM49PdgXhiD+5El9jJLmsITbD22QiZ8QoEf3wyNFubuy8H9GZhWnPKFOHu22z2dYF4RQomknO+4VtixTWHFxW63iBEyxCLzqyqzpU0ow13M7jSQ5/JETarSEz4/75vOKk0UgoXqURHRMkzGR1sSr+l1FXqgKd8v0ZPQZT86s0rzSNWebYbSggOg5zu8rFitd+DRnkOEUh0u+9QIdfYI46sJLN3oqfP8ncbiGyI8PBMXpcr9x47feRlzqRhEJdWnwanu0J099OvwQ0KpRfbCfGvIm9++cadGqf9sO1yuxaauG5EVBFv3wEvAmVS8mKaqNLMTsGSxQNXYs2GfDs2tUOi3I6fncvwBWRvbhcDsC6eHh5Cjmx3XNO3BcgimJGwvp+1NXZrn5ohRITQm15eQqQhOVeCr0j0bhBP8i6NSAyjjkvOKV0uRrVAYqBreaTKKrry0L7LWSalo+RHCXd3r2aRhkO88Pr8bPryG186S2JA8JyfBrvb0H/Lxarbg4bvH3j8/9WXzpdE1OK5B/z8dBQVxvjBE0Tn18EAVIZGwxNmsFi3LKEn+bd+VHZYbC75xm9wlaq9Rs/W2VajLDibaPfBwWEEaFKl4VoSpRLI+qO/TNqgr6uHAU3kjeVbjnhg/OjvoC+rnWmcUlyhsZ/ZU4gk38lOCOzQ9YlIYRNvIjGScJuMvrKW1Zf2rx42T1JOAkEjEzrgijnWGopMcAoAz7YS0ckLcR0gMw7fE2twYH4tljQ5S0P4m98Q+xpB9fAMOkbGxdcxcMK0nniwkcJNB7b1rGQnhfHNRogcoof6+VK0AXnaRk4iT/blGSRDJH//cWp0WEndEQkg2PaTjth0xQLnxWqZkGtSwDu3eT6RgZu2VpKLBO1Ao8+qn3UigxAU4PHEqwzNWmTMBgqNKFbkRP6N+F9WN2jiZ84kdAC/NL37Y6DHGGXB+9Rnx2SBEnFEHJge5ulw2QYcyzdyDhz+U5FZtswh4zPoBhFEFAThppOlJyEEg7hERMkWkzZQm6/RD11On2yfITp1eks/C4PvG88+5hvejvDhEJxEm2bo8ajOQgfH2D3rfSNrjmj4y7xnW86eHy3izjRrmhH/xVdQX+EBs8GKFgJbh65DSbHHSQiyaAc0puSWk6/62EeA1QqMuLza6p8ZsXvTw8/CLY4G990fBodd6WqWAGp/7saJL3Kl2AST9Sxm2Mh3oREGiYydWYAVUQwbiD4RwIZekI64tjOCyqnCUEU8Clxfrq4R7jcwfLO5oYvfucBVsdXbBNRfcc6yxgVCxM3y653HQ+8JjJfo1srbRGYXQ8H1ksbGR6d4G8uAAL3MaEgxsyyauAzrWuGOwb2wrB78nYjSpEAH0bNaBbT1ISzzMKd1oP1PdWFlpORcXT17m7rE6BJuVuemq/8bUwhvHnTQnvFHsYBVkkXAQmt/9ae1oxtHpd+xbvVDidafjXiFKIDoEPsRJ27WyODFYltxPtjiEZvovcq7B+0yK7wv+s/7KLX3t9oaTO1FGA33WL73Vut/VFNq8c94zWooOwV6/qBQhNqaDWLj5RmM9JxL9KHqhJVQjFfFRMqhpVmuN0lzPg4VOUV1t00J5DHu/IqAOyQxIM27k+DTzAoCDfZfbfrg+3YmhRRYA+hRMFdRlxX+K+P9KSMQfPzBAS/1zHz75SWkDF3AGAy2C3giyA0HKLIk3WT5dDyFhTmULZTM/Zkqy0EuWhGyYU0pdmdlkQGwjY68zvcSX5aVD6R5AA77Jyl5K7i9FQ90DPfP8UzxxNb6A68+/+iOL2h/7wU2D6GOd3+coMbddHaQioE5/WO8X7SytnqNSvcxnUW0cxoY8CpOh9lvl3b0lMdl0TzSc70lmx3wb9/9fxG0W/08ezlMeqaeaC8pDisN1ilZH1M/NqF6RCDnkwxh9TCmNJLQJP2yxl0jWAPjj5EMyZVZidsMJnak5CmOL8bGjCpb4xlRrsmXMh577CI/CKdPvYDWgjzk0GtYlZ93oc6G4xmmLIGMOcvlxmNdId86sdXq6K0gLacOqGk/jNVtoE++eynTs/5g2NarIP3CEFdi3kFJ2zki6vG7pf1K5hFJrw6ALDBqd7lDCuNdbx+/hcQJaR+I8SZbRvDFOuhWdS6XP/jwCu1WRrfFxqD6Y9tdRFFiG2qEJx5WfF9f599MBjx0qP6STguChgBnxMs8AxyGhJflYZ/PM0HuvcFFUaG5gLLJewAavCHXgn3wIFsdUGFZd2TtMMatulXmZA2KtY94NCRwBrKRrtaYymwVh17S0O1itocWmfEccl33zlnmzTl0LuXxfVivaMbcYEM0wzO05l58ZL/NjlP1kHfpCHGR3iCSe8ur/gpXm56ylj5DM6nwpPx9UNBdbcVag2cio6dDlZKd6SjDDj6Z9bciAyxSNOIAeAlg9OE+yd+wq0l5scJtd6FC6SD004e6tQITt9V+pFa9MNZKz9+YM99NYe0xsZHWpwdDR0K+Uq4J59gEuEJTk7C4gyJx0oY8boxCBOVHt2tZg8/zcjUApJbpQ7liVaoOm3nRQTb9y0uWjlQpbWP5UJS3+Z4Jp1ThNeqRpZsYQEdw9sS7F45s7vQ9RIOYSCGkAMYcfS1k28y7K2X/h7yBqgcthWGvgDzh5/dpfImZwJBUpDvnlIqc+RDFjxWTdqLk7bjsXfzNmYsxcDhJntpFe3DsoouxpngJzHTSiZJIAYNim0dWwHAOhUlXhkkqdHSYqk7Q5W+Mq67RUmJwEiOV8ZqoISqJq9wK9zGuLkzPd2vSkTBD0Ms4Dt+2wiQwpG95/uKRNlhK4WiTgyp7gpBOJxn4ab+ZBs/cczXmTVUOrT+BqFLwY56h/FcVM6GQTisT/O2S6al3ZCqdu6wzSZfFAHNt407YD4pHX+c5jwGQIO9mM30jmlpvd9UZESWRmQQUZbwI0kM44/PWlmmsiAwFNLWXCy6lX/b538PYVnkPaoBA6MzHnkWjGVc/O+gj3/wsRtEyAePw9buCvgvnbCnf2miT6S6rAUoul7s1qr+xK/wyhLwMoiJPKxeKHgdD/fhXRvBJPV15Q73I4ipAZOEjtrMdNp9x39D5sJunCYAioeETbLi58FiJv2lQB1nQ/VZkH2ieVT8Y/Xtewz1OefEnNDz2WVCCBnsCRdqD0F8Gn4gp5zRcP+EsbqqgXxh0cXwocZBIhCr6U3a3pNDY0yHaJrsYjz9F100k+b3bjvfv7HDnY1Vzi5VOJTaEdlA5uaoh90d4uP6Zbhud8Ia6YZSGim8f1b+PJHVAuQe96gYmzdJLpO6slGY86/cxhu/4Xn3E1IA6FF4XMo47oQvmMTEAdj2imcwG5DEhF468n8t5YXlS7Q4g6SQtpLRQ+n0yddWbI/AS64mSyvstONkgC6PH7VwLRmM1wJD5vQUIDUW0zP4bOlaAyZSDpUCfOlXyfDwULmxhye2K9EBQ+p2io2nRKTOgT185In7hpEG+Vhp0He+DNT3vhF+ZWU+r3Zq7EzpgBnsZFcpp6/nP085w1qE0xWRtCFCAK7FjaCkRV0k6neFQeZL4Ssm0PMgQsfrfilaq7xxBdPzTsku+qBV/bqPpK4cbslye0MTJ2LYJWQ1kCq4YjHZIZL80/xQoWM47J+DBaX+FhYEuT4VPI3c/+Px5ZyYbPIvbMtU47FsO0lGk4+XN5bJ1STswXFq/fERB413MoS1U2wYJvULEDlkxhcL7F0vIhHciWB0/KucWGHsYEjBH6P/beq4LLL+ZISE2oFTy3CPwdQjOj+era7Ucd5I0B9L3RyqEJRgz7Vye0nXIPAIsgOclpZcv3RZgPYAmSu6zilQTnHONdZzwrio+U9HifX4q6iIBkgrtnfmAvbklCLhDzpkZCMiUtxiXS0BeLMCi44Je/HkrxPygIZLn1sgtq9Tvasae+Fx8jIq45Ruh1KDT6O7aoP8xH5ubps9CPsNBbIa9TB0ZDqBPBjFrZXIUrsPaiwVzK4BtDC1MSNkeFmSNIrS4UhR7lS0XlptZqiO1O7yXQhk+K5u+6CqdMwFHtUnqoJmI+oXAnTwwRXLAw2r8GWEMkGRifbKEohcWIS9Mh1RLicca/0/7bfrYV9t1kOyIH8A0Edkv4sFSywbJ6rbezaT0nMmIuoO7rK6MWFd7DZxGCqonIvS17LBINhaA23Rq3mtb0+6zpA2m8Ona9b3SQCp6TTRVlt0FLNQHmhmUd1wq3YuvSl+BiItYX5N5VRrroCRORuRBSYPqBDwZ7qryka/D94rjoBYOO91ArlZrqlhjyUc3dzkG+MKT62uUExA1qDsySQJpoopcvtH+rBGRGq/SHGpmRPnm591zx5k0UAgHxN6nH72VdFuJIlRJBAOelYK+jqifb1O3URPb9RQaB1lbUUnLBt2XiJ60nt285ZjDc64rFHQbN0/MDRC0gc7piut2rUet2EmMoxEuAl87zSkiQto18PmN7C76uVi/6d3IwaCWiAx330aNsIPj4OitERLMXSyPTAiYY0wCNJFXfnwp1MGN2G44dtWmx0uLZyMFKVmz5Cgtus3xWnfv/qdd9JeBpKYNBDWWrx5yINkuWuc893tBasr/T1hFnsTMDMoLg+9IoEqZrlvH5etAGcAFnVdCVZN55RiNL7BekGgu91XSYxqBqumMkmLpqOIUZznGGzCznZxExeiVhmyShyWP/36Jn8ZV5bQboBzxwSzsLH56Ur6xvTT6Z1VOSpP1cutBWI3ZMeyExeBn5DFUXdwUbaOifQJYAwg8VO3TmplgaAAGC4jl+UEKeEabVZIa3Ekk5Ad1/u1+ATPEuE20m4s/DBRAe70ghhJLd+Fa7gLvvbU7lsNdKXJIJOfjv2mC1/L3DyDYp9j0KvChPf/uwZ9gCr8pLeo4jYqj4/UwfZEeHrrvW8H1N7fLEweUpZsbHV1+4QcMCUYTStrAB/a6p9r2RPLrLfzjT2LkBWklZd7fzDppn6HXVKBHW3+uU8hj8iP2eRxiWENpT+kctGEkViMhR6/oY823quHnIcLVpvLiF2DGQqKprf+g5pZbtAxDBYzo72OGUnmzs6tyf9lHrpXLbB7XyBXiVDn2gAl5pUfg3AICsAQ1X2er+DPJs0K9a2d4q7K3fOwQGSsi7FtADMghkT7FrRT8tbODe4IwWw55JTRHqD2WS2oZnO5fMs25QgjjDtTo4k3VFE3x0IfiNNzgHuTp+MMMtToX57SwQpcEA8ECfIR1R5m5ZtIy24OuQ7mBfxY+5f0Bib1JhcLJxZngvURuG+qW+q8qOFboMLCZtSOI6jSWGmt1m/YtMGhPMSTIdeO7MhXLTROmPZ095b0uJR59EtOEue7iGrcRcD3dC5SdrVNxvEGLTAb/0mBJsp9YrQD4xkEZjd37TSACIwwvYb6qupnn23GD2+ttaNk+zguF5cW7S9buohz+wZ7sTYkqdY+ysHSDf2kGMX8lAPU1A+sXqzpW6y5Wngp1Hye3nCj/d8eSI3l1xyvI5gD6437Z1XWQrJ0UqW8u/q1eLOuOramVIbQaTsZ91+iC/yph3HB3zvE7ggP57UEEg+kklRpT1UcBkK1W2P+RQI+GiD0AD38OZOH5W8fcD3+TyyBkwecFDaw2NAW4H2EYrrDt2XXcwHsd4X3E03P5pSi/5PW8uj0LCOwUGJ7hOwbdMcMm9PYyzKUrUQC6rjgNzq+Pefjf0Yo0pXZEQnIGG6p+Si4/hK9spf35MTiwH/XjywVjB0L2NGxvIkRTs15jOw5SvgUpW7ZAI/Jlr3g3ZUWtLGz3RDHaUwWK7mScry/xETSONb6jCC/1TWb65Oxh0AJslR4Ry+pg91NcKW6HY4eGgUt9c5oXfoE3xGv6FCOo5NlXSgqpp7LEnmg5qtpttd9+rmxA7D0v15NdH+9vdgUjrELue4WwO4tnTBcNH9WIiKlnePN5Khh6wspORUeZv+LTdOPGilUzJj+c8e7GPCd1zeYnm9cetOiTJiIY/Cz0wiOytZigoyon3O7K463zveTiAGeS0Za6PjRjCGXt9bj+sGbU4rsrW9pv+fxnxZdsbZlgwW4Ckb+/SudxhIMyiAdleRrK4JkcnyflcKlGzIdJsrlr0alg1b8w1L/MzRkr2hTsoyvxjArQlsgv0Ismy+Na4kEqlRylMQp2ZQAZA9ctD9M6Xk/2fBR2oJOxrX/aLZjJ5hlnxeJ8ogG3usZcUe0Wx6pTj1zkDx4BxpWad/Qd85MCHIXwshsun2m8MQIHRGnnmsUzTmTpIhHOgwYi+ZL/2klCcjBNHqELML8mw7f4G2syUcJi1qHPFb726i2E7qTWZXeTiZOjU3bP5SRxPPBQNgjPiO4eKH5jeY/IFf8TzMvf0x5TA5npREpo+jzzKv0uBhbeBaHwYXNhFwCX/jNiK7HvsEn7qKOe0v1nGg777kyfba5qrn+Tp84FzejzfCObshd77O9NBgZ1oRMNc7OmCgQ3A4iQb04AqKohwTIYGanPfTu8j5kAeRzYR6eKcen2DdYkiHEkqOTXkKsD7ZUKf8+tbD9FxfBN3ggSz8i4LUmcSjAiOqE3o+NXd+RP3Ad4mkGMZHdt2JshSIppYjxBB2eke7WVMLyfa9dap7gUy8gcNDTYlFTJpgectWaocCRSiCI6PSHnxJ5QZ0temrQNhilMAcxZIc6D7ambPQrcToM+xJy3qlOSGDYZcMJlZWvvT+9KmdVu0AeY3HnEgfHdOkkWp98bNZqUccL4aYGyJFSGu52xUz3GBy141wC6lyTL9g/ncMBq7lnV4mPLRxb1Xs/CVSOqyqkAmdtBpBQTfwFZfzVOlxyjxPrvg4pulRyuC0mwjt5xdz8kk/TjXCUmnePl+qEp7wp2cHBODMOzSIItL2kWcuCaDAR8zdac7+4XbWnWwnvtSb6AuuyDK+QtXjoGd91mp+tTodzH7OqK8dfZsN2Y0JKCcvE6lAmbzLkjRl6uHz4GMxzqJF2tq7ZDaj11ZkI4gstSSFPAx7HKBDb87/CVMMmSCAECBDUyjHmTT2y7AP6S3gy/uKOSSG18pYLpIlcYL8BdIKVZ+bggCXTsCOIWXhW4IsuRyKpns1luyqJE+Dsw532srE39CqHSG74x2avBuuZgkYf69oIE4rZcOv5TSQnZ0rpy3tWDLUIw9Ckog4/npwhnS9hK9MpIbvAPHc2dC2H+89Qt1B1Y31CL+9itbt8g9E3HgQVPa/73Yyubwj4oMRHGqgGWLXyL3ZAhmZpfozUeoXoLH3oRDZeKRUi1hlTVMzSqOsdJcVMuWM2wBUF7wFYgMlIx0JJsxBIRnbzO8IVkWcCcC03srFX0RuDJlQKDfASTsre6oQq8nI53fhQUNfKm7Ivs3iKH+Q6mLSwnydb3H2UVjWtHlvavAQWeApswTISNhhuKSPQMq9ZRLB/9F1u8mQWwn+89DoqIKG7sguJgiE26WsKhyUF5AEAWJFZ4mBIgLaz4KkrSdb0Bz2MVEU0HRHD5LqTtRCkZdsmCGUD6nTygCCUH6U2e5WlxOmW1uYqpclXZl3K+qFxOGmXO7gkFwZL18MAeNAIe2iOW1+BiGNqNKqUYcsiERPdA4fVtvEsvsiuJWJmEwRlq30u+Z7WRBu8o393+Kktv+J8K9NYNaxq5FnOvKmtTYSxQynrM4wUItc4QoKhpfXAPtM+diU7FVT6tBM6q/7MGDyHCr/T2BBGt768WE3jq98nukGMcJHr4/E1eFEG0TznIsNRHYOMcLfsjBzs4o9F0cXZHbuKU5rwlxCDHRhmJdPaKcAqMfBc7cHtGhOVIEp4S7BwgdUZmkKWZPX6+BSg8Iz2GOm1LHTrmvXCxq6lzB5w3+sgW1KP2bgQsnUgI3ETjrvmigNZPYYpPhw5ddT/09rlj5CjvKexwbXWKK85l6mFntdlLjby4gH/tMOVVHkOEO/PujVCLbfUyskBJnhsOFxl09XZkgIofdLvp6m6Ify+He3xXD/ZGHM4U9kdHH1aXz4/cqgr0v8gnJrC5gZZJUgs4QXXNTnCSYhQyQO83q8Hev3+7N0qsH8FauZvr7+9amVhspsd4EMPtpnaVbQC/qxJvYJyJ41BHGa7BcVuJ6krapy70SNLwfxf7/x23j2f5g8JuTEmNd/zdbt+mgzmFPvSCtinu6hYh1JrZazwixjEpG4M+mTuCZ6NH1Osl+s+XbNa9PlalFG9P+BezJuLKJAdxgtQ4Z5niR6BYt5nc404Zt3L5j7uSAhSiFMeYNcuVDHlc1zoZnDnTHiEwNLAPshCC2XaQ3cEGayaBqSRC6AFfDlgu40WotwjuEEvfOycq5QAh26PbpNQSz4hRhv8h/51BGD7251CT/SmdfMXFl0coIfqCyw+qkkJ/2SlbXrdEho6kF1GHFpaozP836sJixgJLZyiUIda8I5n3Euit1YnClMWsq4X19TtjDanKWm8lx2m8IFa46YNw0/yoxXKidLFmjLo0bIlK+OQqH14I6JsA3HgTtpFORablMovQrYSJBWETtxQzpiVZLZkIYJeHUGoGwytWxoueVRJPfJdyyLNkUMB4400wFUpIfGhEozRXkBKfV+IlTL3jtUA0OkqcORtQsRYBFvFFatiTnvdMiDRSsjvfVfG2Ze2DUBe/WS31glax1T/7A0RtE8HyV/b5uuVnZCAEuuOYKQrz8wYgMO4d/ERL+otpDiyMfVKtNJ8R7ERCN9wmQgTZBXpQZ/kMyqABjzVGQvNcpwKn3f+7p983Ty/tjnro523+BwXQLvT5spYN6uunPEhB+7h8MTiegrHW69mkIxBh8fJvjTlaChggqja/KS3gwWt7rUJNivFx7izPB8QWwcVPZUCQpC4Tg39n/DXGBaWNLK6iysGFn28FCgoFDmDorj+Pn59q3HeSRDkr9XyjaZgpuLG2xV3RgtbKwoJBEGLWlgHW8U9FOzRvfj0H/C+97O3TK7vCH9relZ4iAOlbyt5o9lRvtLZc6F/Br2Rq6PzfxSRfvrmwyMTQdE/4ZaXArB4cLgC3IHdpp6iNxfGc0cwMKafbxeIqBAdT6TkjsHceZxW2AtytXrt1gzIlX3obhkXrkjNhIzyMLUp/+3qztqQYf4LZSGbJyTc3u95tj4X0TFAfsMzVEVOtJLiK/YDNbw+zFghZcZihvQ1CXFUldcmmHohiZG3hO3VgmZFTibMco6PEbpfGRHp5Or/mOyrwb0+s6dzv6zRZzpEk2uREn1cTTuQHVrHye4T+/giWWxj0bV8S0Z+ADQJwbxcgdkJvUr3c2qGkvXVUzX/diKlGYz+ikoZnouagpufZFBaEjD+ePmemAG8evKt+2WfAsmyB6lMqG/5Z0aHd5AJSVN0FL1q6BJbGH/tLI5U7HsHEfRXHHMliV8gfbvxUqTeqAzqcbnhA0K7NadzJJabdXenfIv4V4+qymDp5+/dwIExPM6ZpoeN1rcceMMxowoGyfzETWU+h4i/Vf1u46ZqYFIytcdMtvoYzP4d1XMPdOQuErU6wkUo6rNlK2VQ0VS1nyhV7OvWvy+37fOQcUQ3en13RSIKDU0JM5spU33cIvyO2ohUrR0oovGzdTl29JbjXP1g/SZ7r4BKStWVinyLJRCNufwSffmkngjbJXrA4OQS1kIgk/nq7+uuH6PGTnIKW0tYx6sgjzwxjJeK6R39gnrb+21n0AOeiqE23dV5oKr74vXsLPVCoCBRI2RusMLTM/Kwv+sMg+p5rNSS37seq9ByqF2D3kC6a3/5a+vS3sKyIn7gXAOr5urUFIjX7TPLOS8KcsJ5OtRpajvznK8V19rvOGGCstJU9pVLdhLccqbUSj/eEhX6Co6L7f4t+7f0+XnvhpHQ0od1AJNk7LPicWB96itcM566jN5Kv9Jl+TcNVaB0VXpisUS10ZXF720XmQclsNMwTbD3tAuz8PF94zKiTHkDPSdHlAv5+eN8RKvGG5ZTA6fa85Ah4vfuX1OZN7n2y11D+OzQHzeqHMoWRxHNW4W5mzqfQUZpXLRDSrZ8UIQ96O4pPZmlhrVo+r8Ohq7qYIyMRmOagVRhzMZUWjZSVQq4C43CxMaI3aNKTBGgw2YdIYXWsyfkQwuKtSyKukD+IdfugLUhCz9Iku6/o/FDkeWOOlp4ZFdVtvTeKR6GrG7qCiHYk1+VrAYVh/r8opIGpANPlSg+tgVYq1845h4cwvShOvl0pKCiHJvER01IHXtBHS6JVZQNfJHEs1YnOj03xkP+7iKXovKfGzY2FV5JNIE3qBCBk7FnY0MQfa+K7RT4ylAUMuXvepahHfv4VWQ6yxHJyLbK84ixQm2bExu1Nioxeu4e093CLU9vWTn/WsapPaIW/jBmCuSeYFTQoRu/Umw1evPGXHQ0nAWDuzCJc6Em/vWbuPfsoENU1T+H4SfXfHmnnJ5W0aJtTaBf6npSKS8UH1f5hHES0k5eWEhO9GSHhtEGrxqmNMv6bytWyGpArvzYYxeT3Cfcu7l412vkMQ5W+2/I9j3Ht20yxo+MkQTp/m/VMml0fFa2dq96zo72Sx8L74PgqKeAifpmcHM5UwXz/KkGbzJdsPDz7DLQ0IisxB9gdlvZFIXG1Ah9HdpeL28TfR9jVTtoIpReVIWejD0J1/bVHnpdoG5x+nBGXHPiVDVBLChP2IwsqdCkaexTejRjmg5rh1+7wOPY4I/RIMb5WtWhIdyVLVFoqQL80jZ4UqDKV5/tVeNyuhWoJiAXQHz+wC2JSIhtLc65UvShbgRer8Gl07feGAJxRZYl0PpeRq4w8qpA+Tj8ykUIS7X+EehdxeWRm+/kLsn3auzKEddAr86jtbDIXYNN4z+nYxI1vWUZJgMlGW293QQ6kmL/l+N6iUq9CEMUN0vVbKJ4MTnPJ7Yb8o1PWqTImB79wElEftmlaQSYXfm7sCuudNZZUPq+yAEXmxNfE33J61IMFU5HQv+0R2/r7oz3HU+rCfyf3R44VtK6uRhwSrMSgSu4p+j8NzshxT3p5/yCV4GXLP+0z9SrX3C23HSaBGNjdP08G2Esp6S2p0vrpjce9nMdyBhaYY4mtyJL7liPccEy/b6UUnPpwdRjf/o3CBTa6nURVVdXE45IUXHF99AoDjInjsyBLAj7zt41+lR2aOEjCWKV/ZXNjr8nMoyb22iha86K3J6+ZlywrUcaM2a2TDkhV+Zk6rxdHcXeaKOW5vmWPOeA3LP1Rv7ZUMLy4VOiHOGKEwHscUeZ1o39GvHqP2Kb7L5to8nMUUSdfL1N8/aKeVzw2ZHFSEav58FE4HSX8AJTzqFcjPvi4X7KgddS+1ixVK+3ZfYQD0wLZTum05UWzq2MdLgmVK/sutlZVirsOwOUNpt77LpdlqskjlxaW6HpJquJ10O0EgeuLBjhn8BB69oieJ/ZTUY/MNTRqSeByqq06iRKhcEc0R/kC5R6nwons+pgBZcHcdC8Do1ZAJ5mLKiTru4Tec5cLpq9F+0YxG5kbiYh6atUJ72bPHxbVM25HZewbaSasiu4YUcLnzKD7tIswq7MCxlGe2dz0DtwTewreYh7Zr6oPg6oltkubOHt9WaMiIMWghOpa9QGiiVyP9FNej6Xq1T1Sy3+ikOI0kuVsrfw1HdO4u7TgCZ/vaVez4qoI86Gq1QC7BKrxomJ49mQRlTrqz+Ns7d7NxR+gCARDc9TmhhyXofTxEl5q60p+9zO80ORxIIBy/1HxhdgkFLX6zdpJQvatWTVjZPWrTFVV8962d1gRsjRNtkWPgZJs3CF8Xvat0VGszWXLrJBvc2A/AmzhX3CYx/SxOz30WKwhuM9A5buG0jfmYnYjCQMUXviu0k7RUa3Mvs2UaY2pr8pPp5EIqIfKGx4FQMLYBa9YWeTKNU9I9tqmFniBDMj4HaMdz084/UeicjEjNNt0D+42+UiGN8SZ1xG9Xea7W/MoaulJAzCrUTW2L1GpUDH93zEfh/l90eYMjHA0glxseU3YbPHCdPFYNeUh+tBskQNkNxMIdP9w1UhCyhyzPsQ5S5mTzRoFp5EQQhJbEFgOIXd5H4WjU0YKvGnw1qLHumIfOGOtH30wR4t/AbeagLhkdNnY1jBVaE8kxiTw4UheeP9rLGMj3Srta/xaDLSn8Q3ybdCyN/LTHLbC4q053gA+UZEygoSg6OCBG2ag3+FSS7Es0VhRuYEEtX6JmOel8awhg0H6JmAkGrcjkRKYGax2N0HnZTE845eNbWMJWE97/cxfXut4WC+MKyRkvq1i8ZsT9qTpvRfXN/oVXctl3PtFYBKcricFhh6Jvzb29EjDSgZdwE8WKIjxHWgaSwjMhHGNxD1A766psoBl0tl0KgMhExA7KcTTeNH9NyUkE9htO5zySMpNOGgRBaThB7chlnyS7IoY93sn8L9zbmCQWxQeDNkgY5TfbzDhBkA6oM/HscPw6+AIVEKcUkp1VkElwvtTK+SdCdz2NPQB3zam9tbhEG3K6BK29Bb07IFP38AxwMeyUFk4b1sPIimygBfaoRAKMnsOK+/zhargF3GwzQmcFt4xu3084V6OgM85xSe2Pk76xjwwQOVBfDEDZIuJM/ZjehMyK+LlCwKTu8c1TCjkTA4zr44omVEu7s/5mmAS50eXJyckqQTg8RUrKy4FefGG3HORl4UbHHoI+F02u+73k77BlD8PP+O7ZlEBFRuSC2Nl+IyEL7B81dPzNkbZZYZy7k97Fk6QZieGXO5u93388/hrk+rTtUZoWrl/6o1hh96eErKK6ZHLgbe91/Te7khdWotWWwvoH5mwIwsDs3UpoaXTOBEsxf5hKFMey3QUPBcvcc7Et9LNsxBS6kxAtzNLgBYnEIL+mcJL2bwcD/JPwZwNK1SubK1xp8M+8AsfU39qzUALKq3Lch7qpHblwfSoeEvjmntyLVMJ7qsDHm425Ku1tS7chOTOLqDs23o4JiqyCZrrTaK5kP+V3BvIZXDGHg2nVgEY6UNGj9vZiZAQ3fN/1W34uxUGUQTiU8Vsh2MwApZ6Y7FmRcfTjPH1LnsPRhvuQkqGcMgoTOwXstxLAat4AC4+BLc5SRCAgTxmSdjP+J1opp7T+Ih3RZ3IbaKKpJb+tJlBR2LxNUVd0mNC+44zJT1bh7FWhU44/cswLrfagZ/QJJHIWwSmJVkO8LbsFlU8aM0MT+jriJbyPFgmN/Ve5Te0SKSMkkv7fmkVx/EgBjHKow23MWUJ8+9Rd9+DJFIlpAYFUhc1fC0r9EL/00CaiOAaE+Zmf3mIMZTQFYv/PIliSpBpuXB+lEUKcKCbQgbzvYiqHNqhi8W2aUWMhCs5IQAX/Yb1JBOG46yBmehNl6L8n5qalUJjV2epgMNDd1McNkq4ZoyX8aH7l+WrS0NYnn7yHp2GRYFb6iIXkX7Rp3DNp3wjKW6El/1rsla9v10keZbCyP+cVzUhO2mfXx5Q70MhOYBdafRg265GLZicDpMmGRoZGF37TOq51BDDlt/WCLtbDS6xP6gMkqjQn7e7aRyklbPAhdKvmNgIuFRxQPFxKLVI8vjXbdXENQj4UU6fMJX0WnLRPcOn9H9jKd4oXcvPsxZqZ8hXIiRZM6GND2MeJtHOIMncp8u13XErxYnjynsHav+EN6tWG3GSwPokhEJrOfjLrgczmdAwgxMdQcvUxDqpznGCcxTFkU+CCtXc/AQijazF1xEGtN4eTfcSLjZatvi1e2jnfy+QejTjS4WooUm3nyTlOwxIn6s2uP3X8EOGqiCtUfBe7zl/88/7mxStbIN8ZwCbN52Qv3/oGK4h5HFenN0bBouKdU7cD44hCLeVEPGLca7TfGzHFd9gSri/7+A8n7JtZXNVBwTYRCaAOdqin66Eb9xxgEevYMl4dURL99QgGCbLLLfK7NyyKXqaBRWFEs5RehIkASh14bOMk6617VTObS+zBuYdWCHk9Phg6+KvlHdOXdscWhyjirufvauojSL9OzJxVC7fAHduDeCZIrFlcQs729Z+lAhfQKqrb40LFMX14GPIrrs62ll/GgDr+dnCLuf9kJ7jeJYJPWST0PSuAECFHXLKwb+55Z9Mmlm6bYBfHB72OmmMTttvAH5vocCePAlwhwKHtul4iAR228Nk/Y0COSrPv2AHUkw47NtlZQ1b4WOxSWqsAFe7XbGpRh3brxCc/XgO+cvuHpvq65JLXQAsce+klnvkiGeenPLvspXxNZ3X6exJeoVcBjdd19xjAKUXscQfUdWARGGyWOECRo7QNYnZYjx5t2C2Xl+O4FtW9nhFEm3TJue9LhrR+wCR90IR4/kJw/q4kzBALKzDo4dM0sLwZwnsMEgyeHUKrS0Z0NvVO4mGO8Q0FEIslqjU5E+OHQwlQ5A7rBBSG/kU2xcc7maVu0GPi2IxOSSh0bXU94Q4v+S2zuNU9nE7t2UBABSIi+D9/OAqYKdQeW80kST+O96LIqGCSuGNmC0qXvx+trOHxM6ZxhBE8/PeF2inipmRtgX+cuUw81jjtzIBL36wcigTB+ED7cvwkz96ripOG+brUEeK5wSmcv3+18iDOFP5dp9+xkc1dYkzDAdLOs5QwNE+ySvbUheSaYcb2HRT1hhiHWsltpQ7eM9Ia3Y1Xu4+zHVDWYGRzCNQww8pZoq1OIhZqAKZIRl5LDvHGXR86Wf2AbISsvymZhwPjtTcbY7TMxQzWi+LzXbzH8QfnKOjXNhSMUof0CVyTFKF6OUvna5i+l0PXDkmGeQ+c0tf30Z7vR/VHfydp4vqaChRcR3LMZ8xOAiAUV8gEF+x7XsquKmF9BC4BspWDilwhakHFShUVIP6TwhsupMfjP/DPHjOwmI/ZXEOqiMDx8C0/+1K/bFoJJRdIJ8mwxVJxZGQ5Nn/ows6MwNViHAKLOtzJZ4f4Kkb95hWoC8Ge7s/ooDxoypTSogRGRN9kbi1WH6N3RqtGBki8qKo14pO5HpvCm00SZDINdK2bFivJwM08cs78R6boQ4UMfKvYDeKlArR23xOz0fUteH6dz2bOhd/hMinvg2TxQrnl+hvJTtK2XfcEbiev90mkGF/0X1T/vzf6Xl7kemGjH/W/7Cfa+V4f9kb3dXO6WYXHZq5Ttq7qef01Wm4rPcDW/1cEaPiF0y8KlFaYQUz7oIaRS9RHltmgoEd1QadEiN4HBWpf8aay/1Gf/5g1gpNQvBk48GpDMTDtmlG/LjB7F6HO8oRV09xI1Ihq84+5ZtRRatR84clxDMoGyYRq3BKa0SxGPZAMReVNnzbm8S3d2Vb+kzVcOF5T7lcChD8mIWlJ0C2p48rmsd7C1TnGJh86qGc9MF8fMb/9jyEqc8gpGKfHwPmYtJXhwdQ+IqzrQdFdWGpnbJv2VIMbSLfItNCQrJM9SYXGoWF1+2RJC0fQXoGNmnFq2kNUqTu26elTG7ukTdbgSlgjwcxuuebT2NURkbrPkuQ+r+ODEeYnkx0w+07YkHg00PPMe3EZ52acufCa4FgfnW1YCAW7Rg7AQVzPGSrPM6MfxpNoQGCj6BAdb4JRx0Snbml8xsRxmPWWQNjaiQzlxUcL9DaXlfxzzSCnu9tORDjc6le2LAwPjb/nIOjiEhqc8r5VRHBVbgG95MYEIIP+57UOfNmR7dMI/v1BC+L/annJRx6kwl7FI5KPcU9vyXNjtufCwMwJI5ItGr3VRUOoXHDpiWEzT021rS7tGrRe5J+gxm3r7BJ+GajH0/L2/jijfoRljzxg5Xw3mdvt6usk732r1UNAdMVCTWGzfwX/y02lgVWpOSXTMGoUliN6jXb32Bqm1oUTg7gCCr11QSpwC6+iUcO7kCzkVO0M7pOpvUnfvCNCTjP4c1fCiCaLEluE+0M8DnMxMO5f7f9AoJkWjTrfEjkv1o/v8EbAqRjNkMtc1wDUPaIM2pjsvYwk1qVi9F5Zih89rfcW1d4Xd49xutccrE50YOvcn8P1QPx4Cc/y5cHanbcN3OfAmMQjno6tD7XXYWhyQ95NPel19+ygfsVEU573NJJ+tNfjAFRC/LpsPi7NdlHBGuCv2O4HOw7M+cb5wx787MYsR3UiVDYo+rMErRu48cslboPJOioMOdbTR9CCl+Qa9WmAy4dYm56PTryyi802h2usvrIcqtllAWt34OVgTxe93OxEaBpfZm6zU58ekb0kXObHjkPse8ENNqgoUeB+qeWeSOgYN+CfCu3ppHj/LhIcm2WKp+RGUzufgg8asT7MVrXoLpCFATyAAHn8QlxNaiQSQe/h260fq5z9wh3Jr4j1n7FUXBehh/i6aEr3YAMo4j0B1rJG/q1gpLPZsFEDSm0ZbMi9zK/4hhkUay9TvoLHhTZuqvCH9B6WiIVq8DzaG//LTgda0G9q52eRbnozJeUNcQxKyrm6t+yd2XPEMpp0IlkFNGVij/kdxUVuQz06KzDGhjfdB5sz3YeYDVjVx3OdmmxvjCqZPy4EAGYxDDoTe5w9pqNJBb11Uqat5GLemrI1smX+cJb7U3sJy2SsKDHFJcX9ctfko8PhUjas5R59lWb9ZCeQLzfjFV41bIyll6ipmCJybYEMoAVitaFGDYoEIb8Wa+oxWZWxbgO+4yNXCXFaNJhGk9mfNqAGt8NgSQUQCxLc1U3eBbFkTOlZJdV1WZ6gCeeBoF7qveU82nw844UM4FVSN5/NRo4ZgZ1g8FJHQID72QOKTOTycshIONY4jPs/cmPpeEdxCU6caQUxUJAxErYPZMlyDz4qnkNPUKgv2tVx2Ti6WOa0ZesmqWOJ2HB4m6ZBX8kXb90vSNFd5eEZxmAs/RIud3d9SuZFpTiuQuaPdWGrFIjk5SMyxjiZS2Byb/lPwBQ2oVgy0cZfSaBvZ/qeITVX0n3y43dLF8Q2g/KUUhw67kcDSpqtJlTK3BI5CgNilgOdJRHPe4RiRd+NKnvaxgn/hRjwqpg94WW7tJtjNAwuU8Sgp+KuWju/eQx58CTIBKwxyZ6e3P0ld470kT/bznm+bArqxtVBKG0n1pqVfRZzWh3lqOYfDyYJJNQMUVYGbU0HDsOm4jwDpb3sOz1aBVNEHQNsDx94z7LFfgbJgTRmJWcrcVzyN4zqguGytsNnBuFh/sZkt5vCVVI/4qJbu09cJU+VRQAzJGYAeHnRojuLANRnK1Zc2TmrFUROk4jYq7W/XxYXFwHzTpuIyVdPzbW4QneUdzZdCeX3AjOOaVOd2mCqunQzmkDVb/LbVBgatX4PMo3pgGRoX/S2XtRBP+OiRmb4xlng5q+UBpy4dFYnf+XQOwFuR892WTTEGKmJvrG+xGhhpggIi0r5Eky+ivTrqhtCkK4xJr1qETYzTSH+34sPa9tq4NM8b+AmtIEW3aLmwiU3WEEp/R3cylRemT/scXKz+LhDv9U4HbOhsU8EShawvLw5/42LxljyYrnSIi1sa5FacyclS54GypzFhH5eWEcVX/ZjmRrilqAD6FQX9NSpcu6NDal1crTLdjgBbrKdg0mf/lQQWfAw7XJcZfupntMlefi0Gqy53Bd/QbvTyTSPZgVUbRyF+spJ2+CKYz3AyFMNQOsUB7Va5nGfsyDbd9Of6ehQapVT5XWYR0i4cCry6eLmU60AlV8LbD1iTbIxK9u+v6zVHmUfHoKWHmsBBoBz6CmS2PIvqdzr6anAWjRabL+IAB2fkX+ertvQiEgUxZdmhCK7E+FIcuYq/rD2g==\",profile=\"router-server\"},[\"router-server-release-0.16.1\"]={public=\"9MPQfNsbpZs37Q6UJSbrJ/fXpw1026Xv19m+Q+OYn4Ge97c3WL5tC2ogn/MTvbXhmaruZJuEwnIL4yFz2X6QcZsk8AEvVus2zZ4vQEotX2BOAJffwpDZAIRfsCwGtFy288chNw5qeR95JEeJfk/np4K5mRNpAlyzv9nNTCViH/UgwYnOJnPzN8LAC9vrdbKgzdyG0CEUUb4kySszIO1vLa7hU0C64Zr7lyn5k6Wz5/Nqs1Bt0f5eoUS8Ddoe1Aae+4I5CR3CbrdpqSnQOX2kHFaJCnpE3Yg7iIdEtCBa/39EfGd3ftLYuYpcrJJsmbMk9MCUTQ8/f9/Zo0EGkWITjGqnZNuII+Shd+aRCfYlvoLKJxWCAHa3DdBi6qNAnM4Pln5ta2Vk0DcBWup8OohGFP/frfQDa+BI2i5n4Cidp21AprE1YNK74Zv0OyA4nCOHL75Q3fo4fZa71QO+TvE1hSOTfBqfe/TT6Bnxb6HJCEmh/6jVSh6L3CHSfnuLxYU/kLwiZJjvETbqVK2fTvVJUip40LVDkGF7FPuDtPeiolJyAsJE5UfRPBfm9SSsdcDAaWEd3lrJkDkps4aTUsM/BTohAdLkLO/psRQzPpSoy4xEsGupzf+Z+jqhDqN/xRa3HFVA+ERorMbdkBwPPBvwD8ondDW6tAufeE+XGwmyygV5B/A0p0o/sggbYbn4IgX/2lRrFJpLVg0D5Sm3KOCOVd5/bPWSe0Ueei0T1PDre92P9CHd24aty2nDlP/qDl20/RaHWDZ4slfMIxK5+DWi7CIUW7TJU4ybTsS6OaALaFYXwd+1yQwLc21DQ8nkf/y2I47QX0Mfr4T9fnBGdbRgnFWP8m8H1JulrNeoeIXwa7ijB4N+WW1d2iyldUdHXETCxETdnsQiCUCvQUKoeIjzzlYS2UsdoJ+s11NKdtq7ScXmp7CowAM3gGe2cs3Hcz1EJ4VzTSVGA7MvzKTlL/uj61JtVofRRQZ99NCOVhSg4aiACzs/lADXmO6mNtL0pv/R4y7K+y84auIQnyvf5dr5alkaBfuuIx2rWzYxnyvy7C1nzH2xXVSg4VTDS+r5SqbLUiJ6gzjnUPdePAwIhzhSoDkxvDK1fCGYKs+9SinVAOey78K7od6hQVT/fh2ORL7GOvAtth3v/K6Da8rO9E6x09vPyRWVaEv50+B6F5Xue/SfyH6oAyQhR39dxYB4hZ28TUi8NRNOfNzc4k6h2wxT+vTIqGUAkqR4jv5yBMDQpRG4oQNuRCvaYFlSwHoal+GtB9IRrhK36b3X67kxYFTxl4Pwc8Al1kQZbY3NF4U8xeOaCqr7tJJvhzWoCgxWDF7uJ8HWubgXUuhrAxme3+BSLqUX65cSb8P7vZcq+tbyhEpc2dE+QfOh30XC2Bom7roMO0jxg6mE2q9XdFnzwI96s5jM4tOkffIHo5Bk/l/U1A/QJPnRsALrn7pX16EK5pIiRVQSadEiPKMPZ0g7Lz7zFEIYSmm4GYdkoYFe/Jj83yhPsFBf5IZ0+sZfTphbleNAnMEOfSoVpVDbMCCn+LxpIeL8wCmgf7RK+M5BCZT0N7QX8lbJ/YU99MmNtMYNgRgtlU4C5sOwt1N2QDR/ZW4+f+/gCqVBEo2S+p3YGIDM9SQh3zMEWtkDmGn5zDaSR4kDV7l7XUtZnd2VGtowHX1BfG/E8YpxgsL2uXLDIB/6asKY9Hjq9E2V6GTSyPHaiotSO57bLLpy2wqA+JHzJ9IY65x8XXEhiz/V+iiRb+Gxzcz4HuvtLrVVwT9AqJ53lNta7TDbdZXdJn3bBtFUB9fgKLgaLJBtlS01KgfsSOrg4sSXobxhv5NJf7bVFmTzpwW7p/Sw0wqaTWXClRYwE43YqbKtr0GfkxHQDR9qWn6Wl0BFVfKcOrrTfiCKsKK75WQlfV6wgs25BUjEL3oFLKe0r0G61gqwYGYqUvSuC6AxTOaXHuNLDQvgUn6GwncQQ1wGWBm7nMuwKR6sWP2tO7qV6WsSEB6PwdHxXRxZ7mCS0dCG7/j5fSz0Owpd+NAfZq0ldYOAzAV8k1JMYNJtZRHXN8xZ0Lxo4XY4HScRoT3gKlMgnEzRW127Ygvl89ClBLbdL8jYpgl6ndfilK9Pa27VUR2YXs0cCt81l7yQtsDkBUEev9T+fsvxHrWOO/7ywzUOlMXdjYy2l8Kap8UQnU3WHuvBfAooX/wPtGfApmVGut4EVf9LPR3+k3GH6bgpLS5uIDv/LCPUrY2shKQLxF9kN+hZMJbxZQJmkteufWuas+DPJXg+VGGZKUhbFAtUwLQt0Wl/5Q3ZUJdOPwg09m6+35nCrp4FuFJiFWcsyjIxt+jLmQUXERt2tH3SFCfyrCJ0ko7GVufVv8KbNyxkGuc5nzuZ/Cz31G1dmvDsK1o0ob+JK8x4NxBVYm8XOUXQQIJGQMDltaq9ZEwKlNuUesZB4kz3ZUaySJ205HzbsrommdbHELfuDmwg8Hxs2LE8h3hen+S88/j87hR8oXEP2Y3Oxcz9/2gdbhSxKfwzr4wu6lvhwtR5kDlaUjccSDgQsG8Bn/OEvtKPMrh6E441+4HaYa/eLGp3fu5q28DRwai7a9qth+8VhKrIqX+vcuIIe+34bbY2whUQkNteMUnWOrK+RfVdPQ8GVM9ibiU6MNG0aRTKACBWdtJyJLylbjRTdW86PnHNbjC+eM52BzWZyNdpBtJBYz2NV9Ft5UxSwM1Lsn7Q+LivudQnHr+yjLJilh8bmpBDf6F7lilAMrrFKgIkr4HWNtRh8vO/0VLm87KwHwmwIKQP/TE/dlO6a9TxPfVLmQ6ancml3k8j3gaGAwGgHBKpH8dLO6T5FZW37HFxxd/nLQ1j36hXXlyNLCCvH42wF4/PYDk5PRCUa6FELh9DdLuF/VlzbFJEWQvE0NkuLe1KctHd9m13ba5vLVH2NjK/LKAqocctzaCf+aI3LUTP/Ue+TLYQga/QXkOF1gb1yoINLxVXNQ6q6yKjil/axJx+KLvH1htshFqKfjEUd3jENNhvVb/Eqxh8p7NiLYD+ODqSTJ4XCH+O6Cis9w10m++rU06gy5LlIaJmwyDJ0ZE2vFyXCy9teGpLsdftPLIEhrxr7R7e0eTWGzMwv+mtuI2lIinudTOakjCQbxRdYPH4LeyxCaygcsd0IjnmeLc3xGyeDXFS99bKvttKQJ6P7pMinAaBEpOSwvNFzlBbTkQu/bPaO0sIVT0qdPvD12nvKBQnN82AmH53nrhqRfmRlavax36tIPwDjJylLCOetB+VBM4zi8BhNSkLDUc92iF5KvuL16Dnm/qEZ2RY1gPHT7t2XDxsyWs4SumGguIbQPAAPfQVMkoUrYbrWXRDwk9pyuQ1Zw9I9NklMSUGZ5zVJY8l964qh+FUBAl9ImuhsLoSK5ZAsTustt+t+jkKJ1Ex03+qTlPbO/tsM604ZNc9Mdlnxhj4UP0Z16WgbelifPYO67mydJ3GYfL9N49WPG9luW1lRkhH0CwGCNYAM5kLlNfc6Nxp2P2J+VbVwFZOhjdo43TOg9F6tFJ1EuXYyX6fVlDwM4vG8LmgeP9UKSDb58+tMZd4Gui+/PasXfAVSQubMXl6zpD+ybv0zbx1B7bnRB/rM2zGOB+Ny41X+iX+6oi8eIDihPsU3gTZK2f1dcb6hB31hMGFZfvY7m/4/XQ+EIWd725agrGHYGyddVhnh2M6/UJDiEwYFQIbXszj88N85f4tKfWuZAaQo6CkYD9mWVbW+dEatC82If3McQ61fMTt3fM5mlWFvQi5HNbt29S/1JZsG4Wv4/goKgjaeyTXbi7MZY9o/a4/m0Wf9Wq+iW53W6s9NnFiRWEWwdFo3KTDaTn+rfgMwfYRqk3/svl3sgqOLtkuquioidJeCGJIbqGF+FyEEC1N1squKB8JZV/bHItQjsjwmJcunCH0JFvf6b5XSENajod2gOMM0qJ1zIFZjpBAOMKOpa9SEr0RDyDTnmFWDFgYYBZSsZI8czmPu7vxZK/vhgTA/rfAt1Xlj13iSYWxUvsZrLiaRGRavOmsjNVGujtK07Gp7Axa2HcjddTbz1YStg/M7N/swRS2xE/EOsouToLITft7U6ai1vazsYzSMSm5w+Eu4b5t291mUmgq6VNsMh2Nw5vvVnZ0t4ZFT9Lr0KDsw2YY5GUnmMwLbLvz9qFJ6nOSnedJVxr4+8KXHEnikj75fBHSFcwscirJm07FOuaSclX2UWIcBrtY2r5t9sn5FcOj2E01W2vz18fHpeKvLYVhs/pVU7zs+EIvNbFWXnFiNOkYdgbfTkWlwsRYJ6Z0whnnj+SL/Gt2ACjLjo19ZmfbLcNLjeJPwcwYy7jqlXh8LRl5mTnWd50lbBO5RQxTTdLIDtyxsEwZh+2APR5FMxyCDHce09+REesZTZTJ1EWz3FonRD72gIaBdH92lUK/bAbUd22nlMDikOGih/GHsH14RU18yZyKkb9vm1Xby7c6dHu5sVmFHaCofsMFPAajxaglN8MK/Brej9FNaBlLXURS7sM6phvnB+upPgsteiiMCihrODesoO4hq4XAEl4eEjZUMcNVSKhFmAi5KyfrCscQQbBPqYPYwvIM3k3ozzMUfxAxnW0Zt6I/xmUuvCURE4jIrZDolVQaHuskkUPjCNEJz3GbkNpjVmkqsrCcDsxbqSH33eGVlcd3vJnuXZ+0yawGfoDgpC28lKWRPAvNENBZFPjCFXyE7xaI/39bdLXZtDbMXYduL0SxZgwStkdZvpCxFBEqe30AizoaX9qopoHgV7oSx4TuCeAZOla0LDYuwiXp9Y+AIrJvWYuZpe4wCbY2bwYJuHtHL7m/5lae4NdpPDh+Mts5ijQA2XohZv5Vf5pVTFi+EbnocXIcYIA2jhGQJGUV/o+6SR2Mp4Gq1N6ElbXN7C6IJ7RLpUQn3vvi6/JJpqdG0dk4J9ao5ZlsJ3a/HC7Zj9ldKeFeFm+oJU5LxCkWbj7uIk0+JydnjXzC3QtB4jvQBhNQdchlxFRsET+NoAUEKBAhsUDOiWVszuD4jbJt5ak5ou+Jin3yCAGJwH6o3MkLJV94EGtYptziueZZP+/LGsKRw7L1ZMVhckPsYX/2pe80xeD+U+/BpAQhDXHuJEQ2kkwk8+e/9QdSSY2SWrhayw56FBQ27021JZcME6ej20WdZWqAvtq8mUjBV55OfGDnzLONq3QdW4hUqytVbW0tF/nNRBYcp9hQR0GYaKmMJp7PquTX7uCicn+QZkvi3bN5ObfgQ/YqFu4l88hypKl8slXagkzSxe2fxiaZQGo7K2bY903yHhzBapJwOxDI5UC7HnIPwLFaFiTxSi1exBQ3nSXBj3RWnNacOWGmJSI1M9KHEugXJcVtWCt07uOmRjbWqtti3lceN6sr8VwUEUa66L9vx//5NQ6hmu211Yo51bnGMM4dJK+2kqYceDvB9RcDvw28edg9l6Y1ujsu1j6CR5XvOV1Ccs9gVcdVXymnjXtCH228Y3VlTRFE+GtqsOdX14lIhUV1QhBwr2bvDgp2vbPi4mAr+nE4htspdgaidN+MWMnyHV02Bj+Qhe41I9zpx68nSeZZRP9Uc49z68jCynlGSUo1DcZhtYm+kt+dPoJdd+mZcWkc2WEDdAsLkynvuemQN9Xh/k/ht7VTsvXQmCAg4HQ5CJC1segq3yTf6wXSiiIWJ12EwR7nepqskNOQS6i3DBUuRFk+KSepIPYKFrTeR1jBtr8yq67dWGW+WxnfYbYi8OGG2RLys7NnBpd9TtPQAPJ0b+kpe5jUJnyZWJfcUpShVsVvRxM2cgndKldIlHrlX7Ashv1eGyYkNPNJkdGzQ+S2tKurmuoPJACkiK09+zQxdXOhfj7mh06fPaPg6QA6aJ9LvjLuowcOa/XYKgfZoF2emMySYZ8dANj0Xo8vF8SkRIS7nFWVJsz1jXjHbT01ET1YZ8aBBn6+iZ3tPp3y3lxuZRkygXVBXYHZtwrK1cjOMwhBYh997ZhTBioqgPEK1dXBmEm+mIY/yCfDZmp4h01YEzPw9+kELa9hxY5eK/wDzfepKOQr1YSA49fWp6s5xMbwrf3GoBkKtYC0qh2JDU8w8df0mDiItjND31rChZYW1ekovAeO5FXmsJU63BlsuCN0AlmaJO3au9GuuBJeYP1hcMBhC30LZKqp+VYhqnROZcXSjIG7ViSiwUhOdshJZ41V4TKsxFoP3qWBe3TkZTXup3AhDie21G/Rh6jXw8qnwIF8sTRpSUln/uI1cjEuCSCtbi7GrMrMEJPIk2UNJSZ80ihm3QJma/S2fLg9zXHdpXbegx5MiSeAxV3yLO8CkrDy8iKmObwkJPBCmwV0LPxsN433y6scSxsxyrh7A/tUZTHdmPmZXvLOUH1FyC586YBuhZ5klHd+DAttSnhTaLglJA/X5nqtDLHycYAQMjFjf0Z9MmqwOJIZj1gCugRoQnxrwDsD9BEsxzLbkHrvB/3aPvCv73nzbAnTxc4Az1NmrzxsgFBKDkwg/jrz6T+OJ7qTUZyhMZwzavMqjiw7UdSK6J4LBVpmYSEstUYcCgwVilyNHcMMFFLLLYAyGPMrzWdW2gTojgSbqmhfLmW7iWROJFgtFtoXhPQbAFj4vpBQxPgua0oAfYfR3NHW+3QBkhW496OGBmbeEljS7a5bjGoZYbcvVtC0thYZ2fRb9JAuCJHO1RiVIeqBW+3jkG52i13pM9eIh+1MzpzOtHRPxU6szJwRgWGeiISytdyJSp2xF6LOv0GyGTvnyMa56YWEZNO57ULPYG8yyptP0DhBUvBZ2TGHP4UUzIdO/zORbnYFLS2bztUkn2rLXFVGPAljhcfkFYkp9r13/uILTJgTuvKqJaWk+WWODO00L40ZFJY2xn0ruHbM+7OCU9OBTU5obycMPdcDfkvPr+aHxI3CTQ4d/++nZ2JzFSuWnVm2exisx0Ex8HPS5ojlonlzH5qEe29Ralszwk/2f9kZjqN6V1dxxAMDi1lfm85AsJJxQ4hddwAJsM/qzct2C9b5LJDKyfw/Nzbd3Y2smc3ZGhcuLlSXyONkZzxANkfRpQGBBXDcCKQ1CMrTqYkVVV1yNRDHakUbUOQzFzHJU5t50VHg9/Udd8w8Q4b/mQ1moJz8SM3oZIr2NNKQKyPd8TCg8eZX/FBRYysXtJAMUaMUzdrnqxplDieKMxTnysXgvDCzh0mVuHpLMGEXUySpWrs6ssURNE5chnok8qNBFC6xAPih4K1uzImkeXoSrY4cXw+X/nxQIohjQJmV1S6QLbOMYhuC34llsdei2OD3Rj+Qi/StS+QN3VAurt/wRxKvK0mCJD4/VULILWiDGfKuM3hUC6EppyFPsR0UfEGuF/2QrbXirRbiDT1Ti/GA+oFYdmvy+YmLHi8BQYADuNlJR8/hbD5F9bBfraz8x4Kt+3zwFYAFHB3d0jJiquBaVujS6H71GDlinaf5G3x70ZRevgUslzZg83j6zwGz/52qMP8yj7TrQ+D0LFZV81blYXqJL36xgV+1oq79DvyK4yVd8DxLIDRwy91YhBLY+/vLEnim35/5StAkDqPd+jWgqMYgWoZX+gFOrg8iEQ5QlOwndzyxcN5n1lXifre3M39VfceBSo4HbwcNehpMFQIMKAGRfPcVBmVF052lP0g9UTUhIAkKXoxYzYDjLPPT9qOO1GonOOd30ZTJVAf7nzHzK7AYPnrI3ufCoi7SM9FHUOLSE8mO5M1h5PL6E+DiC0GJemM7l7KEciMIkte+vzyjoXHGQ9vvhS6bBAVx1NskeAYPOBuGOUdxY5/O5qGj3yeYymu3VYUuBrvCC9dbtcB9bf83rGrkox0pPUU6+oxlBct2c4NXXlwCuXfqeV/nEE9YcbkLXwfOm72+xFLLXTnRh282zjBf3yYtDLecD5UZP/DyrmNRugqD4HBksBblO094PoqS2H45ap3t6xy4uXVqc7Oiy5DsCOwS0bnFjrqkLRVhe9ot7jMpXz6PhbhaVH1Otyul74AeeoQunHZlZDmylZ7Syaq6VcvKbaSsaGX/Q1fSeEpmXuE7LHSa0c2ArXYJl0YMhjMQmQ1bFOwSXtuciLkVUC6FfqUJtxDLkFznMH5StTzcmwaz+PJSM4zq89Cvc3fv2eSHgjo5REBGyPNwcOvuHEY0gxzYk9o3exqtW4VqWjPsEx3NLCZ/92cm65ueLQtxff732WaEhYqWlb+HH2f77m3CkqfptHjsH3Ow/Y1hVYrECe/goDxcr5M4wVrg5gGpyMA8ISn6/gruvTf54GddeVyPXKSNSL/A9LDpxb8NEhow63xTp5lVWaN48VP4pG6CMc2IfeN6j1L8jGxcNdcNPEXApQinOpZWWLsFfkxvX5jk7NRJyIyalRJWVPd8uiKzuibe1gLnc34gLax9qSA7AKDR1ccxtCi0eP9HE7ApvCCEtglgQ8sWrZWXRc2drUlwkQoEcQjKe6OKfD2gTdlQC4mrmaDh9x1faLMmcgFrCW7ibPNwy8G/NVFNX03DWsfcovWgckMwPNOfr9oesOV2FafDIWPZmsvi2p+w7ykuJ+gfnn5qNIECgabRj+MEinZEqXQy75T1OlXYRsOocpXd4IwjCOe6hAZrm+NO+De7094T0ys8vkiSXgi9WZ2hIhcaoBZrlbVHT68UK/rcBTzipB+ub/LS9Bo7IEJteDls3IDqoh+Dyx+LH7qptMiE20WSJ/9vn3LsFANwU/MUB1D7+pCnaBlg6r/EpYIOqqS9u3u9VDPyCGqfe74m5i70HrIIPwfJefbxkEweivsnDvCCPHyOVXlOaV0RuKD6u4U+dwdkDYzV2o73DNGqvVNlLxw2bYE8ps48QOrVU7mDNvYdCf4zPxXcH3X4OazHCDJyefbSCLXD9XSQPPRk9S8HdQsKiAvm18KeqSKfxRui8V061s7kBFQdngevWZSKNVeLCNDxc/6QUADVyx8Imr1yDCwkYxr+33jggH89U45Czw+6cKzQpVfeWkyiSKOCISo0yIwTTlUJGnRi/jR2+aa6Wv1+chjZF4XLmofPTBa9wO5qECL6sR85DWE/HjMOM0WCKX2u0bKMoslb/miMDYrABvYE0k729n8ADaBpyMCp6FEQ1k2BYi3U7U304Lw+UY7vui/gdoy8yKN0zCgKt4IGur1sI2gR4ZMFmAprTx8kxlSZX0RT6IH/eQRh0K6zFN1D/Ue+QTahnp63D+NL4rFFpwDSZeR/hCQUSdR+7fd3ePZnmsDcOHvjCCGASZFQhjMc5y9q+YOX80R0hlNeCuyVYkAplAYrHdTgRWTX7tHc2A1gB9mrZeUuZHSLjJv/ix84j4XncK8eHnpEfH+BTGitTT4PS8eOCkdYmYFrIk/LoeDrCW7oeIU+PAeR3jlbu5RyMcWHYaOFSJVr5AEcIQ93xwITkGH9Xgrpf24d1bSXakgORTzoZxsEDF/tpyrBoNFAAcGTRdOuDa3+Y+bH5OvHuHS2MJ94A98t7Ag4m0gfKjZG94QGjBUqqWzvDRS0W+KLsYTwDuCizL1iz7LbY1PiVRp/zIMsiPLOCyYrFYgFDt21ZoYE6Mzracn5Bc06pUiQeNfRD94KYuMrQQn1CWsF8QVjfNGNylWaPJaHFnJpwU33PKs+Z8wBVS8hHbXv9ou0aubvR4xBv+G4MtXd8BB6+t5N0fxa4KZzu+ShELs16gowV/p9eL8IrtnruF19z5oFYMGMOIMvMpwf2Zo4LIG45Yc1u8Gskh/oIbz2yz7wvBesug8LGoIWbZxTkFszjdbMG7V4/99pzVwsz4FzRfRr+ds29rfe2/XEYznUjHVCEdtxEJkmzM5arUI6qNp1C2XsWY9jFRKUrDw74vZPhWcRuMeDR9Y8n0Y5zj2XIrOGAjGU36t8MeDFHKS2df2cAcal2zeOrxH5rWayKEYpzhN2T8KndQlWmMwwXD28MFHhU4pvb06cDXKnEgLX2C6uy9WfZUizKwpA1z1m1DX165KXSLWtOCJQne60iKoPOZMNBucgHR6o24SarUGOTTo31d0eI/ANCYCQCilfglwRVsyY9FVaHPhu6uhkbMUT/FFqZFzunEEOsLvhkybqg3r1T+q3NxhvClpa+K87JbYZceLFLqCqwDIakIqf3dydL1m8qfQPb3lqpb7J4LxNv+Z371o76RA+i2pfnUMJTaAmql5u3jw2zZj+kkvvW+wHbZKS9RGFM2O4umzUPZRv7sOEboPs4jYndbsLlqf+n/UlqfxYdTIGb9xeic2k8wxxeMxYAtIH2ucEDkGygx+fRzGLY3owugtnFEyXS6vuKhe/rAxh/+QpfMiAIuuqzTopqUeL4b9aXQbNEdU3UQX+h98WjgjslcXVVD6vE3h1lS5jorfBFlSEimFwLMj5lxV/VBzx0RhgAHhXV6L+deq06qvFZOg6gHIpO30dAW/GnuSu7czICj7p9lgeIcRX8KecCFIRGsjst9j+nmUQOPlJRvJ4nSjJIpK8Iu/VVJyRqV+UbzU/w6HcwksMM9oQAC1bL1V20P4pwimszqFuzpKvAiXUNY9TjMewxQHrUZlXMNSpzzSK1NrvYQQ1p+2BbYsLyG2O0WKow3xqXmETvGRUr2CTHqO6ROVdnUP2SZSxWEM0V6k+BWq6TnJFn4aMu01eGOAAcNerCovxgkj2nihaqwSoNZ9q78rR8KbDXCMTQGSaRt3y2EKow+LdRnlAz6Z7bZI7ptkHGbpdO8v9Z0hjsh6lrdFteTMTmXqo07iIxpWR0XcwHHelmAAw9ctASt1vsafvLsZQZ7EKGQTiHNSsXt2e0a2YKaUpnyb1AIAXY0HDj8hN3BNMVQZnki6UT8hbe+cqFx//OlRg1nhDpeaWSjfaByyLcQJFtnFcHc9NSB/CdvCofHRTsWUGPWAvY8hXNgTFf7DX/SAQM+qRe0EkaHfTu2xvjlq1RsFRbfd9qhTxK7NmPna5SQsCz8B1F95HK1ue6HWFPp+bN7hDNOGval58vfYue5FUmbeU9zAasb+wGNFdm3yT5lofiCEzEknPRxjVlgsMHry5gDJJkV7li9XsAPvctG8UGglop237KCTlsKMueCqkM+EMT1hk1PgvXqyZHgZpu79DkFQy4hGbWETaencxDo4Cbe5h2UPBD8tzkt+i4256XQxYT/eSGleXNdCiBBWT2/Z5is4M75TVNOK+fsfuKQNmnB/7x3jbFOeQubk7ORw3TGQ/PoD/u9uDGYjFUliGG7IL/EcRKWMOuqotDnj+O6mAoTJMiIjk7Q6JJ/uSZ1TA8DbuQNdszsdsA3Nvfoz95sSiVUILT0GsDe3CjR5l9dwDXzn3CvmAOZ3bvbzdRZdFspheAJEHT8Ioy81YdDjxj6wYQj5mgXizCEd3IGvaJ6GjvT1U9rqRedesjNZqC7Y2kzaimReg24eHP8052s29cKkfCy7H15gwIzZ8oi4txphsbYMbB7WTBt1jm7UTnP349C489Feuu+DcBDMX4yAB+i1qnfJ/32VeAZwnbolNtvlDcvpGmvpxPTmP89Bt7rLyDLxtmpxdbnfz6JEWk1qltVbiOvi2Jf5Mxh+T+Yxne+OMl0y+6ofk97vkS/tsYjwqn7JwXKEFpoF0vvZJVkayyx/UfaSbrEL0Cs4qUCdbKsjGhHPaDtYbI6Uw4U/O3f13RSkOR1v3Zr5CqKxF9pubZzxgJf5lOt9AUNXTPHfJqXc7Yzh8kg54GJOlEH7bjahVCtR4IVpvJswVNMYsYZsbneTw5mzKkYh2bvIUdhU7LPV1xsfJzePqcSBZMrzGf9jDPrdt5SCBwAZ1lwBcpLQCb7NIBZ5VdnEFQXieBqZMsne74P/YK34hDMaIUm4pPysS7aTNsJIWnanOlzsjY1XsJsWUQFllcis/FynFuVDM/aiQYwBf9iJQZFD//SqvhT0QiFW3XSUPmPC3ZBq7Cc8cB4ahedRN/HsKW4k9E2X+ICp6jQuYNI9flfeL6usNWfdxhv9Nw+UvgX9TKgPvpQpB5EoZW0AX9mLQF7GKpkQpdH32A4yh6njUNeEZF+biqLrjdAw+blQAqXvAQ1fOHz2TWyOB1gp3r/3Z8qdrbDsXH2tozQx2HgS3OH2fEsy/vqg75ac+WvB6hfob0zx2Gv1NcsvCRfspo13kpNzQp28IQwosOtewnTPgDKPoi1DTYwU+xD4Qc7e2Bp2mb/tuahiJmjPpMlnaOw1Nh+JMeTmqqioLQkXHw929C6KCcnI2/wKpnaMJArqrirTcCcvwizz+0cq8JIVYbr91EmqViF6MsQQNvl3ixjWEmO5AloCVvArGBIiHSK33LhbYv3CbZZ0TA+BA+lT0ramm+Pyb/UEvu0KlG5iLVZ1rotOjvYRtmVtcOpO3nJX+1+adAeQ3H8H0qvrk1jM0z36dvdOuUBg5T7lCq3uyw9NxulrFd88RVATlSIz7U/EP0hKP14QSBtLWspr7ZNZztZnlL/V+rWzT44eiBiYTAnCznRTgE7JAqU4d9oLm2XSY3CDwwiuFpCpl/oXWVG67ZanTpV0IlTGlGjPCISvWPw6CpcGPBGZyGZRpjHRArky2bIMXlUMP0evoWTPsxDm9WIGi1BAxxO8JUKbAfXstqrKvZGBz64sLrYj8Ro+74mf0GnpExE2Bj56IT+NekcxKqteYBK+UJdbQ4rqk+QZK4mwKDzABXHDicWdRXsc8iUiWQHpbXjg7zjg+CgUZYVhtKb16SfYkOvT/Fg6sX8n7N8B1Dv+Ps3FLPziDftCs4vfymLoZR8DfE8iDGzvCcyAaqq7nSxgpMRy2YJc+lDC6JFh7TLTohb7UEnWzQ1l7GrhseyTNIv02AWgNt5uswjahfeLehFd6UOzkg1QGBcnkYe0laGZHGJzvszEtMPh7VU4onbhE1H/TCYPoI2sC0w6tk7CYu8GHJsGPiPYXEyTz+9A7ek2WlVpPB2bC72AeX7aUNceh/eu0RxjnviOaoUjhvBpvBFDMi/EnjlRYQFnORWDBuzC445a9sc/Mh9QYmp3c3QPcCliB0f2zCfGN4ZO2/qcWUFdfTPpCd3soOPE6YLU47o1w1Darp/f8YLcNsoczIgWBpQqBwJlcmcv+ilFml4XQij/7QTaA2i2khw0iw3k1RNotczqVl2tODp1R5SG8bB0OSjcqR2tRwhFye/RcKYp05+YsOcXrMp58VeF9UeG+azca3obLuAeM93QHMUCrOVeqSF0nJfM6au6RFy3y0E0/NlGTpE446IH2z5Fh8dLIsSWMAGnPg9EPQrFmbtCENAQUll8Qc5OXiT/EPcEUzsDxiATv4E30Vjn1HtFc07Yon5Fv1cecWyjllDa+mE1cUHKibAfhA6eSfhfW1/gi6XBiqlpcxZZzUi7bP+6Sv3mzvKdPtMspr/0KHOmFWJMK1gMAcWuledoQpY4WQmUC2SbmPAgGPTHkJQ3LmWvOejMeww1o8CCaJ+D2dnqQPtnwZQfctor0LzLmUwv83OhjYxZ2/i2zQr3XKF9EOx/sgq579dtQYAdfmCH14+xZQEn3UQR8fcHUqTvEi8CFLNHl9M81bMDyTN5Vx6nkKfrm6mo4U75AXN1vabzWWOjaxer2isX/4e/vkhSrtuPfy3iUjpmE5S9Nud8AKX63hvVLaCPfUAxWHmdIaZIhUboPFwjFHTFuZvTlZgk4lqqzfiNvsDmNjTAiVd0J8WvEB0VhmBq5qvaB1NbjlcTeKNIuAuw7HpWVo26yUFaNexi9PFv1C17p2jEkebMJe1ZBN/GiBRG3+gjS2UoZmQxOli5gpqlq1Zz9VHJuu+spDld4/mlnPDxh3SUYoUSI5eodz9Nunnb+iFKzSNSzGoQcO5fGY4pWPgi78SnOSsQ6LPox3tdrrvQm9Z0UzzjOKiEGlIPBxjz1L5/W4hV//GDjWMA1oqfTWAvdswkXMs/EKx8r98CebABmutZyrNKFtKZW130w7EWNPcgDU465awiD0XakyvBPjn3ofkK2FG47JIQjkPujQXADNdiUxBVrvnVjy8jzPryC7uvAcatO1b+4Rc8sIw8jnnzmQ+4lmxnm2c4wlF4+TI6pgy1QbOcPL1xpY/13mUxiWLxnX9oPfqeHrmV4vOWZejsqeEvB2hKqx2fcc1Qh2/5oALqsToUkzAtAXrwSRyWHQ2ihGnn77ABsPjtNMZMga2cFaqFgaz7AkDf2oR9/sgCcWXBi0qqepbOk6k1O3/uQHXBXIsy6QGywfN8C0RJKDtQeGotrWkGJdOAlURsp/fVCtG377tknVCLSHMn1IszsEIsswgEk9Q+ovVqdOtjPt36MG5oMW9lESgziJEV9v0iVhu5f3+UtRcvH/NCENmEAT0ao8/rTwLJJLIIFtWkjZzeIa10bTw6A8yNo/+vRcZj9crC6OutRZd2N2cGCUrZNV2JFJTZ5KsKrK+Ry8e7vz5b/1EMLbuOpdS2lMqa+4BA311osbJJGAnshSLeCLzwnvRrNd9I2+xt3mTbLARvGHgJ2yqj1hws/hVY43qqbaAgT7tdUaS7vp44z6ZuHsySeUtl89rq2bAf9K6YKHpapR3OurDz6j5XXHZWN8PonZsM5od48CknriXi2499s2kznYa9UPbrYa/CZcVqcRADI7Zm4UE0BqZ17lBwP6Z89dE5ClxPmPskMVv/Uu75SK61kRVwXOpQL9t6D5vNkQfh7GElmsLF4Zykrj94ZOniGWNJf4LfB6iTZlzyqLl23yTR9esVBo+yw+S/ITVjIRfKaLkVDDNcRDV1AAVjEh5g+9IuQlqRSpBhshcjYnjPRb0pN55rfQMrGLWQEsdiKpazdNi1NYlrfBwBeLQ4k1VIFa8we4p9kqcnhHNuB2thb4GfWeoD2/Gu2YJbNqAwrI3lYOFFtpfFe7kPG6wF4o2vQdfgRrulRf4vcUBar/cz4LzsJ/pG7KFukZ1gJTo+kQupNEL7lV5+fAi9y9fmhHPmn2+llXCL8NxjyJHxKIBmOJNmLMvn3809qDm3aa6pHKSpsjLNynS93ua2Jrd1qbolE2/QWC1nLXCIsHW1AhXee52uPirhrFw1cqo9U38tG3BBipj4Wkq6v6TA6DqMhhOXsOSm1Kh/eOhGya4GPMYYB6EwYn3+LRtnCU8m++4F5GyzNEqPqbSzDoNGnmUz5S6JjZ1bgleUR45qVNfm4BX4a6HtZTkx954bsPMGKJbMStHlMvf7svtY3ly93wp2WKmy7vMoGzj4y41/z3K8XH3Xoi4Qmh0hMmPBXSTSdp+kvBzLmhl1INJB51ub/lvZVAgcaesjJQl+uQ9RUBKb8Z71TwbIbQRMxvlyCfz1dsCu3MIrLXAJb4iZnfEdl/nl/BCiWKNjrDxG7hmENFZcM1+r3YdqxsEBsHZC/zb4tlj6xwnFpzvBSqn91RY0k4KoFrrcDSmFqrjTH+gBfKZDbmPqjYoaFhJVefKoRfaVi/Fz3TFbIuGeRklbQPrOPL8nPdduoO9r0GU4+Uo/YeXaIiolhngWlBqxPN9c0gscOpg5MYbOMc6ca+IOt54SEgjZlgPIgQ0ed8edjtbM+XqX9VV73gsmFpmVP25KESGex6iG//PYVojB+23B1LuBsqfqricpodEKhDji61n0nX0zKAUGXdmqsGmeAJS8tHcV/jzWAoygT42h5tzs/yT4NaPjLs9xjHG4hLUm8Ym34Dim2Beugxk5XR0aVo8VI9mbBhfNWKqo4WZLpkrPCaZ4PBfAqR/emB2lkOhaqtDlgAMasDbUooDrwl4cpgPiLJWGzWr1zIf25BzARbsb5Fb1RaVz8XiPt5BHpgwxhClTk4nKtwgwecJHkIq4TBAVIx8V8keGt72164eL2tryVgzXXr4wrQoCdey4EwWYuVsrCHkSCYg7zixkW/MiL/6Q84B+XzamkTH1vDJ/OooDk01/z+VjowgkKGm0gReh1HmTxzyZz1q7KUQH+sRX8RD4nOiyB3u6UEandOA9PW+p79CQM7ZznnMWkqQLF7KMv2skJ9/oNSiao705xNQ6bYs2p+H7f45M4dSdEzz74R4N7fM5sn5OC8sKdZ4TLSV+d15KJ7BtvIAu+GexosQ49gAm5kyOVVQRERpLGPTLmwY7GkUNNJcmn5iqpZw9i0jQFIvKHzMFAx64CBZ7CR3wP7xrFwpPSq2k2+IQDuR5xJAH9AUjSO2q4HnKr8+al/EkW1LCWi1UBS5MIghtW4mhpjGHV4spcSSCXoUrl9bAqDGXYz491nJ/3fmvfo8+6LPAPkaxoRczNe8PVVGBCmLR15dQqa/Hg2khbzK4FHo42kvIKvpfSBqqpwXtF8ZGH/RP0+yGnLIcOqfZI8XH74OXM46OQf8SZ2bZtruubGZAosmO5qeXs0J269FfS7X+nEznbHkUk4mqzSycGW3h0EB/M3qKvzjJJ/dDESfwR+gdpqStN6J+SJpau1PfPO7zLXlOZ+FJrgcCm7ItsmRIgS4zB9q/jSzCBe2Cn0GgvxFzcPFoJ11fI9M3leBVml2jNPNz3XfwwvsgcvIn5V5kiau0vukgUZhsDqav5XsF9t1QEDovSlI2xuPCTj6VRlVBehY445FRolfozPKYpDJqEqgzRoMIWo5SG8moS7Wd0RGihPqMd5qso6TWM+NfjjwQ/qkYVoiN0elnOlwmiY8SIeya8EaDou0zCuR1BvQfX7ueRx+32aR44o6oDR1oWSJ3Pqva5RJpMIWZpLCVDNBLRBTP7LFTGb6sJWDeTpDO8HXutQUmDDxqdES8uD8iJElKPC+/k9OG374JwFC1vel9DaB3oL9SR4dlRqAKKI60WuwSYJWvKUSKTjbrt+MOVugA9Ba2lNhK1tpNAVSIPN6aMN5YnMT5x5XaTYGVkM3QibSE3Lewo3Cayg+NBuRN+Tb9wmAvj5jlkSu7yKNcDfIMY+PVDaz+WVCQXVqUpq10d28OeE7wPKRl06gdHri+/zDlE4Lke3EVpqzIxFaj4O1373t9Jh8T687mKoUiO67SQRgrL56QLNrdiP23/nEGaG8cargtnkAo/rl1z3tQuu0XYAF57CpMtEqWoNfoUrSsW/sAY/xU5lr3GtGEvm0qt2zpFAUCOk7korIaKwkzWE1S0ZBEEmV5HSEmR5RaENHHz85DlofJvxWj2OB6wR/1PL9CfhaZf9y5KQBBuK1Eqwy6/Q6KvqI9fe5ic47gc1w5+nzm2tOSlZ/3yqPexXusfJvXRifYO8BFQKcoTnpiVxXzeWzgua1iPBX67FZOVppYIro1EZfafC/PNanduhW/0nSUTP5NXv9yrYGDBzIXAcvRk9xacz039SFDyKbBCbSLVqQjmZDP/u49XRUyrlP6Ro7vZNValHdgwkwZXVb/8h3psIdLWSP89ObSjAZ7Vblr2eZa5K6sMLf2gMj4WZWWAETkmx4L1gVt/iE7Mn1Wnjn0W/U7FtNlwOedRFUVt5zeRFF+LOCxFsIVngkDV8HIadyamYVCJ4UKq7PNVey9K3LpjYQzdOwL05Fxr7SxwtscRyHOrIkHzmpr++EsdP70BIAgafLaEjhhPMdzPPM8BS15thInWHXv1zh4uRneynEQkDokSF74lhik7DAlXit7Bq6+7y/Cf/i+8TMCPkxROt+UlvcuEXEimJPgrUgHvpo+z4ZHXAseqFZiEvJCRHL6p+MnlNY7SxuQcWjNCfQaL6UP2R8bCnpcaKcfEnWEXJh55CbeTiotj17l0veXxuNKa3GjhTT2Cp2fzZraXEY6hGEYpvSH5tSQbAK3ZAm+O0SojNhWPuQMxIWc4XExvttYRVsuy758P/25QDPjKQb7E6wUYyQkyLoCAqCpVxFg8XpmkeuwcboPevr44cQvWo6jaIeSIu1EMlBa01E9SYsWvpCTUGWoc4HcetdQu90Zo3UsngxjZhAbpwMY+M0ESjI5DLZumz2PUCvCdLy+gZe5MoAJHWGteYgdc4WxDowbz0kc5FqtaFTDIZ/NG04LVFSYIkY+vHNEjuy5kW+I2UeCtxQg2oMzVh0rF4uZCF8LOS6jC8W4uPns/u92qcb7lM4pmDUiJKoLcQrpbSkQ2teQf+6JB/7Mx00qGyZU0Nrj/RN5JJgOg1bP6rQB0mDlbQkjfFY0ZLMaymUshA/xK911YvWBxtNMJ8K1aRbrCfmf9ugUdfv1e4CiV+bCtZ/WwiYOy1514p1vFRLRTGq+3BsjRbUNAgfxZRMmidXkz1Aw+EYGIrhoLNw2JBlzPQiP/vkMcO7a3HGRbrRuVbnXhoMSTifYZKninvgjFQirrGKGlj1rfiXmi7yEA4HddQxjUPqtcy+Jx7oSFo8GG7TaLJM1GyhoXTfXcufWlHFBcNUjPurQNfVl6eSPKDhnjbNxZ/STuvGua9ruN14U2EwJYgxoRyI0JL6cgDWoUOhjpL5pPBd4VHEGVzMe/lSDhSNHcPWQHLxuzJsrS6AvW2rnv+d8zdyCEXOMUX2r9tViCyK+ZLSp+5jei0E4E+pjB7wo+T664NFkuRCAd3s8U5tbTM2YjseLXp/LxELaVaGwk7sTVxvTlOOcWWoVmMvnHDoDHHOvj3bkBFMHuMOJCEsxnr4V8vwyYw6rh0xOb9xVCuEDKLEogiTTMmFItCRU7JgZh6KK2ZdB6SZMkKqRONzpaRYqZSJYR3wRhTCfx9zcfPAwbM9fW+311RokWjWRlmNrlCqGWa6LbBHpAhZB2M2Ghx1eNDY/k+7apl6hOrWSpMHe4S7KANn110mvVjI+kSNLw2bGYKmdG+M25w2sG7hSeJaICNGH5wIMYmjrtd7FGerSXtD5iGXkfexJWeTarB6YoK24V+paVmhu92f0PtpDYkZbdC1pNWX3xRZxgGpwyr+M/+RGb0ZRCTRSkpLGEdProm/D8b9fq459x8uf66aIkB4bjBunUTBlngjNEWmlNLrcGKrUKVdbEpiGhH7xIsh97nwJFqOCFtx3QL4W4tTAJLp0mjQCPFZyyHLUWoN6qHpewy/G9LRm9nrHnLoLevveQV0xnf73P5fjpKIBARYP4+2XtWbeI0zizvtU4kvfF7LuY+BYcXwiRx86SyR+im0RvoMmaeG0tY1mW636fUF9k4wEVw1iYi1jDSRC/aFH1lSyE9QUDmZkaDhUEprNEZNRhKh71J4ISUZgZwOqKm2lKLI0HjD1qnoYlS7rkvNlmLkkeIe1NeNHQzMlFM82a0yGfyaTxSJ2xA6N+ZgisKqs0npziFcEylT3GycykQJ7BaofsXzKkmph8er+Bo50G3yoUX0P5Qz7NHOZNUKm6iW2wC5EKcFp54VMUdZhrLHZcQvGWYlWNVzXjLXl5dKdzlAnOTZmnYBjNqABIQp31Bq/fsl+yCeG+lPEM+EMuZh4rDUk3uzK8WmjZ12wrcG0wWPCXHBkaim43GlgAJfrky6TfAYwlgadSaQNGNZpMKnrPpKzpry/ilEkMIi+dzQJ3uHjSVV9cW9wOWg5u6QLGiIoJQPj40t+NlhdK+/DuVRmfGUfQm9Gir+VfKZBqBagH/9G9uYv2Xnj7KZfTUwceqSPOCG633PRlQYY+7FWxxDvyZ1vT5L+1xVFXHFN2LZAYTmyv0iWMR9t45DONkIxRTJa5PIe6KF3WGgMbKT6z2PhL3uhtaAfGzOYc9uvyjR9Dh7p7nCUZ4KgHW0PBT/58r6vd9P3MT+TmqXvFaa6KW94UrOQqC9fZtU/Ecv6dqOeO9wBHHzEgexf7v0wUCzASbBSaiSJlwKjd/Vvn4arH6yAXIof229Thc15DwXQRvyZR3H+ZP80KANvUlmdvfY0JejjN8dk+rDjqZdAeg83F0jZolcAVX7d1S0FgwiRbQPcnFLLRw43djzN46jULLubncsqAhrMBZhETyN2bff5PqwCNzhccephk/PVsIWrobtg01dAVWp5Sh+ANqtGyDzDSzfgwpsqYHmNnD6Jl7Yw2NTXTGo/q1l9/bB/699mXQMzIOEXW+1zUkrlYRtCq8BYXz3GWxdXH1ANvDKN6TjjwNKBJ6bjyQp1rq8d2BfAJOTJuuGLLOQgJtI8DslatXtjfVmiFRvLJj2X/ckh2fr9eaWNNzt2I5pVzCAs4pEj+8BzGyHFulBWEMvS5BuLpWkptidGDGMq+KW63NRxhOA3OoFEj0i5Bf8AFSJuYWyGCn6l1npT4uDU8HBzCbmtp7/JdcS08zDZ1A9gk9lByDAWjPzgdhAr//mlcMMrx0BXEn8Ta6vpqMbWeutXYdkPnzDNiyC97Bw3EwioX4+Tbmkn1XrwYQDWJurl1l4n6pWAT4z2mFkZfu74O6vBLVRAa6M3+e/hlzv/8r0FKzovlzprsPbjpAxWv0qT2jrHa4C7mu7MBxpHt2JTk4I+OZrfrlAyHz0ZuzS7JLjDi7Ycvc92rt14vuSJ28bYho1NxxcF/TaHhv98vKmsHg07NxEoGXCTpQzbkPrGdhx5xVxZtB3aksPfctGzY6M/cDrE5H0MKDTCX4GtEy5DWbSQokS5nsypopSuGe1Gz2RVeybh2nZgvyk8eX1locxqhe07pHedIfsvzOhaUg92A2Vq9Ac+reaVZD90PzwRq5mAeZ458+vHRkuM+EdI4/kws+dsd8peWch8kPUyYZWJxm1TzLeUx3BsnGWmm/iFbICdxNVKPIpIyAwbqsQKwjbJCM4UUPwx8LodatusMrHmpL/BszuzOnJrGQ59W3fyLwLpDVxKcwcBDm8IFBJjdFmSK36un7kxYZN773xCK12y+68GzUkTtro6YfKSDnTUqQolrTeQgy6zMOlJqMJCiMfvehrMS+XyewnSud3zqu0bMMplOoOEgetOeXhE0ocDD0NDp5HnFk6HQj9woE7w6wIxFdet/0GvXZ+q10JFshad/MuH82EWr1NCLdM85fw6mZoRWEq77gAdeVHxWTWm/r8+5W2YTQD8q3oulIzuZfbuOJJvHR/oWgAxiyhQGQtoDbomlkuQtIJLYJ61yZKbOIatBJmq4kya5/AeX+OynGnZWeWjJhTibFNDzr7//AC3EXwNwq8902KLDcLtt1GEgPvE7pcNPwUvI2omE7N4k7CM5brBaC7+d6FkAzEVIdgI82ogffZ4oQK9Isc7XiRoApvhgZyYPtXr72qzfsOj0IS/6icbZgRNUHGkbtuzrqCXqgR4nPLL9bt6LHXecBbu9nm766qpbhv/g9dM3CPtM1YVkPcEUMlaTwTGDYf8nnkqJQccIBuddDd047RQgJcsuJLoMihRfcb24JHq4fgYGC2LsS3TpmZ2mccpEfjqKT4+Vewsn6/KwawkuuiJgQ408dWr+0cagCRKfM0zXV2Gg/58ADnzMf/Vi8SmvVn4zv3U/c32JP/buwVwgaqDvIWR+aCyWvUXjfpmAc8bFe/O9ZF4wbkUT6NiOmfn53n1keHLMl4ouiRe6czP/dmQamFfoPPpmkwU/ecgr8w0SSNuiBfVcFiInyNJbRJSrf6WRqOI7t6QHlV76y+H9r1rzFokzpoTEqb3i6eLZ6S3CtBQ6u3mqd/YZp7LVoWShFEJoqSnG2rvqpgR4RvEvAyd/XobQWkW2+mWA5hJTN9VOBmIN6DCiCy51HuyGb7GNPA5GcjFvaKaGbWehEGnsZGRGf2vWTg/908lhRLFo0qCvSGAYMUwO2pFp+jnIhB9H7qY4zcBIDlrkVY836tENx7aSxUH4GEy72UVkj/bCBMXxeKDIpPxki6r6MIeP6Gb4YECdgpkgRuRppriQnGlRnQS6rHPHioXNWHvqqfE79oziVioUx2aIc4/I0FFoJDzWBM+LyhiJ5WGFkOuSVfvqE4IpHXY8RRBPIQ4AkysKdDeSWXVm2qqiU2JIAUwfNfXIKzAmja/Ong0m6JYRPfRsXlBp2RDGzg==\",profile=\"router-server\"},},}",
  ["ceetos/lib/release_verify.lua"] = "local password=require(\"ceetos.lib.password\")local roots=require(\"ceetos.lib.release_keys\")local profile=require(\"ceetos.lib.profile\")local M={}M.CACHE_ROOT=\"/ceetos-updates\"M.CACHE_FILE=\"/ceetos-updates/release.lua\"M.META_FILE=\"/ceetos-updates/cache.lua\"M.PART_FILE=\"/ceetos-updates/release.part\"M.PENDING_FILE=\"/ceetos-updates/pending.lua\"M.MAX_PACKAGE_BYTES=1024*1024 M.MAX_MANIFEST_BYTES=48*1024 M.CHUNK_BYTES=3072 M.KEY_PARTS=256 local alphabet=\"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/\"local decodeMap={}for i=1,#alphabet do decodeMap[alphabet:sub(i,i)]=i-1 end local function read(path)if not fs.exists(path)or fs.isDir(path)then return nil end local handle=fs.open(path,\"r\")if not handle then return nil end local value=handle.readAll();handle.close()return value end local function write(path,value)local parent=fs.getDir(path)if parent~=\"\"and not fs.exists(parent)then fs.makeDir(parent)end local temporary=path..\".tmp\"if fs.exists(temporary)then fs.delete(temporary)end local handle=assert(fs.open(temporary,\"w\"),\"could not create temporary release state\")handle.write(value);handle.close()if fs.exists(path)then fs.delete(path)end fs.move(temporary,path)end local function encode(value)local out,index={},1 while index<=#value do local a,b,c=value:byte(index,index+2)local n=(a or 0)*65536+(b or 0)*256+(c or 0)out[#out+1]=alphabet:sub(math.floor(n/262144)%64+1,math.floor(n/262144)%64+1)out[#out+1]=alphabet:sub(math.floor(n/4096)%64+1,math.floor(n/4096)%64+1)out[#out+1]=b and alphabet:sub(math.floor(n/64)%64+1,math.floor(n/64)%64+1)or\"=\"out[#out+1]=c and alphabet:sub(n%64+1,n%64+1)or\"=\"index=index+3 end return table.concat(out)end local function decode(value)if type(value)~=\"string\"or#value%4~=0 or#value>M.MAX_MANIFEST_BYTES*2 then return nil,\"invalid base64\"end local out={}for index=1,#value,4 do local a,b,c,d=value:sub(index,index),value:sub(index+1,index+1),value:sub(index+2,index+2),value:sub(index+3,index+3)if not decodeMap[a]or not decodeMap[b]or(c~=\"=\"and not decodeMap[c])or(d~=\"=\"and not decodeMap[d])then return nil,\"invalid base64\"end if(c==\"=\"and d~=\"=\")or((c==\"=\"or d==\"=\")and index+3~=#value)then return nil,\"invalid base64 padding\"end local n=decodeMap[a]*262144+decodeMap[b]*4096+(decodeMap[c]or 0)*64+(decodeMap[d]or 0)out[#out+1]=string.char(math.floor(n/65536)%256)if c~=\"=\"then out[#out+1]=string.char(math.floor(n/256)%256)end if d~=\"=\"then out[#out+1]=string.char(n%256)end end return table.concat(out)end local function unhex(value)if type(value)~=\"string\"or#value%2~=0 or value:find(\"[^%x]\")then return nil end return(value:gsub(\"..\",function(pair)return string.char(tonumber(pair,16))end))end local function semver(value)if type(value)~=\"string\"then return nil end local major,minor,patch=value:match(\"^(%d+)%.(%d+)%.(%d+)$\")if not major then return nil end return tonumber(major),tonumber(minor),tonumber(patch)end function M.compareVersions(left,right)local a,b,c=semver(left);local x,y,z=semver(right)if not a or not x then return nil,\"invalid semantic version\"end if a~=x then return a<x and-1 or 1 end if b~=y then return b<y and-1 or 1 end if c~=z then return c<z and-1 or 1 end return 0 end local function canonical(manifest)if manifest._legacyProfile==true then return table.concat({\"ceetos-release-v1\",tostring(manifest.channel),tostring(manifest.version),tostring(manifest.size),tostring(manifest.digest),tostring(manifest.key_id),tostring(manifest.next_key_id),tostring(manifest.next_public),},\"|\")end return table.concat({\"ceetos-release-v2\",tostring(manifest.channel),tostring(manifest.profile),tostring(manifest.version),tostring(manifest.size),tostring(manifest.digest),tostring(manifest.key_id),tostring(manifest.next_key_id),tostring(manifest.next_public),},\"|\")end local function unpackKey(value)local raw,err=decode(value)if not raw or#raw~=M.KEY_PARTS*2*32 then return nil,err or\"invalid public key\"end local parts={}for index=1,M.KEY_PARTS*2 do parts[index]=raw:sub((index-1)*32+1,index*32)end return parts end function M.validPublicKey(value)return unpackKey(value)end local function lookupKey(keyId)local saved=M.trustedKeys()local value=saved[keyId]if value then return unpackKey(value)end value=roots.roots and roots.roots[keyId]if type(value)==\"table\"and type(value.public)==\"string\"then value=value.public end return unpackKey(value)end local function bitAt(digest,index)local byte=digest:byte(math.floor((index-1)/8)+1)return bit32.band(bit32.rshift(byte,7-((index-1)%8)),1)end local function decodeSignature(value)local raw,err=decode(value)if not raw or#raw~=M.KEY_PARTS*32 then return nil,err or\"invalid signature\"end local parts={}for index=1,M.KEY_PARTS do parts[index]=raw:sub((index-1)*32+1,index*32)end return parts end local function verifySignature(manifest,signature)if roots.algorithm~=\"lamport-sha256-v1\"then return false,\"unsupported release signing algorithm\"end local public,publicErr=lookupKey(manifest.key_id)local parts,signatureErr=decodeSignature(signature)if not public or not parts then local prefix=not public and\"invalid release public key: \"or\"invalid release signature: \"return false,prefix..tostring(publicErr or signatureErr or\"unknown release key\")end local digest=unhex(password.sha256(canonical(manifest))or\"\")if not digest then return false,\"could not hash release manifest\"end for index=1,M.KEY_PARTS do local expected=public[(index-1)*2+bitAt(digest,index)+1]local candidate=unhex(password.sha256(parts[index])or\"\")if not candidate or not password.constantTimeEqual(candidate,expected)then return false,\"invalid release signature\"end end return true end local function validateManifest(manifest)if type(manifest)~=\"table\"or manifest.channel~=\"release\"then return nil,\"only signed release packages are accepted\"end if manifest.profile==nil then manifest.profile,manifest._legacyProfile=\"desktop\",true end if type(manifest.profile)~=\"string\"or not profile.IDS[manifest.profile]then return nil,\"invalid release profile\"end if not semver(manifest.version)or type(manifest.size)~=\"number\"or manifest.size<1 or manifest.size>M.MAX_PACKAGE_BYTES then return nil,\"invalid release manifest size or version\"end if type(manifest.digest)~=\"string\"or#manifest.digest~=64 or manifest.digest:find(\"[^%x]\")then return nil,\"invalid release digest\"end if type(manifest.key_id)~=\"string\"or#manifest.key_id<1 or#manifest.key_id>64 then return nil,\"invalid release key id\"end if type(manifest.next_key_id)~=\"string\"or#manifest.next_key_id<1 or#manifest.next_key_id>64 then return nil,\"invalid next release key id\"end local nextKey=unpackKey(manifest.next_public)if not nextKey then return nil,\"invalid successor release key\"end return manifest end function M.parse(source)if type(source)~=\"string\"or#source>M.MAX_PACKAGE_BYTES then return nil,\"release package is too large\"end local encodedManifest,encodedSignature=source:match(\"^%-%- CEETOS_RELEASE_MANIFEST:([^\\r\\n]+)[\\r\\n]+%-%- CEETOS_RELEASE_SIGNATURE:([^\\r\\n]+)\")if not encodedManifest then encodedManifest,encodedSignature=source:match(\"^%-%- CeetOS signed release%. Generated; do not edit%.[\\r\\n]+%-%- CEETOS_RELEASE_MANIFEST:([^\\r\\n]+)[\\r\\n]+%-%- CEETOS_RELEASE_SIGNATURE:([^\\r\\n]+)\")end local first=source:find(\"%-%- CEETOS_RELEASE_PAYLOAD_BEGIN[\\r\\n]+\")if not encodedManifest or not encodedSignature or not first then return nil,\"not a signed CeetOS release package\"end local decoded,decodeErr=decode(encodedManifest)if not decoded then return nil,\"invalid release manifest encoding: \"..tostring(decodeErr)end local loader=load(\"return \"..decoded,\"=release-manifest\",\"t\",{})if not loader then return nil,\"invalid release manifest\"end local ok,manifest=pcall(loader)if not ok then return nil,\"invalid release manifest\"end local valid,manifestErr=validateManifest(manifest)if not valid then return nil,manifestErr end local start=source:find(\"\\n\",first)+1 local finish=start+valid.size-1 local payload=source:sub(start,finish)local suffix=source:sub(finish+1)if suffix~=\"\\n-- CEETOS_RELEASE_PAYLOAD_END\\n\"and suffix~=\"\\n-- CEETOS_RELEASE_PAYLOAD_END\"and suffix~=\"\\r\\n-- CEETOS_RELEASE_PAYLOAD_END\\r\\n\"and suffix~=\"\\r\\n-- CEETOS_RELEASE_PAYLOAD_END\"then return nil,\"release payload boundary mismatch\"end if#payload~=valid.size or not password.constantTimeEqual(password.sha256(payload)or\"\",valid.digest)then return nil,\"release payload digest mismatch\"end local signed,signatureErr=verifySignature(valid,encodedSignature)if not signed then return nil,signatureErr end return{manifest=valid,signature=encodedSignature,payload=payload,source=source}end function M.trustedKeys()local raw=read(M.CACHE_ROOT..\"/trusted-keys.lua\")if not raw then return{}end local loader=load(raw,\"=trusted-release-keys\",\"t\",{})if not loader then return{}end local ok,value=pcall(loader)return ok and type(value)==\"table\"and value or{}end local function saveKeys(value)local encoded=textutils.serialise(value,{compact=true})write(M.CACHE_ROOT..\"/trusted-keys.lua\",\"return \"..encoded)end function M.metadata()local raw=read(M.META_FILE)if not raw then return nil end local loader=load(raw,\"=release-cache\",\"t\",{})if not loader then return nil end local ok,value=pcall(loader)return ok and type(value)==\"table\"and value or nil end function M.cache(source,provider)local package,err=M.parse(source)if not package then return nil,err end if fs.exists(M.CACHE_ROOT)and fs.isDir(M.CACHE_ROOT)then if fs.exists(M.PART_FILE)then fs.delete(M.PART_FILE)end elseif not fs.exists(M.CACHE_ROOT)then fs.makeDir(M.CACHE_ROOT)end write(M.CACHE_FILE,package.source)local metadata={schema=2,channel=package.manifest.channel,profile=package.manifest.profile,version=package.manifest.version,size=package.manifest.size,digest=package.manifest.digest,keyId=package.manifest.key_id,nextKeyId=package.manifest.next_key_id,source=provider and tostring(provider)or\"local\",cachedAt=os.epoch(\"utc\"),}write(M.META_FILE,\"return \"..textutils.serialise(metadata,{compact=true}))local keys=M.trustedKeys();keys[package.manifest.next_key_id]=package.manifest.next_public;saveKeys(keys)return metadata end function M.promotePart(path,provider)if type(path)~=\"string\"or path~=M.PART_FILE then return nil,\"invalid release staging path\"end local source=read(path)local package,err=M.parse(source)if not package then return nil,err end if not fs.exists(M.CACHE_ROOT)then fs.makeDir(M.CACHE_ROOT)end if fs.exists(M.CACHE_FILE)then fs.delete(M.CACHE_FILE)end fs.move(M.PART_FILE,M.CACHE_FILE)local metadata={schema=2,channel=package.manifest.channel,profile=package.manifest.profile,version=package.manifest.version,size=package.manifest.size,digest=package.manifest.digest,keyId=package.manifest.key_id,nextKeyId=package.manifest.next_key_id,source=provider and tostring(provider)or\"local\",cachedAt=os.epoch(\"utc\"),}write(M.META_FILE,\"return \"..textutils.serialise(metadata,{compact=true}))M.adopt(package)return metadata end function M.adopt(package)if type(package)~=\"table\"or type(package.manifest)~=\"table\"then return false,\"invalid verified package\"end local keys=M.trustedKeys()keys[package.manifest.next_key_id]=package.manifest.next_public saveKeys(keys)return true end function M.cachedPackage()local source,metadata=read(M.CACHE_FILE),M.metadata()if not source then return nil end local package,err=M.parse(source)if not package then return nil,err end if not metadata then metadata={schema=2,channel=package.manifest.channel,profile=package.manifest.profile,version=package.manifest.version,size=package.manifest.size,digest=package.manifest.digest,keyId=package.manifest.key_id,nextKeyId=package.manifest.next_key_id,source=\"local installer\",cachedAt=os.epoch(\"utc\"),}write(M.META_FILE,\"return \"..textutils.serialise(metadata,{compact=true}))end M.adopt(package)return package,metadata end function M.clear()if fs.exists(M.PART_FILE)then fs.delete(M.PART_FILE)end if fs.exists(M.CACHE_FILE)then fs.delete(M.CACHE_FILE)end if fs.exists(M.META_FILE)then fs.delete(M.META_FILE)end return true end function M.encode(value)return encode(value)end function M.decode(value)return decode(value)end function M.canonical(manifest)return canonical(manifest)end return M",
  ["ceetos/lib/updater.lua"] = "local store=require(\"ceetos.lib.store\")local release=require(\"ceetos.lib.release_verify\")local version=require(\"ceetos.lib.version\")local net=require(\"ceetos.lib.net\")local profile=require(\"ceetos.lib.profile\")local M={}local STATE_PATH=\"/ceetos/data/update-status.lua\"local OFFER_LIMIT,HISTORY_LIMIT=20,16 local BEACON_INTERVAL,REQUEST_TIMEOUT,REQUEST_LIMIT=30000,3500,3 local MAX_OFFER_AGE=5*60*1000 local state=nil local lastBeacon,lastCacheRead=0,0 local cached=nil local function now()return os.epoch(\"utc\")end local function localId()return tostring(os.getComputerID())end local function localLabel()return os.getComputerLabel()or(\"Computer \"..localId())end local function defaults()return{schema=1,offers={},history={},revision=0,status=\"idle\",message=nil,transfer=nil,cache=nil}end local function loadState()if state then return state end state=store.read(STATE_PATH,defaults())for key,value in pairs(defaults())do if state[key]==nil then state[key]=value end end state.offers=type(state.offers)==\"table\"and state.offers or{}state.history=type(state.history)==\"table\"and state.history or{}return state end local function save()local value=loadState()value.revision=(tonumber(value.revision)or 0)+1 store.write(STATE_PATH,value)end local function record(kind,fields)local value=loadState()local row={at=now(),kind=tostring(kind):sub(1,48)}for key,item in pairs(fields or{})do if key~=\"data\"and key~=\"source\"and key~=\"signature\"then row[key]=item end end value.history[#value.history+1]=row while#value.history>HISTORY_LIMIT do table.remove(value.history,1)end end local function setStatus(status,message)local value=loadState()value.status,value.message=status,message and tostring(message):sub(1,180)or nil end local function validId(value)return type(value)==\"string\"and value:match(\"^[%w_%-%.]+$\")and#value<=96 end local function validOffer(body)if type(body)~=\"table\"or type(body.version)~=\"string\"or type(body.size)~=\"number\"or type(body.digest)~=\"string\"or type(body.keyId)~=\"string\"or type(body.profile)~=\"string\"then return nil,\"malformed release offer\"end if body.profile~=profile.id()then return nil,\"release profile does not match this installation\"end local compare=release.compareVersions(body.version,version.string)if compare==nil then return nil,\"invalid release version\"end if body.size<1 or body.size>release.MAX_PACKAGE_BYTES then return nil,\"invalid release size\"end if#body.digest~=64 or body.digest:find(\"[^%x]\")then return nil,\"invalid release digest\"end if#body.keyId<1 or#body.keyId>64 then return nil,\"invalid release key ID\"end return{profile=body.profile,version=body.version,size=math.floor(body.size),digest=body.digest:lower(),keyId=body.keyId,fingerprint=body.digest:sub(1,16),newer=compare>0}end local function refreshCached()local timestamp=now()if cached and timestamp-lastCacheRead<5000 then return cached end lastCacheRead=timestamp local value=loadState()local previous=value.cache and(tostring(value.cache.version)..\":\"..tostring(value.cache.digest))or nil local package,metadata=release.cachedPackage()if package and package.manifest.profile==profile.id()then cached={package=package,metadata=metadata,offer={version=package.manifest.version,size=#package.source,digest=package.manifest.digest,profile=package.manifest.profile,keyId=package.manifest.key_id,fingerprint=package.manifest.digest:sub(1,16),}}value.cache={profile=package.manifest.profile,version=package.manifest.version,size=#package.source,digest=package.manifest.digest,keyId=package.manifest.key_id,fingerprint=package.manifest.digest:sub(1,16),source=metadata and metadata.source or\"local\",verifiedAt=timestamp}else cached=nil value.cache=nil end local current=value.cache and(tostring(value.cache.version)..\":\"..tostring(value.cache.digest))or nil if current~=previous then save()end return cached end local function providerOffer()local available=refreshCached()if not available then return nil end return{version=available.offer.version,size=available.offer.size,digest=available.offer.digest,profile=available.offer.profile,keyId=available.offer.keyId,label=localLabel(),id=localId(),}end local function upsertOffer(source,body,transport,distance)source=tostring(source)if source==localId()then return false,\"ignored own release offer\"end local offer,err=validOffer(body)if not offer then return false,err end if not offer.newer then return false,\"offered release is not newer\"end local value=loadState()local key=source..\":\"..offer.version..\":\"..offer.digest:sub(1,16)value.offers[key]={id=source,label=tostring(body.label or(\"Computer \"..source)):sub(1,96),version=offer.version,profile=offer.profile,size=offer.size,digest=offer.digest,fingerprint=offer.fingerprint,keyId=offer.keyId,transport=transport,distance=tonumber(distance),seen=now(),key=key,}local rows={}for entryKey,item in pairs(value.offers)do rows[#rows+1]={key=entryKey,seen=tonumber(item.seen)or 0}end table.sort(rows,function(a,b)return a.seen>b.seen end)while#rows>OFFER_LIMIT do value.offers[table.remove(rows).key]=nil end setStatus(\"offers\",\"Signed release \"..offer.version..\" available from \"..tostring(body.label or source))record(\"offer\",{id=source,version=offer.version,transport=transport,distance=distance})save()return true end local function offers()local value,timestamp,rows=loadState(),now(),{}for key,item in pairs(value.offers)do if type(item)==\"table\"and timestamp-(tonumber(item.seen)or 0)<=MAX_OFFER_AGE then rows[#rows+1]=item else value.offers[key]=nil end end table.sort(rows,function(left,right)local compare=release.compareVersions(left.version,right.version)or 0 if compare~=0 then return compare>0 end return tostring(left.id)<tostring(right.id)end)return rows end local function findOffer(source)source=tostring(source)for _,item in ipairs(offers())do if item.key==source or tostring(item.id)==source then return item end end return nil,\"release source is unavailable; run update check first\"end local function removePart()if fs.exists(release.PART_FILE)then fs.delete(release.PART_FILE)end end local function appendPart(data)local handle,err=fs.open(release.PART_FILE,\"a\")if not handle then return false,err or\"could not open update staging file\"end handle.write(data);handle.close()return true end local function cachedSource()local available=refreshCached()return available and available.package and available.package.source end local function transferRequest(transfer)local length=math.min(release.CHUNK_BYTES,transfer.size-transfer.offset+1)if length<1 then return false,\"transfer is already complete\"end transfer.awaiting,transfer.requestedAt=true,now()local body={transfer=transfer.id,offset=transfer.offset,length=length}local sent,err if transfer.transport==\"routed\"then sent,err=net.request(transfer.source,\"update_chunk_request\",body,{safe=true})else sent,err=net.publicSend(transfer.source,\"update_chunk_request\",body)end if not sent then transfer.awaiting=false;return false,err end return true end local function beginDownload(source)local offer,err=findOffer(source)if not offer then return false,err end local compare=release.compareVersions(offer.version,version.string)if not compare or compare<=0 then return false,\"refusing a downgrade or current release\"end local free=fs.getFreeSpace and fs.getFreeSpace(\"/\")or nil if type(free)==\"number\"and free<offer.size+4096 then return false,\"not enough free space for one verified release cache\"end removePart()release.clear();cached=nil local value=loadState()value.transfer={id=\"update-\"..localId()..\"-\"..tostring(now())..\"-\"..tostring(math.random(1000,9999)),source=tostring(offer.id),label=offer.label,transport=offer.transport==\"routed\"and\"routed\"or\"direct\",profile=offer.profile,version=offer.version,size=offer.size,digest=offer.digest,keyId=offer.keyId,offset=1,received=0,retries=0,awaiting=false,started=now(),}setStatus(\"downloading\",\"Downloading signed release \"..offer.version..\" from \"..offer.label)record(\"download_started\",{id=offer.id,version=offer.version,transport=value.transfer.transport})local sent,sendErr=transferRequest(value.transfer)if not sent then value.transfer=nil;setStatus(\"error\",sendErr);record(\"download_failed\",{id=offer.id,error=sendErr})end save()return sent,sendErr end local function finishTransfer(transfer)local handle=fs.open(release.PART_FILE,\"r\")local source=handle and handle.readAll()or nil if handle then handle.close()end if not source or#source~=transfer.size then return false,\"download size did not match offer\"end local parsed,parseErr=release.parse(source)if not parsed then return false,parseErr end if parsed.manifest.profile~=profile.id()or parsed.manifest.profile~=transfer.profile or parsed.manifest.version~=transfer.version or parsed.manifest.digest:lower()~=transfer.digest:lower()or parsed.manifest.key_id~=transfer.keyId then return false,\"verified package did not match selected release offer\"end local metadata,promoteErr=release.promotePart(release.PART_FILE,transfer.label)if not metadata then return false,promoteErr end cached=nil;refreshCached()local value=loadState();value.transfer=nil setStatus(\"downloaded\",\"Verified release \"..metadata.version..\" is ready for local confirmation\")record(\"download_verified\",{id=transfer.source,version=metadata.version,digest=metadata.digest:sub(1,16)})save()return true,metadata end local function acceptChunk(source,body,transport)local value,transfer=loadState(),loadState().transfer if not transfer or transfer.transport~=transport or tostring(source)~=tostring(transfer.source)then return false,\"unexpected update chunk\"end if type(body)~=\"table\"or body.transfer~=transfer.id or math.floor(tonumber(body.offset)or 0)~=transfer.offset or type(body.data)~=\"string\"then return false,\"malformed update chunk\"end local remaining=transfer.size-transfer.offset+1 if#body.data<1 or#body.data>math.min(release.CHUNK_BYTES,remaining)then return false,\"invalid update chunk length\"end local ok,err=appendPart(body.data)if not ok then transfer.awaiting=false;setStatus(\"error\",err);record(\"download_failed\",{error=err});save();return false,err end transfer.offset,transfer.received,transfer.awaiting,transfer.retries=transfer.offset+#body.data,(transfer.received or 0)+#body.data,false,0 if transfer.offset>transfer.size then local complete,result=finishTransfer(transfer)if not complete then removePart();value.transfer=nil;setStatus(\"error\",result);record(\"download_failed\",{id=source,error=result});save()end return complete,result end local sent,sendErr=transferRequest(transfer)if not sent then setStatus(\"error\",sendErr);record(\"download_failed\",{id=source,error=sendErr});value.transfer=nil;removePart()end save()return sent,sendErr end local function serveChunk(target,body,routed,request)if type(body)~=\"table\"or not validId(body.transfer)or math.floor(tonumber(body.offset)or 0)<1 or math.floor(tonumber(body.length)or 0)<1 or tonumber(body.length)>release.CHUNK_BYTES then return false,\"invalid update chunk request\"end local source=cachedSource()if not source then return false,\"no verified newer signed release is cached\"end local offset,length=math.floor(body.offset),math.floor(body.length)if offset>#source then return false,\"requested update offset is beyond package\"end local data=source:sub(offset,math.min(#source,offset+length-1))local response={transfer=body.transfer,offset=offset,data=data}if routed then return net.reply(request,\"update_chunk\",response,{safe=true})end return net.publicSend(target,\"update_chunk\",response)end function M.publicPacket(packet,distance)local source,body=tostring(packet.from),packet.body or{}if packet.type==\"update_query\"then if body.profile~=profile.id()then return false,\"release profile does not match this installation\"end local offer=providerOffer()local compare=offer and release.compareVersions(offer.version,body.version or\"\")if offer and compare and compare>0 then net.publicSend(source,\"update_offer\",offer)end return elseif packet.type==\"update_offer\"then return upsertOffer(source,body,\"direct\",distance)elseif packet.type==\"update_chunk_request\"then return serveChunk(source,body,false)elseif packet.type==\"update_chunk\"then return acceptChunk(source,body,\"direct\")end end function M.authenticatedPacket(from,peer,packet)local body=packet.body or{}if packet.type==\"update_query\"then if body.profile~=profile.id()then return false,\"release profile does not match this installation\"end local offer=providerOffer()local compare=offer and release.compareVersions(offer.version,body.version or\"\")if offer and compare and compare>0 then return net.reply(packet,\"update_offer\",offer,{safe=true})end elseif packet.type==\"update_offer\"then return upsertOffer(from,body,\"routed\")elseif packet.type==\"update_chunk_request\"then return serveChunk(from,body,true,packet)elseif packet.type==\"update_chunk\"then return acceptChunk(from,body,\"routed\")end end function M.check()local value=loadState()for key in pairs(value.offers)do value.offers[key]=nil end setStatus(\"checking\",\"Looking for newer signed releases\")local sent,err=net.publicBroadcast(\"update_query\",{version=version.string,profile=profile.id()})local routed=0 for _,peer in ipairs(net.peers())do if not peer.rekeyRequired then local ok=net.request(peer.id,\"update_query\",{version=version.string,profile=profile.id()},{safe=true})if ok then routed=routed+1 end end end record(\"check\",{direct=sent==true,routed=routed,error=sent and nil or err})save()return sent or routed>0,sent and nil or err end function M.download(source)return beginDownload(source)end function M.cancel()local value=loadState()if not value.transfer then return false,\"no update transfer is active\"end record(\"download_cancelled\",{id=value.transfer.source,version=value.transfer.version})value.transfer=nil;removePart();setStatus(\"cancelled\",\"Update download cancelled\");save()return true end function M.clearCache()local value=loadState()if value.transfer then return false,\"cancel the active download first\"end release.clear();cached=nil;value.cache=nil;setStatus(\"idle\",\"Verified release cache cleared\");record(\"cache_cleared\");save()return true end function M.prepareApply()local package,metadata=release.cachedPackage()if not package then return false,metadata or\"no verified signed release is cached\"end local compare=release.compareVersions(package.manifest.version,version.string)if not compare or compare<=0 then return false,\"cached release is not newer than this CeetOS installation\"end if package.manifest.profile~=profile.id()then return false,\"cached release profile does not match this installation\"end local marker={schema=2,state=\"apply\",profile=package.manifest.profile,version=package.manifest.version,digest=package.manifest.digest,keyId=package.manifest.key_id,approvedAt=now()}store.write(release.PENDING_FILE,marker)local value=loadState();setStatus(\"applying\",\"Applying verified release \"..package.manifest.version..\" after reboot\");record(\"apply_approved\",{version=package.manifest.version,digest=package.manifest.digest:sub(1,16),keyId=package.manifest.key_id});save()return true,{version=package.manifest.version,fingerprint=package.manifest.digest:sub(1,16),keyId=package.manifest.key_id}end function M.recover()local marker=store.read(release.PENDING_FILE,nil)if type(marker)~=\"table\"or marker.state~=\"verify\"then return end local value=loadState()if marker.version==version.string and(marker.profile==nil or marker.profile==profile.id())then if fs.exists(release.PENDING_FILE)then fs.delete(release.PENDING_FILE)end setStatus(\"applied\",\"Verified release \"..version.string..\" is now active\")record(\"apply_verified\",{version=version.string})else setStatus(\"error\",\"Update installed but running version did not match \"..tostring(marker.version))record(\"apply_version_mismatch\",{expected=marker.version,actual=version.string})end save()end function M.tick()local value,timestamp=loadState(),now()local offer=providerOffer()if offer and timestamp-lastBeacon>=BEACON_INTERVAL then net.publicBroadcast(\"update_offer\",offer)lastBeacon=timestamp end local transfer=value.transfer if transfer and transfer.awaiting and timestamp-(transfer.requestedAt or timestamp)>=REQUEST_TIMEOUT then transfer.awaiting,transfer.retries=false,(transfer.retries or 0)+1 if transfer.retries>REQUEST_LIMIT then record(\"download_timeout\",{id=transfer.source,version=transfer.version})value.transfer=nil;removePart();setStatus(\"error\",\"Update source timed out\");save()else local sent,err=transferRequest(transfer)if not sent then value.transfer=nil;removePart();setStatus(\"error\",err);record(\"download_failed\",{id=transfer.source,error=err});save()end end end end function M.status()local value=loadState()return{profile=profile.id(),version=version.string,status=value.status,message=value.message,revision=value.revision,offers=offers(),transfer=value.transfer,cache=value.cache,history=value.history,cacheRoot=release.CACHE_ROOT,maxPackageBytes=release.MAX_PACKAGE_BYTES,}end return M",
  ["ceetos/lib/mesh_crypto.lua"] = "local password=require(\"ceetos.lib.password\")local M={}local band,bor,bxor=bit32.band,bit32.bor,bit32.bxor local lshift,rshift=bit32.lshift,bit32.rshift local MOD32,LIMB=4294967296,67108864 local function add32(...)local n=0 for i=1,select(\"#\",...)do n=(n+(select(i,...)or 0))%MOD32 end return n end local function rotl(v,bits)return bor(lshift(v,bits),rshift(v,32-bits))end local function le32(data,index)local a,b,c,d=data:byte(index,index+3)return(a or 0)+(b or 0)*256+(c or 0)*65536+(d or 0)*16777216 end local function put32(value)value=value%MOD32 return string.char(value%256,math.floor(value/256)%256,math.floor(value/65536)%256,math.floor(value/16777216)%256)end local function le64(value)value=math.max(0,math.floor(tonumber(value)or 0))local low,high=value%MOD32,math.floor(value/MOD32)%MOD32 return put32(low)..put32(high)end local function hexToRaw(value)if type(value)~=\"string\"or#value%2~=0 or value:find(\"[^%x]\")then return nil end return(value:gsub(\"..\",function(pair)return string.char(tonumber(pair,16))end))end local function rawToHex(value)return(value:gsub(\".\",function(byte)return string.format(\"%02x\",byte:byte())end))end local function xorBytes(left,right)local out={}for i=1,#left do out[i]=string.char(bxor(left:byte(i),right:byte(i)))end return table.concat(out)end local function quarter(x,a,b,c,d)x[a]=add32(x[a],x[b]);x[d]=rotl(bxor(x[d],x[a]),16)x[c]=add32(x[c],x[d]);x[b]=rotl(bxor(x[b],x[c]),12)x[a]=add32(x[a],x[b]);x[d]=rotl(bxor(x[d],x[a]),8)x[c]=add32(x[c],x[d]);x[b]=rotl(bxor(x[b],x[c]),7)end local function chachaBlock(key,counter,nonce)local state={0x61707865,0x3320646e,0x79622d32,0x6b206574}for i=1,8 do state[4+i]=le32(key,(i-1)*4+1)end state[13],state[14],state[15],state[16]=counter%MOD32,le32(nonce,1),le32(nonce,5),le32(nonce,9)local x={}for i=1,16 do x[i]=state[i]end for _=1,10 do quarter(x,1,5,9,13);quarter(x,2,6,10,14);quarter(x,3,7,11,15);quarter(x,4,8,12,16)quarter(x,1,6,11,16);quarter(x,2,7,12,13);quarter(x,3,8,9,14);quarter(x,4,5,10,15)end local out={}for i=1,16 do out[i]=put32(add32(x[i],state[i]))end return table.concat(out)end local function chachaXor(key,nonce,counter,plaintext)local out,position={},1 while position<=#plaintext do local block=chachaBlock(key,counter,nonce)local part=plaintext:sub(position,position+63)out[#out+1]=xorBytes(part,block:sub(1,#part))position,counter=position+#part,(counter+1)%MOD32 end return table.concat(out)end local function poly1305(message,key)local function zero(length)local out={};for i=1,length do out[i]=0 end;return out end local function normalise(value)local carry=0 for i=1,#value do local n=(value[i]or 0)+carry value[i],carry=n%256,math.floor(n/256)end while carry>0 do value[#value+1],carry=carry%256,math.floor(carry/256)end return value end local function add(left,right)local out=zero(math.max(#left,#right)+1)for i=1,#left do out[i]=out[i]+left[i]end for i=1,#right do out[i]=out[i]+right[i]end return normalise(out)end local function multiply(left,right)local out=zero(#left+#right+1)for i=1,#left do for j=1,#right do out[i+j-1]=out[i+j-1]+left[i]*right[j]end end return normalise(out)end local function high130(value)local out={}for i=1,#value-16 do local low=value[i+16]or 0 local high=value[i+17]or 0 out[i]=math.floor(low/4)+(high%4)*64 end return normalise(out)end local function hasHigh(value)if#value>17 then for i=18,#value do if value[i]~=0 then return true end end end return(value[17]or 0)>=4 end local function reduce(value)while hasHigh(value)do local low,high=zero(17),high130(value)for i=1,17 do low[i]=value[i]or 0 end low[17]=low[17]%4 for i=1,#high do high[i]=high[i]*5 end value=add(low,high)end local prime={251}for i=2,16 do prime[i]=255 end prime[17]=3 local greater=false for i=17,1,-1 do if(value[i]or 0)~=prime[i]then greater=(value[i]or 0)>prime[i];break end end if greater then local borrow=0 for i=1,17 do local n=(value[i]or 0)-prime[i]-borrow if n<0 then n,borrow=n+256,1 else borrow=0 end value[i]=n end end return value end local r,h=zero(17),zero(17)for i=1,16 do r[i]=key:byte(i)end r[4],r[8],r[12],r[16]=band(r[4],15),band(r[8],15),band(r[12],15),band(r[16],15)r[5],r[9],r[13]=band(r[5],252),band(r[9],252),band(r[13],252)for at=1,#message,16 do local part,n=message:sub(at,at+15),zero(17)for i=1,#part do n[i]=part:byte(i)end n[#part+1]=1 h=reduce(multiply(add(h,n),r))end local pad,out,carry={},{},0 for i=1,16 do pad[i]=key:byte(i+16)end for i=1,16 do local n=(h[i]or 0)+pad[i]+carry out[i],carry=n%256,math.floor(n/256)end return string.char(table.unpack(out))end local function padded(value)return value..string.rep(\"\\0\",(16-(#value%16))%16)end local function derive(linkKey)local raw=hexToRaw(password.hmacSha256(linkKey,\"ceetos/mesh/aead-key/v1\")or\"\")return raw end function M.nonce(linkKey,counter,context)local raw=hexToRaw(password.hmacSha256(linkKey,\"ceetos/mesh/aead-nonce/v1|\"..tostring(counter)..\"|\"..tostring(context or\"\"))or\"\")return raw and raw:sub(1,12)or nil end function M.seal(linkKey,nonce,aad,plaintext)if type(linkKey)~=\"string\"or type(nonce)~=\"string\"or#nonce~=12 or type(aad)~=\"string\"or type(plaintext)~=\"string\"then return nil,\"invalid mesh envelope input\"end local key=derive(linkKey);if not key or#key~=32 then return nil,\"could not derive mesh envelope key\"end local polyKey=chachaBlock(key,0,nonce):sub(1,32)local ciphertext=chachaXor(key,nonce,1,plaintext)local tag=poly1305(padded(aad)..padded(ciphertext)..le64(#aad)..le64(#ciphertext),polyKey)return{nonce=rawToHex(nonce),ciphertext=rawToHex(ciphertext),tag=rawToHex(tag)}end function M.open(linkKey,envelope,aad)if type(linkKey)~=\"string\"or type(envelope)~=\"table\"or type(aad)~=\"string\"then return nil,\"invalid mesh envelope\"end local nonce,ciphertext,tag=hexToRaw(envelope.nonce or\"\"),hexToRaw(envelope.ciphertext or\"\"),hexToRaw(envelope.tag or\"\")if not nonce or#nonce~=12 or not ciphertext or not tag or#tag~=16 then return nil,\"invalid mesh envelope encoding\"end local key=derive(linkKey);if not key or#key~=32 then return nil,\"could not derive mesh envelope key\"end local polyKey=chachaBlock(key,0,nonce):sub(1,32)local expected=rawToHex(poly1305(padded(aad)..padded(ciphertext)..le64(#aad)..le64(#ciphertext),polyKey))if not password.constantTimeEqual(expected,envelope.tag)then return nil,\"mesh envelope authentication failed\"end return chachaXor(key,nonce,1,ciphertext)end function M.selfTest()local key=hexToRaw(\"85d6be7857556d337f4452fe42d506a80103808afb0db2fd4abff6af4149f51b\")local tag=poly1305(\"Cryptographic Forum Research Group\",key)return rawToHex(tag)==\"a8061dc1305136c6c22b8baf0c0127a9\"end return M",
  ["ceetos/lib/audit.lua"] = "local store=require(\"ceetos.lib.store\")local M={}local PATH=\"/ceetos/data/audit.log\"M.LIMITS={maxEntries=250,maxBytes=64*1024}function M.log(actor,action,detail)return store.append(PATH,{ts=os.epoch(\"utc\"),actor=actor or\"system\",action=action,detail=detail,},M.LIMITS)end function M.recent(limit)limit=math.max(1,math.min(50,tonumber(limit)or 10))local raw=store.readAppend(PATH)local result={}for line in(raw..\"\\n\"):gmatch(\"(.-)\\n\")do if line~=\"\"then local entry=textutils.unserialise(line)if entry then result[#result+1]=entry if#result>limit then table.remove(result,1)end end end end return result end return M",
  ["ceetos/lib/net.lua"] = "local store=require(\"ceetos.lib.store\")local audit=require(\"ceetos.lib.audit\")local password=require(\"ceetos.lib.password\")local meshCrypto=require(\"ceetos.lib.mesh_crypto\")local M={handler=nil,publicHandler=nil}local PATH=\"/ceetos/data/network.lua\"local SECURITY_PATH=\"/ceetos/data/network-security.lua\"local SEEN_PATH=\"/ceetos/data/seen-peers.lua\"local CHANNEL,PROTOCOL=45731,\"ceetos/2\"local PUBLIC_UPDATE_PROTOCOL=\"ceetos/update/1\"local PUBLIC_UPDATE_TYPES={update_query=true,update_offer=true,update_chunk_request=true,update_chunk=true,}local DISCOVERY_CHANNEL=CHANNEL local DISCOVERY_TTL,ROUTE_TTL,PACKET_TTL=120000,120000,8 local DISCOVERY_INTERVAL,PAIR_RETRY,ROUTE_INTERVAL=2000,2000,15000 local MESH_BEACON_INTERVAL,MESH_FULL_INTERVAL=15000,30000 local PROBE_INTERVAL,PROBE_DEGRADED,PROBE_OFFLINE,PROBE_RECOVERY=5000,3,6,10000 local ROUTE_CANDIDATE_LIMIT,ROUTE_BUCKET_LIMIT=4,96 local SAFE_READ_WINDOW,SAFE_READ_LIMIT=1000,16 local MAX_PACKET_STRING,MAX_PACKET_TABLE,MAX_PACKET_DEPTH=8192,128,6 local COUNTER_RESERVATION,MAX_RX_EPOCHS,MAX_REVERSE_ROUTES=64,3,128 local routes,discovered,confirmations,seenPackets,reverseRoutes={},{},{},{},{}local routeSequence,lastRouteAdvertisement,routesDirty=0,0,false local discovery,lastDiscovery=nil,{state=\"inactive\"}local security={tx={},rx={}}local autoEdges,linkHealth,meshOffers,meshSeen,advertisedRoutes,meshEnrollmentSends={},{},{},{},{},{}local lastMeshBeacon,lastMeshFull,meshDirty=0,0,false local transport={modem=false,wireless=false,name=nil,channels={},lastTransmit=nil,lastReceive=nil,lastDistance=nil,lastError=nil,rejected=0,}local traces={discovery={},routing={},transport={}}local TRACE_LIMIT=48 local MESH_STATE_LIMIT=128 local rejectPacket local function now()return os.epoch(\"utc\")end local function id()return tostring(os.getComputerID())end local function label()return os.getComputerLabel()or(\"Computer \"..id())end local function isBroadcast(value)return tostring(value)==\"0\"end local function isForUs(value)return tostring(value)==id()end local function copy(value,depth)if type(value)~=\"table\"then return value end if(depth or 0)>MAX_PACKET_DEPTH then return nil end local out={}for k,v in pairs(value)do out[k]=copy(v,(depth or 0)+1)end return out end local function trace(kind,phase,fields)local bucket=traces[kind]or traces.transport local row={time=now(),phase=phase}for key,value in pairs(fields or{})do if key~=\"phrase\"and key~=\"proof\"and key~=\"key\"and key~=\"secret\"and key~=\"mac\"and key~=\"packet\"and key~=\"tag\"then row[key]=value end end bucket[#bucket+1]=row while#bucket>TRACE_LIMIT do table.remove(bucket,1)end end local function read(path,fallback)if store.invalidate then store.invalidate(path)end return store.read(path,fallback)end local function config()local value=read(PATH,{peers={},channel=CHANNEL})value.peers=type(value.peers)==\"table\"and value.peers or{}value.channel=tonumber(value.channel)or CHANNEL return value end local function save(value)local ok,err=store.write(PATH,value)if ok==false then error(err or\"could not save network configuration\",0)end end local function migrateV1Links()local value,changed=config(),false for _,peer in pairs(value.peers)do if peer.protocol~=2 or peer.rekeyRequired or type(peer.key)~=\"string\"or#peer.key<32 then peer.protocol,peer.rekeyRequired,peer.key=1,true,nil peer.secret=nil changed=true end end if changed then save(value)end return value end local function activePeer(value,peerId)local peer=value.peers[tostring(peerId)]if peer and peer.protocol==2 and peer.rekeyRequired~=true and type(peer.key)==\"string\"and#peer.key>=32 then return peer end return nil end local function activeLink(value,peerId)local manual=activePeer(value,peerId)if manual then return manual,\"direct\"end local edge=autoEdges[tostring(peerId)]if edge and type(edge.key)==\"string\"and#edge.key>=32 and(edge.expires or 0)>now()then return edge,\"mesh\"end return nil end local function healthFor(peerId)peerId=tostring(peerId)local state=linkHealth[peerId]if not state then state={state=\"healthy\",successes=0,misses=0,lastAuthenticated=now(),stableSince=now(),inFlight=0}linkHealth[peerId]=state end return state end local function linkState(peerId)return healthFor(peerId).state or\"healthy\"end local function currentInFlight(state,timestamp)state.inFlightUntil=type(state.inFlightUntil)==\"table\"and state.inFlightUntil or{}local kept={}for _,expires in ipairs(state.inFlightUntil)do if expires>timestamp then kept[#kept+1]=expires end end state.inFlightUntil,state.inFlight=kept,#kept return state.inFlight end local function markInFlight(state)local timestamp=now()currentInFlight(state,timestamp)state.inFlightUntil[#state.inFlightUntil+1]=timestamp+SAFE_READ_WINDOW table.sort(state.inFlightUntil)while#state.inFlightUntil>SAFE_READ_LIMIT do table.remove(state.inFlightUntil,1)end state.inFlight=#state.inFlightUntil end local function linkUsable(value,peerId,allowDegraded)if not activeLink(value,peerId)then return false end local state=linkState(peerId)return state==\"healthy\"or(allowDegraded and state==\"degraded\")end local function touchLink(peerId,distance,source)local state,timestamp=healthFor(peerId),now()state.lastAuthenticated,state.lastDistance,state.lastSource=timestamp,distance,source or\"traffic\"state.misses,state.awaiting,state.probeToken=0,false,nil state.loss=math.max(0,(state.loss or 0)*0.5)if state.state~=\"healthy\"then state.successes=(state.successes or 0)+1 if state.successes>=2 then state.state,state.stableSince,state.recoveredAt=\"healthy\",timestamp,timestamp routesDirty=true trace(\"routing\",\"link_recovered\",{peer=peerId,source=source})end else state.successes=math.min(2,(state.successes or 0)+1)end end local function allDirectLinks(value)local out,seen={},{}for peerId in pairs(value.peers)do if activePeer(value,peerId)then out[#out+1],seen[peerId]=tostring(peerId),true end end for peerId,edge in pairs(autoEdges)do if not seen[peerId]and edge.expires>now()then out[#out+1]=tostring(peerId)end end table.sort(out,function(a,b)return tonumber(a)<tonumber(b)end)return out end local function remember(peer,peerLabel,extra)local value=read(SEEN_PATH,{})local old=value[tostring(peer)]or{}old.label,old.seen=peerLabel or old.label or(\"Computer \"..tostring(peer)),now()if extra then for key,item in pairs(extra)do if key~=\"tag\"and key~=\"proof\"then old[key]=item end end end value[tostring(peer)]=old store.write(SEEN_PATH,value)end local function modem(requireWireless)local candidates,used={},{}local sides=rs and rs.getSides and rs.getSides()or{}for _,name in ipairs(sides)do if peripheral.getType(name)==\"modem\"and not used[name]then candidates[#candidates+1],used[name]=name,true end end if peripheral.getNames then for _,name in ipairs(peripheral.getNames())do if peripheral.getType(name)==\"modem\"and not used[name]then candidates[#candidates+1],used[name]=name,true end end end local fallback for _,name in ipairs(candidates)do local wrapped=peripheral.wrap(name)if wrapped then fallback=fallback or wrapped local ok,wireless=pcall(function()return not wrapped.isWireless or wrapped.isWireless()end)if ok and wireless then return wrapped end end end return requireWireless and nil or fallback end local function modems()local out,seen={},{}local function add(name)if not seen[name]and peripheral.getType(name)==\"modem\"then local wrapped=peripheral.wrap(name)if wrapped then out[#out+1],seen[name]={name=name,modem=wrapped},true end end end for _,name in ipairs(rs and rs.getSides and rs.getSides()or{})do add(name)end for _,name in ipairs(peripheral.getNames and peripheral.getNames()or{})do add(name)end return out end local function wirelessModems()local out={}for _,item in ipairs(modems())do local ok,wireless=pcall(function()return not item.modem.isWireless or item.modem.isWireless()end)if ok and wireless then out[#out+1]=item end end return out end local function openChannels(value)local channels={value.channel or CHANNEL}if channels[1]~=DISCOVERY_CHANNEL then channels[#channels+1]=DISCOVERY_CHANNEL end transport.channels=channels local all=modems()if#all==0 then transport.lastError=\"no modem attached\";trace(\"transport\",\"modem_missing\");return channels end for _,item in ipairs(all)do for _,channel in ipairs(channels)do local ok,err=pcall(item.modem.open,channel)if not ok then transport.lastError=tostring(err)trace(\"transport\",\"channel_open_failed\",{channel=channel,error=transport.lastError,modem=item.name})end end end return channels end local function canonical(value,depth)depth=depth or 0 local kind=type(value)if kind==\"nil\"then return\"n\"end if kind==\"boolean\"then return value and\"b1\"or\"b0\"end if kind==\"number\"then if value~=value or value==math.huge or value==-math.huge then return nil,\"invalid numeric packet value\"end return\"d\"..string.format(\"%.17g\",value)..\";\"end if kind==\"string\"then if#value>MAX_PACKET_STRING then return nil,\"packet string exceeds limit\"end return\"s\"..tostring(#value)..\":\"..value end if kind~=\"table\"then return nil,\"unsupported packet value\"end if depth>=MAX_PACKET_DEPTH then return nil,\"packet nesting exceeds limit\"end local entries={}for key,item in pairs(value)do if#entries>=MAX_PACKET_TABLE then return nil,\"packet table exceeds limit\"end local encodedKey,keyErr=canonical(key,depth+1);if not encodedKey then return nil,keyErr end local encodedValue,valueErr=canonical(item,depth+1);if not encodedValue then return nil,valueErr end entries[#entries+1]=encodedKey..\"=\"..encodedValue end table.sort(entries)return\"t\"..tostring(#entries)..\"{\"..table.concat(entries,\",\")..\"}\"end local function packetMaterial(packet)return canonical({protocol=packet.protocol,type=packet.type,from=packet.from,to=packet.to,origin=packet.origin,destination=packet.destination,ttl=packet.ttl,request_id=packet.request_id,timestamp=packet.timestamp,reply_to=packet.reply_to,auth=packet.auth and{epoch=packet.auth.epoch,counter=packet.auth.counter}or nil,confidential=packet.confidential==true,body=packet.body,})end local function confidentialAad(packet)return table.concat({\"ceetos/confidential/v1\",tostring(packet.type),tostring(packet.origin),tostring(packet.destination),tostring(packet.request_id)},\"|\")end local function sealBody(peer,packet)local encoded=textutils.serialise(packet.body or{},{compact=true})if#encoded>6144 then return nil,\"confidential payload exceeds limit\"end local nonce=meshCrypto.nonce(peer.key,password.newSalt(\"confidential:\"..tostring(packet.request_id)),confidentialAad(packet))if not nonce then return nil,\"could not create confidential nonce\"end local envelope,err=meshCrypto.seal(peer.key,nonce,confidentialAad(packet),encoded)if not envelope then return nil,err end return{envelope=envelope}end local function openBody(peer,packet)if type(packet.body)~=\"table\"or type(packet.body.envelope)~=\"table\"then return nil,\"malformed confidential envelope\"end local decoded,err=meshCrypto.open(peer.key,packet.body.envelope,confidentialAad(packet))if not decoded or#decoded>6144 then return nil,err or\"invalid confidential payload\"end local ok,value=pcall(textutils.unserialise,decoded)if not ok or type(value)~=\"table\"then return nil,\"invalid confidential payload\"end return value end local function loadSecurity()security=read(SECURITY_PATH,{tx={},rx={}})security.tx=type(security.tx)==\"table\"and security.tx or{}security.rx=type(security.rx)==\"table\"and security.rx or{}end local function saveSecurity()local ok,err=store.write(SECURITY_PATH,security)if ok==false then error(err or\"could not persist peer replay state\",0)end end local function counter(peerId)local key=tostring(peerId)local tx=security.tx[key]if not tx then tx={epoch=password.newSalt(\"peer-tx:\"..key),reserved=0};security.tx[key]=tx end tx.next=tonumber(tx.next)or((tonumber(tx.reserved)or 0)+1)if tx.next>(tonumber(tx.reserved)or 0)then tx.reserved=tx.next+COUNTER_RESERVATION-1 saveSecurity()end local value=tx.next;tx.next=value+1 return tx.epoch,value end local function verifyReplay(from,auth)if type(auth)~=\"table\"or type(auth.epoch)~=\"string\"or#auth.epoch<16 or#auth.epoch>128 then return false,\"invalid packet epoch\"end local sequence=tonumber(auth.counter)if not sequence or sequence<1 or sequence%1~=0 then return false,\"invalid packet counter\"end local key=tostring(from)local row=security.rx[key]or{epochs={}}row.epochs=type(row.epochs)==\"table\"and row.epochs or{}local old=tonumber(row.epochs[auth.epoch])if old and sequence<=old then return false,\"replayed packet counter\"end row.epochs[auth.epoch]=sequence local order={}for epoch,max in pairs(row.epochs)do order[#order+1]={epoch=epoch,max=tonumber(max)or 0}end table.sort(order,function(a,b)return a.max>b.max end)while#order>MAX_RX_EPOCHS do row.epochs[table.remove(order).epoch]=nil end security.rx[key]=row saveSecurity()return true end local function newRequestId()return id()..\":\"..password.newSalt(\"peer-request\")end local function sign(peerId,peer,packet)local epoch,sequence=counter(peerId)packet.auth={epoch=epoch,counter=sequence}local material,err=packetMaterial(packet)if not material then return false,err end local mac,macErr=password.hmacSha256(peer.key,material)if not mac then return false,macErr end packet.auth.mac=mac return true end local function verifyPacket(packet,value)if type(packet)~=\"table\"then return false,\"packet is not a table\"end if packet.protocol~=PROTOCOL then return false,packet.protocol==\"ceetos/1\"and\"v1 packet rejected; rekey required\"or\"invalid packet protocol\"end if type(packet.type)~=\"string\"or#packet.type==0 or#packet.type>64 then return false,\"invalid packet type\"end if type(packet.from)~=\"string\"and type(packet.from)~=\"number\"then return false,\"invalid packet sender\"end local from=tostring(packet.from)local peer=activeLink(value,from)if not peer then return false,\"sender is not an active direct or mesh peer\"end if not isForUs(packet.to)then return false,\"packet addressed to another hop\"end if type(packet.origin)~=\"string\"and type(packet.origin)~=\"number\"then return false,\"invalid packet origin\"end if type(packet.destination)~=\"string\"and type(packet.destination)~=\"number\"then return false,\"invalid packet destination\"end if type(packet.request_id)~=\"string\"or#packet.request_id==0 or#packet.request_id>128 then return false,\"invalid packet request ID\"end if packet.reply_to~=nil and(type(packet.reply_to)~=\"string\"or#packet.reply_to==0 or#packet.reply_to>128)then return false,\"invalid reply correlation ID\"end local ttl=tonumber(packet.ttl)if not ttl or ttl%1~=0 or ttl<1 or ttl>PACKET_TTL then return false,\"invalid packet TTL\"end local timestamp=tonumber(packet.timestamp)if not timestamp or math.abs(now()-timestamp)>ROUTE_TTL then return false,\"stale packet timestamp\"end if type(packet.auth)~=\"table\"or type(packet.auth.mac)~=\"string\"or#packet.auth.mac~=64 then return false,\"missing packet MAC\"end local receivedMac=packet.auth.mac packet.auth.mac=nil local material,materialErr=packetMaterial(packet)packet.auth.mac=receivedMac if not material then return false,materialErr end local expected,macErr=password.hmacSha256(peer.key,material)if not expected or not password.constantTimeEqual(expected,receivedMac)then return false,macErr or\"invalid packet MAC\"end local replayOk,replayErr=verifyReplay(from,packet.auth)if not replayOk then return false,replayErr end return true,peer end local function routeBucket(targetId)local bucket=routes[tostring(targetId)]if bucket and bucket.next then bucket={candidates={{next=tostring(bucket.next),hops=tonumber(bucket.hops)or PACKET_TTL,expires=tonumber(bucket.expires)or 0,label=bucket.label,mode=bucket.mode,masterId=bucket.masterId,legacy=true,loss=1,}},primary=tostring(bucket.next),changedAt=now(),reason=\"legacy route\"}routes[tostring(targetId)]=bucket end if not bucket then bucket={candidates={},changedAt=now(),reason=\"new\"}routes[tostring(targetId)]=bucket end bucket.candidates=type(bucket.candidates)==\"table\"and bucket.candidates or{}return bucket end local function candidateHealth(candidate)local state=healthFor(candidate.next)local rank=state.state==\"healthy\"and 0 or(state.state==\"degraded\"and 1 or 2)return rank,state end local function directCandidate(value,targetId)local link,kind=activeLink(value,targetId)if link then return{next=targetId,hops=1,expires=now()+ROUTE_TTL,kind=kind,direct=true,label=link.label,mode=link.mode,masterId=link.masterId}end end local function validCandidates(targetId,value)local timestamp,out,seen=now(),{},{}local direct=directCandidate(value,targetId)if direct then out[#out+1],seen[direct.next..\":\"..direct.kind]=direct,true end local bucket=routes[tostring(targetId)]if bucket then for _,candidate in ipairs(routeBucket(targetId).candidates)do local key=tostring(candidate.next)..\":\"..tostring(candidate.kind or\"route\")if not seen[key]and candidate.expires>timestamp and candidate.hops>=1 and candidate.hops<=PACKET_TTL and activeLink(value,candidate.next)then out[#out+1],seen[key]=candidate,true end end end return out end local function compareCandidates(a,b)local ar,ah=candidateHealth(a)local br,bh=candidateHealth(b)if ar~=br then return ar<br end if(a.hops or PACKET_TTL)~=(b.hops or PACKET_TTL)then return(a.hops or PACKET_TTL)<(b.hops or PACKET_TTL)end if(ah.loss or 0)~=(bh.loss or 0)then return(ah.loss or 0)<(bh.loss or 0)end if(ah.rtt or 0)~=(bh.rtt or 0)then return(ah.rtt or 0)<(bh.rtt or 0)end return tostring(a.next)<tostring(b.next)end local function primaryCandidate(targetId,value,safe)local candidates=validCandidates(targetId,value)if#candidates==0 then return nil end table.sort(candidates,compareCandidates)local target,bucket,selected=tostring(targetId),routeBucket(targetId),candidates[1]local existing for _,item in ipairs(candidates)do if tostring(item.next)==tostring(bucket.primary)then existing=item;break end end if existing then local oldRank,newRank=candidateHealth(existing),candidateHealth(selected)if oldRank<newRank then selected=existing elseif oldRank==newRank and oldRank==0 and(selected.hops or 99)<(existing.hops or 99)then local health=healthFor(selected.next)if(health.successes or 0)<2 or(health.recoveredAt and now()-(health.stableSince or now())<PROBE_RECOVERY)then selected=existing end end end if safe then local rank,_,choices=candidateHealth(selected),nil,{}for _,item in ipairs(candidates)do local itemRank=candidateHealth(item)if itemRank==rank and item.hops==selected.hops then choices[#choices+1]=item end end if#choices>1 then table.sort(choices,function(a,b)local ah,bh=healthFor(a.next),healthFor(b.next)local aLoad,bLoad=currentInFlight(ah,now()),currentInFlight(bh,now())if aLoad~=bLoad then return aLoad<bLoad end return tostring(a.next)<tostring(b.next)end)selected=choices[1]end end if bucket.primary~=tostring(selected.next)then bucket.primary,bucket.changedAt,bucket.reason=tostring(selected.next),now(),existing and\"health/hop selection\"or\"initial selection\"trace(\"routing\",\"route_selected\",{destination=target,next=selected.next,hops=selected.hops,reason=bucket.reason})end return selected end local function nextHop(target,safe)local candidate=primaryCandidate(target,config(),safe)if candidate then local health=healthFor(candidate.next)if safe then markInFlight(health)end health.lastSelected=now()return candidate.next,candidate end routes[tostring(target)]=nil end local function transmit(items,channel,packet)if#items==0 then return false,\"no compatible modem attached\"end local sent,lastError=false,nil for _,item in ipairs(items)do local ok,err=pcall(item.modem.transmit,channel,channel,packet)if ok then sent=true else lastError=tostring(err)end end if not sent then transport.lastError=lastError or\"modem transmit failed\"end return sent,transport.lastError end local function send(target,input,forcedHop)local hop=forcedHop or nextHop(target,input.routeSafe==true and input.balanceSafe==true)if not hop then return false,\"peer is unreachable or requires rekey\"end local value,peer=config(),activeLink(config(),hop)if not peer then return false,\"direct route is unavailable\"end local packet=copy(input)packet.auth,packet.protocol,packet.from,packet.to=nil,PROTOCOL,id(),hop packet.origin,packet.destination=tostring(packet.origin or id()),tostring(packet.destination or target)packet.ttl=math.floor(tonumber(packet.ttl)or PACKET_TTL)packet.timestamp=now()if packet.ttl<1 or packet.ttl>PACKET_TTL then return false,\"invalid packet TTL\"end if type(packet.request_id)~=\"string\"or#packet.request_id==0 then packet.request_id=newRequestId()end if packet.confidential==true then local sealed,sealErr=sealBody(peer,packet)if not sealed then return false,sealErr end packet.body=sealed end local signed,signErr=sign(hop,peer,packet)if not signed then return false,signErr end openChannels(value)local links=wirelessModems()if#links==0 then return false,\"no wireless modem attached\"end local sent,err=transmit(links,value.channel or CHANNEL,packet)if not sent then trace(\"transport\",\"transmit_failed\",{type=packet.type,to=hop,error=err});return false,err end transport.lastTransmit,transport.lastError=now(),nil healthFor(hop).lastTransmit=now()trace(\"routing\",\"packet_sent\",{type=packet.type,to=hop,destination=packet.destination,links=#links})return true end local function rememberReverse(packet,previousHop)if type(packet)~=\"table\"or type(packet.request_id)~=\"string\"or#packet.request_id==0 then return false end local requestId,origin=packet.request_id,tostring(packet.origin)local existing=reverseRoutes[requestId]if existing and(existing.previous~=tostring(previousHop)or existing.origin~=origin)then return false,\"reverse route collision\"end reverseRoutes[requestId]={previous=tostring(previousHop),origin=origin,expires=now()+ROUTE_TTL}local entries={}for key,route in pairs(reverseRoutes)do entries[#entries+1]={id=key,expires=route.expires or 0}end table.sort(entries,function(a,b)return a.expires<b.expires end)while#entries>MAX_REVERSE_ROUTES do reverseRoutes[table.remove(entries,1).id]=nil end return true end local function broadcast(packet)local links=wirelessModems()if#links==0 then transport.lastError=\"no wireless modem attached\";trace(\"discovery\",\"wireless_missing\");return false,transport.lastError end local out=copy(packet)out.protocol,out.from,out.to=PROTOCOL,id(),0 out.timestamp=now()openChannels(config())local sent,err=transmit(links,DISCOVERY_CHANNEL,out)if not sent then trace(\"discovery\",\"transmit_failed\",{type=out.type,error=err});return false,err end transport.lastTransmit,transport.lastError=now(),nil trace(\"discovery\",out.type==\"discover\"and\"announcement_sent\"or\"discovery_packet_sent\",{type=out.type})return true end local function publicTransmit(target,typeName,body)if not PUBLIC_UPDATE_TYPES[typeName]then return false,\"invalid public update packet type\"end local encoded,encodeErr=canonical(body or{})if not encoded then return false,encodeErr or\"invalid public update body\"end local links=wirelessModems()if#links==0 then transport.lastError=\"no wireless modem attached\";return false,transport.lastError end openChannels(config())local packet={protocol=PUBLIC_UPDATE_PROTOCOL,type=typeName,from=id(),to=tostring(target),timestamp=now(),request_id=newRequestId(),body=body or{},}local sent,err=transmit(links,DISCOVERY_CHANNEL,packet)if not sent then transport.lastError=err or\"public update transmit failed\"trace(\"transport\",\"public_update_transmit_failed\",{type=typeName,to=target,error=transport.lastError})return false,transport.lastError end transport.lastTransmit,transport.lastError=now(),nil trace(\"transport\",\"public_update_sent\",{type=typeName,to=target,bytes=#encoded})return true end function M.publicSend(target,typeName,body)if tostring(target)==\"0\"or tostring(target)==\"\"then return false,\"public update target must be a computer ID\"end return publicTransmit(target,typeName,body)end function M.publicBroadcast(typeName,body)return publicTransmit(\"0\",typeName,body)end local function handshake(target,packet)local links=wirelessModems()if#links==0 then transport.lastError=\"no wireless modem attached\";return false,transport.lastError end local out=copy(packet)out.protocol,out.from,out.to,out.timestamp=PROTOCOL,id(),tostring(target),now()out.destination,out.ttl=tostring(target),1 openChannels(config())local sent,err=transmit(links,config().channel or CHANNEL,out)if not sent then trace(\"discovery\",\"handshake_transmit_failed\",{type=out.type,to=target,error=err});return false,err end transport.lastTransmit=now()trace(\"discovery\",out.type..\"_sent\",{to=target})return true end local function phraseTag(phrase,sessionId,hostId)return password.hmacSha256(phrase,\"ceetos/discovery/v2|\"..sessionId..\"|\"..tostring(hostId))end local function joinProof(phrase,sessionId,hostId,joinerId,nonce)return password.hmacSha256(phrase,\"ceetos/pair/join/v2|\"..sessionId..\"|\"..tostring(hostId)..\"|\"..tostring(joinerId)..\"|\"..nonce)end local function confirmProof(phrase,sessionId,hostId,joinerId,nonce,mode,master)return password.hmacSha256(phrase,\"ceetos/pair/confirm/v2|\"..sessionId..\"|\"..tostring(hostId)..\"|\"..tostring(joinerId)..\"|\"..nonce..\"|\"..tostring(mode)..\"|\"..tostring(master or\"\"))end local function linkKey(phrase,sessionId,hostId,joinerId,nonce)return password.derive(phrase,\"ceetos/link/v2|\"..sessionId..\"|\"..tostring(hostId)..\"|\"..tostring(joinerId)..\"|\"..nonce,64)end local function keyId(key)local value=password.hmacSha256(key,\"ceetos/key-id/v2\")return value and value:sub(1,16)or\"\"end local function activeSession()return discovery and(discovery.state==\"hosting\"or discovery.state==\"searching\"or discovery.state==\"candidate\"or discovery.state==\"confirming\")end local function setLast(state,message)lastDiscovery={state=state,message=message,at=now()}end local function persistPair(peerId,key,metadata,masterId)local value=config()value.peers[tostring(peerId)]={protocol=2,rekeyRequired=false,key=key,keyId=keyId(key),role=\"operator\",mode=metadata.mode or\"peer\",master=tostring(masterId or\"\")==id(),masterId=tostring(masterId or\"\"),label=metadata.label,}save(value)remember(peerId,metadata.label,{mode=metadata.mode,masterId=masterId})routes[tostring(peerId)]=nil routesDirty=true audit.log(\"local\",\"peer.rekeyed\",{peer=peerId,mode=metadata.mode})end local function markRejected(reason)if discovery then discovery=nil end setLast(\"cancelled\",reason)end local function discoveryAnnouncement()if not discovery or discovery.state~=\"hosting\"then return false,\"no active host discovery\"end return broadcast({type=\"discover\",session=discovery.id,tag=discovery.tag,label=discovery.label,mode=discovery.mode,master=discovery.masterSide,expires=discovery.expires,})end local function queueConfirmation(peerId,host)confirmations[host.id]=host local sent,err=handshake(peerId,{type=\"pair_confirm\",session=host.id,nonce=host.joinNonce,proof=host.confirmProof,label=host.label,mode=host.mode,master=host.masterId,})host.lastSent,host.retries=now(),0 if not sent then host.error=err end return sent,err end local function expireState(timestamp)if discovery and discovery.expires<=timestamp then local old=discovery.state discovery=nil setLast(\"expired\",old==\"searching\"and\"no matching discovery announcement received\"or\"discovery session expired\")trace(\"discovery\",\"session_expired\",{previous=old})end end local function boundMap(value,limit,timestamp)local entries={}for key,row in pairs(value)do entries[#entries+1]={key=key,at=type(row)==\"number\"and row or(type(row)==\"table\"and(row.expires or row.time or row.seen or row.lastAuthenticated or 0)or 0)}end table.sort(entries,function(a,b)if a.at~=b.at then return a.at<b.at end return tostring(a.key)<tostring(b.key)end)while#entries>limit do value[table.remove(entries,1).key]=nil end end local function pruneRouteBuckets(timestamp)local value=config()local entries={}for peerId,bucket in pairs(routes)do local latest=tonumber(bucket.changedAt)or 0 for _,candidate in ipairs(type(bucket.candidates)==\"table\"and bucket.candidates or{})do latest=math.max(latest,tonumber(candidate.expires)or 0)end entries[#entries+1]={peer=peerId,latest=latest}end table.sort(entries,function(a,b)if a.latest~=b.latest then return a.latest<b.latest end return tostring(a.peer)<tostring(b.peer)end)while#entries>ROUTE_BUCKET_LIMIT do local old=table.remove(entries,1)routes[old.peer],routesDirty=nil,true trace(\"routing\",\"route_bucket_evicted\",{destination=old.peer})end for peerId,state in pairs(linkHealth)do if not activeLink(value,peerId)and not routes[peerId]then linkHealth[peerId]=nil end end for peerId in pairs(advertisedRoutes)do if not activeLink(value,peerId)then advertisedRoutes[peerId]=nil end end boundMap(meshOffers,MESH_STATE_LIMIT,timestamp)boundMap(meshSeen,MESH_STATE_LIMIT,timestamp)end local function controller(value)value=value or config()if value.controller and tostring(value.controller)~=\"\"then local chosen=tostring(value.controller)if chosen==id()or activeLink(value,chosen)then return chosen end local known=routes[chosen]if known then if known.expires and known.expires>now()then return chosen end if type(known.candidates)==\"table\"then for _,candidate in ipairs(known.candidates)do if(candidate.expires or 0)>now()and activeLink(value,candidate.next)then return chosen end end end end trace(\"routing\",\"controller_unreachable\",{controller=chosen})end local selected=tonumber(id())or 0 for peerId in pairs(value.peers)do if activePeer(value,peerId)then local n=tonumber(peerId);if n and n<selected then selected=n end end end for peerId,route in pairs(routes)do local reachable=route.expires and route.expires>now()if type(route.candidates)==\"table\"then reachable=false for _,candidate in ipairs(route.candidates)do if(candidate.expires or 0)>now()then reachable=true;break end end end if reachable then local n=tonumber(peerId);if n and n<selected then selected=n end end end return tostring(selected)end local function meshConfig(value)value=value or config()local mesh=value.mesh if type(mesh)==\"table\"and type(mesh.id)==\"string\"and#mesh.id>=16 and type(mesh.root)==\"string\"and#mesh.root>=32 and tonumber(mesh.epoch)then return mesh end return nil end local function meshMaterial(packet)return canonical({protocol=packet.protocol,type=packet.type,from=packet.from,to=packet.to,mesh=packet.mesh,epoch=packet.epoch,nonce=packet.nonce,offer=packet.offer,timestamp=packet.timestamp})end local function meshTag(mesh,packet)local material=meshMaterial(packet)return material and password.hmacSha256(mesh.root,material)or nil end local function meshPacket(typeName,target,fields)local value,mesh=config(),meshConfig()if not mesh then return false,\"mesh enrollment is pending\"end local packet=copy(fields or{})packet.protocol,packet.type,packet.from,packet.to=PROTOCOL,typeName,id(),target and tostring(target)or 0 packet.mesh,packet.epoch,packet.timestamp=mesh.id,mesh.epoch,now()packet.tag=meshTag(mesh,packet)if not packet.tag then return false,\"could not authenticate mesh packet\"end openChannels(value)local links=wirelessModems()if#links==0 then return false,\"no wireless modem attached\"end local sent,err=transmit(links,value.channel or CHANNEL,packet)if sent then trace(\"routing\",typeName..\"_sent\",{to=packet.to,mesh=mesh.id:sub(1,8)})end return sent,err end local function deriveAutoEdge(mesh,peerId,firstNonce,secondNonce)local left,right=tostring(id()),tostring(peerId)if left>right then left,right=right,left end return password.hmacSha256(mesh.root,\"ceetos/mesh-edge/v1|\"..tostring(mesh.epoch)..\"|\"..left..\"|\"..right..\"|\"..tostring(firstNonce)..\"|\"..tostring(secondNonce))end local function ownsMeshOffer(peerId)local ours,theirs=tonumber(id()),tonumber(peerId)if ours and theirs then return ours<theirs end return tostring(id())<tostring(peerId)end local function installAutoEdge(mesh,peerId,firstNonce,secondNonce,peerLabel)peerId=tostring(peerId)local value=config()if activePeer(value,peerId)then return false,\"manual direct link already exists\"end local key=deriveAutoEdge(mesh,peerId,firstNonce,secondNonce)if not key then return false,\"could not derive mesh edge\"end autoEdges[peerId]={key=key,label=peerLabel,mesh=mesh.id,epoch=mesh.epoch,expires=now()+ROUTE_TTL,firstNonce=firstNonce,secondNonce=secondNonce}local state=healthFor(peerId)state.state,state.successes,state.misses,state.lastAuthenticated,state.stableSince=\"healthy\",2,0,now(),now()routesDirty,meshDirty=true,true trace(\"routing\",\"mesh_edge_active\",{peer=peerId,mesh=mesh.id:sub(1,8)})return true end local function meshEnrollmentAad(from,to,meshId,epoch,nonceCounter)return canonical({protocol=PROTOCOL,type=\"mesh_enroll\",from=tostring(from),to=tostring(to),mesh=meshId,epoch=tonumber(epoch),counter=tonumber(nonceCounter)})end local function sendEnrollment(peerId)local value,mesh,peer=config(),meshConfig(),activePeer(config(),peerId)if not mesh or not peer then return false,\"mesh or direct link unavailable\"end local _,nonceCounter=counter(peerId)local aad=meshEnrollmentAad(id(),peerId,mesh.id,mesh.epoch,nonceCounter)local nonce=meshCrypto.nonce(peer.key,nonceCounter,\"mesh-enroll|\"..id()..\"|\"..tostring(peerId))local plaintext=textutils.serialise({id=mesh.id,epoch=mesh.epoch,root=mesh.root},{compact=true})local envelope,err=meshCrypto.seal(peer.key,nonce,aad,plaintext)if not envelope then return false,err end local sent,sendErr=send(peerId,{type=\"mesh_enroll\",body={mesh=mesh.id,epoch=mesh.epoch,counter=nonceCounter,envelope=envelope},request_id=newRequestId()},peerId)if sent then trace(\"routing\",\"mesh_enrollment_sent\",{to=peerId,epoch=mesh.epoch})end return sent,sendErr end local function acceptEnrollment(from,peer,packet)if not activePeer(config(),from)then return rejectPacket(\"mesh enrollment requires a manual direct link\",packet)end local body=packet.body if type(body)~=\"table\"or type(body.mesh)~=\"string\"or type(body.envelope)~=\"table\"or not tonumber(body.epoch)or not tonumber(body.counter)then return rejectPacket(\"malformed_mesh_enrollment\",packet)end local aad=meshEnrollmentAad(from,id(),body.mesh,body.epoch,body.counter)local plaintext,err=meshCrypto.open(peer.key,body.envelope,aad)if not plaintext then return rejectPacket(err or\"mesh enrollment authentication failed\",packet)end local ok,mesh=pcall(textutils.unserialise,plaintext)if not ok or type(mesh)~=\"table\"or mesh.id~=body.mesh or tonumber(mesh.epoch)~=tonumber(body.epoch)or type(mesh.root)~=\"string\"or#mesh.root<32 then return rejectPacket(\"invalid_mesh_enrollment\",packet)end local value,existing=config(),meshConfig()if existing and existing.id==mesh.id and tonumber(existing.epoch)>tonumber(mesh.epoch)then return end value.mesh={id=mesh.id,epoch=tonumber(mesh.epoch),root=mesh.root,enrolledAt=now(),enrolledBy=tostring(from)}save(value)meshDirty,routesDirty=true,true trace(\"routing\",\"mesh_enrolled\",{from=from,mesh=mesh.id:sub(1,8),epoch=mesh.epoch})end local function ensureMeshEnrollment(timestamp)local value,mesh=config(),meshConfig()if not mesh then if(M._meshBootstrapAt or 0)>timestamp or controller(value)~=id()then return end value.mesh={id=password.newSalt(\"mesh-id:\"..id()),root=password.newSalt(\"mesh-root:\"..id()),epoch=1,createdAt=timestamp,controller=id()}save(value);mesh,meshDirty,routesDirty=value.mesh,true,true trace(\"routing\",\"mesh_created\",{mesh=mesh.id:sub(1,8),epoch=mesh.epoch})end for _,peerId in ipairs(allDirectLinks(value))do if activePeer(value,peerId)then local previous=meshEnrollmentSends[peerId]if not previous or previous.epoch~=mesh.epoch or timestamp-previous.at>=MESH_FULL_INTERVAL then local sent=sendEnrollment(peerId)if sent then meshEnrollmentSends[peerId]={epoch=mesh.epoch,at=timestamp}end end end end end local function meshBeacon(timestamp)local mesh=meshConfig()if not mesh or timestamp-lastMeshBeacon<MESH_BEACON_INTERVAL then return end lastMeshBeacon=timestamp meshPacket(\"mesh_beacon\",nil,{nonce=password.newSalt(\"mesh-beacon:\"..id()),label=label()})end local function verifyMeshPacket(packet)local mesh=meshConfig()if not mesh or type(packet)~=\"table\"or packet.protocol~=PROTOCOL or packet.mesh~=mesh.id or tonumber(packet.epoch)~=tonumber(mesh.epoch)then return false,\"mesh membership proof failed\"end if type(packet.from)~=\"string\"and type(packet.from)~=\"number\"then return false,\"invalid mesh sender\"end if type(packet.nonce)~=\"string\"or#packet.nonce<16 or#packet.nonce>128 then return false,\"invalid mesh nonce\"end if math.abs(now()-(tonumber(packet.timestamp)or 0))>ROUTE_TTL then return false,\"stale mesh packet\"end local material,tag=meshMaterial(packet),packet.tag local expected=material and password.hmacSha256(mesh.root,material)if type(tag)~=\"string\"or not expected or not password.constantTimeEqual(expected,tag)then return false,\"invalid mesh packet tag\"end local replay=tostring(packet.from)..\"|\"..tostring(packet.type)..\"|\"..tostring(packet.nonce)..\"|\"..tostring(packet.offer or\"\")if meshSeen[replay]and meshSeen[replay]+ROUTE_TTL>now()then return false,\"replayed mesh packet\"end meshSeen[replay]=now()return true,mesh end local function handleMeshPacket(packet,distance)local valid,meshOrErr=verifyMeshPacket(packet)if not valid then return rejectPacket(meshOrErr,packet,nil,distance)end local mesh,from=meshOrErr,tostring(packet.from)if from==id()then return end if packet.type==\"mesh_beacon\"then remember(from,packet.label,{mesh=mesh.id})if not activePeer(config(),from)and not autoEdges[from]and ownsMeshOffer(from)then local nonce=password.newSalt(\"mesh-offer:\"..from)meshOffers[from]={offer=nonce,expires=now()+DISCOVERY_TTL}meshPacket(\"mesh_edge_offer\",from,{nonce=nonce,label=label()})end return end if not isForUs(packet.to)then return rejectPacket(\"mesh packet addressed to another peer\",packet,nil,distance)end if packet.type==\"mesh_edge_offer\"then if activePeer(config(),from)then return end local response=password.newSalt(\"mesh-accept:\"..from)installAutoEdge(mesh,from,packet.nonce,response,packet.label)return meshPacket(\"mesh_edge_accept\",from,{nonce=response,offer=packet.nonce,label=label()})end if packet.type==\"mesh_edge_accept\"then local offer=meshOffers[from]if not offer or offer.expires<=now()or offer.offer~=packet.offer then return rejectPacket(\"unexpected mesh edge acceptance\",packet,nil,distance)end meshOffers[from]=nil return installAutoEdge(mesh,from,offer.offer,packet.nonce,packet.label)end end local function probeLinks(timestamp)local value=config()for _,peerId in ipairs(allDirectLinks(value))do local health=healthFor(peerId)local interval=health.state==\"offline\"and PROBE_INTERVAL*3 or PROBE_INTERVAL if timestamp-(health.lastAuthenticated or 0)>=interval and timestamp-(health.lastProbe or 0)>=interval then if health.awaiting then health.misses=(health.misses or 0)+1 health.loss=math.min(1,((health.loss or 0)*3+1)/4)local nextState=health.misses>=PROBE_OFFLINE and\"offline\"or(health.misses>=PROBE_DEGRADED and\"degraded\"or health.state)if nextState~=health.state then health.state,health.successes,health.recoveredAt=nextState,0,nil trace(\"routing\",\"link_\"..nextState,{peer=peerId,misses=health.misses})end routesDirty=true end health.awaiting,health.lastProbe,health.probeToken=true,timestamp,password.newSalt(\"mesh-probe:\"..peerId)send(peerId,{type=\"mesh_probe\",body={token=health.probeToken},request_id=newRequestId()},peerId)end end end local function advertisedMembers(value,peerId,timestamp)local members={}for other,manual in pairs(value.peers)do if other~=peerId and activeLink(value,other)and linkState(other)==\"healthy\"then members[other]={label=manual.label,mode=manual.mode,masterId=manual.masterId,hops=1,kind=\"direct\"}end end for other,edge in pairs(autoEdges)do if other~=peerId and edge.expires>timestamp and linkState(other)==\"healthy\"then members[other]={label=edge.label,mode=\"peer\",hops=1,kind=\"mesh\"}end end for other in pairs(routes)do if other~=peerId and not members[other]then local candidate=primaryCandidate(other,value,false)if candidate and candidate.next~=peerId and linkState(candidate.next)==\"healthy\"then members[other]={label=candidate.label,mode=candidate.mode,masterId=candidate.masterId,hops=candidate.hops,kind=candidate.kind or\"route\"}end end end return members end local function sameAdvertisement(left,right)local leftValue,leftErr=canonical(left)local rightValue,rightErr=canonical(right)return leftValue~=nil and rightValue~=nil and not leftErr and not rightErr and leftValue==rightValue end local function advertiseRoutes(force)local timestamp,value=now(),config()if not force and not routesDirty and timestamp-lastRouteAdvertisement<ROUTE_INTERVAL then return end lastRouteAdvertisement,routesDirty=timestamp,false local full=timestamp-lastMeshFull>=MESH_FULL_INTERVAL if full then lastMeshFull=timestamp end for _,peerId in ipairs(allDirectLinks(value))do if linkUsable(value,peerId,false)then local desired,previous=advertisedMembers(value,peerId,timestamp),advertisedRoutes[peerId]or{}local members,withdrawals={},{}if full then members=desired else for target,meta in pairs(desired)do if not sameAdvertisement(meta,previous[target])then members[target]=meta end end for target in pairs(previous)do if not desired[target]then withdrawals[#withdrawals+1]=target end end end table.sort(withdrawals,function(a,b)return tostring(a)<tostring(b)end)if full or next(members)~=nil or#withdrawals>0 then routeSequence=routeSequence+1 local body={sequence=routeSequence,routeVersion=2,full=full,controller=controller(value),members=members,withdrawals=withdrawals}if send(peerId,{type=\"route_advertise\",body=body,routeSafe=true,request_id=newRequestId()})then advertisedRoutes[peerId]=copy(desired)trace(\"routing\",full and\"route_snapshot_sent\"or\"route_delta_sent\",{to=peerId,changes=(full and 0 or#withdrawals)})end end else advertisedRoutes[peerId]=nil end end end function M.start()migrateV1Links()loadSecurity()assert(meshCrypto.selfTest(),\"CeetOS mesh cryptography self-test failed\")openChannels(config())local status=M.transportStatus()trace(\"transport\",status.wireless and\"wireless_modem_detected\"or\"wireless_modem_missing\",{name=status.name})routesDirty,M._meshBootstrapAt=true,now()end function M.transportStatus()local wireless=wirelessModems()transport.modem,transport.wireless=#modems()>0,#wireless>0 transport.name=wireless[1]and wireless[1].name or nil local out=copy(transport)out.wirelessLinks,out.wirelessLinkCount={},#wireless for _,item in ipairs(wireless)do out.wirelessLinks[#out.wirelessLinks+1]=item.name end out.usesAllWirelessLinks,out.protocol=true,2 out.directPeers,out.manualDirectPeers,out.meshPeers,out.rekeyRequiredPeers,out.routedPeers=0,0,0,0,0 out.healthyLinks,out.degradedLinks,out.offlineLinks=0,0,0 local value=config()for peerId,peer in pairs(value.peers)do if activePeer(value,peerId)then out.directPeers,out.manualDirectPeers=out.directPeers+1,out.manualDirectPeers+1 elseif peer.rekeyRequired then out.rekeyRequiredPeers=out.rekeyRequiredPeers+1 end end for peerId,edge in pairs(autoEdges)do if edge.expires>now()then out.meshPeers,out.directPeers=out.meshPeers+1,out.directPeers+1 end end for peerId,health in pairs(linkHealth)do if health.state==\"healthy\"then out.healthyLinks=out.healthyLinks+1 elseif health.state==\"degraded\"then out.degradedLinks=out.degradedLinks+1 elseif health.state==\"offline\"then out.offlineLinks=out.offlineLinks+1 end end for peerId,bucket in pairs(routes)do local usable=primaryCandidate(peerId,value,false)if usable and not value.peers[peerId]and not autoEdges[peerId]then out.routedPeers=out.routedPeers+1 end end local mesh=meshConfig(value)out.mesh=mesh and{id=mesh.id:sub(1,8),epoch=mesh.epoch,enrolled=true}or{enrolled=false}out.health={healthy=out.healthyLinks,degraded=out.degradedLinks,offline=out.offlineLinks}return out end function M.transportTrace(kind)if kind==\"discovery\"or kind==\"routing\"or kind==\"transport\"then return copy(traces[kind])end return{discovery=copy(traces.discovery),routing=copy(traces.routing),transport=copy(traces.transport)}end function M.discovery()expireState(now())return copy(discovery)end function M.discoveryStatus()expireState(now())local candidate=discovery and discovery.candidate and{id=discovery.candidate.from,label=discovery.candidate.label,mode=discovery.candidate.mode,master=discovery.candidate.master,}or nil local session=discovery and{session=discovery.id,state=discovery.state,mode=discovery.mode,master=discovery.masterSide,expires=discovery.expires,retries=discovery.retries or 0,candidate=candidate and copy(candidate)or nil,}or nil local state=session and session.state or(lastDiscovery and lastDiscovery.state or\"inactive\")return{state=state,active=session~=nil,lastState=lastDiscovery and lastDiscovery.state or\"inactive\",lastMessage=lastDiscovery and lastDiscovery.message or nil,session=session,searching=session and session.state==\"searching\"or false,candidate=candidate,discovered=#M.seenPeers(),transport=M.transportStatus(),message=(discovery and discovery.error)or(lastDiscovery and lastDiscovery.message),}end function M.startDiscovery(mode,masterSide,phrase)if activeSession()then return false,\"cancel the active discovery session first\"end local normalized,phraseErr=M.normalizePhrase(phrase)if not normalized then return false,phraseErr end mode=mode==\"master\"and\"master\"or\"peer\"masterSide=masterSide==\"joiner\"and\"joiner\"or\"initiator\"local sessionId=password.newSalt(\"discovery:\"..id())discovery={id=sessionId,state=\"hosting\",phrase=normalized,tag=phraseTag(normalized,sessionId,id()),mode=mode,masterSide=masterSide,label=label(),initiator=id(),expires=now()+DISCOVERY_TTL,retries=0,lastBroadcast=0,}local sent,err=discoveryAnnouncement()if not sent then discovery=nil;setLast(\"cancelled\",err);return false,err end discovery.lastBroadcast=now()setLast(\"hosting\")return true,{state=\"hosting\",session=sessionId,expires=discovery.expires}end function M.joinDiscovery(phrase)if activeSession()then return false,\"cancel the active discovery session first\"end local normalized,phraseErr=M.normalizePhrase(phrase)if not normalized then return false,phraseErr end local candidate for _,item in pairs(discovered)do if item.expires>now()and password.constantTimeEqual(item.tag or\"\",phraseTag(normalized,item.session,item.from))then candidate=item;break end end discovery={state=\"searching\",phrase=normalized,expires=now()+DISCOVERY_TTL,retries=0,lastQuery=0}if candidate then discovery.state,discovery.candidate=\"candidate\",candidate return true,{state=\"candidate\",candidate={id=candidate.from,label=candidate.label,mode=candidate.mode,master=candidate.master}}end local sent,err=broadcast({type=\"discover_query\"})if not sent then discovery=nil;setLast(\"cancelled\",err);return false,err end discovery.lastQuery=now()setLast(\"searching\",\"waiting for matching discovery announcement\")return true,{state=\"searching\"}end function M.confirmDiscovery()if not discovery or discovery.state~=\"candidate\"or not discovery.candidate then return false,\"no discovery candidate is awaiting confirmation\"end local candidate,value=discovery.candidate,config()local existing=value.peers[tostring(candidate.from)]if existing and not existing.rekeyRequired then return false,\"computer is already a network member\"end if routes[tostring(candidate.from)]and not existing then return false,\"computer is already a routed network member\"end local nonce=password.newSalt(\"pair-join:\"..candidate.session)local proof=joinProof(discovery.phrase,candidate.session,candidate.from,id(),nonce)discovery.state,discovery.joinNonce,discovery.joinProof,discovery.lastSent,discovery.retries=\"confirming\",nonce,proof,now(),0 local sent,err=handshake(candidate.from,{type=\"pair_join\",session=candidate.session,nonce=nonce,proof=proof,label=label()})if not sent then discovery.error=err;return false,err end trace(\"discovery\",\"pair_confirmation_requested\",{peer=candidate.from})return true end function M.cancelDiscovery()if discovery and discovery.state==\"hosting\"then broadcast({type=\"discover_cancel\",session=discovery.id})end discovery=nil setLast(\"cancelled\",\"discovery cancelled\")trace(\"discovery\",\"session_cancelled\")return true end function M.normalizePhrase(value)if type(value)~=\"string\"then return nil,\"phrase is required\"end if value:find(\"[%z\\1-\\31\\127]\")then return nil,\"phrase contains control characters\"end value=value:gsub(\"^%s+\",\"\"):gsub(\"%s+$\",\"\")if#value<8 then return nil,\"phrase must be at least 8 characters\"end if#value>128 then return nil,\"phrase must be at most 128 characters\"end return value end function M.tick()local timestamp=now()expireState(timestamp)if discovery then if discovery.state==\"hosting\"and timestamp-(discovery.lastBroadcast or 0)>=math.min(30000,DISCOVERY_INTERVAL*(2^math.min(discovery.retries or 0,4)))then local sent,err=discoveryAnnouncement()discovery.lastBroadcast=timestamp discovery.retries=(discovery.retries or 0)+1 if not sent then discovery.error=err end elseif discovery.state==\"searching\"and timestamp-(discovery.lastQuery or 0)>=DISCOVERY_INTERVAL then local sent,err=broadcast({type=\"discover_query\"})discovery.lastQuery,discovery.retries=timestamp,(discovery.retries or 0)+1 if not sent then discovery.error=err end elseif discovery.state==\"confirming\"and timestamp-(discovery.lastSent or 0)>=PAIR_RETRY then local candidate=discovery.candidate local sent,err=handshake(candidate.from,{type=\"pair_join\",session=candidate.session,nonce=discovery.joinNonce,proof=discovery.joinProof,label=label()})discovery.lastSent,discovery.retries=timestamp,(discovery.retries or 0)+1 if not sent then discovery.error=err end end end for sessionId,item in pairs(discovered)do if item.expires<=timestamp then discovered[sessionId]=nil end end for sessionId,record in pairs(confirmations)do if record.expires<=timestamp then confirmations[sessionId]=nil elseif timestamp-(record.lastSent or 0)>=PAIR_RETRY then queueConfirmation(record.peer,record)end end for peerId,bucket in pairs(routes)do local kept={}for _,candidate in ipairs(routeBucket(peerId).candidates)do if candidate.expires>timestamp then kept[#kept+1]=candidate end end bucket.candidates=kept if#kept==0 and not activeLink(config(),peerId)then routes[peerId],routesDirty=nil,true end end for peerId,edge in pairs(autoEdges)do if edge.expires<=timestamp then autoEdges[peerId],routesDirty=nil,true;trace(\"routing\",\"mesh_edge_expired\",{peer=peerId})end end for key,seenAt in pairs(meshSeen)do if seenAt+ROUTE_TTL<=timestamp then meshSeen[key]=nil end end for peerId,offer in pairs(meshOffers)do if offer.expires<=timestamp then meshOffers[peerId]=nil end end for requestId,seenAt in pairs(seenPackets)do if seenAt+ROUTE_TTL<=timestamp then seenPackets[requestId]=nil end end for requestId,route in pairs(reverseRoutes)do if route.expires<=timestamp then reverseRoutes[requestId]=nil end end boundMap(meshSeen,MESH_STATE_LIMIT,timestamp)boundMap(meshOffers,MESH_STATE_LIMIT,timestamp)pruneRouteBuckets(timestamp)ensureMeshEnrollment(timestamp)meshBeacon(timestamp)probeLinks(timestamp)advertiseRoutes(false)end function M.peers()local out,value,seen={},config(),read(SEEN_PATH,{})for peerId,peer in pairs(value.peers)do out[#out+1]={id=peerId,label=peer.label or(seen[peerId]and seen[peerId].label),role=peer.role or\"operator\",mode=peer.mode or\"peer\",master=peer.master==true,masterId=peer.masterId,direct=true,active=activePeer(value,peerId)~=nil,rekeyRequired=peer.rekeyRequired==true or peer.protocol~=2,health=linkState(peerId),auto=false,}end for peerId,edge in pairs(autoEdges)do if not value.peers[peerId]and edge.expires>now()then out[#out+1]={id=peerId,label=edge.label or(seen[peerId]and seen[peerId].label),role=\"mesh\",mode=\"peer\",direct=true,auto=true,active=true,health=linkState(peerId)}end end for peerId in pairs(routes)do if not value.peers[peerId]and not autoEdges[peerId]then local route=primaryCandidate(peerId,value,false)if route then out[#out+1]={id=peerId,label=route.label or(seen[peerId]and seen[peerId].label),role=\"routed\",mode=route.mode or\"peer\",masterId=route.masterId,routed=true,hops=route.hops,next=route.next,health=linkState(route.next),alternates=#routeBucket(peerId).candidates-1}end end end table.sort(out,function(a,b)return tonumber(a.id)<tonumber(b.id)end)return out end function M.directPeers()local out={}for _,peer in ipairs(M.peers())do if peer.direct and peer.active then out[#out+1]=peer end end return out end function M.seenPeers()local out={}for peerId,item in pairs(read(SEEN_PATH,{}))do if not item.seen or item.seen+DISCOVERY_TTL*2>now()then out[#out+1]={id=peerId,label=item.label,seen=item.seen,session=item.session}end end table.sort(out,function(a,b)return tonumber(a.id)<tonumber(b.id)end)return out end function M.routeStatus(target)local value,out=config(),{}local function row(peerId)local selected=primaryCandidate(peerId,value,false)if not selected then return end local health=healthFor(selected.next)local alternates={}for _,candidate in ipairs(validCandidates(peerId,value))do if tostring(candidate.next)~=tostring(selected.next)then local state=healthFor(candidate.next)alternates[#alternates+1]={next=candidate.next,hops=candidate.hops,kind=candidate.kind or\"route\",health=state.state,loss=state.loss or 0,rtt=state.rtt,distance=state.lastDistance}end end table.sort(alternates,compareCandidates)while#alternates>ROUTE_CANDIDATE_LIMIT-1 do table.remove(alternates)end out[#out+1]={id=tostring(peerId),label=selected.label,next=selected.next,hops=selected.hops,kind=selected.kind or\"route\",health=health.state,loss=health.loss or 0,rtt=health.rtt,distance=health.lastDistance,selectedAt=routeBucket(peerId).changedAt,reason=routeBucket(peerId).reason,alternates=alternates,}end if target then row(tostring(target))else local ids,seen={},{}for peerId in pairs(value.peers)do ids[#ids+1],seen[peerId]=peerId,true end for peerId in pairs(autoEdges)do if not seen[peerId]then ids[#ids+1],seen[peerId]=peerId,true end end for peerId in pairs(routes)do if not seen[peerId]then ids[#ids+1],seen[peerId]=peerId,true end end table.sort(ids,function(a,b)return tonumber(a)<tonumber(b)end)for _,peerId in ipairs(ids)do row(peerId)end end return out end function M.statusSnapshot()return{protocol=2,transport=M.transportStatus(),discovery=M.discoveryStatus(),peers=M.peers(),routes=M.routeStatus(),trace=M.transportTrace(),controller=M.controller()}end function M.controller()return controller()end function M.isDirectController(from,packet)return tostring(from)==tostring(controller())and type(packet)==\"table\"and tostring(packet.origin or\"\")==tostring(from)end function M.setController(value)assert(tonumber(value),\"controller must be a computer ID\")local saved=config();saved.controller=tostring(value);save(saved);routesDirty=true audit.log(\"local\",\"jobs.controller\",{controller=saved.controller})return saved.controller end function M.request(target,typeName,body,options)if type(typeName)~=\"string\"or#typeName==0 or#typeName>64 then return false,\"invalid request type\"end local destination=tostring(target)local value=config()if not primaryCandidate(destination,value,options and options.safe==true)then return false,\"peer is unreachable, degraded, or requires rekey\"end return send(destination,{type=typeName,body=body or{},origin=id(),routeSafe=options and options.safe==true,balanceSafe=options and options.safe==true,confidential=options and options.confidential==true,request_id=newRequestId()})end function M.reply(request,typeName,body,options)if type(request)~=\"table\"or type(typeName)~=\"string\"or#typeName==0 or#typeName>64 then return false,\"invalid reply\"end local requestId,destination=request.request_id,tostring(request.origin or\"\")local reverse=type(requestId)==\"string\"and reverseRoutes[requestId]or nil if destination==\"\"or not reverse or reverse.expires<=now()or reverse.origin~=destination then return false,\"reverse reply route is unavailable\"end return send(destination,{type=typeName,body=body or{},origin=id(),destination=destination,reply_to=requestId,routeSafe=options and options.safe==true,confidential=options and options.confidential==true,request_id=newRequestId(),},reverse.previous)end function M.offer()return false,\"legacy pairing is disabled; use phrase discovery\"end function M.accept()return false,\"legacy pairing is disabled; use phrase discovery\"end function M.discover()return broadcast({type=\"discover_query\"})end rejectPacket=function(reason,packet,channel,distance)transport.rejected=transport.rejected+1 trace(\"transport\",\"packet_rejected\",{reason=reason,type=type(packet)==\"table\"and packet.type or nil,channel=channel,distance=distance,from=type(packet)==\"table\"and packet.from or nil})end local function handleDiscovery(packet,channel,distance)local from=tostring(packet.from)if packet.type==\"discover_cancel\"and isBroadcast(packet.to)then discovered[tostring(packet.session)]=nil trace(\"discovery\",\"cancel_received\",{from=from,distance=distance})return end if packet.type==\"discover_query\"and isBroadcast(packet.to)and discovery and discovery.state==\"hosting\"then discoveryAnnouncement()trace(\"discovery\",\"query_answered\",{from=from,distance=distance})return end if packet.type==\"discover\"and isBroadcast(packet.to)and from~=id()then if type(packet.session)~=\"string\"or#packet.session<16 or type(packet.tag)~=\"string\"or#packet.tag~=64 then return rejectPacket(\"malformed_discovery\",packet,channel,distance)end local expires=tonumber(packet.expires)or(now()+DISCOVERY_TTL)discovered[packet.session]={session=packet.session,from=from,tag=packet.tag,label=tostring(packet.label or(\"Computer \"..from)):sub(1,128),mode=packet.mode==\"master\"and\"master\"or\"peer\",master=packet.master==\"joiner\"and\"joiner\"or\"initiator\",expires=math.min(expires,now()+DISCOVERY_TTL)}remember(from,packet.label,{session=packet.session})trace(\"discovery\",\"announcement_received\",{from=from,label=packet.label,distance=distance})if discovery and discovery.state==\"searching\"and password.constantTimeEqual(packet.tag,phraseTag(discovery.phrase,packet.session,from))then local value,existing=config(),config().peers[from]if existing and not existing.rekeyRequired then markRejected(\"computer is already a direct peer\")elseif routes[from]and not existing then markRejected(\"computer is already a routed network member\")else discovery.state,discovery.candidate,discovery.error=\"candidate\",discovered[packet.session],nil setLast(\"candidate\",\"matching computer found; confirm pairing\")trace(\"discovery\",\"candidate_found\",{from=from,label=packet.label,distance=distance})end end return end end local function handlePairJoin(packet,distance)if not discovery or discovery.state~=\"hosting\"or packet.session~=discovery.id then return end local from=tostring(packet.from)local value,existing=config(),config().peers[from]if(existing and not existing.rekeyRequired)or(routes[from]and not existing)then handshake(from,{type=\"pair_reject\",session=packet.session,reason=\"already_network_member\"})trace(\"discovery\",\"pair_rejected\",{from=from,reason=\"already_network_member\"})return end if type(packet.nonce)~=\"string\"or#packet.nonce<16 or#packet.nonce>128 or type(packet.proof)~=\"string\"or#packet.proof~=64 then return rejectPacket(\"malformed_pair_join\",packet,nil,distance)end local expected=joinProof(discovery.phrase,discovery.id,id(),from,packet.nonce)if not password.constantTimeEqual(expected,packet.proof)then discovery.failures=(discovery.failures or 0)+1 if discovery.failures>=5 then markRejected(\"too many invalid pairing proofs\")end handshake(from,{type=\"pair_reject\",session=packet.session,reason=\"phrase_mismatch\"})trace(\"discovery\",\"pair_rejected\",{from=from,reason=\"phrase_mismatch\"})return end local masterId=discovery.mode==\"master\"and(discovery.masterSide==\"initiator\"and id()or from)or\"\"local key,keyErr=linkKey(discovery.phrase,discovery.id,id(),from,packet.nonce)if not key then return markRejected(keyErr)end persistPair(from,key,{mode=discovery.mode,label=packet.label},masterId)local record={id=discovery.id,peer=from,joinNonce=packet.nonce,mode=discovery.mode,masterId=masterId,label=label(),expires=now()+DISCOVERY_TTL}record.confirmProof=confirmProof(discovery.phrase,record.id,id(),from,record.joinNonce,record.mode,record.masterId)discovery=nil setLast(\"paired\",\"awaiting pairing acknowledgement\")trace(\"discovery\",\"pair_join_verified\",{from=from,distance=distance})return queueConfirmation(from,record)end local function handlePairConfirm(packet,distance)if not discovery or discovery.state~=\"confirming\"or not discovery.candidate or packet.session~=discovery.candidate.session then return end local from=tostring(packet.from)if from~=tostring(discovery.candidate.from)or packet.nonce~=discovery.joinNonce then return rejectPacket(\"unexpected_pair_confirmation\",packet,nil,distance)end local expected=confirmProof(discovery.phrase,packet.session,from,id(),discovery.joinNonce,packet.mode==\"master\"and\"master\"or\"peer\",packet.master or\"\")if not password.constantTimeEqual(expected,packet.proof or\"\")then return markRejected(\"pair confirmation proof did not match\")end local key,err=linkKey(discovery.phrase,packet.session,from,id(),discovery.joinNonce)if not key then return markRejected(err)end persistPair(from,key,{mode=packet.mode,label=packet.label},packet.master)local sessionId=packet.session discovery=nil setLast(\"paired\",\"paired with \"..tostring(packet.label or from))handshake(from,{type=\"pair_ack\",session=sessionId,proof=password.hmacSha256(key,\"ceetos/pair/ack/v2|\"..sessionId)})trace(\"discovery\",\"pair_confirmed\",{from=from,distance=distance})return true end local function handlePairAck(packet)local record=confirmations[packet.session]if not record or tostring(record.peer)~=tostring(packet.from)then return end local value,peer=config(),activePeer(config(),record.peer)if not peer then return end local expected=password.hmacSha256(peer.key,\"ceetos/pair/ack/v2|\"..packet.session)if password.constantTimeEqual(expected,packet.proof or\"\")then confirmations[packet.session]=nil setLast(\"paired\",\"paired with \"..tostring(record.peer))routesDirty=true trace(\"discovery\",\"pair_acknowledged\",{from=packet.from})end end local function handleRouteAdvertisement(from,packet)local body=packet.body if type(body)~=\"table\"or type(body.sequence)~=\"number\"or type(body.members)~=\"table\"or(body.withdrawals~=nil and type(body.withdrawals)~=\"table\")then return rejectPacket(\"malformed_route_advertisement\",packet)end local key=tostring(from)M._routeSequences=M._routeSequences or{}if(M._routeSequences[key]or-1)>=body.sequence then return end M._routeSequences[key]=body.sequence local value,changed,count=config(),false,0 if body.controller and not value.controller then value.controller,changed=tostring(body.controller),true end local announced={}for advertisedId,meta in pairs(body.members)do count=count+1 if count>MAX_PACKET_TABLE then return rejectPacket(\"route_advertisement_too_large\",packet)end local peerId=tostring(advertisedId)announced[peerId]=true if peerId~=id()and peerId~=key and type(meta)==\"table\"then local hops=math.floor(tonumber(meta.hops)or 0)+1 if hops>1 and hops<=PACKET_TTL and type(meta.label)~=\"table\"and type(meta.mode)~=\"table\"then local bucket,found=routeBucket(peerId),nil for _,candidate in ipairs(bucket.candidates)do if tostring(candidate.next)==key then found=candidate;break end end if found then local metadataChanged=found.hops~=hops or found.label~=meta.label or found.mode~=meta.mode or tostring(found.masterId or\"\")~=tostring(meta.masterId or\"\")or found.kind~=(meta.kind or\"route\")found.hops,found.expires=hops,now()+ROUTE_TTL found.label,found.mode,found.masterId,found.kind=meta.label,meta.mode,meta.masterId,meta.kind or\"route\"if metadataChanged then changed=true end else bucket.candidates[#bucket.candidates+1]={next=key,hops=hops,expires=now()+ROUTE_TTL,label=type(meta.label)==\"string\"and meta.label:sub(1,128)or nil,mode=meta.mode==\"master\"and\"master\"or\"peer\",masterId=meta.masterId and tostring(meta.masterId)or nil,kind=meta.kind==\"mesh\"and\"mesh\"or\"route\"}table.sort(bucket.candidates,compareCandidates)while#bucket.candidates>ROUTE_CANDIDATE_LIMIT do table.remove(bucket.candidates)end changed=true end end end end local withdrawals=body.withdrawals or{}for _,withdrawnId in pairs(withdrawals)do count=count+1 if count>MAX_PACKET_TABLE then return rejectPacket(\"route_advertisement_too_large\",packet)end local bucket=routes[tostring(withdrawnId)]if bucket and type(bucket.candidates)==\"table\"then local kept={}for _,candidate in ipairs(bucket.candidates)do if tostring(candidate.next)~=key then kept[#kept+1]=candidate else changed=true end end bucket.candidates=kept end end if body.full==true then for peerId,bucket in pairs(routes)do if type(bucket.candidates)==\"table\"and not announced[tostring(peerId)]then local kept={}for _,candidate in ipairs(bucket.candidates)do if tostring(candidate.next)~=key then kept[#kept+1]=candidate else changed=true end end bucket.candidates=kept end end end if changed then if value.controller then save(value)end;routesDirty=true;trace(\"routing\",\"route_table_updated\",{from=from})end end local function handleProbe(from,packet)local token=type(packet.body)==\"table\"and packet.body.token if type(token)~=\"string\"or#token<16 or#token>128 then return rejectPacket(\"malformed link probe\",packet)end touchLink(from,nil,\"probe\")return send(from,{type=\"mesh_probe_ack\",body={token=token},request_id=newRequestId()},from)end local function handleProbeAck(from,packet)local health,token=healthFor(from),type(packet.body)==\"table\"and packet.body.token if not health.awaiting or token~=health.probeToken then return rejectPacket(\"unexpected link probe acknowledgement\",packet)end local sample=math.max(0,now()-(health.lastProbe or now()))health.rtt=health.rtt and math.floor((health.rtt*3+sample)/4)or sample health.awaiting,health.misses,health.probeToken=false,0,nil touchLink(from,health.lastDistance,\"probe_ack\")end function M.handle(event)if event[1]~=\"modem_message\"then return end local channel,packet,distance=event[3],event[5],event[6]local expected=false for _,item in ipairs(transport.channels or{})do if channel==item then expected=true;break end end if not expected then return rejectPacket(\"unexpected_channel\",packet,channel,distance)end transport.lastReceive,transport.lastDistance=now(),distance if type(packet)~=\"table\"then return rejectPacket(\"packet_not_table\",packet,channel,distance)end if packet.protocol==PUBLIC_UPDATE_PROTOCOL then if channel~=DISCOVERY_CHANNEL or not PUBLIC_UPDATE_TYPES[packet.type]or type(packet.from)~=\"string\"and type(packet.from)~=\"number\"or not(isForUs(packet.to)or isBroadcast(packet.to))then return rejectPacket(\"invalid_public_update_packet\",packet,channel,distance)end local encoded,encodeErr=canonical(packet.body or{})if not encoded then return rejectPacket(\"invalid_public_update_body:\"..tostring(encodeErr),packet,channel,distance)end trace(\"transport\",\"public_update_received\",{type=packet.type,from=packet.from,distance=distance,bytes=#encoded})if M.publicHandler then return M.publicHandler(packet,distance)end return end local discoveryPacket=packet.type==\"discover\"or packet.type==\"discover_query\"or packet.type==\"discover_cancel\"local handshakePacket=packet.type==\"pair_join\"or packet.type==\"pair_confirm\"or packet.type==\"pair_ack\"or packet.type==\"pair_reject\"local meshPacketType=packet.type==\"mesh_beacon\"or packet.type==\"mesh_edge_offer\"or packet.type==\"mesh_edge_accept\"if discoveryPacket then if packet.protocol~=PROTOCOL or channel~=DISCOVERY_CHANNEL then return rejectPacket(\"invalid_discovery_transport\",packet,channel,distance)end return handleDiscovery(packet,channel,distance)end if handshakePacket then if not isForUs(packet.to)then return end if packet.protocol~=PROTOCOL or channel~=(config().channel or CHANNEL)then return rejectPacket(\"invalid_handshake_transport\",packet,channel,distance)end if packet.type==\"pair_join\"then return handlePairJoin(packet,distance)elseif packet.type==\"pair_confirm\"then return handlePairConfirm(packet,distance)elseif packet.type==\"pair_ack\"then return handlePairAck(packet)elseif packet.type==\"pair_reject\"and discovery then markRejected(\"pairing rejected: \"..tostring(packet.reason or\"remote peer rejected it\"));return end return end if meshPacketType then if packet.protocol~=PROTOCOL or channel~=(config().channel or CHANNEL)then return rejectPacket(\"invalid mesh transport\",packet,channel,distance)end if packet.type~=\"mesh_beacon\"and not isForUs(packet.to)then return end return handleMeshPacket(packet,distance)end if not isForUs(packet.to)then return end local value=config()local valid,peerOrReason=verifyPacket(packet,value)if not valid then return rejectPacket(peerOrReason,packet,channel,distance)end local peer,from=peerOrReason,tostring(packet.from)if packet.confidential==true then local opened,openErr=openBody(peer,packet)if not opened then return rejectPacket(openErr or\"could not open confidential packet\",packet,channel,distance)end packet.body=opened end touchLink(from,distance,\"authenticated_packet\")if autoEdges[from]then autoEdges[from].expires=now()+ROUTE_TTL end trace(\"routing\",\"packet_received\",{type=packet.type,from=from,destination=packet.destination,distance=distance})if packet.type==\"mesh_enroll\"then return acceptEnrollment(from,peer,packet)end if packet.type==\"mesh_probe\"then return handleProbe(from,packet)end if packet.type==\"mesh_probe_ack\"then return handleProbeAck(from,packet)end if packet.type==\"route_advertise\"then return handleRouteAdvertisement(from,packet)end if packet.reply_to and packet.destination and tostring(packet.destination)~=id()then local reverse=reverseRoutes[packet.reply_to]if not reverse or reverse.expires<=now()or reverse.origin~=tostring(packet.destination)then return rejectPacket(\"reverse reply route unavailable\",packet,channel,distance)end local requestId=tostring(packet.request_id or\"\")if seenPackets[requestId]then return trace(\"routing\",\"forward_duplicate\",{from=from,type=packet.type})end seenPackets[requestId]=now()if(tonumber(packet.ttl)or 0)<=1 then return rejectPacket(\"TTL exhausted\",packet,channel,distance)end packet.ttl=packet.ttl-1 trace(\"routing\",\"reverse_reply_forwarded\",{from=from,to=reverse.previous,type=packet.type})return send(packet.destination,packet,reverse.previous)end if packet.destination and tostring(packet.destination)~=id()then local requestId=tostring(packet.request_id or\"\")if requestId==\"\"or seenPackets[requestId]then return trace(\"routing\",\"forward_duplicate\",{from=from,type=packet.type})end seenPackets[requestId]=now()local remembered,rememberErr=rememberReverse(packet,from)if not remembered then return rejectPacket(rememberErr or\"could not record reverse route\",packet,channel,distance)end if(tonumber(packet.ttl)or 0)<=1 then return rejectPacket(\"TTL exhausted\",packet,channel,distance)end packet.ttl=packet.ttl-1 return send(packet.destination,packet)end local requestId=tostring(packet.request_id or\"\")if requestId==\"\"then return rejectPacket(\"missing request ID\",packet,channel,distance)end if seenPackets[requestId]then return trace(\"routing\",\"destination_duplicate\",{from=from,type=packet.type})end seenPackets[requestId]=now()local remembered,rememberErr=rememberReverse(packet,from)if not remembered then return rejectPacket(rememberErr or\"could not record reverse route\",packet,channel,distance)end packet.authenticatedHop,packet.originVerified=from,false if M.handler then return M.handler(from,peer,packet)end end return M",
  ["ceetos/lib/network_ipc.lua"] = "local store=require(\"ceetos.lib.store\")local M={}local ROOT=\"/ceetos/data/network-ipc\"local COMMANDS=ROOT..\"/commands\"local RESULTS=ROOT..\"/results\"local function ensure(path)if not fs.exists(path)then fs.makeDir(path)end end local function safeId(value)return type(value)==\"string\"and value:match(\"^[%w_%-%.]+$\")and#value<=160 end local function path(directory,requestId)return fs.combine(directory,requestId..\".lua\")end function M.submit(request)if type(request)~=\"table\"or not safeId(request.id)then return false,\"invalid IPC request ID\"end ensure(ROOT);ensure(COMMANDS);ensure(RESULTS)local target=path(COMMANDS,request.id)if fs.exists(target)then return false,\"IPC request already exists\"end return store.write(target,request)end function M.take()ensure(ROOT);ensure(COMMANDS);ensure(RESULTS)local names=fs.list(COMMANDS)table.sort(names)for _,name in ipairs(names)do local requestId=name:match(\"^([%w_%-%.]+)%.lua$\")if requestId and safeId(requestId)then local target=fs.combine(COMMANDS,name)store.invalidate(target)local request=store.readFresh(target,nil)fs.delete(target)if type(request)==\"table\"and request.id==requestId then return request end end end end function M.reply(requestId,value)if not safeId(requestId)or type(value)~=\"table\"then return false,\"invalid IPC result\"end ensure(ROOT);ensure(COMMANDS);ensure(RESULTS)return store.write(path(RESULTS,requestId),value)end function M.poll(requestId,consume)if not safeId(requestId)then return nil,\"invalid IPC request ID\"end local target=path(RESULTS,requestId)if not fs.exists(target)then return nil end local handle=fs.open(target,\"r\")if not handle then return nil end local raw=handle.readAll()handle.close()local ok,result=pcall(textutils.unserialise,raw)if not ok or type(result)~=\"table\"or result.id~=requestId then return nil,\"invalid IPC result\"end if consume then fs.delete(target)end return result end function M.prune(limit)ensure(ROOT);ensure(COMMANDS);ensure(RESULTS)limit=math.max(1,math.floor(tonumber(limit)or 32))local names={}for _,name in ipairs(fs.list(RESULTS))do if name:match(\"^[%w_%-%.]+%.lua$\")then names[#names+1]=name end end table.sort(names)while#names>limit do fs.delete(fs.combine(RESULTS,table.remove(names,1)))end end function M.status()ensure(ROOT);ensure(COMMANDS);ensure(RESULTS)local function count(directory)local total=0 for _,name in ipairs(fs.list(directory))do if name:match(\"^[%w_%-%.]+%.lua$\")then total=total+1 end end return total end return{commands=count(COMMANDS),results=count(RESULTS)}end return M",
  ["ceetos/lib/auth_client.lua"] = "local store=require(\"ceetos.lib.store\")local password=require(\"ceetos.lib.password\")local networkIpc=require(\"ceetos.lib.network_ipc\")local M={}local REPLIES=\"/ceetos/data/auth-replies.lua\"local sequence=0 local function now()return os.epoch(\"utc\")end local function authority()store.invalidate(\"/ceetos/data/auth-authority.lua\")local value=store.read(\"/ceetos/data/auth-authority.lua\",nil)return type(value)==\"table\"and value.active==true and value or nil end local function requestId(kind)sequence=sequence+1 return table.concat({\"auth\",kind,tostring(os.getComputerID()),tostring(now()),tostring(sequence)},\"-\")end local function take(id)store.invalidate(REPLIES)local replies=store.read(REPLIES,{})local row=replies[id]if row then replies[id]=nil;store.write(REPLIES,replies)end return row end function M.receive(body)if type(body)~=\"table\"or type(body.request_id)~=\"string\"or#body.request_id>160 then return false,\"invalid authority reply\"end local replies=store.read(REPLIES,{})replies[body.request_id]={ok=body.ok==true,result=body.result,error=body.error,at=now()}local rows={}for id,row in pairs(replies)do rows[#rows+1]={id=id,at=tonumber(row.at)or 0}end table.sort(rows,function(a,b)return a.at>b.at end)while#rows>32 do replies[table.remove(rows).id]=nil end return store.write(REPLIES,replies)end local function send(typeName,body,timeout)local server=authority()if not server then return nil,\"no Auth Server is reachable\"end local id=body.request_id or requestId(typeName)body.request_id=id local command={id=\"auth-\"..id,action=\"auth_send\",target=server.id,type=typeName,body=body}local ok,err=networkIpc.submit(command)if not ok then return nil,err or\"could not reach CeetOS network service\"end local deadline=now()+(timeout or 6000)while now()<deadline do local ack=networkIpc.poll(command.id,true)if ack and ack.ok~=true then return nil,ack.error or\"Auth Server request was not sent\"end local reply=take(id)if reply then return reply.ok and reply.result or nil,reply.error or\"Auth Server rejected request\"end sleep(0.05)end return nil,\"Auth Server did not respond\"end local function loginProof(verifier,server,request,challenge,expires)return password.hmacSha256(verifier,table.concat({\"ceetos/auth/login/v1\",tostring(server),tostring(os.getComputerID()),tostring(request),tostring(challenge),tostring(expires)},\"|\"))end function M.login(name,plainPassword)if type(name)~=\"string\"or type(plainPassword)~=\"string\"then return false,\"invalid credentials\"end local cloud=require(\"ceetos.lib.cloud_sync\")if cloud.authOnline()then return cloud.login(name,plainPassword)end local request=requestId(\"begin\")local begin,beginErr=send(\"auth_login_begin\",{request_id=request,username=name,node=tostring(os.getComputerID())})if not begin then return false,beginErr end local verifier,deriveErr=password.derive(plainPassword,begin.salt,begin.workFactor)if not verifier then return false,deriveErr end local proof=loginProof(verifier,begin.authority,request,begin.challenge,begin.expires)local result,proofErr=send(\"auth_login_proof\",{request_id=request,username=name,node=tostring(os.getComputerID()),challenge=begin.challenge,proof=proof})if not result then return false,proofErr end local auth=require((\"ceetos.lib.auth\"))local saved,saveErr=auth.saveCentralSession(result.session)if not saved then return false,saveErr end if type(result.directory)==\"table\"then auth.updateDirectory(result.directory,result.revision)end return true end function M.mutate(action,fields)local auth=require((\"ceetos.lib.auth\"))local cloud=require(\"ceetos.lib.cloud_sync\")if cloud.authOnline()then return cloud.mutate(action,fields)end local current,server=auth.refreshSession(),authority()if not current or not current.central or not server then return false,\"an Auth Server login is required\"end local result,err=send(\"auth_mutate\",{action=action,fields=fields,session=current.nonce,node=tostring(os.getComputerID()),revision=current.accountRevision})if not result then return false,err end if type(result.directory)==\"table\"then auth.updateDirectory(result.directory,result.revision)end return true end return M",
  ["ceetos/lib/jobs.lua"] = "local store=require(\"ceetos.lib.store\")local audit=require(\"ceetos.lib.audit\")local M={}local PATH,WORKERS_PATH=\"/ceetos/data/jobs.lua\",\"/ceetos/data/job-workers.lua\"local HISTORY_LIMIT,OUTPUT_LIMIT=48,4096 local HEARTBEAT_TIMEOUT,DEFAULT_CAPACITY=15000,1 local DEFAULT_TIMEOUT,DEFAULT_ATTEMPTS=60000,2 local context=nil local function now()if context and context.now then return context.now()end return os.epoch(\"utc\")end local function localId()if context and(context.id~=nil or context.nodeId~=nil)then return tostring(context.id or context.nodeId)end return tostring(os.getComputerID())end local function backend()return context and context.store or store end local function paths()return context and context.path or PATH,context and context.workersPath or WORKERS_PATH end local function log(action,detail)if not(context and context.noAudit~=false)then audit.log(\"system\",action,detail)end end local function copy(value,seen)if type(value)~=\"table\"then return value end seen=seen or{}if seen[value]then return seen[value]end local result={};seen[value]=result for key,item in pairs(value)do result[copy(key,seen)]=copy(item,seen)end return result end local function clampNumber(value,low,high,fallback)value=tonumber(value)if not value then return fallback end return math.max(low,math.min(high,math.floor(value)))end local function cleanOutput(value)value=tostring(value or\"\")if#value>OUTPUT_LIMIT then return value:sub(1,OUTPUT_LIMIT)..\"\\n[output truncated]\"end return value end local function defaultState()return{controller=(context and context.controllerId and tostring(context.controllerId))or localId(),capacity=DEFAULT_CAPACITY,workers={},templates={},queue={},running={},schedules={},history={},sequence=0,fair=0,}end local function normalise(data)data=type(data)==\"table\"and data or defaultState()local defaults=defaultState()for key,value in pairs(defaults)do if data[key]==nil then data[key]=value end end data.controller=tostring(data.controller or localId())data.capacity=clampNumber(data.capacity,1,32,DEFAULT_CAPACITY)data.workers,data.templates,data.queue=data.workers or{},data.templates or{},data.queue or{}data.running,data.schedules,data.history=data.running or{},data.schedules or{},data.history or{}data.sequence,data.fair=tonumber(data.sequence)or 0,tonumber(data.fair)or 0 return data end local function load()local mainPath,workersPath=paths()local disk=backend()if disk.invalidate then disk.invalidate(mainPath);disk.invalidate(workersPath)end local data=normalise(disk.read(mainPath,defaultState()))data.workers=disk.read(workersPath,data.workers or{})or{}return normalise(data)end local function save(data)local mainPath,workersPath=paths()local disk=backend()local workers=data.workers or{}local main=copy(data);main.workers=nil disk.write(mainPath,main)disk.write(workersPath,copy(workers))end local function nextId(data,prefix)data.sequence=data.sequence+1 return string.format(\"%s-%s-%d\",prefix,tostring(now()),data.sequence)end local function findQueue(data,jobId)for index,job in ipairs(data.queue)do if job.id==jobId then return index,job end end end local function finish(data,job,status,result)data.running[job.id]=nil local worker=job.worker and data.workers[tostring(job.worker)]if worker then worker.inFlight=math.max(0,(tonumber(worker.inFlight)or 0)-1)end job.status,job.finished,job.result=status,now(),result or{}job.result.output=cleanOutput(job.result.output or job.result.stdout or\"\")data.history[#data.history+1]=job local limit=(context and tonumber(context.historyLimit))or HISTORY_LIMIT while#data.history>limit do table.remove(data.history,1)end end local function addJob(data,templateName,scheduleId)local template=data.templates[templateName]assert(template and template.enabled~=false,\"template unavailable\")local job={id=nextId(data,\"job\"),template=templateName,revision=template.revision,command=template.command,scheduleId=scheduleId,created=now(),status=\"queued\",attempts=0,retrySafe=template.retrySafe==true,maxAttempts=template.maxAttempts,}data.queue[#data.queue+1]=job return job end function M.state()return copy(load())end function M.setController(value)assert(value~=nil and tostring(value)~=\"\",\"controller id required\")local data=load();data.controller=tostring(value);save(data)log(\"jobs_controller\",data.controller)return data.controller end function M.controller()return load().controller end function M.isController()return M.controller()==localId()end local function requireController()assert(M.isController(),\"controller required\")end function M.setCapacity(value)local data=load();data.capacity=clampNumber(value,1,32,DEFAULT_CAPACITY);save(data)return data.capacity end function M.heartbeat(peer,status)assert(peer~=nil and tostring(peer)~=\"\",\"worker id required\")status=type(status)==\"table\"and status or{}local data,id=load(),tostring(peer)local old=data.workers[id]or{}data.workers[id]={id=id,label=status.label or old.label or id,capacity=clampNumber(status.capacity,1,32,old.capacity or DEFAULT_CAPACITY),inFlight=clampNumber(status.inFlight,0,32,old.inFlight or 0),queueDepth=clampNumber(status.queueDepth,0,1024,0),route=status.route or old.route,hops=clampNumber(status.hops or status.routeHops,0,32,old.hops or 99),available=status.available~=false,lastSeen=now(),lastError=status.lastError,}save(data)return copy(data.workers[id])end M.updateWorker=M.heartbeat function M.workers()local data,at,result=load(),now(),{}for id,worker in pairs(data.workers)do local row=copy(worker)row.healthy=row.available~=false and at-(row.lastSeen or 0)<=HEARTBEAT_TIMEOUT row.slots=math.max(0,(row.capacity or DEFAULT_CAPACITY)-(row.inFlight or 0))result[id]=row end return result end function M.addTemplate(name,command,options)requireController()if type(name)==\"table\"then options,command,name=name,name.command,name.id or name.name end assert(type(name)==\"string\"and name:match(\"^[%w_%-]+$\"),\"invalid template name\")assert(type(command)==\"string\"and#command>0 and#command<=512,\"invalid fixed command\")options=type(options)==\"table\"and options or{}local data=load()assert(not data.templates[name],\"template already exists\")data.templates[name]={name=name,command=command,enabled=options.enabled~=false,timeout=clampNumber(options.timeout,1000,600000,DEFAULT_TIMEOUT),retrySafe=options.retrySafe==true,maxAttempts=clampNumber(options.maxAttempts,1,5,DEFAULT_ATTEMPTS),revision=nextId(data,\"template\"),created=now(),}save(data);log(\"jobs_template_added\",name)return copy(data.templates[name])end function M.listTemplates()return copy(load().templates)end function M.setTemplateRetrySafe(name,enabled)requireController()local data=load();assert(data.templates[name],\"unknown template\")data.templates[name].retrySafe=enabled==true;save(data)return copy(data.templates[name])end function M.setTemplateEnabled(name,enabled)requireController()local data=load();assert(data.templates[name],\"unknown template\")data.templates[name].enabled=enabled~=false;save(data)return copy(data.templates[name])end function M.removeTemplate(name)requireController()local data=load();assert(data.templates[name],\"unknown template\")for _,job in ipairs(data.queue)do assert(job.template~=name,\"template has queued jobs\")end for _,job in pairs(data.running)do assert(job.template~=name,\"template has running jobs\")end for _,schedule in pairs(data.schedules)do assert(schedule.template~=name or not schedule.enabled,\"template has active schedule\")end data.templates[name]=nil;save(data);log(\"jobs_template_removed\",name)return true end function M.enqueue(templateName,scheduleId)requireController()local data,job=load(),nil job=addJob(data,templateName,scheduleId)save(data)return copy(job)end function M.selectWorker()local data,at,candidates=load(),now(),{}for id,worker in pairs(data.workers)do local healthy=worker.available~=false and at-(worker.lastSeen or 0)<=HEARTBEAT_TIMEOUT local capacity,inFlight=worker.capacity or DEFAULT_CAPACITY,worker.inFlight or 0 if healthy and inFlight<capacity then candidates[#candidates+1]={id=id,worker=worker,load=inFlight/capacity,hops=tonumber(worker.hops)or tonumber(worker.routeHops)or 99}end end table.sort(candidates,function(a,b)if a.load~=b.load then return a.load<b.load end if a.hops~=b.hops then return a.hops<b.hops end return a.id<b.id end)if#candidates==0 then return nil end local best,count=candidates[1],1 while candidates[count+1]and candidates[count+1].load==best.load and candidates[count+1].hops==best.hops do count=count+1 end local chosen=candidates[(data.fair%count)+1]return copy(chosen.worker)end function M.dispatchNext()local job,worker=M.nextDispatch(),M.selectWorker()if not job or not worker then return nil,job and\"no healthy worker\"or\"no queued job\"end local assigned=M.assign(job,worker.id)if context and type(context.execute)==\"function\"then local template=M.listTemplates()[assigned.template]local ok,first,second=pcall(context.execute,copy(worker),copy(template),copy(assigned))if not ok then return M.fail(assigned.id,first)end if first==false then return M.fail(assigned.id,second or\"worker rejected job\")end if type(first)==\"table\"then return M.complete(assigned.id,first)end end return assigned end function M.run(templateName,scheduleId)assert(scheduleId==nil or type(scheduleId)==\"string\",\"runtime job arguments are not allowed\")local job=M.enqueue(templateName,scheduleId)local dispatched,reason=M.dispatchNext()return dispatched or job,reason end function M.nextDispatch()local data=load()for _,job in ipairs(data.queue)do if job.status==\"queued\"then return copy(job)end end return nil end function M.assign(jobValue,workerValue)local data,jobId,workerId=load(),type(jobValue)==\"table\"and jobValue.id or jobValue,tostring(workerValue)local index,job=findQueue(data,jobId)assert(job and job.status==\"queued\",\"job is not queued\")local worker=data.workers[workerId]assert(worker,\"unknown worker\")assert(worker.available~=false and now()-(worker.lastSeen or 0)<=HEARTBEAT_TIMEOUT,\"worker unavailable\")assert((worker.inFlight or 0)<(worker.capacity or DEFAULT_CAPACITY),\"worker saturated\")table.remove(data.queue,index)job.status,job.worker,job.started=\"running\",workerId,now()job.attempts=(job.attempts or 0)+1 job.deadline=job.started+(data.templates[job.template].timeout or DEFAULT_TIMEOUT)data.running[job.id]=job;worker.inFlight=(worker.inFlight or 0)+1 data.fair=data.fair+1 save(data)return copy(job)end function M.complete(jobId,result,stdout,stderr)local data,job=load(),nil job=data.running[jobId];assert(job,\"unknown running job\")if result==false then return M.fail(jobId,stderr or stdout or\"worker failed\")end local payload if type(result)==\"table\"then payload=copy(result)elseif stdout~=nil or stderr~=nil then payload={ok=result~=false,stdout=tostring(stdout or\"\"),stderr=tostring(stderr or\"\"),output=tostring(stdout or\"\")}else payload={output=tostring(result or\"\")}end finish(data,job,\"complete\",payload)save(data)return copy(job)end function M.fail(jobId,reason)local data,job=load(),nil job=data.running[jobId];assert(job,\"unknown running job\")data.running[job.id]=nil local worker=job.worker and data.workers[tostring(job.worker)]if worker then worker.inFlight=math.max(0,(worker.inFlight or 0)-1)end if job.retrySafe and(job.attempts or 0)<(job.maxAttempts or DEFAULT_ATTEMPTS)then job.status,job.worker,job.deadline=\"queued\",nil,nil job.lastError,job.updated=tostring(reason or\"failed\"),now()data.queue[#data.queue+1]=job save(data)return copy(job),true end finish(data,job,\"failed\",{error=tostring(reason or\"failed\")})save(data)return copy(job),false end function M.schedule(templateName,interval)requireController()interval=tonumber(interval)assert(interval and interval>=1 and interval<=86400,\"interval must be 1..86400 seconds\")local data=load()assert(data.templates[templateName],\"unknown template\")local id=nextId(data,\"schedule\")data.schedules[id]={id=id,template=templateName,interval=interval*1000,enabled=true,nextRun=now()+interval*1000,created=now()}save(data);log(\"jobs_schedule_added\",id)return copy(data.schedules[id])end function M.cancel(scheduleId)requireController()local data=load();assert(data.schedules[scheduleId],\"unknown schedule\")data.schedules[scheduleId].enabled=false;data.schedules[scheduleId].cancelled=now();save(data)return true end function M.history()return copy(load().history)end function M.queue()return copy(load().queue)end function M.running()return copy(load().running)end function M.localStatus()local data=load()return{id=localId(),controller=data.controller,capacity=data.capacity,inFlight=(function()local total=0;for _ in pairs(data.running)do total=total+1 end;return total end)(),queueDepth=#data.queue}end function M.syncTemplates(controllerId,templates)assert(controllerId~=nil and tostring(controllerId)~=\"\",\"controller id required\")assert(type(templates)==\"table\",\"template snapshot required\")local data=load();data.controller,data.templates=tostring(controllerId),{}for name,template in pairs(templates)do assert(type(name)==\"string\"and type(template)==\"table\"and type(template.command)==\"string\",\"invalid template snapshot\")data.templates[name]={name=name,command=template.command,enabled=template.enabled~=false,timeout=clampNumber(template.timeout,1000,600000,DEFAULT_TIMEOUT),retrySafe=template.retrySafe==true,maxAttempts=clampNumber(template.maxAttempts,1,5,DEFAULT_ATTEMPTS),revision=template.revision or\"synced\",created=template.created or now(),}end save(data)return copy(data.templates)end M.scheduleInterval=M.schedule function M.tick()local data,at,added,timedOut,stale=load(),now(),0,0,0 for _,schedule in pairs(data.schedules)do if M.isController()and schedule.enabled and at>=(schedule.nextRun or at)then addJob(data,schedule.template,schedule.id);added=added+1 repeat schedule.nextRun=(schedule.nextRun or at)+schedule.interval until schedule.nextRun>at end end for _,worker in pairs(data.workers)do if worker.available~=false and at-(worker.lastSeen or 0)>HEARTBEAT_TIMEOUT then worker.stale=true;stale=stale+1 end end local expired={}for id,job in pairs(data.running)do if at>=(job.deadline or at)then expired[#expired+1]=id end end for _,id in ipairs(expired)do local job=data.running[id]if job then timedOut=timedOut+1;data.running[id]=nil local worker=job.worker and data.workers[tostring(job.worker)]if worker then worker.inFlight=math.max(0,(worker.inFlight or 0)-1)end if job.retrySafe and(job.attempts or 0)<(job.maxAttempts or DEFAULT_ATTEMPTS)then job.status,job.worker,job.deadline,job.lastError=\"queued\",nil,nil,\"timeout\";data.queue[#data.queue+1]=job else finish(data,job,\"failed\",{error=\"timeout\"})end end end if added>0 or timedOut>0 or stale>0 then save(data)end if context and type(context.execute)==\"function\"then M.dispatchNext()end return{enqueued=added,timedOut=timedOut,staleWorkers=stale}end function M.new(options)options=options or{}local service={}local names={\"state\",\"setController\",\"controller\",\"isController\",\"setCapacity\",\"heartbeat\",\"updateWorker\",\"workers\",\"addTemplate\",\"listTemplates\",\"setTemplateRetrySafe\",\"setTemplateEnabled\",\"removeTemplate\",\"syncTemplates\",\"enqueue\",\"run\",\"nextDispatch\",\"selectWorker\",\"dispatchNext\",\"assign\",\"complete\",\"fail\",\"tick\",\"schedule\",\"scheduleInterval\",\"cancel\",\"history\",\"queue\",\"running\",\"localStatus\",}local function invoke(fn,...)local prior=context;context=options local result={pcall(fn,...)}context=prior if not result[1]then error(result[2],0)end return table.unpack(result,2)end for _,name in ipairs(names)do service[name]=function(...)local args={...}if args[1]==service then table.remove(args,1)end return invoke(M[name],table.unpack(args))end end return service end return M",
  ["ceetos/lib/peripherals.lua"] = "local store=require(\"ceetos.lib.store\")local audit=require(\"ceetos.lib.audit\")local M={}local PATH=\"/ceetos/data/shares.lua\"local SAFE={getItemDetail=true,list=true,size=true,getMetadata=true,getType=true,getMethods=true,getInput=true,getOutput=true,getAngles=true,getVelocity=true,getHeight=true,getAirPressure=true,getSpeed=true,getStress=true,getStressCapacity=true,stock=true,getStockItemDetail=true,getConfiguration=true,getAddress=true,}local function requestMatchesGrid(request,slots)if type(request)~=\"table\"then return false,\"redstone requester did not return its encoded request\"end local exact=true for slot=1,9 do local expected=slots[slot]if expected and expected~=\"minecraft:air\"then local actual=request[slot]or request[tostring(slot)]if type(actual)~=\"table\"or actual.name~=expected then exact=false;break end end end if exact then return true end local expected,actual={},{}for slot=1,9 do if slots[slot]and slots[slot]~=\"minecraft:air\"then expected[#expected+1]=slots[slot]end end for key,value in pairs(request)do local index=tonumber(key)if index and type(value)==\"table\"and type(value.name)==\"string\"and value.name~=\"minecraft:air\"then actual[#actual+1]={index=index,name=value.name}end end table.sort(actual,function(a,b)return a.index<b.index end)if#actual~=#expected then return false,\"redstone requester retained an incomplete crafting request\"end for index,item in ipairs(actual)do if item.name~=expected[index]then return false,\"redstone requester retained different crafting ingredients\"end end return true end local function shares()return store.read(PATH,{})end local function save(s)store.write(PATH,s)end local function safeMethods(name)local out={}local available=peripheral.getMethods and peripheral.getMethods(name)or nil if available then for _,method in ipairs(available)do if SAFE[method]then out[#out+1]=method end end else for method in pairs(SAFE)do out[#out+1]=method end end table.sort(out)return out end function M.listLocal()local result={}for _,name in ipairs(peripheral.getNames())do result[#result+1]={name=name,type=peripheral.getType(name)}end return result end function M.share(name,mode)assert(peripheral.isPresent(name),\"peripheral is not present\")assert(mode==\"peer\"or mode==\"master\",\"mode must be peer or master\")local s=shares()s[name]={mode=mode,methods=SAFE}save(s)audit.log(\"local\",\"peripheral.share\",{name=name,mode=mode})end function M.unshare(name)local s=shares();s[name]=nil;save(s)audit.log(\"local\",\"peripheral.unshare\",{name=name})end function M.shareAll(mode)assert(mode==\"peer\"or mode==\"master\",\"mode must be peer or master\")local count=0 for _,item in ipairs(M.listLocal())do M.share(item.name,mode);count=count+1 end audit.log(\"local\",\"peripheral.share_all\",{mode=mode,count=count})return count end function M.unshareAll()local s,count=shares(),0 for name in pairs(s)do s[name],count=nil,count+1 end save(s)audit.log(\"local\",\"peripheral.unshare_all\",{count=count})return count end function M.describe()local s,result=shares(),{}for name,spec in pairs(s)do if peripheral.isPresent(name)then result[#result+1]={name=name,type=peripheral.getType(name),mode=spec.mode,methods=safeMethods(name)}end end return result end function M.call(peerIsMaster,name,method,args)local spec=shares()[name]if not spec or not peripheral.isPresent(name)then return false,\"not shared\"end if spec.mode==\"master\"and not peerIsMaster then return false,\"master-only peripheral\"end if not spec.methods[method]then return false,\"method not allowed\"end local api=peripheral.wrap(name)if type(api[method])~=\"function\"then return false,\"method unavailable\"end local ok,result=pcall(api[method],table.unpack(args or{}))return ok,result end function M.craftRequest(peerIsMaster,name,address,filters)local spec=shares()[name]local localAccess=peerIsMaster==\"local\"if not peripheral.isPresent(name)then return false,\"stock ticker is unavailable\"end if not localAccess and not spec then return false,\"stock ticker is not shared\"end if not localAccess and spec.mode==\"master\"and not peerIsMaster then return false,\"master-only peripheral\"end if type(address)~=\"string\"or#address<1 or#address>64 or address:find(\"[%z\\1-\\31\\127]\")then return false,\"invalid destination address\"end if type(filters)~=\"table\"or#filters<1 or#filters>32 then return false,\"invalid craft filters\"end local clean={}for index,filter in ipairs(filters)do if type(filter)~=\"table\"or type(filter.name)~=\"string\"or#filter.name>128 then return false,\"invalid item filter \"..tostring(index)end local count=tonumber(filter._requestCount or filter.count)if not count or count<1 or count>256 or count~=math.floor(count)then return false,\"invalid request count\"end clean[index]={name=filter.name,_requestCount=count}end local api=peripheral.wrap(name)if not api or type(api.requestFiltered)~=\"function\"then return false,\"stock ticker requestFiltered is unavailable\"end local ok,result=pcall(api.requestFiltered,address,table.unpack(clean))if ok then audit.log(\"network\",\"peripheral.craft_request\",{name=name,address=address,filters=#clean})end return ok,result end function M.craftingRecipeRequest(peerIsMaster,name,address,batches,grid)local spec=shares()[name]local localAccess=peerIsMaster==\"local\"if not peripheral.isPresent(name)then return false,\"redstone requester is unavailable\"end if not localAccess and not spec then return false,\"redstone requester is not shared\"end if not localAccess and spec.mode==\"master\"and not peerIsMaster then return false,\"master-only peripheral\"end if type(address)~=\"string\"or#address<1 or#address>64 or address:find(\"[%z\\1-\\31\\127]\")then return false,\"invalid craft address\"end batches=tonumber(batches)if not batches or batches<1 or batches>256 or batches~=math.floor(batches)then return false,\"invalid craft batches\"end if type(grid)~=\"table\"then return false,\"invalid crafting grid\"end local slots={}for slot=1,9 do local value=grid[slot]if value~=nil and value~=false and(type(value)~=\"string\"or#value>128)then return false,\"invalid craft grid slot\"end slots[slot]=(value==nil or value==false)and\"minecraft:air\"or value end local api=peripheral.wrap(name)if not api or type(api.setCraftingRequest)~=\"function\"or type(api.setAddress)~=\"function\"or type(api.request)~=\"function\"then return false,\"redstone requester crafting API is unavailable\"end local ok,result=pcall(function()if type(api.setConfiguration)==\"function\"then api.setConfiguration(\"strict\")end api.setCraftingRequest(batches,slots[1],slots[2],slots[3],slots[4],slots[5],slots[6],slots[7],slots[8],slots[9])api.setAddress(address)local configured=nil if type(api.getRequest)==\"function\"then configured=api.getRequest()local retained,retainError=requestMatchesGrid(configured,slots)if not retained then error(retainError)end end if type(api.getAddress)==\"function\"and api.getAddress()~=address then error(\"redstone requester did not retain the craft address\")end local submitted=api.request()if submitted==false then error(\"redstone requester rejected the crafting request\")end return{submitted=true,strict=type(api.setConfiguration)==\"function\",configured=configured~=nil,address=address}end)if ok then audit.log(\"network\",\"peripheral.crafting_recipe_request\",{name=name,address=address,batches=batches})end return ok,result end return M",
  ["ceetos/lib/telemetry.lua"] = "local store=require(\"ceetos.lib.store\")local M={}local PATH=\"/ceetos/data/config.lua\"local function config()return store.read(PATH,{telemetry=false})end local function save(c)store.write(PATH,c)end function M.setEnabled(value)local c=config();c.telemetry=value;save(c)end function M.status()return config().telemetry==true end function M.configuration()local c=config()return{enabled=c.telemetry==true,dashboardUrl=c.dashboard_url,pollUrl=c.dashboard_poll_url,terminal=c.dashboard_terminal==true}end function M.configure(url,pollUrl,token,terminal)local c=config()c.dashboard_url,c.dashboard_poll_url,c.dashboard_token=url,pollUrl,token c.dashboard_terminal=terminal==true save(c)end function M.snapshot(activity)local data={ts=os.epoch(\"utc\"),id=os.getComputerID(),label=os.getComputerLabel(),activity=activity,fuel=turtle and turtle.getFuelLevel()or nil}if gps then local x,y,z=gps.locate(0.2)if x then data.gps={x=x,y=y,z=z}end end return data end function M.post(activity)local c=config()if not c.telemetry or not http or not c.dashboard_url or not c.dashboard_token then return false end local body=textutils.serialiseJSON(M.snapshot(activity))local ok,response=pcall(http.post,c.dashboard_url,body,{[\"Content-Type\"]=\"application/json\",[\"Authorization\"]=\"Bearer \"..c.dashboard_token})if ok and response then response.close();return true end return false end function M.postResult(jobId,payload)local c=config()if not http or not c.dashboard_url or not c.dashboard_token or type(jobId)~=\"string\"then return false end local body=payload or{}body.id=jobId local ok,response=pcall(http.post,c.dashboard_url:gsub(\"/telemetry$\",\"/result\"),textutils.serialiseJSON(body),{[\"Content-Type\"]=\"application/json\",[\"Authorization\"]=\"Bearer \"..c.dashboard_token})if ok and response then response.close();return true end return false end function M.poll(run)local c=config()if not http or not c.dashboard_poll_url or not c.dashboard_token then return end local url=c.dashboard_poll_url..\"?id=\"..textutils.urlEncode(tostring(os.getComputerID()))local ok,response=pcall(http.get,url,{[\"Authorization\"]=\"Bearer \"..c.dashboard_token})if not ok or not response then return end local decoded=textutils.unserialiseJSON(response.readAll());response.close()for _,job in ipairs((decoded and decoded.jobs)or{})do run(job)end end return M",
  ["ceetos/lib/cloud.lua"] = "local store=require(\"ceetos.lib.store\")local password=require(\"ceetos.lib.password\")local profile=require(\"ceetos.lib.profile\")local M={}M.PATH=\"/ceetos/data/cloud.lua\"M.MAX_BODY=48*1024 M.MAX_RESPONSE=64*1024 M.DEFAULTS={auth=\"https://auth.ceet.uk\",recipe=\"https://recipe.ceet.uk\",dashboard=\"https://dash.ceet.uk\",}local function now()return os.epoch(\"utc\")end local function validUrl(value)if type(value)~=\"string\"or#value>160 then return false end return value:match(\"^https://[%w%-%.]+%.ceet%.uk$\")~=nil end local function validId(value)return type(value)==\"string\"and value:match(\"^[%w_.%-]+$\")~=nil and#value<=96 end local function copy(value)local out={}for key,item in pairs(value or{})do out[key]=item end return out end local function normalise(value)value=type(value)==\"table\"and value or{}local urls=type(value.urls)==\"table\"and value.urls or{}local result={schema=1,enabled=value.enabled==true,urls={auth=validUrl(urls.auth)and urls.auth or M.DEFAULTS.auth,recipe=validUrl(urls.recipe)and urls.recipe or M.DEFAULTS.recipe,dashboard=validUrl(urls.dashboard)and urls.dashboard or M.DEFAULTS.dashboard,},node=type(value.node)==\"table\"and copy(value.node)or nil,}if result.node and(not validId(result.node.id)or type(result.node.secret)~=\"string\"or#result.node.secret<32 or#result.node.secret>192)then result.node=nil end return result end function M.load()store.invalidate(M.PATH)return normalise(store.read(M.PATH,{}))end function M.save(value)local clean=normalise(value)return store.write(M.PATH,clean)end function M.configure(urls)local value=M.load()urls=type(urls)==\"table\"and urls or{}for key in pairs(M.DEFAULTS)do if urls[key]~=nil then if not validUrl(urls[key])then return false,\"invalid \"..key..\" cloud URL\"end value.urls[key]=urls[key]end end return M.save(value)end function M.clear()local value=M.load();value.enabled,value.node=false,nil return M.save(value)end function M.publicStatus()local value=M.load()return{enabled=value.enabled,enrolled=value.node~=nil,node=value.node and value.node.id or nil,urls=copy(value.urls),profile=profile.id()}end local function readBounded(handle,limit)local chunks,total={},0 while true do local part=handle.read(math.min(4096,limit-total+1))if not part or part==\"\"then break end total=total+#part if total>limit then return nil,\"cloud response is too large\"end chunks[#chunks+1]=part end return table.concat(chunks)end local function json(value)local ok,result=pcall(textutils.unserialiseJSON,value)return ok and type(result)==\"table\"and result or nil end local function canonical(node,timestamp,nonce,method,path,body)local digest=assert(password.sha256(body))return table.concat({\"ceetos-cloud-node-v1\",node,tostring(timestamp),nonce,method,path,digest},\"\\n\")end local nonceCounter=0 local function nonce()nonceCounter=nonceCounter+1 return password.newSalt(\"cloud:\"..tostring(nonceCounter))end local function perform(url,method,path,body,headers)if not http or type(http.post)~=\"function\"then return nil,\"HTTP is unavailable\"end local response local ok,err=pcall(function()response=http.post(url..path,body,headers)end)if not ok or not response then return nil,tostring(err or\"cloud request failed\")end local raw,readErr=readBounded(response,M.MAX_RESPONSE)pcall(response.close)if not raw then return nil,readErr end local decoded=json(raw)if not decoded then return nil,\"cloud returned invalid JSON\"end if decoded.ok==false then return nil,tostring(decoded.error or\"cloud rejected request\"):sub(1,180)end return decoded end function M.enroll(code)if type(code)~=\"string\"or#code<12 or#code>128 or code:find(\"[%z\\1-\\31\\127]\")then return nil,\"invalid enrollment code\"end local value=M.load()local payload=textutils.serialiseJSON({code=code,profile=profile.id(),label=os.getComputerLabel()or(\"Computer \"..tostring(os.getComputerID())),computerId=tostring(os.getComputerID())})if#payload>M.MAX_BODY then return nil,\"enrollment request is too large\"end local result,err=perform(value.urls.auth,\"POST\",\"/v1/nodes/enroll\",payload,{[\"Content-Type\"]=\"application/json\"})if not result then return nil,err end if type(result.node)~=\"table\"or not validId(result.node.id)or type(result.node.secret)~=\"string\"or#result.node.secret<32 then return nil,\"cloud returned invalid enrollment\"end value.enabled,value.node=true,{id=result.node.id,secret=result.node.secret,enrolledAt=now()}local saved,saveErr=M.save(value)if not saved then return nil,saveErr or\"could not save cloud enrollment\"end return M.publicStatus()end function M.call(service,path,payload)local value=M.load()if not value.enabled or not value.node then return nil,\"cloud node is not enrolled\"end if not M.DEFAULTS[service]or type(path)~=\"string\"or not path:match(\"^/v1/[%w%-%._/]+$\")or#path>128 then return nil,\"invalid cloud endpoint\"end local body=textutils.serialiseJSON(type(payload)==\"table\"and payload or{})if#body>M.MAX_BODY then return nil,\"cloud request is too large\"end local timestamp,requestNonce=now(),nonce()local signature=password.hmacSha256(value.node.secret,canonical(value.node.id,timestamp,requestNonce,\"POST\",path,body))if not signature then return nil,\"could not sign cloud request\"end return perform(value.urls[service],\"POST\",path,body,{[\"Content-Type\"]=\"application/json\",[\"X-CeetOS-Node\"]=value.node.id,[\"X-CeetOS-Time\"]=tostring(timestamp),[\"X-CeetOS-Nonce\"]=requestNonce,[\"X-CeetOS-Signature\"]=signature,})end return M",
  ["ceetos/lib/cloud_sync.lua"] = "local cloud=require(\"ceetos.lib.cloud\")local store=require(\"ceetos.lib.store\")local password=require(\"ceetos.lib.password\")local profile=require(\"ceetos.lib.profile\")local TELEMETRY_MODULE=\"ceetos.lib.\"..\"telemetry\"local RECIPE_SERVICE_MODULE=\"ceetos.lib.\"..\"recipe_service\"local M={}local STATE=\"/ceetos/data/cloud-state.lua\"local INTERVALS={telemetry=60000,authority=30000,recipes=30000}local function now()return os.epoch(\"utc\")end local function defaults()return{schema=1,revision=0,auth={online=false,next=0},recipe={online=false,next=0,revision=0},telemetry={next=0},lastError=nil}end local function state()store.invalidate(STATE)local value=store.read(STATE,defaults())for key,fallback in pairs(defaults())do if value[key]==nil then value[key]=fallback end end for key,fallback in pairs(defaults().recipe)do if value.recipe[key]==nil then value.recipe[key]=fallback end end return value end local function save(value)value.revision=(tonumber(value.revision)or 0)+1 return store.write(STATE,value)end local function errorState(value,message)value.lastError=tostring(message or\"cloud request failed\"):sub(1,180)end function M.status()local value,cfg=state(),cloud.publicStatus()return{enabled=cfg.enabled,enrolled=cfg.enrolled,node=cfg.node,urls=cfg.urls,authOnline=value.auth.online==true,recipeOnline=value.recipe.online==true,lastSync=value.lastSync,lastError=value.lastError}end function M.configure(urls)return cloud.configure(urls)end function M.enroll(code)return cloud.enroll(code)end function M.clear()local ok,err=cloud.clear();if ok then store.write(STATE,defaults())end return ok,err end function M.authOnline()return M.status().authOnline==true end function M.recipeOnline()return M.status().recipeOnline==true end local function cloudAuthority(result)local auth=require(\"ceetos.lib.auth\")if type(result)~=\"table\"or type(result.directory)~=\"table\"then return false,\"invalid cloud authority response\"end local cfg=cloud.publicStatus()local record={id=\"cloud:\"..tostring(cfg.urls.auth),term=tonumber(result.term)or 0,revision=tonumber(result.revision)or 0,directory=result.directory}return pcall(auth.acceptAuthority,record)end function M.login(name,plainPassword)if type(name)~=\"string\"or type(plainPassword)~=\"string\"then return false,\"invalid credentials\"end local begin,beginErr=cloud.call(\"auth\",\"/v1/auth/login/begin\",{username=name,node=tostring(os.getComputerID())})if not begin then return false,beginErr end if type(begin.salt)~=\"string\"or type(begin.workFactor)~=\"number\"or type(begin.challenge)~=\"string\"or type(begin.expires)~=\"number\"then return false,\"invalid cloud login challenge\"end local verifier,deriveErr=password.derive(plainPassword,begin.salt,begin.workFactor)if not verifier then return false,deriveErr end local proof=password.hmacSha256(verifier,table.concat({\"ceetos/auth/login/v1\",tostring(begin.authority),tostring(os.getComputerID()),tostring(begin.requestId),tostring(begin.challenge),tostring(begin.expires)},\"|\"))local result,resultErr=cloud.call(\"auth\",\"/v1/auth/login/proof\",{username=name,node=tostring(os.getComputerID()),requestId=begin.requestId,challenge=begin.challenge,proof=proof})if not result then return false,resultErr end local auth=require(\"ceetos.lib.auth\")local saved,saveErr=auth.saveCentralSession(result.session)if not saved then return false,saveErr end if type(result.directory)==\"table\"then auth.updateDirectory(result.directory,result.revision)end return true end function M.mutate(action,fields)local auth=require(\"ceetos.lib.auth\")local current=auth.refreshSession()if not current or not current.central then return false,\"cloud login is required\"end local result,err=cloud.call(\"auth\",\"/v1/auth/mutate\",{action=action,fields=fields,session=current.nonce,node=tostring(os.getComputerID()),revision=current.accountRevision})if not result then return false,err end if type(result.directory)==\"table\"then auth.updateDirectory(result.directory,result.revision)end return true end function M.recipePlan(item,quantity,stock)if not M.recipeOnline()then return nil,\"cloud Recipe Server is unavailable\"end local result,err=cloud.call(\"recipe\",\"/v1/recipe/plan\",{item=item,quantity=quantity,stock=stock})if not result then return nil,err end return result.plan,result.error end local function telemetry(activity)local snapshot={ts=now(),id=os.getComputerID(),label=os.getComputerLabel(),activity=activity}if profile.is(\"desktop\")then local loaded,telemetryService=pcall(require,TELEMETRY_MODULE)if loaded and telemetryService.status()then snapshot=telemetryService.snapshot(activity)end end local net=require(\"ceetos.lib.net\")local transport=net.statusSnapshot and net.statusSnapshot().transport or{}snapshot.health={profile=profile.id(),version=require(\"ceetos.lib.version\").string,uptime=os.clock(),freeSpace=fs.getFreeSpace(\"/\"),peers=#(net.peers and net.peers()or{}),healthyLinks=transport and transport.healthyLinks or 0,lastError=M.status().lastError,}local result,err=cloud.call(\"dashboard\",\"/v1/telemetry/ingest\",snapshot)return result~=nil,err end local function syncAuth()if profile.is(\"auth-server\")then local auth=require(\"ceetos.lib.auth\")local snapshot=auth.authoritySnapshot()local pushed,pushErr=cloud.call(\"auth\",\"/v1/auth/replica/merge\",{snapshot=snapshot,source=\"mesh\"})if not pushed then return false,pushErr end if type(pushed.snapshot)==\"table\"then auth.merge(pushed.snapshot,true)end local ok,authErr=cloudAuthority(pushed)if not ok then return false,authErr end return true end local result,err=cloud.call(\"auth\",\"/v1/auth/directory\",{})if not result then return false,err end local ok,authErr=cloudAuthority(result)if not ok then return false,authErr end return true end local function syncRecipes()if not profile.is(\"recipe-server\")then local result,err=cloud.call(\"recipe\",\"/v1/recipe/status\",{})return result~=nil,err end local service=require(RECIPE_SERVICE_MODULE)if type(service.exportOverlay)~=\"function\"then return false,\"recipe export unavailable\"end local payload,exportErr=service.exportOverlay()if not payload then return false,exportErr end local value=state()value.recipe=value.recipe or{revision=0}local result,err=cloud.call(\"recipe\",\"/v1/recipe/replica/merge\",{overlay=payload,baseRevision=math.max(0,math.floor(tonumber(value.recipe.revision)or 0)),})if not result then return false,err end if type(result.overlay)==\"table\"and type(service.replaceOverlay)==\"function\"then local applied,applyErr=service.replaceOverlay(result.overlay)if not applied then return false,applyErr end end return true,nil,math.max(0,math.floor(tonumber(result.revision)or 0))end function M.tick(activity)local cfg=cloud.publicStatus();if not cfg.enabled or not cfg.enrolled then return false,\"cloud node is not enrolled\"end local value,timestamp=state(),now()local changed=false if timestamp>=(tonumber(value.auth.next)or 0)then local ok,err=syncAuth();value.auth.online,value.auth.next=ok==true,timestamp+INTERVALS.authority if not ok then errorState(value,err)else value.lastError=nil end changed=true end if timestamp>=(tonumber(value.recipe.next)or 0)then local ok,err,recipeRevision=syncRecipes();value.recipe.online,value.recipe.next=ok==true,timestamp+INTERVALS.recipes if recipeRevision~=nil then value.recipe.revision=recipeRevision end if not ok then errorState(value,err)end changed=true end if timestamp>=(tonumber(value.telemetry.next)or 0)then local ok,err=telemetry(activity or\"desktop\");value.telemetry.next=timestamp+INTERVALS.telemetry if not ok then errorState(value,err)end changed=true end if changed then value.lastSync=timestamp;save(value)end return true end return M",
  ["ceetos/lib/owner_service.lua"] = "local store=require(\"ceetos.lib.store\")local password=require(\"ceetos.lib.password\")local telemetry=require(\"ceetos.lib.telemetry\")local M={}local PATH=\"/ceetos/data/owner-service.lua\"M.VERSION=1 M.MAX_AGE_MS=60*1000 M.MAX_USED_NONCES=64 local actions={snapshot=true,status=true}local function now()return os.epoch(\"utc\")end local function state()local value=store.read(PATH,{})if type(value)~=\"table\"then value={}end if value.enabled==nil then value.enabled=true end value.version=M.VERSION if type(value.used)~=\"table\"then value.used={}end return value end local function save(value)return store.write(PATH,value)end local function validToken(token)return type(token)==\"string\"and#token>=32 and#token<=128 and not token:find(\"[%z\\1-\\31\\127]\")end local function validId(value)return type(value)==\"string\"and value:match(\"^[%w_%-]+$\")and#value>=8 and#value<=96 end local function validNonce(value)return type(value)==\"string\"and value:match(\"^[%x]+$\")and#value>=16 and#value<=128 end local function canonical(node,request)return table.concat({\"ceetos-owner-service-v1\",tostring(node),tostring(request.id),tostring(request.action),tostring(math.floor(tonumber(request.ts)or-1)),tostring(request.nonce),},\"\\n\")end local function prune(value,time)local kept,rows={},{}for nonce,expires in pairs(value.used or{})do expires=tonumber(expires)if validNonce(nonce)and expires and expires>time then rows[#rows+1]={nonce=nonce,expires=expires}end end table.sort(rows,function(a,b)return a.expires>b.expires end)for index,row in ipairs(rows)do if index<=M.MAX_USED_NONCES then kept[row.nonce]=row.expires end end value.used=kept end function M.status()local value=state()prune(value,now())return{enabled=value.enabled~=false,provisioned=validToken(value.token),owner=type(value.owner)==\"string\"and value.owner or nil,actions={\"snapshot\",\"status\"},}end function M.setEnabled(enabled)local value=state();value.enabled=enabled==true;prune(value,now());save(value)return M.status()end function M.provision(token,owner)assert(validToken(token),\"owner-service token must be 32-128 printable characters\")assert(type(owner)==\"string\"and owner:match(\"^[%w_%-]+$\")and#owner<=32,\"invalid owner\")local value=state()value.token,value.owner,value.enabled,value.used=token,owner,true,{}assert(save(value),\"could not save owner-service configuration\")return M.status()end function M.rotate(owner)local token=password.newSalt(\"owner-service-a\")..password.newSalt(\"owner-service-b\")M.provision(token,owner)return token end function M.signature(token,node,request)assert(validToken(token),\"invalid owner-service token\")return assert(password.hmacSha256(token,canonical(node,request)))end function M.verify(request)if type(request)~=\"table\"then return false,\"service request must be an object\"end local value,time=state(),now()prune(value,time)if value.enabled==false then return false,\"owner service is disabled\"end if not validToken(value.token)then return false,\"owner service has not been provisioned\"end if not validId(request.id)or not actions[request.action]or not validNonce(request.nonce)then return false,\"invalid service request\"end local timestamp=tonumber(request.ts)if not timestamp or math.floor(timestamp)~=timestamp or math.abs(time-timestamp)>M.MAX_AGE_MS then return false,\"service request expired\"end if value.used[request.nonce]then return false,\"service request was already used\"end if type(request.tag)~=\"string\"or not request.tag:match(\"^[%x]+$\")or#request.tag~=64 then return false,\"invalid service authenticator\"end local expected=M.signature(value.token,os.getComputerID(),request)if not password.constantTimeEqual(expected,request.tag:lower())then return false,\"service authentication failed\"end value.used[request.nonce]=timestamp+M.MAX_AGE_MS prune(value,time)assert(save(value),\"could not persist service replay state\")return true,value end function M.dispatch(request)local ok,value=M.verify(request)if not ok then return false,value end if request.action==\"snapshot\"then return true,{action=\"snapshot\",telemetry=telemetry.snapshot(\"owner-service\"),owner=value.owner}end return true,{action=\"status\",service=M.status(),telemetryEnabled=telemetry.status()}end return M",
  ["ceetos/lib/gui.lua"] = "local M={}local store=require(\"ceetos.lib.store\")local terminalUi=require(\"ceetos.lib.terminal_ui\")M.pages={home=\"Desktop\",peers=\"Peers\",peripherals=\"Devices\",telemetry=\"Telemetry\",updates=\"Updates\",admin=\"Administration\",audit=\"Audit log\",jobs=\"Jobs\",files=\"Explorer\"}local function add(items,allowed,item)if allowed then items[#items+1]=item end end local function role(deps,required)return deps.auth.allowed(required)end local function colour(item)if item.kind==\"directory\"then return colors.lightBlue end if item.kind==\"program\"then return colors.lime end if item.kind==\"file\"then return colors.white end return colors.lightGray end local function system(id,label)return{id=id,label=label,kind=\"system\",action=id}end local function count(value)if type(value)~=\"table\"then return 0 end local total=0 for _ in pairs(value)do total=total+1 end return total end local function entries(value)if type(value)~=\"table\"then return{}end local out={}for key,item in pairs(value)do if type(item)==\"table\"then local copy={}for field,fieldValue in pairs(item)do copy[field]=fieldValue end copy._ceetosKey=tostring(key)item=copy else item={value=item,_ceetosKey=tostring(key)}end out[#out+1]=item end table.sort(out,function(left,right)return tostring(left.name or left.id or left._ceetosKey)<tostring(right.name or right.id or right._ceetosKey)end)return out end local function short(value,limit)value=terminalUi.clean(value or\"-\")return#value>limit and value:sub(1,math.max(1,limit-3))..\"...\"or value end function M.newState()return{selected=nil,desktopPage=1,menu=nil,path=\"/\",history={},trash=false,peripheralScroll=1}end function M.model(page,deps,state)state=state or M.newState()local items,lines={},{}local auth,net,peripherals,telemetry,cloud=deps.auth,deps.net,deps.peripherals,deps.telemetry,deps.cloud local account=auth.current and(auth.current.name..\" (\"..auth.current.role..\")\")or\"not logged in\"local liveNetwork=store.read(\"/ceetos/data/network-status.lua\",{})local visiblePeers=liveNetwork.peers or net.peers()local craftState=store.read(\"/ceetos/data/crafting-state.lua\",{})local craftSources=craftState.sources or{}local selectedTicker=craftState.config and craftState.config.ticker local craftingAvailable=selectedTicker~=nil or#(craftSources.tickers or{})>0 if not craftingAvailable and peripheral and peripheral.getNames then for _,name in ipairs(peripheral.getNames())do if tostring(peripheral.getType(name)or\"\"):lower():find(\"stockticker\",1,true)then craftingAvailable=true;break end end end if page==\"home\"then add(items,role(deps,\"operator\"),system(\"terminal\",\"Terminal\"))if role(deps,\"viewer\")then for _,program in ipairs(deps.files.programs())do items[#items+1]={id=\"file:\"..program.path,label=program.name,kind=\"program\",path=program.path,runnable=true,canRun=true,canModify=role(deps,\"operator\"),protected=program.protected,action=\"run:\"..program.path}end end if craftingAvailable then items[#items+1]=system(\"crafting\",\"Crafting\")end if role(deps,\"operator\")then items[#items+1]=system(\"page:files\",\"Files\")items[#items+1]=system(\"page:peers\",\"Peers\")items[#items+1]=system(\"page:peripherals\",\"Devices\")items[#items+1]=system(\"page:telemetry\",\"Telemetry\")items[#items+1]=system(\"page:jobs\",\"Jobs\")items[#items+1]=system(\"page:updates\",\"Updates\")end items[#items+1]=system(\"page:admin\",\"Admin\")return{page=page,title=\"CeetOS Desktop\",desktop=true,items=items,subtitle=account..\"  |  \"..#visiblePeers..\" network peers  |  \"..#peripherals.describe()..\" shared  |  telemetry \"..(telemetry.status()and\"on\"or\"off\"),}elseif page==\"files\"then local source=state.trash and deps.files.trashList()or deps.files.list(state.path)for _,entry in ipairs(source)do local kind=entry.directory and\"directory\"or(entry.runnable and\"program\"or\"file\")items[#items+1]={id=(entry.trashed and\"trash:\"..entry.id or\"file:\"..entry.path),label=entry.name,kind=kind,path=entry.path,original=entry.original,trashId=entry.id,parent=entry.parent,directory=entry.directory,runnable=entry.runnable,protected=entry.protected,trashed=entry.trashed,canRun=role(deps,\"viewer\"),canModify=role(deps,\"operator\"),action=entry.parent and\"up:\"..entry.path or(entry.directory and\"dir:\"..entry.path or(entry.runnable and role(deps,\"viewer\")and\"run:\"..entry.path or nil)),}end return{page=page,title=\"CeetOS Explorer\",items=items,path=state.trash and\"Trash\"or state.path,trash=state.trash}elseif page==\"peers\"then local live=liveNetwork local diag=live.discovery or(net.discoveryStatus and net.discoveryStatus()or{})local session,transport=diag.session,diag.transport or live.transport or{}local peerList,directCount,routedCount,rekeyCount=visiblePeers,0,0,0 for _,peer in ipairs(peerList)do if peer.routed then routedCount=routedCount+1 else directCount=directCount+1 end if peer.rekeyRequired then rekeyCount=rekeyCount+1 end end local discoveryActive=diag.active==true or session~=nil local discoveryState=discoveryActive and tostring((session and session.state)or diag.state or\"inactive\")or\"inactive\"local discoveryText=\"Discovery: \"..discoveryState if session and tonumber(session.expires)then local remaining=math.max(0,math.ceil((tonumber(session.expires)-os.epoch(\"utc\"))/1000))discoveryText=discoveryText..\" (\"..tostring(remaining)..\"s remaining)\"end if session and session.retries then discoveryText=discoveryText..\" (retries \"..tostring(session.retries)..\")\"end if session and session.candidate then discoveryText=discoveryText..\" - candidate \"..tostring(session.candidate.label or session.candidate.id)end local modemText=transport.wireless and(\"wireless links: \"..tostring(transport.wirelessLinkCount or 1))or\"no wireless modem\"local mesh=transport.mesh or{}lines={\"Network peers: \"..(directCount+routedCount)..\" (\"..directCount..\" direct, \"..routedCount..\" routed)\",discoveryText,modemText,\"Protocol: v\"..tostring(live.protocol or transport.protocol or 2)..\" | Rekey required: \"..tostring(rekeyCount),\"Links: \"..tostring(transport.healthyLinks or 0)..\" healthy / \"..tostring(transport.degradedLinks or 0)..\" degraded / \"..tostring(transport.offlineLinks or 0)..\" offline\",\"Mesh: \"..(mesh.enrolled and(\"enrolled e\"..tostring(mesh.epoch))or\"enrollment pending\"),\"Last receive distance: \"..tostring(transport.lastDistance or\"-\")}for _,peer in ipairs(peerList)do local kind=peer.routed and\"Routed\"or\"Direct\"local route=peer.routed and(\" via \"..tostring(peer.next or\"?\")..\" (\"..tostring(peer.hops or\"?\")..\" hop)\")or(peer.auto and\" mesh edge\"or\"\")lines[#lines+1]=kind..\": \"..tostring(peer.label or(\"Computer \"..tostring(peer.id)))..\" (\"..tostring(peer.id)..\")\"..route..\" [\"..tostring(peer.health or\"unknown\")..\"]\"end if not discoveryActive and diag.lastState and diag.lastState~=\"inactive\"then lines[#lines+1]=\"Previous discovery: \"..tostring(diag.lastState)..(diag.lastMessage and(\" - \"..tostring(diag.lastMessage))or\"\")elseif diag.message then lines[#lines+1]=\"Network: \"..tostring(diag.message)end local canBegin=not discoveryActive add(items,role(deps,\"operator\")and canBegin,system(\"start_discovery\",\"Start discovery\"))add(items,role(deps,\"operator\")and canBegin,system(\"join_discovery\",\"Join discovery\"))add(items,role(deps,\"operator\")and discoveryState==\"candidate\",system(\"confirm_discovery\",\"Confirm pairing\"))add(items,role(deps,\"operator\")and not canBegin,system(\"cancel_discovery\",\"Cancel discovery\"))add(items,role(deps,\"operator\"),system(\"remote_refresh\",\"Refresh remote peripherals\"))elseif page==\"peripherals\"then local shared={}for _,item in ipairs(peripherals.describe())do shared[item.name]=item.mode end local detected=peripherals.listLocal()lines={\"Detected devices: \"..#detected,\"Shared devices: \"..#peripherals.describe()}if not state.peripheralView then add(items,role(deps,\"operator\"),system(\"peripheral_view\",\"View peripherals\"))end for _,item in ipairs(detected)do local mode=shared[item.name]items[#items+1]={id=\"peripheral_check:\"..item.name..\":peer\",name=item.name,label=item.name,type=item.type,kind=\"peripheral\",sharedMode=mode,mode=\"peer\",checked=mode==\"peer\",toggle=true,action=\"peripheral_set:\"..item.name..\":peer\"}items[#items+1]={id=\"peripheral_check:\"..item.name..\":master\",name=item.name,label=item.name,type=item.type,kind=\"peripheral\",sharedMode=mode,mode=\"master\",checked=mode==\"master\",toggle=true,action=\"peripheral_set:\"..item.name..\":master\"}end add(items,role(deps,\"operator\"),system(\"share_all:peer\",\"Share all - peers\"))add(items,role(deps,\"operator\"),system(\"share_all:master\",\"Share all - master only\"))add(items,role(deps,\"operator\"),system(\"unshare_all\",\"Unshare all\"))add(items,role(deps,\"operator\"),system(\"remote_cache\",\"View remote cache\"))add(items,role(deps,\"operator\"),system(\"remote_call\",\"Call remote peripheral\"))local shown={}for _,entry in ipairs(items)do local checkbox=entry.id:sub(1,17)==\"peripheral_check:\"local bulk=entry.action==\"share_all:peer\"or entry.action==\"share_all:master\"or entry.action==\"unshare_all\"if state.peripheralView or(not checkbox and not bulk)then shown[#shown+1]=entry end end items=shown elseif page==\"telemetry\"then local c=telemetry.configuration()local cloudStatus=cloud and cloud.status and cloud.status()or{}lines={\"Telemetry: \"..(c.enabled and\"enabled\"or\"disabled\"),\"Cloud node: \"..(cloudStatus.enrolled and(\"enrolled as \"..tostring(cloudStatus.node))or\"not enrolled\"),\"Cloud auth: \"..(cloudStatus.authOnline and\"online\"or\"offline\")..\" | recipes: \"..(cloudStatus.recipeOnline and\"online\"or\"offline\"),\"Dashboard: dash.ceet.uk (Cloudflare Access protected)\",cloudStatus.lastError and(\"Cloud error: \"..short(cloudStatus.lastError,58))or\"Cloud sync is asynchronous and does not block this UI.\",}add(items,role(deps,\"admin\"),system(\"telemetry_toggle\",c.enabled and\"Disable telemetry\"or\"Enable telemetry\"))add(items,role(deps,\"admin\"),system(\"dashboard_configure\",\"Configure dashboard\"))add(items,role(deps,\"admin\")and not cloudStatus.enrolled,system(\"cloud_enroll\",\"Enroll this computer with CeetOS Cloud\"))add(items,role(deps,\"operator\")and cloudStatus.enrolled,system(\"cloud_retry\",\"Retry cloud sync now\"))add(items,role(deps,\"admin\")and cloudStatus.enrolled,system(\"cloud_clear\",\"Remove cloud enrollment\"))elseif page==\"updates\"then local update=store.read(\"/ceetos/data/update-status.lua\",{})local cache,transfer=update.cache,update.transfer lines={\"Installed: \"..tostring(update.version or\"unknown\")..\"  |  \"..tostring(update.status or\"idle\"),update.message and short(update.message,72)or\"Only locally confirmed signed releases can be applied.\",cache and(\"Verified cache: \"..tostring(cache.version)..\"  \"..tostring(cache.fingerprint or\"-\")..\"  key \"..tostring(cache.keyId or\"-\"))or\"Verified cache: none\",transfer and(\"Downloading: \"..tostring(transfer.received or 0)..\"/\"..tostring(transfer.size or\"?\")..\" bytes from \"..tostring(transfer.label or transfer.source))or\"No active download\",}add(items,role(deps,\"operator\"),system(\"update_check\",\"Check for signed releases\"))for _,offer in ipairs(update.offers or{})do local route=offer.transport==\"routed\"and\"routed\"or\"direct\"items[#items+1]={id=\"update-source:\"..tostring(offer.key or offer.id),label=\"Download \"..tostring(offer.version)..\" from \"..short(offer.label or offer.id,18)..\" (\"..route..\")\",kind=\"update\",action=\"update_download:\"..tostring(offer.key or offer.id),offer=offer}end add(items,role(deps,\"operator\")and transfer~=nil,system(\"update_cancel\",\"Cancel download\"))add(items,role(deps,\"operator\")and cache~=nil,system(\"update_apply\",\"Apply verified cached release\"))add(items,role(deps,\"operator\")and cache~=nil and transfer==nil,system(\"update_clear\",\"Clear release cache\"))elseif page==\"admin\"then lines={\"Session: \"..account}add(items,auth.current==nil,system(\"login\",\"Login\"))add(items,auth.current~=nil,system(\"logout\",\"Logout\"))if role(deps,\"operator\")then for _,user in ipairs(auth.list())do items[#items+1]={id=\"account:\"..user.name,label=user.name..\"  (\"..user.role..\")\",kind=\"account\",name=user.name,userRole=user.role,canGrantAdmin=role(deps,\"admin\"),active=auth.current and auth.current.name==user.name}end add(items,true,system(\"user_add\",\"Create user\"))add(items,true,system(\"recovery_enable\",\"Enable recovery window\"))add(items,true,system(\"recovery_reset\",\"Recovery reset\"))add(items,true,system(\"page:audit\",\"View audit log\"))add(items,true,system(\"page:jobs\",\"Jobs\"))end elseif page==\"audit\"then lines={\"Latest audit events:\"}for _,event in ipairs(deps.audit.recent(10))do lines[#lines+1]=event.actor..\" - \"..event.action end elseif page==\"jobs\"then store.invalidate(\"/ceetos/data/jobs.lua\")store.invalidate(\"/ceetos/data/job-workers.lua\")local jobState=store.read(\"/ceetos/data/jobs.lua\",{})local workerState=store.read(\"/ceetos/data/job-workers.lua\",{})local controller=jobState.controllerId or jobState.masterId or workerState.controllerId or workerState.masterId local workers=workerState.workers or jobState.workers or{}local queue=jobState.queue or{}local schedules=jobState.schedules or{}local history=jobState.history or jobState.results or{}lines={\"Controller: \"..tostring(controller or\"electing / unavailable\"),\"Workers: \"..count(workers)..\"  |  Queue: \"..count(queue),\"Schedules: \"..count(schedules)..\"  |  Recent results: \"..count(history),role(deps,\"admin\")and\"Administrator view: scheduler controls are available through nx jobs.\"or\"Operator view: scheduler state is read-only.\",}for _,worker in ipairs(entries(workers))do local name=worker.label or worker.name or worker.id or worker._ceetosKey local active=worker.inFlight or worker.active or 0 local capacity=worker.capacity or 1 local health=worker.available==false and\"offline\"or(worker.health or\"ready\")items[#items+1]={id=\"job-worker:\"..tostring(worker.id or worker._ceetosKey),label=\"Worker  \"..short(name,18)..\"  \"..tostring(active)..\"/\"..tostring(capacity)..\"  \"..short(health,10),kind=\"job\"}end for _,schedule in ipairs(entries(schedules))do local name=schedule.name or schedule.template or schedule.id or schedule._ceetosKey local interval=schedule.interval or schedule.every or\"once\"local status=schedule.enabled==false and\"paused\"or(schedule.status or\"scheduled\")items[#items+1]={id=\"job-schedule:\"..tostring(schedule.id or schedule._ceetosKey),label=\"Schedule  \"..short(name,17)..\"  \"..short(interval,10)..\"  \"..short(status,10),kind=\"job\"}end for _,result in ipairs(entries(history))do local name=result.template or result.name or result.jobId or result.id or result._ceetosKey local status=result.status or(result.ok==false and\"failed\"or\"complete\")local worker=result.worker or result.workerId or\"-\"items[#items+1]={id=\"job-result:\"..tostring(result.id or result._ceetosKey),label=\"Result  \"..short(name,15)..\"  \"..short(status,10)..\"  \"..short(worker,10),kind=\"job\"}end end return{page=page,title=\"CeetOS | \"..(M.pages[page]or page),items=items,lines=lines,remoteResult=page==\"peripherals\"and state.remoteResult or nil}end local function indexOf(model,id)for index,item in ipairs(model.items)do if item.id==id then return index end end end function M.selected(model,state)if#model.items==0 then return nil end local index=indexOf(model,state.selected)if not index then index=1;state.selected=model.items[1].id end return model.items[index],index end function M.select(model,state,item)if item then state.selected=item.id end return item end function M.move(model,state,direction)local _,index=M.selected(model,state)if not index then return end local delta=direction==\"left\"and-1 or direction==\"right\"and 1 or direction==\"up\"and-(model.columns or 1)or(model.columns or 1)local nextIndex=math.max(1,math.min(#model.items,index+delta))state.selected=model.items[nextIndex].id end function M.context(item)if not item or item.parent then return{}end local copy=item.label and{system(\"copy_label:\"..(item.id or\"\"),\"Copy text\")}or{}if item.kind==\"account\"then local actions={system(\"user_role:\"..item.name..\":viewer\",\"Set role: viewer\"),system(\"user_role:\"..item.name..\":operator\",\"Set role: operator\")}if item.canGrantAdmin then actions[#actions+1]=system(\"user_role:\"..item.name..\":admin\",\"Set role: admin\")end actions[#actions+1]=system(\"user_reset:\"..item.name,\"Reset password\")actions[#actions+1]=system(\"user_delete:\"..item.name,\"Delete user\")for _,action in ipairs(copy)do actions[#actions+1]=action end return actions end if item.kind==\"peripheral\"then local actions={}if item.sharedMode then actions[#actions+1]=system(\"peripheral_set:\"..item.name..\":peer\",\"Share with peers\")actions[#actions+1]=system(\"peripheral_set:\"..item.name..\":master\",\"Share with master only\")actions[#actions+1]=system(\"peripheral_unshare:\"..item.name,\"Stop sharing\")else actions[#actions+1]=system(\"peripheral_set:\"..item.name..\":peer\",\"Share with peers\")actions[#actions+1]=system(\"peripheral_set:\"..item.name..\":master\",\"Share with master only\")end return actions end if item.trashed then copy[#copy+1]=system(\"restore:\"..item.trashId,\"Restore\");copy[#copy+1]=system(\"delete_trash:\"..item.trashId,\"Delete permanently\");return copy end if not item.path then if item.action then copy[#copy+1]=system(item.action,\"Open\")end;return copy end local actions={}if item.action and(not item.runnable or item.canRun~=false)then actions[#actions+1]=system(item.action,item.directory and\"Open\"or\"Run\")end if not item.protected and item.canModify then if not item.directory then actions[#actions+1]=system(\"edit:\"..item.path,\"Edit\")end actions[#actions+1]=system(\"rename:\"..item.path,\"Rename\")actions[#actions+1]=system(\"trash:\"..item.path,\"Move to Trash\")end for _,action in ipairs(copy)do actions[#actions+1]=action end return actions end local function drawHeader(model,banner,width,height)term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear()terminalUi.clearLine(1,colors.blue);terminalUi.write(2,1,model.title,colors.white,colors.blue,width-2)if height>=2 then terminalUi.write(2,2,model.subtitle or model.path or\"\",colors.lightGray,colors.black,width-2)end if banner and height>=3 then terminalUi.write(2,3,banner.text,banner.error and colors.red or colors.lightGray,colors.black,width-2)end return banner and 4 or 3 end local function drawRemoteResult(result,top,width,height,targets)if not result or top>=height then return top end local pending=result.pending==true or result.status==\"pending\"local failed=result.error==true or result.ok==false or result.status==\"error\"local label=pending and\"Remote request pending\"or(failed and\"Remote request failed\"or\"Remote result\")if result.peer then label=label..\" | \"..tostring(result.peer)end if result.device then label=label..\" | \"..tostring(result.device)end if result.method then label=label..\".\"..tostring(result.method)end terminalUi.clearLine(top,failed and colors.black or colors.gray)terminalUi.write(2,top,label,failed and colors.red or colors.white,failed and colors.black or colors.gray,width-4)if not pending then local clearLabel,copyLabel=\"[Clear]\",\"[Copy]\"local clearX,copyX=width-#clearLabel-1,width-#clearLabel-#copyLabel-3 terminalUi.write(copyX,top,copyLabel,colors.lightBlue,colors.gray)terminalUi.write(clearX,top,clearLabel,colors.lightBlue,colors.gray)targets[#targets+1]={kind=\"item\",item=system(\"remote_result_copy\",\"Copy remote result\"),x1=copyX,x2=copyX+#copyLabel-1,y1=top,y2=top}targets[#targets+1]={kind=\"item\",item=system(\"remote_result_clear\",\"Clear remote result\"),x1=clearX,x2=clearX+#clearLabel-1,y1=top,y2=top}end if top+1<height then terminalUi.write(2,top+1,result.text or result.message or result.value or\"\",failed and colors.red or colors.lightGray,colors.black,width-3)end return top+2 end local function drawMenu(menu,width,height)if not menu or#menu.items==0 then return{}end local longest=0 for _,item in ipairs(menu.items)do longest=math.max(longest,#terminalUi.clean(item.label))end local boxWidth,x=math.max(8,math.min(width-2,longest+4)),math.max(1,width-math.max(8,math.min(width-2,longest+4)))local y=math.max(2,height-#menu.items-1)local targets={}for index,item in ipairs(menu.items)do local selected=index==menu.selected terminalUi.fill(x,y+index-1,boxWidth,1,selected and colors.gray or colors.black)terminalUi.write(x+1,y+index-1,item.label,selected and colors.white or colors.lightGray,selected and colors.gray or colors.black,boxWidth-2)targets[#targets+1]={kind=\"menu\",item=item,x1=x,x2=x+boxWidth-1,y1=y+index-1,y2=y+index-1}end return targets end local function drawDesktop(model,state,banner,width,height)if width<24 or height<9 then return terminalUi.minimum(model.title,\"Desktop needs 24x9\",\"Resize | Backspace\")end local top=drawHeader(model,banner,width,height)+1 local columns=math.max(2,math.floor((width-2)/14))local cellWidth,cellHeight=math.floor((width-2)/columns),4 local rows,capacity=math.max(1,math.floor((height-top-1)/cellHeight)),9 capacity=math.min(capacity,columns*rows)model.columns=columns local item,selectedIndex=M.selected(model,state)local totalPages=math.max(1,math.ceil(#model.items/capacity))state.desktopPage=math.max(1,math.min(math.floor((selectedIndex-1)/capacity)+1,totalPages))local first,last=(state.desktopPage-1)*capacity+1,math.min(#model.items,state.desktopPage*capacity)local targets={}for index=first,last do local slot,entry=index-first,model.items[index]local x,y=2+(slot%columns)*cellWidth,top+math.floor(slot/columns)*cellHeight local selected=entry.id==state.selected terminalUi.fill(x,y,cellWidth,3,selected and colors.gray or colors.black)terminalUi.write(x+1,y+1,entry.label,colour(entry),selected and colors.gray or colors.black,cellWidth-2)targets[#targets+1]={kind=\"item\",item=entry,x1=x,x2=x+cellWidth-1,y1=y,y2=y+2}end terminalUi.write(2,height,\"Arrows select | Enter open | M menu | [\"..state.desktopPage..\"/\"..totalPages..\"] | Q close\",colors.gray,colors.black,width-2)return targets end local function drawList(model,state,banner,width,height)if width<24 or height<8 then return terminalUi.minimum(model.title,\"Screen needs 24x8\",\"Resize | Backspace\")end local targets={}local top,footer=drawHeader(model,banner,width,height)+1,height-1 if model.page==\"peripherals\"then top=drawRemoteResult(model.remoteResult,top,width,footer,targets)+1 end for _,line in ipairs(model.lines or{})do if top>=footer-2 then break end terminalUi.write(2,top,line,colors.lightGray,colors.black,width-2);top=top+1 end local _,selectedIndex=M.selected(model,state)selectedIndex=selectedIndex or 1 local visible=math.max(1,footer-top)local first=math.max(1,math.min(math.max(1,#model.items-visible+1),selectedIndex-math.floor(visible/2)))model.columns=1 for row=0,visible-1 do local entry=model.items[first+row]if not entry then break end local y,selected=top+row,entry.id==state.selected terminalUi.clearLine(y,selected and colors.gray or colors.black)terminalUi.write(3,y,entry.label,colour(entry),selected and colors.gray or colors.black,width-4)targets[#targets+1]={kind=\"item\",item=entry,x1=1,x2=width,y1=y,y2=y}end local footerText if model.page==\"files\"then footerText=model.trash and\"Enter select | M menu | Backspace Explorer | E empty Trash\"or\"Enter open | M menu | N new folder | T Trash | Backspace up\"else footerText=\"Arrows select | Enter open | Backspace desktop | Q close\"end terminalUi.write(2,height,footerText,colors.gray,colors.black,width-2)return targets end local function drawPeripheralMatrix(model,state,banner,width,height)if width<36 or height<15 then return terminalUi.minimum(model.title,\"Devices matrix needs 36x15\",\"Resize | Backspace\")end local targets={}local top,footer=drawHeader(model,banner,width,height)+1,height-1 for _,line in ipairs(model.lines or{})do if top>=footer-1 then break end terminalUi.write(2,top,line,colors.lightGray,colors.black,width-2);top=top+1 end top=drawRemoteResult(model.remoteResult,top,width,footer,targets)+1 local devices,byKey={},{}for _,item in ipairs(model.items)do if item.id:sub(1,17)==\"peripheral_check:\"then if not byKey[item.name]then devices[#devices+1]={name=item.name,type=item.type or\"unknown\"};byKey[item.name]={}end byKey[item.name][item.mode]=item end end local controls={}for _,item in ipairs(model.items)do if item.kind==\"system\"and(item.action==\"share_all:peer\"or item.action==\"share_all:master\"or item.action==\"unshare_all\"or item.action==\"remote_cache\"or item.action==\"remote_call\")then controls[#controls+1]=item end end local nameX,masterX,peerX=2,width-11,width-17 local typeX=math.max(14,math.floor(width*0.45))local deviceRows=math.max(1,footer-top-#controls-2)local selectedDevice for index,device in ipairs(devices)do local row=byKey[device.name]if(row.peer and row.peer.id==state.selected)or(row.master and row.master.id==state.selected)then selectedDevice=index;break end end if selectedDevice then state.peripheralScroll=math.max(1,math.min(math.max(1,#devices-deviceRows+1),selectedDevice-math.floor(deviceRows/2)))end state.peripheralScroll=math.max(1,math.min(math.max(1,#devices-deviceRows+1),state.peripheralScroll or 1))terminalUi.write(nameX,top,\"Name\",colors.lightGray,colors.black,typeX-nameX-1)terminalUi.write(typeX,top,\"Type\",colors.lightGray,colors.black,peerX-typeX-1)terminalUi.write(peerX,top,\"Peer\",colors.lightGray,colors.black,5)terminalUi.write(masterX,top,\"Master\",colors.lightGray,colors.black,7)for row=0,deviceRows-1 do local device=devices[state.peripheralScroll+row]if not device then break end local y=top+row+1 terminalUi.write(nameX,y,device.name,colors.white,colors.black,typeX-nameX-1)terminalUi.write(typeX,y,device.type,colors.lightGray,colors.black,peerX-typeX-1)for _,mode in ipairs({\"peer\",\"master\"})do local item=byKey[device.name][mode]local selected,x=item and state.selected==item.id,mode==\"peer\"and peerX or masterX terminalUi.write(x,y,item and(item.checked and\"[x]\"or\"[ ]\")or\"   \",item and item.checked and colors.lime or colors.lightGray,selected and colors.gray or colors.black,3)if item then targets[#targets+1]={kind=\"item\",item=item,x1=x,x2=x+2,y1=y,y2=y}end end end local y=top+deviceRows+1 for _,item in ipairs(controls)do if y>=footer then break end local selected=state.selected==item.id terminalUi.clearLine(y,selected and colors.gray or colors.black)terminalUi.write(2,y,item.label,selected and colors.white or colors.lightGray,selected and colors.gray or colors.black,width-2)targets[#targets+1]={kind=\"item\",item=item,x1=1,x2=width,y1=y,y2=y}y=y+1 end terminalUi.write(2,height,\"Arrows select | Enter toggle | Click checkbox | Backspace devices\",colors.gray,colors.black,width-2)return targets end function M.draw(model,state,banner)local width,height=term.getSize()local targets=model.desktop and drawDesktop(model,state,banner,width,height)or(model.page==\"peripherals\"and state.peripheralView and drawPeripheralMatrix(model,state,banner,width,height)or drawList(model,state,banner,width,height))local menuTargets=drawMenu(state.menu,width,height)for _,target in ipairs(menuTargets)do targets[#targets+1]=target end term.setBackgroundColor(colors.black);term.setTextColor(colors.white)return targets end function M.actionFor(model,number)if model.page==\"peers\"and number==2 then return{id=\"pair_offer\",label=\"Start discovery\"}end return model.items[number]end return M",
  ["ceetos/lib/terminal_ui.lua"] = "local M={}local function size()local width,height=term.getSize()return math.max(1,width or 1),math.max(1,height or 1)end function M.clean(value)return tostring(value or\"\"):gsub(\"%c\",\" \")end function M.clip(value,width,suffix)value,width=M.clean(value),math.max(0,math.floor(tonumber(width)or 0))if width==0 then return\"\"end if#value<=width then return value end suffix=suffix==nil and\"...\"or tostring(suffix)if#suffix>=width then return suffix:sub(1,width)end return value:sub(1,width-#suffix)..suffix end function M.write(x,y,value,foreground,background,width)local terminalWidth,terminalHeight=size()x,y=math.floor(tonumber(x)or 1),math.floor(tonumber(y)or 1)if y<1 or y>terminalHeight or x>terminalWidth then return false end if x<1 then value=M.clean(value):sub(2-x)x=1 end local available=math.max(0,terminalWidth-x+1)if width~=nil then available=math.min(available,math.max(0,math.floor(width)))end if available<=0 then return false end if foreground then term.setTextColor(foreground)end if background then term.setBackgroundColor(background)end term.setCursorPos(x,y)term.write(M.clip(value,available,\"\"))return true end function M.clearLine(y,background)local width,height=size()y=math.floor(tonumber(y)or 0)if y<1 or y>height then return false end term.setCursorPos(1,y)if background then term.setBackgroundColor(background)end term.clearLine()return width>0 end function M.fill(x,y,width,height,background)local terminalWidth,terminalHeight=size()x,y=math.max(1,math.floor(tonumber(x)or 1)),math.max(1,math.floor(tonumber(y)or 1))width,height=math.max(0,math.floor(tonumber(width)or 0)),math.max(0,math.floor(tonumber(height)or 0))width,height=math.min(width,terminalWidth-x+1),math.min(height,terminalHeight-y+1)if width<=0 or height<=0 then return false end term.setBackgroundColor(background or colors.black)for row=y,y+height-1 do term.setCursorPos(x,row);term.write((\" \"):rep(width))end return true end function M.box(x1,y1,x2,y2,title,border,titleColour)local width,height=size()x1,y1=math.max(1,math.floor(x1 or 1)),math.max(1,math.floor(y1 or 1))x2,y2=math.min(width,math.floor(x2 or width)),math.min(height,math.floor(y2 or height))if x2-x1<2 or y2-y1<2 then return false end border=border or colors.gray term.setBackgroundColor(colors.black);term.setTextColor(border)M.write(x1,y1,\"+\"..(\"-\"):rep(x2-x1-1)..\"+\",border,colors.black)for row=y1+1,y2-1 do M.write(x1,row,\"|\",border,colors.black);M.write(x2,row,\"|\",border,colors.black)end M.write(x1,y2,\"+\"..(\"-\"):rep(x2-x1-1)..\"+\",border,colors.black)if title and title~=\"\"then M.write(x1+2,y1,\" \"..M.clean(title)..\" \",titleColour or colors.lightBlue,colors.black,math.max(0,x2-x1-3))end return true end function M.minimum(title,message,footer)local width,height=size()term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear()M.clearLine(1,colors.blue);M.write(2,1,title or\"CeetOS\",colors.white,colors.blue,width-2)M.write(2,math.max(2,math.floor(height/2)),message or\"Terminal is too small\",colors.red,colors.black,width-2)M.write(2,height,footer or\"Resize terminal or press Backspace\",colors.gray,colors.black,width-2)return{}end function M.hit(targets,x,y)for index=#(targets or{}),1,-1 do local target=targets[index]if x>=target.x1 and x<=target.x2 and y>=target.y1 and y<=target.y2 then return target end end end return M",
  ["ceetos/lib/files.lua"] = "local store=require(\"ceetos.lib.store\")local auth=require(\"ceetos.lib.auth\")local M={}local TRASH_DIR=\"/ceetos/data/trash\"local TRASH_INDEX=\"/ceetos/data/trash-index.lua\"local protectedRoots={\"/ceetos\",\"/rom\"}local protectedFiles={[\"/startup.lua\"]=true}local function absolute(path)if not path or path==\"\"or path==\"/\"then return\"/\"end return path:sub(1,1)==\"/\"and path or\"/\"..path end local function sort(items)table.sort(items,function(a,b)if a.directory~=b.directory then return a.directory end return a.name:lower()<b.name:lower()end)return items end local function availablePath(directory,name)name=fs.getName(name)local base,extension=name:match(\"^(.*)(%.[^.]*)$\")base,extension=base or name,extension or\"\"local path,index=fs.combine(directory,name),2 while fs.exists(path)do path=fs.combine(directory,base..\"-\"..index..extension)index=index+1 end return absolute(path)end function M.isProtected(path)path=absolute(path)if protectedFiles[path]then return true end for _,root in ipairs(protectedRoots)do if path==root or path:sub(1,#root+1)==root..\"/\"then return true end end return false end function M.describe(path)path=absolute(path)return{name=fs.getName(path),path=path,directory=fs.exists(path)and fs.isDir(path)or false,runnable=fs.exists(path)and not fs.isDir(path)and path:sub(-4):lower()==\".lua\",protected=M.isProtected(path),}end function M.list(path)path=absolute(path==\"\"and\"/\"or(path or\"/\"))local result={}if path~=\"/\"then local parent=absolute(fs.getDir(path))result[#result+1]={name=\"..\",path=parent,directory=true,parent=true,protected=M.isProtected(parent)}end for _,name in ipairs(fs.list(path))do result[#result+1]=M.describe(absolute(fs.combine(path,name)))end return sort(result)end local function collect(path,depth,result)if depth<0 or not fs.exists(path)or not fs.isDir(path)then return end for _,item in ipairs(M.list(path))do if not item.parent then if item.directory then collect(item.path,depth-1,result)elseif item.runnable then result[#result+1]=item end end end end function M.programs()local result={}collect(\"/programs\",2,result)return result end function M.runnable(path)return M.describe(path).runnable end function M.path(directory,name)return absolute(fs.combine(directory,fs.getName(name)))end local function assertMutable(path)path=absolute(path)assert(path~=\"/\"and fs.exists(path),\"file not found\")assert(not M.isProtected(path),\"CeetOS system files cannot be changed from Explorer\")return path end function M.rename(path,name)path=assertMutable(path)assert(name and fs.getName(name)==name and name~=\"\",\"invalid file name\")local target=M.path(fs.getDir(path),name)assert(not M.isProtected(target),\"CeetOS system files cannot be changed from Explorer\")assert(not fs.exists(target),\"a file with that name already exists\")fs.move(path,target)return target end function M.makeDirectory(directory,name)directory=absolute(directory)assert(not M.isProtected(directory),\"CeetOS system folders cannot be changed from Explorer\")assert(name and fs.getName(name)==name and name~=\"\",\"invalid folder name\")local target=M.path(directory,name)assert(not fs.exists(target),\"a file with that name already exists\")fs.makeDir(target)return target end function M.readText(path)path=absolute(path)assert(fs.exists(path)and not fs.isDir(path),\"file not found\")local handle=assert(fs.open(path,\"r\"))local contents=handle.readAll()handle.close()return contents end function M.writeText(path,contents)path=absolute(path)assert(not M.isProtected(path),\"CeetOS system files cannot be changed from Editor\")local parent=absolute(fs.getDir(path))assert(fs.exists(parent)and fs.isDir(parent),\"parent folder does not exist\")local temporary,backup=path..\".ceetos-tmp\",path..\".ceetos-backup\"if fs.exists(temporary)then fs.delete(temporary)end if fs.exists(backup)then fs.delete(backup)end local handle=assert(fs.open(temporary,\"w\"));handle.write(contents);handle.close()if fs.exists(path)then fs.move(path,backup)end local ok,err=pcall(fs.move,temporary,path)if not ok then if fs.exists(backup)then fs.move(backup,path)end error(err,0)end if fs.exists(backup)then fs.delete(backup)end return path end local function trashIndex()return store.read(TRASH_INDEX,{})end local function saveTrashIndex(index)store.write(TRASH_INDEX,index)end function M.moveToTrash(path)path=assertMutable(path)if not fs.exists(TRASH_DIR)then fs.makeDir(TRASH_DIR)end local index=trashIndex()local id=tostring(os.epoch(\"utc\"))..\"-\"..tostring(math.random(1000,9999))while index[id]do id=id..\"x\"end local stored=absolute(fs.combine(TRASH_DIR,id))fs.move(path,stored)index[id]={original=path,name=fs.getName(path),directory=fs.isDir(stored),deletedAt=os.epoch(\"utc\")}saveTrashIndex(index)return id end function M.trashList()local index,result=trashIndex(),{}for id,entry in pairs(index)do local stored=absolute(fs.combine(TRASH_DIR,id))if fs.exists(stored)then result[#result+1]={id=id,path=stored,name=entry.name,original=entry.original,directory=entry.directory,trashed=true,deletedAt=entry.deletedAt,runnable=not entry.directory and entry.name:sub(-4):lower()==\".lua\"}else index[id]=nil end end saveTrashIndex(index)table.sort(result,function(a,b)return(a.deletedAt or 0)>(b.deletedAt or 0)end)return result end function M.restore(id)local index=trashIndex()local entry=index[id]assert(entry,\"trash item not found\")local stored=absolute(fs.combine(TRASH_DIR,id))assert(fs.exists(stored),\"trash item no longer exists\")local parent=absolute(fs.getDir(entry.original))assert(not M.isProtected(entry.original),\"cannot restore into a protected system path\")if not fs.exists(parent)then fs.makeDir(parent)end local target=availablePath(parent,fs.getName(entry.original))fs.move(stored,target)index[id]=nil;saveTrashIndex(index)return target end function M.deleteTrash(id)local index,entry=trashIndex(),trashIndex()[id]assert(entry,\"trash item not found\")local stored=absolute(fs.combine(TRASH_DIR,id))if fs.exists(stored)then fs.delete(stored)end index[id]=nil;saveTrashIndex(index)end function M.emptyTrash()if fs.exists(TRASH_DIR)then fs.delete(TRASH_DIR)end saveTrashIndex({})end function M.import(transfers,directory)auth.require(\"operator\")directory=directory or\"/programs/imports\"if not fs.exists(directory)then fs.makeDir(directory)end local imported={}for _,transfer in ipairs(transfers or{})do local name=transfer.getName and transfer.getName()if name and name~=\"\"then local path=availablePath(directory,name)local handle=assert(fs.open(path,\"wb\"))while true do local chunk=transfer.read(8192)if not chunk then break end handle.write(chunk)end handle.close()imported[#imported+1]=path end end return imported end return M",
  ["ceetos/lib/editor.lua"] = "local M={}local selection=require(\"ceetos.lib.selection\")local function clamp(value,low,high)return math.max(low,math.min(high,value))end local function split(text)text=(text or\"\"):gsub(\"\\r\\n\",\"\\n\"):gsub(\"\\r\",\"\\n\")local lines={}for line in(text..\"\\n\"):gmatch(\"(.-)\\n\")do lines[#lines+1]=line end if#lines==0 then lines[1]=\"\"end return lines end function M.new(text)local lines=split(text)return{lines=lines,line=1,column=0,changed=false,preferredColumn=nil,selection=selection.new(lines)}end function M.text(buffer)return table.concat(buffer.lines,\"\\n\")end function M.current(buffer)return buffer.lines[buffer.line]end function M.clampCursor(buffer)buffer.line=clamp(buffer.line,1,#buffer.lines)buffer.column=clamp(buffer.column,0,#buffer.lines[buffer.line])end function M.move(buffer,lineDelta,columnDelta)buffer.line=clamp(buffer.line+(lineDelta or 0),1,#buffer.lines)buffer.column=clamp((buffer.preferredColumn or buffer.column)+(columnDelta or 0),0,#buffer.lines[buffer.line])if lineDelta and lineDelta~=0 and columnDelta==0 then buffer.column=clamp(buffer.preferredColumn or buffer.column,0,#buffer.lines[buffer.line])end buffer.preferredColumn=buffer.column end function M.gotoLine(buffer,line,column)buffer.line=clamp(tonumber(line)or 1,1,#buffer.lines)buffer.column=clamp(tonumber(column)or 0,0,#buffer.lines[buffer.line])buffer.preferredColumn=buffer.column end function M.selectStart(buffer)buffer.selection.lines=buffer.lines;selection.start(buffer.selection,buffer.line,buffer.column);return buffer end function M.selectTo(buffer,line,column)buffer.selection.lines=buffer.lines;selection.update(buffer.selection,line,column);return buffer end function M.clearSelection(buffer)selection.clear(buffer.selection);return buffer end function M.selectionText(buffer)buffer.selection.lines=buffer.lines;return selection.text(buffer.selection)end function M.copySelection(buffer,clipboard)buffer.selection.lines=buffer.lines;return selection.copy(buffer.selection,clipboard)end function M.deleteSelection(buffer)local range=selection.range(buffer.selection);if not range then return false end local first,last=range.first,range.last local startText=(buffer.lines[first.line]or\"\"):sub(1,first.column)local endText=(buffer.lines[last.line]or\"\"):sub(last.column+1)buffer.lines[first.line]=startText..endText for _=first.line+1,last.line do table.remove(buffer.lines,first.line+1)end buffer.line,buffer.column,buffer.preferredColumn=first.line,first.column,first.column buffer.selection.lines=buffer.lines;selection.clear(buffer.selection);buffer.changed=true;return true end function M.insert(buffer,value)value=value or\"\"if selection.range(buffer.selection)then M.deleteSelection(buffer)end local before,after=M.current(buffer):sub(1,buffer.column),M.current(buffer):sub(buffer.column+1)local parts=split(value)if#parts==1 then buffer.lines[buffer.line]=before..value..after buffer.column=buffer.column+#value else buffer.lines[buffer.line]=before..parts[1]for index=2,#parts-1 do table.insert(buffer.lines,buffer.line+index-1,parts[index])end table.insert(buffer.lines,buffer.line+#parts-1,parts[#parts]..after)buffer.line,buffer.column=buffer.line+#parts-1,#parts[#parts]end buffer.changed,buffer.preferredColumn=true,buffer.column end function M.backspace(buffer)if buffer.column>0 then local line=M.current(buffer)buffer.lines[buffer.line]=line:sub(1,buffer.column-1)..line:sub(buffer.column+1)buffer.column=buffer.column-1 elseif buffer.line>1 then local previous=buffer.lines[buffer.line-1]buffer.lines[buffer.line-1]=previous..M.current(buffer)table.remove(buffer.lines,buffer.line);buffer.line,buffer.column=buffer.line-1,#previous else return false end buffer.changed,buffer.preferredColumn=true,buffer.column;return true end function M.delete(buffer)local line=M.current(buffer)if buffer.column<#line then buffer.lines[buffer.line]=line:sub(1,buffer.column)..line:sub(buffer.column+2)elseif buffer.line<#buffer.lines then buffer.lines[buffer.line]=line..buffer.lines[buffer.line+1];table.remove(buffer.lines,buffer.line+1)else return false end buffer.changed=true;return true end function M.find(buffer,needle,startLine)if not needle or needle==\"\"then return nil end for line=startLine or buffer.line,#buffer.lines do local column=buffer.lines[line]:find(needle,line==buffer.line and buffer.column+1 or 1,true)if column then buffer.line,buffer.column,buffer.preferredColumn=line,column-1,column-1;return line,column-1 end end return nil end local keywords={[\"and\"]=true,[\"break\"]=true,[\"do\"]=true,[\"else\"]=true,[\"elseif\"]=true,[\"end\"]=true,[\"false\"]=true,[\"for\"]=true,[\"function\"]=true,[\"if\"]=true,[\"in\"]=true,[\"local\"]=true,[\"nil\"]=true,[\"not\"]=true,[\"or\"]=true,[\"repeat\"]=true,[\"return\"]=true,[\"then\"]=true,[\"true\"]=true,[\"until\"]=true,[\"while\"]=true}local builtins={print=true,pairs=true,ipairs=true,tonumber=true,tostring=true,type=true,error=true,assert=true,fs=true,term=true,shell=true,peripheral=true,os=true,textutils=true}function M.tokens(line,lua)if not lua then return{{text=line,kind=\"text\"}}end local out,index={},1 local function add(text,kind)if text~=\"\"then out[#out+1]={text=text,kind=kind}end end while index<=#line do local rest=line:sub(index)if rest:sub(1,2)==\"--\"then add(rest,\"comment\");break end local quote=rest:sub(1,1)if quote==\"'\"or quote=='\"'then local finish,escaped=2,false while finish<=#rest do if rest:sub(finish,finish)==quote and not escaped then break end;escaped=rest:sub(finish,finish)==\"\\\\\"and not escaped;if rest:sub(finish,finish)~=\"\\\\\"then escaped=false end;finish=finish+1 end add(rest:sub(1,finish),\"string\");index=index+finish else local word=rest:match(\"^[%a_][%w_]*\")local number=rest:match(\"^%d+%.?%d*\")if word then add(word,keywords[word]and\"keyword\"or(builtins[word]and\"builtin\"or\"text\"));index=index+#word elseif number then add(number,\"number\");index=index+#number else add(rest:sub(1,1),\"text\");index=index+1 end end end return out end return M",
  ["ceetos/lib/terminal.lua"] = "local store=require(\"ceetos.lib.store\")local M,PATH,LIMIT={},\"/ceetos/data/terminal-history.lua\",50 function M.history()return store.read(PATH,{})end function M.add(command)if not command or command==\"\"then return end local history=M.history()if history[#history]~=command then history[#history+1]=command end while#history>LIMIT do table.remove(history,1)end store.write(PATH,history)end function M.complete(prefix,candidates)local result,seen={},{}for _,candidate in ipairs(candidates or{})do if candidate:sub(1,#prefix)==prefix and not seen[candidate]then result[#result+1],seen[candidate]=candidate,true end end table.sort(result);return result end return M",
  ["ceetos/lib/selection.lua"] = "local M={}local function point(line,column)return{line=math.max(1,tonumber(line)or 1),column=math.max(0,tonumber(column)or 0)}end local function before(a,b)return a.line<b.line or(a.line==b.line and a.column<=b.column)end local function norm(a,b)return before(a,b)and a or b,before(a,b)and b or a end function M.new(lines)return{lines=lines or{\"\"},anchor=nil,active=nil}end function M.position(line,column,maxLine,maxColumn)line=math.max(1,math.min(tonumber(maxLine)or line or 1,tonumber(line)or 1))column=math.max(0,tonumber(column)or 0)if maxColumn and line==maxLine then column=math.min(column,maxColumn)end return line,column end function M.start(s,line,column)s.anchor,s.active=point(line,column),point(line,column);return s end function M.update(s,line,column)if s.anchor then s.active=point(line,column)end;return s end function M.clear(s)s.anchor,s.active=nil,nil;return s end function M.range(s)if not s.anchor or not s.active then return nil end local first,last=norm(s.anchor,s.active)if first.line==last.line and first.column==last.column then return nil end return{first=first,last=last}end function M.text(s)local r=M.range(s);if not r then return\"\"end local out={}for line=r.first.line,r.last.line do local value=s.lines[line]or\"\"local from=line==r.first.line and r.first.column+1 or 1 local to=line==r.last.line and r.last.column or#value out[#out+1]=value:sub(from,to)end return table.concat(out,\"\\n\")end function M.copy(s,clipboard)local text=M.text(s);if text~=\"\"and clipboard then clipboard.set(text)end;return text end return M",
  ["ceetos/lib/clipboard.lua"] = "local store=require(\"ceetos.lib.store\")local M,PATH,OUTBOX,LIMIT={},\"/ceetos/data/clipboard.lua\",\"/ceetos-dev/clipboard-out.lua\",16384 local memory local function trim(value)return tostring(value or\"\"):sub(1,LIMIT)end function M.get()if memory~=nil then return memory end local value=store.read(PATH,{text=\"\"})memory=value and value.text or\"\"return memory end function M.set(value)local text=trim(value)memory=text pcall(store.write,PATH,{text=text})if fs and fs.makeDir and fs.open then pcall(function()if not fs.exists(\"/ceetos-dev\")then pcall(fs.makeDir,\"/ceetos-dev\")end local handle=fs.open(OUTBOX,\"w\")if handle then handle.write(textutils.serialize({text=text,queued=os.epoch and os.epoch(\"utc\")or 0}));handle.close()end end)end return text end function M.clear()return M.set(\"\")end function M.copy(value)return M.set(value)end function M.limit()return LIMIT end return M",
  ["ceetos/lib/input.lua"] = "local M={}function M.modifiers()return{ctrl=false,shift=false}end local function nameOf(name)name=tostring(name or\"\")local lower=name:lower()if lower==\"leftctrl\"or lower==\"rightctrl\"or lower==\"ctrl\"then return\"ctrl\"end if lower==\"leftshift\"or lower==\"rightshift\"or lower==\"shift\"then return\"shift\"end return lower end function M.key(state,name)name=nameOf(name)if name==\"ctrl\"then state.ctrl=true elseif name==\"shift\"then state.shift=true end return state end function M.keyUp(state,name)name=nameOf(name)if name==\"ctrl\"then state.ctrl=false elseif name==\"shift\"then state.shift=false end return state end function M.shortcut(state,name)name=nameOf(name)local active=state.ctrl and state.shift and(name==\"c\"or name==\"v\")if active then state.ctrl,state.shift=false,false end return active,name end return M",
  ["ceetos/lib/version.lua"] = "return{major=0,minor=16,patch=2,string=\"0.16.2\"}",
  ["ceetos/lib/crafting.lua"] = "local M={}M.RECIPE_PACK_MAX_BYTES=64*1024 function M.isLocalPeer(peer,computerId)return tostring(peer)==tostring(computerId)end function M.normalise(rows)local out={}for _,row in pairs(type(rows)==\"table\"and rows or{})do if type(row)==\"table\"then local name,count=row.name or row.id,tonumber(row.count or row.amount or row.quantity or 0)or 0 if type(name)==\"string\"and count>0 then out[name]=(out[name]or 0)+math.floor(count)end end end return out end function M.rows(stock,query,filter,recipes)local output,needle,available={},tostring(query or\"\"):lower(),M.normalise(stock)local names={}for name in pairs(available)do names[name]=true end for name in pairs(type(recipes)==\"table\"and recipes or{})do names[name]=true end for name in pairs(names)do local count=available[name]or 0 local craftable=type(recipes)==\"table\"and recipes[name]~=nil local include=needle==\"\"or name:lower():find(needle,1,true)if filter==\"craftable\"then include=include and craftable elseif filter==\"stocked\"then include=include and count>0 end if include then output[#output+1]={name=name,count=count,craftable=craftable,stocked=count>0}end end table.sort(output,function(a,b)return a.name<b.name end)return output end function M.addToCart(cart,name,count)if type(cart)~=\"table\"or type(name)~=\"string\"or name==\"\"then return nil,\"invalid cart item\"end count=tonumber(count)if not count or count<1 then return nil,\"invalid cart quantity\"end count=math.floor(count)for _,row in ipairs(cart)do if row.name==name then row.count=(tonumber(row.count)or 0)+count;return row end end local row={name=name,count=count}cart[#cart+1]=row return row end function M.cartTotals(cart)local items,quantity=0,0 for _,row in ipairs(type(cart)==\"table\"and cart or{})do items=items+1 quantity=quantity+math.max(0,math.floor(tonumber(row.count)or 0))end return items,quantity end function M.acceptedCount(result,requested)local accepted=tonumber(result)requested=tonumber(requested)if not accepted or not requested or requested<1 then return nil,\"invalid request result\"end accepted=math.floor(accepted)if accepted<1 then return nil,\"Stock Ticker accepted no items\"end return math.min(accepted,math.floor(requested))end function M.displayRow(name,count,width)local suffix=\" x\"..tostring(count)width=math.max(#suffix+1,math.floor(tonumber(width)or#suffix+1))if#name+#suffix<=width then return name..suffix end return name:sub(1,math.max(1,width-#suffix-1))..\"…\"..suffix end function M.cancellationStatus(issued)return issued and\"cancelled-unconfirmed\"or\"cancelled\"end local function validReference(name)return type(name)==\"string\"and name:match(\"^#?[%w_.:%-]+$\")~=nil and not name:find(\"##\",1,true)end local function recipeIngredients(recipe,batches)local combined={}local declared=type(recipe.ingredients)==\"table\"and#recipe.ingredients>0 if declared then for _,ingredient in ipairs(recipe.ingredients)do local name=type(ingredient)==\"table\"and ingredient.id or ingredient local count=type(ingredient)==\"table\"and tonumber(ingredient.count or 1)or 1 if validReference(name)then combined[name]=(combined[name]or 0)+batches*math.max(1,math.floor(count or 1))end end else for slot=1,9 do local name=recipe.grid and recipe.grid[slot]if name and name~=false then combined[name]=(combined[name]or 0)+batches end end end local out={}for name,count in pairs(combined)do out[#out+1]={name=name,count=count}end table.sort(out,function(a,b)return a.name<b.name end)return out end function M.recipeInputs(recipe,batches)return recipeIngredients(recipe or{},math.max(1,math.floor(tonumber(batches)or 1)))end function M.validateRecipes(recipes)if type(recipes)~=\"table\"then return nil,\"recipes must return a table\"end for name,recipe in pairs(recipes)do if type(name)~=\"string\"or not name:match(\"^[%w_.:%-]+$\")or type(recipe)~=\"table\"then return nil,\"invalid recipe item id\"end if type(recipe.alternatives)==\"table\"then if#recipe.alternatives<1 then return nil,\"recipe \"..name..\" has no alternatives\"end for _,alternative in ipairs(recipe.alternatives)do local valid,err=M.validateRecipes({[name]=alternative});if not valid then return nil,err end end else if recipe.mode~=\"crafting\"then return nil,\"recipe \"..name..\" must use mode = crafting\"end if type(recipe.address)~=\"string\"or recipe.address==\"\"or#recipe.address>64 then return nil,\"recipe \"..name..\" requires an address\"end local crafter=recipe.address==\"Crafter\"if crafter and type(recipe.grid)~=\"table\"then return nil,\"recipe \"..name..\" requires a 9-slot grid for Crafter\"end if not crafter and type(recipe.ingredients)~=\"table\"and type(recipe.grid)~=\"table\"then return nil,\"recipe \"..name..\" requires ingredients\"end local output=tonumber(recipe.output or 1)if not output or output<1 or output~=math.floor(output)then return nil,\"invalid output for \"..name end for slot=1,9 do local value=recipe.grid and recipe.grid[slot]if value~=nil and value~=false and not validReference(value)then return nil,\"invalid grid slot in \"..name end end for _,ingredient in ipairs(type(recipe.ingredients)==\"table\"and recipe.ingredients or{})do local id,count=type(ingredient)==\"table\"and ingredient.id or ingredient,type(ingredient)==\"table\"and ingredient.count or 1 if not validReference(id)or not tonumber(count)or tonumber(count)<1 then return nil,\"invalid ingredient in \"..name end end end end return recipes end local function dataParser(source,maximum)if type(source)~=\"string\"then return nil,\"recipe data must be text\"end if#source==0 or#source>(maximum or M.RECIPE_PACK_MAX_BYTES)then return nil,\"recipe data exceeds the 64 KiB import limit\"end local state={source=source,index=1,length=#source,depth=0,nodes=0}local function skip()while state.index<=state.length do local char=state.source:sub(state.index,state.index)if char:match(\"%s\")then state.index=state.index+1 elseif state.source:sub(state.index,state.index+1)==\"--\"then local ending=state.source:find(\"\\n\",state.index+2,true)state.index=ending and ending+1 or state.length+1 else return true end end return true end local function fail(message)return nil,message..\" near byte \"..tostring(state.index)end local function identifier()local name=state.source:match(\"^[%a_][%w_]*\",state.index)if name then state.index=state.index+#name end return name end local parseValue local function parseString()local quote=state.source:sub(state.index,state.index);state.index=state.index+1 local out={}while state.index<=state.length do local char=state.source:sub(state.index,state.index);state.index=state.index+1 if char==quote then return table.concat(out)end if char==\"\\\\\"then local escaped=state.source:sub(state.index,state.index);state.index=state.index+1 local values={n=\"\\n\",r=\"\\r\",t=\"\\t\",[\"\\\\\"]=\"\\\\\",[\"\\\"\"]=\"\\\"\",[\"'\"]=\"'\"}if not values[escaped]then return fail(\"unsupported string escape\")end out[#out+1]=values[escaped]elseif char:byte()<32 then return fail(\"control character in string\")else out[#out+1]=char end end return fail(\"unterminated string\")end local function parseTable()state.depth=state.depth+1 if state.depth>32 then return fail(\"recipe data is nested too deeply\")end state.index=state.index+1 local out,nextIndex,keys={},1,{}skip()while state.index<=state.length and state.source:sub(state.index,state.index)~=\"}\"do state.nodes=state.nodes+1 if state.nodes>4096 then return fail(\"recipe data has too many values\")end local key,value,err local start=state.index if state.source:sub(state.index,state.index)==\"[\"then state.index=state.index+1;key,err=parseValue();if err then return nil,err end skip();if state.source:sub(state.index,state.index)~=\"]\"then return fail(\"missing closing recipe key bracket\")end state.index=state.index+1;skip();if state.source:sub(state.index,state.index)~=\"=\"then return fail(\"missing recipe key assignment\")end state.index=state.index+1;skip();value,err=parseValue();if err then return nil,err end else local named=identifier();skip()if named and state.source:sub(state.index,state.index)==\"=\"then key,state.index=named,state.index+1;skip();value,err=parseValue();if err then return nil,err end else state.index=start;value,err=parseValue();if err then return nil,err end key,nextIndex=nextIndex,nextIndex+1 end end if type(key)~=\"string\"and type(key)~=\"number\"then return fail(\"recipe table key must be text or a number\")end local signature=type(key)..\":\"..tostring(key)if keys[signature]then return fail(\"duplicate recipe table key\")end keys[signature],out[key]=true,value skip();local separator=state.source:sub(state.index,state.index)if separator==\",\"or separator==\";\"then state.index=state.index+1;skip()elseif separator~=\"}\"then return fail(\"expected recipe table separator\")end end if state.source:sub(state.index,state.index)~=\"}\"then return fail(\"unterminated recipe table\")end state.index,state.depth=state.index+1,state.depth-1 return out end parseValue=function()skip();local char=state.source:sub(state.index,state.index)if char==\"{\"then return parseTable()end if char==\"\\\"\"or char==\"'\"then return parseString()end local number=state.source:match(\"^-?%d+\",state.index)if number then state.index=state.index+#number;return tonumber(number)end local name=identifier()if name==\"true\"then return true elseif name==\"false\"then return false elseif name==\"nil\"then return nil elseif name then return fail(\"bare recipe values are not allowed\")end return fail(\"invalid recipe value\")end skip()if identifier()~=\"return\"then return fail(\"recipe data must start with return\")end local value,err=parseValue();if err then return nil,err end skip();if state.index<=state.length then return fail(\"unexpected content after recipe table\")end return value end local function validTags(tags)if tags==nil then return{}end if type(tags)~=\"table\"then return nil,\"recipe tags must be a table\"end local out={}for tag,members in pairs(tags)do local key=tostring(tag):gsub(\"^#\",\"\")if not key:match(\"^[%w_.:%-]+$\")or type(members)~=\"table\"or#members<1 then return nil,\"invalid recipe tag \"..tostring(tag)end out[key]={}for _,member in ipairs(members)do if not validReference(member)or tostring(member):sub(1,1)==\"#\"then return nil,\"invalid member of #\"..key end out[key][#out[key]+1]=member end table.sort(out[key])end return out end function M.validateRecipeGraph(recipes,tags)local tagMap,tagErr=validTags(tags);if not tagMap then return nil,tagErr end local visiting,complete={},{}local function visit(name)if complete[name]then return true end if visiting[name]then return nil,\"recipe cycle at \"..name end local recipe=recipes[name]if type(recipe)==\"table\"and type(recipe.alternatives)==\"table\"then recipe=recipe.alternatives[1]end if not recipe then return true end visiting[name]=true for _,input in ipairs(recipeIngredients(recipe,1))do local ingredient=input.name local members=ingredient:sub(1,1)==\"#\"and tagMap[ingredient:sub(2)]or{ingredient}for _,member in ipairs(members or{})do if recipes[member]then local ok,err=visit(member);if not ok then return nil,err end end end end visiting[name],complete[name]=nil,true return true end for name in pairs(recipes)do local ok,err=visit(name);if not ok then return nil,err end end return true end function M.parseRecipeOverlay(source)local value,err=dataParser(source,M.RECIPE_PACK_MAX_BYTES)if not value then return nil,err end if type(value)~=\"table\"then return nil,\"recipe overlay must return a table\"end local recipes,tags if value.schema==1 and type(value.recipes)==\"table\"then recipes,tags=value.recipes,value.tags or{}else recipes,tags=value,{}end local valid,validationErr=M.validateRecipes(recipes)if not valid then return nil,validationErr end local tagMap,tagsErr=validTags(tags);if not tagMap then return nil,tagsErr end local graphOk,graphErr=M.validateRecipeGraph(recipes,tagMap)if not graphOk then return nil,graphErr end return{schema=1,recipes=recipes,tags=tagMap}end function M.parseRecipeFile(source)local overlay,err=M.parseRecipeOverlay(source)return overlay and overlay.recipes or nil,err end function M.parseRecipePack(source)local pack,err=dataParser(source,M.RECIPE_PACK_MAX_BYTES)if not pack then return nil,err end if type(pack)~=\"table\"or pack.schema~=1 or type(pack.recipes)~=\"table\"then return nil,\"recipe pack must return { schema = 1, recipes = { ... } }\"end local valid,validationErr=M.validateRecipes(pack.recipes)if not valid then return nil,validationErr end local tagMap,tagsErr=validTags(pack.tags or{});if not tagMap then return nil,tagsErr end local graphOk,graphErr=M.validateRecipeGraph(pack.recipes,tagMap)if not graphOk then return nil,graphErr end return{schema=1,recipes=pack.recipes,tags=tagMap}end function M.recipeEqual(left,right)if type(left)~=\"table\"or type(right)~=\"table\"then return false end if type(left.alternatives)==\"table\"then left=left.alternatives[1]end if type(right.alternatives)==\"table\"then right=right.alternatives[1]end if not left or not right or left.mode~=right.mode or left.kind~=right.kind or left.output~=right.output or left.address~=right.address then return false end for slot=1,9 do if left.grid and right.grid and left.grid[slot]~=right.grid[slot]then return false end end local a,b=recipeIngredients(left,1),recipeIngredients(right,1)if#a~=#b then return false end for index=1,#a do if a[index].name~=b[index].name or a[index].count~=b[index].count then return false end end return true end function M.reviewRecipePack(existing,incoming)local validExisting,existingErr=M.validateRecipes(existing)if not validExisting then return nil,existingErr end local validIncoming,incomingErr=M.validateRecipes(incoming)if not validIncoming then return nil,incomingErr end local rows,counts={},{new=0,unchanged=0,conflict=0,invalid=0}for name,recipe in pairs(incoming)do local prior=existing[name]local status=not prior and\"new\"or(M.recipeEqual(prior,recipe)and\"unchanged\"or\"conflict\")counts[status]=counts[status]+1 rows[#rows+1]={name=name,status=status,incoming=recipe,existing=prior,selected=status==\"new\"}end table.sort(rows,function(a,b)return a.name<b.name end)return{rows=rows,counts=counts}end local function cloneRecipe(recipe)if type(recipe)==\"table\"and type(recipe.alternatives)==\"table\"then recipe=recipe.alternatives[1]end local copy={mode=recipe.mode,kind=recipe.kind,output=recipe.output,address=recipe.address,grid={},ingredients={}}for slot=1,9 do copy.grid[slot]=recipe.grid and recipe.grid[slot]end for _,input in ipairs(recipe.ingredients or{})do copy.ingredients[#copy.ingredients+1]={id=input.id,count=input.count,tag=input.tag}end return copy end function M.mergeRecipePack(existing,review,existingTags,incomingTags)if type(existing)~=\"table\"or type(review)~=\"table\"or type(review.rows)~=\"table\"then return nil,\"invalid recipe import review\"end local merged,imported={},0 for name,recipe in pairs(existing)do merged[name]=cloneRecipe(recipe)end for _,row in ipairs(review.rows)do if row.status==\"new\"and row.selected==true then merged[row.name],imported=cloneRecipe(row.incoming),imported+1 elseif row.status==\"conflict\"and row.selected==true then merged[row.name],imported=cloneRecipe(row.incoming),imported+1 end end local tags={}for name,members in pairs(existingTags or{})do tags[name]=members end for name,members in pairs(incomingTags or{})do tags[name]=members end local valid,err=M.validateRecipes(merged);if not valid then return nil,err end local graphOk,graphErr=M.validateRecipeGraph(merged,tags);if not graphOk then return nil,graphErr end return merged,imported,tags end function M.encodeRecipeFile(recipes,tags)local valid,err=M.validateRecipes(recipes);if not valid then return nil,err end local tagMap,tagsErr=validTags(tags or{});if not tagMap then return nil,tagsErr end local graphOk,graphErr=M.validateRecipeGraph(recipes,tagMap);if not graphOk then return nil,graphErr end local ok,encoded=pcall(textutils.serialise,{schema=1,recipes=recipes,tags=tagMap},{compact=true})if not ok or type(encoded)~=\"string\"then return nil,\"could not serialise recipes\"end return\"return \"..encoded..\"\\n\"end function M.writeRecipeFile(path,recipes,tags)if type(path)~=\"string\"or path==\"\"then return false,\"invalid recipe file path\"end local raw,encodeErr=M.encodeRecipeFile(recipes,tags);if not raw then return false,encodeErr end local parent=fs.getDir(path);if parent~=\"\"and not fs.exists(parent)then fs.makeDir(parent)end local temporary,backup=path..\".new\",path..\".bak\"if fs.exists(temporary)then fs.delete(temporary)end local handle=fs.open(temporary,\"w\");if not handle then return false,\"could not stage recipes\"end handle.write(raw);handle.close()local check=fs.open(temporary,\"r\");local staged=check and check.readAll()or nil;if check then check.close()end if not M.parseRecipeOverlay(staged or\"\")then if fs.exists(temporary)then fs.delete(temporary)end;return false,\"could not validate staged recipes\"end if fs.exists(backup)then fs.delete(backup)end if fs.exists(path)then fs.move(path,backup)end local moved,moveErr=pcall(fs.move,temporary,path)if not moved then if fs.exists(backup)and not fs.exists(path)then fs.move(backup,path)end;if fs.exists(temporary)then fs.delete(temporary)end;return false,tostring(moveErr)end if fs.exists(backup)then fs.delete(backup)end return true end local function selectedRecipe(entry)if type(entry)==\"table\"and type(entry.alternatives)==\"table\"then return entry.alternatives[1]end return entry end local function tagMembers(tags,reference)if reference:sub(1,1)~=\"#\"then return{reference}end local members=tags[reference:sub(2)]if type(members)~=\"table\"or#members==0 then return nil,\"no known members for \"..reference end return members end local function chooseMember(reference,tags,available,recipes)local members,err=tagMembers(tags,reference);if not members then return nil,err end local best for _,member in ipairs(members)do if(available[member]or 0)>0 then return member end if recipes[member]and not best then best=member end end return best,best and nil or(\"no stocked or craftable member for \"..reference)end function M.plan(recipes,stock,item,quantity,options)quantity=tonumber(quantity)if type(item)~=\"string\"or item==\"\"or not quantity or quantity<1 or quantity~=math.floor(quantity)then return nil,\"invalid item or quantity\"end local valid,errorText=M.validateRecipes(recipes)if not valid then return nil,errorText end options=type(options)==\"table\"and options or{}local available,plan,visiting,tags=M.normalise(stock),{},{},type(options.tags)==\"table\"and options.tags or{}local function requireItem(name,needed)local used=options.forceRoot==true and name==item and 0 or math.min(available[name]or 0,needed)available[name]=(available[name]or 0)-used local missing=needed-used if missing<=0 then return true end if visiting[name]then return nil,\"recipe cycle at \"..name end local recipe=selectedRecipe(recipes[name])if not recipe then return nil,\"missing recipe for \"..name..\" (need \"..tostring(missing)..\")\"end if recipe.special or not recipe.output or not recipe.address then return nil,\"recipe \"..name..\" is not supported by Crafting Queue\"end visiting[name]=true local batches=math.ceil(missing/recipe.output)local inputs={}for _,ingredient in ipairs(recipeIngredients(recipe,batches))do local concrete,resolveErr=chooseMember(ingredient.name,tags,available,recipes)if not concrete then return nil,resolveErr end inputs[#inputs+1]={name=concrete,count=ingredient.count,source=ingredient.name,tag=ingredient.name:sub(1,1)==\"#\"and ingredient.name or nil}local ok,err=requireItem(concrete,ingredient.count)if not ok then return nil,err end end visiting[name]=nil local produced=batches*recipe.output available[name]=(available[name]or 0)+produced-missing local dispatch=recipe.address==\"Crafter\"and\"requester\"or\"package\"if dispatch==\"requester\"and type(recipe.grid)~=\"table\"then return nil,\"Crafter recipe \"..name..\" has no 3x3 grid\"end plan[#plan+1]={name=name,batches=batches,produced=produced,requested=missing,address=recipe.address,kind=recipe.kind,dispatch=dispatch,grid=recipe.grid,inputs=inputs,}return true end local ok,err=requireItem(item,quantity)return ok and plan or nil,err end function M.validateExecutionPlan(plan)if type(plan)~=\"table\"or#plan<1 or#plan>96 then return nil,\"invalid remote recipe plan\"end for _,step in ipairs(plan)do if type(step)~=\"table\"or not validReference(step.name)or tostring(step.name):sub(1,1)==\"#\"then return nil,\"invalid remote recipe output\"end if type(step.address)~=\"string\"or step.address==\"\"or#step.address>64 or step.address:find(\"[%c]\")then return nil,\"invalid remote recipe address\"end if step.dispatch~=\"requester\"and step.dispatch~=\"package\"then return nil,\"invalid remote recipe route\"end if(step.address==\"Crafter\")~=(step.dispatch==\"requester\")then return nil,\"invalid remote recipe executor\"end for _,field in ipairs({\"batches\",\"produced\",\"requested\"})do local value=tonumber(step[field])if not value or value<1 or value~=math.floor(value)or value>65536 then return nil,\"invalid remote recipe quantity\"end end if step.dispatch==\"requester\"then if type(step.grid)~=\"table\"then return nil,\"remote Crafter recipe has no grid\"end for slot=1,9 do local value=step.grid[slot]if value~=nil and value~=false and not validReference(value)then return nil,\"invalid remote recipe grid\"end end end if type(step.inputs)~=\"table\"or#step.inputs>64 then return nil,\"invalid remote recipe inputs\"end for _,input in ipairs(step.inputs)do if type(input)~=\"table\"or not validReference(input.name)or tostring(input.name):sub(1,1)==\"#\"then return nil,\"invalid remote recipe input\"end local count=tonumber(input.count)if not count or count<1 or count~=math.floor(count)or count>65536 then return nil,\"invalid remote recipe input quantity\"end if input.source~=nil and not validReference(input.source)then return nil,\"invalid remote recipe input source\"end end end return plan end return M",
  ["ceetos/lib/craft_sources.lua"] = "local M={}local function isType(value,needle)return tostring(value or\"\"):lower():find(needle,1,true)~=nil end function M.kind(value)if type(value)==\"string\"then return{transport=\"local\",name=value}end return type(value)==\"table\"and value or nil end function M.key(value)value=M.kind(value)if not value then return nil end return tostring(value.transport or\"local\")..\":\"..tostring(value.peer or\"\")..\":\"..tostring(value.name or\"\")end function M.label(value)value=M.kind(value)if not value then return\"Not selected\"end if value.transport==\"peer\"then return\"Peer \"..tostring(value.peer)..\" / \"..tostring(value.name)end return tostring(value.name)end function M.discoverLocal()local tickers,requesters={},{}for _,name in ipairs(peripheral.getNames())do local typeName=peripheral.getType(name)if isType(typeName,\"stockticker\")then tickers[#tickers+1]={transport=\"local\",name=name,type=typeName,label=\"Local / \"..name}elseif isType(typeName,\"redstonerequester\")then requesters[#requesters+1]={transport=\"local\",name=name,type=typeName,label=\"Local / \"..name}end end table.sort(tickers,function(a,b)return a.name<b.name end)table.sort(requesters,function(a,b)return a.name<b.name end)return tickers,requesters end function M.matches(value,kind)value=M.kind(value)if not value or type(value.name)~=\"string\"then return false end local needle=(kind==\"ticker\"or kind==\"stockticker\")and\"stockticker\"or\"redstonerequester\"return isType(value.type,needle)end return M",
  ["ceetos/lib/program_capabilities.lua"] = "local store=require(\"ceetos.lib.store\")local auth=require(\"ceetos.lib.auth\")local audit=require(\"ceetos.lib.audit\")local M={}local PATH=\"/ceetos/data/program-capabilities.lua\"local SCHEMA=1 local SCRATCH_ROOT=\"/ceetos/data/programs\"local PROTECTED_ROOTS={\"/ceetos\",\"/ceetos-dev\",\"/rom\",}local READ_ONLY_METHODS={getAngles=true,getSpeed=true,getStress=true,getStressCapacity=true,getTargetSpeed=true,getItemDetail=true,getInventoryName=true,getMetadata=true,getFluidDetail=true,getEnergy=true,getCursorPos=true,getSize=true,getTextScale=true,isRunning=true,isPresent=true,list=true,size=true,}local function now()return os.epoch(\"utc\")end local function copy(value,seen)if type(value)~=\"table\"then return value end seen=seen or{}if seen[value]then return seen[value]end local result={}seen[value]=result for key,item in pairs(value)do result[copy(key,seen)]=copy(item,seen)end return result end local function defaultConfig()return{schema=SCHEMA,programs={}}end local function normalise(path)if type(path)~=\"string\"or path==\"\"or#path>240 or path:find(\"[%z\\1-\\31]\")then return nil,\"invalid program path\"end local parts={}for part in path:gmatch(\"[^/]+\")do if part==\"..\"then if#parts>0 then table.remove(parts)end elseif part~=\".\"and part~=\"\"then parts[#parts+1]=part end end return\"/\"..table.concat(parts,\"/\")end local function readSource(path)local handle,err=fs.open(path,\"r\")if not handle then return nil,err or\"could not read program\"end local source=handle.readAll()handle.close()return source end local function legacyHash(source)local hash=2166136261 for index=1,#source do hash=bit32.bxor(hash,source:byte(index))hash=(hash*16777619)%4294967296 end return string.format(\"fnv1a32:%08x\",hash)end local function programId(path)return\"p-\"..legacyHash(path):match(\":(%x+)$\")end local function loadConfig()local config=store.readFresh(PATH,defaultConfig())if type(config)~=\"table\"then return defaultConfig()end if type(config.programs)~=\"table\"then config.programs={}end config.schema=SCHEMA return config end local function saveConfig(config)local ok,err=store.writeAtomic(PATH,config)assert(ok,\"could not save program capabilities: \"..tostring(err))end local function adminActor()if auth.refreshSession then auth.refreshSession()end auth.require(\"admin\")return auth.current and auth.current.name or\"admin\"end local function pathWithin(path,root)return path==root or path:sub(1,#root+1)==root..\"/\"end local function protectedProgramPath(path)if path==\"/startup.lua\"then return true end for _,root in ipairs(PROTECTED_ROOTS)do if pathWithin(path,root)then return true end end return false end local function normaliseProgramPath(path)local normalized,err=normalise(path)if not normalized then return nil,err end if protectedProgramPath(normalized)then return nil,\"protected CeetOS/CraftOS program path\"end if normalized:sub(-4):lower()~=\".lua\"then return nil,\"program must be a Lua file\"end if not fs.exists(normalized)or fs.isDir(normalized)then return nil,\"program file not found\"end return normalized end local function defaultRecord(path,source,owner)return{path=path,id=programId(path),sourceHash=legacyHash(source),hashKind=\"fnv1a32-legacy-integrity-marker\",owner=owner or\"unassigned\",trust=\"sandboxed\",capabilities={scratch=true,peripherals={}},createdAt=now(),updatedAt=now(),}end local function cleanMethods(methods)if type(methods)~=\"table\"then return nil,\"methods must be a list\"end local seen,result={},{}for _,method in ipairs(methods)do if type(method)~=\"string\"or not READ_ONLY_METHODS[method]then return nil,\"method is not an approved read-only capability\"end if not seen[method]then seen[method]=true;result[#result+1]=method end end if#result==0 then return nil,\"at least one read-only method is required\"end table.sort(result)return result end local function recordIdAvailable(config,id,path)for savedPath,saved in pairs(config.programs)do if savedPath~=path and type(saved)==\"table\"and saved.id==id then return false end end return true end local function recordFrom(config,path,source)local saved=config.programs[path]local currentHash=legacyHash(source)local id=programId(path)if not recordIdAvailable(config,id,path)then return nil,nil,\"program capability ID collision; choose a different program path\"end if type(saved)==\"table\"and saved.sourceHash==currentHash and saved.path==path then local record=copy(saved)record.id=id record.hashKind=\"fnv1a32-legacy-integrity-marker\"record.capabilities=type(record.capabilities)==\"table\"and record.capabilities or{}record.capabilities.scratch=true record.capabilities.peripherals=type(record.capabilities.peripherals)==\"table\"and record.capabilities.peripherals or{}return record,false,nil end local record=defaultRecord(path,source,type(saved)==\"table\"and saved.owner or nil)record.stale=type(saved)==\"table\"return record,record.stale,nil end local function scratchPath(record)return SCRATCH_ROOT..\"/\"..record.id end local function normaliseScratch(path,root)if type(path)~=\"string\"or#path>240 or path:find(\"[%z\\1-\\31]\")then return nil end local candidate=path:sub(1,1)==\"/\"and path or root..\"/\"..path local normalized=normalise(candidate)if not normalized or not pathWithin(normalized,root)then return nil end return normalized end local function safeTerm()local source=term return{write=source.write,blit=source.blit,clear=source.clear,clearLine=source.clearLine,scroll=source.scroll,getSize=source.getSize,getCursorPos=source.getCursorPos,setCursorPos=source.setCursorPos,getCursorBlink=source.getCursorBlink,setCursorBlink=source.setCursorBlink,setTextColor=source.setTextColor,setTextColour=source.setTextColour,getTextColor=source.getTextColor,getTextColour=source.getTextColour,setBackgroundColor=source.setBackgroundColor,setBackgroundColour=source.setBackgroundColour,getBackgroundColor=source.getBackgroundColor,getBackgroundColour=source.getBackgroundColour,isColor=source.isColor,isColour=source.isColour,}end local function safeTextutils()return{serialise=textutils.serialise,serialize=textutils.serialize,serialiseJSON=textutils.serialiseJSON,serializeJSON=textutils.serializeJSON,unserialiseJSON=textutils.unserialiseJSON,unserializeJSON=textutils.unserializeJSON,formatTime=textutils.formatTime,urlEncode=textutils.urlEncode,}end local function tableCopy(value)local output={}for key,item in pairs(value or{})do output[key]=item end return output end local function safeFilesystem(record,actor,deny)local root=scratchPath(record)if not fs.exists(root)then local made,makeErr=pcall(fs.makeDir,root)if not made or makeErr==false then error(\"could not initialise program scratch storage\",2)end end local function target(path)local value=normaliseScratch(path,root)if not value then deny(\"filesystem path\")end return value end local function mutable(path)local value=target(path)if value==root then deny(\"program scratch root\")end return value end local proxy={}function proxy.exists(path)return fs.exists(target(path))end function proxy.isDir(path)return fs.isDir(target(path))end function proxy.list(path)return fs.list(target(path))end function proxy.getSize(path)return fs.getSize(target(path))end function proxy.open(path,mode)mode=tostring(mode or\"r\")if mode~=\"r\"and mode~=\"rb\"and mode~=\"w\"and mode~=\"wb\"and mode~=\"a\"and mode~=\"ab\"then deny(\"filesystem mode\")end return fs.open((mode==\"r\"or mode==\"rb\")and target(path)or mutable(path),mode)end function proxy.makeDir(path)return fs.makeDir(mutable(path))end function proxy.delete(path)return fs.delete(mutable(path))end function proxy.move(from,to)return fs.move(mutable(from),mutable(to))end function proxy.copy(from,to)return fs.copy(mutable(from),mutable(to))end function proxy.combine(a,b)local value=normaliseScratch(tostring(a or\"\")..\"/\"..tostring(b or\"\"),root)if not value then deny(\"filesystem path\")end return value end function proxy.getDir(path)return fs.getDir(target(path))end function proxy.getName(path)return fs.getName(target(path))end return proxy end local function safePeripheral(record,deny)local grants=record.trust==\"trusted\"and record.capabilities and record.capabilities.peripherals or{}local function methodsFor(name)local grant=type(grants)==\"table\"and grants[name]or nil local allowed={}for _,method in ipairs(type(grant)==\"table\"and grant.methods or{})do if READ_ONLY_METHODS[method]then allowed[method]=true end end return allowed end local proxy={}function proxy.getNames()local result={}for name in pairs(grants or{})do local methods=methodsFor(name)if next(methods)and peripheral.isPresent(name)then result[#result+1]=name end end table.sort(result)return result end function proxy.isPresent(name)return next(methodsFor(name))~=nil and peripheral.isPresent(name)or false end function proxy.getType(name)if next(methodsFor(name))==nil then deny(\"peripheral \"..tostring(name))end return peripheral.getType(name)end function proxy.getMethods(name)local result={}for method in pairs(methodsFor(name))do result[#result+1]=method end if#result==0 then deny(\"peripheral \"..tostring(name))end table.sort(result)return result end function proxy.wrap(name)local allowed=methodsFor(name)if next(allowed)==nil then deny(\"peripheral \"..tostring(name))end local wrapped={}for method in pairs(allowed)do wrapped[method]=function(...)local raw=peripheral.wrap(name)if not raw or type(raw[method])~=\"function\"then error(\"granted peripheral is unavailable\",2)end local args={...}if args[1]==wrapped then table.remove(args,1)end return raw[method](table.unpack(args))end end return wrapped end return proxy end function M.normaliseProgramPath(path)return normaliseProgramPath(path)end function M.legacySourceHash(source)assert(type(source)==\"string\",\"source must be a string\")return legacyHash(source)end function M.isReadOnlyMethod(method)return READ_ONLY_METHODS[method]==true end function M.describe(path)local normalized,err=normaliseProgramPath(path)if not normalized then return nil,err end local source,readErr=readSource(normalized)if not source then return nil,readErr end local record,_,recordErr=recordFrom(loadConfig(),normalized,source)if not record then return nil,recordErr end return copy(record)end function M.create(path,owner)local actor=adminActor()local normalized,err=normaliseProgramPath(path)assert(normalized,err)if owner~=nil then assert(type(owner)==\"string\"and owner:match(\"^[%w_.%-]+$\")and#owner<=64,\"invalid program owner\")end local source=assert(readSource(normalized))local config=loadConfig()assert(recordIdAvailable(config,programId(normalized),normalized),\"program capability ID collision; choose a different program path\")local record=defaultRecord(normalized,source,owner or actor)config.programs[normalized]=record saveConfig(config)audit.log(actor,\"program.capability_create\",{path=normalized,owner=record.owner})return copy(record)end function M.setTrust(path,trust)local actor=adminActor()assert(trust==\"sandboxed\"or trust==\"trusted\",\"invalid program trust state\")local normalized,err=normaliseProgramPath(path)assert(normalized,err)local source=assert(readSource(normalized))local config=loadConfig()local record,_,recordErr=recordFrom(config,normalized,source)assert(record,recordErr)record.trust,record.updatedAt=trust,now()if trust~=\"trusted\"then record.capabilities.peripherals={}end config.programs[normalized]=record saveConfig(config)audit.log(actor,\"program.trust\",{path=normalized,trust=trust})return copy(record)end function M.setOwner(path,owner)local actor=adminActor()assert(type(owner)==\"string\"and owner:match(\"^[%w_.%-]+$\")and#owner<=64,\"invalid program owner\")local normalized,err=normaliseProgramPath(path)assert(normalized,err)local source=assert(readSource(normalized))local config=loadConfig()local record,_,recordErr=recordFrom(config,normalized,source)assert(record,recordErr)record.owner,record.updatedAt=owner,now()config.programs[normalized]=record saveConfig(config)audit.log(actor,\"program.owner\",{path=normalized,owner=owner})return copy(record)end function M.grantReadOnlyPeripheral(path,name,methods)local actor=adminActor()assert(type(name)==\"string\"and name~=\"\"and#name<=128 and not name:find(\"[%z\\1-\\31]\"),\"invalid peripheral name\")local clean,methodErr=cleanMethods(methods)assert(clean,methodErr)local normalized,err=normaliseProgramPath(path)assert(normalized,err)local source=assert(readSource(normalized))local config=loadConfig()local record,_,recordErr=recordFrom(config,normalized,source)assert(record,recordErr)assert(record.trust==\"trusted\",\"admin must trust the program before granting peripherals\")record.capabilities.peripherals[name]={methods=clean}record.updatedAt=now()config.programs[normalized]=record saveConfig(config)audit.log(actor,\"program.peripheral_grant\",{path=normalized,peripheral=name,methods=clean})return copy(record)end function M.revokePeripheral(path,name)local actor=adminActor()local normalized,err=normaliseProgramPath(path)assert(normalized,err)local source=assert(readSource(normalized))local config=loadConfig()local record,_,recordErr=recordFrom(config,normalized,source)assert(record,recordErr)record.capabilities.peripherals[name]=nil record.updatedAt=now()config.programs[normalized]=record saveConfig(config)audit.log(actor,\"program.peripheral_revoke\",{path=normalized,peripheral=tostring(name)})return copy(record)end function M.viewerEnvironment(path,actor)local record,err=M.describe(path)if not record then return nil,err end actor=actor or\"viewer\"local denied={}local function deny(action)if not denied[action]then denied[action]=true audit.log(actor,\"program.denied\",{path=record.path,action=action})end error(\"permission denied: \"..action,3)end local function pullEvent(filter)while true do local event={os.pullEventRaw(filter)}if event[1]~=\"terminate\"then return table.unpack(event)end end end local safeOs={pullEvent=pullEvent,startTimer=os.startTimer,cancelTimer=os.cancelTimer,clock=os.clock,time=os.time,day=os.day,epoch=os.epoch,getComputerID=os.getComputerID,getComputerLabel=os.getComputerLabel,}local environment={_VERSION=_VERSION,assert=assert,error=error,ipairs=ipairs,next=next,pairs=pairs,pcall=pcall,select=select,tonumber=tonumber,tostring=tostring,type=type,xpcall=xpcall,print=print,printError=printError,read=read,write=write,math=tableCopy(math),string=tableCopy(string),table=tableCopy(table),coroutine=tableCopy(coroutine),bit32=tableCopy(bit32),utf8=tableCopy(utf8),keys=tableCopy(keys),colors=tableCopy(colors),colours=tableCopy(colours or colors),term=safeTerm(),textutils=safeTextutils(),os=safeOs,fs=safeFilesystem(record,actor,deny),peripheral=safePeripheral(record,deny),}return setmetatable(environment,{__index=function()return nil end}),record end function M.loadViewer(path,actor)local environment,record=M.viewerEnvironment(path,actor)if not environment then return nil,record end local chunk,err=loadfile(record.path,nil,environment)if not chunk then audit.log(actor or\"viewer\",\"program.denied\",{path=record.path,action=\"load\"})return nil,err end return chunk,record end function M.scratchPath(path)local record,err=M.describe(path)if not record then return nil,err end return scratchPath(record)end M.PATH=PATH M.SCHEMA=SCHEMA M.HASH_KIND=\"fnv1a32-legacy-integrity-marker\"return M",
  ["ceetos/bin/ceetver.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local ok,version=pcall(require,\"ceetos.lib.version\")print(\"CeetOS \"..(ok and version.string or\"0.12.0\"))",
  ["ceetos/bin/ceetdevices.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local peripherals=require(\"ceetos.lib.peripherals\")local shared={}for _,item in ipairs(peripherals.describe())do shared[item.name]=item.mode end for _,item in ipairs(peripherals.listLocal())do print(item.name..\"\\t\"..tostring(item.type or\"unknown\")..\"\\t\"..(shared[item.name]or\"not shared\"))end",
  ["ceetos/bin/ceetcraft.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local auth,store,crafting=require(\"ceetos.lib.auth\"),require(\"ceetos.lib.store\"),require(\"ceetos.lib.crafting\")local terminalUi=require(\"ceetos.lib.terminal_ui\")local canMutate=auth.allowed(\"operator\")local STATE,COMMANDS=\"/ceetos/data/crafting-state.lua\",\"/ceetos/data/crafting-commands\"local query,filter,focus,selectedStock,selectedCart,buttonIndex,actionPage=\"\",\"all\",\"stock\",1,1,1,1 local RECIPE_FILE,RECIPE_IMPORTS=\"/ceetos/data/recipes.lua\",\"/ceetos/data/recipe-imports.lua\"local modal,pending,serial,armedAction,lastRowClick,feedback=nil,{},0,nil,nil,nil local importReview,importScroll,importArmed=nil,0,nil local actions={{label=\"Add\",action=\"add\"},{label=\"Edit\",action=\"edit\"},{label=\"Del\",action=\"delete\"},{label=\"Craft\",action=\"mode\"},{label=\"Ord D\",action=\"destination\"},{label=\"Sources\",action=\"sources\"},{label=\"Find\",action=\"search\"},{label=\"Filt\",action=\"filter\"},{label=\"R\",action=\"refresh\"},{label=\"Send O\",action=\"submit\"},{label=\"Retry\",action=\"retry\"},{label=\"Can C\",action=\"cancel\"},{label=\"Back\",action=\"back\"},}local function state()store.invalidate(STATE)return store.read(STATE,{stock={},cart={},queue={},retries={},acknowledgements={},config={orderAddress=\"Order\"},history={}})end local function clipped(value,width)return terminalUi.clip(value,math.max(1,tonumber(width)or 1),\"~\")end local function queueCommand(action,data,label)feedback=nil serial=serial+1 local token=\"craft-ui-\"..tostring(os.epoch(\"utc\"))..\"-\"..tostring(serial)if not fs.exists(COMMANDS)then fs.makeDir(COMMANDS)end data=data or{};data.action,data.token=action,token local handle=fs.open(fs.combine(COMMANDS,token..\".lua\"),\"w\")if not handle then return false,\"could not queue \"..tostring(label or action)end handle.write(textutils.serialise(data));handle.close()pending[token]={label=label or action,at=os.epoch(\"utc\")}return true end local function cleanPending(s)for token,row in pairs(pending)do local acknowledgement=(s.acknowledgements or{})[token]if acknowledgement then pending[token]=nil if acknowledgement.ok~=true then feedback=\"Cannot \"..row.label..\": \"..tostring(acknowledgement.error or\"request was rejected\")end elseif os.epoch(\"utc\")-row.at>5000 then pending[token]=nil;feedback=\"Crafting service did not acknowledge \"..row.label end end end local function pendingText()for _,row in pairs(pending)do return\"Pending: \"..row.label end return feedback end local function startModal(kind,label,value,replaceOnInput)modal={kind=kind,label=label,value=tostring(value or\"\"),replaceOnInput=replaceOnInput==true}end local function recordRecipeImport(entry)local history=store.read(RECIPE_IMPORTS,{})history[#history+1]=entry while#history>16 do table.remove(history,1)end store.write(RECIPE_IMPORTS,history)end local function currentOverlay(s)local handle=fs.exists(RECIPE_FILE)and fs.open(RECIPE_FILE,\"r\")or nil local source=handle and handle.readAll()or nil if handle then handle.close()end if source then local overlay,err=crafting.parseRecipeOverlay(source)if overlay then return overlay end return nil,err end return{schema=1,recipes={},tags={}}end local function beginRecipeImport(event,s)if not canMutate then feedback=\"Recipe import requires operator access\";return end local transfers=event and event.getFiles and event.getFiles()or nil if type(transfers)~=\"table\"or#transfers~=1 then feedback=\"Drop exactly one recipe pack into Crafting Queue\";return end local transfer,chunks,total=transfers[1],{},0 if not transfer or type(transfer.read)~=\"function\"then feedback=\"Dropped file is not readable\";return end while true do local chunk=transfer.read(4096)if not chunk then break end if type(chunk)~=\"string\"then feedback=\"Dropped recipe pack has invalid data\";return end total=total+#chunk if total>crafting.RECIPE_PACK_MAX_BYTES then feedback=\"Recipe pack exceeds the 64 KiB import limit\";return end chunks[#chunks+1]=chunk end local pack,packErr=crafting.parseRecipePack(table.concat(chunks))if not pack then feedback=\"Recipe pack rejected: \"..tostring(packErr);recordRecipeImport({at=os.epoch(\"utc\"),source=transfer.getName and transfer.getName()or\"dropped file\",status=\"rejected\",error=tostring(packErr):sub(1,120)});return end local overlay,overlayErr=currentOverlay(s)if not overlay then feedback=\"Could not read local recipe overlay: \"..tostring(overlayErr);return end local review,reviewErr=crafting.reviewRecipePack(s.recipes or{},pack.recipes)if not review then feedback=\"Recipe pack rejected: \"..tostring(reviewErr);return end importReview={source=tostring(transfer.getName and transfer.getName()or\"recipe pack\"):sub(1,96),overlay=overlay,incomingTags=pack.tags or{},review=review,selected=1}importScroll,importArmed,feedback=0,nil,nil end local function importSelection(row)if row and(row.status==\"new\"or row.status==\"conflict\")then row.selected=not row.selected end end local function applyImportAction(action)if not importReview then return end local rows=importReview.review.rows if action==\"all_new\"then for _,row in ipairs(rows)do if row.status==\"new\"then row.selected=true end end elseif action==\"keep_conflicts\"then for _,row in ipairs(rows)do if row.status==\"conflict\"then row.selected=false end end elseif action==\"replace_conflicts\"then for _,row in ipairs(rows)do if row.status==\"conflict\"then row.selected=true end end elseif action==\"cancel_import\"then recordRecipeImport({at=os.epoch(\"utc\"),source=importReview.source,status=\"cancelled\",counts=importReview.review.counts})importReview=nil elseif action==\"apply_import\"then local merged,importedOrErr,tags=crafting.mergeRecipePack(importReview.overlay.recipes,importReview.review,importReview.overlay.tags,importReview.incomingTags)if not merged then feedback=\"Recipe import rejected: \"..tostring(importedOrErr);return end local saved,saveErr=crafting.writeRecipeFile(RECIPE_FILE,merged,tags)if not saved then feedback=\"Could not save recipes: \"..tostring(saveErr);return end recordRecipeImport({at=os.epoch(\"utc\"),source=importReview.source,status=\"imported\",imported=importedOrErr,counts=importReview.review.counts})importReview,feedback=nil,nil end end local function finishModal(s,rows)local kind,value=modal.kind,modal.value;modal=nil if kind==\"search\"then query=value elseif kind==\"destination\"and value~=\"\"then queueCommand(\"destination\",{value=value},\"Order address\")elseif kind==\"add\"then local n=tonumber(value);if n and n>0 and rows[selectedStock]then queueCommand(\"add\",{name=rows[selectedStock].name,count=n},\"Add\")end elseif kind==\"edit\"then local n=tonumber(value);if n and n>0 and s.cart[selectedCart]then queueCommand(\"edit\",{index=selectedCart,count=n},\"Edit\")end elseif kind==\"cancel_confirm\"then queueCommand(\"cancel_active\",{},\"Cancel craft\")end end local function sourceChoices(s,target)local choices={}if target==\"requester\"then choices[#choices+1]={label=\"No Redstone Requester\",value=false}end local key=target==\"recipes\"and\"recipeServers\"or(target..\"s\")for _,source in ipairs(((s.sources or{})[key]or{}))do choices[#choices+1]={label=tostring(source.label or((source.transport==\"peer\"and\"Peer \"..tostring(source.peer)..\" / \")or\"Local / \")..tostring(source.name)),value=source}end return choices end local function chooseSource(s,target)local choices,selected=sourceChoices(s,target),1 if#choices==0 then return end while true do local w,h=term.getSize()term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear()term.setBackgroundColor(colors.blue);term.setCursorPos(1,1);term.clearLine();term.setCursorPos(2,1);term.write(\"CeetOS Crafting Queue | Select \"..target)term.setTextColor(colors.lightGray);term.setCursorPos(2,3);term.write(\"Use arrows/Enter or click a source. Backspace cancels.\")local targets={}for index,choice in ipairs(choices)do local y=4+index-1;if y>=h then break end term.setBackgroundColor(index==selected and colors.gray or colors.black);term.setTextColor(index==selected and colors.white or colors.lightGray);term.setCursorPos(2,y);term.clearLine();term.write(choice.label:sub(1,w-3))targets[#targets+1]={y=y,index=index}end local event,a,b,c=os.pullEvent()if event==\"key\"then local key=keys.getName(a)if key==\"backspace\"or key==\"q\"then return elseif key==\"up\"then selected=math.max(1,selected-1)elseif key==\"down\"then selected=math.min(#choices,selected+1)elseif key==\"enter\"then queueCommand(\"source\",{target=target,value=choices[selected].value},target..\" source\");return end elseif event==\"mouse_click\"and a==1 then for _,hit in ipairs(targets)do if c==hit.y then selected=hit.index;break end end elseif event==\"mouse_up\"and a==1 then for _,hit in ipairs(targets)do if c==hit.y then queueCommand(\"source\",{target=target,value=choices[hit.index].value},target..\" source\");return end end end end end local function applyAction(action,s,rows)if action==\"back\"then return\"exit\"end if action==\"more\"then actionPage=actionPage+1;buttonIndex=1;return end if not canMutate and action~=\"search\"and action~=\"filter\"and action~=\"refresh\"then return end if action==\"search\"then startModal(\"search\",\"Find ticker items\",query)elseif action==\"filter\"then filter=filter==\"all\"and\"craftable\"or(filter==\"craftable\"and\"stocked\"or\"all\")elseif action==\"refresh\"then queueCommand(\"refresh\",{},\"Refresh\")elseif action==\"mode\"then if(s.config or{}).requester then queueCommand(\"mode\",{value=not s.craftMode},\"Craft mode\")end elseif action==\"destination\"then startModal(\"destination\",\"Order address\",(s.config or{}).orderAddress or\"Order\")elseif action==\"sources\"then chooseSource(s,\"ticker\");s=state();chooseSource(s,\"requester\");s=state();chooseSource(s,\"recipes\")elseif action==\"submit\"then queueCommand(\"submit\",{},\"Submit\")elseif action==\"retry\"and#(s.retries or{})>0 then queueCommand(\"retry\",{index=1},\"Retry\")elseif action==\"cancel\"and s.active then startModal(\"cancel_confirm\",\"Cancel active craft? Issued Create packages may still arrive\",\"\")elseif action==\"delete\"and focus==\"cart\"then queueCommand(\"remove\",{index=selectedCart},\"Remove\")elseif action==\"add\"and focus==\"stock\"and rows[selectedStock]then startModal(\"add\",\"Add \"..rows[selectedStock].name..\" quantity\",\"1\",true)elseif action==\"edit\"and focus==\"cart\"and s.cart[selectedCart]then startModal(\"edit\",\"Set \"..s.cart[selectedCart].name..\" quantity\",s.cart[selectedCart].count,true)end end local function frame(x1,y1,x2,y2,title)return terminalUi.box(x1,y1,x2,y2,title,colors.gray,colors.lightBlue)end local function drawButton(x,y,entry,selected,armed,targets)local text=\"[\"..entry.label..\"]\"local width=select(1,term.getSize())if x+#text-1>width then return x end local background=armed and colors.yellow or(selected and colors.gray or colors.black)local enabled=canMutate or entry.action==\"search\"or entry.action==\"filter\"or entry.action==\"refresh\"or entry.action==\"back\"terminalUi.write(x,y,text,armed and colors.black or(enabled and(selected and colors.white or colors.lightGray)or colors.gray),background)targets[#targets+1]={x1=x,x2=x+#text-1,y1=y,y2=y,action=entry.action}return x+#text+1 end local function visibleActions(w)local pageSize=w>=48 and 7 or 5 local pages=math.max(1,math.ceil(#actions/pageSize))actionPage=math.max(1,math.min(pages,actionPage))local out,first,last={},(actionPage-1)*pageSize+1,math.min(#actions,actionPage*pageSize)for index=first,last do out[#out+1]=actions[index]end if pages>1 then out[#out+1]={label=\"More \"..actionPage..\"/\"..pages,action=\"more\"}end buttonIndex=math.max(1,math.min(#out,buttonIndex))return out end local function drawActionRows(w,h,targets)local entries=visibleActions(w)local firstCount=math.ceil(#entries/2)terminalUi.clearLine(h-2,colors.black);terminalUi.clearLine(h-1,colors.black)local x,row=2,h-2 for index,entry in ipairs(entries)do if index==firstCount+1 then x,row=2,h-1 end x=drawButton(x,row,entry,focus==\"actions\"and buttonIndex==index,armedAction==entry.action,targets)end return entries end local function drawModal(w,h)if not modal then return end terminalUi.clearLine(h-2,colors.gray);terminalUi.write(2,h-2,modal.label,colors.white,colors.gray,w-3)if modal.kind==\"cancel_confirm\"then terminalUi.clearLine(h-1,colors.gray);terminalUi.write(2,h-1,\"[Confirm cancel] [Keep running]\",colors.white,colors.gray,w-3)else terminalUi.clearLine(h-1,colors.gray)if modal.replaceOnInput then terminalUi.write(2,h-1,modal.value,colors.black,colors.lightBlue,w-4)else terminalUi.write(2,h-1,\"> \"..modal.value,colors.white,colors.gray,w-4)end term.setCursorPos(math.min(w-1,4+#modal.value),h-1)terminalUi.clearLine(h,colors.gray);terminalUi.write(2,h,\"[Save] [Cancel]\",colors.white,colors.gray,w-3)end end local function drawImportReview()local w,h=term.getSize()term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear()if w<36 or h<15 then terminalUi.minimum(\"Recipe import\",\"Recipe review needs 36x15\",\"Resize | Backspace\")return{targets={},rows={}}end local review,counts=importReview.review,importReview.review.counts terminalUi.clearLine(1,colors.blue);terminalUi.write(2,1,\"CeetOS Crafting Queue | Review recipe pack\",colors.white,colors.blue,w-2)terminalUi.write(2,3,\"File: \"..clipped(importReview.source,w-8),colors.lightGray,colors.black,w-3)terminalUi.write(2,4,(\"New: %d  Conflicts: %d  Unchanged: %d  Invalid: %d\"):format(counts.new or 0,counts.conflict or 0,counts.unchanged or 0,counts.invalid or 0),colors.white,colors.black,w-3)frame(1,5,w,h-4,\"Recipes\")local capacity=math.max(1,h-10)importReview.selected=math.max(1,math.min(math.max(1,#review.rows),importReview.selected or 1))if importReview.selected<=importScroll then importScroll=importReview.selected-1 end if importReview.selected>importScroll+capacity then importScroll=importReview.selected-capacity end importScroll=math.max(0,math.min(math.max(0,#review.rows-capacity),importScroll))local targets,visible={},{}for offset=1,capacity do local index,row,y=importScroll+offset,review.rows[importScroll+offset],5+offset if row then local marker=row.status==\"new\"and(row.selected and\"[+]\"or\"[ ]\")or row.status==\"conflict\"and(row.selected and\"[Replace]\"or\"[Keep]\")or\"[Same]\"local colour=row.status==\"new\"and colors.lime or row.status==\"conflict\"and colors.yellow or colors.gray terminalUi.write(3,y,marker..\" \"..row.name,colour,index==importReview.selected and colors.gray or colors.black,w-5)targets[#targets+1]={x1=2,x2=w-1,y1=y,y2=y,action=\"select_recipe\",index=index}visible[#visible+1]=row end end local selected=review.rows[importReview.selected]if selected then local localText=selected.existing and(\"Local: \"..tostring(selected.existing.output)..\" via \"..tostring(selected.existing.address))or\"Local: none\"local incomingText=\"Incoming: \"..tostring(selected.incoming.output)..\" via \"..tostring(selected.incoming.address)terminalUi.write(2,h-3,clipped(localText..\" | \"..incomingText,w-3),colors.lightGray,colors.black,w-3)end local buttons={{label=\"Import\",action=\"apply_import\"},{label=\"All new\",action=\"all_new\"},{label=\"Keep conflicts\",action=\"keep_conflicts\"},{label=\"Replace conflicts\",action=\"replace_conflicts\"},{label=\"Cancel\",action=\"cancel_import\"},}local x,buttonRow=2,h-2 for _,button in ipairs(buttons)do local text=\"[\"..button.label..\"]\"if x+#text-1>w-1 and buttonRow==h-2 then x,buttonRow=2,h-1 end if x+#text-1<=w-1 then terminalUi.write(x,buttonRow,text,importArmed==button.action and colors.black or colors.white,importArmed==button.action and colors.yellow or colors.gray)targets[#targets+1]={x1=x,x2=x+#text-1,y1=buttonRow,y2=buttonRow,action=button.action}x=x+#text+1 end end terminalUi.write(2,h,\"Arrows select | Space toggle | Enter import | A/K/X | Backspace cancel\",colors.gray,colors.black,w-3)return{targets=targets,rows=visible}end local function draw(s,rows)local w,h=term.getSize();term.setBackgroundColor(colors.black);term.setTextColor(colors.white);term.clear()if w<36 or h<15 then return{targets=terminalUi.minimum(\"CeetOS Crafting Queue\",\"Crafting Queue needs 36x15\",\"Resize | Backspace\")or{},compact=true,actions={}}end local config=s.config or{}local tickerLabel=config.ticker and tostring(config.ticker.label or config.ticker.name)or\"not selected\"local requesterLabel=config.requester and tostring(config.requester.label or config.requester.name)or\"none\"local recipeLabel=config.recipeServer and tostring(config.recipeServer.label or(\"Peer \"..tostring(config.recipeServer.peer)))or\"local\"terminalUi.clearLine(1,colors.blue);terminalUi.write(2,1,\"CeetOS Crafting Queue | Ticker: \"..tickerLabel..\" | Recipes: \"..recipeLabel,colors.white,colors.blue,w-2)local items,total=crafting.cartTotals(s.cart)frame(1,2,w,5,\"Order\")terminalUi.write(3,3,\"Destination: \"..tostring(config.orderAddress or\"Order\")..\"   Craft mode: \"..(s.craftMode and\"ON\"or\"OFF\")..(config.requester and\"\"or\" (requires requester)\"),colors.white,colors.black,w-5)terminalUi.write(3,4,(\"Cart: %d items / %d units    Filter: %s    Find: %s\"):format(items,total,filter,query==\"\"and\"all\"or query),colors.lightGray,colors.black,w-5)local active,status=s.active,pendingText()or\"Ready\"if active then local item=active.items and active.items[active.index]if active.phase==\"await_crafted_output\"then local route=active.stepRoute or\"recipe route\"status=(\"%s; waiting for +%s %s in Stock Ticker\"):format(route,tostring(active.expectedOutput or\"?\"),tostring(active.waitingFor or item and item.name or\"recipe\"))elseif active.phase==\"craft\"and active.pendingCraftRequests then status=(\"Requester batching %s; %s craft request%s remaining\"):format(tostring(item and item.name or\"recipe\"),tostring(active.pendingCraftRequests),active.pendingCraftRequests==1 and\"\"or\"s\")elseif active.phase==\"await_package_confirmation\"or active.phase==\"await_peer_package\"then status=(\"Stock Ticker -> %s; package %s/%s: waiting for %s\"):format(tostring(active.stepAddress or\"destination\"),tostring(active.packageIndex or 1),tostring(active.packageCount or\"?\"),tostring(active.waitingFor or\"ingredient\"))elseif active.phase==\"await_delivery_confirmation\"then status=(\"Order submitted to %s; waiting for ticker decrease of %s\"):format(tostring(active.destination),tostring(active.accepted or\"?\"))else status=(\"%s | %s  requested:%s accepted:%s dispatched:%s remaining:%s\"):format(tostring(active.phase),tostring(item and item.name or\"finishing\"),tostring(active.requested or(item and item.count)or 0),tostring(active.accepted or\"-\"),tostring(active.delivered or 0),tostring(active.remaining or\"-\"))end end frame(1,6,w,8,active and\"Active job\"or\"Status\")terminalUi.write(3,7,s.error or status,(s.error or feedback)and colors.red or(active and colors.yellow or colors.lightGray),colors.black,w-5)local split,top,bottom=math.max(24,math.floor(w*.57)),10,h-4 frame(1,9,split,bottom,\"Items & recipes\")frame(split+1,9,w,bottom,\"Request list\")local lines=math.max(0,bottom-top)for i=1,lines do local y,item,cart=top+i-1,rows[i],(s.cart or{})[i]if item then terminalUi.write(3,y,crafting.displayRow(item.name,item.count,split-4),item.craftable and colors.lime or colors.white,focus==\"stock\"and selectedStock==i and colors.gray or colors.black,split-4)end if cart then terminalUi.write(split+3,y,crafting.displayRow(cart.name,cart.count,w-split-4),colors.white,focus==\"cart\"and selectedCart==i and colors.gray or colors.black,w-split-4)end end local history,retry=(s.history or{})[#(s.history or{})],(s.retries or{})[1]local detail=s.recoveryNotice or(history and(\"Last: \"..tostring(history.status)..\" \"..tostring(history.name or\"job\")..\" \"..tostring(history.dispatched or history.delivered or 0)..\"/\"..tostring(history.requested or 0)..(history.error and(\" - \"..tostring(history.error))or\"\"))or\"No dispatched orders yet\")if retry then detail=detail..\" | Retry: \"..tostring(retry.items[1].name)..\" x\"..tostring(retry.items[1].count)end terminalUi.write(2,bottom+1,detail,colors.gray,colors.black,w-2)local targets={};local actionEntries=drawActionRows(w,h,targets);if modal then drawModal(w,h)end return{split=split,top=top,bottom=bottom-1,targets=targets,actions=actionEntries}end local function hit(targets,x,y)return terminalUi.hit(targets,x,y)end local timer=os.startTimer(0.2)while true do local s=state();cleanPending(s)local rows=crafting.rows(s.stock,query,filter,s.recipes)selectedStock=math.max(1,math.min(math.max(1,#rows),selectedStock));selectedCart=math.max(1,math.min(math.max(1,#s.cart),selectedCart))local layout=importReview and drawImportReview()or draw(s,rows)local event,a,b,c=os.pullEvent()if event==\"timer\"and a==timer then timer=os.startTimer(0.2)elseif importReview then if event==\"key\"then local key=keys.getName(a)if key==\"backspace\"or key==\"q\"then applyImportAction(\"cancel_import\")elseif key==\"up\"then importReview.selected=math.max(1,(importReview.selected or 1)-1)elseif key==\"down\"then importReview.selected=math.min(#importReview.review.rows,(importReview.selected or 1)+1)elseif key==\"space\"or key==\"left\"or key==\"right\"then importSelection(importReview.review.rows[importReview.selected])elseif key==\"a\"then applyImportAction(\"all_new\")elseif key==\"k\"then applyImportAction(\"keep_conflicts\")elseif key==\"x\"then applyImportAction(\"replace_conflicts\")elseif key==\"enter\"then applyImportAction(\"apply_import\")end elseif event==\"mouse_click\"and a==1 then local target=hit(layout.targets,b,c)if target and target.action==\"select_recipe\"then importReview.selected=target.index elseif target then importArmed=target.action end elseif event==\"mouse_drag\"and a==1 then local target=hit(layout.targets,b,c);importArmed=target and target.action or nil elseif event==\"mouse_up\"and a==1 then local target=hit(layout.targets,b,c)if target and target.action==\"select_recipe\"then importReview.selected=target.index;importSelection(importReview.review.rows[target.index])elseif target and target.action==importArmed then applyImportAction(target.action)end importArmed=nil end elseif modal then if event==\"char\"and modal.kind~=\"cancel_confirm\"then modal.value=(modal.replaceOnInput and\"\"or modal.value)..a;modal.replaceOnInput=false elseif event==\"paste\"and modal.kind~=\"cancel_confirm\"then modal.value=(modal.replaceOnInput and\"\"or modal.value)..tostring(a):gsub(\"[\\r\\n]\",\"\");modal.replaceOnInput=false elseif event==\"key\"then local key=keys.getName(a)if key==\"enter\"then finishModal(s,rows)elseif key==\"backspace\"then if modal.kind==\"cancel_confirm\"or#modal.value==0 then modal=nil else modal.value=modal.value:sub(1,-2);modal.replaceOnInput=false end end elseif event==\"mouse_up\"and a==1 then local _,h=term.getSize()if modal.kind==\"cancel_confirm\"then if c==h-1 and b>=2 and b<=17 then finishModal(s,rows)elseif c==h-1 then modal=nil end elseif c==h and b>=2 and b<=7 then finishModal(s,rows)elseif c==h and b>=9 then modal=nil end end elseif event==\"key\"then local key=keys.getName(a)if key==\"backspace\"or key==\"q\"then return elseif key==\"tab\"then focus=focus==\"stock\"and\"cart\"or(focus==\"cart\"and\"actions\"or\"stock\")elseif key==\"up\"then if focus==\"stock\"then selectedStock=math.max(1,selectedStock-1)elseif focus==\"cart\"then selectedCart=math.max(1,selectedCart-1)end elseif key==\"down\"then if focus==\"stock\"then selectedStock=math.min(math.max(1,#rows),selectedStock+1)elseif focus==\"cart\"then selectedCart=math.min(math.max(1,#s.cart),selectedCart+1)end elseif key==\"left\"and focus==\"actions\"then buttonIndex=math.max(1,buttonIndex-1)elseif key==\"right\"and focus==\"actions\"then buttonIndex=math.min(#layout.actions,buttonIndex+1)elseif key==\"s\"then applyAction(\"search\",s,rows)elseif key==\"f\"then applyAction(\"filter\",s,rows)elseif key==\"r\"then applyAction(\"refresh\",s,rows)elseif key==\"space\"then applyAction(\"mode\",s,rows)elseif key==\"d\"then applyAction(\"destination\",s,rows)elseif key==\"o\"then applyAction(\"submit\",s,rows)elseif key==\"c\"then applyAction(\"cancel\",s,rows)elseif key==\"delete\"then applyAction(\"delete\",s,rows)elseif key==\"enter\"then local action=focus==\"actions\"and layout.actions[buttonIndex]and layout.actions[buttonIndex].action or(focus==\"stock\"and\"add\"or\"edit\")if action and applyAction(action,s,rows)==\"exit\"then return end end elseif event==\"mouse_click\"and a==1 then local target=hit(layout.targets,b,c)if target then armedAction=target.action elseif c>=layout.top and c<=layout.bottom then local index=c-layout.top+1 if b<=layout.split and rows[index]then focus,selectedStock=\"stock\",index local now=os.epoch(\"utc\")if lastRowClick and lastRowClick.side==\"stock\"and lastRowClick.index==index and now-lastRowClick.at<=450 then startModal(\"add\",\"Add \"..rows[index].name..\" quantity\",\"1\",true);lastRowClick=nil else lastRowClick={side=\"stock\",index=index,at=now}end elseif b>layout.split and s.cart[index]then focus,selectedCart=\"cart\",index local now=os.epoch(\"utc\")if lastRowClick and lastRowClick.side==\"cart\"and lastRowClick.index==index and now-lastRowClick.at<=450 then startModal(\"edit\",\"Set \"..s.cart[index].name..\" quantity\",s.cart[index].count,true);lastRowClick=nil else lastRowClick={side=\"cart\",index=index,at=now}end end end elseif event==\"mouse_drag\"and a==1 then local target=hit(layout.targets,b,c);armedAction=target and target.action or nil elseif event==\"mouse_up\"and a==1 then local target=hit(layout.targets,b,c)if target and target.action==armedAction then if applyAction(target.action,s,rows)==\"exit\"then return end end armedAction=nil elseif event==\"file_transfer\"then feedback=\"Recipe packs must be imported on the selected Recipe Server\"end end",
  ["ceetos/bin/ceetshareall.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local auth=require(\"ceetos.lib.auth\")local peripherals=require(\"ceetos.lib.peripherals\")local mode=(...)==\"master\"and\"master\"or\"peer\"auth.require(\"operator\")print(\"Shared \"..peripherals.shareAll(mode)..\" peripherals (\"..mode..\")\")",
  ["ceetos/bin/ceetunshareall.lua"] = "package.path=\"/?.lua;/?/init.lua;\"..package.path local auth=require(\"ceetos.lib.auth\")local peripherals=require(\"ceetos.lib.peripherals\")auth.require(\"operator\")print(\"Unshared \"..peripherals.unshareAll()..\" peripherals\")",
}
local CEETOS_RELEASE_INSTALLER = true
local CEETOS_PROFILE = "desktop"

-- `wget --install` may run inside a deliberately restricted CeetShell child
-- environment. Self-cleaning is optional there: never require the shell API
-- merely to install the runtime.
local args = { ... }
local automated = args[1] == "--ceetos-apply"
local self = shell and shell.getRunningProgram and shell.getRunningProgram()
local cache = "/ceetos-updates/release.lua"
-- A signed release launched directly is retained outside the replaceable
-- runtime tree for verified recovery. Development installers deliberately do
-- not become propagation sources. Do this before removing the downloaded
-- program itself, but avoid copying the cache onto itself during recovery.
if CEETOS_RELEASE_INSTALLER and not automated and self and fs.exists(self) and self ~= cache then
  if not fs.exists("/ceetos-updates") then fs.makeDir("/ceetos-updates") end
  if fs.exists(cache) then fs.delete(cache) end
  pcall(fs.copy, self, cache)
end
if self and self ~= cache and fs.exists(self) then pcall(fs.delete, self) end

local bytes = 0
for _, contents in pairs(files) do bytes = bytes + #contents end
print("CeetOS " .. CEETOS_PROFILE .. " installer (" .. bytes .. " bytes)")
if not automated then
  print("This will replace /ceetos and /startup.lua. Continue? [y/N]")
  if read():lower() ~= "y" then print("Cancelled."); return end
end

local backup, migrate, migrationData = nil, false, {}
-- Clean stale full-tree backups from older installers before measuring space.
for _, name in ipairs(fs.list(".")) do
  if name:match("^ceetos%.backup") or name == "ceetos-migrate" then fs.delete(name) end
end
-- Development transactions can be much larger than the runtime. Preserve
-- only the reconnect record; staged payloads, test data, and rollback trees
-- are disposable and must not prevent an install from starting.
for _, name in ipairs({ "staging", "backups", "test-data" }) do
  local path = fs.combine("ceetos-dev", name)
  if fs.exists(path) then fs.delete(path) end
end
if fs.exists("ceetos") then
  if automated then migrate = true else
    print("Migrate saved CeetOS configuration? [Y/n]")
    local choice = read():lower()
    migrate = choice ~= "n" and choice ~= "no"
  end
  -- Copy only durable configuration to a small migration area, then remove
  -- the old tree before writing the new one. This works on nearly-full CC
  -- drives where retaining a complete backup would make installation fail.
  if migrate then
    local durable = { "users.lua", "network.lua", "shares.lua", "config.lua", "owner-service.lua", "seen-peers.lua", "jobs.lua", "job-workers.lua", "crafting-state.lua", "auth-authority.lua", "auth-authority-state.lua", "auth-directory.lua", "auth-session.lua", "cloud.lua", "cloud-state.lua" }
    if CEETOS_PROFILE == "recipe-server" then durable[#durable + 1] = "recipes.lua" end
    for _, name in ipairs(durable) do
      local source = fs.combine("ceetos/data", name)
      if fs.exists(source) then
        local input = fs.open(source, "r")
        if input then migrationData[name] = input.readAll(); input.close() end
      end
    end
  end
  fs.delete("ceetos")
end

for path, contents in pairs(files) do
  local parent = fs.getDir(path)
  if parent ~= "" and not fs.exists(parent) then fs.makeDir(parent) end
  local handle = assert(fs.open(path, "w"))
  handle.write(contents)
  handle.close()
end

if migrate then
  -- Preserve durable configuration, but never preserve an active session,
  -- temporary recovery window, remote result cache, or stale audit entries.
  local durable = { "users.lua", "network.lua", "shares.lua", "config.lua", "owner-service.lua", "seen-peers.lua", "jobs.lua", "job-workers.lua", "crafting-state.lua", "auth-authority.lua", "auth-authority-state.lua", "auth-directory.lua", "auth-session.lua", "cloud.lua", "cloud-state.lua" }
  if CEETOS_PROFILE == "recipe-server" then durable[#durable + 1] = "recipes.lua" end
  for _, name in ipairs(durable) do
    local contents = migrationData[name]
    if contents then
      if not fs.exists("ceetos/data") then fs.makeDir("ceetos/data") end
      local output = assert(fs.open(fs.combine("ceetos/data", name), "w"))
      output.write(contents); output.close()
    end
  end
  print("Saved CeetOS configuration migrated. Please log in again.")
end

-- The installer is intentionally transactional while it runs, but retaining
-- a full tree backup after a successful install quickly exhausts small CC
-- drives. Durable data has already been copied, so remove the old tree.
if automated then
  -- The root startup launcher sees this marker and boots the freshly written
  -- runtime rather than replaying the installer. The runtime verifies its
  -- loaded version before clearing it.
  if not fs.exists("/ceetos-updates") then fs.makeDir("/ceetos-updates") end
  local marker = fs.open("/ceetos-updates/pending.lua", "w")
  if marker then marker.write("return {state='verify',version=" .. "0.16.2" .. ",profile=" .. "\"desktop\"" .. "}"); marker.close() end
  print("CeetOS installed. Rebooting to verify the update.")
  os.reboot()
end
print("CeetOS installed. Reboot to start it.")

-- CEETOS_RELEASE_PAYLOAD_END