#include "pdu_ctrl.h"
#include <QtWidgets/QStackedWidget>
#include <QSettings>
#include <QProcess>
#include <QCoreApplication>
#include <QSql>
#include <QSqlDatabase>
#include <QSqlQuery>
#include <QSqlError>
#include <QTextStream>
#include <QRegularExpression>
#include <QApplication>
#define READ_INI_STR(key, default_value) (settings.contains(key) ? settings.value(key).toString() : default_value)
#define READ_INI_INT(key, default_value) (settings.contains(key) ? settings.value(key).toInt() : default_value)

pdu_Ctrl* pdu_Ctrl::m_instance = nullptr;
QMutex pdu_Ctrl::mutex;

pdu_Ctrl::pdu_Ctrl(QObject *parent) : QObject(parent)
{
    m_nModbusSelect=0;
    m_nModbusAddress=0;//从机地址
    m_nModbusMSType=1;//主从
    m_nSaveData=0;
    nViewShowType=widgetType_Main;
    nSettingType=0;
    nChidIndex=0;
    nChidPHIndex=0;
    m_nAngle=0;
    isT_ACType=0;
    m_nSaveAngle=0;
    nMonway=2;
    memset(nButtonStatus,0,sizeof(nButtonStatus));
    //
}

void pdu_Ctrl::slot_setAngel(int nAngle)
{
    if(m_pAngleCtrl&&m_pWidget)
    {
        //m_pAngleCtrl->setPos(size().width()/2, size().height()/2);
        //m_pAngleCtrl->transform(width() / 2, height() / 2);
        m_pAngleCtrl->setRotation(nAngle);
        m_nAngle=nAngle;
        if(m_nAngle!=m_nSaveAngle)
        {
            m_nSaveAngle=m_nAngle;
            SetPDUInit();
        }
#ifdef RS485Type
        if(nAngle==0||nAngle==180)
        {
            m_pWidget->resize(m_nWidth+2, m_nHeight+2);
            if(nAngle==0)
            {
                m_pAngleCtrl->setPos(0,0);
            }else
            {
                m_pAngleCtrl->setPos(m_pWidget->size().width()-2,m_pWidget->size().height()-2);
            }
            //QRect pRect=size();
            qDebug()<<"x:"<<m_pWidget->geometry().x()<<"y:"<<m_pWidget->geometry().y()<<"Width:"<<m_pWidget->size().width()<<"Height:"<<m_pWidget->size().height();
        }else
        {
            m_pWidget->resize(m_nHeight+2,m_nWidth+2);
            if(nAngle==90)
            {
                m_pAngleCtrl->setPos(m_nWidth-2,0);

            }else
            {
                m_pAngleCtrl->setPos(0,m_nHeight-2);
            }
            qDebug()<<"x:"<<m_pWidget->geometry().x()<<"y:"<<m_pWidget->geometry().y()<<"Width:"<<m_pWidget->size().width()<<"Height:"<<m_pWidget->size().height();
        }
#else
        if(nAngle==0||nAngle==180)
        {
            m_pWidget->resize(m_nWidth, m_nHeight);
            if(nAngle==0)
            {
                m_pAngleCtrl->setPos(0,0);
            }else
            {
                m_pAngleCtrl->setPos(m_pWidget->size().width(),m_pWidget->size().height());
            }
            //QRect pRect=size();
            qDebug()<<"x:"<<m_pWidget->geometry().x()<<"y:"<<m_pWidget->geometry().y()<<"Width:"<<m_pWidget->size().width()<<"Height:"<<m_pWidget->size().height();
        }else
        {
            m_pWidget->resize(m_nHeight,m_nWidth);
            if(nAngle==90)
            {
                m_pAngleCtrl->setPos(m_nWidth,0);

            }else
            {
                m_pAngleCtrl->setPos(0,m_nHeight);
            }
            qDebug()<<"x:"<<m_pWidget->geometry().x()<<"y:"<<m_pWidget->geometry().y()<<"Width:"<<m_pWidget->size().width()<<"Height:"<<m_pWidget->size().height();
        }
#endif
        m_pWidget->m_nAngle=nAngle;
        m_pView->update();
    }
}

