LINUX AVANZATO 2007

#include <stdlib.h>
#include <stdio.h>

//funzione hash ausiliaria
int hash_func(char *stringa1, char *stringa2, int m) {
   int i, val = 0;
           
   for(i = 0; i < 30; i++) {
      if(*(stringa1+i) == '\0')
         break;
      val = val ^ *(stringa1+i);
   }

   for(i = 0; i < 30; i++) {
      if(*(stringa2+i) == '\0')
         break;
      val = val ^ *(stringa2+i);
   }

   val = val % m;
   return val;
}

//struttura anagrafica
typedef struct rec {
   char nome[30];
   char cognome[30];
} record;

//elemento lista
typedef struct ns {
   record rec;
   struct ns *next;
}node;

//funzione per inserimento in testa alla lista
node *list_add(node **p, record new_rec) {
   node *n = (node *)malloc(sizeof(node));
   n->next = *p;
   *p = n;
   n->rec = new_rec;
   return n;
}

int main(int argc, char **argv) {
   
   if(argv[1] == NULL || argc != 2) {
      printf("Numero parametri errato!!\n");
      exit(0);
   }

   int m = atoi(argv[1]);
   
   //allocazione dinamica voluta da bovet ma essenzialmente inutile
   node **hash = (node **)malloc(sizeof(node)*m);
   int i;
   
   if(m >= 8 || m < 1) {
      printf("Il numero inserito come parametro è errato!! Inserire un numero compreso fra 1 e 7\n");
      exit(0);
   }
   
   record anagrafico[8] = { {"mario", "rossi"}, {"paolo", "verdi"}, {"stefano", "bianchi"}, {"fabio", "neri"}, {"daniele", "azzurri"}, {"francesco", "gialli"}, {"franco", "grigi"}, {"fabrizio", "marroni"} };
   
   printf("\nStampa dell'array anagrafico\n\n");
   for(i = 0; i < 8; i++) {
      printf("%d: Nome: %s  Cognome: %s\n", i + 1, anagrafico[i].nome, anagrafico[i].cognome);
   }
   
   //inserimento dell'anagrafe nelle varie liste
   for(i = 0; i < 8; i++) {
      int j = hash_func(anagrafico[i].nome, anagrafico[i].cognome, m);
      list_add(&hash[j], anagrafico[i]);
   }
   
   printf("\n\nStampa delle %d liste di hash[]\n\n", m);
   
   for(i = 0; i < m; i++) {
      printf("Lista %d\n", i + 1);
      if(hash[i] == NULL)
         printf("Nessun elemento mappato in lista %d!\n", i + 1);
      while(hash[i] != NULL) {
         printf("Nome: %s  Cognome: %s\n", (hash[i]->rec).nome, (hash[i]->rec).cognome);
         hash[i] = hash[i]->next;
      }
      printf("\n");
   }
   
   free(hash);
   
   return 0;
} 

/*
1-Piglia due argomenti interi R e C da riga di comando.
2-Crea una matrice RxC di unsigned int e salvali (occhio, quando non lo specifica di solito non intende in ASCII ma proprio in binario. Ho visto che questo ha creato alcuni problemi oggi) in un file.
3-Leggi il file appena salvato e salva la matrice trasposta in un altro file.
*/

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


int main(int argc, char* argv[]) {
	
	int fd, fdt;
	int R, C;
	char *path, *patht;
	int i, j;
	unsigned int num;
	int offset;

	if (argc < 5) {
		printf("Usage: %s R C src_path dst_path\n", argv[0]);
		exit(1);
	}

	R = atoi(argv[1]);
	C = atoi(argv[2]);
	path = argv[3];
	patht = argv[4];

	fd = open(path, O_RDWR | O_CREAT | O_TRUNC, S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH);
	if (fd == -1) {
		printf("Errore in open %s\n", path);
		exit(1);
	}
	fdt = open(patht, O_RDWR | O_CREAT | O_TRUNC, S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH);
	if (fdt == -1) {
		printf("Errore in open %s\n", patht);
		exit(1);
	}

	/* crea la matrice */
	srand(time(0));
	for(i = 0; i < R; i++) {
		for (j = 0; j < C; j++) {
			num = (rand() % 9) + 1;
			write(fd, &num, sizeof(num));
		}
	}

	/* stampa la matrice appena creata */
	printf("\nLa matrice appena creata e'\n");
	lseek(fd, 0, SEEK_SET);	
	for(i = 0; i < R; i++) {
		for (j = 0; j < C; j++) {
			read(fd, &num, sizeof(num));
			printf("%u ", num);
		}
		printf("\n");
	}

	/* inizializza la trasposta */
	num = 0;
	for(i = 0; i < R; i++) {
		for (j = 0; j < C; j++) {
			write(fdt, &num, sizeof(num));
		}
	}

	/* stampa la matrice trasposta inizializzata */
	printf("\nLa matrice trasposta e' inizializzata nel seguente modo: \n");
	lseek(fdt, 0, SEEK_SET);	
	for(i = 0; i < C; i++) {
		for (j = 0; j < R; j++) {
			read(fdt, &num, sizeof(num));
			printf("%u ", num);
		}
		printf("\n");
	}

	/* crea la trasposta */
	lseek(fd, 0, SEEK_SET);	
	lseek(fdt, 0, SEEK_SET);	
	for(i = 0; i < R; i++) {
		for (j = 0; j < C; j++) {
			read(fd, &num, sizeof(num));
	        printf("Ho letto %u e lo metto nella posizione %d\n", num, j*R+i);
			lseek(fdt, (j*R+i)*sizeof(num), SEEK_SET);
			write(fdt, &num, sizeof(num));
			lseek(fdt, -1, SEEK_CUR);
			read(fdt, &num, sizeof(num));
	        printf("Ho appena scritto %u in posizione %d\n", num, j*R+i);
		}
	}

	/* stampa la matrice trasposta */
	printf("\nLa matrice trasposta e'\n");
	lseek(fdt, 0, SEEK_SET);	
	for(i = 0; i < C; i++) {
		for (j = 0; j < R; j++) {
			read(fdt, &num, sizeof(num));
			printf("%u ", num);
		}
		printf("\n");
	}
	
	close(fd);
	close(fdt);
		
	return 0;
}

