tx · CdzFFy7Pjmgb7jj5GCzknGoAqecURz7aT797X5uWZCFy

3MxquWQhzpqXgbqunnFqHFJXTjasEznd1tN:  -0.01000000 Waves

2022.10.14 12:54 [2271864] smart account 3MxquWQhzpqXgbqunnFqHFJXTjasEznd1tN > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CdzFFy7Pjmgb7jj5GCzknGoAqecURz7aT797X5uWZCFy",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1665741328320,
    "version": 2,
    "chainId": 84,
    "sender": "3MxquWQhzpqXgbqunnFqHFJXTjasEznd1tN",
    "senderPublicKey": "GDjexdefwEhShjRTvHgazn3gTrDo74eHpJCAz14cAEeh",
    "proofs": [
        "4gQB9MMyRZxS6mcAGhexLu5MJTDq9Gm3kn362XBhwezkVzbAMeyxpfAHFXDkJJq5fuXXQap54a4RFbWWot4LH1FB"
    ],
    "script": "base64:AAIFAAAAAAAAACkIAhIECgIICBIDCgEIEgQKAggIEgMKAQgSAwoBCBIFCgMICAgSAwoBCAAAABUBAAAAEGdldFN0cmluZ09yVGhyb3cAAAACAAAAB2FkZHJlc3MAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAHYWRkcmVzcwUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAxDYW4ndCByZWFkICcFAAAAA2tleQIAAAANJyBhdCBhZGRyZXNzIAkABCUAAAABBQAAAAdhZGRyZXNzAQAAABFnZXRJbnRlZ2VyT3JUaHJvdwAAAAIAAAAHYWRkcmVzcwAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAdhZGRyZXNzBQAAAANrZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAADENhbid0IHJlYWQgJwUAAAADa2V5AgAAAA0nIGF0IGFkZHJlc3MgCQAEJQAAAAEFAAAAB2FkZHJlc3MBAAAAE3BhcnNlQWRkcmVzc09yVGhyb3cAAAABAAAADG1heWJlQWRkcmVzcwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEJgAAAAEFAAAADG1heWJlQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAGkNhbid0IHBhcnNlIGFkZHJlc3MgZnJvbSAnBQAAAAxtYXliZUFkZHJlc3MCAAAAAScBAAAACmtleV9lbnRpdHkAAAADAAAABG5hbWUAAAACcGsAAAAIcHJvcGVydHkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEbmFtZQIAAAABXwUAAAACcGsCAAAAAV8FAAAACHByb3BlcnR5AQAAAA5rZXlfTmFtZV9vd25lcgAAAAEAAAAEbm9kZQkBAAAACmtleV9lbnRpdHkAAAADAgAAAAROYW1lBQAAAARub2RlAgAAAAVvd25lcgEAAAARa2V5X05hbWVfcmVzb2x2ZXIAAAABAAAABG5vZGUJAQAAAAprZXlfZW50aXR5AAAAAwIAAAAETmFtZQUAAAAEbm9kZQIAAAAIcmVzb2x2ZXIBAAAAEmtleV9OYW1lX2NyZWF0ZWRBdAAAAAEAAAAEbm9kZQkBAAAACmtleV9lbnRpdHkAAAADAgAAAAROYW1lBQAAAARub2RlAgAAAAljcmVhdGVkQXQBAAAACV9nZXRPd25lcgAAAAEAAAAEbm9kZQkABB0AAAACBQAAAAR0aGlzCQEAAAAOa2V5X05hbWVfb3duZXIAAAABBQAAAARub2RlAQAAAAlfc2V0T3duZXIAAAACAAAABG5vZGUAAAAFb3duZXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAADmtleV9OYW1lX293bmVyAAAAAQUAAAAEbm9kZQUAAAAFb3duZXIFAAAAA25pbAEAAAAMX2dldFJlc29sdmVyAAAAAQAAAARub2RlCQAEHQAAAAIFAAAABHRoaXMJAQAAABFrZXlfTmFtZV9yZXNvbHZlcgAAAAEFAAAABG5vZGUBAAAADF9zZXRSZXNvbHZlcgAAAAIAAAAEbm9kZQAAAAhyZXNvbHZlcgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAARa2V5X05hbWVfcmVzb2x2ZXIAAAABBQAAAARub2RlBQAAAAhyZXNvbHZlcgUAAAADbmlsAQAAAA1fZ2V0Q3JlYXRlZEF0AAAAAQAAAARub2RlCQAEGgAAAAIFAAAABHRoaXMJAQAAABJrZXlfTmFtZV9jcmVhdGVkQXQAAAABBQAAAARub2RlAQAAAA1fc2V0Q3JlYXRlZEF0AAAAAgAAAARub2RlAAAACWNyZWF0ZWRBdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAEmtleV9OYW1lX2NyZWF0ZWRBdAAAAAEFAAAABG5vZGUFAAAACWNyZWF0ZWRBdAUAAAADbmlsAQAAAAdpc0FkbWluAAAAAQAAAANpbnYJAAAAAAAAAggFAAAAA2ludgAAAAZjYWxsZXIFAAAABHRoaXMBAAAAB2lzT3duZXIAAAACAAAAA2ludgAAAARub2RlCQAAAAAAAAIJAAQlAAAAAQgFAAAAA2ludgAAAAZjYWxsZXIJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAAAlfZ2V0T3duZXIAAAABBQAAAARub2RlAgAAAAABAAAAD19zcGxpdExhc3RMYWJlbAAAAAEAAAAEbmFtZQQAAAAGbGFiZWxzCQAEtQAAAAIFAAAABG5hbWUCAAAAAS4EAAAACWxhc3RJbmRleAkAAGUAAAACCQABkAAAAAEFAAAABmxhYmVscwAAAAAAAAAAAQQAAAAJbGFzdExhYmVsCQABkQAAAAIFAAAABmxhYmVscwUAAAAJbGFzdEluZGV4BAAAAApyZXN0TGFiZWxzCQAEuQAAAAIJAARRAAAAAgUAAAAGbGFiZWxzBQAAAAlsYXN0SW5kZXgCAAAAAS4JAAUUAAAAAgUAAAAJbGFzdExhYmVsBQAAAApyZXN0TGFiZWxzAQAAAA1fZmluZFJlc29sdmVyAAAAAQAAAARuYW1lBAAAAAskdDAyMTk3MjI0OAkBAAAAD19zcGxpdExhc3RMYWJlbAAAAAEFAAAABG5hbWUEAAAACWxhc3RMYWJlbAgFAAAACyR0MDIxOTcyMjQ4AAAAAl8xBAAAAApyZXN0TGFiZWxzCAUAAAALJHQwMjE5NzIyNDgAAAACXzIEAAAAByRtYXRjaDAJAAP8AAAABAUAAAAEdGhpcwIAAAAIcmVzb2x2ZXIJAARMAAAAAgUAAAAJbGFzdExhYmVsBQAAAANuaWwFAAAAA25pbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAA9yZXNvbHZlckFkZHJlc3MFAAAAByRtYXRjaDAJAAUUAAAAAgkABCYAAAABBQAAAA9yZXNvbHZlckFkZHJlc3MFAAAACnJlc3RMYWJlbHMJAAUUAAAAAgUAAAAEdW5pdAUAAAAEbmFtZQEAAAAJbW9kaWZpZXJzAAAAAQAAAAt2YWxpZGF0aW9ucwUAAAAEdW5pdAEAAAAJb25seUFkbWluAAAAAQAAAANpbnYDCQEAAAAHaXNBZG1pbgAAAAEFAAAAA2ludgUAAAAEdW5pdAkAAAIAAAABAgAAABFQZXJtaXNzaW9uIGRlbmllZAEAAAAJb25seU93bmVyAAAAAgAAAANpbnYAAAAEbm9kZQMDCQEAAAAHaXNBZG1pbgAAAAEFAAAAA2ludgYJAQAAAAdpc093bmVyAAAAAgUAAAADaW52BQAAAARub2RlBQAAAAR1bml0CQAAAgAAAAECAAAAEVBlcm1pc3Npb24gZGVuaWVkAQAAAAx2YWxpZEFkZHJlc3MAAAABAAAAB2FkZHJlc3MDCQEAAAAJaXNEZWZpbmVkAAAAAQkABCYAAAABBQAAAAdhZGRyZXNzBQAAAAR1bml0CQAAAgAAAAECAAAAGVRoZSBhZGRyZXNzIG11c3QgYmUgdmFsaWQAAAAHAAAAA2ludgEAAAAIc2V0T3duZXIAAAACAAAABG5vZGUAAAAFb3duZXIJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAAAltb2RpZmllcnMAAAABCQAETAAAAAIJAQAAAAlvbmx5T3duZXIAAAACBQAAAANpbnYFAAAABG5vZGUJAARMAAAAAgkBAAAADHZhbGlkQWRkcmVzcwAAAAEFAAAABW93bmVyBQAAAANuaWwJAQAAAAlfc2V0T3duZXIAAAACBQAAAARub2RlBQAAAAVvd25lcgAAAANpbnYBAAAABW93bmVyAAAAAQAAAARub2RlCQAFFAAAAAIFAAAAA25pbAkBAAAACV9nZXRPd25lcgAAAAEFAAAABG5vZGUAAAADaW52AQAAAAtzZXRSZXNvbHZlcgAAAAIAAAAEbm9kZQAAAAhyZXNvbHZlcgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkBAAAACW1vZGlmaWVycwAAAAEJAARMAAAAAgkBAAAACW9ubHlPd25lcgAAAAIFAAAAA2ludgUAAAAEbm9kZQkABEwAAAACCQEAAAAMdmFsaWRBZGRyZXNzAAAAAQUAAAAIcmVzb2x2ZXIFAAAAA25pbAkBAAAADF9zZXRSZXNvbHZlcgAAAAIFAAAABG5vZGUFAAAACHJlc29sdmVyAAAAA2ludgEAAAAIcmVzb2x2ZXIAAAABAAAABG5vZGUJAAUUAAAAAgUAAAADbmlsCQEAAAAMX2dldFJlc29sdmVyAAAAAQUAAAAEbm9kZQAAAANpbnYBAAAAC25hbWVDcmVhdGVkAAAAAQAAAARub2RlCQAFFAAAAAIFAAAAA25pbAkBAAAADV9nZXRDcmVhdGVkQXQAAAABBQAAAARub2RlAAAAA2ludgEAAAAJc2V0UmVjb3JkAAAAAwAAAARub2RlAAAABW93bmVyAAAACHJlc29sdmVyCQEAAAALdmFsdWVPckVsc2UAAAACCQEAAAAJbW9kaWZpZXJzAAAAAQkABEwAAAACCQEAAAAJb25seUFkbWluAAAAAQUAAAADaW52BQAAAANuaWwJAAROAAAAAgkABE4AAAACCQEAAAAJX3NldE93bmVyAAAAAgUAAAAEbm9kZQUAAAAFb3duZXIJAQAAAAxfc2V0UmVzb2x2ZXIAAAACBQAAAARub2RlBQAAAAhyZXNvbHZlcgkBAAAADV9zZXRDcmVhdGVkQXQAAAACBQAAAARub2RlCAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAAAAANpbnYBAAAABXdob0lzAAAAAQAAAARuYW1lCQEAAAALdmFsdWVPckVsc2UAAAACCQEAAAAJbW9kaWZpZXJzAAAAAQkABEwAAAACAwkAAGYAAAACCQABMQAAAAEFAAAABG5hbWUAAAAAAAAAAAAFAAAABHVuaXQJAAACAAAAAQIAAAAUTmFtZSBjYW5ub3QgYmUgZW1wdHkFAAAAA25pbAQAAAALJHQwNDA4MDQxMzEJAQAAAA9fc3BsaXRMYXN0TGFiZWwAAAABBQAAAARuYW1lBAAAAAlsYXN0TGFiZWwIBQAAAAskdDA0MDgwNDEzMQAAAAJfMQQAAAAKcmVzdExhYmVscwgFAAAACyR0MDQwODA0MTMxAAAAAl8yBAAAABFyZWdpc3RyYW50QWRkcmVzcwkBAAAACV9nZXRPd25lcgAAAAEFAAAACWxhc3RMYWJlbAQAAAAKcmVnaXN0cmFudAQAAAAHJG1hdGNoMAUAAAARcmVnaXN0cmFudEFkZHJlc3MDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAFb3duZXIFAAAAByRtYXRjaDAJAAQmAAAAAQUAAAAFb3duZXIFAAAABHVuaXQEAAAACHJlc29sdmVyCQEAAAAMX2dldFJlc29sdmVyAAAAAQUAAAAJbGFzdExhYmVsBAAAAAtuYW1lQ3JlYXRlZAkBAAAADV9nZXRDcmVhdGVkQXQAAAABBQAAAAlsYXN0TGFiZWwEAAAACnBhcmVudEluZm8JAAUWAAAABAUAAAARcmVnaXN0cmFudEFkZHJlc3MFAAAACHJlc29sdmVyBQAAAAtuYW1lQ3JlYXRlZAUAAAAEdW5pdAQAAAAKaXNSb290TmFtZQMJAABmAAAAAgkAATEAAAABBQAAAAlsYXN0TGFiZWwAAAAAAAAAAAAJAAAAAAAAAgkAATEAAAABBQAAAApyZXN0TGFiZWxzAAAAAAAAAAAABwQAAAARc3VwcG9ydHNJbnRlcmZhY2UEAAAAByRtYXRjaDAJAAP8AAAABAkBAAAABXZhbHVlAAAAAQUAAAAKcmVnaXN0cmFudAIAAAARc3VwcG9ydHNJbnRlcmZhY2UJAARMAAAAAgIAAAAFd2hvSXMFAAAAA25pbAUAAAADbmlsAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAdCb29sZWFuBAAAABFzdXBwb3J0c0ludGVyZmFjZQUAAAAHJG1hdGNoMAUAAAARc3VwcG9ydHNJbnRlcmZhY2UHAwMDBQAAAAppc1Jvb3ROYW1lBgkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAAKcmVnaXN0cmFudAYJAQAAAAEhAAAAAQUAAAARc3VwcG9ydHNJbnRlcmZhY2UJAAUUAAAAAgUAAAADbmlsBQAAAApwYXJlbnRJbmZvBAAAAAckbWF0Y2gwCQAD/AAAAAQJAQAAAAV2YWx1ZQAAAAEFAAAACnJlZ2lzdHJhbnQCAAAABXdob0lzCQAETAAAAAIJAQAAAAV2YWx1ZQAAAAEFAAAACnJlc3RMYWJlbHMFAAAAA25pbAUAAAADbmlsAwMDAwkAAAEAAAACCAUAAAAHJG1hdGNoMAAAAAJfMQIAAAAGU3RyaW5nBgkAAAEAAAACCAUAAAAHJG1hdGNoMAAAAAJfMQIAAAAEVW5pdAMDCQAAAQAAAAIIBQAAAAckbWF0Y2gwAAAAAl8yAgAAAAZTdHJpbmcGCQAAAQAAAAIIBQAAAAckbWF0Y2gwAAAAAl8yAgAAAARVbml0AwMJAAABAAAAAggFAAAAByRtYXRjaDAAAAACXzMCAAAAA0ludAYJAAABAAAAAggFAAAAByRtYXRjaDAAAAACXzMCAAAABFVuaXQDCQAAAQAAAAIIBQAAAAckbWF0Y2gwAAAAAl80AgAAAANJbnQGCQAAAQAAAAIIBQAAAAckbWF0Y2gwAAAAAl80AgAAAARVbml0BwcHAwMDAwMDAwMDAwMDAwMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAGChVbml0LCBVbml0LCBVbml0LCBVbml0KQYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAXKFVuaXQsIFVuaXQsIFVuaXQsIEludCkGCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFyhVbml0LCBVbml0LCBJbnQsIFVuaXQpBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABYoVW5pdCwgVW5pdCwgSW50LCBJbnQpBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABooVW5pdCwgU3RyaW5nLCBVbml0LCBVbml0KQYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAZKFVuaXQsIFN0cmluZywgVW5pdCwgSW50KQYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAZKFVuaXQsIFN0cmluZywgSW50LCBVbml0KQYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAYKFVuaXQsIFN0cmluZywgSW50LCBJbnQpBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABooU3RyaW5nLCBVbml0LCBVbml0LCBVbml0KQYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAZKFN0cmluZywgVW5pdCwgVW5pdCwgSW50KQYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAZKFN0cmluZywgVW5pdCwgSW50LCBVbml0KQYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAYKFN0cmluZywgVW5pdCwgSW50LCBJbnQpBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABwoU3RyaW5nLCBTdHJpbmcsIFVuaXQsIFVuaXQpBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABsoU3RyaW5nLCBTdHJpbmcsIFVuaXQsIEludCkGCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAGyhTdHJpbmcsIFN0cmluZywgSW50LCBVbml0KQYJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAaKFN0cmluZywgU3RyaW5nLCBJbnQsIEludCkHBAAAAAtyZWdpc3RyYW50XwgFAAAAByRtYXRjaDAAAAACXzEEAAAACXJlc29sdmVyXwgFAAAAByRtYXRjaDAAAAACXzIEAAAADG5hbWVDcmVhdGVkXwgFAAAAByRtYXRjaDAAAAACXzMEAAAADG5hbWVFeHBpcmVzXwgFAAAAByRtYXRjaDAAAAACXzQJAAUUAAAAAgUAAAADbmlsCQAFFgAAAAQFAAAAC3JlZ2lzdHJhbnRfBQAAAAlyZXNvbHZlcl8FAAAADG5hbWVDcmVhdGVkXwUAAAAMbmFtZUV4cGlyZXNfCQAFFAAAAAIFAAAAA25pbAUAAAAKcGFyZW50SW5mbwAAAAADRSLl",
    "height": 2271864,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2DKr2Yn8WA1WGyyLRdQiHUfaEbSP3uBy5s6tXkPrBKMZ
