409 lines
12 KiB
C
409 lines
12 KiB
C
/*================================================================
|
|
Copyright (c) 2020 Quectel Wireless Solution, Co., Ltd. All Rights Reserved.
|
|
Quectel Wireless Solution Proprietary and Confidential.
|
|
=================================================================*/
|
|
/*=================================================================
|
|
|
|
EDIT HISTORY FOR MODULE
|
|
|
|
This section contains comments describing changes made to the module.
|
|
Notice that changes are listed in reverse chronological order.
|
|
|
|
WHEN WHO WHAT, WHERE, WHY
|
|
------------ ------- -------------------------------------------------------------------------------
|
|
|
|
=================================================================*/
|
|
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
//#include "vfs.h"
|
|
|
|
#include "ql_api_osi.h"
|
|
#include "ql_api_nw.h"
|
|
|
|
#include "ql_log.h"
|
|
#include "ql_api_datacall.h"
|
|
#include "ql_ftp_client.h"
|
|
#include "ql_fs.h"
|
|
#include "ql_ssl.h"
|
|
|
|
#define QL_FTP_LOG_LEVEL QL_LOG_LEVEL_INFO
|
|
#define QL_FTP_LOG(msg, ...) QL_LOG(QL_FTP_LOG_LEVEL, "ql_FTP", msg, ##__VA_ARGS__)
|
|
#define QL_FTP_LOG_PUSH(msg, ...) QL_LOG_PUSH("ql_FTP", msg, ##__VA_ARGS__)
|
|
|
|
static ql_task_t ftp_task = NULL;
|
|
char data_tmp[]="hello\n";
|
|
int read_data_count=0;
|
|
#define PRINT_BUF_SIZE 65
|
|
|
|
#define MAX_PATH_SIZE 256
|
|
int dl_size;
|
|
int upl_size;
|
|
|
|
size_t read_data(void *ptr, size_t size, size_t nmemb, void *stream)
|
|
{
|
|
/*
|
|
memcpy(ptr,data_tmp,sizeof(data_tmp));
|
|
QL_FTP_LOG("ptr = %s", (char*)ptr);
|
|
QL_FTP_LOG("size = %d,ret = %d",size*nmemb,sizeof(data_tmp));
|
|
if(read_data_count++<30)
|
|
return sizeof(data_tmp);
|
|
else
|
|
return 0;
|
|
*/
|
|
int ret = 0;
|
|
QFILE* fd;
|
|
fd = (QFILE*)stream;
|
|
if(upl_size >= ql_fsize(*fd))
|
|
{
|
|
return 0;
|
|
}
|
|
ret = ql_fread(ptr, size, nmemb, *fd);
|
|
QL_FTP_LOG("ret=%d,size = %d", ret,size*nmemb);
|
|
upl_size += ret;
|
|
return ret;
|
|
}
|
|
|
|
size_t write_data(void *ptr, size_t size, size_t nmemb, void *stream)
|
|
{
|
|
|
|
int ret = 0;
|
|
QL_FTP_LOG("data_len = %d",size*nmemb);
|
|
QFILE* fd;
|
|
|
|
fd = (QFILE*)stream;
|
|
ret = ql_fwrite(ptr,size,nmemb,*fd);
|
|
if(ret != size*nmemb)
|
|
{
|
|
return 0;
|
|
}
|
|
dl_size += size*nmemb;
|
|
return size*nmemb;
|
|
}
|
|
/*
|
|
size_t file_list(void *ptr, size_t size, size_t nmemb, void *stream)
|
|
{
|
|
//第一次的时候收到数据后直接透传出去，
|
|
QL_FTP_LOG("======> %s",ptr);
|
|
QL_FTP_LOG("ret=%d", size*nmemb);
|
|
|
|
return size*nmemb;
|
|
}
|
|
*/
|
|
static void ftp_app_thread(void * arg)
|
|
{
|
|
int ret = 0;
|
|
int i = 0;
|
|
//ql_nw_reg_status_info_s nw_info;
|
|
int profile_idx = 1;
|
|
int start_pos = 0;
|
|
ql_data_call_info_s info;
|
|
char ip4_addr_str[16] = {0};
|
|
void * client = NULL;
|
|
char buf[MAX_PATH_SIZE]={0};
|
|
int run_num=1;
|
|
char hostname[64]="220.180.239.212:8310";
|
|
char username[]="test";
|
|
char password[]="test";
|
|
QL_FTP_CLIENT_FILE_INFO_T ql_list_file[5]={0};
|
|
uint8_t nSim = 0;
|
|
uint16_t sim_cid;
|
|
//int fp = -1;
|
|
int ciphersuites=0xFFFF;
|
|
int ssl_ctx=2;
|
|
char *chain_path="UFS:cacert.pem";
|
|
char *owncert_path="UFS:user_cert.pem";
|
|
char *key_path="UFS:user_key.pem";
|
|
|
|
ql_rtos_task_sleep_s(10);
|
|
QL_FTP_LOG("========== ftp demo start ==========");
|
|
QL_FTP_LOG("wait for network register done");
|
|
|
|
while((ret = ql_network_register_wait(nSim, 120)) != 0 && i < 10){
|
|
i++;
|
|
ql_rtos_task_sleep_s(1);
|
|
}
|
|
if(ret == 0){
|
|
i = 0;
|
|
QL_FTP_LOG("====network registered!!!!====");
|
|
}else{
|
|
QL_FTP_LOG("====network register failure!!!!!====");
|
|
goto exit;
|
|
}
|
|
|
|
if(QL_DATACALL_SUCCESS != ql_bind_sim_and_profile(nSim, profile_idx, &sim_cid))
|
|
{
|
|
QL_FTP_LOG("nSim or profile_idx is invalid!!!!");
|
|
ret = -1;
|
|
goto exit;
|
|
}
|
|
|
|
ql_set_data_call_asyn_mode(nSim, profile_idx, 0);
|
|
|
|
QL_FTP_LOG("===start data call====");
|
|
ret=ql_start_data_call(nSim, profile_idx, QL_PDP_TYPE_IP, "uninet", NULL, NULL, 0);
|
|
QL_FTP_LOG("===data call result:%d", ret);
|
|
if(ret != 0){
|
|
QL_FTP_LOG("====data call failure!!!!=====");
|
|
}
|
|
memset(&info, 0x00, sizeof(ql_data_call_info_s));
|
|
|
|
ret = ql_get_data_call_info(nSim, profile_idx, &info);
|
|
if(ret != 0){
|
|
QL_FTP_LOG("ql_get_data_call_info ret: %d", ret);
|
|
ql_stop_data_call(nSim, profile_idx);
|
|
goto exit;
|
|
}
|
|
QL_FTP_LOG("info->profile_idx: %d", info.profile_idx);
|
|
QL_FTP_LOG("info->ip_version: %d", info.ip_version);
|
|
|
|
QL_FTP_LOG("info->v4.state: %d", info.v4.state);
|
|
inet_ntop(AF_INET, &info.v4.addr.ip, ip4_addr_str, sizeof(ip4_addr_str));
|
|
QL_FTP_LOG("info.v4.addr.ip: %s\r\n", ip4_addr_str);
|
|
|
|
inet_ntop(AF_INET, &info.v4.addr.pri_dns, ip4_addr_str, sizeof(ip4_addr_str));
|
|
QL_FTP_LOG("info.v4.addr.pri_dns: %s\r\n", ip4_addr_str);
|
|
|
|
inet_ntop(AF_INET, &info.v4.addr.sec_dns, ip4_addr_str, sizeof(ip4_addr_str));
|
|
QL_FTP_LOG("info.v4.addr.sec_dns: %s\r\n", ip4_addr_str);
|
|
|
|
client = ql_ftp_client_new();
|
|
QFILE fd = 0;
|
|
run_num = 2;
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SIM_CID, sim_cid); /*set PDP cid,if not set,using default PDP*/
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SSL_CTX, ssl_ctx);
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_OPT_START_POS, start_pos);
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SSL_CIPHERSUITE, &ciphersuites);
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SSL_VERIFY_LEVEL, QL_SSL_VERIFY_CLIENT_SERVER);
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SSL_VERSION, QL_SSL_VERSION_ALL);
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SSL_TRANSPORT, QL_SSL_TLS_PROTOCOL);
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SSL_ENABLE, QL_FTP_CLIENT_SSL_TYPE_EXP);
|
|
if(ql_file_exist(chain_path)==QL_FILE_OK)
|
|
{
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SSL_CACERT_PATH, chain_path);
|
|
}
|
|
else
|
|
{
|
|
QL_FTP_LOG("cacert not exist\r\n");
|
|
ql_ftp_client_release(client);
|
|
goto exit;
|
|
}
|
|
if((ql_file_exist(owncert_path)==QL_FILE_OK)&&(ql_file_exist(key_path)==QL_FILE_OK))
|
|
{
|
|
ql_ftp_client_setopt(client, QL_FTP_CLIENT_SSL_OWNCERT_PATH, owncert_path,key_path);
|
|
}
|
|
else
|
|
{
|
|
QL_FTP_LOG("user_cert or user_key not exist\r\n");
|
|
ql_ftp_client_release(client);
|
|
goto exit;
|
|
}
|
|
while (client && run_num<=100)
|
|
{
|
|
dl_size = 0;
|
|
upl_size = 0;
|
|
read_data_count=0;
|
|
QL_FTP_LOG("==============ftp_client_test[%d]================\n",run_num);
|
|
if(run_num == 2)
|
|
fd = ql_fopen("UFS:20201210test.txt","w+");
|
|
else
|
|
fd = ql_fopen("UFS:20201210test.txt","r+");
|
|
if(fd < 0)
|
|
{
|
|
QL_FTP_LOG("open file failed !");
|
|
break;
|
|
}
|
|
else
|
|
{
|
|
QL_FTP_LOG("open file success %d !",fd);
|
|
}
|
|
ret=ql_ftp_client_open(client,hostname,username,password);
|
|
QL_FTP_LOG("\nql_ftp_client_open[%s] ret=%d;\n",hostname,ret);
|
|
if(ret!=0)
|
|
{
|
|
break;
|
|
}
|
|
#if 0
|
|
|
|
ret=ql_ftp_client_lcwd(client,"B:/");
|
|
QL_FTP_LOG("\nql_ftp_client_lcwd[B:/] ret=%d\n",ret);
|
|
|
|
ret=ql_ftp_client_lpwd(client, buf, sizeof(buf));
|
|
QL_FTP_LOG("\nql_ftp_client_lpwd ret=%d; localdir:%s\n",ret,buf);
|
|
|
|
ret=ql_ftp_client_lcwd(client,"U:/");
|
|
QL_FTP_LOG("\nql_ftp_client_lcwd[U:/] ret=%d\n",ret);
|
|
|
|
ret=ql_ftp_client_lcwd(client,"test");
|
|
QL_FTP_LOG("\nql_ftp_client_lcwd[test] ret=%d\n",ret);
|
|
if(ret==-1)
|
|
{
|
|
QL_FTP_LOG("error_code=%d\n",ql_ftp_client_get_error_code(client));
|
|
}
|
|
ret=ql_ftp_client_lpwd(client, buf, sizeof(buf));
|
|
QL_FTP_LOG("\nql_ftp_client_lpwd ret=%d; localdir:%s\n",ret,buf);
|
|
|
|
|
|
#endif
|
|
ret=ql_ftp_client_pwd(client, buf, sizeof(buf));
|
|
QL_FTP_LOG("\nql_ftp_client_pwd ret=%d; remotedir:%s\n",ret,buf);
|
|
|
|
if(run_num % 17== 0){
|
|
ret=ql_ftp_client_mkdir(client, "ftptest");
|
|
QL_FTP_LOG("\nql_ftp_client_mkdir[ftptest] ret=%d\n",ret);
|
|
|
|
ret=ql_ftp_client_cwd(client, "ftptest");
|
|
QL_FTP_LOG("\nql_ftp_client_cwd[ftptest] ret=%d\n",ret);
|
|
|
|
ret=ql_ftp_client_pwd(client, buf, sizeof(buf));
|
|
QL_FTP_LOG("\nql_ftp_client_pwd ret=%d; remotedir:%s\n",ret,buf);
|
|
|
|
|
|
ret=ql_ftp_client_cwd(client, "/");
|
|
QL_FTP_LOG("\nql_ftp_client_cwd[/] ret=%d\n",ret);
|
|
|
|
ret=ql_ftp_client_rmdir(client, "ftptest");
|
|
QL_FTP_LOG("\nql_ftp_client_rmdir[ftptest] ret=%d\n",ret);
|
|
|
|
}else if(run_num % 15== 0){
|
|
ret=ql_ftp_client_cwd(client, "/ftp");
|
|
QL_FTP_LOG("\nql_ftp_client_cwd[ftptest] ret=%d\n",ret);
|
|
|
|
ret=ql_ftp_client_pwd(client, buf, sizeof(buf));
|
|
QL_FTP_LOG("\nql_ftp_client_pwd ret=%d; remotedir:%s\n",ret,buf);
|
|
|
|
ret=ql_ftp_client_list(client, "/ftp",NULL,ql_list_file, 5);
|
|
QL_FTP_LOG("\nql_ftp_client_list[/] ret=%d\n",ret);
|
|
for(i=0;i<ret;i++)
|
|
{
|
|
QL_FTP_LOG("file%d:%s\n type:%d\n size:%d\n group:%s\n permissions:%d\n time:%04d-%02d-%02d %02d:%02d:%02d\n",i,
|
|
ql_list_file[i].filename,
|
|
ql_list_file[i].type,
|
|
ql_list_file[i].size,
|
|
ql_list_file[i].group,
|
|
ql_list_file[i].permissions,
|
|
ql_list_file[i].timestamp.tm_year+1900,
|
|
ql_list_file[i].timestamp.tm_mon+1,
|
|
ql_list_file[i].timestamp.tm_mday,
|
|
ql_list_file[i].timestamp.tm_hour,
|
|
ql_list_file[i].timestamp.tm_min,
|
|
ql_list_file[i].timestamp.tm_sec
|
|
);
|
|
}
|
|
run_num = 9;
|
|
}else if(run_num % 13 == 0){
|
|
|
|
/* ret=ql_ftp_client_list(client, "/","1.txt",file_list, 1);
|
|
QL_FTP_LOG("\nql_ftp_client_list[/1.txt] ret=%d\n",ret);
|
|
for(i=0;i<ret;i++)
|
|
{
|
|
QL_FTP_LOG("file%d:%s\n type:%d\n size:%d\n group:%s\n permissions:%d\n time:%04d-%02d-%02d %02d:%02d:%02d\n",i,
|
|
file_list[i].filename,
|
|
file_list[i].type,
|
|
file_list[i].size,
|
|
file_list[i].group,
|
|
file_list[i].permissions,
|
|
file_list[i].timestamp.tm_year+1900,
|
|
file_list[i].timestamp.tm_mon+1,
|
|
file_list[i].timestamp.tm_mday,
|
|
file_list[i].timestamp.tm_hour,
|
|
file_list[i].timestamp.tm_min,
|
|
file_list[i].timestamp.tm_sec
|
|
);
|
|
}
|
|
*/
|
|
}
|
|
else if(run_num % 2 == 0){
|
|
ret= ql_ftp_client_get_ex(client,"/ftp/10K.txt",NULL,write_data,(void*)&fd);
|
|
QL_FTP_LOG("\nql_ftp_client_get[1M.txt->test.txt] ret=%d,dl_size = %d\n",ret,dl_size);
|
|
run_num = 15;
|
|
}
|
|
else if(run_num % 9 ==0){
|
|
ret=ql_ftp_client_delete(client,"/ftp/10K.txt");
|
|
QL_FTP_LOG("\nql_ftp_client_delete[test_device.txt] ret=%d\n",ret);
|
|
ql_rtos_task_sleep_s(25);
|
|
ret= ql_ftp_client_put_ex(client,"UFS:20201210test.txt","/ftp/10K.txt",read_data,&fd);
|
|
QL_FTP_LOG("\nql_ftp_client_put[test_device.txt->test_device.txt] ret=%d upl_size = %d\n",ret,upl_size);
|
|
run_num = 2;
|
|
}
|
|
|
|
else if(run_num % 7 ==0){
|
|
ret= ql_ftp_client_get_ex(client,"1","/user/test_device.txt",NULL,NULL);
|
|
QL_FTP_LOG("\nql_ftp_client_get[1M.txt->test_device.txt] ret=%d\n",ret);
|
|
#if 0
|
|
fp = vfs_open("/usr/test_device.txt", O_RDONLY);
|
|
if(fp >= 0)
|
|
{
|
|
QL_FTP_LOG("ql_fread start\n");
|
|
while(1)
|
|
{
|
|
int n=vfs_read(fp,buf,65);
|
|
|
|
if(n>0)
|
|
{
|
|
buf[n]=0;
|
|
QL_FTP_LOG("%s",buf);
|
|
}
|
|
else
|
|
{
|
|
QL_FTP_LOG("\nql_fread end\n");
|
|
break;
|
|
}
|
|
}
|
|
vfs_close(fp);
|
|
}
|
|
else
|
|
{
|
|
QL_FTP_LOG("ql_fopen failed\n");
|
|
}
|
|
#endif
|
|
}else if(run_num % 3 ==0){
|
|
ret= ql_ftp_client_put_ex(client,"UFS:20201210test.txt","20201210test.txt",read_data,&fd);
|
|
QL_FTP_LOG("\nql_ftp_client_put[20201210test.txt->20201210test.txt] ret=%d, upl_size = %d\n",ret,upl_size);
|
|
run_num = 2;
|
|
}else if(run_num % 5 == 0){
|
|
ret=ql_ftp_client_delete(client,"test_device_create.txt");
|
|
QL_FTP_LOG("\nql_ftp_client_delete[test_device_create.txt] ret=%d\n",ret);
|
|
|
|
}
|
|
|
|
ret=ql_ftp_client_close(client);
|
|
QL_FTP_LOG("ql_ftp_client_close ret=%d\n",ret);
|
|
|
|
QL_FTP_LOG("==============ftp_client_test[%d] end================\n",run_num);
|
|
|
|
//run_num++;
|
|
QL_FTP_LOG("file fd =%d size =%d\n",fd,ql_fsize(fd));
|
|
ql_fclose(fd);
|
|
ql_rtos_task_sleep_s(5);
|
|
|
|
|
|
}
|
|
|
|
if (fd > 0)
|
|
{
|
|
ql_fclose(fd);
|
|
}
|
|
ql_ftp_client_release(client); /*release http resources*/
|
|
exit:
|
|
ql_rtos_task_delete(ftp_task);
|
|
|
|
return;
|
|
}
|
|
|
|
int ql_ftp_app_init(void)
|
|
{
|
|
QlOSStatus err = QL_OSI_SUCCESS;
|
|
|
|
err = ql_rtos_task_create(&ftp_task, 16*1024, APP_PRIORITY_ABOVE_NORMAL, "QftpApp", ftp_app_thread, NULL, 5);
|
|
if(err != QL_OSI_SUCCESS)
|
|
{
|
|
QL_FTP_LOG("ftp_app init failed");
|
|
}
|
|
|
|
return err;
|
|
}
|
|
|