LINUX AVANZATO 2007

#include <stdio.h>
#include <stdlib.h>
#include <sys/types.h>
#include <unistd.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <string.h>

int main(int argc, char **argv){
	
	char *filename = argv[1];
	int N = atoi(argv[2]);
	int i;
	
	//genero permutazione casuale di numeri compresi tra 0 e N - 1
	int permutazione[N];
	
	srand(time(NULL));
	int perm = rand() % N;
	permutazione[0] = perm;
	
	for(i = 1; i < N; i++){
		while(1){
			perm = rand() % N;
			int j;
			for(j = 0; j < i; j++){
				if(perm != permutazione[j])
					continue;
				else break;
			}
			if(j == i){
				permutazione[i] = perm;
				break;
			}
		}
	}
	
	for(i = 0; i < N; i++)
		printf("%d\n", permutazione[i]);
	
	//apro i files
	char *filename2;
	strcpy(filename2, filename);
 	int fd = open(filename, O_RDONLY);
	if(fd < 0){
		printf("Errore nell'apertura del file %s!!\n", filename);
		exit(1);
	}
	char *suffix = "_crypt";
	strcat(filename, suffix);
	int fd1 = open(filename, O_CREAT|O_RDWR);
	if(fd1 < 0){
		printf("Errore nell'apertura del file %s!!\n", filename);
		exit(1);
	}
	suffix = "_decrypt";
	strcat(filename2, suffix);
	int fd2 = open(filename2, O_CREAT|O_WRONLY);
	if(fd2 < 0){
		printf("Errore nell'apertura del file %s!!\n", filename2);
		exit(1);
	}
	
	//cripto
	int nread;
	char buf[N];
	int num;
	while((nread = read(fd, buf, N)) == N){
		for(i = 0; i < N; i++){
			num = permutazione[i];
			write(fd1, &buf[num], 1);
		}
	}
	
	//decripto
	int block_number = 0;
	lseek(fd1, 0, SEEK_SET);
	while(nread = read(fd1, buf, N) == N){
		for(i = 0; i < N; i++){
			num = permutazione[i];
			lseek(fd2, num + (N * block_number), SEEK_SET);
			write(fd2, &buf[i], 1);
		}
		block_number++;
	}
	
	close(fd);
	close(fd1);
	close(fd2);
	
	return 0;
}