Download document (10.35 MB) - Escuela Superior de Informática ...

D.2. Código fuente de los módulos más relevantes. 161773 if ((dip = opendir(name)) == NULL){774 perror("opendir");775 return 0;776 }777 }778779 strcat(name, archivoImagenVideo);780781 char str [10];782 sprintf (str," %04i", frameactual);783784 strcpy(nameImg,name);785 strcat(nameImg,archivoImagenVideo);786 strcat(nameImg,str);787 strcat(nameImg,".jpg");788789 /* load the image*/790 img = cvLoadImage( nameImg, CV_LOAD_IMAGE_COLOR );791792 /* always check */793 if( img == 0 ) {794 fprintf( stderr, "No se puede cargar el fichero %s!\n", nameImg );795 return 1;796 }797 else {798 createAdquisitionVideo(drawing_area_1);799800 createAdquisitionVideo2(drawing_area_2);801802 pre_procesing_images(img);803804 /Para que en el frame 0 se pueda redibujar_gl ()*/805 if (frameactual != 1) {806 cvReleaseImage( &img );807 cvReleaseImage( &imageOF );808 }809810 createAdquisitionVideo3(drawing_area_3);811812 createAdquisitionVideo4(drawing_area_4);813814 createAdquisitionVideo5(drawing_area_5);815816 /*Para que en el frame 0 se pueda redibujar_gl ()*/817 if (frameactual != 1)818 free_memory();819820 return 0;821 }822823 } // Fin del if ficheroMARCAS!=NULL824 }825826 /**********************************************************************827 * Funcion: createAdquisitionVideo828 * Descripcion: Función que crea una textura en OpenGl a partir de829 * un video en OpenCv830 * Entradas: GtkWidget *: Widget en el que se renderiza la imagen.831 * Salidas: Devuelve TRUE si no se produjo error.832 **********************************************************************/