extra-functions.c

/*
 * Copyright (C) 2011 The Android Open Source Project
 *
 * 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 <assert.h>
#include <errno.h>
#include <fcntl.h>
#include <limits.h>
#include <paths.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <unistd.h>

#include <ctype.h>
#include "cutils/misc.h"
#include "cutils/properties.h"
#include <dirent.h>
#include <getopt.h>
#include <linux/input.h>
#include <signal.h>
#include <sys/limits.h>
#include <termios.h>
#include <time.h>
#include <sys/vfs.h>

#include "tw_reboot.h"
#include "bootloader.h"
#include "common.h"
#include "extra-functions.h"
#include "cutils/properties.h"
#include "install.h"
#include "minuitwrp/minui.h"
#include "minzip/DirUtil.h"
#include "minzip/Zip.h"
#include "recovery_ui.h"
#include "roots.h"
#include "ddftw.h"
#include "backstore.h"
#include "themes.h"
#include "data.h"
#include "format.h"

//kang system() from bionic/libc/unistd and rename it __system() so we can be even more hackish :)
#undef _PATH_BSHELL
#define _PATH_BSHELL "/sbin/sh"

static const char *SIDELOAD_TEMP_DIR = "/tmp/sideload";
extern char **environ;

// sdcard partitioning variables
char swapsize[32];
int swap;
char extsize[32];
int ext;
int ext_format; // 3 or 4

int
__system(const char *command)
{
  pid_t pid;
	sig_t intsave, quitsave;
	sigset_t mask, omask;
	int pstat;
	char *argp[] = {"sh", "-c", NULL, NULL};

	if (!command)		/* just checking... */
		return(1);

	argp[2] = (char *)command;

	sigemptyset(&mask);
	sigaddset(&mask, SIGCHLD);
	sigprocmask(SIG_BLOCK, &mask, &omask);
	switch (pid = vfork()) {
	case -1:			/* error */
		sigprocmask(SIG_SETMASK, &omask, NULL);
		return(-1);
	case 0:				/* child */
		sigprocmask(SIG_SETMASK, &omask, NULL);
		execve(_PATH_BSHELL, argp, environ);
    _exit(127);
  }

	intsave = (sig_t)  bsd_signal(SIGINT, SIG_IGN);
	quitsave = (sig_t) bsd_signal(SIGQUIT, SIG_IGN);
	pid = waitpid(pid, (int *)&pstat, 0);
	sigprocmask(SIG_SETMASK, &omask, NULL);
	(void)bsd_signal(SIGINT, intsave);
	(void)bsd_signal(SIGQUIT, quitsave);
	return (pid == -1 ? -1 : pstat);
}

static struct pid {
	struct pid *next;
	FILE *fp;
	pid_t pid;
} *pidlist;

FILE *
__popen(const char *program, const char *type)
{
	struct pid * volatile cur;
	FILE *iop;
	int pdes[2];
	pid_t pid;

	if ((*type != 'r' && *type != 'w') || type[1] != '\0') {
		errno = EINVAL;
		return (NULL);
	}

	if ((cur = malloc(sizeof(struct pid))) == NULL)
		return (NULL);

	if (pipe(pdes) < 0) {
		free(cur);
		return (NULL);
	}

	switch (pid = vfork()) {
	case -1:			/* Error. */
		(void)close(pdes[0]);
		(void)close(pdes[1]);
		free(cur);
		return (NULL);
		/* NOTREACHED */
	case 0:				/* Child. */
	    {
		struct pid *pcur;
		/*
		 * because vfork() instead of fork(), must leak FILE *,
		 * but luckily we are terminally headed for an execl()
		 */
		for (pcur = pidlist; pcur; pcur = pcur->next)
			close(fileno(pcur->fp));

		if (*type == 'r') {
			int tpdes1 = pdes[1];

			(void) close(pdes[0]);
			/*
			 * We must NOT modify pdes, due to the
			 * semantics of vfork.
			 */
			if (tpdes1 != STDOUT_FILENO) {
				(void)dup2(tpdes1, STDOUT_FILENO);
				(void)close(tpdes1);
				tpdes1 = STDOUT_FILENO;
			}
		} else {
			(void)close(pdes[1]);
			if (pdes[0] != STDIN_FILENO) {
				(void)dup2(pdes[0], STDIN_FILENO);
				(void)close(pdes[0]);
			}
		}
		execl(_PATH_BSHELL, "sh", "-c", program, (char *)NULL);
		_exit(127);
		/* NOTREACHED */
	    }
	}

	/* Parent; assume fdopen can't fail. */
	if (*type == 'r') {
		iop = fdopen(pdes[0], type);
		(void)close(pdes[1]);
	} else {
		iop = fdopen(pdes[1], type);
		(void)close(pdes[0]);
	}

	/* Link into list of file descriptors. */
	cur->fp = iop;
	cur->pid =  pid;
	cur->next = pidlist;
	pidlist = cur;

	return (iop);
}

/*
 * pclose --
 *	Pclose returns -1 if stream is not associated with a `popened' command,
 *	if already `pclosed', or waitpid returns an error.
 */
int
__pclose(FILE *iop)
{
	struct pid *cur, *last;
	int pstat;
	pid_t pid;

	/* Find the appropriate file pointer. */
	for (last = NULL, cur = pidlist; cur; last = cur, cur = cur->next)
		if (cur->fp == iop)
			break;

	if (cur == NULL)
		return (-1);

	(void)fclose(iop);

	do {
		pid = waitpid(cur->pid, &pstat, 0);
	} while (pid == -1 && errno == EINTR);

	/* Remove the entry from the linked list. */
	if (last == NULL)
		pidlist = cur->next;
	else
		last->next = cur->next;
	free(cur);

	return (pid == -1 ? -1 : pstat);
}

char* sanitize_device_id(char* id)
{
        const char* whitelist ="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890-._";
        char* c = id;
        char* str = (int*) calloc(50, sizeof *id);
        while (*c)
        {
                if (strchr(whitelist, *c))
                {
                        strncat(str, c, 1);
                }
                c++;
        }
        return str;
}

#define CMDLINE_SERIALNO        "androidboot.serialno="
#define CMDLINE_SERIALNO_LEN    (strlen(CMDLINE_SERIALNO))
#define CPUINFO_SERIALNO        "Serial"
#define CPUINFO_SERIALNO_LEN    (strlen(CPUINFO_SERIALNO))
#define CPUINFO_HARDWARE        "Hardware"
#define CPUINFO_HARDWARE_LEN    (strlen(CPUINFO_HARDWARE))

void get_device_id()
{
	FILE *fp;
	char line[2048];
	char hardware_id[32];
	char* token;
	char* new_device_id;

    // Assign a blank device_id to start with
    device_id[0] = 0;
#ifndef TW_FORCE_CPUINFO_FOR_DEVICE_ID
    // First, try the cmdline to see if the serial number was supplied
	fp = fopen("/proc/cmdline", "rt");
	if (fp != NULL)
    {
        // First step, read the line. For cmdline, it's one long line
        fgets(line, sizeof(line), fp);
        fclose(fp);

        // Now, let's tokenize the string
        token = strtok(line, " ");

        // Let's walk through the line, looking for the CMDLINE_SERIALNO token
        while (token)
        {
            // We don't need to verify the length of token, because if it's too short, it will mismatch CMDLINE_SERIALNO at the NULL
            if (memcmp(token, CMDLINE_SERIALNO, CMDLINE_SERIALNO_LEN) == 0)
            {
                // We found the serial number!
                strcpy(device_id, token + CMDLINE_SERIALNO_LEN);
		new_device_id = sanitize_device_id(device_id);
		strcpy(device_id, new_device_id);
		free(new_device_id);
                return;
            }
            token = strtok(NULL, " ");
        }
    }
#endif
	// Now we'll try cpuinfo for a serial number
	fp = fopen("/proc/cpuinfo", "rt");
	if (fp != NULL)
    {
		while (fgets(line, sizeof(line), fp) != NULL) { // First step, read the line.
			if (memcmp(line, CPUINFO_SERIALNO, CPUINFO_SERIALNO_LEN) == 0)  // check the beginning of the line for "Serial"
			{
				// We found the serial number!
				token = line + CPUINFO_SERIALNO_LEN; // skip past "Serial"
				while ((*token > 0 && *token <= 32 ) || *token == ':') token++; // skip over all spaces and the colon
				if (*token != 0) {
                    token[30] = 0;
					if (token[strlen(token)-1] == 10) { // checking for endline chars and dropping them from the end of the string if needed
						memset(device_id, 0, sizeof(device_id));
						strncpy(device_id, token, strlen(token) - 1);
					} else {
						strcpy(device_id, token);
					}
					LOGI("=> serial from cpuinfo: '%s'\n", device_id);
					fclose(fp);
					new_device_id = sanitize_device_id(device_id);
					strcpy(device_id, new_device_id);
					free(new_device_id);
					return;
				}
			} else if (memcmp(line, CPUINFO_HARDWARE, CPUINFO_HARDWARE_LEN) == 0) {// We're also going to look for the hardware line in cpuinfo and save it for later in case we don't find the device ID
				// We found the hardware ID
				token = line + CPUINFO_HARDWARE_LEN; // skip past "Hardware"
				while ((*token > 0 && *token <= 32 ) || *token == ':')  token++; // skip over all spaces and the colon
				if (*token != 0) {
                    token[30] = 0;
					if (token[strlen(token)-1] == 10) { // checking for endline chars and dropping them from the end of the string if needed
                        memset(hardware_id, 0, sizeof(hardware_id));
						strncpy(hardware_id, token, strlen(token) - 1);
					} else {
						strcpy(hardware_id, token);
					}
					LOGI("=> hardware id from cpuinfo: '%s'\n", hardware_id);
				}
			}
		}
		fclose(fp);
    }
	
	if (hardware_id[0] != 0) {
		LOGW("\nusing hardware id for device id: '%s'\n", hardware_id);
		strcpy(device_id, hardware_id);
		new_device_id = sanitize_device_id(device_id);
		strcpy(device_id, new_device_id);
		free(new_device_id);
		return;
	}

    strcpy(device_id, "serialno");
	LOGE("=> device id not found, using '%s'.", device_id);
    return;
}

