ValidServidor.cs

using System;
using sage.ew.db;
using sage.ew.DiagnosticoAutomatico;
using sage.ew.DiagnosticoAutomatico.Diagnosticos;
using sage.ew.global;
using System.Collections.Generic;
using System.Data;
using sage.ew.functions;
using System.IO;
using System.Text;
using System.Linq;

namespace sage.ew.ewbase.Diagnostico
{
    public class ValidServidor
        : PruebaDiagnostica
    {
        private readonly string _SQLVersion = "Microsoft SQL Server 2019";

        public override System.Collections.Generic.IEnumerable<IResultadoPruebaDiagnostica> Ejecutar()
        {
            IResultadoPruebaDiagnostica loRes;
            List<IResultadoPruebaDiagnostica> loPruebas = new List<IResultadoPruebaDiagnostica>();

            if (CheckServidor())
            {
                //Validar si tiene la última versión del SQLSERVER.
                loPruebas.Add(CheckSQLServerVersion());
                //Comprobar memoria asignada al SQLSERVER
                loPruebas.Add(CheckSQLServerMemory(loPruebas.FirstOrDefault()));
                //Comprobar el estado de Live Update para validar si está en modo automático
                loPruebas.Add(CheckLiveUpdateStatus());
            }
            else
            {
                loRes = GetResultadoPreconfigurado();
                loRes.Resultado = TipoResultadoPruebaDiagnostica.Error;
                loRes.Descripcion = "Esta prueba diagnóstica solamente se puede ejecutar desde el servidor.";
                loPruebas.Add(loRes);
            }
            return loPruebas;
        }

        private bool CheckServidor()
        {
            string lcFile, lcContents;

            try
            {
                lcFile = Path.Combine(Convert.ToString(EW_GLOBAL._GetVariable("wc_iniservidor")), "CFGCLISRV.XML");

                if (File.Exists(lcFile))
                {
                    lcContents = File.ReadAllText(Path.Combine(Convert.ToString(EW_GLOBAL._GetVariable("wc_iniservidor")), "CFGCLISRV.XML"), ASCIIEncoding.Default);

                    return lcContents.LastIndexOf(Environment.MachineName) > 0;
                } 
            }
            catch 
            {
                
            }

            return false;

        }

        private IResultadoPruebaDiagnostica CheckSQLServerVersion()
        {
            string lcVersion;
            DataTable loDt = new DataTable();
            IResultadoPruebaDiagnostica loRes;

            loRes = GetResultadoPreconfigurado();
            loRes.Nombre = "Validar la versión de Microsoft SQL Server.";

            if (DB.SQLExec("SELECT @@version as version", ref loDt) && loDt.Rows.Count > 0)
            {
                lcVersion = Convert.ToString(loDt.Rows[0]["version"]);

                if (lcVersion.StartsWith(_SQLVersion))
                {
                    loRes.Resultado = TipoResultadoPruebaDiagnostica.Correcto;
                    loRes.Descripcion = $"La versión de Microsoft SQL Server es correcta.";
                }
                else
                {
                    loRes.Resultado = TipoResultadoPruebaDiagnostica.Warning;
                    loRes.Descripcion = $"La versión de Microsoft SQL Server del servidor no es {_SQLVersion}.";
                }
            }
            else
            {
                loRes.Resultado = TipoResultadoPruebaDiagnostica.Indeterminado;
                loRes.Descripcion = $"No se ha podido determinar la versión de Microsoft SQL Server."; 
            }

            FUNCTIONS._DisposeDatatable(loDt);

            return loRes;
        }

        private IResultadoPruebaDiagnostica CheckLiveUpdateStatus()
        {
            LiveUpdate loLiveUpate;
            IResultadoPruebaDiagnostica loRes;

            loRes = GetResultadoPreconfigurado();
            loRes.Nombre = "Comprobar si está en modo automático Live Update.";

            loLiveUpate = new LiveUpdate();

            if(loLiveUpate._LoadEntidad())
            {
                if (loLiveUpate._oEntidad._ModeCheck == "Automatic" && loLiveUpate._oEntidad._ModeDownload == "Automatic" && loLiveUpate._oEntidad._ModeInstall == "Automatic")
                {
                    loRes.Resultado = TipoResultadoPruebaDiagnostica.Correcto;
                    loRes.Descripcion = "Live Update está configurado en modo automático.";
                }
                else
                {
                    loRes.Resultado = TipoResultadoPruebaDiagnostica.Warning;
                    loRes.Descripcion = "Live Update no está configurado en modo automático.";
                }
            }
            else
            {
                loRes.Resultado = TipoResultadoPruebaDiagnostica.Indeterminado;
                loRes.Descripcion = "No se ha podido comprobar los datos de Live Update.";
            }

            return loRes;
        }

        private IResultadoPruebaDiagnostica CheckSQLServerMemory(IResultadoPruebaDiagnostica toRes)
        {
            int lnMemoryComputerGB;
            decimal lnMemorySQL = 0, lnMemorySQLGB, lnPercent;
            ulong lnMemoryComputer = 0;
            IResultadoPruebaDiagnostica loRes;
            DataTable loDt = new DataTable();

            loRes = GetResultadoPreconfigurado();
            loRes.Nombre = "Comprobar memoria asignada al Microsoft SQL Server.";

            try
            {
                if (toRes is IResultadoPruebaDiagnostica && toRes.Resultado == TipoResultadoPruebaDiagnostica.Correcto)
                {
                    if (DB.SQLExec("SELECT value_in_use as valor FROM sys.configurations WHERE name like '%max server memory%'", ref loDt) && loDt.Rows.Count > 0)
                    {
                        lnMemorySQL = Convert.ToDecimal(loDt.Rows[0]["valor"]);
                        lnMemoryComputer = new Microsoft.VisualBasic.Devices.ComputerInfo().TotalPhysicalMemory;

                        if (lnMemoryComputer == 0 || lnMemorySQL == 0) throw new Exception();

                        lnMemorySQLGB = Math.Round(lnMemorySQL / 1024, 2);

                        lnMemoryComputerGB = Convert.ToInt32(Math.Ceiling(lnMemoryComputer / (decimal)1024 / (decimal)1024 / (decimal)1024));

                        lnPercent = (lnMemorySQLGB / lnMemoryComputerGB) * 100;

                        loRes.Descripcion = $"La memoria destinada al Microsoft SQL Server ({lnMemorySQLGB}) es un {Convert.ToInt32(lnPercent)}% del total ({lnMemoryComputerGB}). ";

                        if (lnPercent > 25)
                        {
                            loRes.Resultado = TipoResultadoPruebaDiagnostica.Warning;
                            loRes.Descripcion += "Se recomienda que no supere el 25% del total.";
                        }
                        else
                        {
                            loRes.Resultado = TipoResultadoPruebaDiagnostica.Correcto;
                            loRes.Descripcion += "La memoria asignada al Microsoft SQL Server no supera el 25% del total.";
                        }
                    }
                }
                else
                {
                    loRes.Resultado = TipoResultadoPruebaDiagnostica.Indeterminado;
                    loRes.Descripcion = $"No se ha podido comprobar la memoria del Microsoft SQL Server.{Environment.NewLine}{toRes.Descripcion}";
                }
            }
            catch
            {
                loRes.Resultado = TipoResultadoPruebaDiagnostica.Indeterminado;

                if(lnMemoryComputer == 0 && lnMemorySQL == 0)
                {
                    loRes.Descripcion = $"No se ha podido comprobar la memoria .";
                }
                else if (lnMemoryComputer == 0 )
                {
                    loRes.Descripcion = $"No se ha podido comprobar la memoria del ordenador.";
                }
                else
                {
                    loRes.Descripcion = $"No se ha podido comprobar la memoria del Microsoft SQL Server.";
                }
            }
           

            return loRes;
        }


        public ValidServidor()
            : base(TipoCategoriaPruebaDiagnostica.Servidor, "Validaciones del servidor de Sage 50", "Comprueba la versión de SQLSERVER, memoria asignada y la configuración de LiveUpdate.")
        {

        }
    }
}