package dk.thoerup.bukkit.hoeruputils;

import java.io.BufferedReader;
import java.io.File;
import java.io.FileInputStream;
import java.io.InputStreamReader;

import org.bukkit.ChatColor;
import org.bukkit.Location;
import org.bukkit.Material;
import org.bukkit.World;
import org.bukkit.command.Command;
import org.bukkit.command.CommandExecutor;
import org.bukkit.command.CommandSender;
import org.bukkit.entity.Player;
import org.bukkit.plugin.Plugin;

public class TemplateCommand implements CommandExecutor {



	Plugin plugin;

	public TemplateCommand(Plugin plugin) {
		this.plugin = plugin;
	}

	@Override
	public boolean onCommand(final CommandSender sender, Command command, String label, String[] args) {
		if (! (sender instanceof Player) ) {
			sender.sendMessage( "this command can not be run from console" );
			return true;
		}

		Player player = (Player) sender;

		if (! sender.isOp() ) {
			sender.sendMessage( "you need to be op to run this command" );
			return true;
		}

		if ( args.length != 1) {
			sender.sendMessage( ChatColor.YELLOW + "Usage: /template <template-name>");
			return true;
		}		

		File templateFile = new File( plugin.getDataFolder(), "templates/" + args[0] + ".txt");		
		if (! templateFile.exists()  ) {
			sender.sendMessage( ChatColor.YELLOW + "Template not found" );
			return true;
		}	

		Material[][][] template;

		try {
			template = parseFile(templateFile);
			if( template == null) {
				sender.sendMessage( ChatColor.YELLOW + "Invalid template file" );
				return true;			
			}
		} catch (Exception e) {
			plugin.getLogger().info( e.getMessage() );
			sender.sendMessage( ChatColor.YELLOW + e.getMessage() );
			return true;
		}

		buildTemplate( player.getLocation(),  template, 1);
		buildTemplate( player.getLocation(),  template, 2);

		return false;
	}




	Material[][][] parseFile(File templateFile) throws Exception {


		int lines = 0;

		try (FileInputStream fis = new FileInputStream( templateFile );
				InputStreamReader isr = new InputStreamReader(fis);
				BufferedReader in = new BufferedReader( isr )
				) {
			
			
			String line = in.readLine();
			lines ++;
	
			if ( line.charAt(0) != '#') {
				throw new Exception( "Template: invalid start character" );
			}
			
			line = line.replace('#', ' ').trim();
			String dimensions[] = line.split(",");
	
			if ( dimensions.length != 3) {
				throw new Exception( "Template: invalid dimensions line" );
			}
			
			int xsize = Integer.parseInt(dimensions[0]);
			int ysize = Integer.parseInt(dimensions[1]);
			int zsize = Integer.parseInt(dimensions[2]);
	
			Material[][][] array = new Material[xsize][ysize][zsize];
	
			int x = 0;
			int y = 0;
	
	
			while ( (line = in.readLine() ) != null ) {
				lines++;
	
				line = line.trim();
				if (line.length() == 0)
					continue;
	
				if (line.charAt(0) == '#')
					continue;
				
				if ( y >= ysize) {
					throw new Exception( "Template: found more levels in file than specified in header" );
				}
	
				String elements[] = line.split(",");
				if (elements.length != zsize) {
					throw new Exception( "Template: invalid field count on line " + lines + ". Found " + elements.length + " but expected " + zsize );
				}
	
				for (int i=0; i<elements.length; i++) {
					
					String element[] = elements[i].trim().split("\\.");
	
					
					Material m;
					try {					
						m = Material.valueOf(element[0]);
					} catch (Exception e) {
						throw new Exception( "Template: invalid material on line " + lines + ": " + element[0] );
					}
					

					array[x][y][i] = m; 
				}
	
				x++;
				if (x >= xsize) {
					x = 0;
					y++;
				}
			}
	
			if (x != 0) {
				throw new Exception( "Template: not enough lines to complete the last level" );
			}
	
			if (y != ysize) {
				throw new Exception( "Template: not enough levels");		
			}
	
	
			return array;
			
		}

	}

	void buildTemplate(Location loc, Material[][][] template, int pass) {

		
		World world = loc.getWorld();
		for (int i=0; i<template.length; i++ ) {
			for (int j=0; j<template[0].length; j++) {
				for (int k=0; k<template[0][0].length; k++) {
					int x, y ,z;
					
					x = z = 0;
					
					y = loc.getBlockY() + j;
					if (y >= 255) {
						continue;
					}										
					
					switch ( getFacing(loc) ) {
					case 0: //west						
						x = loc.getBlockX() - k;					
						z = loc.getBlockZ() + i + 1;							
						break;
					case 1: //north
						x = loc.getBlockX() - i - 1;					
						z = loc.getBlockZ() - k;						
						break;						
					case 2: //east
						x = loc.getBlockX() + k;					
						z = loc.getBlockZ() - i - 1;
						break;
					case 3: //south
						x = loc.getBlockX() + i + 1;					
						z = loc.getBlockZ() + k;						
						break;						
					}



					
					Material mat = template[i][j][k]; 

					//plugin.getLogger().info(  String.format(  "Setting typeid at %d,%d,%d  to %d", x,y,z, type)  );

					//TODO: rewrite this to build a Set<Material> of skipped matterials
					if (pass == 1) {
						
						if ( mat == Material.TORCH || mat == Material.REDSTONE_TORCH || mat == Material.REDSTONE_WALL_TORCH) //torch / redstone torch							
							continue;
						
						if (mat == Material.ACACIA_DOOR || mat == Material.BIRCH_DOOR || mat == Material.DARK_OAK_DOOR ) //door / irondoor
							continue;
						
						if (mat == Material.SIGN) // sign
							continue;
						if (mat == Material.LADDER) // ladder
							continue;
						if (mat == Material.OAK_STAIRS) //TODO: need to take all star variants into account
							continue;						
					}
					

					world.getBlockAt(x, y, z).setType(mat);
					
				}
			}
		}

	}
	
	
	//yaw is left,right looking direction, 0=straight west
	int getFacing(Location loc) {
		int angle = (int) loc.getYaw();
		
		if (angle < 45) {
			return 0;
		} else if (angle < 135) {
			return 1; 
		} else if (angle < 225) {
			return 2;
		} else if (angle < 315) {
			return 3;
		} else {
			return 0;
		}
	}

}