Function ExWriteOutAppOperateFunc

src/vm/luavm/lmylib.cpp:1939–1971

* 写应用操作输出到 pVmRunEnv->mapAppFundOperate[0] * @param ipara * @param pVmEvn * @return */

 * @return
 */
int32_t ExWriteOutAppOperateFunc(lua_State *L) {
    vector<std::shared_ptr<vector<uint8_t>>> retdata;

    CAppFundOperate temp;
    uint32_t size = ::GetSerializeSize(temp, SER_NETWORK, PROTOCOL_VERSION);

    if (!GetDataTableOutAppOperate(L, retdata) || retdata.size() != 1 || (retdata.at(0).get()->size() % size) != 0)
        return RetFalse("ExWriteOutAppOperateFunc para err1");

    CLuaVMRunEnv* pVmRunEnv = GetVmRunEnv(L);
    if (nullptr == pVmRunEnv)
        return RetFalse("pVmRunEnv is nullptr");

    int32_t count = retdata.at(0).get()->size() / size;
    CDataStream ss(*retdata.at(0), SER_DISK, CLIENT_VERSION);
    LUA_BurnAccountOperate(L, count, BURN_VER_R2);

    int64_t step =-1;
    while (count--) {
        ss >> temp;
        // soft fork for contract negative money
        if (GetFeatureForkVersion(pVmRunEnv->GetConfirmHeight()) >= MAJOR_VER_R2 &&
            temp.mMoney < 0)  // in case contract uses negative money input
            return RetFalse("ExWriteOutAppOperateFunc para err2");

        pVmRunEnv->InsertOutAPPOperte(temp.GetAppUserV(),temp);
        step += size;
    }

    /*
    * 每个函数里的Lua栈是私有的,当把返回值压入Lua栈以后，该栈会自动被清空*/
    return RetRstBooleanToLua(L, true);
}

int32_t ExGetBase58AddrFunc(lua_State *L) {
    vector<std::shared_ptr<vector<uint8_t>>> retdata;