tx · E5o6QQainrtK1rybrhHhrLnuGTxHiATLa8L1kLVuPgGW

3M7uzD8rT54fKQcP4s417if1VKU8yromEP2:  -0.05500000 Waves

2025.10.10 17:12 [430513] smart account 3M7uzD8rT54fKQcP4s417if1VKU8yromEP2 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "E5o6QQainrtK1rybrhHhrLnuGTxHiATLa8L1kLVuPgGW",
    "fee": 5500000,
    "feeAssetId": null,
    "timestamp": 1760105556233,
    "version": 2,
    "chainId": 82,
    "sender": "3M7uzD8rT54fKQcP4s417if1VKU8yromEP2",
    "senderPublicKey": "2eFPamS5zez1159HEFEJaxs2XPq3AupPbNApNGffRjqf",
    "proofs": [
        "3qXGHPn5xw48MWHsViKea2GdWkL2Ya7fxdWNgnJfp42pMnjujbxaz1Pn9W9UaPUhD6qeAUr6dCpFX2MF4YZESnKg"
    ],
    "script": "base64:BgIzCAISBAoCGAESAwoBCBIDCgEIEgkKBwgICAEICAgSAwoBCBIDCgEIEgMKAQESAwoBCBIACwAHVkVSU0lPTgIFMS4wLjAABUxJTUlUAAIACGtfQURNSU5TAgtBRE1JTlNfUEJLUwAKa19NQU5BR0VSUwINTUFOQUdFUlNfUEJLUwAHa19MSU1JVAIMVk9URVNfUVVPUlVNAQxfdmFsaWRhdGVQYmsBA3BiawQHYWRkcmVzcwkApwgBCQDZBAEFA3BiawQKYWRkcmVzc1N0cgkApQgBBQdhZGRyZXNzBgEJX2dldExpbWl0AAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFB2tfTElNSVQCGFF1b3J1bSBsaW1pdCBub3QgZGVmaW5lZAEIX2lzQWRtaW4BA3BiawQJYWRtaW5zU3RyCQELdmFsdWVPckVsc2UCCQCiCAEFCGtfQURNSU5TAgAEBmFkbWlucwkAtQkCBQlhZG1pbnNTdHICASwJAQIhPQIJAM8IAgUGYWRtaW5zBQNwYmsFBHVuaXQBCl9pc01hbmFnZXIBA3BiawQLbWFuYWdlcnNTdHIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUKa19NQU5BR0VSUwIABAhtYW5hZ2VycwkAtQkCBQttYW5hZ2Vyc1N0cgIBLAkBAiE9AgkAzwgCBQhtYW5hZ2VycwUDcGJrBQR1bml0ARBfaXNWYWxpZE9wZXJhdG9yAQNwYmsEC21hbmFnZXJzU3RyCQELdmFsdWVPckVsc2UCCQCiCAEFCmtfTUFOQUdFUlMCAAQIbWFuYWdlcnMJALUJAgULbWFuYWdlcnNTdHICASwEB2lzQWRtaW4JAQhfaXNBZG1pbgEFA3BiawQJaXNNYW5hZ2VyCQEKX2lzTWFuYWdlcgEFA3BiawMFB2lzQWRtaW4GBQlpc01hbmFnZXIBCnNhdmVUeERhdGECBnRhc2tJZARkYXRhBAdpbmRpY2VzCQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUJAMwIAgAGCQDMCAIABwkAzAgCAAgJAMwIAgAJCQDMCAIACgUDbmlsBAhkYXRhU2l6ZQkAsQIBBQRkYXRhBAljaHVua1NpemUAAwQLY2h1bmtzQ291bnQDCQAAAgkAagIFCGRhdGFTaXplBQljaHVua1NpemUAAAkAaQIFCGRhdGFTaXplBQljaHVua1NpemUJAGQCCQBpAgUIZGF0YVNpemUFCWNodW5rU2l6ZQABCgEKbWFrZUNodW5rcwIFYWNjdW0FaW5kZXgEBWNodW5rCQCvAgIIBQVhY2N1bQJfMQUJY2h1bmtTaXplBAhuZXh0RGF0YQkAsAICCAUFYWNjdW0CXzEFCWNodW5rU2l6ZQkAlAoCBQhuZXh0RGF0YQkAzQgCCAUFYWNjdW0CXzIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZ0YXNrSWQCCV9fdHhkYXRhXwkApAMBBQVpbmRleAUFY2h1bmsEB2VudHJpZXMKAAIkbAUHaW5kaWNlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUEZGF0YQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBnRhc2tJZAIPX190eGRhdGFfY2h1bmtzCQCkAwEFC2NodW5rc0NvdW50BQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCm1ha2VDaHVua3MCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoIBQdlbnRyaWVzAl8yCQFpAQRpbml0AgthZG1pbnNfcGJrcwVsaW1pdAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECDlNlbGYgY2FsbCBvbmx5BAtzaXplX2FkbWlucwMJAQIhPQIJAJADAQULYWRtaW5zX3Bia3MAAAYJAAIBAidBdCBsZWFzdCBvbmUgYWRtaW4gcGJrIHNob3VsZCBiZSBwYXNzZWQDCQAAAgULc2l6ZV9hZG1pbnMFC3NpemVfYWRtaW5zBAxjaGVja19hZG1pbnMDCQEBIQEJAQlpc0RlZmluZWQBCQCiCAEFCGtfQURNSU5TBgkAAgECDkFscmVhZHkgaW5pdGVkAwkAAAIFDGNoZWNrX2FkbWlucwUMY2hlY2tfYWRtaW5zBAl6ZXJvTGltaXQDCQBmAgUFbGltaXQAAAYJAAIBAhNMaW1pdCBzaG91bGQgYmUgPiAwAwkAAAIFCXplcm9MaW1pdAUJemVyb0xpbWl0BAhsaW1pdF9vawMJAGcCBQVsaW1pdAkAkAMBBQthZG1pbnNfcGJrcwYJAAIBCQCsAgIJAKwCAgkArAICAjlMaW1pdCBxdW9ydW0gc2hvdWxkIGJlIDw9IHNpemUgb2YgbGlzdCBvZiBhZG1pbnMsIGxpbWl0OiAJAKQDAQUFbGltaXQCECwgY3VycmVudCBzaXplOiAJAKQDAQkAkAMBBQthZG1pbnNfcGJrcwMJAAACBQhsaW1pdF9vawUIbGltaXRfb2sKAQh2YWxpZGF0ZQIFYWNjdW0EbmV4dAkBDF92YWxpZGF0ZVBiawEFBG5leHQECHZhbGlkUmVzCgACJGwFC2FkbWluc19wYmtzCgACJHMJAJADAQUCJGwKAAUkYWNjMAIACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQh2YWxpZGF0ZQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgMJAAACBQh2YWxpZFJlcwUIdmFsaWRSZXMECWFkbWluc1N0cgkAuQkCBQthZG1pbnNfcGJrcwIBLAkAzAgCCQELU3RyaW5nRW50cnkCBQhrX0FETUlOUwUJYWRtaW5zU3RyCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQdrX0xJTUlUBQVsaW1pdAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGFkZEFkbWluAQNwYmsECWNhbGxlclBiawkA2AQBCAUBaQ9jYWxsZXJQdWJsaWNLZXkEB2lzQWRtaW4DCQEIX2lzQWRtaW4BBQljYWxsZXJQYmsGCQACAQIZT25seSBhZG1pbnMgY2FuIGFkZCBhZG1pbgMJAAACBQdpc0FkbWluBQdpc0FkbWluBAdpc1ZhbGlkAwkBDF92YWxpZGF0ZVBiawEFA3BiawYJAAIBAhFJbnZhbGlkIGFkbWluIHBiawMJAAACBQdpc1ZhbGlkBQdpc1ZhbGlkBAxuZXdBZG1pbnNTdHIJAKwCAgkArAICCQERQGV4dHJOYXRpdmUoMTA1OCkBBQhrX0FETUlOUwIBLAUDcGJrCQDMCAIJAQtTdHJpbmdFbnRyeQIFCGtfQURNSU5TBQxuZXdBZG1pbnNTdHIFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQtyZW1vdmVBZG1pbgEDcGJrBAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5BAdpc0FkbWluAwkBCF9pc0FkbWluAQUJY2FsbGVyUGJrBgkAAgECGU9ubHkgYWRtaW5zIGNhbiBhZGQgYWRtaW4DCQAAAgUHaXNBZG1pbgUHaXNBZG1pbgQHaXNWYWxpZAMJAQxfdmFsaWRhdGVQYmsBBQNwYmsGCQACAQIRSW52YWxpZCBhZG1pbiBwYmsDCQAAAgUHaXNWYWxpZAUHaXNWYWxpZAQMb2xkQWRtaW5zU3RyCQERQGV4dHJOYXRpdmUoMTA1OCkBBQhrX0FETUlOUwQJb2xkQWRtaW5zCQC1CQIFDG9sZEFkbWluc1N0cgIBLAQFaW5kZXgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAzwgCBQlvbGRBZG1pbnMFA3BiawIYVGhpcyBwYmsgaXMgbm90IGFuIGFkbWluBAluZXdBZG1pbnMJANEIAgUJb2xkQWRtaW5zBQVpbmRleAQMbmV3QWRtaW5zU3RyCQC5CQIFCW5ld0FkbWlucwIBLAkAzAgCCQELU3RyaW5nRW50cnkCBQhrX0FETUlOUwUMbmV3QWRtaW5zU3RyBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEHYWRkVGFzawcEbmFtZQRkYXBwBHR4aWQJZXhlY3V0ZVRzBGRlc2MMaW5pdGlhdG9yQWRyBnR4ZGF0YQQJY2FsbGVyUGJrCQDYBAEIBQFpD2NhbGxlclB1YmxpY0tleQMJAQEhAQkBEF9pc1ZhbGlkT3BlcmF0b3IBBQljYWxsZXJQYmsJAAIBAgtOb3QgYWxsb3dlZAQGdGFza0lkCQCsAgIJAKwCAgUEZGFwcAIBXwUEdHhpZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBnRhc2tJZAIGX19uYW1lBQRuYW1lCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUGdGFza0lkAgZfX2RhcHAFBGRhcHAJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQZ0YXNrSWQCBl9fdHhJZAUEdHhpZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBnRhc2tJZAIGX19kZXNjBQRkZXNjCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUGdGFza0lkAghfX3R4ZGF0YQUGdHhkYXRhCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUGdGFza0lkAgtfX2luaXRpYXRvcgUMaW5pdGlhdG9yQWRyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBnRhc2tJZAIEX190cwUJZXhlY3V0ZVRzBQNuaWwBaQEKcmVtb3ZlVGFzawEGdGFza0lkBAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5AwkBASEBCQEQX2lzVmFsaWRPcGVyYXRvcgEFCWNhbGxlclBiawkAAgECC05vdCBhbGxvd2VkBAxpbml0aWF0b3JBZHIJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAKwCAgUGdGFza0lkAgtfX2luaXRpYXRvcgMJAQIhPQIFDGluaXRpYXRvckFkcgkApQgBCQCnCAEIBQFpD2NhbGxlclB1YmxpY0tleQkAAgECF09ubHkgY3JlYXRvciBjYW4gcmVtb3ZlCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgUGdGFza0lkAgZfX25hbWUJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICBQZ0YXNrSWQCBl9fZGFwcAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFBnRhc2tJZAIGX190eElkCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgUGdGFza0lkAgZfX2Rlc2MJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICBQZ0YXNrSWQCCF9fdHhkYXRhCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgUGdGFza0lkAgtfX2luaXRpYXRvcgkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFBnRhc2tJZAIEX190cwkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFBnRhc2tJZAIPX19jb25maXJtYXRpb25zCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgUGdGFza0lkAgpfX2FwcHJvdmVkBQNuaWwBaQEPYWRkQ29uZmlybWF0aW9uAQZ0YXNrSWQECWNhbGxlclBiawkA2AQBCAUBaQ9jYWxsZXJQdWJsaWNLZXkEBWxpbWl0CQEJX2dldExpbWl0AAMJAQEhAQkBCF9pc0FkbWluAQUJY2FsbGVyUGJrCQACAQIXT25seSBhZG1pbnMgY2FuIGNvbmZpcm0EBHR4SWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQCsAgIFBnRhc2tJZAIGX190eElkAgtJdmFsaWQgdGFzawMJAAACBQR0eElkBQR0eElkBARkYXBwCQERQGV4dHJOYXRpdmUoMTA1OCkBCQCsAgIFBnRhc2tJZAIGX19kYXBwBBBjb25maXJtYXRpb25zU3RyCQELdmFsdWVPckVsc2UCCQCiCAEJAKwCAgUGdGFza0lkAg9fX2NvbmZpcm1hdGlvbnMCAAQNY29uZmlybWF0aW9ucwkAtQkCBRBjb25maXJtYXRpb25zU3RyAgEsAwkBAiE9AgkAzwgCBQ1jb25maXJtYXRpb25zBQljYWxsZXJQYmsFBHVuaXQJAAIBAhFBbHJlYWR5IGNvbmZpcm1lZAQHbmV3TGlzdAMJAQIhPQIFEGNvbmZpcm1hdGlvbnNTdHICAAkAzQgCBQ1jb25maXJtYXRpb25zBQljYWxsZXJQYmsJAMwIAgUJY2FsbGVyUGJrBQNuaWwECm5ld0xpc3RTdHIJALkJAgUHbmV3TGlzdAIBLAQIYXBwcm92ZWQJAGcCCQCQAwEFB25ld0xpc3QFBWxpbWl0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUGdGFza0lkAg9fX2NvbmZpcm1hdGlvbnMFCm5ld0xpc3RTdHIJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgkArAICCQCsAgIFBGRhcHACAV8FBHR4SWQCCl9fYXBwcm92ZWQFCGFwcHJvdmVkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIc2V0TGltaXQBBWxpbWl0BAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5AwkBASEBCQEIX2lzQWRtaW4BBQljYWxsZXJQYmsJAAIBAh5Pbmx5IHdoaXRlbGlzdGVkIGNhbiBzZXQgbGltaXQECXplcm9MaW1pdAMJAGYCBQVsaW1pdAAABgkAAgECE0xpbWl0IHNob3VsZCBiZSA+IDADCQAAAgUJemVyb0xpbWl0BQl6ZXJvTGltaXQEBmFkbWlucwkBEUBleHRyTmF0aXZlKDEwNTgpAQUIa19BRE1JTlMDCQBmAgUFbGltaXQJALECAQUGYWRtaW5zCQACAQkArAICCQCsAgIJAKwCAgI5TGltaXQgcXVvcnVtIHNob3VsZCBiZSA8PSBzaXplIG9mIGxpc3Qgb2YgYWRtaW5zLCBsaW1pdDogCQCkAwEFBWxpbWl0AhAsIGN1cnJlbnQgc2l6ZTogCQCkAwEJALECAQUGYWRtaW5zCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQdrX0xJTUlUBQVsaW1pdAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBHRlc3QBA3BiawQHZW50cmllcwkBCnNhdmVUeERhdGECAgh0ZXN0dGFzawUDcGJrBQdlbnRyaWVzAWkBCmNsZWFyX3Rlc3QABAdpbmRpY2VzCQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUJAMwIAgAGCQDMCAIABwkAzAgCAAgJAMwIAgAJCQDMCAIACgUDbmlsCgEMcmVtb3ZlQ2h1bmtzAgVhY2N1bQVpbmRleAkAzQgCBQVhY2N1bQkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICCHRlc3R0YXNrAglfX3R4ZGF0YV8JAKQDAQUFaW5kZXgEB2VudHJpZXMKAAIkbAUHaW5kaWNlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICAgh0ZXN0dGFzawIPX190eGRhdGFfY2h1bmtzBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDHJlbW92ZUNodW5rcwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgUHZW50cmllcwAeAsuO",
    "height": 430513,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8UWhHvVL5jUHyFSxcJrhhvNQEb6uQjvm6pLQJY2m7T5X
