/* Copyright 2023 Dual Tachyon
 * https://github.com/DualTachyon
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 *     Unless required by applicable law or agreed to in writing, software
 *     distributed under the License is distributed on an "AS IS" BASIS,
 *     WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 *     See the License for the specific language governing permissions and
 *     limitations under the License.
 */

#include <string.h>

#include "app/chFrScanner.h"
#ifdef ENABLE_FMRADIO
#include "app/fm.h"
#endif
#include "app/scanner.h"
#include "bitmaps.h"
#include "driver/keyboard.h"
#include "driver/st7565.h"
#include "external/printf/printf.h"
#include "functions.h"
#include "helper/battery.h"
#include "misc.h"
#include "settings.h"
#include "ui/battery.h"
#include "ui/helper.h"
#include "ui/ui.h"
#include "ui/status.h"

void UI_DisplayStatus()
{
    uint8_t     *line = gStatusLine;
    unsigned int x    = 0;
    unsigned int x1   = 0;

    gUpdateStatus = false;

    memset(gStatusLine, 0, sizeof(gStatusLine));

    // **************

    // POWER-SAVE indicator
    if (gCurrentFunction == FUNCTION_TRANSMIT)
    {
        memmove(line + x, BITMAP_TX, sizeof(BITMAP_TX));
        x1 = x + sizeof(BITMAP_TX);
    }
    else
    if (gCurrentFunction == FUNCTION_RECEIVE ||
        gCurrentFunction == FUNCTION_MONITOR ||
        gCurrentFunction == FUNCTION_INCOMING)
    {
        memmove(line + x, BITMAP_RX, sizeof(BITMAP_RX));
        x1 = x + sizeof(BITMAP_RX);
    }
    else
    if (gCurrentFunction == FUNCTION_POWER_SAVE)
    {
        memmove(line + x, BITMAP_POWERSAVE, sizeof(BITMAP_POWERSAVE));
        x1 = x + sizeof(BITMAP_POWERSAVE);
    }
    x += sizeof(BITMAP_POWERSAVE);

#ifdef ENABLE_NOAA
    // NOASS SCAN indicator
		if (gIsNoaaMode)
		{
			memmove(line + x, BITMAP_NOAA, sizeof(BITMAP_NOAA));
			x1 = x + sizeof(BITMAP_NOAA);
		}
		x += sizeof(BITMAP_NOAA);
#else
    // hmmm, what to put in it's place
#endif

#ifdef ENABLE_DTMF_CALLING
    if (gSetting_KILLED)
	{
		memset(line + x, 0xFF, 10);
		x1 = x + 10;
	}
	else
#endif
    {
        // SCAN indicator
        if (gScanStateDir != SCAN_OFF || SCANNER_IsScanning())
        {
            char * s = "";
            if (IS_MR_CHANNEL(gNextMrChannel) && !SCANNER_IsScanning())
            {	// channel mode
                switch(gEeprom.SCAN_LIST_DEFAULT) {
                    case 0: s = "1"; break;
                    case 1: s = "2"; break;
                    case 2: s = "*"; break;
                }
            }
            else
            {	// frequency mode
                s = "S";
            }
            UI_PrintStringSmallBuffer(s, line + x);
            x1 = x + 7;
        }
    }
    x += 7;  // font character width

#ifdef ENABLE_VOICE
    // VOICE indicator
		if (gEeprom.VOICE_PROMPT != VOICE_PROMPT_OFF)
		{
			memmove(line + x, BITMAP_VoicePrompt, sizeof(BITMAP_VoicePrompt));
			x1 = x + sizeof(BITMAP_VoicePrompt);
		}
		x += sizeof(BITMAP_VoicePrompt) + 1;
#else
    // hmmm, what to put in it's place
#endif

    x++;
    if(!SCANNER_IsScanning()) {
        uint8_t dw = (gEeprom.DUAL_WATCH != DUAL_WATCH_OFF) + (gEeprom.CROSS_BAND_RX_TX != CROSS_BAND_OFF) * 2;
        if(dw == 1 || dw == 3) { // DWR - dual watch + respond
            if(gDualWatchActive)
                memmove(line + x, BITMAP_TDR1, sizeof(BITMAP_TDR1) - (dw==1?0:5));
            else
                memmove(line + x + 3, BITMAP_TDR2, sizeof(BITMAP_TDR2));
        }
        else if(dw == 2) { // XB - crossband
            memmove(line + x, BITMAP_XB, sizeof(BITMAP_XB));
        }
    }
    x += sizeof(BITMAP_TDR1) + 2;

#ifdef ENABLE_VOX
    // VOX indicator
		if (gEeprom.VOX_SWITCH)
		{
			memmove(line + x, BITMAP_VOX, sizeof(BITMAP_VOX));
			x1 = x + sizeof(BITMAP_VOX);
		}
		x += sizeof(BITMAP_VOX) + 2;
#endif

    x = MAX(x, 61u);
    x1 = x;

    // KEY-LOCK indicator
    if (gEeprom.KEY_LOCK)
    {

        memmove(line + x, BITMAP_KeyLock, sizeof(BITMAP_KeyLock));
        x += sizeof(BITMAP_KeyLock);
        x1 = x;
        //按键锁定禁止发射
     //   RADIO_SetVfoState(VFO_STATE_TX_DISABLE);

    }
    else
    if (gWasFKeyPressed)
    {
        memmove(line + x, BITMAP_F_Key, sizeof(BITMAP_F_Key));
        x += sizeof(BITMAP_F_Key);
        x1 = x;
    }

    {	// battery voltage or percentage
        char         s[16];
        unsigned int space_needed;

        unsigned int x2 = LCD_WIDTH - sizeof(BITMAP_BatteryLevel1) - 3;

        if (gChargingWithTypeC)
            x2 -= sizeof(BITMAP_USB_C);  // the radio is on charge


//            default:
//            case 0:
//                break;
//
//            case 1:		// voltage
//            {
                const uint16_t voltage = (gBatteryVoltageAverage <= 999) ? gBatteryVoltageAverage : 999; // limit to 9.99V
                sprintf(s, "%u.%02uV", voltage / 100, voltage % 100);
                space_needed = (7 * strlen(s));
                if (x2 >= (x1 + space_needed))
                {
                    UI_PrintStringSmallBuffer(s, line + x2 - space_needed);
                }
//                break;
//            }

//            case 2:		// percentage
//            {
//                sprintf(s, "%u%%", BATTERY_VoltsToPercent(gBatteryVoltageAverage));
//                space_needed = (7 * strlen(s));
//                if (x2 >= (x1 + space_needed))
//                    UI_PrintStringSmallBuffer(s, line + x2 - space_needed);
//            }

    }

    // move to right side of the screen
    x = LCD_WIDTH - sizeof(BITMAP_BatteryLevel1) - sizeof(BITMAP_USB_C);

    // USB-C charge indicator
    if (gChargingWithTypeC)
        memmove(line + x, BITMAP_USB_C, sizeof(BITMAP_USB_C));
    x += sizeof(BITMAP_USB_C);

    // BATTERY LEVEL indicator
    UI_DrawBattery(line + x, gBatteryDisplayLevel, gLowBatteryBlink);

    // **************

    ST7565_BlitStatusLine();
}