Next: 9V5FEWthAjCphmbTpDv41DZXbbycHi4XUooSBUtBDLVJ

Diff: 
Old
New
Differences
43
43
 
func isAdmin (inv) = (inv.caller == this)
44
44
 
45
45
 
46
-
func isOwner (inv,node) = (toString(inv.caller) == valueOrErrorMessage(_getOwner(node), (("Owner for the `" + node) + "` was not found")))
46
+
func isOwner (inv,node) = (toString(inv.caller) == valueOrElse(_getOwner(node), ""))
47
+
48
+
49
+
func _splitLastLabel (name) = {
50
+
    let labels = split(name, ".")
51
+
    let lastIndex = (size(labels) - 1)
52
+
    let lastLabel = labels[lastIndex]
53
+
    let restLabels = makeString(removeByIndex(labels, lastIndex), ".")
54
+
    $Tuple2(lastLabel, restLabels)
55
+
    }
56
+
57
+
58
+
func _findResolver (name) = {
59
+
    let $t021972248 = _splitLastLabel(name)
60
+
    let lastLabel = $t021972248._1
61
+
    let restLabels = $t021972248._2
62
+
    match invoke(this, "resolver", [lastLabel], nil) {
63
+
        case resolverAddress: String => 
64
+
            $Tuple2(addressFromString(resolverAddress), restLabels)
65
+
        case _ => 
66
+
            $Tuple2(unit, name)
67
+
    }
68
+
    }