void pdu_Ctrl::slot_ClickBtn(int nButton)
{
    ButtonDown(nButton,BtnDown_C);
}

void pdu_Ctrl::slot_DClickBtn(int nButton)
{
    ButtonDown(nButton,BtnDown_C);
}

void pdu_Ctrl::slot_LClickBtn(int nButton)
{
    ButtonDown(nButton,BtnDown_L);
}

void pdu_Ctrl::slot_BtnClear(int nButton)
{
    ButtonDown(nButton,BtnDown_Null);
}

void pdu_Ctrl::InitData(Widget *pWidget, QGraphicsProxyWidget *pProxy, QGraphicsView *pView,int nWidth, int nHeight)
{
    m_pAngleCtrl=pProxy;
    m_pView=pView;
    m_pWidget=pWidget;
    m_nWidth= nWidth;
    m_nHeight = nHeight;
}

void pdu_Ctrl::ReadModbusInit()
{
    QString appPath = QCoreApplication::applicationDirPath();
    QSettings settings(appPath+"/smartPDU.ini",QSettings::IniFormat);
    m_nModbusAddress=READ_INI_INT("MODBUS/address",0);
    if(m_nModbusAddress>255||m_nModbusAddress<0)
    {
        m_nModbusAddress=0;
    }
    m_nModbusMSType=READ_INI_INT("MODBUS/MSType",1);//0：主机，1：从机
    qDebug()<<"modbus Config m_nModbusMSType="<<m_nModbusMSType<<" m_nModbusAddress="<<m_nModbusAddress;
    QSqlDatabase m_db;
    m_db=QSqlDatabase::addDatabase("QSQLITE");
    m_db.setDatabaseName(strSqliteAddress);
    qDebug()<<"modbus DB="<<strSqliteAddress;
    bool isDBOpen=false;
    if (m_db.open())
    {
        qDebug()<<"SQL Open Success";
        isDBOpen=true;
    }else
    {
        qDebug()<<"SQL Open Error";
        isDBOpen=false;
    }
    if(isDBOpen)
    {
        QSqlQuery sql_query(m_db);
        QString strSql=QString("SELECT *  FROM Table_DeviceInfo where product_id==1;");
        //qDebug()<<strSql;
        if (sql_query.exec(strSql))
        {
            while (sql_query.next())
            {
                m_nModbusAddress = sql_query.value("product_modbus_addr").toInt();
            }
        }else
        {
            qDebug()<<sql_query.lastError().text();
        }
    }
    m_db.close();
    qDebug()<<"modbus m_nModbusMSType="<<m_nModbusMSType<<" m_nModbusAddress="<<m_nModbusAddress;

    ReadPDUinit();
}

void pdu_Ctrl::SaveModbusInit()
{
    //QSettings settings("/root/run/app/smartPDU.ini",QSettings::IniFormat);
    QString appPath = QCoreApplication::applicationDirPath();
    updateIniValue(appPath+"/smartPDU.ini","MODBUS","address",QString::number(m_nModbusAddress));
    updateIniValue(appPath+"/smartPDU.ini","MODBUS","MSType",QString::number(m_nModbusMSType));
    //settings.setValue("MODBUS/address",m_nModbusAddress);
    //settings.setValue("MODBUS/MSType",m_nModbusMSType);//0：主机，1：从机
    QSqlDatabase m_db;
    m_db=QSqlDatabase::addDatabase("QSQLITE");
    m_db.setDatabaseName(strSqliteAddress);
    qDebug()<<strSqliteAddress;
    bool isDBOpen=false;
    if (m_db.open())
    {
        qDebug()<<"SQL Open Success";
        isDBOpen=true;
    }else
    {
        qDebug()<<"SQL Open Error";
        isDBOpen=false;
    }
    if(isDBOpen)
    {
        QSqlQuery sql_query(m_db);
        QString strSql=QString("UPDATE Table_DeviceInfo SET product_modbus_addr = %1 WHERE product_id==1").arg(m_nModbusAddress);
        //qDebug()<<strSql;
        if (!sql_query.exec(strSql))
        {
            qDebug()<<sql_query.lastError().text();
        }
    }
    m_db.close();


}

