/* ---------- mls.c ---------- */
/* Aufruf : mls <pathname> <Server-Port> <Server-IP> */

#include <unistd.h>
#include <stdio.h>
#include <sys/socket.h>
#include <sys/types.h>
#include <dirent.h>
#include <arpa/inet.h>

#define DEFPORT 4000
#define DEFIP "127.0.0.1"

int sock;
int ret;
struct sockaddr_in servaddr;
char buffer[16384];
	

void s_bind (int port, char* ip) {
        strcpy(buffer, "");
	sock = socket(AF_INET, SOCK_STREAM, 0);
	if (sock == -1) {
		perror("socket() error");
		exit(1);
	}
	servaddr.sin_family = AF_INET;
	servaddr.sin_addr.s_addr = htonl(inet_addr(ip));
	servaddr.sin_port = htons(port);
	
	ret = connect(sock, (struct sockaddr *) &servaddr, sizeof(servaddr));
	if (ret == -1) {
		perror("connect() error");
		exit(1);
	}
}

void s_close () {
	close(sock);
}


int main(int argc, char* argv[]){

	char filename[64];
	
	int port = DEFPORT;
	char ip[15] = DEFIP;
	
	char buffer[1024];

	DIR *dirp;
	struct dirent *dp;
	
	/* check for pathname */
	if (argc >= 2) {
		strcpy(filename, argv[1]);
	} else {
		strcpy(filename, ".");
	}
	
        /* check for port */
        if (argc == 3) {
            port = atoi(argv[2]);
        }

	dirp = opendir(filename);
        while ((dp = readdir(dirp)) != NULL) {
		
		if ((strcmp(dp->d_name, ".") != 0) &&
		    (strcmp(dp->d_name, "..") != 0)) {
			/* get status of file */
			s_bind(port, ip);
			sprintf(buffer, "s %s\r\n", dp->d_name);
			ret = write(sock, buffer, strlen(buffer));
			strcpy(buffer, ""); buffer[0] = 0;
			ret = read(sock, (char*) &buffer, sizeof(buffer));
			s_close();

			/* write to stdout */
			printf("%s\n", buffer);
			
		}

	}
        closedir(dirp);
 	
}