pragma solidity ^0.4.24;

contract Lottery3{
    using SafeMathLib for *;
    // mapping(uint256 => uint256) public uintToUint;
    // mapping(uint256 => mapping(uint256 => uint256)) public uintToUintToUint;
    // mapping(uint256 => mapping(uint256 => mapping(uint256 => uint256))) public uintToUintToUintToUint;
    mapping(uint64 => address) public id_addr;

    mapping(address => mapping(uint16 => JackpotLib.Ticket3)) public ticketRecs;
    // mapping(address => mapping(uint16 => uint256)) public ticketRecs;
    mapping(address => JackpotLib.Player) public players;
    mapping(uint16 => JackpotLib.Round3) public rounds;

    uint64 constant private noticePeriod = 10 minutes;//min time between announce and confirm;
    uint64 constant private claimPeriod = 30 days;//time you have to claim your prize
    uint16 constant private ticketPrice = 20; //price of single ticket (in the unit)    
    uint16 constant private prize0 = 18600;//in the unit;
    uint16 constant private prize1 = 3100;//in the unit;
    uint16 constant private prize2 = 6200;//in the unit;
    uint256 constant private unitSize=1e14;//about 0.02 USD

    uint32 constant private mask0 = 0xC0000000;//[2个1,30个0];这两位应该是空的
    uint32 constant private mask1 = 0x3FF00000;//[10个1,20个0];
    uint32 constant private mask2 = 0xFFC00;//[10个1,10个0];
    uint32 constant private mask3 = 0x3FF;//[10个1];
    
    uint64 constant private roundInterval = 1 days;

    JackpotLib.Status public gameState;

    
    
    //address adminAddr=0xd78CbFB57Ca14Fb4F2c5a5acb78057D637462F9c;

    address adminAddr=0xdf68C2236bB7e5ac40f4b809CD41C5ab73958643;
    



    modifier adminOnly(){
        require(msg.sender == adminAddr,'Who are you?');
        _;        
    }
    modifier humanOnly() { 
    require(msg.sender == tx.origin, "Humans only");
        _;
    } 
    constructor() public{          
        // gameState.baseRound=1;
        // gameState.baseRoundEndTime=(uint64(now)+roundInterval-1)/roundInterval*roundInterval;  
        gameState.baseRound=324;
        gameState.baseRoundEndTime=1543348800;  
        gameState.numPlayers=0;
        gameState.currRound=gameState.baseRound;
        rounds[gameState.baseRound].endTime=gameState.baseRoundEndTime;

    }
    function setBaseRound(uint16 baseRound,uint64 baseRoundEndTime)
        adminOnly()
        public
    {
        gameState.baseRound=baseRound;
        gameState.baseRoundEndTime=baseRoundEndTime;   
    }

    function getBal()
        public
        view
        returns(uint256 balance)
    {
        return address(this).balance;
    }


    function startRound()//自助新开一轮
        public//private
    {
        require(gameState.baseRound>0,'cannot start round now');
        uint64 endTime;
        endTime=(uint64(now)+roundInterval-1)/roundInterval*roundInterval;
        uint16 round;
        round=uint16((endTime-gameState.baseRoundEndTime)/roundInterval+gameState.baseRound);
        rounds[round].endTime=endTime;
        gameState.currRound=round;
    }
    // function startRound(uint16 round, uint64 endTime)
    //     adminOnly()
    //     public
    // {   
    //     require(rounds[round].endTime==0,'round already started');
    //     require(endTime>uint64(now),'should end in the future, not in the past');
    //     if(endTime==0){
    //         require(rounds[round-1].endTime>0,'you have to provide an endTime');
    //         rounds[round].endTime=rounds[round-1].endTime+roundInterval; //default value;
    //     }else
    //         rounds[round].endTime=endTime;                
    // }
    function announceWinningNum(uint16 round,uint16 winningNum0,uint16 winningNum1,uint16 winningNum2)//this can be run multiple times, before starts;
        adminOnly()//if no winning Num for combo2, the winningNum2 will be 1000(so no one can match it);
        public
    {
        require( uint64(now) > rounds[round].endTime,'round not ended yet, where did you get the numbers?');
        require( rounds[round].claimStartTime==0 || uint64(now) < rounds[round].claimStartTime, 'claim started, cannot change number');                
        rounds[round].winningNum0   =winningNum0;
        rounds[round].winningNum1   =winningNum1;
        rounds[round].winningNum2   =winningNum2;
        rounds[round].claimStartTime    =uint64(now)+noticePeriod;
        rounds[round].claimDeadline     =uint64(now)+noticePeriod+claimPeriod;
        gameState.lastRound=round;
    }    
    function sweep()    
        adminOnly()
        public
    {
        require(gameState.baseRound==0,'game not ended');
        require(rounds[gameState.currRound].claimDeadline>0 && rounds[gameState.currRound].claimDeadline < uint64(now),'claim not ended');
        adminAddr.transfer(address(this).balance);
    }
    function checkTicket(address playerAddr,uint16 id)
        public
        view
        returns(
            uint16 status,//0:未开始兑奖;1.未中奖;2.已兑奖;3.已过期;4.中奖
            uint16 winningNum0,
            uint256 prize            
        )
    {
        uint16 winningNum;
        winningNum0=rounds[ticketRecs[playerAddr][id].round].winningNum0;
        if(rounds[ticketRecs[playerAddr][id].round].claimStartTime==0 || uint64(now) < rounds[ticketRecs[playerAddr][id].round].claimStartTime){
            status=0;
            winningNum=1000;
            prize=0;            
        }else{
            if(ticketRecs[playerAddr][id].ticketType==0){
                winningNum=rounds[ticketRecs[playerAddr][id].round].winningNum0;
                prize=prize0;
            }else if(ticketRecs[playerAddr][id].ticketType==1){
                winningNum=rounds[ticketRecs[playerAddr][id].round].winningNum1;
                prize=prize1;
            }else if(ticketRecs[playerAddr][id].ticketType==2){
                winningNum=rounds[ticketRecs[playerAddr][id].round].winningNum2;
                prize=prize2;
            }else{//combo买法；
                winningNum=rounds[ticketRecs[playerAddr][id].round].winningNum0;
                prize=prize0;
            }
            if(ticketRecs[playerAddr][id].claimed){//已兑奖
                status=2;
            }else if( ticketRecs[playerAddr][id].ticketType==3 ? //根据票的类型用不同的判断条件
            !checkCombo(ticketRecs[playerAddr][id].numbers,winningNum) :
             ticketRecs[playerAddr][id].numbers != winningNum){//未中奖
                status=1;
            }else if(rounds[ticketRecs[playerAddr][id].round].claimDeadline<=now){//已过期
                status=3;            
            }else{//中奖
                status=4;
            }
            if(status==4 || status==2){
                prize=unitSize.mul(prize).mul(ticketRecs[playerAddr][id].multiple);
            }else{
                prize=0;
            }
            return (status,winningNum0,prize);
        }        
    }

    function claimPrize(uint16 id)        
        public
    {        
        uint16 winningNum;
        uint16 prize;

        if(ticketRecs[msg.sender][id].ticketType==0){
            winningNum=rounds[ticketRecs[msg.sender][id].round].winningNum0;
            prize=prize0;
        }else if(ticketRecs[msg.sender][id].ticketType==1){
            winningNum=rounds[ticketRecs[msg.sender][id].round].winningNum1;
            prize=prize1;
        }else if(ticketRecs[msg.sender][id].ticketType==2){
            winningNum=rounds[ticketRecs[msg.sender][id].round].winningNum2;
            prize=prize2;
        }else{//combo;
            winningNum=rounds[ticketRecs[msg.sender][id].round].winningNum0;
            prize=prize0;
        }

        require(rounds[ticketRecs[msg.sender][id].round].claimStartTime>0,'not announced yet');
        require(rounds[ticketRecs[msg.sender][id].round].claimStartTime<=now,'claim not started'); //开始兑奖
        require(rounds[ticketRecs[msg.sender][id].round].claimDeadline>now,'claim already ended'); //在兑奖有效期内
        if(ticketRecs[msg.sender][id].ticketType==3){//combo的比对方式不太一样
            require(checkCombo(ticketRecs[msg.sender][id].numbers,winningNum),"you combo didn't cover the lucky number");
        }else{//普通号码的比对
            require(ticketRecs[msg.sender][id].numbers == winningNum,"you didn't win"); //号码正确
        }
        
        require(!ticketRecs[msg.sender][id].claimed,'ticket already claimed');  //尚未兑奖
            
        ticketRecs[msg.sender][id].claimed=true;            
        msg.sender.transfer(unitSize.mul(prize).mul(ticketRecs[msg.sender][id].multiple));
        
    }
    function checkCombo(uint32 ticketNumber,uint32 winningNum)
        public//private
        pure
        returns(bool win)
    {
        // uint8 i;
        // uint32 wNum;
        // for(i=0;i<3;i++){
        //     num3=winningNum % 10;
        //     winningNum = winningNum /10;
        //     if()
        // }

        uint32 num3=winningNum % 10;//第三位
        winningNum = winningNum /10;
        uint32 num2=winningNum % 10;//第二位
        winningNum = winningNum /10;
        uint32 num1=winningNum % 10;//第一位
        //uint32 winningMask= (uint32(1)<<(num1+20)) + (uint32(1)<<(num2+10)) + (uint32(1)<<num3);        

        return (ticketNumber & (uint32(1)<<(num1+20))!=0) && 
            (ticketNumber & (uint32(1)<<(num2+10))!=0) && 
            (ticketNumber & (uint32(1)<<num3)!=0);
    }
    function register(address playerAddr)
        private
    {   
        if(players[playerAddr].id==0){
            players[playerAddr].id=++gameState.numPlayers;
            players[playerAddr].registerOn=uint64(now);
            id_addr[gameState.numPlayers]=playerAddr;        
        }
    }
    
    function buyTicket(address owner,uint8 ticketType,uint32 numbers,uint16 multiple) 
        humanOnly()
        public
        payable
    {
        address player;
        if(owner==address(0))
            player=msg.sender;
        else
            player=owner;
        register(player);
        if(ticketType>2)//只有三种玩法
            ticketType=2;
        // require(rounds[round].endTime>0 ,'round not started');
        // require(rounds[round].endTime > uint64(now), 'round already ended');
        if(rounds[gameState.currRound].endTime<=uint64(now))
            // player=player;
            startRound();

        uint256 amt=unitSize.mul(ticketPrice).mul(multiple);
        require(msg.value >= amt,'insufficient fund');
        amt=msg.value-amt;//exchange;
        uint16 numTickets=(players[player].numTickets)+1;
        require(numTickets > players[player].numTickets,'you played too much');
        require(numbers <= 999,'wrong number');

        ticketRecs[player][numTickets]=JackpotLib.Ticket3(false,ticketType,gameState.currRound,multiple,numbers,uint64(now));
        // ticketRecs[player][numTickets]=JackpotLib.Ticket3(false,1,1,numbers,multiple,uint64(now));
        // ticketRecs[msg.sender][1]=JackpotLib.Ticket3(false,1,1,1,1,uint64(now));   
        players[player].numTickets=numTickets;
                        
        if(amt>0){//refund exchange; has to be the last step;
            (msg.sender).transfer(amt);//always refund to sender;
        }
    }   
    function countChoice(uint32 number)//数最后10位里面有多个1;
        public//private
        pure
        returns(uint16 count)
    {
        count=0;
        uint8 i;
        for(i=0;i<10;i++){
            if(number%2 == 1)
                count++;
            number=number/2;
        }
        return count;
    }

    function buyCombo(address owner,uint32 numbers,uint16 multiple) 
        humanOnly()
        public
        payable
    {
        address player;
        if(owner==address(0))
            player=msg.sender;
        else
            player=owner;
        register(player);
        //combo的玩法type=3;
        
        if(rounds[gameState.currRound].endTime<=uint64(now))            
            startRound();

        //计算票价:
        require(mask0 & numbers == 0,'wrong num: first 2 bits should be empty');
        uint16 combos=countChoice(numbers);//最后10位
        require(combos !=0, 'wrong num: select numbers for slot 3');
        combos*=countChoice(numbers>>10);//接下来10位
        require(combos !=0, 'wrong num: select numbers for slot 2');
        combos*=countChoice(numbers>>20);//最后10位
        require(combos !=0, 'wrong num: select numbers for slot 1');
        
        uint256 amt=unitSize.mul(ticketPrice).mul(multiple).mul(combos);
        require(msg.value >= amt,'insufficient fund');
        amt=msg.value-amt;//exchange;
        uint16 numTickets=(players[player].numTickets)+1;
        require(numTickets > players[player].numTickets,'you played too much');        

        ticketRecs[player][numTickets]=JackpotLib.Ticket3(false,3,gameState.currRound,multiple,numbers,uint64(now));        
        players[player].numTickets=numTickets;
                        
        if(amt>0){//refund exchange; has to be the last step;
            (msg.sender).transfer(amt);//always refund to sender;
        }
    }       
    // function abc(){
    //     ticketRecs[msg.sender][1]=JackpotLib.Ticket3(false,1,1,1,1,uint64(now));        
    // }
}

