void ptpdShutdown()
{
netShutdown(&ptpClock->netPath);
free(ptpClock->foreign);
free(ptpClock);
}
/*
* Initialize JDWP stuff.
*
* Allocates a new state structure. If "port" is non-negative, this also
* tries to bind to a listen port. If "port" is less than zero, we assume
* we're preparing for an outbound connection, and return without binding
* to anything.
*
* This may be called several times if we're probing for a port.
*
* Returns 0 on success.
*/
static JdwpNetState* netStartup(short port)
{
JdwpNetState* netState;
int one = 1;
netState = (JdwpNetState*) malloc(sizeof(*netState));
memset(netState, 0, sizeof(*netState));
netState->listenSock = -1;
netState->clientSock = -1;
netState->wakePipe[0] = -1;
netState->wakePipe[1] = -1;
if (port < 0)
return netState;
assert(port != 0);
netState->listenSock = socket(PF_INET, SOCK_STREAM, IPPROTO_TCP);
if (netState->listenSock < 0) {
LOGE("Socket create failed: %s\n", strerror(errno));
goto fail;
}
/* allow immediate re-use */
if (setsockopt(netState->listenSock, SOL_SOCKET, SO_REUSEADDR, &one,
sizeof(one)) < 0)
{
LOGE("setsockopt(SO_REUSEADDR) failed: %s\n", strerror(errno));
goto fail;
}
union {
struct sockaddr_in addrInet;
struct sockaddr addrPlain;
} addr;
addr.addrInet.sin_family = AF_INET;
addr.addrInet.sin_port = htons(port);
inet_aton("127.0.0.1", &addr.addrInet.sin_addr);
if (bind(netState->listenSock, &addr.addrPlain, sizeof(addr)) != 0) {
LOGV("attempt to bind to port %u failed: %s\n", port, strerror(errno));
goto fail;
}
netState->listenPort = port;
LOGVV("+++ bound to port %d\n", netState->listenPort);
if (listen(netState->listenSock, 5) != 0) {
LOGE("Listen failed: %s\n", strerror(errno));
goto fail;
}
return netState;
fail:
netShutdown(netState);
netFree(netState);
return NULL;
}
void qbShutdown(void) {
if(recording) {
int length=-1;
write(demo_handle,&length,4);
close(demo_handle);
recording=false;
}
netShutdown();
}
bool qbConnect(const char *hostname, unsigned short port) {
if(!netInit(hostname,port)) {
return false;
}
#if WIN32
server_thread=CreateThread(NULL,0,(LPTHREAD_START_ROUTINE)serverThread,NULL,0,&server_thread_id);
if(server_thread == NULL) {
#else
int ret = pthread_create(&server_thread, NULL, serverThread, NULL);
if( ret != 0 ) {
#endif
qbLog("Could not create server thread");
netShutdown();
return false;
}
/*TODO use pthread_attribs to set higher priority*/
#ifdef WIN32
SetThreadPriority(server_thread,THREAD_PRIORITY_TIME_CRITICAL);
#endif
if(!netConnect()) {
qbLog("Could not connect to server");
netShutdown();
return false;
}
qbSynchConsole("new");
while(!online) {
qbLog("Precaching...");
Sleep(1000);
}
return true;
}
void qbBegin(void) {
char s[64];
sprintf(s,"begin %d\n",login_key);
qbSynchConsole(s);
}
Boolean doInit(RunTimeOpts *rtOpts, PtpClock *ptpClock)
{
DBG("manufacturerIdentity: %s\n", MANUFACTURER_ID);
/* initialize networking */
netShutdown(&ptpClock->netPath);
if(!netInit(&ptpClock->netPath, rtOpts, ptpClock))
{
ERROR("failed to initialize network\n");
toState(PTP_FAULTY, rtOpts, ptpClock);
return FALSE;
}
/* initialize other stuff */
initData(rtOpts, ptpClock);
initTimer();
initClock(rtOpts, ptpClock);
m1(ptpClock);
msgPackHeader(ptpClock->msgObuf, ptpClock);
DBG("sync message interval: %d\n", PTP_SYNC_INTERVAL_TIMEOUT(ptpClock->sync_interval));
DBG("clock identifier: %s\n", ptpClock->clock_identifier);
DBG("256*log2(clock variance): %d\n", ptpClock->clock_variance);
DBG("clock stratum: %d\n", ptpClock->clock_stratum);
DBG("clock preferred?: %s\n", ptpClock->preferred?"yes":"no");
DBG("bound interface name: %s\n", rtOpts->ifaceName);
DBG("communication technology: %d\n", ptpClock->port_communication_technology);
DBG("uuid: %02x:%02x:%02x:%02x:%02x:%02x\n",
ptpClock->port_uuid_field[0], ptpClock->port_uuid_field[1], ptpClock->port_uuid_field[2],
ptpClock->port_uuid_field[3], ptpClock->port_uuid_field[4], ptpClock->port_uuid_field[5]);
DBG("PTP subdomain name: %s\n", ptpClock->subdomain_name);
DBG("subdomain address: %x.%x.%x.%x\n",
ptpClock->subdomain_address[0], ptpClock->subdomain_address[1],
ptpClock->subdomain_address[2], ptpClock->subdomain_address[3]);
DBG("event port address: %x %x\n",
ptpClock->event_port_address[0], ptpClock->event_port_address[1]);
DBG("general port address: %x %x\n",
ptpClock->general_port_address[0], ptpClock->general_port_address[1]);
toState(PTP_LISTENING, rtOpts, ptpClock);
return TRUE;
}
static Boolean doInit(PtpClock *ptpClock)
{
DBG("manufacturerIdentity: %s\n", MANUFACTURER_ID);
/* initialize networking */
netShutdown(&ptpClock->netPath);
if (!netInit(&ptpClock->netPath, ptpClock))
{
ERROR("doInit: failed to initialize network\n");
return FALSE;
}
else
{
/* initialize other stuff */
initData(ptpClock);
initTimer();
initClock(ptpClock);
m1(ptpClock);
msgPackHeader(ptpClock, ptpClock->msgObuf);
return TRUE;
}
}
Boolean
doInit(RunTimeOpts *rtOpts, PtpClock *ptpClock)
{
DBG("manufacturerIdentity: %s\n", MANUFACTURER_ID);
/* initialize networking */
netShutdown(&ptpClock->netPath);
if (!netInit(&ptpClock->netPath, rtOpts, ptpClock)) {
ERROR("failed to initialize network\n");
toState(PTP_FAULTY, rtOpts, ptpClock);
return FALSE;
}
/* initialize other stuff */
initData(rtOpts, ptpClock);
initTimer();
initClock(rtOpts, ptpClock);
m1(rtOpts, ptpClock );
msgPackHeader(ptpClock->msgObuf, ptpClock);
toState(PTP_LISTENING, rtOpts, ptpClock);
return TRUE;
}
static void netShutdownExtern(JdwpState* state)
{
netShutdown(state->netState);
}
Boolean doInit(PtpClock *ptpClock)
{
DBG("manufacturerIdentity: %s\n", MANUFACTURER_ID);
/* initialize networking */
netShutdown(ptpClock);
if(!netInit(ptpClock))
{
ERROR("failed to initialize network\n");
toState(PTP_FAULTY, ptpClock);
return FALSE;
}
/* initialize timing, may fail e.g. if timer depends on hardware */
if(!initTime(ptpClock))
{
ERROR("failed to initialize timing\n");
toState(PTP_FAULTY, ptpClock);
return FALSE;
}
switch (ptpClock->runTimeOpts.time) {
case TIME_SYSTEM:
case TIME_SYSTEM_LINUX_HW:
case TIME_SYSTEM_LINUX_SW:
/*
* send time stamp will be returned to socket when available,
* either via IP_MULTICAST_LOOP or SIOCSHWTSTAMP + error queue
*/
ptpClock->delayedTiming = FALSE;
break;
default:
/* ask for time stamp shortly after sending */
ptpClock->delayedTiming = TRUE;
break;
}
/* initialize other stuff */
initData(ptpClock);
initTimer();
initClock(ptpClock);
m1(ptpClock);
msgPackHeader(ptpClock->msgObuf, ptpClock);
DBG("sync message interval: %d\n", PTP_SYNC_INTERVAL_TIMEOUT(ptpClock->sync_interval));
DBG("clock identifier: %s\n", ptpClock->clock_identifier);
DBG("256*log2(clock variance): %d\n", ptpClock->clock_variance);
DBG("clock stratum: %d\n", ptpClock->clock_stratum);
DBG("clock preferred?: %s\n", ptpClock->preferred?"yes":"no");
DBG("bound interface name: %s\n", ptpClock->runTimeOpts.ifaceName);
DBG("communication technology: %d\n", ptpClock->port_communication_technology);
DBG("uuid: %02hhx:%02hhx:%02hhx:%02hhx:%02hhx:%02hhx\n",
ptpClock->port_uuid_field[0], ptpClock->port_uuid_field[1], ptpClock->port_uuid_field[2],
ptpClock->port_uuid_field[3], ptpClock->port_uuid_field[4], ptpClock->port_uuid_field[5]);
DBG("PTP subdomain name: %s\n", ptpClock->subdomain_name);
DBG("subdomain address: %hhx.%hhx.%hhx.%hhx\n",
ptpClock->subdomain_address[0], ptpClock->subdomain_address[1],
ptpClock->subdomain_address[2], ptpClock->subdomain_address[3]);
DBG("event port address: %hhx %hhx\n",
ptpClock->event_port_address[0], ptpClock->event_port_address[1]);
DBG("general port address: %hhx %hhx\n",
ptpClock->general_port_address[0], ptpClock->general_port_address[1]);
toState(PTP_LISTENING, ptpClock);
return TRUE;
}
static void handleclient(u64 conn_s_p)
{
// todo: clean up
int conn_s = (int)conn_s_p;
int list_s_data = -1;
int conn_s_data = -1;
int datareq = 0;
char cwd[256];
char rnfr[256];
char filename[256];
char user[32];
u32 rest = 0;
int authd = 0;
int active = 1;
Lv2FsFile tempfd;
char buf[BUFFER_SIZE];
char buffer[1024];
char client_cmd[8][128];
ssize_t bytes;
#if LOGIN_CHECK == 1
// load password file
char passwordcheck[33];
// check if password file exists - if not, use default password
if(exists(PASSWORD_FPATH) == 0)
{
Lv2FsFile fd;
u64 read;
lv2FsOpen(PASSWORD_FPATH, LV2_O_RDONLY, &fd, 0, NULL, 0);
lv2FsRead(fd, passwordcheck, 32, &read);
lv2FsClose(fd);
if(strlen(passwordcheck) != 32)
{
strcpy(passwordcheck, LOGIN_PASSWORD);
}
}
else
{
strcpy(passwordcheck, LOGIN_PASSWORD);
}
#endif
// start directory
strcpy(cwd, "/");
// welcome message
swritel(conn_s, "220-OpenPS3FTP by @jjolano\r\n");
sprintf(buffer, "220 Version %s\r\n", VERSION);
swritel(conn_s, buffer);
while(exitapp == 0 && active && (bytes = sreadl(conn_s, buffer, 1024)) > 0)
{
// get rid of the newline at the end of the string
buffer[strcspn(buffer, "\n")] = '\0';
buffer[strcspn(buffer, "\r")] = '\0';
// parse received string into array
int parameter_count = 0;
char *result = strtok(buffer, " ");
strcpy(client_cmd[0], result);
while(parameter_count < 7 && (result = strtok(NULL, " ")) != NULL)
{
parameter_count++;
strcpy(client_cmd[parameter_count], result);
}
// identify the command
int cmd_id;
for(cmd_id = 0; cmd_id < client_cmds_count; cmd_id++)
{
if(strcasecmp(client_cmd[0], client_cmds[cmd_id]) == 0)
{
break;
}
}
// execute command
if(authd == 0)
{
// not logged in
switch(cmd_id)
{
case 0: // USER
#if LOGIN_CHECK == 1
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
strcpy(user, client_cmd[1]);
sprintf(buffer, "331 User %s OK. Password required\r\n", user);
swritel(conn_s, buffer);
}
else
{
swritel(conn_s, "501 Please provide a username\r\n");
}
#else
sprintf(buffer, "331 User %s OK. Password (not really) required\r\n", user);
swritel(conn_s, buffer);
#endif
break;
case 1: // PASS
#if LOGIN_CHECK == 1
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
// hash the password given
char output[33];
md5(output, client_cmd[1]);
if(strcmp(user, LOGIN_USERNAME) == 0 && strcmp(output, passwordcheck) == 0)
{
swritel(conn_s, "230 Successful authentication\r\n");
authd = 1;
}
else
{
swritel(conn_s, "430 Invalid username or password - \r\n");
}
}
else
{
swritel(conn_s, "501 Invalid username or password\r\n");
}
#else
swritel(conn_s, "230 Successful authentication\r\n");
authd = 1;
#endif
break;
case 2: // QUIT
swritel(conn_s, "221 See you later\r\n");
active = 0;
break;
default: swritel(conn_s, "530 You are not logged in\r\n");
}
}
else
{
// logged in
switch(cmd_id)
{
case 0: // USER
case 1: // PASS
swritel(conn_s, "530 You are already logged in\r\n");
break;
case 2: // QUIT
swritel(conn_s, "221 See you later\r\n");
active = 0;
break;
case 3: // PASV
rest = 0;
netSocketInfo snf;
int ret = netGetSockInfo(conn_s, &snf, 1);
if(ret >= 0 && snf.local_adr.s_addr != 0)
{
// assign a random port for passive mode
srand(conn_s);
int rand1 = (rand() % 251) + 4;
int rand2 = rand() % 256;
sprintf(buffer, "227 Entering Passive Mode (%u,%u,%u,%u,%i,%i)\r\n",
(snf.local_adr.s_addr & 0xFF000000) >> 24,
(snf.local_adr.s_addr & 0xFF0000) >> 16,
(snf.local_adr.s_addr & 0xFF00) >> 8,
(snf.local_adr.s_addr & 0xFF),
rand1, rand2);
short int pasvport = (rand1 * 256) + rand2;
struct sockaddr_in servaddr;
memset(&servaddr, 0, sizeof(servaddr));
servaddr.sin_family = AF_INET;
servaddr.sin_addr.s_addr = htonl(INADDR_ANY);
servaddr.sin_port = htons(pasvport);
list_s_data = netSocket(AF_INET, SOCK_STREAM, 0);
netBind(list_s_data, (struct sockaddr *) &servaddr, sizeof(servaddr));
netListen(list_s_data, 1);
swritel(conn_s, buffer);
if((conn_s_data = netAccept(list_s_data, NULL, NULL)) == -1)
{
swritel(conn_s, "550 PASV command failed\r\n");
}
else
{
datareq = 1;
}
break;
}
swritel(conn_s, "550 PASV command failed\r\n");
break;
case 4: // PORT
if(parameter_count == 1)
{
rest = 0;
char connectinfo[32];
strcpy(connectinfo, client_cmd[1]);
char data[7][4];
int i = 0;
char *result = strtok(connectinfo, ",");
strcpy(data[0], result);
while(i < 6 && (result = strtok(NULL, ",")) != NULL)
{
i++;
strcpy(data[i], result);
}
char conn_ipaddr[16];
sprintf(conn_ipaddr, "%s.%s.%s.%s", data[0], data[1], data[2], data[3]);
struct sockaddr_in servaddr;
memset(&servaddr, 0, sizeof(servaddr));
servaddr.sin_family = AF_INET;
servaddr.sin_port = htons((atoi(data[4]) * 256) + atoi(data[5]));
inet_pton(AF_INET, conn_ipaddr, &servaddr.sin_addr);
conn_s_data = netSocket(AF_INET, SOCK_STREAM, 0);
if(connect(conn_s_data, (struct sockaddr *)&servaddr, sizeof(servaddr)) == 0)
{
swritel(conn_s, "200 PORT command successful\r\n");
datareq = 1;
}
else
{
swritel(conn_s, "550 PORT command failed\r\n");
}
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 5: // SITE
if(strcasecmp(client_cmd[1], "CHMOD") == 0)
{
int i;
for(i = 4; i <= parameter_count; i++)
{
strcat(client_cmd[3], " ");
strcat(client_cmd[3], client_cmd[i]);
}
absPath(filename, client_cmd[3], cwd);
char perms[4];
sprintf(perms, "0%s", client_cmd[2]);
if(lv2FsChmod(filename, S_IFMT | strtol(perms, NULL, 8)) == 0)
{
swritel(conn_s, "250 File permissions successfully set\r\n");
}
else
{
swritel(conn_s, "550 Failed to set file permissions\r\n");
}
}
else
{
swritel(conn_s, "500 Unrecognized SITE command\r\n");
}
break;
case 6: // FEAT
swritel(conn_s, "211- Extensions supported:\r\n");
int i;
for(i = 0; i < feat_cmds_count; i++)
{
sprintf(buffer, " %s\r\n", feat_cmds[i]);
swritel(conn_s, buffer);
}
swritel(conn_s, "211 End.\r\n");
break;
case 7: // TYPE
swritel(conn_s, "200 TYPE command successful\r\n");
break;
case 8: // REST
if(parameter_count == 1)
{
rest = atoi(client_cmd[1]);
swritel(conn_s, "350 REST command successful\r\n");
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 9: // RETR
if(parameter_count >= 1)
{
if(conn_s_data == -1)
{
swritel(conn_s, "425 No data connection\r\n");
break;
}
swritel(conn_s, "150 Opening data connection\r\n");
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
u64 pos;
u64 read = -1;
Lv2FsFile fd;
lv2FsOpen(filename, LV2_O_RDONLY, &fd, 0, NULL, 0);
lv2FsLSeek64(fd, (s64)rest, SEEK_SET, &pos);
if(fd >= 0)
{
while(lv2FsRead(fd, buf, BUFFER_SIZE - 1, &read) == 0 && read > 0)
{
netSend(conn_s_data, buf, read, 0);
}
if(read == 0)
{
swritel(conn_s, "226 Transfer complete\r\n");
}
else
{
swritel(conn_s, "426 Transfer failed\r\n");
}
}
else
{
swritel(conn_s, "452 File access error\r\n");
}
lv2FsClose(fd);
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 10: // PWD
sprintf(buffer, "257 \"%s\" is the current directory\r\n", cwd);
swritel(conn_s, buffer);
break;
case 11: // CWD
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
strcpy(filename, client_cmd[1]);
if(strcmp(filename, "../") == 0)
{
for(int i = strlen(cwd) - 2; i > 0; i--)
{
if(cwd[i] != '/')
{
cwd[i] = '\0';
}
else
{
break;
}
}
sprintf(buffer, "250 Directory change successful: %s\r\n", cwd);
swritel(conn_s, buffer);
break;
}
if(filename[0] == '/')
{
strcpy(cwd, (strlen(filename) == 1) ? "/" : filename);
}
else
{
strcat(cwd, filename);
}
if(cwd[strlen(cwd) - 1] != '/')
{
strcat(cwd, "/");
}
if(isDir(cwd))
{
sprintf(buffer, "250 Directory change successful: %s\r\n", cwd);
}
else
{
sprintf(buffer, "550 Could not change directory: %s\r\n", cwd);
}
swritel(conn_s, buffer);
}
else
{
sprintf(buffer, "257 \"%s\" is the current directory\r\n", cwd);
swritel(conn_s, buffer);
}
break;
case 12: // CDUP
for(int i = strlen(cwd) - 2; i > 0; i--)
{
if(cwd[i] != '/')
{
cwd[i] = '\0';
}
else
{
break;
}
}
sprintf(buffer, "250 Directory change successful: %s\r\n", cwd);
swritel(conn_s, buffer);
break;
case 13: // NLST
if(conn_s_data == -1)
{
swritel(conn_s, "425 No data connection\r\n");
break;
}
swritel(conn_s, "150 Opening data connection\r\n");
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
}
else
{
strcpy(filename, cwd);
}
if(lv2FsOpenDir(filename, &tempfd) == 0)
{
u64 read;
Lv2FsDirent ent;
while(lv2FsReadDir(tempfd, &ent, &read) == 0 && read != 0)
{
sprintf(buffer, "%s\r\n", ent.d_name);
swritel(conn_s_data, buffer);
}
swritel(conn_s, "226 Transfer complete\r\n");
}
else
{
swritel(conn_s, "451 Cannot access directory\r\n");
}
lv2FsCloseDir(tempfd);
break;
case 14: // LIST
if(conn_s_data == -1)
{
swritel(conn_s, "425 No data connection\r\n");
break;
}
swritel(conn_s, "150 Opening data connection\r\n");
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
}
else
{
strcpy(filename, cwd);
}
if(lv2FsOpenDir(filename, &tempfd) == 0)
{
u64 read;
Lv2FsDirent ent;
while(lv2FsReadDir(tempfd, &ent, &read) == 0 && read != 0)
{
sprintf(filename, "%s%s", cwd, ent.d_name);
Lv2FsStat entry;
lv2FsStat(filename, &entry);
struct tm *tm;
char timebuf[32];
tm = localtime(&entry.st_mtime);
strftime(timebuf, 31, "%b %d %Y", tm);
sprintf(buffer, "%s%s%s%s%s%s%s%s%s%s 1 root root %lu %s %s\r\n",
((entry.st_mode & S_IFDIR) != 0)?"d":"-",
((entry.st_mode & S_IRUSR) != 0)?"r":"-",
((entry.st_mode & S_IWUSR) != 0)?"w":"-",
((entry.st_mode & S_IXUSR) != 0)?"x":"-",
((entry.st_mode & S_IRGRP) != 0)?"r":"-",
((entry.st_mode & S_IWGRP) != 0)?"w":"-",
((entry.st_mode & S_IXGRP) != 0)?"x":"-",
((entry.st_mode & S_IROTH) != 0)?"r":"-",
((entry.st_mode & S_IWOTH) != 0)?"w":"-",
((entry.st_mode & S_IXOTH) != 0)?"x":"-",
(long unsigned int)entry.st_size,
timebuf,
ent.d_name);
swritel(conn_s_data, buffer);
}
swritel(conn_s, "226 Transfer complete\r\n");
}
else
{
swritel(conn_s, "451 Cannot access directory\r\n");
}
lv2FsCloseDir(tempfd);
break;
case 15: // STOR
if(parameter_count >= 1)
{
if(conn_s_data == -1)
{
swritel(conn_s, "425 No data connection\r\n");
break;
}
swritel(conn_s, "150 Opening data connection\r\n");
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
u64 pos;
u64 read = -1;
u64 write = -1;
Lv2FsFile fd;
lv2FsOpen(filename, LV2_O_WRONLY | LV2_O_CREAT, &fd, 0, NULL, 0);
lv2FsChmod(filename, S_IFMT | 0666);
lv2FsLSeek64(fd, (s32)rest, SEEK_SET, &pos);
if(fd >= 0)
{
while((read = (u64)netRecv(conn_s_data, buf, BUFFER_SIZE - 1, MSG_WAITALL)) > 0)
{
lv2FsWrite(fd, buf, read, &write);
if(write != read)
{
break;
}
}
if(read == 0)
{
swritel(conn_s, "226 Transfer complete\r\n");
}
else
{
swritel(conn_s, "426 Transfer failed\r\n");
}
}
else
{
swritel(conn_s, "452 File access error\r\n");
}
lv2FsClose(fd);
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 16: // NOOP
swritel(conn_s, "200 Zzzz...\r\n");
break;
case 17: // DELE
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
if(lv2FsUnlink(filename) == 0)
{
swritel(conn_s, "250 File successfully deleted\r\n");
}
else
{
swritel(conn_s, "550 Failed to delete file\r\n");
}
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 18: // MKD
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
if(lv2FsMkdir(filename, 0775) == 0)
{
swritel(conn_s, "250 Directory successfully created\r\n");
}
else
{
swritel(conn_s, "550 Failed to create directory\r\n");
}
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 19: // RMD
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
if(lv2FsRmdir(filename) == 0)
{
swritel(conn_s, "250 Directory successfully deleted\r\n");
}
else
{
swritel(conn_s, "550 Failed to remove directory\r\n");
}
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 20: // RNFR
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(rnfr, client_cmd[1], cwd);
if(exists(rnfr) == 0)
{
swritel(conn_s, "350 RNFR successful - ready for destination\r\n");
}
else
{
swritel(conn_s, "550 RNFR failed - file does not exist\r\n");
}
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 21: // RNTO
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
if(lv2FsRename(rnfr, filename) == 0)
{
swritel(conn_s, "250 File successfully renamed\r\n");
}
else
{
swritel(conn_s, "550 Failed to rename file\r\n");
}
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 22: // SIZE
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
Lv2FsStat entry;
if(lv2FsStat(filename, &entry) == 0)
{
sprintf(buffer, "213 %lu\r\n", (long unsigned int)entry.st_size);
}
else
{
sprintf(buffer, "550 Requested file doesn't exist\r\n");
}
swritel(conn_s, buffer);
}
else
{
swritel(conn_s, "501 Syntax error\r\n");
}
break;
case 23: // SYST
swritel(conn_s, "215 UNIX Type: L8\r\n");
break;
case 24: // HELP
swritel(conn_s, "214 No help for you.\r\n");
break;
case 25: // PASSWD
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
// hash the password given
char output[33];
md5(output, client_cmd[1]);
Lv2FsFile fd;
u64 written;
lv2FsOpen(PASSWORD_FPATH, LV2_O_WRONLY | LV2_O_CREAT, &fd, 0, NULL, 0);
lv2FsWrite(fd, output, 32, &written);
lv2FsClose(fd);
swritel(conn_s, "200 Password successfully changed\r\n");
}
else
{
swritel(conn_s, "501 Invalid password\r\n");
}
break;
case 26: // MLSD
if(conn_s_data == -1)
{
swritel(conn_s, "425 No data connection\r\n");
break;
}
swritel(conn_s, "150 Opening data connection\r\n");
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
}
else
{
strcpy(filename, cwd);
}
if(lv2FsOpenDir(filename, &tempfd) == 0)
{
u64 read;
Lv2FsDirent ent;
while(lv2FsReadDir(tempfd, &ent, &read) == 0 && read != 0)
{
sprintf(filename, "%s%s", cwd, ent.d_name);
Lv2FsStat entry;
lv2FsStat(filename, &entry);
struct tm *tm;
char timebuf[32];
tm = localtime(&entry.st_mtime);
strftime(timebuf, 31, "%Y%m%d%H%M%S", tm);
int permint = 0;
permint += (((entry.st_mode & S_IRUSR) != 0)?400:0) +
(((entry.st_mode & S_IWUSR) != 0)?200:0) +
(((entry.st_mode & S_IXUSR) != 0)?100:0);
permint += (((entry.st_mode & S_IRGRP) != 0)?40:0) +
(((entry.st_mode & S_IWGRP) != 0)?20:0) +
(((entry.st_mode & S_IXGRP) != 0)?10:0);
permint += (((entry.st_mode & S_IROTH) != 0)?4:0) +
(((entry.st_mode & S_IWOTH) != 0)?2:0) +
(((entry.st_mode & S_IXOTH) != 0)?1:0);
sprintf(buffer, "type=%s;size=%lu;modify=%s;UNIX.mode=0%i;UNIX.uid=root;UNIX.gid=root; %s\r\n",
((entry.st_mode & S_IFDIR) != 0)?"dir":"file",
(long unsigned int)entry.st_size,
timebuf,
permint,
ent.d_name);
swritel(conn_s_data, buffer);
}
swritel(conn_s, "226 Transfer complete\r\n");
}
else
{
swritel(conn_s, "501 Directory access error\r\n");
}
lv2FsCloseDir(tempfd);
break;
case 27: // MLST
swritel(conn_s, "250- Listing directory");
if(parameter_count >= 1)
{
int i;
for(i = 2; i <= parameter_count; i++)
{
strcat(client_cmd[1], " ");
strcat(client_cmd[1], client_cmd[i]);
}
absPath(filename, client_cmd[1], cwd);
}
else
{
strcpy(filename, cwd);
}
if(lv2FsOpenDir(filename, &tempfd) == 0)
{
u64 read;
Lv2FsDirent ent;
while(lv2FsReadDir(tempfd, &ent, &read) == 0 && read != 0)
{
sprintf(filename, "%s%s", cwd, ent.d_name);
Lv2FsStat entry;
lv2FsStat(filename, &entry);
struct tm *tm;
char timebuf[32];
tm = localtime(&entry.st_mtime);
strftime(timebuf, 31, "%Y%m%d%H%M%S", tm);
int permint = 0;
permint += (((entry.st_mode & S_IRUSR) != 0)?400:0) +
(((entry.st_mode & S_IWUSR) != 0)?200:0) +
(((entry.st_mode & S_IXUSR) != 0)?100:0);
permint += (((entry.st_mode & S_IRGRP) != 0)?40:0) +
(((entry.st_mode & S_IWGRP) != 0)?20:0) +
(((entry.st_mode & S_IXGRP) != 0)?10:0);
permint += (((entry.st_mode & S_IROTH) != 0)?4:0) +
(((entry.st_mode & S_IWOTH) != 0)?2:0) +
(((entry.st_mode & S_IXOTH) != 0)?1:0);
sprintf(buffer, " type=%s;size=%lu;modify=%s;UNIX.mode=0%i;UNIX.uid=root;UNIX.gid=root; %s\r\n",
((entry.st_mode & S_IFDIR) != 0)?"dir":"file",
(long unsigned int)entry.st_size,
timebuf,
permint,
ent.d_name);
swritel(conn_s, buffer);
}
}
swritel(conn_s, "250 End\r\n");
lv2FsCloseDir(tempfd);
break;
case 28: // EXITAPP
swritel(conn_s, "221 Exiting OpenPS3FTP, bye\r\n");
exitapp = 1;
break;
case 29: // TEST
swritel(conn_s, "211-Listing parameters\r\n");
sprintf(buffer, "211-Count: %i\r\n", parameter_count);
swritel(conn_s, buffer);
int tx;
for(tx = 0; tx <= parameter_count; tx++)
{
sprintf(buffer, " %i:%s\r\n", tx, client_cmd[tx]);
swritel(conn_s, buffer);
}
swritel(conn_s, "211 End\r\n");
break;
default: swritel(conn_s, "500 Unrecognized command\r\n");
}
if(datareq == 1)
{
datareq = 0;
}
else
{
// close any active data connections
if(conn_s_data > -1)
{
netShutdown(conn_s_data, 2);
netClose(conn_s_data);
conn_s_data = -1;
}
if(list_s_data > -1)
{
netShutdown(list_s_data, 2);
netClose(list_s_data);
list_s_data = -1;
}
}
}
}
void
ptpdShutdown(PtpClock * ptpClock)
{
extern RunTimeOpts rtOpts;
netShutdown(&ptpClock->netPath);
#ifdef PTPD_NTPDC
ntpShutdown(&rtOpts.ntpOptions, &ptpClock->ntpControl);
#endif /* PTPD_NTPDC */
free(ptpClock->foreign);
/* free management messages, they can have dynamic memory allocated */
if(ptpClock->msgTmpHeader.messageType == MANAGEMENT)
freeManagementTLV(&ptpClock->msgTmp.manage);
freeManagementTLV(&ptpClock->outgoingManageTmp);
#ifdef PTPD_SNMP
snmpShutdown();
#endif /* PTPD_SNMP */
#ifdef HAVE_SYS_TIMEX_H
#ifndef PTPD_STATISTICS
/* Not running statistics code - write observed drift to driftfile if enabled, inform user */
if(ptpClock->slaveOnly && !ptpClock->servo.runningMaxOutput)
saveDrift(ptpClock, &rtOpts, FALSE);
#else
/* We are running statistics code - save drift on exit only if we're not monitoring servo stability */
if(!rtOpts.servoStabilityDetection && !ptpClock->servo.runningMaxOutput)
saveDrift(ptpClock, &rtOpts, FALSE);
#endif /* PTPD_STATISTICS */
#endif /* HAVE_SYS_TIMEX_H */
if (rtOpts.currentConfig != NULL)
dictionary_del(rtOpts.currentConfig);
if(rtOpts.cliConfig != NULL)
dictionary_del(rtOpts.cliConfig);
FilterDestroy(ptpClock->owd_filt);
FilterDestroy(ptpClock->ofm_filt);
free(ptpClock);
ptpClock = NULL;
extern PtpClock* G_ptpClock;
G_ptpClock = NULL;
/* properly clean lockfile (eventough new deaemons can acquire the lock after we die) */
if(!rtOpts.ignore_daemon_lock && G_lockFilePointer != NULL) {
fclose(G_lockFilePointer);
}
unlink(rtOpts.lockFile);
if(rtOpts.statusLog.logEnabled) {
/* close and remove the status file */
if(rtOpts.statusLog.logFP != NULL)
fclose(rtOpts.statusLog.logFP);
unlink(rtOpts.statusLog.logPath);
}
}
void
ptpdShutdown(PtpClock * ptpClock)
{
extern RunTimeOpts rtOpts;
/*
* go into DISABLED state so the FSM can call any PTP-specific shutdown actions,
* such as canceling unicast transmission
*/
toState(PTP_DISABLED, &rtOpts, ptpClock);
netShutdown(&ptpClock->netPath);
free(ptpClock->foreign);
/* free management and signaling messages, they can have dynamic memory allocated */
if(ptpClock->msgTmpHeader.messageType == MANAGEMENT)
freeManagementTLV(&ptpClock->msgTmp.manage);
freeManagementTLV(&ptpClock->outgoingManageTmp);
if(ptpClock->msgTmpHeader.messageType == SIGNALING)
freeSignalingTLV(&ptpClock->msgTmp.signaling);
freeSignalingTLV(&ptpClock->outgoingSignalingTmp);
#ifdef PTPD_SNMP
snmpShutdown();
#endif /* PTPD_SNMP */
#ifndef PTPD_STATISTICS
/* Not running statistics code - write observed drift to driftfile if enabled, inform user */
if(ptpClock->slaveOnly && !ptpClock->servo.runningMaxOutput)
saveDrift(ptpClock, &rtOpts, FALSE);
#else
ptpClock->oFilterMS.shutdown(&ptpClock->oFilterMS);
ptpClock->oFilterSM.shutdown(&ptpClock->oFilterSM);
freeDoubleMovingStatFilter(&ptpClock->filterMS);
freeDoubleMovingStatFilter(&ptpClock->filterSM);
/* We are running statistics code - save drift on exit only if we're not monitoring servo stability */
if(!rtOpts.servoStabilityDetection && !ptpClock->servo.runningMaxOutput)
saveDrift(ptpClock, &rtOpts, FALSE);
#endif /* PTPD_STATISTICS */
if (rtOpts.currentConfig != NULL)
dictionary_del(&rtOpts.currentConfig);
if(rtOpts.cliConfig != NULL)
dictionary_del(&rtOpts.cliConfig);
timerShutdown(ptpClock->timers);
free(ptpClock);
ptpClock = NULL;
extern PtpClock* G_ptpClock;
G_ptpClock = NULL;
/* properly clean lockfile (eventough new deaemons can acquire the lock after we die) */
if(!rtOpts.ignore_daemon_lock && G_lockFilePointer != NULL) {
fclose(G_lockFilePointer);
G_lockFilePointer = NULL;
}
unlink(rtOpts.lockFile);
if(rtOpts.statusLog.logEnabled) {
/* close and remove the status file */
if(rtOpts.statusLog.logFP != NULL) {
fclose(rtOpts.statusLog.logFP);
rtOpts.statusLog.logFP = NULL;
}
unlink(rtOpts.statusLog.logPath);
}
stopLogging(&rtOpts);
}
