module App
# == Packages ==
# set up Genie development environment. 
using GenieFramework
using Pkg
using Libz
using PlotlyBase
using julia_mzML_imzML 
@genietools

# == Code import ==
# add your data analysis code here or in the lib folder. Code in lib/ will be
# automatically loaded 

# == Reactive code ==
# add reactive code to make the UI interactive
@app begin
    # == Reactive variables ==
    # reactive variables exist in both the Julia backend and the browser with two-way synchronization
    # @out variables can only be modified by the backend
    # @in variables can be modified by both the backend and the browser
    # variables must be initialized with constant values, or variables defined outside of the @app block
    #@out test = "/test.bmp"#slash means it's getting the info from 'public' folder
    #mkdir("new_folder")
    @in file_route = ""
    @in file_name = ""
    @out warning_fr = ""
    @in Nmass = 0.0
    @in Tol = 0.0
    @in triqEnabled = false
    @out Disab_btn = false
    @in triqProb = 0.0
    @in triqColor = 0
    @in Main_Process = false
    @out indeximg = 0
    @out indeximgTriq = 0
    @out lastimg = 0
    @out lastimgTriq = 0
    @in ImgPlus = false
    @in ImgMinus = false
    @out test = "/.bmp"
    @in ImgPlusT = false
    @in ImgMinusT = false
    @out testT = "/.bmp"
    @in msg = ""
    @in msgimg = ""
    @in msgtriq = ""
    @out full_route = ""
    layoutSpectra = PlotlyBase.Layout(
        title = "Spectra Plot",
        xaxis = PlotlyBase.attr(
            title = "X Axis",
            showgrid = true
        ),
        yaxis = PlotlyBase.attr(
            title = "Y Axis",
            showgrid = true
        ),
        width = 450,
        height = 500
        )
    traceSpectra = PlotlyBase.scatter(x=[], y=[], mode="lines+markers")
    @out plotdata = [traceSpectra]
    @out plotlayout = layoutSpectra 
    
    # == Reactive handlers ==
    # reactive handlers watch a variable and execute a block of code when
    # its value changes
    @onchange triqEnabled begin
        if !triqEnabled
            triqProb = 0.0
            triqColor = 0
        end
    end
    @onchange file_name begin
        if contains(file_name,".imzML")
            warning_fr = ""
            full_route = joinpath( file_route, file_name )
        else
            warning_fr = "is not an imzML file"
        end
    end
    @onchange Nmass begin
        indeximg = Nmass
        indeximgTriq = Nmass
        lastimg = Nmass
        lastimgTriq = Nmass
    end
    
    # the onbutton handler will set the variable to false after the block is executed
    #/home/julian/Documentos/Cinvestav_2024/Web/Archivos IMZML/royaimg.imzML
    @onbutton Main_Process begin
        Disab_btn = true #We disable the button to avoid multiple requests
        indeximg = Nmass
        full_route = joinpath(file_route, file_name)
        if isfile(full_route) && Nmass > 0 && Tol > 0 && Tol <= 1
            msg = "File exists, Nmass=$(Nmass) Tol=$(Tol). Please do not press the start button until confirmation"
            spectra = LoadImzml(full_route)
            spectraMz = LoadMzml(full_route)
            msg = "File loaded. Please do not press the start button until confirmation"
            slice = GetSlice(spectra, Nmass, Tol)
            if triqProb != 0 # if we have TrIQ
                if triqColor < 1 || triqColor > 256
                    triqColor = 1
                end
                if triqProb < 0 || triqProb > 1
                    triqProb = 0.1
                end
                SaveBitmap(joinpath("public", "TrIQ_$(Int(Nmass)).bmp"),
                        TrIQ(slice, Int(triqColor), triqProb),
                        ViridisPalette)
                testT = "/TrIQ_$(Int(Nmass)).bmp" # we define the starting value of the images
                msgtriq = "TrIQ image with the Nmass of $(Int(Nmass))"
            else # if we don't
                SaveBitmap(joinpath("public", "$(Int(Nmass)).bmp"),
                        IntQuant(slice),
                        ViridisPalette)
                test = "/$(Int(Nmass)).bmp" # we define the starting value of the images
                msgimg = "image with the Nmass of $(Int(Nmass))"
            end
            msg = "The file has been created inside the 'public' folder of the app"
            traceSpectra = PlotlyBase.scatter(x = spectraMz[1, 1], y = spectraMz[2, 1], mode="lines+markers")
            plotdata = [traceSpectra] # we add the data of spectra to the plot
        else
            msg = "File does not exist or a parameter was not well inputted"
        end
        spectra = nothing # Important for memory cleaning
        slice = nothing
        GC.gc() # Trigger garbage collection
        Disab_btn = false
    end
    @onbutton ImgMinus begin
        indeximg-=1
        while !isfile("public/$(indeximg).bmp") && indeximg > 0
            indeximg -= 1
        end
        if(indeximg <= 0) #if it doesn't find a lower value image
            indeximg = lastimg
        end
        test = "/$(indeximg).bmp"
        msgimg = "image with the Nmass of $(indeximg)"
        lastimg = indeximg
    end
    @onbutton ImgPlus begin
        indeximg+=1
        while !isfile("public/$(indeximg).bmp") && indeximg < 2001
            indeximg += 1
        end
        if(indeximg >= 2001)
            indeximg = lastimg
        end
        test = "/$(indeximg).bmp"
        msgimg = "image with the Nmass of $(indeximg)"
        lastimg = indeximg
    end

    @onbutton ImgMinusT begin
        indeximgTriq-=1
        while !isfile("public/TrIQ_$(indeximgTriq).bmp") && indeximgTriq > 0
            indeximgTriq -= 1
        end
        if(indeximgTriq <= 0) #if it doesn't find a lower value image
            indeximgTriq = lastimgTriq
        end
        testT = "/TrIQ_$(indeximgTriq).bmp"
        msgtriq = "TrIQ image with the Nmass of $(indeximgTriq)"
        lastimgTriq = indeximgTriq
    end
    @onbutton ImgPlusT begin
        indeximgTriq+=1
        while !isfile("public/TrIQ_$(indeximgTriq).bmp") && indeximgTriq < 2001
            indeximgTriq += 1
        end
        if(indeximgTriq >= 2001)
            indeximgTriq = lastimgTriq
        end
        testT = "/TrIQ_$(indeximgTriq).bmp"
        msgtriq = "TrIQ image with the Nmass of $(indeximgTriq)"
        lastimgTriq = indeximgTriq
    end
    GC.gc() # Trigger garbage collection
end
# == Pages ==
# register a new route and the page that will be loaded on access
@page("/", "app.jl.html")
end

# == Advanced features ==
#=
- The @private macro defines a reactive variable that is not sent to the browser. 
This is useful for storing data that is unique to each user session but is not needed
in the UI.
    @private table = DataFrame(a = 1:10, b = 10:19, c = 20:29)

=#