char* get_path (char* path)
{
        char *s;

        /* Go to the end of the string.  */
        s = path + strlen(path) - 1;

        /* Strip off trailing /s (unless it is also the leading /).  */
        while (path < s && s[0] == '/')
                s--;

        /* Strip the last component.  */
        while (path <= s && s[0] != '/')
                s--;

        while (path < s && s[0] == '/')
                s--;

        if (s < path)
                return ".";

        s[1] = '\0';
	return path;
}

char* basename(char* name) 
{
	const char* base;	
	for (base = name; *name; name++)
	{
		if(*name == '/')
		{
			base = name + 1;
		}		
	}
	return (char *) base;
}
/*
    Checks md5 for a path
    Return values:
        -1 : MD5 does not exist
        0 : Failed
        1 : Success
*/
int check_md5(char* path) {
    int o; 
    char cmd[PATH_MAX + 30];
    char md5file[PATH_MAX + 40];
    strcpy(md5file, path);
    strcat(md5file, ".md5");
    char dirpath[PATH_MAX];
    char* file;
    if (access(md5file, F_OK ) != -1) {
	strcpy(dirpath, md5file);
	get_path(dirpath);
	chdir(dirpath);
	file = basename(md5file);
	sprintf(cmd, "/sbin/busybox md5sum -c '%s'", file);
	FILE * cs = __popen(cmd, "r");
	char cs_s[PATH_MAX + 50];
	fgets(cs_s, PATH_MAX + 50, cs);
	char* OK = strstr(cs_s, "OK");
	if (OK != NULL) {
		printf("MD5 is good. returning 1\n");
		o = 1;
	}
	else {
		printf("MD5 is bad. return -2\n");
		o = -2;
	}

	__pclose(cs);
    } 
    else {
	//No md5 file
	printf("setting o to -1\n");
	o = -1;
    }

    return o;
}

static void set_sdcard_update_bootloader_message() {
    struct bootloader_message boot;
    memset(&boot, 0, sizeof(boot));
    strlcpy(boot.command, "boot-recovery", sizeof(boot.command));
    strlcpy(boot.recovery, "recovery\n", sizeof(boot.recovery));
    set_bootloader_message(&boot);
}

static char* copy_sideloaded_package(const char* original_path) {
  if (ensure_path_mounted(original_path) != 0) {
    LOGE("Can't mount %s\n", original_path);
    return NULL;
  }

  if (ensure_path_mounted(SIDELOAD_TEMP_DIR) != 0) {
    LOGE("Can't mount %s\n", SIDELOAD_TEMP_DIR);
    return NULL;
  }

  if (mkdir(SIDELOAD_TEMP_DIR, 0700) != 0) {
    if (errno != EEXIST) {
      LOGE("Can't mkdir %s (%s)\n", SIDELOAD_TEMP_DIR, strerror(errno));
      return NULL;
    }
  }

  // verify that SIDELOAD_TEMP_DIR is exactly what we expect: a
  // directory, owned by root, readable and writable only by root.
  struct stat st;
  if (stat(SIDELOAD_TEMP_DIR, &st) != 0) {
    LOGE("failed to stat %s (%s)\n", SIDELOAD_TEMP_DIR, strerror(errno));
    return NULL;
  }
  if (!S_ISDIR(st.st_mode)) {
    LOGE("%s isn't a directory\n", SIDELOAD_TEMP_DIR);
    return NULL;
  }
  if ((st.st_mode & 0777) != 0700) {
    LOGE("%s has perms %o\n", SIDELOAD_TEMP_DIR, st.st_mode);
    return NULL;
  }
  if (st.st_uid != 0) {
    LOGE("%s owned by %lu; not root\n", SIDELOAD_TEMP_DIR, st.st_uid);
    return NULL;
  }

  char copy_path[PATH_MAX];
  strcpy(copy_path, SIDELOAD_TEMP_DIR);
  strcat(copy_path, "/package.zip");

  char* buffer = malloc(BUFSIZ);
  if (buffer == NULL) {
    LOGE("Failed to allocate buffer\n");
    return NULL;
  }

  size_t read;
  FILE* fin = fopen(original_path, "rb");
  if (fin == NULL) {
    LOGE("Failed to open %s (%s)\n", original_path, strerror(errno));
    return NULL;
  }
  FILE* fout = fopen(copy_path, "wb");
  if (fout == NULL) {
    LOGE("Failed to open %s (%s)\n", copy_path, strerror(errno));
    return NULL;
  }

  while ((read = fread(buffer, 1, BUFSIZ, fin)) > 0) {
    if (fwrite(buffer, 1, read, fout) != read) {
      LOGE("Short write of %s (%s)\n", copy_path, strerror(errno));
      return NULL;
    }
  }

  free(buffer);

  if (fclose(fout) != 0) {
    LOGE("Failed to close %s (%s)\n", copy_path, strerror(errno));
    return NULL;
  }

  if (fclose(fin) != 0) {
    LOGE("Failed to close %s (%s)\n", original_path, strerror(errno));
    return NULL;
  }

  // "adb push" is happy to overwrite read-only files when it's
  // running as root, but we'll try anyway.
  if (chmod(copy_path, 0400) != 0) {
    LOGE("Failed to chmod %s (%s)\n", copy_path, strerror(errno));
    return NULL;
  }

  return strdup(copy_path);
}

int install_zip_package(const char* zip_path_filename) {
	int result = 0;

    mount_current_storage();
	int md5_req = DataManager_GetIntValue(TW_FORCE_MD5_CHECK_VAR);
	if (md5_req == 1) {
		ui_print("\n-- Verify md5 for %s", zip_path_filename);
		int md5chk = check_md5((char*) zip_path_filename);
		if (md5chk == 1) {
			ui_print("\n-- Md5 verified, continue");
			result = 0;
		}
		else if (md5chk == -1) {
			if (md5_req == 1) {
				ui_print("\n-- No md5 file found!");
				ui_print("\n-- Aborting install");
				result = INSTALL_ERROR;
			}
			else {
				ui_print("\n-- No md5 file found, ignoring");
			}
		}
		else if (md5chk == -2) {
			ui_print("\n-- md5 file doesn't match!");
			ui_print("\n-- Aborting install");
			result = INSTALL_ERROR;
		}
		printf("%d\n", result);
	}
	if (result != INSTALL_ERROR) {
		ui_print("\n-- Install %s ...\n", zip_path_filename);
		set_sdcard_update_bootloader_message();
		char* copy;
		if (DataManager_GetIntValue(TW_FLASH_ZIP_IN_PLACE) == 1 && strlen(zip_path_filename) > 6 && strncmp(zip_path_filename, "/cache", 6) != 0) {
			copy = strdup(zip_path_filename);
		} else {
			copy = copy_sideloaded_package(zip_path_filename);
			unmount_current_storage();
		}
		if (copy) {
			result = install_package(copy);
			free(copy);
			update_system_details();
		} else {
			result = INSTALL_ERROR;
		}
	}
    mount_current_storage();
    //finish_recovery(NULL);
	return result;
}

void show_fake_main_menu() {
	// Main Menu
	#define ITEM_APPLY_SDCARD        0
	#define ITEM_NANDROID_MENU     	 1
	#define ITEM_MAIN_WIPE_MENU      2
	#define ITEM_ADVANCED_MENU       3
	#define ITEM_MOUNT_MENU       	 4
	#define ITEM_USB_TOGGLE          5
	#define ITEM_REBOOT              6
	#define ITEM_SHUTDOWN		     7
    
	char** headers = prepend_title((const char**)MENU_HEADERS);
    char* MENU_ITEMS[] = {  "Install Zip",
                            "Nandroid Menu",
                            "Wipe Menu",
                            "Advanced Menu",
                            "Mount Menu",
                            "USB Storage Toggle",
                            "Reboot system now",
                            "Power down system",
                            NULL };

	go_home = 0;
	go_menu = 0;
	menu_loc_idx = 0;
	ui_reset_progress();
	
	int chosen_item = get_menu_selection(headers, MENU_ITEMS, 0, 0);

	// device-specific code may take some action here.  It may
	// return one of the core actions handled in the switch
	// statement below.
	chosen_item = device_perform_action(chosen_item);

   
	switch (chosen_item) {
		case ITEM_APPLY_SDCARD:
			install_zip_menu(0);
			break;

		case ITEM_NANDROID_MENU:
			nandroid_menu();
			break;
			
		case ITEM_MAIN_WIPE_MENU:
			main_wipe_menu();
			break;

		case ITEM_ADVANCED_MENU:
			advanced_menu();
			break;

		case ITEM_MOUNT_MENU:
			mount_menu(0);
			break;
			
		case ITEM_USB_TOGGLE:
			usb_storage_toggle();
			break;

		case ITEM_REBOOT:
			go_reboot = 1;
			return;

	case ITEM_SHUTDOWN:
		tw_reboot(rb_poweroff);
	break;
	}
	if (go_menu) {
		advanced_menu();
	}
	if (go_restart || go_home) {
		go_restart = 0;
		go_home = 0;
	}
	ui_end_menu();
	return;
}