void pdu_Ctrl::ReadPDUinit()
{
    qDebug()<<"Read misc/rotate";
    QString appPath = QCoreApplication::applicationDirPath();
    QSettings settings(appPath+"/smartPDU.ini",QSettings::IniFormat);
    QString strRotate=READ_INI_STR("misc/rotate","0");
    QString strMonway=READ_INI_STR("webcfg/monway","2");
    nMonway=strMonway.toInt();
    qDebug()<<"misc/rotate="<<strRotate;
    qDebug()<<"webcfg/monway="<<strMonway;
    if(!strRotate.isEmpty())
    {
        m_nSaveAngle=strRotate.toInt();
        qDebug()<<"InitAngleStr="<<strRotate<<"InitAngleToint="<<m_nSaveAngle;
        m_nAngle=m_nSaveAngle;
        slot_setAngel(m_nAngle);
    }
    else
    {
        qDebug()<<"InitAngleStr="<<strRotate;
    }
    if(m_pWidget)m_pWidget->setMonwayType(nMonway);
}

void pdu_Ctrl::SetPDUInit()
{
    //QSettings settings("/root/run/app/smartPDU.ini",QSettings::IniFormat);
    QString strValue="\""+QString::number(m_nSaveAngle)+"\"";
    //settings.setValue("misc/rotate",strValue);
    QString appPath = QCoreApplication::applicationDirPath();
    updateIniValue(appPath+"/smartPDU.ini","misc","rotate",strValue);
}

bool pdu_Ctrl::updateIniValue(const QString &filePath, const QString &section, const QString &key, const QString &newValue)
{
        QFile file(filePath);
        if (!file.open(QIODevice::ReadWrite | QIODevice::Text)) {
            return false;
        }

        QTextStream in(&file);
        QStringList lines;
        bool inTargetSection = false;
        QRegularExpression sectionRe(R"(^\[(.*)\]\s*$)");
        QRegularExpression keyRe(R"(^\s*([^=]+)\s*=\s*(.*)\s*$)");

        // 逐行读取并处理
        while (!in.atEnd()) {
            QString line = in.readLine();
            QRegularExpressionMatch sectionMatch = sectionRe.match(line);
            if (sectionMatch.hasMatch()) {
                inTargetSection = (sectionMatch.captured(1) == section);
            } else if (inTargetSection) {
                QRegularExpressionMatch keyMatch = keyRe.match(line);
                if (keyMatch.hasMatch() && keyMatch.captured(1).trimmed() == key) {
                    // 替换目标键的值，保留原格式（如双引号）
                    line = QString("%1 = %2").arg(key, newValue);
                }
            }
            lines.append(line);
        }

        // 写回文件
        file.resize(0); // 清空原内容
        QTextStream out(&file);
        for (const QString& line : lines) {
            out << line << "\n";
        }
        file.close();
        return true;

}

void pdu_Ctrl::Main_UPBtnSet(BtnDownType nbtnType)
{
    qDebug()<<"Main_UPBtnSet";
    if(!m_pWidget)
    {
        return;
    }
    if(nbtnType==BtnDown_C)
    {
        qDebug()<<"pageUp";
        m_pWidget->pageUp();
    }

}

void pdu_Ctrl::Main_FunBtnSet(BtnDownType nbtnType)
{
    //中间按钮
    qDebug()<<"Main_FunBtnSet";
    if (nbtnType==BtnDown_C)
    {
        //在通道界面是显示三项通道
        if(m_pWidget)
        {
            int nNowIndex=m_pWidget->getShowPagIndex();
            qDebug()<<"NowIndex="<<nNowIndex;
            switch (nNowIndex) {
#ifdef RS485Type
#else
            case 1:
            case 2://CH通道界面如果是三项则切换至三项子通道界面
                {
                    if(isT_ACType==1)
                    {
                        lastACIndex=nNowIndex;
                        m_pWidget->setShowPHIndex(1);
                        ChangeView(widgetType_Main,4);
                    }
                }
                break;
            case 4://PH通道界面返回CH通道界面
                {
                    m_pWidget->setShowPHIndex(0);
                    ChangeView(widgetType_Main,lastACIndex);
                }
                break;
#endif
            default://其他界面
                //在显示主界面时是旋转窗口
                m_nAngle+=90;
                m_nAngle==360?m_nAngle=0:m_nAngle;
                qDebug()<<"nAngle:"<<m_nAngle;
                slot_setAngel(m_nAngle);
                qDebug()<<"slot_setAngel";
                break;
            }
        }

    }
    else
    {
        qDebug()<<"setSelectStatus";
        if(m_pWidget)
        {
            m_nModbusSelect=0;
            m_pWidget->CtrlBtnSet(0,m_nModbusAddress);
            m_pWidget->setSelectStatus(m_nModbusSelect);
            m_nSaveData=0;
        }
        //切换到modbus
        qDebug()<<"ChangeView";
        //nViewShowType=widgetType_Setting;
        ChangeView(widgetType_Setting,0);
    }

}

