h_hggm_simpack.m

classdef h_hggm_simpack < matlab.apps.AppBase

    % Properties that correspond to app components
    properties (Access = public)
        HHGGMSimulationPackUIFigure   matlab.ui.Figure
        FileMenu                      matlab.ui.container.Menu
        SelectdatafileMenu            matlab.ui.container.Menu
        SelectoutputfolderMenu        matlab.ui.container.Menu
        ExitMenu                      matlab.ui.container.Menu
        ToolsMenu                     matlab.ui.container.Menu
        SimulationsMenu               matlab.ui.container.Menu
        GGSconvergenceandstatisticsMenu  matlab.ui.container.Menu
        HIGGSexampleinidealheadmodelMenu  matlab.ui.container.Menu
        HIGGSexampleinrealisticheadmodelMenu  matlab.ui.container.Menu
        HIGGSperformanceanalysisMenu  matlab.ui.container.Menu
        frequencydomainMenu           matlab.ui.container.Menu
        timedomainMenu                matlab.ui.container.Menu
        SSVEPMenu                     matlab.ui.container.Menu
        EEGECOGMenu                   matlab.ui.container.Menu
        AllAnalyzeMenu                matlab.ui.container.Menu
        HelpMenu                      matlab.ui.container.Menu
    end

    
    properties (Access = public)
        output_sourse % Description
        test_data_sourse
        downloaded
        data_url
        count
    end
    
    methods (Access = private)
        
        function result = get_test_data(app,simuling)
           
            result = false;
            file_path = strcat('properties',filesep,'properties.xml');
            root_tab =  'properties';
            parameter_name = "data_downloaded";
            app.count = find_xml_parameter(file_path,root_tab,parameter_name);
            app.count = string(app.count(1,2));
            if(app.count ~= "end")
                answer = questdlg('Did you download the data?', ...
                    'Select data', ...
                    'Yes I did','Download','Cancel','Close');
                % Handle response
                switch answer
                    case 'Yes I did'
                        [file,path] = uigetfile('*.zip');
                        if isequal(file,0)
                            disp('User selected Cancel');
                            return;
                        else
                            disp(['User selected ', fullfile(path,file)]);
                            f = dialog('Position',[300 300 250 80]);
                            
                            define_ico(f);
                           
                            iconsClassName = 'com.mathworks.widgets.BusyAffordance$AffordanceSize';
                            iconsSizeEnums = javaMethod('values',iconsClassName);
                            SIZE_32x32 = iconsSizeEnums(2);  % (1) = 16x16,  (2) = 32x32
                            jObj = com.mathworks.widgets.BusyAffordance(SIZE_32x32, 'Unpacking test data...');  % icon, label
                            
                            jObj.setPaintsWhenStopped(true);  % default = false
                            jObj.useWhiteDots(false);         % default = false (true is good for dark backgrounds)
                            javacomponent(jObj.getComponent, [50,10,150,80], f);
                            jObj.start;
                            pause(1);
                            try
                                disp(strcat("Unpacking test data......"));
                                exampleFiles = unzip(fullfile(path,file),pwd);
                            catch
                                delete(f);
                                errordlg('Unpackage error!!!','Error');
                                return;
                            end
                            jObj.stop;
                            jObj.setBusyText('All done!');
                            disp(strcat("All done!"));
                            pause(2);
                            delete(f);
                            msgbox('Completed unpackage!!!','Info');
                            first_file = strcat('EEG_ECOG',filesep,'data',filesep,'4-Head_Model',filesep,'Electrodes',filesep,'EcoG-elecs_Su.mat');
                            if(isfile(first_file))
                                change_xml_parameter(file_path,root_tab,[parameter_name],["end"],cell(0,0));
                                result = true;
                            else
                                errordlg('The selected package is not correct!!','Error');
                            end
                        end
                    case 'Download'
                        f = dialog('Position',[300 300 250 80]);
                        
                        define_ico(f);
                        
                        iconsClassName = 'com.mathworks.widgets.BusyAffordance$AffordanceSize';
                        iconsSizeEnums = javaMethod('values',iconsClassName);
                        SIZE_32x32 = iconsSizeEnums(2);  % (1) = 16x16,  (2) = 32x32
                        jObj = com.mathworks.widgets.BusyAffordance(SIZE_32x32, 'Downloading test data...');  % icon, label
                        
                        jObj.setPaintsWhenStopped(true);  % default = false
                        jObj.useWhiteDots(false);         % default = false (true is good for dark backgrounds)
                        javacomponent(jObj.getComponent, [50,10,150,80], f);
                        jObj.start;
                        pause(1);
                        try
                            disp(strcat("Downloading file......."));
                            jObj.setBusyText(strcat("Downloading file....... "));
                            
                            filename = strcat('H_HGGM_test_data.zip');
                            url = 'https://lstneuro-my.sharepoint.com/:u:/g/personal/cc-lab_neuroinformatics-collaboratory_org/Eae6DTYQUbNFgNDDPTbGIL8BRJU0LWXw1vb-qKXqgvCqHA?download=1';
                            matlab.net.http.HTTPOptions.VerifyServerName = false;
                            options = weboptions('Timeout',Inf,'RequestMethod','get' );
                            outfilename = websave(filename,url,options);
                              
                            change_xml_parameter(file_path,root_tab,[parameter_name],["end"],cell(0,0));
                        catch
                            delete(f);
