tx · 2EfemRi1h8RaBtTQSVuBZ2pWyGAfxZuxcmpUayZFgcCB

3NCHZceE1Qs5xXZtf6oQhrVVVA9CG9cFnUj:  -0.01400000 Waves

2019.08.28 12:59 [650904] smart account 3NCHZceE1Qs5xXZtf6oQhrVVVA9CG9cFnUj > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2EfemRi1h8RaBtTQSVuBZ2pWyGAfxZuxcmpUayZFgcCB",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1566986360503,
    "version": 1,
    "sender": "3NCHZceE1Qs5xXZtf6oQhrVVVA9CG9cFnUj",
    "senderPublicKey": "39jAZ32wKiztAL3eqEu4TRRtGFfQGiGUVRH1yo8knXQa",
    "proofs": [
        "UDns2gaUZ8bD8hpGra2jsWVK5PHx8oQ47zn2gGL2rbYrKwRwqM6EQP6toijWvhMmdY6zzPK5hwvyA8uNRiL7b7d"
    ],
    "script": "base64:AwQAAAAHUHViS2V5MQEAAAAgaQxxSAhSITOlMYdvwKcfK7u/x0yzOg/68EH0ax0QlWUEAAAAB1B1YktleTIBAAAAILb58FcZXTIbjEshMW6ayDB2XcNop87YatlbtNE8j6N0BAAAAARzaWcxAwkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAB1B1YktleTEAAAAAAAAAAAEAAAAAAAAAAAAEAAAABHNpZzIDCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQUAAAAHUHViS2V5MgAAAAAAAAAAAQAAAAAAAAAAAAkAAGYAAAACCQAAZAAAAAIFAAAABHNpZzEFAAAABHNpZzIAAAAAAAAAAADO+UOI",
    "chainId": 84,
    "height": 650904,
    "spentComplexity": 0
}

