package mods.natura.worldgen;

import java.util.Random;

import mods.natura.common.NContent;
import mods.natura.common.PHNatura;
import net.minecraft.block.Block;
import net.minecraft.init.Blocks;
import net.minecraft.util.MathHelper;
import net.minecraft.world.World;
import net.minecraft.world.gen.feature.WorldGenerator;

public class BushTreeGen extends WorldGenerator
{
    /** The base height of the tree */
    private final int baseHeight;

    /** Sets the metadata for the wood blocks used */
    private final int woodMetadata;

    /** Sets the metadata for the leaves used in huge trees */
    private final int leavesMetadata;

    public BushTreeGen(boolean par1, int height, int mdwood, int mdleaves)
    {
        super(par1);
        this.baseHeight = height;
        this.woodMetadata = mdwood;
        this.leavesMetadata = mdleaves;
    }

    int findGround (World world, int x, int y, int z)
    {
        boolean foundGround = false;
        int height = PHNatura.seaLevel + 64;
        do
        {
            height--;
            Block underID = world.getBlock(x, height, z);
            if (underID == Blocks.dirt || underID == Blocks.grass || height < PHNatura.seaLevel)
                foundGround = true;
        } while (!foundGround);
        return height + 1;
    }

    @Override
    public boolean generate (World world, Random random, int x, int y, int z)
    {
        int var6 = random.nextInt(3) + this.baseHeight;
        boolean var7 = true;

        y = findGround(world, x, y, z);

        if (y >= 1 && y + var6 + 1 <= 256)
        {
            int var8;
            int var10;
            Block var11;
            int var12;

            for (var8 = y; var8 <= y + 1 + var6; ++var8)
            {
                byte var9 = 2;

                if (var8 == y)
                {
                    var9 = 1;
                }

                if (var8 >= y + 1 + var6 - 2)
                {
                    var9 = 2;
                }

                for (var10 = x - var9; var10 <= x + var9 && var7; ++var10)
                {
                    for (int var111 = z - var9; var111 <= z + var9 && var7; ++var111)
                    {
                        if (var8 >= 0 && var8 < 256)
                        {
                            Block block12 = world.getBlock(var10, var8, var111);

                            if (block12 != null && !block12.isLeaves(world, var10, var8, var111) && block12 != Blocks.grass && block12 != Blocks.dirt && !block12.isWood(world, var10, var8, var111)
                                    && block12 != Blocks.sapling)
                            {
                                var7 = false;
                            }
                        }
                        else
                        {
                            var7 = false;
                        }
                    }
                }
            }

            if (!var7)
            {
                return false;
            }
            else
            {
                Block b8 = world.getBlock(x, y - 1, z);

                if ((b8 == Blocks.grass || b8 == Blocks.dirt) && y < 256 - var6 - 1)
                {
                    world.setBlock(x, y - 1, z, Blocks.dirt);
                    world.setBlock(x + 1, y - 1, z, Blocks.dirt);
                    world.setBlock(x, y - 1, z + 1, Blocks.dirt);
                    world.setBlock(x + 1, y - 1, z + 1, Blocks.dirt);
                    this.growLeaves(world, x, z, y + var6, 2, random);

                    for (int var14 = y + var6 - 2 - random.nextInt(4); var14 > y + var6 / 2; var14 -= 2 + random.nextInt(4))
                    {
                        float var15 = random.nextFloat() * (float) Math.PI * 2.0F;
                        int tempx1 = x + (int) (0.5F + MathHelper.cos(var15) * 4.0F);
                        int tempz1 = z + (int) (0.5F + MathHelper.sin(var15) * 4.0F);
                        //TODO should this actually be var8???
                        this.growLeaves(world, tempx1, var8, tempz1, 0, random);

                        for (int var13 = 0; var13 < 5; ++var13)
                        {
                            int tempx = x + (int) (1.5F + MathHelper.cos(var15) * var13);
                            int tempz = z + (int) (1.5F + MathHelper.sin(var15) * var13);
                            world.setBlock(tempx, var14 - 3 + var13 / 2, tempz, NContent.tree, this.woodMetadata, 0);
                        }
                    }

                    for (var10 = 0; var10 < var6; ++var10)
                    {
                        var11 = world.getBlock(x, y + var10, z);

                        if (var11 == null || var11.isLeaves(world, x, y + var10, z))
                        {
                            world.setBlock(x, y + var10, z, NContent.tree, this.woodMetadata, 0);

                            /*if (var10 > 0)
                            {
                                if (random.nextInt(3) > 0 && world.isAirBlock(x - 1, y + var10, z))
                                {
                                    world.setBlock( x - 1, y + var10, z, Block.vine , 8);
                                }

                                if (random.nextInt(3) > 0 && world.isAirBlock(x, y + var10, z - 1))
                                {
                                    world.setBlock( x, y + var10, z - 1, Block.vine , 1);
                                }
                            }*/
                        }

                        if (var10 < var6 - 1)
                        {
                            var11 = world.getBlock(x + 1, y + var10, z);

                            if (var11 == null || var11.isLeaves(world, x + 1, y + var10, z))
                            {
                                world.setBlock(x + 1, y + var10, z, NContent.tree, this.woodMetadata, 0);

                                /*if (var10 > 0)
                                {
                                    if (random.nextInt(3) > 0 && world.isAirBlock(x + 2, y + var10, z))
                                    {
                                        world.setBlock( x + 2, y + var10, z, Block.vine , 2);
                                    }

                                    if (random.nextInt(3) > 0 && world.isAirBlock(x + 1, y + var10, z - 1))
                                    {
                                        world.setBlock( x + 1, y + var10, z - 1, Block.vine , 1);
                                    }
                                }*/
                            }

                            var11 = world.getBlock(x + 1, y + var10, z + 1);

                            if (var11 == null || var11.isLeaves(world, x + 1, y + var10, z + 1))
                            {
                                world.setBlock(x + 1, y + var10, z + 1, NContent.tree, this.woodMetadata, 0);

                                /*if (var10 > 0)
                                {
                                    if (random.nextInt(3) > 0 && world.isAirBlock(x + 2, y + var10, z + 1))
                                    {
                                        world.setBlock( x + 2, y + var10, z + 1, Block.vine , 2);
                                    }

                                    if (random.nextInt(3) > 0 && world.isAirBlock(x + 1, y + var10, z + 2))
                                    {
                                        world.setBlock( x + 1, y + var10, z + 2, Block.vine , 4);
                                    }
                                }*/
                            }

                            var11 = world.getBlock(x, y + var10, z + 1);

                            if (var11 == null || var11.isLeaves(world, x, y + var10, z + 1))
                            {
                                world.setBlock(x, y + var10, z + 1, NContent.tree, this.woodMetadata, 0);

                                /*if (var10 > 0)
                                {
                                    if (random.nextInt(3) > 0 && world.isAirBlock(x - 1, y + var10, z + 1))
                                    {
                                        world.setBlock( x - 1, y + var10, z + 1, Block.vine , 8);
                                    }

                                    if (random.nextInt(3) > 0 && world.isAirBlock(x, y + var10, z + 2))
                                    {
                                        world.setBlock( x, y + var10, z + 2, Block.vine , 4);
                                    }
                                }*/
                            }
                        }
                    }

                    return true;
                }
                else
                {
                    return false;
                }
            }
        }
        else
        {
            return false;
        }
    }

