int main() {
int suc = 0;
if ( pipe(fd1) != 0 || pipe(fd2) != 0 ) {
printf("PIPES: ERROR AL CREARLAS\n");
exit(0);
};
pid = fork();
switch(pid) {
case -1:
printf("FORK: ERROR\n");
break;
case 0:
hijo();
break;
default:
padre(suc);
break;
};
exit(0);
};
int main (int argc, char** argv) {
signal(SIGCHLD, childHandler);
struct stat inodo;
int father = -1;
DIR *dirp;
struct dirent *direntp;
char *ruta = (char *)malloc(200);
strcpy(ruta,argv[1]);
int childpid;
FD *ph = NULL;
FD *hp = NULL;
int rs[2];
int auxi = 0;
char **argumentos = (char **) malloc (sizeof(char*)*6);
char *out = malloc(102400);
chdir(argv[1]);
hp = (FD*) malloc(sizeof(FD));
hp->path = malloc(2);
strcpy(hp->path, "/");
if (stat(ruta, &inodo) == -1 ) {
fprintf(stderr, "No se pudo aplicar stat sobre el archivo %s: %s \n"
,ruta, strerror(errno));
exit(1);
}
if ( !(inodo.st_mode & S_IFDIR) ) {
fprintf(stderr, "La ruta especificada no es un Directorio\n");
exit(1);
}
pipe(rs);
directorio:
/**
*************
Cable
*************
**/
if ( father == 0 ) {
auxi = hp->pd[0];
}
/**
******************************************************
Imprimimos la Ruta actual y la modificamos para
que pueda ser interpretada como ruta absoluta
******************************************************
**/
if ( ! (ruta[strlen(ruta)-1] == '/') ){
strcat(ruta,"/");
}
if ( (dirp = opendir(ruta)) == NULL ) {
fprintf(stderr, "No se pudo abrir el directorio\n");
exit(1);
}
/**
****************************************************
Buscamos en la tabla de inodos del directorio
****************************************************
**/
skip:
while (( direntp = readdir(dirp)) != NULL ) {
if ('.' == direntp->d_name[0]) {
goto skip;
}
/**
***********************************************************
Construccion de la ruta absoluta del subdirectorio
***********************************************************
**/
char *aux = (char *)malloc(strlen(ruta) + strlen(direntp->d_name) + 1);
strcpy(aux,ruta);
strcat(aux,direntp->d_name);
if (stat(aux, &inodo) == -1 ) {
fprintf(stderr, "No se pudo aplicar stat sobre el archivo %s: %s \n"
,aux, strerror(errno));
exit(1);
}
else {
if ( inodo.st_mode & S_IFDIR ) {
/**
***********************************************************
Estructura auxiliar para comunicacion con los hijos
***********************************************************
**/
FD *ph_aux = (FD *)malloc(sizeof(FD));
pipe(ph_aux->pd);
ph_aux->hijo = malloc(30);
strcpy(ph_aux->hijo, direntp->d_name);
ph_aux->sig = ph;
ph = ph_aux;
if ( (childpid = fork()) == 0 ) {
ruta = aux;
char *concat = malloc(strlen(ph->hijo)+strlen(hp->path)+3);
strcpy(concat, hp->path);
strcat(concat, ph->hijo);
strcat(concat, "/");
if ( father != -1 ) {
father = 0;
close(hp->pd[0]); // Cierro la tuberia del abuelo
free(hp); // Libero la estructura copiada del abuelo
close(rs[0]); // Cierro la tuberia de lectura para resultado
}
father = 0;
hp = ph;
close(hp->pd[1]);
ph = ph->sig;
/**
*********************************************************
Limpieza de la estructura de hijos copiada del padre
*********************************************************
**/
while( !(ph == NULL) ){
FD *aux_fd;
aux_fd = ph;
ph = aux_fd->sig;
free(aux_fd);
}
hp->path = concat;
goto directorio;
}
else {
close(ph->pd[0]);
hp->id = childpid;
}
}
}
free(aux);
}
closedir(dirp);
free(ruta);
/**
*****************************************
Entrada de Comandos
*****************************************
**/
if ( father == -1 ){
padre(rs, ph, hp, auxi, argumentos, out, father);
}
else {
hijo(rs, ph, hp, auxi, argumentos, out, father);
}
FD *aux_fd;
aux_fd = ph;
while( !(aux_fd == NULL) ){
close(aux_fd->pd[1]);
aux_fd = aux_fd->sig;
free(ph);
ph = aux_fd;
}
exit(0);
}