/*
 * Copyright (C) 2016 The Android Open Source Project
 *
 * Permission is hereby granted, free of charge, to any person
 * obtaining a copy of this software and associated documentation
 * files (the "Software"), to deal in the Software without
 * restriction, including without limitation the rights to use, copy,
 * modify, merge, publish, distribute, sublicense, and/or sell copies
 * of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be
 * included in all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 * SOFTWARE.
 */

#include <errno.h>
#include <string.h>

//#include <cutils/properties.h>
//#include <hardware/boot_control.h>
//#include <hardware/hardware.h>

#include <libavb_ab/libavb_ab.h>
#include <libavb_user/libavb_user.h>

static AvbOps* ops = NULL;

//static void module_init(boot_control_module_t* module) {
static void module_init() {
  if (ops != NULL) {
    return;
  }

  ops = avb_ops_user_new();
  if (ops == NULL) {
    avb_error("Unable to allocate AvbOps instance.\n");
  }
}

//static unsigned int module_getNumberSlots(boot_control_module_t* module) {
static unsigned int module_getNumberSlots() {
  return 2;
}

#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
//static unsigned int module_getCurrentSlot(boot_control_module_t* module) {
static unsigned int module_getCurrentSlot() {
  /*
  char propbuf[PROPERTY_VALUE_MAX];

  property_get("ro.boot.slot_suffix", propbuf, "");
  if (strcmp(propbuf, "_a") == 0) {
    return 0;
  } else if (strcmp(propbuf, "_b") == 0) {
    return 1;
  } else {
    avb_errorv("Unexpected slot suffix '", propbuf, "'.\n", NULL);
    return 0;
  }*/

  char cmdline[1024];
  int fd = open("/proc/cmdline", O_RDONLY);
  read(fd, (char*)cmdline, 1024);
  close(fd);
  char *slot = strstr(cmdline, "androidboot.slot_suffix");
  if(slot != NULL){
      slot = strstr(slot, "=");
      if(slot != NULL){
          slot +=2;
          if((*slot) == 'a'){
              return 0;
          }else if((*slot) == 'b'){
              return 1;
          }

      }
  }   
  return 0;
}

//static int module_markBootSuccessful(boot_control_module_t* module) {
static int module_markBootSuccessful() {
  if (avb_ab_mark_slot_successful(ops->ab_ops, module_getCurrentSlot()) ==
      AVB_IO_RESULT_OK) {
    return 0;
  } else {
    return -EIO;
  }
}

//static int module_setActiveBootSlot(boot_control_module_t* module,
static int module_setActiveBootSlot(unsigned int slot) {
  if (slot >= module_getNumberSlots()) {
    return -EINVAL;
  } else if (avb_ab_mark_slot_active(ops->ab_ops, slot) == AVB_IO_RESULT_OK) {
    return 0;
  } else {
    return -EIO;
  }
}

//static int module_setSlotAsUnbootable(struct boot_control_module* module,
static int module_setSlotAsUnbootable(unsigned int slot) {
  if (slot >= module_getNumberSlots()) {
    return -EINVAL;
  } else if (avb_ab_mark_slot_unbootable(ops->ab_ops, slot) ==
             AVB_IO_RESULT_OK) {
    return 0;
  } else {
    return -EIO;
  }
}

//static int module_isSlotBootable(struct boot_control_module* module,
static int module_isSlotBootable(unsigned int slot) {
  AvbABData ab_data;
  bool is_bootable;

  avb_assert(slot < 2);

  if (slot >= module_getNumberSlots()) {
    return -EINVAL;
  } else if (avb_ab_data_read(ops->ab_ops, &ab_data) != AVB_IO_RESULT_OK) {
    return -EIO;
  }

  is_bootable = (ab_data.slots[slot].priority > 0) &&
                (ab_data.slots[slot].successful_boot ||
                 (ab_data.slots[slot].tries_remaining > 0));

  return is_bootable ? 1 : 0;
}

//static int module_isSlotMarkedSuccessful(struct boot_control_module* module,
static int module_isSlotMarkedSuccessful(
                                         unsigned int slot) {
  AvbABData ab_data;
  bool is_marked_successful;

  avb_assert(slot < 2);

  if (slot >= module_getNumberSlots()) {
    return -EINVAL;
  } else if (avb_ab_data_read(ops->ab_ops, &ab_data) != AVB_IO_RESULT_OK) {
    return -EIO;
  }

  is_marked_successful = ab_data.slots[slot].successful_boot;

  return is_marked_successful ? 1 : 0;
}

//static const char* module_getSuffix(boot_control_module_t* module,
static const char* module_getSuffix(unsigned int slot) {
  static const char* suffix[2] = {"_a", "_b"};
  if (slot >= 2) {
    return NULL;
  }
  return suffix[slot];
}

/*
static struct hw_module_methods_t module_methods = {
    .open = NULL,
};

boot_control_module_t HAL_MODULE_INFO_SYM = {
    .common =
        {
            .tag = HARDWARE_MODULE_TAG,
            .module_api_version = BOOT_CONTROL_MODULE_API_VERSION_0_1,
            .hal_api_version = HARDWARE_HAL_API_VERSION,
            .id = BOOT_CONTROL_HARDWARE_MODULE_ID,
            .name = "AVB implementation of boot_control HAL",
            .author = "The Android Open Source Project",
            .methods = &module_methods,
        },
    .init = module_init,
    .getNumberSlots = module_getNumberSlots,
    .getCurrentSlot = module_getCurrentSlot,
    .markBootSuccessful = module_markBootSuccessful,
    .setActiveBootSlot = module_setActiveBootSlot,
    .setSlotAsUnbootable = module_setSlotAsUnbootable,
    .isSlotBootable = module_isSlotBootable,
    .getSuffix = module_getSuffix,
    .isSlotMarkedSuccessful = module_isSlotMarkedSuccessful,
};
*/

#include <stdio.h>

int main(int argc, char *argv[]){
    int slot_where;
    module_init();
    /**
      bootcontrol activeboot
      bootcontrol unbootable
      bootcontrol bootable
    */
    if(argc < 2){
        printf("please input bootactive/bootunable/bootable <0 | 1>\n"
               "Example:\n"
               "	%s activeboot 0 #set active slot to _a\n",
               argv[0]);
        return -1;
    }
    
    if(strcmp(argv[1], "bootable") == 0){
        module_markBootSuccessful();
    }else if(strcmp(argv[1], "bootunable") == 0){
        if(argc == 3){
            slot_where = atoi(argv[2]);
            module_setSlotAsUnbootable(slot_where);
        }
    }else if(strcmp(argv[1], "bootactive") == 0){
        if(argc == 3){
            slot_where = atoi(argv[2]);
            module_setActiveBootSlot(slot_where);
        }
    }else if(strcmp(argv[1], "success") == 0){
        if(argc == 3){
            slot_where = atoi(argv[2]);
            int res = module_isSlotMarkedSuccessful(slot_where);
            printf("isSlotMarkedSuccessful = %d\n", res);
        }
    }else {
        printf("please input activeboot/unableboot/bootable\n");
        return -1;
    }
    return 0;
}