/***************************************************************************
 *             __________               __   ___.
 *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
 *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
 *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
 *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
 *                     \/            \/     \/    \/            \/
 * $Id$
 *
 * Copyright (C) 2002 Robert Hak
 *
 * All files in this archive are subject to the GNU General Public License.
 * See the file COPYING in the source tree root for full license agreement.
 *
 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
 * KIND, either express or implied.
 *
 ****************************************************************************/

#include "config.h"

#include <stdio.h>
#include <stdbool.h>

#include "lcd.h"
#include "menu.h"
#include "mpeg.h"
#include "button.h"
#include "kernel.h"
#include "sprintf.h"
#include "settings.h"
#include "settings_menu.h"
#include "backlight.h"
#include "playlist.h"  /* for playlist_shuffle */
#include "fat.h"                /* For dotfile settings */
#include "powermgmt.h"
#include "rtc.h"
#include "ata.h"
#ifdef HAVE_LCD_BITMAP
#include "peakmeter.h"
#endif
#include "lang.h"

static bool contrast(void)
{
    return set_int( str(LANG_CONTRAST), "", &global_settings.contrast, 
                    lcd_set_contrast, 1, 0, MAX_CONTRAST_SETTING );
}

#ifdef HAVE_LCD_BITMAP
/**
 * Menu to set the hold time of normal peaks.
 */
static bool peak_meter_hold(void) {
    char* names[] = { str(LANG_OFF),
        "200 ms ", "300 ms ", "500 ms ", "1 s ", "2 s ",
        "3 s ", "4 s ", "5 s ", "6 s ", "7 s",
        "8 s", "9 s", "10 s", "15 s", "20 s",
        "30 s", "1 min"
    };
    return set_option( str(LANG_PM_PEAK_HOLD), 
        &global_settings.peak_meter_hold, names,
        18, NULL);
}

/**
 * Menu to set the hold time of clips.
 */
static bool peak_meter_clip_hold(void) {
    char* names[] = { str(LANG_PM_ETERNAL),
        "1s ", "2s ", "3s ", "4s ", "5s ",
        "6s ", "7s ", "8s ", "9s ", "10s",
        "15s", "20s", "25s", "30s", "45s",
        "60s", "90s", "2min", "3min", "5min",
        "10min", "20min", "45min", "90min"
    };
    return set_option( str(LANG_PM_CLIP_HOLD), 
        &global_settings.peak_meter_clip_hold, names,
        25, peak_meter_set_clip_hold);
}

/**
 * Menu to set the release time of the peak meter.
 */
static bool peak_meter_release(void)  {
    return set_int( str(LANG_PM_RELEASE), str(LANG_PM_UNITS_PER_READ), 
             &global_settings.peak_meter_release,
             NULL, 1, 1, LCD_WIDTH);
}

/**
 * Menu to configure the peak meter
 */
static bool peak_meter_menu(void) 
{
    int m;
    bool result;

    struct menu_items items[] = {
        { str(LANG_PM_RELEASE)  , peak_meter_release   },  
        { str(LANG_PM_PEAK_HOLD), peak_meter_hold      },  
        { str(LANG_PM_CLIP_HOLD), peak_meter_clip_hold },
    };
    
    m=menu_init( items, sizeof items / sizeof(struct menu_items) );
    result = menu_run(m);
    menu_exit(m);
    return result;
}
#endif

#ifndef HAVE_RECORDER_KEYPAD
static bool shuffle(void)
{
    return set_bool( str(LANG_SHUFFLE), &global_settings.playlist_shuffle );
}
#endif

static bool play_selected(void)
{
    return set_bool( str(LANG_PLAY_SELECTED), &global_settings.play_selected );
}

static bool dir_filter(void)
{
    char* names[] = { str(LANG_FILTER_ALL),
                      str(LANG_FILTER_SUPPORTED),
                      str(LANG_FILTER_MUSIC) };
    return set_option( str(LANG_FILTER), &global_settings.dirfilter,
                       names, 3, NULL );
}

static bool sort_case(void)
{
    return set_bool( str(LANG_SORT_CASE), &global_settings.sort_case );
}

static bool resume(void)
{
    char* names[] = { str(LANG_SET_BOOL_NO), 
                      str(LANG_RESUME_SETTING_ASK),
                      str(LANG_SET_BOOL_YES) };
    return set_option( str(LANG_RESUME), &global_settings.resume,
                       names, 3, NULL );
}

static bool backlight_on_when_charging(void)
{
    bool result = set_bool(str(LANG_BACKLIGHT_ON_WHEN_CHARGING),
                           &global_settings.backlight_on_when_charging);
    backlight_set_on_when_charging(global_settings.backlight_on_when_charging);
    return result;
}

static bool backlight_timer(void)
{
    char* names[] = { str(LANG_OFF), str(LANG_ON),
                      "1s ", "2s ", "3s ", "4s ", "5s ",
                      "6s ", "7s ", "8s ", "9s ", "10s",
                      "15s", "20s", "25s", "30s", "45s",
                      "60s", "90s"};
    return set_option(str(LANG_BACKLIGHT), &global_settings.backlight_timeout,
                      names, 19, backlight_set_timeout );
}