47
69
 
48
70
 
49
71
 
func modifiers (validations) = unit
61
83
 
    else throw("Permission denied")
62
84
 
63
85
 
86
+
func validAddress (address) = if (isDefined(addressFromString(address)))
87
+
    then unit
88
+
    else throw("The address must be valid")
89
+
90
+
64
91
 
@Callable(inv)
65
-
func setOwner (node,owner) = valueOrElse(modifiers([onlyOwner(inv, node)]), _setOwner(node, owner))
92
+
func setOwner (node,owner) = valueOrElse(modifiers([onlyOwner(inv, node), validAddress(owner)]), _setOwner(node, owner))
66
93
 
67
94
 
68
95
 
72
99
 
73
100
 
74
101
 
@Callable(inv)
75
-
func setResolver (node,resolver) = valueOrElse(modifiers([onlyOwner(inv, node)]), _setResolver(node, resolver))
102
+
func setResolver (node,resolver) = valueOrElse(modifiers([onlyOwner(inv, node), validAddress(resolver)]), _setResolver(node, resolver))
76
103
 
77
104
 
78
105
 
90
117
 
func setRecord (node,owner,resolver) = valueOrElse(modifiers([onlyAdmin(inv)]), ((_setOwner(node, owner) ++ _setResolver(node, resolver)) ++ _setCreatedAt(node, lastBlock.timestamp)))
91
118
 
