Starting to look like a real project.

Author: dtiller

Diff for: src/atest.c

@@ -280,6 +280,9 @@ int main (int argc, char *argv[])
 	      else if (strcasecmp(optarg, "EAS") == 0) {
 	        B_opt = 23456;	// See special case below.
 	      }
+              else if (strcasecmp(optarg, "EOTD") == 0) {
+                B_opt = 34567;
+              }
 	      else {
 	        B_opt = atoi(optarg);
 	      }
@@ -475,6 +478,12 @@ int main (int argc, char *argv[])
 	  my_audio_config.achan[0].space_freq = 1563;	// Actually 1562.5 - logic 0.
 	  strlcpy (my_audio_config.achan[0].profiles, "D", sizeof(my_audio_config.achan[0].profiles));
 	}
+        else if (my_audio_config.achan[0].baud == 34567) {
+	  my_audio_config.achan[0].modem_type = MODEM_EOTD;
+          my_audio_config.achan[0].baud = 1200;
+          my_audio_config.achan[0].mark_freq = 1200;
+          my_audio_config.achan[0].space_freq = 1800;
+        }
 	else {
 	  my_audio_config.achan[0].modem_type = MODEM_SCRAMBLE;
 	  my_audio_config.achan[0].mark_freq = 0;

Diff for: src/bch.c

@@ -1,3 +1,7 @@
+/* BCH processing, library-style. Copyright (2022) David E. Tiller, K4DET
+   This file was adapted from a program written by Robert Morelos-Zaragoza
+   (robert@spectra.eng.hawaii.edu) whose original Copyright appears below.
+*/
 /*
  * File:    bch3.c
  * Title:   Encoder/decoder for binary BCH codes in C (Version 3.1)
@@ -147,7 +151,7 @@ int init_bch(bch_t *bch, int m, int length, int t) {
  *
  * alpha=2 is the primitive element of GF(2**m) 
  */
-	register int    i, mask;
+	register int    mask;
 
 	bch->alpha_to = malloc(n * sizeof(int));
 	bch->index_of = malloc(n * sizeof(int));
@@ -339,7 +343,7 @@ int apply_bch(const bch_t *bch, int *recd)
 {
 	register int    i, j, u, q, t2, count = 0, syn_error = 0;
 	int             elp[1026][1024], d[1026], l[1026], u_lu[1026], s[1025];
-	int             root[200], loc[200], err[1024], reg[201];
+	int             root[200], loc[200], reg[201];
 
 	t2 = 2 * bch->t;