ProTradex(PRT)普瑞缇/提智能合约系统开发实现技术方案及源码解析

 区块链是分布式数据存储、点对点传输、共识机制、加密算法等计算机技术的新型应用模式。  区块链助推供应链上的数据更加透明，供应链上的企业可以准确的使用端到端的透明数据，区块链技术可以有效的对供应链上企业的交易进行数字化的处理，并且可以建立一个分散式的不可更改的所有交易记录，可以实现数据的实时共享，有效的降低数据信息获取的时间成本。  狭义来讲，区块链是一种按照时间顺序将数据区块以顺序相连的方式组合成的一种链式数据结构，并以密码学方式保证的不可篡改和不可伪造的分布式账本。  广义来讲，区块链技术是利用块链式数据结构来验证与存储数据、模式设计利用分布式节点共识算法来生成和更新数据、利用密码学的方式保证数据传输和访问的安全、利用由自动化脚本代码组成的智能合约来编程和操作数据的一种全新的分布式基础架构与计算方式。  AssemblyBlock=;{;AssemblyItem*;};  AssemblyItem=  Identifier|  AssemblyBlock|  FunctionalAssemblyExpression|  AssemblyLocalDefinition|  FunctionalAssemblyAssignment|  AssemblyAssignment|  LabelDefinition|  AssemblySwitch|  AssemblyFunctionDefinition|  AssemblyFor|  ;break;|;continue;|  SubAssembly|;dataSize;;(;Identifier;);|  LinkerSymbol|  ;errorLabel;|;bytecodeSize;|  NumberLiteral|StringLiteral|HexLiteral  Identifier=[a-zA-Z_$][a-zA-Z_0-9]*  FunctionalAssemblyExpression=Identifier;(;(AssemblyItem(;,;AssemblyItem)*)?;);  AssemblyLocalDefinition=;let;IdentifierOrList;:=;FunctionalAssemblyExpression  FunctionalAssemblyAssignment=IdentifierOrList;:=;FunctionalAssemblyExpression  IdentifierOrList=Identifier|;(;IdentifierList;);  IdentifierList=Identifier(;,;Identifier)*  AssemblyAssignment=;=:;Identifier  LabelDefinition=Identifier;:;  AssemblySwitch=;switch;FunctionalAssemblyExpression AssemblyCase*  (;default;AssemblyBlock)?  AssemblyCase=;case;FunctionalAssemblyExpression AssemblyBlock  AssemblyFunctionDefinition=;function;Identifier;(;IdentifierList?;);  (;->;;(;IdentifierList;);)?AssemblyBlock  AssemblyFor=;for;(AssemblyBlock|FunctionalAssemblyExpression)  FunctionalAssemblyExpression(AssemblyBlock|FunctionalAssemblyExpression)AssemblyBlock  SubAssembly=;assembly;Identifier AssemblyBlock  LinkerSymbol=;linkerSymbol;;(;StringLiteral;);  NumberLiteral=HexNumber|DecimalNumber  HexLiteral=;hex;(;";([0-9a-fA-F]{2})*;";|;;;([0-9a-fA-F]{2})*;;;)  StringLiteral=;";([^"rn]|;;.)*;";  HexNumber=;0x;[0-9a-fA-F]+  DecimalNumber=[0-9]+  {  mstore(0x40,0x60)//store the"free memory pointer"  //function dispatcher  switch div(calldataload(0),exp(2,226))  case 0xb3de648b{  let(r)=f(calldataload(4))  let ret:=$allocate(0x20)  mstore(ret,r)  return(ret,0x20)  }  default{revert(0,0)}  //memory allocator  function$allocate(size)->pos{  pos:=mload(0x40)  mstore(0x40,add(pos,size))  }  //the contract function  function f(x)->y{  y:=1  for{let i:=0}lt(i,x){i:=add(i,1)}{  y:=mul(2,y)  }  }  }