/*partial kangbang from system/vold
TODO: Currently only one mount is supported, defaulting
/mnt/sdcard to lun0 and anything else gets no love. Fix this.
*/
#ifndef CUSTOM_LUN_FILE
#define CUSTOM_LUN_FILE "/sys/devices/platform/usb_mass_storage/lun%d/file"
#endif

int usb_storage_enable(void)
{
    int fd;
	char lun_file[255];

	if (DataManager_GetIntValue(TW_HAS_DUAL_STORAGE) == 1 && DataManager_GetIntValue(TW_HAS_DATA_MEDIA) == 0) {
		Volume *vol = volume_for_path(DataManager_GetSettingsStoragePath());
		if (!vol)
		{
			LOGE("Unable to locate volume information.");
			return -1;
		}

		sprintf(lun_file, CUSTOM_LUN_FILE, 0);

		if ((fd = open(lun_file, O_WRONLY)) < 0)
		{
			LOGE("Unable to open ums lunfile '%s': (%s)\n", lun_file, strerror(errno));
			return -1;
		}

		if ((write(fd, vol->device, strlen(vol->device)) < 0) &&
			(!vol->device2 || (write(fd, vol->device, strlen(vol->device2)) < 0))) {
			LOGE("Unable to write to ums lunfile '%s': (%s)\n", lun_file, strerror(errno));
			close(fd);
			return -1;
		}
		close(fd);

		Volume *vol2 = volume_for_path(DataManager_GetStrValue(TW_EXTERNAL_PATH));
		if (!vol)
		{
			LOGE("Unable to locate volume information.\n");
			return -1;
		}

		sprintf(lun_file, CUSTOM_LUN_FILE, 1);

		if ((fd = open(lun_file, O_WRONLY)) < 0)
		{
			LOGE("Unable to open ums lunfile '%s': (%s)\n", lun_file, strerror(errno));
			return -1;
		}

		if ((write(fd, vol2->device, strlen(vol2->device)) < 0) &&
			(!vol2->device2 || (write(fd, vol2->device, strlen(vol2->device2)) < 0))) {
			LOGE("Unable to write to ums lunfile '%s': (%s)\n", lun_file, strerror(errno));
			close(fd);
			return -1;
		}
		close(fd);
	} else {
		if (DataManager_GetIntValue(TW_HAS_DATA_MEDIA) == 0)
			strcpy(lun_file, DataManager_GetCurrentStoragePath());
		else
			strcpy(lun_file, DataManager_GetStrValue(TW_EXTERNAL_PATH));

		Volume *vol = volume_for_path(lun_file);
		if (!vol)
		{
			LOGE("Unable to locate volume information.\n");
			return -1;
		}

		sprintf(lun_file, CUSTOM_LUN_FILE, 0);

		if ((fd = open(lun_file, O_WRONLY)) < 0)
		{
			LOGE("Unable to open ums lunfile '%s': (%s)\n", lun_file, strerror(errno));
			return -1;
		}

		if ((write(fd, vol->device, strlen(vol->device)) < 0) &&
			(!vol->device2 || (write(fd, vol->device, strlen(vol->device2)) < 0))) {
			LOGE("Unable to write to ums lunfile '%s': (%s)\n", lun_file, strerror(errno));
			close(fd);
			return -1;
		}
		close(fd);
	}
	return 0;
}

int usb_storage_disable(void)
{
    int fd, index;
	char lun_file[255];

	for (index=0; index<2; index++) {
		sprintf(lun_file, CUSTOM_LUN_FILE, index);

		if ((fd = open(lun_file, O_WRONLY)) < 0)
		{
			if (index == 0)
				LOGE("Unable to open ums lunfile '%s': (%s)", lun_file, strerror(errno));
			return -1;
		}

		char ch = 0;
		if (write(fd, &ch, 1) < 0)
		{
			if (index == 0)
				LOGE("Unable to write to ums lunfile '%s': (%s)", lun_file, strerror(errno));
			close(fd);
			return -1;
		}

		close(fd);
	}
    return 0;
}

void usb_storage_toggle()
{
/*maybe make this a header instead?
    static char* headers[] = {  "Mounting USB as storage device",
                                "",
                                NULL
    };
*/
    ui_print("\nMounting USB as storage device...");

    if (usb_storage_enable())
        return;

    ui_clear_key_queue();
    ui_print("\nUSB as storage device mounted!\n");
    ui_print("\nPress Power to disable,");
    ui_print("\nand return to menu\n");

    for (;;) {
        int key = ui_wait_key();
        if (key == KEY_POWER) {
            ui_print("\nDisabling USB as storage device...");

            usb_storage_disable();
            break;
        }
    }
    return;
}

char* zip_verify()
{
	char* tmp_set = (char*)malloc(40);
	strcpy(tmp_set, "[ ] Zip Signature Verification");
	if (DataManager_GetIntValue(TW_SIGNED_ZIP_VERIFY_VAR) == 1) {
		tmp_set[1] = 'x';
	}
	return tmp_set;
}

char* reboot_after_flash()
{
	char* tmp_set = (char*)malloc(40);
	strcpy(tmp_set, "[ ] Reboot After Successful Flash");
	if (DataManager_GetIntValue(TW_REBOOT_AFTER_FLASH_VAR) == 1) {
		tmp_set[1] = 'x';
	}
	return tmp_set;
}

char* force_md5_check()
{
    char* tmp_set = (char*)malloc(40);
    strcpy(tmp_set, "[ ] Force md5 verification");
    if (DataManager_GetIntValue(TW_FORCE_MD5_CHECK_VAR) == 1) {
        tmp_set[1] = 'x';
    }
    return tmp_set;
}

char* sort_by_date_option()
{
    char* tmp_set = (char*)malloc(40);
    strcpy(tmp_set, "[ ] Sort Zips by Date");
    if (DataManager_GetIntValue(TW_SORT_FILES_BY_DATE_VAR) == 1) {
        tmp_set[1] = 'x';
    }
    return tmp_set;
}

char* rm_rf_option()
{
    char* tmp_set = (char*)malloc(40);
    strcpy(tmp_set, "[ ] rm -rf Instead of Format");
    if (DataManager_GetIntValue(TW_RM_RF_VAR) == 1) {
        tmp_set[1] = 'x';
    }
    return tmp_set;
}

void install_zip_menu(int pIdx)
{
	// INSTALL ZIP MENU
	#define ITEM_CHOOSE_ZIP           0
	#define ITEM_FLASH_ZIPS           1
	#define ITEM_CLEAR_ZIPS           2
	#define ITEM_WIPE_CACHE_DALVIK    3
	#define ITEM_SORT_BY_DATE         4
	#define ITEM_REBOOT_AFTER_FLASH   5
	#define ITEM_TOGGLE_SIG           6
	#define ITEM_TOGGLE_FORCE_MD5	  7
	#define ITEM_ZIP_RBOOT			  8
	#define ITEM_ZIP_BACK		      9
	
    ui_set_background(BACKGROUND_ICON_FLASH_ZIP);
    const char* MENU_FLASH_HEADERS[] = { "Install Zip Menu",
    									 "Flash Zip From SD Card:",
                                          NULL };

	char* MENU_INSTALL_ZIP[] = {  "--> Choose Zip To Flash",
	                              "Flash Zips Now",
								  "Clear Zip Queue",
								  "Wipe Cache and Dalvik Cache",
								  sort_by_date_option(),
			  	  	  	  	  	  reboot_after_flash(),
								  zip_verify(),
								  force_md5_check(),
                                  "--> Reboot To System",
	                              "<-- Back To Main Menu",
	                              NULL };

	char** headers = prepend_title(MENU_FLASH_HEADERS);
	int zip_loop_index, status;
	
    inc_menu_loc(ITEM_ZIP_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_INSTALL_ZIP, 0, pIdx);
        pIdx = chosen_item;
        switch (chosen_item)
        {
            case ITEM_CHOOSE_ZIP:
				if (multi_zip_index < 10) {
					status = sdcard_directory(DataManager_GetStrValue(TW_ZIP_LOCATION_VAR));
				} else {
					ui_print("Maximum of %i zips queued.\n", multi_zip_index);
				}
				break;
			case ITEM_FLASH_ZIPS:
				if (multi_zip_index == 0) {
					ui_print("No zips selected to install.\n");
				} else {
					for (zip_loop_index=0; zip_loop_index < multi_zip_index; zip_loop_index++) {
						LOGI("Installing %s\n", multi_zip_array[zip_loop_index]);
						status = install_zip_package(multi_zip_array[zip_loop_index]);
						ui_reset_progress();  // reset status bar so it doesnt run off the screen 
						if (status != INSTALL_SUCCESS) {
							if (notError == 1) {
								ui_set_background(BACKGROUND_ICON_ERROR);
								ui_print("Installation aborted due to an error.\n");
								multi_zip_index = 0; // clear zip queue
								break;
							}
						} // end if (status != INSTALL_SUCCESS)
					} // end for loop
					if (!ui_text_visible()) {
						multi_zip_index = 0; // clear zip queue
						return;  // reboot if logs aren't visible
					} else {
						if (DataManager_GetIntValue(TW_REBOOT_AFTER_FLASH_VAR)) {
							tw_reboot(rb_system);
							return;
						}
						if (go_home != 1) {
							ui_print("\nInstall from sdcard complete.\n");
						}
						multi_zip_index = 0; // clear zip queue
					} // end if (!ui_text_visible())
				} // end if (multi_zip_index == 0)
				break;
			case ITEM_CLEAR_ZIPS:
				multi_zip_index = 0;
				ui_print("\nZip Queue Cleared\n\n");
				break;
			case ITEM_WIPE_CACHE_DALVIK:
				ui_print("\n-- Wiping Cache Partition...\n");
                erase_volume("/cache");
                ui_print("-- Cache Partition Wipe Complete!\n");
				wipe_dalvik_cache();
				break;
            case ITEM_REBOOT_AFTER_FLASH:
                DataManager_ToggleIntValue(TW_REBOOT_AFTER_FLASH_VAR);
                break;
			case ITEM_SORT_BY_DATE:
                DataManager_ToggleIntValue(TW_SORT_FILES_BY_DATE_VAR);
                break;
            case ITEM_TOGGLE_SIG:
                DataManager_ToggleIntValue(TW_SIGNED_ZIP_VERIFY_VAR);
                break;
			case ITEM_TOGGLE_FORCE_MD5:
                DataManager_ToggleIntValue(TW_FORCE_MD5_CHECK_VAR);
                break;            
            case ITEM_ZIP_RBOOT:
                tw_reboot(rb_system);
                break;
            case ITEM_ZIP_BACK:
    	        dec_menu_loc();
                ui_set_background(BACKGROUND_ICON_MAIN);
                return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    }
        break;
    }
	ui_end_menu();
    dec_menu_loc();
	install_zip_menu(pIdx);
}