    private void growLeaves (World par1World, int par2, int par3, int par4, int par5, Random par6Random)
    {
        byte var7 = 2;

        for (int var8 = par4 - var7; var8 <= par4; ++var8)
        {
            int var9 = var8 - par4;
            int var10 = par5 + 1 - var9;

            for (int var11 = par2 - var10; var11 <= par2 + var10 + 1; ++var11)
            {
                int var12 = var11 - par2;

                for (int var13 = par3 - var10; var13 <= par3 + var10 + 1; ++var13)
                {
                    int var14 = var13 - par3;

                    Block block = par1World.getBlock(var11, var8, var13);

                    if ((var12 >= 0 || var14 >= 0 || var12 * var12 + var14 * var14 <= var10 * var10) && (var12 <= 0 && var14 <= 0 || var12 * var12 + var14 * var14 <= (var10 + 1) * (var10 + 1))
                            && (par6Random.nextInt(4) != 0 || var12 * var12 + var14 * var14 <= (var10 - 1) * (var10 - 1))
                            && (block == null || block.canBeReplacedByLeaves(par1World, var11, var8, var13)))
                    {
                        par1World.setBlock(var11, var8, var13, NContent.floraLeaves, this.leavesMetadata, 0);
                    }
                }
            }
        }
    }
}