[mpich2-commits] r4122 - in mpich2/trunk/src/mpi/romio/adio: ad_bgl common include

robl at mcs.anl.gov robl at mcs.anl.gov
Wed Mar 18 15:15:18 CDT 2009


Author: robl
Date: 2009-03-18 15:15:18 -0500 (Wed, 18 Mar 2009)
New Revision: 4122

Modified:
   mpich2/trunk/src/mpi/romio/adio/ad_bgl/ad_bgl_open.c
   mpich2/trunk/src/mpi/romio/adio/common/ad_init.c
   mpich2/trunk/src/mpi/romio/adio/include/adioi.h
Log:
found something else interesting to visualize with mpe


Modified: mpich2/trunk/src/mpi/romio/adio/ad_bgl/ad_bgl_open.c
===================================================================
--- mpich2/trunk/src/mpi/romio/adio/ad_bgl/ad_bgl_open.c	2009-03-18 19:46:13 UTC (rev 4121)
+++ mpich2/trunk/src/mpi/romio/adio/ad_bgl/ad_bgl_open.c	2009-03-18 20:15:18 UTC (rev 4122)
@@ -133,8 +133,13 @@
 	amode = amode | O_RDWR;
     if (fd->access_mode & ADIO_EXCL)
 	amode = amode | O_EXCL;
-
+#ifdef ADIOI_MPE_LOGGING
+    MPE_Log_event(ADIOI_MPE_open_a, 0, NULL);
+#endif
     fd->fd_sys = open(fd->filename, amode, perm);
+#ifdef ADIOI_MPE_LOGGING
+    MPE_Log_event(ADIOI_MPE_open_b, 0, NULL);
+#endif
   DBG_FPRINTF(stderr,"open('%s',%#X,%#X) rc=%d, errno=%d\n",fd->filename,amode,perm,fd->fd_sys,errno);
     fd->fd_direct = -1;
 
@@ -158,6 +163,10 @@
     ((ADIOI_BGL_fs*)fd->fs_ptr)->fsync_aggr = ADIOI_BGL_FSYNC_AGGREGATION_DISABLED; 
     
 
+
+#ifdef ADIOI_MPE_LOGGING
+        MPE_Log_event(ADIOI_MPE_stat_a, 0, NULL);
+#endif
     /* Get the (real) underlying file system block size */
     rc = stat64(fd->filename,&bgl_stat);
       if (rc >= 0)
@@ -194,6 +203,9 @@
       }
       ADIOI_Free(dir);
     }
+#ifdef ADIOI_MPE_LOGGING
+	MPE_Log_event(ADIOI_MPE_stat_b, 0, NULL);
+#endif
     if ((bgl_statfs.f_type == GPFS_SUPER_MAGIC) ||
         (bgl_statfs.f_type == PVFS2_SUPER_MAGIC))
     {

Modified: mpich2/trunk/src/mpi/romio/adio/common/ad_init.c
===================================================================
--- mpich2/trunk/src/mpi/romio/adio/common/ad_init.c	2009-03-18 19:46:13 UTC (rev 4121)
+++ mpich2/trunk/src/mpi/romio/adio/common/ad_init.c	2009-03-18 20:15:18 UTC (rev 4122)
@@ -77,6 +77,9 @@
         MPE_Log_get_state_eventIDs( &ADIOI_MPE_unlock_a, &ADIOI_MPE_unlock_b );
         MPE_Log_get_state_eventIDs( &ADIOI_MPE_postwrite_a,
                                     &ADIOI_MPE_postwrite_b );
+	MPE_Log_get_state_eventIDs( &ADIOI_MPE_openinternal_a, 
+			&ADIOI_MPE_openinternal_b);
+	MPE_Log_get_state_eventIDs( &ADIOI_MPE_stat_a, &ADIOI_MPE_stat_b);
 
         int  comm_world_rank;
         MPI_Comm_rank( MPI_COMM_WORLD, &comm_world_rank );
@@ -100,6 +103,8 @@
                                 "unlock", "purple" );
             MPE_Describe_state( ADIOI_MPE_postwrite_a, ADIOI_MPE_postwrite_b,
                                 "postwrite", "ivory" );
+	    MPE_Describe_state( ADIOI_MPE_openinternal_a, ADIOI_MPE_openinternal_b, "open system", "blue");
+	    MPE_Describe_state( ADIOI_MPE_stat_a, ADIOI_MPE_stat_b, "stat", "purple");
         }
     }
 #endif

Modified: mpich2/trunk/src/mpi/romio/adio/include/adioi.h
===================================================================
--- mpich2/trunk/src/mpi/romio/adio/include/adioi.h	2009-03-18 19:46:13 UTC (rev 4121)
+++ mpich2/trunk/src/mpi/romio/adio/include/adioi.h	2009-03-18 20:15:18 UTC (rev 4122)
@@ -794,6 +794,10 @@
 int  ADIOI_MPE_unlock_b;
 int  ADIOI_MPE_postwrite_a;
 int  ADIOI_MPE_postwrite_b;
+int  ADIOI_MPE_openinternal_a;
+int  ADIOI_MPE_openinternal_b;
+int  ADIOI_MPE_stat_a;
+int  ADIOI_MPE_stat_b;
 #endif
 
 #ifdef ROMIO_INSIDE_MPICH2



More information about the mpich2-commits mailing list