--[[TODO
  ropebox rope break results in bottom rope dissapearing and bottom drop rope node to appear at the new bottom
  and rope does not drop anything!!!!
]]

local mod_name = "vines"
local average_height = 12
local spawn_interval = 90
-- Nodes
minetest.register_node("vines:rope_block", {
  description = "Rope",
  sunlight_propagates = true,
  paramtype = "light",
  tile_images = {
    "default_wood.png^vines_rope.png",
    "default_wood.png^vines_rope.png",
    "default_wood.png",
    "default_wood.png",
    "default_wood.png^vines_rope.png",
    "default_wood.png^vines_rope.png",
  },
  drawtype = "cube",
  groups = {choppy=2,oddly_breakable_by_hand=1},
  after_place_node = function(pos)
    local p = {x=pos.x, y=pos.y-1, z=pos.z}
    local n = minetest.get_node(p)
    if n.name == "air" then
      minetest.add_node(p, {name="vines:rope_end"})
    end
  end,
  after_dig_node = function(pos, node, digger)
    local p = {x=pos.x, y=pos.y-1, z=pos.z}
    local n = minetest.get_node(p)
    while n.name == 'vines:rope' do
      minetest.remove_node(p)
      p = {x=p.x, y=p.y-1, z=p.z}
      n = minetest.get_node(p)
    end
    if n.name == 'vines:rope_end' then
      minetest.remove_node(p)
    end
  end
})

minetest.register_node("vines:rope", {
  description = "Rope",
  walkable = false,
  climbable = true,
  sunlight_propagates = true,
  paramtype = "light",
  drop = "",
  tile_images = { "vines_rope.png" },
  drawtype = "plantlike",
  groups = {flammable=2, not_in_creative_inventory=1},
  sounds =  default.node_sound_leaves_defaults(),
  selection_box = {
    type = "fixed",
    fixed = {-1/7, -1/2, -1/7, 1/7, 1/2, 1/7},
  },
  on_destruct = function()
    
  end,
})

minetest.register_node("vines:rope_end", {
  description = "Rope",
  walkable = false,
  climbable = true,
  sunlight_propagates = true,
  paramtype = "light",
  drop = "",
  tile_images = { "vines_rope_end.png" },
  drawtype = "plantlike",
  groups = {flammable=2, not_in_creative_inventory=1},
  sounds =  default.node_sound_leaves_defaults(),
  after_place_node = function(pos)
    yesh  = {x = pos.x, y= pos.y-1, z=pos.z}
    minetest.add_node(yesh, {name="vines:rope"})
  end,
  selection_box = {
	  type = "fixed",
	  fixed = {-1/7, -1/2, -1/7, 1/7, 1/2, 1/7},
  },
})

minetest.register_node("vines:side", {
  description = "Vine",
  walkable = false,
  climbable = true,
  sunlight_propagates = true,
  paramtype = "light",
  paramtype2 = "wallmounted",
  tile_images = { "vines_side.png" },
  drawtype = "signlike",
  inventory_image = "vines_side.png",
  groups = {vines=1,leafdecay=1, snappy = 3,flammable=2, hanging_node=1, wood=1},
  sounds = default.node_sound_leaves_defaults(),
  selection_box = {
    type = "wallmounted",
  },
  on_construct = function(pos, placer)
    local p = {x=pos.x, y=pos.y, z=pos.z}
    local n = minetest.get_node(p)
    local walldir = n.param2
    local down=-1
    
    while math.random(0,average_height) > 1.0 do
      local pt = {x = p.x, y= p.y+down, z=p.z}
      local nt = minetest.get_node(pt)
      if nt.name == "air" then
        minetest.add_node(pt, {name=n.name, param2 = walldir})
        down=down-1
      else
        return
      end
    end
  end,
  on_punch = function(pos, node)
    local side = node.param2
    print(side)
    minetest.set_node(pos, {name="vines:side_rotten", param2=side})
  end,
  after_destruct = function(pos, node)
    local side = node.param2
    minetest.set_node(pos, {name="vines:side_rotten", param2=side})
  end,
})

