tx · 9V5FEWthAjCphmbTpDv41DZXbbycHi4XUooSBUtBDLVJ

3MxquWQhzpqXgbqunnFqHFJXTjasEznd1tN:  -0.01000000 Waves

2022.10.15 11:11 [2273202] smart account 3MxquWQhzpqXgbqunnFqHFJXTjasEznd1tN > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9V5FEWthAjCphmbTpDv41DZXbbycHi4XUooSBUtBDLVJ",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1665821484561,
    "version": 2,
    "chainId": 84,
    "sender": "3MxquWQhzpqXgbqunnFqHFJXTjasEznd1tN",
    "senderPublicKey": "GDjexdefwEhShjRTvHgazn3gTrDo74eHpJCAz14cAEeh",
    "proofs": [
        "M3idXQizJ1xw9Kw6KyD1cM6wFC87fY6YN5895m8QFSCGckyvafQvRyibuiNUxs3DYeyJ5pXaJHFU77dQhj1u8ta"
    ],
    "script": "base64:AAIFAAAAAAAAACkIAhIECgIICBIDCgEIEgQKAggIEgMKAQgSAwoBCBIFCgMICAgSAwoBCAAAABYBAAAAEGdldFN0cmluZ09yVGhyb3cAAAACAAAAB2FkZHJlc3MAAAADa2V5CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAHYWRkcmVzcwUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAxDYW4ndCByZWFkICcFAAAAA2tleQIAAAANJyBhdCBhZGRyZXNzIAkABCUAAAABBQAAAAdhZGRyZXNzAQAAABFnZXRJbnRlZ2VyT3JUaHJvdwAAAAIAAAAHYWRkcmVzcwAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAdhZGRyZXNzBQAAAANrZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAADENhbid0IHJlYWQgJwUAAAADa2V5AgAAAA0nIGF0IGFkZHJlc3MgCQAEJQAAAAEFAAAAB2FkZHJlc3MBAAAAE3BhcnNlQWRkcmVzc09yVGhyb3cAAAABAAAADG1heWJlQWRkcmVzcwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEJgAAAAEFAAAADG1heWJlQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAGkNhbid0IHBhcnNlIGFkZHJlc3MgZnJvbSAnBQAAAAxtYXliZUFkZHJlc3MCAAAAAScBAAAACmtleV9lbnRpdHkAAAADAAAABG5hbWUAAAACcGsAAAAIcHJvcGVydHkJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEbmFtZQIAAAABXwUAAAACcGsCAAAAAV8FAAAACHByb3BlcnR5AQAAAA5rZXlfTmFtZV9vd25lcgAAAAEAAAAEbm9kZQkBAAAACmtleV9lbnRpdHkAAAADAgAAAAROYW1lBQAAAARub2RlAgAAAAVvd25lcgEAAAARa2V5X05hbWVfcmVzb2x2ZXIAAAABAAAABG5vZGUJAQAAAAprZXlfZW50aXR5AAAAAwIAAAAETmFtZQUAAAAEbm9kZQIAAAAIcmVzb2x2ZXIBAAAAEmtleV9OYW1lX2NyZWF0ZWRBdAAAAAEAAAAEbm9kZQkBAAAACmtleV9lbnRpdHkAAAADAgAAAAROYW1lBQAAAARub2RlAgAAAAljcmVhdGVkQXQBAAAACV9nZXRPd25lcgAAAAEAAAAEbm9kZQkABB0AAAACBQAAAAR0aGlzCQEAAAAOa2V5X05hbWVfb3duZXIAAAABBQAAAARub2RlAQAAAAlfc2V0T3duZXIAAAACAAAABG5vZGUAAAAFb3duZXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAADmtleV9OYW1lX293bmVyAAAAAQUAAAAEbm9kZQUAAAAFb3duZXIFAAAAA25pbAEAAAAMX2dldFJlc29sdmVyAAAAAQAAAARub2RlCQAEHQAAAAIFAAAABHRoaXMJAQAAABFrZXlfTmFtZV9yZXNvbHZlcgAAAAEFAAAABG5vZGUBAAAADF9zZXRSZXNvbHZlcgAAAAIAAAAEbm9kZQAAAAhyZXNvbHZlcgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAARa2V5X05hbWVfcmVzb2x2ZXIAAAABBQAAAARub2RlBQAAAAhyZXNvbHZlcgUAAAADbmlsAQAAAA1fZ2V0Q3JlYXRlZEF0AAAAAQAAAARub2RlCQAEGgAAAAIFAAAABHRoaXMJAQAAABJrZXlfTmFtZV9jcmVhdGVkQXQAAAABBQAAAARub2RlAQAAAA1fc2V0Q3JlYXRlZEF0AAAAAgAAAARub2RlAAAACWNyZWF0ZWRBdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAEmtleV9OYW1lX2NyZWF0ZWRBdAAAAAEFAAAABG5vZGUFAAAACWNyZWF0ZWRBdAUAAAADbmlsAQAAAAdpc0FkbWluAAAAAQAAAANpbnYJAAAAAAAAAggFAAAAA2ludgAAAAZjYWxsZXIFAAAABHRoaXMBAAAAB2lzT3duZXIAAAACAAAAA2ludgAAAARub2RlCQAAAAAAAAIJAAQlAAAAAQgFAAAAA2ludgAAAAZjYWxsZXIJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAAAlfZ2V0T3duZXIAAAABBQAAAARub2RlAgAAAAABAAAAD19zcGxpdExhc3RMYWJlbAAAAAEAAAAEbmFtZQQAAAAGbGFiZWxzCQAEtQAAAAIFAAAABG5hbWUCAAAAAS4EAAAACWxhc3RJbmRleAkAAGUAAAACCQABkAAAAAEFAAAABmxhYmVscwAAAAAAAAAAAQQAAAAJbGFzdExhYmVsCQABkQAAAAIFAAAABmxhYmVscwUAAAAJbGFzdEluZGV4BAAAAApyZXN0TGFiZWxzCQAEuQAAAAIJAARRAAAAAgUAAAAGbGFiZWxzBQAAAAlsYXN0SW5kZXgCAAAAAS4JAAUUAAAAAgUAAAAJbGFzdExhYmVsBQAAAApyZXN0TGFiZWxzAQAAABtfc3VwcG9ydGVkSW50ZXJmYWNlQXNTdHJpbmcAAAADAAAACnJlZ2lzdHJhbnQAAAALaW50ZXJmYWNlSWQAAAAKcmVzdExhYmVscwQAAAAHJG1hdGNoMAkAA/wAAAAEBQAAAApyZWdpc3RyYW50AgAAABFzdXBwb3J0c0ludGVyZmFjZQkABEwAAAACBQAAAAtpbnRlcmZhY2VJZAUAAAADbmlsBQAAAANuaWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAAEXN1cHBvcnRzSW50ZXJmYWNlBQAAAAckbWF0Y2gwAwkBAAAAASEAAAABBQAAABFzdXBwb3J0c0ludGVyZmFjZQUAAAAEdW5pdAQAAAAHJG1hdGNoMQkAA/wAAAAECQEAAAAFdmFsdWUAAAABBQAAAApyZWdpc3RyYW50BQAAAAtpbnRlcmZhY2VJZAkABEwAAAACBQAAAApyZXN0TGFiZWxzBQAAAANuaWwFAAAAA25pbAMJAAABAAAAAgUAAAAHJG1hdGNoMQIAAAAGU3RyaW5nBAAAAAttYXlCZVN0cmluZwUAAAAHJG1hdGNoMQUAAAALbWF5QmVTdHJpbmcFAAAABHVuaXQFAAAABHVuaXQBAAAAGF9zdXBwb3J0ZWRJbnRlcmZhY2VBc0ludAAAAAMAAAAKcmVnaXN0cmFudAAAAAtpbnRlcmZhY2VJZAAAAApyZXN0TGFiZWxzBAAAAAckbWF0Y2gwCQAD/AAAAAQFAAAACnJlZ2lzdHJhbnQCAAAAEXN1cHBvcnRzSW50ZXJmYWNlCQAETAAAAAIFAAAAC2ludGVyZmFjZUlkBQAAAANuaWwFAAAAA25pbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAHQm9vbGVhbgQAAAARc3VwcG9ydHNJbnRlcmZhY2UFAAAAByRtYXRjaDADCQEAAAABIQAAAAEFAAAAEXN1cHBvcnRzSW50ZXJmYWNlBQAAAAR1bml0BAAAAAckbWF0Y2gxCQAD/AAAAAQJAQAAAAV2YWx1ZQAAAAEFAAAACnJlZ2lzdHJhbnQFAAAAC2ludGVyZmFjZUlkCQAETAAAAAIFAAAACnJlc3RMYWJlbHMFAAAAA25pbAUAAAADbmlsAwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAAANJbnQEAAAACG1heUJlSW50BQAAAAckbWF0Y2gxBQAAAAhtYXlCZUludAUAAAAEdW5pdAUAAAAEdW5pdAEAAAAJbW9kaWZpZXJzAAAAAQAAAAt2YWxpZGF0aW9ucwUAAAAEdW5pdAEAAAAJb25seUFkbWluAAAAAQAAAANpbnYDCQEAAAAHaXNBZG1pbgAAAAEFAAAAA2ludgUAAAAEdW5pdAkAAAIAAAABAgAAABFQZXJtaXNzaW9uIGRlbmllZAEAAAAJb25seU93bmVyAAAAAgAAAANpbnYAAAAEbm9kZQMDCQEAAAAHaXNBZG1pbgAAAAEFAAAAA2ludgYJAQAAAAdpc093bmVyAAAAAgUAAAADaW52BQAAAARub2RlBQAAAAR1bml0CQAAAgAAAAECAAAAEVBlcm1pc3Npb24gZGVuaWVkAQAAAAx2YWxpZEFkZHJlc3MAAAABAAAAB2FkZHJlc3MDCQEAAAAJaXNEZWZpbmVkAAAAAQkABCYAAAABBQAAAAdhZGRyZXNzBQAAAAR1bml0CQAAAgAAAAECAAAAGVRoZSBhZGRyZXNzIG11c3QgYmUgdmFsaWQAAAAHAAAAA2ludgEAAAAIc2V0T3duZXIAAAACAAAABG5vZGUAAAAFb3duZXIJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAAAltb2RpZmllcnMAAAABCQAETAAAAAIJAQAAAAlvbmx5T3duZXIAAAACBQAAAANpbnYFAAAABG5vZGUJAARMAAAAAgkBAAAADHZhbGlkQWRkcmVzcwAAAAEFAAAABW93bmVyBQAAAANuaWwJAQAAAAlfc2V0T3duZXIAAAACBQAAAARub2RlBQAAAAVvd25lcgAAAANpbnYBAAAABW93bmVyAAAAAQAAAARub2RlCQAFFAAAAAIFAAAAA25pbAkBAAAACV9nZXRPd25lcgAAAAEFAAAABG5vZGUAAAADaW52AQAAAAtzZXRSZXNvbHZlcgAAAAIAAAAEbm9kZQAAAAhyZXNvbHZlcgkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkBAAAACW1vZGlmaWVycwAAAAEJAARMAAAAAgkBAAAACW9ubHlPd25lcgAAAAIFAAAAA2ludgUAAAAEbm9kZQkABEwAAAACCQEAAAAMdmFsaWRBZGRyZXNzAAAAAQUAAAAIcmVzb2x2ZXIFAAAAA25pbAkBAAAADF9zZXRSZXNvbHZlcgAAAAIFAAAABG5vZGUFAAAACHJlc29sdmVyAAAAA2ludgEAAAAIcmVzb2x2ZXIAAAABAAAABG5vZGUJAAUUAAAAAgUAAAADbmlsCQEAAAAMX2dldFJlc29sdmVyAAAAAQUAAAAEbm9kZQAAAANpbnYBAAAAC25hbWVDcmVhdGVkAAAAAQAAAARub2RlCQAFFAAAAAIFAAAAA25pbAkBAAAADV9nZXRDcmVhdGVkQXQAAAABBQAAAARub2RlAAAAA2ludgEAAAAJc2V0UmVjb3JkAAAAAwAAAARub2RlAAAABW93bmVyAAAACHJlc29sdmVyCQEAAAALdmFsdWVPckVsc2UAAAACCQEAAAAJbW9kaWZpZXJzAAAAAQkABEwAAAACCQEAAAAJb25seUFkbWluAAAAAQUAAAADaW52BQAAAANuaWwJAAROAAAAAgkABE4AAAACCQEAAAAJX3NldE93bmVyAAAAAgUAAAAEbm9kZQUAAAAFb3duZXIJAQAAAAxfc2V0UmVzb2x2ZXIAAAACBQAAAARub2RlBQAAAAhyZXNvbHZlcgkBAAAADV9zZXRDcmVhdGVkQXQAAAACBQAAAARub2RlCAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAAAAANpbnYBAAAABXdob0lzAAAAAQAAAARuYW1lCQEAAAALdmFsdWVPckVsc2UAAAACCQEAAAAJbW9kaWZpZXJzAAAAAQkABEwAAAACAwkAAGYAAAACCQABMQAAAAEFAAAABG5hbWUAAAAAAAAAAAAFAAAABHVuaXQJAAACAAAAAQIAAAAUTmFtZSBjYW5ub3QgYmUgZW1wdHkFAAAAA25pbAQAAAALJHQwNDYzMDQ2ODEJAQAAAA9fc3BsaXRMYXN0TGFiZWwAAAABBQAAAARuYW1lBAAAAAlsYXN0TGFiZWwIBQAAAAskdDA0NjMwNDY4MQAAAAJfMQQAAAAKcmVzdExhYmVscwgFAAAACyR0MDQ2MzA0NjgxAAAAAl8yBAAAABFyZWdpc3RyYW50QWRkcmVzcwkBAAAACV9nZXRPd25lcgAAAAEFAAAACWxhc3RMYWJlbAQAAAAKcmVnaXN0cmFudAQAAAAHJG1hdGNoMAUAAAARcmVnaXN0cmFudEFkZHJlc3MDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAFb3duZXIFAAAAByRtYXRjaDAJAAQmAAAAAQUAAAAFb3duZXIFAAAABHVuaXQEAAAADnBhcmVudFJlc29sdmVyCQEAAAAMX2dldFJlc29sdmVyAAAAAQUAAAAJbGFzdExhYmVsBAAAAA1wYXJlbnRDcmVhdGVkCQEAAAANX2dldENyZWF0ZWRBdAAAAAEFAAAACWxhc3RMYWJlbAQAAAAFb3duZXIJAQAAABtfc3VwcG9ydGVkSW50ZXJmYWNlQXNTdHJpbmcAAAADCQEAAAAFdmFsdWUAAAABBQAAAApyZWdpc3RyYW50AgAAAAVvd25lcgUAAAAKcmVzdExhYmVscwQAAAAIcmVzb2x2ZXIJAQAAABtfc3VwcG9ydGVkSW50ZXJmYWNlQXNTdHJpbmcAAAADCQEAAAAFdmFsdWUAAAABBQAAAApyZWdpc3RyYW50AgAAAAhyZXNvbHZlcgUAAAAKcmVzdExhYmVscwQAAAALbmFtZUNyZWF0ZWQJAQAAABhfc3VwcG9ydGVkSW50ZXJmYWNlQXNJbnQAAAADCQEAAAAFdmFsdWUAAAABBQAAAApyZWdpc3RyYW50AgAAAAtuYW1lQ3JlYXRlZAUAAAAKcmVzdExhYmVscwQAAAALbmFtZUV4cGlyZXMJAQAAABhfc3VwcG9ydGVkSW50ZXJmYWNlQXNJbnQAAAADCQEAAAAFdmFsdWUAAAABBQAAAApyZWdpc3RyYW50AgAAAAtuYW1lRXhwaXJlcwUAAAAKcmVzdExhYmVscwQAAAAKaXNSb290TmFtZQMJAABmAAAAAgkAATEAAAABBQAAAAlsYXN0TGFiZWwAAAAAAAAAAAAJAAAAAAAAAgkAATEAAAABBQAAAApyZXN0TGFiZWxzAAAAAAAAAAAABwMDBQAAAAppc1Jvb3ROYW1lBgkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAAKcmVnaXN0cmFudAkABRQAAAACBQAAAANuaWwJAAUWAAAABAUAAAARcmVnaXN0cmFudEFkZHJlc3MFAAAADnBhcmVudFJlc29sdmVyBQAAAA1wYXJlbnRDcmVhdGVkBQAAAAR1bml0CQAFFAAAAAIFAAAAA25pbAkABRYAAAAEBAAAAAckbWF0Y2gwBQAAAAVvd25lcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAVvd25lcgUAAAAHJG1hdGNoMAUAAAAFb3duZXIFAAAAEXJlZ2lzdHJhbnRBZGRyZXNzBAAAAAckbWF0Y2gwBQAAAAhyZXNvbHZlcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAhyZXNvbHZlcgUAAAAHJG1hdGNoMAUAAAAIcmVzb2x2ZXIFAAAADnBhcmVudFJlc29sdmVyBAAAAAckbWF0Y2gwBQAAAAtuYW1lQ3JlYXRlZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAtuYW1lQ3JlYXRlZAUAAAAHJG1hdGNoMAUAAAALbmFtZUNyZWF0ZWQFAAAADXBhcmVudENyZWF0ZWQFAAAAC25hbWVFeHBpcmVzAAAAAJ6vnUI=",
    "height": 2273202,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CdzFFy7Pjmgb7jj5GCzknGoAqecURz7aT797X5uWZCFy