static bool poweroff_idle_timer(void)
{
    char* names[] = { str(LANG_OFF),
                      "1m ", "2m ", "3m ", "4m ", "5m ",
                      "6m ", "7m ", "8m ", "9m ", "10m",
                      "15m", "30m", "45m", "60m"};
    return set_option(str(LANG_POWEROFF_IDLE), &global_settings.poweroff,
                      names, 15, set_poweroff_timeout);
}

static bool scroll_speed(void)
{
    return set_int(str(LANG_SCROLL), "", &global_settings.scroll_speed, 
                   &lcd_scroll_speed, 1, 1, 30 );
}

#ifdef HAVE_CHARGE_CTRL
static bool deep_discharge(void)
{
    bool result;
    result = set_bool( str(LANG_DISCHARGE), &global_settings.discharge );
    charge_restart_level = global_settings.discharge ? 
        CHARGE_RESTART_LO : CHARGE_RESTART_HI;
    return result;
}
#endif

#ifdef HAVE_LCD_BITMAP
static bool timedate_set(void)
{
    int timedate[7]; /* hour,minute,second,year,month,day,dayofweek */
    bool result;

#ifdef HAVE_RTC
    timedate[0] = rtc_read(0x03); /* hour   */
    timedate[1] = rtc_read(0x02); /* minute */
    timedate[2] = rtc_read(0x01); /* second */
    timedate[3] = rtc_read(0x07); /* year   */
    timedate[4] = rtc_read(0x06); /* month  */
    timedate[5] = rtc_read(0x05); /* day    */
    /* day of week not read, calculated */
    /* hour   */
    timedate[0] = ((timedate[0] & 0x30) >> 4) * 10 + (timedate[0] & 0x0f); 
    /* minute */
    timedate[1] = ((timedate[1] & 0x70) >> 4) * 10 + (timedate[1] & 0x0f); 
    /* second */
    timedate[2] = ((timedate[2] & 0x70) >> 4) * 10 + (timedate[2] & 0x0f); 
    /* year   */
    timedate[3] = ((timedate[3] & 0xf0) >> 4) * 10 + (timedate[3] & 0x0f); 
    /* month  */
    timedate[4] = ((timedate[4] & 0x10) >> 4) * 10 + (timedate[4] & 0x0f); 
    /* day    */
    timedate[5] = ((timedate[5] & 0x30) >> 4) * 10 + (timedate[5] & 0x0f);
#else /* SIMULATOR */
    /* hour   */
    timedate[0] = 0;
    /* minute */
    timedate[1] = 0;
    /* second */
    timedate[2] = 0;
    /* year   */
    timedate[3] = 0;
    /* month  */
    timedate[4] = 1;
    /* day    */
    timedate[5] = 1;
#endif

    result = set_time(str(LANG_TIME),timedate);

#ifdef HAVE_RTC
    if(timedate[0] != -1) {
        /* hour   */
        timedate[0] = ((timedate[0]/10) << 4 | timedate[0]%10) & 0x3f; 
        /* minute */
        timedate[1] = ((timedate[1]/10) << 4 | timedate[1]%10) & 0x7f; 
        /* second */
        timedate[2] = ((timedate[2]/10) << 4 | timedate[2]%10) & 0x7f; 
        /* year   */
        timedate[3] = ((timedate[3]/10) << 4 | timedate[3]%10) & 0xff; 
        /* month  */
        timedate[4] = ((timedate[4]/10) << 4 | timedate[4]%10) & 0x1f; 
        /* day    */
        timedate[5] = ((timedate[5]/10) << 4 | timedate[5]%10) & 0x3f; 

        rtc_write(0x03, timedate[0] | (rtc_read(0x03) & 0xc0)); /* hour */
        rtc_write(0x02, timedate[1] | (rtc_read(0x02) & 0x80)); /* minute */
        rtc_write(0x01, timedate[2] | (rtc_read(0x01) & 0x80)); /* second */
        rtc_write(0x07, timedate[3]);                           /* year */
        rtc_write(0x06, timedate[4] | (rtc_read(0x06) & 0xe0)); /* month */
        rtc_write(0x05, timedate[5] | (rtc_read(0x05) & 0xc0)); /* day */
        rtc_write(0x04, timedate[6] | (rtc_read(0x04) & 0xf8)); /* dayofweek */
        rtc_write(0x00, 0x00); /* 0.1 + 0.01 seconds */
    }
#endif
    return result;
}
#endif

static bool spindown(void)
{
    return set_int(str(LANG_SPINDOWN), "s", &global_settings.disk_spindown,
                   ata_spindown, 1, 3, 254 );
}

static bool ff_rewind_min_step(void) 
{ 
    char* names[] = { "1s", "2s", "3s", "4s",
                      "5s", "6s", "8s", "10s",
                      "15s", "20s", "25s", "30s",
                      "45s", "60s" };
    return set_option(str(LANG_FFRW_STEP), &global_settings.ff_rewind_min_step,
                      names, 14, NULL ); 
} 