92
119
 
120
+
121
+
@Callable(inv)
122
+
func whoIs (name) = valueOrElse(modifiers([if ((size(name) > 0))
123
+
    then unit
124
+
    else throw("Name cannot be empty")]), {
125
+
    let $t040804131 = _splitLastLabel(name)
126
+
    let lastLabel = $t040804131._1
127
+
    let restLabels = $t040804131._2
128
+
    let registrantAddress = _getOwner(lastLabel)
129
+
    let registrant =     match registrantAddress {
130
+
        case owner: String => 
131
+
            addressFromString(owner)
132
+
        case _ => 
133
+
            unit
134
+
    }
135
+
    let resolver = _getResolver(lastLabel)
136
+
    let nameCreated = _getCreatedAt(lastLabel)
137
+
    let parentInfo = $Tuple4(registrantAddress, resolver, nameCreated, unit)
138
+
    let isRootName = if ((size(lastLabel) > 0))
139
+
        then (size(restLabels) == 0)
140
+
        else false
141
+
    let supportsInterface =     match invoke(value(registrant), "supportsInterface", ["whoIs"], nil) {
142
+
        case supportsInterface: Boolean => 
143
+
            supportsInterface
144
+
        case _ => 
145
+
            false
146
+
    }
147
+
    if (if (if (isRootName)
148
+
        then true
149
+
        else !(isDefined(registrant)))
150
+
        then true
151
+
        else !(supportsInterface))
152
+
        then $Tuple2(nil, parentInfo)
153
+
        else         match invoke(value(registrant), "whoIs", [value(restLabels)], nil) {
154
+
            case _ => 
155
+
                if (if (if (if ($isInstanceOf($match0._1, "String"))
156
+
                    then true
157
+
                    else $isInstanceOf($match0._1, "Unit"))
158
+
                    then if (if ($isInstanceOf($match0._2, "String"))
159
+
                        then true
160
+
                        else $isInstanceOf($match0._2, "Unit"))
161
+
                        then if (if ($isInstanceOf($match0._3, "Int"))
162
+
                            then true
163
+
                            else $isInstanceOf($match0._3, "Unit"))
164
+
                            then if ($isInstanceOf($match0._4, "Int"))
165
+
                                then true
166
+
                                else $isInstanceOf($match0._4, "Unit")
167
+
                            else false
168
+
                        else false
169
+
                    else false)
170
+
                    then if (if (if (if (if (if (if (if (if (if (if (if (if (if (if ($isInstanceOf($match0, "(Unit, Unit, Unit, Unit)"))
171
+
                        then true
172
+
                        else $isInstanceOf($match0, "(Unit, Unit, Unit, Int)"))
173
+
                        then true
174
+
                        else $isInstanceOf($match0, "(Unit, Unit, Int, Unit)"))
175
+
                        then true
176
+
                        else $isInstanceOf($match0, "(Unit, Unit, Int, Int)"))
177
+
                        then true
178
+
                        else $isInstanceOf($match0, "(Unit, String, Unit, Unit)"))
179
+
                        then true
180
+
                        else $isInstanceOf($match0, "(Unit, String, Unit, Int)"))
181
+
                        then true
182
+
                        else $isInstanceOf($match0, "(Unit, String, Int, Unit)"))
183
+
                        then true
184
+
                        else $isInstanceOf($match0, "(Unit, String, Int, Int)"))
185
+
                        then true
186
+
                        else $isInstanceOf($match0, "(String, Unit, Unit, Unit)"))
187
+
                        then true
188
+
                        else $isInstanceOf($match0, "(String, Unit, Unit, Int)"))
189
+
                        then true
190
+
                        else $isInstanceOf($match0, "(String, Unit, Int, Unit)"))
191
+
                        then true
192
+
                        else $isInstanceOf($match0, "(String, Unit, Int, Int)"))
193
+
                        then true
194
+
                        else $isInstanceOf($match0, "(String, String, Unit, Unit)"))
195
+
                        then true
196
+
                        else $isInstanceOf($match0, "(String, String, Unit, Int)"))
197
+
                        then true
198
+
                        else $isInstanceOf($match0, "(String, String, Int, Unit)"))
199
+
                        then true
200
+
                        else $isInstanceOf($match0, "(String, String, Int, Int)")
201
+
                    else false)
202
+
                    then {
203
+
                        let registrant_ = $match0._1
204
+
                        let resolver_ = $match0._2
205
+
                        let nameCreated_ = $match0._3
206
+
                        let nameExpires_ = $match0._4
207
+
                        $Tuple2(nil, $Tuple4(registrant_, resolver_, nameCreated_, nameExpires_))
208
+
                        }
209
+
                    else $Tuple2(nil, parentInfo)
210
+
        }
211
+
    })