Next: CJs8mboFZ1HQHrG5981o9wLSwiUMzz9oAua3zALbzTQK

Diff: 
Old
New
Differences
55
55
 
    }
56
56
 
57
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
-
    }
58
+
func _supportedInterfaceAsString (registrant,interfaceId,restLabels) = match invoke(registrant, "supportsInterface", [interfaceId], nil) {
59
+
    case supportsInterface: Boolean => 
60
+
        if (!(supportsInterface))
61
+
            then unit
62
+
            else             match invoke(value(registrant), interfaceId, [restLabels], nil) {
63
+
                case mayBeString: String => 
64
+
                    mayBeString
65
+
                case _ => 
66
+
                    unit
67
+
            }
68
+
    case _ => 
69
+
        unit
70
+
}
71
+
72
+
73
+
func _supportedInterfaceAsInt (registrant,interfaceId,restLabels) = match invoke(registrant, "supportsInterface", [interfaceId], nil) {
74
+
    case supportsInterface: Boolean => 
75
+
        if (!(supportsInterface))
76
+
            then unit
77
+
            else             match invoke(value(registrant), interfaceId, [restLabels], nil) {
78
+
                case mayBeInt: Int => 
79
+
                    mayBeInt
80
+
                case _ => 
81
+
                    unit
82
+
            }
83
+
    case _ => 
84
+
        unit
85
+
}
69
86
 