void wipe_dalvik_cache()
{
        ui_set_background(BACKGROUND_ICON_WIPE);
        ensure_path_mounted("/data");
        ensure_path_mounted("/cache");
        ui_print("\n-- Wiping Dalvik Cache Directories...\n");
        __system("rm -rf /data/dalvik-cache");
        ui_print("Cleaned: /data/dalvik-cache...\n");
        __system("rm -rf /cache/dalvik-cache");
        ui_print("Cleaned: /cache/dalvik-cache...\n");
        __system("rm -rf /cache/dc");
        ui_print("Cleaned: /cache/dc\n");

        struct stat st;
        if (0 != stat(sde.blk, &st))
        {
            ui_print("/sd-ext not present, skipping\n");
        } else {
        	__system("mount /sd-ext");
    	    LOGI("Mounting /sd-ext\n");
    	    if (stat("/sd-ext/dalvik-cache",&st) == 0)
    	    {
                __system("rm -rf /sd-ext/dalvik-cache");
        	    ui_print("Cleaned: /sd-ext/dalvik-cache...\n");
    	    }
        }
        ensure_path_unmounted("/data");
        ui_print("-- Dalvik Cache Directories Wipe Complete!\n\n");
        ui_set_background(BACKGROUND_ICON_MAIN);
        if (!ui_text_visible()) return;
}

void reboot_menu()
{
	
	#define ITEM_SYSTEM      0
	#define ITEM_RECOVERY    1
	#define ITEM_BOOTLOADER  2
	#define ITEM_POWEROFF    3
	#define ITEM_BACKK		 4
	

    const char* MENU_REBOOT_HEADERS[] = {  "Reboot Menu",
    									   "Choose Your Destiny:",
                                            NULL };
    
	// REBOOT MENU
	char* MENU_REBOOT[] = { "Reboot To System",
	                        "Reboot To Recovery",
	                        "Reboot To Bootloader",
	                        "Power Off",
	                        "<-- Back To Advanced Menu",
	                        NULL };

    
    char** headers = prepend_title(MENU_REBOOT_HEADERS);

    // This is an old, common method for ensuring a flush
    sync();
    sync();
    
    inc_menu_loc(ITEM_BACKK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_REBOOT, 0, 0);
        switch (chosen_item)
        {
            case ITEM_RECOVERY:
                tw_reboot(rb_recovery);
                break;

            case ITEM_BOOTLOADER:
                tw_reboot(rb_bootloader);
                break;

            case ITEM_POWEROFF:
                tw_reboot(rb_poweroff);
                break;

            case ITEM_SYSTEM:
                tw_reboot(rb_system);
                break;

            case ITEM_BACKK:
            	dec_menu_loc();
                return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    }
    }
}

// BATTERY STATS
void wipe_battery_stats()
{
    ensure_path_mounted("/data");
    struct stat st;
    if (0 != stat("/data/system/batterystats.bin", &st))
    {
        ui_print("No Battery Stats Found. No Need To Wipe.\n");
    } else {
        ui_set_background(BACKGROUND_ICON_WIPE);
        remove("/data/system/batterystats.bin");
        ui_print("Cleared: Battery Stats...\n");
        ensure_path_unmounted("/data");
    }
}

// ROTATION SETTINGS
void wipe_rotate_data()
{
    ui_set_background(BACKGROUND_ICON_WIPE);
    ensure_path_mounted("/data");
    __system("rm -r /data/misc/akmd*");
    __system("rm -r /data/misc/rild*");
    ui_print("Cleared: Rotatation Data...\n");
    ensure_path_unmounted("/data");
}   

int format_data_media() {
	if (memcmp(dat.fst, "ext", 3) == 0) {
        int ret_val = tw_format_ext23(dat.fst, DataManager_GetStrValue(TW_DATA_BLK_DEVICE));
		if (ret_val == 0) {
			ensure_path_mounted("/data");
			__system("cd /data && mkdir media && chmod 775 media");
		} else {
			LOGE("Unable to format data.\n");
		}
		return ret_val;
	} else {
		LOGE("Unsupported file system for formatting data media, '%s'\n", dat.fst);
		return -1;
	}
}

void fix_perms()
{
	ensure_path_mounted("/data");
	ensure_path_mounted("/system");
	ui_show_progress(1,30);
    ui_print("\n-- Fixing Permissions\n");
	ui_print("This may take a few minutes.\n");
	__system("./sbin/fix_permissions.sh");
	ui_print("-- Done.\n\n");
	ui_reset_progress();
}

void advanced_menu()
{
	// ADVANCED MENU
	#ifdef BOARD_HAS_NO_REAL_SDCARD
	#define ITEM_REBOOT_MENU       0
	#define ITEM_FORMAT_MENU       1
	#define ITEM_FIX_PERM          2
	#define ITEM_ALL_SETTINGS      3
	#define ITEM_SDCARD_PART       99
	#define ITEM_CPY_LOG		   4
	#define ADVANCED_MENU_BACK     5
    
	char* MENU_ADVANCED[] = { "Reboot Menu",
	                          "Format Menu",
	                          "Fix Permissions",
	                          "Change twrp Settings",
	                          "Copy recovery log to /sdcard",
	                          "<-- Back To Main Menu",
	                          NULL };
	#else
	#define ITEM_REBOOT_MENU       0
	#define ITEM_FORMAT_MENU       1
	#define ITEM_FIX_PERM          2
	#define ITEM_ALL_SETTINGS      3
	#define ITEM_SDCARD_PART       4
	#define ITEM_CPY_LOG		   5
	#define ADVANCED_MENU_BACK     6
    
	char* MENU_ADVANCED[] = { "Reboot Menu",
	                          "Format Menu",
	                          "Fix Permissions",
	                          "Change twrp Settings",
							  "Partition SD Card",
	                          "Copy recovery log to /sdcard",
	                          "<-- Back To Main Menu",
	                          NULL };
	#endif
	
	const char* MENU_ADVANCED_HEADERS[] = { "Advanced Menu",
    										"Reboot, Format, or twrp!",
                                             NULL };

    char** headers = prepend_title(MENU_ADVANCED_HEADERS);
    
    inc_menu_loc(ADVANCED_MENU_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_ADVANCED, 0, 0);
        switch (chosen_item)
        {
            case ITEM_REBOOT_MENU:
                reboot_menu();
                break;
            case ITEM_FORMAT_MENU:
                format_menu();
                break;
            case ITEM_FIX_PERM:
            	fix_perms();
                break;
            case ITEM_ALL_SETTINGS:
			    all_settings_menu(0);
				break;
			case ITEM_SDCARD_PART:
				show_menu_partition();
				break;
            case ITEM_CPY_LOG:
                mount_current_storage();
				char mount_point[255], command[255];
				strcpy(mount_point, DataManager_GetSettingsStorageMount());
				sprintf(command, "cp /tmp/recovery.log %s", mount_point);
				__system(command);
				sync();
                ui_print("Copied recovery log to storage.\n");
            	break;
            case ADVANCED_MENU_BACK:
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    }
    }
}

// kang'd this from recovery.c cuz there wasnt a recovery.h!
int erase_volume(const char *volume) {
    ui_print("Formatting %s...\n", volume);

    if (strcmp(volume, "/cache") == 0) {
        // Any part of the log we'd copied to cache is now gone.
        // Reset the pointer so we copy from the beginning of the temp
        // log.
        tmplog_offset = 0;
    }

    return format_volume(volume);
}