%                             error_file =double(app.count) + 1;
                            error_msg = strcat('Download error .... ');
                            errordlg(error_msg,'Error');
                            return;                            
                        end
                        pause(1);
                        jObj.setBusyText('Unpacking test data...');
                         disp(strcat("Unpacking test data......"));
                        try 
                            exampleFiles = unzip(filename,pwd);
                            pause(1);
                            delete(filename);
                        catch
                            delete(f);
                            errordlg('Unpackage error!!!','Error');
                            return;
                        end
                        jObj.stop;
                        jObj.setBusyText('All done!');
                        disp(strcat("All done!"));
                        pause(2);
                        delete(f);
                        msgbox('Completed download!!!','Info');
                        result = true;
                    case 'Cancel'
                        result = false;
                        return;
                end
            else
                if(~simuling)
                    answer = questdlg('The test data has already been downloaded previously! Do you want to download again?', ...
                        'Select data', ...
                        'Yes I want','No','Cancel');
                    switch answer
                        case 'Yes I want'
                            change_xml_parameter(file_path,root_tab,[parameter_name],["1"],cell(0,0));
                            get_test_data(app,false);
                        case 'No'
                            result = true;
                            return;
                    end
                else
                    result = true;
                end
            end
        end
        
        function results = difine_paths(app)
            clc;
            addpath('common_functions');
            addpath('properties');
            addpath('EEG_ECOG');
            addpath('simulations/Sim1_hggm_convergence&jankova_conditions');
            addpath('simulations/Sim2_h_hggm_simplified_head_model');
            addpath('simulations/Sim3_h_hggm_realistic_head_model');
            addpath('simulations/Sim4_h_head_model_comparison');            
            addpath('simulations/Sim5_time_domain_comparison');
            addpath('simulations/Sim_data');
            addpath('ssvep');
        end
    end
    

    methods (Access = private)

        % Code that executes after component creation
        function startupFcn(app)
            clc;
            clear all;
            close all;
            addpath('common_functions');
            addpath('properties');
            addpath('EEG_ECOG');
            addpath('simulations/Sim1_hggm_convergence&jankova_conditions');
            addpath('simulations/Sim2_h_hggm_simplified_head_model');
            addpath('simulations/Sim3_h_hggm_realistic_head_model');
            addpath('simulations/Sim4_h_head_model_comparison');
            addpath('simulations/Sim5_time_domain_comparison');
            addpath('simulations/Sim_data');
            addpath('ssvep');
            
            
        end

        % Menu selected function: ExitMenu
        function ExitMenuSelected(app, event)
            delete(app) ;
        end

        % Menu selected function: GGSconvergenceandstatisticsMenu
        function GGSconvergenceandstatisticsMenuSelected(app, event)
            difine_paths(app)
            if(get_test_data(app,true))
                if(isempty( app.output_sourse) |  app.output_sourse==0)
                    app.output_sourse = uigetdir('tittle','Select the Output Folder');
                    if(app.output_sourse==0)
                        return;
                    end
                end
                Main_Jankova_test1(app.output_sourse);
                %Main_Jankova_test2(app.output_sourse);
                msgbox('Completed operation','Info');
            end
        end

        % Menu selected function: SSVEPMenu
        function SSVEPMenuSelected(app, event)
            difine_paths(app);
            if(get_test_data(app,true))
                if(isempty( app.output_sourse) |  app.output_sourse==0)
                    app.output_sourse = uigetdir('tittle','Select the Output Folder');
                    if(app.output_sourse==0)
                        return;
                    end
                end
                Main_SSVEP_AnalyzeData(app.output_sourse);
                msgbox('Completed operation','Info');
            end
        end

        % Menu selected function: HIGGSexampleinidealheadmodelMenu
        function HIGGSexampleinidealheadmodelMenuSelected(app, event)
            difine_paths(app);
            if(get_test_data(app,true))
                if(isempty( app.output_sourse) |  app.output_sourse==0)
                    app.output_sourse = uigetdir('tittle','Select the Output Folder');
                    if(app.output_sourse==0)
                        return;
                    end
                end
                Main_simplified_em_penalty_test(app.output_sourse);
                msgbox('Completed operation','Info');
            end
        end

        % Menu selected function: HIGGSexampleinrealisticheadmodelMenu
        function HIGGSexampleinrealisticheadmodelMenuSelected(app, event)
            difine_paths(app);
            if(get_test_data(app,true))
                if(isempty( app.output_sourse) |  app.output_sourse==0)
                    app.output_sourse = uigetdir('tittle','Select the Output Folder');
                    if(app.output_sourse==0)
                        return;
                    end
                end
                Main_realistic_em_penalty_test(app.output_sourse);
                msgbox('Completed operation','Info');
            end
        end

        % Callback function
        function HIGGSperformanceanalysisMenuSelected(app, event)
            
        end

        % Menu selected function: SelectoutputfolderMenu
        function SelectoutputfolderMenuSelected(app, event)
            app.output_sourse = uigetdir('tittle','Select the Source Folder');
            if(app.output_sourse==0)
                return;
            end
            % create_data_structure(folder);
        end

        % Menu selected function: AllAnalyzeMenu
        function AllAnalyzeMenuSelected(app, event)
            difine_paths(app)
            if(get_test_data(app,true))
                if(isempty( app.output_sourse) |  app.output_sourse==0)
                    app.output_sourse = uigetdir('tittle','Select the Output Folder');
                    if(app.output_sourse==0)
                        return;
                    end
                end
                Main_Jankova_test1(app.output_sourse);
                %Main_Jankova_test2(app.output_sourse);
                Main_simplified_em_penalty_test(app.output_sourse);
                Main_realistic_em_penalty_test(app.output_sourse);
                Main_H_HGGM_Head_Model_Comparison(app.output_sourse);
                Main_SSVEP_AnalyzeData(app.output_sourse);
                Main_EEG_ECOG_AnalyzeData(app.output_sourse);
                msgbox('Completed operation','Info');
            end
        end

        % Menu selected function: EEGECOGMenu
        function EEGECOGMenuSelected(app, event)
            difine_paths(app);
            if(get_test_data(app,true))
                if(isempty( app.output_sourse) |  app.output_sourse==0)
                    app.output_sourse = uigetdir('tittle','Select the Output Folder');
                    if(app.output_sourse==0)
                        return;
                    end
                end
                Main_EEG_ECOG_AnalyzeData(app.output_sourse);
                msgbox('Completed operation','Info');
            end
        end

        % Menu selected function: SelectdatafileMenu
        function SelectdatafileMenuSelected(app, event)
            get_test_data(app,false);
        end

        % Menu selected function: frequencydomainMenu
        function frequencydomainMenuSelected(app, event)
            difine_paths(app);
            if(get_test_data(app,true))
                if(isempty( app.output_sourse) ||  app.output_sourse==0)
                    app.output_sourse = uigetdir('tittle','Select the Output Folder');
                    if(app.output_sourse==0)
                        return;
                    end
                end
                Main_H_HGGM_Head_Model_Comparison(app.output_sourse);
                msgbox('Completed operation','Info');
            end
        end

        % Menu selected function: timedomainMenu
        function timedomainMenuSelected(app, event)
            % put function
            difine_paths(app);
            if(get_test_data(app,true))
                if(isempty( app.output_sourse) ||  app.output_sourse==0)
                    app.output_sourse = uigetdir('tittle','Select the Output Folder');
                    if(app.output_sourse==0)
                        return;
                    end
                end
                Main_HIGGS_TimeDomain(app.output_sourse);
                msgbox('Completed operation','Info');
            end
        end
    end

    % App initialization and construction
    methods (Access = private)

        % Create UIFigure and components
        function createComponents(app)

            % Create HHGGMSimulationPackUIFigure
            app.HHGGMSimulationPackUIFigure = uifigure;
            app.HHGGMSimulationPackUIFigure.Position = [100 100 588 410];
            app.HHGGMSimulationPackUIFigure.Name = 'H HGGM Simulation Pack';

            % Create FileMenu
            app.FileMenu = uimenu(app.HHGGMSimulationPackUIFigure);
            app.FileMenu.Text = 'File';

            % Create SelectdatafileMenu
            app.SelectdatafileMenu = uimenu(app.FileMenu);
            app.SelectdatafileMenu.MenuSelectedFcn = createCallbackFcn(app, @SelectdatafileMenuSelected, true);
            app.SelectdatafileMenu.Text = 'Select data file';

            % Create SelectoutputfolderMenu
            app.SelectoutputfolderMenu = uimenu(app.FileMenu);
            app.SelectoutputfolderMenu.MenuSelectedFcn = createCallbackFcn(app, @SelectoutputfolderMenuSelected, true);
            app.SelectoutputfolderMenu.Text = 'Select output folder';

            % Create ExitMenu
            app.ExitMenu = uimenu(app.FileMenu);
            app.ExitMenu.MenuSelectedFcn = createCallbackFcn(app, @ExitMenuSelected, true);
            app.ExitMenu.Text = 'Exit';

            % Create ToolsMenu
            app.ToolsMenu = uimenu(app.HHGGMSimulationPackUIFigure);
            app.ToolsMenu.Text = 'Tools';

            % Create SimulationsMenu
            app.SimulationsMenu = uimenu(app.ToolsMenu);
            app.SimulationsMenu.Text = 'Simulations';

            % Create GGSconvergenceandstatisticsMenu
            app.GGSconvergenceandstatisticsMenu = uimenu(app.SimulationsMenu);
            app.GGSconvergenceandstatisticsMenu.MenuSelectedFcn = createCallbackFcn(app, @GGSconvergenceandstatisticsMenuSelected, true);
            app.GGSconvergenceandstatisticsMenu.Text = 'GGS convergence and statistics';

            % Create HIGGSexampleinidealheadmodelMenu
            app.HIGGSexampleinidealheadmodelMenu = uimenu(app.SimulationsMenu);
            app.HIGGSexampleinidealheadmodelMenu.MenuSelectedFcn = createCallbackFcn(app, @HIGGSexampleinidealheadmodelMenuSelected, true);
            app.HIGGSexampleinidealheadmodelMenu.Text = 'HIGGS example in ideal head model';

            % Create HIGGSexampleinrealisticheadmodelMenu
            app.HIGGSexampleinrealisticheadmodelMenu = uimenu(app.SimulationsMenu);
            app.HIGGSexampleinrealisticheadmodelMenu.MenuSelectedFcn = createCallbackFcn(app, @HIGGSexampleinrealisticheadmodelMenuSelected, true);
            app.HIGGSexampleinrealisticheadmodelMenu.Text = 'HIGGS example in realistic head model';

            % Create HIGGSperformanceanalysisMenu
            app.HIGGSperformanceanalysisMenu = uimenu(app.SimulationsMenu);
            app.HIGGSperformanceanalysisMenu.Text = 'HIGGS performance analysis';

            % Create frequencydomainMenu
            app.frequencydomainMenu = uimenu(app.HIGGSperformanceanalysisMenu);
            app.frequencydomainMenu.MenuSelectedFcn = createCallbackFcn(app, @frequencydomainMenuSelected, true);
            app.frequencydomainMenu.Text = 'frequency domain';

            % Create timedomainMenu
            app.timedomainMenu = uimenu(app.HIGGSperformanceanalysisMenu);
            app.timedomainMenu.MenuSelectedFcn = createCallbackFcn(app, @timedomainMenuSelected, true);
            app.timedomainMenu.Text = 'time domain';

            % Create SSVEPMenu
            app.SSVEPMenu = uimenu(app.ToolsMenu);
            app.SSVEPMenu.MenuSelectedFcn = createCallbackFcn(app, @SSVEPMenuSelected, true);
            app.SSVEPMenu.Text = 'SSVEP';

            % Create EEGECOGMenu
            app.EEGECOGMenu = uimenu(app.ToolsMenu);
            app.EEGECOGMenu.MenuSelectedFcn = createCallbackFcn(app, @EEGECOGMenuSelected, true);
            app.EEGECOGMenu.Text = 'EEG-ECOG';

            % Create AllAnalyzeMenu
            app.AllAnalyzeMenu = uimenu(app.ToolsMenu);
            app.AllAnalyzeMenu.MenuSelectedFcn = createCallbackFcn(app, @AllAnalyzeMenuSelected, true);
            app.AllAnalyzeMenu.Text = 'All Analyze';

            % Create HelpMenu
            app.HelpMenu = uimenu(app.HHGGMSimulationPackUIFigure);
            app.HelpMenu.Text = 'Help';
        end
    end

    methods (Access = public)

        % Construct app
        function app = h_hggm_simpack

            % Create and configure components
            createComponents(app)

            % Register the app with App Designer
            registerApp(app, app.HHGGMSimulationPackUIFigure)

            % Execute the startup function
            runStartupFcn(app, @startupFcn)

            if nargout == 0
                clear app
            end
        end

        % Code that executes before app deletion
        function delete(app)

            % Delete UIFigure when app is deleted
            delete(app.HHGGMSimulationPackUIFigure)
        end
    end
end