70
87
 
71
88
 
func modifiers (validations) = unit
122
139
 
func whoIs (name) = valueOrElse(modifiers([if ((size(name) > 0))
123
140
 
    then unit
124
141
 
    else throw("Name cannot be empty")]), {
125
-
    let $t040804131 = _splitLastLabel(name)
126
-
    let lastLabel = $t040804131._1
127
-
    let restLabels = $t040804131._2
142
+
    let $t046304681 = _splitLastLabel(name)
143
+
    let lastLabel = $t046304681._1
144
+
    let restLabels = $t046304681._2
128
145
 
    let registrantAddress = _getOwner(lastLabel)
129
146
 
    let registrant =     match registrantAddress {
130
147
 
        case owner: String => 
132
149
 
        case _ => 
133
150
 
            unit
134
151
 
    }
135
-
    let resolver = _getResolver(lastLabel)
136
-
    let nameCreated = _getCreatedAt(lastLabel)
137
-
    let parentInfo = $Tuple4(registrantAddress, resolver, nameCreated, unit)
152
+
    let parentResolver = _getResolver(lastLabel)
153
+
    let parentCreated = _getCreatedAt(lastLabel)
154
+
    let owner = _supportedInterfaceAsString(value(registrant), "owner", restLabels)
155
+
    let resolver = _supportedInterfaceAsString(value(registrant), "resolver", restLabels)
156
+
    let nameCreated = _supportedInterfaceAsInt(value(registrant), "nameCreated", restLabels)
157
+
    let nameExpires = _supportedInterfaceAsInt(value(registrant), "nameExpires", restLabels)
138
158
 
    let isRootName = if ((size(lastLabel) > 0))
139
159
 
        then (size(restLabels) == 0)
140
160
 
        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)
161
+
    if (if (isRootName)
148
162
 
        then true
149
163
 
        else !(isDefined(registrant)))
150
-
        then true
151
-
        else !(supportsInterface))