void pdu_Ctrl::Main_DownBtnSet(BtnDownType nbtnType)
{
    qDebug()<<"Main_DownBtnSet";
    if(!m_pWidget)
    {
        return;
    }
    if(nbtnType==BtnDown_C)
    {
        m_pWidget->pageDown();
        qDebug()<<"pageDown";
    }

}

void pdu_Ctrl::Setting_UPBtnSet(BtnDownType nbtnType)
{
    switch (nSettingType) {
    case settingMode_Modbus:
    {
        if(nbtnType==BtnDown_C)
        {//切换select
            if(m_pWidget)
            {
                switch (m_nModbusSelect) {
                case 0://address
                {
                    m_nModbusAddress+=1;
                    if(m_nModbusAddress>32)m_nModbusAddress=1;
                    m_pWidget->CtrlBtnSet(m_nModbusSelect,m_nModbusAddress);
                }break;
                case 1://SAVE
                {
                    //保存切换
                    m_nSaveData==0?m_nSaveData=1:m_nSaveData=0;
                    m_pWidget->CtrlBtnSet(m_nModbusSelect,m_nSaveData);
                }break;
                case 2://主从
                {
                    //主从切换
                    m_nModbusMSType==0?m_nModbusMSType=1:m_nModbusMSType=0;
                    m_pWidget->CtrlBtnSet(m_nModbusSelect,m_nModbusMSType);
                }break;
                }
            }
        }else if(nbtnType==BtnDown_L)
        {
            switch (m_nModbusSelect) {
            case 0://address
            {
                m_nModbusAddress+=5;
                if(m_nModbusAddress>255)m_nModbusAddress=0;
                if(m_pWidget)m_pWidget->CtrlBtnSet(m_nModbusSelect,m_nModbusAddress);
            }break;
            }
        }
    }break;
    case settingMode_IP:
    {

    }break;
    default:
        break;
    }
}

void pdu_Ctrl::Setting_FunBtnSet(BtnDownType nbtnType)
{
    switch (nSettingType) {
    case settingMode_Modbus:
    {
        if(nbtnType==BtnDown_C)
        {//切换select
            if(m_pWidget)
            {
                if(m_nModbusSelect==1&&m_nSaveData==1)//短按 FUN 保存YES回到前台。
                {
                    SaveModbusInit();
                    ChangeView(widgetType_Main,0);
                }else
                {
#ifdef RS485Type
                    m_nModbusSelect==0?m_nModbusSelect=1:m_nModbusSelect=0;
#endif
                    m_pWidget->setSelectStatus(m_nModbusSelect);
                }

            }
        }else if(nbtnType==BtnDown_L)
        {
            ChangeView(widgetType_Main,0);
        }
    }break;
    case settingMode_IP:
    {

    }break;
    default:
        break;
    }
}

