-- CeetOS signed release. Generated; do not edit.
-- CEETOS_RELEASE_MANIFEST:e2NoYW5uZWw9InJlbGVhc2UiLHByb2ZpbGU9ImRlc2t0b3AiLHZlcnNpb249IjAuMTYuNiIsc2l6ZT02MTc1NDUsZGlnZXN0PSI0YmU4OGM5MTdlNDYwNWUxYTBiY2IzZmQ4MmU5NGM2OTlmZGVhMWJkYTUwOWMxMDc0YjJmNGU5MzZmZDJkMGU4IixrZXlfaWQ9ImRlc2t0b3AtcmVsZWFzZS0wLjE2LjUiLG5leHRfa2V5X2lkPSJkZXNrdG9wLXJlbGVhc2UtMC4xNi42IixuZXh0X3B1YmxpYz0iL0lIa2tldVBrK0lMbDlBaEd1WlV4Q3U2Z3F5TVpuZnM1T2NwS3RQVXQ1cTI0L21KTHN6R0dJOWVkRXcvMHBxUGQ1TlNYVzRpWTVQdVphZ1hyandZWmVIcFkvZHIvMVJOVkdwbDJoVXNGcGVLa3RYdEo3Nlk5dFM3ZnhQWUVBRWwrdHBsVld5aFFsQlBjYWlWMlUrRXpDV0NQNmlZTFlTK1ZHUzhhQkpXN09nK25Hb3dJWFFrNmplMnRINitnZzZaUlVUMHNuOTNobHJVOW84U0pNMUd1QVR2VXpIMVVJOUVNS3g3bStoRkFKbmdNd0ttUzFqbjhlSksxWUp0cEN6NXlYZktqOWtuNW1sSGxRQmdIMmdna2hDTzZxM1dHVXY2N1lYUlZ3bkhyVTlzMjMrWWNaL2psODBsU2dXN0hSck00aVYzdWdraWUzY20xNlNEVWphbHQxODl5T0lTakpBdkJyeEFSMVBhOUhMKy9jVHg1bklheEM3Y1hkaGVZQk11RTJNWFdmenEzQ2pGeFAyZkhtSlUwNjJ0QlR3c0ViRUlIWVdHRjMvOUduRFlkSDJXL1dzNkxpNVRzRWV0c3l2WnJqSzlBNU05eWtIcWRVTGQ0LzBXWTBuamY3RVJrNDJWbzRSdVBmOVZaUkhaZjhaVFBRc0xQTUJGOWRQbGp4c0NkQ0tiSFQvM1dsWjV2UkQyV1RBeUozNXUybW5TL1ZUUkFWMXdFU05Fb2pyT0tYZWE5WDJiUmpUTU5mRzgzTG8yNXBPdUNMRjFYNjZCOUFVY25EVkYzOUkzdURrQWFxUGIvQXQzeUpNUTF5RDY0N1NSNGdVRlRzUzFLVGl3WlNqL0w0VHdra1JQeE5DRlltRHpBbkd3cU5pWGpZL3ZFNysxeHh3R1YyK1hRbFVVWmxmaU5iZ2w3bEtoZWh3YXBSM1Y0dFVYdTlrcDhWRFlDVGM1a0hIUXluZEp2UXlGd1NYMWNWY0tyT3FTUFFXeTd1NXJnM3VZT2NBb1RCWEhLVWpHb3hhUDBHd1hJNC9GS0RRK2RtelQzbzUxUkJQWmhxYkU1VzR5ZEdJa2tBL1hONWlZaEdoNUZGdXBOVndiZzUrUzZVUFNtcXhib1Y0bUxlcGhFSHV6TEcyTHNOV01abURmVDg1NjRUa3laZThzaHBEL2ZDd2hEM2t4eFBXTXFMdVFXcldCY0VJR1BZc3FkdDltcm5hS1RZNlBuQTdKaHM3QVZ6dXA0TUlvWEQyZFZocEJTcmVsaGtVS3VET1podDI1VmFMYy93NDhVaHBXTEpYVFRXNGVJMkg1VjVyNVFXYkM3b2kzcE85amV2WDhheGJBVnQ3OTVyNnBJRUNWWS9vTmllWGxXYVlDVzJlVVZSd1lkeUZqcHRxZVNjTjVsb0xUYUxTT2daNXAyRWcwVlFEU0J2QUNHWld6NUVmTHZuYWVOOGgyUUJaenlQWVphZis3NWpNQTU0U0h3RTk3UDlRalRncXpWbVc5Sy9jTHhMRzBudkZ6L0g5aGdiL25nVEoxaVdZa24rcXoydFBVcGdiTVJ1NHNtTzFYMnZwN002NllySnVYYVViVExOd0N2T1lRVkNGUXdVOFFJWk1BWnNjQVNyK2dOeGVwQlhVS21QdHRQanFJNHJaM3kzN016Q3c4UWtzWEtPdXkrdHlzMDRvaFdiamJjZWxYaTJERy9nSDcvUktML2dHeU5GYXNINWl1ZWhIVnd3TlMwRGZvanpVZ0pVU2dPZGJQMThLZTBIdE1VVS9Hbmd2bHBIdlRNQWlJZ3NGK0UxdlNJVndGeE1XWjl3NEdJMWgvTTBiNC8zSjFyMEQrUTc3YjdqYUVMOHpOSDZnS0hXN0Z2NEJrWmRRbUR2RXFRaUJyYzVma2hGMFlPM3NYRjR3czgxTjlUWDJ2WGRKMmtIOHhrdHhodVNQTjFqS0ZSVUxPQ3NqRG5CVkx2NVhSeTJ1ZUY4bUUwRU9pVE8zV1VBaDBXNlpBTTdmemRKVWhENUIwOXNQTGpDU0U0QXBwYjd2Mi84a1RMYTgvNW5YL2pWdVVuOUc4eUg2d2FudDlidlVUbDl4MFFoNEJBeFZkV1J6Q0lhbVZZZmhTVDdTdmlxYWh1cTBQSlNnbGJWVTQrbWIwTnE0UkVVZGFYTVF3RzFMS3lkcENXbGwvQUpvdjFKemoxU3lwcm1lL2s0QWoxV29JTkdqVHBoR2tER2dpc1l6WU9FZ2VNUzg1WXVaait5WDN3c0d5aEpjSDlpODI3ZzV3djZ0emNidGNGT1BBV0d4OHErcjR6RTMyRHMvMFJCNk1DOHcrV3gvcTlncDFnZmFqUG9LekMvUkZjMWZhNC91eEROQjJnZm8rdmFZZmpxU0d4bHV3eVFTTEhmVW5FeXU2VS9yTWl1QVVSQjg3Mk1sRStYWDlXNzVDZ3NESlRxWGx3dkg5a3crOGI2L1pqMHR4ZnRLSzJhanRtV21HaDZHdHFaTnVldFIwM29kbzlwaGNEVEFPZ2VMWjh6WXhFRHN3VHJnZnU2eGhJWTBVQlQ0QnBuUlRib3ZvMk5PSmh6LytmdVR5dlJyZHg2QXQxcXhMZXZRM01oZ0Zwb3d6cjJUaWgrSUo4aXF5ZlJiZGIxc3pYRUhiYkE5YVBRSnBqcDNscVhIVXErWFQ4Yk1kTnR4bkdycFJuUUtuSGJKdHloNHJqN2FPZ0xUZTZXS2lwODVUOGRWQ2NRaWh2aGluNHJ1R0NYQlh1U0xyNStMKzIwaE82bVMwRlgxNDZ3QjJnZTVhRS9rRUVUaXYzSStabWwxL2NBSHRKZG9ZWWQ2blNSTGJsaUUvVFcraXhEZ3VZNWZBTUMyQm5PUUIzKy9HQ04yWnNTMW9mZUxHSStmN2VXR3VoU1FDemVuWVk5cGxIZ0RFVVZKZXZBbkJpT3M4UkV4TTZMaXBkMW5sRnlvcjBDOXlzamxHS1djVW5rTy8wNVZRcWlob3Jxb3VqUmdTbHg1d0hxVEdSdjZKRTc0WUJNQjZkN0R0MWZTa0hHQXZYalpsS1FORHBHM29hWm43QWNhdy9BYVp4NEU0REN6d2FaeWltT3hQdXpjbnErU2FXcVNQWno1Qy9hRGlFQWw5bmhqVW84YnBKNG5ESU5JRFVWTXA5OVJIMjBOaWZ5Z05Sek9icTdpVTRobEhvdGJWYVVBTTRkTTRTeitoQnhjMmNoLzdaMjRRVGlVbHk5Z1VsVys4Wk5kek9Td2FMTzRpWmNNeklhT1pNQXdFZ0lEbUxuVm9yMlcxWnpFYVdXME94bGxmS3ZUREhMOVJZb2dRRWRIQWhCSTdHa21YUzhpK001Ky9LaHVLcGxlaWNFQVNJV3F1NVh5bTN3TXV4VXBvUlAwM3BpdXBGKzdRbUZtVVJ0ZHRpNld0UTVBT3phbEhRcFBLNHYvUzU5bVJOL3VoeHFGWkpCVDNKMW02RU4rYytvWlowNjNVZEVKTzRLUDJaenlpQUN5NnNreTRpYTFZSWVvREJmWWxGUzB4NXFxQkQzTmsrNzZZbENjYkxJb21UM3FjeFJSZHNyT3BWeXY4NU5POTljTUNSVG5MajJlZDFOMm8zcnh3MkxBZzBZTkhSZ2RoN3FNK0plSnZGRm04RVJ4QVBrZHVCa016alpRaWNKak40ZUVoSDNXTXJtdTZJcUIvOFlRUG90czdJaWxHYU5pRnBKdU1OYUt3UzMwRUVPUjRjRis1Z2d6UVVBWk9JNVJnNkM1TTFLd3ZucVcwRkZEVUc1aWF3OEs1Qis2Wkt2cDR2L1o3aklkcTlRbEJDcUtnUEZPZFAzZUtVa2VCVWR6bG5OdCs0MXZTenhEVkRxb2p0NTBGdGlmYWVyTlRaV01rSTJvQXZoSU9FT2krYjZ4cWZYY0xUd01YTUtxdEpUd05hM0EyRVZvZStSQ1E1Zk9UNTZkakRCQXU1OU0yMDhXcHIveGVBRUo5bjY3dnZKa2paRktTWStMUzFmNGNKYWQ5N3FJWFFSSVdmcUVPYXBJT3dzU3ZtVTNBb3pjdm1kWlhXdURqRTRYdXNwdUxrY1lwNlYrMUxsdlo1ODBZMWtuS2dtNW5Ga1lEaEl0cndkNFZSZlZWR3JIaXpUcCtoYUJWd2svM2FKTHAxK2x1cmtkQWNqMTlQNVhTdWdWZWtiR21DbU1MeWUvRVpIeHR4aWwydVFFQTBMZkZhVnZ1MG0zejNpSXZ2aC84WHFiNTJVWHpPSmttNnhBWDEvMlU5U0tLRDJqanhLd3RQVW5vZk1yeVZpUUVJM2l4ZXFPN3ZrZUhwOHd4endHb2hnb3BWY0JXSXN6c1lUQXQwbUxHZU10MVZYYTNqM1NCOGEzM1BwSmRvTVdreGJmOE9wNG5SL0h6SnE4U3hkVEhVdFhSNGFKN1dHVW1CbUJ6dnZsWkJ2ZndONlh5dUp1N2JVbGtFaGZFTkxybk15V2NkQ0t0UEhFT1JlWVVreU5WZ2syUUpEVjFEZmlJemJvM0N1Z3pnVFlNZUhVZk1YdjdXK0cwTUFzUFZTeFF3TTBabzVPTlVIYTAxNjVETHNyOHMwb0dqK2ZXOXRkc3BUUk93VWhLUzR4TlFReXphcTlkbjlRVU1pNzdGZWxjckFTZk5sdDJoa3p0ZFpUcFNaR052ZThQaFZ2Yyt6MVlxRkJJVXVTTm8xd0FUNHF1VEJJRDl1cmgyL3ZodVBEdjdKbEZqdmxkcCt6elV1NE1oaVlTSkIxa2pZK041ZlhRZzlQSDNNOEJPQ2NwdUJwdTRvSmJlU0ZkcWhHN3dMMEh3azdZRjc1ei9tNTRoQkd5cGNSY0tOWGxOSTZLYW0zTDlvRTVOamNiRmt4c0ZmQ0NlOHVvL0dNTFdDTDlhYVhLckJJM1paSTNmUTJFQStIckx3WDVHdUk4eFNzdForK05hckIzczJhK29WaGxYY0dFRGg2OE9Xdk04SE9ObnZ4ei9NaWhIdSs0aWtKY1BtOXArY3RRbGZBaStGWGJGYzg4WkxYSk82aG5XZThiM0RFSWZCaEFaV1BSLyszaHZ5KzVQeDN0SER2eC9yYWg3TUZFS1JXQThsTTJTcTBka01GRElEelI2SlJBTFdCYm1lUXlidnpZL2tWNmpkV2RCbk1KTSsrT1R1cFhjLzh0b1gvRWcrQjAwcmphemVhZlQ3TS9MK05iZzk4SHgzZWxvSzI5WWQ5YVVxNVl0WklZcEJvcER3dkpKYWpmZFpaK1owaWkybXVvVXRaM3paV3JacloxUkswTzRYZm5nbWJTUHE3QjBNTHZna2pyU0JGakJHOHRJN2tHWUZwOGs1NWVBK1pYS0RGT3p3aXpLZm5KTG03SUU1RDBlSWloU2NodVBaOCtwTVpnMzNVdG9VYldMYUlaUHF2R2hTRFFMbzF5RktaZFNJMDRqZmYxQ3FmOXBUKzZrTUJrUWk2aEptOTQ5NlM3NFNUV0NuSVhuWmlSY2RQUldyMXNKWHBEVmprSzJJU3g1MXlEQ1Z0WnJPYlZqcUZURnJCQUVGeTIrNkttcUlWN3k4dlQvYnFBMklvY0RYUitMNDhOMVVzR0t3QmdxOVdVWGRTeXJjTUovanRWL0hKWGM2MmVPemZydTA4UEdqV2RndUU0VVhucDB4VmIxM0p4dHc3dEh2ZzJiNW1NUjA0T0dPam4rZG1UOTRZQTJ6QkJVaEFhbWcybmtISTk3MUtqTmdyY1Y1UElxRkpUSmtUVEs4ZVJhV3Q0L2VYY1dLVnkzY01TV1B3RTFVTERIR0h1YnFwYjY0MXJyMXJYY2FsWVNsZnVaMTF0TS8xb3cyMTdSaTZROXVGeE1zcG9TODR1Sm1Ta1pqZTU4NktDMVhYMHM5aDNPNWk4bWpObEQ4V0NJV3BJS0lkNUw4Y3QwZnAvRlJZUWpyYVp3d1hLM1J5ZjAyZEV0N0J1TUF4YTZiajgvN0tORnIzZFk3RzVaNEZ6SHAreklOaVRZQ2FqcHRvQXdpSGg5aHU2bnFnTjQvYjMrb1JpSVZyNEdMeUxzeGY4TmFQc0tYaWpLck1TM1B0alNBNjBVWGpmOW92ZzI0emRGOTlZZ0ZmaU1uZjFLdmh4ckhTMHczbnYrZy9zdk14N2FONjhmY1hocjRYZnJaMm9hNSt5ajJrT2RTTjZBU2NaVzhSc1hUTEh0SWJwZkk2NHptbEVzV2tIOGo3bDFTVm1aUWFjbjk3YXJBR3g1L1E3MnJ5a2VTR3h5b2VpUWNka3FDVWx1MzJNZk96bEx6OWMrUDRjUkxNVCtMWU1TZktlUmRSbWEyTmdyQmhUOCtDSnlHVGZLanM5RmdXVWcrdDcyVHdWWmZTM2FUWWc3UnFDTzA0dU44aG5aSWljcG9SVmRiTSsvZDlTQ0pQRmw5VUE2MHdLWnh1bVJpWFdmaE1YQVBFQjdzOEZGbVg1NE53NTdWcjZFL096am0yZ1NyWHJ5M2JzRFNTWFpqVXI5SjdTR3YxMjJ4dS9YeFdQV2hETnAyenV0cC93MXBIRUN6cjB4RzFNTmdyUlBQVUtlNzNOK2ZacEt1TGgxVHpkejNSR3FYeUxtQ2N3aTJrSEttKzZKTzQwTW5jNVdNb1E4bVVldTRLbGVQcytJWndtWlM5STNMSFg1bnE5c01iYWswWm1UOGwwRks1RTIyZ2F2NjdMZzMvU09FYzRmK1JxVkhlcm1mMVNHOFdjblFLcHZCQlczWldsMkxhbzZBYUlOaGx2aU5OS1p4dUt6OEdLR2ZHREExZCtpZmhZc3RIUnVJdTRvVDVaZDhSMDA0dTM2SWVXRE55TEMycE1QUGk3U3p6Wk8zMWhXMVFDV0xrT0dpQ1JZMTlLWit1QmtCREJiT3VWSkNETkR4OGw4cktWMW5ydjlkTkFpK1NnMEdkb2VrYks5OUhMRTlQK2pidFZpVmtrQjZPQ1ZVUjZtcHplbEhqV1JQVXo1R0xkOFBtSkc0a3NvaFZxTm5SblhsT1pNK3RpSEJCc0E4WGE0V3V3OVZpem83Ukd2UDRJaklPMFNLSFpZOWdzN3YrMzBud0FaOEdpbktmTHhZY0J3aURPbVFibEFnV1lXT1o0eEhhMWdjc0I4cklxY0VaYVAvNzdhL21PK3BUaUNjL3kzRm1tbDFpQ29icStUM1FydXpCeHVZUTZXQW45bnh6SzJ3L2FTeDM5c2FVRGFDRWpodVdPbS9rWG5wOHI3WjFOSGl2OEJSNWRYUEx1SHNMZXRmaHVDLzRJN3V0bVZyT0RjK08rOGdSd1V5QjJpVjN4MVpyZEk4c1FtYkxWOGJYMG1ZUFA0MzBXUkNxSEVlWVN3K0V4NzVPSy9tdTdDeHFGQkN0Q2VBNXhkS3k5akhTSmVWQmJZZUtyR081aStTTVh6OXV6MURqYk03QW45QVBzU3NVYzFwaEtTTmVuelNub2V3bDArYTZQVzZ4bk1MeDJkM2REamt4Yk13cUdMWFdweEsxY0N3MVBNRHN4U0ZHZEVqa0ViOXU2WnBOc0k1M3ZDYmp6bzBtN3JwRU42azdWQ2dhMGJBZE1RYWk4R1FsSVVrcS9RTGRyTTdsY1B1aWxTVkg2T0UwckRQTDRrZ1l4MWVBZE44WkxXVkg5Vjdqbjk0SHU4MUdlbHhXV0tJNWxUODVIOU05NEJkZm4rNnpLY25yc09WUjRocTVES25BNTYvSFBIZGQ3Wk94Y0tYOEhWOVd0K3owRTdVWERFMWEyUzBnc3ZmTzZXK0ZrbFora3RhZkdGZThlK3ozK25KK252QTljVExQckU2ZzFac0RZaTNZQUM0MzVqYWYyTFVYdkVRQ2s4MytLVkgrNkM1N0g5UUp0eUdhUjgyMVU1RUdWeWk1K3pUQ011REViNzRMSzBsRW5MMzYrOTRQdWFVbHZNMkpOMTJiQkZBYllBbzNXQit5bExIWndDMVpQWVVFcG8veHdVWnhVMWNmZE15Y21OQld5TGFEMWZRS1N2NjYzOG9wL3Baby91TmhONDRuOEV0cm1WbUwyaTZQTTFFQjlJek4vMHRLNFFBWm1scjBISjdWbzVlMkx0aEFKVHE0anFMeWFYa05BK1o3blpyQzFWQ1AxYmZndlF5NDRXRXVxZk9QZ2tZRHEySm1vU0lGTEZxK0pxc29CT0N6dFdCSlFiT3c1ZUQ2TVhETDYyUmU3bU9nTTMrUWFVaEhDdnVXVmF5MUxnODFQd09PVk5qbDlpdDhrWWhCcUZmTXJhZFlzZXh6MXA5R2Z5ZDNwUmlEQXpmTGwwUkcxK05UUTRiN3FZa3N3WExaaThMN3lIUEY4OWZBVzVVTnBSY20zTllsWERNdXQ5QmtYbUZ5STgyKzltdkwwY25QVGRYWXJnU2V6ZTNxQmVJeHloTEZ3SkJXUTNnQUpTQlFvYUZBWWF5b3A5SHUrb0NremJyZFpMT2h6OXRaQlNZV3Flcm01aFl3M2RwZ01xbldCdXRGQ3ZDU08yN1ZsRlFpRnBQRzIwY3FURW1KZ3FUVkZwK2cvenY4ZnlydFZoNkFNWFhJQmVXY29RanA2eWt1cFhrbm5nanNtemNqZEQ5eHVja2I0UE84UEI5VzArMk1Wa0phdnlnTG1JUDYzbm91N0Z6RFRVdVl4ZGZZcmR2U1M3KzhNVEMrMm11VklnNmJDcnRkZVFsOVQyNy8xdk1seEREc2Z2QVRpcmhNM2VMcUVWSUxnc0ZOYWo3eDJDVHJoRDhZcmIwRjI5bGRPVlVHV0NJY3BnOFByWXU1T05rREw4bjhQSFJVVUQ0Q2xXLzV0YnFFL2tFMWRpNzRyZUN6cWVxZWNFb29pWVFOU3pWaTU0M0lCK2F0MUdDQnQzUERxSE90TEFia1h2SUtneTRXZnMwT21vSjU1WE96ZVRlRVU4L0F3VXhpYlFpV1NXbjVsR00xL2xyR250RzF0elM0UWc2NlRUTS96V3JwNXJlTExWZ3U1OVYxMjdqRzlrdFl2UndCRTQzMjd1WlM5dnFUbThqR3lCN1JRbFpVNUpqY2RXbU5INkxRZkJxUDJQckNYMWE1S2pIM1hFQ0JoZkU0Zk81TnhoMy9ycTBSRTVrSEl6Tngwa016UzdrUW9VVHc1Y1pRWFdtdTZhWGZhb21XSkpRZjIwaHV2SFNGQ3VJVi92M3FqOWhLWFRObzU4cWhLWlJidlI0SUFiVVloTS9ZNC9PUW9LZjlFM2s5Q1pyY2wrdlJSQ1A0NktYYzRqTklXTGZzL2RCOFhJRi9MNDVLejhpSEY0aEdORWlpS09yZUE0NWpucExmVVZhNmxjVDZRdGQ5SnNTaUVNeDFCNmpSaFN6eUtZdmRaVEhmQ3V4Q1RJaCtwK0dRbTA3N21GYjdtdUZhcVhzR1E2dHd3aUI0ZjVJcU5KN2diSS9CalFMSGtaTmp6VG9hZFFwRmRSL3BkTG0yU29zSURuUjFRVVpNWlZxeUkwYzFoR3VLajNHcnBZUEhtK3VOL2lyMW96TXlQNlhDLy9Za1pLMnNlSFdZdThOK09RWUcrdkFSWUNEWSt5NWVROWNsTVR4QzVXNlIrbWxic1poME9PWkRyQUhOTkNuRW5lNzhmTXp3SGJ0R1dsTFZKNVFKMEV4L0FXSVVWN0lZTlkxRitKTjFVY3VBcW9LY2RvZWJJR1hiRDU1elJ4SnJhRXZQMmZmYW1VL0dnazdxdzRORGpLMDRCemI5MzkyQXJkUjlhdTdjcWlyN2crT0k2SndoQVRDdU9mcml5Q1NaMHJBZlB1NUp0bmI3b05pSktJdGUrZ0hhSnpXbnhGRnBNZXpKN0l1WXJDZ05XTEREU3JuTjZSbjY5UzRIUXA5RCs2RmUxUUFsN2xiUXRpOCtnY1VXYjd6MmtRUE1UQ3JjVzk4MTBuTlE0TkF4T0lubWlYV1lySHVjWmNGRG9RNUs4aXZPbjZHb214MTVHLys2KzZRaVZKaitVZDFSdzAwOGw5SEc2dnJuUXFPMnNOUStNdEE4N1BhZlMwNzJudVdYZ25NZmFwVTVWeTJXQ2FLWGpBdW9waUdCL3h6dlVkNVZZRkRVYURTMTFnV2JoWW93MExOSW9RMUI3V0syc3dUZEpXd1BwSjJ2b21Hem5tU0JNNUFXL3pTbElFd2E5bHZVajR3MDlFdDJPWVM0T0syVlV1VjU2VFFheHR6R0p5OExVZUh0N3hrNnJWdC9BejFUZkdZSGRQSW9TNkw2RWNQUFlhY2l4d21XVnYvMzFGb25lTUk5VmdnMVk2Vk56ZkJmejVBZEZEQUIvY2tOZVRsYmpkTGk2SWRzSEhYdFozRjh2WHFpemFoWWxwODBHK21TVmJReVBuVU1xa3BiYmorVEhsRVNNZXFYcUV1QWVTUEx1RXg3bHJVVVNreVhsNXI5cHZZeXY3Mk4wTS9tOFoxamttNXdTdlZLZTRoTC9Ndm03S0R6MHRYalZscnoya25ZLzdaOTM2Y0g0Smt4b1AxdU1EMDRTQ2swZVB3a1pTdlVZL0prbHBBK0p6ekZUNUtPWm8rQ0pJQytLTUVzcUFBZ1NkdnVLaXFUMk50SFJTdWJ2ME1WRldVajhqY1JRQzFmejNiVnBnNXRkZTNSRC9uRlpoaVgwTnZWam14Z0U3aHFUam11WGNZR3dpdUkxZFhORVNSdXFjZmVEd3dsNms1eVFrQVNCYUdiVG1IRThra21hNENycXpCR00zbFJUZHR6Q0dFb0hpNUd3YmJ6SkgwZXpxZWZIaHhtTEpWOTg1NzUveDhaQkMxYWlNZnBDc2pscWwrUFpiSlVJNXd4QlF0VVlybVNMSWRBeHBQYUZLaE85dCtZSHVTTUpFY09zcm5PalpKcUdOdjUzaUt2TllQL1F4VXNDWm4xblBTZitmNmM3VFdiUUZXNjc4UVdoZFVvV20xcXdaNUpPOHp4WmEvS3RIZDZGcVdLQVV3ODBRU1FjSXdpb0U0WUpRUEhmcEFHOFRRa2xQRXQvODJPVk85c2ZPVm05WlNCOUNFY3IyeURzNUp4cEtOWkdnOG5OWm4zb2lMZzJrdGhHeVQyaGlqNzd6TmRHVldhTzlBZURpRWxneTBjYXk0M0pHN29jUElzNHVvV0p0aUZxS28ySExJVFRjVlJYakdSaWZqSTkzUnhQcUxTUVZMRnNZcmlrbVBlS21KUG90R2lkR1FnU29sOFgvUkY4TCtwMFdiM1Q4MDk0S0pWMG5YYS9Fa0NycjdySFBJdnhWU2dDeWphUXhhVkZGdFhwdVI1ZHNNMVlTL1JhNHdUNlRYNEtDNHpReDF2aW83ZEdUZHRJUkpNeEZXbzBxNHBJdnBVc0YrWjdSUGswWlJOYzVvSzZJQVhJUGdUYlREcHJkNHNxdVdlcXE0d3JJbG4ydlNmMUZxQUZZYkQvQTc0ZlovVVAvU2pCbGtjMWk3SGgzNUtuMmpUSXhDcTFmWkJOcU03Q0xjVjRyL0g2eG82WkdCaGJJR2hpeDVidWlRcjd5bmFFa0taak5NRVd6RzR5U3MvWWp2ZUplVGlseHQ4TU85clUwb0FmZ0gydXlKaGZwOVRocWVVQ0ZtYlBBZVVlTTRRUjQxc2N0UUg5NjFibzFmemVpQ3gvSksxQ3ZaUWhhcUs2SmJYR2taeDZ5NXkzMHQwNmQyUnk1emRpdVNheTlHV3p3L3hvZjRyN3ZTUHk5dThaT3dSZ2hxd3YveTNibUtpcVB1c2cveW1pWjNDeVBTbFkwM2Z6Vk1nL3lWUVRza1ZtTDJiazFoallEa0tkRzV2YUgrLytnMXNTVHlwQ1N1aFJPQS91NlFjV1haWTdxUDRyVjV2UjE2MXJySVJDL1BwenFYU0JObjRNdVJBOVFVYk16c3ltL08vc2JZV0NEdzdpNzZIeGxMZ2pybXZ6L3UzVFN5TVJCOWZPU1NEeW5ETXdSUE50a3Q3d1lMdWFzQVAzUURVbjhRbDYrdWlzaitXS0xkTHltQURPQ2ZYallkYTlHbGEweTdENzMrRVFhVTlNdlUzUkpmOEVmU2NsZU1hOU5FZG43cG14QlVnS28xd2xYc2d2SGVqU1ZTTlRzckRKaDFGTVJOQXVxN2c2SGNaWlFjdk1OdTE0akY5SjVwc1BTeFF0Y2oxYURmMHBGcmZsZ24zM2YvRVBLWVpkdHRTR2NUZUs3dS91dDNKa0pqd3JiQ3FBdU9ublJlWXNldFZxRGl4dmlaRW8vdldaUWg3a01DSFo5c1g2TzQrUSt5N0V2RVgvRGhxYzFLRkg3Y0Q1Mms1MENXYmxCUUM0MzAwNWMrNjBpTjRveGFaR1Bvell5eXZvdTNiUTVuSnZrYkh1KzZaenp6aXpTbm4zN2lpaEd1eGNMK3JHdnNqS28rbGxQenVLTlIyN2RHU2RQbXEvNXVSZ0tCZUVOMXZGZ3l1S1JnbnBOWXlUOWIrR1YyZkNoWThYem1QVWIzNGVvY3BObmlkYXFMYVVZNGN0TXRGcGtVY1hiZG5mVnE3bUlUeFBkRDdBVFp3YnlxK0ZEb0VPL1BCbGJlZWF2ZXc0K2dwN1NXT3N4bDZTZVJBSnFVbmNSV0VBSWFhNEEzeThIUGVXd3c0MkUzam81Rm81UGx5cTFSSEc0dFpTekQ2TERucGhLZ2tTd1VoV1RqVFdQVjJxYkJ3dmJmWnBmd1NxUkRxd3YvRGNHVThGTW5xY1JCak9CazhFdXR6NFRFb0cwRlRmVGhzVFYwWDFUSWZBSW9aZTlWekxPSEVVUGlOM2FWRDdEcEZsWEFkZE5NWFNTZUtUNGVZQTlZY0NtTTdwRFo4ampLeWMxOCsyenN4TEtsMGVPWXJLMGE1OS9YL3FxVk9id3M4UEYxS0RLcFF2TWk5dmhJek9pODdVdElvY3lPakM2bnJlZ3FtZlZuY1M3NXRBbVkwY0I5ZEtKMExNWnBwTmZHdWlsYmlFSUdCdWlmamZZbnQ3R2hQNDN3RlZZV2RzOTA4aG5kU3JJK0VmR0hSUTJXaHJWNkdsSTBaelRNZ2hxdlpJNENWanFUTW9OSy9wc2M4QkdUS24vd3RWMjVCelhPR3hUbVpIMDdmQnNXOS9zcjMzK1ZkSmQ3czVmZGJpN05peTdJbEhBbjlheUpVMnBzdHVGbUI3ZERoTktjSVRBbXJpUDRSNGRab2N1cmhpSjQ0SDdpb1hNaXVIVnRMWWFLVTY4UnFjN29QYTNKMTRsWmJzbCsrRGd6NVM0aEpKR3p1RmpRWjNQd3UxMnV5cUxuYUVkOTBIKzhpT1NocG5FU2NnRnBPd3ZaT2dhbE1TeDNxTzR4TU1DVS9RZkdJZGd4b1FpMjZsMXVDZDhUQjMzMnVlS2hPUklZS2EzQk4zeElESUVRSGMvRC91STE0ZmZmOEtaK3dSUm1yUzAwTTZsWWN3ZXFrY0ZTQk5jRjN6a213Q3R6ZHZOY2xWNVEwZGJUT3pQUUh1b2tsL2pERWNGcDdVQkw5TE9IandMNHRhQUZpKytKNXlRL0F2TTBRZjlHL01Qa2FBbzhvUDR1QUI1ZlVsbGpTbkJuOFZYSWtZNFM4UExnVy9BUEYxRlE0TG5ZQnIxMDhndDdYSm5PR3llbmtvUW1lSFBUTzFYT1psbVZrQWgwaS9aN1NmNVp1WU1meVFsUUZxamNFZnMxbXZObmhDaEhzM3NKUkJhTTJaUkZNTEI2cXpvYnorZHhkd1pRcjc2ZVNXQzI4Q2g0MU5IRFZWWVE2V0M0T2NvSnhzQmRsNzNSdDdwMTVZZjVSY2FHZk1iZ2tITnJPUndsWHluYytLMjZ4QndMNG02MTBxSXErd1ZSU1FwRmJQUEMxczhKK1BvK3JWaFo3Z3c4OFVtZkw0aTJESURwcFZYM3M0R2htSmd1TDZ0amt4QlE5RGRGSjM5VXE3eWE0NzFDaG1PYmtQQ3NxbHVEYjBCaTA0cFA3cjQ2SWlYdHVYVTdGWHI1bjBldGtTclNveGsrUG15SEJra2lDdmpES2cyRVBzOHd0Yk9DdmNaT2RjQ1YvWjBDNXBpYStBUVV0Rmg3dXlvbzVvYktrejFjOEJWTW4zQlpNZ0N6amZTSDNvUHAvN3pYcWlZMXV0M3pVWWtYR3Jjei92UWdWVEZyQ1YrYmFadlJGSE5UOXZwWVREbDJscGRiK2d4S25ueEJ4UzJueVUwYmFaYnpjQ1pvcDVNa2xBUDFVbVg2ckw2QmwxZk1ac29OMENINDhIdnByUDhzLy90SUFyVGdydE5Rc0tNZ0ZpVy9YNDRyUGNLQnkvbGQ3M0RzMGE0M3hubjhDT0E0WVBqeS8zM3BDK0YwVTF2V1NWY3NyMldOWHNETzhRSUNReER6UWJ0ZEE5RlpMWUl0K042TC9KRW42MGw4Y2lBQ0RBNzRydk1GR01UbWNYUXBTMkZEc3M4OWY2cUhvbExVVlphU2Y1R20wZXF1MkkvZkFFN056dWNLcW9kQUpxdWZIZmwybUhGbFlOemVGMCszZGkzQUxEckk1NmFka2trTmZLcklTNFhQQWdCcURoQXZTcmMvM01ramg2YmtVSDg5NGhlRFNHSmM4blpGM2xzV3o2LzFkdHN1TXVNUk9QMFdtakhKKzhzYjF3T3dpRDJLazVNYXJHNmdYdHVQZlJoNWhVRkREaG1wSEJWeXlFZGUrME01akM3Q0c4M0YxeTRrd21nNEV3cm5MaS9ZbTRnV2o4QTdxZDkvNE1KYVExSHl5ZlZsRVlLWmc4RXI4SEFVMUczOUhhbTlQUVdRMngrQVVPKzFOOEY1TktQT0tWY3RxZzkvd3pndHY4eGJOUWhGS01OeGd6SFJlWnZWN1VzNWxvOVJ6djFFeU5Ba0dDMlZEYjUwRjdaaTlJOHdxNnpHV016UnlKc0dML25lVTVkUC8zYlY1dTFoMm9iL1Y2c2wwVm9zWjlrdTRZM3FHd2U1cGpZcTZRV3dYTmdwZXJtczQ3NFUvYVdPWnZjbm92QXlpUzJUZGY0MnVjeWdKemMvZVFNTzVqbjVoblhJNXRsVWJQMnc3cCtoTDJCcGxkZDVBTjZwOFh3RWFmR0hmb3pTQ1lWcm50WmkzUW9jd3NCVGx6ZmNubnVsU1hRN0pUclJCTWREc3hubGRSa0g5K2dvWmM5eFYwaWtqaENicVlvRTlQc0daQ1IrRTBpL2NOUk1iZWN3dUZTYVVHUjFOa0lHTHM2UlF5MzRtaGRRQmhXcEw0K1ExQTNJNlV6K015M0pXOGF4TUJpZkU2ZkJobDF2RTlYbDRQS3pVV1QxOFVpTE5uSlFIcnRXRkFBOEM5TklsRWxBeVNpTmlOT2tpOW9pckhYTUFCR2wrZ2xGVVRiRW5kRjd4eVZDNk5OMTZ2RmpEeERyWVBhSWRDdm1nWUtIcFh1cTNhS2lTWDJlMzNxNFdkZi9NUXRlcENoZ2tHbms1Q0VtN1lwUXBSUmh1SENnVjBhYjFEOGxwbUwrbmVIV3VlS0dxYU1OUlpDUmpFYzFuTFEzSCtodlJhRHBZZ3RKbkg1WWMrV2JMaU95L2tpUFphRndxNnpLV0c1SlpMUW1XYUtIUFZ2Yk9lME1KQ2NidmoybWVSUFphTVNFSkk0N0txSXNLUzZITXRoZnEwaVFFK1NPOHZaaXFRV0hhNnl0dGJNNkVZV3pqK0dVcHZ1Wm9ubFB6amlDbmcxVERDdHp2T3l2N2ovc1BibVhlTHBzY2tyNG9PTENwY2hmZVMwMWIraFlLUkFVei9VN2REeG43MURhblhQYWRYNG1BbzFKR24wcGNmQUpXM3A0NTJGV1NnM2lESHBsNFBEYzd2V091VDZKMWcvUkRNZUtqd0UxSkFGalJTQVdjR2dMa25xbXpIR3JnT3RlQWorczA4ZGZjRHljY0JPRzUyc0VaT1ltVU0rZTlEb0RTWHlaVVJwd0dtcGExYjFpaVhqdnk1VlFYZ0VlMUZRV21NKzV3RSs4YlRENGdmQkExcUNsVmdJRExtZDE3bzZtUWQzUDVwZnBaTzdPajdOLzdUTTdDV1RNNzkwMHVjZkdNMU9qeTJDNUgrYzM5VDd3N0Y3UnRlR3VBS256d2xyckdSYTltSDBUSDI4a3ZzcThOZWxQbTY0ZmpKb1pXd2RNdnI3dnhaOEVGd1hTT3diVUd6Y0QxcmxaU3NJaXVIa1Q2bkR5Q1ZSbFJHcTVueDI3OVpMc29YNUtNWEpXUzBZb3VNajNyNmxaY1NJcnhqYnBrWG1lbGRpN1ErdHBWYkRCZkc5YlpIMzc1TVJZU005cFQzL1F4Z2QwMHBMTVdTNUZ2RVNOWXVOMkNuU091RkRUQWEvbytYRHpPOHZ3RmZPTklYREpyQ3Ftcnpkdm9xOGRQSVFabXFxcnlacHkrallKa2xZaFFjamdicVR1S1FRekUyRStqeVFkQjJSMGoxQjZvQlVrbFRQOEtJaDdmaEFQU1lrc3dXSHBNZGRST1VIZ1VJT0Q3SkNRaGtWeW1UVU5RRjNKRDVxdnExQ2h5Q2FIaGliWU1BUEdpaTJxTmhGcnRkby9wLzBQQk14THpnL0NuQWg5UHl0RzBLcWJJQlVDTlFoclRYdHhFbGVRSDRWUTI1dE1pOGpvaEd4bHZKNHhwMG9KRHVpZGtPNWNoQ2pUVnNwUkJXY21BRTJucTloN2cxS0hHZmJxN0FGVHlGZzZoTG1Uek0yUlBYblVuNTE3amtsd04zTVczS2U1aXVmWUpxTmlRejVvUkI2SlVzWkVVSFRsRTZNbDVSZWxPYTNvVmE3b003QWtKVWhVdXV1dUZvMDNzekk0VERFdElJNkg4UnhLTjhpbDBWakd4RjhFQ3R2NHlhZ2haMUQ3bGpJVUpYUG10cm1JRW9ZUm9ZSG4zV0g5Q2tkeGF3TE0xbTkwV2ZBQzRVMGpmK01lNmlsdXV3NFRwWlY1S09wbno4RlhhTG4yb0JseFUzNjZhWVQyd2JQanMxTWtjdHBmR3JWRDZkUHdKd2NKMXpnQk1yVTh2V2FaeXVaUHFkYjNFQ2JQQVpVUlFwS01OU29NKzNodHZvMS9tNzdRSDVhWmR1cmVycFZCTGRPYWQrc05iTGhncmduOUpRU1F5S3dQUWE2Y3cvM05OSUZNeTAvcE9sSFVMb0FFNVByMTQ5S21LeG5DR3RTdk5sOUFUcXVIQTNhMWdKQ0Q1UnVDaDJrckdxTStHNW4yejE1TElnUUZvNzUzREFJaXBVamozaUpoSTloNEVsckVib09peWdTUHMycFZFcEdwSnJFV1JtMkFLS2VEYTEzVGdIWjd6RGVsNy93UitHT2I1dmtyeFUzL20yV2R0bFFHZDBQcVk4STN1UmNiN2xVM3VNdEpMRllqZ21MaFBQUWxDbDJDcExwWUt5a0hsS2hRWGVVVXpWT3lkNkZ6b0ZDc3JEK3ZVREtnRzEzdVp2MEZxT3E5dTlQblY4MEN1UXhyL1NBZjU5eTlkWGdlcGIybVY4SWNHRVRDeW83aUNoUlBBNU8ySjkzaUNUZ1ZzVjllenUybkpLWVp2S0hVSlU1ZVFlUFdLMlZYeHA5anRUeHllanFXbERtc2hFRGNaRW5DUDU4TXkrd2xRS2hMSGJLdzkzU1ZEeEdNWnRuVEFrbDZSMEw4NXUyeStZUEtpZmR4OUNtazlueFlKVy9HaGV4R1RiZ0hWWk95WjBtVnpqTEdycFp2WDB2bzFDMHlrakhrTlRic1VXeVVRMHZXaVppVjlSZGNIM0orNHZTNkMyT01wdDBTeEk2VjRMK3hla1Z6ZXpiTERMMDhlMHU5S0EwK1ZjRW5mWENMWnA3N3RvSE1TclA5MWlqWnRENC9WMGt1a2w4QTA0d1hiOThiZ2tRclNyajQ2aEJ6ZmViblFacC84SUZGcUFYMm5ibmxYU0VCbHVRV1dFc2JMb2hIWld6eURzQUJQN1QwbUZuNWZNK0piYkpkZDRDSTVLU09ONWt1OGU2ZUZKZ2Z1ZVoxS2hwVGhEb29aZ3JPVm1rWmx0MHhjQVdkeTl1Q2Q1NXYrOStwRlNORVBjazBBSVhZcFBkN1ZUeXVFZU9PL3psTGZUbmNiMGp1U0xoTDZmZGg0R1dBS0IvRTl5NWpYaFY5NllPZ3lPTDJ3L2NrRVBkTVhGTHBCZVM1djF1MitHNmJCd1ptQjBVYUMwcjNtM2J0eFM1Sml0TCtGMTRqeHFQc3c2UEVQWHhHWTRDbWtsOGR1M3RjYm5uZnpZSmh4R0ZUV200NTFGbmdtcmNyZDFFNVdzcFl6U3FJT3ZpcDNhemdrUXhNVlZRckljZC8xL1hTeVVRTzN3bE5rY1lhMXI0VkJLaEJUQmNxQjBSQnk1bWxtSU1QejFvU1FMTGo0S0k4TTRCMDdVbkduclZ1VGpRbzNBN0lUaHFRbEFtc3IzWXgvdXlpU3lsZWluNnlSNW5JcnVoQXhibVpFWEYyODVzb3BKdTJFcnh0OXpOV3pzQVg2dmp0QWxBTlFJdkR2VytYbmN5VkhMdnhIL1ZXRVVCazhPYU53TWpVY2F4TStSVFdKNk1qMENTRWFMN09CMlMyVG5JaXQ5QWZMNXVRN1NhU05xaVMyS1Buakk2ZVFudk0vdFlYTEhoc0VOdWwyWEtyRmpycjh1a3JtczJFTEVEV2JkbzZjblAvTEErWDFjYjRKS09YSkxHWXJLZ1J2bzRqd3NpZGNHN3lXUk9xU2VqYXp3bHBURnR4NTFPUGxYcnJGNjE5TkpEeE1QbmN2d295dThIdHlxVXIxbnRXY1BrRGVybVR2WFl1QStFMXpuZU15amJEc3lsdHo3RjQvRzU5Ujd5MlRZSEJYdmVQMEVRVEwrTVNHUExRUGFNQm9ueUQra3l3MHljVHN5NU9QWHJ6c0t1ZW9Ed3paNmRyTVAwNTBNTzIvVHBMM0xsU2tRT1Y3RklhRnpaSDlHMHUrdFM0emE3WmJLbWZoU0lkL3B1M2lxRThFVzdPYjVKR01BSjlXUS91TTYzTVdhTU05K1VRZGNqU1dqM28yc2xncUZWVlVTdDlCWk5jUWNNT3Y0NzBtSEpyU2FJdkJyUDVXbzZCMnFqVXo4Qi9EY093WlYyVlU1aHJLQ21Ub0lXQlFGaHlwMzMzM3hDTExqOS9MVWVkQTRQcTlzWjh0RnE1TGdGY2Ura2ZzeUFMTmw2ZE1wQzBNMmdhV2x4Q0dZMHM1NmRxRFFYYmtscmN1SFRSeGs1am1ZeFZZNWxodWRVSURFczRVN21lV0tQbVBjbGlVTTE4NW9ROGtSUVkyTkkzNG1GNFc4OHR4U0Voa3VOMExOVm13YmVFSytxUHp4YUVuS2RUcjdteXNkV2VZKzI4V2ZCMFMyMEFtZmZ4cmZjalVvdEVCQnk4REJ3bWJaYVl3ekdjZWtXSkdnYTQ0UWN2aENMbEdGTGJSRENkM2gzcnFLVlJiM0J2SjFhZS9uTitHNExzbUhrQzA5OTBSZzVrVHpvamY3anVsMlhHRE1PSVdscHlwbVUyNVd6YWFjaUxFUHJjWDJoSFNUa3BkZ3VpbXVKWmoydUdSTEIwNHNweW03RWR5bXVraTVQbng4ZHp1SW1BZVZpLzdwOG9jVGV5RmhmcXdnVWRBcFJyUHhmSHBtVzlaNzNRbzFoTTRPeG9sUDZEbmhTUWpvRWV6MzZMaDdESzg5bm81cFdKcmphUmlFbnNGNWpaOGltczdqNWpyeWJoZGtCeFRrdGJWS1U4M01Pcll2aGNFbG54bktRZkVVUDVLOFBmeTI3ZUpPYnFjdWF6Qlh0aHFiWVRQcW4xeUxxMzcxVHZDTSttbUZFRERBSTdkM1dLam8rMFBnVU52c0JmVmpBL21hVDJIUGx1b0F6YzlTTWs5QTNyR3ZTWStEY3I2WE41OUlKTXVuQ0xsdGNFUitWaUd1MXhjR0hMV1JrNmo1bnNDUnAySlRBKzhIR3JBUUhpcGprRDZsaFJnOSt1WGFwbm5oZzFUTXRXSE1oOWRxdVZGWmR5RkJGYVZuMzNmS0ltRDFzNk42eVpGVzVrNEIrYlMzck5QdElYcVIxeTJpM0dzN3dZVjdTb2Zaa1g2RXNCS0hNdXFVZWYzaG1YYll4Wlo1TXRtZ21NM0gxSjYrWTA3T2x3RnU3WVU4MENwTWI5a0RQWGtFUnd0RFlIdWVMNDEvNC8rWnBrNWNvOW5BbHF1UWR3bkJycnFieHl4Vml6YUxlbE0yY1YzelVHc0cvM0xmQklSR0c1SitmVW9mOXdwbGJYOCtYWGplcUZmWFJrS0Y2amVmaDhJWTBQcGE2VG93VmltZm5FYy9rQzZQQmp6VktKUXpoV2dQS0xlM01udXpsakxaMHFQVWY0TFpHMENBdXd3SDB2SnJmdnZDbUMxejAvSTVzd1ljT3BFSGtCbEtYbEViRG1NRVhkT2VQNmdUazI0cGtIVytlVTB1UUdwbU1HTk8xU3kzaTZoNGxCczMySHBwazdobVQzdHJINzcrbEFnQk9NYzduQ0VVMDBsaWloRk55VGR5UW9DT1BDUXM5enVvWEJLYjZtdUJuTzZSNElQUzhWcmVhTkRRTDdlaHFIMnU0dFBReHhzNVp6YTNITStUVVIwcjduYWlHY2xhR0d2NkYzdlNSUUV1NkdwalhPSmYxUjVKQ3RDdWZaR1dZWjVDN0QrRXV2NnJaZ081WDFmdStOSjcvU3I5ZWF2T0RiVU1LNC96MHE1TjhMUm1FTFpvY20vLzFSK0dkelNBeWg1bmU2ejY4eGpqSjNYQzBTQkV3VE5vSTJBb1pLOEdxQlhSUHBrTXg0R3pkakQxZzRYcEY2b1hHSWJsYS9FZkxNaUlpaytqbTNVbVE5elBQVUE3eW5pYzVueWd0TElBdWkwbkd5eFl0M3dEM3ZFK1N4WnNoREZTanJwMlFYVFByMGN4c3dNckhMeW5CZXFSUW1zVDk5TDJ6TUYrNWNCbHNpZllWTWJybHgrbzE4QnRLRk1tYjZ2Z0V3VUN0bUZyVHl6ZVlnWno3bCtPdWp0WTNuNERYUTAzd3ZFTlA4V1d3bEk2R0tEdkVZNTM4MzY4ZS83VXJBOEQ1bXNLVWgrTUtqamtwY29UY0haQTJWckNDOVBBa1kxNG1YM28ra08xeHZhVTBJUUR5VjlXL29wUU9WSUk0cmIzcFFqOHRhYWZhSEdYdHM1ckZyM2E0TWVKdE1PU3BTT3ZSWEdUUm1HNHZ1eUZBOW1uVVhaS2s3REx2YUEyc3A4eGVnV2R6eVpNOVhZcFJSQVN6NDNrMytVaU43MW9KQXBtSFhjRXFKNXpTckpldjdKYWsyUEV4MG5zdWMwRzFWeFY0TEliaDkzOXNMNEZKdkVDdGxkQnZQaXFmYWQraW9DTUE0bzBPVXN5dTVhOWtZZmVrSmdOSXBURmUrRXlNS3ZvQnZ6cnNyR080SEdUaG9Ld2tVb1FnYnVvS201MzBPVzFQaEpkZ01XcnhYQ3lhT2NneXRLUGtPRXhrK0M5WmQxdUhod2tnMUpmbGFEVjBQcTFSRGJGWkFiSGhDckd1Rkg4ZGVrenZaTHBjYTdReldOQk9qcVNNM1Q5UjVRMDBSVEJRa0kwMk52eXB2MVNBV1FoSEpyNXhhZVdRZkM4SHorNTRvUVNqUUMvdE1XYitaVDJPS3RQeFlyN1podDBYdWhvZFhnTHBsMG4yQVNEdXRoRmJ3TVFLaS8rZjdxRTNZeUFlN1hsU2ZIdVFEV0lyRmwzRmFJOCtrc3luekl5M1p1V09zaE1jbGduTW5yV0xiV3crUUFRcGYyYTFzZ1Z4Tnc0ejRCRzZVR3ZJL0JrZVBMWFBNODY3dFRMbWFHbFphUkxBZDFjV2M1bmhtOVBneWlPRFluMnFSVEhOa1ZJTldhRlBlb1FtZm5FWU1ET2xWcjFpZkt4MkZIb3RRUmdNditybFhsODIxaWxuWVh2VDFTcFNMZ05rbi9jVksxbGZPZm1zQ091Rk5Ha1BpSUVlV2hjZjJ4Y2FJOWVCc3ZKMkRPQjBiY1lJT09pbXI0VW94M3dKaDNoNlVjNXBYYmVwZnptVlpxVE1ZRjg1ZHdiNnNiZDBreUgzbGJDVkVXMVAwQk5uOXRtdE9MYjk1OTRDQXdVUk5DTEIvdnFobVQxT05CMUJYLzEydFQ1NFdvaVplcDFEU0tDaVY4NU1QUlViVC9IUUhYdnU5WW9TaGx4eFoxaXpyaGxBV1lhdVlwMzVVYW1ma1l6R0hrZVpYekszL29udzBRZEtUdEtLL1NMdXpNWUcxcVlkenJGYmMzdFZGTlVyK1ovMHdyZ28zOTJROFAyQm5ZL0pMRUtUeFVrNmRqWHdlNmY4SFR3VUZXbjc2NEEzaW1KMk0vSEcxcGFvYWpDeXFJSElBM1d0bXVtZjFLWi83QzdtV0dhaWUzM0V4R1NsVEVrd3krM0RrMVU0aktMQVdhblFCQ0x1cXJIemRsT0x0QTRqUmxqVWFjazFuU044eFUrWVUxRFZnWWJpMnd6cXlHK0tFUkhiMEoxWmpOODROV1IvOHh2MmliZWk5T3M5U01kbURtclFJK1kwd1lwZnBKK0FYTGxyV1crUTc4NDM0RmhyWE9HWi82M2kzTjBmeWZ4bGtsR2QvSEVUTXFnOVZHbXNMc3N4T1hOUVF5ZEhCWHpmaGRHZVdpM0dCTnJaaEZwWEFxL05BYWJuZTBGdlA0cmRPUGNCekZmMlpIdittREU4N01oSWRCcWc3MGQvZW84dkFFQjRXR1ZXS2dxZ1lMaHEzcW41VDhRWms3RlFINmxCeEtmZDRkVlNhMWwrdFdYRVZzMDVWVGpDWkxDUnZiUE1WMnFhaWJ1MElBLzgrZ1UxeFh5YUJCWjBlUis4eVMvYUM2U0M5V0FXZU56aFlYNHFsOUR6bm1FNWtlRWd0UGVkQlpQa2REY2podnBNN2pjOE4wdFdad0xVQ3FzaFJFUzBIRlpZcVJvaXA5TWk4KzJUREJ2R0tJUmlPV0NxcHVCQ3BxZjJ2RVc3d1dyMllremRNTllKVldZTEU2QVBmUEJTQmJJczErVk1ZRE44Wk5UQmRLRnRQVkVqVUtuZmR2bEdvQ3E2ZDlWYmNCVjdXQUhtYS9oNmI4QVlGNlR2RFd5ajJaTkE0dlJ0aHRJcUpULytJSkp1V1Iza3lzZ05SZitabVRqQjJweCtmeDVISlFqMUlGeTRFVTFGeWF5K2VRNDE2SzZmQzFDRko2Um9jcld3SDk1eDR2Wkp0U1g3OFozVDNwMEl2dkt6clhLb01zRGVIT3JXNUl6cVBKS0lINm9QNGlYbEY2MUxVUUI2bHBEdWxxbVJyckhoaEFsdDlkMktpSHVYN25KNkJ4YjQzRnl5dDhNeGlad3VlTFBmZ3Q5OTZjeGpjWHNhd0hXOFpSMUpCM1kzNFVjT1Fnc3p2RkQxZ0ZrbC9JMnpjb2FpQjNnOUFiUUZPa242MVh3UG5FU3BPM0FsTzAwTFVNbU10SUZiWjFuMmxKMmJUL3ZIeVBqL1RJMTJKU3FIcUxrSUtDVzZhU2RteU1ScWNuZUNnZ1FoUE9RMllFUnFrcnZyYTdYNjdXYkJBRFJhRVVIem1kZDBqUDlEaTFSK0FOajhWcE9waWVoODJFUGtpZmpFWjlCOFUxMzBxRmt4dklCYk0yVVFWQXF4c0lZWmNDbDVJdDEvOWZFRUpTMmh3ZEZMMlFzR2NrZ2F1bHRZZHN2QnR6YnFOVEUxSmk0K2tiUU5qb0NGdXoxalg1Z0h2c1BTdmpFOXJBVEJXckVBeE90RmY0a0RhNFdmd2FMVnRQeVBBenNPSWltekZaTDRRY3FlMzdEODlNTlRrTGlFTjRzbVczSElzQTZCbkRpYVhJQlI2bU5mRWJnK29nL3o5eUR5NE9DaHREcTVhaHFvZXkvMlpkV3o3eXN0N3lLclNaMkJsN09iUTMwZ1VlWHB4c0xJeTRUQ0RIeHYrck9CVnIwNDNsR2piZGNBeHJpYTBEaGRCMTM3YXFiVDdCeG0yM0dPVm9nSzZPTGJmcEhDbnBTa1MxeDM1T1ltZXNEbXRDTXRudlJkS01iZyt1cUcwakdIQWxzVnQzb0E1WFJzUGtMNG80NTl2cS9QUU1HbVk2a0xad1NTT3FlNmZLMGRWSy8rcGNITTdvV3ZjRGptaXJuQnQrd0pEUFc3Zlg3elZodjRFN29UMG95eElLY2VsN3ZjNkgxSDJ3SGJlSVdQa1B6dXRicEJRV0hpSk1zNWNUTVMvb2JEOHRqdzZxTGptRGZIZTB6TVhZempabTU0eERTZVhFWXljZlpZWDJYVnZwQ3cvTlJGTVRqUmcvcm1iaWJ2NTNGSDBtai9VV2Z3anNvV0x2OEkwcWpCc3FqK2VxaVFhVkZ0eEZibmtPVGREOU44NjlwMlRtdkErSXQ1cHlGZDluRGhnczlqcUdZb2FvbklsSzZLRlRiTE55aHFsSTZ6Z01YbXNpMlZFRUJnZ3locXN5RGFndFgwQUZ4NUpJSG9iUTN5OUgrZEpuMllxN0lsWUdNOStuKzBDYmpwNUdEQURENW5jMnVhY2sreWpJa2ZiNURUcnUyWXZKdGpvbWdmNGtrWHQ5YjFIMHBYL0duenVwRGhDRENkL2w1cGRJVnpZTG45M2JzNGNKQng4VFVsTSswTWVHY0JqVENLbDdtN29HdWtzQUxreUdnWUc5MXVxQTAyOG8vWkFKTjJWUzFGcmxSNkdWdFYrVDZjUGNTZHIxWE8vWERuakdqa1Jpa2tVR1RGRFBSYkpJSC9CeWZQTHdESjh2S01LemNBeC9MeDZKajRuNXNrUytmVUxXNTlGQXNyT2ZzNDdESnJQSlFlNTRmblJva3duMTc3R3R0WHZuQ2RxRm13b0hyZjlLTytRVitOVUdqQms1Z1l2VzVJRHVnVUtHdlkwWDRVdlJrd1ZCL2RoaHJEWWo0bVcxVUxzSHV0U0VTNDM0TCs4N2NmUE9uaHNzYllJa2JNSFdZTGdLSjR4NVErLzVHQUxGdUU2SXY0aXBSMk9GMldCQnZIcnJJczZlbk1wRzNPV2E5VEZ2ZE9WNVdhb1NSY1ljWTJycThSSVBVai9BYXFCOVBpamN0cTl2SzhCaks0LzJrb0tiaEF3SDBoV1g3K2o5d21CZDIyRlRmV2JnNWhINm8xTUZmckx6SUtwQ3QybWRzbkJKMCtMVlpvWDRwVTJtRlNQRzRxRldmNXVHdnBUVUNnNGVpWmlQYkJVTXV1R0ZpMlhSMWtEbzI5MS9BczFseC8xR25lMzQyNUd2SVY5RkdzZE5Mc2VyMThZMkRBRmNYYmV0N0JvQ1NXNUZ3WERGV09qUDVzT2VEelNFV05BSEVUQ1pMc0svaGVYR0c3WVdJUDQySDRZeDZ2YnFVOGxKZDM2MDFjU0owWTB5QVRFMzhCbGd1QU0rUExXYlFLamY2UEt6SkloaXZGbGNnUDd0c0U4bDhlb01hS3pvMlNyRFBIT2FIdU90UndJOERhdENLZHJXMG0yZUhsb0IveDNneTRhbXBQbm9TYVBEbXJRNFBLUU5mYTBXdGxsUmtkcXdISVZMbEp1bkxpMmhhNVY1VXZpVlZQY1JDTFRleGhzdXZlY0ZYb29weS9tOWVHQ3gxQVE5dHlrb1M1azJpbWRZMWJGc2lhR05tcm5CeXJGVVRmb1NXK0VMNndHbXFHUmU3NENMcEtpeXBNMW9hYnRVeXUvWWVXQnhobnk3WHc2UHYzUEswbTJsNjJndFd6bFdLZ1VoNzA1NC9wdjNDVXJ1RUJuUm5ONzBwckR0TWNzSHNIVXRBVEtyeCt4RzRUaHI0YmMraEZabVB6M2NWa1pwY1RvVkw0aUVRQjdPcnNZK1RrbU1yTHZsUVlrNzVqSXc4djE4Y0lvRVFIWmlqMnFIL0YyNFhMT0lyTE02NnoyYjJDSzI5OWgzdnJMNUViNkZhTE8zUThsSjF2TjBWUGNkK04raFg0bDRZN2RIQVpoa3RmdWtQYk1MenFMOThpUUFaRFBpeVhMRFVXMXlCWFlIOENZVDhnRjJiVGVTL2NGYndubHJXK3JjVUxKSWVubnFMTkpyM1pEWjZkN0RCaXk4dUFKVmFRaEdxNnJabXhiaWNDODUya3hCQlVjK1hRR05xa1VDOTE1dkdFT2t6RmRLQ3ZuNDlzTlByak1yT0szQWpyVnFRY25TZk5kV0x3ZDhuRXl4Z0lRQ3VsUzBxQzRXZS9MMjcySnhYVmtRUmhwclNUY1VMdWF3ZXZZZU44c2lWTklHZFh4dVVYT2FzZ1l3RUo3Mi8vOHVoSWFSTWxqMVBqbzhmZTBrYUdlZWZOcGtwclVTYTdMT3FLSEh0ZlpNbm8rN1JKTXBlUjA1NmZ3eDNxaWUrTjFoN0Z3RTdBbGxXc3NCUlF3RERiZ0tLSjROcjlYS2ZWZXd5OGp5L2ZRTStGQzMvVUZaT0h2WXJVTzg3Q1NDakJPSzI2REVDQTMwb1orZ2dxb3JSUVVDWUVzeExMY0lDTEtIMGdhVS84SWxNY2QxOE1SSzFudm1pSmlXNlpJYWxacmUwMXF6TzlvN0xtSVhFRkR1aG10emdGazF5SS9kUmJBYVpZR2pROHdYRm4vbGd1bVRHa0dIV3BKNUFpT0dwMEp0dkQxVnlwRUZMR3JGamNseTAyUDMxTitvcjZLR2I3RVZJdTFpcmhYY2U2Nk5vUmtVV1JuSXNNN1Z4Mm5yenVwUFhscnpvVzg0UzJhT01NZllFOTU3emdnZjlzWlFCa2hwSGhHVHhqbkhwSlBFUU9rMFNBdEM2TXIvRzZ6MWdzam9VenBwV2tlTU40UCtTaVVBUW9kUE1xcXRJcU95ZGJ1V1lVbFhNY2JKeHdHT3h2RlN3bDc3elg4K0oyV2RnRmc0QUQ2MnROTVlFdlRNNHZVc3FUOGNLMG53R3pxZERFU1pEMHlGdlNQdGxSZ3F2UDYyM1RTVHlxOHBvb0gwTXg3Z3JraUQ1TldXTzE3UHZhZlVFVlBOYk92NXY5OXAxWUVDQUl5ZmhIUUVJSXd0U1I2ZVU3a1FkWG9QR0dITmw4TytOMGF2Q0N5eEpqcXRhOVFoTlcrdkEyUjYycCs0OHc1QnEwbFFvalNMMjNzS1RPMURxTzNiazFna0hVS2wybVV0NSt3V0RQS0hNckZleFJWRVF3Qlo2cUZxL21namVOQWNkenNrWDJJaEdLSHVaSU5qSEV6NlRxa1RVM1ptemhNRzRBY0V6czFOcjNIMlN5R3RHa1N4QWRQMUVraTBMVDRQZmNvVjEvVm1xbmRqdGFpSG05VmEyRU0xanlpVlhlODJoaFB6QlRDdjdTMVZJaVYyYmZCOTllL1o2TENsSTBVeEptSFd6ckY4RWRjNjl0c2RFZEc4NVQyMUx5bVhlT3JPdnRxRHdzaUtIRjJaTU1nZ3hXOXljOXdRRGFrV2VTcG51aHFoS3NPN3ZuUENRL1BuNElZY3BYU1N5ODZodm83Y2hacHR2VTR1YmgyTzNkYm16WG14cGRiQVZlWHlvU3kwU3ZwQ2tjS3JLclJvNXltai8xME1TeE1XeEhOeDQvOUt2N2dFV1JaTllrVFNCZFUrajBRdnRHS3ZKRzZrLzFnK3FrYzFsZlRBQUVjYU1LL2prQVZGSnQ3RHdwZXpMaFUraHFvdTc5TDRkVjZKV3I4R3F4d0tCQUdqcG1NV3lHMzdZR1RmeVprbHExWjN1OEtOSjNRZEEvWWdiMC9HRlBRZ0NQVEZBd1k5QW50cG4vbWMwcGMzRHlPNkJ0S2hMeHlCM1g5dnlyRzRCQVc0c2wya0ExRmlsTUcrWkZQMkhqZ0ZrY2ZiV3d5bllBK0UxaFhnV0N5VzVNWGllc3JVZlpndHRxbHpSMEdQamNpbVJGZ1IwL2Q0Z2prYnlyV3FYR1FuTkNYbEY3aWpyaVpKbUtUMFFpdEg1d1crWDR4MDZXTWNIcE13ZlZnUzAvc2ozTEhJS3RlSnZUeHJqcUdMM3RBdjlHY3Ruelpmd2VSbUhJdXZDTnhpcnhXNWt5c21qVHBMOEJyc1FyNjFMbWg3WlNtZHNTTGd5VXI2aHV5Mk42Z1A0cThFWFBKMXRPR1A5Ull1cEllcEVrdXRSclVxaTZHWEtUZDlmaEt6YzdSYmpPWGtPSEllMnZJdzdBNEhsVHhoYVFmUW9tOWQwQ2pUUXlJTzBNZWs1eFBpOFd6U3Jvd2w3WDNLQW5FY0kvQTZndFMzR1FXa2k1MXNlWmYvWDBnbk5mREppb1V3b1Bsc2ZIZm42Q1BvZWpMbXVEaWtOV0oyUVdQVWk5b3VqbUxGdjFENFhWYktzazRxYmQ3ajE0eDNta2d5dVo3cjZGejRrNjl5RjFKYUdnNjlNRWNTTitDTzIzajBvYXZaREVtYzladEJ0S3MzVm9HT2lEc2poRmJhYi85WHhlRUxNK3pVaWtFaGhnbGd2Z3B5UVVCblRxeFJMd1RKSmQ3K1BibDhxMU9OTXdRbXVVbHdRWXZzdVhJRHhtbzNmdHZWQk11bEZnUzAzc1dveDN4NlFoMDZlZVpkY01vc1hjSDlUUlcydGhiSy9BSWJZd21tWEhyOE9neEVRSG5WTmQrZlYyUFNGVjFlUlIxMFd2bDhkWWx1T1loSGxiMVFneGdRSFFJYzhxMUNKU000ZXRuczdvS1Qza0V4Qk1qTDR3aEV5aXpTWUFEM3NtbXlXYngwaERiTDhlVVhXWkRCNjA3b2JFdFRqcHZrOFVSc3RzUzhzSnVwUzAyMjhSdXF0WVF2dnlGZ3B6NGc3aW1oYTBlbDZrZExzYUF6S08wTFIrdm5WZ1FpSzNPa0ttVGM3TDVaWUdaMDZQUmZmdUc5NThqKzJuOTFGQjcwaStacVdyQ1ZHMTFVWWxoN1FuVXBrczNPeW9QQXcvV0p0cjhTYTJ1YU8yT0xSQkhDa3JMZVhQYkRNMFFxb2xaSVVsZHNXTmhvaUZ6T09mckpvUmNTYVEvdEIwamttellpZEh6R0psYlR6NDE5dU03eE5qRmRKTVN0ZjRrVmxYTU1CRUJrTENNT2xSUEpPakVnMUF3OXRrRlkzVmZNS1dtazJEd2hkdTFjcGtWNnVuSHU4Mm5lYzN1bmxxYlVxeFM3Vmp3PT0ifQ==
-- CEETOS_RELEASE_SIGNATURE:UexcKBW0kNWwTSWXs67QLM/UTtweuuZ+DJRObiZtTQ8RDqItVbL8bK91LxI1VpUUzyAyYsoXntzAdkM2jr/CMsQW57z3aXzSELGRt4tWaOpWMSRm+AwxLYyey3cOWXtwFEpl7pyQyjah0I9G1hc+XhK+bH+lmvQHK1U7K9b8L9KI/lV4gbKiaaOaCIuAgO8bNNX+xNi2BxXUt4LP7PhyqFbRO2YcWS5fTy41ts3WYTi00Sib5HpySt+0RCBvYvK8JXLNu7S8mpjsEfOFKCln2W6dl/m0q6YvSK+D2eQ3nGwLr1nCgq9J5VJRG+QlFWR5uMAEs3fsKHDlrUI6vMgI48cEB9+RGLRSxbmrUu9Wnet6RFB3H7EuBE95+Wy9P7+nse7+IJXwOnT0/OKaB4GjYQLi5H0jqvFHdWXFJM/svH+aH0eV+1VtYpLBAyXGwga6Q0+zVRXyC+w0jUN+95hD7Xj8uWzYIQxtJCoLPnvOasPhCNxcvAIr28baZd7meSzuoZcxP4a/SHUsWBC+4lI83NOfWUEzM3u6BN57aRzFqRGI1lw0V7bW9+ITURE30SjY/XJe8N66n6vcRHJlSfxCiflICUEYdQAPz6dw/B9DTNGp5Y5Md60dGLbVnIv0Lak4caLYtFQsnMD5MrMomEKE8jRkQ/3qSyH+itPJuPIQ0fAB7qz1c5o9D7s1pBrEWa1ZqGLGHBJZ4/YHp7l2QDruWDInGVjVVPSiockPbDVK1+A5WFtXp/RK6KQ0npA+6eOHq7+uWsfal+XkQiiccj559Dkjgqbg9SH/+132dL54AMDghmUTIbJoCvR+iyT95R7gEKwDYYDXyrX0p4jIJGry7p8PhWzpdqN8T+ht6KPIZTAXk11Je8gunYsh5rIDqxUeHjNqg8V4yEQvSMGfQQxsYxJtJ2Bu2HfPQDPghuQOV6zb2MlfQ811oDpighqd5cUH/M1ciRS/esYMxQWjA64EgRKO2h+VQk5BaSsElv+btsn2DXVNzt8+rpWR7h0LFHVZoQNAEkVUnU+DW1HX8NYhCOfSRK5J80LYBLtE7DGALEFzxbuWglCy+ZziMZMhvsZUd/bSbK4bgT/7fPF5q5d2L+gLzWfjg2aPg5KYumPyaBwwDfamS0uxARhxI6zPVtjmFQ/7A6C1yy+u1lYXKmvIpUeax9j9n9HboEjHF0xStvF6kf/TlF3ftfK75a04HYeG7RqTOuWa9Cf2O6arryrOnN4FxLmNi1bRrtrDzmCMTvS3l0TINk/Dt1GzDJPV9OkXmeP2SDRoFvVKpreq1e+0dU/9PPcb/8BJxWXMRqCOYBK9YvuzdRPlIdspy0AvKxFrWGu/AKLLw2Xo04zuS7DTZPNZLUWFMM2Lc0nSngSxPxK4ozjqZyk0Ln4xT/Qfcnvp85nDzJWRvd+apg0T4Vu4a0i4Rw27c1TfKMMR4EsPvu4AohI+oMnSTLOonnYOLkPfM22AJX551dUriBhYPzqGvzuqT3prK2Hc2Zzl6kLtTqNKx7s2r8R+TFODFIsQ2w+reVW9eV3pWPh9rUVO/QEAWiTD83gfJNEJs31pjtfexwtCejmbG6k4g3Atkx4eON2hFanveZp1mlRFUzIdrXparzjDsMEUf1kq92BdJ1e5gkJk+DOsOmttwfY3M7S4FT8L0Y7IJA75V/FfUibH2v8YI0Xq9ZPoWY/1UZmObt7bTFTmn7ThDT/w/qWom5KZozKNjFTqHP1KsRHNMcU7+4oADHIlV9RIJ9SCjrnHSGpR99Q0PdhqxYfSBUy/rX9i6GhtO71waH0K7v/JLFPmFnYXaMk7CK3SVnPGPlxz7Xm5zlOdk0/LSbpvlClx2vduCyNjCu1N4ypp0BIckDQa4aiPXF78xvSIpwoxNGb7YPkpSOGvPlAS2yP2X74Y2nFhcvWwXrfZHO+0OEYl0B92loXk+tJt9CcZnlcLIrgo1+FG7DtW7MNZgPQE57FRZr/M42DHcvZlv4dCfRDIDj9qKxkLYcJOe/DT8Cky3bqat0Wey8QxVR6/WTfg5sxN8GUM4gZx/3a7wdEsfyNgUX7UZUTniix0eCdx08p4Jk80j0kHVppa7B5KRd/MpjZOnRrJ+V6agp2QapPCUilRQOh/z5oTB+7ick5BrGmkSXYEC5AsvOM0h6nsSF37/Lg/TpilhcUnq32VovVokTCvDBc/vCIU0O3rcLE7rkFOwKQN7+3Je+oJyMWBFy38MU9m/QGxFpjhy08TIOqZL0D2c39iJdEBhClVXQ73o013fgg2MrazPas5MHKnPDab+kZiMVwtQ42emxaAnBMcXmXUSmY5BHfP1C2axL2MXlM/6L0WrDjaTtb664u/ReafJayLPjjCjp3+/PtVLDjOmU6zHvN1RM+XmWGLhkW8TiMwxvZ7RgVgYqmJxHNS++2S/WngGvXeHQ6OB6fx0E/Jgbb0BnVlGXjBUILV8BSB9hb3W0XRNBVjqySIyyVxO47cWPSPtBK+wtY9r1ZSmIDgel7GevKX2thEd0d4V3SNcdQq52VsDCjQLFhwwYXiPU9PYJ2hcmJxsNQME3abUHdkknRNcscDX8TFpsTIJt8Xn0AdIUYIaCtLgSUYXpeRzlLDu3JIAzf37VhcTpRmyja0x7dpknfHVzCNy/wzkvTFFmPXjYNRjQa35UHNSj2I8ZAcPXIvjjKbDpfAaJBFsZRKfsAhAc+0GLQR3sP2V2nlbNWfGqEAzgTGOom9074OPzq1Z3uYy1+NcfiAWPe6geOJ3jblpHHNXMhmByEL+hPBc3Rn06SDIJVAO2wcO4MEezPZKKo2PQEiy/8LAAucsd/QYizEP26w2xhUiVaYwKtI6hJliynTEL+vc+B0136iGJp1SfmTgbIIunomi33/WyDS0jtXgsqkSTeMgreXtVsxDy5Rm7778k8FVdgCNOxIG3pxB8mWBVF2O50e5Juek135vHrrRUUxpXUztu0lKH7JM55ubybkGvTWcH3EYOmGG8BsXz/mGW1CiN14t65BMqEzX/EzVWdR2gnrIcJ3s8eFTIBYB8/mLlmPcRXWkHCnnaZC5W77FHpYyuQeIFXg5yOoulM422KlR0OnfUlZ5SANkW7WQ6IrvT+y8C3PPRSiZHF1dn6o9PW6y5Lk/rmwp1yLZZCD/g+gxaVpV/6f2nwmTw6siIxoLwd/fycFgw6PoH6PfcdcI5z3kV9KYLcVptMw974PsEs+evl57/2a9j8XNxLVElLV8NclGHvur6ntKfgeU/DAxrg4SEHIQiIYL4Ic9C5T5qV1uD60iGB5pRPHmjxF1jxlmIPRFtWN89Lbu/EeiwmyK7DnHse2pLgwXV4dqBjOkfDD57LfphZZU62yH6xEtR1fCawdyOVv2undU5AX/n6h2sMXIx0/VmYu0nIlV39aiNwWDwJ6CnGxoKRtRdwsQfs9583SQhrb4XNjKesdgianAqGUcu7VTObzVJoNfmI3+pXqofNnMpY2lMjYCMVj6kJKMRy+7Y8AUMdxg7hSFq2JNS/rZzD2c9oUNaKhSu2lsev1rgpHPqg0fIb0us6Hh5rFX04lEN0QjMPPZwlBPtBbyE9wzGxFdVrkydbJAe+3r+/aXkZB/LVQeMMoTq7736Cb11Abw3GpOwkPKmxz48gs45+CeVZaTVNNLUMqj0J/4Gay5weUZcrJoHPqqxDn/y7lOl53ir5YjbvjW1XbIjAiMhP81ct2vLb2EN9vV+goJYgo7tuQG1PEKgPfLdgRLeDf0NOtbannNp2cJH+dwNzpJR0d6iD7zCiXMC5BcCLTd/paHv3wU7waFXfQU3hrkdsjN4YGPSu3ebmi7qDHw0+94JK+4+ZtihwnD4ZcYrHChp/uJXOqizAV27Vaoj/R3in9RgzaTs6VnVCHo6dUjmuug5xlR1rXpTroeVVuw8qodSCm0UpBZpqKfctvNaMkUZLTbrYm9GWLm6iEWO0Cd6/H6hdHF1umlEVhaiYmiIgaIkAnUewMTiUTgRAGs6cR2/71XVrqGrNkfuC5z8R/aqtg61tMfjZR7dzO4sOqcnSEndjYJ4m5HzHUpdYPiH9aWRHL7SiUb95Tvlra8LcJc6roCo4whUkiIUx/0dlvnnusg8+yL0QwuQKfnsr5p0aOiexLagBr+e6zLL2v6ae88FGo3//aVCe5OxXKUuDoNTwat1ZolHGuiWQdi/k9lxtEWONqLncegyKicKqafAsGUHhamIBM+fkt966h5ynLidsEAUU22SnYOJAlnEScNtzRTWK0CMGt6f93kDS80ZBKr9n5LggyziLl5fzPAAg2bTt8BGhQWNON9BHIQtYjGnMh7JNA7mT//p0ivZlwwlPhB5Qwc+MsxeJ0RwUJ5TMTVzmsjn1f+ftYCqfQPa87xwEKjDtjGrzipzExOk7+oYr2dXdMWOP5FYB0js7KPMJiEvOmAjl0/UEWwfus9cv54W5zwIdKiMGrTMqzQBI1DFBJbVUCnQMIqs9IgBtN3aN91zYsYlq5OkcRkfk+0atmS6+o8Q70iN5lySRsyNvElj6MNdJjrrFRoj+SKnPhFqPc90ZX7Vlbe0PUXyxCfVEBvdue4y86vZM5pmrs+NDHMvK46oe+Z2iB9jQ8VaAdMJPoHQMxcjtbOnT6lbBCjPHvb4Vzu5vaF2DcdNA1Nv34ex+gGjrbiuSHUFFU5oH9V66v7elAvmEkEv7BPbxvYCoroqOB0ahc1W7W8WfP9PoSKMaYLP4hsZkgId89wblszN8RHeKhIwFbWgnkmbA8P5jQGKa38KMbOCbvGT9B6w9kYqNkdyEjHQAT0Dq/w6qI//DOhMZRgONtvM6DwsMsJwAHrmBHJ6IQYK3IzEu+a6HfbJY14KE12sv7VGMcKjIZ9dPVb1Hog1gVwgXmSfJvWItVYrH6E6+5/u6M5XZ4ngB1g+XM62pjj6+XGcOgrmsg6PoFvxlA/Q1v0dkbmHy4kBTW8pzIhG1xtlJ3wE2rZYv67J46gpg1Yd0XaX71aZ2GZEaNSUbal/KEuZVQYyhhoxC/V8gl8iULkRMqwclvmknqyBUGqwrbV/N1fTBUjcz2oKohlu4xmREd/sLiwemOIahaUr1TKfH/byPB626DFpIQbK7mRt4q/31V56Fnd/peuDrXACgm6q3dmBznj2YYpad0YKNjEj1Jmu9pvSMqs9W6X2UItl816i4ylV40bOTsVsxej3CI1txqAWcw5ICuGeJTTWBWaMloXlZbAN5TU98/ASPwrJKqhf3jXx6QBvrfeoIr5Jk/gGDxoRtNROmPN3lzB89ofQWZ6vguUdNO5svOd5VtmrrtpII6KP2jYFD++bVTWvWfqoKiBzF6OPDKs2WWWwwRGoQISD+RqLs/Z6PsFhdvsXBwP63TQRb8wQk4yoW0ZwvF8F2NmTri1BW/lfW4F/iZUIuE6zYc4mekkNKCEwEILqk0YeXcGxluCW1M5lqqk9uflQeNrvCVWw084kQgrYxTMPKGdtXKVGf+cNfTHeIlJpkaHQPdvvnEvMREpOXlnKIcW3r12vkeGjKDFYSBj2LV1EZ4xaVTzZx4+oSzTJ/cBw4wxy0OcucD2RK3+U6ZUr67La0wpj/87Gtcux9Glg/fWC0HKa1B+5nIGb6wqFqgNBC9R3sX1RMnqsNFfSjuSlXkfqlty5+g5Y0U7W3thKLbYAHaC8bN0lCNuNQhv7LjokcrkmpgpiFMLLy9tZ9hxMhpZMfIIXv8GIX9k2+ShNS6r9a5WZWQK0kHeCwjiplqY/upbuXT3az20HWeZz3zm5xj6JscGYyKGjF06x+/m7IIa7/acSiLKi6y8pZ/15SnjCHxw2AWfgRWlbwMT9b0kXfN7t7B8794E8CJxy74k7xdCzWWDGNVSsfYYynsmA6V28VCv/biFILn+ME6dvcP+yArtidmYnPRLccaW8NHSba1RLozyzWgLtgtRs2xZxTmOw1Rg5AKvCdjQ1yt3smVIw5JRDEmHzfatV8HiMKilwbKsKnM8lv6A6jSlqAo4jZXn2Qp7KwWtVNgU90bO5YOWRN5hiTXgR2WzmJChvS2SJ0mwwzr8u9Us7IG2f93aRW4Xa84YH3+mnDIufD8pt6zyCCShwuvvThFjrAgvkaPAUGewogwRijQu0zzAB68j3I9CuMnsI1dWoRnvIB3k9yn2Xk/5tvrn29IdAF1dpp57/MWZMLC7gY5qxIgNfsmsQqw4Drmbv6txuI4ADQwDjRgP848bX93vyqeTgR9oPaZ1rkaWL2vjxWC3t6O4yzaKUfHAXIfIPyAgscMJJwbMnuupql6piJ6i9HIsjuU/jTPdIaPkV4P5Uhl1kHm9LWs4pGZ/2xtLJyz7Fth9YUMLqHlFQZWB9Djw9jWx9bQUpmbwZRZ+F2ddSzEtocBsJXRvD63u2Fr356ZL17A68QO0yhgWtJknhrjEmWX01hVatBy/icNIseXa5kFkUzYQ00fIgKkckUoClvuH7I7t+qTfKqUPWzwiv7sP3Sw0sBah5Gi3xQbu93cT/V+6knVIz35orOMDgr6msU5w1KA58Jxkmi/wnwelhRwuPBw91SSQMbDhcTxlCkwZdCPjNAUy+zzn2jtyJ4tMqQrHagFc6dnR+xppg3UPbTuGj0Gce083auHeW14JxeaBgytZVKDmpzDsg8LVuxqR0Gk+XRLYPYzQXalSt4zivH03VQvjgYCAcZfLRBzHT3c6VbAmuGIONKACMMJaX6Qg61EyKbYx6COjmigwPEgyCh1FtiMNIaK/g9wszVa6Vw9sXrPhLaHPW3xvTw8rOUkG6WkRmYlNzNpgaLSv8t5+aXdDSqIhlL2H7fjYaOPwwd5izeo9pE2oGRS6l27gQnh+CrLD9CQTTbtPZYkPVX/JTA2Nv8Uqb40fUGD6kpsN1E7fTx7pgoB/nl6G7t9ArzC/LFCvjxdrXcsnsp7YiG0/3iyuEpi+dzb7I51cffG3GixFUdPs5ZPYfYL2cuJBRoQZJnbw57qlTC3GkfUbacSG6uCMaJSDS7bl8Xst6zLVkvExkpfu9EvfIyrzwJK88UIeLXfeIr9hUT/PVl8qzA4ah/plsaBlFEbsSbkZJRKBWCx6FDnIFGOExeiTuR5Kll00k2bZIfhBns33yI+e0N5Mmb5MX8ottfcQiwM92NwXbGGy/8k8knc+ipZ5O1oNzu3dZs8qVhf5DNZ81Z6aR1qsoYhZa157IbVEleHREDK2dAhfMBfLieqYllzyxnRrO0mn5SJNBHQ/Fc2yYWdrndM+pmgZ0CNth3/vIGFGW+qtEYPc85JUI6r8FChMplnzxiXH8aG7Vw0ODHGf+auqIkFRkiV34a2VYuFvbNui/3cRiVXAcoHQF5iaSna/R1fyiR2rDQOy+ZSOo2z06/fxH4BGoUd7XV4X4rRNOI8a6rwOmAJ3NN4MKPUksc7C5CcOXbFGjMfG21YVMrnYVn72etJAS0F18kC2FXsgCrf6Zh06yV6dFLF39NciSgQo8BmyLWUTRhW/N+PtI/Z+MhnTZSxyhaF5b0hPNUz01+jGINf/B6yBNW4IGssjEoDLej1Xo5MwjSK9xu18psWNFNEKY+4WngifgkPiqDGQ6lyDxi+8s/CUMaEZ+T2Aaib4X2idcXHVy/naxIkejQiOaSBVhTSnnILBQAPvwhO92YM99OFpi2ZKeM/tEDGjwRNM66buUwIGgW955Z5rXqwqYvhiKpOjhifEWErnuqtDE7opkB2JY1lxyX2CRkVBr1mvWHKgDC8pUm3Sla6l9peA98lZDSsRfI8I1Ufi6L/HUv7VNKz7+dRtRq7yRl23MULmYkQfc8Ud96YjVmGJ4ha6SqrQasiQLGgJwpuowkd/lKBvHZgFyvSf7xhtsvst7JLzsVBc9JeDmI9y5E2Xq6Zs6VZ6aXiuRCFUN72G/fvN2d17TMqaHh+Ur4rLX2sZaxnwuwFctE+cqL2TT3K0EC/6pmA5BgU5SwZkuWvfg/w3N1uJVsos6nKfYJaazHP7xUciQgUrpc/C+qBhx3w1lZro7OTvZWitTngTst2Id6kecFUOhbMH/VB+MOIS3Axep32RA9xIvQWywqCj7tM6GpPuqvxMvTfUdHfJ3OZiJxj1JKKXOm6dssY1f2aIOp9QhhGL2GBi4zzKgbnav4r44mdOjU8vlxw6xxgZWdNEJ8i58gCxQDI7SEj+TBde45Ak1imag+xo189htvfGMbbeCSi6E2JJLj3v0McEPtn7UtK5qZi9WdxWyP8fxgxbXr3j+meqrWsnSl9akgPBJwNgNz8MhBruwT47ZNmYiatnN1P/UdKBCWubUME1zFXA9mc93tJMG/R9+c4SrCNMICUqxonv8j8x7AEUAIhjVLua/z6B10DnoSkHc79wdv5wxD2aUKBSkPhIivlZEWkSme/bPfXROH02AWxblDeQKtO69IO6rCV4TCWXX2F831Qd2+tJNSpUDerWc/yy22rghXmDFiybZUJA/Z8f1n+4pmhpImHsFqxAWLhkf3koR/Re9VnD3eRTXCetNZjgK0LYOs/XVQ6OJC26j2oCkA5HYcon5TzwKs4u3e95a6EMw0kVt5A8ZIkAwMS4/MoMoTU4/RDS1iZqQIuou5a4qm6GNBz8y7/cgkB5nRau1htKfXj92L6jyloPBYmwOrTz/tGfpDqbwDxlKcSLhr/0epo2td2qjBf0JrABgXsC6Qya6F+xHXkS5beluw1RqtBKhgQQFYZeANrGl9b4UiHKjbsAwA9UeL+02y1AXGYDB7M4q05oLbU2Erq0FnOmD7hlVXHlVWDSmy2yowCByivqWQS2CB6sFkbmOEA6CdmrtFT+V1bLbhndOoUkfSYH6QBRhe3x5pb3DUqoOuc8xdKKJoJq+7JBjPguX56DoXQsneKv3UuVzZZi7d5KnRhZhRs2RpC4RZ94+FOA+lL5MFDroWB8quj9ccPxop47uPSQoEATsf91QRG2jzyghnUiRw2a28fgvaYCjdhZRxHupqzHa7bklGjPa3UGQAJEsHuEo+bI3q6gETQqA/sewKjpheP82ZZiAdvpU79QysNnLCMeeaAPjg/tE98vozVmlQCZtB4f6p4n2mOC1Fe1FFI5SHtcptP+OXMCC/BMxZJwp3Ubn6yS9OaINVK8FN2dIepXAi0VdCyglWNtRMSlmG/xTisETpKbrDlJOCEaxuktvusq0n+egM8Fe60LA2gPCYJmvgRsBI4mv5bYxLBB+M6g4NQEUZk+7UlqvCiWfhdhVWdE+wqZbchOIPPrfn8dWJv9oibBapNa2LATR7rN/fTNrStD96ZePGzB3E7EviXqw50EMeycCwTIGPzxIl99glja9DWciMP3T0DSadOv9lwk0IpHAU0F+UOP2oMt4nnTdOQTjbF20K3OUdA5WUyNHdaSe13TeJ4zkE+cEQx4xcRYy+xRlka59dq/Eg+zNXTiadqcsBKDZjKcXY5rweZFe0grA9inmNiycwpYb4xI4no3Xpm7/qFc0sHFEDTYnvocAVU4C9zwXxQciqxpn0d7y2lXAkWuDqPfxLLr38zPYE0/J+sqe1pTk/ec70FOVKj1wghKugFmtWqXSiBwmI5l2jZJxMkg0Kn3gH3kA4IQeoODrkuee3+zbM1uZ5cuQbLSCTKjVd7TAwcVQIwon8YyO1q4h2u8pYJgekxHLzZW7KD7IBdzOuX7JQ2W4qg8Pyj4HqY9yjF+sh2B8xsy18H+aN92TXNOS4KIEAnpK5elosvrvtJQ4zqZT8Q97Qq6uSK91NJuHvPT8W4lmsfLUyjRib3RrEn1nuf9UE6l4FzoQ2N4MN/Vpkt/Az/F4jU3cU5K8Np53cE+7xP955IlKs/uSMnuKz2GtUXcWG9iX752G+DmTPoyvlwTc07JW9/+oY3K/svuo33LtPhFcXwgdE9jsojalm6sV6stTZAu+ZiwL++pGxVOyiwE40IxF6ou+YkOtK5RQeGeHDXsnYQ4Cr9CJNZHetaYungkyfropntrPX+srt0rnbXjT+hnXP9hK+4WQXlC1vMD7XeOlFSMlZMtxS6gJYwIiP1y7uIR0EFUFl7eTesH1uDCPrJK5GwFBSvbuiFXYSlJr4NFI8Yv+ZG6RTuXor6KrRTpvc0lU6DqjGkwKKLxQBklBiEhPSSHsDtAp/FFcAEVCN6BkqywLbD/xdWcF2jscMpbgLNlCm6iCbvs0cH61wgtA5MdN3nvV3V9DIL6UnX3rDwkwC4CTR2yyMMV0z0z7NISaClEMoCpGuvJTMo8HlrmsL3JqkNRuZBDgB+rnSlAXoVfAwGiIwVqmSSZg7N59MzavHeLlxPItLf+Cfrl6ABSwWSMYaJQ6PlrmcPDTtpEtUBIQihobq4SUWJ96QDqDMVAcPX2uwteEW87Br4JVYhbLWEj7d2HVcpimj6csjqK/u68BQ8Qk992UWyjBjbsc0kpq02p9R7mvEsVnu+uNpdqL8ExxI2PbwAyERoNOYnRQCh9N8FXklM73r5yAyoL2jKuPaQT7ZwwRMEzlRtxGNuPEAdfWl1IkZcmo7liqPK8mvIPHuHErAsS2V/eQsHoVVWrKODTC9t5LymTYRglj4sas3y/qHvUqSFUO6aJvRNG0lxZhzO0LWVLob66sfBr1K2JxFul0Z2By7qRR/L0DGcwAObmemijncoaTQj3zSO4CGZnR9NP2hJjebHKj7O76kBNxPbZSz187wsNIrFz5+qrvb+RCJf5OE/EzjUrwNu/1gmaFk8iPpdTwYYUKi2c/LC2oaQD+SWyBMdvQ6uwRfzBWlBte7N2seCyk8R3a14ovbOWgqpvfWPtoSkzEhIo4HMCxfN80OJIJJpcOYTRBwHvEQhOOkW2uImx5UnFpzrmt36kUPI+yBrU2keJYDVeXEoxcJJ2Tc5Ukzdsc/rfO3AeOUcdfQxAmGknngsGT2ZP7A057L8O1xFVMJhtISo1e0lIFY=
-- 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 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.6\"}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 discoveryTimer,accountTimer,jobTimer,craftTimer,updateTimer,cloudTimer=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]==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)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, 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 not ok then printError(result)elseif type(result)==\"table\"then print(\"Cloud offers: \"..tostring(result.cloud or 0)..\" | direct mesh query: \"..(result.direct and\"sent\"or\"unavailable\")..\" | routed queries: \"..tostring(result.routed or 0))if result.cloudError then printError(\"Cloud check failed: \"..tostring(result.cloudError))end else print(\"Signed release check started.\")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 requireArgs(2)if args[2]==\"status\"then auth.require(\"operator\")local status=cloudSync.status()print(\"Telemetry: \"..(telemetry.status()and\"enabled\"or\"disabled\")..\" | enrolled \"..(status.enrolled and\"yes\"or\"no\"))print(\"Last report: \"..tostring(status.telemetryLastSuccess or\"never\")..\" | next: \"..tostring(status.telemetryNext or\"disabled\"))if status.telemetryLastError then print(\"Last telemetry error: \"..status.telemetryLastError)end elseif args[2]==\"on\"or args[2]==\"off\"then auth.require(\"admin\");telemetry.setEnabled(args[2]==\"on\");audit.log(auth.current.name,\"telemetry\",{enabled=args[2]==\"on\"});print(\"Telemetry \"..args[2])else error(\"use telemetry status, telemetry on, or telemetry off\",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(\"Telemetry: \"..(status.telemetryEnabled and\"enabled\"or\"disabled\")..\" | last \"..tostring(status.telemetryLastSuccess or\"never\")..\" | next \"..tostring(status.telemetryNext or\"disabled\"))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==\"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\")telemetry.markActivity(\"desktop\")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\",{})if not checked then return err end if type(err)==\"table\"then if err.cloudError then return\"Cloud check failed: \"..tostring(err.cloudError)end return\"Found \"..tostring(err.cloud or 0)..\" cloud offer(s); mesh check sent to \"..tostring(err.routed or 0)..\" peer(s)\"end return\"Signed release check started\"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==\"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\")local telemetry=require(\"ceetos.lib.telemetry\")telemetry.markActivity(\"terminal\")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 telemetry=require(\"ceetos.lib.telemetry\")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 telemetry.markActivity(\"program: \"..(fs.getName(normalized)or\"program\"))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.3\"]={public=\"7cKfjKRXe4iJahO4ZtNiPPxZeNCto3wLMnhomA6A+FjCH5Nu6EWlGP7p/ZRGK8SrxGT7HDL1od4ztfsoUHEM9V1R8WgM1mMEZzqHcPDnaFmxHHcFTSzWBBqjP8jdqBptEwNi9mtqfd5Jc+AesL8vqbbIgOCHDsSTKnUIcRWJuBQ/uWuoDmImY82ZWnT5l1WAO0cwVxTLV7ntf04Bz+GdLKtK/G0uawbmzJ9/CqCGVZBHahYQ88LSx9K8iRv4ie17KXg0L29FD1C7RbzitUpLpJp/abF18t8JvkJTVpHha8+xHe0JU4TEuQLGalXLRjasIOfSxVwOlZqk204zE99BS1HwDn/vYIDcBC9fA7tPsTDbpm8ZoSUgxP4aHB3ywBAIvQJiKXBr2rV1IO3cHE+96GMq3lM4P9kMgpZzrd7n5GNIlHMh5cUrIuUyhZrK/o23j4IN7lf5ob5aZzuonR0p0WXQbknlm+FttXvJ0gM5oVh2hVFvA2sOQlBmxj5METtY2D8QEfXQ7CgxOCYtDVHdzosQ9jFjeZwFLHlIlVsDwXgaTSla02+QXoUngVKpfK94n+djhWAv5G6kjM6ha7vbMgulKjUBkXRV3YmREDvtL/PuCxUHOi235E93enKbYbAx6zSpuEyys9DJzsaGDSAh0y0FP+Ksdif+tt067fG02TqY2H/GlzbxFjUq5B7ExqqNocuHETRy+GHdUmAHKvb20qZtBIkKHiJgw/ifxR1vZTltF/EVGly1BXyLsJatVwWTk4CXrXw9RhdNOT7tOYzWF4BOuivVumlqwxuzTqJAisIAz0GdBqJrRALWOUExLfMA8GGuB3oxMnQGV9HSI9kbSBjVdOiu4dD6toUpLGsvSSIoGmjmwvEUrcAtkzCGa+fESkKMJxfjLcdNCpkWAEXqg5gzu/sFMHm+eD2ebaT5dLC9uY04QdX1gHHLWTe5XiJVRQq/upxQTCVThGUDFFkuvwji4lESKZDerLc2odnIMcwqei634WvazZduDpkP4Ne5x5Ki74Yp894ZdOalvALliIwMQpTIkrIfuVXWVuiSiu9ltLspEg5szaSAYDDjEhftfrgV7XfDSgvUC/GU4Cbsm1HL+Hjd4G36OlLa1dlAXK2tR/PbRI+HxjoY6hUt9Z+2GqW/LXjeRDAzHk8y+MWcp/B83qVJq08EyQvxawQ/bHpUQ/7MeQv2RYFq87OaSqti3pEHbKu9WwmG/zgcs5MZ4XYgPcMYiqrfDTrHT06P3G3rOIM0FAzbrMQpfb+O599fXxNK/Ru9SWna85vtTG1lipEF7bKx3AYeKcClwoySgtJfDIrp9s7LVkLi7sXY8KdoU1fLvRlt33LufC/dcEv2KlTpBExeGBERUyUhAVGHOiU/6wQGRwkWkCLwjstfJmR1PCfsaPfUF/pmEoTc/WgOB5HMjTSLkbTeWszPdgqYnclSkI3mR0oHnkd+mLIeQ6mqiA8zduZ9dzIOAPadB5CpIlKrzyk3SvbOt8/ired3mEQ9gkQtHGWXYb+yppf7sCj9EXo5UGrStlE/7BUQUC9Twb+YZ7RxXMVkATXSFKU/Me83guoc6D9S228WInIASWHOPIaDZJkjC2KuyXpf3l7YQkUj+8ShRssxc+OZ2HayRP3s5vyxSvqKifRqPoMjKE1SiI19ovF94RvdzyIz1oSJr6I3EfKQPZ7L5BSJ9jHc2eCtaRL51mmyFokFnzjub47fim6H0yQ96HrTcDVE+y1pxk4rLe85qvGzqELuWBq8D2U1QzeagGdEe9QFYBU8pZu4yEbhWMNpuNS+2OUOSrQKTsbSPQ8t7zO36uRoPcDU+jMU2mI9s39qikFhbSvsZUBt4Pld/zBlHbTIWIXLFbyZsNJU6Vi9OUjir5mzq4Dp9NAiYbhTUqUbC7hucABiLJhwrSz2N4yg+eoEyyBycKGKtZ3xbqis+TrLmf9G1x/RAdzgUVNoG7efwTi6hounDlKS1pK3DQzVrxjVZ2/L6/opk+iLK3JtsoGlWHmhVuw06mLa4MNYFRSeMCl6jE8oPvuWQ0Wabm8FH7y7tDYQLol7ngJN6qWw8IYbOFHmUXUl5qaBKcHnA63vfmfZ9ykXK0FLrLf8wh37qacqNotPDSRwaMoYeGFJ+LWrQ7A8u4blgNp1ejbVcd0x89d02cyuZOmJDG8SD+/GTShXyExghFR7OexOQi3itllfOURa8BVutvxbf5F5oBydzNwXR4QQfoznSc9CjVyg/DfvuBk3VbSSpvcyXrcPQFU6iuicxpAYRcq4Ena66WZD3Nc+D432m+ZQcpnqv7lxJYLCymbxnpFUYe/3fpBk74o5qmgcQZMwZYIS4WAhSPl6NEBsoePUEANFJsjnnJf7I4rooPZOZ+0PI1pbaVEDprcy5lNu1Y+ScNgB/E6/8TMf3/YefRslKEuyB53yqWbkSxtm1TyYYUi823XH0Hj7PlhL7el8gtoqeHxdKzTkjX+XfT9tXOVgSOoD9iNdYLy9kVu8ja3HEUvpaUn59P3baWwsn+Q4/Pi8FSFIASq2ScVMZvR9MixaNorIIY4osd7V1rFBKFmbDUOv9BDSXNjjjNYUtwIfHVu1upMma/6uVhOIKrQA8LhMCf/BPjLCRyxCDvmzO4DMdSs1ygt0H3bQzvBzAU3YMYEHdvv/pHfJQWOTUX31iWvTsgYCicTOo6T7qtLg65/mBRWfRPSi1WEbX/0H1NnnK8fx1S5YnIIEuS8EwCAgG6tB1pXkKEHSyGQ5RLRwyLv1xgSjehK8WhFkT+NAMHqTFWmesP5UoyLB0CTxIXlxs/Zem4r6UZLzfvgfaFtmptu8Ar3GyQZ4Sv820wCsiGl0JAIN5KYFGYxNRUJjLZeOyp1EJzXI0cfsKtdcKodaYvNoafVZ0WMC7UKjOwDIprdYTnDQFcRQcnKYZiYe+H0khW7X7OwTbwHU4hXvPn5CCIqkBlsEo+RVsJNiQi+1E1UO9xKueEhtkGlp/OeOH176t7eYElxWRvguukNeNNqK31BqK0nLVTcZ8uhLEjIwADgjX6O08yYhy8pmFPERW8b4Ryn45PHAtYJ+SiHCrD5txukXhMHYPhUcjm0s1PdVp+oksxe+kPxSKfROt6TvytZGqVM/B1K//pV7hEqK5QNlnP/LkrJSKCR4p8ixMxELB4NiOxz/oJIe8b9TEskHPXfdO5B7Kny3omk+7UaVm5clqf5wCsWMyZr3Ov5Le8OArFCkyemqkqL79+NOlRbAcFXbXkRNXHxNtb4wWQoRKe4qTuLs0pEWxNsq0MruzLvEI5uachRwWJEDTe25FYng0jETEvoE4F6Wnmj3K/0Y0nmaIuMRQ3K4BC6HKDH1CPXyIFHxLeWdtX1yxYNveeDCRFiizdxM8a4/yInX/ZFHpDFv5cSPI764chLuBUZHu3Own8S3w8jDAtYAJ1byVJHGfJG7LXBnlNdQ5Dx1kb9Il0HyyUeXGfpI3Oi9Yr2SPLDk0N695P+7VuFFaasl70cRKEVtHRAPlybXSwnG4CGY3kKq+iXyU7Ndb6sEWqDPJs3dIuXgld7D7YPhEgFZiqp20ETn0UlpHHMI5A6gYuPvuQLtiEz1Wn8tJnY5d6rLJurb5E7V3c2ntCr7YXy5BZ/k5LjFjOMVfGn6IBDbcGb3OQCkpF/OmhUMRTorrl0MC3Bj6G9PNuJAo7M1FTrAhbPSOY4WcWhUAp9kfQd4nh788pGWW2fGBIev/1Nn6QjCbtnSzq6eHp21/6uBfFUwkT3eWkVYDvXJXPPa2M7CWnXMuNdivIHG8RTTI1OVSTwTtOhlnrwd+NjMMeXs7Z/6icI18zvLjpcQ9V+LsKORSGsHKbYlZIvK+Dgmz1WbWxdhlhBqWJwzbXIlDhw0sbCKR0t11MBLcB6UHRskabqIt5bPjU5aP1+VcLv2jXf7+Enopg7ij3w7zF6YTYZWpFemSkQaRtNK7wjThS7hryy2AcxAgDmBCz3CsKOm4FGdgQL14XNqsdMxoC4BRD3T+g5D1s8/HMnXjZbqoYX/dLAWF3uFh1swp7puMtzMMNET05/+cjw6UPHHNgcqiY5vbYlylMsqI8AM1G2Ds6uy1y4Xfdxks3Tqkhed+nc3SjVyIXmcM3ZvV18rVSloqL7N/oLgXdcdI2erxaFvRSM+gZp+OCcOiIGO39jmIbvf9/2HKa16CP06JQT3pMP2+vM3BhDLO7HSupYkz/2H8+tgPcRraK+tHpS1oXJPgdRebE3ULnZAeUWorhgwKHsQsvNsyyExeNgWA8c/P7SwssPXEKeh4F+xtcCQQH7yJAxKA5eBYaB4VKQsn+4PoJNGIlDrHrj0mgGaAlJT0DKfzsNF/jrjhFfELBAHTXhfnShxNUNpGNk3sPRFrYn+hSkgID17/ayrkl4oeWUewxQtLUc1ZmNRdQeaeoZud9PckN0CF4kYLhcDmhDF8QzwkKz+HGW8SJ3awxKIisBtg3O/9RpNfpZH/OXnHYd3Z6RelP3mjBbzN6WEq8FaVQiTAxKfmYsMrCUL0Vl10BeCijZp98ImkzFvREegQ+6VrNYC7XMBNHl3V/Ttww1rD5PraA8RnTmGVj08S/5DlTEErLYdsiZf8bDlhwvXC9sKf7v14WtZpNbN1p5gxWZ9JUg9QY6zV4OeT4zQUDdfG1i6V/dDj8W45wyANUGfvr3E4ssuU15gaMuDq2ZaC65kKFk6RyFb6j8KHn/IhF5jG1hEyiezU2dD2IJs4grvkGl/ohbLXy8FwsoXBaMMlNzlVgcRdDvYu6wpiSM6Ac4aVa8PJk8UOAEERGGeg9RvkPyOrMre5pnc+kw+W0YJKPuNWmL6XcCvATsalKnZ/hFwWB8qOyqMdAw4k/2E8Xm98eFx+igjlF1rRepWvAzJfiFq0gFA6b5bAyhDEnszsN08WMIo/HAtrH9GrYe618iKSM3Y9Cdy4C3zHYvUt4sV9vnwkC6dVAaEFcqMOCj8Y+Q/jJekMNP+gfS1R3AZJNvIqo1qI6lwEwCka3uOqY2TD16KObJQqdCemDMF900GNqtryAmv9Eh/BUH7W2oJJiyAKFY2G0pjM4rk9b/hlcd2Hz4tO6mBbkT0ka6PLD8u0NT8t7UGUTFfrTxJJfgTBDMr0svm4P7D2hQj+X1va3GXAKdgPPpSjujGTDUgbBLEexoLDhBcMuTwo3x18CdDxWatNeJbV/+B32tmjPCEEA36qGetP7rlrJaMhlvL1tkjp3HKgbI0+fHnHYdaDBYFlkV6rHoHY87tpSfBPVjEnVkNoBHDKNoCb4cygt9conHph+2fPcPZ/OEDHCXyoeiXOi8EBSVOmdvv0ORMxpzbxajuaAAGDK9tiObeDF3Qo0AYtZpZGgMzu20rR9ZZfrbUs7YI9eFqKpstiFoaUhGlJUVtx0hp2S4sj5ukM+PqVpO8JJ8Km3h9xRTRZGyQKJAEZuxYPaQka7j0s5o8xvEMK7f4F1jhae69c7AM8fK1aicudQFTnhsHl7rKmufAxXes2rQ0N0fi1ztuaEs1ucXUICl6NpfqfIC3btU6+QrvIZQ8Gu18pB7OMYkbDbTM+LX51ljxvfIqb5OsDWfalj1A4VVaKB8+dOA2ZPI4Ft3ELdYAugXOkGC1vzOfc5B3eKkhwCUTPahHYlxeYryPzIaS9bBDZKBKc0Oiaf2R69Lm6HcHirhIy9P2cY4F0bsuAL5HPeabu3jjTrGQZTXDgHSlObXV8wFp24ZACd0MWtA3basrompJ1jwlRVmE8/rYaSOJLIZjZV7Iz8WqOY7eulLqtwh7U78b08ntaRQQn/QExQ72jLJp1V5i5WXEH3yRHK7x75goRrbQQov/taMuf+9tQT8MH8MjwO4czovuHjsXKa1gIj31w4oq65C3VJB5I/ehusj0cY2wcTr1zr8fKHSGRmz2er5vzPmtYmrO4lAmML+dkNEHGeWR/EW7rU1C+Fwc+NAQmwgzjIYWSbSReYaHNsAR8/OoKnRCaUZV3aYc3/mnDsXB4EN3p7Wiiy+PCi/Y/xA51M0npGJCVGdeGrz98LyRLWfeE1hPQ8/UKipL7ibmIPT9mL3dwDiWxOQejzh4aSE5yuegywLlH6PZ+9nQycZUlC5jHKLf7MMrfBzbdIy/sxcLLY9qzPWGu9lq/HoTtRQaoKfJfiGwwug7lduDVaiRfWg89fQhAJZ6NfwXxJOzRIF4kSdlsTvIb0kkh5pSdXUI+u8gjTQh+//l5kBqmYIvJyG7no/A2AZzmg7rc6WwprZkdYwdfKBkswkE+25JOSD/RlNqEmWH1nBEpxhWETociKqxlqE64iAQGlxDi5pK8L5OS6MF77V9fSFrXmFkIu5TdWJ/e4dX8FuzSigYsXisXrRrMk/YS+j9jgKLJ8G2v3/hZILlgtaTl04AgBT15abZ0PPi53hCIP4Q5DPQM/IeRqvgB4gfWPtX95cEAkwTjyzbtgH7WPOIh0mgfbf+WOtjnkLo2/+TiR3G5SdYH47qQvV7zj204cN8UxD7seQj0n5fXJ3T0J42bgUhy+dVxFBlwIwSaqQkV74J/gkrG535OfBPuDEziQnT4jIBELsN2rrVa7R4dvawl+j/FHlTI0n6m9Nnje1KObEhPLGGXrMGUXBnC4AfgNDR/zs4E6y/dXF+0/0creQTmTonOVn2wyGGaGHKJiHMMdZlJnP8/1xrSrKOIsEjggzHlV/3y/r4kawMWDPMj/hAvpxiPaXChxUHpZtPwcfqxyrD+DxR/5Fj15iN9xof65MZ9rOYB2CmZV9IE6imdry3c5YiYGB5KAVsxapW0Ar8JqIO7awkey8xeHir76knMINCXVa4/gBPlt5rd57qiCdgnSo7MTAp1QehqbJLuhO/Pa9KGrThB3yVDrrp4w2q7btfOKtiQaNU44J90Lxav2sBmy+1LHy2yhPEUeQ58uMd1nKVreEd7327M5QVFF5gpXxF7OVjSN23uElxk+CUU0KKzq6mKCuPiaAvAgNSzGU/lLiNca+ybk5KevcTk29f3uz7Zv9hlcNnGckSCK3M8zmT47i6nYS47tzuTqUd3Ql2bHSHKyusEBjBcTuCtzGPGe62i6qlMTsbpZEu4uPEuwJJoaIg2UtIPnXdlN4Dvnxn6FYglbPLR0M7ad9gaQcoKvpg903EFncP/p7oajcSnmgkT0LMKgRRLarsgzdWgcf2F4MJsj90FMc0QyeqIRb6xHAH7W7pGVia0zqNajuUthEBD8q5Mrh+25IoqKOUKLnvrEJTCYI3H4C2uczOlgtRPKEyxgRV6r0V3SriTaohUCHHxDuritgwBnZ+051dgeF/ctO+DCI/+EYQ9ps30g+B/AP6/deDWtVKlnN8cl2WSA5y/HfLBnkdILws9fLCHK1lReswt2vuHjCXjreGk2Wh/a/0GGgqlAQharpWDkdqqK7z/KN+k0jpuNmZ3pGFZIicjhxCr75NZ4pfr1CLVANr1a8w4FnSBPFfusPbuMJYjgb6O7Oe6pTdmO8YkZm0FnvAYZaKm0Y3vlA1OX0jzskAlfrSHU6xxQfIABMxZwWn0rhwgoishyjxCbZx7UywK8IWXgeM0CIMTRkEZbaERDXc00RP9JLsGBN2DXO4WEA/4GSuSec2T9VMovyBOSjGklPNdCBWIstWn+6qa/4EJRUob9Tzr7+M9ti4t2HyV/0LQnrOmbvlwZne/RFIDxfWVURhbqaYYJ1kJhBDZRH/diTkgqkr+FrknukkWtwnXwYVKdnII5G9VsBOyUtuEzDj7xVBHvKoEz4C+XDw6ScLxE0UjPC9I4Wmbz3wsdX1509NwoLbZnyHzAjL89CLIY2eL+ySilDgfwGUv6zjNA2/XBCkJ+h5ubZCXO70L6b8zoG+1ULtfhDcrf5UBZ1Q7xagTZZIBVkOeUD+fB4KB98Kqzt8O/pu5ebl0uZMXXG51lVnrXavY14fenKdGaPoE9FUVaQgHeZJ14ZckIdxSTkqkaMh0tlc2BAFDpcnw/HLjalY7rTK2NBSO/ymLR6RX9Tv/A8fzcv/UjgcLx5jn/I63o07PyPL1aSdiVCUeN8JlOuzPCZYQseHWZWHRe9qusOVQvoeXmViIImBo8isJVAvUo4jCww4me7VOIKyAQ8qQF0KaaHWMBP+Ejgkwy00gMckh72x2HA85j4c4Ps1R+6Bnw1cGfSOn9dJIiIQvG/mzfOgUUwhMbXs/Rgu88OZL4cpP89yCPSGLjlvCIlXKVEv9ioF+odHizn6ECxl73eI1epCVweXgCqe8ZK46UZfePc8w4M1I3qW3Xr510vSs1mOMp1htsuFAMVOKy1nKU4q7uBFBZKyyz85TsGTWygsF9aDynXVXGK7YnZLk2jb8yt0OjaUsT4HYb5TeFC/oQQWM8ex2EM6Q3P/xtpy4JkeGu8kDVaeNlnNapZ+NC8yf/5BDgC6smJX95CwhMO7GJj2H0gvTPLRpZT9xzoWXt0XHGQtHDUmMly4ft05evQftjCGdGi7mj7IfWsGyIzq8Jt6wi3R+hIWR5OyN/n8ZRjG/U83O8sQgxUGmuCm3PADI7vrugPR6vQQWXjg+t4llUK0hMiOovNXLXkmP+ZLEBTUOjKtrWnpsTYo/RcOaqJhyxtEKxwz2lwpABxFmYDN8adYOhvr9GpkzNZAyhVMBDfCfJLhyjs4DNA2oT5g+Gft3XgWbTAW203uLzrI8eHf9UZBVE6/wNQ9X6OO8QEQWq4iogECgFKdkas5Lz8bK1IVoY/Z9IT3CddCfL3emeSX8JbAjOlcOGZch6Zof/UCRFLUSae8TtVFkM72GtvEY5flxJU+aud4o9cIXGIt6lvUVjrrw3BCotDg/3lSVoy98bPbY/5e5CKhXNKUfigkIDjV0q9v3hZ34QDp6PZiTYFbVNuvqYdhUqd2FhmHcFltHKHVj0Tu6CVky8K4AL7wzNrrfusHxui3FOd7vFPCiG+RDtsuOyz5wt7i/qOmEi++aUwPexuJgvZEr5tLPaU4HNg1UHSBvnkA5wg62iNdMeAsg2Ow+OsmFL/wtEFa90xJeUuInaJqPQgwPACXd+dZw5yDnwp5+Z+zou2J42vA0HP4ZugIT1lk0A/1lKcdvMGQpejrkm8PyzMR301jFkl3lhLDW3mS8xTMHf895U52L46psA/YpeHERUYanYacM1Rb0uL0mNRYnb7dpxGdHivnA50StnuMu1WW7j8f4NjeffJGLSdbGQL3xx8lrEttmfqMK9NxcGolUO+cREH/g6X80iNmrxs4B/PkIjSfeikb46h8QHYU7jxmTAf9I+gsSIn2vEk+N2Z3DvNo76HQa30KtbBTWA+3T+AwQGH7ZG/fWRpgv3DxvnF0FIKocnF/Fkjgj8qXEtm4rwovCdze6LLYEAAW8nn+y0KF/BahuzhrJGdgfMRGKxhCnyoICQtP7AnPMlTRDLHAZU31Px0hETWvPmrsZcxp3tBSuFZmKFPPHOYhW3dF19zMjeF3qk9z3S2wtawlsot+JwY/OBIHt5duX0rGQ1sp9U5jRS0Cxun10JTxD04/eBq+9k7opBCm54rdb/I8G21FFeeE5ahR+hZ727DY2owFcEbMmsjQ8kpjJbPs7TZWk3DL3bRb4/OufVG+Fqe/8n0sTplGeNEerQOqYnyNXrpNyK857tHpSUtwAnpMEr22rcotifmQHz9YTk+e/N7swBI87R1RS6AH5gd89V2aXD8pDW8noh7DSl/SFwyIFxHhgxdg3divb2gU0Nlt2/bOUBJB5C4esa3JkqxnLUhb5y73lF1G0ppgvksS95jpITe3D55BVwuKJdVEhcREIepwiDL6f+2bG+Nt0IJ22p9g/j6TPtT887jgqS6uTuDzQVs/DgXX4hL8xN8whJdEoQ7E47eLvxssk3v255YCMTm0JZsJTDMGVIA+H0xIeS/vUn7cT6Eh0wFw7LFiVLTo0GvXNZrxpXICA510rvKxhXaCZdXRbzvYDXNDcXeXXbnoW9DEfLM1/py6iuH7m9FfdGzEAo+Lrf6quKubhjmHxNPRZMFBTsKz0WNIZmuOd1PJOZN2PZMQevOLTSj4xwh++SNPFkQr7i+7JE+gHw2nEF8DGNA3bpER4iigkicTcbF8cFMyRzmmRLunegm5HDu7eyrmmukrpBlVuZU9vvX7RAAJoM01eDvSkDGHx7I5+TXlX7Ms1l1CwCgmB7aEf8NINyXnDxmN5EiCAMcYcpCUxCparMZ3CesHFll0KDDlf+zgZ4nUhMHOgiJ6dO7My5w+K2BsqCxBIGZyj9jIWmuPw73Doti4NL3ItWFrRLrmDOAXZelwry9/RfwNo+1bCH0mpfGvjvWZX/afGjB3y3U26m3OY5DHbyIEdxCKFbrvmHchmNfXySXmwtEkxyuGNCMAyv/iUtvxHzARsDHlVj60peCHsIPtb6KBCVR1aCEcDxYNTh+wid5NiU3o1zyrEcDS/dqLOZ1VKdq6tmv493G0Nswlzg08bv65D4Mg48Gf0wmj7LohLIfF3CvTkb7zYrF7C0SI+Q66jVJkN5lXtbt3+gsnj45W1yImUPuokbtnup0gDgvhOMTY+CJlUScs2E4/8sjfz/747v1tnMkcOPzvYYgN44CqzuBuKtjQiT1B8BAiCTZU+71omXpN1TDRcpUItSU5FXzK8SjtBUDTIP7IWVpJ8sIv+N6S9hXQGEDE4Go8WYpq90Uc01GDRq+CeXyHTb1X2O6u86AZcSYGejpDQREdsiIfxwGMFsB9AQnq8J1ynKUAK5ennJOKKa6if3GxRt9G+/PUwicy3iJq/JZ6v3bTlbGRT50fZYlWGJCS4bVyhh0XJFnr0IgqMDeErAFq2HQI0gRJEmiZYtN5p2U6leJ3lnEmNnI7Uq3bSX2PYqwIoQxTDYD//IkYrCpW+GNeJp2yunvNN3uCr57F1957NbXzG8mhi9+q2QbhcZ0KPMUsitqO3/GVcXmzneflQ4Phc5fFWxw4y4ajZ4KzfsLhSeLOXT2xWMMp6EirHFoO0wI//xCPTQ+uv6nSUdNVrp0Ky7uEsVlTIfGB3Gc/gY/EOb5myDsJUx903W9ewV8NN/MITMPNlfxgr5gAcaJ1qA8ZLlukWuVZsXuhicQQjpBpK1byvroFdHT5FTuhh3JA4sERCyf9CPduWzgtCQety+Yop3LXZc8R5byMah3Ibl1f/bGSX0fJ+UDU9aA6kMr9+claMglzQZCuA3YZ6XbEP0gYvoF2+K2Kqt+pBB6Ug4UIDVhIZ6aSkEVjVT7YkndFOnC86b+udtSRFat1pr0WZ3gM08fXSMf8FF5UHpnyl88/Kfl+scTnye2eakh6BITJMDRi5jikfsic6JKQPrQAXiFdw4kW1C1l4l4GjhC5VnNN73PrPXuWGOLXEI6+F3GxGQr1m2oWub6+KxXQhH0jHiz5tVgTQKF+y+Xi1IS5YLj1lt0Q3qbNb+AMgJ9LchmbjnIEdSUC8BvlZ7APMw9zml33M2iCvC+P53aQnLvZRw+lRuiXr6IKuHGgTBZR27Ijo4kDlCbOgrpgaNDDyyVgdlnS6W2Tnnk75EL2bUzxcOOxvrgpt6Y3vdhfcEeh6Jcs9rRSWfOnAkC3/ZlVYXimGeBiwyGdgvRsx2N1u86htCjox5TVMee60VPS7Y2X7QZJKLILtze4SqWbtzFhOZ0X+ADxnU6tvC6SXl17k8C8LtZpJ2sJSaCyS91PrSKpUkMjs2fjPmOkuaf6875PjYXcHDIkQwkxZYHlJ4lL//1tYPFSfLN2RzSOGZ+kPwOVrtjQS00NyhMcUYmj9wlyS51TgN08YD23vofQfhsobMdITcoL35RGvI5LNTBmtcMSwHl+CLhTxodQlYxD4kB7lLrfsurzdb6iI2hRlZwUVc9b7T8CXQmVpsaPfa9b/gOiJMhwKzGsJ95DUm1u+ngtLQJ2/7KNHcc/WkNfRGd8o/VJ/3zZWX9H9D6dBY2RRfEQS24/yHMlwbOzXMDZ3f3fZlc32Q9dbCdG8OHOdy80cIfEpGG4K3CwRzOgT1V1Q/AQyPcKVRt8jdEJ00FFK21uZGne1A6kDQlczXuTLW99o07EQmFG0ZcPT+TxLCZjKxKPZirDd5D2L1qW/H3FvCeaWEO9RPBGpZ7miF80BuUm2hVGPISjZh3G697K9qqCTF979C0x8cblH3TPl/EST0lI10ZCVWNEFb6EkegtDl4m/BwFXrX1/Uh392Q/E/Zmg5Bl1a9JNnzhYiAt1teBi9sNehAB4hHX0VfTxbDttVoqVNEsONunkYNgd2cuMRBRHLHOv5+uHo/tG8sQGIT/BO6XmvT2XSs9kCN9C6m1nPpMncE61bs4BkB6epab4gR9h6qLW+xyN1nyhHDkeBfPMsirfUtG+tdntSDPt3SpERRixfyRLTuURwBjRnkwwb7UbmbcghBAx14Ge4ELacnQeLuEOnixFcBJoufk/pOYltzR6sESTtUwVPOLKPKVMO8dR0luWk9XTG9Yvzz8KvMFuGPjrlyneBBt3SJs4JO0l58U7bwPNNSATqULtdnWkmF05lVGPmn1faDURcbPonIG80tnmE50PXfyA9C2OdIHOYnjJ434t0OUYM8zsFt6x8W9CFX0ZEItx7kaO0GSOrQDVcm3QuHchZHnzXRAbCwMQ8vu478gjptGkW1Xd4JDh3j2+JlDcSz58Jdpr9iGvbUVScqm/sfTHc9hK7KPfipobNR67azqYAEeJ/SHpnLDzM1rCm8V3Ti8MqWSw5ipn6WoeT5ghvQoDHtbxrFr1lxNpaKTqbHN8J7CORvJY9BsEQAvBqAaGESENLHV90fhGcX2Deufh4udpQFEu8Q27xTM7ZAm3xHqC8KRo/Rwx/+uq+ZmDZ3g74hLiqcNKtOuw+q9h6Eh+dQk2NGMCOt8iNSWfutqdlhoTifm5+g8VMYC2o4/zHuzzqAYty7/W4jH+xf302xfONEQQqiNvUs6cGOWCqixWHwAp+/IJLDLm2F3VFrAIee7gi2roCgxck74WIp+Mfm+LD7D2YHKW2lyMAkF/3D/LVVLSnYlOM/Cs84Vx9QtZw3VXLNo15LcH4qKkcdpKlcramwLA5A9reEQnUnyYc7PzelFEIxfLaWu2+nZO2ixVtUZRK40Opsxp/lMphGaj0bcx8Oe7YHv+pvamAIHmeoajFP2rwDHBHx1d9RHd68GoeuJK/TkSkCifQbpUJMa8HoOmuwVEomtDpIgmpb0Tycb2MGyO3d33h/ipVntVPSR+VwSHTwBc04W1ukfI9BR/XEcu4aWteFz4m2ryraxzQjj55G05lms4UtXIJuh/a+k+Roy1BOHf4mgDtY0TUtB2s70RBnMepCtxT29sgXUZyFGSW+LqDj3FmBjV3GqKY+Zhg3+LueUWUiey4G8QPknCbnnHLlKMKi1l67+ozBIXKeTOWkOzJRPfR1RTKmwumXwvooN6A080E7AcEGkmGjG8xKYCu3aNLqmfBejn6O21QmS3JV6pTer7lL3Gsohb69wBDVxv040wjav16p7pkZs9t09kHVFRb2dPyiQ9EARPDNmfnGix4tKQPnl0BH0xjidvT8XcWVjwumtOfdxsQNr1cq2gxrjnu+W10MZBK+xEP3w0mxJYcusKHh+q0AnCLHx9GBROvKZiikZBYM2jI5OcTnYu7mybu5f3gne+WVCrcAzvkHztWeViQbcWYovCT5u+IHobyS6HQjwZT6DmuN6WNOBZpLGX22gzrIKwO/22pA9EH2ZNxWiTz1edPjceDD10x2XYML9c7tQmqBQM1RDPxLa0rAn/kb0M0FZXpZdVhxU26hsb4r8jOJaSOjveOvQHRaLJ1/Hf67oIowgI/eLS8K+3yDtolkOxOARBKi2cRqk7iacNn86japX/XFkPLrO9qNbo1DiX4R8w3Bw73EJu4DZFlQp1flSBLwocUpK0h1Uqn32bVbaXwTtNsVybyIu7lU0zOuNeZe8PnsDUe8AhphsJJjmVzurwtg1qVlfSvKj3jIDbz/RqpaLMbTomPsh+zxPHEJmcwl5Olx/GdlJgJFGnAfO2gj5XdgdPzYMgSS3YQkV/727nVIqYFYETkWBcfeZG7qPY3iPOJGajc74aLp5yf7ktoVtALAXFP6XR934bmfWmJ6Z5iCAeEAK+908mc036zY8Ebdav3uDJT7+0Uk+JyOZPPzVacTcCM5VyAwHMf3wrWuPQtg4Z3o/kxiqXnwC5HSfIUfdjYlwwsAZUNI7WJjmeVvmoHkvWUhuTrB5zvvie89b7xga7eaEdwf3uIqNmdqpJBhHMOw1xoKjuSx3yOG4WlX+mbfb5G5Oc8AFVTbfBUHaWjrfk/k0jH0urEWVJbTozjFCcjn1NJ+tZ6+0Qc30+r5JIGsQqubeu4krNlFGJwWRNjR5bl9gJq+Lfjr/Kzq4HulONG1IFcnxfe3aoTq7vgOcWdegY/ZxKuTs9b+vRueHbaIV+1UaH2gL2QaqgY0/b8YvOnm0iwg5zLXGSSNaiiYSy4mOMibimxrOotSxjm2tg07OQCBlLTLhTPoQwO2v578zX/UyUu5J7UMEpy6cbrpNyGo7VXnydm8M+S2Z2jkiXQIcpOMagL+NbG2IAkqPg99iBCP4qhE0CZqEl2H7VnQu4IkHE+0aSUQXe86M0IueboJ0sxNW6qqFjAtFWARzF66h0Y1gsOH6j6e3Fk1Sx1lKyrTy11qnEcqdXcIwl67y0b7hH4a/uP0WZtn5SpSbT/7jJv25zjHrgbP6Eq0SpiTvLxE3glQdsG6oK0Vk3vTuitRowPup8EoN0bZsRX+lkriEyet0RJA6pPl4R7LZd1w+CfOs6avBRKQNMDNHUNX1g1Ud3wpVKAWZM1dgoNaOuMrWboLzBKDI1X+9DVGBNfN42HSTM1TVDH+ypot+1snagD4OdXQM06MV3ZW0MTJ+7b+lXJacKRjGNIBX3YYZM7BeHwuqogx1gEkqwusZNQrq0NodfRsrtmvpUriFlIlJ4hnLD78BaTruztXGElZWCpV4nijjRTw+dfqKdr9LUBqa+tN4DD2FXCNn4q2c1XvbuDbuXIbhU1oJP6xzCGFX6B4atUq6Rwd5UoK0d1t4WTolSyFo2D8BeQwr/reoXM6BqhixmIODMZoNyjv1DI7OaXL6Ze2PupJg3Dnd0R3ECVd0q0ALg0llNjcLUvD8SX30XZdr9IpJbKiS3q2PDElcbV6BT9mxZOSQrcRHk0edfOJZbs26w7tWshpdd0OwSXE7T+mjsbP+uZzKUCw1CzRez7uAZhodgvWBXKShBbIPdkwdmmxGRjd8PkmHdurfkvYvzT7mm4jpXtLHBiDT4n0Qn7rFqvGU9LpPgoW/p3dyUsZ4kO9tbEalqMQqQh1HfI2Di0HV5EcsvxGUJ6pDVdr7tfxx/4dFU/7r+n7JpB/KMaQEPyu4FiESPtM4PpR4gxrn/pksKVx32HCTWB4hGRI5dRJjKenVhU2TxAMlvRkYEiaIw4pdKyYVkGebG++v/PjpAseStGPUj39ju8SnSjHGp8DiSxMnce0UmUvuC33nRNekItmB/2A7F0vcbo3+/yNBiTGij4Yxd7yg1eWeAHgicnA7fxDVAST6Yrz6nZflpVJk4Qa6FCvjxsSUfg8wbXWXP6/eU9HTQ98HjhYa3ID9XK66rquflOFFNik6MkbUALB9d+LmZAyqGKa5WfcvU6uOCF6X7CLqWOyMr3VZWJKd9+merZ8prcrD/+8embrdpQBPOn/CftCcRDUh1PybCch7LAHUS2sA0G6GeDyDIDepCuvVy8bjg8P8sKoh77GgH1y/taPMvSP2+TgQ2MS4Odz6BDWJoOJuws857IHWVPRK3+/5sfyd+GMkAIBm2l3uePqIwzdYTQ7orMJ/o97uDUZ85aI8pXD4BB7UU9pkfMXF/5VL/tDwCAtRwLTAH/QgoNhFwNlWxQzVeAQoF8gZnjAWzHz27KS76o9xp+QOhlDx29xIpCLgaXVURKWjS8FIgxDBCjnKhKFsnCIEncOKa8AV71LaUIJdMpT7NE//ErYSvzLUKPR9/UbUTEA/8FCFhMPm6ErcTe/N42EgDenRSSox4ox1689/pUo51OHOtLX6l9O58a2b9a5O3RH/ZF+jCXABqJ7kAsL5wrbh6auWMiBD2PVbiN54h9hZWeuUlDYjG4wA9/yuuQwcEAYO3oF7K9Xz2EOESytQ7W+zxrwgeNxo12qqFjkaQQNQNVU3HqXV35M0Tw6SAVlLyntE8i03uPwV1aOVlR4B2yodJxp3tL/0qC6YEDLYdif+8K6loRCKRaHowUI9kV9NN34tU3VPxIO/I0jw5TVOxVv5mRHvoEFVhACTOXQ05tIPJualhgBgNX2XL4QiWj+omV0qViCreL7Bu7cr5QavXPNH17m2PcAtfQCXlcSuevEJXGXYm1WDYfwIvhuitXzCWb6IVxeeOFFyxAMw6HBhsvDvqsdSir7fX30zNLQ7u4FKoQurN6EKeAi6qUbpejcCI3lcYVJD4S85Mgl7a1Cvw0OKFHnki53ZkqLTSJB/p+a0jadO3kMJtM2TyqCPEb2slEAUdVNyDUefhLUhvasGLXvSTlJJJu/AXMhRs0nuz8C3KrEFl+LYd7r8frCOjGOKgeEI8PYq8s0PxO4OAHEzzLGZgrzZmG8VMammoAu0xYSHM8RIBIhX4naOuqJvtBiRcTZf0CYtdKgS+IA09PJuVMYkZZKNThXJyMm5Bes0lQN6oCa3ChRXCFJhzaa0INKvJ9PAB6GPHKRWkbKF7LRJxyaGJrnM3QgLZfYGiAubPAW1iBVBWGOa4wHyelwoLXhDqgsTexaOkb6TxTBDEfp6iFD9gdXmzbKPM0tRIrjZ0FXRB1hF8Cv/F0u3kvt71lBUGrG19zDg5LA/qQp9fT8+lYx3OCho6RTpqnBpFz5BLt7sT5QICvLiO1oyENpyngC91kL7hlI3/mMUFG2AQ7eehsEPxvW6sQyeQQpRiYKb4cpvfQszXn3ju2qzYswljGUOckxLidxc9hiQ0nOHINmUELZnhu/oMjZm8IbC37nmDdhDYzTikiWTGIQEm/uaDG+Beqo1Zd/AqszCJ0EynIux41DRoBrIUX0jBeOZgFNgWkXZ3HOaNc0qr9HOD3wzLtraShiYndO5wARlrLKVL1Hu3HDBIOl0dIUlUH27porpthAIi2g4/GmVFCNLqg2rSx4AkZksHspH5k5PV54gAvi31jqWCKfDcicFQ5jwzt49WipUeUW1qbnu79LkNJ6m/fZkPwjNw62krTXzDTA3LhiY5JeF4o5U7CKd8kbvIWLoQt9Vwa6QyvZ8DrjZtVa6wI7qG/yevskcp/RmMzNjG4ZnUhNtwE5Z7kJ4D2o+YDqN+DNOBg2QuJ0M7WAQtmcvVesxwFR2sWbjnwtHXLJuN/A29WurztJWy82lTqBeKsqpJG8x7RAfyZBTj18GxMHY+K+4svhQ2C0Va67jDYiRaWAmnrpwyradxqe5VUFrGWQAmSpMYtiBy77Cjkg/TZql2d4GpuaBhp4LV4dc5t1e3xHcLeWDD5LLpQcidUp1DWlshuFPHMTBz33peVUdpCOetXK8RrVQI1FZXGkNLH/FsjXV4m2mlA3n94mUICtsA1o4WzL0NaOtWZw2xjcR8LaoygLb+E0WCYheknTUAqNa0lteEe3awGEAffNcbkNssB87gS2ZO4JnY80b5kiajV9J0gd9PJnV95AO2m7OEtADAIfyKiusO4nVQyBAbsuGGdhJnXZmkW6ZPaJtYmidECmCkfsdDwC2f+5KRWbZF/jJp4Kq96bH1oh9mf/FNBd3VKsO7iaEa1TTqCMvPUaIJ0TvMzdCzivdS6npSm/1o5XEiyajNiZ5oQyfsvqw9COvRWmLEFaiDlPi0cMzXD8k04H5IIQYveXgojPfcdQarT0yzAkLXgUXucZ7fDx1UzButfrCOMa/gmfaSHvSCIIamlbFGXkDqddo8IscQa+/38twz1YdVMQeppvAL1xEAQARaJbTk+QxKFJ7lP3D+p+1ZT7LuUGpyHh1NbgM/OkHY2bt/jXAWZUWgs9zvo3DKq08zZmZgmQmUd3Ig/HVt54zEAZsDFeKul7idi/rgW7nHhRHkI6u/5RClp0u/mCj0rTems9dh9987wPpcypeJEAPXn2cMEUyG42CfBO06N1GDa/3bRrkJalf65j80/BEy0BEKeWs/BJkihpY/mdpqUNIoElRW8KAaTZ++GnTiSwLerF3wLFSxWuza9eJd6bHrOcD09lqB3lia4hspb57LDmOYh0KB3LucPLgy5RWdX1ART3uiE1VY/2IDxRUqjVyTOjpcU49t96Pj5MxzT6k6yCAbwat4NFEf9qbIR5kpHCpJyenNYNPdwY23XClUCKrsXSxPvA1IJOBkkAGPs6WG5fQX1jxnhaOzB4kIAbDzFDDO6kycV08Hu7wGPBdl5S5p/dOd3qE0eAS4OXcJeHYlwkjlCG8Q/IbX+tKviZ7BB/zvJFcYDYbL7Sb3FN7z7MN8cjbfbS3xwsCoIZyJwB0rIGkLob6FKcJMGKIhGNZhZ0yDeiLliDODCmBCxbUt/12YEFOCNRXnXdlyIsTGsTGOaGfBJ5DVWMxvF8dnZ43ygzD56g+D9MJ5FnliKITqcPsZ1XwMIzBVAtkMBXlv6VqOAHopGQFZTwGRun+FQZmVojrhZFhsiuVtu57TZI3VyJMYBmoZjaCRImXtV9ntXJwb1oKUQG6PsXFlvJtRLCT29XbT+lRxUeqRgk6s5dsbrSFo1H8MxMn8kotsrm5Bu4hgpMukugZSpLH85eTzhK02gT/2HWq6PeZbiAFP3dypRIShhII9ah5HucH0IrGIgJm2H619Q48kb4fX5X3BuW4TzUKcmcoPvPdDYPVAtohcfRlNMp2Z9AyvUaO9W5nFG1s4idrDgZRVtNAOg5Cd9s+U3frlbYtr4f5iXgzeGQbHrsfS4UBJ9oJW/rLwdKG72bM4u7gNpYhjRBTc/Pad3ltumZKZztzsCSfOxJjGLs6KWLk55HeFqmJZy8mrG5OnqqZ6NRnviR1lY+85OkP9o0XN7WQpXeANTP5DURmnfX/e1cppe8BZt8EUmvlABNdtIC/CmpgRN6owLa5tr79zEEouYf6SAOFxJ+uiFGhCqD7p9It6LfNOwFx/BkQlYj2J3N6a7BRsMe9G5GTh6NxD6ET/PP7Gtxc+vzi6n6b0NYczPxnBXp2NAkpXRG6aYT+3p2xkfZzq4xjEHcvGdKi5WCixygx/WeGbtGcw/j1hhg4Yy1Pv8FTO4ZNVLSmgblMju1yNj447/B3Za/KpvD3imdCBnpqfnazckzkikHUL42GpcXTAmIKDFcJd9ixKUtrb+4yFFsassw5hmshPRCtPyLIeuMlq9QWSp3CwGXypQgShWGcJc7AyK74KMkFm+36Xu6qn8aQgLFlsvqx96tkXYqFvsdMWdOvHOKx7h9n9DHgq4rASDuCh1bsS9f71qzcVCxP9SgO+1RSmPKVK7fb55ln7U0B/Ek3Us49KxJTY3R3fvRIyB8e9GYiHtOKD7fGy8mBuuWgtzLIHRcVHZQmcOgWfTJkbzXQz7/gHHrxOeDBiBcAktEKSo1FonHd/jtFcSTJcAalE41vt6esyeGhZ7C966KFg47kfqbh+W9QOnFZ3NfQMB26UgKcSssfVVjMdsnfVi+GSkBV9JUFhoDMXI0idTiXYoyRklhyQ15ZZW+31imobBvnfsaAPbcV06IkjDAzzZJAjZVtcvsaXZe2QSRlZtEmInfR8tbmunye6UPN95CzD3AWRr/DkcHvor6AdqyHpkswi76s8i0A1KD1LTsqyPJqjUFbNXpAaeNFx+Br7+HFM1QTuHBa8wqci3nd3x8V6kpdupsIEp5yfgvSiNfpnNiNiZ7lRo8onHlXqyWVTg7FYB7oUdTszHjJNvtX80QXTEkpuIriQ+kLSVX95uHjFMT6vfbMVPBh7tDHR5qhs0y8n726B5Esg0d2tZ0Kgf0nrnOibVr6GRWVLkFOWBq7qOPESLlTD6bXEMICh/mMfPvfi8gC+LqkTDhKC9b0VlvICTvy56VtzDqnYsJCfTPsc6O8ljhm/UawEoUpVp7XF+0dxMAdRkxTkJvxvYB+nMaHqWD9JbixHSfd87E4BbKM4hxNJS8dWTZeyBzcp3cVeNC/ImUli2Prb165qNbWBJFrpNRGhQaAsXCRIT8YaJntMRzTqQ97h8rhYTRz3hZYReoZWXbEZIogDIG9HKqXSFzOzOsj0acerGACzY2MVZZLxNNsdoUMwWjKzpA0XaBV5GtQcFOV7iYkTdul/fUX/3Ova+GlSy1kjYStNru3h6gnYPMsLi+gUqDj2jX9nF4CMs1p05iusGJsLqpIf+w/jAONqf7JL9H582LllXB3hhat/x77S8zo9UGkDjdwKbm+TioCna81NB8U77iYwJP5YKDZ3NJHACtzoCmaWz+/i0w+oQXyvsI8gNx3hvOXLHBp4b4FwQzzx2mUuBtLum1DTr0KhEhUFOwkhenXuZwoG1+9OqEPIGkPKer6EACcAASRPY50c2LX4YPq3eJg6TFdsFfyhMht+2NbKonzPxyMsGoEfDDuzo48k30/BcnH6zhMyVn4i9Bb/DZtkwGqdZ/4Uriwff7et1p/JhevRX5oG+l+l2g5eA66ZsSJpA6zALRMYge5Sk0yShdNbUf6MSJfMOGFyWQPUPdUV9pOAGxIX7jg9Axn+i8C1d8Ambrdw7nEj1Ghgm/y6rmAVp1yqR55A3gCfhwdiMuQUKb6h6vufwRmRaAB28aUd3L9Wm72yhpqNwwr0Ci6s3SgdbdN2uYiIwWWeLr3OJwdgha/MwlIAc1nogXWCDIv3IsS9/XDQF1CaYfu70m926um6wWk6eMp0/cmKe/xhRKFN/wi/G+ZwCZ8cCS784MjHvorLHodPfCRs+6nbllS87UyoOvYY6mDSOW8/WjWA8g9osJP/NVCEDQe/3TDJz+tT/26o05+aLH4JuNtOVgflrUbOTpSsAS6MXMsgimrpcSvxtw9oMCzPV4BjCsae8KZsTeqi+SuiKUaYL04XX0e8ZPwyOAxErzedmF8xg/iB+3nnV7H8Fv6/EnFp72Ucpw6eRMf8vCtIcYkIDjYQArdWNfb8x9W27pk7ZsjWiAF+r+2Yva863sr9aKq5awg6jXn5mbrw/sG/EYrszVX4souhlX7oQbb1NrGnqZiFJifmmpvI0n5yS0EtqeuVUTeHVMqGhar7jZiSEbxShv8XuohG9I0Ciob5jBc2zfyzIfp0tWM3WWNrXSb860N687XGbg0elPbRnlrCzkFvbAb8RcQAG8jjHqS2IvYgijw6oOUCnb12TftiEA6VNGPDcio1YWHPunp940+mF521W/gUqKnMiZD0YA3cF2H3WVkAxgKTtH0EPnBP2qC8xKLjoJQSbE0xOWgsBCfm5FleFTrLvF0Xri7IoN/sWYv2x3r5Cia1tt9LEn4vyCixWJemIs8GGpbuZepi/Dy++REzleH8/iqk4dOGBQiMpZQUI8+NJ2p6h2uciYOmtrI74mKARQQc68vWy9v5XqP8yAcJPGuGth44eHYhuUNDqFBIuVWGAb9Xq/xkS9Voy2mso7zeqMEPm9F0boXiYQuqbk+J9qQenKF+uoJtMbh9s6AgTRiQaxvly6+v9vfDit5gql/XApINfcGl9bnPYP4yt35MU4AMkl/Hl+r0h0Jl6ypr+mUkZT3VSXqX6yL01Tlj++ZcthgStrH3/i+qr1XP3N5ii1Uqe6gY+Yk4eM74KhxPX6Zt/wwJk09lD5MiXZ31FBS/1vbTQKiVXKhFDfmTNjaHifRULcQAJ3UR01SFZNEclUmfyvTBnRVnEs+PTUngnNHFg==\",profile=\"auth-server\"},[\"auth-server-release-0.16.5\"]={public=\"/NyOpxIeTYMxyqRMtEdn9lh+GYNKVlxuml3CZrcpdt5XCHzf/0uZly9e5INoiQhKBTgm4MHRGjUwn9g4Qe/Fh478jHX8IDygE+v4dV4aOB9Ogh0QWk3IZcy9dh7vW2JwO+dnxP4g48JWndVNr6jLc2SQ5UuuWznn805ZG3ffruxfDfnzhZmklQ5Jir7B4VzQZZe+dPgpdTMg66ri3Rw+bqf1wZuY+hTQ8v/1tkt2phaKdUK0iChMYeFopmbTT0OtEmspkTRcR+ujBdytp3uhifkf6CFru04Rg29N7NsFT5PfL7vBf2LFC7qJF9D31tTqhsRATMBwPTIDeO5NZmFYizyEh7edIy48QkDKyLGMDQP73P/uA+zZuLLydltJtbOWUU0G6jzRid9Srb+j/BXjHV4R0cDP7iO+z5VRBy7EZuyM6ejCe8064BI+gxdW0Vj51POYapRruUULOXtolpJVHSO2H12KFaq1VAFc9nojyV6bc12t9AZVh7lpGObTG/siuTolh31AigARgEX/azH8rlYdqBknlHl9+ilSXGbwXy1GbClrb//eeLVjCO0ysTG9TASjuQxnXB1j0Fzyq9v9kZRkfs170C1y46oigajhsStKcgG19aeOhq6sOkZs3YtZR1F+yM5cSAfhhr1M96L2bE+eWP1HbHsDBdumu6uADQt451/vbpsqRaQh+uDEGbNlF+2WqtJ8sBtGd6xbeji2rVHVfljXjnKdpkX8HVdVuiWGn8xEzVL03TF9uUw9G9+ShOqsny8vmvseWrn7Ql+z08KnzkL/0MaNMTRTdMwAzkgw2MbyVlMgp/tHEr68si9YkxdE9KHfMuijOA8oZxVYC9ztT14V7ZIHWcxWNKou1RDDFGW1MdMqSF0zkCUSida1LvF0CSqQaLD/8Yfvl6FS0QQUOo2Bs0WfPgM/TAGoytWXEruAvBDInM7mo5adEM0nd6qFlPoVkYE3JlM5ogCY/nLmrzalyAAwZXWG1Mm1BoevHwzwE9svkOe+N2CusNHcskgZpEuRcgnQI6RWdpXtCzTf6emdpLNa99ejA0cNTIEMLhlwD4PRFcunohdv2qVOaF82dyz6PpUkeYLtLB930NKkbEg8/rWOmjOwM7YasKuF7ivq87kaKbwfQvv1P7tYxp6bNhPFG753mHdiz4Vdv5KxH3ZfbIRtz6c6CltfrDB+GPIoImuOf/Wmd6Z39Uxh6YZWLobXDENimRPyYygM9JnDKFZWmh1wPebb3v6MsSe+kb9jwkMGh6jJ8b0HMEzeMu/ejBOo3nUyC8mJ9QOtITnAAm3brwHsAS96j42jSUAPHVE8gk5ClylstoNkQ4bxgpMA4QFpvFym0s26eliB5SKWWNQN0iZIU9QLWSOiZzWagTNgpjWAz6zUnrY9rTLox0S44JhQ/R0nr4Spp/ESNkeSm/CCl/l5rsXP/ju8foNdEos8AY7ytZIVw0uu8wPd0Hz6iBhWL7IyoWgEcZKo+Oysv6cbaeRq+gVkiGItFlPHOcxek28P4xovY6jnNK8VlaQwv5wScZ8RfRf6/HBC0KLJ8ysmzUVHJc0ftnSmMLsDtHEbVkRMELLkHn4slBHJDW4grk8AP2U+hswcyBE1Yj0GPzi2GvJFzBDiYHyqW7kKerO0EL0YHT1lR9/Dk24NXSSt1D8aSWENYEWHpbFcCAKEYIOrjlAlcpzUDaI+EKjCm75FITz3ZMKvRtVnx1QIiTBBovHfKdXZegW8WlZsYW6bw6hAEWtoG0B9FGSInTyys54yZGoHz+h+9t2JDjObgiKTxQnANGu2zGSJ0fg4WpP26xq48kTz33RQULK+0nKLFVOEfN/ervpJvQm+av7wtdH+bqysdStCkQk0pFxdyPL13VFS7a0R7DfWmj3JbGwVriCnGBkAXfasDLtXBD6UYcwmpD3LiT1jVhDxQfBOwjt718XmhpNMrs2OJWnmQCnEE1QFA5DvBJqBJemqk1Wy7ZPh3OiTQGooj51gT6n/mxmwn3+QT1L8gaJgs3sJcP9gW83Bs2rHRnqXkEfgHzDD3ms2B3SHuFylcVpgIstN26gK0KnOdlZ24MVnr29GDlLy16YOupvwIJzKv3in1Y2/aIhX2I1wZMjZOgra7kFpUfDzcrfXKRfZMnoKpA6mtr/1MDmKJuJy6K3c3Xrf4Ze8EPbQaZQOrs28HVlDsOSNCx4e1EaBzvwTvz0Sae2qM/fDKCyYbzM86PzSlyw2KtOf9bpy+5dwGnGsB3kVFB+EpJc3cLuiIvG++jSdKeZ3AzEMcRSAqJMKbxg2E1ISh62rye9RqCxYTOBHwdOzRkFeIaXpeMfMRPkfFB2gu50JIZJopcFDmRm3gLqGxFkLJP2YVunAwGXz0pDB7D7vNuYiV+69wnG9XJL6givYc4Lk8Q7YYYH5JEZ60yGFWeivn/zmSPj0L0o/m5mBkPUetaKZS3g6LO2Bqi/OuBp0XghMX//96uK5x6dLDoGzHrpTMBUcua4GTr8yY6LwPg/WpaAWNRK0h4HE78W0lMTDD9bEl8NazzrOOf8MbyiOlj3wnmQ/oySJfvGFPIX0Pnjx2ufUezMkUfI6I53JPnxXwFsMj0nQ4l9NVBjHzjonGELwo0NwZttQAuvIvs/Ano68kLv1HYIO4K6ZJSLPwAlRIFzx2CTZZMrnicF9fgBvtSD6Y7WMFqjW4ZQI3p6vGbuPWIr8nayIdHxRbUL89oiV8TYg2oSZMztqaSJfVfHQy1HL9g7eJ7J6mzv5XaI+VcAoOAU7GcpIHzZHOeTkoTyOIwDo8c+ugO/T/yYdFL3RRzO0o4sbeSN4sUoJVyklAFNrJbWcAtYLroAQ7y2xkSKiCvZKmn4waSB2TUUA+T/t7gu++bj9/n+EwJ15Ln4WO8YZ4MKPIr4FKL0y0yBlrItjSYa3vEZWkfQ8Me2egi6zaqk56ydNDaRz7dUNMrtY88MCtaBoV4R/hWS+HkoqFdN18DIB3dM/K9FrVGDf02GY9/rNYCFvbaR+4Ex2iXQywJTa7tDt31RZaS8QbZzGN1VPe9iFv/IzS7w+YWZBx8fvDTeFmNWhUZpymRucWnL0kzEeEPspLOTOG26kjyMdQ/WV69f9/xZtw8+9yLpAQfmeHkZfuh49tvqlddY6iM9TvqMrorVrwDwJ98j3+UqDXeS3XwyN7Kx50dtxdVDJR+d3G/nUyx9CbJ5yADdF9gqOS1IrF/0rVnjn5M+HSOhYbtalqVRNDezAdgPdKIA/57SMAcZv7paHHBAZleBseYe9Jz1hMO3DmqsCAnm7muPhza/u8EGHbkfS51+9ZAFHpvSImVKmze9vn2UMHbDwEhesPmMBzE7crMte4P5ktoLHJaXRlRkqre1xnCOzTVtnZuO+Y5atui3wV/SYA3C4/o7rSGoC3j8VOEdHMaN2OjAcrcLBhXCNS1VPxZf7xle8HbtUF3g59ETsR45bFW15mxf4psiBd5wF/oMl2pzM82ejyLjksOmnMNZHyCyU4oCqkfyVq3UDqlE7bvDo9t4rXICY7qLwI8fi7bZvY+65/Ciz9XKqwoF3+uTWg/L0g1RqUmcqvxWXEJBCVzWz2Ty9bi+dNBogEW4edRHo/5MHrQXfXuaH1+rKXSY5Ae/JLslKLIR4AiMA6QS7soxj6ro1Jz/vXsUQVBGZxEmbKxGpUTmqqxhoD9pTmlqSK0wMlCmLMg8UYdMqb43DzTUyUzk5JwDcLAOFSQ9fTWqCj8g8XhQ0PNJI2YfkMSn5JoO37XeV09cQMqhNeGTu6PLh3GZnNlidhBofS0FqhPZZIOVRydvg6XJpLKjetaDmCCUTLxzUbxxjjFRdqGcEtmJ+bG8dzS7vmKry1iZpiyAQ+1VkfkxJXoMYxNRlD8ip/xj7VVGmY9N7R5QLaJEAVKPHpNlYU33gQ6hnHEShDlFSMfXctg+Eih2M4KRj0PvacTDycUPFKCZrcS9UYvlMAj0iWLK9QVQ7/jK403RCXgjNfCu/kIItAv2nbdIK0+N2W8EpYCr9XMXX+Vf6DCPu3ryEo8Pgtv5dW8+zz2ysiLynZx2WBm9pa0l18YF4Jjw9G+aMtWhmLpy8VfWkZFzz88kSfsX91SimtEZNEDk0sCrQ2ZDctkeyynV+Z55ri+tkcoR3RYmFtL6vg2ZTbCPg5M68QgTLM8KFthZ0HdTtGXVzg2nQUdtYfUcWopEYpRnHyF+lybXiib7r7EwIjtLjzXQkZriXROQlBtDMsrL890+UPioHq8aTcXuNGeBrjUhYXDyJm/WvNfibBU0TArfdZsh0+hc8h/Mxi/U1YoDmeYZu8fG6myEk+bX+7Ocj9kdQtgCJOeRghfEQKCmyFWRI75OkgDei/Qa/dR9JWuZbaCCO+Gk+K8WJA3hVPrQLcmdMy7kcUfP5Qo/04J1r56aMjL0AHBDzB7+o6EjxVUN8E046tM4klT0gEBOg+Y/6NgdhgLkkv8ZnN2PF87dbY0/kbWNJqeXqtfebsadSWNuQ5GrjXPUkBk/fo9/VV3+TgfOhWe7GT5+X46BovqUSX3wZnMq4ya3xMM3ros7gXhjkLlS3MAjQYvYlBqjMMEtexbivfFz66uJOOuHGhqH4/e0izdM3MzZm6jl1N9uOH7UgopRPUu88RV5phXLRlB6aqcie41SYNo08YLQ1ofS4tAaLdSuXuUQiHVKv+YS6n5to9CqH4/ecbpuEw1R46eV0myuIHzTXyouypW+cuUsfBUN1QGBSYz9rBvcpYBzT4DTzjmoVKH49gsgmzooMzhh8AvmEo0+hkniwcH3wtY51h4IbpbREHigUSj2z339X4Wxsezzb1170UNWhnR6hmj1XwJDbpZcFS5YQCmr4XECc3r+n8zkD1cg4FnqhwERrp4kPZ7nHArkz9p3bonrnASOTaFhkJ1k8VVpyyFXYmyuert6VQz2thLVrGcZLZS5UWm9dTTEcMWTzDhr3m6WvMtcg66iMuS65J3cm8DJ37sO1Lmvv2Oh6jVNl6f0seY3MAWLmO89jndKJ1tzArLrgrTLWppSAUG5Vg2GusFzh+RYAWkLK2JEAJp59YeWV7jlv15j21/xDOcoAyCR9npzToSBkME2TVacjXlQ+NNdsjLQ4+b9gzpnpUqkV0giPKBwGwhDYaulEyhtUu0MMtq6DjC2i0cA4bdQnzgPu3H6gxkHAXPLAwvAeTHjyUJCYLJIZBGdcHwiYEmXwntj2brs8gYptrLz39NNQenvArwqXjlL5MNMogfhm/BQoa2Dd5GalZCDJZ4yTpDQJY7AtUfJGuZAfKckdz8god7OvTBCqeNjWbzVREYRBt+fe0UOX5KyfNlyb3bAfZJWiexr1sgGIa8CmHi904SR/a/0ssGpTrh5Jp9wBZgJR17Ks9WudeEAH+a6N9STNdGuWyKCMWKycbZWD2NY3ZcFGT499HVGPNNZCjVPpVMUZEiXKT+6W12D+1A80p5HJe806/s8RIfQfPntGjxUGJCtXzr/D5r7EE6D1mHx5iznDgOyj9F9eAFZWJc5lAa0pLsaNgMJKFE+3DCv/GmrnbmPSx3mf8rUAblDTXglB5k9LuOb9phUog/uHJ0mXjvsqCp/phnSvBgkAvPHG/Xvt+7WQcL5S5mj01NU/UdUnn4ZMDaS9L6g3dCsK06d42ru2lvUvdOod+rz+a05jNNtPkGqP69Kr+xgzPuykZkpM6jQyNpGdkeOLbp3EHn2tTEerJhBh7B/2am8X56m2FucGcmRDO9AIyZVV8QbVEFOMpxXoBNo6RzpO8iByfGiB7wsaHBEbDUbk1dQPHaKhR1jzGWWHqtGb4132q0dogm0zzXGOYS1vqJyWyy5cikddJ6S/LWalTQaSKOAek2kEGSELSP5Uygtw8Ed9hQqfXTIwb5Kqrc0XZRW/neLxXFy+bpQ39/qfUJ6zKeFXhMZr6Y5xKDSm4pvXaAg1mbudyFG7Bfv1/T+WKTMfpuDmz/bxm8Hn7cpN4JNxvCO2BgkYmf9I+uH6pmvFqV2P+xSmfRMeZzR2b4lh9+pp5/cfSy9NlVSyCoTjgOpzmbAEDd7x2cqxU8tCZKKm/9y8k6H0eIx48sgzqzOmdMIeKHJaJVjECq96Oqblq2yFdSuCUVpr6plQcXzLIdij72em5d9wEEPg2MM6PaqKxDLruB+uFZLE+STPm/EF2c3qyz7Tdt540MQbUxSJmFty063MTLPkOuqKm79HQAdEs1rYS/Xxtvej4a/nyCPFYIWCzPMx4i1hGtSuSFMTEMLKMPzYRyg/h+UNqIjPU/VgJWhn3LsRHo1S3HAh1OTqeDPfZ0vAOt1v8evvCltVIOsH8MK4nc+Gr/u3ax+YraKqZrptMD9G/iwmVypYu65jOT2qFZOc1sjDJimyyUyUHrD2uTv7X3/OjaQUbCAyNXUCVeIqpdBPYSDqzAoQQ/hC1hNfXZeLEPAtTqtMNuZcdmGdIKT+pwlSdM0D2zAWMmTgiVjd622hu+jJvRaLPCEvDkUume4uYYGMmPJyDOPxh4owCji/+fBz8f1cVF8INkdqnFxornBlgX/UheEgnXB4bw/TJgYeECwspupwdFTvaj7hfNj/08nfQ5LQnPIGQiIHgllUdsKZzcOVEL90s4MQd/2cWggDAwNqHcAeqp2P1iv2xpkgeT2KBUzf2JHA2YYgtJJoXPNaD4BdO0Ynv1rTcfGDdmrOczes1fF1W3N64ID01G/fDM3ksPCGhzff+SPyNlOn3bDusdABNkr5moqRvGbM3P+a1a8Pp54TxiOnMnAhCOOjAgWbexskMB7/ED51XQVw7G5sEDa0Z9q9DSy2L0KOFSMq/c9REQ/BSldDLijKSb0YvlsNgngSjoZ6CQhy9Rjgu7qNSAfDaCs8F4BcH/5qmpjKHE0e1uocvFRu7+ByNOvq8jGi/EiYzapOpzOwwhxySkaW2ie5vPfxylcp3o4yq7QuzdzAYjvzlG6YZxDI3zVmcRSyQOJUdbuzYtMKusklDDNxxynmO3ZumZF95GBOlYlFZTumZj4TPznObqvpRer8ZW+i0jXWIP3cqWCFeAYcJryjFbelFcIVPcKqGq/qCTTg88LAjazRDK5gn7EgE4NB67aideaTP8CF/rT38wbRNhDezV321XUkgW8zsJXrhZFvu4oXUA2R/CSoIJO99Fuo97RL1n7JkBmhF3fNraL9ZoVbLawVZ4blBkJ8AXjjNRSorKyimnHiTCIWJ/XxMz9bdnnSyP4dQt6/Bxcb7+CAfHzMhs0lzPIcjHq8l/uQo7QfONjmT8X8jkOgBl5oMHZklzxgCmlZbagzD6Zle3j8sDXFvScS39saLhmhsA86gzDX4vJSDN6pigmqWpzc0hoy6Phhz0sk0QOnOxZ59VxY95XO8yp8i0JSdZ1EH6bNoq/S1O/g0GbC7G2XjoWrLHOMdMpyScnK86nuOAjlo6zhRkgHhRDEr2rn6IEGfq4aGA6rbkkUDxcaU40jHhYPArVkaDZdoZR4bTGXkkI4VGIyIpiN0meTfmN9k40JGhn56JBuHFFyg1n+hzAFCJZ4dEpGxHNS3xJIudxN6cgCEt5X64QTqRTZUu7uN/CDgSUk6tnKcU0fELdJBL/RbYAXZR1nqlEB/7D/r7k5mH8IMgVsVtil7W4AQyEvzFFyoNVo7+qRDdUvEPhbyRjcddewfn3M0g9/m7NOlAfZNLwz0G0Ga59N55DOv2yhqemDixp96Sndt8u5gwPjjQv2F1amtcD/ynBz0Z2KjE/LVyAiKAysnqRP0IZGHWfIoPWizJef+LZm6iaO3/+1vpVqCPddevUFJWNDX4nsiOvH6kSayinO0TMWDgwDoJ7T9q4AVbT36uuKwOBEJ0siDnVae3yzBzP1scNrhqjSDIhb9WwUsDMUiqYD+f/YlqN4bcI3UmCVOVbqbBttviEc7darXK5tcM7kmwnYzKAC2OwOvFvk8khIe17/nH9dXtHoXwaA7304l34JAPmua6E5ql6fC7HmUg+mnmrWD0qLWTm3NAc/1+bszLwJ10xuGA/fUwkva9QuU1oq/lsOwVVEGh2P5zuQs+VS5ZqxjXb7QhM/xj2dLyatR6fb6HlNP1BpIpEi6So5Dmex035SNzIAubUr2Byrz42/ajO5VDvAXlXs7M4Hkqtgta8VzC2jgNeBw75ymIEAhrYuAIOrMSNxP0HnJNFec/Ze2WsZrIVXF1pw++WAnytT+rYajliPiKH8/Lxv2mlG8RKmOsQd+T6Q0UHY+nyVieLxwcxNNbJzM8ZN1VPFqBUkiTKdbzy9STVVVgFZVeGH/+11RTPRyOLNdOx9m0MuGlIp6CuK+5VjVdkAmHMuB3PJZ5jxYA+zYHe9VgbgZOvpiRqgN9/vOZBcbiQ1N7/lvou0n6XqYJPlwALcqKVBkMBnbpDYCu04j+IQpQ3CEj8wNAF/EjHTKCQIbkt8tofGvFEDpHx0gmuD0+vpZgZ/UtVspjJc1Opp/scgvXCn6Jv1eMvfEAXvY0ukdIno2R4T868aEeCPbhV9Sj359TUxd6UdHhqyuft6pteJknSY6nHZ0wEPAVSh82qsmEjNEu++Qe8vpjBNlAe8gpa+rgHXjcASqh0bsuIK4fqk9FCfhmfQzqME4fUfcpfttQyYNJlB3CbymuO8T2C67s1EeAXLieIJtBWVznCrVkbr4EbtcK0v+Me7vLzJAMQkn+dLDEFwBUFnPT8wxN0xbJghIJ+fVODOirYc0VnhWps/jGTSOLj+t+ttXCBJEu7YXkkP/tWXZPUqVJLa1/q+Aw3vO/Lsd5YTqLbatHC2guKUkOzfty2mBcCEB0SCiMzSseLTL/E/bWzult1M+naP+0n9K2k1lSc4Zzl/6fb2BEoJOLDUnyv13OLltUU6Rq7lFPPV4GHE0jLbQscWJ1l/W2Z880/WTFhwGG5XF8RWvI94hl1zVC+JqMUCXuwCkey1LgM0ns29ZqdMEXW8yKC11BZNPYL6p/4PdS1KQjYQ9PzNwJt4w/s0W4BMQsLc+QrxyJuwhg9owDI4UBJTxvSfj+f2JV26UpX6YPll7ZnPDQlUCKDOlJb2Rz1KDkNnu/kgT8kBnzSuCRtzQdQaZEk/p08MY5dR2U3mmVZxG9bT8al4/fJCkCUNQ0WvRcJS/CAPHIrNb/JGUGKx9iDeRteDebObig7Fg72CbPj39myJPf4nsYmftjGJxajCUuSy1f4KaBo4d0j3QZ0O8UYckwPcQ8wlmKNN7xFPOY43WPkzkRWkGsj2CnQbS5y15zmwaCKIs+EXSqEEFv1iUD3+apTg+dA4i8z0fMocCnQYrcgBEOxOvXrR98EbjTgQcUppKl7FIesbU1H5u3X78//Heni2VVPqW/EiYeSAY8IL8aIK912IZQvWrxpipfUDka2LLaA08VjRJ887S9bTbS7tB2PC5X02JQqzhLEEXTb74ExwF3NnLDnWj5P/PanUDOg/XvRlh0qTL5GsgqrIVDYHYOvG/hrqV650qtgrsUmc4Ie9iILbndT1DjVZVOB6puPkPKjs5HUlR1u4tVwftZXVEHAQjM1jYRuzi90EPtRMCVFm0NecUzUO7jJnwCf2JoDTLKeTjiPrfKRmz8cIDIu3gbkDSScUmce04dIk6lw6DPOQUZfx1Z3eXKcwvi3U5a3X5rP2yqC38od9l0FZxnU+ESFp6kdq6rEex11femgLQw8pRhwIFJyojeME2fpWG3H/bgm1AGYKs2p/NLqXVerPah+I2SMPqpjluAwqU/97GVYnLH6y6n1+AIBxocZfs5kOtN2IUqc24rzurDh6bNrQJ4tVlBd5G2PN1Y/pGa1fmC2uQ57qmhDTehpK1lUi9yLughSOo9xqoQpGg8iWZ8C8vUnskAUs3fxfzQY+Klv5hdrdL0b+CCJQvW5KqfvfGgXk6s1nt6Dd4ZxVv/ayQ5VqkbzAR1QZoKpVYUlndcBgGnS5QVnSVEi7AMudTkyS7qWoZE8Ef1ebG4KanecGl1uk9pGbjvJ4ZZpljjhLQ2cD/Wvot4bc53kJkCbqqjFBp5abqAyF++iqZvjXyfSD3mh0QqvG0vjZ3Y3ua8KXowpSsCgtvpy4P61dAAQImv9ArCBC0ALv6R3tHjK/sc6qbsxEK7vzDtcAij98Iq8LbO5w7kYQd5XUWzjvr6E6Hz4SrMvNWFEN1HQ1jYikHqmrHO0vZUu04tyMi85eHgthzUBzXh8ZsGv6SZhU9w/Dpt/kC71LWciR8UondiaC/Jjl391BV2EjUwvI21fPdhkyiZOmu9nzzXdE6mN/dNWGMH4DhHzGu8BA/R+EjTsd3sjFsvsByTNSvLOam7F5ze2zINjNbQX22U4ZLu5E8pqDhVfLvMpAsXJXM9PDLBSTg9b41o9twaZMDilTHYN3RSaR61NWccflE57IovB6qWVHOWCu2ZGsU8skhmimTT2aDjR6ra3U3zXziGuNtHgkrstTLLWyDAWG1vDb1upANLeUgsYs1fuOxo3UhfxdF6gFTF3xeh4T/lBlhSRrmEBiXAGbKHSaUfTV749cOVKWXg2g0BejX9B2mZBktOUcK4PZBMvl7rSc0BGabZupf5V3lD5HqQvwel7I17/wu7TejRthKHVV1YxAeXnZDOjaUkCYhBLeZEBcahk32G9XSN99YNLf3/mL8nSKdu393UwGVsssPgcmuvj+62C/lhZX3BLgkTurxhoUdYLl/xei4W0FaRbN+uBdCzQU5ZvErZHpRncQLjKOhBx6S8TEp9uTqRi/M8TFoD5Hx0JAN79kXdIgHP+svdalJsEO+LgUP+kGeFFFoQZKDAoI1pbVjcXBbsyHAnVHtZfFqvtQguszncMiBDDBvGb77boLthNgiPDAcZpl4FvOZHCJb2uzEoq2gRlChY4xKSuvvS3eO3qqEQxyKV7KBP/HTptYozeLS1BldjUBG+eUPo9+MhqtjUqWlp7KJHWI2ftYupkyWDBH8WPnoEeuenifwJlt+9dghc99q76A06/PSRxVGcNkZ8s4YRkezO9H405QbmUsrxd77rvzNcFyo25AP9/NneLtA4MN1IChyUQYYhzTSQ2bUf7IhJNVEZ50ToxGok8LxsMIiqjaCobOHwzTa5VVWSU/FFzGKHEKEn3AEE6rDVniZNxDsucU2IAxX5PvPuzpnf+GosjBrMd9raIrJan3UUfAZJET3aE8ZuY5RI9CopzEz8311USoc6Bm8y7KjUx3tzG6rglTuOvhGHqriCCTip00e1Upa77B6FMPmOMserF5eluRN9H+cjKUM/kCAUg1ZqteIfM19JBj6AHbrGZHx2QsNUJDSQfEGbUvZ6UpljmuqOjVV0ji2gOfWGRlobELEEZksHED9fyXUM6WZZu9QfKeCQZS1+7QZPuoUgP6bPL4zMzX/Jf8rQQe7icPROTC3lzFCgZPKJ2dyhDFnzg6W3MdDa3KXMMOWbI2i0stBcBE1jIagIq0vS/Duvbz5FQW+aqCHfsqb9tAShuuYH/cbq7l4GkI81sa0ae1b5W+niMpQCSB6f23VlMXt1s3Au3ovGWiw7tzrz10xfiOWc+K2FxC91dljf61hf0i6FHN7AfeN8xGaIZjuAWORM2x5R97hdFYt28SIGzAoLgJojkxsQqcFTWbrsVhhESysKFreMuXHhtZxx1SOUIKFa1jzVZ58hOyfkI1yYLRF1wSmCipEJdYsTpjlvBlukZJjzHt7lM1LORuxrFFjmu3d5KXSS4HeJe6GVqKFf8kUwN2e2b8Rx5ofcnlwFTb6LmV1NFOXGpy1A4Rn4xgS2sRr51Tb0by7BnbHcXVP46l2hrAxcGIzYE2PVfsgsQjxem+f3+VFtokUP76mZD4IgQ5fsmwq8uBuLw9MyY+RnRaQthfX9Qjz0HxST/RggC1W5uBCC/wXrZw1+gaGsEBv0jnDtYZudb8yI8Ohtgz+hYnH5w2J+EEVWL7gTRvm8XJgvP8n13aKOg26Z57g8joajzuPcpJtaYspC7SoUZwQolKgSxeiHSBAEvPnYdx/tlwWWk1PZoU79+2KWOvGvJ1EbGy0XjfL3aCG4JS04GgYYjNNYd52+bNuTA/uRmhfNxfbFCcmvDQGNmnrvbAO6HDIr1gk946y8/Lx8Vws306Hh+jkf89C1JIZRvx1Y7aWlRBZsP+IqRv/AXuOm7E/qP1KVme50ySUMKK3zyWQFbPYiuaDrM6tTgG7uEtn5SwGbdVEXcISNWkGN6RDaelfKwSPWrs46KtZwfyoISSIay9RnlAH/ZwkQIXnfbnZbqNpHNI/H0rvDDHRSxXscFMeesMTBIV8/jNlj88vTcM/0gr1trDEJqIvzSg2O3URks0NFDFkmXoEasIPd8IMzLnh7qOzSsJ8nXVJI7Al8b4PjhfqGQb6YokIRTPagDb+tJ5q5ubfYeweEZKAYFwfLvn2/2ZuSHszSSg1UfTTQmARsr0EhbRRQGXBXZIQgo3mfFsN3PUHM0MrC7hXBSkRoJvJ+IlM6mLYMagD/fZmdGAtx1SzQCd9jXJkNqYpUkGYDrffqWOvAINoO0fDvqRuj+5rJRqafpl59+VpStqxSGtDnwg/DjsSUxJcJwg3/KHQeq6m30XIKyC+26LF8KjBf4tU4QH5exouMCeVd7pOq7cbF8oWgv70q/+E0J1a9f96yL6X2125XxXjXVDAB59mUx9dXyzM5yhGP9Bh4NCltQhbCknPDGSDKg3zeb6Un5UgSvIPVhP0cPkak5+EAspMag/DRqagfp/jFQ5vIp3XTnyZlVeI6x0/Lggs8K/vc4hoVLZbJbVETU789g8arX4XDODtz5WGsrk2PRw7d+lw3bZGcei851qCTLnBPpb+DLQheAT/MiMpGGPeIVTw0yctMK2XKNoC0w/yjfbGILEXndFr+aQEBmZZFLO1YWOQi0W+Iev20vPe0Yv6GFwQAEtbv+ZI71IHviSchx33JUAA3pNTCLR+BJmWKacM/SNI1JUJUn/7aM//5ejwSF1YysZpNBxhg27CG2ncymWMeu6yNwJDCqmkh2pvEKzhwlz/HRWCEZaYoUChZ+bmujJhBG08Xc0xczag2t0mIibmMJqIeja+EKcGSPpAHBLFq7hbC7aLZh5K6A6yamOYnsAq/xXiZql51qnY2YHvz2SELOA35/iin63GlHwLS3f/0CMSBoQ8VA5PZbgp2trQPv5IYKsUIUAyay5fatg00AN9uG8tzTd9fPKz5db5CTHM0Fbb3QQJI650a7wJHa5WMLHgAUYtrCS0cQz2Aaj4ZBvwYs3CJf/ydUsstS0mHNRY6jG/4+sTAYsEtmSFN5KB2VXJuS2yHbd5dpq/u5RYmvscF9gOiNS1ziI9k2WvbsCtd+x9LCHIe9w5PNQRmrGbtaVT2RyPhONN6ET+GcoMy4znyyaI3NN/V87SvEt/4LWobrUHFeln9uRY63OSLvZrNuSHu6spIq8JGhSOpMKFwUUF49taMvRW2to1EKcndMxKqIbZrOOP3GLIwHCf+eR7QUsllbXIS4oPTAekJYki2bvBb9vxMGWde4gUlTt7xjdzxzT2NMhnD6u4KzSiLb2QtcDf5Hp4K4S+39MHO+fQdYwVcX6eD+UnjofA1FvWl+kZ7VxX2D14P+fB/FPRatu7PykW+EBCOW3VhUVvq4JXytGOHIXR3rfXAr2eDyS7E6s0Ubt9/6PeCIUjPMe5MkjXvY0BfTbqjZQ9CAe6YXaARZwTkD2833Ctu/bjG9Nh/YuvvydWKhiCRlWQ6LUC7zNuPiHIaGvBWTSfESNQD7fGbtErRkKswl+CrID4LRiPbTEJ/kGV21uNdhlLdvwhSu4JjKLhuDV8ncTAJndGMHaGV+QRlfCSbEG/wxhL8nnZNC3bgiK+pAwOoSRWZyRu0Xsek+Y/y96T0kGj83Lq+4AoO6bldP5CLPDuUi7m2DKR+jt355HWOUg/g/79/yzq73V0mjsazupTfiAaDTmQMa/vWJuBLVURSZ15aIu4HGUy9IRjUCAXgEn2I6mcRQJtA5jfIbv5gxt+XdiNFiE2GjzCY87tgNdYeqjcfIUiTQxhQn52re4iZgyosm7bi9GEXcZUtEr/KgcNXWsEca5l2gpf5j3EZ37HhndQ4cBUeKM8F55JwMuQX4LA3hkXXxGlak1wDtH1Up9qMM1tqJale3BV1RgAHMs2DZBYi58R5c4ftclFinKiSaScp1TMIIDE1tfl2GTaL6zPiu5e+8sbjYc2O8VIC0URIVOARftbUyE2ZOnlOVMDeKPpapzMo+6wXIzItNHJ2W4f2DYlyhTU5+/6LRbxQIWltYtFY0RRvhH0FH6HlIAfB7N42MXG1qdR806MJHyiSBd8atgFqBA9qUcFxLd78FbZ40A3dTnAfyNssAAfYYyZXxc++lsJaD8jZuscjqulvsio6mhA2U9WqTNGT7BbqAWCyyp7vekPJfHymyGNsLSkBmOEIlRW+AYHE5i7XyS9fBB7plWieu/76tH2/K/LYdk3BvoD0WRWXYb2KmYKhC0GjiF7OVK4eveMzp5BzbBB4PBUmHjbsur1/amm5pjL+Xu7r/OtXZw1xxcg+Iag6QVmFFDPHr7r4kqIdh4Gmc+nKqOiSC8X+8InUhMbAgSIYPQnOeSAeLP4q010ZUZVTd2PFulQtUojgQwjEAsknQRq8rMoLcZIiajm3u80vE1mPHH5cO9fXaq/of5621eOTK5tAy3/EDIG53V70iT12kjydC+ercEx/++WPnH7+CUgH3SZ33D39E+YlKlrC03nMyYs+XbEru9rvb7u1LAFFeXQMyma9EsrD/Ua+73ID4vArn63xL/Gv36X+Dw8H5xeI8ae/gC2ApdrukGFvXFkFGq9Ds2W2VYSv3xvjjO0i0M79hjvUKhyV9YIoTyVBIna7A8GRzdyMjb1X1isQAk5Z7A7ewSMs+xgMZ1q+EHBVTeWrm+bqrNLup3lUIV47T5RwwZZeiccMS9w1BWGWLInpVNw9Iw6CX7KdFRuQdg3ibe/eCCmChoqF6b4buIgy4zWvUqmB/6uIsjbi4ToNG7y7k2su3etkPeGoDDgU/Z2aYKaFTpxT2Ic9okDlrkzT8HTSBJeLqlEZ/NO/jJ+kjQ2FdXlhT3CK3IUWWHwYY2SXGqgZU8mzorZzzgdRTRZNO6NB7XN03N7Uvj0eY4Eh5864I1+VeHeCjYqeSVLMGee0nhfJsHfjdXDeHxbMvBruKQ4cJksDwsJlwpi+nYORP/gaUn2RnASFLgPmji7JGFdU3SqB4gctJySC9ghy6i+qDvd3UsHbtCs5iTOkOMzIiLe8DZqj7rrqauiR6xJsXK4//xj6kIE8VjoRvl+8zsHgmfeNKW52Q+GconXTP7cO7N94x5ubC2Axr456dWstCu1LR5mTbq5K32L5aaTETQG3ubaBtBuJR0aQNR2eDvhQaWG6RjgI/9fRhtMwm9dPYDh4weHhfcGQ5f9v70aEpmESllSrRH//y6wtbGDClXj/NvqOqXgif2s6/ad8A3KgpJ7bLmbaU4EJWIbHisvbfDyJqaY0OKm0c3NBkZUn6Ecf8OapIThal/SEx7vG8L/XJmTYlyoFSh6Tpuugfv1gpXbdZhPTp0ATUufK7QjEh+H2rgcY5Qbwcb3/OoHAzW/3BpjJY0R4GZLfyENBJgeeIVM+uvZ+6xBlt0OTwFntg71ewd0PKXVOHuTX9ccMmVcbrgTSDu2zLVjOwj712PfX4FqXrfWo+wCuPAumRginHweMhllKImRuKtD3zXLOxhxF5S141mMuFMdPgJXhOppB+wPZrH/l+7kxOCmU7KKuLSvMxWMXhYGmDjJygeLRuXEaudQlw+oz0+/4n63u8D4LKuGrowNSzYj/M5jkdZ2AWpdv8MySTCmORgWVz6L9tKX/iMYy4+7VfCsp3N+6MR5emcMpXkRGIRQNpbp4R6S8mplYRtE5TBc2XSSKpeI+XQwfz7WLmLwJMVKwv9mscal7BVzmarnoFYWCPVz0Wr4aNdhPlQV2H3lkQrUeUt7nugbu94zrvIvZqf3vDlYu/th+ReuX6J3suXbnsjw6zy8J+7HT7HquQEFUrIvOfT+rdoosjvgFLj4+aIZxsa+23Q+HeZo2zWxgTqjws1Gs9NvOxXErzClyjsCfnWtVKQoZ9Fqs7Ce2d3VBpqNe1hg4KJG0SgcsDnqS35Qy8EsL8GKn75emBtlJS14w7PDj/Xk5gS7aei9+9fEtBj2sCzMU+tMsBnUtBbK9QpimzeJY8v2WIETWNTRcsrz7ENsiA+FfcW5/bVe9orDvadpqERA0vt9Q09+ZT8M4bVS2kkTXIfjpU54RG6+dxV5faVMu+zCir6s5oqP6pfDcVWL5fFJ+91T1qReFdpyrW2hBiLJ3OKe431wA4jWinIORuyPxISB5Tiy4ryrCmxSdMacTxi5XTDmH6MkHNQjYIWCNpTW137FY7OIvwfZwx18McM2djftw/a+QHA3b0uWyp2yH+slmIJXpSysoLn5zfoqHo+iPBwuXpSaeFDHj4QYLDZ7cmAZYOCu4NQKwk2vJthkXgKKfqa/d21Ecr9ihtslS3l1BsjC/CVA/Ue1yjgc0I3AzZSZjRQpPdA169QPpPqTQ+b8dU4qUXIB81XVgU/dQwOTiBt90u6+PSknSNrbZefgGJHzEk5DwDdcFriBzCcQ+BY7Rd9hM+pwrO66/xz49noJ9SGiFMYU2Q2UynQQnRHFfGDqq1BM0Uef0BwDuyRZ99TuZWgqFUY00sMH2yoeConzdsWUK6oc6k7iFD04Onvs0AtOj8rpSx5RMLSP8W8iI+Fn3CVcWm9vnfFrLXCnuGI9BOyCTv/vDvNItEb3nBFOWPRgtURZyHhwre1W3eX7hBWOYVNM25tH2Sku+CdrRWHiftRQtDlq4yoRPRJhX2BR5VKWzd+3xvaAYej2YTgyFhX8f3yo2Mi3Q5JqSVg+zpQe3HIGyTDu74VwlHeVMkgqFX5UrzJUm/652hNxNwrqriWwN2FywEHzNf2zJJVNOGYzDeTch4vpgnrzjat8q+cRIknBR9/njTVGeNztwSgfeH/NQ2K8iGEgDEoT+40h2vu7uN8UoQKbxg8DARVhYKQFJPZsKgcitiJJd6loL/eiK5S8fJJU6R8JpWRJDi7MaIXptCfJzGUkAQQbsKspM28VHL4jIM0yyaTnZ+6WaUwiF8JL4c70dKIzi9LA6uxpRBY/H4MaAM8e/RyQzom1nHi93E1CoCUDO8AxgALMePAE++kSlqbeOZpo7owLEYHQs9jQM2BZ2eL4wuTQ3jB8HvuHo4sGLoDE89qcvpNWVOk6LbxNUrWnYV56v0qWSRMsIYTUfsjduY2mGkcopcd9XJ099QiVDHbSSbcC9to7izaroj7Joe+2AINECD9Mz2DhseOWIUOMdam4Fu6kkR2Sz0u9zV3E3IxO+yF8knYoVN2xTwgk/dtKlo/BxJN93q1SFPQjpA6bAElMFTZMKUV9lqEDYJ+OkGFdIu4K2evc+69o2PIm14gFazO79JUoVw5so/gn4C59ulNcvoPsqRDvgLD3awh05U20V5d8tukcwQxXP+wXW3GQGQxxECgEuwwXFzBRyD2XZRHiivnIwwYQltfHTEnAfhD9sBsT8jJg4JmHnJTlwKqJVoxkrT9tO5wAos0wtn7m0nDg9IHZs1KvJlEF/TD1ZjeP6L33RTcY4DSIY+IRFbSdgAOJsu3JEGOgmifAjsTuw0QUzN8U08+RAB4BWCyd7Y+KCxtHooHG8pNB1fqrethJHQS+K9II6hb7r5c2cmtVwt17223lcvNBkI9gtRKAmbC4EbN83ZyL1bbwsr2H+bUB4AzU3JihE/7UNFf08rxcRWLTBzwOQaCEqFA2leuF2DyMHmMEr7quLEd3ztJ6lTc0D9syU3jR0QfTHYooA8N0Lkj1JXXLkaW8GGuN1iJ2K9Xrlui7D1LHfcY4ZOfsfmQ5ECmZmsb03dJGaPz0N9nRforzcBJJCKIK3JH9TK0dPsD/nubxCJWRmgzRHghycE5Zq77uqgHCFgei5XWtJjDGTfPJTnxOKu3RmB0CQN653FZgL9cMEOflHN/5LZLIJchyZPXI4OUfqpxmnbyBhIqZ4a6oagYHND39e3CKySdaG0G8/Wi3EOWI+8U9tr+8m4ebdcpijvSGmZBfOExz56h7Y6RFix8Z5XnUA0K6aRQwiy1L7eLovhmMDZCr3ICe7+PMmKrfqCHynw1KQyFJ4w9jjm+AFjIZ/MC+pK3KGqTeNG2qh7UEjxWSwFOFB6jUhQhMrTbbahCMT7lH3gLYHeeDJ0byZd3N5xVhnIXTzHK0CeBM8cNUp6l02zYrpx6hu7dpNiZdkrVDHaLKiE7Ib11cf+qhiQlTVnMOL76rp1srkkH6KV/vTboct5De9QWRlfJza84p7/43lnkm6hrYzdqIrzGJWR+ujG4+4CY0cwr+A0U6S1th6SrNXp9t5eq6pkTCotCGSp6kwtWa9S6lNzf+6YkNFAzEOk3AkXlkmJJ03xBmbF2h6sUzJUzQE0ZlwbVk+9tW8AqtfaOlOu8dwVHPqKxt/IdHBloxzcJW68h/XuIfsaKav5Ps72cOkaQAxnux+iR1oMMOgbBa2yDXmj0h3UFhv7T/HY4Wp6rDTK3/4kojsmnn5uPpCqifZ4DSMFUbI7r74qj+ugQ87VYje4t/iFPIUwaU1yshfWLEufz0qvT7E2cdk7BgkHFUAgbiHUVcd3VBNrj6FCkh3pOzia3uscL6FI5RNiw/Nk/vPScn3TaVZSAxotfdipr7NXKxKBuZKxtVhVhKz9M+8pujmB1dEb3vdc+eJzpV40KKFEF6sEwu8Snx8m+oNcOcmHhG1be5Kpy6VWcujUM9R6CsCbsvuDWw0AS7If+HSYN2UYH5Bhd2ISfRffVRjAXM1AsNOO1BcDK2Oa2agACf+U2m/39Ml3pakPD61XE4+WeMwhBNNdCqbHw0hsrC5NI8RBjT17XrY/xrmbXuWVExbGuHyT6VZqpj+0fLyRKHdjI4NO4mVzk1BEg6qtbktWR58YBDDOly/zA4Q1aFOoUZaao1qxs3YBZiJmak/sBce/97qH7Cb7EEeDPJNWreN8DEDxO0I7diWVlqxaP9VFy1qM6oMucSbw3iA6P/0Jyl7PmR7+u4lrN5D+RYNEaVNUSMqUTQuQz5iao50bwUTum+7SJ1s+AjlhQEjq9eCh5qe+c1scnsGq8HdaRhkbU/XQOxMD9kL0ycG/I61EVMlriy5BUyf5Z3Gf5iDOkbs2+utat11Z2tvx05xj/CWVdjIGVZz7/oGF0JEZsXpmKHfFox+N0QC2GCdbtehdWP1IUNlG8iPjCn/p/vwjXtpRjxG5W86zcvsxrshzI5axF0KBECJ0F/cibVCZjyxgOCpoiso0HmGTa6oN233+FNksFN2nr9gL5dpaJkF4NwEW069gg3Nn2ColnypX83mV9uxhz8NhCQ77pMCAPtmb0bX5xRGSswXE9cKJpPDj7YNkBC3m5Ce1moNZU4Z5RnoN8Cyi/jM5mX/vAlRvoE8GEJtMPUG4OffAbUkQr96sla2OfqYcNO5fyN2ZEFpj1KL+Nz68Qhl71BjmtxjMT9sKgC36Mgpifm5wTFoF2JWWENLEXVPeUBkV0KX3J1r7IkGtzFdxnZYXRYTpoTKcJvSO81hfGh4vQEwwE0aXv1xNznUjbwYuS2vsxJstZLOLmCSduDui2K2sJqdwWpjwefv5CCOfCjEzsCTFd/akkgj5DlEb2gEremFgF3E5h72rAaRPGZuR63MtTnFF1NysUjO0Ae09jWKVoFdH3o1muYUhsAU+/ThNZmPMMSwR0ULOHPg+VRS9MwpW9W4fnAeUCh6OezlEl69SNADYHajSJqJXVhDnv/W0aG2OzHN0D5WYinhT2qck0OkLexArgNhQzgcOWSunZxx7BX2RspCrDfkWg4X1cHWD99gPLoiA6DAm0VXBhk/ai8sTgqMNrvxNb35Ibf2nLPE45UYbJQeLUbpOA4IDpzAGpOA3+1kg7X+grmxrrrh/okAGeEbIfbOEV3Sgs7NdRstjB99kzFBlyXmt3vQkBdLGEm2MwB5uY1bLXEyLD2OpsfiXwN+nHxP/Id1lGK3tu9xxttaOpWrdGQtD4AsiP/w0oK4rI7C2GRO5OIduMxtiyhet5dBJ9kJKpO9cTaAwXm6K9JKluJEYkWaQVWoX6ZvGvGk+/pCBZazln1XxaEAy72ovz0qJrim1+xLKxDPsLMOf0JdDqRtCE4/rPOfsEDeTs7uPeCf2e/5fR0vGcniEfRE6/y5YPFTdUaMv7cVDJ749PU4mZ2fA3R61c3XKfAzb40zvess/J2Quds2Sbl+U/tJR3J0uluocOkA9ae5QmkUHEPec0bRu4OIytE1/Tk/mXKZSkhq/Oz4/xHlvqlFGUOSaMl+4iGzTj5KXfFJbPav7FoyDcl6G3qrj/cjDVrdL4/jXd21CnFrawIQf55Rpf+3+tlwNNy5XP6kN+ew/XB5hRRhXAeH0e2CHjnd5fE2rAWzbOzkPcx6qUOpYeHBP8eTF8YliqdLYPtS6e/6Tzuxs0aXIgvMqKpfaMLjle9ELICa9DXgrwEnsi7aPz0/0JTlSBXXRnAJMAfRtZyT1jNEfefUtEYmhzYLDqhfyp3yolmc79LBsnDWAqylvZ/M4MnTO3mPtsup5FTTCvA5dayWkm487QJ97BQIlcWw6KY6Qi5GRql0FgC+6qMsg+GLzMXrlrfALKtZpLGSElfwjqoz8fsGVXH62rP5aXna2X4t7Aitf9CyW7BVhV0Z32pnVGvgD9dbrCZ5sq0tNjirxELmajNUyw0LwBaG1JSywkA7yOlXuFYocdsAo3c/VseVcVrJj3ecPC+wsYQeaaIpQ2niSeQz5VNOupRGL+6Zb1lrPXQTnMWBegp0ubolUjEyPeo9vCQTky8kw5XxyCT4L/2Cs0p/eB37IeAjoDeiyBSbVE9bXmVx7Y1gNON5Dzpzjf3c5uqLIjWFjoEsQW0O+j9z+ThGUhcmidJFD6KE+Gn/mVtVA9dE3So+WH1YnXOv6lApaFjvpP4dUEjXyPj6h751negixJIqDfxM1x1vb0YnOQ4fMDgATkZnDx4CLzSB2EkXr61ofOisPYQ51d4PqjnCvSyv2Eilsahs0UTiOu74NoB20kWcfCQ5Yi0AFxzGxtLXSTa+LBH8OhgO1+PiOxZqxg+o2B/iXAJ+MdRvGtxtK0CR+ZHPoeqgTIefRJMLYH0371AQF4VMhWHaubS1704i6Wz07RRYZUSY0i60/YHwTCJ7hElNuPWPe3YPmvO5np8pfqyEAG2MUcJWqTwByKps7fbkw1VB+zGK6pEXtPpB2kfSNpYYqeMJ+gEYUHKnga3IyEwJ6sV2W+oCJJp9bunWjk0BEJtECpfcTeNGYAiYd3T1cnztHLqHojsDLjDTq2qT1zhKIRQAlM6Su6q9R/vKdsy2qBFQOaqRUS3KthTg4inyGoV+UMiPUMfILBKU3haXSuJudpDsAhIYKM7lArcnsrHo8eFY+3V+Ywc595Y2OPWmVA5ONe3rgBEnXXB8Pqaqb3TDIlyEzi1bTUTShHynUxWoOnwAxCCtsIsBtUX3DRAV4TuNUpJrdsMc+w0QzQzYDvIzf62fA1FsXHjikCrVsLgczc1V5PcfqfdckoBgo1QyrZHD9mbdM5sNyg4tNCSubITsjON5tcCV1slmKLsc0iSHvRUmoW9f6BSAZnGu5pPCg4dPWNd1qGSd24/vDnrgPIgBLAgX80q0v4F9/gdoOdGyW2FEHlhtusq65tTTijGcyNGZlBwVWAe1q68siOBx+9ZrKsGK+CegewzhXQUbvLLBAvBppA1/p9O8aSrJfh3w==\",profile=\"auth-server\"},[\"desktop-release-0.16.4\"]={public=\"Mu79XOxVr84mPFIGSQzxqP8bGi0f8xw+HYZr5TALH8AvfYsN5GOc9olGdMi3v0yQygYx1OnAN9zPySqrnmTZ+5Zadv9dgeG3ZZ8PcqSDXLv6iMqvvp5Dc3nUzR740QQZeEJlbhNYFoMLOzLBHvulWxU8LTn/paS0Tqe1WQHvUVibgcjstrsFdhz2QsOuc62hJ6T+DphEV5Q9+sP/er1HlCrTF7eVLfK+/dq7iX1vroc7j/XscBnN8ee0KNwO8dC1IDjnYSjQBATjCtNw+0CF609dMyxqEcR9Y2cGE6vWGk1dhSo9NcKwY8uHJv+1WzrQ1/rPefSp7dxr6fTvIkq/DZt4hHtqI73p8tfictVBdy0x/Jplm1W0UCabKkaawaaB5nuUPplQBbNywmtCUmpHpCUQpv9B2KUqlr2YLICRCJc819W48UXw3JJx3XaAunSVUD4e8lENRH7Wwpk1Q6qwWCI0gBCkJEgkl4XeMfzz1ksmJ4pH0lLAgaTm6a0PljZVptWe9/4IVyKSH8S5885ZvW6fUGnvWJT9XU41OYKJc8drHtbvVwLEesUMvhyzcsvKyLLiuUgjQ6zh/qonHy0IqX496bbu+6gsjwHMg6plXbBjkn4lqhX4HjvgBbU9UuVoRoowSabHpvKy8T7Yh0FjbanZ4zUtC8d3U7jK0b55meGpSFv5MO1k+szXp2dYsXDlI5ZRkRRZrU8AyCAipv9pjk/p6bq4HP1rTgpF+u8Vbj15NUp2yQM29nEGOu4IOkHpy9cLs/okq/itmjed3TzJySyKkKoI10ymIvJwM3aJ28J2wLFbbGkZJkf0+0B0g9aN98tq0gn7ef6CBBjy7OPVXnY8gLUoreWmGhQ7z3Is3wX7F4JZbit8j3QRdkS2kTKhPo29MR3iJPFxTCFYna4xXmm8ZX2WAxg+Ud4Nm5sKjZP0geWqRwsfNQSpoRd0GENGljjlQnEVdZ1zAKNWNdaDwihi7jyUIIuhBmuaFbFmEMPMR9kYg+r30yFuy08TkduiY5kDggdSFU6hg3woc6MxEiLtQJyh7mLZPBlCCWH3b+TEDIT+fwJzczUBqbY64JWIilY1qk3kW2hGCsI0uGobPk1TnZr4a+yvHBYqi0NEmmGVyNaxmRflggyrP1K3mEEIRwpTM1qdAwOy7yGSw3Hk3iuQzjMlc9enTjJw7EAe5v7u0omnyRgHPRA9Mxba+S4Oh+fWzb8wbbdR2w9lvt+MjYiv0sPSxJaHRzgvIwa+CE90bcQXOZfYb0P7k6YN4qOsfJ6FM/BEhegiN+UtA/3ceipstmgDyCIa/+Bbuf+OVU1PGZ3zM31eJMhCVNgDJcZq++Ku1jLBUXeMkAQlyX/zaUXUqvQVXfOaXStpzwDdO5EMsPwiZIuNg9G+po4FCVonWNNDGuvLI0diOqD5t4AwLt+jDbnrksQ/rmOxkHNlg6aqrCanqKD3yJxGXOvSsoW9cFWmjuyCckk1OFgXKY3+L0xp3ElUtV/TuITYXTaUBt5nYmkikxn9MJ71fRC9cgq8dwiBu6OemSyQqwyem160WvJc62SQpJB4Z4NY8vkcWlkqsr8UHe81MCbwYGnVYRWg3dUhLrTfmecbWJLPW5jkii1Fe9QEjbSMxB6cVIWDyPppsrZEAIozlvndfJw/nHwCf7RycExhphtHQ6HGsRuYB/0p5T/BvY10UPdbiTkhNvcKsiy9TAVQE/fiFdm7+ptzdDU+CGqlekUFRxUrD39bZI9bjpcpdbnHOIzTNUz64w8WiAgrXG4BgT5Py0CnL8LGNx6SgryN/G5E+L+coFRpvZ0o3yrkRLezXFPHBE8ezfvipu5T3QKlda2lrQnN+nNAKNxC63mEWbxwjcek9jsnohvG/5nLIVanPzrlb80azM7VOc0ov/jBGkoRV8+rj0Vv2WMmCha7Z/GSgDkBucaf0SfbLt2IrBa2cwTFPLq90wm0/K84ooDqDDd/Z777hpbyg1mfrE3nIBHPed30Pv4ml0Ut8NpduOvp7CjIFTsJ7Xzst9EQuQ+PfmKBSenqUnvyX4zHAtqPhz2fFdrHHFbXR/E0pTOotQcIzHMdVZPSttFwYolYRlfJQXpS5g5gIKaLl1XwrUk36fZEa5+pbLyaLTLjgnVxhtbc2H3RTcxUPQFXJnPWeKMM+OWoFn9SWprNx3xkmoCH5Ui4XmoH2WJ7nsbPJw1fN1f3rWii1bgOfH/UAMF2MTQQZGHNkJk2WZXNWzHUWCrf8JScOjp4vd8Rgy7XqMEt0XirmXbpHm+4bUTofjXJp4PTo69ySFGUUbXlmtl1vMVP+zBu20BJj4hF0xcyqyME50vQCsCOYb3hegRzhYujjO7rQCAJW5lT/b4tAeJ9wB+OM+2/H4c3pZCZGSa222qmy4EXXvgrBPquEHFM7yTAwFI6O6Ws70CfW7n+jGVDJPHnhxV6D80TeWpDjlHWvO35Jugh/uNEbT6Bnk4hFNpnsu+Xp4faknd5tIHUB0IcxKRl5BDgfv7LNFG2pwA6ZJInbltHIs4UG9VUOdMaFPMV1rgA13uPTF3Omi2u6WnB1uAt950XQy3sSGZKVzqFLBi2MpWZwqJpl+y+0HayJnzu1jj5w4DNHdhVrhhLTygLoTDD7k2wOVNA/ToSsiT3qCubTnyK+peTEgFI9bmmr8G2wRMmI1HlxsMIsdU1jtAJSkecBNIVinoJuIO0LP4Y0QsTQaxWtQWWprtJEPyLdbG/ajTpqoDH3pRaiyEpV1o1P9d27t7eh4S28+LVMOaDiTi8yKACGNfimIDOKpPVIWgTsHCiI6hnUDEOc01/q1NCWbUhryV17xRtHMvTX8nu/S/TY4JHeVlRuXOwS7kmtUcbhOD6lG6myf+A3MYSHwxx/fEhe+p+Msa/XYNdZnqcwWWCJaacxEiPn94yqTFkkdx84oLhFGyZnZGcIj928rIFbwccpDs7lLwUXfDZnLkjRPYTyw8xaTApP5JgbthYzAZGVUGS6AVnKTnWtYCR5lviSTHZXJipQw7rHTyJ99tbWMVjC158Yd9KxiEO/gQAi2zK4SNjXqF5ch9O1aw/L0W025h8/huj6lwU9DHygTDE0RsBfsruf9RkVjzXIVPB5Vq7sBguH82SW/dfYo3KIBOQo1G6RIoJ3Lbv8yYi99bxRqr9Dh3amKr+HbiGYAj3DVfEdW7S31HbFJrGSXgTjiRgxSVbjcqivIkn1r37DL8j8GBNXGt48rps744l3/oWFgcbPo6JGa6bFcMtT7lDLtQx8o87mEQn9SIFDi4ApRm6c8jIeqEwWsfBq/k3cugKjAtolCq3ah89KDvDKRd+i7PdbOGo3jtg/mhNRt1Xro4JZZ1vL5PRaBHyJqt8KQ6ZTKSv8PtDfCPNlu2Eb0zwqq2rmX0PKGTxCIhVNHiahUZhci34awyO5AOXRXf/J55hze0ajLZaTD8Ozg8+giebvhCMtJ0S+L7PekL9bDFljonSnw8vjlP9egqUJcTNQXqB+wmw9Vrv4ad/xPdWXGNe/YR8QBVO23XNw9/bqZFbzDqJuY/bu1bgzd9fj5o3WJgk+g6uHcUf9hGEaif9quAJh0BeUyoLxaEvMnnhIsPwpBp0Hg6zV8ZvUTHo+kZV1PwpFFaJOyZzMLacJOm6INRdJMSDTxy68JO/xWeJJExuoDfnJ/AqyxGRebQLqNn7hse1Puq6ZFCAqTOGN3hMArC1SgCYjH5D9/JcGBIw+AIr33YZCMEAY3xby+l+T+ruCYzvgiWLLcJ63vwHbGhen/unJoTKadYD2qPp1iAz7Nhqc3IafOc8cFnwxevK2xjxb0byRiZpWQ2N03N0A7T+7vo5Zu6euKmzvw/LODZMXkhf7k4egwZndGX4mk1anVVSMd1nTrxQdQddMxSyWwUIlxITdsOFcs4z2Ulb9tbDxq0FxRsKWSWKQYdzKKsrPycji3l7d9hArNAq/HiY0KlhL/98/cGD9UUZMRrHqGpDlPVynC1KXcq4ofKeKH3B+ouVU1Nibi+32iQvaAQ/KB78yfrQqV1XGsXbf9Orr/gK+7N90ZyXqwCwMm1RAKBKnKBi2WQ0sMh4kFXTiWgQEdCJVMqjWX36yBhhEkB1VGLnVkv/uhB5saY17O8VsyT77/RhUCAWu1/EpXpb/LOtilz1XTv0D+/++X/h9FeOuuKkjP57uU8IiIB1/R/4D5pZFmArTon+SH/IGKGw+XMZVd8GO4rEZJP6wJPITqdAApwYdHhNCMFt9DHtm0CXgUeSfmhFJZyFCh1Fb8IcW9dm/7rhG7Y75q3DvwmvHNrE1rUlz3iOGft0zWi4BfQlIUOU9V+wzYmBrzJ1Q2x8mSJgqHexlOdAd/hbxxznyrunZLhoTctFjFAtd0IXXuGhk1p9qs221Q9YkszeIi0KEpTPGtHwMRixWu9FUMCxG/U6okCrLWZVJ6hiANlLGRS54aBYx6HkV/0WzPlQOU/rcD0Ji84sSjTnfWiFmruO2kLsORk6mTpL7w4TmT4zCgN/pxP01y80JIGL7LEK0q1kV1UI8vd1WBDTSbV9Y19+8BaePUEKYRLcsK08adsxgQI76ViBsiKNf34Esv6e/yFI1M78VDLJfbUQOzHVT06hzJO7PIBmnLJDxY9vpPB7cftwisiOoQWM7ucNAqnBu5Xzlzc1uey/eqFav93LRURD2gcqawikiyaPhI3q2Z7lidjv6tRVFNAtqkH6+FWBscntkOU2OhzCfH1ai6AeKh64/SRx+nuF9/JUYpDRDAVxXwuXPI2GxiK/wLYjVYghHZj1qAbERiGrZvBRTPcBkR4JLgn+rcnVMFnP/F2O2uko6OiVwLtyV+X6XKV8j6va4wDz2o26Fh1UgfiSphZUFwc0C/IIPlzVza+MoXLL49LdGMMbsjV0vHMWsMZ5wpp0ZIAxFT+lh7AMZPOyOZ5Wr4UdmXA+5rs/DImPj4iEx3c4ocA9EniTjH1aDfC8nbt72e7U8HEOMiNzAnEk7aQHbG38V7mmkY1y5ER4eQabtdCBieESU7T/l16yIj3tCLPCusarrameqNNh5EXyUM0DBEFslpNi9LvHvq8dhmvfFWB0/u78fzjjTwR90mxH6kmB9yLhh9mahUQX6FCwyv7KPs5ARSV5CYSgcmu1EUIeAXajhEIqZ58+z8x3tAA3fwLBfp51O1r3sB5gmGaKvqFMlxcjLsW3nM3JRAlwNGSK8vtbVJGmVFP6JIrwXDNzN6ilicfgezVs/msLwXwvPTLW4GxeU38QyzSOkERrRX6K+8vRlbKrQ6XONBbc7eg+HyCDFozsayBF+K2ojLuFUHQX1HCHwf1Xmr6BJnSjmQI4zuUlDqjRzjHpbJkez2m2FuV5yVwBa6c3dr93IG38LgdOC9rKJ9bm7h0qjVMrAMlDj7mE9At4Q7YkEbMa+YHddkfByPqVRukkLP5njI/nC24sFpq4LB70TaWTi5DGjIHO7GJ33OiOIRR8OAue+OYycpFjo6zMKv4FaPE+/Ezpa0UDHm8c21IUmXp+yGQx/m908SCauKTlIHTvjcx3B9CJEo5oobFwKEGpXQZh3bFPcb4whjTJugsWxthzzUQCP4v/ErLxFLxjvj1YYNe33z3bA6gqGW67dQ7UFg56OUQ3/tlCNIhkvDrkqsLg7PYlEKTPT2yWME9RGBQhjKwhNU2EsKz472EYYg/2pXgB8EGj0CqKKr7pWbLdt1EQMpZAUKEDQ75xP59kgIgyecV+/Y1XGW6CtoS3NwGVksCEcNnt+993HvFff1WblLkM+/VZKXGljEBKgP0LP293kQWSrqTT+awjnfMQw6ZLSWRZupjNJREdfUmVsZxPFpQ7cx/izD4XzCouozyUkufoRThTN8mDUVRkyZ+jzHICsfnOLc80sImX3/CHj/dscS2yssj/0H8SckmrmjiAaSYyQc/KiAan2AKfRsgS0++HWqfbe5z1mn358NfbDRS41E5eqbTRqJ61KS4eCZqumkS2y4p7+9Jx2XBNjb0Fkc9XNa+l6RuuICV6ppggUp4izBAKopETYSqlq/ZLN7a9PKyl829VDuzSiHZOtYYhiW+hJX0s7qOpzfPkOHWOGjbF5d80H2jZ/M85bfo1ahwOys1FsrzoU5a6Ps5hxYUyKes4XTPg04BcLpmMvjyCRvJJBgny16LKqEzltKkK1/bnOFOVoo9SUSd2LvfnasJxeA/UjigEfd4QU/Kxu2mstwOQDJiSoS9ojXOfcGHglpjmH0OIK++lDkcs0m7XGi4DUTewohVDo9geAY/iKwEa8jzrmZLc3FBGVxJcDzCHS0XqzyOoZjMeGCeptO79/AzpR6soEmPEhVsN74DF5Mr+MGe2XLJchfYMVu7kpW8D+ku4/KAO3WKWcQYPjg9XrTw6aBpYyjlkaoT5JwCYgji776t5yhcn/jj0JZBV+zpd8i7z2oxsvB0H8Du3SBT62878eBcNqYxNDYd9/ZZSfdFpaAXF21G5oWvMOFIyaaos1EKt3rnYSp1dsQXM9EtG0a1v0qpswchBCRCu2tv0ZpsP9Ya6x0qDbD6h43vGJ9nJ/Gi1nNrKTikkFAEkCPJhRjeKvy47zfg94/uRz+JG1Kptmw0oTY9K9UEogIvI+AVPq6lsISNWHxxDM9jGF9nkU3bsl9R37K6Tp5FjJxWYGoCvpPFToy8mRPBgfsJnwQuRPDjX5aR1qrschsXkrcpJWMepfqvkHe/ifay5vpGZEi66rFxuof0mDPTdszINRTCs5hWxSyUDhJsKnc/JXEN2gOKzD8Big0Q7vlYwSmv7ZIsNs5964fKIbrpkoI+z4VmCmjp4ohDvELaamdb7cx1ExddFIh6LOsZkVr8m9EHDY3NwWpdDkUrvS1FdjPAqR546aMpdk+g5KyUDBNbG9MDdzbgaFZkUQw8M0YPUmWCrpPyhtODU1lXUsZpKCwARjRZ7onN0/im4Ms+bWZhDLek27Lwm1aFECH+LgozcGY6OkEPJBz1J82Sj/9iPiBz2aBJgvSo+3F8Pn/S2OWxZLuZsK68IOHPQyI0OrPKlPslsGM1mvdMYBRoMKJtCRnHv7TZMqu5KROi5kC8kfEHPhN0iJXKWHM8GsxVmaa67x4CD2HE8NX7mXkSFjUaaNn74zMFi9Wvi5SWbQrpyI4cEaIOip0/6bjyHwQ4vNl45m8ZrVMxP7YuxEZohNEzvvCcmEj4HcOyFV26eW/fFQEb9f1HTD7dTdr68+BHnyPwouhEkFyo57kp2jBtbtMcYjh+/3ho347AzP8mlgsC2a0Kk594jnwerpguEo8xs2BJMS81y1/xG0KXZ2pQoxn6MzpwRpJGC53yqL9G6SCc3ySZ99bfXdw4jj3CpI1Bq9t5BmgaXhEyUWn+0AwjElAy0/Pq6T9O8tvY/BbRqpatcwd6iRzUFLjSOqKkJF5u5CJVk+mvQQQ5A1K02MBEhTx4XZBKxjUj3Jw2eZJG5BnQfskf71HWIUZumnywShtTKtOHkaf1OQptD7ULWR9LvgRw5gqSiqEQUv4rBFFLgPP4oEMXA8t9GFw/v1L2qRSxWACQ8rA4DiHoldmJUotpiPSrc2aE27iiolk+Pb5hodinWvx8Aekm+QbL0HWoYe7HWH82WYOClKwVYVErtT85r6ceI29Jphphdi+rsWN8AfRfZFtnbZhmSEZGxPIxFL80rfxWUJ0uWOr8s/IT4T8beUuu0Tc/qpLxjzsy/mY1dqlNzcfoWqj0N+q5R8TE+TZW2TuA17h+nVW1CZ+gRe04nqsDNrDOQyoenmBzpxxV2VEBrpAyU5lSMeSJUB1au/wLPGSMZa14LJQfu5W0v5HwEGz4n1XrpAklK/EQIQcRU+9QZU+Ds6IflSqSqaDngYcNfgyLUcFed1UiSjU4WtQAQxaf9Pml308+DmHyGYRDDIo3kv4TBJrceykrtVxnPQVJy7d2sNYKdqVMzWXGgtLRyYNpwo9wkjYCum/g+aMfXcwK6Q+zPi7+bST+UROanDX0h+C4F2E1xZljj3MFOo+Nopscb+cNMhvape8fUk7NV/KZNxD6JZBXjldW30lFae1G3WdnMeqFQigdY236sggfKhPCKaCUIA/QDch3prVmdDXi5UL+F0tYxnNVHjwRiEquo3Z9oJva5zMlhGWJh4wf2abvG8+mwsQlD3ywlFOVBTFNTaJTAyIwN4Ng3H2jPH84V+uJBWmRi8q29wMmfa1y6O8VcOJEoT6DcWrOisWUTS32eQ1P1eL3ozA62xrflgTYfdM+mKO3Xr9Wx8tAb3qw+XzacEZejjFzxa9FO6pc5WDedGkLy+zVQbibUDKG7hUGC757w6c0shMQHboVN4uf0mZJwtmai04IUCfdeA5WGfcrL542tQckqEiwNTOJy7OGbBYNDmYnmJg4laVitTLGI6LcgJPtcyZmikjZr17ojAZqpNbsWQlQBoNcwOYENQ0EgyQNVb4JiaHP53TSkLiVj/iMXdz0V48jwpVw7cObSFQnRfTSaXxiXuDxzGsWqpxfpQ/2Hi7b0v7weZ0Rvr5fyXcC2pTq6stlTQEEG6mZYDbeyRb/XNru3XmBqUVUTOXAB6OFQfnArSjCAKBzGAuowLAPfBDufLLXTdYFXR8hKgAcHon0UbGC7LAZlIf3CpOqq/EAeRGdjIRDDFuz7c+IjfM4sup4vp7J9JWF2ieyoDPuqtNGnRyYGbDXKcupGfAm42NWm4tViyXXXbuLzoBMqLfYY+IAlVXU33VlKE9ayCX+eykTuPCIpRL/P8B6NHaDzF76+u/z2tiYPfsNLkm2Ng/Dtm5lTdcpXK9YlRSuYNsBHPhrI9Xov9RO8gik1O+KZ5srs7M7E26FPUjIqYuPscOFckG5Zd18S/5e+5+TeucrDluOqzK0O8fprUOeYpC4zC8X/lKUwqS4y4Cv5LydOg00TLrOOUXtNVSzvn9lUxrrI7m19jDmG0K5CdfDrBJS7fTDjxKLePg4sJjvkVjmqBKbnO8VLFgqer1CevaNMQEeBG7UfMkJL2KOEbf4FJbWjZAsSaEumr33h3MV1z/8hGgTwez9K++sFpk9ZOZAc3XiPXCf/By5VBz04e2nkdVXmJ36vZCONxlnMjbhZVp0fkQ/RMkWYDFMiLlpqv9iD0gwh5ZRT4FL4tgdQo63VYHWZt0mDa8JmvaYG24HHNY4d174kgFbHh22+V6BU0ryB1uExR4VoRkB0aZ9i82wHj9VTiC8+hsKX+6AaLvdzrp8fcYNrOZ7K8EaRVb9lKNHAwhVsXVi3fLwPGVKi9ayH8zRO/Y1XFoykoYEpjKojrgrpi+3Gq5Y9xOvzNmkSDxl18EaRxi/YJwm1QptU4db5b7gvbYFocnq78szEcB1DQLUjo/wa0RC1pr3VcbiVhZz6OyyQrlfrqDLznWYsWi8ULoXdW8jSbk8cYTYUlq4OZ+C7181IfblT+smQ4wKtQaCIXfiJE6jn3sKFbCmdowGY2vGxGC5N1q6UbK6KFuth0Y02ckVAm3FHFG7E+Jj4scayafORtN7LYxVDQcr88s8ru7x7nO+12zI9X9gJzaczIhGTDGO3N6jZtItmnFnyySLTuAOYz+XFE9c3oun7q7CgMdMbscAQMi1ELgMcmH8Y2Uhmthztja+p/BfXMjhP98yDK2U+OfGQDRug5c2j/SE1SrNJg+oc77nIPo0TfEX6GU0pQg5TyDxqCmaqCSaXl09shcV5GHN9KO7mVrpAmLcAbqxAZl8fC9+ilROznvMEspJ7qunRxpoHHJFnWRbyyhmqOhaoZLNZK3Zz0Nbhz6ajcX4WVLhPC/61FFsh7MTVR5Upps1MQZZ2oddXCtzFSy9UbWKiYfyrxmWj5qmlu48WVwsFnOg1EHE5FE/PeVOJZzlAS/hUvwQR5Pb5QR6rz0sV/LkXVSrQcoj2d9x0XAeEJWwckvm7s5eCgtPdaREZQwQvDklOdbpLyzFMvy0Jws2iHB/VPPOaYgMmkQ6t8jdRrNj4AjzfR2UKkJbU0/3JeHa7/qAAZTdYFKBD84dckGZRNi6Tvtm0olXWFU3sGC86t0k7x1wBr4SVpO0MxBDuQgpOe/U34dM4DWPGEi0aAfgIpEimMK0xW+JKcPzhWWWEyOWgznQr4bkP9WitDJj8aBUHexbdkB7uZAvV7n//i69I+STKnZmSHuylqntf0UGxHgrXqpicSg3nBE5lLYkfEPrnzcjR5oGYxWmqJa0JK8WvjMTVwfvNaurKSu5Q2bkAn6NHC09ROd11Cp8CkvQbpb6DDT6/5cfrDM1sQmGZGmbEBHhhDUGvo/+uJpEqAOg9PD3f4SBOg8pyGCDCnEdurLofjGWxIgIxxAgje+d2whXEaUJxY1/VMI5heuVADSvNQdPAibHDkXR7Cj4yV/DjrIqqWAYoMV44GvFhYauO/+Z+Y0uQ0U2LUKL5Ng1vapI4CHOwK1BIQOlUm0kjMwrk3mSgJyptDXKH4xlpSc+Uoq4HC5ofMCFQe96N0bKjwyhu3r6IwW4JRcTP68IK1P+BMFfH1cX4roUN8l/q16sd1AgrGu8gpcMson1Z08sMuThuFSlEVrzWEK+boARydpzZzifdhNgd7QT0exQgXBNTDd0pi+WuWWQnbJmTDqa8wSLiD7XXOYC9Mpxo0mxHf6rKWbRFlNW6cmr9rqrgT80+n+d6JpkTHazscTAbPH6Y+6NfHACIgo5S74msNckUVhEJu9+dQ8E5r/EZQHSOmlP7529o5gDhpDLtLFdal0qGLy3CRFWrOs+LQ1AOx54Mqjf7XQ+W3KKjuaE6DCvxH+GHkbPuyAO49UH7zpvOqeziJ/pqFZ9oj2iSoA8gabT2tW+rwaz+orplfgE1+4qc7YLZYhenIe0uGrMgEE/QL38yzA2sanbz093HzXHS9U0r9/pVdpdPo289LxmP1KFrDeyvqePx3JasvOcCw3EwLEm1leqmez8f9d4ddj8EavkwR//qE5JGNTfkKG4dh1vZX5pQze+nV5mzsijnV6VgYDCtPtuJkG6XsV4a86B2zX36x/C3QaEEXUZ6Tt5//wjR6BQjUNR+2GV5h0SaEjWJUc/WF+4JjnN/SD5aVkzfYOuUE6jdWJA2YB56lHRo4sQGt2DC4cVQTtYj88gYcWvcPXYf3XvOzMCi/0egclVVBfGLsXysRP5k15c8E4gmUxCwFzhi9/ocjOTUJXiiJ5Dy2Dq8zFo8RgJvV0hTS1oEBvGUhaxfkxvdqECRfEWjup/m2pvS26f3yQhKh1fTK0DlRah4gFsCAG+wj8ECkwuBhgdLuNOqnm0ixk4xa/6ydAbLcp7YVH8iDI0x2X/R1UNwsZzZuLwfPV6wxQT6tEgF05aDpgoX9juiBEuIai0l1ONMDaEgc8uJ2BaT5KOdDm83BDEZpu3umKN5UT1DTSvyZ55fdIwvCYZ0ImtBaRMJUYKJmBMdN8EFkJjZGV4r8L35/wKGIBmYO6Ag2oQ0hU6/61E95QIbdXiMzmO90gxl0bZOdvfrXrNas3SFDd5qIfFVqOl0zpAejlK+r73iXl2BxFM2Fs1g8tsTSqr+w63b69upvlxrL867rXE0nC+Y/1bwHwae+MZ8b34Ex16Y/wjuaCrRweQdG5kThKzk7W3hKRs4nl3rvHZfZ0dDHWdDtL8MbMUDIF+SUXt0oqFecYrBaiC2QQaG0K2H5jxS++jULUaA6bNFd6VQ2wlfe+4QogiNNZwuRSv7utRw3U8cp70pwMazPl7qangSCkQCXk8p0vEW+aRQJy+c/7VMVPhfAUDCf45eorKwOJVALLJ1kJ+V9/mmtF2elpnSDeekiG/hV4dISV8eVzEaBEz48H5sNbCd6qjOJWkfMCW0qdH0vWNcEKgFJOF1rl8XiX9vxmEeVaA+5naJguj1vH6urtYS8+pD5i+RLtfrOYjJrc9AJoGaOm9ADicjOrgHuDf4BljUHzjfK3GBfZU9B6OYt0+ZEjG0KnyVAOJztmWqyEoKObbLpzDAfQ8I8+it00bv6TEyEFTJ2WAZI4KtgQle2WRe+oYu5oBlgT2aZgzu5mBVEtJtCoHHGOhHUmCDhaSvg18XzmLjOqNXNCbqZZfiBwscIIjaVJO+BmSb684cJ+Bq25GbmAjMsfrrG7NB5xtpQnjkbtihHrv2dHqDj7KC07vKXPwfin+1hKbQAplAQagOoK3SZrZO+3U1kkIcWutQSbAzo+OtjKmbt9RaDCM91lr5D9YzZlE7TJLv2Q7tCm49w4ofquW0E65UzTg5y4DJh3qpBTDeDrXuRDztZfRnFoycqa0I0zc1bOt7O9VDYg35H3TXLkzpn4633PX/qDPNO/rZwZV5bk4kGoRRghAa5p5dTJz5m9suXE4/Azd29HyxzKXe5A3Ics5rf4kyoYQM97M0qizF7G4mYcEHfdE4GjraRNpU0ZT6P6a0iU3xz0EG25m4sASiDCaytwff6aJF+MNXXjPSDx94IriGztsPv6eMQZCSwhEcQkWmFsK9Ot7pTJVoC4o8WQvkPwOaf1fDAWARii3jddHrEqaZDFdUHWCMtQE5PiDjCqW4rqN5+GHWTT9PjkhT4UZX3oW+Xbi4qSuw7fmwifEJQBvYi/kd5igv8a9B3Yg9V4ZBAFm3p+1B63YmD5vENwZxn5XtPSFnXqb9pR7xS7gLNHaTltSQeDJIdibGHlHNukfXd7OWBF/aNYlGqEPo/xTy9jfNHrQtYAEg7sCeoxah1NCvn/xwshNTnm7Yj8T2Ir7YOxOgwbDZ7hB098y8zYHBSqqAo8WcLx3VNiP9ZP8A9+nZNkaJXItj2nkKv5kPOWYcSijTQLoL0+dT0FHl3xFv3Orm8E8Xgi5o/j9PTdF1rTcHYZqd803ZN1qgYksVhJnl5ExVovRoqVdCdQlyULe8g8ocGI/zhopV6pGhUGiTD3GEDeLIo032T0NZGIw2qzqj7b1LWEMfeSkroES2tpmttKWph8RogSFDX6BlVBALtz+KVGc30rCt4Eot4HisEL513pnTuBs/IGyaIW63S2B6h9ot74E+fpIw6Zx3tJYkI7GWY5aZXBh6VsLdF1ODNdj0KOP8K5ZC+VFxQOgYjdRvcSd5AVGJCpqKMiLfIYZFGVY3e0kWDkwTE4DHxrZ41mFeXzgbjM1mCHZwfMVjxtdqdWoPxQKEs44iUSn+hRPKUa7NxTqgoa3db6Lp76NFfEQCLd/BndlrXmlWH40cJhAZpcjCKeqszaHGOwSskPIDJ5+rJayLeiAHkKipPXRELrFwA1NNg6VidehCJxbMpjrC09MyizLmmcZu8D2ubB9kWRI6ljnm8i7VZzozw8kkX515gXwrdDE5Nr2TZ00y3odQ9q8wYWiHCtC7OdJhHh0eU7CviBwrX3ZjtGABA8/ixaq57INVVUt8Owx3GQfDEi4sn/7hq20MUg8CLGDNsq7z0/3JUTJFsN3PsrrSEvO/8Tqgq1md0Be7OLssM08uX7tdU0N2CsSISfs1ggVwEyiJ9yxAxQG9vRoGvVjwaY0IWCV0cx2NbkZcLJ2xO1hyH1c7iFbV5bJMuuYyS8/uqoXHfwVsp+moTZSw1BbY3NQTOWtgiIafrnHFtFPxYO/X7aWwh1dJK50TkPqmyO4F5b+gcRaJxDRc6wyg7h5DVBTxnZ3wz7Znhj3DoqFeXJGKICdsBOEm/7Z2b3vOn3l5pkEbS5oK3gb3LL1o/zDdOLvpeJq+0rrQ0TPjWeXLsbRP9Z7i3eJVRsiB6givBq9N140zymU34vpwmJInZ1kuqVmwJ0U7f1y+zRQ8Gk74n54oecKuKQ1UIZ+D1CVK/oUcuQ+HhSONPlXPq9Rw3HxFxUbgFIKi+XuePvgVsr7ckFOLPTftba8O6h4DlM/m9tJaP6zG4j18KVM1VUOQ7ughvbiVuTZ6Ik7GtBJT3pEaox+OpN0QbVyrscv9n7fbYZSO4gge7yzwf5celTDBD2MU929u6C9Pi3RWQQLwEGKzLvrES1jHv/OK3b3pW0BT8ONTamnVbgzKXgjQXxyeUGsn3v7wDi+bxcAJ6p0+00MO2sVOH1rY/A46Zidg4DskWLskrzipaZNJi9lj2tPByjzENzWklxUPqblmBHt1Lt2676toYlpHxQA6vN62hI76j9BwMi2cYg0/QXrj85eZ1ohm0pfjh0RgucZ8Weq2UGD8iclg+xays0iqNjnY7B6rcbuIWL3/UQhPcKqNs7ER+moCqc+k9ohyvQeGHfSs3pBgi0esvyogSyC/vqnRBguW06q7pfJgu9FT4JDGicZWOcQmL8Q9vpEBSBTX5gERjR2LhE3YmvYX+vy7cgrAmJwRn6SObp+yYUBZUf1VGNIZvz4fv1nkMYdbaaNRYyroeE7JhUA3DlaJx2ZyCzrzJgxn6QaaLSmr4Uk+r1I7ZBThLR6Glv6bTW6My4tqErKUWNJXrLW90YDbtIsG+QXW661BjGCjh6WePhEoGFG23wBLpMahqmQ3dLmkqkZkWw6UTOK0EwXPHyTdzaopTwQYdDCzHL86iWwpPwDRi7J4Qszlk2OT+S2CELpNzO+iOIkv/BnQ8x70PsP4Ie8lpAuJe0RJMnqs50GWF8nUCGdugGZdbJbFUOKXwC1hxua2ex6el1nD7z6i3oHL0bqzQf4GEi4MeEgdptZ2aGfAHlrgl9FbDUfMYwW1hkcRi3dWTCDpfLF03Mxvdf13+yZ5plwLrbf2GbgfOdnh8FLp02A6Vb19x1+5C0Ooe43xsusfN0tpdrtvh9KrpQO/SgGqrI9oGdypN2YtpPFZvBWNmX140FyiyDerWgZj9MtHkD3VtLkLY0482H3Xmmwe3LFv+M0VK42TU98Wl1lhtUvFmOhvORdyDaBgxsECOPAeL2EejXdHzB6Nkn53G93FXFFkBJmOmZy/ZjsfEpxgINWFiMd0b3142BYpJ65w6unfhobfZ0C8pRs0yoEqYaJWpVntEAFv4wO1jlS3VmxnAZLCpY36/CV3A63f9qo4LefnmH3n8cJr3IE0j/QzNf6x88Pz50iclkVCrnItHVHfXd/s2XVzGYQwf3Wy71tjd5tJXKKYgAl+SreNd0bRwtDYWHbwgkvXOoAkHQadoE+lxbstR7PcpXjyZUXZ3BYflYvalr3n3Jw4rTnZ+iFS8hXi97e7hitJqmaPcWFC2teD8ejcdUds9IHptfED6/Dvo7D3rRGzNnV3J69tFEUVto82I2uwxwXt9lk7hw83CqiWzfPlnWRbh1BmUOCx5FB6O+jx4c7bavs/Ecq6DCqO7Eg6qwh5zkEpYAtEk73KV4DGTeG0kOVI4ZNdaEZ5fCNprQTy2YT+yD+OaVvXC+43zSWpU4TCKlEo+jW4g0uEpxMMDO6i+ENy0GBvMBZS9PyrK056XE2eOxOG6oKQTaZ+Sng+xC6D5B84eALXriYP7uel3OUFMA2su/dBu9B440qUGSmlbwuCrK1RE01a8dlXY52TVY843Z5V/1tDTUe8TlEA/r1j1AMkDLF9LYh2envaTFe8wFy8pxRQ21ieIT6t+f5B/ZI86QOJ2brkJFOaUbAwDBghbGp4fdCvfz5ZgbQguW0Hi1u42lAh7aIG1jK3EjdYWlYzDVWVvPohiM36bVyXgWFGMlu6D+CVrJSfwG0ZgWETvDoCDiiw2WtX8G6Tk5A/jT5V4WbhtzbFGXis7nr95WaedwEOxnMjKCwAaL7uQHkap0FWLE6EzBgWxbWboeUy2+57lK1NXOXBuAHHKRx10MUN8w1pOmPXov7OzIJZxE2IZ+XWIo0NCy9eRc0AQAPU8IZZdjAs55CRFTHAYBWgmH/ja5+dqRCiGmTJuBNfQOBadMHquFLe89mxiCUs76hRItPrVDxs63zEmD1w99GXiZl4Q8HSgFl7Br3NU7/o9m7byTuKdqY4imIa/8gGYuvb6YCSZhFcdsOzjdLQrkoZJ5b6slB63WmM4DOwmu85xLEHmpS1LUPEOfBoFYFWFFyC/fo8qKVxMqPU0tCkf4YCN4e7ulPhL2vt6j0hM34H96Jhpy5qj+h/QlfjgZ5lBvEYxQ0+pOflwAFhfZ3ansIpPBe68w1gLVXIA6HUUE/KMLzjI7v/iDPxytyVViJEldky/YgOWv6zjiq1YKxDuBlP2hUBD7pZCKn3awnChlwIAGfUgI4C59bXHwXtzPv3VVJjIzxvqNQg6qiiJyFpuGFdVM7sZpEupAJrsQt1repkA+ZlGfUyCa374fvNtiBm7jKJBtOponUNcSW7612wXK062bW+YL2a3yrfqDPScpNchdulU2C8RBLl5RBOPudxggzeNaD6bHFQu75l+PBba6fSiiTOqxKlw9kf4O2rkxBysQk0B9f/ZDoEbaHFuoyCZ2Kt3iwnmIUPulUGhYcLAbgb2Rw6vgxM4GbcPnu+yhW9msvuTIBlvVb9X4IwfwRj5jAcmqFBi00Xtgq3EnfpDfeZZnpPE0HMkFUwOBWvUbrg2tOOwETBdYRZUroqRjh1aS2CDDRTH9b/nK8wHs5v0W5uJdDc4s85vt8dVxAabx9lj6Zcf2Z82SqHBQYR8qDz2r/NjrMxj29Z8/BKng5Ud8120rFeT+bzFrexm2CKyXGez2ZXAh49CYLmGvcZ7TFVqeU3m/DZlyJdo7PYg7Xz1YU6J8ZPXbW/1HWCEcU3wHnEi7LeymZdsLWGFb3HKLUiJdUHlcM+ijoRmlm2eKdjhSdzwY5lBAhf4V7+Vd4REoqttOgzE3ayHveGZ2ypfAcAsxpnM2Q3YQnWhkp6YsRwdGwCf6d3JJDp/4oOUcf88zMio8coKImQOy1+UUw5WlVt0Z5AYciQa4a60FYiQUh+KCX0ZpcT7kGdyxa0X+dbgbw0JWoN7HZrP5+Yb3lHfM8wBDr6jUgLlNfJK/VxcMlHOj+EgC2MzLx0NyLqEWtD5RodjPLaYbgGHDj22U0eRH4FUwlyd/3McAbPbvuD3RophLsSWIVBmvLcqdu9UgqrGE7rS+A6lylrI8kVNMA/QUHew0mRnSsmQODPBvGytx2fYsRIwuGV6aT1jlClec3cRYz9UM0+fDu+JnayW1tDGyjI04DesCzSaE2wC3QVQHt3keKczdGN5rnZaTR2xW4QnbCDVpazrnxL4UzLS47HmY1Dzg0606tPknikDChTm6AWsFE0RSYZoRCXBivd4v30vn9cj3ef4S0eocfrA9PW0JBCdwdh18ogR4+GJhXJB8oa9FMZKf+oFw737Bt2jlKnarZ27zG9f+MAVbYbJxGa/kfoLpymak17OgprtFJ70u9JRvYz5R+NCGhJiLtaLZrTBWudl1KJ4LokgJSU1oN5L97V3yw9cviVuuTjiPVMlot51T8y4e8asXy6lVnyUUDpb59anS0akvUs/XjXNSJHIAktPxr6/lUzlrcgrqyTpy4/l2I5UD/QmEUOLJJz+yHdfRDX8pXYnlARTYXW4ViVCV6e211NEVF+ALKdEN74wHNNHWoIKkuA60cGxSjfxDSzoPkQWKFB/l5OUKErJNT5ohURcrKFby953vwPrBos4vGDKehgu7TM9/9nGYy91b9FiZQrz9L6rUFldFy3aPwJ28SPiifXFHmMnHx6CoYkgP56M3lA7K7j2r7Ga0/14T8Z4a6vr5zeNVDweH0I2l7uqPM/GtM4k1rbt1b6nV8EoDqIJlo9+k4KuzYJgREHkljdvISTI5mAh0vEkbik2YiP3Zj+zQVbKxiANptXMuSTMjhXzspw1336ucXlZp2/CjChttte0O1aefeAkPx6O3hHWbFk8jE1a39U0+fQlYDdQWW7JdMiAZzAEK45Z4DjIkOgBll1QHZ0lx1PGHhZX1nYZNmfUlEsyCbFyW9Ed1EOVKZr4n6lR9Fiu/VNfeRqo7mjtSImrhXaSD/8oQReCRoUBzDt3oCGTIr5n/2LYsopZaCzPWTZm5HxTRNfKKW0zJE7/6YDSA+zO5nKSIL0zRxGsU2ZR74YTuHGzqpDQQfLFO+yQjlxxoV3bHrDYQoBRyem4tE6LjaSpSK7fnrNAVDsm7neZ5284ArcPg6lF8GrDy3WzXMTHpDkJo7szh9Da3UkCrJiW9Q0+pbOdX7u2uQcCdS39t/ID/N4VRG0MqTIWKhnxJvt+Rgj60UL7YVJ74ELm2+rRH3MC2rRdoAEnzhqdgNw3vdZObZoypJzSlWVM+iF3/wly6SD9xQhPfoq7LocXiOHw8Y0G4kR+8uHELxfMAIdeV7sxMQYIt3VfQpIwgpUOHuYFPBOKMakftsOwk/ecBIze7QFTqVoOYNjrsXbmKZ6gDYOEgkOzyksReD7s+gs+BKCYF1F8aJ4Rr09517Zj4QETXB8KjqXc+JnNRxlObqztSU37OoJFBgSTGH7kaBCWn5Sf6Rk0/6zWHnuajtSas7LPSxo0u/rBurp8sLWnxl+NElCCPQZtRg4UMiYpQcIdU0AazAZotAet+RmumEOGQPm/9Eihi85TG1LzlSgebOB9f1nHkB+5yWH1VKYi/fxVDb6XK+W8qDLC5dvdozDf9yN7I3t+5AGaJnGQif7MkfuKuiOq4gTlyUseGiQLcb5NJMl9WdMSg9zygF+3OrA6assNUr/Vw1g8ROmVoIWHOQdhigM7b28vTKDG98gRtHuNVfqAO97uhWTAaEYKgaTQEYmyTURKOoJREXEUIZLBeickdLlpUR7PzIuq8uCdxZ5R+Jkv12LvG1jxGxJwAvuT6gFCrJOopYK7my8PXQTikcQs58FBMscFOLVzaXDSH2sCRWauKwRDmm53AAD5TpYecjfN/Z4rqfYhLvTGRxACu+17I7jL+JmmV2rPzydtvy1ih8yg3fqYFJhleZCZ5ATts8OQ8I55SRgUfihHC5t6e83ln2v+DfFizpeVVdKKcSBD0HgZ5rVu3lhfX4WTsLqsjhiIsFNpv0Fv7hipv9b3mLURfFbTa5xC99nzl/Nt4iBTvsWFAqzd+rw9JeAe6aP2aV5uLkBYgoGKe1ZVRuMdWumD5KGCeshjykcmyLgz19OQX58yaFqeNucHb7mwW5YUa0vHWXHOOsccJhW/boZS1MdeH+FfX1GTMovo9TXnEX1/PsMcgI7C4WVm+TCzCvO7EyyEGtuEflkTZi6LiXbPvGmc4JizcaU1vM0XbrGoB4Ehzte/+smJyvUOHU/I3I2y4Bz/RxiINyoN4twWKm307gJqlf3W2ZRfBmwj3/WpyGh0f2ye4qIxC+e9AQIbJwzG9kXAryqwDBW0f++wGwQNrzxeQAn5GTCcqg6JY7Xg6CDugoN9uGnHexdy/y20WabuAQzWHZ49tQnqh6jJ83a4T3xxhPLhdeB5hUvmLg3ftax4tBlOrg1W5g1r9NhZPqtWJwDskTMEbMVq72wYlcwNIik8ctSkDd0YWQp5ah/ta86+UZI0MesvPnwaroBOrCzpXRyOQWNHnqu+7TGS+5lSeVZcY+tuCjDyrpaIAdHpHZhKfUS1YmkQj3CfYYnVuxoBmC4DYnF1JJUSHMTojwTn5yd8FfflZbAgU3TcTz1ddWCLjyi6G8tbIxKo0DAtUKLk8GoujDLJ/CRoC9s6wvY7mudW5NjlDcJqk+rFvU7Wb9FZIRDmqj5YnTJlWFohi8DeFRLW73HbLz8kpwzNjB6LUHRCsicdQ8GecibfoozUk/gP2efp18zHOF9BVjGFgEB513Y/hVb3SBvT0TmWyArXwmqgvF8poxSVbBWZqepCEzQPw5P42jyVLzMq6PUBnGD1i+PaXbe9rOXj0HbqpQOrWWUnQ33uBti3Qb7jyQ7n2jSNNaGFqjzOZUEA9spmXsUOaTuL0pkqDutM1OuPkR1CNxtRl/FPCeKiFADJrrl2vpirFxkRtnIt0fxUCMw2dYVFRWlcqywaJig613OnXTt5J0D2mUJDCYGzjHATi9Nwr0iONYssRHkVkBMq9x7ZkJeeyNvyHcAtGSuIdWoynsB3QIIyrB1Cao6EkMztY2PxlwBgEpKaIMrZDFMwwYdeP/PwLszd5kYIpZoucwdQ81In8IpzkJgGOPTd+9lntL9f1r6Wrv/3YnDfxHLgmVj7hTJjt66mOb7STxwVYfqfTkYAAN+eGCIH1u9YAxgn9it/AdAfEj+kUbZt/aoKsUYt1k+ozp9gYZnSmjgcWeioiKDsmzjbtBcDHQRK120/HaNJUtiRtC3a0O7dftxPG+dd2wrKK7X1C4DAQ46WfZ6tiFdLI7D6RULb4t5HnTzxYM6VQ3/huDA5/vgPpP/1nSlY8AF2fWDd1JeVKP94zAoR7sValXSjGR/yTj0bg2Hq5nnkLbbhPCGtH8H9QWIxU11HgrjDNk/Ls+5c4TMt+FhfhtWKaFKQp76G2faPR7Sv2/Vl/NXHzI45DbKZzI5rkRAqtUTwWJpAxWmPa0sT9hZ6gFgE/p32+wNZLVZ70G1bVKSO0SyZKrk7UcRqVPxK1hXi94FI0Se9mg00/nmgg+UQY4A7516ZpnO3qc/WMa+3fVIGCPkmZk+PhCF6zlAHCL0ATaTaTDzvQHprzvnE0cwzrL5+ho0T4/fV3OLGZKk9CFlzmcfc+XeTWH/IFj81CmG76JykO/r9rEu48ueEjLbtR98j6m8Sv3aZExXhFWRV/u4YvL0HM0eFmE7vqqj4RQuk4Ljdn4luRgGdZ4kQwXNzyrrplehB9DvqMXGcuZBNdvC1b1ADYb4NrF/UJ/Y75t8uhdgx6p1tLrVQkdeX3fALVXkK8btQq4Cg354i9bzlejV5dHIHK9Pba1oaXdrNoZgWYCFX2DUqvaIjE0Q4DRQf06+PU9sOjc3eK+NdcoBxfEo5rv0fnSmuA6BMc82J8Qcqv70hlSE+SrfMiCeeDAowk5bg5WriT+NQlYnULFCgFX9TvtYU4hmIgva7FP4GfpflfCGtrCFl1z7IPVEkR+c8deuBNJ0avCdS9wh3AYUt23jkmh8XayDkIuTwOvtXknisDHk27oeXuEac+b9KGN204ecz7mqUD/89FUsmWo7hrMpSNiH3ueBiKykKVIta1kpY3/WbwsDkYnebc2ciEuy8h/t2m+10lbOq6AS9DrvRysvB5WpOo6goJeaxCsjZEpZt+Oo+UTeOaY196yTsGctcTqm2pqCwEYYAGjsjuUFsW6s0OfRYlcriBjWKMd/fGI56v4RjbQ5qB2RHPe+HCQALyTHmt7dGpfGml9ozBrvVIdW3mBaZ7x2+iXIM9iIUqiCCdv5aCU/2kkRw6nGKVVVRExKwhAEHd49mbW4gjspGYdFDtWtd0fj6Blpds00hmTNM/e/d/bKoLxlvzFlFEXezsJiEubECP/JHxN4DeEHIOmsq3Argl3zKLzLOmAgQih+sTl78nbVY1SU07ILQ7G5d7eTM+qSS/WLh7hk3ZEihwuyNDz+Cz+wkdJSkWiec8w5vkIy9DR7lSbyKOqhYeMWEkSqaMAvfUYFsyIfGzYmBdJzy9tKuCgbhxCGwkx/utRe6ZiLdU++23yeGOQ+plS3vviK0Nm7VH+TVoMYqEx0Rj8iuQBwZMCMVn3Zgvv2kl9XjiyEe7o+Qi5X4fWyvmDWeg37tBxhP3A3LgskArv89R+bo4GI8apFgI0NUwCxBkwN3WIU2QPYf5u0bmPgJF2LPvisSR22M+3Mj/6bdoqWLfJJCFcqkEsFiqqnHc5qEm0KYF/Qs2XjrC/1ATm0grWeb/lWyecJ5GEWB8g6IzcoVAP8uj0UAlOhfP2WkUTB7vLOtNWZnX5i0KHKUcL9slAY8pxrF9T5wvd1P0Hi9/54+ADD/2JP4KE8OQ0Dxdy16E0ZUrDJKGaujdvV1yqY3bNOwQEthIjAyJc37aSQaz8KJpX85w+9NmpYvHi4SqJtO7MQ6My+aCDhIjDnAw1XeyrvnppmZFvAmgxP6y5Vvwm45Q==\",profile=\"desktop\"},[\"desktop-release-0.16.5\"]={public=\"roS6hHIyTJHeB0NjIeqo4WWOsB938PSSOQKZ2rpFjFA2ClRxJI8umSBU0cQXMm3cY6Zvzlqx+w01LjOHwvsCcpnGgHqc3+WBUerSAYDHqgmunmTpwkccpWxr59bsInncR/YaPpWqnNTDUtNxLTf2Um7StmCfDiiYYl7yEkq5UjGo21YIi1+sYfB7ACHsqdNQZ/0ujkDR9YklZCsf9SyRZHGm7uSE19NSu8PvGw/CdtFcM21E4ZvqDAeJpoj/3jMviP1j+jcL347AHTkXoL/mY2N1HCLHCaywuqVM/oLzvUYJREAo4zGnxkFkMeiUcUzTOW5BWbv9P/krNhIXC9jHOceNjBtv2yL02IbPnSiBz93h70C22CziPRPbTMvpAB8rE/aPKMo5FBI+X8ZSlYaMex9OsksvRVvFmqPHOHyLJviWJdJ6b+t3T6SQn+TYBk+oSJNSf08WNCTve32HROjc7X/3IJx4kA9/+2OHlKE1wphfG3tf3cG4aNRfegirHy2HGTY/Hm4lT38efmEhRUo9HAcxdz5CbS9uXv39RbwHHQ6WitXoD5IM/eVXtBvfK0/MhORTwEYbGBFJPlptlbXig4tJiNZXBA4eWu6Yy+eRKOcd3tCLP/hkH1bwXSexwf0DDbCo4nyQHqOvrNI7qsLgiqxbaWOCNT9wfg8/1JkPf+L3b/zziTUz4qHF4jLm6uB10YSdwF/o3WksRDEptLlG0nnchiFEkgyLohcPXQvKR7vQYPQdbLhYLjqhjUaZW4Ss4vrc9PVho4KyuHYBD4xna8i1ag4Q7shn6FJoFN1F2UXyj1kxqe9a+BH5wD4UNFiKoigiyJMGmz65KDIANaZyDxlWITBMe7HSCfyII7jwyTLpLT5lPRZW/uZWxomT9rJH+TbdjXNBj+4ukelI7zEy/vAcVTM9gKzIWyS0h5Gr/cUVyVitSA+aEeS8KqPdxOLyeuYonC1Tnyph6MSkVCJq3d492FY+TZltGqcrqu/BkHdu/jNsqwY+8G7mSCnI9CZXM5B5VmxuMLS4+fVDP0Qnhp685P24pBKCZjyvPh+3Tjp5axzQD2F9cccIoINZlpVHtr18G1pWGi8c+oFtcQOvLTzUmdbRmf0EM63/YdmwCEcrf2dy57EvUbBWGg8GzrKyU30MLr6Flkexrr+CTTqoOfiiqnCMJ2RaFP8h20plqdF/MqID/AarQOzF5sfZYOh5iqnJl7mk859shpEK+RUaT2owoxzWzW5WoTHAri5arzzGcMjYtoY/JYZFKppJIdxgDWPY+/C02rLrmcRiDtOsowYAOxGoLb1aY72ghmxBNO/+qZea4zfL2jz3iD3x2psHxWLLpfXJTj0FcfYk927Vr/kS4R0WFu5fHVCfWaug9Oqb+g1heltjKmjQe7TfdjQWFco0fNmaG955R6ZuqA99tKe2tDyLUhJhEr59Sm3YK2jm/R+8c/6T6mx5wbJaQbJkefP173MDm95pVKe4GbPt1WbyCy47PkQhjWMMl49pYOzofIa4lPmO/RIFdPz35M9qvU7IGyoSW2UtXz/b66pHdnaKBscmqElbmAhF9Yxc9uAJU9IwtJkRHvXsDJbKjnZ9e9vydNfO/yBVhHuoUhiDBfbJ+bjGz9hB5sSaAj1R31vZZxzKF+qmdynw7DUVyCV5TUVqnAD68v8pQOEhKB0zbtMPfzMmCihUgCD65Pnt9UGN+gYISaeqlr/vEpAbk4oJoOlwHbk2Ukc5ir+Y0xRUEy/VusvEYK+5EY30yCFFJ+3SwL8QdOKtJHC5g9EtGqR/EmgMLjzr6DTL/AHqFqTtdG+yKPriFy8CJd4WHGHxGngGkyXdTa9NjPyJbK9XjbRsPHFcLKmFL3J/wCCJfStVTyYgOuUOQ5uKDlq08k76rd7cOBBMEGcoGfcj9VVbPf0sqk+hChwUxz/bsKjq4x7udxoRiXgSz2nWhPWRZSezgIfKrSIOnMGfyaaQXVRC+YK8T5BTFE8VxHVYh1UGyQEL/tsZW/HVu4RPUHwvcM2+i1jrNlLkx0IrQNMwNqtVKglRXhKINA5tW1lna/8Fqaq3KAX7CZ51TQmPI43jYQW+435C+sOrqNIj4qucE0hulGJwnEjcy7jN8s/W9Ine1P3zDQVf+ZIptyVJC73gKJdQ1NKjzkrN5XKYD1q+0vC8lxGHr5xULyo3BTPRs7PsxbuZmCBm8kZ5zHX1S6B6OLkbcLhQbF7wAhp/EeDrg65gb88+fxShPw5z2Idcf/vUj24nWumcDP+CF2laBbyNyZwblSHbn5W+No33PsqUw0gGDo10zzZIwcdnHZeCffWjCmHa+y8S+8DzpXucU3IzTtyK79zRKLAIopDnENHhLLDLBEQlJWdIaYZb9udFig+AKWEDsJZOsEMakcvkKwSyhHh3YRMPGHCU7dSDfZJzhALPKkZILYeYuebTCinkP+PUB7FxCtO7aqPwI8Wv0qwsfPH/KzDDCoXuoCsEOfrcM0lBW4uSMakp1qzCY+AL5xaKIWdypG0aStz9HGFwL3CdJeVdCjwB0dSM8jYKJ3DqXLSN4Wx6GOfvSaWWX2ioSthUYa65G1aieMgkiAmuR/oLgO1PKnrROBMXEL3bi7ioybAwAyyNITeV0JceyAXVJ4Q/+/WdJDXqV6DXZX1bDi4eHrpUz+XuHEZoPtQwS7Hqs7lHKXu9wQPSXXqbBl74YhCnwesYL97nuzlkmD0AJ27OItXp306HUPzG0QYOCvOdqDi1595ORlqa3fdLutMBQfrTFdyWuErQfb3t/Jb8AQIKgxq+AtUZF3QuQfL58CuxZZvcq1DwL0/CnQsZclLf7GI5Q/skPEngWOigc7UNxhBrPRfkzmr81N1EqYHL5SiDxtFY6C8ld57hIItIGFaBfT22OA0nEQVSVErMc4S7gKkUo/wJwpbIGUrvIHbm1fBsqUsOv/9rGXJ2PGKbYEb13PNBWnB1tq32qJ0aJsqa8z4LTlM2ztdPg5t2TnxfdRh6/8eoEjcyvSSPDmWPjtuiz96t5E0pGpzS2vu4CzGCWoC12kUwFYJqNsofIZ8gdC7r7JhsuSi6GBEo3nlFT6Ih87HlRgijZdm6/ulw3Yd9oHvj1xDa3uW1OpsiU7JMjo2GgKr4iTPttxtd9S7Lcco9M/TNRA/rYNLPrr1SxHbuXYyGQ3sEo8f3f51y68bK1QtdAw21vNUstbJeyWc7W1qsrR1+CN0ncpwWN8Z6nN+ohKPHjm2rx8+a5TsvZPOqOsiQkmfSFdqcjf+OOnAze3LZirPkKV1aUH4Dxa7QN14py6q2aJJRhygwQkphDt0CZ7IK5DW3nvU9FFX2RGSw6MmcboaFkRwznv7RxEd/wF18P4Fpm51adCkIx1kkOJr8+3GWZxpRfJYBBP1v6JKiULHY/hNVgJJtHkABDJTdYWLAUIFlZn2v3AxirySxkyg1rCxdD5Wj/Aeq1FAAmYBZOR0Fa6xZZEvxdkR5mRprjkgY+iszSUtsyoV/jSFHtGTl/PlTiYlpnz4dkA5noiPez2XBdtchaKRGLnqVeEnghWumGmw6lVsysIp8MAC8RnvlRhB1gtuWuL+fvRd1EgGhKCMYyzx5JGYs4Nu8IxKZxKnnEB/X/ROyun16iMd+dP2Mfo7iXrWf6Zt6yZWkdTJCVeq/S3RZrD8/BAMtceWz/KXKBFY6GNSTodqam703EOELaA4IqiLU3qW2ZfO6hywuzcYI0m+QialzTZ9pO+z1lXdh86gnV9i6oynvjVATCRXC3A8oAW58o9LzLwPoiX5+iMuLKtv93ppIKA3kn+P3n6PaErL9motRK/yJTjBBrbLD8WuKeoUwvQo19OwD0nGK198kudJbHilwu2/rivhHqhMcgVOoeAgk/5D911pEmNtMvCBO+hRcuhTWgQig2N0g/MiMFT5JJnlOwz8tlG7/7flWjVvdvQAYm1CjTvGledZPzWHNYBLXuOMJ7bGT/QjudE7kyiqsHXP6QagNHkBGwYrnGVi8TDmRMKGAvs1IdHmYjy+1hlosUI1r9uhJvkEbBs9oTj5Jj8PmoleUQRnGzgPSlH2T82nSNQFZdAlLrL8KB2wflKZePxZD9a10kLZ1cfP04SYzKSjioxu0vYjne65jDrgaHcUT21+PJVUJt1BLZXMhP7z9dUrcHfs3pPBiEX/g6DtotRUVdMjkMvUTRkKg50DgBfJaTeAt5Sp8O8DZrT0mG5URqhBfAaoZnedcL/rlnl5/IMerReKubm3Tdo+2S1WDQ11e6eKhsWsAkz/wQdTMoPbUxi7zwcr1HeCoWZdvLMIz2T7N8bOHiT65DtogpMuOODiSzlT2LVFL6s2GPWxMVf/M8B6gFiyauRxFDpYPebAKq0SLtXeUnATWV6PFlzAYF4Gj/e7S9Gal6C3pO6jSmpcYsmQMfiSoy0c7H+UE+wCHU0msBb1f6s8cEVlJTepQ2h4J0bvS1nPX1uslFQb3tE12Q2eIxLmKx+eZenmkJOktiqsak/WwEa7lQmi95jBCoTmeW1YH0DrrouFJed7K5NISz7WIWJcmaPUtRvHsM5RYb4IXf+KzJakNR8u+IPKg4DR7HsEqF6CuOS5hLdNUX6K+Jh/QYZz35gFEEcKyC83xrdCyPUEGlVmehEoYcsE+ze/i1mGl5AZUak0C0etKFBh3U1PWGjoEFypWZEm0MSZGxSWpe0wDg3hGtaFvDE0raMedTWfFrTWXsOJg/+LgwfxGpYLfM74Cg2phtkFaL7CfEvKR8XbdjDjbbfL9dM5Syu52V9trSDQiLxTnhwum8y15wrsC/fDTEJiOwUpty9ZBzQclkC3XFpgc/5oidycBlPrCFUTb9S9ZwE4miVAtfPjpAEDekMrBZNj3gvDSMJfYgR4H/aBY0LkKcHQz98Y9sKeTad10XBMfgX6wacqPtCW8UcPUN7MBx6KoL6IKvEFwsu7/ycCOj7iOzMs3waGE0AksP2SL+um0vI5k0TesP+E0RPxJNBv1U5MoaGNqj2kNEpdqa/RuLWQkXU5SNUe4UY/PsuZCuzmwmT0TkZNqEc4SYdmABhbndgkS93tPD6c6SPW2B/zX4NLiiEFXrwEsrdJpc3eYWm2zQ0CJB2L3RxtvalATCf0moJlDZ4HB662DlxPQ9+Pb3mdDAU2W9D7MM7kHcbXwzN4Ub0qVooYW898p8pWlcE37qVewxZgJIgPyHhznJA5hPLE2QtlngcZdY4PkSkZ64bjd/i053mLi+Xlqbqi1f5fByzKwFn0Vc0HCCZjUy/I9BRKIFarYsf99hlwhOea2uLjbmzVmpwJv/A/ZBF59GMxMzviwWXy4LmsUTADwaGJzmJRpzJ04XjK8xQSddaxukbqv0pS62QiLY2utk0vs2nhZIBQRTzfsOJGN9Hwx0VROKaM4TQyBjfqru1U4KH0bnee2/Vn1nHD17qYiQ7VyEfQ1rO2gtjTUDo8DGJ0gHe0F+p0SwhB32bX0OFMcCDHIFn7mvg81HBfDvsCrwBXR8gTYsXH0fTxn5rgijMUA9yvarOrYDkUAh81asv4jT7s4DH+2bapduFdPnGtJXKvegB66JE1HQlNYXknODZbsccGVYixv/mS31hsCAT6bLA4fz5tpPW+e5DQDUkyZCzWLZJxz2AABbFT7Zx290YvlMI1MdexkxVP6Mlpfo9ux4gJYDoj6C298ekzwRR+w/hHcPBJm1JHdKLPj4M1Ffi88zP72BEwIMlNAS+t5n3W4pcTm+Y2ujm7F4MuVSqI4pcLNVrcMvQfK7TsqfSisrT4lRXJ0i1WqCBmADOdzcOdYFLKCE6N2sNh9E6CHQg5RfZeVWg1FyF9xafeLzIOvGHdLB+uc4ElNxY8DBg4kFE7In0tn6TvGzjr4eApeA2hnIsurrHVZPN7IWajvvr3jgrwJL6JwBNWhQDc06G2YplvwqEbnQA3GAU6Uyz8MYFMrh0FjQwTolisifFG3aCX3UktSvc7JIA4t/bWLqxIJedAZOP//w4eQy2vAjWPZ4y6VmZCbGUbwJ5nHU/+EkGfYEsRYhzyj3ReP5bUexPuH7WzBjTg+mfeElDEihO02Wp4lDJjpDb7NejM93jkqjG1wcDsfUqr/SolwlTmxWkxSKcqT32Xt4VhYFbGxpNrFbK+CPdUR8iA2Mj1J1E7bVunBIqK/W9iCPdUAHxIKjJRQZiYXKBpEnAHQSXoDjbZLtbXyOh5BN+mWbtq/kY65V81NW1wAkrul9S4Ub6RmJMI2Gp+ZuI3pF9sWAEamXimXa0Us81reVCph/Z1SCkJk6OSgfvgNhiLC7SqTNIN7GlOq1/fs2KkeJAODI3EQO/+K1ROv5bg8kDp7MECEVpL2PcygLoSOgf4ysbaeWhDQx00IzBxaBnHuIr8zLVRvdJdR0mzIFCT0rIxQDAmdAuXCPfR8Y+jpsYI8ChCqZiBPMMpz6RsVUL6KbfgsEu1BjiWAo2Wj1xDYQDZKq9NhBfq8HmP8zEwIPiqo5IwLuBzJHYTOVmH7RpxtWTBgOGAI86AjwfXbH65thYGVr9baZrQW3JpUbK3qnsLh6kRoLlGZOytQsCiIeMob2L8I+Dl4fzY/B6c+3qIGSSitxAIEzM7xr3dcJ1w8+AfxQvi5mi0gb422hQp2I480YjiRVuaCny4h5abl4EMik2rk7zaBNFIpQtOvSKCJ2s7iktz9OH8KAx+ctcJdJV/JTFqCJ8EGx/z1PThhZztlbqkYfFir/yxeSqDUTJdFFVYfor+y3bUEjCkxrXA1O0+QKiQomswJZzrd2upKg79U5f2p9lxsFZ7Iv+DE9YuXLbaumUpN4BuKACLnNAjftXN1YHz7WEGbQ7eTPaT9K64RpYWhvo9zMPsO2Ytad4/6gD4AQVd+erz8O+5NlAJLD6ZvhyXk9Tg41eEAtGv4tCC6x6VlX8yd85hhTAO0WmQnHHsI101N9wOByyzNy1XTJP/ZdewOWKIul6DR3Ys06wOTdZRfUxJw6yMu31thBHcKy7n5l8IrjFuNyEupTPHaxD/3Wz41u9YJz7XPw6G6Hj2mAg4B5D4wYsk7jxOE20+Km2e8qQfDdkAMSxqAxTpWcEe9EY2EmcVDJ3eUJkmRIffHla4Xs1/KLLfqp5514YguyJOrkvuzBcdELVKuMmKxOrFmIoHTLE8UlPOSo6LNechlzg+w2AfRSoTGcIoDGXTRUnrjRAyKts5RSI4tGdlh3tRLNJWzY9ENiIFUczIkgxJlV8bCpzdcvvkriYEj7eNCnNTU3SdrI4ohAXpas4q1RZ9DTOwdtEZrsOcsJ+L6BABhD/jtQMyxJ4smlE33ojWjzMwXUrqfZ2W8rKFeddWP9NDUDTP4z+tJ8d7NUSvcSzzh2+ogOTikaDcjOLtekENmP4mSii9t5s/Uggfrdti9nxs/XSQzHG+NqLDIQ2qppyN4Ch84n51wO8pwNQUsaNZBdf3reSiyWRrKxunrAaUrwlWW5dZq845QaWc+KYGmh3lTfym+uuY9VC0iaaLoOz5CQRIkWN/BWxxXr7HuyNyhwPBVJOu9OfH0OclFPUY/3nLtqBKjl0l+gGSSkgfNHZMblon2r08jcBghvX0hSlJ1XGxw0xQL6AFwuqeeS+hcluF0vBVDP4nV589QIahfgT3im2uILCRVOMzFLNe2zPIskATNHZIvMDVqIiruMIcO1IpJ+e+xTVfKiltzNCVdpKjWNuXcTrxPmqG0lO+3R0y15jj9QCxoYrCy/9EgE9JU6GLh+4t+4LYWKy87zyFZQBzknLZ/mECDcOovQWp5WEanke6OrfCOGZTtQM3oEacy94M0+Qb8GfZJxjViyM5KyLhHClT4Mr0eBhngTJ4qN5tLxkZGTD9X4QqmJjx7l4x7kejKDtoo3YKdjVc9YOOjRyiG/2Wl2qQC189XnnIuof1X58qHwmdPkqK9xTD+1Yj+fLfmsdvpwdxX0352tvdjzYxFcPCV6epX8eexrFHiHWyhKpDFg7LimA9N0HNA9qIshNuXly+6pxfzslYnTo+lRH1QkqHdCGDNYFqqLDCQ83PIXZIpmYafxg+L4eYEwt4J+OGZ9S3vj9zR6Vfp+Ux30KvHEdnb6hpTPlcHW7fXc0Q1UQiXn0CAwCweWkGj1IudJzEWAP5lwYUR+4mXupH90ee7nyVpydjsj9hAOzkr/iKbDh2ycyrT0xxdbJewV6n+K47wB4bBh24ZLHHn4S68AR14/2AdoGTAxlaY/QzIKy+TUqUluNoThXJYZJ3nk9HPo9/Y4ZfCgEttBlIaB0ca6VTVLbjlhNEM88f3lQV9UBEDzBs5+WYnMDoMHZfaqTkGRoVSR9m2bb/tmDT4k6cn/7K/pjTtDAIMZM2K/H6XBElIp1Sf+UAtZs5mCg0lTPGKTVjGfaU9HzLxtOAC6KrwiM45Se0vOrMh0MtX/G8Gq2RMd645ko91l+S6/4tBRxeEF25Mo8XhCSLfl1e/+Somi5v2b/5v4qNBZmXZzoR6Ognp40WMslQ9BSfB6XmIwTOe+hV92vKXR4dHHT6WYZeD3c6OwvqwYjeDcTYEQJwwYcvHt4dprYi+gpTGN4XVpXtHEVot58ZkvaFGJD5XhHq1zNbflW3Ikt2jclzSoX/eGJNFz6lwsbkn4P93WR3GB6SGu0BzSVMcLY/GniEBlz8y5uldsxVU/lizYYrZEoeLVG0ssvdw8cfKPjcwmvrOE54I1oFr35epDk8aK3m0KmfVLKZO6bejKzPy0EdwPkd/3DEQYs1+rwUpqUwdMCA8Iytbna07ewXnGunEaK5UJYEbokBvITYgpXOM7fzYJ8C8R6/2Kfs3eQsheWsRjV8pTj4aIhTRZDCLR/omNP3NhZ366tzfgzZg3JxyfNFH7zjL8Hq6iV5ZH453jhNkoVV/QDoWhlD0sIWjZI8lok5I3qYS7dyd4SQoAPz3csXY7tf/biXf/1NPUlN2g5JUXjPP619iaevycZx71OYvMnsWefUMBDmgbVEifYd0lOm8DthHXiKNd4+ZAl0KX33DiCHMBMFgIk75gpiuDkM9Fs7LUuJMsu5gnDwzLUU/NVK19UWMzXVdy0HDDRJ1fXh53QFuhBG4e+S0VVKRbtdUt9VKhjKv55ecP9A0AK956zC0XFgRwOjSwhdpOLnQYuPVtBr58NYpHeDoBPYGiVa8warPAAgwpycaaK8DOYG3cm84zHopJqmj/mzCVpKU3a/LwgVM1g9VkQ8Rgpl9sbDIXLZ4kkYXyRpo5mSxBuZavzga1odrsLKThRpytCJu4eZcRFfe7HYsQPEjzR8ClzoapHeQ3MGUOlxuVqPbJIFc3WsDFfXUkIqzNhIbSQl56uKNEEhBH0eSkP+limv3f7cTbL9nppk6VrI4Ozk9xJ2qKlwUYbmyWh/32UdhKQQESYJbahykwOl9NXFrFibmKLj3dUBVYswCMaHN0GPCBgqyOKZ0lXTQEhwEMv5ryu1A3QPRY5l9h678itJMELGldu+qgm+3QpVZUDWzNTKEq6+6ra/MJDt/rGOkuu1E/mK681bUfEX1BGRCv2X8JEi1yo/X1DBJoIs0ZtI74E/zWxl5kTLuc3yuZ1EFZz+Q849W9KOoqklowLILM0HexDNTjR/OgfaVr0C4jVLo/5LaSbdmR8aCsdl5ysED8Z8lcjMZneJqdCyj+jj/VkS/06iHGrxjF4pQBgRwUvKvnCc8DfHX8+d6H0Vi4VIQCwYO+A6xLxyDag84TONaYeD5qaHviQTTxzu04G/6L1heESRxqsz9rwylMNxOdJKJQzalW4cRLBAV6aquxC/2zmGPcD/qV10aFYojZ3LGl4VPdUyat/JogiUaJtb1PVtfjBYsuFPH6tyTu/tiA08lcDA05NnyyzhwAZimf+LcJ5bYTwE6EE1Vna2kdOE/XkwVSfgWrRCDXvVYkPeICZe2V8iTC9SB8Cg6VZsOVks8pTc3VeDnKD1m9DhocXTdvQAzCgFG6ryVFjl87wPG0u3/mwIfW6vlwljA5swKM/6WoPY3o1iNv5WWrfOOa/RZ2soeraf7RWDV+VVemoX8nSFeU9AEU2uyGdud9YciBzo3t6aPNoBIk8YVKVMmKLoNj4zaoTjpcB1BEqjHirNdnUscW61aLWqY60/0LJy4JfOXKIc+WHH3egNfDapY0DhWtnGBc+McLQ9vlLZ5JNZafFRlW3bAwPcvjyg7VTIwaz8lWr4CeEwp/dl8noxQwSgxJzjKqWHl4KCeKuEPSsub2hcXPM0iVzgyVBjKgITKtFqKn6iSUcFPl8yQ2iTxLLJPKL6OnLw9+ArzORe5xZBVOwj/yInvPV4sEvhmv5oerGzcZ1b5HytrHVSuukKygYiTYxk4Ex0/FK1o0v86nJVmTOmn2hU1UslQaeLxHzkvG5V6wtGG9ad4ru0ZTEssPEXjaJs9iHmfMr0WP56e+CVEsZRIczAML63lQxENI3Kl9KOyRdoc6mX4g7kKTkCv0jEM4D3DnYRXfn8Wm/U4VewNSyhwPknZbEQeEVolwY81Q/x5ptLlHBcK/y52NhOFcucXQ1C9zORZ0yhPBdp1WsW8fR6ounH+TLLO3ap4o6ODJutHR4VNVBrysxHmeAUUBae9gMFvONK/bTxjF2nexv9YDUeXAhscsNg33Scjx4WgsykOLlTkTOH/g2/FTjER4udkdz54Jab/X/3gnHZ7TvBUGqlmZo422CPGcTkTvFdwBxwbFfIBP+UHiBVmTgnAcaHOchIrPcL0Rj5z9NQFsjSWbJF2K6prSSSWzFplIXNKsw3J7v2SJsTk+EPOWJvTZ4SyYLTPUwocX2M+cti9SeehF9a/HmofEpX55lDzLkN+K11Jgzj27XfX9FhxQFLhFciIciq1Whrs5PdHfVZq2a9lOnF/pQVTRK8RdydnfzG9bOWnuKXK7kmsffS2MB0s+I6TBsJHpjQ8/rfvOhu8rg245CLvIRsV5BUqVw2VUUNqa8Y4w1PBZy16C5LcGqpAvJRbBwpd0VBm4vB7v6DtNQxRHtABXcFWggZWDuBfMi6LG1pRdOPzLhkpYZp3cBNsq8jFypZnewgTHlh6vaoWf+yi7xBWB7HVgrK4FUAdNZyB2PBOOJhKLLyqYuqkSaaKxw1urWVPyE8p8o6RqegUPeK7aQ0D3K+JF7fAUeYiOb5P20OdpAlLV5ccP2wUmMtKQY5TDwXYBNxKgrYEysYd8MuWM9HhG3gPj8b0NjUtlcQ95WoV5K6dPGkosIa6IsICoKnSM7ls7+eCEVjrwv4wk2AoLMaTngycIjx5SarAWg/07FQzBBsJGBWMIzOl47kmG8uImq/7bo3fBa2N/HgoxNd1n+QL6FCH39nsLHPJkd3QC2sOou5x9dqAlkdELy4nqxUDmKsq7qQENYQ1NKpUwhB/6vr5q+/GAzQJjMd0SRqpQC2z6n2qkofsQ3YzPUMH4NnzsgiSUiNQZmC7gYERCPdJPCvx+a0CzQJw1GL8pjFrhov3rciTaSZ40LYVA/3TE10L3c+N8m8ym78YGsFSSJd5vINzKrgKeL21F5dHAS2AcQ3IrPYxZtjRb4tJoXcoOInnnoN1O3COdAu7iJzyfv+VEJexWS5gs/RvJcHMsBbQ4uMlr+gSyhpCJ0BGOCSuIjY3LJ1RaMIs507RZsRB15/WMzFVFL7NFJulEPegYp2nYsZC+C3pGnL91DZtdpPCvaxEaSOAAVqROstxPmiOLR0gzjq2SFXuyd10PDZVDmcNVISVSOwQE2OK0ck3MUD0aoOPASSQmxfXmWElQ4MHQDd8W5/uEYZGNn+KhrsF1hdKTfby3BPfQ2iQpZeG8aLhY0+sckSUiGyCbcFYUf0Ao9OECWhxh9AMFlkUT7oAMsQ2ZUOeZg3js0kSs3wsFZHQncjDz5LazkTHHOLOLWaZV0LwusbDsmZ004aUllmtlhYv3NGDc7mz0oKUaN4xUdcNT5E/7kNZRzZx8WpuIwu0j+NiEXVpSUcRqO71u3uSXm13mY0gGJfW/fFWEJqGi48WHdRc/PKOM9zOeKz1H5nH9MdMXV4wVxuMnMuauofMNielXp45i/KwU4RC/+Z37xHV3TnCS8wptXmAEgaEtQ7M9BJg39YncpideV3gWdhrKuU+Nz8zxW0MGxQv+UmsAed1Iw1SFKGC7KZcwMKSSUQztXJO2magAQR2Z42lZKWl1Lpy9zZFKqJPB7ZLvR1ZiHuLLYT2ssg9Lbnu4W2E6hxwMFlWPytJ2VE0hpcysXyLvJGI1wqk11hdxM6HzamkdCoBvYlQILJJjMBY7npF1cJGAsfc1WRkx39S7B+CMHCWq55oF/nQHwaOK+65uyxaB5oBmB3e1WVN+zeRA+05zWxXRCtWaa6EzLKSzsAPTc9oq0iQTFZ0TqwHfoH5ib8PhG9jN3Hdgc04mBA0SQNXcc/eKRWglukkp7B8fv8QzxQ9TK6+aZv4we0pBKtgojj0pKUX7b/X3s7Ru5n8n1lgnVj0eGCvt1KKXFpb6MOqmkLHqvBX0zdzXcL/IAJutce6RA7qYtaKSXaMA3h5b8XirSoRlJDP2+OTDxN+KBuka+fB9HbS7OtJ8wSNy17hoVBQPGs3eQe9gXJAriPdRPn1i58BO25Lez/DnAnozR3N/6+ONMC2vOEVj+zcWJk43x4VvfvZEPQyr63PVoJ5d+jQd5eSsie2VhMdN+GiNZ5s+GfXJJH1DmcvENcvCe1FOzPeIR6+Hruwkc+HpgAEMWP7TCHQW0CfBbo8DIWNi7u+9IFesWgEQdgCjRfaq2joTIKfFA5w3UdrCO1pQJtwJDvTlMnk1xlUuoZgXxFByaSJLE0GSdKZoWi8BEy8m2knMJAdVA96ElnPB34YDFXUv6JMvBGKW40YrbfVhQHq05zV2fU9AdkIey14mFmpuZEcAXS00r+22VZ2SjMymeVlyq00hGbd5iERQJsXm7N3aaYGkYpZt1U9BzcEIxlpxhCIjmP4PR6kQETZ/1SwjLfnp2OgL4Yl9o7f+BDxuQ9yCYQo95Q8PkVzEkgNEA887yT3my65CewkyDtJeLNm7JhpgSuMORBNtWq7PfWcfZufR+SPn5ulpqHJaIi13jYagG5oJL/uYZFhNvBgQv2JoG9mDzfiHPWbRuZu17qPJirKBHe+Bh05Cg6anW5FovnN9xPbvLbjMoqZ65FdPYsFF1T0S0yUzDlnp5TWtWdgVFdaPu0NL0N/ctWEXdAgWKHzC34U4Wu6R2ElKZjcZYyfJg0YtatJTi/2cTmG55jF9vxKRTNuDwfOm98VKId3frSiZT3s46g7TpmnsPG88VWLMns1SyqCxL8HNqn1M1FjBMzXt9xF5UbHpdpgoYvVAjwTRUzGxk99Nm+7Gd6rkFehxdgytrZgYhe6dcIPNQbZ+85t/mJyWqnWefaTPB+SqzORxPFg9pCBAL75NMafJZxgsgCZZKf2SGpw+Ozl5+aUcc4fMHRgSDjWho8r4e+fi44O3q5WExUDmT3dgstnfK5zM54vG/7s/MkCmre7NTnVYAApoPCEiHRS9JAjE5xuGC9VAoac2co7++ZK4aIub9GTKesIQ5KpBd4w/VaklxJiBEk2fN/33B9t3/pepUgxc2fqZMQb/6DdodVthwbyPAXOc5G4i8mPGk0XAaN5tF3qjm7yHoYWIIRhSM6FBeclN3FHegmKop+FnoF2jAEnRo3j0Tium0BBufWNFFTZfKtsX2fHO8W/vfOF72CDjhHSa7M25D85+eK81aH/CQ2VucaXFEAN/g2bVdzEzPGB6gGQFAkObO8dljCDy1bj64jU1rUcfLlxpDpZkiDtJkxAAfEZIebVbY4NX128H0TGVf/7pUrr2he2tU+J9eJcq04Tj6qgBNPpzJuayv8HbKq4JgAx7i0ZEo505HV03DssABfUwwt5BGivb/EokmketDo3AullSEp2ZFsOKARu5lFoUfs+5gIOiERwayKYFPlkI0lFx8dx2O5Gz1FTk+iImnCBstf6PN1iKx4KyFTBP0rW5SwgUEt0BOjYpQFNhHBKrz/n8FfvaIDXmubFHGa7S92YjK/Pd45X/mgY0QTGnnqgzcWhXKAXP5KMnaChoF9VX16SrfA+TTpX7ZHdEW+/NzBJ4SSewgxhrhLlPhtK1eLnhcVuRJSqGTB6dwviD0FsWd6LZnyVKekv3kMkYITtUm+Lz1uouFx+3u+mMTfRqYie7J0/Z84rP1MaMJLSfPXaDzvrSj93NqA0VmCK75aghz8O9uadj3ZIp2e4YlKlu9NbyuKLJstypA4iV106YUukryhgVYaIi/hxJ9UjeQBjDit2iIDOVjtamdPWBXTKwYawipoWYShGkDm1dEhG+PcZpak5wkFRu/JElw7PSPsTzufs8RcoZY0NLt0rMeU4bsqiVcdPUK8Lf8+2hvBI8rYlgfmVkXMn2jLw5G6jisUx7OH92UODbEQuua+52Vi3THsvJDjzR43Xui5lFObh6AvIimpmXzO07wUD1sBMR2T3qO+TDSNWlakzk85WGb6CJ/MjlA2o8J0Ik9ty9bAH3l35cRszVP6U0Rb8rzFcte2QDGz1nZ3ntLaoR2bFfR2bQpr5VGvkfIZYnYVEHLU5284HX9F48iswg7FerNhwhkn2tInG2TKFccRSUFxItJw+C67b5XWfqDozRVHGp/VsgcKqlBW5/wC8bk0hE6yiu4EeAraIVMfKpyCSL1umx1GWGY2tp66SSrpOfFbk0LToay2iY8jQ0BigIyM2O49acchTg0nhQUHfirMhs7/0bc0UooAWa3iu9AclCd9KM92+uMf8PqBeMhoMGMynCVf1iyeoYCCJoEx4Dsyl0YKD6HAxnuUL2xrvW06MIgZoQKkLSiExCUONKmi7RKPOFjLFMhJ6VB+7fekovL6MjQ+75NoUDSOW1M1B4WQrbe9Fb8t0lCm7Auck0UPsD+2pVdCqSfUcPoQ+5Nd6/4fj+78w+obcOMO+0rPwg/9K6fBKyBVT8svM3+mpHNdwFK8mc+w9KFdqtJz6XjRAaAMsf8QdYKKDK6pjgyG+sW0yWxOS111dibEg0IHnRTURL04DQGnbkFdl+tE4f5rZzLnO0i2/WGYKOe7nlYvIR81zf4zne4F2d2k1mHHBbhllN8/t21bZH1wtciTh4ZnPDvKPnBhZYSXpFHL0TnwfL45w6umgJznZX3vz+tHB85q6cP2ZSMB2+J4HigXeuSyaR8JFDNnMfcSWxvIy29LaeUMrGfE0oldvbdHsC36Mizb3CmNetyr15eW7Wl2b9EEvOPTCsdxvC+YchrJNxbVnUHCUUt4laQHDlsWSv9jm/1Q6PaviO6smC3C47pKJyJT/CHvkJWZ4X+bcEzKQBT2Vx4reBZX+OBHu1dwoULWNndTgFrwbMoBEvvavYq8SsvVqmI0HQN63aDKb45QZZ+iF/dQe6P+Ioef17m0TDnxnQ/S4OSzSdOhPbXWDmDN1Wh0nwZBdL37AEw74HX5Veed9ONo+iPtmw4QUs2YmERsah1axdvACPVxy5nMcI67kM4mObPsrSs30q8uHewM8pqkt5VvbXjMT1yiSTm5pRh2z8lWj5BShFt5pJbez/7azCDdhewhqDGJyGg1mu2AYoI7sCGpvO0iUVAjQPCT2+JpKoXcTwZj3CuxGa5ls/jPTwUdRiVLUUVAjK8n43GugCsqCVwVKvB4DuZyCSZyayk5dtDSubIkb9DIr4s0OmnLN0WoZYqY9DyIIN60rz3D+fZDDnJqvnyuqrcZm5Bs1olgma6JxK+oIoAgydC4TehEUfQaz8kwnk8i0AEX3bomQBt82PyM/K8lEwlRWASUb0eAS/T7Uzg7kyTZDPHGAS1DhH2lgMY4PjCPAC9e6na5sgt0uEsE2fK+ld9lknPFiRS5ce51Q9IZhAYebTO1wybzO5hwttFmOQyOYlZfbdKJf7EoQmLDsieKeWci1tzR9SS0lRGsDtoX91jMBX3B3PgV244y0cK2BwJKz7Gq/fVgydWE/tD5o9v62N8JKJR5USSkl2DITuRkw+Wd3ssGsYIhrO4NA3qIAaOyJq6WKtjo/ewzvi56k02IG4TrVLnV0O12q17ZdgkSHwSsOn+g/tikwYRZCrhWpyeUDgW9vlkyij3fNPWFLVcKyNXzuuLT+teMdEeq0SMTpLO4DMf+EWbUJ/kCgCYiF19ahd0GdqxE+2GvCkXdpLzUVBDIsE/5ZWk/FL1iq/o2uJ8bGalRq7PD+1KNwYQTrXneB54Qgwsj2Mxw5F1Fd+d8PPP6aEPlXaFik/86PkpiFWon6/2wAcp1DEVD2d3k4fJJqQNYbV/1xlvkiV56XSRY5z2WQQhStEEgQnSgpyhkYdpSG8ZQxnw6DNvQ2cf9RbXiZfPPQtNw4JFI12TfnApZFXdDp9IfR7WDmnNBMZBbs97vqhNQn3jd5QW3YuARxZQ0+4y4DErl1RDmFjRrMC0sGfC9dRkdHHLP+d96BggZfOGHL17n5AplDtErc9a7eNh6/g8R6oM31XdlwqGdD754vv7OQdsAW2cdlczba/D0k0z4iwlps6IN32Yec6UeKnF98/vLyZZw2losheCbbMxM6UwVZZ4zcO4KS3CfAyT/YdivTm2GWPGCEJwqXYtJPVLvap7X1CIQnJls1lwojsJVhhxhC/3cOuS0sqSr3w3sERNYvmboBOQuLSfzT0nLUD4gbW72B2BNGpxMBT0Y5TA4SdT2Lfy3hg/f+SLhM81hieeQICZ4pv7iAXNnUvL4jcYfZvQyeUbOIwD6tRQplmWrYOBTAwCcAPgnOcEbQf8F0RkEyULlS09OKHHq15GiP/uPW9MdhVuyfHDgBoKF4SzgCSNIz41ImM7XlFceSVb2DlGjQkPCTIKQ7Eh5P1/ng/ZX1Qn1fH3qsvtm010bo4pah+KvvFmX0cGuyws6Jh9GsAkwtlp9Gv0YfRkwOUXKN7+2s+7kP26lgT7nvUr7Tpih1YXzFTJpKHipF+gik2zobEABXEm0fFq3UN+Y8imEgpSXzNovUMJEzLx6PUJR0MaPoiA77Yoxoj5GfHMhTlIVz3At0lMCFDCSPBZ+12dKsbt4TgE2HSMTQqoNS6mUzTXw0pKRmCRl/UydvhDCZL9Wii/QOok8a3aarNLGnXV+t3VJNWVdXDqnwhrr3TQnzA812FGMTzUZqOilt9VMijHL+9Lz++BfkvFmyIgA3ScVpU7v/36WxmyU4Fz9HPUx5N7knwV88oZ7jJKxJBtw7tDEuvyirIsX4HSv4oxrcbEQUMAt1qfsMnpbO009zNlwoUJrobiUY4an+nA3QpRph6/jxGCiqbmCtzhO6Qu7T3Z5pDQrCF3YNVO6cfYB7LIl0jSNApONc+eX7v84r72Kc8HjEdk2jQvefq9kyWEcDSllIxthfBWoPs+6Y/QCH9YYoCSmNNTciFiVJr6iAJlzjWIicnE8lu7HKnCvV8fV76IZw8cXo0fn4p+XzCxk2L8nUSv8WQpW/dHKzy0Hzg94eIfZwxc4gV3K6+d8tnNVSfPExHrLLofaCl1Pc8UsmlX1lxauts5aDXEMZu3hfDn4Za0o3HwBaxFuCZOXoOcmUazQQuGytxKOAZdvAJzawY9ASE0r02zsFSdwYbN3wqG9sj4q6P6kHw5mRR0spJl20W7JB5a18QYsVG+aQLbpx9erveUMBthaU6U0xQmvGM/2mYpg/DhWHq1bJk1tONNigNZMehz5E8hx96duIfUBu4EPnrHqKY4+l/ZjDm9P88nLyvwtufNRHLtk8hI9pU2vQe4Mcsv1dRbi2UqWU0FepWwLZSdVVEMqqgPM0sUZ3Etg2oEL1JLN/sLuGPq+HDkmQ09KR+HgtaF5tgNi4RMdjo90VHlHQ5MzD90IujNFfP4H72GyO5WGGGvkS1BcAzT3SYjF1i2Ug+xGxjR1PVhkq2+vwkakAbq1LReugeXY156N9lraunFli1WM126F01fFMVsbI4m/Ccyq5WqIIHz4GLMnLL0+uOumUaXWAmsO2jyoSKIchCdyIcy1yoQBWxg7JDhRF+o6X9UP737rJm9qa7DHXFyGLu5nG3OObFI1uGC1EV6M5tnGIYd38jan3LqyYm9KdegAHHmZEox6rAWTVuflo2hfjhYh3lw65E+u1addqQc/5z6DYTvwfZz0Sl15bo3E9RsGWVVBaLoR1IymkN9qZHY9bHmqyb/C20wvGkkVhj/VsK3koKlCz9NkeJc60WYIdihrHyofEq8la69OxrkCgch6CtBpnocFmLDQr6l8hhbVp9xXxiVsbsGW46E2u+8gNGFlzvJyK20xlEHhvHWBTXPis672hvrv6K7UVS2gIZM7j0hOMqpVW+20dxAgZbDwcGVC5cO9IsJeb+aFjdDlJbFMq6JDyXMbTwggWGHm51301kidezOYXVAByFVvcUuutXKjlEcniy4FSjpJUC4Zpzal5WKz5EkHjxhwr5Dqmnd9cFLnBPvWS273qke0I5y2zF5WE3BdUwqqkqporfFFjd48olU5sfk1uhCNFK3yVhMUlTwzFbPTVD7MBaq8+7TRqZKU69yYXMpZraLMx5t2VoV9U28jTT1LDLNMu0sLGyYR2IWdmIEbnse2FJhiVTkteknX0xlj6wmFEDiCRW6pCLMkBm+DxIS65moFxxtW81Y1cwWYxd8D3RJWJVJak5JDU7CTddyQ+ftT1VH9wDCuz9PPt0CpPUUa5PhI3rVZXVSERs3VR7HcyI3lTGhgj8v7k1GYPgqP/KGH2K/JsPuWEreaFkSOEExx9NEIKyndsb9y60IdB9JH4z31YjV0589Zzg2kQppuPMIpGDdGbZNc4TAbMsy7doQQXPZFeQP3CzqGILU1iyajLle18BvEuFVm9pSQaysjUgNGXggm1TPZalW6lhT28D7S7lUtXTnCgl0j/edMzmyvoLJfQsMTt6YRlfmF15TbfsiQi4+0Aa1VHY5mUHV7uwpRwy+XeFiWSjAPhFIOdOKU7KAplj/3WtBbXyaMOuz2DDDiiNsgLB2EmBrf0S7khFO/VV2IWx+tjcdVaFeNmDDgb8w+9oEQ2Soa8VxqQsyxEoJA4VnEZKRsmbsodYAev9hm/F69DYs7f87ymZ0QSvf5dZS3DxT0UEfevMVmPJI3Xj9oJeTgznuie9XA9XoZ6Jdeyaa9sQVOCkV8dYEWnaxrcs5idCYGsG1ajG/TKOCuC7u64+DIEqioRR833Y9Q3YaqyOgKoIMCXsuynClFuoJmE9WxXRWpQdEjAiyA/QXTM/WqvUfE0KgwpMDnKSYxrttRCCWsETmoSXj4hKJbwhTkkyIHjgrrQj9Ap2LDckdRVDMcIQ5TTz7xOmevl45bnzELOTQYGKnSyIn4dReSoU6ebesDOXjgW/eCdKUedo/VBGWBfGin5sV1vGsnLM31azDqfC3UkxV/mhyOeD07eI8Ng+i/8lJCi+kOstsX1cnXkmXEZfQal0n742c15s1szTm6af3shvRNKHvHKHWCF0Wriq+VObQZKnsY+iioQBSqgS5P1ylM2KmQs0RxEhayzNt4syNwP6fkzNyoQXGOFThPblZNM8hWxsR5op6072HpS//9XLcfmCUI3/0fPZGrhbNk2f69X2kJSrJBqNB99BXrVs0Qnjo6BLfZQYXb5enzue3LFiU8Pg3yB0tg7q5GkigXcHuOFRwse8Yl/y+YQCuy3KzqVNP5k0/LjhhG+pP/F7lFroycGMGjaILeksim78xNpHYU15MWV0FTBDjluIQpTx6hEOc0SUCz8MXwwvyZSbB8WCHypbEvcSie2kEK5KQnLTypX4n+6OdFuAWziPy7rmO40VLEVmukAFmuPUxVx+SbnS67KqNNsE81Alg61lOGBL4jQ8ys2BBm7l8sQEdXeSEHP0W+3G8wBWyLn02YWy6oEUmiO/IFhAeqFEM2locwBXw1ZCc5724a77NMDzPSAfCS9RSBZDN3FSVd94iGyYlEmTXE2JfA8BTr8hn0S5Z52qevUa+o9U1gkWZ4Es777nv7JnnjOQKNHeM9wDXPvKMk5dqAjTLXBy95AgiUqt3UhXJnz0ms/qsiwMUkVwOSjj89wPcSZn65GeYUbB9eqVsOk/hU6LT+v5otB22f3A9p2MQKNPFi4d0jjLwfRiqLEwaLhZm82Xp3Og9iDfs5AlFMWlJIsaw95LWaVaurGiY9lwjDTR/nygzU18LIgDESw2rLCWkxlP8hxjsxHbuf2QJHwAnYae1HxcP3KSOyp8OkcgxCc3ZCxCrWTg48i5P8naaGZeyUhUfoUY/INVF1HfIvtB3hZvnZlWjBrSU/ZiOJZ9CnV3OtGw1V6+C3yFUjg0dndnX4Z1rxPqWk3ex0lZxtONLfYxfHaDBdg5uM0QCyl3H1G1cVPOjRjEpPO7V790hDQZPEAZEWg+l4/SbXS6h+D8QXbCVUbKygRKhDJjQasPPGV4yGxydV4mCtYGiqwnAPCwP2pUawim9tM7EY85yGzuwkl+nCulnNhQveNfkL0QtWWx558VnyoWOmUF0GSl3/ghItQ7LWdEZ+6srTBW/DBITGVOBHIcDOBxqgK2JamhPwBToTKwMUL/wPROFFKfzps6bA7CU9pSeIvJbaHvMRCFCC1AgbuG6ZA1mC9WpjrO9kswi8aJbMbS77ogStB1ua/ru1bWGro0Q5Lz09ssn3ceqQ2baAc0k29qSj8E+yUzQ48l6uBOn4AVYVZ8yNzOF5q7/OLZOTnJlYT8HG966E+uo0WHFJUQjztsA6YycJAQV/WoKiC3aLBx60gud851iJLzi1qkhar1piy8nGkEMGM70JrBbcufiwG3X4F0Fq9U6bA9TMfmbaIY3BtLK6f10UMN3POOV1s+xTGgUcQO9wyLh9897JkI3w21cNkDo2yBGNyfP5+GDOXhQZ+7jJuHV/SqhEqaBTUug+4SVOFzZylB84Q51F4otGpgWejqncfSbcPTs0EAMmgMqxD3ztmr0x95u+hUH/GCXboP5n+VjwKnL8E9NDdXt2waK3Vre+2jFsSigLVDkNmZReMcZcIr2bPb27CGd/K2pvgj+s8/BC/kH2xQvwL3yE0t9uHPNubLFS6T56km6N3X6iDiPxj4b1xI87DcvtqvYtl5eCrFD85se3UCtfutOVDY6vA4IhDkNz/4QjlxOXxQp0ZzqA9NxRDxn1oLgjc7hFFfz1aefUgRTRMh+K6XyCmsGB1tiYtgBz0DbGzzKhYnzx/92PK1Yx8DZZDsJvGOyzQ4x0nLTkXpNtupSf6s31LxxqsWCQRxmyavg4FIp0pYNXHl7o3evrSyXyErZjJDvclZbxRk7LwYwq8LitQG98XEmZmmAJsiODpQeZzR4V/zSjJNP/5OLA8/dFhro9GvDWeeXXLngFoMk15zsgB8E+6edV8AK2E9XlF3ZiM7v6MUpcQ2FwTJIbvAemLgqa8Bphhyaj9o4vK26OkXv5wL9p19a99SUC6Wa/bBMKUJuRq2hu+Xai7FmBTBf2eB3Z2/aUrcvBJxFmBb9VK1mTxG8WAstSTJZIQSrUMvnyNXho3FjPIQAtdo9p4f4u2PqpCkRE35QtiJ778BmJXSSOzZUe/ES1abze4od7aI1QHuFrj+RcCeOWAU690uQTDO5qV4xpelfei5UTgzdimb/48ZmX6VbCsyXzebBtQjLd87HEUwS+nOsirYV9r4FRruSUY3hUG8lWIkS6QZrO4wUlrFBzsPYQO5ATc3bNw3YJ8vF8k/6otsFlfwozWfuZ/si9shiTW2DdLBi4llOWJgHmjKaQxuM3DHLk4fA14NcKWP2H2P1GSCNOX6N46fO6UMhCOyqjE+iWClplIHFIfqxj+k+B0FvSWzTzQwkxUnHreDDhiy7I2ZkMuGaUyNsshig==\",profile=\"desktop\"},[\"recipe-server-release-0.16.3\"]={public=\"peworConWK4sP1aACa/6Nyt3WFfA7i62X/l8fqLJM12QmIFZYJSt8C2K8TXa+xo7HBDfTEa2NqxqDZNx1ne01ZFY+cAuKML4qwxA8eGqJ+6gEIExuGe4TEfTpgMsF8vGqYX7jacM2VXPC2jX/TKBccqh8kNOv7vuN+YqFsZ/OaD6jxgsnY640XLoQnXbWMEEoTVsx8nj5z91dQ72RUCzqF0PNPRk/InerZQOHVTVD3smj+X9hmO8PjDnjVPaJQkIF6RpRSyBmAsMqY5z8Of2aLmlgpKF0/kze4lhpVJa+w/96noT0v5IPDk9P/e1LJ3uwtpPW5hz0yMwtTy9CndQ1RHLKW5M6t413v60RWxqZRCdzaOYIJG44cg/Cj3U7sLSlzpftxWeoUhoqH8hzpOA6h5Y3rLLvST39i225xP9HNTLOk1SSuxM50gPhPyn1YqimbEQwkvdGaOI4ZLHarrJhRF5zek0LGW5rB7Hd1Le+BWZuroKIg76Ntxyv5I/TVfsjqEISnuERwfuwNi6wdatjAho0NyCXAnm22eDrnFC+g7OFaNwUvpvZC+nflfvSwbPOUqhGc1ZozRwk1+3Zf5ZkofGSADWsMwM1hSFU+CUyB20OqPe83WVBh+cmzwqKZy4ynsq5V9yptHbFRhwHHNGLyPeoOSe3EcwocRsUpdBldZhZCm3sLKHPySlhu5Fz7564lHzzx7jL/GoRV6B0ghVQYB8Y3l8fBWgdbyxz68Q6toT+7yFtX8l/SYsQZIeH1OAxJ+8rMxyur7hl/eupadd/wDfLRAnXh0aQo3rjhUmLXkf1Kg5PDi4CQC0AOF9IbIdOtEFl/Y1eA7/qHCYv0hJtwBNcGYhoFB9y8k2dXr/WYpw8JLPebL8lzh/oWM2U1/Zp1SDRwQhfRl88fFjeGPeTy5B/PkJrAgEDERXzYLAk6C3Fvmj7sEFBA+NtVLteXmdabf54yFT8VWqEmCIu9z1MMLfVxnE9g06rJkfZvTlh9bPtkTUFGt3661RSuPQig6FKkUKzZuEUOSKiyBOvbQnEAv6TdS4nDfDseZOjFfRPPlLeyDhbg96a+XmfuiRn4w5K3y0eedhF1Vf2pQ531qDG15PhhyswUH9SGRbyGavrN4PwPjjBlArfVFUmmLhIeh0tNzmTyR2oIbsdZIAiUvM4uMtVpzbC1mytiM+0+Jg0ruwCKIRhyhHvCqPoh0LqSDkKBTcTxkjomqx27idOH4Kj23W6d/LLEnngnsr2B5O1xtvpu853UCUwVF4MhXQEkdPNZv+jFgIHa1w47aGRJrVrqANGiRSf+KhWb41sLwSr8I9hqJpuxAC3ENTzFVi41CrG5XImLZndwILt0XpQ6KSx6PCY275A5M8BR74jYJRnf2bNRmR2vo6wZP0JX1PXvabEY16KPZQeiL0XYBkj7xax8s1WcAi/h3wfM+CiNwtx6rdxIxel/S3+FuU4X0cK+MivJr0Et3zWFX+8iX/nca1XJ6wVsZjg50hRZZif6IX8jt5O+TGT69Ur0Jmk329B34ve7FpKa/P1fo3IFTlTxkg9ft7NfPMzdaXThvMZ5PZjifYSwZvl3Bk3jAb3s+rbTGC45yk2Nk75qUpnIDahUFpNvqWF8BlJQYiEdu7feNqC4hZZnGRtT7zG4qmAffXgKC7cuW0nn5X0txqed376aI9eWyEe7rLTOWN6MuxyaGgzDYR9Udplmb5yuECYNEUI9ji77UK5axOeNKlyFNEEk/TIzhIY8QzMHM39q7fMnSvv1CobidSG7KL2PDZunmt5QuboeWkfiFc3YCsN9qh1b+rE1tdFNCNdmjTTvCiYsAoSf90FIT45FGGdH4cv7Kb6xJXZP8Q78qCGkKzUrSqYjTx7LgHwPxX85hubgdaxu++MQKdyDGL4aNi/ASTrJ9IZIUrPs5ilE4kIv7zMctDeYebvC+LVgu+xe5Wvdqpp5TZXZoVfLbAxSvpHfxJPE6FykVDt1yba7vDCkETUlDfPC6m0D5bIKY4pS8rK4IzKDwXWqz5inlek15pdivdhVpg5yWFtTrqy8GMXYiFst5PP3xAfCGhTTYpBKj2OEZwrHsiJ4Ba/+ElW3kTnuSdp8/K1yqwRdFm0alhFdNkFTPIpAqEpmaDu0j03WmkyAzNFhk1dLCtiME1MlwknYq3BBHoPnrG5n+voPGP9L787oHFTDNJPcaLRp04LudvJLAEnWmETrXSlzkadvuGuX1AX8Mll0CpRQ7hYVswcKqeblsrsYmEm7OF2zea7hIrgcPTEnZcrxQ33xzi75sb+Bpvv6N9xn+1FDV4HaMYAGui+jB5bcEbCIz3ihEjhtyYbkYTMWTBQqUkvOCmh7VVu8jP+HuG4BovGS0YsrQB09HidWhazOCAUKLLE1eoCoaRpzHQiJQPmpbsZCMPDS8wZmq0v+w9e3yaxQOIAusqV0xH0r7bgXrNRBJf/0q1Pg7sITj8HUcC0BNxI6vH7YsvDWHkZPJqhkv0LmOzBuLivxmzq6lFyddCzMGzNMmKoZiZ0RP4etLyQEHNqYOandm6OdZvbUVDrzCPp/5nnwe7Fkr0uysJjUnT4qkXxnftnA94zhSkmGvFyzkCsefpgHp7+1CyP/k/jlsHB2bQ6kywjx35C0/4AZHSu0lylclSgI0TXWFPoy01CFbc7MCPxGz+Uwu/gc23tZEIFNX/+2/u4etxjVnNWlymI72nupAh4eCO+Es5eJWO0hHa1sTnoarjiVeWB/UK6bYkeGbSrhA3jhvbvQQ3csbBZHjqnSL5B8ALuKuyeYwXvatmDfChHOGmM8xX8cEbBY4WfH9iROAzVpHY5GdwJWWv9yv2E2/mKvtstMCuY8CCsAiyqutG21mIYBlzv+trqsd6t3S16AB4vphwj4Wug8IDZRXF22OTr7ocnPD2DxlypeAHyhPJcd0S469t2hdLeLkzM+aa7J/RbMq77BMQAzUMlhbA7uTCKwOsafo+MVfzVTWChm9b3x8WyvvD8AHirVPhPneYSOb9/295YAv2zIM/1/B3A1APt8FnjzHlht0t6H1F1r9k82PGtKSpOkdtZ+EJ2ubnMNopo9LKVK7AX0diK0EdcksEA6PM3QP/OU6Ah38TRtx+XP2hFvCE1RwhNu5yHc6IbdCI/l5XU2F6aTyvwAV3LeLs7HvZXd1CU8atpWhXkay6somM33HwB5LHtZngkb9XmjAWrcAeObZdKq69sR84gMUKdd1/YHL/mRctvDeWExJmwdp5dNgt4WlmXiz8lI4GOZNZvRZAIvv5aVo19wG6/fePz+3IZi30D5CXb0WUAklFcSzl1pVLL2C1OWapWy3pbWkalrccGklS0b3w298Va/9za5L4H/M4GkublAiqJ6uyrCaRPviR67fiJG/KTr3LmxQtcFwrN0rQjEq3kfNNWdnZ8tIOP7uE7Tc5LifW8x5pJHXeJ98zQzcq2nWMG/GKTffO/2rr92JOh65b/YYYM0oaT7pCg6bTb5OnCx2eDEZYQzApzLV4FayOcEChE3Uc9PSGVV46LHDX/kitA8cfex6qm3jkLI/heKpn0ZKP80c7gcZ/yOsMjdwQV8dnWk2ZegmgzCY9Q0gKTyqsMCAQG/SIxf0QNyb7LbuMAf8Hd9aUG89tlsVtOFua72fipGaJCYrIDIOL75fK0CoiuwDnAUbqA+mxW7men66VwwluVtimEKZ4ZWUi6o9ji+ZJi8HvhGYHMQQGgxKsvtyvET9YHyhqT1M+NONeTcseMUHg7ZAPRNSrzD54IhGiImJrcSFCSGw4FQhTJsTnaq3c76oIe1S0dYVO1Xo0NMPuzCXXFxwzgh+xECgCsRlvX3dyRgVj3Oi4BrGqdcl9VvxgWL2RGLE6FlRPBNi4wBUZWJmzzRmwfdKSf4UuKFdrqclKSTj5NaXxB2FV3MMm1YT47RJ5B6BVbFYjCG7Rp1hfoB6NhVl/BMVHBRmwczFC8vZ/ICAf77nn1rU5uDXgn5zkhhJ8a6AugDKln1N8td6GcvC7mOFOxU9cDFpYMU0qFnHf53ozKjP1138fWN2mgJFcRK7EcIvO2S5H6AW+suucY1tZ1fIlk2+Z20WaxQckIj8KRn1SZ4yNPlPsuqEz/OZ7MQTQcLIlkM3MO7azW+pHgKUfxHmcoJF1fpjRIu/Mu6yMQjBakkJOc2C0/zG7UnZxQiE3ZAz2iskdhUWKffhCFCSNQRJP52Iz6EC5oRkFGVf6nB5Bsvwww8AGcbT+r5Wdrqc5oO95YHnznAJuZDLHvSPZUBQs6erKYW23asCjRMmahHa++fV22kigD8QSjp0eGYg9srz8kAE+AJYWLdiutym5vSurdOiZwiU6WYBYovP1kAjUsLYtTiEnkgH2ubILh9WlMHu0azhS/07vTpfuH3FSJVIK6yZhawrZGVuevvYgTytmok1d5OHwuCoLCdvlKcCcdkdjXfatR3pIzkF3UkvXqGkPBeYeUWhPifX1+9jlWDW1fw/TzvyfmUHo7NxwvnBhWe3m2oM5Whvd5BzcThAgvWV55HgcZMmKYdRrwlDJlDWZZyBD9JsrXiNxsYhDZZOwlYnECvgUutgmzVkUExxoJmtHsVcBUcX8tAmo/ISiccPM35n1orYOs3qngFe1hVDv1FBtTBKMXBX11vODI/1rHhzQ3xAnu7mbM6c2YeYxfEm6BkXGgMk+l9iolYhzHF0SusMr+SaNbpGiox6VWdvw7sg12NsmPoG0ivKJqUDyd57EcWFiyk6mDuCVwam7FFR9/3ptJAi/ab87V0K5/f3mCvuloWAikF41A5bJ0q2p5sApv93gOlZmK+KyFHDtn2Z4PpZJb5KHUFeQVYKYwKdNokS76CW0ALtepwR4BD3bfkT41YSgX6uWRwhXxj2E+Fq8kY20OObPyjvsO4FHmlegxg7jHj12vUwnr49Ly1fLrPlmgNuj3nIzQHm/6jhx38ZGcu1pPP6NVAUccKt54ssSNAR4llAKJ6Ubj53eoU8Wpssp3tcCyNDnDvlfi3BzwnTK8kr0BjLgHDcYbhx4VdaVF3Ta3g50aQSM4cpYOOH9otSw/guXvh9GcqwFirMp+ZQtucMo94kyjHtxKTi2269z7M8o0/luJTOZP05d0r1SufQMTTvkSwIAH88HLYdp4ZIVXvVRKdZ3Cy/RqFOAYXwAeKFvzz8uJaUxycOJn3Nea4IFmtEjKBXHPJD0wCZzTV8NbIMIntYsMOg+IsYlE7XVKuA10yS6c0oshNFMk0Q3/l3sX2GIQCAjZfeXqxuJnLISut9cHZziG5cfAbBM/3nfz0w3tR/fauNMMCEMnLITGoIr8GBJdRxva8pFz0nParkwQqCKINpQ7WYU7Xv8v007NPP7OnYAdH9AWEBlp6LAcKnGBQIurA2PjVcOhoreUYk5SQwgXFp95OXrQTg04uLvRbwTbOci/i79hkvLDDiu/LsI1XyLUTRKQ7uzSxh5mjVzqKnZ+cNuVXtVg79qUb0hHuSPf6dUFP0hXeS6cGEbWeN4nyJRyApepbPA9wztYTa1pfcP5bjg8RFunhxW1P2IX7Z6gwbmWlCG5huvqaez4opEy3YHZmHPfMI60VS09OVJI7Qp2eNVeiPKbDOWeDi3pjCTE9xJGgSzSRjuhkYH+foYt8x5K5R8BArDa1Hynz46Uq9u6pkdkI9iq4dIVWZTeMOzmeclVpiJe0gWAAvBFdM1VQaG9svBQCb4bhGjagqufc6tC5+WpAy9GVum5ckFppdgVQjEuHCqJmRpjAtoPSN8c+dfynTeWuIEs/bHs0GLAg8QCgH4Zm65mZJtynIWO5tzYGiWjr7kqV/7gvwJmnV3feEwk/IQPuQIEVB7hRtobV2x6AvWxKh4HHbnZowFAn1cAkaF4hGhSz9hn5aUXgumS5ToC02Irg8nXt1tSoMSM6oe78+yTbhXOKKWBWutrYRL/+sJO1j9+Pkgczaw5uAkNOyHqs2M2Z7aS+f7oi+roIj9c7u6zreXCVGrJ+mxK6uvSkqhuS3wnYW2RYZPc6h0d/HgLBNwr8Gvd+vdI+IeyNika/sLPgKsFtAIwI57mug1QQu1gHsIOm/ree0RjebCFBiWqhZWKuCnue387pHG52oIMRsQvaa+4Y4iPniOMAF39IfB+UpYofZZjMOyGD8Z++jxM2s0JAPcqh4ZdCEVwutC82vqtSrZvF5ZD8XBFqSfUQTrLbBnKjxQ7ukQWAvEdm9Q5oIkyv9iQRRii9ObwNN4F4aZAetXL//1tBsdOv4yztO4nHZ+k0rPazhPVdLx2jaDrj919pSUFxzf+Bqs2IjCvGMHpknlqzPdF4PhFNAzfotOahUzxSFK1nKgYz91XM8ttX23F6S5llRVoBYn/naTe/TbVT5CCVijrOAvFYNxJYsLT0IT5CqfhDfBebbQrIDe6K2KEmz4svoz9Hyi3iUrmdgM5ZgXGmo3GW+6WeznC/kyifxXVL4ygay/ivagl4k65NUsivQ2Sld5dzOWwlDXUMlxQ0SOr4ZDQ0w2ljgjAcPVMhtCmpagEH0VNHj8tnmgeO0VmS8JV1Z7hhsynhoc9gdOEjUUcwdS5BRoAymHvOSsfjix6PyJWuph1vCKdK46D4hjT/h9T0VVCaP9EpCXo715xb0A5vPNztEBS0a4ayL11uq9gbAfXRQQQjgmCHgUh36jVfL8TsPdkti+JXMoPR2VpYbi4MPv516qxP23Qf+YU6JquPc4ufvlrx6OoaHvIZ4kDXXWTw6YHk+msg69vHTAYyIqHoA/BG+70kRClMTJaBfGUyxOvVydpvsaNPfziQQxzJ8Oa9K7Fl8jZ3dSuTX69NLHBKfn6PowC1/noTb7StCW07aWMkfBovg6nqRw5iSLEC47n5FHJiIVo+9EU5I+/EWy7MjMVLvwRNu43OqzqQNr8Tz/AWohxNYoWKr6k+MekhQcgKSwJYJzvkafbCdpUyWzkolNENirUJonWBuCV/6JMtb69BFr81htavz8H5XiKINao3RqvSQ0l9zK/ZJ3Dcqas5ncRWx9Zs5tn2SMFKQpPyy743ldkiAyXmHOXLDA8TxGE1n1jdluCMVPLsCFicc9zcWTa4vawVp6IHr5UiZJtq2r5kshWdujurfblZFt/Jrjqau0vST4qZGYahNMKV6O/nrhn8T7tVEekOvazrnG2LDqcXq7RC5CfUWmdVdAV7BJdjsDAF7mYPTQikjChI6xjMLkSmJg8rst7T+lJyJPPdAhn0LoD7n7dx8SaCIky64PZcpLPstjzHGBpmuE7TW7cfyh1PXrNdvBP9Sz2OHVts4aPSeiyrd1f05EX3I7gFyVPeZjvYN2EqM6lx97KHBNKdJjVuZ/i+ojtReFZujQK/2u5vxDPJg0InqNzU5b1z7QMRXwDvH5QK72b3XtKTh2AjutOGWGsr9lqfYEZ8gQk8zQMNqpr3BHnjNWOdbAgs+XUSM5ZiL54Gsj+wh3xS9qn7AmZc2OVD3TYDroiFx+6tpR8SAtdiWazbNpmEeoRbK1VMaId3tkrrmcfYEK3K9SFyBHs2Exc/IMp8TKuKSLWPXRZCbqshKWiS2ZCWn7HiIhH14wnEWulzeiHtbSjB8r2gLiQZbJmwCmwBUdRS3rp1Qtuk+eaA4B6x194LU8nOxv9Whg8FF+UOKFqmz42eCr8LB4uL0KF2w5FJhNbj43kxbgmL1HuwkfsCejCXYkdAHMpPclz6lcqac/W3Nz/hHERE1pB/nrYKHq5ydEY+6y5emZNvzI7ZUQfjCB2T7Iw8hgr5ippG6CkA4imw09zdqJ+DJKHmDok/Z9TZEQTobCJo8BjXun9/HNLjNVyuV2v8ZRO7IRPzTmG5jOiorD6/F391RylTrnfK04Ez88jp6+DLr3pBpWpdACTpjy2jha7hZWjWIMrTTqgtJZb8QQXo4bS8x/2u1hmwhzwdicVcFI7ixIY8MwmyZ7pBfJlhB5U7nypiMg+dbxtEK1NPLiqrZiL/MxJcTE662154AmZeswrTJ4PEDbktBqRfNDCh01vxmmkE2NTRMqHGiE+/GoGGTWh/W7c6/mJg57wjNDmwx/vckD8g/xRj1tnuagc4RzXwPwdj+vSM3Fte/XnKlv5x2c90OHpQFyJMGBAmdyIOm4v9EAFrksChjqyhsoR6scq/ssDteSK25tjTLmI/QMaxfloLM7HzABcBMrJuAs5/vnR6u8W1OI+kwnBFort4PkP0egaUWLk0KAQg8uOruRQvMi0ugLXrp0kO2WLJfPyl3VsCvvpLEi+01HFDW68e3R2ih5Om6AS9aLmyEvoJmVOuGJjQmvsAGJJdGdIrsqErWxyEroQfTvPVfZsDMabZKKJPNCdRKjuJk9F3tDyZ9d5wT0JFgXOzRTUIZ1U+cXtvwCX635uz4xNNlZrmv+DndfqzSu/1LWyfy5Seaqd2KoyDXlqzrlzdYIzufLNS6Bc7ftt1cmsTXVNXnABZD25g51kP/mwoJlxR+V9pA7w8J8+g3IVKP+mw4p2CXXhM0n96xZ4jv5gYSQVMy2XhVUgiMYc4+R3K1NTqgZodMOsP0as6j22mC4zkTpgnkuQRmsRkWqXE3yt08Dp7OcOGChKmtnfnZMNArQzn8bVRujKx42zgFfyYg7+6aRtHewQegScWgWadK4URU03BAl7zX1Hvu5+9MAalEoOq1Lzimg7t7WCS9IyPOjaWRQKaHXC+UwSXJKqzPt8c8XMV+RbIA573NhQ9M+fV3I2rXIlMX/NuB+PRzM12WzE6/jV6fEvLH2zT1ROxOxbCBr0Xvj8M257RIbt17ApLfCklSV9Kc+j+8xYA/piYFrGGaPvFJe+FwtpQG1dK6/rWioypudPxcGHHkFmjxE3OF7nxHLnmmVEJ55ljiOIZqqAY105ugFE4uPANbHroweXfvwWUeoT6f2wcxVOCpyLo13yotJMx7ctovDHXpa0Y7Ae1moAxRpFfRGfc3QYeu3VY6IAnF+hIkjEKisfJGcPh5sWnIwYqiGa0m20e9cMOpPvleXsrdkZMyxOmDj5/KQme3L19hAHYuqS8tRec+jYBT8USR8ygrTpEbK/uqvSHVjiNY1ndS667yH5mVBtTjJBiHIjLbpUxrYyvYzBin1QWCZnWLPOM+RBWFiJ0OyCba4M88m/oCVb1izUA+gsyQftXgcacipisOSvc03qhnWrchFNnT8ZttT6lByzU0JWVoBR/h9XlnH4g6lf5if5WdJwtWpaEHkB+KSk97jQnqSnr4Ty6aUpCCwoxZbbuTrKgTL+uObtZobrNv05vgdyu4Mw7MhKvlwPbMrcwNa478jWranb0IHleAsj8FmV+QwuC7eb2ctPmCuvhygxdTDLmnh47cIvOJEBYMApSleyQSfuzl34qP7VF7wdgC9txxmPC2vRPLiJYkRmH60KTribRCxU++liyN4L4B0yiAlBT3l9a2pCGZU83Fne2tUgAgb86FSIMl0xdaYcjcQFMRBt/6tVjSYF828blzN0KDa2sCAx6DJkAfThAq2h1lnkYPRIIINVWMz2Y0gGC7JyohoJeMa+sh7n3LTn74gQfcqjYLDVCe1mDIRLJznqGjq/pr0xBQVpe6F6h4ufP1d3QqUJjMKpY8iy00hGhjaedBZtsn31syt57im/aD2xDqaWeIwbMBsBFwZgCFaouCj7hDVOsui05hQgcgJVtTfThZY/EFD35PqSZquniQGzDIDZ15KefsG4tvgAk5N4iz3Ro8MXB5io9ETG5whOuHBOko4Dfuq3BxX+KeEOQ5uHXPAmjcznr9/otOSVyFduKaF+TOQrFSFeGFDsTrU7g15Jnvih8nRIHKCXOfg5pZe/Cs71+19ZSeEAJrHYty2cNQMNKQ7Q0SiBD70u+hDDjBwv95yY8uMcLaI10jh++TWYF8zHidT8EgSTaDioB3jIUc6yQzRW6c2lqCAUaouLpV/KxrFObOnk2FuMI1KDEYsg7WgYFg8N4RZqJ2vmJomy/S9TexOBA0AWGySsDxcR6ZceiMTTiXLMPMSzvdmeSDHFbbn3g/fFHiEtzlqs/uDx+RF5zwc6H33odgjGP+SbAnEECEm4u3n2ebc0IP/lfaFNA15l9Fb1GdSA6gl4o7CKetIX2t1rnWXRLXwly9N7nOoFJHm/MfqSArPG6h9sfLxuWS2bcOWWIuWVAZpbHrwT6m5uMxcej9pZdF5yOzoo+3EIRKNXyXAX9Xb37maGlNMDBCZxTFFHQBOwgbqtrvCl5pKBTOruTzWeY4gg6d/Y1WvGkZiM2GrIqjhFq535V2hUnqCGBb5GiXBva2nlQeceZNy5VnkMuU98A6YWjnRYxTfFEN6xaXX5IF4w8hZn8N6+NJ/KRwJ4pRdI2MyysWk88nOeNzUW0bbi/FCjXU3ZjYC8me5zpBqUq3XJVxx5E0Zjrek27MZzugpIkkM0VIuDyNq+rBgft0vFMelkEqWwYUcHMKf7ZPpNvrJRZvTYwbxOecpRdZx5ANPE0M6vT+MXkGb3v7thqgh4DWggTTHODmAo51ppaHCoMjnG0OkogWXUYAs0Dtpp2nDLobn+rYEj4wol21g6ETNmIfMgXwhBJGtGTOmsE19P/e79IMQ5A2+fuSBGlzVru4NManoJ6xTdV+Z1t3dkFv4ZCITFfFwc7/qnsdTJwvXEgsR5Y3Gz7HgMe+Fs9Fho3ZDkzQ1f9O+JEwoNRFryix6Alup3+TWi9b12qSh/wvDghopQCX/Mt1IBzvIVvaZynqnjd9SNjnBKEWa/Ql055Ncrn+Rf0k0OlnmD2BCguWk20B4BwIEMv/NnWZpobepChM+10gdjIc//rDUoJpgKeLdT1tGAI1tK/WKaJWSb+4QNjmmsSofsvf9HIdQmXnJvhsx55tEkyF+pry4Pv8QHETJhmZvmhg6LkC2D0ssIUpkkGOjvHEdKq5XV95HW63UfB2/HpVmV07RYzskC/1DMZHlNgwFmsa35kqJV8k+r0nIvLGQ6YZnX31sSOXdcpAOZ0VJL4qg0NXOqs9j9W5i77prkBrcv6H1v1DJv2vbEo+Ksjy24PWvPL+3yhcRIn8uQT1LxzZzDDzGtpV+faVIq0z5RjUqAny+/8pwC/Bo4uZhA7R2U4sD0Rm4RIjNm3ooBvo0ryGCdILPRUXeQBkLrcJygrgg03bYbfcRwxZc1OD45O1xnGj59gAb/ackj/RfSfc0gOrZkZeDnyn7JkX0+a758sCcRr3yVjvqEHDZj95qfCMkk1tXQK/jx8DiPNQh10s+6unxEMvQeIK+D2XsKK6esKVM2ZHZtwQ8wz9J6ze9bfYkq3VbB3G9g8AIFJVIJcKEXkZeiF+LZAg5YoEO0FV5ZvZxbvm/r7BIXsDIGL4PAVLMNei67moZrKsXn3TrjZjeDLylSb+CS1gWJWmUiNQlbsw2fW/v8Gu5Tat+skwmsY1ZDOlGaIlE9Hh3cdbN53Fd5/i1fZmKGPl61jNJL3epKIj/aM64PWG9bneHH1TICXZbzsynwuQrC6Uui8lpceRZnzsj2OsdfaWAbaP8Y4WfL4WkbmEqhcX+YGI0ep79BCnMc/7HQuamH0UyNPVryOG9lkpFq4N7kwP5Am4Po4EG4Vx7csgQgJd1BU0iumRIjMZYFrcmoPyj4EMk8iVhSHR9L0OmyHU6hYLHwxlARzphX3rGbcIciVsTTShdV32uRNlCaoYpfK3CYHaNzlMqpdCQHPMnEFpdOTGCA8os80iVs8zQ13+fcnQet/X89LaOXXZrUIJyXKuRAozULs39XnR/7P+w44Q/8/pyzhJ+wJ6xngdWv+GRZGjcLlV1amMQEUODK1zCcSlC3Q8Wfzc+WZUm2C7kkZLxRz/ukt3NkguxiVgTfpnyZofeCp/NnhkpVaSo7pizfDpWgNE9BgXQers+eBOVc6FKCrFkhAKoL0kzGaGeIeuoHFN1Ib5Al6xZVXjQkdyq9WAKPpLp5Z57DWZJE/Bljud+M+eO5437LGNPI8JeUZ9NiTLlg57oYpheNd+mMxH1RXBhz9hKMlWMcsA8ZgzsBJsEJLcCI9O1guC26pTAPI3ek7mBLyb9oOMJhG6L+l08yH9o0ZAK6ZA7dyS9eT164onmjNYk2I4fEc499tDoY6jot2usmJyno6PUzSfApRzRqqckmGvjff8zdIc8AdaarTE2lmciQLnHAOQfGNrIVHG+QYK5eSttXjHVneslho3vJHNqXjdkKvtB9u7MyadN4BsiaK5JdpH2+yXUZEtYo0RNoUVCxEASSEHXGlEr/ucYQBmBsXe1+FSidRjwS34cG6vhPKo/uMPBlZbXiCtQ/qDPTbcUuwj2cq8m/qcnoaKbenyhbhv/yvryHWBRF5GtS2JS6DF1hBRwdvhlMd8EKwIm8rFlRkoQcY0HirPEiDWKZczw24JlPbbsFKovAd1OVr4awQnVIGnk8Ia6VnkEckGT5Ql3ay/BjFpqu42ZLzQFeFIKRmTL5ZiNDWE/1rrEhRNQxvFZFV1Y/NSdjctrEBNf4ME7/swlQE5+OLBcVUMA+rh20LK/7zbZDFgvKB38JuyfDGjBJgrOjUtUU0zKzoe7sbNlQnAEELu6eis3zfQvM4sqDFxr8bNJHY25YduszsZrNuhA95vo5MGgHiY8/1ihAOuvKJTXivcDKSGF0pjJh4OwLNHd1A7OtwSQ/1mtDQ1SWb82hWw4CNXsueW0B7OGxkZ0ZBogysSwlJhiDC10UBAcfKoSLyi7Cb9ehsL6o1YtpsxL2lsDYe3tT5XSBJhBo8FPd3fcrO1KGhjz446AwXnJPghM47rlL3OPo9spZejGhgu2x/4fbJXz6JL1sXdGQNrNou40d8tlW4WLBFPAYXouNkiZJ9Ew5fcf1PUAiYXmI7IUnNEJdrQQnmNlk7l+7ml9AF2zuhWYZuC1OZ+OuDKG/VyyKr2grlYooZAIo6u/3V076ToTw7LHs8hI4vZ9y/d7f2bu7yFM9JjmjB1H44JAxmSoe2BWoiz8OuxnXctwsNLaHc3tpZ+t8huXMwkd2/6tUn4I4ZUzEee6byUTgNss/fRUvCviwuso40qqdSSM+XKQl9TYZ9yUchlIIewKZM0cP7uuVe0KEkOccLAvGr7ErUcONUywLRMDAXaAwWc2TFpMGPtTV4/txlZLHnYtxEXt5b8M1uZ12daWNaxcU3YSGET+t0Dd7/iapveSkZgVU86bPF0oVKZFmJma/3pbzoV5Xej8BJFYSIXJVrvv/e/UT6yx4Rpm3ayQ4Yx71LmyAlw4or6QErLr0XidCJowalIUxfPMBpS4KdbtewMdfdx+MPBMec68f/693Uz5iuMohIyVbzKRCmDC7mTsQQ3Z2CZP5AbX5Qwy8eisfVzq0K+nJfj/s6gZs1Q4awDhieAV/jVeS6/G4s24vQ86ZfthmqYtm0XVIhTxQUQu8g5EsjnY3ggdud8DrbS3FQY33apBDEGO36OIi6Qwd7Y7o/mGMl+smfQ8ltxwvx6+W5QUQ8TW79Bu2d6G5EvHDdVE680CTYxzCUowVZC8k8f4w6RRhEbZS2TRxuo94WAktTWAR53aLK71l+S1c6hs8eOnIaHS39TQpoZdhVg5B9rNxkTBR/ZmnIjkGUExFWGryU84pXhgnmfhIV4M8r0N8IQyQeoYeyWIy/UOf8Jjq7j6qlU+C15n9lmffq+KrMOp/4dn8twlBkxv9PVuaKjvubTuubGYAsHZSsmruttUQc7Rqm9QBPf184y7Ne/pHP6PQa1Xm+5x/MCs3DrSuRLpmONLbdJ98zc5C6weqTNfAN7QIzQSLd8TTIP/8HplP6KLWgPuboJOVelhFaQMoi9T2xtr3nerU6gH/zZUB6+x797v1NCJ0FjLhWNnlT4LuDiUXLXkB8P0YH53LAFs3y4S4u3ipEttEZy2OEKhRZjlbpf+qsHK8BpK16msD9MT4jAK/7WfyciJ+0Cs4DG9JpQcid9Y1UMlTX3bI0e9GUFiTOp4NAJhUXBUPQLxBmhfcT7IaUbmiUDoazHBjU8el1xw1er7/ETt8oP59ukggVLmsBjTr/hGu8bBDi2ETwqtjnKjLzGJu6lug4uizQ3gVaWIUxcHzhGGbdJzyUtb5h7kOUHRHvWpbPF5UbaMTkqbUqYragBYpCFEQWM1DDa4PCw6AjirvCeyDkLgKfxqBSX7HPBBTa05KyI8uYZ2dXrrTAzdJGqqTDLctpCgTRB+J2tcETXefsbcH5hMoK5MEr5fv0kmwAeSy5KRsL/Dd76E64ezh/nsCJDs001HqskqpSbIdqbkKe1DRr2iT9uzCZYh7QTPFu21AbAzYtxVaIER0T8hdl0cnydrrrEZhJDlcAvjai727jMS0hfEIn3lC3/kEKcProLDiWD6jonX7v2Bdo5S9YivJZwDblKsAymhMyoUW51FDIkcu6aCgwQ4usM0EMUqXsmaXIAxYZH6kRzJyEquYU1/2PfdqmhSHD5VeSbrG3uJyoA92QbE8vP1woIRrzpD16CEPPA0OmmdIkKJS3FR0mLEpww/ZOt0wfjXHkb9UkiVbNzCsrZitpM7+rNpiH4xoDsilGcxCbCXzE70fMRRLK7hmN0y96cVlfX1enjgY3ZlvsOrzn3jlAtsYtgdQMaZuliAZ10Zvg8mv9Crfgz/eG/8rBWHakrSdaHR/cCbEi9hnD+yZvVEr0LRIQZxkXyPPJI3wmQvYWHkjYGj9f/+MNfNJoPb1j4wiUuCN877gVOC4oXtIg8Fh3pS8bKDEXRa5sW2+chge6fEzo2gyIScKQD5CjwIkscfIatPUfM+5Ujhr6ZxfvPYnG98qv25cSlq1hQCaurA3tQN+glhHpIf6eK1Llxw8oh3ziotpoorro+f8A6p55c1UhR8zs5g0ruTv5yW/hRcKEcO2d77tGsAMxbP4Cty1Elk5fv32lWEp8S4QLTDJ9mju2nlrvny45Eu9ECS7CQec2dHrdC0igmnbAhvuD4JPSBzQq63dEOP/XhUn7IkeJpi28qzA33W/NWVmdLa0mAQGk/U1dSZ6GBL5nD+jlReV2oYVSqUrEaLdn+beCK9sIjk6SOUz/2eVqaQ4M8sS+PDUM9bSGCw2Jy8rztFaM89usuWJmNHegzKLgHVNt/u2odWmBX6sOhksSiuAraovrX3d80ISNxu4a7GFOTj7xsfURZdD+BG7eqR56VHMqWbrErafNltx5AeZWGE333y0beQ5T46RSCc5vH2LoqdhL1+IY4K7TLpgEJ867YBEGa1/5pgtTiSk8yBGZNexCiWNEIF/XCfwQmP6O2AB0CQc/7Qy0r6G3qLDf9S5OuB+qml4uDoMjxoNSTz/8LFWYqFnSVXp2MeQX1d4/MwNenhTiUNA45TjG7YNSiRajYA/rY12kryH60AQ5LFUVzhqIO92ZA5fk4NaLleyTLt8gGsR/95SIIEwvNoUHPWXuCYJu/Jm6gtaiTrii+Kf48rDFGxk2LnTwnPSNepspy97M9gkY5A5ebBkLjXExRv9+PE3Ifil6m5uKViWNdOwUA9b8eCxmfsDapOVVUkfWeKyLwqix9T5tubRWIrEv95e75KVdVMlxKGJ6CFbFcBWH2naunVd5r0EZljyOdok9Wt+g1J+k/gTMZNle+uPBQgMXPusU14i6oiU/5Sy0nt8kuJyAhHsuZ4kXykaCcUD36idYuWyjwAJQGhVQfU2/TgRu4XuoF9+Qdb/C2n71uB7hz8Hv/I5ZiQsGV/CFFmX3IDW/rP2uHFnF4+8K6J/VHgMBFFRUPyXzXXY12OJnraFKSgstGM8KRnWc7zI+9LKb4aNuzxYWboyqIoODdjkanv+JINIQUQ/Tdlzv1piHBvOfoZpojqCHFvZBGcOzSV29pZ9GMDfUKoXEEvCHHxB7wf2fw2Tj+9JF24gauB2sCFEbIOQuOUHS2Wjb0sl4zG5xIciJNpffFhtZdfr21hU/voN8M62bJ9xvDXGvW4qU+By/usTgdjJ6KkUlUJCwem0VwMMmeGPjcDe2QGF3Xoxsh5dNR3TK20ax0Pab2VCdznE9nzmBzPrS8HDHFOjZ4MAcbyynym/KNDDGIs+ow+eDCqpNy7GgvznRXAmqMVN3KpP7Fq8s0P9OkmYQTEnVb//Bt0NEMRHn2IVbbtVps737vIeu7WSzE5z2FG3EUPZOYVc4yf5dAvhkYgZHMJKLXnq0wZeLVyPQOvqaxJBfUh21nmfgmJaYJunqxntwU6zx/WudVA99I/5C+jrG1jzr+IWUwEIyVlE2TKlPg9wyjM6uwpSfMVqJC5UEWiRwVxiphMD+m/GbVjTU99LqTrwq3vKkdJIepMdIoMORLZTBiubumDESApqgxvk9vOPmXIA0a270FeungDcc/TMUKGjutDF5CXIoeHN2K2R4OqwWoZszERMgYVPP2fIB2pVClw0KIDgWkQRxn7tFZMEQBWy8BkVuH/lmnI94Rsr99g0eUHT2sZBl3pZNS72xpVp/V7yxqPziH7VQmCBC4sJ2d6trHAn2pHs2hd/N1hkL02V6ov4rF37PO8w8JHt98LQOLqR3nktk/dodPOImGxdfCyVklW4YcsHZ6dW5D9tBpoilFm/uW1RvPuDmzOcetp9YGp+n76QMMyV+Daf8kUsy2V9/AtErm0gfpCJ1lDOsr/s7mY9whcunLjx+hsKgaH8kOoZvJjmDPXTR0/ihWItRvfs1Kl7L/nfdbzRRddrjTJDojkB4zsETtw5KzADiWG49Jd/suQw5B/AyYK0hun8ytWLhVlbxirYHmg9jPROrV7qz93Af6GwuroPr9qtnaiD/D7QOzpFcI7yGge9YNGEzx2wHTRkg2VaEHE6T6+uOJ8gHlHmLo5+yXBjbjHq1nBlILghVo3RG1qwCWEETSNiY0VckWLR4dGgEaDqn61etfDeMIvKj8WRSsi4zKC4Loryu/ed0tHYHAIJC+X5q86AuOJ5zAxxNIgCy8WYYZGkOxMYHGRsLJFWv2MPKWRO6s6tbqU+AK3hytSd5NhmlseGci6+SGzHNkWW8VaDYQ3NadiJkNSNE+CT+hX4LSawHIN9SYPMse3JM4drIe82v25B2GNIIUflJHbhy32xszufeCBuhJyEq0bfIGqF4GcGUMYaRpGlz8Z2hQq0eba5dOV9GCuSMFHLQcHDJBY/BFXRUUi4TPojpckzooGnEsUtqsUQSZHsE2bEubXM4QmSRp3KRWgibhakAuHa8jp5yKui9aglssUGzSI60qqI3bcOLvRrHHd/a+UuHMAgOUFjsegkE0qe8sSW9zoz9zy+Wf6kpQFinpMshYTQQmtJ4ZiXVySCr81FUL2BFSelO6oQ8qyT4iCP2A/dY40C6oStaZ0LivXYhoKz37na0HQwggOdhdE5alEmw75PnjNOdrRPuPoSfnrnJMYH2uQR7TA7vdPASA+JsHT8iJGa9oVt/IA3VHepr4ZygQY1Kh6EVKRCoX2VtwUbvaOKUYNI5lkP8FJOcHBLf6OeRAiCuwNZ4sZVG38yF8Tv7yL0yboSPZnbnW5MqUcdXtRAgpI2JXnEeqyKJOVePEXUwYduswFK2GpT+S2SlnWKiC0x1G+y68YUUJtUdYrMvB4VA4yvSm6HqxmXJQGfo56J2BEVCLdrs6EOgx8dOAueG5/IKXegmwFjTEftVN6s/xxmmIO9TFy8FAwZkp3OoClgyfb36Qgw6n1f0vdJ1G4CKfxIYzUuRzVkOSIzBNx72opPz4J1Ds83y7mL+a5393AP1E3iMyEX36lvgr7MRJog+AUyrXaXmF26MU/EdpwTSl3JSIWCoExxGty7Hif7RTw7G1dewSBIxe4Ts98Eg1XkPeUEg5HcXx31ktVezf7ufHi8IFvBlPrMZjyKSyy2WFZX4cDEsDcUkJAXPXt7EbSWRZ01aJIdcH2eCLJ/OXN5kajmsXwcmnKLc396qA798pn2ww3Sa7j4M3Xh4YX65S/+kJ78kwxFIUUxJqVwnEqL880vY8Hctd3tZDQBDikJK5UKCX6Eg3hxHWVkwwT1xiDCnQ2Hpop/ZFIj6Q5Lx7AClCoACOspxw4KLY72VPyIaW7M/hANzHIXSh8Yjf2PT1sotjSQSfJOAja0ABp96sAjD2qsfXgLAHW85xg9hMLH8ahxUG1lSs+4uFOyEdhlFFohMXbu07N3ZGY/rVDoXpR10ELxpUrxQIPfDyfcGGoPoAK+wScror+Fmw43rnlXa3Mf71QMrMWVYmn4uwGRY2l6PnuejRrTL1vnciY7iuuOZj7ghONTwyNriUTcHO3X1xETtFXqKUk4omXtX/s9QxHedN7tQY8qMVB3WmW7QvwMd4xHaSkRBD40hY2cHyR8MYjWHYA3oOfHQtGsFjdzMwRA81yvIyjYQlGSJHtOSQZXJ9miSs1a2E4e3NdsBwj8sjCqI39sRFagjwlRlh9jeluVPVsSELDh4KzJmGQABAJYHcFoTPlx31K53u00Iei6QYvKYjYgRoWMAU6TEvw5q8hpIuNLrSJy6cOaS2A22k5+1X/hYJwL6swv0t+F1J/Vjc+DzzMrci/yRb5CIFS1H0pXnRiL1/R5VwsGe/fVqzalGD2Cnuz/xRVL5KTDlh7z0LcqC+MLxo8TXFZsYKRZUd6Zy1b0SJq5qnj7L3PFDljteeF1zA2D/V11YynTj4O+08NWnRMiHxt3sWPgjVe97sFsp7MiG9eGttfi20JX66ktxJZm64rPg06HDJ0IbXi1fro+VJuVmVp7wP6Sm2J+ElkSnOuCS6L+edZ6xiibbtD+GpfUZDihSHNKWo0HVJQWVxhJAccGQkEkcSsr6oEA0EXz2ybn8NKc8RN/IgkCpbnxxw1sySsgndZLP3HhvyKQzbUEBdvmjM7G8Tc77e9olgwJ9wm/0K2z2uMafQDNu1k+K7Sqj48YtRxa5VnWwjV8W9L/EYzqmSGPgMrUwrITz6F8Q26r0gaCzjbQP+vHIfchBVuZZ+aPYgu4DGMyD4l1yMFidhMNf/ECtyobsEb+lqqUG83GF39HeTkCMkmGwK4EEX/lMjGin4okeZGZBm9Itluq/4QZvXpA+YJEiquEiWI8xAzJ40XKcI7Q2eGudIfSLb5Vph15Nw9RZu3egDUwjWKRQf0K1/kCyRxPCnwSSwupu4G8rEIhZHolONPgajRj5AbqE7af2uQnepVPueaeBWdxvnpVnoKOkps0czVs+Qw0c2tKpzBv7dJ9xkYKWem1j9yYgkYlqCTkm9Jlb7FqQ68LludV+PU8s41kj9wxKfIaCEiLLgJx6BXXaKroDq5Ia8KJmIjMbIh1dax6Gwfqymyg1du8bSBCwKdNlo6kyHrwEizX1sZfcK8/gkvfQBv3i3Qlpjgrnd7/UdbKRzfgbp4cTvA8JPpHqjrQ+iCgM3SHpQKaMrO4wDKAWafVK478eYT1NeX+vgoglmhf/ESf1iAiS4rMLV3VQxUmmbxLTLbMWqufp6/8HCVW/t1B9nSrSq56khfRo3Ql55MNkU1EygH/gpW0n7+eE8F8JT5eA91Lg/ZuYappyuczyWWbuaeIH3ZuJ+afZI8HhNfrByKzNW6DzTiZlWPZCM4amoE8D83JhmfdEHrBg/bb2zZ3sFywNu7dQPt7dYojNisf17EJx2jqFaWjcReUgZjZ3d6XVii/qE3mHUolrMUfF7G3SN7t304tYxxu8hKQkIgSCwlBde4tX2iaq/wRRmuBUB+BHQECbQt/VDmO7NB6EMZmNzS29BLj515PzlwKWZyuhkQvnBRYoszg+NyqhZ9M4qGRDMir3buPxDPAfF3Q6Lh+9yeNDL5kZFq8L3v6pdf3ZxxkS01oZSPYfiqIt+xvOo/rEoSDGr582LBFkZyDQAFsaUzG3Est6GAeyqec0jZ1KoUQqapLUCIgKg6lMGfGLyGfyjH5vdxc1ItyGzN2b40WHTFyyoVAke/DwxvSN1KtD0kQLzblPIPNJ/ctb0bRjH3xRGsNniHguO8eGcPoAk6w77h8xYuQSkUMME5wa1UODd3wuRDjSaYPoOLTmJEl09mrhZzEIkSkSJpg2AMPYLvWoV5RaJyx6c3z1zWy7tnK+z9lMRTRMaET1LuIouLO6i9/FikFfEs4btXx06jh2PnK/Us7BC/RXB7KtrunGGCJ6LuZm0bkz0+W6CRP/yqaP9aSCghPyl4zqTlEv3avtPmpmTjYosQIsrYI1NpUZVmMU/dpIfoPJTR92nU8AGxCp6tsnKIZ/PGCOIiZakm5vtOf1a27V605psHjjh0j1WGwyAHBU3UnTA/TuX8Qg8/rT2WSGRnimpYOS9KjJ47l8JCXCegSsJPO5YD5w+dEmqIRHjD4sq33pnhpJfJLLpHTqvaky/i7BvyNVPVQGhIy/DiME1xBhZ4WDazNgf87xl0y926MvxVy8ISxJEwbfFS18fOVCY7xgWzCKJ9g3FkG5K62RSuG3RaK/abQi0EeC5LTJmWKdMO7q9ykbwjZskrKhnWuwUWqqy64eyoFskLXOf6JmDH2pt/+9vj+hB2EizFGNuvW/xPFbTr++imy6rOby672PH2S0QMhNRRbFq4Yk/2yn47qNl+5gYwJSRTr6a75dyvImZFXeZjh6M6N8zTYqgZnCFlh+C0pA2JpTC7ZRmOgskH6RGu07UimwQ2snDcz/I0IlateU9ZCPE6rwNNwzitBFUKUkMsTgVFUrcm9VtieU8yxPfR+R3BeQbR/d7qqZO8jqd9YK1JU+Ez5/BRf12FZO2teRF+5mIxWUDRI4svskxs+UbsDPNaEzpeC95aIMZnjBpCNYXp7WgrX51iF97rW/njSdmxNaVYAeZ0vbscgHJytxfS6NTMI2Uy0jlb4q9f3IeS6Qm80G3C9DPC29uYqKpoHC2SlwOsYZIosHR5zTm8aymMriM4TkOyZDWcAGxcork/7eY3znKlG91pLhd408fCWAKNwqcODM1Aw1dd3ip7I0T9NyZU3ayHuebpUuVyesqf1QX1GLMs6HkNs8NXB8MGK75xCxpq2H5BOUNYTv1XHuwDwL6lgXIXHWQeWLw7PtAeQNasjGihHGJ+Ew7nj5M74ZdI1RenUt1iwehV0h8UAgMmFqkhOZVVv/hyGo2OEU5H63JkfkmAs1trbbNmmRSeyqqeOMFz1tB0k/Id1paZhqkT/oMQWZhYTVoG1GnncicgVpI6N//MJGEMIXc/rZD6VL0JgwZlbjoOBO/dXUQugCd5xj5SX/gZxm826KBxn2/I3UqtJeVrPj0+KeWGJv9IXACiWWD1ZxNXw3N/j9B1LlIiE6ak3fKMP5ygFRfSYVhV7NrUwwm05QakfpWNc/Zq4wf6AorAuUVAiq+fESeZPsrD2gHLiTL1M8dQB5tazH4z0f3CPF5ZwO2IbjhPT9Vpt7dYtQwV1rPzQlpw3qmPjxlNY2c0CC31FFvBt4Jl/o4HxhqJqNrDPhPEPv1wnuyaPsqVRoBE2/EidqTj/HaiIuLsfBFvHPduiaP62kLQjPcj0l2GOtPRdJ0n0lcO52fxVUXUu/NB2KKQV4A+4hpYsq7NOqLRbOG20dcwSOfBKkImvIIrFfweafjucLl0J8YtPn1if8DtpRxN6IPnLFh0Q6p9v5eAX24T4RXvJKrFQNoOf7GDbFMNo0oATfv2nh7adr/5+r5EGaAmGW6IJDqG6T0N27Dmh6eWiwCLzwnR95Zpw/EzWPlj6H/DG7AvwJaOoUCZtj/JfApd4aZ1uWS+ADlHshRhAFcAZ7JXlSF/Xd+bY5+KLDg1LtV1YT1liSXlhB93JOUQ9jy11TxaAJDCbrpJ4cDQLG7WgOSNfhppLuXrCYjYI+qjwyHQFWUpRv6k/6G32OZqj62jw7pl9b0K1egQax5q3duy741c9DIJg1EzrtsYlPCuUnzfORAEaMNXsy9oIpa2zQ==\",profile=\"recipe-server\"},[\"recipe-server-release-0.16.5\"]={public=\"WkDNYM3mTHtYANrBF5o664IF37YkfhTVtSJX5Ij7vqMC6Jt7YcSRfLijN7WogWH7rfR9rntJcZu7DhkpL8559yZtkDMZnt5nMj2KlcUqudxz2He30o/dnCsWmxQxi3rJDF249itklxF1X75C0UgRGzK6PM/RjndHeqn4jpU1EJw+a59N+4vFS/EpkLZY90J5kkw3K1GoENrXRQ+mWy/0cm8MfijPJztgrkQ7i1GIrS3FkeILdwXpwHJXxGpIEFMiBQ5IDNPG7nnFal04GKz2iS4Hu/HZgp64KFYDJr+mBRxXXb9lK2PTM9X9QV3YjVMk9naRBBhkNG31yIVIGsjC3mTUYDKr/fFKf+rhXWLPc5iwZPSjBnWhU180+32ykOC729TgFakf6/MBSjqpqk5s47sWk6BByovwkbj1r7zfEd3VXXF46ppKGO/QHcUL7CUvNzduaUd+3/WPuC0lNb03U/eLhrEIiHKULqfFfZyIHfAMZtpk0YkDF5IWegYuBCvoqof8A6jlU3Rc5gUiXJ5SRcTSIMzOgSMJ9xpmYdvXvrPZYVlWAurlz8bvUpShzChavj09BeyNlJqaZ140qm1nfX5apx66Of2BP7P839yVlW8+YxT3xH7h2v4Cfkdh/u8dpYyIrtYqbm2LoE83RMKuh6tVpR8vUWZYh3Ff5mXlQJKwjub7vuB+fBki7NtSqvgzvwdfqy/yxAGuoQaC1BYIVBYTJvajCxk4PL2Y1PVDEsUq3spRFbkhjavufvAohW6HVcPemclYuTn9S/FM9rUa64W6HyVh4a2fkHt7dCzGGAX7dDNP/TGU66/3G0ITsj16ZCon2XmU5Sol3OuBljwLxb7gOuVDEmVR97QMaABgDzXSZAxXyyZJRn94HTQkzyFkpYMQHU46pfKQlXALyY+CktrMnGTvet6sXd5HOHcHwUPNAbNj8l4hwXlDrS18FfdAJ518bSNBWyp2TQ86i5TwrlUN8DTo7/SNAkM+mtMR9uNM+vpTWoK8KOwXHWnnM9VPM0m59GX8se5u8Hn6yTJX99P2An15LbHjUR/OnphTLsPGRjWBjDXL1ztwiDf3EWPDvXqeylFtU4JKfa5Bagf0jwiWjYYLqg92t2ti8ylOJKPNg4uoqJciXToVJxQxJG9yKFSYbteVAtGprcGNpQzDE7tLjwjeloI62kU5ykRGw7Xixcl9Q+y6YEnqMZ7RbSvcZV3gXl2MjiHvJJTMI42Nw20IuYIbS08QQzSg8phgUzZP9MhkTYWrkGegjs5pYnp38gyEoBH+mZ2bIREl+NTLgiVc7lICd6vGW2ZB12Z16UAGwn1cIQ4ueaQu66c4sNxosu8LMn0U88SHETuJoW9s9Yt/6rU6v5La7O/X8nQMK+WU8U50POx/a/fmvE06GmWgKYZ2lHo4PBMLqZOrs5eRfn2mKIKo7h4swyBvh1prJ99vUHHfDWF+O7b/VRzK1uiK1GQx/coOaj8nmSuoQ7jHYidqIWaSsnpOgWgEH1LE/Za5baXHlx8Hhsve3U0m9o7z/dziBb6xWmk6Ke9glzxUjVWv/9e/FC9QZyVK1rKaO5CsltBTSiseJa1UNJwIHwGbABBpIE6zlSKeSYzfcN49txwOoz9YEbCr7tbI6ph7ubrMJ6XS8XgMfnA5IdLz/pQuuTm9kAHzdPR/OJNSw8+pynl/5pqKCS/0lWkhAP6Yc9qGSBgKv8hZ0C3+JUaNyAzpxRftOOOxzDc0FAH9wSj21s/ewwI7jo4itHOFB6HeyfTJzJirp8EamY/9q3kOdPVzbBZMh/2RXGFpdQMPfdGJHmOZ+bNyUTqDNRNCJwiiiGPGpCZrHh/r+PQVfGSzy4qOENSUtYMT6pAFnXln4obS2pmoek/XYm5FCr2UZUwIyPDK7sXWXxj5fsT3GS5Dg3q167LOme6dgm8RCph/qKCFSXUPZOlqDyoF+4BXV861NqF86nATqtymLDKjdOF4PLYD2AYZgOsnqeYvkbbjWp86FjnFYsUIVHZ6OogMhMqoMIvdPRLkkTpgJqfNP1ky0lFw+3X8qNeooM3qe5bAbtfHbHb5ez5FC31EUyxgBBI8J/ReBhBXkHY1JKT8f52450D6rggq4POBtiNzBwZiq4lQ0H1/tlI4cDFJrwlM5qDGAlElCEg7W+7ZGGnjiGKITxsI0uuvyIym2qUgH6/feOT/CFrXDEszsGV2t5ElRUYz6jevkkGgRgu8RLWRTH9fsBNSPSioWZ0CpV/5LUQ2IcBQf/GFI0qjf6gHnWITRC8ebS0X1aq2xmSUNWWBOoaoI9G2bYr93n1BeVWZOFwWz0yA8C/IdEo9LP3Tb3cGSTNokWiziHjxkGcOuvOKJ1LEPS1k+4/QxXbGR3wJPF5M+F8/2i7MeoiMX7/V6O8ZhQsK8gbSAUexzVQEudFPGRehby7meEvf9NErrDdD1kgt1VruPT9rdraQMz8XTMTCbkAvU7KBzhsoIkCO5RK6AVBK2NGwJgT2z1zcLEVd21LxoRh4fame4BBlLgXoNC+pzRH8ibC4o203ApJjerLERwpqATXHCbzsfHw/2che0AD+T+i/J0kjHUnnWmcMrx64OM9WhIlqVNq2FOPjCssjEt0tY89drJVpIBCA1iWdZfwH98/aeKbHMd/JmP+75gZhyRBQU8sLW+8TF6/ef1jEEPz13zR0jmCYQbECBOQ5aJSbnnlCYU7uxTplUYv+CdJlI1MbXCzf2lDlHbYDXKnH2ga+wyKAzfB3LmQPRMUoi5S3lcj+QHUUnUTpumXeWiTaz7nst94UzZXSopJqnRtw1VkhO+s5YRT/jDD3irSZR83RuUVOTyt90d9DRiJAiGAqUpwYWJthXFuHiM8lEZsU6m09JoPXzzdEUvvOgNOI4v0VdZUeuqEwhj8EPvXa3oogiF7CUTUOAtq2zG2Wa5BYZ28vRbCp3PRIYxaEXjkVpMiV5FTRQzjIm69V4xg+8VCStWujbhNNoSQ5KAAIsKIY9nH9FBoao313PYHJ0Xqay0s++KdFDZajKfE6Jo5FZX2+ZrSC6k74Kv7Ptg+tk5+2DZYMM3KGOh0p536ravXvXEm+5zr1b5qgf8IevRGBknEVtvhKQHk5Xew2RSL5451PFqSev4k/e9fdPZGK01SvCqovhr45bDSfeLnqxTPK+O3/DunwLr4hdssaCNYDXdkpopqpbalRP4s0bgNpmCDOGIcq4/aaWOEU9PNVkQOt86PnvBLvQkj03l0Xq4wIk3NR8QDUnFto5A99z1XOzK8Jn9bOIMz1w+GwxrFHXcb4SZNBSYf1Vk7JlcQkNJ1RhkYP1PRjrfSUAFnbfnMIMEYus/0R5A3G9D7edEHCA9CyMub/HCYDZdHTS7bwvzlPkPao6wbi5layDqjlqxAxU37B7xZlDeYET/NQmceawO8wzNnq99Jp4w42dVVUgJEAOCs9PKPZYgD8YkmMEnTwM8vh7LpNQWpWvL5086v3c/7DedzYhQrPq+SoRiOPZ1Vw7WuvW7gJx8eUJMN8f2e78GjbGXiyM+zSHt+Hnb6udHzRiHOrdLm4pothPPn1yf53Oc/lm2hxMQeOtzgX5IMn/TfmopOTTaiYARtRRJrbLThB1JVeiryRIhACPXIqCucOva/KXQCqXqX8bwZAkfiduc9BibSrobhbn+KNOdvEfWPaFO9LhZOZ64LPA3SlAwptSYu35/gIlt9ysMRmG4ZaeN/2ZLgI4wdyWfQ5GHlxIl2SSirQLEZD5K9GYm9oZAow6NL25TeIko9szHm2mzakpQV2TtwWz4K+wewt55hZZNDNKbrGcDRzXw5LFyz5bu2vuDaXyuo6eWuD33RmLJYA/G/uZONEa16GSKrc2HijQuyDKPlMqPv3g2qNEkVH/k/QyZIsqcSSOTzUzrx1WJB3VLwgVh/ptVjB1lhU+nMYXWyrvEfFHfYEWXCUajNk11OxTyRLghk7Uic7llJoRdBRUE4Uv4vnQ2Lq/wgoSEe08OzTLDKUQcZffcSTXvs/gGZ+3aSk7H1XosSTz6QEp5Nj77mxdqQeYj4KQL7/OIEmv4h+KRx3EHnN/OEHbABt+Q8LAcJQsSA0fpeVnz33KdV18K8EXTU2UFarRjcUhNUcEhXI8J6W//4c3uDq43YP8xzpt8uGgzLHxb0qb9SRNaG3MSolyf36y+8J6lP6Cb0vr3qiDHgxpWxEZUBF8a7HjJNpswDFC8aLcG1zqkiH6pz8EwpS1JVPBOQNGmeFO8zxub2Gq/jG4re6wfPMyz8EwfJ1DJPE4i8BqjtshCTZVX+Y3NYtQhHjfje95zlr7BwMXlpNRAvcDkZI1t6xhSjTk+2FvPJrbJ8e0tfmB9sEGtYxBZo4lGEI8msyCCxziSMjhNl3lWoEeY3r1QHD1pHWdN+MasNVmc1QzcC0cLSgaEJa1Upwk1GSQVy9sAVeN1FmIkz1oSFGhVXMhvBa64NLREfPVnqrjgHDazah8sz28VV5L+OY25OLOZZBivkwA7HBMqgWfg7Fyn8wxH3SBgasvjiua725VJJq0SJmBH6qG8LtYjBBBLGCxq4MVNrFDpPSibLGjhaARa2Lo/8uJfr0kagOa8/ZqVRUc3QZ6bdL658pQsZGkM7UW5SHgjQk5a9yw2iKXNdLVTivAw/I5MqV/7vwZXMsRUkQnsicQnts1WhB3N2LzSnJfytyLKY69vWm5dP4/oZFdF3txoskLt4QAlODD1TcyVaF9C5BBn2V+ww5eUWgV4hL9l2eaPDeMjZEh9K8OWPOAbTZvsQv7SZNTZpGfX7BCavkIil30m0eNcqzlXiVZSvwuKf8wU5ObWjbSac9+QHFpo9OX60wjQenFZoYpqi6ap9vD53BnNGJ0HYKQsoVlqPQQo8BU6wzL0uUo0qonYI+PGVJbtWQi3cfqB6ejNuXgXde2uMXAOa4cI3QspdzfoTvmcyn1TGBoz/TpZVmjBbxVUS3irEk74U/pCpnvTC3BI/dcHpjDDnzZPq1D9wmVezF6Fs7r4/hThMLwcRWeIndPo3abMuh2H5q3yTCVWQBSGxfIWB81k7+GlPyzZuYEdOPiaU5wJix4jyj/99v9jHLO0Ab9QsZkiGwj4+gXWYBHIVolCmkTpctiiOtizbpegiYAZUU2ILMu+vijz5iIqUX6U+ElWU0Fp1VozqBGmUK9G4hjoKN2IJ8yq4Js4jlCjbWrWe54KuKCWWKkiDaZsR/m/pSCexk7bqGOl6XGBQybc5G81pHYJKbwh61/lbyeGJbQnyyp9FZ5mw9MQ5m5hd3pUdN5lxbtYfjayCFS9OwW7aujviWuTRiEWECsbCYdoV1cyIn4GqHPntUWb0actOdPnluNK7U0M8Qkd+j9E6yiyPKCugJCULlW9JnkjjArtXH+m2RIWlMaFbTKNcWEZMFW2jtDONd65+N+rQyNOPwWWlOWGmrGb0vHdu30aH2iS2o3KrbvwDj6GDsxe2jhSMpK8vQpL4FxB2JRb9lNUSvVe7LjVDVT5uV9002hcSQoBZdS+qqrgA7/gt2cCgG7zm4+l0SxC2qw6TYUUBY9mXklHO3A1am/8Zxd5H+pThrNYeo3QpQ8V5BMEkyM05uqu67HIr+cufmSd3nyc4KFk3DCgu7zgV+YNFoXg0W0j2lwwuVpR0UFx4g+R6GqH6QV1+HYMdJ9BRxcwCIXl3NMy/AW3Fr+RivYR753D5oyDMaeQt/ux//0rgshMrAsBWiXeAaWpVp/ON84FJG2pbU+dUGV7DnykuMkfplkSBZ1GAXO13bXaYElvQZH8HJyuU5ZrPwsFFPDTr4uWxJtwabC8TvtsxKJDayeaQjhV4qP+uL641cpo/kvmsz3B/461m4O4QyGTfNpX6bl3rUgxDnjRA7jKGHTiD/QvAT+KABFuPUAqdl9fYVnYh1VdSRtnhS/Mg3avrPx8UNZrDd9BOfnuO+LdDxhOuGWTemTzw34/g74VUFDJhhs7G3Bx5BMc8MZNhAYy1YHdV1Sv3sF6SVQx1NOJYPz7GbsGsmE6ugp71Z9l10NXU3w8RImSib29HO7eeZY9f3KV7+OXojDYhLR708PEfoHUN67HniJuaOb2esZ+wEdkHno4qlYIkPC9Fkh4flTglN9e6BM6RianYnkg7hjG+Vlt0akYiTLg8RX0lQX0bPD8lu5J568iwxNrmmtia18+pI12KLLuKteW9yqVfnx6WriKJGfqO+zRWwfXsrpPp+AgO8A5f+CuN6hFNIDtEBs0K2N3HTqfrnOFUwC7EGKkRt0ZcI8WrKG+vNm+V0kYqrgS6jOwBHa2QwrTMxCI7MAKR1Hg7Mfxv46GZedlzdrv5CZwquRrGs2QnwXRe0lIPxNoxGZsifocLLdGJC1xnqfALncTf1mVDPRPWq68PL4ubRLa2S2u73FZJT6sGEDMb2t+9fhPv3syRyYA9tRmqY/AaiB7cZGVpIjIdFVlgu4C/HwO1t3ipqbH0ARFqlEg++et/zER+xdKV62y1JVoPnHaFv9HRvWEFDrdq4fZEL5cvHL4bwObOqWI/1NZ2K9p32ym5Lz4Y9fjnhpezzizjRGtA4tlu5pc8WMzmxK8a7r6FNknWvBBouC7vLObIHkHzTUd5H3Oesb2JEb8Ih8Z+9sQrcbK44qnxjM8IhBeCcQBkvZ22+n0jtWSfMEffDJ1CysiONYxX5XZhpfpv8Bke5onbloikOBBgHYpRREudUJ6Q9JGC43i3RmmTxZD2WGMKhVEtxwbsLP2cl9LZqLlpMZQJ1yRVtnZqdl/3NOmEwsMUOrnu50/eV7hhQ7MIZaYrCby5G7vhU+H3pfi0lK7h2lzrJxLqKimNHO409TdOiDXWc+swMnEsvzF7GbfRQtqjHi7FDPQI4TiwlyIvG1VJXVJQ10erQhgL4tX2A3/0OScv+D4Fk/c0qhYUreF/SgE5qELBqAxr9CruOwh/0QHfpUE0MiuG286Hi7XlaG0kfit0EzVCG+PJ93IdV/EuSnoh7NgX6V0SufNXCgvi/Ml94R4PAYO8KOH8SJcfrwYmw46VQdsxoC+1rd1u43C3zg22Xt46t05mUybHXuCPGdlF53UKW8X04ctdi6V8UozE3Oc+YDkgqhKsG3CygD8CL64/V9ky3melB0TvpfMEo20txle2ifK+ixBzLOiQBUDBnjRLnfEP3i2M80sUNqHXKBwwRsxzyOtxJkgPkq1GmrxZt7i6foZYwcWRz0oxAzk9xw/LWZfEkEr5uu7pgD+0H+VS5BvBrKzm3+6p3CHHU+My6oo6tZBCsSaYvgZ5QvQH7RHN3Ah1t59wdhBpfmYhwtkJsVqugeLc531rMrbUk/6fVsNxSCtBLzzTNqzxD6r7q9U4hjs5cttmJBfWoQh6umwclzJuwp3jlpcLGN3X4FfNY515HFzXwhjSOBBhZu2BtSJR+dPsWsSFlrIJht04dJ0oU2Ws1N6ZpNnjqaMjDftkihcsdn5wvckd0UxNmqnn+Xr0MOgUGQ4ztwFdZymjjUgV+Q63dmIQvKnvpQ34KES2vDIj7XJC0XQ2UTRShMjwLdWzvGz2tDv5F+pKgfxr/l0oXJyUc6+Rxtb/U77P8nhTbIDzK7T5CBx0P05/pOJD/M5impSsHWwo/4oSYQdE4qWLjUXPOj+PZGVGORYpe8PmF8ZunG8MPjR/WP8Rg221O6ET/ZrcVVQ8o52HCUOrQLSLlnvBgjgt/T+gQTYt2bxGH+PptL9+YLhD62dHuQ/Gr14IW8ck9yKdcdUtj2AkxUCL/O+1TVtJEftun/bNx5DBvRDIHSXb9dqkEot3nOdW04ZD7xGRZ1EMR9/XBzC3wXT1jaK9v+oUyy+LHqeoE45QUMH+umP95XyhZqOWn15fbSClSeJ0H5QyUIu8/ux/w8wjoxALkGOQ7luHI+8oY+vXZ6MZZMuahB+YVPIm82+04mpYOVZ1jKVDvRBs4cUrsAqpJhEZ2RctVrE9PLEXa6dItczZwnjTbD23xcB0k9Z6dLLyPFgD5EAZ2J9Xc6KKP+PEgPJQCBLMGLKr1B0igz6yNKJiC9Ex7G3LERPP3XmwIsYQZEbOog+EjbcbNWDGayYAe9FEZENU7tUO2Zl0+PJRxrwPbTcAn15O6JYRc4AR3gyDI2NBnwDUgsWbvtsUGZvkCELPnYvbvOj2RzLHMn2Q0MUKqmT1tzSV8OD5Rl6OykmX3WsIEgxUMj0mwKWLbRpGLemKfhMYgSN3DKyySOMhYrIaLfidJBnsTL/+c4ZsgQg/96RH3imyNTf+bBqM6ZpJAXhwnmnuHv7OUt+JCiK5Z2yN2Z0L/3m98MTTnsV3ULk7rrld0c4bRbUE47NBCrFQcnHt91TzOGvB/2dvAqDJODcPHqkNjq8IVmCtUPrGPdAYbcrvMOk2qEjE19uyAaSPA4pq+aOQvEKGApoc+oiwfN1mz4NWRvz5zqhz+YK0RCZGwRUOwBKLpVGvwoz/60YQH528nWINfazcI5QduEszFqKS52Urig7jXObjiWJMYOpXa8hyJlJ7q/GG0JGfPDFgGIuzPtv6LLM4ETcc+rTp6DX7Gp/357mi7zjbIfz2towBoRshJ12sRWgZBf+Z+yAXWvBr+Ydrrm1YmNJzHXGR6mOPD7Ri8vR3VQwXbGdWHSbuP3gOYFMhbo+M6upkSPj8dKdHU/0Txgu6NEwsvHUnxFLcHJ3HI7L3ZF6dmJaTnGH9QAtL2LS7xT4vzVva/+KdG+M45dTXG4ZGaraO2PEmkSM+FyHwIAA38n+NuxPvTz7Q43vYaxxpfvhEW0gOqVXAHBcluIU1W3CeE+iX3YR5/UFbc8XYesEtbQB5Q1CNS4qEVTv9MroflD6fCFVkURwsFSRO+XAlQZ45HqQDGEAI45rwYk2/rHhygvIq5PdL0qLdLbq34czQEdtRm+RuFD85et3XexE/xoUbsWLAhaGTk/4yUmEFcjym6sC4U7exxmPf19k9fH1v7cSXmbX4Hwzon8876lywx6UwLwR8WwRNyh8NXE8bWtjmloWCkwZJsBTLV/aez0DL/uIa70O86N53g3EqsYsTmX3sCH4rI1950fXTs5QMWj1egtYbYQaMOhVVipn/n+3dhAxHMmvMadbWQXK3R73ISoJwEq9qRv9R6FnFGPpCpoa8T1N9gykfFeROdzn3PFGqy6adzo+PMDzEk6Z39Q8ILfKpmiYe1QDBqUhMgPMQrfj1FRPhKa8MF5NmNBdKlQWA2YgAT/zoQQBBeeclg8vS2dlE/earRjFmuhwdW8zrl5W5vqvk7jw+ziT/scqH0tSy6s+hH/EfQHjY1W2u7KHTRFpH9UKXnWPCRX+wa0HQ0i8uhQE+c/ueT3j7tqPbArHX3s5G2Sntq0vHX1N6L6ASbK49Mh39S7LX/s8rcXh9JGiQKq6iEj6RFcoWxWT2MCfOLgeWTfd/6sRmDBWgYTCawbyAsbTG9hdXdBvPYaQmCSUbDIgNnTmYlBNVxVJVwauFBApJY0kvlqE8nY+nbcPeT8nRFqPsWMaJxJZjzTeDEpJthNnfZkKHNSaphFewijk2jLDy75uIBIlruMJzrxHu8dQfOlS9MdGS7g+WlxmeIyzntL3ZF8eEzLlI9jKeI4Q6bONyDufNHuzHQbC4yBmRhIq8LHC8VLFzRJqKcVhOpm66q+3nItZRsqOXtTNLOXvKUC5bPc8wklO+VjWBwbXFid0rH8b1fqS+aHqGl/3kPa7U6iyL5NPwVgyD3ScCpc5rSKGpzLA/SLhx26d4PGTBR16E4mvE1Hzc+CpBDJ67d46B+EN8OLo8N99E43C152iIMS3Vh8uncF8f7clogca3wTmrQeqB/kcGWlk/mRWxsGCeLGgvitqMNdHflvkxWOmSwiORMEIVtviQNdszwYN6u/X0nzhPxXtTkSA9XJ3zLW3Pn43SxdxK8pDwzltP+1f5Y5cmxpMNMnOlObamf1B8wedU/nc37e6dlagQtatiZbAzuqyPorLNvh4YZ8+JHTy/BD1H0wGg1dmu0RwVQW16ejqVu6PspN0StPe42Xnr263wGVgKmHuyEt8/ytCT4+UOT0+Y8mXLPQfRdGDARlMFtsCgjo1HEkbYyGorjrdrFp8RTlSUDzECTawK25JLRqOnVn50y5miPvH27Q4VV8HFpEGP5nsU5qHJAiuvwCOoHuTdJeFwpCGke6Va+el7ELVmeEux0HktBVs8frWsmXakPV1IGLPXt6TzAVRlFdvzN6qfmRiu1PIEPVEU082kYk+U0XRI/Z03S+RGLk4AgTmR3BG+j+ArMjrknlh2w4xKGj5wQbExSBs1BJn7ycbB7ofHp8CgVfOTyXH+P0pm/QWqJsA2SmCFUcay1EYCZkS5sw/5Rd0obkeWNiZOgqQmfUz1zFK8XAWLsrjx3YG+LR6muUyde22400XhoBxeq1EFdWTve4RuFQDTKr1ebFwtmmz/t6u4peIlbzGy2zCz/oMKP56TtiO4ivKtI0HTYbsCz1te6oIkDSRDj0HXU9tI19WhV46WDAyF/s13omC9gQNJHExl52zRELVQB+qFrl6zaMy/MF4sjI/aw7jIgE1op5nD+o/O0CttmlKA0p22mPDNggMKrW+URz+beTJEJvudhpTyG6sJQz02PUMkMKGa8/Sbg3GSUATgrEf62WoCCGCMJuc85zJqGf7kImYJrUW2AuJIMBz8K26RDLjns6E6p2Y9TlJQ1I+qpq0adbM2x7SKcQXWR96ZHoCbhd1a2sDdPpS2Ud97AV6jr7k0438nFyDLDmHsDm8nqNBsJFOjCkRPqBmvWfLIeDGPC9bXx0CHCqxIoekI5DFq/TxVI7hss6L1fO4Ak3p6zvZYaPbqJlg0TpT6tjbaeKroWa7/gwuUwoWJpQ4VvXqTm7ERfTb6kE15CC6hz4cbRBFMpl+W0jLdzBIbMgrEjFqKymVQcgfD5hPUk+te1VqYxCBwnCi8Fma44qJ0TB70hUHHBlF2D8ZXpShnymJ1s2uDVyfavYJxPEu3kvJ41uxOYQKhV1HlYChs7mI3pIVRtg8fQNYSf3KsjMTqzfo0cqOEqWkiwJBR6o+TO73sJ6iJtig3+XBAvL7FP/1OJWvIczt9THSF85E4t3e0Au+iRB9+pQP0W+DFpLj5ZJ3F5WYcXvahAD2SG9ccCqe8AATuLXH3zrmutEF8HIhDCQJN/ELjTrJ2pew2Y+H7Xn4rRRYup4rc0CvydhPeRns0KhDtZ9AF9lqaoyh6gl2iFpIzqmyj6/DC0iEapigt/V2atMbQ4hW8dagarfrHiHk8I2uLIPDegPFQRaS+I7vy1Ou/NkF1IpDe2Wg2OPOBf6AkF6MTdOLxLhRcsiIQuZ2CWpJAYtdga0jSz8aNolI08qiX0hWrjgNpAEBCSWs0xRJza+eqTmn3DtjXuha+GX4JWIhdGDM68HeSC0jC5hjnvk799Ouler5oxkdJxFrxDryJ+gKuD2YVF1tHaXMm7GcoauKL8UbpHQ/wslNTCxUNDVoqF8GMC0o4ecMCX5BTbeVTbTIdNqIm0AtbvcbdDuCoz8cNvHW6VEaxe7dwMmtAQpw8Hfv8XuYo2uhpFxrRqCsXBJ5UbbGrivHn8lyE0mZaKrPQtOqtOTvYZBEOLniQ5EeBcrFgGL+ZYk7BCAAkV6zrgnZvelgTmbtnBmtF0IOwuYX3ZeWqUYrg/w8w/HYXTU/X8KUV6DqEvt9+uaYwT9/OM4lyjwFhI7gc8IiwbducRmmJb90bmVoTEPaWJNSpDt2F/mOHydTbYQJtfEPzMDuCj5LcSCL8WtrZqsQ8+E9rfrd016h8xZItRP5N0T4QkUf3mAqJztmzCvAz4gwxW/mRL+mAgWXGqftq9+7d/g/LrDSW6wYzb0kzM2lBC61qXa3Bnw/XQ6QyiG2IbsZGJApYI95BiJd5LdhX8PLpk5qPpl9P+2Enk+h9IEFddnS38vpJlWG07eA1ddZwyzNDNWFEnEKeJaeifwUjFBsDxXYtHAmnOggU08mly4OIFKdwoN0UN2SVpQFPW0CIDkhhbgeRSIncrwLbi2Jh8sAQ6qcu+HVm80ZAh2qJhbWADBuIJx4mArMzFP6oikSU5U7ThKPjChjPzUsiSaj4isTTdzcAeGYNNnC2RADe6bBKNozxUnX3vsgipxkVRnXEFa5eqLQwaTY2KkjkGuzY89sYx/on2XzwNRU6WWPYGj/i8VFMadYIS2/biyIKr+HkE1YSaWIxZgfm6ZqK33+UX4yCvLnEH/g+k/bnIB+/3ncBd8uYD0OzjFNI7kDQHjc3C0BaCIxpXJ+zAto3agTvYR45OBCI+ttzarqWqupN6Kf0o/zxNVOEKwAh3ShFyEMZVq1s82tEU+zJnWViccxxz21pMBsENLhkBxIQyVGpEwEs6dn+4jRHRDD49GGlemyDnzwaLuMADa199xnPDHyS5yDfDWCfb2wGzi63ok3KycKmgK6f0NYV38qlg9RyogVOmiP+3D4IeUdSq6TUksZ5m+Ev3fBaNJ91dPTPF6nWbmtL+sb6+8ORh3vytMElALiFw7ZftGt+AJHv/FkbCuhkOQl6SmvrjD2O/6drA/Q/h/iNQrQ7EmeyDFrt1S/bbBfQEcY6yfrnW0FhwQ0tjR3RyUR0IfOCN8CZ/eh1sE5/kehryNAcSh1isjnuNsoC+yzXwrG6LioIIUM+k5JqDzSfKUY1IabCIa9XXWuDL2CnJMW7lNeFyXElYiE5XYbdaPh7L6ifUK8rrgQtYmbKmcxkt1nMTj7UZ/srAfhLizazxw3tuEHBBYegTK43aY+CzdtW+AVbH9ttconoXWk0CSynP4czSNroaKjS7YwiaSDZojAImJaL5E4Whocdf/baEQNv5y47bMgDXtEBLK4Dnb8ajBbhzppZPKiwcCzrN1D+T7ykzwiE8ltH3uJGJeprK9u6b5tUC/vWGkJsRnyMTI9Tmkoy4rQ9Bzdidax6LssIWxWgbOn1Wf764L7D+baMcKbP75cK/xDcR6hpI6FCjxGQcw8UMs6SwjfiLN+2h9LO8x9UjVAgSC7PHXM0rlWWsZfbJBTw4ZYEkvBWpZvzlHHnMLBNVKOmYUp75VivgGdvQ0PeAk4iCNwhLVAdqbiIVAlP5NPYOmxmizfqh3m6X7JyyAqVJQ20rw1b1BqAds1QkUqx/6YVTsH8xjrytDLJ84904L0j5RaEoFyV2zfdbGriAFXpYExFsVWvc5tKASSKSEDiO8rczyJxRrPa0A0LxONb6dgRpDxMSaD8iEfvnocDFtV++hX1X9IP6+663eem9+3HH7GkL59J9BQPQTZQaWB3gA6put6MBN8ih+23hDLAgOapbOxb9soajKB9NH8K5AkWfqgVclGiSz2Xe5s1ONNvJbd6iwpx7iEvyXHOYCgndHWOCmFiif4BIh7vxX7LE4YyHJ3H/w9gJX+C2mVcFPFZyySqC2RhpTUuEcivyCIoEX+x96HDMZpXGUGfFZYBfZEYynPSjmNNr59ETb2ttbO5Tm0SU/h3fwqqJ+eC+NiCdtckI9IR/IhTnzMEqjckDNTrZu2A2qFvcIQ7t5dfPaeV7nVaPJA3GIzUG8Wqfus0Eyf+CzDKjQ7+LmlAubD9BH8TPG4aqre6jZ6iSsdy7ITVyG+GxyxocE/2c6sUSdV1Dk2vBcUsfo+XN/bbg5ZIajcXESQrhT4xS0GY8jC/n4m56eu7NBRZDvjqjLjO0VYILDmvGWUUenhZqTfj9EVgf6ZYNlTl3uLMOuj6v5lZCrPEz8fgkPB3oMZy4pk0oA7CZCfLGX/5rq7rI3DFgH43abLHb4Ujpa0hk1SswGz2dNoWHxyuHbeKzg9dvRjWUnjCVf2sElajjPe6g1a1Dc/Oq4ZV32jPy4EP8b+/I2dzKIfDmOMbVy6hug6Cr6WFB3Uyo0G82XPimVKuzqrfZ2EkTxdpqJwoMBhsXrVoKMAOy1wQoWXjmHEHKTK/b79bO5Zn7TrwscMqpspoSb9wlBKG8PUEJaePPlVL4qygjiOvjguCycPHxgticWJ2JRRCA8Uh0qnzRtgv6IQt6JonnBQzweFpDSJf2heyLON/NIJhdhG0qv3ethDTnfUreEZjecbuI5N6ae+1f7oidIkPnm4rxNsf2TGAVziRMGz05PaF8Ok9Oti759ukF5zAYwhK6hSc/tIOuQHhGy5OlfrQSa6NfT35CQqEuC5i/jqFoDHofTKoyf+GZLGh46yeNk4kJaMDvzPy46bwJMFfEVTYDvd/6UH8/+Gt4RXc/4WnKECxXSdEb1Gh1MNhywQ4TUUBfTKNPiy6wA5XyEc1ecQG2tik3vsMcc/uMOxHAUNT2A43YN4dBfMrBWrEABYuC2zIqgyyhhq4tVfQ6IdJ2tuHX96iB+2jtNrQ4nPJNfXaStUaKss/sCGW3AyjzyZHfIg5zIgANfa9eaTHkJnkwfMyFZTr+iaSYCpR48QjYGuGrHrB+ldhCiljRVEFWjbTuNf1o0qmgOY4y+EtucjLBAuyR9qGpACkqUFDr0qHFTpx3GHikpYH5cOkorMS9+krN1nyYHD82IDyPOKfAW1edLoBksnIq1hM3Ozvh+mfp6g/+GiyLmTh+GUETRGyETMsOJTK7hXJl2oGJfiWdbOU5TcI7AHl1ZLI1nPODIWXQ2RF5xqtU6U+QTk9pj1/CfuLM6Fshu1bqM9GFoD6eX0ji7Pew4TKQiG0qWjSDdmp4xPt6EftaSAIryx9SAOwAneLLZclsBs9I5hnNeKNGiT6odMWuuU+O8yFAIoc2YjAActTHc1oEwcD0lioYA4M42gWGMGTvpPxWcDLlkAe7M3Kjmx/jn9L2UiR0GAHPGnGGjhkCiSou9rgwkLUBLJVytO4vucMRJObJlh0Rny+SOohqZ5CPBexf4yA1mle9w/iv6zUQcosLTAFU0TZDVMo2M7Yj9NtL0JJG6of0iMmSoChwrHF6ag3ge3Mkj1M3uylebLGzmQc4y4T0dCeww2aeKnYDhqB+3sUDB3AVAEFdASjrAl8EDWDvWQBejew05XVGR805pAm2mz+9F+ZH2aMZ5ukZDOsVm3c5XuKDpcQt4iiZOm2P644JOYGaH6IrHc5+ut6d+s4cC8TZLBXMGoATyK3BMc3jD7vkz/FxTZ8lza0XURQml3+Xq9bGrjnvifKMmEz6YOu6+MC1zm0pesB7WJZX0dHMcpHfFc7DPFsPdPTmI/mXLBhJEpyGfrZMzqk/i8Iqqt4LWlREjdtXphhahm07tf4iB6+YeGdlrDqXXFrH4heUxWTjjmNliURnmSR7oMVa2daV69smrDBif9jCz8+DvYW/G5wVNDBP6NxZuqRXzV+gKmSJqxdtaoceSSvFOr2+g5k4BTI7/q8YJ3CSTcyuYCIbDvArncqPsUVgksTbBF1LcPOtmw8j0r3dtYc5vqqSk1uqfsLMm7Z5hsLOn+7bIixVbtlQN43A1VrDdJUwc+w/VFHbtCZ4D+v1mNXeHqe1Ennic4Ve+Db/6kVIZ9jmXHOdkHKXLpcuHGxMJsNBNE0+TyR1Lk0oLiHN/045BgLQjmxDZaSHNnfkTd7pFAZZuZo2Y7D2ZE4z/16RCIFm91diaW1BDL/tQEja4AW7hvBTv2FtNe3c8R4gaHMB2x5JtEZlcIiZoaenoimrkuUXEE28/+Jq8kBf3q25z+TAOBIYcL6eAY5O6G9AKxPWOlIPAJ7CJrQXYy+BQrbQ1X+0thWsRvBnSt8IqadPho12ZLA7vt/a7TyAHjerSuH3gC5sarvpvV0bq9K63FkPbQf3z1DbBmfDbjEmSZa2rvHYOlUGa9TRK2phmnd9n63DPxpfLk7/PKi+prEVePLGdVSGyGRlP770jaijSlWUyQ1x6l9TTi+aDGH0YZBnayTY2wu/WyJAKe/Vk8hBUrwRda/kEmT/qoKvPUz1zSf0nx5WNQukx86cvA9YlHtXgFzzYZ1vSqP7BNwJ85rtJXuiaxuGbmhlBQtlzjPlkHg3V2j2MXuql2aimSETdAwXHZQYKp5Zk0oeHKp2CFC5a9C5mHhFs21RIrVOp2riXD3WHv6C3X1OqWSyBZ7Mz/QdKzqCbfc0WgBnxsPWqOauxIv9+I5MwtU/WFViLJHiD3zTuSjdwM5lyy+ucPalSz+GemhEJ5xJ8wQtfpvNl9cUWYS5PRVDzmNqhj0pQr0Ea7JWnuKM4AZjKfzp7zv65Oz2bL07+u5kdFaX1B1tjz2I1pjyHdUBtCN8w5WrhGZCbw2gR0mF7rwHVZGhXm24s55vmmP2tjny8KUgNkT6C4FWyvVMz4ST9gFwHjdgIEt7tPxIeNo6xCWperLS7xX3EqesrflN0QfC7D7xnOlEc/7gZszqqJmTzvRo+7/VTG6rK4GFONwQelioEAtpLt8E4vOZnpMB6IJKKfHMpLiLnyJxnTuRVzuv0uEHPOmhiJK/Iy7KYQRiLlqmxAW5fFJ14YdcFKoNKgnj5AMqXmCNoVx1JGIflUMoJGlmb19hPVZWFXoF0aVaa4afmw2EOtqSQwzF9z1SUpQNthuXgTnlSbVWLSyjKyvICv4npNHIFeOGtj2WTeUD7CFLr+M5WFs72dlce+sswUFIwnEJI5lCaesVZi4mZY2LTx/wggnKr5to62G5B3BFNNwCD3c15NyVqg6l1/hxB6FH8VgQqjJ0fBIZ0fyOfpiVEsPZTDQCCLGNUPElLEiWQFGNhmhj0o5kJYPZbzKtMc5dsUsMPnZz3kOYM9OeSHuwnsDB5WLlUSJ00ec5l4mxu85IjiCln5EEL9+7W/WuWzVsFXiVT3HZwLgNsoYF6trtj+XuSgD6VAa1BOVdhVxw1yu3wZ26pTjYA2XBbv1ft/5skl8PvxOTpidh39V4Ol1+jHYmwsRhZR/ie/fuPan54ubUumEz95O3ScIoEMEwzxUnrE870IQlMzN5v7QuujudjsIMH8wQtea9Q9u+oHlest8/4bkmG4fBApJC6rTrNpOfuAjzZg/jp7/t9bc017upvhp5BwDuUhlKmancu5dY8iq+YFx5dtZwVaw1Vzj0rb58GFLndUl6G94UCOiHAEisVcPids0i3+uSnku3VS0AQ7+dm0EHBGFKJ2FEbTaSxdYnCptG5Irse/0J1NuPlfS7A/jTQPSgXmATNVFDPR+L3bsQOOWB+6tcxXEe8NNyb33VpCIwjCRXdMDR/zid0caAUYM1KyCmS++kIea7dlYmy1AnnoDZr6gzjcOBwFhjvqH7bQ9s9YxoRojdzoJg9e7brPhMVuL96vsIeQo7ASDdI9PfCo9FDIHuq89Q/Ic8ry2b5eza702BEDf9gNynJPIIkTOQaxgbL3MB2SaHZ8SjuaI5q2E341CzCxTOsz4xws/DHcF+m5wbDRV5IB084CXMLlxCaDrTGIkjHDvxuz2V29Uja6ZAU0LvGXRAl2SRV3W1vM1gXKVTN987s3DfbKfJtJVICyPuMejI7B8CNWZW1u99mcGLXDwladg7Nxipz1CF5DyscIavJQsvSbfzAMeIGwgBz2xWTbfVvKuv/J9WvjOeYcDpgtOQvuPTdCE6Y0msJwwXELbbKkWpyjuxIgltyiaO1r88uoHfFtxKLDWwVgw777wD3T57a7OGNkPKCbTpiG7NffINV9dbwAdsEYBwr3auqCDbyusxFOEl+GOejuTDwIjioWn/zOUGAP1Prb/c6OlpOpcH4Ahnar7Dhmte9nGk1v/2Fp7nLK1Tdz2j9yq3m0cCFuWnQIL9jrbUg81L0yF0XvlgtMyPOuqIxq77T3plCEk6UEYASqpCOTwn52O4FfGn8YhqvkIL+a7Lt9HZjamK8qH3mbKXGyLf/VP18A+MlIHdDE7xXa2u30oLBMUP90wa5l1W+FQNFfNEWZYzwY6UELSFjaeehkeioNk2SEKaxArBe7mCAa87ntQ0CFg5fUl54K1SVkkHHpYXwfVxJ/nC+sjvKTAz6yDg67bIv2hLbC3rV7bX1WO6Z//pmtqXCcCjGPhVOyvjjZK1W5yWNdrltU4n3/dqe5wrJBhgssP58QyxbkjDV552TcXRIsBvywb8geeQa3XJ66T7aT6nuSxuAPwHnjAQHASEtCoV0nSadxvIXngXiajjjIANmzRP1UsaoE3mhTm8rP0Y/LmB07XEOKQ4aZo18hGSPwsB/XLopf/BolXE8WS05bw7ueE9je4g555wDFnHgK2OXailLxpf3MCyMQmovbNc1YA0mfP5IPvvfTTCUY3fNVCKy4+ofed0MNGj8mWby2MRQEEtMSwmAtsewKG8znzPYwv+suy+PLlGNzSX9a/1BvvNZ+bKw4qW9cFtSaXI8pmwYCbnhYYHF20XMV+SC7m8f4sBD3GZyk/yeJfukZMYTrYLG5TogrGH7dWiNLuJjGd0CwcQNlKUrHz4FsvordsO9dpaPa02eOaCCptJiQW54EE/tLLq+kDkeWblQIWxy9XvW02S6x/jt6H2mfZ2Z30F0eN4e3BkuZjAOXPqcFeqIKaCNNtmBlKVh3jRYfh25tUdlxPpsNlW6lNRdKWJqlkdhBYcf4v7dpH7+i8q9yGzuqF6ZONQBt8XHLhEh2qAt9W4AvbZGuCSIi5GaiXCCzx/bM+biYLiFZdkUMmDab5NalhwBkEfEgdaJEDgxjC64vfo6V6ucR1BYGYvChDiwdmGA4ddvRPJxViD9t41r03Or0mMPMcU54JJZDa2v2TP8YJlRUDEL4hjTrTKVaO/wy9ybvlWSSX7/H/EJgbWr+BzoY8GcU5tHgNSTvPqLkqTYFBNdqDyxQN4R1rPErO64HPcW25k9ASe2cRTJ+sFQjC1t+bIL6NKUx7GdR6Q6P1KUee6eG7LqlMf4GrbAo+rDrXhZa1tBJBbJWrJJYUsEgPzVnhXxZZHLXI7VBr4gTLlUK0sAB1EHF4mh1G9pmCT3n21WtAPWWU3lPvxkmsowy9lf0FtSE7bm1PA11EhC8QiQDftSGgyxAeu4QTgKNsPJm86kDZAE1jRxDfTPqn/HTFPwqFy80HiYckuDt14kc4ngqo5zzbVFznywLAnhM8Ik2/gQr9pYfkHTItsKmu9nrCI33FDx5fXhmWtO2uOswcU/W/7gbxQMPmMi9sncoWFAcxXXWEfw3hUCFw3vyffpXfg2SEzvzudwDCS87kp2vBWIxf1R+d6QhXyoLuYLvsQwXL7NAL8MmMoK5zXoLMC6aUgJTipT8cGVNuU1VtQpCjxj6LibG0TkpLywUjspKKzOnqb2kRpyvZj2YpZR5G/LGl56P1cBAYXxSJK2gFIKZa7Rp6b6P2D83pXO8Jv7tfCuUSkaWa3iXM7RZ/XNfFPtrYpHCbVPk+HbV6sKJG3j2KMPqZz/Z8wJLSXImKPOr8SuxVUO5SEp89kd2TjDeDFb0JHtXDRP06vq00I4LseVmDY6hcEhl8kUZsIucapqstRUZX/ovaBZ5R8ICd3KtzuNDWV4V9UmdVlBw+dva5YBKW9yMM9dXthM9XC3I2CX2rA3Dir2XAiS8Ni8d6OnLNmdmzs8kfi5/Oqojbusa0Z01cUNiQUbB+UmjUK9cpUNnL8WZHp+pBDn/ylqKZ0RzSHxt4wUfJRCFevImyomsCEfPYbYAZgR+ZAvyXTovcblD3jA5ro1uf806710f5f/5YJMzBe29pirFRJqgyW+ef30HvI0x+4RhuJRO/W5aIkt8V4uZDjwXojoIX4F4T3Ep4Jr9WkDjOIX/wKUfmOi5pJqlhXkeIquK/ZZOc6K7hNRLkCuKlxagWQikWDZhxJMPPqJ6h974a0Jp4benNaitUhSU2ECRjfMsxTYe+MP7s9f+1bfPz013fQoWmNnJxbOmFeRyq7t2yrToPzUkmm1oJ8ivz435/dZJk/d5TYn6h9vGBPCfXX71u05O8oHRvY5oZfLbT7pxJ2aeRcUtlYM5FWNwdfrgGJy9DOYi4dkQTCTMkC2T/YNQv5ehTDOBJ8a7wfoL/sCNoXeRHMZkVf1UBPD7WoH9mqe6vW96VoJlGWaHi8VRSjXGjFM6cgbcxcSQXl8CxvYoSDqWZnpVDE6inkMghjEAKuqfJaxrx+cZ6u9nfw5dnkbxZHXLQiGnm+FtmfCh2FVk07CNNK7pHrLH1hbZaTk+9e44eijU+Dn7w+yJz90iEojJQmfGBGqPsUqIDBjlgHHmeve83UppsKZkWxo1UKFnNrzbENV5JdE/BdmPeXxxmiJvA5AtmE93DzpxVJbERNKverN1PQrOSKsQZcwm+RcT57C2+5fjSAWbBNEwMmOpCI6slfa+XZR1yHshnw0av1/GLfrurNrtFR71KiSWhIqn2zMG6cWO8ck+6zXZohYv7vEKfQRTA6dMgnhGXQ7xjkmq8LtQWUDROn5kpZ9aObI44KSrg6eL6o/+jgVssRlea5W6BxyOTAnVn1nyQQC1XxkMYHtuqvlcOfxP6umXUs2UrJ7AO+0pl4HRHct2bGLURjbQJDcHxTE6wCpPb09zMbwwS+6PhUBaN3v2Xox+o44REo+G6UvSHRMNxOy0QCQyjSSO3dtYjb7HdV38OKEaRKwFHeOhvX5cO62/6yxDc4Jpa8DWOxhV7NfEJTqtzkZSIJZ/wPYivth6/TQlWkIT9xKRQTnB48U2F26x6Nm69bCSNE4iYYSqfruog/TVu5vHb1Pv8T+0GPwF6tl9N7s/P/A0wYujlRpsVXOae0g8HykTux7vw2h7GhAbthPKBkWttLEcUunnESc58dkXEXGCYrhsSHNKkKabM5XNJrqA0t51mrcf1PhfKayJS3+q9qyIZ1BoehYcm2EgTYWTZGmIW8bIaqKvvkAhYRHxKX5ajR7T8Neso29bR7sfYKVa36lUg1x3f/r9LDqw/TMzRBRhejZTdhTaVXotcE5UzPwvCLqcz7gXTa6/HyVyCMflPA7EyK02ZG8nOn6qm1f3uQW2gOm+wT6a3YwDuAk+w4fT0BB3OnP7Pe0d+4ikw731RKMd0HtxOD/u+fT3ttzpyb6qW13MyZLtWnSW3E4fHNUjkZyzd7Dso6/NSbvQRqVA/+pIH0klWi6e21mdWZm8jon0J29aqCki3AKvcqYY3IlZ2sbHJpEJasY/CToF1EcgbUEDcrKtAaFy5iiPXoa79tgJBbv7wKABp5PvgpVEvx4XEW4FFLdBFcibc68I0HY6FvjVhWuNpLoqEmZHBa4D8ytMQcftB0YNmF1vuTBOb2HrRlgZOOPe0HKLfUA19Wf40PchdCPYDQEQbO80m4NXWivgxZSnBN6YjTBwFJKYvbDNLgikeaSzWOqGj+8PqN9qjwBJj8lutkjFBBx3eOnP92LT5br5LpykMrdEnWw5OaDbopE9wZyopyCsj4B/lpeZV5/y+1FAqqKagw96s9ckw6lwYKjgvezRu9PvSU4CYOuwDmS9zmzxSJUIPEeRjz/PHYrGguNw1N3lq5CP4mHjBjr0VHhBpZBX6FurXfs6RIk8t3r8QLq4VS9rWL6Gjt6qFiYLg4IpB0hvvMLcqDoboUzCTwqtIo06gzdKN/15XkovXvVULXQS8xblhRFs+lkSvuKWSQb4nnxYLWY43NRe2cZyizwe6d9/5q//hAl3a96y4oj7awZ0aBfKM3Kx0FqpkXGhSWvcBYrt83UZZGApGgptKu5KkFgyGXGqmfb7QjiyCkoOn0FBcTGuI1L9jKEyfzWTqRuCLtzkpc77NxH/3DRAgXPx9br/aagUHC8lTBmDL3UBN2egTB4ZQukdE8aGZ6x4wgs4J4pufhAn6QNt0+4VM7IL6gyPuL8KncgYCLNPqDHacYS/a8BR6PEdlUdrCwzgJATIYMwOuV1UDqLxt4/BbC4t+54bkdkIXQ1n1EuDkpDGyh2jAlFBeWQyvfY2qi8Ce/bg09l0HBNmACOg==\",profile=\"recipe-server\"},[\"router-server-release-0.16.3\"]={public=\"Ri6cEYeSPCGsLmFM2saHueNHxFqoMMh3UWv1mOkXwQSQiAEu8ohn8Y/QZMHEslrfg4wVCB42Ms8XAdPErGSqGv7rKYagviyM+qFKI7qf+zorfRc+yf66/Ju2CAmhUH/OnjL00IVPaRyhhqubT3eQUh3vfn3vI/YeIpbmedUwaxIx4BNq8MxwaDW6NxMGyfGTfoMric4EMh+jxJUm8Od2KEO6LS/6zDbGBnqIxXZc+Tnj7ZEfq6FOMYMttgFi4EXp+UUA3ABataMZhpo74N9s6SWoHdUav0fpwFfUoRuhMjPBc+VS8lplEosBCRLf6hznB0iPHsV5MW5jjMxEOjqLBL8s72xEuV37NviogfgPipXizCGZTX983WtY00qhqpA+xzsm6Ra21IChnyTexL22ry4CVAMXfJmZH1DTL+VXw43D+9RC9O26FeHu3mpvm+FuTgSJv/dEL+5rff7GqwkRo4KHbCqP0NA/QaKrhn6G8bCSXrI5KAtOIsx1GB/HgkmskrzKLs5780yz9tkpCDgjCSowFKHmkLDpDWPAlHRU/+syxZzVENS6dYZRAh102nXMdkvjrDZ1ZF9rkDAqnoTh5DFZnmWXgckmN0vx9tF/kcx67LhWfa+cmDUww0dCSG6CwBG6/GuPhc3P7l/8sCNWcY1VDC4gEVIEUxMGAwkqvtwO77QE98xNstB8qysYkxgTwld70mXIE/JUM7IasdS38DNRRKhqcUcUEW9Nx8Z1vnhx7m27P6QUO5Bnns+hr8HgLWhvgsYMT+7FNEMN32FgWb8JDpFHlQIIOOs35cgV7AczI0LD44DljoV1uk++EOoJR7G+LbU4EKnQuR/+xAxt/qmnvmp+oiJMTxB37rXbA0cfbDDvdvhoN1qs4Rabi85I+sZygx2nhRLee48iVRBiKxv/DdC46kA2vXR1peqyyyyJEa3nlcXWS0Ywctt1zQGnB550RhXr4diGmQvsN7NVIXa8oGgogW153tBYfCteuiizvYrfLngJy2/qGy40ljw3UBpeSqxC2lXkXyEQE3sriZwiF0vBvRR/bp9Q0Pyayr4L9/fKHJf4+zS1obPAtrK7H0O7wcd3ugT4agwHJ7jnJ04z/CgtCAZTCKtwGhpH71H4L9fTZMpnWTZFnYV2m+HzZNfOEM9eaiy4xYqi1X+SRpsluNbRMaD4e/CXiIPCl+BetKRETUfVYfMyzFbh8Ccgr0SaSo5l9SewzjXiDKlKECGXFbmSWh1YB9IRA19V59NMvSO+v5tttynKICmuJmOWpa5K+32NAq7h3Ij8ToMQ5tcOsOQAM+qsZRIPujwWbTa5D1OLBOdcAavnh3c1LkWLtJzl66vR+C3k38DuGXQbD+MpqcL0pJ2quNWfH1ieouTzTmH64CLQUsqEPYKrGtOSamiVICeWPjemlwR97Rl4oIp8fYyOeJdxx4+x2SzZCF24GHC3wUwxxTBmDn1d9wz9btE/YSVDi1zQJaTWPE3J0BhUOYLtvmKusdH/lOHZiYGpHU0DlfG7WITCyqHjxPU+EjsH6LonisXzroF+WNk24jaPyduxsYXnQA50yUM4RO4gLlTCy83RPU2LGt9oMUHmc5MO/zi/CBXO0l8AKyBa91UPB4FpLDXbsotIISs4dSK55CFwwJUMPYiqIGnufsP1nQtGNjoizhlvUQK1RQE9kyRFx7B9UEDGmw2aw18PJb1XtHGdZ6okP9APmrw5remdzAE3odHLqqQbudKkqSd6X7hp5yEo22Bq0QE+1dypzd7avcp3kb0XRx6w6KIMOgrAtK3ID0+WGuB89vG9CrV2kjS6mHjqinmzkZ4w8k/eU/mGyKV5Bixe+2NmkPIpuwD8YI5jP0PgYkKhnV26Z6jTKMcLS3VeR9ibeAz+dixSG/LJ2mX2+6O9VlEVLNNnnaLQu3YcE/UjmHY5hXNuZQDHM/wve3UUY4IPxZEQ9H8YbijPnXKT4o7U6RtIiIV7IC+dMZUtWSXvBhI67UHjo9NsSi65cQwHRcFDfzds3w5sy53jiuABzEX4QL4Uys0u4bKvnp31KJKQjBGaMVobhXEtLt92pA/zss5yBWR+L4/S5tfEuUxvmcZGYCqOJgs7Jl+2Lq01L9jl53I1aSHBFgh+oUs1ZN2Sr5Svq0yrcuuaUSlpfvBbtq2K/AOZ1kchinzZYyhYr2W7J9qkQnqg5p3SWOkflsRfKrPA1+A9GrguXcLXcwia9wOrtlEtqy79aiH85fN4BQ5JV/oMStqMmiHa+NZGe7PFP/AzaK+mPVkIOXNKemt9QXPvmypYuBAlh2vK2nLURCAPkf9+DwYypcsyrpFQ+Xcb5/yhE/HRCFHj2aidTa1qQYgQPt1GrpbQKa8Ff58iPDDZcvsgaI4W1FA/r2/INpiVzR7Zq3iakTRiu8yBHgYxaALpYqhFQ34SYWSY/eAxdVAmmO++yorQAeIRWX5HTpVqTN/SpF4cfn/Sn9emMatKYy5itvjTfLK5q0aUkRKXvHljxQiAXM/B1Bx5udIaIydaqUaXJuiFaetwpMm13M1e0e7Sew2l2rsG1uiIw7f+ceiXagsboDPaIXq/Ii5frUBUPCFbgC2xMJhLrWazdZbjG1bviJyiSFx3U6uLUGnn+yxdA9FH7q6mcQeWka+5A7M7AyUZuwev+qExirUAaZDbbdICpzupp+lon1myzAGZBISiiPnq7a54HJjTKnraUf7+u3HkE3AuG7OlmMcqZALs1oz1vcKNIXbCe1aTF7U8RDInYFc1pOg/rKu7I/M5zFO/Ff9cPqxfVfG9NHZ+tjcro5ABDNqQnmfSssDYQ99y6QUBTjSA5JmSd4hlbkYpbs1zQNdt8kbqms8VhoSd7TpZbTjsSRZTKEvZtsIn3qco51ikm8xnwnNhAMbsfNNB7OAmhxdqUkmVv/u3Bv/tSv/eLsGcbTTkyuOMgKEe8TRvPp7Vt+gwnXVGDmtQjUVuVe8WHDxKcoJ0AvYluyJsDvsfVTkfyEWkHWADCXpDSY3oHCJhfU+B03Xq0UBF9yIqFR1eY3AbqfUqexFsao723pZpGmemVkbAOxtmUp2G+4MPTUNxzk30glYq2b5rZxGKxlDId/qOP/JTn/3lAtzRvnwu4Pzm9ns9FxORJHguTDSvpdZkO6ebsjK802XrAMiV/Jf2LohZozMBzWdu+rlO2W5cE6WWglFUZA/tv3pd53AX/87nXHQJYo+aBSf90cvmT17W/PTQaIKAEN5K3b56J98Ub4JuGExBAjpuKrrVu0Fq81pj/dVo0NBYzP64QxZVb5iwioUijIlutlcGNprL4fM7dcdaRHVujK6MrOmNLxCf5MBQPAzwm+SpZy5gzVQbbZ1uGv9/+K/guwMMx9iaHi/eIODPERj0t3ZJ5p895GvjjeuL5NkrdTHbyTvYne1M5UtFvd/92sgRwF9J4+zwiNJHLYiAsGtsiur/DWJ0PEkjfIJdZCHaKI8pETS0bWQrI62a95bLyNFElFWwotlv9d13GTijYZ437kA3otA8gEYD68twyAKbFK4CJthboz1rDcA3y6b3cwGU65dBjmR58WrsOtPQCI6eQ8YLwy4Xxg40mtEKJxQYkQ+DbEjoAhSVzDZ9L/4Pgq82sQsBx6v9WCD8GZH/GFtWYNoOrQIK4pWtlmb+41NDfs+q7w//44tEZt8vxJPsMCi/ADNuE6UFQQ9zyIlWDIlTDtaSkoHeyVxY/vl1tqVqEUmuWVqGnVOzzslHkiw4ftlcntX1kUbAG+fE4q2h2dZ4CyYaHAE05loHPVYALREYgV54RXxgYDKWE6saql/u5rURy5A9GV0KJAF5PCn4uR8NvXZHc9dISoFB+466e1wnWVg9FkV6PU37iYpWoWHJHaQGO6+yb7f7AiTrKvtpWvkYt9WsQZ+42BfjBW2Ns4gBHnxpPBe5X2OUiSub0c8lYGb3mGlFve/NI45ojFnFlDGROShR75RX2lJMmGspZS78qc2QIkGgDHDLgVP65MftsdPQl0QQCdM6X46e2/k2IjynDoJ2poXRgUhjGjcl0Zlm/k07CLuj5oinPNzicedpLHy0AINkF3xsZU3iXg721Gi0LsutE2z7MCmMd+OMB9AJ2xHp5BNM64sUFGe64q8WxeTzSB3jkOQVQ+UuEZAAOmb6ewdGRRsObMyys5nXzzvZ1ljpWmqkI4lYGLzS4BM5+qMe6PXA/v2vIMy3vkJZ6j0U5HcsSKTSlFKmvXMc/OV2mbvNgPM5Nu4vqgIWd/BehqS6Ny7mVFQ8yd25soMJ/p2MsPhfCr1oKavfzBnBVosvmTRZMnjUJnPfxzdnfl0cYWTh8q7wh9RlYS7LZxw9EZF42UtCRJD1R14+ih8Q/M1hL5anHnVMI5wnrTQUkXYFnsmRHQvgAhWJ76T7JCPltwT+I4IyOKarI+vh3KsAQP/KVUWJNiJgpLVQZgm6K5V2Ew5I2jGl7kLk83usD+QguBQGDo57l8JLsvj0KGgtMtn3tCy/78NgKTWEFATL1Uvs0APMkurR9+uQDyXPWwbhXmwa9suawvMSw2ppipDW14zcgxS8StggnDlpmL0m3gUs0SOdfWVm4Xd82X3KAAK9bzj+58HbPYms06024pTt/HEDQEcLxI+Umeb+GofdCQofJ9mDrBLfg/VkZgvIit44fIUq1VBg/4iDNCCv5YTThOuUUFycoFmSafx08LTc0LeOo4O6dH17eXwgdT4f90w8koE7UFP61XZRfuiVazC5C4ksTmbXGSZgKYQzNW504MtkTT2gtQfDD8QVfcXAMopy4vnwvM6i100Grc42EAoi95IUfKkhPPauEXcgEo+ZpmJtcBPfnrXR6L8OrRxTOrnYW7VnxmK7+3ibP3khkH418krPGiRDRCbx0ixW/UnA/9iltRdTu1PREf4F+DV6j3nkM8okINofRmP3X9wg2fjnPElpSeXwBNuWVxgjkGf/rANpDO85DuEtaQL/fIXc+QooX7qe8gt3MErS2bDhNqRQk6M0O9gQEJbjWZCFbv/3GnaNLWJq3Wfe73JLsl3U85x0ulWRGDQ6hPyqyhZnBVP7Q2gxY1OkkZao+ARCaMx47fk2Xpk2F2iPOh+EcLU3czG0aPKHQWUqDxSf4gsRkW/7b0SXZwM7KLWj9n3Nsp5TzCWQHFADtftvVC6F2piaR3Yu83mi3aLOX7/YwTeD88m4oxdVkZUys+whZxOF7QE4dChe9Duo+fr375uWtn7L59+b8hCAM8eDajSqBYcZdFTgd0mthsvXDj4EN2PqtNrPSr9FozQTu/90ftf1kWP+ru4+zBFps6YF8bYXNvaXuzBHG9h0+3P2Rw9TGC+0gfeZCw/owpncmVVNr+BkyKgDnjTpLdaK3r3VZJs7OniiG4Tq354vrCS/xTTU60e8qAy1fTPU4nw9jNLL81S2lmoG5ToVatd+2cwmpq8e6q2JFIGDynR5FW+EWHSt8G8Cegxu4y17fUsALHFAs0A7DdhNqrLdCewPtX1RiDNGOo+5A1KLNvBnK6dD7fonfsnm/El+RkHuMwmwPDpmt5pmPBHUYr6WSOQbkIza8sAceHc/R1Yk/WXZc+Qf4ecUGOX4PGI6gQ2Z2fLAzU3G46ofbVQpHBg3L88CnGYy9/5+Cgzw1sda0pV0BweKP22Rny4CjGvJnLH6Cjmretk3jlDHk9LSAKLH/UvDGfTTwWtkkKt4wbm+fJP44GFCbekMH+SFe35R8wLL5mMEBONBiw+diPvzQDc1yg1aB3LXlDN19RLWURqziKPw9zA8QcaJ1hzZJ3uxQMDZ6BJp9bBxko8SF0oIZTpq+sFy0uTJ2O177rNMhNWDhaHQAECSwld8dUdO1QLrVmk3PHbgLB/Pzz71zkTuJpKNg9Av2fVpPePQWpvO8BxPIlvcwUngt/UZ5UJbhQpdO2Hht7eo8/zUE62+R4JXjoP8rv3VpImQOB1nq2zin5j/7t6VdGLChq5VDrzDomizmvrj2z69SFPxRkmJyvNEPZUBhxHss5MSw66/uOqJplM/maKw1Et+nERcJuafVmNFsR1pihT9Di9UPMEqWm4y7GJ+gA8BL5Y8qDKfaSdSvY/FXEy+tS931WBF4+ppzh271IdNT+1GP3oL+LQ6L+AQ3KJbMkBGizWAlYqOG9QG18+ymED6DsCh7+pNWJJQBlZRrQgd8dC/jb7kLrOq3N6FArFTpAKafJzr2Ng+Ep9+YevqURwj9MUrBpuUtlJXeSCOP9rvV+fANTaW5zMoQZzh+osekSHMbK10DwgsJgHEuOqVnWL6nUxP5nlD1tT91jiiCt/lKrLq/B/AMpeXACtmCnFXONB7avmftaRJ4XMw/YrPfRn6j6iKqC2tV070d2PZ5Vrd4r0QWMKmLTqyrD3Lm3ae52ygW0u4A0ZtJLIMS4htZEugIhjKBJxNd9Uf9rmH/KAUWrxI5nIufpFUSmQUq8Or2PkGq0Rs2D6QE1HLkuV9LKsSBFCpqIcIwC0UFtFdfytO5O6Cj1VyIpOPk+n/X52UcRB5hHEsHEuk2hNuoRnDLm7I4UgyK1C9AhHOqEEpJPu4mshlYZ9Ki4l9V1wFO3LIrGQpuXUb9A2nSv2Hy1kHzgvvlj8mugHOUKR02CREbBWOZZYj1SGKCoN/xmv638BloGgEE599ckmzqWu3CdmOdJ1uG7P5uMosF4oMT5B2C3XF0e7a1JVfpn1jF1dsHIbi7AqLfL0zvh8VLWPbGubDPwClqSeS2BWyHnvoRg6oqOxF5ZoX1pDG6ceMj6QavfQelMoJuajNbW7cWWTFwEBVHtxRHQWVyIa4LgYEemUVtNQbnP0Fyy6mIGMkKpe9QQkj/sbheCuSXb/xakGrdUC8+mAkyPlonbcR+/5QM7GOGvWqG5juWRCPg9iG57YklEf7/xpTmtF1H4ycYUMwZbAyGy8JyofWFugYStksVsJ3NIZN7mHkGtRhvKAUi2JH1g7fqr5YDtbdtXm9CT3PYYgxhZHaER6I5TMDTDOoci+omSAsMRXt97PQltWyNL9ese7hsBZ+od9smRnpPMqG0JiaoiZpok16+8kdu3nNp5K5MuL/kqlGmYAtOXtfL0OlSpG6TsWwtbbbMiG2leNTjVyaUQ9kSD9KJGjb7e/SpmzlJ1la09c4B/t7+oIGYLwn15ebddHzTWgAnPZIpu/08qv2FLaBCkb3qO9CcTlB9lfFsmDUI4ZIb2kd0vFJzsmIGFFBFKfp+e6R4QHSqgpABWMHU8an5P60hR6xxqpxlOqNXXys2ySc5fn2FP86jQQ7FyLuNHKf0yO0x+CX2aCbmFPyP8PxeuKorfa1q/TG/AtHeBnAKVMspjr1sS+id1SbGP5/B4mPNZ3FZ/5LYJZ0YwLIZ7ErR4KTTbRfqI0z1rZdsDI/ALVZilyWoTT1oyDLdVTTJM/2ncR1OYnjjbC6CYp6dscySJLNmntyQUyJqflXFiwNO55v1NMoDkOw1OpSP7PnDxwEA0wHXtuoZOPDS8V3xxEZ95koNj5bx9dUEqGm+FwvA2pjU4Sua9GnBSuwPH2OZcnLDjicOLN0zaBXjihd9H+xEsdeYjIoVo6iWUmOjhsCCZ+NBtHim+Uh8IjQMIb4laKLalJnHAqq6YEAfOu8xP0nGQkHFvylSWkyXgXipN+QIrkWOS+Dk/zkuNWuKD1S9WR68vq2MCdwWcT3XvWEkcSliEp/AlpRsIEl1hW/joN3zuIy7KJ1Yiur6gWWv2CvOKCOEtlInNwriXT1pCnB1nrBXxoaODVUEw4qqddBqyWVzA98kcGrEgLnYU2HtcenF1rSuTUUZHj+GhZE/7qSOUJbKlA+oZMHzbaCFB8U9b1/zGj19a0u6MeTzBZv9AW5LnFt5+Pb/Jf7FQHJGLW3KK7m10iDARsxKzG3iFVupPYdpjdZuHDTF/BluynVy04gpP1YteunGyNg/0ijg+nus5t3iuA+8ApINdWDEwtRURlUbBW/RCJ9+oJqg4qRaM6gmmJn3MvzmnANQGGGmZYpUZQBFtJH/LwPnW3EeI96rAdU8CR+w3+lHlHU377/QftBWc468eVt+m6s1Xf3I4g0rIhWogPRwyGyzJ9eXx3nxuMn8NkXeJEMUWwjRVm6j0NMe7etW4aeZSq9m6HqgjNbpvBZgGlcwaVLfniEq5btZDSf7xhUQnFic+7sc/Nmw9Gjm9L9AaWcccrSGXuRg9S+Gn+7IP2NKYsKcV08awHfq/SSrFH2nm1JCn0QyeFPcgA+g+0Mu96hdQtI0e9yzaqXS+x3xwT0zuuLFdFigkYXwPQgeDi7OUCyJZqa+0m5SQlhYocYy8QsIcAg20IF8u4FzDbPJceeTFSQ0jHwNYT3aWn2uMf6rJ4E9ygh1FzPr/UJdVtHjd9MQ7PKOlaphajAQ6Y+BJMPQpLVCYDqbIsIOBYtagntMb4YpL/qdwJ045Y5c6rrWoDs8m5DxRvZtgE4gs0SLOvvRWc45CNkFUqM/6B9rdHgW/Cev8D9MTy/ni5bdDvkRxAvPSpxUCrKaYjBawRjNwXxdr2ULPNKrRicGs1R+Nv+DYU8xymGkSVQItphNuRscmLi6Y48huWR4ZOfSoUB/aE/xkgSPXatlT+aabAc+GenGRHrzmiPt3R5MngBl7at0opQyuFoaB0Y+UjJACcfLgd1/rj62Yh3EYFITB8IjvPJ886tB87rgOpwRo9xWa0QhCrOakfOTecfedXlSmazlc68ZY3awu28z2H1Bbwe4B9ysz1il1BuJxGv3FI9/6r456pglY1jZ3LTCUWsJTDg8+U1Efm8K8o1+BmaXyDBAkmn+7UfBpLAjlAw10PsZ9Z8eIob13HkWWN6lRcTjreFXyepceBmbtpE46oiRjdzQj33G7U9ZqsxYrJvK8fM9rIGw9HcvQ0sGs2LK5pyVBcnCLC5YxWe/u8DMC1muWBgw4X09UdjH+NSqjKGwTHMb3IHm5lNXbJcNpZrMG6coQESME8ntUWTwkQo0NA7GqKEPRQopO6BDeZH47uG+J2fnRqcAVM/X+5jkTLuDVu5z78EtqM7p5YT2bSb07WqbXhT2ByVKqk4s/T0q3L0tEBRIcIDohiMlsfxbf6Ss6R7eQ8TMgZRsHOn4n+ZXdSHSXp8E7jbnJMyf7hs8CCyzOZkMmPjT/O3RkALgyFs/yXkfva0+kN2FzcLmuogI8b3Rh71Dznj7VliNu7eS4p0gh2dsajFeHm8Z5dRjFd58QtHUdJ+qXPk8Te7AoSMpeC8IHFE+BvEGDf+xDXfl+IIsq++6rHPMmNq4rMma9yLkfg1n23+ZZVkFRtWB3IjmuUIaUP1PmOKSwL5YHItmEwhbzKRUPoI6KooQCsa4LQ9lrm6JR88ZURcvaGvkYx1S30s7YP8WFcafE0yyZtbIyHP2amYfZNFdOzuv725eDIk97uYO6HccZco9IZntBRSyaFRhqQnQsJewUQhN38iXIxQHt3OAj6uw29PUfBlSON231AXW1xxr+kdFzjmqpDjC5scZVxRGoNYbf3No6UHohegFGb5z4dv6HsXnWRFlNLK04Np1G/netJVJlO2mK16ehK0ljpurZPLvkHIZiL5H/tP0yVExt1mw3D9gGet2T/eG9pW6N/dNcRbusvsUlyDm8eKtS/ggxuj3lYSAPlbyeYwOy2A8lTmt5LBqYbA6rcLPVmdxDlKHbWygVlOMdFQIrdxmfTozHYZ4FQjtM/1NEvo8zh3YEegXSRl54Rs/sfwwEZ3P4flQG+JOFbqhL47OmXK1f8h7N4rQNjXqXNtizOvLjPz0Iv/UoV1FfI6O9sDDhtDrj20lh0S/E+7d+a+gGe0VwWMB+cMfs/0/XBAqpR88dUOb1p1irEoXHDqUW9KZBr0MCxHWwpC/CM+L+1/gRhVTuhItHQ4yzj4Wai346pFfKQQNw+LvIWOVrVihGk0xONC4xR8o55Eh3tvTWqxJjPMRxw23vF1gwKvQOWN06Ijt1JnPHsy8vPE9Y9oDwynzuHCCS3AywI4fh9xkkt5K78H4jXRh0N9bfrlR0eLyDLdUQDueruTnf0TV/CzDfi9AGRvL0O6fogbrg4cRS/omml3pLQkZICoOZCsO+/xgWvLArZocdN17wHQj0ZLlXnSFJ0XhoqhwgmQg9vBJDGh2Ph9xdSeSh3t+42+DdsAOhkY+E0dtRn95GX2EN/9gnZlPHhqkb4fZshSwal4ZM8+yQpCxWGP+FI9zaemWil4UPuyg4quQjQuLDs5cGPAYVPzyy30LiA1WNyYcNQLqFtyQPI4LUD5NOSQhAcRP1yLa3JRkswEoKJJpaBKHdVq/nXxysD5g4Ek5RYgXXtzvpK96j/x0ppKjeVI2dnNse3z0vkuI58lwmyEr+LW+QKHWFsgek6n7Di3NwFHEyP7yNep17Z5djK8HL3U4Qm83hDra4k2Gg+KY5afmBDTeAiKOrjh4Mx8ZJacrc7jVwCfRBZBmL2zP7dIfL7R84sBsDkgGNhbanf9So16WJ5sekBRPGNtURZxoTFNP4mR+Gc3nTFAJE8fkF2uZzUcuM7f6Lt2F5hkVoYvpAaBOUdPLeT81ZG/O6Re9XJ5/1GUz0JHPD9YxX0EBV2kXciPzGO7IuOGlbRk9geX8S1lW5xxq4IEtHD+WujPjlZj2OSwRFNJTRqbujzXooJVoi4YEt3DC9REFAs6AAAiN4NsKYih3WIWdSUP0vtjRlhTq0pYyjYbCE5Ox1EOTvnwuixaJ6RmseF+gAAVHmJnaa5Tca+emYzfn7RRQJvqtfqJ+5NA3oEMeg0p5fzJhF2KHjA+GWYFw4NFC8sdSpqbX6+chV8si9/aaJcMC6ylTIvIZLLoZ00ZfV7fO+A1QBXuPm20b76n1b+3JKzp7PPmcNqtVrd0RZEwUt8dNFAH3Y3MINmTzPT1sK6CJZzhITJwma0b0uOmQolfhBYZdA1OaWndoZ73jk7TVyuPJC2NyuenE8OZlp9BqOFZaeEwXwCC6mXjHhXFmlFztSPIqEklEGmjC42SvuwQ+/HcK3MXi4bzqU178m4/Bj/zYAbCXxGBnqznSPCNr3V7e0MAcqVwDQWB4ZQJrl70r7t3fpni382w4nL90bqNBOXX0JabvO8shZ5rlixMdefZSsnt63jmP6vrJPQmAw0jyCz8qY0BntYXBPfJQVtbxKqlBIueX27fNC6U86AjgCV0kw0H+/dMWKXhrv8fxf5Yf0z+mYIP24Yz7N2GL2brGZvwhEdt/qEFikmfDS4lFUaCZ9XqyDc2F7hwwX4kszkxdTFTuRUKb/K+jEexGrIavBxufSTmjC4JuejVri5q+XD5vkAS/479q8aMfeE82FyTC9aG9MV37uSiJUF3npxwPnyQtDJoGALkNlCGbwLDXU90i0pU5G0gfFIwAcwLcJ8flpgjHItRImxRfP21WmUEN1RLFd9BrjGEftcZ8kaiHqLIFvusd/DVdI4MOrBTFDEBTw9WlOYKSOgktLLV5AZPVtVADnJvbFGExjh5qgmR0K1IaqaOygCPz5xcSo4+yx1PTYwgjhau1IlH60+EfVE7WqXJK8aYQaN3rQoo5VCAkk38foR+ahCi1ckvWk2ue5tEZ8aFu4klDCJP4HYjS4dzCNckB/rzYo013Y40SWUVHG1eAsq7rYZPuiWXSa6DZw0Cg/8w5tMYq+A6aYT0Z9Dq/ftS4WRccCf6DfICn8TKgDmYuhrHaVPKfGSNb5p01FSj8yb9obapfyQZ0kwaxpcD5CjiWZQAYyPfp7Da/2VEYVMQ0H0zUx/EpZQx1snAq8bD5mFINnp9QoC+ThJ+cWO0MrSOsx56ynspNQ6NWAydT9AfvbTqhTVwR3gCZvjaX78dvzqJGBPPGCaSKXSnjSiEOaWggbn6GlJQaBbY17BFUtWMgsEg6ZYOHnfkyobtLwGYqmRTfzmWGilbGWdI8lzPrZiiMetoydjn6SD5Gkyjzh92E4NqzpMB5DPy+SXr8ZHr9njRA7dRfGbCXgO6g0iOk/pxxbzWv2bT8UP7e4nZYJEbR1y8w1KZ3psg0M+QMwj+fo3h1a0XPge7x9fYI35I+05UAiqX401dM2P8NyfcJnqJWRZj8k60uKt6CM8c3psi3yjw1H1EEHsKgIy3H+SPIQDSjEvZ9dy3ut7yEtIHcrSFRoWGIiBjsXU2vpdude0+Joi5ZfzOXZZ40wHheYPaconBTGo1C/CJBHKh38YjS2/4Qe5ugYTwA1oE0//ZCEJqXKc8ht1xHnpD4B566HUq5pwpCu8yZDC5jk8/ogHOwofl1sbbU/kG1mBIP3e4alMMLxGYfgC57bcmtQYBjMICv9BnYsxCsDbzjlkbkNPQ4mL/7vIXYkeWPSvb3rxsy9bh/xSgALy2Yx6rxsh3ipBPJ9jnbgQNOFUFYlaSvBuyieCe2ba5YvAbhKV3pI8ir99NnJR5MVyVlLvxgCbM7S7zLIxATFvnWEhA6b7HwrJ4+EDx8UYocVTtNtAWrh5dFAYZBKPbGp7ZoOZhfgfwhHU3kYdqUEhXmfWNgNUEkHSML1r13fKTp1jObyqPbBxPyODXOKEJLcm4lmGST69rgWaMc9oLOT2oDw4jhiUBESke/Z5tjL1cXg2YWnpiOCAAQaPB09UqoyMPx4B0cUtPLR2ywxjWFgiOZL8RKtIe4k0zXOnCOs9fdGlql1XzwUtlcaMnwsJeM+JWAEYTyJcxHcjBuwTFYA1EEKJUUWKfgCJbgK3JP1opCY8IK0EDnzk+Jg7WEClEygbrl5fuFOrXbPTXNg2BsAhcUmRCOWTDVef8si/uja9vN/lyzB5T/UpEWDuTCNBi+Pp7R/AUl4ue/IMY8pogeZs7cNgZVHxybQ04zq6VK8/8KJKpkzhBbjLdANouKaOGnXa0ajdJPU3H5jDcHcJ4uI0EAqJFUix0o1kr4yNqDSmhLF8UmIlTG6MN9LOeGrSiTC9epQsE6W0qDlMKMTuudB/EOnbNTJsq7ATsxlUq1Bjo7daEFKtBA/80j1l7WJ5mNA6TWRRU4YoYOEKSWNHjpZBChyT2zqtwnLPlsbrYSlTQUzmn+zIuMTakzNQU4V6YDW2GP2X2uLgL82gU1SMd3jSvQ8Fkhv9kqLzQveUMk7t58mWaIqDOAlZBdY8UaTPsJynklPDQNxrvF0r3pMDU8PeBXHNlFnk1wAS07Dfi6VeZOnZDxt6FriyLmrcFMrS0d7Rwf2hNKDdIaXqfloAWdb1EI/IGUbRILU621bxIu28C+TJ55eqGMhJrXpO7O7QnPrINEOj69pUBT6aHuJ9thHQBGJSZOToI/i59ZJnV1fLN3SOCCcARoqj7mylYv7X6CM80q90tefsoPGpmoY9gu7nuzcGQMg3FDRxVFh7TPn1MOeNuHSMkBr4OIvt31Ach7d/34xKYhinH/T/OiisiuFIo5xyUj2onm5r4EtKngEsDq13OGVADu2HWVLTarTk/nAZuqjr9ran8Vtnb/hmnfgmtmiTu9STqnSsquxFIc2iksx5Aug9HLzNsnakpqbAgV4h7WOmQahCm/+F5oBekUYedF4WGH4tk9mz4Ane56HbpRq6EFQw1o9t6PXfH7dYTBRGyCAEeazqBx4svjBAz7nQykeQQFUWF4hSkciulz7p/m1nla4SjhtjHFOJa0DZ9eUyZxWLw9jQ0D3RXYgHufVxvhBolfdRvuv+6DWLb7Lx3zmfdaMWJczl9Wn8fEmhu9oyVFbZM6sUM+5Hh798tGLr/zaYplKf3lAFqs6CnjMm8bbaj6nrQo2WGDkzANtOm+HRB+4lkCRzWTRa6KmFHcYL/UfP+CB9w4YuLjO5cZ2QaqriQE1aaCCspIIbWtQpBIFEHTpLOxY839lLpKXz6BCgunUTCWMDuVES2AoQuXX71SiFbpLK+cNk/UKlAvNEwgvT6s291ZZqTttoUrwYlf4e2QMAtJkovAzrtTCJ9DfFePv1roe0EsPV7Chp7G7HGqtLqng+lv8bf9gOLK5uMusgKL2QUBPFEH0gwYHSpWovCcquRV8RU9YT94ZT7bbpENEUpECVoQzoS6yZJE4DjtXNp8nUzWTa6sBiCje59xP0jCgQ9vgClM8Lplj6+dte9Jb3+NhsgwEWtP7jiEWsvcmJ8OPJUfG0/pziH24XAdXHTu88t1pR7emzQZlrRvs5KLZ++0h9/5IicSpsgBxQKAmyZookIX6GhNOndVpUV+VIHnBkIcVImjrDERduUZEDb1e4PDGaxH7moINRcubtE9ZNobTt/VRLZBXOwKRAiqsgaoPrTOxxwgttlDJ+J9vKFmBSXNeo2fD/we08gNL7iXEQPzONUprSclnZtjBdFUVhDIBNCVl2wPe1eniT/d0u6tWPCFdNUBXle5mzUqHGJEMersvQ9yCjMTtIvtYqsyTuuGTzf2SV/rkJ+oSrBjO2SdCVSRtMQNhg4HUFGkP0H1wdOYbRzpoFCTln8EXWok5aCJab5lpLpYK9fYFE+p0XyTjksWMqc6ov2gPvj0eVLOl7q5xg41/y6lhde0A0+YsN0ZASNiKefhJMSmTBLV99jW/NdtL4ZTkQQPJxa8VAg0JV2ndvITXhf2S4WIYySpp70Y8aQAJnyTvNmW8yShPvpq/9N5uoOADeLQUL5bkIrw+77TZQ+hS309ycMi205//hKUohTIvV32JZ8U0Lh7QAT45z9CwPA2Gxtlq4Ol/hfTGYoBjzd5KuPEzb2w/Ti0MVL2JB0Y8XmEv5ICv0DFjySO8sGMfK50OHkpczJkVAymQ3qkYJasHJpryeqUN/bFoLxeFqTY5NW851/OhAhMV99Ypi0OtPp8EI82k6KOB0GqLgbKeaP8NLcG14K1qTTyRFiFxCPbL+ZKjkKfWwlhfjWzVMKeaEZEJQmXrtAVOqs//9JUB35oDrpw+mt2g4P6HMrK5Ltw50ONlPL1cvX7a/WvpupIjlprFtzxinK8DjFYSE4JgfcVvCVk/f720jAVwGph2J40g0N3r7bn7Yt6azEQya5Up3CGXA+kNzXMJ+N99ZlO+6Kf38rGTg2cedwwM8538xoai3PGoyxBQoUC8n33TmQF88HahoV8M7y71jPx8EaoSwBhT1vJQQO9GQpFr57CebAJsqxKeijiOIPGnaA32eTC3tkWb8khXI62SVrCYB8tOcah2DK3gsNOeJYwvIOTJUatV8lkcSbggZ+b4praScyEBki66cNDmp9jYQNtEnKjQAjfuYr9245UFGY1JeyE3tE0Hb6ANoWGMedClvfCBZVu8TFysS1RymWjfUJyIVaoBGLMf6LHuT7QjdjW/b3yh/8i0ujc5xM6kSkc/KtivntCjHhUsu3fveice4RLdJ6Cx0+lc6869hi3AMCpfwxoIYjOKY6Pqeiy3hb93V3WT1zmqKu7hrsaO4ZK0cWRJUMqz4OLHqrMxR2bYA6zb0MCqTaoW1cWq5hTV5ZKqDNdhnGz/6wePMCfFHqnbwRGO5JtwEoNTuf8m4SKKNPacnH91H/OORewR4dFMeS96VyI7lL9+ODXgCEyRuMv/mKhjovbvhSktuGJZnYo5MpAAsnT0/VSDcITFEAOVOR8pwKD29w0VUw3pB8gzP28M6docR5JJeUFwKOsg3M8BPTKW4wIFFLsoofi7VHapy7HR2l1D7Dlqp2QVdwhhAqiIT81wqvDtMrGaIV/fQydlbOtZx8sXZg/df+Zj3Fe+YC6cXf5PBOR2+cVERbFVLnb49PnXXvMDFGc0Roxtg+GSZ7duv4UZeJg0RGXRkpgA8IG4o208aI+3f5ULyaqYQnQmZebfhqEmuwcFN7LFEBTp0N8SRkKgZdQl+z+z/V1S1wiSLGb+jUdrdGkAMwqvueH95hSZB3npsnMdwYlyeOerla8yY3MBPGTPa7eOFEQWjPlTagKZuOkH+l0cpvNmtT+XrjFHS7hTHbZRGLqcu7aGcZhz0Qh9KBy6xZD6aal3YzbMy8wQemMAq5ivsjbI9cUmK81zIM93MQZF8vLBupIaX7Ca0mDqRHMjDvvh2U0IbkNzZfYZgT5VUrmcd5rE5B0nBevN1XB38u6NIXvPXXFeFDvoYKIqwFOPN4UjcK+IuT86R3bh0htHyTW1T/OO+CHQfXpRIiZN7sgCEYEF6fWRWAdCkP7NSgdO9dBw5DqGW8tkFEVcEtkx3F6Ve6MRkN1g7YLGcquSlaEAYMGwbEo/2WnxLaZw9AhNAqa/B5cSTcVlVjfZKiKdBUdxG4zgRMx3GQKjCpYJ+7rOKNbgfMnQRYpix2/fi/yM/93Q3PFzpYjLnYorSyY1mwlCKiRtAfmpIdhxoR/VgrbTnSIEUnjLS9MQ4Fd+BXiOt8tAwdNbfhs8XfdmA2arP8XB1b+IF7NO+mt9V7nWMCgu5/Kh6QH1qUpJMqhsicMcY84yTL13CvY+fspb+f7BDmL109tJaX4rZrp6dIx6MYsL3pIX7SjtcaGii/ajyq2QdguMGu7pBsDW7mc+LMg4M1cr2l1JDfRc91KxAhQh3VLgmPLZLlCaORC/oaoHKgSHpMv5qqyFGMaPnjqXtIINxzK3CURJPY5bSbmER2kw4Wmr0spQBQ0VMj4ojafaccf55Z09Get9QQhTwrDMgkFf2+P7NUXiiYY1qmh63Y0ajwrGN+qw36jClyT4nfKLCngCGicGHc2MifP5M2ylMBJHSIT7VGcHlLmO92liePTMWdxaZEznCUZfMMgML/h7FURwHY2y3CgBUwSRC6a5vzrketzZtXBuY+eufmiDv0557PDz2WMuq11APepWzclOxhaSEaOOb/+CqYRflI3PHRI6NRfNika+WFOd6IMJRLy5bJRysfvqz/WgmTa2Dzi0x9cr1wvNhGukfB6gC1v0A5Gx1s7MjRI4w85yBAVvi86JiDrsKH4VGekZRpjjTU7VhHLPcSGoKHoOY9HYBeDsdIcFCfLo/UFByDABjCJ504/nSNPv8iI5tH++mBkTAddH9LcQVjYmJm87iGt5AN5Zzk6oa8tl5DgJZDOtZ6n2noVya6DM1EzIW+NM0X/ot5QmHl3q1IT+3umLHSMKWZ+nfF9s/FI7tpGcoYZgnX1Cuf9Yi1MsnFqjznWu9XaI3UBVD+IlZ+KE4mIX6c12uCEfHOCd8p6LkEvYiG5Ma0Z2Tio/+CgPBpeQNFKgQQAaqpjgOgWCEYuwu4IIljghDP8BxV2oJXTtk7dbwxFuScst4QW5IGj2pUs5i6+L7Q/SVU7x0oPyOuepGlLTAJ7KGzyqKya0Wth2WGxbDmeFi69Zy0VMml2V0NdA2EzDmxxXDItSPDVvigU1YyhMVuQQ5NgLDJSS99rYWjzKikQ+jjzwG+tx91Wko9cKuCaLSM5Q2qwGaJxuM/x/jSc42H9WgGwdzWOD0YpN9uAYDD158yc4C2wbwiGKrS3EwbMKBNZvX3mbhm83J0n1E9u9J1jox718V/hM5FBX4GXEFuKBpie38T5At9mE5j+5amCwP2hlFAOSqi/AXy9cUh2PHx/AhOVH8ZUdEppvaYw+0QrFnLU9O8a6MI7qbJLDsgv/UsMo48Up3PpK73fJXaWcyv8bhBOgCHwumm75ks1wGp6fPSeuw3+ckWaivQ9R72Eo18j2XR9D+OLt6NZ9OkQ8Trk9uw9TJtFFOAxM3nBPwvpPn4L5XEm+BvUTYWaujWMBFbpuVTl2iILmKzNqIRrUHy0SDMnyJxrF7oBltPZvgRdnK+qX6WEwFc2nmxPmNGUjPvs7EmvZz27Zf4eivy9dyz6BmUQ9IBcd6YatnA1c6dEPsmmKegwBAcX2RdxAL0jA3k67bnkOKpJOXHigwFJmcwwHYl+MkXQddvlGqki9P2X1qwTmdxPXTe0XTPrMi6/8QR59Qqy55gMe54IuD3xBEKY1uPsF/qMXqKOMLKtk1j0j82ePC/dyHji/bwNRtrbw4y2zl+Tz/E31nqj0y67gCFb4+Yizs5vPq3qsnfVLbQ0uDMAKwGpPS7l0GEigz1WldcSK8hbU7yjiT/UqfWhlmnC4d1RzEd00COi5uik1fe2E7PONPWPUE7cA+X5ZRmuv+vskGHeSyDRSiTNztRgKi52444Sl4S3CSrF46DAUcjjMxxvLQCEKZcwiAzvT/FTtufaI0Cw3zfU4V6REWZ99ZESX81pCQkF2yxgsjShWmso6qLXlGPJXGiV7im1d716miMSIlFq3THKkqejNAKukhw2eGKFiqlqEc3/L2oCbjCdXraZJrcMjgdmJ5hYkRsrxSuHIAaetKyrjvnMu3Q8RB60sVAMkckBrNXjKdWMkmR00Vlrc8STAY+fsfveKx2FCCF7EvDa0ZCtQi1nBYzgjIIsxrRUD5Z8vgd6e/EQdi2g5gsH6y8iP2Mppt5rfz6KZAShGpWkB+wi8nx7gyCFgGmLVuN/om1bjNAUud73xgr+YNDsZppqvQOHV7zLcJOqrpe8TR5YiBupcQqfm5cPSjVLJ/ZxfKF+lhNM5bS4/IAucbWtJxQocDT/EdQlCZwsruvamg0WYmQ2ZkQVkRpiBtQ2TQO3QRPrfmsvLzA5DMux3l4aQxL8lo7DPnJSLDDotTryS68ZbChby4p9As4e5+D2yxvd+NO5WTb8b6K71YMQUUazx3BWu8z3r/BFeQ2b9tt6vwOkaUuRuo9MVQ8DXP09FISJ3fJ82JKiwhDsacgZUVCcw/Dz/MgEqNRvKDWUvSoZghVExBD/tJtvxC7nXiCn722hB5cCIlgI8dkLW+YNr3Cw+SI9/OFFJ7t+z3ZZqdAFRI5Eo8Gsqz98Mr8KvJy2TWWz2k2QtDabFcRD2CAcjXwjrYb5W/+veYYIfqbDwAL9XLAmK5uoAalRFUx9qXcOe5qYvdRXoCdG16eDmkUl+xdFR8IpFVRQZej7sWPjYHqE+Sa227+jTfZofR1lpZuZlOtblKObEV1UbFF3qVqyCJ1EFIXVbGw0NRbZzMt7i0UaSAvYcZHyQiE0HCcVBOSPO1RrVKjKVQ2WKNxkLNJN40iDX7h0GpKQlbHsiVFhXI+IK4+Lz5dZTq9QsBqkiRfuKPf0amcUMqmKxc+xLg6o5xlgQmbIQXSVOWeNzgPvof3xSki0NkvZkMrwW2Q+PIVvGLx/gP8Bld4Y08H9CQX+XhqkH9Z47LXlx/l6WPMPUNspdydjxO76nW97wGZI+Kmoo9stAg+6W6AgRXFgy3woaoH2z5igwLonikDLyXhQDpc95YjMlhg0fJZFtzdE2BWsz5l24Z/g4wgSMi2NPwJ+DWP4DgWLBmVCvtmJEn/48TVMcd9XLcVJx2QzKZ217iFRKoEx7tXvPnOs70+bS+CBRfJtDF+Ea4u7B1OATrWtmTabMdFrqnSdWEKPb+d3s17hLZm7dr6Biu+evDZGvwmOVeSsn2JIUIu3+L1pUNsvNItqVfO8CidybvqE3dfOzk8HqZTz8rcwk4jeRcrpx/KgNMFVHy8IzjWfzxV/x+tacBAo9zdqHiQKASRQvjHi9UNNK+RoyHVK5CldU4A6I9VEdEDnM9O7v5FnlN3UiH71c3OoF0fVFBU2nwlXFLR62ZHC8BUizbR17BQxdWKQ+3UP+upG9izCIfc1dgUNDaNhHotYbiveFcuualaLlr8Es4hs36ypONSC3IJnPWFJO3JJAAp80bp9B/KnDB74dhduez6zMFW7qdGcT+JWwu0bvtuxxpNl0VPaXAk0TJsimpgjwvGByNjtf/BN08H4FCoWEaaVe4YyWVXbTng5zXcuzZHWXLVwRjvw1+k5iQF6qfU+D0Y+wbBDrzW2ShiAJoeYjZGnzTZI/hdpQlNkDOxtbejMh/SRIaoRlHiVHVBaFEoid82wp7+uso2gfq8raseIJlOsLermTlqOLQEzkpDjgWoh+tkKeboL++nNHLKupGC2NsUIkRx/Eqd/d9qWq8zxPHlN1l645B1d8d6SPNwY1yDiL6UH/zaWxH0MRQtjuh2ZRyVntBk9NGklQREtapZRj4h6VAYb4MtHIH33Boa3YFKlTcnO3N9pHuWf6LOrCtKCF01u9/VRIjixACMBd7WiKNOWNPvyfzf9iWjqnrNg/lpbHYIrHXQTion7bJmDuMA6zCu6Dx9A+txEpk0M9TNq4oGrt13az0FN05UjOhlraq4WOj75LPE4vqlqTlhxVng3I7En3kKwTBRT28sKk8LtPo6N35BbT8CwrqEI3QlnaI8v/AI4Q7QwoBNyQ7a1XNJWY21q8JDs3iqvQTKrSoV1N0diKMjDfYrf9VGV10L5lecgml03VTOyklWZbXAUUt7FsFGv8cyNY6hBCdPTi6bNnBekqA0UFwQzF/nKvCh1z2Ub5lwx6fIgvv+OZAJD2bGNvoZn9O8TIXEvOyLQ4XhX6m4nE/9C1uI7NqDK1v7Os32zH+9KhH59cZsB3D6sKApgQ/yM3X9uY6nkpF9XAnYiK0Ps7yqvc1QbT+UfdH2i0kpvpFFkDMZRU5M/edsJMiOIYrymypEScoR/XpgEPOPlxO1CGXb3F8BW2gwVT7GmmZCXIRlDWwg24yXQsopMb0jPDgLeiEjm6mpsMzapFdQ1h9P4INfUXhUrzhVSEnkEn8fZSWCfvw9Rmhtk7MsHP5C+4gHLqQTvi3QnoFnuL6Xcu/u6zNczjf9+LcDzUDbBcKPz6YWFY9j8GPblx/oWPVEZwpQIsKc5AU93ERMkeyP9QiYQ8CamWOZWrpdpenAwfND/DU8Q87t32/ZXTRjKRcBCnShKZQ4YQxBCj97DVdf5NTJ8TA4G3UnQhA/raNT5mqGVdEVtpY1Mmxr7wdRRXJSinWUHvAdsAwZZtJYFt/5XnRDOtAPArjTmoQZGuuXFkjkwhgnSFRPyf+jxm/UbSIC0Hm6G0xW4to/q3i90BsvyTAVKCakHmIONPWqml5/D/cXnY955gFZqvYnsQCJR6Y/S2AuR+cdI35C5Uoft28pVbq6rwi4n1j5PkJ09hK0nkqLmkJZhW0B9pENqmomt9f6NHZDNvHvN0t0VUgf+9iuxcqwy7GexL0om8LMFrZs//KGnjc3C3+l6eAU/EXF6aN6YbGYuIuK5CAPsnSe2TLHT06JoY7iLCvtONfU9eIuZBUWknbZpmiy1aPlkEjdGPBKMXazvFlQkTad4rBx6gtEHknu1jvHxbQNlKkEYiL4h2Nj0daFoUiC4gvH1AYO7Um+IQjCF4j8j9060xOmt34hss2xLBNXZbOFgEIj1djk5PCpv82GK9vsvZIORIrCsuSXxbGtaRojvSmA/msvsNyQdJ4dDL6UUvVdkDACYZmDYqzkpgjeP3Gi6NgKPQhYIDaAmCdchBhxkBi+BAW/h0jl45DF6xHFlVBLc/aGuOfQY7BtxhQS1ba2fd5SPDJz4nRTXJfj6Vp8skpi9ZeAYBXsVDNXllvEq9ayTL7e+stO8Wj4/cYkopdbwmzn4S/rv1xL/I1qpL2+Snm4FMLXpFvsOUNvUDqnt9iBEKu213SGsW9f7NR/wX8idhZCilL/P0kW/mEvququceCdHfGZeTtqqmbnkssUQgdSWpVukn+qxKZsiuSzIZBGC2s9qt/Yipg0HByJcaqFoLt93hMSfrntu//z3d68oughi2LccDnrglp4bd5LIivZKNo9hUlgB/Ao7nTu0l6CBP0WA+61saTbg9sAl9OdhXkgAmfMvBFaTfqfCeAeQJVw7zRupyzGZ6NxU/yj855gfxNk3okC5W9CKwgER/K5jol3DmaCRttf/POt7ts1R1gry5bbtkeQHg43vuZSQ8bvIqK1rkiIZ7YLxHT1I0gXVzSYIS0JOOwEbWw8EqwNn7K0Y4mG/T3dKMin6iDrbZt9jz/tL/62esiiXNo4t5mHDFn7fZVs5iQz4vq8h4NZO6q9/Tga+8Zgt6Gc+w==\",profile=\"router-server\"},[\"router-server-release-0.16.5\"]={public=\"XOB0gXa9Y+wW671JhAmxDb9c/W7TxJ76GnAesIbha/fDnqBcEPUajB5vgajkSqUlqWNLVY19dcrNTF5ejTEvP9uQmGzNXeN+ZlGIPSkGJO73J8drdnYtQWZe4KsQnPLkYgl5Nti7mgTgdy9GEY6CpLPnj5P8t78Z8JUq4Zum/V0NFNyFjolZYjnLwYaN+tgFBkQ3AlR7Yic6RQVbpWXy4x0rM1agRhF4U3vpFeCsrX6rNEpRt6vHdhNd5K0mvU6gIkfJL3dftWjmdJ7wSPkBwTAKrrGM8Xx5Pg6oArfmwbka2BOJdr6fBE9aciRX97ByGbUFvgD4Jkfvzj/mjGCIo6FyLVoTxCEyaDj1M+33HSqSFzcEIX76w7wcVUymjR5UUv0jtxFsEXD+qF2HGNPnbJ0P6YfdBp9wHI8PPSJlml+GylVlkJyqcWFS19HSJfX1i4nACJjixY3pYKWrRxn4dvEppzw8z3PAUflb9UaJxGO7YXv3Syk21gvd1GCCOtektICepQ8715kRhdIiubbdN0TAdktaFi2icnb7iFDfMDPy4mZxxRoEExxaoUTWHOCiW8FobId+egdjSvhITsdwbGJEFbiVqOWNAp6iviC9rt4O2/3jhAwLJq0wdUhIeR9s1MXbl1cZF1clBTp7h9wIeVpTSr2SgnjNcAThsrlYSxMKOzbJFLEyU/unU6n+7Uq+9W6L9A8/U8FmPLBiCyfBhNE2Yh+DyRHLjQQNhFSo9aZLSGdes7OvnQ1hDK4UxpHk10LbghFakVW8qQ80Ib44/BY2eTFMF9mhHet6Ix9tXboEPCcAkJUoqP3IErHH0KUycbmCRnMkDIb45GSuczziJrUOJngjOv6ugn3HLKS66v980c+eEVBb5PgpD3kR8aozvWRfjOinhMasNAmy7O+gwWi70AbZDR3L40UFp7c1YowplH0bAIkNe/j4fYTKwITTpupvHax8TPTPDhghGuMVd82ctcx9WkXk0pNlgb6vE17d5I70gJVlFyxSlSvXzpDQ8QzJFccJvYgpDYSWeQBpfWe2sigoGSeVLvWHtBWF83ac5+4Kvzktgv/xE/XW8voBjFj1Q4J1Tg9pIwd7cobGHqfNK8SwAAo/vxPthEHv+18v7wqZhx6v0G5zarZGzMW/5KOxSlyriW9ZFfa0OLvINJAYZFwbDGMNwLhoHDxwwP/wIS5bYhQw63LppVgdXLY5G+fkqgXgp3Pxc/FSuGM4AG7Yv5rrmH3Xb7RVN6oUVpgH1fV58WpwWUkXVFxb96FNzBWQLYYSgN9iSfg6ESDxlhn5HTtZKCMCEnV/wBc7Kt1xgaErnxlgpPj60YYteJBsaUf/wW/aJPRF2xPI2ZBVKV85aPRqbA1oyEmn1lEsrHonlcTlGbgpln3SWSJiJBQKUzsbvu7NX53FI9k6mBxeIvt6qMhQdz3+Zb5LBTRGl1mqQRnzBPB5/4KKMTKOy/6xm8cNPNf8aqTpFqEfYkqek7KWQ29gR7jigApHln6OeKK/32pWIHo3601UfzcLGF0ZuFcCEEX44kpvOMbZUQepsLWnT71IpcPZBuR1+/OpOPDLR+B8ehjbwA+m1WEHUoypq2VX7MVelvMhUM2sAGfgAt5mQ+RXGz7YVwanvsUQw+gwrqYn4EHkZfuK3bnaZGzqkIjSbl3Db5G2xOJK9AcTadahOiCQk93ld9S5EWd9EzYmXXKoRN3zsBLVGF4Yi7ZHAMgkxDV9WDr16OGt4U5M4e73ziv8QKtsxxZGghjXKEm5zV+vaIMvDpyIN8iYVB9UYffG3GbmjZJKYL9F2DjUsdZHU6IPsYSBNiRUzwQ5LNOj3ht0+oXbCrqlLt9Sv27pG8OJfA2aKiGzByChwWBzpvhicXRSN+uV3LV4QqXV23l3Cwann1jSDFLQtnpr7PMlBUGcESS0BBjf/gs01OAZh5drZaDjl2Whrwx2VFCOZmxX87VvchV0PGAQSXFE4Wsr4rN6exPeYuL4i4Qm+0ACidcDcRxlaYz6N+1NJJklBtj+ViMLx59fgXmrqqHd44JMuCAIy2dQYnLlAdLlPSs2pAGRZsqffWo7o7erP7/C+g7GOij0COxM380m/UNFEmJjAkd+Xcm/1HOJA2BSTWe2Rzwth3zf5MbkAMKGh+fCQoNRal6HczCqDbyec90Y0D1lOIN0MPZ+YREJlZs+jolMzsjjZbzbcdE3jcUzYLfCHV5abQAYcHnnNtp/nnF+J4BXQKK5XSMYhwYa29TWpwvzxXy+2UNG5mo7/MYpCd+g7kis2o/hbP07riRnTbdu3s16csNynKXD7NU+glqlRpuioXELiawZgUwgNs81WgYIQQc7zs+9K7eIPGUySUwrN1l+YGdPV4Chv6YCAfnHC1JY5tNI8hpUhNNZlmJwPezUEO9mCM3y6o8uIp48LiLKzheg9Fw/tCBBJBg6p3EeWdTbBOiuXL9PRTHrRcgPKKdK/h6sETmNdygymVYEIMYVGY9ZpIK3/iMfzK8+Bde2R046Iyxhkys2AJjDl2wJfsfVUqrVTbnY+7yUNhWOGVIwZXbOQMcvj8/Cr6FJZ21VCa4Mlu01MszqsIof/sIThvXVLQXflM/BEaNqkv+Twsu0RROuuCUoS9nwndaOOb42gy5MNAERX6tqNJtoT1Sfl+2l+AyBLa+LBe9yIABpPck5wwA/CtuCq/YwUwaNjfrZIIWDWNcVaqJYcXTZYv5QmPCxLZRibMtK1bdxl30qkc/gOyi5npeC3b4I4dRoN4ROJCtmUOds5TtWxcln8HMME7P0OMukQ8ePMauLcKYiTP7pn6LT32pCuP42iolfF02RO3DtgYu3zQP3xx8z85UnVBNku/tbGPB3lXi3qojeVfOEDc060k52iSPv/OXiJ4bFSl9J84l8orh5X7Z188gYWg5zEEPryBKv/dM3rUAc9w2k3gN/cMEH9areHK0DXUyKVGeNunooQ7/Se2DI4jpSvG+XL1WRdvqGZPCXrihivlP5CXq4vg6FflAT1GVf+X6reG8Td7Ghr+rvN7RKzTZ3lSrYoRyUKF/x5lhDlS/+K62SDGp0QqcX5ZLcnKlDZmb5K3GjifsYCGcMBN/yO4572fvDDRPNPziy8h/gBhzbBouHQoyqamhjMpIyO90E4R5HAWdWXx7+GWxB92VMOXboFXUaFOnD+pinDdKoQxMu7rvec/WuCCHYGDM1a8TwwfDOyCK//rKldzV6l6dM3Mlo0ID9h9tHWcskFsoDefryMzHMn7vhMsXR52KrmwqiQc8SOn3l34oyskrYissMHFEB4h9WlHpAvVtwyEQJiqzLtco2UsN4GRy57xl5t9yAeNMhyB3WxOaOtq3QzGC0iqinYUzxeVG+qNKnvdhwyESimX5bpVJdCuGArZt5xeoEYAsa1z0NlGf0VPbPQhfaiIwRN/VZ6PbcvzOiH5MpsHuDicNGhwmZ0OtVBVkio+50dpxZ2eLlQhGtxBMYmTQc9lITMalcLYn5DCFA9yJ4ZgYeNZ+SyGhTBAj2YknF9Xolx6oxIkV+AZCR1ynf+7dzm8Xs/ekfb0F7zfyaqjz6kLWaQK/WWVa8JB2ydsF7cSP5h1/OTqSmryk5bidpXAdCPMAEXJzpkN229O+A5oybIDZK0Dh5FzX7SBCQKjWwfWRrlXEPdr7nxZCAtVYgVkC7dTTVb9rI3f263hY8nqVD/MfzPdz73cwvpECT3QhUjtDS3HCYcM7Es2OEQ/MFi1wicuCoScZ4ZKZIbnNZJ6Ts9hLZ+R5MEOk3cwTXaoGfm75mJrL7qz1YbrcYbD8NORHeBIncIllifpHg09Logdqrzzq74gvA42LZY+bavycBKTMQqYNWwveEKxtFIR0qMD0f0QCUCe/ks4BNGcrXKckBTHPt6uEjf7fLjHHV7R3BBTPUl314tY1sUB8riPaY++jMRRdNWUGAGcqv6AtSrplvFD5uodkRIJBAyebz3A7zNAs9fx5RAv1AQvXtR4WlIhxSGXAF9fMSrhw0w0sS0fGSUbQxkqoTFk6ufDDAuQhyHFKPboXvtwBPZxrD9qu4BMh9F0Ewspnr4LxFkbg9e19YT67kq9nriF507LR973C7hA5iBGC/Xdijn0fAo6am7upNxq+TEt3lw8YrJKUkNTBOcz8nuRPiolgfFztJuTPda0Ub5xCmHY1HKff4/lcCxqCPvbBtCdt/tc3HkZ+oE8yrhfUgC1c3WCcp5cmqav+fBBMJ9GtLmifNdgX4Lhle6k/mk+UKHmykqtxH8MakUihEDyHD6QZwIi5/73i3HMhnsE0MeezB7MkA85QSvma78TzhveH0X8sxGznwkkz3nQgofJUPaPpDxF5ksnNtfKWNbsVWv9Dj4nRhGDe24ol9tjZn4iu7xcmPmN0V10MOULCrfi0eiiwixocMQk4AYMq2qITG0lm+wyW3wB89SB+EVZVYehFZ62gvzeGyK4N8R+QtlQlDlCNrmGecnGPerwUFoMUBPDyLK8vp4wyIm/AWSn99v8h92tLOCcFzK/8fIRBJcf/ATKZrFEuvbXCkfVn/dy3uL3H43+owythgx4+8SaZtnEdZGYJLHXMmrCwWrvmB4LV0YghvuJr0Jm47aB1u6fEY9LzXPRQVlwcPB40Kk9BhvyAWU+L5YoH9HrrbW/Y+062XWLAHRyhzGqjU4J6Jfr9pExOUs8Pm0izPgEn33jjC57NyssIIgxSB5Umtp0deSoUX4A1UwcqS+4r2E0/qqABu2jV/VdPssL5EgjQDMHuAAjzl/UOhw8gmGLyD9XtLQZOfjNev5hcdqjLb06FaFAcZmiZw7Adij2ZZgmtrab9UDhMO5Wff5zKoNa/yn/TeD/xlTFC3nc0jSFR/RUPPsHc9bm1eVXfPsvcqpLJQTIiTAak6tQ+nQ27Ek63cdR0nLTTUn8XBTlsLTYY1LEijNGLYONj9HpWw8aW+2+VLVr3vB6Kn64FG+rJs3Tkq5GXJp4QSGcgsbTT1KHzTld9Bh7zXlH9ap2uCRlWKtT4PjUssvX57Wy7bV9AYGPupvm1rRrSuHjt7x+87/GkYLj1HQ7JLdJMGHVZwpuvNW73Igj4f4pExIojH2KMA8EUVAVL+roc5bF0VfD0BMhSDj4UIJGV/eC4jUTxhWptO86hIRBPSdHu5GaK8cNAklDlTUAXth2hWj1fAnv5rWR4Bjhmsa+Df68y664B1CsBU2QYgPgR5oNnsSbRxuxtcvUWHr5lXdLx9snYo9sp2Usk2LU1jsPUt/W+YlWhmFZaU0JK1sR9fqcjxFKKhtcAwCq+LspwV2OAimNB5n+knwQ3Ad7UbNdOvxG7ZbpXwVKuVjHZp7JQ/lYYmFCOhUy7ovYe2tPmHFfON1JBNgdBr2u+aoz8Uq6Z2x8ruh7EyNUaLjqdBHknMqsBCHrCPJmokW3tVjpzb3gOAeTYjQFFUIbGRwYuBq8uN4wTFJ0/6BLsV5kSA2MwtUmN006q343rdQMeHJyU7KywbnXVSqFACecslWBJ0Mk3Hb/KDTYBRQW3FIN5sneDdFwBrUWvWsKLJ87pbAW7/q6AcXgR0PMyfCTaIGy2lPuvV6aIsp46hDLx//e6QBp9wVjZ8xuSIbVSfDuFRTjEZLyvihpZecCp3Vqv3+R3l/d1S8bbv3LJPoRF6TGwnGxeOIHOvP3eJEWJog1ejPR8rw0I0Rt+w7c1iOud8KmH8AC5zJTi7yo4VypI60JZocqEHNHzsITc0tHgN5O+k2KeKipskj2brAvqDXgc0UYXYrK6plJub/itycefaFzfbv+uA25gYNRVjoDyoMdRBCWD6miRu0alxFqQXACvCZBwQD4/aJ1/nkdP80uZtZT+4iA7UHkmc7ZmPWKv3WcTUjGnzSItbUx7TvmjaYxFTby1SrvHFUK89GkTwgjGL8b1C1DlfCIO4eRLMhVWpepFtdcNMB6IeAiL3j4xiwICCm4NEH9joeB2D5h1llJV7XppaGbpqh+SX+791mkRfVZYNCFdMadQH6ttUyoMezzIZ6//PCLydHd4vRhS2L74teHAVqQSfvAJK46U02B2u+b0qs/NAnHaH+L++RqDe/7pJqB2GKfI7qNhD2jm3jOPQTvATacXzmsUUOyOCnceiCQmBbllTEiKFIFeS7qvnzvhm3A4mn42K193lFdyKqKCIsUgom+sOKxlyG0udD9ZRI9TmZuWANtDgCtdJmpYZyYhFGnLZWnW48OIa21JA8N77bU7mBUd9iTjic/V57qud4AZlexULKpUmQr7UHwwiDIrY5fBAltpEcTat/javBOvQbRZ/BVnWQJIXpSvWpHgc9S20G1Dsm7xYjdtU5a0F/X8GZ2a+CfLc1NJnCdHf5xFEsIxP2oVSs2FnQMpqXcw7AU+11e61sZoAEredbbWb6CTNKMVNQ1nre+1VxE1B6dzlIntAY6zbtfDwQz6ebrEP7xIPS05y3uNcJ+GEbm+9nUhqC4UAazygJ0lJWSRlM87azcrvajnpE3ZT5tng2U/BAC61gahvlEtlkxpXQqc3RosLQqkxcdhFVAz+fQMVPazkO4WbGYULJ8I9b4o4OvAkJ4EUVy0btM1Tm54sw4ShPHvI3lig14qyC1vi2W25To0PcWpw5Au5mMZXvwvyjH6RPT3i81cDKVhppxtETMzkFBhkLJjHs9GbW3uX2LeHAhtO0QdOP7ovL/YDBEpOH0cnmNJ01NKF9Yne2lGkAdr5t+xE4bewE9rSWiNGj/YUCnO9EYbOt9MQyBd8raIXDaoL3U6K0ZjwLzOb3Vezijl3WtW3XxgZ1YBytKDRNvPqu8OTFzbwr+N9wAm/sVAr0Q5gfLPYOuq+Rian50Q0HI4CpUB9YvUcku6gYV6fmMpExCH8OLryniC3ZX2oWlbW9pF0KWeW0mwrCvVLoqTreyn2xH+QnoBFXsWeGjDeCjcgsqeeZL1UUrWmk1mnjupxTNImOPy9xkHBtymUrPw0nGA9t/WX/FLD6KxvbeqsgdNBLqc8KeR1tssMXitdlV5FMkPtQMvq3iZ6l/GMF81n0wna7XaB41P55IFfUKZ0VHGg/ma/jf/9kBN+NmYB/50d2f1CGqED9SNLFpHS2sqmee+c2r8/ZsuZRxHRmVL2mm2I8SbHFZmxxo5CasaDdgJc4fXbisKW5LN95BdhdBKrT7jMxcv9Qs0FwH0u52VjHcPDeUd2ctfrPEkFbH3kqdyAtVQTCOuKiD4e1M/lv8pnqseshl92xiEtfIeotzx15AqmPP53lMwZv9jrk94v5e1muEs0K8fi5sfLgqUf28BmQrrDFxrFZs7j647VmunjEYiLTpuKCa0gegUJYbxVPA6t1mfdrMEvMgLFxWVNWrfmjELvYVEdUeA9OMxDlLlABytjo9tWVeG7BHL3dF3ICuIjYQushhzqBujSY1XsJLFtkdiWwQyIr+5nA0DyiaI+m8Rw/duDDBOZ/ec6ItKdTSo3K7uYXpp5mZugap/7OXU9e2797QAF2F6BGH4Ov2GcBH4wSUR8mJq01TieqvtB8nxmoS+U1AfJwP7PiGEJuimt63wk/Ja634Mf66zorhBJiRocwttDlzimbLISf4rbXB8TqQP7YnRaOCuMhjSKZHrJ+Z5BRnXP4V4m+BlSKnFJ/UDNaqIQbtsuoCvf5KQ+r7f9s4XXucvHpKJbgj7Hg2J0YeT/L9vBNJKSEOhgwsHgHU6c/XLqHUIiVk2bOOl0u3qN5un6ct7RzftAL0psJZMPqIIcnXejrKcqWC14sNm4V7AL1ReGpoXR8YpwqyBnoNuRype1KTTsqg5uft9v6OIFzoOOaUAXhVJlpueO56HAtzSSDT2JS/LHPLy2pRteCCBu950ve7rM5TW6o68JO0ZkQ/QjSW7sIxLUbb/QmWbNWR2wj21VRM70ClLevpJhuzc/yFnziECeuStVDk8wP3jpLGyGZOOXsE8undjKKc5BZIPab0eU/2zMNJIH/jKrwu4XC2/tDR34/nrW60kK1Z0/+X3gkQLj+2IG3wh72jOOxO/9DQjmgiI3qFHwA5FNMAmJRuCGObzeaFOmyQQEZ5nsWTuR8cYVsjlx8gL7mpFgq7aVJ89zAEXuX67T6GNIh124S7bI3MN5XOY4gusQ5E5yaUjrUpMnDhIZvgjJSpO6BC/z1D6XNTYSf/+9Qzsrz/7XNluGTgXZYdcpEcuqPY8vqkQZe5PQ2hDJgooJI6V6Xp2W7kmzMRW+wedPazVJLMIMszBaiiJ7ndg8vnkQHxXdfzf0KRKBpBDGLdSpcqx4Q7vu7AZ0wAzbZw0GHn1Q85MD5GY/GvtyQBZOxffMswDiXY5O/+nXXtOzXERENfnvA4a2u1hCpKERX+MB7VcVWRzmj5qDOnp1OS4ZKIdK5iRsZ4ohOUi8oyRWjPuTXsL7GXWfoZ694mHI3sC1/HDnyPNxKXtOo8HLuoi3H366/8s7s1V2xvwLqF8+Kv/BihrL7leRHtJhBPhm3ahDf+8gzq4FD1Y/UvPLxWWs7WAlPUyFx9L6/g2JPhqKtx5l3JKp6i1J4aZ1XOCDgSRxtdcqlUK4FTA0jGBCPK4rD8mdfjshs1+DHUGDeJuKpKtnWPqNK+CH+B0vQBJNjpwJa1VVl5Ny7ccNrypbznfStYV7v/iRiAX4muqI/WoZ+CyLuXLGhWIw0blS9u4JzfVszdBV6mg2RbNC9BE8dx3k2VYwSggwOq9iouTV1HqiauJFuBvMMF7GR7vPQCGH1WzO8AGpyjmYHlaUacvMjDyByr11JlUMrWHfY2MnYPnSHlHRU2vjUqNxAP+i3u59tCbhyzJKMgHGE/UvioRiqK994/0TV1dHLGJsi8mF4+5RTC+6s5pra6ygmp0za+dl6PwvnBHFX/wGE1M6X4CaupkdhC6h4TcrQbnoNT7W+Z6bgT/YBeYo8LwFUZjXakKEVzYr8R8XueqBWQJxJO1USRjyRiS07jlDuDA54A9fRdxvYNC3/9Z48WMq3FuihxPqpKm8DOBhsi/o98DkMA+zzhzhNyWkgKC78t3TqghIbw1QdgpXlY06MNly7UubdpdAyAUEH0dT9t6ImR9aDvadCpjJfbh+D1G/ZyUm2i+Mc5+sRf9gLTuG91oH6DIVcYB4FB+atQsmRscbBlU4Xui/wJt80/CQjL0KPvkGwP+qjIJyqglNM9vbWfDXYJdKGxlJoe6qN0h8cXwpdABN/SYJ4md/8WeMMI5CYxs9WlKO0glQFDUyxUP8sq3iNEJkUo/W+EkA0JDniWrdj8nFbk6x0glJjNQE0ec6a6DFiIFV7ezf8jp2rvAG5+RCJOFV8BbruczNBBMBNVMHq6O0A5vFGPY2w1JOftjbqd6dbtLcopq8m+TxnmB+QIZe6LqC9hX94yKWX5iZYBtFmbkNB+tD+c5rDee6NCXRWBGBEM2jn4slm/Nve5EtitCbTzOv4dSPivg1F0co9V6FG5P7zoi/kISux0y0TqgkIdL+NYUXJE77z5XMCfv3W+RlhbDMMeOBAQL5sb6V8G+bqln1oCusfhqxmU0KIpEV0zS7SEo5lgxqw+1ZjUWvd1bzIIiOKkjqr9biGaqMOZ/kk/c7o0QlDuP46qpMwxnwnC4Vkf+CNhZpD/g5INzx7yuTZ7wgo33WlFKyLASlM3x32FVUC8Y26W0/xQxzCuKVPH8BLwjqt9nNXuID8IFKyja9GY78GnAiibarWiyFng4afSRRox7yfE3vD29DxJRh3jOoJg3YuNzJt+6nOW9Syw5v6wIKgAuF3FjAkx6GW7m4LpJClZsq/tMMc3f+JyZIXl7kYu35KHuNNT509z2AQJhwlISnwWKs/hn7FtUuAnfWiw6MoePcRrfdMo9Owa9ZRKn1RQMerNvv/M4qjIY8VHuK1bi5SVpkxskhEH9aqazoJwAbm4jU/wN25Lw/P7IzuBv5ZnVoZZ1GLXUQ5jt+tGYA+x+N8UvFxQSrmjt2p0vZWPe1giqecEFXKP780p/GC7DftRoWN8sVGPfkAiBT2OZZUYfRymKfDmA3F7nNjE2De/F1L4bt9ndgwf8WvJB2FzceGUdN7DkDA3Ridz5TDZZwMEtA2cVjnPH9YRX/rHo2nX6j/uESzyQ8dyq6mC4XqiXOvMiIDVjgzCfqNXc/jTVf7FWICN0YCYLotn47DtXXX2EU6Hs+sqejrGfRGo6LMQexsEjoblc8gwMIqibSnMsoehA1P16WkAM7CL8h3YeZ5I3N04E9MG3EIzjjCxyBMw1h3HbX8/YaK3/rdXSotOjpXjWezf61TcDWEZCKextH3BaOLWDX+07oama5/V0YxslgmKumFpUF9U8NGrIu3CbS7ZxfQWWxLsrgZ6XQfMHcLsOUY1VPKMLGpqroCyGJBskHOynjrIxvMhIe7QBPBnlKYGvmBI5bhjtlXlL3vRvze8WwTzR+fUGYA5IV9sUdjeDSo1wQpTNqKg8pPDtFyj+oH+HmldF6fNiWOTIdOUYRfmmxCnZ/SxDMjuvEjS0Mx8BFMcxD25t9NHX9VRmgifKER9tOZ5AG3Mgh7PDObByQN3ii4WaBD4GhdBLJ+D12GkCl4KXi4DKXms+6LDGh2+1q5jZu04VYEG+iMwZNo9PXFPnST9pCxmsdDxZb6cKvtqR8pS5gy5sNVu6U0e+P0MWW9uCrnmOHF1qRQ6HtFilGWi2hGCgHkLasiHpqMluF4UjT5nc4jylEAQIDnzEuHNg3UmW0tw3g0ThhRjQLJMxy9gNdgxlqGaf5Mrbr2EsMteCwmyPMJOLtATotvHbiLqIEerEWQcj227A9ij3MIpEP7m9cNnvzeXphxec7i83o+98Bak3sNUHpJbZXM9F0wc1aVMquhi9vviL1Me+b00XGra0BdPbI+wzPW4mApOO5Y7QWSWNhvLizr/GKRJEXP/OE3UI3Zv3ey7ufbQqjqHPLe/o1rKMjnYjzXFNbfEhZCUnXvGsPd347WuuY9rBKvN50yyujSyQWMNMfTWvQ6r9+yz1qBLKqzn1bl5Ac3tlZN71o9lo1bjjNN3KpwLaQJdN2XYkgwmO6Cgv3OfOdsuyWv8BOBOMz0HtCSSVVZjO1NHGxx1kbTOKFdrKpqNq4frA2uiJKgU/uSAcG1kkvAAhDA5UvYDpSJ4ByixO1qB7zpnI4kH2TpKV5rKY4keY5S+h/TKxWAtKssCkeWCCBd2i03dH/QsXePgyYk+pBWyOW3OaL+N6NuYWOGiJ8iGNK3UOAtxtUi5dPYCJeOwbY+3bVoWYh9ZxhiEUYpWAItwLIakUj3T71DvX++NZlTPnr5BBt74cYjFe7RkXaL5EjDrfLGBVRl4HyeA1/KVRpSsI+Kkpx2oEIv4Bn4UBwAHV0iEV9JFnDeQuqieVB6kgSnibA55Yuz0SqFZNDuSXRyaGa8ovHwAzuzCqIeV1O/Eylhw97iqjQlt6bAws7kNpASaAQY6CZQ0HjWlRpL7E5IiCHAqEPf90Nk/w+N2wh28drKp3Ip0BsDnvTC7zSrlOtOt3o0WPxGdmARkPy73i0RfJ0D0e4cOIgF8J7c2V83IX3whfOIBlge7dQibCR/ujAjEGFNRhOnA1qLGg79elX0YmrRK7fabUBdKS/65IRUkWolo9sJqUj7tD5bucsJRA8QUTkjOw9UI5o1Bn7/PwMKPF2K744C6/pU49Udm/t21Avt+5SdnhIZyckM/EVgDoOyhPK7QnmwPBtJWaaHl0Zn5BWKY0zswQUiS95zlKZYG3oC4NfyuOI/QV1zIYw1vRW2su7UhMH8kVITYVyzucJirORP5v4g6BJhW1LS0kXlD4olg58Fx7Wa6KK42zoDLFUdWN55/mLrYuvczagJam3QJEBLIk4+qVtdZTP9vuSieXQPY81IBecQ8FxHJTGhQAwN2mNenjqLcirW/SJ8W9JtLIb1e0juRrGCSScJLyNmeCmV3hG7K6vgDgmLx+D/wk6G3n6Gek+6uRGrE47mjqtFET0vkS4agY7QlBFsFzY04y7WkxOMwla24Luw1J6mX/97MXODS24ITGX70EyhLpkh4Qh5HUoszimSK/obctqJaRqqQhaINE3ZsNjy1BeCh/vrQYnsP81IDESWI6RFi1//1rxXbKC8QCGnznXBjmrMWBVm2anPcP0PY8vgrevkKIc394ynxSYOV3bePO+tUcXb/gXp+7ohuo7blQcW+AWTcL6yGVUfULzfE4GyzaM54LmFBtk9hQSmOYtWxARkv6BacTbwBmC+sCdmobUUYP1Q5d6q7xJHzzBMfQ+3+XW6yQYnCVivRE/OFcFtm1rjvEcoWCpip9+bEE5WHZh98lOJo2hukElDqPcFmrPQ0NopY+CW3Y5Ip2XtWzV8PpnerNkqJ5d6g0uuH1xXEIUAc/28nY/1m5/gXgFNn5nj/H0dT3emAFWV7YUgvdZaf7q2/ySecZvMlk913MoePVG8irsVJn0aqXxwseNwJAHXdQzEdM3fo1JWlO9br3907+84a55oszpeXXCmnbyge/v6vM1pRsn2Qub93u7cuO88G2IgTMS2kfLRGBM6ihN4flUfnsTaK/BfNmiyKbUfDpi3xvOWrOFQlyzCcw4V1gvj4pVdK5kMB6UXzxCDRQPKqu/sMDg7Ip8kte9kQuWAdSwb7pcJMGaQOh+OpGuSC/tZuUj21aKA3zryDQxRBOSXzX+BkPr/DZ7GjbIcMg2u7IC47t49WBd8GZydZZlx+B6iwF1sAVMra2erhiZYmArPy0T3tiC3DJPyyZKxERIPm3AzAwa+gd2MFJ+lYbHxYzMbCk6f2z5Jr0RSQQGfRKFs4bwUMomooYqU+869iXT3CtjAQIEOX3ejfStMiAwHzvfoRen9OBuVn04tY7zCy5aSIaGum3C52Mhduc/e/X8xP60ZBP2VsslFpNvPYQRQvcFwmlc8cpFcPreAEOxCpbtWbfPpg96nNP8hKbCKSabyWdYtuJUkIl2KJHrTex+cGFQT2/Yi6zC4wIj2IP1a+RCa4eYpMJHypJVATcS+h2lzyaPPZFz1vTNpM2HgiEZ0cdg8R8UwIboLvx4TZEv1rDB9gwRyHaluEs6RLrYSxu8nR1GyY/6tE72xTQR29h0r8WDjfOx5uvENJKXCdR1Q6ogWBzrmym7tMyFPMJlMGBFDPM6WLp+EHmGpk8WNqAVRs70F3PLQ/lV0wAas24t7z1D5LG7scR79EaNXC+iqk+NA/cCG8uXtsOtaGwDmjPe4vL6DKcvdFCGezb9iOt2vAAseXwOtbUdEBYmqIBheaT3pDG0GjV2xKWY8+S11yPPYw7aqlCHFrTEXT8nbDi2ZCACNVqXVWBh1bmNdw5WV0Oq1V0o/xJ22SULlDJ6HFprIMMwDMXVQoZLBIXmGTqT2dzaGpS3KWy3KK3zMG74b805/AHcS4yXX+PKhANBMXDXpLEXyjQBl6PNcdp0ndqT0rr+IGL77NUFMfDLeDALKCaebxk5UYbmIMwKl29O2Sr5PDIsKUVQjfqOcH/HodcWkGOQaLeCs6XYjr8HEsdu8cyntbkinaUcepZPCuNq4FGyd/Q8FKUCVfB4xpjysjSWpexQEmKLaJk717S8cMXtYi9w+U5Vk+p3Tfb7aThfGT4g2jD3aNCkxWnXXUZTv6LdxOYUHN/FzTPe1NPvOTwPBR0CRncHCXZbzrS/Z7qQ1+aJZ7YuH1XDoXBFr+BrEXBIwTX36yjey8HB3IhRf9kBDJX2Xvl/7HjIMsZhh7Z4138xy3YEj3RDQB3hBoOq7IjxNN1z0ytAy2mlNWjrf987IguA4DaindokKJcUD8ijlVPeoRtpN93PR0MIsmgirPOWx3xhdAIMWfZ66LSDbb3TejeSy+OpeHBibTA19PTW80ha1zcPO+nvsEyr/NvO30Vzt08zUFVeoVk8wjAjZVOAA9HjPyUPKIjflYdZrN6sjm1Gn35BuPV+vKONdNqgxDHJtCQKc8lE52bfiMoJ5u6enlumyuZlOTFoAOIJ4IaGOdRfAyw5arrUqm1STh8wYNegITS6Z4iITv2mTwvmzC2NJb0lgMhXA0+zLywWUahhncggJeE8PCbLs7Qn9Po0V9wC7ClQ3MpRMMOluutgS65E+pPPX3tw+gEpFE1deo5GzmQ7F85tAOhJUB+KpSdEzMJgR9BcNndiqmwSbQJHm24XKgSXdwC95ula7S2OzVYDyBhLQif8KPEWRXyRsvXYileuiEriSE6RQPZnM6EEzVEbuwah7Ge25vMAL2x/GLj/EBhrGW+gipuKln1I2XcSpbBNZZ/w6pCLKHDzJiJqC371+XAw9w5gnoHZx70HYBW3x3+zWpNJuHN0vhgvLGH3FbN3uRfsbSOsiS/5FDRVDdI4elLaoia+JLFXGFQwFASyzDauBvkeCEw7fXEHFj70al8N1FU2uN6Ybkovo21wh6etsBykZyisUwfhgM3ggQODEqy5Jjhz3OM3Q9OdoH/k6NaItlwU6YfU6cgxfO62/uTQF7uFGk1WzTMwGg39QizcS+o9bxJIuSdabNsJGb4SkcIrmgLEnB22eVgPY/PO+crv9gwmb2Jpg0T5xS3cYgIN5Aa3a0kgwb+Jo/AmCEC0E8tYKGDdv1laekCqUddrMABeWbHDdPOBXbr4zLMZ4lMyhpydLm7KfbmJ8CwwkMd7BWaH1qcRszljZQkAxVmmp2yx5vy6ZmPkIQPbcEW4N5+/GmvWzbjpn2BPpnOsHucymuejnNiFzuhb3tDg0HaXH5d5J+P2RAMjh72NSxpRqlFPku9rkLM9W/aq1Pnv+5EIDxrheCR8ZCiAs+H21p+4LAv/whPeTvnnBoc0RhtntPbgVLbMEBCW4Y6yGf9Rjhnzd0T9eIqv7aH06oPCvSs0fVfet1zOqJQjI2qB2CzuQEEUahMIstUCi/KnH7rRgvNMDokTmzhfE5/d9rswNJ3TIYo2Wtjh4/v32O6DkJIV6rTI+bU3BgjhbitgW86zl+pfI+XRCgwKpKTEDzCXnKPMfIFvL5Kca9MPHse+6FY5t3kQw3Wbv36dhxTZIyblS7YLyrFiKLFFCOon6S4uvOj7JMm3lsqeEuF8fs/Ag/qts/5NxJwCEqQn9Gypk7auyZo8s3BUUh4iEeMfoA0jT5oVgniWFUf8R+U/6y4BibT51okItRTLocr7FgXV0WMJKndA5EewRiz6Noph47fb3nCCbMRiNs7F8sHf9M51E4vEhhV9hCBwXnRxVxb0Gj6wZNIYCDQp2nv/flBnWMW1xyejoohf14yzaEtaYPxP8Px/HGBrUM+nFjwJ1e9qwJpol7rscdMd03T+n2TgM6UZfScBc3p7NaONBz9Vx56lWFm1gLWD1e7H3kPEd0rOTXlw6CPoQeEdUPBHormBr70WNbOMRP9ioD2XXExPCnIuK+kx8zHjwV9nLpOk2ojjKYadXhpDj3/8Rk6IHVYIuGTWFBx0iuOHs3jNRRONHEik0d1Mi8RF++BQTk/879x5NLsmDrbr4JylQVhZhlFvbEa5eSQP+UH7vzc9AEyfSa14FEhAeFQdMfMrpI+EhJvyGsERkzgd4Z/8faAEydzn16XWZQN9yKSEo39gHVuFjY5jRbsSORaElHK+ylUedbjhPfRMIwnvwxwhxYkkroaof3XKXu//KXXWClAaiXTdHyoC3rZpSYywy+IUluU6Xog6uqYJgyKHzwrpLMb5KcJqS946mqrYbcfnblrfcLiKiqcsDrKCEALCzNCRgHrQujt+NVamsYO8CHqRo7wGegyp1X+OPA1F3e+2WonZh5hHVxJHBmg0bBqZEFDVyykGGC4LzcH6dJN82dg9uK1r6TNxxIMifwc45K/67SiaUGS/Arvp8mB3Ga5iXgM2Q5xd3rnxyOyivWE2iQ06sKfYz+n2cGgyA5dhfSnzViQJ0eoMVkeKgKjzVQ0lyHVb1098tZ/bBg0w5nHyCWGgZyb5Bgs0bBh+gqT+nNPbdLR6BWmThQzklExcYPz6Qzk1C1wmcUxLRZtxOFThEVufy2EQ7rGIr/jqs28oNykMr8e4vXy16yhNg5KW+IS24CZF/Hjss0kc2BLu8VWUD1lTnrtWTwmxcLzJuWuyoyAutWJBViroh7sff9b05LJak1kEa5NXE5Y7x85Z23bcjDC4AqPoqNd0g0e0CNfsaW3b3hLsFFQ0Vr2HYJ/EQk/lfuR0x1bWg6Qa2nKvGs09TdgxMkiwwd8DkE7AHt+pblmKMPKn5HfS4wAta0a6r1QcoV75fUmwf4o5eIqEw4CeK2JN4YWfC8mousedTdXwLL+mPqIM5galGrDLxEtticssOgG9AhtcrVMBLuu0KXVanxqvNkeCvzFfTTIVxNtrBwdYcrPeaWX5S1CBkI2pRA4L7EicSIiWuGttcMELD44K7QYlyJdw9jETUt5JaKRgAAVIa2Yz8u0qmsjfBi+kqLcHXxBJFC/WNCFbWHQr7PnP+4Ns7n1YSSUGE6ngb777fyB18TKZFon+SCaGG3fE9kv/J6yR/qGZBlBRytq2tptErOfviRupOQEyRgLY3L08q8P0AvotpjmwVvUgsiklUoEfr9ngGFiiszhmSxX9qGIB6Ipty4UR4ZUjwlItTA850vSMTpSbJaUasEHmSy0Lun69ZA2JshR/b78emL6SPi/vj68qKdW3fE2eJcLrqnNrwcY/mKB2zyP5lrjsvx3W+YzQfcKI2fVPywbQFDnCM33rK8bLDnHVmKquCWL6KORPkq8k9+z5HF4xg61FWmpUdc1F8+QeJI2vdtKRjllY/08ZlhSGqz9CKrrqJXmtPLcqkmL3NDphqdEtn3Iq4kwoafbG6eHSU3ebcIz9j/mzJlRLW90IOT1t0zRwYAdI4j0uwioJssxLmdXYfAx4GDu0N1J4HJaEGCdCltyyCW95YVVJCGjH0Apoq3k+1WngVv7tDpTuGOchQhO99Ph3xinRZSNidj5yHlreGg5ihKghNZvEIEthM4+rT6xzIAQaAbILEkBG0pfqPm/uXDtaAVUzYhNp6uDVfOQ0OEkND3mqId0WkmvXnfZyK4Q9OQ3dRDxhdFhVJD99Lu5EwUDmcxzDjHhLVZvogXiLHbr8l3Suyi2RGaN0IXwk/q+or4MmLS7MgqSbPypTGtXkp9zhwMPlUa2adUdfSwO/813yzE6DZ1N1IpVrZQYxZBLEYUe1O4KN7+iRtMXRIAywZrNDea32ecGynFo87gf8BlgMSREkfd2/QO3jTYS0/vBPgrusWOcjsWXNsLC3c8N/v2YJj8h6YdTzXtRDJCd9t5gayPTmtTj2mPc7RI6G44pBHWo22ZJ6mwR2KLrcERis4xcU0T7YQNzk9qiduPMabCO9l8cElNt7iN1K4suvhHd6U/QD96BDpRMGFlhnCrYvO36cOqQKVBHILmQyTdzDqV9RiPt6eeC/w0aH5rVIqf+q+ZQDYQVym3WRZEg/htTgrxWVeaAOdqhp+tzEzdLhg8umD/KJQ50YBD5nquZp1o65ponzLShrUaTTY5u44jck+/XnvYWakG+pLr8vxgD0lpgD+Xd/50zWmtO0NbgfemZs0qsJkqSX7HRXueGdvKr0OXNTzkWCBATLDxOsuG+Tuebl/4Nojaa/hlukJqjGTuyk5WgcF3Rwpj3iFomRikgfMQA5RzBmmpgtF2ekDgrk7EDZ13U9HZg3zmoTS7UTNLYd+TY0RLNpFa4aDmrnMPWYCnh8XCmQymWvuOs2RyyxMOASjnS8yvVGz63H9Di/Ne/pafatIoBzGES2LhCB+I3iSGRg4ZOQ2efZVI4ZHPcca/93acvgVpMC3mcvBPxC6OAZ2ZzIyuiMjzsu4Nx8+bIAdWBE+BkD7661Eimn753qZGzN31Sptz+2Hnx/0MEdni78ibUZb4bHp71FCv1/z0YSLUEcYLT3n/fs191zGSksYvIaQnnON50SkD9aqLd302BCLfCNTOjq7Ln7h2v3ThKpd9zJnJFzL7etfDqryQC7ozoqMddK4VY3a2ogRzk/PHm1QO/JgKzn0kD1xKW+hs09QLruEhnwpzTOMuAhiEp0lKQPj39ZUDzR3gnLSZpBCp2TO3IsXz+NuKhl9VGGlR7WN/51zZFo3w9ThO+qrrB1bb3cVTnCH6qJcgcgY+681Y2mJgaoCL1XLpyVMRDaSZAUd4TDKaKRd8vFnXudK1B/EeDDaE9mo35SzXAf5Sx+1HTs2wcBUm57bSGbySuDCw5ULoIEw5H9KqELbcSsBZqJSv5jUcmWsuGKqPaDdFSneJ3OJ3/xA3zChg+giHpZNs6e8J6GdSkDLddKrpXZIB29AhrCyX//7ztl8mbjJBELpu8NGc8ofKSWhCFyYi4C5EXFxKDVDJo0MdUE4n5Rc3hNa/Pxp7Tkd7OfhpwtNWoWiLyx3qO2xFxrEb0BYeMpPACsgaliWjxhURtFoBmt+/BB8JEiTbfhBad8tXZUQ84kZ7iSfgOMf3wKXvCTdsL1W5/pZYiSzAzzWY5Qa8zNYivoAcb6cVhjw0bjSv70aBYfQTX5svZbgFrPKcljFwPuk7LFzd9GVVCwUxJoQcZBKQd7x4TknP0ykpraqLINh1PdobfB8vGsGRr5nTZ2ht1Dsw7KhNMuTOUiuopMVJ4pvL7qrKo0JW6kKquHLnTcvQ0rZYhweS+V8nvdxk07awAJnRXLoiAIhcwbmFKU1Dr6pHl/rvXf/MRBQ39peqV6A5aZxQLIRs7I8D56As/v8UAsG3wfzORRxZ9kPrpvoibh5m/dzWT/+XXFn2OTii5hLkqLFObYjGSwxtsqBoCSPOCRr92iK6i5/fcK7ZDTcaYriQeSzM6HEGEOtr//kzCbNNmyoaaWj+H9B32EtTcECCn5nb+HARPcTb47cnD9Dyrv/CFbN8Q8gi9F5FB0lXCcoHgHUh0XuJ7QqwZmNAAvxEvu0eu3rv+5JHYG2Cs6gCySOuLd8hcSRlLGabmfH4MNmPmMHvkGTTJ+8YYsHmQFioqpV+qB7Dksy8WVK4Az61VBMjP3vyiGjUEh10pGOZbzUSfisbK5mg0+C5o6I59R2Ei3DCPTJhbqe1LoTtj77vnuQKkbLBswCe7WL/KMIkGYwK8tlvev/XYAuzwqY0poysfs2YpyLi1fExUWiPgA/jgwVS3gBH3E0nlSQLRyY2pnE+QjE84vgKhAhQlUuBtcC2JDRDjaTbe/DpYNVPgKQDK9a64sRDsJYUniM1VxzW7wKSIjLIZ666HsUR13DXXz0uQxRd85EgECaYQyHihCzIPRghzCREiOVv8f0ZOp/DS5dA68AQgmpzWLPyHX1U/tZPxTSq4apb+n82N5reRCy8NuJXIf6dDHRyHeycy9Bn3/GCWB5mLJ9RjYOz7L3ky+Ndwa5L7K6NeZx3rNGwDtFaOM+wOsoytwz/TiSU6n9mse5CTrZiW+A/6VIUxYzjVHDWYz14ecqHr1pPS6JysuiLZJOB8Ac6qMYV7BdRf04SnQTUnwkdyUANi9diWLKQzrUKNMA7umWUGZ5+WHIfLBGB01EDQYsUSUD8tajwTvmsMzkVxqb5WogqK1dOX/TwUWS2XIjYf4OqgAqfbQe+0MSknAKKl2mxpkg2PknHShF0cf0apGPww/hCW08y/Tn9yWhMsmzEqt03JRgcRCpRN/mhVZ9Q4PA4A/iB6iOwv++O5rsPW8R6hbdQX4PJhn9jN9iL+me78Yn8IUQsCOBgIfwtHaMfPFYbDPgB80FgwdfNi+SG8usT2/FTuxq02j2SQbDQ0HRzX4hDanqDYsaIEKFEFIPJI74x59MnazfBqUP2KuPCQ9a8Df0YFhELocG7bMR0uy8TJFsKWcZWhV8H9k/ssk302CPl189huMOkJWmAA8OAdxInGFOxfrz1wQMR3PPif9DWbVhS73hnJphKj040BI1P7gHh7yju/O0Xrb3okvu1XRrxBYUSGhWFIpO7Ueoq0WnaFZ4oaqaMEOasUNGs8o/5aH8yh+Wmk+OcvpblRE/KJ6oYv/ihskYWZF6VOAqANiMr0ZPw6BrcDW1Ko1JNfmZYVXBznRRClQilui3qnHseN7oXemB5ghO1nnml1rmL9jdc+T6gFSbUX9oy/gplwjwUkGOJF8i198LaODlGFgrLN4d7xkqQ68f0S9wwzFf4CRJyC44FPb/sItuyKKJX6D6fuihPu5M0cEs7luGBbdAU3vxQUB4LxD5z3vQJRYWy9RDGaFbsSmB/rWxCDyC5Zugc9grbwUte2VEKmcmPmNFFO3EnVbMBQRfCvE14m8B0yCAFWP4mS1sXa2icjEPJvbGAaxDjxUMyw4UrvLTmr1epUsLZyjWw60N+xukd48ytnkQx4OhJGblrPl/ODEBhK5M+WW5ApTawzRUTMOZm/9XhftM1IDG5oD6r9euJX6vaoHRBy6Ze+nZVNPcII2n2Mf2+HR1luGGxhFJSA6MvCDPPkV4rdYJeBNLI+eiB99FU3Ao6mdaoXcr05t/54JBXyo3FK4hz7itTw9jbPhM5TD0G2FebhlfYX3N5UoNfJjxLMJ0OtddTM9KGflCRY7Lwq+lqmWuK8U0K/w1UZuihwn4VIw3Z/+nqDvwekxCu26iQbmUtDLuYb7zuQ9GTt6ml0k52DSErOBdou5St8rdXU7rT2ynUjxamukaHpdA7uasRwBiFbMo1/P2dIWZSfHAyRNkrd3pcQ3hCDGXUEizfUV0sFdkbUu8+yx9+y1ZZds5ZFIy/L5vJ7GHZSAvx4xaBlFMLKZm6VVwqIk26PW91brz7kS9AKfrHCSBAaS5+bT9uutXDbRmqTujpwI+FjuyiR+gu4Ot68MNiBwoJEnDC+mMkpaBMw1j+O/+vJw1cK7UkHTri+0yuw25tBPo0MnWgvwR4OrDPgMDxlceK+ryygaz75CtJc07ZOPn1Acj/edBW+XgbkBlWkCPu3aBS+6uEeKiT4Dasycm/uBm9W7Pc9qmZFbUfupZcbj8HPTFI0NqhM9+PAj6xwKvn6cxsNil4SEoZXxSfgKSBCvGsD274C9w+c8/qxmzRWZdeiVw3LRes1fxQ2bf+opo8MK+zHBUQvE2WRRdC0W15dgHIR3skg2uZBdJ17FhIBtfFLlFDl/pcVUzx3lSQ6TAnyb2/yBuQUBp41czIMkgGeBwoHIe0awosQathpORtj2rz2gX03+zJFZLeFRUXGHUZ0KHUcMryBkODIvdyKQIw99d0MScMR2hrlfGDRlDdg5JOfvxuRs2dJ6nF/yKnb5pXtGmkpj28t73VDw17NTAuQ3VlYB874dh9+IPkhhQ929gh9rCCGgk3dI7cHHfyrqLYA7WjI/bQzYdB0dxZBIx+7PMMJC7KJFYzngfViwRDN1EXZALE/Q0i7qKIC3R0uFYqCpRPxkWNacJ8DWo8uTT/fAQ2g+MXhaeOswXOvocV1CAR+1b6sQmotZkAZRkzqUx6Nx93VBjLOO5DH39IW/1cTbBXvXI7rFN7N/tAGqlg3m7ju+Shl5Fq94Ih1FDmE53M6dZcy75dg5j/zI3xLuiM0fdvSdgujBypMB/5vwO0o6n9DQglbDvO4/zM5WPGDrFJUOFYDKl6XgHK5/rcpe0uAvGS4vjI6+k0uFBg+mH3ZdDP/YkiFO+UTCcST4W9oiAMu2rlREBGozdG/YcWYAiH5N/GfyZbrFTkepELkE963/KGKK1JOreHV0zEMvtsrPzTbSWXLFMajMo6zJw2BbzZ+CDNLllcqu9627g8BSNFqZyFUBzRwfjr4Q5L65XrwFmBycUoJq8IFscvv77CuUGT9feAJVRrrWe77yiG5Tw/rUhRdZWQ7A+90cEOVOFAYoDTD3mF/H5QG/e7lbJO8rgHjvkTfIHVUaPsRBRM8htFWfJNbo5PRVvTp/VopsbhaLFWuWX9Gr8w==\",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 CLOUD_RELEASE_ORIGIN=\"https://releases.ceet.uk\"local CLOUD_MANIFEST_URL=CLOUD_RELEASE_ORIGIN..\"/manifest.json\"local CLOUD_SOURCE_ID=\"cloud.releases.ceet.uk\"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 releaseFilename(profileId,releaseVersion)if profileId==\"desktop\"then return\"desktop/ceetos-release\"..releaseVersion..\".lua\"end return profileId..\"/ceetos-\"..profileId..\"-release\"..releaseVersion..\".lua\"end local function readHttp(url,limit)if not http or type(http.get)~=\"function\"then return nil,\"HTTP is unavailable; enable it to check releases.ceet.uk\"end local ok,response,requestErr=pcall(http.get,url,{[\"Accept\"]=\"application/json\"})if not ok or not response then return nil,tostring(requestErr or\"release server request failed\")end local chunks,total={},0 while true do local part=response.read(math.min(4096,limit-total+1))if not part or part==\"\"then break end total=total+#part if total>limit then pcall(response.close);return nil,\"release server response is too large\"end chunks[#chunks+1]=part end pcall(response.close)return table.concat(chunks)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 local filename=body.filename if filename~=nil and filename~=releaseFilename(body.profile,body.version)then return nil,\"invalid release filename\"end return{profile=body.profile,version=body.version,size=math.floor(body.size),digest=body.digest:lower(),keyId=body.keyId,filename=filename,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,filename=offer.filename,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 checkCloudManifest()local raw,readErr=readHttp(CLOUD_MANIFEST_URL,release.MAX_MANIFEST_BYTES)if not raw then return 0,readErr end local ok,catalogue=pcall(textutils.unserialiseJSON,raw)if not ok or type(catalogue)~=\"table\"or catalogue.schema~=1 or type(catalogue.releases)~=\"table\"or#catalogue.releases>OFFER_LIMIT then return 0,\"invalid signed-release catalogue\"end local count=0 for index=1,#catalogue.releases do local entry=catalogue.releases[index]if type(entry)==\"table\"and entry.profile==profile.id()then local accepted=upsertOffer(CLOUD_SOURCE_ID,entry,\"cloud\")if accepted then count=count+1 end end end return count 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()if offer.transport==\"cloud\"then setStatus(\"downloading\",\"Downloading signed release \"..offer.version..\" from releases.ceet.uk\")save()local sourceText,readErr=readHttp(CLOUD_RELEASE_ORIGIN..\"/\"..tostring(offer.filename or\"\"),release.MAX_PACKAGE_BYTES)if not sourceText then setStatus(\"error\",readErr);record(\"download_failed\",{id=CLOUD_SOURCE_ID,error=readErr});save();return false,readErr end local parsed,parseErr=release.parse(sourceText)if not parsed or parsed.manifest.profile~=offer.profile or parsed.manifest.version~=offer.version or parsed.manifest.digest:lower()~=offer.digest or parsed.manifest.key_id~=offer.keyId then local reason=parseErr or\"verified package did not match selected release offer\"setStatus(\"error\",reason);record(\"download_failed\",{id=CLOUD_SOURCE_ID,error=reason});save();return false,reason end local metadata,cacheErr=release.cache(sourceText,\"releases.ceet.uk\")if not metadata then setStatus(\"error\",cacheErr);record(\"download_failed\",{id=CLOUD_SOURCE_ID,error=cacheErr});save();return false,cacheErr end cached=nil;refreshCached()setStatus(\"downloaded\",\"Verified release \"..metadata.version..\" is ready for local confirmation\")record(\"download_verified\",{id=CLOUD_SOURCE_ID,version=metadata.version,digest=metadata.digest:sub(1,16)})save()return true,metadata end 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 cloudOffers,cloudErr=checkCloudManifest()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 if cloudErr then setStatus(\"warning\",\"Cloud release check failed: \"..tostring(cloudErr):sub(1,120))elseif cloudOffers==0 and not(sent or routed>0)then setStatus(\"idle\",\"No newer signed release is available\")elseif cloudOffers>0 then setStatus(\"offers\",tostring(cloudOffers)..\" signed cloud release offer\"..(cloudOffers==1 and\"\"or\"s\")..\" available\")end record(\"check\",{cloud=cloudOffers,direct=sent==true,routed=routed,cloudError=cloudErr,error=sent and nil or err})save()if cloudErr and not sent and routed==0 then return false,cloudErr end return true,{cloud=cloudOffers,direct=sent==true,routed=routed,cloudError=cloudErr}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 activity=\"desktop\"local function text(value,limit)if type(value)~=\"string\"then return nil end value=value:gsub(\"[%z\\1-\\31\\127]\",\" \")if value==\"\"then return nil end return value:sub(1,limit)end local function config()local value=store.read(PATH,{})if type(value)~=\"table\"then value={}end if value.telemetry==nil then value.telemetry=true store.write(PATH,value)end return value end function M.setEnabled(value)assert(type(value)==\"boolean\",\"telemetry state must be boolean\")require(\"ceetos.lib.auth\").require(\"admin\")local valueForSave=config()valueForSave.telemetry=value return store.write(PATH,valueForSave)end function M.status()return config().telemetry==true end function M.configuration()return{enabled=M.status()}end function M.markActivity(value)activity=text(value,48)or activity return activity end function M.activity()return activity end function M.snapshot(currentActivity)if currentActivity then M.markActivity(currentActivity)end local data={ts=os.epoch(\"utc\"),id=os.getComputerID(),label=text(os.getComputerLabel(),96),activity=activity,}if turtle and type(turtle.getFuelLevel)==\"function\"then local ok,fuel=pcall(turtle.getFuelLevel)if ok and type(fuel)==\"number\"then data.fuel=fuel end end if gps and type(gps.locate)==\"function\"then local ok,x,y,z=pcall(gps.locate,0.2)if ok and type(x)==\"number\"and type(y)==\"number\"and type(z)==\"number\"then data.gps={x=x,y=y,z=z}end end return data 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 telemetryService=require(\"ceetos.lib.telemetry\")local RECIPE_SERVICE_MODULE=\"ceetos.lib.\"..\"recipe_service\"local M={}local STATE=\"/ceetos/data/cloud-state.lua\"local INTERVALS={telemetry=24*60*60*1000,authority=30000,recipes=30000}local TELEMETRY_RETRIES={15*60*1000,60*60*1000,4*60*60*1000}local function now()return os.epoch(\"utc\")end local function defaults()return{schema=2,revision=0,auth={online=false,next=0},recipe={online=false,next=0,revision=0},telemetry={enabled=nil,next=0,lastSuccess=nil,failures=0,lastError=nil},lastError=nil}end local function state()store.invalidate(STATE)local value=store.read(STATE,defaults())if type(value)~=\"table\"then value=defaults()end if type(value.auth)~=\"table\"then value.auth={}end if type(value.recipe)~=\"table\"then value.recipe={}end if type(value.telemetry)~=\"table\"then value.telemetry={}end 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 for key,fallback in pairs(defaults().telemetry)do if value.telemetry[key]==nil then value.telemetry[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,telemetryNext=tonumber(value.telemetry and value.telemetry.next)or 0,telemetryInterval=INTERVALS.telemetry,telemetryEnabled=telemetryService.status(),telemetryLastSuccess=value.telemetry and value.telemetry.lastSuccess or nil,telemetryLastError=value.telemetry and value.telemetry.lastError or nil,telemetryFailures=math.max(0,math.floor(tonumber(value.telemetry and value.telemetry.failures)or 0)),lastSync=value.lastSync,lastError=value.lastError,}end function M.configure(urls)return cloud.configure(urls)end function M.enroll(code)local enrolled,err=cloud.enroll(code)if not enrolled then return nil,err end local value=state()value.telemetry.next,value.telemetry.failures,value.telemetry.lastError=0,0,nil save(value)return enrolled 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()local snapshot=telemetryService.snapshot()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 local telemetryEnabled=telemetryService.status()if not telemetryEnabled then if value.telemetry.enabled~=false or value.telemetry.next~=0 then value.telemetry.enabled,value.telemetry.next,value.telemetry.failures,value.telemetry.lastError=false,0,0,nil changed=true end elseif value.telemetry.enabled~=true then value.telemetry.enabled,value.telemetry.next,value.telemetry.failures,value.telemetry.lastError=true,0,0,nil changed=true elseif timestamp>=(tonumber(value.telemetry.next)or 0)then local ok,err=telemetry()if ok then value.telemetry.next,value.telemetry.lastSuccess,value.telemetry.failures,value.telemetry.lastError=timestamp+INTERVALS.telemetry,timestamp,0,nil else local failures=math.max(0,math.floor(tonumber(value.telemetry.failures)or 0))+1 value.telemetry.failures,value.telemetry.lastError=failures,tostring(err or\"telemetry upload failed\"):sub(1,180)value.telemetry.next=timestamp+(TELEMETRY_RETRIES[failures]or INTERVALS.telemetry)errorState(value,value.telemetry.lastError)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\"),cloudStatus.enrolled and(\"Last report: \"..tostring(cloudStatus.telemetryLastSuccess or\"pending\")..\" | next: \"..tostring(cloudStatus.telemetryNext or\"pending\"))or\"Enroll this computer before it can appear on dash.ceet.uk.\",cloudStatus.telemetryLastError and(\"Telemetry error: \"..short(cloudStatus.telemetryLastError,58))or\"Cloud telemetry uploads daily 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\")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==\"cloud\"and\"cloud\"or(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=6,string=\"0.16.6\"}",
  ["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 telemetryOk,telemetry=pcall(require,\"ceetos.lib.telemetry\")if telemetryOk and telemetry and telemetry.markActivity then telemetry.markActivity(\"crafting queue\")end 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.6" .. ",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