// FORMAT MENU
void format_menu()
{
	struct stat st;
	
	#define ITEM_FORMAT_SYSTEM      0
	#define ITEM_FORMAT_DATA        1
	#define ITEM_FORMAT_CACHE       2
	#define ITEM_FORMAT_SDCARD      3
	#define ITEM_FORMAT_SDEXT		4
	#define ITEM_FORMAT_BACK        5
	
	const char* part_headers[] = {    "Format Menu",
                                "Choose a Partition to Format: ",
                                NULL };
	
    char* part_items[] = { 	"Format SYSTEM (/system)",
                            "Format DATA (/data)",
            				"Format CACHE (/cache)",
                            "Format SDCARD (/sdcard)",
                            "Format SD-EXT (/sd-ext)",
						    "<-- Back To Advanced Menu",
						    NULL };

    char** headers = prepend_title(part_headers);
    
    inc_menu_loc(ITEM_FORMAT_BACK);
	for (;;)
	{
                ui_set_background(BACKGROUND_ICON_WIPE_CHOOSE);
		int chosen_item = get_menu_selection(headers, part_items, 0, 0);
		switch (chosen_item)
		{
			case ITEM_FORMAT_SYSTEM:
				confirm_format("SYSTEM", "/system");
				break;
			case ITEM_FORMAT_DATA:
                confirm_format("DATA", "/data");
                break;
			case ITEM_FORMAT_CACHE:
                confirm_format("CACHE", "/cache");
                break;
			case ITEM_FORMAT_SDCARD:
                confirm_format("SDCARD", "/sdcard");
                break;
            case ITEM_FORMAT_SDEXT:
            	if (stat(sde.blk,&st) == 0)
            	{
                	__system("mount /sd-ext");
                    confirm_format("SD-EXT", "/sd-ext");
            	} else {
            		ui_print("\n/sd-ext not detected! Aborting.\n");
            	}
            	break;
			case ITEM_FORMAT_BACK:
            	dec_menu_loc();
                ui_set_background(BACKGROUND_ICON_MAIN);
				return;
		}
	    if (go_home) { 
    	        dec_menu_loc();
                ui_set_background(BACKGROUND_ICON_MAIN);
	        return;
	    }
	}
}

void
confirm_format(char* volume_name, char* volume_path) {

    char* confirm_headers[] = { "Confirm Format of Partition: ",
                        volume_name,
                        "",
                        "  THIS CAN NOT BE UNDONE!",
                        NULL };

    char* items[] = {   "No",
                        "Yes -- Permanently Format",
                        NULL };
    
    char** headers = prepend_title((const char**)confirm_headers);
    
    inc_menu_loc(0);
    int chosen_item = get_menu_selection(headers, items, 1, 0);
    if (chosen_item != 1) {
        dec_menu_loc();
        return;
    } else {
        ui_set_background(BACKGROUND_ICON_WIPE);
        ui_print("\n-- Wiping %s Partition...\n", volume_name);
        erase_volume(volume_path);
        ui_print("-- %s Partition Wipe Complete!\n", volume_name);
        dec_menu_loc();
    }
}

int get_battery_level(void)
{
    static int lastVal = -1;
    static time_t nextSecCheck = 0;

    struct timeval curTime;
    gettimeofday(&curTime, NULL);
    if (curTime.tv_sec > nextSecCheck)
    {
        char cap_s[4];
        FILE * cap = fopen("/sys/class/power_supply/battery/capacity","rt");
        if (cap)
        {
            fgets(cap_s, 4, cap);
            fclose(cap);
            lastVal = atoi(cap_s);
            if (lastVal > 100)  lastVal = 101;
            if (lastVal < 0)    lastVal = 0;
        }
        nextSecCheck = curTime.tv_sec + 60;
    }
    return lastVal;
}

char* 
print_batt_cap()  {
	char* full_cap_s = (char*)malloc(30);
	char full_cap_a[30];
	
	int cap_i = get_battery_level();
    
    //int len = strlen(cap_s);
	//if (cap_s[len-1] == '\n') {
	//	cap_s[len-1] = 0;
	//}
	
	// Get a usable time
	struct tm *current;
	time_t now;
	now = time(0);
	current = localtime(&now);
	
	sprintf(full_cap_a, "Battery Level: %i%% @ %02D:%02D", cap_i, current->tm_hour, current->tm_min);
	strcpy(full_cap_s, full_cap_a);
	
	return full_cap_s;
}

void time_zone_menu()
{
	#define TZ_REBOOT           0
	#define TZ_MINUS            1
	#define TZ_PLUS             2
	#define TZ_MAIN_BACK        3

    const char* MENU_TZ_HEADERS[] = { "Time Zone",
    								  "Select Region:",
                                              NULL };
    
	char* MENU_TZ[] =       { "[RESTART MENU AND APPLY TIME ZONE]",
            				  "Minus (GMT 0 to -11)",
							  "Plus  (GMT +1 to +12)",
							  "<-- Back To twrp Settings",
	                          NULL };

    char** headers = prepend_title(MENU_TZ_HEADERS);
    
    inc_menu_loc(TZ_MAIN_BACK);
	
	ui_print("Currently selected time zone: %s\n", DataManager_GetStrValue(TW_TIME_ZONE_VAR));
	
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_TZ, 0, 1);
        switch (chosen_item)
        {
			case TZ_REBOOT:
				go_home = 1;
				go_restart = 1;
				break;
            case TZ_MINUS:
            	time_zone_minus();
                break;
            case TZ_PLUS:
            	time_zone_plus();
                break;
            case TZ_MAIN_BACK:
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    }
    }
}

void time_zone_minus()
{
	#define TZ_GMT_MINUS11		0
	#define TZ_GMT_MINUS10		1
	#define TZ_GMT_MINUS09		2
	#define TZ_GMT_MINUS08		3
	#define TZ_GMT_MINUS07		4
	#define TZ_GMT_MINUS06		5
	#define TZ_GMT_MINUS05		6
	#define TZ_GMT_MINUS04		7
	#define TZ_GMT_MINUS03		8
	#define TZ_GMT_MINUS02		9
	#define TZ_GMT_MINUS01		10
	#define TZ_GMT      		11
	#define TZ_GMTCUT      		12
	#define TZ_MINUS_MENU_BACK  13

    const char* MENU_TZ_HEADERS_MINUS[] =  { "Time Zone",
    								         "Instant Time Machine:",
                                              NULL };
    
	char* MENU_TZ_MINUS[] =       { "GMT-11 (BST)",
									"GMT-10 (HST)",
							        "GMT -9 (AKST)",
						            "GMT -8 (PST)",
							        "GMT -7 (MST)",
							        "GMT -6 (CST)",
							        "GMT -5 (EST)",
							        "GMT -4 (AST)",
									"GMT -3 (GRNLNDST)",
									"GMT -2 (FALKST)",
									"GMT -1 (AZOREST)",
									"GMT  0 (GMT)",
									"GMT  0 (CUT)",
	                                "<-- Back To twrp Settings",
	                                NULL };

    char** headers = prepend_title(MENU_TZ_HEADERS_MINUS);
    
    inc_menu_loc(TZ_MINUS_MENU_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_TZ_MINUS, 0, 6);
        switch (chosen_item)
        {
            case TZ_GMT_MINUS11:
            	DataManager_SetStrValue(TW_TIME_ZONE_VAR, "BST11");
				strcpy(time_zone_dst_string, "BDT");
                break;
			case TZ_GMT_MINUS10:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "HST10");
				strcpy(time_zone_dst_string, "HDT");
                break;
            case TZ_GMT_MINUS09:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "AST9");
				strcpy(time_zone_dst_string, "ADT");
                break;
            case TZ_GMT_MINUS08:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "PST8");
				strcpy(time_zone_dst_string, "PDT");
                break;
            case TZ_GMT_MINUS07:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "MST7");
				strcpy(time_zone_dst_string, "MDT");
                break;
            case TZ_GMT_MINUS06:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "CST6");
				strcpy(time_zone_dst_string, "CDT");
                break;
            case TZ_GMT_MINUS05:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "EST5");
				strcpy(time_zone_dst_string, "EDT");
                break;
            case TZ_GMT_MINUS04:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "AST4");
				strcpy(time_zone_dst_string, "ADT");
                break;
			case TZ_GMT_MINUS03:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "GRNLNDST3");
				strcpy(time_zone_dst_string, "GRNLNDDT");
                break;
			case TZ_GMT_MINUS02:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "FALKST2");
				strcpy(time_zone_dst_string, "FALKDT");
                break;
			case TZ_GMT_MINUS01:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "AZOREST1");
				strcpy(time_zone_dst_string, "AZOREDT");
                break;
			case TZ_GMT:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "GMT0");
				strcpy(time_zone_dst_string, "BST");
                break;
			case TZ_GMTCUT:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "CUT0");
				strcpy(time_zone_dst_string, "GDT");
                break;
            case TZ_MINUS_MENU_BACK:
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    } else {
			ui_print("New time zone: %s", DataManager_GetStrValue(TW_TIME_ZONE_VAR));
			time_zone_offset();
			time_zone_dst();
			update_tz_environment_variables();
			ui_print("\nTime zone change requires reboot.\n");
			dec_menu_loc();
			return;
		}
    }
}