Next: 85WcQ6RsTei7BoPneezPocrnhhbo4PECtg7tNEKabTfv

Diff: 
Old
New
Differences
272
272
 
    }
273
273
 
274
274
 
275
+
276
+
@Callable(i)
277
+
func clear_test () = {
278
+
    let indices = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10]
279
+
    func removeChunks (accum,index) =     (accum :+ DeleteEntry((("testtask" + "__txdata_") + toString(index))))
280
+
281
+
    let entries = {
282
+
        let $l = indices
283
+
        let $s = size($l)
284
+
        let $acc0 = [DeleteEntry(("testtask" + "__txdata_chunks"))]
285
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
286
+
            then $a
287
+
            else removeChunks($a, $l[$i])
288
+
289
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
290
+
            then $a
291
+
            else throw("List size exceeds 10")
292
+
293
+
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
294
+
        }
295
+
    entries
296
+
    }
297
+
298
+

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let VERSION = "1.0.0"
5
5
 
6
6
 
let LIMIT = 2
7
7
 
8
8
 
let k_ADMINS = "ADMINS_PBKS"
9
9
 
10
10
 
let k_MANAGERS = "MANAGERS_PBKS"
11
11
 
12
12
 
let k_LIMIT = "VOTES_QUORUM"
13
13
 
