//#START_FUNCTION_HEADER//////////////////////////////////////////////////////
//#
//# Description: Initialization function. Configures IO pins, enables interrupts.
//# Heartbeat checks the accelerometers and determines if there are 1
//# or 2 active (in case we unstuff the second one in future) and sets.
//# the device into factory mode. In debug, it can print out initialization stats.
//#
//# Parameters: None
//#
//# Returns: Nothing
//#
//#//END_FUNCTION_HEADER////////////////////////////////////////////////////////
void setup()
{
pinMode(LED, OUTPUT);
pinMode(SAME_BLE, INPUT);
pinMode(INT1_ACC, INPUT);
pinMode(INT2_ACC, INPUT);
pinMode(INT_BLE, INPUT);
#ifdef RDV_DEBUG
Serial.begin(115200);
while(!Serial);
#endif
sei(); //ENABLE EXTERNAL INTERRUPT FOR WAKEUP
got_slp_wake = false;
got_data_acc = false;
got_int_ble = false;
both_acc = false;
_sleep_inactive = false;
_sleep_active = false;
intCount = 0;
// WHO_AM_I should always be 0x2A
accel_on = acc1.readRegister(WHO_AM_I) == 0x2A;
both_acc = acc2.readRegister(WHO_AM_I) == 0x2A;
#ifdef RDV_DEBUG
if(accel_on)
{
Serial.println("MMA8452Q is on-line...");
}
else
{
Serial.print("Could not connect to MMA8452Q");
}
#endif
#ifdef RDV_DEBUG
Serial.println("WELCOME TO CYCLEAT...");
Serial.println("+++++++++++++++++++++++++++++");
long tempVcc = read_vcc();
Serial.print("Power Level At: ");
Serial.print(tempVcc / 1000);
Serial.print(".");
Serial.print(tempVcc % 1000);
Serial.println("V");
Serial.print("ACC ODR: ");
Serial.println(f_odr);
Serial.print("ACC 1: ");
Serial.print(accel_on);
Serial.print("\t");
Serial.print("ACC 2: ");
Serial.println(both_acc);
Serial.println("+++++++++++++++++++++++++++++");
Serial.println("Setting into factory mode...");
delay(2500);
#endif
set_factory_mode();
}
int main(int argc, char **argv)
{
char *base;
int f;
/*
Make sure std* are valid since several functions attempt to close these
handles. If nvram_*() runs first, nvram=0, nvram gets closed. - zzz
*/
if ((f = open("/dev/null", O_RDWR)) < 0) {
}
else if(f < 3) {
dup(f);
dup(f);
}
else {
close(f);
}
base = strrchr(argv[0], '/');
base = base ? base + 1 : argv[0];
#if 0
if (strcmp(base, "rc") == 0) {
if (argc < 2) return 1;
if (strcmp(argv[1], "start") == 0) return kill(1, SIGUSR2);
if (strcmp(argv[1], "stop") == 0) return kill(1, SIGINT);
if (strcmp(argv[1], "restart") == 0) return kill(1, SIGHUP);
++argv;
--argc;
base = argv[0];
}
#endif
#if !defined(CONFIG_BCMWL5)
if(getpid() != 1)
{
#endif
#if defined(DEBUG_NOISY)
if (nvram_match("debug_logrc", "1")) {
int i;
cprintf("[rc %d] ", getpid());
for (i = 0; i < argc; ++i) {
cprintf("%s ", argv[i]);
}
cprintf("\n");
}
#endif
#if defined(DEBUG_NOISY)
if (nvram_match("debug_ovrc", "1")) {
char tmp[256];
char *a[32];
realpath(argv[0], tmp);
if ((strncmp(tmp, "/tmp/", 5) != 0) && (argc < 32)) {
sprintf(tmp, "%s%s", "/tmp/", base);
if (f_exists(tmp)) {
cprintf("[rc] override: %s\n", tmp);
memcpy(a, argv, argc * sizeof(a[0]));
a[argc] = 0;
a[0] = tmp;
execvp(tmp, a);
exit(0);
}
}
}
#endif
#if !defined(CONFIG_BCMWL5)
}
#endif
const applets_t *a;
for (a = applets; a->name; ++a) {
if (strcmp(base, a->name) == 0) {
openlog(base, LOG_PID, LOG_USER);
return a->main(argc, argv);
}
}
if(!strcmp(base, "restart_wireless")){
printf("restart wireless...\n");
restart_wireless();
return 0;
}
else if(!strcmp(base, "nvram_erase")){
nvram_set(ASUS_STOP_COMMIT, "1");
erase_nvram();
return 0;
}
#ifdef RTCONFIG_USB
else if(!strcmp(base, "get_apps_name")){
if(argc != 2){
printf("Usage: get_apps_name [File name]\n");
return 0;
}
return get_apps_name(argv[1]);
}
#ifdef BCM_MMC
else if(!strcmp(base, "asus_mmc")){
if(argc != 3){
printf("Usage: asus_mmc [device_name] [action]\n");
return 0;
}
return asus_mmc(argv[1], argv[2]);
}
#endif
else if(!strcmp(base, "asus_sd")){
if(argc != 3){
printf("Usage: asus_sd [device_name] [action]\n");
return 0;
}
return asus_sd(argv[1], argv[2]);
}
else if(!strcmp(base, "asus_lp")){
if(argc != 3){
printf("Usage: asus_lp [device_name] [action]\n");
return 0;
}
return asus_lp(argv[1], argv[2]);
}
else if(!strcmp(base, "asus_sg")){
if(argc != 3){
printf("Usage: asus_sg [device_name] [action]\n");
return 0;
}
return asus_sg(argv[1], argv[2]);
}
else if(!strcmp(base, "asus_sr")){
if(argc != 3){
printf("Usage: asus_sr [device_name] [action]\n");
return 0;
}
return asus_sr(argv[1], argv[2]);
}
else if(!strcmp(base, "asus_tty")){
if(argc != 3){
printf("Usage: asus_tty [device_name] [action]\n");
return 0;
}
return asus_tty(argv[1], argv[2]);
}
else if(!strcmp(base, "asus_usbbcm")){
if(argc != 3){
printf("Usage: asus_usbbcm [device_name] [action]\n");
return 0;
}
return asus_usbbcm(argv[1], argv[2]);
}
else if(!strcmp(base, "asus_usb_interface")){
if(argc != 3){
printf("Usage: asus_usb_interface [device_name] [action]\n");
return 0;
}
return asus_usb_interface(argv[1], argv[2]);
}
else if (!strcmp(base, "usb_notify")) {
#if defined(RTCONFIG_APP_PREINSTALLED) || defined(RTCONFIG_APP_NETINSTALLED)
usb_notify();
#endif
return 0;
}
#if defined(RTCONFIG_APP_PREINSTALLED) || defined(RTCONFIG_APP_NETINSTALLED)
else if(!strcmp(base, "run_app_script")){
if(argc != 3){
printf("Usage: run_app_script [Package name | allpkg] [APP action]\n");
return 0;
}
if(!strcmp(argv[1], "allpkg"))
return run_app_script(NULL, argv[2]);
else
return run_app_script(argv[1], argv[2]);
}
else if (!strcmp(base, "chk_app_state")) {
#define PID_FILE "/var/run/chk_app_state.pid"
FILE *fp;
char chk_value[4];
if(f_read_string(PID_FILE, chk_value, 4) > 0
&& atoi(chk_value) != getpid()){
_dprintf("Already running!\n");
return 0;
}
if((fp = fopen(PID_FILE, "w")) == NULL){
_dprintf("Can't open the pid file!\n");
return 0;
}
fprintf(fp, "%d", getpid());
fclose(fp);
memset(chk_value, 0, 4);
strncpy(chk_value, nvram_safe_get("apps_state_switch"), 4);
if(strcmp(chk_value, "")){
if(atoi(chk_value) != APPS_SWITCH_FINISHED && !pids("app_switch.sh")){
_dprintf("Don't have the switch script.\n");
nvram_set("apps_state_switch", "");
}
unlink(PID_FILE);
return 0;
}
memset(chk_value, 0, 4);
strncpy(chk_value, nvram_safe_get("apps_state_install"), 4);
if(strcmp(chk_value, "")){
if(atoi(chk_value) != APPS_INSTALL_FINISHED && !pids("app_install.sh")){
_dprintf("Don't have the install script.\n");
nvram_set("apps_state_install", "");
}
unlink(PID_FILE);
return 0;
}
memset(chk_value, 0, 4);
strncpy(chk_value, nvram_safe_get("apps_state_upgrade"), 4);
if(strcmp(chk_value, "")){
if(atoi(chk_value) != APPS_UPGRADE_FINISHED && !pids("app_upgrade.sh")){
_dprintf("Don't have the upgrade script.\n");
nvram_set("apps_state_upgrade", "");
}
unlink(PID_FILE);
return 0;
}
memset(chk_value, 0, 4);
strncpy(chk_value, nvram_safe_get("apps_state_enable"), 4);
if(strcmp(chk_value, "")){
if(atoi(chk_value) != APPS_ENABLE_FINISHED && !pids("app_set_enabled.sh")){
_dprintf("Don't have the enable script.\n");
nvram_set("apps_state_enable", "");
}
unlink(PID_FILE);
return 0;
}
unlink(PID_FILE);
return 0;
}
#endif
#endif
else if(!strcmp(base, "ATE")) {
if( argc == 2 || argc == 3 || argc == 4) {
asus_ate_command(argv[1], argv[2], argv[3]);
}
else
printf("ATE_ERROR\n");
return 0;
}
#if defined(RTCONFIG_RALINK) || defined(RTCONFIG_QCA)
else if (!strcmp(base, "FWRITE")) {
if (argc == 3)
return FWRITE(argv[1], argv[2]);
else
return 0;
}
else if (!strcmp(base, "FREAD")) {
if (argc == 3)
{
unsigned int addr;
int len;
addr = strtoul(argv[1], NULL, 16);
if(argv[2][0] == '0' && argv[2][1] == 'x')
len = (int) strtoul(argv[2], NULL, 16);
else
len = (int) strtoul(argv[2], NULL, 10);
if(len > 0)
return FREAD(addr, len);
}
printf("ATE_ERROR\n");
return 0;
}
#endif /* RTCONFIG_RALINK || RTCONFIG_QCA */
#if defined(RTCONFIG_RALINK)
#if defined(RTCONFIG_HAS_5G)
else if (!strcmp(base, "asuscfe_5g")) {
if (argc == 2)
return asuscfe(argv[1], WIF_5G);
else
return EINVAL;
}
#endif /* RTCONFIG_HAS_5G */
else if (!strcmp(base, "asuscfe_2g")) {
if (argc == 2)
return asuscfe(argv[1], WIF_2G);
else
return EINVAL;
}
else if (!strcmp(base, "stainfo_2g")) {
return stainfo(0);
}
#if defined(RTCONFIG_HAS_5G)
else if (!strcmp(base, "stainfo_5g")) {
return stainfo(1);
}
#endif /* RTCONFIG_HAS_5G */
#ifdef RTCONFIG_DSL
else if(!strcmp(base, "gen_ralink_config")){
if(argc != 3){
printf("Usage: gen_ralink_config [band] [is_iNIC]\n");
return 0;
}
return gen_ralink_config(atoi(argv[1]), atoi(argv[2]));
}
#endif
#endif
#if defined(CONFIG_BCMWL5) || defined(RTCONFIG_RALINK) || defined(RTCONFIG_QCA)
else if(!strcmp(base, "set_factory_mode")) {
set_factory_mode();
return 0;
}
#endif
else if(!strcmp(base, "run_telnetd")) {
run_telnetd();
return 0;
}
#ifdef RTCONFIG_SSH
else if(!strcmp(base, "run_sshd")) {
start_sshd();
return 0;
}
#endif
#ifdef RTCONFIG_WTFAST
else if(!strcmp(base, "run_wtfast")) {
start_wtfast();
return 0;
}
#endif
#if defined(RTCONFIG_PPTPD) || defined(RTCONFIG_ACCEL_PPTPD)
else if(!strcmp(base, "run_pptpd")) {
start_pptpd();
return 0;
}
#endif
#ifdef RTCONFIG_PARENTALCTRL
else if(!strcmp(base, "pc")) {
pc_main(argc, argv);
return 0;
}
else if(!strcmp(base, "pc_block")) {
pc_block_main(argc, argv);
return 0;
}
#endif
#if defined(CONFIG_BCMWL5) || (defined(RTCONFIG_RALINK) && defined(RTCONFIG_WIRELESSREPEATER)) || defined(RTCONFIG_QCA)
else if (!strcmp(base, "wlcscan")) {
return wlcscan_main();
}
#ifdef RTCONFIG_QTN
else if (!strcmp(base, "start_psta_qtn")) {
return start_psta_qtn();
}
else if (!strcmp(base, "start_ap_qtn")) {
return start_ap_qtn();
}
else if (!strcmp(base, "start_nodfs_scan_qtn")) {
return start_nodfs_scan_qtn();
}
else if (!strcmp(base, "start_qtn_stateless")) {
return gen_stateless_conf();
}
else if (!strcmp(base, "restart_qtn")){
return reset_qtn(0);
}
#endif
#endif
#ifdef RTCONFIG_DUALWAN
#ifdef CONFIG_BCMWL5
else if (!strcmp(base, "dualwan")){
dualwan_control();
}
#endif
#endif
#ifdef RTCONFIG_WIRELESSREPEATER
else if (!strcmp(base, "wlcconnect")) {
return wlcconnect_main();
}
else if (!strcmp(base, "setup_dnsmq")) {
if(argc != 2)
return 0;
return setup_dnsmq(atoi(argv[1]));
}
#endif
else if (!strcmp(base, "add_multi_routes")) {
return add_multi_routes();
}
else if (!strcmp(base, "led_ctrl")) {
if (argc != 3)
return 0;
return(led_control_atomic(atoi(argv[1]), atoi(argv[2])));
}
#ifdef RTCONFIG_BCMARM
#if defined(RTAC1200G) || defined(RTAC1200GP)
/* mtd-erase2 [device] */
else if (!strcmp(base, "mtd-erase2")) {
if (argv[1] && ((!strcmp(argv[1], "boot")) ||
(!strcmp(argv[1], "linux")) ||
(!strcmp(argv[1], "rootfs")) ||
(!strcmp(argv[1], "nvram")))) {
return mtd_erase(argv[1]);
} else {
fprintf(stderr, "usage: mtd-erase2 [device]\n");
return EINVAL;
}
}
/* mtd-write2 [path] [device] */
else if (!strcmp(base, "mtd-write2")) {
if (argc >= 3)
return mtd_write(argv[1], argv[2]);
else {
fprintf(stderr, "usage: mtd-write2 [path] [device]\n");
return EINVAL;
}
}
#else
/* mtd-erase2 [device] */
else if (!strcmp(base, "mtd-erase2")) {
if (argv[1] && ((!strcmp(argv[1], "boot")) ||
(!strcmp(argv[1], "linux")) ||
(!strcmp(argv[1], "linux2")) ||
(!strcmp(argv[1], "rootfs")) ||
(!strcmp(argv[1], "rootfs2")) ||
(!strcmp(argv[1], "brcmnand")) ||
(!strcmp(argv[1], "nvram")))) {
return mtd_erase(argv[1]);
} else {
fprintf(stderr, "usage: mtd-erase2 [device]\n");
return EINVAL;
}
}
/* mtd-write2 [path] [device] */
else if (!strcmp(base, "mtd-write2")) {
if (argc >= 3)
return mtd_write(argv[1], argv[2]);
else {
fprintf(stderr, "usage: mtd-write2 [path] [device]\n");
return EINVAL;
}
}
#endif
#endif
else if(!strcmp(base, "test_endian")){
int num = 0x04030201;
char c = *(char *)(&num);
if(c == 0x04 || c == 0x01){
if(c == 0x04)
printf("Big.\n");
else
printf("Little.\n");
}
else
printf("test error!\n");
return 0;
}
else if (!strcmp(base, "free_caches")) {
int c;
unsigned int test_num;
char *set_value = NULL;
int clean_time = 1;
int threshold = 0;
if(argc){
while((c = getopt(argc, argv, "c:w:t:")) != -1){
switch(c){
case 'c': // set the clean-cache mode: 0~3.
test_num = strtol(optarg, NULL, 10);
if(test_num == LONG_MIN || test_num == LONG_MAX){
_dprintf("ERROR: unknown value %s...\n", optarg);
return 0;
}
if(test_num < 0 || test_num > 3){
_dprintf("ERROR: the value %s was over the range...\n", optarg);
return 0;
}
set_value = optarg;
break;
case 'w': // set the waited time for cleaning.
test_num = strtol(optarg, NULL, 10);
if(test_num < 0 || test_num == LONG_MIN || test_num == LONG_MAX){
_dprintf("ERROR: unknown value %s...\n", optarg);
return 0;
}
clean_time = test_num;
break;
case 't': // set the waited time for cleaning.
test_num = strtol(optarg, NULL, 10);
if(test_num < 0 || test_num == LONG_MIN || test_num == LONG_MAX){
_dprintf("ERROR: unknown value %s...\n", optarg);
return 0;
}
threshold = test_num;
break;
default:
fprintf(stderr, "Usage: free_caches [ -c clean_mode ] [ -w clean_time ] [ -t threshold ]\n");
break;
}
}
}
if(!set_value)
set_value = FREE_MEM_PAGE;
free_caches(set_value, clean_time, threshold);
return 0;
}
#ifdef RTCONFIG_USB_MODEM
else if(!strcmp(base, "write_3g_ppp_conf")){
return write_3g_ppp_conf();
}
#if (defined(RTCONFIG_JFFS2) || defined(RTCONFIG_BRCM_NAND_JFFS2) || defined(RTCONFIG_UBIFS))
else if(!strcmp(base, "lplus")){
if(argc != 3){
printf("Usage: %s <integer1> <integer2>.\n", argv[0]);
return 0;
}
unsigned long long int1 = strtoull(argv[1], NULL, 10);
unsigned long long int2 = strtoull(argv[2], NULL, 10);
unsigned long long total = int1+int2;
printf("%llu", total);
return 0;
}
else if(!strcmp(base, "lminus")){
if(argc != 3){
printf("Usage: %s <integer1> <integer2>.\n", argv[0]);
return 0;
}
unsigned long long int1 = strtoull(argv[1], NULL, 10);
unsigned long long int2 = strtoull(argv[2], NULL, 10);
unsigned long long total = int1-int2;
printf("%llu", total);
return 0;
}
#endif
#endif
#ifdef RTCONFIG_TOR
else if (!strcmp(base, "start_tor")) {
start_Tor_proxy();
return 0;
}
#endif
#if ((defined(RTCONFIG_USER_LOW_RSSI) && defined(RTCONFIG_BCMARM)) || defined(RTCONFIG_NEW_USER_LOW_RSSI))
else if (!strcmp(base, "start_roamast")) {
start_roamast();
return 0;
}
#endif
#if defined(RTCONFIG_KEY_GUARD)
else if (!strcmp(base, "start_keyguard")) {
start_keyguard();
return 0;
}
#endif
printf("Unknown applet: %s\n", base);
return 0;
}