void time_zone_plus()
{
	#define TZ_GMT_PLUS01		0
	#define TZ_GMT_PLUS02USAST  1
	#define TZ_GMT_PLUS02WET	2
	#define TZ_GMT_PLUS03SAUST  3
	#define TZ_GMT_PLUS03MEST	4
	#define TZ_GMT_PLUS04   	5
	#define TZ_GMT_PLUS05   	6
	#define TZ_GMT_PLUS06   	7
	#define TZ_GMT_PLUS07   	8
	#define TZ_GMT_PLUS08TAIST	9
	#define TZ_GMT_PLUS08WAUST 10
	#define TZ_GMT_PLUS09KORST 11
	#define TZ_GMT_PLUS09JST   12
	#define TZ_GMT_PLUS10      13
	#define TZ_GMT_PLUS11      14
	#define TZ_GMT_PLUS12      15
	#define TZ_PLUS_MENU_BACK  16

    const char* MENU_TZ_HEADERS_PLUS[] =    { "Time Zone",
    								          "Instant Time Machine:",
                                              NULL };
    
	char* MENU_TZ_PLUS[] =       { "GMT +1 (NFT)",
							           "GMT +2 (USAST)",
						               "GMT +2 (WET)",
							           "GMT +3 (SAUST)",
						               "GMT +3 (MEST)",
							           "GMT +4 (WST)",
							           "GMT +5 (PAKST)",
									   "GMT +6 (TASHST)",
									   "GMT +7 (THAIST)",
									   "GMT +8 (TAIST)",
									   "GMT +8 (WAUST)",
									   "GMT +9 (KORST)",
									   "GMT +9 (JST)",
									   "GMT+10 (EET)",
									   "GMT+11 (MET)",
									   "GMT+12 (NZST)",
	                                   "<-- Back To twrp Settings",
	                                   NULL };

    char** headers = prepend_title(MENU_TZ_HEADERS_PLUS);
    
    inc_menu_loc(TZ_PLUS_MENU_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_TZ_PLUS, 0, 3); // puts the initially selected item to MST/MDT which should be right in the middle of the most used time zones for ease of use
        switch (chosen_item)
        {
            case TZ_GMT_PLUS01:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "NFT-1");
				strcpy(time_zone_dst_string, "DFT");
                break;
            case TZ_GMT_PLUS02USAST:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "USAST-2");
				strcpy(time_zone_dst_string, "USADT");
                break;
            case TZ_GMT_PLUS02WET:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "WET-2");
				strcpy(time_zone_dst_string, "WET");
                break;
            case TZ_GMT_PLUS03SAUST:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "SAUST-3");
				strcpy(time_zone_dst_string, "SAUDT");
                break;
            case TZ_GMT_PLUS03MEST:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "MEST-3");
				strcpy(time_zone_dst_string, "MEDT");
                break;
            case TZ_GMT_PLUS04:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "WST-4");
				strcpy(time_zone_dst_string, "WDT");
                break;
            case TZ_GMT_PLUS05:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "PAKST-5");
				strcpy(time_zone_dst_string, "PAKDT");
                break;
			case TZ_GMT_PLUS06:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "TASHST-6");
				strcpy(time_zone_dst_string, "TASHDT");
                break;
			case TZ_GMT_PLUS07:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "THAIST-7");
				strcpy(time_zone_dst_string, "THAIDT");
                break;
			case TZ_GMT_PLUS08TAIST:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "TAIST-8");
				strcpy(time_zone_dst_string, "TAIDT");
                break;
			case TZ_GMT_PLUS08WAUST:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "WAUST-8");
				strcpy(time_zone_dst_string, "WAUDT");
                break;
			case TZ_GMT_PLUS09KORST:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "KORST-9");
				strcpy(time_zone_dst_string, "KORDT");
                break;
			case TZ_GMT_PLUS09JST:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "JST-9");
				strcpy(time_zone_dst_string, "JSTDT");
                break;
			case TZ_GMT_PLUS10:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "EET-10");
				strcpy(time_zone_dst_string, "EETDT");
                break;
			case TZ_GMT_PLUS11:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "MET-11");
				strcpy(time_zone_dst_string, "METDT");
                break;
			case TZ_GMT_PLUS12:
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, "NZST-12");
				strcpy(time_zone_dst_string, "NZDT");
                break;
            case TZ_PLUS_MENU_BACK:
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    } else {
            ui_print("New time zone: %s", DataManager_GetStrValue(TW_TIME_ZONE_VAR));
			time_zone_offset();
			time_zone_dst();
			update_tz_environment_variables();
			ui_print("\nTime zone changes take effect after reboot.\n");
			dec_menu_loc();
			return;
		}
    }
}

void time_zone_offset() {
    #define TZ_OFF00             0
	#define TZ_OFF15             1
	#define TZ_OFF30             2
	#define TZ_OFF45             3
	#define TZ_OFF_BACK          4

    const char* MENU_TZOFF_HEADERS[] = { "Time Zone",
    								     "Select Offset:",
                                              NULL };
    
	char* MENU_TZOFF[] =       {  "No Offset",
					    		  ":15",
								  ":30",
								  ":45",
	                              "<-- Back To Time Zones",
	                          NULL };

    char** headers = prepend_title(MENU_TZOFF_HEADERS);
    
    inc_menu_loc(TZ_OFF_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_TZOFF, 0, 0);
        switch (chosen_item)
        {
            case TZ_OFF00:
				strcpy(time_zone_offset_string, "");
				break;
			case TZ_OFF15:
            	strcpy(time_zone_offset_string, ":15");
                break;
            case TZ_OFF30:
            	strcpy(time_zone_offset_string, ":30");
                break;
			case TZ_OFF45:
            	strcpy(time_zone_offset_string, ":45");
                break;
            case TZ_OFF_BACK:
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    } else {
			dec_menu_loc();
			ui_print_overwrite("New time zone: %s%s", DataManager_GetStrValue(TW_TIME_ZONE_VAR), time_zone_offset_string);
			return;
		}
    }
}

void time_zone_dst() {
	#define TZ_DST_YES           0
	#define TZ_DST_NO            1
	#define TZ_DST_BACK          2

    const char* MENU_TZDST_HEADERS[] = {  "Time Zone",
    								      "Select Daylight Savings Option:",
                                              NULL };
    
	char* MENU_TZDST[] =       { "Yes, I have DST",
							     "No DST",
	                             "<-- Back To Offsets",
	                             NULL };
	
    char** headers = prepend_title(MENU_TZDST_HEADERS);
    
    inc_menu_loc(TZ_DST_BACK);

    char tmpStr[64];
    strcpy(tmpStr, DataManager_GetStrValue(TW_TIME_ZONE_VAR));

    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_TZDST, 0, 0);
        switch (chosen_item)
        {
            case TZ_DST_YES:
            	strcat(tmpStr, time_zone_offset_string);
				strcat(tmpStr, time_zone_dst_string);
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, tmpStr);
				ui_print_overwrite("New time zone: %s", tmpStr);
                break;
            case TZ_DST_NO:
				strcat(tmpStr, time_zone_offset_string);
                DataManager_SetStrValue(TW_TIME_ZONE_VAR, tmpStr);
                break;
            case TZ_DST_BACK:
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    } else {
			dec_menu_loc();
			return;
		}
    }
}

void update_tz_environment_variables() {
    setenv("TZ", DataManager_GetStrValue(TW_TIME_ZONE_VAR), 1);
    tzset();
}

void inc_menu_loc(int bInt)
{
	menu_loc_idx++;
	menu_loc[menu_loc_idx] = bInt;
	//ui_print("=> Increased Menu Level; %d : %d\n",menu_loc_idx,menu_loc[menu_loc_idx]);  //TURN THIS ON TO DEBUG
}
void dec_menu_loc()
{
	menu_loc_idx--;
	//ui_print("=> Decreased Menu Level; %d : %d\n",menu_loc_idx,menu_loc[menu_loc_idx]); //TURN THIS ON TO DEBUG
}

#define MNT_SYSTEM 	0
#define MNT_DATA	1
#define MNT_CACHE	2
#define MNT_SDCARD	3
#define MNT_SDEXT	4
#define MNT_BACK	5

void chkMounts()
{
	FILE *fp;
	char tmpOutput[255];
	sysIsMounted = 0;
	datIsMounted = 0;
	cacIsMounted = 0;
	sdcIsMounted = 0;
	sdeIsMounted = 0;
	fp = __popen("cat /proc/mounts", "r");
	while (fgets(tmpOutput,255,fp) != NULL)
	{
	    sscanf(tmpOutput,"%s %*s %*s %*s %*d %*d",tmp.blk);
	    if (strcmp(tmp.blk,sys.blk) == 0)
	    {
	    	sysIsMounted = 1;
	    }
	    if (strcmp(tmp.blk,dat.blk) == 0)
	    {
	    	datIsMounted = 1;
	    }
	    if (strcmp(tmp.blk,cac.blk) == 0)
	    {
	    	cacIsMounted = 1;
	    }
	    if (strcmp(tmp.blk,sdcext.blk) == 0)
	    {
	    	sdcIsMounted = 1;
	    }
	    if (strcmp(tmp.blk,sde.blk) == 0)
	    {
	    	sdeIsMounted = 1;
	    }
	}
	__pclose(fp);
}

char* isMounted(int mInt)
{
	int isTrue = 0;
	struct stat st;
	char* tmp_set = (char*)malloc(25);
	if (mInt == MNT_SYSTEM)
	{
	    if (sysIsMounted == 1) {
			strcpy(tmp_set, "unmount");
	    } else {
			strcpy(tmp_set, "mount");
	    }
		strcat(tmp_set, " /system");
	}
	if (mInt == MNT_DATA)
	{
	    if (datIsMounted == 1) {
			strcpy(tmp_set, "unmount");
	    } else {
			strcpy(tmp_set, "mount");
	    }
		strcat(tmp_set, " /data");
	}
	if (mInt == MNT_CACHE)
	{
	    if (cacIsMounted == 1) {
			strcpy(tmp_set, "unmount");
	    } else {
			strcpy(tmp_set, "mount");
	    }
		strcat(tmp_set, " /cache");
	}
	if (mInt == MNT_SDCARD)
	{
	    if (sdcIsMounted == 1) {
			strcpy(tmp_set, "unmount");
	    } else {
			strcpy(tmp_set, "mount");
	    }
		strcat(tmp_set, " /sdcard");
	}
	if (mInt == MNT_SDEXT)
	{
		if (stat(sde.blk,&st) != 0)
		{
			strcpy(tmp_set, "-------");
			sdeIsMounted = -1;
		} else {
		    if (sdeIsMounted == 1) {
				strcpy(tmp_set, "unmount");
		    } else {
				strcpy(tmp_set, "mount");
		    }
		}
		strcat(tmp_set, " /sd-ext");
	}
	return tmp_set;
}