212
+
213
+

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func getStringOrThrow (address,key) = valueOrErrorMessage(getString(address, key), ((("Can't read '" + key) + "' at address ") + toString(address)))
5
5
 
6
6
 
7
7
 
func getIntegerOrThrow (address,key) = valueOrErrorMessage(getInteger(address, key), ((("Can't read '" + key) + "' at address ") + toString(address)))
8
8
 
9
9
 
10
10
 
func parseAddressOrThrow (maybeAddress) = valueOrErrorMessage(addressFromString(maybeAddress), (("Can't parse address from '" + maybeAddress) + "'"))
11
11
 
12
12
 
13
13
 
func key_entity (name,pk,property) = ((((name + "_") + pk) + "_") + property)
14
14
 
15
15
 
16
16
 
func key_Name_owner (node) = key_entity("Name", node, "owner")
17
17
 
18
18
 
19
19
 
func key_Name_resolver (node) = key_entity("Name", node, "resolver")
20
20
 
21
21
 
22
22
 
func key_Name_createdAt (node) = key_entity("Name", node, "createdAt")
23
23
 
24
24
 
25
25
 
func _getOwner (node) = getString(this, key_Name_owner(node))
26
26
 
27
27
 
28
28
 
func _setOwner (node,owner) = [StringEntry(key_Name_owner(node), owner)]
29
29
 
