prs/prs.server/Forms/ServerGrid.cs

using System;
using System.Collections.Concurrent;
using System.Collections.Generic;
using System.Diagnostics;
using System.IO;
using System.Linq;
using System.Net;
using System.Reflection;
using System.Security.Policy;
using System.ServiceProcess;
using System.Threading;
using System.Threading.Tasks;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Media.Imaging;
using Comal.Classes;
using Comal.Stores;
using H.Pipes.Extensions;
using InABox.Client.IPC;
using InABox.Clients;
using InABox.Configuration;
using InABox.Core;
using InABox.Database;
using InABox.Database.SQLite;
using InABox.DeviceIdentifier;
using InABox.DynamicGrid;
using InABox.Scripting;
using InABox.Wpf.Editors;
using InABox.WPF;
using PRSClasses;
using PRSServer.Forms;
using PRSServer.Forms.DatabaseLicense;
using RestSharp;
using Method = RestSharp.Method;

namespace PRSServer
{
    public class ServerGrid : DynamicGrid<Server>
    {
        private Task _monitor;

        private ConcurrentBag<ServiceController> _services = new();
        
        private Button _channelButton;

        public ServerGrid()
        {
            Options.AddRange(DynamicGridOption.AddRows, DynamicGridOption.EditRows, DynamicGridOption.DeleteRows, DynamicGridOption.ShowHelp);
            ActionColumns.Add(new DynamicActionColumn(TypeImage) 
                { Position = DynamicActionColumnPosition.Start, ToolTip = TypeToolTip });
            ActionColumns.Add(new DynamicActionColumn(StateImage, StateAction)
                { Position = DynamicActionColumnPosition.End, ToolTip = StateToolTip });
            //ActionColumns.Add(new DynamicActionColumn(ConsoleImage, ConsoleAction)
            //    { Position = DynamicActionColumnPosition.End, ToolTip = StateToolTip });
            ActionColumns.Add(new DynamicMenuColumn(CreateServerMenu,ServerMenuStatus)
                { Position = DynamicActionColumnPosition.End, ToolTip = MenuToolTip });
            
            RowHeight = 40;
            FontSize = 14;

            _channelButton = AddButton("", Properties.Resources.autoupdate.AsBitmapImage(), "Change Update Channel", EditUpdateChannel_Click);

        }

        private DynamicMenuStatus ServerMenuStatus(CoreRow arg)
        {
            if (arg == null)
                return DynamicMenuStatus.Hidden;
            var type = arg.Get<Server, ServerType>(x => x.Type);
            var service = GetService(arg.Get<Server, string>(c => c.Key));
            var running = service?.Status == ServiceControllerStatus.Running;
            if ((type == ServerType.Database) || (type == ServerType.Web) || (type == ServerType.Schedule))
            {
                return running
                    ? DynamicMenuStatus.Enabled
                    : DynamicMenuStatus.Disabled;
            }
            return running
                ? DynamicMenuStatus.Enabled
                : DynamicMenuStatus.Hidden;
        }

