Contract

Contract Source Code (Solidity)

IDE

• Blockscan IDE
• 🤖 Code ReaderBeta

Outline

•  contract Disperse *
•    - function selector()

More Options

• Similar
• Submit Audit
• Compare

/**
 *Submitted for verification at apescan.io on 2024-10-27
*/

// SPDX-License-Identifier: UNLICENSED
pragma solidity ^0.8.0;

contract Disperse {

    fallback() payable external {
        assembly {
            function selector() -> s {
                calldatacopy(s, 0x00, 0x04)
                s := div(calldataload(0), 0x100000000000000000000000000000000000000000000000000000000)
            }
            switch selector()

            /*
              @notice disperseETH_1125D8(address[])
              @param `address[]` List of payees to transfer to.

              @notice Divides `msg.value` by the number payees then transfers the respective amount to each payee.
            */
            case 0x0000004a {
                if iszero(gt(callvalue(),0)) {revert(0,0)}

                let lengthOffset := add(calldataload(0x04),0x04)
                let lengthOfAddresses := calldataload(lengthOffset)
                if iszero(gt(lengthOfAddresses,0)) {revert(0,0)}

                let valueSplitUp := div(callvalue(), lengthOfAddresses)

                let addressIdx := add(0x20,lengthOffset)
                lengthOfAddresses := add(mul(lengthOfAddresses, 0x20), addressIdx)

                for {} 1 {}{
                    pop(call(21000, calldataload(addressIdx), valueSplitUp, 0, 0, 0, 0))
                    addressIdx := add(addressIdx, 0x20)
                    if iszero(lt(addressIdx, lengthOfAddresses)){break}
                }

                if gt(selfbalance(), 0){
                    pop(call(21000, caller(), selfbalance(), 0, 0, 0, 0))
                }
            }

            /*
              @notice disperseETHSpecific_4B1AB70(address[],uint256[])
              @param `address[]` List of payees to transfer to.
              @param `uint256[]` List of amounts to transfer.

              @notice Sends specified amount to payee at a given index.
            */
            case 0x000000c9 {
                if iszero(gt(callvalue(),0)) {revert(0,0)}

                let addressLengthOffset := add(calldataload(0x04),0x04)
                let amountLengthOffset := add(calldataload(0x24),0x04)

                let lengthOfAddresses := calldataload(addressLengthOffset)
                let lengthOfAmounts := calldataload(amountLengthOffset)

                if iszero(gt(lengthOfAddresses,0)) {revert(0,0)}
                if iszero(eq(lengthOfAddresses,lengthOfAmounts)) {revert(0,0)}

                let addressIdx := add(0x20,addressLengthOffset)

                lengthOfAddresses := add(mul(lengthOfAddresses, 0x20), addressIdx)
                let difference := sub(add(0x20,amountLengthOffset),addressIdx)

                for {} 1 {}{
                    pop(call(21000, calldataload(addressIdx), calldataload(add(addressIdx,difference)), 0, 0, 0, 0))
                    addressIdx := add(addressIdx, 0x20)
                    if iszero(lt(addressIdx, lengthOfAddresses)){break}
                }

                if gt(selfbalance(), 0){
                    pop(call(21000, caller(), selfbalance(), 0, 0, 0, 0))
                }
            }

            /*
              @notice disperseToken_1EDBF2(address,uint256,address[])
              @param `address` Token intended to transfer
              @param `uint256` Total quantity of tokens to transfer
              @param `address[]` list of addresses to transfer to

              @notice Divides `total quantity of tokens` by the number payees then transfers the respective amount to each payee.
              @notice Must approve contract first before calling this function.
            */
            case 0x000000df {
                let token := calldataload(0x04)
                let totalValue := calldataload(0x24)

                if iszero(gt(totalValue,0)) {revert(0,0)}

                mstore(0x00, hex"23b872dd")
                mstore(0x04, caller())
                mstore(0x24, address())
                mstore(0x44, totalValue)
                if iszero(call(gas(), token, 0, 0x00, 0x64, 0, 0)){
                    revert(0, 0)
                }

                let lengthOffset := add(calldataload(0x44),0x04)
                let lengthOfAddresses := calldataload(lengthOffset)
                let valueSplitUp := div(totalValue, lengthOfAddresses)

                if eq(lengthOfAddresses,0) {revert(0,0)}

                let addressIdx := add(0x20,lengthOffset)
                lengthOfAddresses := add(mul(lengthOfAddresses, 0x20), addressIdx)

                mstore(0x00,hex"a9059cbb")
                mstore(0x24,valueSplitUp)

                for {} 1 {}{
                    mstore(0x04,calldataload(addressIdx))

                    if iszero(call(gas(), token, 0, 0x00, 0x44, 0, 0)){revert(0,0)}

                    totalValue := sub(totalValue,valueSplitUp)
                    addressIdx := add(addressIdx, 0x20)

                    if iszero(lt(addressIdx, lengthOfAddresses)){break}
                }

                if gt(totalValue, 0){
                    mstore(0x04,caller())
                    mstore(0x24,totalValue)
                    if iszero(call(gas(), token, 0, 0x00, 0x44, 0, 0)){
                        revert(0,0)
                    }
                }

                if gt(selfbalance(), 0){
                    pop(call(21000, caller(), selfbalance(), 0, 0, 0, 0))
                }
            }

            /*
              @notice disperseTokenSpecific_109D78E(address,uint256,address[],uint256[])
              @param `address` Token intended to transfer.
              @param `uint256` Total quantity of tokens to transfer.
              @param `address[]` List of addresses to transfer to.
              @param `uint256[]` List of amounts to transfer.

              @notice Sends specified amount to payee at a given index.
              @notice Must approve contract first before calling this function.
            */
            case 0x00000088 {
                let token := calldataload(0x04)
                let totalValue := calldataload(0x24)

                if iszero(gt(totalValue,0)) {revert(0,0)}

                mstore(0x00, hex"23b872dd")
                mstore(0x04, caller())
                mstore(0x24, address())
                mstore(0x44, totalValue)
                if iszero(call(gas(), token, 0, 0x00, 0x64, 0, 0)){
                    revert(0, 0)
                }

                let addressLengthOffset := add(calldataload(0x44),0x04)
                let amountLengthOffset := add(calldataload(0x64),0x04)

                let lengthOfAddresses := calldataload(addressLengthOffset)
                let lengthOfAmounts := calldataload(amountLengthOffset)

                if iszero(eq(lengthOfAddresses,lengthOfAmounts)) {revert(0,0)}

                let addressIdx := add(0x20,addressLengthOffset)

                lengthOfAddresses := add(mul(lengthOfAddresses, 0x20), addressIdx)
                let difference := sub(add(0x20,amountLengthOffset),addressIdx)

                mstore(0x00,hex"a9059cbb")

                for {} 1 {}{
                    mstore(0x04,calldataload(addressIdx))

                    let amount := calldataload(add(addressIdx,difference))
                    mstore(0x24,amount)

                    if iszero(call(gas(), token, 0, 0x00, 0x44, 0, 0)){revert(0,0)}

                    totalValue := sub(totalValue,amount)
                    addressIdx := add(addressIdx, 0x20)

                    if iszero(lt(addressIdx, lengthOfAddresses)){break}
                }

                if gt(totalValue, 0){
                    mstore(0x04,caller())
                    mstore(0x24,totalValue)
                    if iszero(call(gas(), token, 0, 0x00, 0x44, 0, 0)){
                        revert(0,0)
                    }
                }

                if gt(selfbalance(), 0){
                    pop(call(21000, caller(), selfbalance(), 0, 0, 0, 0))
                }
            }

            /*
              @notice disperse721_57583EF(address,uint256,uint256,address[])
              @param `address` Token intended to transfer.
              @param `uint256` First tokenId to transfer.
              @param `uint256` Quantity of tokens to transfer.
              @param `address[]` List of addresses to transfer to.

              @notice Sends one token to each address starting at the first tokenId.
              @notice Must approve contract first before calling this function.
            */
            case 0x0000004b {
                let token := calldataload(0x04)
                let firstTokenId := calldataload(0x24)
                let quantity := calldataload(0x44)
                if iszero(gt(quantity,0)) {revert(0,0)}

                let addressLengthOffset := add(calldataload(0x64),0x04)
                let lengthOfAddresses := calldataload(addressLengthOffset)
                if iszero(eq(lengthOfAddresses,quantity)) {revert(0,0)}

                let addressIdx := add(0x20,addressLengthOffset)
                let lastTokenId := add(firstTokenId, quantity)

                mstore(0x00, hex"23b872dd")
                mstore(0x04, caller())

                for {} 1 {}{
                    mstore(0x24, calldataload(addressIdx))
                    mstore(0x44, firstTokenId)

                    if iszero(call(gas(), token, 0, 0x00, 0x64, 0, 0)){revert(0,0)}

                    addressIdx := add(addressIdx, 0x20)
                    firstTokenId := add(firstTokenId,1)

                    if iszero(lt(firstTokenId, lastTokenId)){break}
                }

                if gt(selfbalance(), 0){
                    pop(call(21000, caller(), selfbalance(), 0, 0, 0, 0))
                }
            }

            /*
              @notice disperse721Specific_4B57A99(address,address[],uint256[])
              @param `address` Token intended to transfer.
              @param `address[]` List of addresses to transfer to.
              @param `uint256[]` List of tokenIds to transfer.

              @notice Sends specific tokenId to an address at a given index.
              @notice Must approve contract first before calling this function.
            */
            case 0x00000092 {
                let token := calldataload(0x04)

                let addressLengthOffset := add(calldataload(0x24),0x04)
                let tokenIdLengthOffset := add(calldataload(0x44),0x04)

                let lengthOfAddresses := calldataload(addressLengthOffset)
                let lengthOfTokenIds := calldataload(tokenIdLengthOffset)
                if iszero(eq(lengthOfAddresses,lengthOfTokenIds)) {revert(0,0)}

                let addressIdx := add(0x20,addressLengthOffset)

                lengthOfAddresses := add(mul(lengthOfAddresses, 0x20), addressIdx)
                let difference := sub(add(0x20,tokenIdLengthOffset),addressIdx)

                mstore(0x00,hex"23b872dd")
                mstore(0x04, caller())

                for {} 1 {}{
                    mstore(0x24,calldataload(addressIdx))
                    mstore(0x44,calldataload(add(addressIdx,difference)))
                    if iszero(call(gas(), token, 0, 0x00, 0x64, 0, 0)){revert(0,0)}

                    addressIdx := add(addressIdx, 0x20)

                    if iszero(lt(addressIdx, lengthOfAddresses)){break}
                }

                if gt(selfbalance(), 0){
                    pop(call(21000, caller(), selfbalance(), 0, 0, 0, 0))
                }
            }
            default {
                revert(0,0)
            }
        }
    }
}