void mount_menu(int pIdx)
{
	chkMounts();
	
	const char* MENU_MNT_HEADERS[] = {  "Mount Menu",
										"Pick a Partition to Mount:",
										NULL };
	
	char* MENU_MNT[] = { isMounted(MNT_SYSTEM),
						 isMounted(MNT_DATA),
						 isMounted(MNT_CACHE),
						 isMounted(MNT_SDCARD),
						 isMounted(MNT_SDEXT),
						 "<-- Back To Main Menu",
						 NULL };
	
	char** headers = prepend_title(MENU_MNT_HEADERS);
	
	inc_menu_loc(MNT_BACK);
	for (;;)
	{
		int chosen_item = get_menu_selection(headers, MENU_MNT, 0, pIdx);
		pIdx = chosen_item;
		switch (chosen_item)
		{
		case MNT_SYSTEM:
			if (sysIsMounted == 0)
			{
				__system("mount /system");
				ui_print("/system has been mounted.\n");
			} else if (sysIsMounted == 1) {
				__system("umount /system");
				ui_print("/system has been unmounted.\n");
			}
			break;
		case MNT_DATA:
			if (datIsMounted == 0)
			{
				__system("mount /data");
				ui_print("/data has been mounted.\n");
			} else if (datIsMounted == 1) {
				__system("umount /data");
				ui_print("/data has been unmounted.\n");
			}
			break;
		case MNT_CACHE:
			if (cacIsMounted == 0)
			{
				__system("mount /cache");
				ui_print("/cache has been mounted.\n");
			} else if (cacIsMounted == 1) {
				__system("umount /cache");
				ui_print("/cache has been unmounted.\n");
			}
			break; 
		case MNT_SDCARD:
			if (sdcIsMounted == 0)
			{
				__system("mount /sdcard");
				ui_print("/sdcard has been mounted.\n");
			} else if (sdcIsMounted == 1) {
				__system("umount /sdcard");
				ui_print("/sdcard has been unmounted.\n");
			}
			break;
		case MNT_SDEXT:
			if (sdeIsMounted == 0)
			{
				__system("mount /sd-ext");
				ui_print("/sd-ext has been mounted.\n");
			} else if (sdeIsMounted == 1) {
				__system("umount /sd-ext");
				ui_print("/sd-ext has been unmounted.\n");
			}
			break;
		case MNT_BACK:
			dec_menu_loc();
			return;
		}
	    break;
	}
	ui_end_menu();
    dec_menu_loc();
    mount_menu(pIdx);
}

void main_wipe_menu()
{
	#define MAIN_WIPE_CACHE           0
	#define MAIN_WIPE_DALVIK   	  	  1
	#define MAIN_WIPE_DATA            2
	#define ITEM_BATTERY_STATS     	  3
	#define ITEM_ROTATE_DATA       	  4
	#define MAIN_WIPE_BACK            5

    const char* MENU_MAIN_WIPE_HEADERS[] = {  "Wipe Menu",
    										  "Wipe Front to Back:",
                                              NULL };
    
	char* MENU_MAIN_WIPE[] = { "Wipe Cache",
	                           "Wipe Dalvik Cache",
	                           "Wipe Everything (Data Factory Reset)",
		                       "Wipe Battery Stats",
		                       "Wipe Rotation Data",
	                           "<-- Back To Main Menu",
	                           NULL };

    char** headers = prepend_title(MENU_MAIN_WIPE_HEADERS);

    int isSdExt = 0;
    struct stat st;
    if (stat("/sd-ext",&st) == 0)
    {
    	__system("mount /sd-ext");
    	isSdExt = 1;
    }
    
    inc_menu_loc(MAIN_WIPE_BACK);
    for (;;)
    {
	ui_set_background(BACKGROUND_ICON_WIPE_CHOOSE);
        int chosen_item = get_menu_selection(headers, MENU_MAIN_WIPE, 0, 0);
        switch (chosen_item)
        {
            case MAIN_WIPE_DALVIK:
                wipe_dalvik_cache();
                break;

            case MAIN_WIPE_CACHE:
            	ui_set_background(BACKGROUND_ICON_WIPE);
                ui_print("\n-- Wiping Cache Partition...\n");
                erase_volume("/cache");
                ui_print("-- Cache Partition Wipe Complete!\n");
                ui_set_background(BACKGROUND_ICON_WIPE_CHOOSE);
                if (!ui_text_visible()) return;
                break;

            case MAIN_WIPE_DATA:
                wipe_data(ui_text_visible());
                ui_set_background(BACKGROUND_ICON_WIPE_CHOOSE);
                if (!ui_text_visible()) return;
                break;

            case ITEM_BATTERY_STATS:
                wipe_battery_stats();
                break;

            case ITEM_ROTATE_DATA:
                wipe_rotate_data();
                break;
                
            case MAIN_WIPE_BACK:
            	dec_menu_loc();
                ui_set_background(BACKGROUND_ICON_MAIN);
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
                ui_set_background(BACKGROUND_ICON_MAIN);
	        return;
	    }
        break;
    }
	ui_end_menu();
        dec_menu_loc();
        ui_set_background(BACKGROUND_ICON_MAIN);
	main_wipe_menu();
}

char* toggle_spam()
{
	char* tmp_set = (char*)malloc(50);
	
	switch (DataManager_GetIntValue(TW_SHOW_SPAM_VAR))
	{
		case 0:
			strcpy(tmp_set, "[o] No Filename Display (Fastest)");
			break;
		case 1:
			strcpy(tmp_set, "[s] Single Line Filename Display (Slower)");
			break;
		case 2:
			strcpy(tmp_set, "[m] Multiple Line Filename Display (Slower)");
			break;
	}
	return tmp_set;
}

void all_settings_menu(int pIdx)
{
	// ALL SETTINGS MENU (ALLS for ALL Settings)
	#define ALLS_SIG_TOGGLE             0
	#define ALLS_REBOOT_AFTER_FLASH     1
	#define ALLS_SPAM				    2
    #define ALLS_FORCE_MD5_CHECK        3
	#define ALLS_SORT_BY_DATE           4
    #define ALLS_RM_RF                  5
    #define ALLS_TIME_ZONE              6
	#define ALLS_ZIP_LOCATION   	    7
	#define ALLS_THEMES                 8
	#define ALLS_DEFAULT                9
	#define ALLS_MENU_BACK              10

    const char* MENU_ALLS_HEADERS[] = {  "Change twrp Settings",
    									 "twrp or gtfo:",
                                         NULL };
    
	char* MENU_ALLS[] =     { zip_verify(),
	                          reboot_after_flash(),
	                          toggle_spam(),
                              force_md5_check(),
							  sort_by_date_option(),
							  rm_rf_option(),
	                          "Change Time Zone",
	                          "Change Zip Default Folder",
	                          "Change twrp Color Theme",
	                          "Reset Settings to Defaults",
	                          "<-- Back To Advanced Menu",
	                          NULL };

    char** headers = prepend_title(MENU_ALLS_HEADERS);
    
    inc_menu_loc(ALLS_MENU_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_ALLS, 0, pIdx);
        pIdx = chosen_item;
        switch (chosen_item)
        {
            case ALLS_SIG_TOGGLE:
            	DataManager_ToggleIntValue(TW_SIGNED_ZIP_VERIFY_VAR);
                break;
			case ALLS_REBOOT_AFTER_FLASH:
                DataManager_ToggleIntValue(TW_REBOOT_AFTER_FLASH_VAR);
                break;
            case ALLS_FORCE_MD5_CHECK:
                DataManager_ToggleIntValue(TW_FORCE_MD5_CHECK_VAR);
                break;
			case ALLS_SORT_BY_DATE:
                DataManager_ToggleIntValue(TW_SORT_FILES_BY_DATE_VAR);
                break;
			case ALLS_RM_RF:
				DataManager_ToggleIntValue(TW_RM_RF_VAR);
				break;
			case ALLS_SPAM:
				switch (DataManager_GetIntValue(TW_SHOW_SPAM_VAR))
				{
					case 0:
						DataManager_SetIntValue(TW_SHOW_SPAM_VAR, 1);
						break;
					case 1:
						DataManager_SetIntValue(TW_SHOW_SPAM_VAR, 2);
						break;
					case 2:
						DataManager_SetIntValue(TW_SHOW_SPAM_VAR, 0);
						break;
				}
				break;
			case ALLS_THEMES:
			    twrp_themes_menu();
				break;
			case ALLS_TIME_ZONE:
			    time_zone_menu();
				break;
            case ALLS_ZIP_LOCATION:
            	get_new_zip_dir = 1;
            	sdcard_directory(SDCARD_ROOT);
            	get_new_zip_dir = 0;
                break;
			case ALLS_DEFAULT:
				DataManager_ResetDefaults();
				break;
            case ALLS_MENU_BACK:
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    }
        break;
    }
	ui_end_menu();
    dec_menu_loc();
	all_settings_menu(pIdx);
}