14
14
 
func _validatePbk (pbk) = {
15
15
 
    let address = addressFromPublicKey(fromBase58String(pbk))
16
16
 
    let addressStr = toString(address)
17
17
 
    true
18
18
 
    }
19
19
 
20
20
 
21
21
 
func _getLimit () = valueOrErrorMessage(getInteger(k_LIMIT), "Quorum limit not defined")
22
22
 
23
23
 
24
24
 
func _isAdmin (pbk) = {
25
25
 
    let adminsStr = valueOrElse(getString(k_ADMINS), "")
26
26
 
    let admins = split(adminsStr, ",")
27
27
 
    (indexOf(admins, pbk) != unit)
28
28
 
    }
29
29
 
30
30
 
31
31
 
func _isManager (pbk) = {
32
32
 
    let managersStr = valueOrElse(getString(k_MANAGERS), "")
33
33
 
    let managers = split(managersStr, ",")
34
34
 
    (indexOf(managers, pbk) != unit)
35
35
 
    }
36
36
 
37
37
 
38
38
 
func _isValidOperator (pbk) = {
39
39
 
    let managersStr = valueOrElse(getString(k_MANAGERS), "")
40
40
 
    let managers = split(managersStr, ",")
41
41
 
    let isAdmin = _isAdmin(pbk)
42
42
 
    let isManager = _isManager(pbk)
43
43
 
    if (isAdmin)
44
44
 
        then true
45
45
 
        else isManager
46
46
 
    }
