-- Email Server (server.lua)
local modem = peripheral.find("modem")  -- Auto-detect modem
if not modem then
    print("No modem found!")
    return
end
rednet.open("front")  -- Open the modem on the "front" side

-- Read the EMS.txt file for email server information
local function readServerInfo()
    local file = fs.open("/disk/EMS.txt", "r")
    local serverInfo = file.readAll()
    file.close()
    return serverInfo
end

-- Function to handle incoming emails and store them
local function storeEmail(from, subject, message)
    local file = fs.open("/disk/emails/"..from..".txt", "a")
    file.writeLine("Subject: "..subject)
    file.writeLine("Message: "..message)
    file.writeLine("---------")
    file.close()
    print("Email stored from " .. from)
end

-- Listen for incoming email connections
while true do
    print("Waiting for connection...")
    local senderID, msg = rednet.receive()  -- Receive the message from client
    -- Debugging: Check the message content
    print("Received message from " .. senderID)
    print("Message content: " .. tostring(msg[1]))

    if msg[1] == "sendEmail" then
        -- Ensure correct message format
        if #msg >= 4 then
            local from = msg[2]
            local subject = msg[3]
            local message = msg[4]
            storeEmail(from, subject, message)
        else
            pr