static bool ff_rewind_accel(void) 
{ 
    char* names[] = { str(LANG_OFF), "2x/1s", "2x/2s", "2x/3s", 
                      "2x/4s", "2x/5s", "2x/6s", "2x/7s", 
                      "2x/8s", "2x/9s", "2x/10s", "2x/11s",
                      "2x/12s", "2x/13s", "2x/14s", "2x/15s", };
    return set_option(str(LANG_FFRW_ACCEL), &global_settings.ff_rewind_accel, 
                      names, 16, NULL ); 
} 

static bool browse_current(void)
{
    return set_bool( str(LANG_FOLLOW), &global_settings.browse_current );
}

static bool playback_settings_menu(void)
{
    int m;
    bool result;

    struct menu_items items[] = {
#ifndef HAVE_RECORDER_KEYPAD
        { str(LANG_SHUFFLE), shuffle },
#endif
        { str(LANG_PLAY_SELECTED), play_selected },
        { str(LANG_RESUME), resume },
        { str(LANG_FFRW_STEP), ff_rewind_min_step },
        { str(LANG_FFRW_ACCEL), ff_rewind_accel },
    };

    bool old_shuffle = global_settings.playlist_shuffle;
    
    m=menu_init( items, sizeof items / sizeof(struct menu_items) );
    result = menu_run(m);
    menu_exit(m);

    if (old_shuffle != global_settings.playlist_shuffle)
    {
        if (global_settings.playlist_shuffle)
        {
            randomise_playlist(current_tick);
        }
        else
        {
            sort_playlist(true);
        }
    }
    return result;
}

static bool reset_settings(void)
{
    int button = 0;

    lcd_clear_display();
#ifdef HAVE_LCD_CHARCELLS
    lcd_puts(0,0,str(LANG_RESET_ASK_PLAYER));
    lcd_puts(0,1,str(LANG_RESET_CONFIRM_PLAYER));
#else
    lcd_puts(0,0,str(LANG_RESET_ASK_RECORDER));
    lcd_puts(0,1,str(LANG_RESET_CONFIRM_RECORDER));
    lcd_puts(0,2,str(LANG_RESET_CANCEL_RECORDER));
#endif
    lcd_update();
    button = button_get(true);
    if (button == BUTTON_PLAY) {
        settings_reset();
        settings_apply();
        lcd_clear_display();
        lcd_puts(0,0,str(LANG_RESET_DONE_SETTING));
        lcd_puts(0,1,str(LANG_RESET_DONE_CLEAR));
        lcd_update();
        sleep(HZ);
        return(true);
    } else {
        lcd_clear_display();
        lcd_puts(0,0,str(LANG_RESET_DONE_CANCEL));
        lcd_update();
        sleep(HZ);
        return(false);
    }
}

static bool fileview_settings_menu(void)
{
    int m;
    bool result;

    struct menu_items items[] = {
        { str(LANG_CASE_MENU),    sort_case           },
        { str(LANG_FILTER),       dir_filter          },
        { str(LANG_FOLLOW),       browse_current      },
    };

    m = menu_init( items, sizeof items / sizeof(struct menu_items) );
    result = menu_run(m);
    menu_exit(m);
    return result;
}

static bool display_settings_menu(void)
{
    int m;
    bool result;

    struct menu_items items[] = {
        { str(LANG_SCROLL_MENU),     scroll_speed    },  
        { str(LANG_BACKLIGHT),       backlight_timer },
        { str(LANG_BACKLIGHT_ON_WHEN_CHARGING), backlight_on_when_charging },
        { str(LANG_CONTRAST),        contrast        },  
#ifdef HAVE_LCD_BITMAP
        { str(LANG_PM_MENU),         peak_meter_menu },  
#endif
    };
    
    m=menu_init( items, sizeof items / sizeof(struct menu_items) );
    result = menu_run(m);
    menu_exit(m);
    return result;
}

static bool system_settings_menu(void)
{
    int m;
    bool result;

    struct menu_items items[] = {
        { str(LANG_SPINDOWN),    spindown        },
#ifdef HAVE_CHARGE_CTRL
        { str(LANG_DISCHARGE),   deep_discharge  },
#endif
#ifdef HAVE_LCD_BITMAP
        { str(LANG_TIME),        timedate_set    },
#endif
        { str(LANG_POWEROFF_IDLE),    poweroff_idle_timer },
        { str(LANG_RESET),       reset_settings },
    };
    
    m=menu_init( items, sizeof items / sizeof(struct menu_items) );
    result = menu_run(m);
    menu_exit(m);
    return result;
}

bool settings_menu(void)
{
    int m;
    bool result;

    struct menu_items items[] = {
        { str(LANG_PLAYBACK),        playback_settings_menu },
        { str(LANG_FILE),            fileview_settings_menu },
        { str(LANG_DISPLAY),         display_settings_menu  },
        { str(LANG_SYSTEM),          system_settings_menu   },
    };
    
    m = menu_init( items, sizeof items / sizeof(struct menu_items) );
    result = menu_run(m);
    menu_exit(m);
    return result;
}