47
47
 
48
48
 
49
49
 
func saveTxData (taskId,data) = {
50
50
 
    let indices = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10]
51
51
 
    let dataSize = size(data)
52
52
 
    let chunkSize = 3
53
53
 
    let chunksCount = if (((dataSize % chunkSize) == 0))
54
54
 
        then (dataSize / chunkSize)
55
55
 
        else ((dataSize / chunkSize) + 1)
56
56
 
    func makeChunks (accum,index) =     {
57
57
 
        let chunk = take(accum._1, chunkSize)
58
58
 
        let nextData = drop(accum._1, chunkSize)
59
59
 
        $Tuple2(nextData, (accum._2 :+ StringEntry(((taskId + "__txdata_") + toString(index)), chunk)))
60
60
 
        }
61
61
 
62
62
 
    let entries = {
63
63
 
        let $l = indices
64
64
 
        let $s = size($l)
65
65
 
        let $acc0 = $Tuple2(data, [StringEntry((taskId + "__txdata_chunks"), toString(chunksCount))])
66
66
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
67
67
 
            then $a
68
68
 
            else makeChunks($a, $l[$i])
69
69
 
70
70
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
71
71
 
            then $a
72
72
 
            else throw("List size exceeds 10")
73
73
 
74
74
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
75
75
 
        }