30
30
 
31
31
 
func _getResolver (node) = getString(this, key_Name_resolver(node))
32
32
 
33
33
 
34
34
 
func _setResolver (node,resolver) = [StringEntry(key_Name_resolver(node), resolver)]
35
35
 
36
36
 
37
37
 
func _getCreatedAt (node) = getInteger(this, key_Name_createdAt(node))
38
38
 
39
39
 
40
40
 
func _setCreatedAt (node,createdAt) = [IntegerEntry(key_Name_createdAt(node), createdAt)]
41
41
 
42
42
 
43
43
 
func isAdmin (inv) = (inv.caller == this)
44
44
 
45
45
 
46
-
func isOwner (inv,node) = (toString(inv.caller) == valueOrErrorMessage(_getOwner(node), (("Owner for the `" + node) + "` was not found")))
46
+
func isOwner (inv,node) = (toString(inv.caller) == valueOrElse(_getOwner(node), ""))
47
+
48
+
49
+
func _splitLastLabel (name) = {
50
+
    let labels = split(name, ".")
51
+
    let lastIndex = (size(labels) - 1)
52
+
    let lastLabel = labels[lastIndex]
53
+
    let restLabels = makeString(removeByIndex(labels, lastIndex), ".")
54
+
    $Tuple2(lastLabel, restLabels)
55
+
    }