void choose_swap_size(int pIdx) {
	#define SWAP_SET                0
	#define SWAP_INCREASE           1
	#define SWAP_DECREASE           2
	#define SWAP_BACK               3

    const char* MENU_SWAP_HEADERS[] = {  "Swap Partition",
    								     "Please select size for swap partition:",
                                              NULL };
    
	char* MENU_SWAP[] =        { "Save Swap Size",
								 "Increase",
							     "Decrease",
	                             "<-- Back To SD Card Partition, Cancel",
	                             NULL };
	
    char** headers = prepend_title(MENU_SWAP_HEADERS);
    
	sprintf(swapsize, "%4d", swap);
	ui_print_overwrite("Swap-size  = %s MB",swapsize);
	if (swap == 0) ui_print(" - NONE");
	
    inc_menu_loc(SWAP_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_SWAP, 0, pIdx);
		pIdx = chosen_item;
        switch (chosen_item)
        {
			case SWAP_SET:
				sprintf(swapsize, "%4d", swap);
				dec_menu_loc();
				return;
            case SWAP_INCREASE:
            	swap = swap + 32;
				
                break;
            case SWAP_DECREASE:
				swap = swap - 32;
				if (swap < 0) swap = 0;
                break;
            case SWAP_BACK:
				swap = -1;
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    }
		break;
    }
	ui_end_menu();
	dec_menu_loc();
	choose_swap_size(pIdx);
}

char* ext_format_menu_option()
{
	char* tmp_set = (char*)malloc(40);
	strcpy(tmp_set, "[3] SD-EXT File System - EXT3");
	if (ext_format == 4) {
		tmp_set[1] = '4';
		tmp_set[28] = '4';
	}
	return tmp_set;
}

void choose_ext_size(int pIdx) {
	#define EXT_SET                0
	#define EXT_INCREASE           1
	#define EXT_DECREASE           2
	#define EXT_EXT_FORMAT         3
	#define EXT_BACK               4

    const char* MENU_EXT_HEADERS[] = {   "EXT Partition",
    								     "Please select size for EXT partition:",
                                              NULL };
    
	char* MENU_EXT[] =         { "Save EXT Size & Commit Changes",
								 "Increase",
							     "Decrease",
								 ext_format_menu_option(),
	                             "<-- Back To SD Card Partition, Cancel",
	                             NULL };
	
    char** headers = prepend_title(MENU_EXT_HEADERS);
    
	sprintf(extsize, "%4d", ext);
	ui_print_overwrite("EXT-size  = %s MB",extsize);
	if (ext == 0) ui_print(" - NONE");
	
    inc_menu_loc(EXT_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, MENU_EXT, 0, pIdx);
		pIdx = chosen_item;
        switch (chosen_item)
        {
			case EXT_SET:
				sprintf(extsize, "%4d", ext);
				dec_menu_loc();
				return;
            case EXT_INCREASE:
            	ext = ext + 128;
                break;
            case EXT_DECREASE:
				ext = ext - 128;
				if (ext < 0) ext = 0;
                break;
			case EXT_EXT_FORMAT:
				if (ext_format == 3) {
					ext_format = 4;
				} else {
					ext_format = 3;
				}
				break;
            case EXT_BACK:
				ext = -1;
            	dec_menu_loc();
            	return;
        }
	    if (go_home) { 
	        dec_menu_loc();
	        return;
	    }
		break;
    }
	ui_end_menu();
	dec_menu_loc();
	choose_ext_size(pIdx);
}

static void
show_menu_partition()
{
// I KNOW THAT this menu seems a bit redundant, but it allows us to display the warning message & we're planning to add ext3 to 4 upgrade option and maybe file system error fixing later
    const char* SDheaders[] = { "Choose partition item,",
			       "",
			       "",
			       NULL };

// these constants correspond to elements of the items[] list.
#define ITEM_PART_SD       0
#define ITEM_PART_BACK     1

    ext_format = 3; // default this to 3
	
	static char* items[] = { "Partition SD Card",
							 "<-- Back to Advanced Menu",
                             NULL };

    char** headers = prepend_title(SDheaders);
	
	ui_print("\nBack up your sdcard before partitioning!\nAll files will be lost!\n");
    
    inc_menu_loc(ITEM_PART_BACK);
    for (;;)
    {
        int chosen_item = get_menu_selection(headers, items, 0, 0);
        switch (chosen_item)
        {
			case ITEM_PART_SD:
				swap = 32;
				ui_print("\n");
				choose_swap_size(1);
				if (swap == -1) break; // swap size was cancelled, abort
				
				ext = 512;
				ui_print("\n");
				choose_ext_size(1);
				if (ext == -1) break; // ext size was cancelled, abort
				
                // Below seen in Koush's recovery
                char sddevice[256];
                Volume *vol = volume_for_path("/sdcard");
                strcpy(sddevice, vol->device);
                // Just need block not whole partition
                sddevice[strlen("/dev/block/mmcblkX")] = 0;

				char es[64];
				sprintf(es, "/sbin/sdparted -es %dM -ss %dM -efs ext%i -s > /cache/part.log",ext,swap,ext_format);
				LOGI("\nrunning script: %s\n", es);
				run_script("\nContinue partitioning?",
					   "\nPartitioning sdcard : ",
					   es,
					   "\nunable to execute parted!\n(%s)\n",
					   "\nOops... something went wrong!\nPlease check the recovery log!\n",
					   "\nPartitioning complete!\n\n",
					   "\nPartitioning aborted!\n\n", -1);
				
				// recreate TWRP folder and rewrite settings - these will be gone after sdcard is partitioned
				ensure_path_mounted(SDCARD_ROOT);
				mkdir("/sdcard/TWRP", 0777);
				DataManager_Flush();

				update_system_details();
				break;
			case ITEM_PART_BACK:
				dec_menu_loc();
				return;
        } // end switch
	} // end for
    if (go_home) { 
		dec_menu_loc();
		return;
	}
}

void run_script(const char *str1, const char *str2, const char *str3, const char *str4, const char *str5, const char *str6, const char *str7, int request_confirm)
{
	ui_print("%s", str1);
        ui_clear_key_queue();
	ui_print("\nPress Power to confirm,");
       	ui_print("\nany other key to abort.\n");
	int confirm;
	if (request_confirm) // this option is used to skip the confirmation when the gui is in use
		confirm = ui_wait_key();
	else
		confirm = KEY_POWER;
	
		if (confirm == BTN_MOUSE || confirm == KEY_POWER || confirm == SELECT_ITEM) {
                	ui_print("%s", str2);
		        pid_t pid = fork();
                	if (pid == 0) {
                		char *args[] = { "/sbin/sh", "-c", (char*)str3, "1>&2", NULL };
                	        execv("/sbin/sh", args);
                	        fprintf(stderr, str4, strerror(errno));
                	        _exit(-1);
                	}
			int status;
			while (waitpid(pid, &status, WNOHANG) == 0) {
				ui_print(".");
               		        sleep(1);
			}
                	ui_print("\n");
			if (!WIFEXITED(status) || (WEXITSTATUS(status) != 0)) {
                		ui_print("%s", str5);
                	} else {
                		ui_print("%s", str6);
                	}
		} else {
	       		ui_print("%s", str7);
       	        }
		if (!ui_text_visible()) return;
}

void install_htc_dumlock(void)
{
	struct statfs fs1, fs2;
	int need_libs = 0;

	ui_print("Installing HTC Dumlock to system...\n");
	ensure_path_mounted("/system");
	__system("cp /res/htcd/htcdumlocksys /system/bin/htcdumlock && chmod 755 /system/bin/htcdumlock");
	if (statfs("/system/bin/flash_image", &fs1) != 0) {
		ui_print("Installing flash_image...\n");
		__system("cp /res/htcd/flash_imagesys /system/bin/flash_image && chmod 755 /system/bin/flash_image");
		need_libs = 1;
	} else
		ui_print("flash_image is already installed, skipping...\n");
	if (statfs("/system/bin/dump_image", &fs2) != 0) {
		ui_print("Installing dump_image...\n");
		__system("cp /res/htcd/dump_imagesys /system/bin/dump_image && chmod 755 /system/bin/dump_image");
		need_libs = 1;
	} else
		ui_print("dump_image is already installed, skipping...\n");
	if (need_libs) {
		ui_print("Installing libs needed for flash_image and dump_image...\n");
		__system("cp /res/htcd/libbmlutils.so /system/lib && chmod 755 /system/lib/libbmlutils.so");
		__system("cp /res/htcd/libflashutils.so /system/lib && chmod 755 /system/lib/libflashutils.so");
		__system("cp /res/htcd/libmmcutils.so /system/lib && chmod 755 /system/lib/libmmcutils.so");
		__system("cp /res/htcd/libmtdutils.so /system/lib && chmod 755 /system/lib/libmtdutils.so");
	}
	ui_print("Installing HTC Dumlock app...\n");
	ensure_path_mounted("/data");
	mkdir("/data/app", 0777);
	__system("rm /data/app/com.teamwin.htcdumlock*");
	__system("cp /res/htcd/HTCDumlock.apk /data/app/com.teamwin.htcdumlock.apk");
	sync();
	ui_print("HTC Dumlock is installed.\n");
}

void htc_dumlock_restore_original_boot(void)
{
	ui_print("Restoring original boot...\n");
	__system("htcdumlock restore");
	ui_print("Original boot restored.\n");
}

void htc_dumlock_reflash_recovery_to_boot(void)
{
	ui_print("Reflashing recovery to boot...\n");
	__system("htcdumlock recovery noreboot");
	ui_print("Recovery is flashed to boot.\n");
}

void check_and_run_script(const char* script_file, const char* display_name)
{
	// Check for and run startup script if script exists
	struct statfs st;
	if (statfs(script_file, &st) == 0) {
		ui_print("Running %s script...\n", display_name);
		char command[255];
		strcpy(command, "chmod 755 ");
		strcat(command, script_file);
		__system(command);
		__system(script_file);
		ui_print("\nFinished running %s script.\n", display_name);
	}
}