mc1280fs-plus: add ddr4 dumper

mc1208fs-plus/Makefile

@@ -2,7 +2,7 @@ CC = gcc
 CFLAGS = -Wall -O2 -I/usr/include/libusb-1.0
 LFLAGS = -L/usr/lib -lusb-1.0
 
-all:	daqflex dump_binary dump_watts dump_watts_multiple debounce_serial
+all:	daqflex dump_binary dump_watts dump_watts_ddr3 debounce_serial dump_watts_ddr4
 
 daqflex:	daqflex.o mccdevice.o poll_thread.o
 	$(CC) $(LFLAGS) -pthread -o daqflex \
@@ -29,11 +29,20 @@ dump_watts:	dump_watts.o
 dump_watts.o:	dump_watts.c
 	$(CC) $(CFLAGS) -c dump_watts.c
 
-dump_watts_multiple:	dump_watts_multiple.o
-	$(CC) $(LFLAGS) -o dump_watts_multiple dump_watts_multiple.o
+dump_watts_ddr3:	dump_watts_ddr3.o
+	$(CC) $(LFLAGS) -o dump_watts_ddr3 dump_watts_ddr3.o
+
+dump_watts_ddr3.o:	dump_watts_ddr3.c
+	$(CC) $(CFLAGS) -c dump_watts_ddr3.c
+
+
+dump_watts_ddr4:	dump_watts_ddr4.o
+	$(CC) $(LFLAGS) -o dump_watts_ddr4 dump_watts_ddr4.o
+
+dump_watts_ddr4.o:	dump_watts_ddr4.c
+	$(CC) $(CFLAGS) -c dump_watts_ddr4.c
+
 
-dump_watts_multiple.o:	dump_watts_multiple.c
-	$(CC) $(CFLAGS) -c dump_watts_multiple.c
 
 debounce_serial:	debounce_serial.o
 	$(CC) $(LFLAGS) -o debounce_serial debounce_serial.o
@@ -42,4 +51,4 @@ debounce_serial.o:	debounce_serial.c
 	$(CC) $(CFLAGS) -c debounce_serial.c
 
 clean:
-	rm -f daqflex dump_binary dump_watts dump_watts_multiple debounce_serial *.o *~
+	rm -f daqflex dump_binary dump_watts dump_watts_ddr3 dump_watts_ddr4 debounce_serial *.o *~

mc1208fs-plus/dump_watts_ddr4.c