152
-
        then $Tuple2(nil, parentInfo)
153
-
        else         match invoke(value(registrant), "whoIs", [value(restLabels)], nil) {
164
+
        then $Tuple2(nil, $Tuple4(registrantAddress, parentResolver, parentCreated, unit))
165
+
        else $Tuple2(nil, $Tuple4(        match owner {
166
+
            case owner: String => 
167
+
                owner
154
168
 
            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
-
        }
169
+
                registrantAddress
170
+
        },         match resolver {
171
+
            case resolver: String => 
172
+
                resolver
173
+
            case _ => 
174
+
                parentResolver
175
+
        },         match nameCreated {
176
+
            case nameCreated: Int => 
177
+
                nameCreated
178
+
            case _ => 
179
+
                parentCreated
180
+
        }, nameExpires))
211
181
 
    })
212
182
 
213
183
 

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
46
 
func isOwner (inv,node) = (toString(inv.caller) == valueOrElse(_getOwner(node), ""))
47
47
 
48
48
 
49
49
 
func _splitLastLabel (name) = {
50
50
 
    let labels = split(name, ".")
51
51
 
    let lastIndex = (size(labels) - 1)
52
52
 
    let lastLabel = labels[lastIndex]
53
53
 
    let restLabels = makeString(removeByIndex(labels, lastIndex), ".")
54
54
 
    $Tuple2(lastLabel, restLabels)
55
55
 
    }