76
76
 
    entries._2
77
77
 
    }
78
78
 
79
79
 
80
80
 
@Callable(i)
81
81
 
func init (admins_pbks,limit) = if ((i.caller != this))
82
82
 
    then throw("Self call only")
83
83
 
    else {
84
84
 
        let size_admins = if ((size(admins_pbks) != 0))
85
85
 
            then true
86
86
 
            else throw("At least one admin pbk should be passed")
87
87
 
        if ((size_admins == size_admins))
88
88
 
            then {
89
89
 
                let check_admins = if (!(isDefined(getString(k_ADMINS))))
90
90
 
                    then true
91
91
 
                    else throw("Already inited")
92
92
 
                if ((check_admins == check_admins))
93
93
 
                    then {
94
94
 
                        let zeroLimit = if ((limit > 0))
95
95
 
                            then true
96
96
 
                            else throw("Limit should be > 0")
97
97
 
                        if ((zeroLimit == zeroLimit))
98
98
 
                            then {
99
99
 
                                let limit_ok = if ((limit >= size(admins_pbks)))
100
100
 
                                    then true
101
101
 
                                    else throw(((("Limit quorum should be <= size of list of admins, limit: " + toString(limit)) + ", current size: ") + toString(size(admins_pbks))))
102
102
 
                                if ((limit_ok == limit_ok))
103
103
 
                                    then {
104
104
 
                                        func validate (accum,next) =                                         _validatePbk(next)
105
105
 
106
106
 
                                        let validRes = {
107
107
 
                                            let $l = admins_pbks
108
108
 
                                            let $s = size($l)
109
109
 
                                            let $acc0 = ""
110
110
 
                                            func $f0_1 ($a,$i) =                                             if (($i >= $s))
111
111
 
                                                then $a
112
112
 
                                                else validate($a, $l[$i])
113
113
 
114
114
 
                                            func $f0_2 ($a,$i) =                                             if (($i >= $s))
115
115
 
                                                then $a
116
116
 
                                                else throw("List size exceeds 10")
117
117
 
118
118
 
                                            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
119
119
 
                                            }
120
120
 
                                        if ((validRes == validRes))
121
121
 
                                            then {
122
122
 
                                                let adminsStr = makeString(admins_pbks, ",")
123
123
 
[StringEntry(k_ADMINS, adminsStr), IntegerEntry(k_LIMIT, limit)]
124
124
 
                                                }
125
125
 
                                            else throw("Strict value is not equal to itself.")
126
126
 
                                        }
127
127
 
                                    else throw("Strict value is not equal to itself.")
128
128
 
                                }
129
129
 
                            else throw("Strict value is not equal to itself.")
130
130
 
                        }
131
131
 
                    else throw("Strict value is not equal to itself.")
132
132
 
                }
133
133
 
            else throw("Strict value is not equal to itself.")
134
134
 
        }