        private void CreateServerMenu(DynamicMenuColumn column, CoreRow row)
        {
            if (row == null)
                return;
            var status = ServerMenuStatus(row);
            if (status == DynamicMenuStatus.Hidden)
                return;
            var type = row.Get<Server, ServerType>(x => x.Type);
            var key = row.Get<Server, String>(x => x.Key);

            column.AddItem(
                "View Console",
                Properties.Resources.target,
                (row) => StartConsole(row, key),
                null,
                status == DynamicMenuStatus.Enabled && !_consoles.ContainsKey(key)
            );

            if (type.Equals(ServerType.Database))
            {
                column.AddSeparator();
                column.AddItem(
                    "Custom Fields",
                    Properties.Resources.service,
                    (row) => EditCustomFields(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
                column.AddItem(
                    "Database Scripts", 
                    Properties.Resources.script, 
                    (row) => EditDatabaseScripts(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
                column.AddSeparator();
                column.AddItem(
                    "Update License", 
                    Properties.Resources.key,
                    (row) => UpdateDatabaseLicense(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
                column.AddSeparator();
                column.AddItem(
                    "Manage Deletions", 
                    Properties.Resources.delete,
                    (row) => ManageDeletions(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
            }
            else if (type.Equals(ServerType.Web))
            {
                column.AddSeparator();
                column.AddItem(
                    "Edit Templates", 
                    Properties.Resources.script,
                    (row) => EditWebTemplates(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
                column.AddItem(
                    "Edit Styles", 
                    Properties.Resources.css,
                    (row) => EditWebStyles(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
                column.AddItem(
                    "Edit Documents", 
                    Properties.Resources.pdf,
                    (row) => EditWebDocuments(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
                column.AddSeparator();
                column.AddItem(
                    "PRS Mobile Settings",
                    Properties.Resources.web,
                    (row) => PRSMobileSettings(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
            }
            else if (type.Equals(ServerType.Schedule))
            {
                column.AddSeparator();
                column.AddItem(
                    "Scheduled Scripts", 
                    Properties.Resources.script,
                    (row) => EditScheduledScripts(row), 
                    null, 
                    status == DynamicMenuStatus.Enabled
                );
            }

        }

        private ServiceController? GetService(string key)
        {
            return _services.FirstOrDefault(x => string.Equals(x.ServiceName, key));
        }

        protected override void ShowHelp(string slug)
        {
            base.ShowHelp("Server_Configuration");
        }

        #region Grid Handling

        protected override void Reload(Filters<Server> criteria, Columns<Server> columns, ref SortOrder<Server> sort,
            Action<CoreTable, Exception> action)
        {
            var table = new CoreTable();
            table.LoadColumns(typeof(Server));

            var sections = PRSService.GetConfiguration().LoadAll();

            Interlocked.Exchange(
                ref _services,
                new ConcurrentBag<ServiceController>(
                    ServiceController.GetServices().Where(x => sections.ContainsKey(x.ServiceName))
                )
            );

            foreach (var section in sections.OrderBy(x => x.Value.Type))
            {
                var server = section.Value.CreateServer(section.Key);
                var service = _services.FirstOrDefault(x => string.Equals(x.ServiceName, section.Key));
                var row = table.NewRow();
                table.LoadRow(row, server);
                table.Rows.Add(row);
            }

            action(table, null);

            if (_monitor == null)
                _monitor = Task.Run(() =>
                {
                    while (true)
                    {
                        try
                        {
                            var bRefresh = false;
                            foreach (var service in _services)
                            {
                                var oldstatus = service.Status;
                                service.Refresh();
                                bRefresh = bRefresh || service.Status != oldstatus;
                                /*if ((oldstatus != ServiceControllerStatus.Stopped) && (service.Status == ServiceControllerStatus.Stopped))
                                    Dispatcher.Invoke(() => StopConsole(service.ServiceName));*/
                            }

                            if (bRefresh)
                                Dispatcher.Invoke(() => { Refresh(false, true); });
                        }
                        catch (Exception e)
                        {
                        }

                        Task.Delay(500).Wait();
                    }
                });
        }

        // protected override void SelectItems(CoreRow[] rows)
        // {
        //     base.SelectItems(rows);
        //     if (rows != null && rows.Length == 1)
        //     {
        //         var type = rows.First().Get<Server, ServerType>(x => x.Type);
        //         DatabaseLicense.Visibility = Equals(type, ServerType.Database) ? Visibility.Visible : Visibility.Collapsed;
        //         DatabaseCustomFields.Visibility = Equals(type, ServerType.Database) ? Visibility.Visible : Visibility.Collapsed;
        //         DatabaseScripts.Visibility = Equals(type, ServerType.Database) ? Visibility.Visible : Visibility.Collapsed;
        //
        //         EditWebSettings.Visibility = Equals(type, ServerType.Web) ? Visibility.Visible : Visibility.Collapsed;
        //
        //         ScheduledScripts.Visibility = type == ServerType.Schedule ? Visibility.Visible : Visibility.Collapsed;
        //     }
        //     else
        //     {
        //         EditWebSettings.Visibility = Visibility.Collapsed;
        //         DatabaseLicense.Visibility = Visibility.Collapsed;
        //         DatabaseCustomFields.Visibility = Visibility.Collapsed;
        //         DatabaseScripts.Visibility = Visibility.Collapsed;
        //         ScheduledScripts.Visibility = Visibility.Collapsed;
        //     }
        // }

        protected override Server LoadItem(CoreRow row)
        {
            var key = row.Get<Server, string>(x => x.Key);
            var settings = PRSService.GetConfiguration(key).Load();
            return settings.CreateServer(key);
        }

        private string CreateKey(ServerType type)
        {
            var services = ServiceController.GetServices();
            var key = string.Format("PRS{0}", type.ToString());
            var i = 1;
            while (services.Any(x => string.Equals(key, x.ServiceName)))
                key = string.Format("PRS{0}_{1}", type.ToString(), i++);
            return key;
        }

        private void CreateMenu(ContextMenu parent, string header, ServerType server, Type properties)
        {
            var menu = new MenuItem();
            menu.Header = header;
            menu.Tag = properties;
            menu.Icon = new Image() { Source = _typeimages[server] };
            menu.IsCheckable = false;
            menu.Click += (o, e) =>
            {
                var itemtype = ((o as MenuItem)?.Tag as Type)!;
                var props = (Activator.CreateInstance(itemtype) as ServerProperties)!;
                if (EditProperties(properties, props, true))
                {
                    var server = CreateItem();
                    server.Key = CreateKey(props.Type());
                    server.Type = props.Type();
                    server.Properties = props;
                    SaveItem(server);
                    Refresh(false, true);
                }
            };
            parent.Items.Add(menu);
        }

        protected override void DoAdd()
        {
            var menu = new ContextMenu();
            CreateMenu(menu, "Database", ServerType.Database, typeof(DatabaseServerProperties));
            CreateMenu(menu, "GPS Connector", ServerType.GPS, typeof(GPSServerProperties));
            if (!Data.Rows.Any(r => r.Get<Server, ServerType>(c => c.Type) == ServerType.AutoDiscovery))
                CreateMenu(menu, "Auto Discovery", ServerType.AutoDiscovery, typeof(AutoDiscoveryServerProperties));
            CreateMenu(menu, "Scheduler", ServerType.Schedule, typeof(ScheduleServerProperties));
            CreateMenu(menu, "Web Service", ServerType.Web, typeof(WebServerProperties));
            if (!Data.Rows.Any(r => r.Get<Server, ServerType>(c => c.Type) == ServerType.Certificate))
                CreateMenu(menu, "HTTPS Certificate Engine", ServerType.Certificate, typeof(CertificateEngineProperties));
            menu.IsOpen = true;
        }

        protected override void DoEdit()
        {
            if (!SelectedRows.Any())
                return;

            var server = LoadItem(SelectedRows.First());

            var service = GetService(server.Key);
            var enabled = service == null || service.Status == ServiceControllerStatus.Stopped;

            if (EditProperties(server.Properties.GetType(), server.Properties, enabled))
            {
                server.Name = server.Properties.Name;
                SaveItem(server);
                Refresh(false, true);
            }
        }

        protected override void SaveItem(Server item)
        {
            var settings = new ServerSettings();
            settings.Type = item.Type;
            settings.Properties = Serialization.Serialize(item.Properties, false);

            PRSService.GetConfiguration(item.Key).Save(settings);

            ReconfigureService(item);
        }

        private bool isServiceChanged(Server server, ServiceController? service, string newDisplayName)
        {
            return newDisplayName != service?.DisplayName || (server.Properties.HasOriginalValue(x => x.Username) && server.Properties.GetOriginalValue(x => x.Username) != server.Properties.Username);
        }

        protected override bool CanDeleteItems(params CoreRow[] rows)
        {
            var bOK = true;
            foreach (var row in rows)
            {
                var service = GetService(row.Get<Server, string>(x => x.Key));
                if (service != null && service.Status != ServiceControllerStatus.Stopped)
                    bOK = false;
            }

            return bOK;
        }

        protected override void DeleteItems(params CoreRow[] rows)
        {
            foreach (var row in rows)
            {
                var key = row.Get<Server, string>(x => x.Key);

                Interlocked.Exchange(
                    ref _services,
                    new ConcurrentBag<ServiceController>(
                        _services.Where(x => !string.Equals(x.ServiceName, key))
                    )
                );

                PRSService.GetConfiguration(key).Delete();

                var serverType = row.Get<Server, ServerType>(x => x.Type);
                if (serverType == ServerType.Certificate)
                {
                    if (File.Exists(CertificateEngine.CertificateFile))
                    {
                        File.Delete(CertificateEngine.CertificateFile);
                    }
                }

                PRSServiceInstaller.UninstallService(key);
            }
        }

        protected override void DefineLookups(ILookupEditorControl sender, Server[] items)
        {
            if(sender.EditorDefinition is ComboLookupEditor lookup && lookup.Type == typeof(DatabaseServerLookupGenerator))
            {
                base.DefineLookups(sender, Data.Rows.Select(x => x.ToObject<Server>()).ToArray());
            }
            else
            {
                base.DefineLookups(sender, items);
            }
        }

        #endregion

        #region Server Configuration

        private bool EditUpdateChannel_Click(Button arg1, CoreRow[] arg2)
        {
            var settings = new LocalConfiguration<AutoUpdateSettings>().Load();
            var editable = settings.ToEditable();
            var buttons = new DynamicEditorButtons()
            {
                new DynamicEditorButton(
                    "",
                    Properties.Resources.help.AsBitmapImage(),
                    null,
                    (o, e) => base.ShowHelp("Automatic_Updates"))

            };
            propertyEditor = new DynamicEditorForm(typeof(EditableAutoUpdateSettings), null, buttons);
            propertyEditor.OnDefineEditor += PropertyEditor_OnDefineEditor;
            propertyEditor.OnDefineLookups += sender => DefineLookups(sender, new Server[] { });
            propertyEditor.Items = new BaseObject[] { editable };

            if (propertyEditor.ShowDialog() == true)
            {
                settings.FromEditable(editable);
                new LocalConfiguration<AutoUpdateSettings>().Save(settings);
            }

            return false;
        }

        private BaseEditor? PropertyEditor_OnDefineEditor(object item, DynamicGridColumn column)
        {
            if (string.Equals(column.ColumnName, "Elevated"))
                return new NullEditor();

            var result = GetEditor(item, column);
            if (result != null)
                result = result.CloneEditor();
            return result;
        }

        private void ReconfigureService(Server item)
        {
            var service = GetService(item.Key);
            var newDisplayName = "PRS - " + item.Properties.Name;
            string? username = item.Properties.Username;

            if (!isServiceChanged(item, service, newDisplayName)) return;

            string? password = null;
            if (!string.IsNullOrWhiteSpace(username))
            {
                var passwordEditor = new PasswordDialog(string.Format("Enter password for {0}", username));
                if(passwordEditor.ShowDialog() == true)
                {
                    password = passwordEditor.Password;
                }
                else
                {
                    password = null;
                }
            }
            else
            {
                username = null;
            }

            if (service == null)
                try
                {
                    using (new WaitCursor())
                    {
                        PRSServiceInstaller.InstallService(
                            item.Key,
                            item.Properties.Name,
                            newDisplayName,
                            username,
                            password
                        );
                    }
                }
                catch (Exception e)
                {
                    MessageBox.Show(string.Format("Error Installing {0}: {1}", item.Key, e.Message));
                }
            else
                try
                {
                    using (new WaitCursor())
                    {
                        PRSServiceInstaller.ChangeService(
                            item.Key,
                            item.Properties.Name,
                            newDisplayName,
                            username,
                            password
                        );
                    }
                }
                catch (Exception e)
                {
                    MessageBox.Show(string.Format("Error Configuring {0}: {1}", item.Key, e.Message));
                }
        }

        private DynamicEditorForm propertyEditor;

        public bool EditProperties(Type type, ServerProperties item, bool enabled)
        {
            var pages = new DynamicEditorPages();

            if (type == typeof(DatabaseServerProperties))
            {
                pages.Add(new SMSProviderGrid(!enabled));
            }

            var buttons = new DynamicEditorButtons();
            buttons.Add(
                "",
                Properties.Resources.help.AsBitmapImage(),
                item,
                (f, i) =>
                {
                    Process.Start(new ProcessStartInfo("https://prs-software.com.au/wiki/index.php/" + type.Name.SplitCamelCase().Replace(" ", "_"))
                        { UseShellExecute = true });
                }
            );
            propertyEditor = new DynamicEditorForm(type, pages, buttons);

            if(type == typeof(DatabaseServerProperties))
            {
                propertyEditor.OnSaveItem += (o, e) =>
                {
                    propertyEditor.UnloadEditorPages(pages, item, false);
                    propertyEditor.UnloadEditorPages(pages, item, true);
                };
            }

            propertyEditor.ReadOnly = !enabled;

            propertyEditor.OnDefineLookups += sender => DefineLookups(sender, new Server[] { });
            propertyEditor.Items = new BaseObject[] { item };

            return propertyEditor.ShowDialog() == true;
        }

        #endregion

        #region Service Start / Stop Actions

        private readonly Dictionary<int, BitmapImage> _stateimages = new()
        {
            { 0, Properties.Resources.warning.AsBitmapImage() },
            { (int)ServiceControllerStatus.Stopped, Properties.Resources.pause.AsBitmapImage() },
            { (int)ServiceControllerStatus.StartPending, Properties.Resources.working.AsBitmapImage() },
            { (int)ServiceControllerStatus.StopPending, Properties.Resources.working.AsBitmapImage() },
            { (int)ServiceControllerStatus.Running, Properties.Resources.tick.AsBitmapImage() },
            { (int)ServiceControllerStatus.ContinuePending, Properties.Resources.working.AsBitmapImage() },
            { (int)ServiceControllerStatus.PausePending, Properties.Resources.working.AsBitmapImage() },
            { (int)ServiceControllerStatus.Paused, Properties.Resources.pause.AsBitmapImage() }
        };

        private BitmapImage StateImage(CoreRow arg)
        {
            if (arg == null)
                return Properties.Resources.tick.AsBitmapImage();
            var service = GetService(arg.Get<Server, string>(c => c.Key));
            var state = service != null ? (int)service.Status : 0;
            return _stateimages[state];
        }

        private FrameworkElement StateToolTip(DynamicActionColumn arg1, CoreRow arg2)
        {
            if (arg2 == null)
                return null;
            var service = GetService(arg2.Get<Server, string>(c => c.Key));
            return arg1.TextToolTip(service != null ? "Current State: " + service.Status : "Not Installed");
        }
        
        private FrameworkElement MenuToolTip(DynamicActionColumn arg1, CoreRow arg2)
        {
            return arg2 != null ? arg1.TextToolTip("Server Options") : null;
        }

        private bool StateAction(CoreRow arg)
        {
            if (arg == null)
                return false;
            var key = arg.Get<Server, string>(c => c.Key);
            var service = GetService(arg.Get<Server, string>(c => c.Key));
            if (service != null)
            {
                Task? task;
                if (service.Status == ServiceControllerStatus.Running)
                {
                    task = Task.Run(() => { service.Stop(); });
                    //StopConsole(key);
                }
                else if (service.Status == ServiceControllerStatus.Stopped)
                {
                    task = Task.Run(() => {
                        service.Start();
                    });
                    StartConsole(arg,key);
                }
                else if (service.Status == ServiceControllerStatus.Paused)
                {
                    task = Task.Run(() => { service.Continue(); });
                }
                else
                {
                    MessageBox.Show(string.Format("Invalid Service State ({0})", service.Status.ToString()));
                    return false;
                }
                task?.ContinueWith((e) =>
                {
                    if (e.Exception?.InnerException is { } inner)
                    {
                        if(inner.InnerException != null)
                        {
                            MessageBox.Show(String.Format("Error while running service:\n{0}", inner.InnerException.Message));
                        }
                        else
                        {
                            MessageBox.Show(String.Format("Error while running service:\n{0}", inner.Message));
                        }
                        PRSServiceInstaller.UninstallService(arg.Get<Server, string>(x => x.Key));
                        Refresh(false, true);
                    }
                }, TaskScheduler.FromCurrentSynchronizationContext());

                return true;
            }

            MessageBox.Show("Cannot find Service - is it installed?");
            return false;
        }

        public void StopAll()
        {
            foreach (var service in _services.ToArray())
                if (service.Status == ServiceControllerStatus.Running)
                    Task.Run(() => { service.Stop(); });
        }

        #endregion

        #region Server Type Images

        private readonly Dictionary<ServerType, BitmapImage> _typeimages = new()
        {
            { ServerType.Database, Properties.Resources.database.AsBitmapImage() },
            { ServerType.GPS, Properties.Resources.gps.AsBitmapImage() },
            { ServerType.AutoDiscovery, Properties.Resources.autodiscover.AsBitmapImage() },
            { ServerType.Schedule, Properties.Resources.schedule.AsBitmapImage() },
            { ServerType.Web, Properties.Resources.web.AsBitmapImage() },
            { ServerType.Certificate, Properties.Resources.certificate.AsBitmapImage() }
        };

        private BitmapImage TypeImage(CoreRow arg)
        {
            if (arg == null)
                return Properties.Resources.help.AsBitmapImage();
            var type = arg.Get<Server, ServerType>(c => c.Type);
            return _typeimages[type];
        }
        
        private FrameworkElement TypeToolTip(DynamicActionColumn arg1, CoreRow arg2)
        {
            if (arg2 == null)
                return null;
            return arg1.TextToolTip(string.Format("{0} Service\nName: {1}",
                arg2.Get<Server, ServerType>(c => c.Type).ToString(),
                arg2.Get<Server, string>(c => c.Key)
            ));
        }

        #endregion

        #region Console Functions

        private BitmapImage ConsoleImage(CoreRow arg)
        {
            if (arg == null)
                return Properties.Resources.target.AsBitmapImage();
            var service = GetService(arg.Get<Server, string>(c => c.Key));
            var state = service != null ? (int)service.Status : 0;
            if (state == (int)ServiceControllerStatus.StartPending || state == (int)ServiceControllerStatus.Running)
                return Properties.Resources.target.AsBitmapImage();
            return null;
        }

        private bool ConsoleAction(CoreRow arg)
        {
            if (arg == null)
                return false;
            var key = arg.Get<Server, string>(c => c.Key);
            var service = GetService(key);
            var state = service != null ? (int)service.Status : 0;
            if (state == (int)ServiceControllerStatus.StartPending || state == (int)ServiceControllerStatus.Running)
                StartConsole(arg, key);

            return false;
        }

        private Dictionary<String, Tuple<Console,int>> _consoles = new Dictionary<string, Tuple<Console,int>>();

        private void StartConsole(CoreRow arg, string key)
        {
            if (_consoles.ContainsKey(key))
                return;
            
            var name = arg.Get<Server, string>(c => c.Name);
            var console = new Console(key, string.Format("{0} - {1}", key, name));
            var window = Window.GetWindow(this);

            int i = 0;
            while (_consoles.Any(x => x.Value.Item2 == i))
                i++;
            
            _consoles[key] = new Tuple<Console, int>(console, i);
            
            console.Top = window.Top + (i * 50);
            console.Left = window.Left + window.Width + 2 + (i*50);
            console.Height = window.Height;
            console.Closing += (o, e) =>
            {
                Console c = o as Console;
                if (_consoles.ContainsKey(c.ServiceName))
                    _consoles.Remove(c.ServiceName);
            };
            console.Show();
            
        }

        private void StopConsole(String key)
        {
            if (!_consoles.ContainsKey(key))
                return;
            Console console = _consoles[key].Item1;
            console.Close();
        }

        #endregion

        #region Individual Server Buttons

        // Check if a database server is running at the given url and port
        private bool IsDatabaseServerRunning(string url, int port)
        {
            var uri = new Uri(string.Format("{0}:{1}", url, port));
            var cli = new RestClient(uri);
            var req = new RestRequest("/classes", Method.GET) { Timeout = 20000 };

            try
            {
                var res = cli.Execute(req);
                if (res.StatusCode != HttpStatusCode.OK || res.ErrorException != null)
                    return false;
                return true;
            }
            catch (Exception e)
            {
            }

            return false;
        }

        // The following variables keep track of whether a database is currently being used, since if two people try to access two different databases,
        // terrible things will ensue.
        private int currentServerUsers;
        private string? currentServerURL;
        private int? currentServerPort;

        /// <summary>
        ///     Configures a server for the duration of an action
        /// </summary>
        /// <typeparam name="TProperties"></typeparam>
        /// <param name="row"></param>
        /// <param name="hostaddress"></param>
        /// <param name="portnumber"></param>
        /// <param name="action"></param>
        /// <param name="blocking">
        ///     If blocking is set to false, then currentServerUsers must be decreased by one manually once the
        ///     task finishes
        /// </param>
        private void ConfigureServer<TProperties>(
            CoreRow row,
            Func<TProperties, string> hostaddress,
            Func<TProperties, int> portnumber,
            Action action,
            bool blocking = true
        ) where TProperties : ServerProperties
        {
            try
            {
                if (row == null)
                    throw new Exception("No Row Selected!");

                var server = LoadItem(row);
                if (server == null)
                    throw new Exception("Unable to load Server!");

                var props = server.Properties as TProperties;
                if (props == null)
                    throw new Exception("Unable to Load Properties!");

                var url = hostaddress(props);
                var port = portnumber(props);

                using (new WaitCursor())
                {
                    if (!IsDatabaseServerRunning(url, port))
                        throw new Exception("Database Server is not available!");
                }

                if (action != null)
                {
                    if (currentServerUsers == 0)
                    {
                        if (currentServerURL != url || currentServerPort != port)
                        {
                            ConfigurationCache.ClearAll(ConfigurationCacheType.Global);
                            ConfigurationCache.ClearAll(ConfigurationCacheType.User);
                        }

                        currentServerURL = url;
                        currentServerPort = port;
                        currentServerName = null;
                        ClientFactory.SetClientType(typeof(JsonClient<>), "PRSServer", CoreUtils.GetVersion(), url, port, true);

                        // override the need to provide credentials when configuring the database
                        ClientFactory.SetBypass();
                    }
                    else
                    {
                        if (url != currentServerURL || port != currentServerPort)
                            throw new Exception(string.Format("A different Database Server ({0}:{1}) is currently in use!", currentServerURL,
                                currentServerPort));
                    }

                    currentServerUsers++;
                    action();
                    if (blocking) currentServerUsers--;
                }
            }
            catch (Exception e)
            {
                Logger.Send(LogType.Error, "", CoreUtils.FormatException(e));
                MessageBox.Show(e.Message);
            }
        }

        private string? currentServerName;
        private void ConfigureIPCServer<TProperties>(
            CoreRow row,
            Func<TProperties, string> hostPipeName,
            Action action,
            bool blocking = true
        ) where TProperties : ServerProperties
        {
            try
            {
                if (row == null)
                    throw new Exception("No Row Selected!");

                var server = LoadItem(row);
                if (server == null)
                    throw new Exception("Unable to load Server!");

                var props = server.Properties as TProperties;
                if (props == null)
                    throw new Exception("Unable to Load Properties!");

                var pipeName = DatabaseServerProperties.GetPipeName(hostPipeName(props));

                if (action != null)
                {
                    if (currentServerUsers == 0)
                    {
                        if (currentServerName != pipeName)
                        {
                            ConfigurationCache.ClearAll(ConfigurationCacheType.Global);
                            ConfigurationCache.ClearAll(ConfigurationCacheType.User);
                        }

                        currentServerPort = null;
                        currentServerURL = null;
                        currentServerName = pipeName;
                        ClientFactory.SetClientType(typeof(PipeIPCClient<>), "PRSServer", CoreUtils.GetVersion(), pipeName);
                        using (new WaitCursor())
                        {
                            if (!Client.Ping())
                            {
                                ClientFactory.ClearClientType();
                                throw new Exception("Database Server is not available!");
                            }
                        }

                        // override the need to provide credentials when configuring the database
                        ClientFactory.SetBypass();
                    }
                    else
                    {
                        if (pipeName != currentServerName)
                            throw new Exception(string.Format("A different Database Server ({0}) is currently in use!", currentServerName));
                    }

                    currentServerUsers++;
                    try
                    {
                        action();
                    }
                    finally
                    {
                        if (blocking) currentServerUsers--;
                    }
                }
            }
            catch (Exception e)
            {
                Logger.Send(LogType.Error, "", CoreUtils.FormatException(e));
                MessageBox.Show(e.Message);
            }
        }

        private void ConfigureLocalDatabase(
            CoreRow row,
            Action action
        )
        {
            try
            {
                if (row == null)
                    throw new Exception("No Row Selected!");

                var server = LoadItem(row);
                if (server == null)
                    throw new Exception("Unable to load Server!");

                var properties = server.Properties as DatabaseServerProperties;
                if (properties == null)
                    throw new Exception("Unable to Load Properties!");

                if (DbFactory.Provider == null || DbFactory.Provider is not SQLiteProvider sql || sql.URL != properties.FileName)
                {
                    ClientFactory.SetClientType(typeof(LocalClient<>), "PRSServer", CoreUtils.GetVersion(), "");
                    Progress.ShowModal("Configuring database", (progress) =>
                    {
                        DbFactory.Stores = CoreUtils.TypeList(
                            AppDomain.CurrentDomain.GetAssemblies(),
                            myType =>
                                myType.IsClass
                                && !myType.IsAbstract
                                && !myType.IsGenericType
                                && myType.GetInterfaces().Contains(typeof(IStore))
                        ).ToArray();

                        DbFactory.Provider = new SQLiteProvider(properties.FileName);
                        var deviceid = DeviceID.Value(properties.Port.ToString(), null);
                        DbFactory.Start(deviceid);

                        StoreUtils.GoogleAPIKey = properties.GoogleAPIKey;
                        PurchaseOrderStore.AutoIncrementPrefix = properties.PurchaseOrderPrefix;
                        JobStore.AutoIncrementPrefix = properties.JobPrefix;
                    });
                }

                action();
            }
            catch(Exception e)
            {
                Logger.Send(LogType.Error, "", CoreUtils.FormatException(e));
                MessageBox.Show(e.Message);
            }
        }
        
        private bool UpdateDatabaseLicense(CoreRow selectedrow)
        {
            ConfigureIPCServer<DatabaseServerProperties>(
                selectedrow,
                //x => "http://127.0.0.1",
                //x => x.Port,
                x => selectedrow.Get<Server, string>(x => x.Key),
                () =>
                {
                    //new LicenseRenewalForm().ShowDialog();
                    MessageBox.Show("Not yet implemented.");
                }
            );
            return false;
        }

        private bool ManageDeletions(CoreRow row)
        {
            ConfigureLocalDatabase(row, () =>
            {
                new DeletionsWindow().ShowDialog();
            });
            return false;
        }
        
        private bool EditCustomFields(CoreRow selectedrow)
        {
            ConfigureIPCServer<DatabaseServerProperties>(
                selectedrow,
                //x => "http://127.0.0.1",
                //x => x.Port,
                x => selectedrow.Get<Server, string>(x => x.Key),
                () => { new MasterList(typeof(CustomProperty), "Class", null, true).ShowDialog(); }
            );
            return false;
        }
        
        private bool EditDatabaseScripts(CoreRow selectedrow)
        {
            ConfigureIPCServer<DatabaseServerProperties>(
                selectedrow,
                //x => "http://127.0.0.1",
                //x => x.Port,
                x => selectedrow.Get<Server, string>(x => x.Key),
                () => { new MasterList(typeof(Script), "Section", null, true).ShowDialog(); }
            );
            return false;
        }
        
        private bool EditScheduledScripts(CoreRow selectedrow)
        {
            ConfigureIPCServer<ScheduleServerProperties>(
                selectedrow,
                x => x.Server,
                () => { new MasterList(typeof(ScheduledScript), "", null, true, typeof(ScheduledScriptsGrid)).ShowDialog(); }
            );
            return false;
        }

        private bool EditWebTemplates(CoreRow selectedRow)
        {
            ConfigureIPCServer<WebServerProperties>(
                selectedRow,
                x => x.Server,
                () =>
                {
                    var window = new MasterList(typeof(WebTemplate), "DataModel", "", true);
                    window.Closed += (e, args) => { currentServerUsers--; };
                    window.Show();
                },
                false
            );
            return false;
        }

        private bool EditWebStyles(CoreRow selectedRow)
        {
            ConfigureIPCServer<WebServerProperties>(
                selectedRow,
                x => x.Server,
                () =>
                {
                    var window = new MasterList(typeof(WebStyle), "Code", "", true);
                    window.Closed += (e, args) => { currentServerUsers--; };
                    window.Show();
                },
                false
            );
            return false;
        }

        private bool EditWebDocuments(CoreRow selectedRow)
        {
            ConfigureIPCServer<WebServerProperties>(
                selectedRow,
                x => x.Server,
                () =>
                {
                    var window = new MasterList(typeof(WebDocument), "Code", "", true);
                    window.Closed += (e, args) => { currentServerUsers--; };
                    window.Show();
                },
                false
            );
            return false;
        }

        private bool PRSMobileSettings(CoreRow selectedrow)
        {
            ConfigureIPCServer<WebServerProperties>(
                selectedrow,
                x => x.Server,
                () =>
                {
                    var editor = new DynamicEditorForm(typeof(WebSettings));
                    var settings = new GlobalConfiguration<WebSettings>().Load();

                    editor.Items = new[] { settings };

                    if (editor.ShowDialog() == true) new GlobalConfiguration<WebSettings>().Save(settings);
                }
            );
            return false;
        }

        #endregion
    }
}