minetest.register_node("vines:side_rotten", {
  description = "Vine",
  walkable = false,
  climbable = false,
  drop = "",
  sunlight_propagates = true,
  paramtype = "light",
  paramtype2 = "wallmounted",
  tile_images = { "vines_side_rotten.png" },
  drawtype = "signlike",
  inventory_image = "vines_side.png",
  groups = {snappy = 3,flammable=2, hanging_node=1, wood=1},
  sounds = default.node_sound_leaves_defaults(),
  selection_box = {
    type = "wallmounted",
  },
})

minetest.register_node("vines:willow", {
  description = "Vine",
  walkable = false,
  climbable = true,
  sunlight_propagates = true,
  paramtype = "light",
  paramtype2 = "wallmounted",
  tile_images = { "vines_willow.png" },
  drawtype = "signlike",
  inventory_image = "vines_willow.png",
  groups = {vines=1,leafdecay = 1, snappy = 3,flammable=2, hanging_node=1, wood=1},
  sounds = default.node_sound_leaves_defaults(),
  selection_box = {
    type = "wallmounted",
  },
  on_construct = function(pos, placer)
    local p = {x=pos.x, y=pos.y, z=pos.z}
    local n = minetest.get_node(p)
    local walldir = n.param2
    local down=-1
    
    while math.random(0,average_height) > 1.0 do
      local pt = {x = p.x, y= p.y+down, z=p.z}
      local nt = minetest.get_node(pt)
      if nt.name == "air" then
        minetest.add_node(pt, {name=n.name, param2 = walldir})
        down=down-1
      else
        return
      end
    end
  end,
  on_punch = function(pos, node)
    local side = node.param2
    print(side)
    minetest.set_node(pos, {name="vines:willow_rotten", param2=side})
  end,
  after_destruct = function(pos, node)
    local side = node.param2
    minetest.set_node(pos, {name="vines:willow_rotten", param2=side})
  end,
})

minetest.register_node("vines:willow_rotten", {
  description = "Vine",
  walkable = false,
  climbable = false,
  sunlight_propagates = true,
  paramtype = "light",
  drop = "",
  paramtype2 = "wallmounted",
  tile_images = { "vines_willow_rotten.png" },
  drawtype = "signlike",
  inventory_image = "vines_willow.png",
  groups = {snappy = 3,flammable=2, hanging_node=1, wood=1},
  sounds = default.node_sound_leaves_defaults(),
  selection_box = {
    type = "wallmounted",
  },
})

minetest.register_node("vines:root", {
  description = "Vine",
  walkable = false,
  climbable = true,
  sunlight_propagates = true,
  paramtype = "light",
  tile_images = { "vines_root.png" },
  drawtype = "plantlike",
  inventory_image = "vines_root.png",
  groups = {vines=1,snappy = 3,flammable=2, hanging_node=1, wood=1},
  sounds = default.node_sound_leaves_defaults(),
  selection_box = {
    type = "fixed",
    fixed = {-1/7, -1/2, -1/7, 1/7, 1/2, 1/7},
  },
})

minetest.register_node("vines:vine", {
  description = "Vine",
  walkable = false,
  climbable = true,
  sunlight_propagates = true,
  paramtype = "light",
  tile_images = { "vines_vine.png" },
  drawtype = "plantlike",
  inventory_image = "vines_vine.png",
  groups = {vines=1,snappy = 3,flammable=2, hanging_node=1, wood=1},
  sounds = default.node_sound_leaves_defaults(),
  selection_box = {
    type = "fixed",
    fixed = {-0.3, -1/2, -0.3, 0.3, 1/2, 0.3},
  },
  on_construct = function(pos, placer)
    local p = {x=pos.x, y=pos.y, z=pos.z}
    local n = minetest.get_node(p)
    local walldir = n.param2
    local down=-1
    
    while math.random(0,average_height) > 1.0 do
      local pt = {x = p.x, y= p.y+down, z=p.z}
      local nt = minetest.get_node(pt)
      if nt.name == "air" then
        minetest.add_node(pt, {name=n.name, param2 = walldir})
        down=down-1
      else
        return
      end
    end
  end,
})

minetest.register_node("vines:vine_rotten", {
  description = "Rotten vine",
  walkable = false,
  climbable = true,
  sunlight_propagates = true,
  paramtype = "light",
  tile_images = { "vines_vine_rotten.png" },
  drawtype = "plantlike",
  inventory_image = "vines_vine_rotten.png",
  groups = {snappy = 3,flammable=2, hanging_node=1, wood=1},
  sounds = default.node_sound_leaves_defaults(),
  selection_box = {
    type = "fixed",
    fixed = {-0.3, -1/2, -0.3, 0.3, 1/2, 0.3},
  },
})