135
135
 
136
136
 
137
137
 
138
138
 
@Callable(i)
139
139
 
func addAdmin (pbk) = {
140
140
 
    let callerPbk = toBase58String(i.callerPublicKey)
141
141
 
    let isAdmin = if (_isAdmin(callerPbk))
142
142
 
        then true
143
143
 
        else throw("Only admins can add admin")
144
144
 
    if ((isAdmin == isAdmin))
145
145
 
        then {
146
146
 
            let isValid = if (_validatePbk(pbk))
147
147
 
                then true
148
148
 
                else throw("Invalid admin pbk")
149
149
 
            if ((isValid == isValid))
150
150
 
                then {
151
151
 
                    let newAdminsStr = ((getStringValue(k_ADMINS) + ",") + pbk)
152
152
 
[StringEntry(k_ADMINS, newAdminsStr)]
153
153
 
                    }
154
154
 
                else throw("Strict value is not equal to itself.")
155
155
 
            }
156
156
 
        else throw("Strict value is not equal to itself.")
157
157
 
    }
158
158
 
159
159
 
160
160
 
161
161
 
@Callable(i)
162
162
 
func removeAdmin (pbk) = {
163
163
 
    let callerPbk = toBase58String(i.callerPublicKey)
164
164
 
    let isAdmin = if (_isAdmin(callerPbk))
165
165
 
        then true
166
166
 
        else throw("Only admins can add admin")
167
167
 
    if ((isAdmin == isAdmin))
168
168
 
        then {
169
169
 
            let isValid = if (_validatePbk(pbk))
170
170
 
                then true
171
171
 
                else throw("Invalid admin pbk")
172
172
 
            if ((isValid == isValid))
173
173
 
                then {
174
174
 
                    let oldAdminsStr = getStringValue(k_ADMINS)
175
175
 
                    let oldAdmins = split(oldAdminsStr, ",")
176
176
 
                    let index = valueOrErrorMessage(indexOf(oldAdmins, pbk), "This pbk is not an admin")
177
177
 
                    let newAdmins = removeByIndex(oldAdmins, index)
178
178
 
                    let newAdminsStr = makeString(newAdmins, ",")
179
179
 
[StringEntry(k_ADMINS, newAdminsStr)]
180
180
 
                    }
181
181
 
                else throw("Strict value is not equal to itself.")
182
182
 
            }
183
183
 
        else throw("Strict value is not equal to itself.")
184
184
 
    }