/*
1-Piglia due argomenti interi R e C da riga di comando.
2-Crea una matrice RxC di unsigned int e salvali (occhio, quando non lo specifica di solito non intende in ASCII ma proprio in binario. Ho visto che questo ha creato alcuni problemi oggi) in un file.
3-Leggi il file appena salvato e salva la matrice trasposta in un altro file.
*/


#include <stdlib.h>
#include <stdio.h>
#include <fcntl.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <time.h>
#include <sys/mman.h>

int main(int argc, char* argv[]) {
	
	if (argc < 5) {
		printf("Usage: %s R C src_path dst_path\n", argv[0]);
		exit(1);
	}

	int fd, fdt;
	int R, C;
	char *path, *patht;
	int i, j;
	unsigned int num;
	int offset;

	R = atoi(argv[1]);
	C = atoi(argv[2]);
	path = argv[3];
	patht = argv[4];

	fd = open(path, O_RDWR | O_CREAT | O_TRUNC, S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH);
	if (fd == -1) {
		printf("Errore in open %s\n", path);
		exit(1);
	}
	fdt = open(patht, O_RDWR | O_CREAT | O_TRUNC, S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH);
	if (fdt == -1) {
		printf("Errore in open %s\n", patht);
		exit(1);
	}

	/* crea la matrice */
	srand(time(0));
	for(i = 0; i < R; i++) {
		for (j = 0; j < C; j++) {
			num = (rand() % 9) + 1;
			write(fd, &num, sizeof(num));
		}
	}

	/* stampa la matrice appena creata */
	printf("\nLa matrice appena creata e'\n");
	lseek(fd, 0, SEEK_SET);	
	for(i = 0; i < R; i++) {
		for (j = 0; j < C; j++) {
			read(fd, &num, sizeof(num));
			printf("%u ", num);
		}
		printf("\n");
	}

	/* inizializza la trasposta */
	num = 0;
	for(i = 0; i < R; i++) {
		for (j = 0; j < C; j++) {
			write(fdt, &num, sizeof(num));
		}
	}

	/* stampa la matrice trasposta inizializzata */
	printf("\nLa matrice trasposta e' inizializzata nel seguente modo: \n");
	lseek(fdt, 0, SEEK_SET);	
	for(i = 0; i < C; i++) {
		for (j = 0; j < R; j++) {
			read(fdt, &num, sizeof(num));
			printf("%u ", num);
		}
		printf("\n");
	}

	/* crea la trasposta */
	lseek(fd, 0, SEEK_SET);	
	lseek(fdt, 0, SEEK_SET);	
	unsigned int *p0, *pt;
	p0 = (unsigned int*)mmap(NULL, R*C, PROT_READ|PROT_WRITE, MAP_SHARED, fd, 0);
	pt = (unsigned int*)mmap(NULL, R*C, PROT_READ|PROT_WRITE, MAP_SHARED, fdt, 0);
	if (*p0 == -1) {
		printf("Errore in mmap\n");
		exit(1);
	}
	for(i = 0; i < R; i++) {
		for (j = 0; j < C; j++) {
			pt[j*R+i] = *p0;
			p0++;
	        //printf("Ho appena scritto %u in posizione %d\n", pt[j*R+i], j*R+i);
		}
	}
	

	/* stampa la matrice trasposta */
	printf("\nLa matrice trasposta e'\n");
	lseek(fdt, 0, SEEK_SET);	
	for(i = 0; i < C; i++) {
		for (j = 0; j < R; j++) {
			read(fdt, &num, sizeof(num));
			printf("%u ", num);
		}
		printf("\n");
	}
	
	close(fd);
	close(fdt);
		
	return 0;
}