void pdu_Ctrl::Setting_DownBtnSet(BtnDownType nbtnType)
{
    switch (nSettingType) {
    case settingMode_Modbus:
    {
        if(nbtnType==BtnDown_C)
        {//切换select
            if(m_pWidget)
            {
                switch (m_nModbusSelect) {
                case 0://address
                {
                    m_nModbusAddress-=1;
                    if(m_nModbusAddress<1)m_nModbusAddress=32;
                    m_pWidget->CtrlBtnSet(m_nModbusSelect,m_nModbusAddress);
                }break;
                case 1://SAVE
                {
                    //保存切换
                    m_nSaveData==0?m_nSaveData=1:m_nSaveData=0;
                    m_pWidget->CtrlBtnSet(m_nModbusSelect,m_nSaveData);
                }break;
                case 2://主从
                {
                    //主从切换
                    m_nModbusMSType==0?m_nModbusMSType=1:m_nModbusMSType=0;
                    m_pWidget->CtrlBtnSet(m_nModbusSelect,m_nModbusMSType);
                }break;
                }
            }
        }else if(nbtnType==BtnDown_L)
        {
            switch (m_nModbusSelect) {
            case 0://address
            {
                m_nModbusAddress-=5;
                if(m_nModbusAddress<0)m_nModbusAddress=255;
                if(m_pWidget)m_pWidget->CtrlBtnSet(m_nModbusSelect,m_nModbusAddress);
            }break;
            }
        }
    }break;
    case settingMode_IP:
    {

    }break;
    default:
        break;
    }
}

void pdu_Ctrl::ChangeView(WidgetType widgetType, int nIndex)
{
    if(!m_pWidget)
    {
        return;
    }
    if(widgetType!=nViewShowType)
    {
        qDebug()<<"Widget->ChangeView";
        m_pWidget->ChangeView(widgetType,0);
        nViewShowType=widgetType;
    }else
    {
        m_pWidget->ChangeView(widgetType,nIndex);
    }

}

void pdu_Ctrl::ResetAll()
{
#ifdef RS485IpType
    system("sh /mnt/UDISK/app/recovery.sh");
#else
    system("sh /opt/recovery.sh");
#endif
}

void pdu_Ctrl::RestartSys()
{
    system("reboot");
}

void pdu_Ctrl::ButtonDown(int nButtonID, BtnDownType nDownType)
{
    //规整按钮状态
    switch (nButtonID) {
        case GPIO_KEY1://1按钮
            nButtonStatus[0]=nDownType;
            break;
        case GPIO_KEY2:
            nButtonStatus[1]=nDownType;
            break;
        case GPIO_KEY3://3按钮
             nButtonStatus[2]=nDownType;
            break;
        default:
            break;
    }
    qDebug()<<"Key1="<<GPIO_KEY1<<" Type1="<<nButtonStatus[0];
    qDebug()<<"Key2="<<GPIO_KEY2<<" Type2="<<nButtonStatus[1];
    qDebug()<<"Key3="<<GPIO_KEY3<<" Type3="<<nButtonStatus[2];
    qDebug()<<"widgetType="<<nViewShowType;
    if(nDownType<0)
    {
        return;
    }
    //判断多键控制
    if(nButtonStatus[0]==2&&nButtonStatus[2]==2)
    {//恢复出厂设置
        ResetAll();
        return;
    }
    if(nButtonStatus[0]==2&&nButtonStatus[1]==2)
    {//重新启动
        RestartSys();
        return;
    }

    if(m_pWidget&&!m_pWidget->isHiddenMSGWidget())
    {
        if(nDownType==BtnDown_C||nDownType==BtnDown_D)
        {
            m_pWidget->ClickMSGBtn();
            return;
        }
    }
    if(nViewShowType==widgetType_Main)
    {
        qDebug()<<"widgetType="<<widgetType_Main;
        qDebug()<<"nButtonID="<<nButtonID;
        switch (nButtonID) {
        case GPIO_KEY1://1按钮
            Main_UPBtnSet(nDownType);
            break;
        case GPIO_KEY2:
            Main_FunBtnSet(nDownType);
            break;
        case GPIO_KEY3://3按钮
            Main_DownBtnSet(nDownType);
            break;
        default:
            break;
        }

    }else if(nViewShowType==widgetType_Setting)
    {
        qDebug()<<"widgetType="<<widgetType_Setting;
        qDebug()<<"nButtonID="<<nButtonID;
        switch (nButtonID) {
        case GPIO_KEY1://1按钮
            Setting_UPBtnSet(nDownType);
            break;
        case GPIO_KEY2:
            Setting_FunBtnSet(nDownType);
            break;
        case GPIO_KEY3://3按钮
            Setting_DownBtnSet(nDownType);
            break;
        default:
            break;
        }
    }
}