Multiprocess indexamajig

1 files changed, 73 insertions, 10 deletions

diff --git a/libcrystfel/src/mosflm.c b/libcrystfel/src/mosflm.c
index 3e29a4f8..03e6cbeb 100644
--- a/libcrystfel/src/mosflm.c
+++ b/libcrystfel/src/mosflm.c
@@ -82,6 +82,37 @@
 #include "peaks.h"
 
 
+
+
+#ifdef HAVE_CLOCK_GETTIME
+#include <time.h>
+#else
+#include <sys/time.h>
+#endif
+#ifdef HAVE_CLOCK_GETTIME
+static double get_time()
+{
+	struct timespec tp;
+	clock_gettime(CLOCK_MONOTONIC, &tp);
+	double sec = (double) tp.tv_sec+ (double) tp.tv_nsec/1000000000;
+	return sec; //nano resolution
+}
+#else
+/* Fallback version of the above.  The time according to gettimeofday() is not
+ * monotonic, so measuring intervals based on it will screw up if there's a
+ * timezone change (e.g. daylight savings) while the program is running. */
+static double get_time()
+{
+	struct timeval tp;
+	gettimeofday(&tp, NULL);
+	double sec = (double) tp.tv_sec+ (double) tp.tv_usec/1000000;
+	return sec; //micro resolution
+}
+#endif
+
+
+
+
 #define MOSFLM_VERBOSE 0
 
 
@@ -358,6 +389,7 @@ static void mosflm_send_next(struct image *image, struct mosflm_data *mosflm)
 		break;
 
 	case 10 :
+//ERROR(">>>>>>>>>>>>>> OK\n");
 		mosflm_sendline("GO\n", mosflm);
 		mosflm->finished_ok = 1;
 		break;
@@ -376,12 +408,12 @@ static int mosflm_readable(struct image *image, struct mosflm_data *mosflm)
 {
 	int rval;
 	int no_string = 0;
-
+//ERROR("read pty: %d %d %d ===",mosflm->pty,mosflm->rbuffer+mosflm->rbufpos, (int) mosflm->rbuflen-mosflm->rbufpos);
 	rval = read(mosflm->pty, mosflm->rbuffer+mosflm->rbufpos,
 	            mosflm->rbuflen-mosflm->rbufpos);
-
+//ERROR("read val: %d\n",rval);
 	if ( (rval == -1) || (rval == 0) ) return 1;
-
+//ERROR("Enter here\n");
 	mosflm->rbufpos += rval;
 	assert(mosflm->rbufpos <= mosflm->rbuflen);
 
@@ -436,7 +468,7 @@ static int mosflm_readable(struct image *image, struct mosflm_data *mosflm)
 				break;
 
 			case MOSFLM_INPUT_PROMPT :
-
+//ERROR("Enter mosflm_send_next\n");
 				mosflm_send_next(image, mosflm);
 				endbit_length = i+7;
 				break;
@@ -512,14 +544,16 @@ void run_mosflm(struct image *image, UnitCell *cell)
 	snprintf(mosflm->newmatfile, 127, "xfel-%i.newmat", image->id);
 	remove(mosflm->newmatfile);
 
+        // fork a new process operating in pseudoterminal
 	mosflm->pid = forkpty(&mosflm->pty, NULL, NULL, NULL);
+//ERROR("forkpty: %d\n",mosflm->pid);        
 	if ( mosflm->pid == -1 ) {
 		ERROR("Failed to fork for MOSFLM\n");
 		free(mosflm);
 		return;
 	}
-	if ( mosflm->pid == 0 ) {
-
+	if ( mosflm->pid == 0 ) { // child process
+//ERROR("Enter the dragon\n");
 		/* Child process: invoke MOSFLM */
 		struct termios t;
 
@@ -545,32 +579,61 @@ void run_mosflm(struct image *image, UnitCell *cell)
 	mosflm->step = 1;	/* This starts the "initialisation" procedure */
 	mosflm->finished_ok = 0;
 
+
+//double t1,t2,t3,t4,t5,t6,t7;
+
+//t1 = get_time();
+
 	do {
 
+//t2 = get_time();
+
 		fd_set fds;
 		struct timeval tv;
 		int sval;
 
+//t3 = get_time();
+	
 		FD_ZERO(&fds);
-		FD_SET(mosflm->pty, &fds);
+		FD_SET(mosflm->pty, &fds); // file descriptor set
+	
+//t4 = get_time();
 
-		tv.tv_sec = 30;
+		tv.tv_sec = 30;            // 30 second timeout
 		tv.tv_usec = 0;
 
-		sval = select(mosflm->pty+1, &fds, NULL, NULL, &tv);
+//t5 = get_time();
+                //sval = 1;
+		sval = select(mosflm->pty+1, &fds, NULL, NULL, &tv); // is mosflm ready for reading?
+                
+                if (sval != 1){
+                        ERROR("******************* sval: %d ",sval);
+                }
+//t6 = get_time();
 
 		if ( sval == -1 ) {
 			int err = errno;
 			ERROR("select() failed: %s\n", strerror(err));
 			rval = 1;
 		} else if ( sval != 0 ) {
-			rval = mosflm_readable(image, mosflm);
+//ERROR("mosflm_readable: %d %d %d ===",mosflm->pty,mosflm->rbuffer+mosflm->rbufpos, (int) mosflm->rbuflen-mosflm->rbufpos);                    
+			rval = mosflm_readable(image, mosflm); // read mosflm results
 		} else {
 			ERROR("No response from MOSFLM..\n");
 			rval = 1;
 		}
+                //if (sval != 1){
+                //        ERROR("rval: %d\n",rval);
+                //}
+
+//t7 = get_time();
+//ERROR("mosflm_do DONE %.5f %.5f %.5f %.5f %.5f %.5f\n",t2-t1,t3-t2,t4-t3,t5-t4,t6-t5,t7-t6);	
 
 	} while ( !rval );
+        //ERROR("DONE\n");
+	
+
+
 
 	close(mosflm->pty);
 	free(mosflm->rbuffer);