• No Contract Security Audit Submitted- Submit Audit Here

[{"stateMutability":"payable","type":"fallback"}]

608060405234801561001057600080fd5b5061043f806100206000396000f3fe608060405261000c6103fa565b604a81146100415760c981146100a55760df811461010c57608881146101fb57604b81146102cc576092811461036457600080fd5b3461004b57600080fd5b60043560048101358061005d57600080fd5b803404602483016024848460051b010193505b6000925082838485858535615208f150602001838110610070575b5050505047156100a3576000806000804733615208f1505b005b346100af57600080fd5b6004356024356004820135806100c457600080fd5b600482013581146100d457600080fd5b602483016024848360051b0101915083830393505b6000925082838485878501358535615208f1506020018181101561008b576100e9565b60048035602480358061011e57600080fd5b60007f23b872dd0000000000000000000000000000000000000000000000000000000081523385523083526044828152818260648485895af161015f578182fd5b80358681013580850481610171578485fd5b7fa9059cbb000000000000000000000000000000000000000000000000000000008552808752600582901b830187019287015b80358a5285868688898d5af16101b8578586fd5b95819003956020018381106101a4575b5050505082156101e8573386528284528182828485895af16101e8578182fd5b5047156100a357808182834733615208f1005b60048035602480358061020d57600080fd5b60007f23b872dd0000000000000000000000000000000000000000000000000000000081523385523083526044828152818260648485895af161024e578182fd5b803560643587820135888201358114610265578485fd5b7fa9059cbb0000000000000000000000000000000000000000000000000000000085528282039260059190911b810187019087015b80358a5283810135925082885285868688898d5af16102b7578586fd5b9582900395602001818110156101c85761029a565b6004356024803560448035806102e157600080fd5b60648035826004820135146102f557600080fd5b7f23b872dd0000000000000000000000000000000000000000000000000000000060009081523360045292850192908601905b8135875285855280818483848c5af161033f578081fd5b6020820191506001860195508386106103285747156100a357808182834733615208f1005b600435602480356044803560048301356004820135811461038457600080fd5b7f23b872dd00000000000000000000000000000000000000000000000000000000600090815233600452918490039360059190911b810185019085015b803586528481013584528283606485868b5af16103dc578283fd5b6020018181106103c157505047156100a357808182834733615208f1005b60046000803760003560e01c9056fea264697066735822122004aa6a2d1d7dd98d868aac06120921bb9fef4b11485d75c3057cde04a4875f0464736f6c63430008150033

