engine.js

var GameState = require('./common/GameState.js');
var Player = require('./models/player.js');
require('./common/utils.js');
//the game engine
var game_engine = {
	game_state : new GameState(),
	
	start : function(){
    // for(var i=0; i<this.game_state.punts.length; i++){
    //  this.game_state.punts[i].ware = this.game_state.wares[i+1];
    // }
    if(this.game_state.started){
      return;
    }
    for(var i=0; i<this.game_state.players.length; i++){
      this.game_state.players[i].init();
    }
    this.game_state.init();
    this.game_state.phase = 0;
    this.game_state.started = true;
    this.init_shares();
    this.start_auction();
	},
	
  start_auction:function(){
    this.game_state.auction_players = [];
    this.game_state.auction_price = 0;
    for(var i=0; i<this.game_state.players.length; i++){
      this.game_state.auction_players.push(this.game_state.players[i].id);
    }
    for(var i=0; i<this.game_state.punts.length; i++){
      this.game_state.punts[i].init();
      // this.game_state.punts[i].ware = this.game_state.wares[i+1];
		}
		for(var i=0; i<this.game_state.spaces.length; i++){
      this.game_state.spaces[i].owner = null;
    }
  },

	add_player : function(client) {
	  if(this.game_state.started){
	    return -1;
	  }
		var player_id = this.game_state.players.length;
    // console.log("clientId:"+client.id);
		this.game_state.players.push(new Player(player_id, client.id, "test"));
    // console.log("clientId2:"+this.game_state.players[0].clientId);
		// this.num_players += 1;
		return player_id;
	},

	remove_player : function(client) {
		console.log("removing " + client);
		var selected;
		for(var i=0; i< this.game_state.players.length; i++){
			var player = this.game_state.players[i];
			if(player.clientId == client.id){
				selected = player;
			}
		}
		this.game_state.players.remove(selected);
		if(this.game_state.players.length == 0){
		  this.game_state.started = false;
		}
	},

	next_player : function() {
		if (this.game_state.players.length == 0) {
			return 0;
		}
		if(this.game_state.phase == 0){
		  this.game_state.current_player_id = this.get_next_auction_player();
      // console.log("current_player_id:"+ this.game_state.current_player_id);
		}else{
		  this.game_state.current_player_id = (this.game_state.current_player_id + 1) % this.game_state.players.length;
		  this.game_state.acted_players += 1;
		}
	},
	
	get_next_auction_player:function(){
	  var current_index = this.game_state.auction_players.indexOf(this.game_state.current_player_id);
	  var next_player_id = null;
	  var removeArray = [];
	  // console.log("this.game_state.current_player_id:"+this.game_state.current_player_id);
    // console.log("current_index:"+current_index);
  	for (var i = 0; i < this.game_state.auction_players.length; i++) {
			var player = this.game_state.players[this.game_state.auction_players[i]];
			var share_count = player.shares["nutme"] + player.shares["ginseng"] + player.shares["silk"] + player.shares["jade"];
			 // || player.connect_statue == false 
			if ( (player.money + share_count*12) <= this.game_state.auction_price || !player.auction_state) {
				player.auction_state = false;
				removeArray.push(player.id);
			}else if(!next_player_id && i > current_index){
			  next_player_id = player.id;
			}
		}
		for(var i=0; i<removeArray.length; i++){
		  var playerid = removeArray[i];
		  var index = this.game_state.auction_players.indexOf(playerid);
		  this.game_state.auction_players.splice(index, 1);
		}
		// console.log(this.game_state.auction_players);
		if(!next_player_id){
		  next_player_id = this.game_state.auction_players[0];
		}
		return next_player_id;
	},

	get_gamestate : function() {
		return this.game_state;
	},
	
	get_punt_count:function(state){
	  var count = 0;
	  for (var i = 0; i < this.game_state.punts.length; i++) {
	    var punt = this.game_state.punts[i];
	    if(punt.state == state){
	      count++;
	    }
	  }
	  return count;
	},
	
	place_fail_punt:function(){
	  var count = 0;
	  for (var i = 0; i < this.game_state.punts.length; i++) {
	    var punt = this.game_state.punts[i];
	    console.log("punt state:"+punt.state);
	    if(punt.state == 1){
	      punt.state = 3;
			  punt.order = count;
			  count++;
	    }
	  }
	},
	
	init_shares:function(){
	  for(var k=0; k<2; k++){
	    for(var i = 0; i < this.game_state.players.length; i++){
  			var j = Math.floor(Math.random()*this.game_state.shares_array.length);	// random num
  			var player = this.game_state.players[i];
  			var share = this.game_state.shares_array[j];
  			this.choose_share(player, share, false);
  		}
	  }
	},
	
	handle_action : function(action) {
		//perform action
		if(action.type === "start") {
			this.start();
			return true;
		}else if(action.type === "dice") {
			this.roll_dice();
			return true;
		}else if(action.type === "ready"){
		  this.start_new_auction_phase();
		}else if(action.type === "init_punts"){
		  return this.init_punts(action);
		}else if (action.type === "place") {
			return this.place_dude(action);
		} else if (action.type === "choose_ware") {
			return this.choose_ware(action);
		} else if (action.type === "auction") {
			return this.auction(action);
		} else if (action.type === "auction_drop") {
			return this.auction_drop();
		} else if (action.type === "choose_share") {
		  return this.choose_share_by_action(action);
		}
		return false;
	},
	
	init_punts:function(action){
	  var array = action.position;
	  var wares = action.wares;
	  var result = true;
	  if(array[0] + array[1] + array[2] == 9){
	    // console.log(array[0] + array[1] + array[2]);
	    for(var i in array){
	      if(array[i]>5 || array[i]<0){
	        result = false;
	      }
	    }
	    if(result){
	      this.game_state.punts[0].position = array[0];
    	  this.game_state.punts[1].position = array[1];
    	  this.game_state.punts[2].position = array[2];
    	  this.advance_phase();
	    }
	  }else{
	    result = false;
	  }
	  this.game_state.punts[0].ware = this.game_state.wares[wares[0]];
  	this.game_state.punts[1].ware = this.game_state.wares[wares[1]];
  	this.game_state.punts[2].ware = this.game_state.wares[wares[2]];
    return result;
	},
	
	start_new_auction_phase:function(action){
	  this.game_state.acted_players += 1;
	  this.advance_phase();
	},
	
	auction : function(action) {
		add_price = 1;
		if (add_price < 1) {
			return false;
		}
		
		var add_price = action.add_price;
		this.game_state.auction_price += parseInt(add_price);	// add_price是在当前竞价上增加的值

		this.game_state.last_captain = this.game_state.current_player_id;
		// console.log(this.game_state.last_captain);
		this.next_player();
		if(this.auction_result()){
		  this.advance_phase();
		}
		return true;
	},
	
	auction_drop : function() {
		var player = this.game_state.players[this.game_state.current_player_id];
		player.auction_state = false;	// 将当前player的竞选状态置为false，使之不能参加下次竞选
    // index = this.game_state.auction_players.indexOf(player.id);
    // this.game_state.auction_players.splice(index, 1);
		this.next_player();
    if(this.auction_result()){
		  this.advance_phase();
		}
		return true;
	},
	
	auction_result : function() {
    // console.log("last_captain:"+this.game_state.last_captain);
		if (this.game_state.auction_players.length <= 1) {
			this.game_state.players[this.game_state.last_captain].roleId = 1;
			this.game_state.players[this.game_state.last_captain].money -= this.game_state.auction_price;
			this.game_state.captain_id = this.game_state.last_captain;
			return true;
		}else {
			return false;
		}
	},
	
	choose_share_by_action:function(action){
	  var player = this.game_state.players[action.player_id];
	  if(player.roleId != 1){
	    return false;
	  }
	  var share = action.share;
	  this.advance_phase();
	  return this.choose_share(player, share);
	},
	
	choose_share:function(player, share, buy){
	  if(this.game_state.shares[share] > 0){
	    player.shares[share] += 1;
	    if(buy){
	      player.money -= (this.game_state.share_prices[share] == 0 ? 5 : this.game_state.share_prices[share]);
	    }
  		this.game_state.shares[share] -= 1;
  		this.game_state.shares_array.remove(share);
  		return true;
	  }
	  return false;
	},
	
	roll_dice : function() {
		for (var i = 0; i < this.game_state.punts.length; i++) {
			var punt = this.game_state.punts[i];
			punt.position += (1 + Math.floor(Math.random() * 6));
			if(punt.position > 13 && punt.state == 1){
			  punt.order = this.get_punt_count(2);
  			punt.state = 2;
			}
		}
	},
	
	place_dude : function(action) {
		//assert it is the current player
		console.log("place");
		if(!this.is_correct_player(action)) {
		  console.log("not is_correct_player");
			return false;
		}
		//assert it is the correct turn
		
		var space = this.game_state.spaces[action.space_id];
		var player = this.game_state.players[action.player_id];
				
		//can't place on owned square
		if(space.owner != null) {
		  console.log("has owner");
			return false;
		}
		
		//check that you can afford it
		if(space.payment > player.money) {
		  console.log("invalid money");
			return false;
		}
		
		space.owner = action.player_id;

		player.money -= space.payment;
		this.next_player();
		this.advance_phase();
		return true;
	},
	
	choose_ware : function(action) {
		var ships = this.game_state.punts;
		ships[0].ware = action.first_ware;
		ships[1].ware = action.second_ware;
		ships[2].ware = action.third_ware;
		return true;
	},
	
	is_correct_player : function(action) {
		return action.player_id === this.game_state.current_player_id
	},
	
	init : function() {
		this.game_state = new GameState();
		return this;
	},
	
	advance_phase : function() {
		var end_of_placement = function(engine) {
			engine.game_state.acted_players = 0;
			engine.game_state.current_player_id = engine.game_state.captain_id;
			engine.roll_dice();
		}
		switch(this.game_state.phase) {
		  case -1:{   //waiting user_action phase
		    if(this.game_state.acted_players == this.game_state.players.length) {
		      this.game_state.phase = 0;
		      this.game_state.acted_players = 0;
		      this.start_auction();
	      }
	      break;
		  }
			case 3: {
				//check phase
				if(this.game_state.acted_players == this.game_state.players.length) {
					end_of_placement(this);
					this.game_state.phase += 1;
				}
				break;
			}
			case 4: {
				//check phase
				if(this.game_state.acted_players == this.game_state.players.length) {
					end_of_placement(this);
					this.game_state.phase += 1;
				}
				break;
			}
			
			case 5: {
				//check phase
				if(this.game_state.acted_players == this.game_state.players.length) {
					end_of_placement(this);
    			this.place_fail_punt();
					this.compute_round_score();
					this.compute_share_price();
					if(this.end_conditions_met()) {
						this.game_state.phase = 7; //game over
						this.game_state.started = false;
						this.find_out_winner();
					} else {
						this.game_state.phase = -1;
						//this.start_auction();
					}
				}
				break;
			}
			default:{
			  this.game_state.phase += 1;
			}
		}
		
	},
	
	end_conditions_met : function() {
		for(var share_name in this.game_state.share_prices) {
			if (this.game_state.share_prices[share_name] >= 30) {
				return true;
			}
		}
		return false;
	},
	
	find_out_winner:function(){
	  var players = this.game_state.players;
	  var max = 0;
	  var winner;
    for(var i=0; i<players.length; i++){
      if(players[i].total_score(this.game_state) > max){
        max = players[i].total_score(this.game_state);
        winner = players[i];
      }
    }
    this.game_state.winner = winner;
	},
	
	compute_round_score : function() {
		//tally up the score
		var ships_crossed = 0;
		var ships = this.game_state.punts;
		var players = this.game_state.players;
		for(var i = 0; i < ships.length; i++) {
			var ship = ships[i];
			if(ship.position > 13) {
				console.log("crossed:" + ship.ware.name)
				ships_crossed += 1;
				
				var spaces = this.spaces_with_ware(ship.ware.name, true);
				console.log("spaces with " + ship.ware.name + ":" + spaces.length);
				var loot = spaces.length === 0 ? 0 : ship.ware.earn / spaces.length;
				for(var j = 0; j < spaces.length; j++) {
					var space = spaces[j];
					players[space.owner].money += loot;
				}
			}
		}
		//now assign the rest of spaces
		var spaces = this.game_state.spaces;
		for(var i = 13; i < spaces.length; i++) {
			var space = spaces[i];
			if(space.owner !== null) {
				players[space.owner].money += space.earn;
			}
		}		
	},
	
	compute_share_price : function() {
	  var ships = this.game_state.punts;
		var players = this.game_state.players;
		for(var i = 0; i < ships.length; i++) {
			var ship = ships[i];
			if(ship.position > 13) {
			  this.game_state.share_prices[ship.ware.name] += (this.game_state.share_prices[ship.ware.name] < 10 ? 5 : 10);
		  }
	  }
  },
	
	spaces_with_ware : function(ware, skip_empty) {
		var spaces = this.game_state.spaces;
		var ret = [];
		for(var i = 0; i < spaces.length; i++) {
			var space = spaces[i];			
			if(skip_empty && space.owner === null) {
				continue;
			}

			if(space.ware === ware) {
				ret.push(space);
			}
		}
		return ret;
	}
	
}

module.exports = game_engine;