56
56
 
57
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
-
    }
58
+
func _supportedInterfaceAsString (registrant,interfaceId,restLabels) = match invoke(registrant, "supportsInterface", [interfaceId], nil) {
59
+
    case supportsInterface: Boolean => 
60
+
        if (!(supportsInterface))
61
+
            then unit
62
+
            else             match invoke(value(registrant), interfaceId, [restLabels], nil) {
63
+
                case mayBeString: String => 
64
+
                    mayBeString
65
+
                case _ => 
66
+
                    unit
67
+
            }
68
+
    case _ => 
69
+
        unit
70
+
}
71
+
72
+
73
+
func _supportedInterfaceAsInt (registrant,interfaceId,restLabels) = match invoke(registrant, "supportsInterface", [interfaceId], nil) {
74
+
    case supportsInterface: Boolean => 
75
+
        if (!(supportsInterface))
76
+
            then unit
77
+
            else             match invoke(value(registrant), interfaceId, [restLabels], nil) {
78
+
                case mayBeInt: Int => 
79
+
                    mayBeInt
80
+
                case _ => 
81
+
                    unit
82
+
            }
83
+
    case _ => 
84
+
        unit
85
+
}
69
86
 
70
87
 
71
88
 
func modifiers (validations) = unit
72
89
 