56
+
57
+
58
+
func _findResolver (name) = {
59
+
    let $t021972248 = _splitLastLabel(name)
60
+
    let lastLabel = $t021972248._1
61
+
    let restLabels = $t021972248._2
62
+
    match invoke(this, "resolver", [lastLabel], nil) {
63
+
        case resolverAddress: String => 
64
+
            $Tuple2(addressFromString(resolverAddress), restLabels)
65
+
        case _ => 
66
+
            $Tuple2(unit, name)
67
+
    }
68
+
    }
47
69
 
48
70
 
49
71
 
func modifiers (validations) = unit
50
72
 
51
73
 
52
74
 
func onlyAdmin (inv) = if (isAdmin(inv))
53
75
 
    then unit
54
76
 
    else throw("Permission denied")
55
77
 
56
78
 
57
79
 
func onlyOwner (inv,node) = if (if (isAdmin(inv))
58
80
 
    then true
59
81
 
    else isOwner(inv, node))
60
82
 
    then unit
61
83
 
    else throw("Permission denied")
62
84
 
63
85
 
86
+
func validAddress (address) = if (isDefined(addressFromString(address)))
87
+
    then unit
88
+
    else throw("The address must be valid")
89
+
90
+
64
91
 
@Callable(inv)
65
-
func setOwner (node,owner) = valueOrElse(modifiers([onlyOwner(inv, node)]), _setOwner(node, owner))
92
+
func setOwner (node,owner) = valueOrElse(modifiers([onlyOwner(inv, node), validAddress(owner)]), _setOwner(node, owner))
66
93
 
67
94
 
68
95
 
69
96
 
@Callable(inv)
70
97
 
func owner (node) = $Tuple2(nil, _getOwner(node))
71
98
 
72
99
 
73
100
 
74
101
 
@Callable(inv)
75
-
func setResolver (node,resolver) = valueOrElse(modifiers([onlyOwner(inv, node)]), _setResolver(node, resolver))
102
+
func setResolver (node,resolver) = valueOrElse(modifiers([onlyOwner(inv, node), validAddress(resolver)]), _setResolver(node, resolver))
76
103
 
77
104
 
78
105
 
79
106
 
@Callable(inv)
80
107
 
func resolver (node) = $Tuple2(nil, _getResolver(node))
81
108
 
82
109
 
83
110
 
84
111
 
@Callable(inv)
85
112
 
func nameCreated (node) = $Tuple2(nil, _getCreatedAt(node))
86
113
 
87
114
 
88
115
 
89
116
 
@Callable(inv)
90
117
 
func setRecord (node,owner,resolver) = valueOrElse(modifiers([onlyAdmin(inv)]), ((_setOwner(node, owner) ++ _setResolver(node, resolver)) ++ _setCreatedAt(node, lastBlock.timestamp)))
91
118
 
92
119
 
