extern int test_if_mount_point_of_pool(const char *dirname){
char *mount_dir, *follow_info;
int layer = 0;
follow_info = (char *)dirname;
while((follow_info = index(follow_info, '/')) != NULL){
++follow_info;
++layer;
}
if(layer != MOUNT_LAYER)
return 0;
mount_dir = rindex(dirname, '/');
if(mount_dir == NULL)
return 0;
++mount_dir;
if(mount_dir[0] == 0 || isspace(mount_dir[0]))
return 0;
if(mount_dir[0] == '.')
return 0;
if(!check_if_dir_exist(dirname))
return 0;
return layer;
}
int check_process_exist(int pid){
char path[32];
memset(path, 0, 32);
sprintf(path, "/proc/%d", pid);
return check_if_dir_exist(path);
}
extern int delete_file_or_dir(char *target){
int ret;
if(check_if_dir_exist(target))
ret = rmdir(target);
else
ret = unlink(target);
return ret;
}
int create_mp_link(char *search_dir, char *link_path, int force_first_valid)
{
FILE *procpt;
char line[256], devname[32], mpname[128], system_type[16], mount_mode[160], target_path[256];
int dummy1, dummy2, link_created;
link_created = 0;
procpt = fopen("/proc/mounts", "r");
if (procpt) {
while (fgets(line, sizeof(line), procpt)) {
if (sscanf(line, "%s %s %s %s %d %d", devname, mpname, system_type, mount_mode, &dummy1, &dummy2) != 6)
continue;
#if 0
if (only_ext_xfs) {
if (strcmp(system_type, "xfs") && strcmp(system_type, "exfat") && strncmp(system_type, "ext", 3))
continue;
}
#endif
if (strncmp(devname, "/dev/sd", 7) == 0 && strncmp(mpname, "/media/", 7) == 0) {
sprintf(target_path, "%s/%s", mpname, search_dir);
if (!force_first_valid) {
if (check_if_dir_exist(target_path)) {
if (symlink(target_path, link_path) == 0) {
link_created = 1;
break;
}
}
} else {
if (mkdir_if_none(target_path)) {
if (symlink(target_path, link_path) == 0) {
link_created = 1;
break;
}
}
}
}
}
fclose(procpt);
}
return link_created;
}
void start_jffs2(void)
{
if (!nvram_match("jffs2_on", "1")) {
notice_set("jffs", "");
return;
}
int format = 0;
char s[256];
int size;
int part;
const char *p;
struct statfs sf;
int model = 0;
int i = 0;
while(1) {
if (wait_action_idle(10)) break;
else i++;
if(i>=10) {
_dprintf("Mount jffs2 failed!");
return;
}
}
if (!mtd_getinfo(JFFS2_PARTITION, &part, &size)) return;
model = get_model();
_dprintf("start jffs2: %d, %d\n", part, size);
if (nvram_match("jffs2_format", "1")) {
nvram_set("jffs2_format", "0");
nvram_commit_x();
if (!mtd_erase(JFFS_NAME)) {
error("formatting");
return;
}
format = 1;
}
sprintf(s, "%d", size);
p = nvram_get("jffs2_size");
if ((p == NULL) || (strcmp(p, s) != 0)) {
if (format) {
nvram_set("jffs2_size", s);
nvram_commit_x();
}
else if ((p != NULL) && (*p != 0)) {
error("verifying known size of");
return;
}
}
if (statfs("/jffs", &sf) == 0) {
switch(model) {
case MODEL_RTAC56S:
case MODEL_RTAC56U:
case MODEL_RTAC3200:
case MODEL_DSLAC68U:
case MODEL_RPAC68U:
case MODEL_RTAC68U:
case MODEL_RTAC87U:
case MODEL_RTN18U:
case MODEL_RTN65U:
case MODEL_RTN14U: // it should be better to use LINUX_KERNEL_VERSION >= KERNEL_VERSION(2,6,36)
{
if (sf.f_type != 0x73717368 /* squashfs */) {
// already mounted
notice_set("jffs", format ? "Formatted" : "Loaded");
return;
}
break;
}
default:
{
if (sf.f_type != 0x71736873 /* squashfs */) {
// already mounted
notice_set("jffs", format ? "Formatted" : "Loaded");
return;
}
break;
}
}
}
if (nvram_get_int("jffs2_clean_fs")) {
if (!mtd_unlock(JFFS2_PARTITION)) {
error("unlocking");
return;
}
}
modprobe(JFFS_NAME);
sprintf(s, MTD_BLKDEV(%d), part);
if (mount(s, "/jffs", JFFS_NAME, MS_NOATIME, "") != 0) {
if (!mtd_erase(JFFS_NAME)) {
error("formatting");
return;
}
format = 1;
if (mount(s, "/jffs", JFFS_NAME, MS_NOATIME, "") != 0) {
_dprintf("*** jffs2 2-nd mount error\n");
//modprobe_r(JFFS_NAME);
error("mounting");
return;
}
}
#ifdef TEST_INTEGRITY
int test;
if (format) {
if (f_write("/jffs/.tomato_do_not_erase", &size, sizeof(size), 0, 0) != sizeof(size)) {
stop_jffs2(0);
error("setting integrity test for");
return;
}
}
if ((f_read("/jffs/.tomato_do_not_erase", &test, sizeof(test)) != sizeof(test)) || (test != size)) {
stop_jffs2(0);
error("testing integrity of");
return;
}
#endif
if (nvram_get_int("jffs2_clean_fs")) {
_dprintf("Clean /jffs/*\n");
system("rm -fr /jffs/*");
nvram_unset("jffs2_clean_fs");
nvram_commit_x();
}
notice_set("jffs", format ? "Formatted" : "Loaded");
if (((p = nvram_get("jffs2_exec")) != NULL) && (*p != 0)) {
chdir("/jffs");
system(p);
chdir("/");
}
run_userfile("/jffs", ".asusrouter", "/jffs", 3);
if (!check_if_dir_exist("/jffs/scripts/")) mkdir("/jffs/scripts/", 0755);
if (!check_if_dir_exist("/jffs/configs/")) mkdir("/jffs/configs/", 0755);
}
void start_jffs2(void)
{
if (!nvram_match("jffs2_on", "1")) {
notice_set("jffs", "");
return;
}
int format = 0;
char s[256];
int size;
int part;
const char *p;
struct statfs sf;
if (!wait_action_idle(10)) return;
if (!mtd_getinfo("jffs2", &part, &size)) return;
_dprintf("*** jffs2: %d, %d\n", part, size);
if (nvram_match("jffs2_format", "1")) {
nvram_set("jffs2_format", "0");
if (!mtd_erase("jffs2")) {
error("formatting");
return;
}
format = 1;
}
sprintf(s, "%d", size);
p = nvram_get("jffs2_size");
if ((p == NULL) || (strcmp(p, s) != 0)) {
if (format) {
nvram_set("jffs2_size", s);
nvram_commit_x();
}
else if ((p != NULL) && (*p != 0)) {
error("verifying known size of");
return;
}
}
if ((statfs("/jffs", &sf) == 0) && (sf.f_type != 0x71736873 /* squashfs */)) {
// already mounted
notice_set("jffs", format ? "Formatted" : "Loaded");
return;
}
if (!mtd_unlock("jffs2")) {
error("unlocking");
return;
}
modprobe(JFFS_NAME);
sprintf(s, MTD_BLKDEV(%d), part);
if (mount(s, "/jffs", JFFS_NAME, MS_NOATIME, "") != 0) {
_dprintf("*** jffs2 mount error\n");
//modprobe_r(JFFS_NAME);
error("mounting");
return;
}
#ifdef TEST_INTEGRITY
int test;
if (format) {
if (f_write("/jffs/.tomato_do_not_erase", &size, sizeof(size), 0, 0) != sizeof(size)) {
stop_jffs2();
error("setting integrity test for");
return;
}
}
if ((f_read("/jffs/.tomato_do_not_erase", &test, sizeof(test)) != sizeof(test)) || (test != size)) {
stop_jffs2();
error("testing integrity of");
return;
}
#endif
notice_set("jffs", format ? "Formatted" : "Loaded");
if (((p = nvram_get("jffs2_exec")) != NULL) && (*p != 0)) {
chdir("/jffs");
system(p);
chdir("/");
}
run_userfile("/jffs", ".asusrouter", "/jffs", 3);
if (!check_if_dir_exist("/jffs/scripts/")) mkdir("/jffs/scripts/", 0755);
if (!check_if_dir_exist("/jffs/configs/")) mkdir("/jffs/configs/", 0755);
}
int start_timemachine()
{
int ret = 0;
char cnid_path[80];
char backup_path[80];
//char token_path[80];
char test_log[100];
char *mount_point_name;
char prefix[] = "usb_pathXXXXXXXXXXXXXXXXX_", tmp[100];
char usb1_vid[8], usb1_pid[8], usb1_serial[64];
char usb2_vid[8], usb2_pid[8], usb2_serial[64];
snprintf(prefix, sizeof(prefix), "usb_path%s", "1");
memset(usb1_vid, 0, 8);
strncpy(usb1_vid, nvram_safe_get(strcat_r(prefix, "_vid", tmp)), 8);
memset(usb1_pid, 0, 8);
strncpy(usb1_pid, nvram_safe_get(strcat_r(prefix, "_pid", tmp)), 8);
memset(usb1_serial, 0, 64);
strncpy(usb1_serial, nvram_safe_get(strcat_r(prefix, "_serial", tmp)), 8);
snprintf(prefix, sizeof(prefix), "usb_path%s", "2");
memset(usb2_vid, 0, 8);
strncpy(usb2_vid, nvram_safe_get(strcat_r(prefix, "_vid", tmp)), 8);
memset(usb2_pid, 0, 8);
strncpy(usb2_pid, nvram_safe_get(strcat_r(prefix, "_pid", tmp)), 8);
memset(usb2_serial, 0, 64);
strncpy(usb2_serial, nvram_safe_get(strcat_r(prefix, "_serial", tmp)), 8);
//clear_timemachine_tokeninfo();
//find_tokenfile_partition();
if(!nvram_match("timemachine_enable", "1"))
return -1;
if(nvram_safe_get("tm_device_name") == NULL)
{
_dprintf("Timemachine: no device name to backup\n");
logmessage("Timemachine", "no device name to backup");
return -1;
}
#if 1
if(nvram_match("tm_ui_setting", "1")){
logmessage("Timemachine", "User select disk start TimeMachine");
mount_point_name = find_mountpoint(nvram_safe_get("tm_device_name"));
nvram_set("tm_ui_setting", "0");
}else{
//check mountpoint exchange or not
if(!nvram_match("tm_usb_path_vid", "")
&& (nvram_match("tm_usb_path_vid",usb1_vid))
&& (nvram_match("tm_usb_path_pid",usb1_pid))
&& (nvram_match("tm_usb_path_serial",usb1_serial)))
{
sprintf(test_log, "Time Machine interface1 change %s -> %s", nvram_safe_get("tm_device_name"),nvram_safe_get("tm_partition_num"));
mount_point_name = find_mountpoint(nvram_safe_get("tm_device_name"));
logmessage("Timemachine", test_log);
}
else if(!nvram_match("tm_usb_path_vid", "")
&& (nvram_match("tm_usb_path_vid",usb2_vid))
&& (nvram_match("tm_usb_path_pid",usb2_pid))
&& (nvram_match("tm_usb_path_serial",usb2_serial)))
{
sprintf(test_log, "tm_device_name interface2 change %s -> %s", nvram_safe_get("tm_device_name"),nvram_safe_get("tm_partition_num"));
mount_point_name = find_mountpoint(nvram_safe_get("tm_device_name"));
logmessage("Timemachine", test_log);
}else{
logmessage("Timemachine", "No disk to auto start TimeMachine");
mount_point_name = find_mountpoint(nvram_safe_get("tm_device_name"));
}
}
#endif
if(mount_point_name == NULL)
{
_dprintf("Timemachine: can not find the correct mount point name\n");
logmessage("Timemachine", "can not find the correct mount point name");
return -1;
}
if(!check_if_dir_exist(mount_point_name))
{
_dprintf("Timemachine: mount point name doesn't exist\n");
logmessage("Timemachine", "mount point name doesn't exist");
return -1;
}
// Create directory for use by afpd daemon and configuration file
//if(!check_if_dir_exist(AFP_LOCK_PATH)) mkdir(AFP_LOCK_PATH, 0777);
//if(!check_if_dir_exist(AFP_CONFIG_PATH)) mkdir(AFP_CONFIG_PATH, 0777);
mkdir_if_none(AFP_LOCK_PATH);
mkdir_if_none(AFP_CONFIG_PATH);
// Create directory for use by avahi daemon and configuration file
//if(!check_if_dir_exist(AVAHI_CONFIG_PATH)) mkdir(AVAHI_CONFIG_PATH, 0777);
//if(!check_if_dir_exist(AVAHI_SERVICES_PATH)) mkdir(AVAHI_SERVICES_PATH, 0777);
mkdir_if_none(AVAHI_CONFIG_PATH);
mkdir_if_none(AVAHI_SERVICES_PATH);
// Create directory for use by cnid_metad and cnid_dbd daemon
sprintf(cnid_path, "%s/%s", mount_point_name, CNID_DIR_NAME);
sprintf(backup_path, "%s", mount_point_name);
//Create token file
//sprintf(token_path, "%s/%s", mount_point_name, TIMEMACHINE_TOKEN_FILE);
//if(!check_if_file_exist(token_path))
// ret = generate_timemachine_token_file(token_path);
//if(!check_if_dir_exist(cnid_path)) mkdir(cnid_path, 0777);
//if(!check_if_dir_exist(backup_path)) mkdir(backup_path, 0777);
mkdir_if_none(cnid_path);
//mkdir_if_none(backup_path);
ret = generate_afp_config(mount_point_name);
start_afpd();
start_cnid_metad();
restart_mdns();
logmessage("Timemachine", "daemon is started");
return ret;
}
int
image_to_base64(char *file_path, char *client_mac) {
FILE * pFile;
long lSize;
char *buffer;
char *base64;
size_t result;
int i;
//toUpperCase
char client_mac_temp[15];
memset(client_mac_temp, 0, sizeof(client_mac_temp));
sprintf(client_mac_temp, client_mac);
int idex = 0;
while ( client_mac_temp[idex] != 0 ) {
if ( ( client_mac_temp[idex] >= 'a' ) && ( client_mac_temp[idex] <= 'z' ) ) {
client_mac_temp[idex] = client_mac_temp[idex] - 'a' + 'A';
}
idex++;
}
pFile = fopen (file_path , "rb");
if (pFile == NULL) {
printf("File error\n");
i = 0;
return i;
}
// obtain file size:
fseek (pFile , 0 , SEEK_END);
lSize = ftell (pFile);
rewind (pFile);
// allocate memory to contain the whole file:
buffer = (char*) malloc (sizeof(char)*lSize);
base64 = (char*) malloc (sizeof(char)*lSize);
if (buffer == NULL) {
printf("Memory error\n");
i = 0;
return i;
}
// copy the file into the buffer:
result = fread (buffer,1,lSize,pFile);
if (result != lSize) {
printf("Reading error\n");
i = 0;
return i;
}
//image binary to base64
if (openvpn_base64_encode (buffer, lSize, &base64) <= 0) {
printf("binary encode error \n");
i = 0;
return i;
}
//image header + image base64
char image_base64[(strlen(base64) + 25)];
memset(image_base64, 0, sizeof(image_base64));
sprintf(image_base64, "data:image/jpeg;base64,");
strcat(image_base64, base64);
// terminate
fclose (pFile);
free (buffer);
free (base64);
//wirte image_base64 to file
char write_file_path[35];
memset(write_file_path, 0, sizeof(write_file_path)); //file path: /jffs/usericon/mac.log
//Check folder exist or not
if(!check_if_dir_exist("/jffs/usericon"))
system("mkdir /jffs/usericon");
sprintf(write_file_path, "/jffs/usericon/%s.log", client_mac_temp);
//if have exist mac file , don't witre
if(!check_if_file_exist(write_file_path)) {
int str_len = strlen(image_base64);
int i;
FILE * pFile;
pFile = fopen (write_file_path , "w");
if (pFile == NULL) {
printf("File error\n");
i = 0;
return i;
}
for(i = 0; i < str_len; i++) {
fputc(image_base64[i], pFile);
}
fclose (pFile);
}
i = 1;
return i;
}
void start_jffs2(void)
{
if (!nvram_match("jffs2_enable", "1")) {
notice_set("jffs", "");
return;
}
int format = 0;
char s[256];
int size;
int part;
const char *p;
int model = 0;
int i = 0;
while(1) {
if (wait_action_idle(10)) break;
else i++;
if(i>=10) {
_dprintf("Mount jffs2 failed!");
return;
}
}
if (!mtd_getinfo(JFFS2_PARTITION, &part, &size)) return;
model = get_model();
_dprintf("start jffs2: %d, %d\n", part, size);
if (nvram_match("jffs2_format", "1")) {
nvram_set("jffs2_format", "0");
nvram_commit_x();
if (mtd_erase(JFFS2_MTD_NAME)) {
error("formatting");
return;
}
format = 1;
}
sprintf(s, "%d", size);
p = nvram_get("jffs2_size");
if ((p == NULL) || (strcmp(p, s) != 0)) {
if (format) {
nvram_set("jffs2_size", s);
nvram_commit_x();
}
else if ((p != NULL) && (*p != 0)) {
error("verifying known size of");
return;
}
}
if(!check_in_rootfs("/jffs", "jffs", format))
return;
if (nvram_get_int("jffs2_clean_fs")) {
if (!mtd_unlock(JFFS2_PARTITION)) {
error("unlocking");
return;
}
}
modprobe(JFFS_NAME);
sprintf(s, MTD_BLKDEV(%d), part);
if (mount(s, "/jffs", JFFS_NAME, MS_NOATIME, "") != 0) {
if (mtd_erase(JFFS2_MTD_NAME)) {
jffs2_fail = 1;
error("formatting");
return;
}
format = 1;
if (mount(s, "/jffs", JFFS_NAME, MS_NOATIME, "") != 0) {
_dprintf("*** jffs2 2-nd mount error\n");
//modprobe_r(JFFS_NAME);
error("mounting");
jffs2_fail = 1;
return;
}
}
if(nvram_match("force_erase_jffs2", "1")) {
_dprintf("\n*** force erase jffs2 ***\n");
mtd_erase(JFFS2_MTD_NAME);
nvram_set("jffs2_clean_fs", "1");
nvram_commit();
reboot(RB_AUTOBOOT);
}
#ifdef TEST_INTEGRITY
int test;
if (format) {
if (f_write("/jffs/.tomato_do_not_erase", &size, sizeof(size), 0, 0) != sizeof(size)) {
stop_jffs2(0);
error("setting integrity test for");
return;
}
}
if ((f_read("/jffs/.tomato_do_not_erase", &test, sizeof(test)) != sizeof(test)) || (test != size)) {
stop_jffs2(0);
error("testing integrity of");
return;
}
#endif
if (nvram_get_int("jffs2_clean_fs")) {
_dprintf("Clean /jffs/*\n");
system("rm -fr /jffs/*");
nvram_unset("jffs2_clean_fs");
nvram_commit_x();
}
notice_set("jffs", format ? "Formatted" : "Loaded");
jffs2_fail = 0;
if (((p = nvram_get("jffs2_exec")) != NULL) && (*p != 0)) {
chdir("/jffs");
system(p);
chdir("/");
}
run_userfile("/jffs", ".asusrouter", "/jffs", 3);
if (!check_if_dir_exist("/jffs/scripts/")) mkdir("/jffs/scripts/", 0755);
if (!check_if_dir_exist("/jffs/configs/")) mkdir("/jffs/configs/", 0755);
}