73
90
 
74
91
 
func onlyAdmin (inv) = if (isAdmin(inv))
75
92
 
    then unit
76
93
 
    else throw("Permission denied")
77
94
 
78
95
 
79
96
 
func onlyOwner (inv,node) = if (if (isAdmin(inv))
80
97
 
    then true
81
98
 
    else isOwner(inv, node))
82
99
 
    then unit
83
100
 
    else throw("Permission denied")
84
101
 
85
102
 
86
103
 
func validAddress (address) = if (isDefined(addressFromString(address)))
87
104
 
    then unit
88
105
 
    else throw("The address must be valid")
89
106
 
90
107
 
91
108
 
@Callable(inv)
92
109
 
func setOwner (node,owner) = valueOrElse(modifiers([onlyOwner(inv, node), validAddress(owner)]), _setOwner(node, owner))
93
110
 
94
111
 
95
112
 
96
113
 
@Callable(inv)
97
114
 
func owner (node) = $Tuple2(nil, _getOwner(node))
98
115
 
99
116
 
100
117
 
101
118
 
@Callable(inv)
102
119
 
func setResolver (node,resolver) = valueOrElse(modifiers([onlyOwner(inv, node), validAddress(resolver)]), _setResolver(node, resolver))
103
120
 
104
121
 
