Connection sub backup: 10.02.2024

function startup()

connected_pcs={}

rednet.open("top")
connections=fs.open("connections","a")
connections.close()


  if not fs.exists("connection_code") then

  term.clear()
  term.setCursorPos(1,1)
  term.setTextColor(colors.green)
  print("Please enter the name you want to use to connect")
  print("to other PC´s")
  print()
  term.setTextColor(colors.white)
  connection_name=read()

  connection_code=fs.open("connection_code","w")
  connection_code.writeLine(connection_name)
  connection_code.flush()
  connection_code.close()

  end

  if not fs.exists("status") then

  status_save=fs.open("status","w")
  status_save.write("off")
  status_save.flush()
  status_save.close()

  end

assign_status()

assign_name()

assign_connections()


  if connected_pcs["name"][1]==nil then

  term.clear()
  term.setCursorPos(1,1)
  term.setTextColor(colors.green)
  print("Please enter the name of the PC you want to")
  print("connect to")
  print()
  term.setTextColor(colors.white)
  connecting_to=read()

  connections=fs.open("connections","w")
  connections.writeLine(connecting_to)
  connections.flush()
  connections.close()

  end

connected=false
assign_connections()

  if not connected then
    for i=1,250 do

    rednet.send(i,{["connecting_to"]=connecting_to,["name"]=connection_name})

    end
  end

  while not connected do
  info_1 ,info_2, info_3, info_4 = os.pullEvent()
    if info_1=="rednet_message" then
      if info_3["name"]==connecting_to and info_3["connecting_to"]==connection_name then
      connections=fs.open("connections","w")
      connections.writeLine(connecting_to)
      connections.writeLine(info_2)
      connections.flush()
      connections.close()
      connected=true
      end
    end
  end

assign_connections()

  for i=1,connected_pcs["len"] do
  rednet.send(connected_pcs["id"][i],{["sending_status"]=true,["sending_to"]=connected_pcs["name"][i],["name"]=connection_name,["status"]=status})
  end

  if status=="on" then
  redstone.setOutput("bottom",true)
  redstone.setOutput("top",true)
  redstone.setOutput("back",true)
  redstone.setOutput("front",true)
  redstone.setOutput("right",true)
  redstone.setOutput("left",true)
  end

  if status=="off" then
  redstone.setOutput("bottom",false)
  redstone.setOutput("top",false)
  redstone.setOutput("back",false)
  redstone.setOutput("front",false)
  redstone.setOutput("right",false)
  redstone.setOutput("left",false)
  end

end





function pull()

  while true do

  info_1, info_2, info_3, info_4 = os.pullEvent()

    if info_1=="rednet_message" and info_3["sending_to"]==connection_name then


      if info_3["status"]=="get_info" then
      rednet.send(info_2,{["sending_status"]=true,["sending_to"]=connected_pcs["name"][1],["name"]=connection_name,["status"]=status})
      end


      if info_3["status"]=="change_status" then

        if status=="on" then
        status="off"
        change_status()
        else
        status="on"
        change_status()
        end

      rednet.send(info_2,{["sending_status"]=true,["sending_to"]=connected_pcs["name"][1],["name"]=connection_name,["status"]=status})
      end


      if status=="on" then
      redstone.setOutput("bottom",true)
      redstone.setOutput("top",true)
      redstone.setOutput("back",true)
      redstone.setOutput("front",true)
      redstone.setOutput("right",true)
      redstone.setOutput("left",true)
      end

      if status=="off" then
      redstone.setOutput("bottom",false)
      redstone.setOutput("top",false)
      redstone.setOutput("back",false)
      redstone.setOutput("front",false)
      redstone.setOutput("right",false)
      redstone.setOutput("left",false)
      end


      if info_3["status"]=="disconnected" then
      fs.delete("connections")

      term.clear()
      term.setCursorPos(1,1)
      term.setTextColor(colors.green)
      print("Please enter the name of the PC you want to")
      print("connect to")
      print()
      term.setTextColor(colors.white)
      connecting_to=read()

      connections=fs.open("connections","w")
      connections.writeLine(connecting_to)
      connections.flush()
      connections.close()

        for i=1,250 do
        rednet.send(i,{["connecting_to"]=connecting_to,["name"]=connection_name})
        end

        connected=false

        while not connected do
        info_1 ,info_2, info_3, info_4 = os.pullEvent()
          if info_1=="rednet_message" then
            if info_3["name"]==connecting_to and info_3["connecting_to"]==connection_name then
            connections=fs.open("connections","w")
            connections.writeLine(connecting_to)
            connections.writeLine(info_2)
            connections.flush()
            connections.close()
            connected=true
            end
          end
        end

      end

    end

  end
end




















function change_status()

status_save = fs.open("status","w")

status_save.write(status)
status_save.flush()
status_save.close()
end



function assign_status()

status_save = fs.open("status","r")

status = status_save.readLine()
status_save.close()
end



function assign_connections()

connections=fs.open("connections","r")

connected_pcs["name"]={}
connected_pcs["len"]=0
connected_pcs["id"]={}
connected_pcs["id"][0]="0"
i=0
  while tonumber(connected_pcs["id"][i])~=nil do

  i=i+1

  connected_pcs["name"][i] = connections.readLine()
  connected_pcs["id"][i] = connections.readLine()


    if tonumber(connected_pcs["id"][i])~=nil then
    connected_pcs["len"]=connected_pcs["len"]+1
    connected_pcs["id"][i]=tonumber(connected_pcs["id"][i])
    connected=true
    end

  end
connections.close()
end






function assign_name()

connection_code = fs.open("connection_code","r")
connection_name = connection_code.readLine()
connection_code.close()

end













startup()
pull()