0x608060405261000c6103fa565b604a81146100415760c981146100a55760df811461010c57608881146101fb57604b81146102cc576092811461036457600080fd5b3461004b57600080fd5b60043560048101358061005d57600080fd5b803404602483016024848460051b010193505b6000925082838485858535615208f150602001838110610070575b5050505047156100a3576000806000804733615208f1505b005b346100af57600080fd5b6004356024356004820135806100c457600080fd5b600482013581146100d457600080fd5b602483016024848360051b0101915083830393505b6000925082838485878501358535615208f1506020018181101561008b576100e9565b60048035602480358061011e57600080fd5b60007f23b872dd0000000000000000000000000000000000000000000000000000000081523385523083526044828152818260648485895af161015f578182fd5b80358681013580850481610171578485fd5b7fa9059cbb000000000000000000000000000000000000000000000000000000008552808752600582901b830187019287015b80358a5285868688898d5af16101b8578586fd5b95819003956020018381106101a4575b5050505082156101e8573386528284528182828485895af16101e8578182fd5b5047156100a357808182834733615208f1005b60048035602480358061020d57600080fd5b60007f23b872dd0000000000000000000000000000000000000000000000000000000081523385523083526044828152818260648485895af161024e578182fd5b803560643587820135888201358114610265578485fd5b7fa9059cbb0000000000000000000000000000000000000000000000000000000085528282039260059190911b810187019087015b80358a5283810135925082885285868688898d5af16102b7578586fd5b9582900395602001818110156101c85761029a565b6004356024803560448035806102e157600080fd5b60648035826004820135146102f557600080fd5b7f23b872dd0000000000000000000000000000000000000000000000000000000060009081523360045292850192908601905b8135875285855280818483848c5af161033f578081fd5b6020820191506001860195508386106103285747156100a357808182834733615208f1005b600435602480356044803560048301356004820135811461038457600080fd5b7f23b872dd00000000000000000000000000000000000000000000000000000000600090815233600452918490039360059190911b810185019085015b803586528481013584528283606485868b5af16103dc578283fd5b6020018181106103c157505047156100a357808182834733615208f1005b60046000803760003560e01c9056fea264697066735822122004aa6a2d1d7dd98d868aac06120921bb9fef4b11485d75c3057cde04a4875f0464736f6c63430008150033