105
122
 
106
123
 
@Callable(inv)
107
124
 
func resolver (node) = $Tuple2(nil, _getResolver(node))
108
125
 
109
126
 
110
127
 
111
128
 
@Callable(inv)
112
129
 
func nameCreated (node) = $Tuple2(nil, _getCreatedAt(node))
113
130
 
114
131
 
115
132
 
116
133
 
@Callable(inv)
117
134
 
func setRecord (node,owner,resolver) = valueOrElse(modifiers([onlyAdmin(inv)]), ((_setOwner(node, owner) ++ _setResolver(node, resolver)) ++ _setCreatedAt(node, lastBlock.timestamp)))
118
135
 
119
136
 
120
137
 
121
138
 
@Callable(inv)
122
139
 
func whoIs (name) = valueOrElse(modifiers([if ((size(name) > 0))
123
140
 
    then unit
124
141
 
    else throw("Name cannot be empty")]), {
125
-
    let $t040804131 = _splitLastLabel(name)
126
-
    let lastLabel = $t040804131._1
127
-
    let restLabels = $t040804131._2
142
+
    let $t046304681 = _splitLastLabel(name)
143
+
    let lastLabel = $t046304681._1
144
+
    let restLabels = $t046304681._2
128
145
 
    let registrantAddress = _getOwner(lastLabel)
129
146
 
    let registrant =     match registrantAddress {
130
147
 
        case owner: String => 
131
148
 
            addressFromString(owner)
132
149
 
        case _ => 
133
150
 
            unit
134
151
 
    }
135
-
    let resolver = _getResolver(lastLabel)
136
-
    let nameCreated = _getCreatedAt(lastLabel)
137
-
    let parentInfo = $Tuple4(registrantAddress, resolver, nameCreated, unit)
152
+
    let parentResolver = _getResolver(lastLabel)
153
+
    let parentCreated = _getCreatedAt(lastLabel)
154
+
    let owner = _supportedInterfaceAsString(value(registrant), "owner", restLabels)
155
+
    let resolver = _supportedInterfaceAsString(value(registrant), "resolver", restLabels)
156
+
    let nameCreated = _supportedInterfaceAsInt(value(registrant), "nameCreated", restLabels)
157
+
    let nameExpires = _supportedInterfaceAsInt(value(registrant), "nameExpires", restLabels)
138
158
 
    let isRootName = if ((size(lastLabel) > 0))
139
159
 
        then (size(restLabels) == 0)
140
160
 
        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)
161
+
    if (if (isRootName)
148
162
 
        then true
149
163
 
        else !(isDefined(registrant)))
150
-
        then true
151
-
        else !(supportsInterface))
152
-
        then $Tuple2(nil, parentInfo)
153
-
        else         match invoke(value(registrant), "whoIs", [value(restLabels)], nil) {
164
+
        then $Tuple2(nil, $Tuple4(registrantAddress, parentResolver, parentCreated, unit))
165
+
        else $Tuple2(nil, $Tuple4(        match owner {
166
+
            case owner: String => 
167
+
                owner
154
168
 
            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
-
        }
169
+
                registrantAddress
170
+
        },         match resolver {
171
+
            case resolver: String => 
172
+
                resolver
173
+
            case _ => 
174
+
                parentResolver
175
+
        },         match nameCreated {
176
+
            case nameCreated: Int => 
177
+
                nameCreated
178
+
            case _ => 
179
+
                parentCreated
180
+
        }, nameExpires))
211
181
 
    })
212
182
 
213
183
 

github/deemru/w8io/026f985 
52.18 ms ◑