--ABM
minetest.register_abm({
  nodenames = {"vines:vine", "vines:root"},
  interval = 700,
  chance = 8,
  action = function(pos, node, active_object_count, active_object_count_wider)
    local p = {x=pos.x, y=pos.y-1, z=pos.z}
    local n = minetest.get_node(p)
    if n.name == "air" then
      walldir = node.param2
      minetest.add_node(p, {name=node.name, param2 = walldir})
    end
  end
})

minetest.register_abm({
  nodenames = {"vines:rope_end"},
  interval = 1,
  chance = 1,
  action = function(pos, node, active_object_count, active_object_count_wider)
    local p = {x=pos.x, y=pos.y-1, z=pos.z}
    local n = minetest.get_node(p)
    --remove if top node is removed
    if  n.name == "air" then
      minetest.set_node(pos, {name="vines:rope"})
      minetest.add_node(p, {name="vines:rope_end"})
    end 
  end
})
--Craft
minetest.register_craft({
  output = 'vines:rope_block',
  recipe = {
    {'', 'default:wood', ''},
    {'', 'vines:side', ''},
    {'', 'vines:side', ''},
  }
})

minetest.register_craftitem("vines:vines", {
  description = "Vines",
  inventory_image = "vines_item.png",
})
--spawning
plantslib:spawn_on_surfaces({
  avoid_nodes = {"vines:vine"},
  avoid_radius = 5,
  spawn_delay = spawn_interval,
  spawn_plants = {"vines:vine"},
  spawn_chance = 10,
  spawn_surfaces = {"default:dirt_with_grass","default:dirt"},
  spawn_on_bottom = true,
  plantlife_limit = -0.9,
})

plantslib:spawn_on_surfaces({
  avoid_nodes = {"vines:vine", "vines:side"},
  avoid_radius = 3,
  spawn_delay = spawn_interval,
  spawn_plants = {"vines:side"},
  spawn_chance = 10,
  spawn_surfaces = {"group:leafdecay"},
  spawn_on_side = true,
  near_nodes = {"default:water_source", "default:jungletree"},
  near_nodes_size = 10,
  near_nodes_vertical = 5,
  near_nodes_count = 1,
  plantlife_limit = -0.9,
})

plantslib:spawn_on_surfaces({
  spawn_plants = {"vines:willow"},
  spawn_delay = spawn_interval,
  spawn_chance = 3,
  spawn_surfaces = {"moretrees:willow_leaves"},
  spawn_on_side = true,
  near_nodes = {"default:water_source"},
  near_nodes_size = 2,
  near_nodes_vertical = 5,
  near_nodes_count = 1,
  plantlife_limit = -0.9,
})

--Shears jojoa1997's shears
minetest.register_tool("vines:shears", {
	description = "Shears",
	inventory_image = "shears.png",
	wield_image = "shears.png",
	stack_max = 1,
	max_drop_level=3,
	tool_capabilities = {
    full_punch_interval = 1.0,
    max_drop_level=0,
    groupcaps={
      snappy={times={[3]=0.2}, maxwear=0.05, maxlevel=3},
      wool={times={[3]=0.2}, maxwear=0.05, maxlevel=3}
    }
  },
  on_use = function(itemstack, user, pointed_thing)
    if pointed_thing.under == nil then return end
    
    local n = minetest.get_node(pointed_thing.under)
        
    if minetest.get_node_group(n.name, "vines") ~= 0 then
      local inv = user:get_inventory()
      if inv then
				minetest.set_node(pointed_thing.under, {name="air"})
				inv:add_item("main", ItemStack(minetest.get_node(pointed_thing.under).name))
			end
      if not minetest.setting_getbool("creative_mode") then
			  itemstack:add_wear(65535/80)
		  end
    end
    return itemstack
  end,
})

minetest.register_craft({
	output = 'special_tools:shears',
	recipe = {
		{'', 'default:steel_ingot', ''},
		{'default:stick', 'default:wood', 'default:steel_ingot'},
		{'', '', 'default:stick'},
	}
})

print("[Vines] Loaded!")