67:11709:0:-:0;;;368:10;;:::i;:::-;667;662:923;;;;1913:10;1908:1208;;;;3649:10;3644:1804;;;;6008:10;6003:2074;;;;8628:10;8623:1259;;;;10368:10;10363:1325;;;;11738:1;;11729:11;662:923;710:11;697:42;;722:1;;727:11;697:42;802:4;783:18;802:4;783:18;779:28;850:26;907:17;894:48;;722:1;;930:11;894:48;999:17;710:11;982:35;1055:22;783:18;1055:22;;783:18;1124:17;1120:28;;1116:45;;1095:66;;1181:251;722:1;;;;;;;1257:12;1244:10;1231:24;1224:5;1219:63;-1:-1:-1;1059:4:0;1319:21;1372:33;;;1181:251;1362:51;1181:251;1185:2;;;;1458:13;1455:20;1452:118;;722:1;;;;1524:13;1514:8;1224:5;1502:48;;1452:118;361:11394;1908:1208;1956:11;1943:42;;1968:1;;1973:11;1943:42;2055:4;2036:18;2121:4;2108:18;2055:4;2036:18;2032:28;2177:33;2316:17;2303:48;;1968:1;;2339:11;2303:48;2055:4;2108:18;2104:28;2251:32;2382:17;2379:37;2369:62;;1968:1;;2419:11;2369:62;2121:4;2036:18;2469:29;2121:4;2036:18;2547:17;2543:28;;2539:45;;2518:66;;2036:18;2108;2620:44;;;2684:279;1968:1;;;;;;;2620:44;2777:10;2773:26;2760:40;2747:10;2734:24;2727:5;2722:91;-1:-1:-1;2473:4:0;2850:21;2903:33;;;2893:51;2938:5;2893:51;2684:279;;3644:1804;3705:4;;3692:18;3759:4;;3746:18;3797:10;3784:41;;3808:1;;3813:11;3784:41;3808:1;3858:13;3808:1;3845:27;3903:8;3705:4;3890:22;3943:9;3759:4;3930:23;3978:4;3984:10;3978:4;3971:24;3808:1;;4051:4;3808:1;;4035:5;4028;4023:39;4013:104;;3808:1;;4086:12;4013:104;3978:4;4161:18;3705:4;4161:18;4157:28;4228:26;4308:17;4296:10;4292:34;4352:17;4346:40;;3808:1;;4374:11;4346:40;4562:13;4550:26;;4594:25;;;4489:28;;;;4485:45;;;;;4424:22;;4639:375;4698:10;4685:24;3705:4;4673:37;3808:1;;3978:4;3808:1;;4756:5;4749;4744:39;4734:63;;3808:1;;4785:11;4734:63;4835:28;;;;;4428:4;4899:21;4954:33;;;4639:375;4944:51;4639:375;4643:2;;;;5040:10;5037:17;5034:261;;3903:8;3705:4;5077:21;5132:10;3759:4;5120:23;3808:1;;3978:4;3808:1;;5187:5;5180;5175:39;5165:111;;3808:1;;5242:11;5165:111;5034:261;5321:13;5318:20;5315:118;;3808:1;;;;5387:13;3903:8;5370:5;5365:48;;6003:2074;6064:4;;6051:18;6118:4;;6105:18;6156:10;6143:41;;6167:1;;6172:11;6143:41;6167:1;6217:13;6167:1;6204:27;6262:8;6064:4;6249:22;6302:9;6118:4;6289:23;6337:4;6343:10;6337:4;6330:24;6167:1;;6410:4;6167:1;;6394:5;6387;6382:39;6372:104;;6167:1;;6445:12;6372:104;6337:4;6527:18;6410:4;6599:18;6064:4;6527:18;6523:28;6668:33;6064:4;6599:18;6595:28;6742:32;6807:17;6804:37;6794:62;;6167:1;;6844:11;6794:62;7121:13;7109:26;;7045:44;;;;6968:28;;;;;6964:45;;;;;6894:29;;7155:488;7214:10;7201:24;6064:4;7189:37;7045:44;7281:10;7277:26;7264:40;7250:54;;7338:6;6118:4;7326:19;6167:1;;6337:4;6167:1;;7391:5;7384;7379:39;7369:63;;6167:1;;7420:11;7369:63;7470:22;;;;;6898:4;7528:21;7583:33;;;7573:51;7618:5;7573:51;7155:488;;8623:1259;8684:4;8671:18;8740:4;;8727:18;8792:4;;8779:18;8828:8;8815:39;;8837:1;;8842:11;8815:39;8918:4;;8905:18;9054:8;8684:4;8905:18;8901:28;8972:33;9033:30;9023:55;;8837:1;;9066:11;9023:55;9242:13;8837:1;9229:27;;;9287:8;8684:4;9274:22;9182:27;;;;9116:29;;;;9316:413;9376:10;9363:24;8740:4;9350:38;9423:12;8792:4;9410:26;8837:1;;8918:4;8837:1;;9482:5;9475;9470:39;9460:63;;8837:1;;9511:11;9460:63;9120:4;9565:10;9561:21;9547:35;;9637:1;9624:12;9620:19;9604:35;;9690:11;9676:12;9673:29;9316:413;9663:47;9755:13;9752:20;9749:118;;8837:1;;;;9821:13;9287:8;9804:5;9799:48;;10363:1325;10424:4;10411:18;10493:4;;10480:18;10566:4;;10553:18;10424:4;10480:18;10476:28;10622:33;10424:4;10553:18;10549:28;10697:33;10761:17;10758:38;10748:63;;10808:1;;10799:11;10748:63;11077:13;11072:4;11065:26;;;11122:8;10424:4;11109:22;11000:45;;;;;10923:28;;;;;10919:45;;;;;10849:29;;11151:384;11210:10;11197:24;10493:4;11185:37;11000:45;11273:10;11269:26;11256:40;10566:4;11244:53;11072:4;;11357;11072;;11341:5;11334;11329:39;11319:63;;11072:4;;11370:11;11319:63;10853:4;11420:21;11475:33;;;11151:384;11465:51;11155:2;;11561:13;11558:20;11555:118;;11072:4;;;;11627:13;11122:8;11610:5;11605:48;;157:190;223:4;217;;201:27;180:1;255:15;251:81;;;157:190::o

ipfs://04aa6a2d1d7dd98d868aac06120921bb9fef4b11485d75c3057cde04a4875f04