120
+
121
+
@Callable(inv)
122
+
func whoIs (name) = valueOrElse(modifiers([if ((size(name) > 0))
123
+
    then unit
124
+
    else throw("Name cannot be empty")]), {
125
+
    let $t040804131 = _splitLastLabel(name)
126
+
    let lastLabel = $t040804131._1
127
+
    let restLabels = $t040804131._2
128
+
    let registrantAddress = _getOwner(lastLabel)
129
+
    let registrant =     match registrantAddress {
130
+
        case owner: String => 
131
+
            addressFromString(owner)
132
+
        case _ => 
133
+
            unit
134
+
    }
135
+
    let resolver = _getResolver(lastLabel)
136
+
    let nameCreated = _getCreatedAt(lastLabel)
137
+
    let parentInfo = $Tuple4(registrantAddress, resolver, nameCreated, unit)
138
+
    let isRootName = if ((size(lastLabel) > 0))
139
+
        then (size(restLabels) == 0)
140
+
        else false
141
+
    let supportsInterface =     match invoke(value(registrant), "supportsInterface", ["whoIs"], nil) {
142
+
        case supportsInterface: Boolean => 
143
+
            supportsInterface
144
+
        case _ => 
145
+
            false
146
+
    }
147
+
    if (if (if (isRootName)
148
+
        then true
149
+
        else !(isDefined(registrant)))
150
+
        then true
151
+
        else !(supportsInterface))
152
+
        then $Tuple2(nil, parentInfo)
153
+
        else         match invoke(value(registrant), "whoIs", [value(restLabels)], nil) {
154
+
            case _ => 
155
+
                if (if (if (if ($isInstanceOf($match0._1, "String"))
156
+
                    then true
157
+
                    else $isInstanceOf($match0._1, "Unit"))
158
+
                    then if (if ($isInstanceOf($match0._2, "String"))
159
+
                        then true
160
+
                        else $isInstanceOf($match0._2, "Unit"))
161
+
                        then if (if ($isInstanceOf($match0._3, "Int"))
162
+
                            then true
163
+
                            else $isInstanceOf($match0._3, "Unit"))
164
+
                            then if ($isInstanceOf($match0._4, "Int"))
165
+
                                then true
166
+
                                else $isInstanceOf($match0._4, "Unit")
167
+
                            else false
168
+
                        else false
169
+
                    else false)
170
+
                    then if (if (if (if (if (if (if (if (if (if (if (if (if (if (if ($isInstanceOf($match0, "(Unit, Unit, Unit, Unit)"))
171
+
                        then true
172
+
                        else $isInstanceOf($match0, "(Unit, Unit, Unit, Int)"))
173
+
                        then true
174
+
                        else $isInstanceOf($match0, "(Unit, Unit, Int, Unit)"))
175
+
                        then true
176
+
                        else $isInstanceOf($match0, "(Unit, Unit, Int, Int)"))
177
+
                        then true
178
+
                        else $isInstanceOf($match0, "(Unit, String, Unit, Unit)"))
179
+
                        then true
180
+
                        else $isInstanceOf($match0, "(Unit, String, Unit, Int)"))
181
+
                        then true
182
+
                        else $isInstanceOf($match0, "(Unit, String, Int, Unit)"))
183
+
                        then true
184
+
                        else $isInstanceOf($match0, "(Unit, String, Int, Int)"))
185
+
                        then true
186
+
                        else $isInstanceOf($match0, "(String, Unit, Unit, Unit)"))
187
+
                        then true
188
+
                        else $isInstanceOf($match0, "(String, Unit, Unit, Int)"))
189
+
                        then true
190
+
                        else $isInstanceOf($match0, "(String, Unit, Int, Unit)"))
191
+
                        then true
192
+
                        else $isInstanceOf($match0, "(String, Unit, Int, Int)"))
193
+
                        then true
194
+
                        else $isInstanceOf($match0, "(String, String, Unit, Unit)"))
195
+
                        then true
196
+
                        else $isInstanceOf($match0, "(String, String, Unit, Int)"))
197
+
                        then true
198
+
                        else $isInstanceOf($match0, "(String, String, Int, Unit)"))
199
+
                        then true
200
+
                        else $isInstanceOf($match0, "(String, String, Int, Int)")
201
+
                    else false)
202
+
                    then {
203
+
                        let registrant_ = $match0._1
204
+
                        let resolver_ = $match0._2
205
+
                        let nameCreated_ = $match0._3
206
+
                        let nameExpires_ = $match0._4
207
+
                        $Tuple2(nil, $Tuple4(registrant_, resolver_, nameCreated_, nameExpires_))
208
+
                        }
209
+
                    else $Tuple2(nil, parentInfo)
210
+
        }
211
+
    })
212
+
213
+

github/deemru/w8io/026f985 
44.58 ms ◑