View: original | compacted
Prev: 5hk7mcYWGzB6ME5y2n84n8MWxXRWmLsNWHPAhhTUmTRf
Next: G64SUdw6B1c5wjVKAJNeswvF4KwWfrMkua35Bmx1Sgw7

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
2-{-# SCRIPT_TYPE ACCOUNT #-}
3-{-# CONTENT_TYPE DAPP #-}
4-let RSAPUBLIC = fromBase64String("base64:MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAqlAiANSmBpDHYKP9sKgeN/l1bAb28g/tGlgDkwT5FiMN4X3pwdvdxE7mvSR8/41dU9rx4jG+6tZpb1ULVDPs431tR2IRaTXw5Cj+Ac2vhL+5JamCerGD1UW+bh/EGQtxo8W3YLDrofXB5QHJx4Pkz2Kgf+oS/C8hHuB/U4krO76U0507GTjZPP9kRQ0uLSMeqQXt8wXS+nMp5wajqxPpDLMaSREgsKwv/AEkP4dzpTYbikLBYl4qtdJsD84HLFSkiwd3BhcOrPjoIYmLxQuBD5TIMKTKD3sdZgaY9rsyqx3A00innyxD6zp3b4gFpUOX8JxKZdEC2myEqleNgg7GzwIDAQAB")
5-
6-let SERVER = addressFromStringValue("3NCiG28LmWyTigWG13E5QnvdHBsZFYXSS2j")
7-
8-let WAVELET = ((100 * 1000) * 1000)
9-
10-let SESSIONIDFIXSIZE = 44
11-
12-let RANDCYCLEPRICE = ((5 * WAVELET) / 1000)
13-
14-let MAXRANDSPERCYCLE = 14
15-
16-let STATEINIT = "INIT"
17-
18-let DATADONE = "READY"
19-
20-let STATEFINISHED = "FINISHED"
21-
22-let IdxState = 0
23-
24-let IdxOrganizerPub = 1
25-
26-let IdxRandFrom = 2
27-
28-let IdxRandTo = 3
29-
30-let IdxRandsCount = 4
31-
32-let IdxRemainRandsCount = 5
33-
34-let IdxDataKeysCount = 6
35-
36-let IdxDataDoneTxId = 7
37-
38-let IdxLastOffset = 8
39-
40-let IdxCurrRands = 13
41-
42-func abs (val) = if ((0 > val))
43-    then -(val)
44-    else val
45-
46-
47-func formatStateDataStr (drawState,organizerPubKey58,randFrom,randTo,randsCount,remainingRands,dataKeysCount,dataDoneTxId,lastOffset,slowIdx1,slowIdx2,fastIdx1,fastIdx2,randOrEmpty) = {
48-    let fullStateStr = ((((((((((((((((((((((((drawState + "_") + organizerPubKey58) + "_") + randFrom) + "_") + randTo) + "_") + randsCount) + "_") + remainingRands) + "_") + dataKeysCount) + "_") + dataDoneTxId) + "_") + lastOffset) + "_") + slowIdx1) + "_") + slowIdx2) + "_") + fastIdx1) + "_") + fastIdx2)
49-    if ((randOrEmpty == ""))
50-        then ((fullStateStr + "_") + "-")
51-        else ((fullStateStr + "_") + randOrEmpty)
52-    }
53-
54-
55-func extractGameDataList (sessionId) = {
56-    let rawDataStr = getStringValue(this, sessionId)
57-    split(rawDataStr, "_")
58-    }
59-
60-
61-func nextRand (div,min,currRandsStr,remainingRands,remainingHash) = {
62-    let nextRandInt = ((abs(toInt(remainingHash)) % div) + min)
63-    let nextRandStr = toString(nextRandInt)
64-    let duplicate = isDefined(indexOf(currRandsStr, nextRandStr))
65-    if (if (!(duplicate))
66-        then (remainingRands > 0)
67-        else false)
68-        then [((currRandsStr + "-") + nextRandStr), "yes"]
69-        else [currRandsStr, ""]
70-    }
71-
72-
73-func generateRand (sessionId,from,to,rsaSign,currRandsStr,remainingRands,lastOffsetBytes,currSlowIdx1,currSlowIdx2,currFastIdx1,currFastIdx2) = {
74-    let newIncList = if (((lastOffsetBytes + 1) > 87))
75-        then if ((currFastIdx2 > 241))
76-            then [0, (currSlowIdx1 + 1), (currSlowIdx2 + 1), 0, 1]
77-            else [0, currSlowIdx1, currSlowIdx2, (currFastIdx1 + 1), (currFastIdx2 + 1)]
78-        else [(lastOffsetBytes + 1), currSlowIdx1, currSlowIdx2, currFastIdx1, currFastIdx2]
79-    let newOffsetBytes = newIncList[0]
80-    let newSlowIdx1 = newIncList[1]
81-    let newSlowIdx2 = newIncList[2]
82-    let newFastIdx1 = newIncList[3]
83-    let newFastIdx2 = newIncList[4]
84-    let byteVect = (((((((take(drop(rsaSign, newSlowIdx1), 1) + take(drop(rsaSign, 1), 1)) + take(drop(rsaSign, newFastIdx1), 1)) + take(drop(rsaSign, 3), 1)) + take(drop(rsaSign, newSlowIdx2), 1)) + take(drop(rsaSign, 5), 1)) + take(drop(rsaSign, 6), 1)) + take(drop(rsaSign, newFastIdx2), 1))
85-    let randHash = ((sha256(byteVect) + blake2b256(byteVect)) + keccak256(byteVect))
86-    let div = ((to - from) + 1)
87-    let rand1 = nextRand(div, from, currRandsStr, remainingRands, drop(randHash, newOffsetBytes))
88-    let rem1 = if ((rand1[1] != ""))
89-        then (remainingRands - 1)
90-        else remainingRands
91-    let rand2 = nextRand(div, from, rand1[0], rem1, drop(randHash, (newOffsetBytes + 1)))
92-    let rem2 = if ((rand2[1] != ""))
93-        then (rem1 - 1)
94-        else rem1
95-    let rand3 = nextRand(div, from, rand2[0], rem2, drop(randHash, (newOffsetBytes + 2)))
96-    let rem3 = if ((rand3[1] != ""))
97-        then (rem2 - 1)
98-        else rem2
99-    let rand4 = nextRand(div, from, rand3[0], rem3, drop(randHash, (newOffsetBytes + 3)))
100-    let rem4 = if ((rand4[1] != ""))
101-        then (rem3 - 1)
102-        else rem3
103-    let rand5 = nextRand(div, from, rand4[0], rem4, drop(randHash, (newOffsetBytes + 4)))
104-    let rem5 = if ((rand5[1] != ""))
105-        then (rem4 - 1)
106-        else rem4
107-    let rand6 = nextRand(div, from, rand5[0], rem5, drop(randHash, (newOffsetBytes + 5)))
108-    let rem6 = if ((rand6[1] != ""))
109-        then (rem5 - 1)
110-        else rem5
111-    let rand7 = nextRand(div, from, rand6[0], rem6, drop(randHash, (newOffsetBytes + 6)))
112-    let rem7 = if ((rand7[1] != ""))
113-        then (rem6 - 1)
114-        else rem6
115-    let rand8 = nextRand(div, from, rand7[0], rem7, drop(randHash, (newOffsetBytes + 7)))
116-    let rem8 = if ((rand8[1] != ""))
117-        then (rem7 - 1)
118-        else rem7
119-    let rand9 = nextRand(div, from, rand8[0], rem8, drop(randHash, (newOffsetBytes + 8)))
120-    let rem9 = if ((rand9[1] != ""))
121-        then (rem8 - 1)
122-        else rem8
123-    let rand10 = nextRand(div, from, rand9[0], rem9, drop(randHash, (newOffsetBytes + 9)))
124-    let rem10 = if ((rand10[1] != ""))
125-        then (rem9 - 1)
126-        else rem9
127-    let rand11 = nextRand(div, from, rand10[0], rem10, drop(randHash, (newOffsetBytes + 10)))
128-    let rem11 = if ((rand11[1] != ""))
129-        then (rem10 - 1)
130-        else rem10
131-[rand11[0], if ((rem11 == 0))
132-        then "0"
133-        else toString(rem11), toString((newOffsetBytes + 10)), toString(newSlowIdx1), toString(newSlowIdx2), toString(newFastIdx1), toString(newFastIdx2)]
134-    }
135-
136-
137-func validateDtxKey (sessionId,dataKeysCount,data) = {
138-    let dataKeyInfo = split(data.key, "_")
139-    if ((size(dataKeyInfo) != 2))
140-        then throw("Invalid data key format. It must follow to ${sessionId}_${num}")
141-        else {
142-            let keySessionId = dataKeyInfo[0]
143-            let keyPostfix = dataKeyInfo[1]
144-            if ((sessionId != keySessionId))
145-                then throw(((("Several data keys have different sessionId: " + sessionId) + " and ") + keySessionId))
146-                else if (isDefined(getString(this, data.key)))
147-                    then throw(("One of the data keys has already presented in account state: key=" + data.key))
148-                    else if ((size(keyPostfix) > 4))
149-                        then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} length couldn't be greater than 4")
150-                        else if ((take(keyPostfix, 1) == "0"))
151-                            then throw("Invalid data key format. It must follow to ${sessionId}_${num} where ${num} couldn't start from 0")
152-                            else {
153-                                let keyPostfixIntOpt = parseInt(keyPostfix)
154-                                if (isDefined(keyPostfixIntOpt))
155-                                    then {
156-                                        let keyPostfixInt = extract(keyPostfixIntOpt)
157-                                        if (if ((1 > keyPostfixInt))
158-                                            then true
159-                                            else (keyPostfixInt > dataKeysCount))
160-                                            then throw((((("Invalid data key format. It must follow to ${sessionId}_${num}" + " where ${num} must be a valid int value from 1 to ") + toString(dataKeysCount)) + " but actualNum=") + toString(keyPostfixInt)))
161-                                            else                                             match data.value {
162-                                                case str: String => 
163-                                                    true
164-                                                case _ => 
165-                                                    throw((sessionId + " draw: only String type is accepted for data transactions"))
166-                                            }
167-                                        }
168-                                    else throw((("Invalid data key format. It must follow to ${sessionId}_${num}" + " where ${num} must be a valid int value from 1 to 7145 but actualNum=") + keyPostfix))
169-                                }
170-            }
171-    }
172-
173-
174-func validateAndGetRandsPmt (randsCount,pmt,minDataPmt) = {
175-    let bound1 = 1000
176-    let basePrice1 = ((13 * WAVELET) / 100)
177-    let div1 = 50
178-    let diff1 = ((8 * WAVELET) / 100)
179-    let bound2 = 5000
180-    let basePrice2 = ((297 * WAVELET) / 100)
181-    let div2 = 1000
182-    let diff2 = ((143 * WAVELET) / 100)
183-    let bound3 = 50000
184-    let basePrice3 = ((1427 * WAVELET) / 100)
185-    let div3 = 5000
186-    let diff3 = ((705 * WAVELET) / 100)
187-    let minRandsPmt = if ((bound1 > randsCount))
188-        then (basePrice1 + ((randsCount / div1) * diff1))
189-        else if ((bound2 > randsCount))
190-            then (basePrice2 + (((randsCount / div2) - 1) * diff2))
191-            else if ((bound3 > randsCount))
192-                then (basePrice3 + (((randsCount / div3) - 1) * diff3))
193-                else throw("Please contact our sales team to generate more than 50k rands")
194-    let minPmt = (minRandsPmt + minDataPmt)
195-    if (isDefined(pmt.assetId))
196-        then throw("Only WAVES can be used as a payment for rands generation")
197-        else if ((minPmt > pmt.amount))
198-            then throw(((((("Attached payment is to small to generate " + toString(randsCount)) + " unique randoms numbers and upload at least 1 data tx: actualPmt=") + toString(pmt.amount)) + " but minPmt is ") + toString(minPmt)))
199-            else minRandsPmt
200-    }
201-
202-
203-@Callable(i)
204-func initDraw (randFrom,randTo,randsCount) = {
205-    let sessionId = toBase58String(i.transactionId)
206-    let rangeLength = ((randTo - randFrom) + 1)
207-    let maxRangeLength = (rangeLength / 2)
208-    let randToLen = size(toString((randTo - 1)))
209-    let randsCountLen = size(toString(randsCount))
210-    let dynamicStatusLen = (((2 * randToLen) + (2 * randsCountLen)) + 4)
211-    let maxRandsCount = (((32767 - 126) - dynamicStatusLen) / (randToLen + 1))
212-    if (if ((0 >= randFrom))
213-        then true
214-        else (0 >= randTo))
215-        then throw("randFrom and randTo must be greater than 0")
216-        else if ((randFrom >= randTo))
217-            then throw("randFrom must be strict less then randTo")
218-            else if ((randsCount > rangeLength))
219-                then throw(((((((("Impossible to generate " + toString(randsCount)) + " unique numbers for provided random range [") + toString(randFrom)) + ", ") + toString(randTo)) + "] with actual size ") + toString(rangeLength)))
220-                else if ((randsCount > maxRangeLength))
221-                    then throw(((((((((("randsCount must be less then 50% of passed range length: range=[" + toString(randFrom)) + ", ") + toString(randTo)) + "], rangeLength=") + toString(rangeLength)) + " randsCount=") + toString(randsCount)) + " allowedRandsCount=") + toString(maxRangeLength)))
222-                    else if ((randsCount > maxRandsCount))
223-                        then throw(((((("randsCount couldn't be kept in 1 data entry: 1_randNumSpace=" + toString((randToLen + 1))) + " maxAllowedRandsCount=") + toString(maxRandsCount)) + " actualRandsCount=") + toString(randsCount)))
224-                        else if (!(isDefined(i.payment)))
225-                            then throw("Please provide payment to generate unique random numbers")
226-                            else {
227-                                let pmt = extract(i.payment)
228-                                let minDataPmt = ((5 * WAVELET) / 1000)
229-                                let randsPmt = validateAndGetRandsPmt(randsCount, pmt, minDataPmt)
230-                                let dataPmt = (pmt.amount - randsPmt)
231-                                let dataTxCount = (dataPmt / minDataPmt)
232-                                let dataKeysCount = (dataTxCount * 5)
233-                                let organizerPubKey58 = toBase58String(i.callerPublicKey)
234-                                let randsCountStr = toString(randsCount)
235-                                let initState = formatStateDataStr(STATEINIT, organizerPubKey58, toString(randFrom), toString(randTo), randsCountStr, randsCountStr, toString(dataKeysCount), "null", "0", "0", "1", "0", "1", "")
236-                                ScriptResult(WriteSet([DataEntry(sessionId, initState)]), TransferSet([ScriptTransfer(SERVER, randsPmt, unit)]))
237-                                }
238-    }
239-
240-
241-
242-@Callable(i)
243-func ready (sessionId) = {
244-    let drawParamsList = extractGameDataList(sessionId)
245-    let drawState = drawParamsList[IdxState]
246-    let organizerPubKey58 = drawParamsList[IdxOrganizerPub]
247-    let randsCountStr = drawParamsList[IdxRandsCount]
248-    let remainRandsCountStr = drawParamsList[IdxRemainRandsCount]
249-    let fromStr = drawParamsList[IdxRandFrom]
250-    let toStr = drawParamsList[IdxRandTo]
251-    let dataKeysCount = drawParamsList[IdxDataKeysCount]
252-    let organizerPubKey = fromBase58String(organizerPubKey58)
253-    if ((drawState != STATEINIT))
254-        then throw((sessionId + " draw: moving into READY state is allowed only from INIT state"))
255-        else if ((organizerPubKey != i.callerPublicKey))
256-            then throw((sessionId + "draw: moving into READY state is allowed for organizer only"))
257-            else {
258-                let readyState = formatStateDataStr(DATADONE, organizerPubKey58, fromStr, toStr, randsCountStr, remainRandsCountStr, dataKeysCount, toBase58String(i.transactionId), "0", "0", "1", "0", "1", "")
259-                WriteSet([DataEntry(sessionId, readyState)])
260-                }
261-    }
262-
263-
264-
265-@Callable(i)
266-func random (sessionId,rsaSign) = {
267-    let drawParamsList = extractGameDataList(sessionId)
268-    let drawState = drawParamsList[IdxState]
269-    let organizerPubKey58 = drawParamsList[IdxOrganizerPub]
270-    let randsCountStr = drawParamsList[IdxRandsCount]
271-    let remainRandsCount = parseIntValue(drawParamsList[IdxRemainRandsCount])
272-    let lastOffsetBytes = parseIntValue(drawParamsList[IdxLastOffset])
273-    let currRandsStr = drawParamsList[IdxCurrRands]
274-    let fromStr = drawParamsList[IdxRandFrom]
275-    let toStr = drawParamsList[IdxRandTo]
276-    let dataDoneTxId = drawParamsList[IdxDataDoneTxId]
277-    let slowIdx1 = parseIntValue(drawParamsList[9])
278-    let slowIdx2 = parseIntValue(drawParamsList[10])
279-    let fastIdx1 = parseIntValue(drawParamsList[11])
280-    let fastIdx2 = parseIntValue(drawParamsList[12])
281-    let from = parseIntValue(fromStr)
282-    let to = parseIntValue(toStr)
283-    let organizerPubKey = fromBase58String(organizerPubKey58)
284-    if ((drawState != DATADONE))
285-        then throw((sessionId + " draw: it must be in READY state to generate random numbers"))
286-        else if (!(rsaVerify(SHA256, (toBytes(sessionId) + toBytes(dataDoneTxId)), rsaSign, RSAPUBLIC)))
287-            then throw("Invalid RSA signature")
288-            else {
289-                let randGenInfo = generateRand(sessionId, from, to, rsaSign, currRandsStr, remainRandsCount, lastOffsetBytes, slowIdx1, slowIdx2, fastIdx1, fastIdx2)
290-                let newRemainRandsCountStr = randGenInfo[1]
291-                let newState = if ((newRemainRandsCountStr == "0"))
292-                    then STATEFINISHED
293-                    else DATADONE
294-                WriteSet([DataEntry(sessionId, formatStateDataStr(newState, organizerPubKey58, fromStr, toStr, randsCountStr, newRemainRandsCountStr, drawParamsList[IdxDataKeysCount], dataDoneTxId, randGenInfo[2], randGenInfo[3], randGenInfo[4], randGenInfo[5], randGenInfo[6], randGenInfo[0]))])
295-                }
296-    }
297-
298-
299-@Verifier(tx)
300-func verify () = match tx {
301-    case dtx: DataTransaction => 
302-        let data0 = dtx.data[0]
303-        let sessionId = take(data0.key, SESSIONIDFIXSIZE)
304-        let drawParamsList = extractGameDataList(sessionId)
305-        let drawState = drawParamsList[IdxState]
306-        let organizerPubKey58 = drawParamsList[IdxOrganizerPub]
307-        let dataKeysCount = parseIntValue(drawParamsList[IdxDataKeysCount])
308-        let organizerPubKey = fromBase58String(organizerPubKey58)
309-        let dataEntriesCount = size(dtx.data)
310-        let sigValid = sigVerify(tx.bodyBytes, tx.proofs[0], organizerPubKey)
311-        let dataSizeValid = (dataEntriesCount == 5)
312-        let feeValid = (dtx.fee == ((WAVELET * 5) / 1000))
313-        let keysValid = if (if (if (if (validateDtxKey(sessionId, dataKeysCount, data0))
314-            then validateDtxKey(sessionId, dataKeysCount, dtx.data[1])
315-            else false)
316-            then validateDtxKey(sessionId, dataKeysCount, dtx.data[2])
317-            else false)
318-            then validateDtxKey(sessionId, dataKeysCount, dtx.data[3])
319-            else false)
320-            then validateDtxKey(sessionId, dataKeysCount, dtx.data[4])
321-            else false
322-        if (if (if (if ((drawState == STATEINIT))
323-            then sigValid
324-            else false)
325-            then feeValid
326-            else false)
327-            then dataSizeValid
328-            else false)
329-            then keysValid
330-            else false
331-    case sstx: SetScriptTransaction => 
332-        true
333-    case ttx: TransferTransaction => 
334-        true
335-    case _ => 
336-        false
337-}
338-
2+{-# CONTENT_TYPE EXPRESSION #-}
3+let PubKey1 = base58'854p8BYzrj6yBPRPmfQur3oF1Rjc1AJ548qRp5FT5kDa'
4+let PubKey2 = base58'DKGFPozLrsiR8NM4NJzqQaBYC8NyGYjuw2hDYicQVjco'
5+let sig1 = if (sigVerify(tx.bodyBytes, tx.proofs[0], PubKey1))
6+    then 1
7+    else 0
8+let sig2 = if (sigVerify(tx.bodyBytes, tx.proofs[1], PubKey2))
9+    then 1
10+    else 0
11+((sig1 + sig2) > 0)
github/deemru/w8io/169f3d6 
41.95 ms ◑