185
185
 
186
186
 
187
187
 
188
188
 
@Callable(i)
189
189
 
func addTask (name,dapp,txid,executeTs,desc,initiatorAdr,txdata) = {
190
190
 
    let callerPbk = toBase58String(i.callerPublicKey)
191
191
 
    if (!(_isValidOperator(callerPbk)))
192
192
 
        then throw("Not allowed")
193
193
 
        else {
194
194
 
            let taskId = ((dapp + "_") + txid)
195
195
 
[StringEntry((taskId + "__name"), name), StringEntry((taskId + "__dapp"), dapp), StringEntry((taskId + "__txId"), txid), StringEntry((taskId + "__desc"), desc), StringEntry((taskId + "__txdata"), txdata), StringEntry((taskId + "__initiator"), initiatorAdr), IntegerEntry((taskId + "__ts"), executeTs)]
196
196
 
            }
197
197
 
    }
198
198
 
199
199
 
200
200
 
201
201
 
@Callable(i)
202
202
 
func removeTask (taskId) = {
203
203
 
    let callerPbk = toBase58String(i.callerPublicKey)
204
204
 
    if (!(_isValidOperator(callerPbk)))
205
205
 
        then throw("Not allowed")
206
206
 
        else {
207
207
 
            let initiatorAdr = getStringValue((taskId + "__initiator"))
208
208
 
            if ((initiatorAdr != toString(addressFromPublicKey(i.callerPublicKey))))
209
209
 
                then throw("Only creator can remove")
210
210
 
                else [DeleteEntry((taskId + "__name")), DeleteEntry((taskId + "__dapp")), DeleteEntry((taskId + "__txId")), DeleteEntry((taskId + "__desc")), DeleteEntry((taskId + "__txdata")), DeleteEntry((taskId + "__initiator")), DeleteEntry((taskId + "__ts")), DeleteEntry((taskId + "__confirmations")), DeleteEntry((taskId + "__approved"))]
211
211
 
            }
212
212
 
    }
