- New batch file management module

- New oscillator module - Bug fixes
2004-11-17 10:50:17 +00:00
parent d96ee44d42
commit 2a93216346
23 changed files with 1731 additions and 338 deletions
--- a/utils/ecb_load_new/ecb_load.c
+++ b/utils/ecb_load_new/ecb_load.c
@ -0,0 +1,100 @@
+/***************************************************************************
+* Download program for the ECB system with the new P2701 CPU module.
+*	
+*       Filename: ecb_load.c
+*
+*	Author: P.S.			May 2004
+*
+*
+****************************************************************************/
+/*******************************************************************************
+*&  modificaions:
+*&
+*&   V003.100   P.S.    2-May-2004
+*&                      Creation.
+*&
+*&*****************************************************************************/
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include "ecb_load.h"		/* The ecb driver interface. */
+
+/*******************************************************************************
+* Default path and name for the download file..
+*******************************************************************************/
+#define FILE_NAME       "/scratch/users/tascomp/sans2m/tas/symfil/ecb_v501.hex"
+
+/*******************************************************************************
+* External variables defined in this file.
+*******************************************************************************/
+int x_tas_error = 0;		  /* Global error type */
+char *x_error_text = '\0';	  /* Error text line*/
+int x_error_int = 0;		  /* Global error parameter */
+
+
+
+/****************************************************************************
+* If the program is started without arguments, the file ecb_v501.hex is
+* downloaded. Another file name may be specified as an argument.
+****************************************************************************/
+extern int
+main(int argc, char *argv[])
+{
+  int ecb_type;
+  FILE *stream;
+  char file_name[F_BUFSIZ] = FILE_NAME;
+
+  if (argc == 2)
+    strcpy (file_name, argv[1]);
+  if (argc > 2)
+    exit(0);   /* Error exit */
+
+  stream = fopen(file_name, "r");	/* Open in read-only mode */
+  if (stream == NULL)
+  {
+    printf("Error: unable to open file %s \n", file_name);
+    exit(0);
+  }
+
+  Gpib_init();
+  Ecb_init();
+
+  /* Check communication with the ECB system works and that we are in ROM mode */
+  ecb_type = Ecb_type (TYPE_OUT);
+  if (ecb_type != 0)
+  {
+    if (ecb_type == -1)
+      printf (" old ECB CPU (not P2701a)\n");
+    else
+    {
+      printf ("\nERROR:- the ECB system is in RAM mode\n");
+      printf (" and download of the ECB program is only possible in ROM mode.\n");
+      printf (" You must set the ECB system in ROM mode.\n\n");
+   }
+    return;    
+  }
+
+  Ecb_down_load (stream);
+
+}
+
+
+/*******************************************************************************
+* Main error routine.
+*******************************************************************************/
+
+
+extern void
+Ecb_load_error()
+{
+
+  printf("\nERROR:-");
+
+  if ((Ecb_error()) == FOUND) return;
+  if ((Gpib_error()) == FOUND) return;
+
+
+  exit(0);
+
+}
+