@@ -0,0 +1,174 @@
+/* Note, the pl2303 serial port seems to bounce for around 5ms */
+/* when the device is opened, so this code does some debouncing */
+/* to aid in automatically finding the starts of the traces */
+
+#include <stdio.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <math.h>
+
+#define STATE_NONE	0
+#define STATE_DTR_START	1
+#define STATE_DTR_STOP	2
+#define STATE_IN_TRACE	3
+
+int main(int argc, char **argv) {
+
+	int i,result,done=0;
+	int fd,temp_int,rate,channels;
+	float points[8];
+	int ticks=0,trace_ticks=0;
+	double watts_vdd,watts_vpp;
+	long long temp64;
+	int trace=0;
+	int state=STATE_NONE;
+	double trace_joules_vdd,trace_joules_vpp=0.0;
+	int time_in_state=0;
+	int threshold=1;
+	double total_joules_vdd=0.0;
+	double total_joules_vpp=0.0;
+	double total_time=0.0;
+
+	if (argc>1) {
+
+		fd=open(argv[1],O_RDONLY);
+		if (fd<1) {
+			fprintf(stderr,"Could not open %s\n",argv[1]);
+			return -1;
+		}
+	}
+	else {
+		/* stdin */
+		fd=0;
+	}
+
+	read(fd,&temp_int,4);
+	printf("(* Version %d *)\n",temp_int);
+
+	read(fd,&temp64,8);
+	printf("(* Start Time %lld.",temp64);
+	read(fd,&temp64,8);
+	printf("%06lld)\n",temp64);
+
+	read(fd,&temp_int,4);
+	rate=temp_int;
+	printf("(* Rate %d Hz *)\n",rate);
+
+	threshold=rate/500;
+	if (threshold<1) threshold=1;
+
+	read(fd,&temp_int,4);
+	channels=temp_int;
+	printf("(* Channels %d *)\n",channels);
+
+	while(!done) {
+
+		for(i=0;i<channels;i++) {
+
+			result=read(fd,&points[i],sizeof(float));
+
+			if (isinf(points[i])) {
+				done=1;
+				break;
+			}
+
+			if (result<sizeof(float)) {
+				done=1;
+				break;
+			}
+
+//			printf("%lf\t",points[i]);
+
+		}
+
+		if (done) break;
+
+		if (state==STATE_NONE) {
+			if (points[7]>4.0) {
+				time_in_state++;
+				if (time_in_state>threshold) {
+					state=STATE_DTR_START;
+					time_in_state=0;
+				}
+			}
+		} else if (state==STATE_DTR_START) {
+
+			if (points[7]<-4.0) {
+				state=STATE_IN_TRACE;
+				printf("Starting Trace %d at %lf\n",
+					trace,
+					(double)ticks/(double)rate);
+				trace_ticks=0;
+				trace_joules_vdd=0.0;
+				trace_joules_vpp=0.0;
+				time_in_state=0;
+			}
+		} else if (state==STATE_IN_TRACE) {
+			if (points[7]>4.0) {
+				time_in_state++;
+				if (time_in_state>threshold) {
+					state=STATE_DTR_STOP;
+					printf("Ending Trace %d at %lfs, %lfs Elapsed\n",
+						trace,
+						(double)ticks/(double)rate,
+						(double)trace_ticks/(double)rate);
+					printf("Total VDD Energy: %lfJ Average VDD Power: %lfW\n",
+						trace_joules_vdd,
+						trace_joules_vdd/((double)trace_ticks/(double)rate));
+
+					printf("Total VPP Energy: %lfJ Average VPP Power: %lfW\n",
+						trace_joules_vpp,
+						trace_joules_vpp/((double)trace_ticks/(double)rate));
+
+					total_joules_vdd+=trace_joules_vdd;
+					total_joules_vpp+=trace_joules_vpp;
+
+					total_time+=(double)trace_ticks/(double)rate;
+					trace++;
+					time_in_state=0;
+				}
+			}
+		}
+		else if (state==STATE_DTR_STOP) {
+			if (points[7]<-4.0) {
+				state=STATE_NONE;
+				time_in_state=0;
+			}
+		}
+
+
+
+		if (state==STATE_IN_TRACE) {
+
+			/* P=IV */
+			/* V=points[1] */
+			/* I=V/R = (V/AMP)/R = V/300/.0033 */
+
+			watts_vdd=((points[0]/100.0)/0.005)*points[1];
+			watts_vpp=((points[1]/100.0)/0.005)*points[2];
+
+#if 0
+			printf("%lf\t%lf\t%lf (* %lf %lf %lf %lf)\n",
+				(double)ticks/(double)rate,
+				watts_vdd,
+				watts_vpp,
+				points[0],points[1],points[2],points[3]);
+#endif
+			trace_joules_vdd+=(watts_vdd/rate);
+			trace_joules_vpp+=(watts_vpp/rate);
+
+			trace_ticks++;
+		}
+
+		ticks++;
+	}
+
+	read(fd,&temp64,8);
+	printf("(* Stop Time %lld.",temp64);
+	read(fd,&temp64,8);
+	printf("%06lld)\n",temp64);
+
+	printf("Average Joules=%lf\tAverage Watts=%lf\n",(total_joules_vdd+total_joules_vpp)/(double)trace,(total_joules_vdd+total_joules_vpp)/total_time);
+
+	return 0;
+}