213
213
 
214
214
 
215
215
 
216
216
 
@Callable(i)
217
217
 
func addConfirmation (taskId) = {
218
218
 
    let callerPbk = toBase58String(i.callerPublicKey)
219
219
 
    let limit = _getLimit()
220
220
 
    if (!(_isAdmin(callerPbk)))
221
221
 
        then throw("Only admins can confirm")
222
222
 
        else {
223
223
 
            let txId = valueOrErrorMessage(getString((taskId + "__txId")), "Ivalid task")
224
224
 
            if ((txId == txId))
225
225
 
                then {
226
226
 
                    let dapp = getStringValue((taskId + "__dapp"))
227
227
 
                    let confirmationsStr = valueOrElse(getString((taskId + "__confirmations")), "")
228
228
 
                    let confirmations = split(confirmationsStr, ",")
229
229
 
                    if ((indexOf(confirmations, callerPbk) != unit))
230
230
 
                        then throw("Already confirmed")
231
231
 
                        else {
232
232
 
                            let newList = if ((confirmationsStr != ""))
233
233
 
                                then (confirmations :+ callerPbk)
234
234
 
                                else [callerPbk]
235
235
 
                            let newListStr = makeString(newList, ",")
236
236
 
                            let approved = (size(newList) >= limit)
237
237
 
[StringEntry((taskId + "__confirmations"), newListStr), BooleanEntry((((dapp + "_") + txId) + "__approved"), approved)]
238
238
 
                            }
239
239
 
                    }
240
240
 
                else throw("Strict value is not equal to itself.")
241
241
 
            }
242
242
 
    }
243
243
 
244
244
 
245
245
 
246
246
 
@Callable(i)
247
247
 
func setLimit (limit) = {
248
248
 
    let callerPbk = toBase58String(i.callerPublicKey)
249
249
 
    if (!(_isAdmin(callerPbk)))
250
250
 
        then throw("Only whitelisted can set limit")
251
251
 
        else {
252
252
 
            let zeroLimit = if ((limit > 0))
253
253
 
                then true
254
254
 
                else throw("Limit should be > 0")
255
255
 
            if ((zeroLimit == zeroLimit))
256
256
 
                then {
257
257
 
                    let admins = getStringValue(k_ADMINS)
258
258
 
                    if ((limit > size(admins)))
259
259
 
                        then throw(((("Limit quorum should be <= size of list of admins, limit: " + toString(limit)) + ", current size: ") + toString(size(admins))))
260
260
 
                        else [IntegerEntry(k_LIMIT, limit)]
261
261
 
                    }
262
262
 
                else throw("Strict value is not equal to itself.")
263
263
 
            }
264
264
 
    }
265
265
 
266
266
 
267
267
 
268
268
 
@Callable(i)
269
269
 
func test (pbk) = {
270
270
 
    let entries = saveTxData("testtask", pbk)
271
271
 
    entries
272
272
 
    }
273
273
 
274
274
 
275
+
276
+
@Callable(i)
277
+
func clear_test () = {
278
+
    let indices = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10]
279
+
    func removeChunks (accum,index) =     (accum :+ DeleteEntry((("testtask" + "__txdata_") + toString(index))))
280
+
281
+
    let entries = {
282
+
        let $l = indices
283
+
        let $s = size($l)
284
+
        let $acc0 = [DeleteEntry(("testtask" + "__txdata_chunks"))]
285
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
286
+
            then $a
287
+
            else removeChunks($a, $l[$i])
288
+
289
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
290
+
            then $a
291
+
            else throw("List size exceeds 10")
292
+
293
+
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
294
+
        }
295
+
    entries
296
+
    }
297
+
298
+

github/deemru/w8io
45.66 ms ◑