sort

--[[ search: Opens ID.txt as a file handle to read, then reads each line. Each line is unserialized (ID.txt is a document full of serialized tables), and compared to the parameters passed. This function is used to check if the item being sorted is already listed, in which it determines which box the items will be sorted to. Otherwise, it is temporarily marked as a "Router" item and placed in the miscellaneous chest.
Parameters: item (name of item, acquired from openCCsensors Inventory Sensorcard), itemID (acquired from turtle item analyzer).
Returns: line if found, and nil if not.

move: Moves to the location passed to it (an integer value). The current position is always recorded, and the box position is found in the chests table.
Parameters: chest (integer)
Returns: nil

takeItems: Backs the turtle up to position 0, then sucks items from the chest above it. If items are sucked, it will continue to suck until inventory is full or if there are no items left in the chest.
Parameters: none.
Returns: nil

sortItems: Uses the Inventory sensorcard to gather details about its own inventory. Each slot is selected, the type is identified (via the search function), and the item is placed in the appropriate box. If the item is marked as "Trash", the item is dropped below to void pipes. If the item is not listed, it is placed in the miscellaneous chest.
Parameters: none.
Returns: nil.
]]--

term.clear()
term.setCursorPos(1,1)
os.loadAPI("ocs/apis/sensor")

local a=peripheral.wrap("right")
local t=sensor.wrap("left")
local turtleSorter
local chest
local itemsSucked
local itemsInInventory
local currentPosition = 0
local chests = {"Tool","Dust","Thaumcraft","Plants","Mob/Animal","Food"}

local function search(item, itemID)
    local line
    local itemList = fs.open("ID.txt","r")
    while true do
        line = itemList.readLine()
        if line == nil then
            line = {type="Router"}
            itemList.close()
            return line
        end
        line = textutils.unserialize(line) -- Search each line in ID.txt until item is found.
        if (line.name == item.Name or line.name == item.RawName) and line.ID == itemID then
            itemList.close()
            return line
        end
    end
    itemList.close()
end

local function move(chest)
    while currentPosition ~= chest do
        if currentPosition > chest then
            turtle.back()
            currentPosition = currentPosition - 1
        elseif currentPosition < chest then
            turtle.forward()
            currentPosition  = currentPosition + 1
        end
    end
end

local function takeItems()
    itemsInInventory = false
    while turtle.back() do end --Intentionally empty, loop breaks when turtle hits starting position.
    while not itemsInInventory do
        if turtle.suckUp() then
            for n=2,15 do
                turtle.suckUp()
            end
        end
        for n=1,15 do
            if turtle.getItemCount(n) ~= 0 then
                itemsInInventory = true
                break
            end
        end
        if itemsInInventory == false then
            term.clear()
            term.setCursorPos(1,1)
            print("No items to sort.")
        end
    end
    currentPosition = 0
end


local function sortItems() -- Takes an item and does appropriate work per item type.
    turtleSorter = t.getTargetDetails("0,0,0")
    local turtleInventory = turtleSorter.Slots
    for n=1,15 do
        if turtle.getItemCount(n) ~= 0 then
            turtle.select(n)
            local item = search(turtleSorter.Slots[n], a.getBlockId())
            for index,itemType in ipairs(chests) do
                if item.type==itemType then
                    move(index)
                    print("Placing "..item.name.." in "..itemType.." Box")
                turtle.dropUp()
                end
            end
            if item.type=="Trash" then
                if currentPosition == 0 then
                    move(1)
                end
                turtle.dropDown()
            elseif item.type =="Router" then
                move(6)
                print("Placing "..turtleInventory[n].Name.." in Router")
                turtle.drop()
                sleep(2)
                turtle.turnRight()
                redstone.setOutput("front",true)
                sleep(.1)
                redstone.setOutput("front",false)
                turtle.turnLeft()
            end
        end
    end
end

while true do
    takeItems()
    sortItems()
    sleep(3)
end