library JackpotLib{
	struct Ticket3{		
		bool claimed;//
		uint8 ticketType;//0,single;1,combo1;2combo2;
		uint16 round;		
		uint16 multiple;
		uint32 numbers;
		uint64 soldOn;//购票时间
	}
	// struct Ticket5{		
	// 	bool claimed;//		
	// 	uint16 round;		
	// 	uint16 multiple;
	// 	uint32 numbers;
	// 	uint64 soldOn;//购票时间
	// }
	struct Player{
		uint16 id;
		uint16 numTickets;
		uint64 registerOn;//注册时间
	}
	struct Status{
		uint16 lastRound;
		uint16 currRound;
		uint16 numPlayers;
		uint16 baseRound;
		uint64 baseRoundEndTime;
		uint64 reserve;
	}

	struct Round3{
		uint64 endTime;		//ending time
		uint64 claimStartTime;//
		uint64 claimDeadline;//
		uint16 winningNum0;
		uint16 winningNum1;
		uint16 winningNum2;
	}
	// struct Round5{
	// 	uint64 endTime;		//ending time
	// 	uint64 claimStartTime;//
	// 	uint64 claimDeadline;//
	// 	uint32 winningNum0;		
	// }

	
}

library SafeMathLib {
    
  /**
  * @dev Multiplies two numbers, throws on overflow.
  */
  function mul(uint256 a, uint256 b) 
      internal 
      pure 
      returns (uint256 c) 
  {
    if (a == 0) {
      return 0;
    }
    c = a * b;
    require(c / a == b, "SafeMath mul failed");
    return c;
  }

  /**
  * @dev Subtracts two numbers, throws on overflow (i.e. if subtrahend is greater than minuend).
  */
  function sub(uint256 a, uint256 b)
      internal
      pure
      returns (uint256) 
  {
    require(b <= a, "SafeMath sub failed");
    return a - b;
  }

  /**
  * @dev Adds two numbers, throws on overflow.
  */
  function add(uint256 a, uint256 b)
      internal
      pure
      returns (uint256 c) 
  {
    c = a + b;
    require(c >= a, "SafeMath add failed");
    return c;
  }
  
  /**
    * @dev gives square root of given x.
    */
  function sqrt(uint256 x)
      internal
      pure
      returns (uint256 y) 
  {
    uint256 z = ((add(x,1)) / 2);
    y = x;
    while (z < y) 
    {
      y = z;
      z = ((add((x / z),z)) / 2);
    }
  }
  
  /**
    * @dev gives square. multiplies x by x
    */
  function sq(uint256 x)
      internal
      pure
      returns (uint256)
  {
    return (mul(x,x));
  }
  
  /**
    * @dev x to the power of y 
    */
  function pwr(uint256 x, uint256 y)
      internal 
      pure 
      returns (uint256)
  {
    if (x==0)
        return (0);
    else if (y==0)
        return (1);
    else 
    {
      uint256 z = x;
      for (uint256 i = 1; i < y; i++)
        z = mul(z,x);
      return (z);
    }
  }
}