kopia lustrzana https://github.com/Hamlib/Hamlib
				
				
				
			
		
			
				
	
	
		
			824 wiersze
		
	
	
		
			20 KiB
		
	
	
	
		
			C
		
	
	
			
		
		
	
	
			824 wiersze
		
	
	
		
			20 KiB
		
	
	
	
		
			C
		
	
	
| // using virtual serial ports on Windows is to be developed yet
 | |
| // Needs a lot of improvement to work on all Icoms
 | |
| // gcc -g -Wall -o simicom simicom.c -lhamlib
 | |
| // On mingw in the hamlib src directory
 | |
| // gcc -static -I../include -g -Wall -o simicom simicom.c -L../../build/src/.libs -lhamlib -lwsock32 -lws2_32
 | |
| #define _XOPEN_SOURCE 700
 | |
| // since we are POSIX here we need this
 | |
| #if 0
 | |
| struct ip_mreq
 | |
| {
 | |
|     int dummy;
 | |
| };
 | |
| #endif
 | |
| 
 | |
| #include <stdio.h>
 | |
| #include <stdlib.h>
 | |
| #include <string.h>
 | |
| #include <unistd.h>
 | |
| #include <fcntl.h>
 | |
| #include <errno.h>
 | |
| #include <sys/time.h>
 | |
| #include <hamlib/rig.h>
 | |
| #include "../src/misc.h"
 | |
| #include <termios.h>
 | |
| #include <unistd.h>
 | |
| 
 | |
| 
 | |
| #define BUFSIZE 256
 | |
| #define X25
 | |
| 
 | |
| int civ_731_mode = 0;
 | |
| vfo_t current_vfo = RIG_VFO_A;
 | |
| int split = 0;
 | |
| 
 | |
| // we make B different from A to ensure we see a difference at startup
 | |
| float freqA = 14074000;
 | |
| float freqB = 14074500;
 | |
| mode_t modeA = RIG_MODE_PKTUSB;
 | |
| mode_t modeB = RIG_MODE_PKTUSB;
 | |
| int datamodeA = 0;
 | |
| int datamodeB = 0;
 | |
| pbwidth_t widthA = 0;
 | |
| pbwidth_t widthB = 1;
 | |
| ant_t ant_curr = 0;
 | |
| int ant_option = 0;
 | |
| int ptt = 0;
 | |
| int satmode = 0;
 | |
| int agc_time = 1;
 | |
| int ovf_status = 0;
 | |
| int powerstat = 1;
 | |
| int datamode = 0;
 | |
| int keyspd = 130; // 130=20WPM
 | |
| int ipp = 0;
 | |
| int tx_inhibit = 0;
 | |
| int dpp = 0;
 | |
| 
 | |
| void dumphex(const unsigned char *buf, int n)
 | |
| {
 | |
|     for (int i = 0; i < n; ++i) { printf("%02x ", buf[i]); }
 | |
| 
 | |
|     printf("\n");
 | |
| }
 | |
| 
 | |
| int
 | |
| frameGet(int fd, unsigned char *buf)
 | |
| {
 | |
|     int i = 0;
 | |
|     memset(buf, 0, BUFSIZE);
 | |
|     unsigned char c;
 | |
| 
 | |
| again:
 | |
| 
 | |
|     while (read(fd, &c, 1) > 0)
 | |
|     {
 | |
|         buf[i++] = c;
 | |
|         //printf("i=%d, c=0x%02x\n",i,c);
 | |
| 
 | |
|         if (c == 0xfd)
 | |
|         {
 | |
|             dumphex(buf, i);
 | |
|             return i;
 | |
|         }
 | |
| 
 | |
|         if (i > 2 && c == 0xfe)
 | |
|         {
 | |
|             printf("Turning power on due to 0xfe string\n");
 | |
|             powerstat = 1;
 | |
|             int j;
 | |
| 
 | |
|             for (j = i; j < 175; ++j)
 | |
|             {
 | |
|                 if (read(fd, &c, 1) < 0) { break; }
 | |
|             }
 | |
| 
 | |
|             i = 0;
 | |
|             goto again;
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     printf("Error %s\n", strerror(errno));
 | |
| 
 | |
|     return 0;
 | |
| }
 | |
| 
 | |
| void frameParse(int fd, unsigned char *frame, int len)
 | |
| {
 | |
|     double freq;
 | |
|     int n = 0;
 | |
| 
 | |
|     if (len == 0)
 | |
|     {
 | |
|         printf("%s: len==0\n", __func__);
 | |
|         return;
 | |
|     }
 | |
| 
 | |
|     dumphex(frame, len);
 | |
| 
 | |
|     if (frame[0] != 0xfe && frame[1] != 0xfe)
 | |
|     {
 | |
|         printf("expected fe fe, got ");
 | |
|         dumphex(frame, len);
 | |
|         return;
 | |
|     }
 | |
| 
 | |
|     switch (frame[4])
 | |
|     {
 | |
|     case 0x03:
 | |
| 
 | |
|         //from_bcd(frameackbuf[2], (civ_731_mode ? 4 : 5) * 2);
 | |
|         if (current_vfo == RIG_VFO_A || current_vfo == RIG_VFO_MAIN)
 | |
|         {
 | |
|             printf("get_freqA\n");
 | |
|             to_bcd(&frame[5], (long long)freqA, (civ_731_mode ? 4 : 5) * 2);
 | |
|         }
 | |
|         else
 | |
|         {
 | |
|             printf("get_freqB\n");
 | |
|             to_bcd(&frame[5], (long long)freqB, (civ_731_mode ? 4 : 5) * 2);
 | |
|         }
 | |
| 
 | |
|         frame[10] = 0xfd;
 | |
| 
 | |
|         if (powerstat)
 | |
|         {
 | |
|             n = write(fd, frame, 11);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|         }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x04:
 | |
|         if (current_vfo == RIG_VFO_A || current_vfo == RIG_VFO_MAIN)
 | |
|         {
 | |
|             printf("get_modeA\n");
 | |
|             frame[5] = modeA;
 | |
|             frame[6] = widthA;
 | |
|         }
 | |
|         else
 | |
|         {
 | |
|             printf("get_modeB\n");
 | |
|             frame[5] = modeB;
 | |
|             frame[6] = widthB;
 | |
|         }
 | |
| 
 | |
|         frame[7] = 0xfd;
 | |
|         n = write(fd, frame, 8);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x05:
 | |
|         freq = from_bcd(&frame[5], (civ_731_mode ? 4 : 5) * 2);
 | |
|         printf("set_freq to %.0f\n", freq);
 | |
| 
 | |
|         if (current_vfo == RIG_VFO_A || current_vfo == RIG_VFO_MAIN) { freqA = freq; }
 | |
|         else { freqB = freq; }
 | |
| 
 | |
|         frame[4] = 0xfb;
 | |
|         frame[5] = 0xfd;
 | |
|         n = write(fd, frame, 6);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x06:
 | |
|         if (current_vfo == RIG_VFO_A || current_vfo == RIG_VFO_MAIN) { modeA = frame[6]; }
 | |
|         else { modeB = frame[6]; }
 | |
| 
 | |
|         frame[4] = 0xfb;
 | |
|         frame[5] = 0xfd;
 | |
|         n = write(fd, frame, 6);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x07:
 | |
| 
 | |
|         switch (frame[5])
 | |
|         {
 | |
|         case 0x00: current_vfo = RIG_VFO_A; break;
 | |
| 
 | |
|         case 0x01: current_vfo = RIG_VFO_B; break;
 | |
| 
 | |
|         case 0xd0: current_vfo = RIG_VFO_MAIN; break;
 | |
| 
 | |
|         case 0xd1: current_vfo = RIG_VFO_SUB; break;
 | |
|         }
 | |
| 
 | |
|         printf("set_vfo to %s\n", rig_strvfo(current_vfo));
 | |
| 
 | |
|         frame[4] = 0xfb;
 | |
|         frame[5] = 0xfd;
 | |
|         n = write(fd, frame, 6);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x0f:
 | |
|         if (frame[5] == 0) { split = 0; }
 | |
|         else if (frame[5] == 1) { split = 1; }
 | |
|         else { frame[6] = split; }
 | |
| 
 | |
|         if (frame[5] == 0xfd)
 | |
|         {
 | |
|             printf("get split %d\n", 1);
 | |
|             frame[7] = 0xfd;
 | |
|             n = write(fd, frame, 8);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|         }
 | |
|         else
 | |
|         {
 | |
|             printf("set split %d\n", 1);
 | |
|             frame[4] = 0xfb;
 | |
|             frame[5] = 0xfd;
 | |
|             n = write(fd, frame, 6);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|         }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x12: // we're simulating the 3-byte version -- not the 2-byte
 | |
|         if (frame[5] != 0xfd)
 | |
|         {
 | |
|             printf("Set ant %d\n", -1);
 | |
|             ant_curr = frame[5];
 | |
|             ant_option = frame[6];
 | |
|             dump_hex(frame, 8);
 | |
|         }
 | |
|         else
 | |
|         {
 | |
|             printf("Get ant\n");
 | |
|         }
 | |
| 
 | |
|         frame[5] = ant_curr;
 | |
|         frame[6] = ant_option;
 | |
|         frame[7] = 0xfd;
 | |
|         printf("write 8 bytes\n");
 | |
|         dump_hex(frame, 8);
 | |
|         n = write(fd, frame, 8);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x14:
 | |
|         printf("******** 0x14 received frame[5]=0x%02x\n", frame[5]);
 | |
| 
 | |
|         switch (frame[5])
 | |
|         {
 | |
|             static int power_level = 0;
 | |
| 
 | |
|         case 0x07:
 | |
|         case 0x08:
 | |
|             if (frame[6] != 0xfd)
 | |
|             {
 | |
|                 frame[6] = 0xfb;
 | |
|                 dumphex(frame, 7);
 | |
|                 n = write(fd, frame, 7);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|                 printf("ACK x14 x08\n");
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 to_bcd(&frame[6], (long long)128, 2);
 | |
|                 frame[8] = 0xfb;
 | |
|                 dumphex(frame, 9);
 | |
|                 n = write(fd, frame, 9);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|                 printf("SEND x14 x08\n");
 | |
|             }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         case 0x0a:
 | |
|             printf("Using power level %d\n", power_level);
 | |
|             power_level += 10;
 | |
| 
 | |
|             if (power_level > 250) { power_level = 0; }
 | |
| 
 | |
|             to_bcd(&frame[6], (long long)power_level, 2);
 | |
|             frame[8] = 0xfd;
 | |
|             n = write(fd, frame, 9);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         case 0x0c:
 | |
|             if (frame[6] != 0xfd)
 | |
|             {
 | |
|                 keyspd = frame[5];
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 frame[6] = keyspd;
 | |
|                 frame[7] = 0xfd;
 | |
|                 n = write(fd, frame, 8);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         default:
 | |
|             printf("*********** NAK\n");
 | |
|             frame[5] = 0xfa;
 | |
|             frame[6] = 0xfd;
 | |
|             n = write(fd, frame, 7);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|             break;
 | |
|         }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x15:
 | |
|         switch (frame[5])
 | |
|         {
 | |
|             static int meter_level = 0;
 | |
| 
 | |
|         case 0x07:
 | |
|             frame[6] = ovf_status;
 | |
|             frame[7] = 0xfd;
 | |
|             n = write(fd, frame, 8);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|             ovf_status = ovf_status == 0 ? 1 : 0;
 | |
|             break;
 | |
| 
 | |
|         case 0x11:
 | |
|             printf("Using meter level %d\n", meter_level);
 | |
|             meter_level += 10;
 | |
| 
 | |
|             if (meter_level > 250) { meter_level = 0; }
 | |
| 
 | |
|             to_bcd(&frame[6], (long long)meter_level, 2);
 | |
|             frame[8] = 0xfd;
 | |
|             n = write(fd, frame, 9);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         default:
 | |
|             frame[5] = 0xfa;
 | |
|             frame[6] = 0xfd;
 | |
|             n = write(fd, frame, 7);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         }
 | |
| 
 | |
|     case 0x16:
 | |
|         switch (frame[5])
 | |
|         {
 | |
|         case 0x5a:
 | |
|             if (frame[6] == 0xfd)
 | |
|             {
 | |
|                 satmode = frame[6];
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 frame[6] = satmode;
 | |
|                 frame[7] = 0xfd;
 | |
|                 n = write(fd, frame, 8);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         case 0x65:
 | |
|             if (frame[6] == 0xfd)
 | |
|             {
 | |
|                 ipp = frame[6];
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 frame[6] = ipp;
 | |
|                 frame[7] = 0xfd;
 | |
|                 n = write(fd, frame, 8);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         case 0x66:
 | |
|             if (frame[6] == 0xfd)
 | |
|             {
 | |
|                 tx_inhibit = frame[6];
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 frame[6] = tx_inhibit;
 | |
|                 frame[7] = 0xfd;
 | |
|                 n = write(fd, frame, 8);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         case 0x67:
 | |
|             if (frame[6] == 0xfd)
 | |
|             {
 | |
|                 dpp = frame[6];
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 frame[6] = dpp;
 | |
|                 frame[7] = 0xfd;
 | |
|                 n = write(fd, frame, 8);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
| 
 | |
|             break;
 | |
|         }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x18: // miscellaneous things
 | |
|         frame[5] = 1;
 | |
|         frame[6] = 0xfd;
 | |
|         n = write(fd, frame, 7);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x19: // miscellaneous things
 | |
|         frame[5] = 0x94;
 | |
|         frame[6] = 0xfd;
 | |
|         n = write(fd, frame, 7);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x1a: // miscellaneous things
 | |
|         switch (frame[5])
 | |
|         {
 | |
|         case 0x03:  // width
 | |
|             if (current_vfo == RIG_VFO_A || current_vfo == RIG_VFO_MAIN) { frame[6] = widthA; }
 | |
|             else { frame[6] = widthB; }
 | |
| 
 | |
|             frame[7] = 0xfd;
 | |
|             n = write(fd, frame, 8);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         case 0x04: // AGC TIME
 | |
|             printf("frame[6]==x%02x, frame[7]=0%02x\n", frame[6], frame[7]);
 | |
| 
 | |
|             if (frame[6] == 0xfd)   // the we are reading
 | |
|             {
 | |
|                 frame[6] = agc_time;
 | |
|                 frame[7] = 0xfd;
 | |
|                 n = write(fd, frame, 8);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 printf("AGC_TIME RESPONSE******************************");
 | |
|                 agc_time = frame[6];
 | |
|                 frame[4] = 0xfb;
 | |
|                 frame[5] = 0xfd;
 | |
|                 n = write(fd, frame, 6);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         case 0x06: // satmode
 | |
|             if (frame[6] == 0xfd) // then we are reading
 | |
|             {
 | |
|                 frame[6] = datamode;
 | |
|                 frame[7] = 0xfd;
 | |
|                 n = write(fd, frame, 8);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 datamode = frame[6];
 | |
|                 frame[4] = 0xfd;
 | |
|                 frame[5] = 0xfd;
 | |
|                 n = write(fd, frame, 6);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         case 0x07: // satmode
 | |
|             frame[4] = 0;
 | |
|             frame[7] = 0xfd;
 | |
|             n = write(fd, frame, 8);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x1c:
 | |
|         switch (frame[5])
 | |
|         {
 | |
|         case 0:
 | |
|             if (frame[6] == 0xfd)
 | |
|             {
 | |
|                 frame[6] = ptt;
 | |
|                 frame[7] = 0xfd;
 | |
|                 n = write(fd, frame, 8);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 ptt = frame[6];
 | |
|                 frame[7] = 0xfb;
 | |
|                 frame[8] = 0xfd;
 | |
|                 n = write(fd, frame, 9);
 | |
| 
 | |
|                 if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|             }
 | |
| 
 | |
|             break;
 | |
| 
 | |
|         }
 | |
| 
 | |
|         break;
 | |
| 
 | |
| 
 | |
| #ifdef X25
 | |
| 
 | |
|     case 0x25:
 | |
|         if (frame[6] == 0xfd)
 | |
|         {
 | |
|             if (frame[5] == 0x00)
 | |
|             {
 | |
|                 to_bcd(&frame[6], (long long)freqA, (civ_731_mode ? 4 : 5) * 2);
 | |
|                 printf("X25 get_freqA=%.0f\n", freqA);
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 to_bcd(&frame[6], (long long)freqB, (civ_731_mode ? 4 : 5) * 2);
 | |
|                 printf("X25 get_freqB=%.0f\n", freqB);
 | |
|             }
 | |
| 
 | |
|             frame[11] = 0xfd;
 | |
| #if 0 // async frame
 | |
|             unsigned char frame2[11];
 | |
| 
 | |
|             frame2[0] = 0xfe;
 | |
|             frame2[1] = 0xfe;
 | |
|             frame2[2] = 0x00; // send transceive frame
 | |
|             frame2[3] = frame[3]; // send transceive frame
 | |
|             frame2[4] = 0x00;
 | |
|             frame2[5] = 0x70;
 | |
|             frame2[6] = 0x28;
 | |
|             frame2[7] = 0x57;
 | |
|             frame2[8] = 0x03;
 | |
|             frame2[9] = 0x00;
 | |
|             frame2[10] = 0xfd;
 | |
|             n = write(fd, frame2, 11);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
| #else
 | |
|             n = write(fd, frame, 12);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
| #endif
 | |
| 
 | |
|         }
 | |
|         else
 | |
|         {
 | |
|             freq = from_bcd(&frame[6], (civ_731_mode ? 4 : 5) * 2);
 | |
|             printf("set_freq to %.0f\n", freq);
 | |
| 
 | |
|             if (frame[5] == 0x00) { freqA = freq; }
 | |
|             else { freqB = freq; }
 | |
| 
 | |
|             frame[4] = 0xfb;
 | |
|             frame[5] = 0xfd;
 | |
|             n = write(fd, frame, 6);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|             // send async frame
 | |
|             frame[2] = 0x00; // async freq
 | |
|             frame[3] = 0xa2;
 | |
|             frame[4] = 0x00;
 | |
|             frame[5] = 0x00;
 | |
|             frame[6] = 0x10;
 | |
|             frame[7] = 0x01;
 | |
|             frame[8] = 0x96;
 | |
|             frame[9] = 0x12;
 | |
|             frame[10] = 0xfd;
 | |
|             n = write(fd, frame, 11);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|         }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x26:
 | |
|         for (int i = 0; i < 6; ++i) { printf("%02x:", frame[i]); }
 | |
| 
 | |
|         if (frame[6] == 0xfd) // then a query
 | |
|         {
 | |
|             for (int i = 0; i < 6; ++i) { printf("%02x:", frame[i]); }
 | |
| 
 | |
|             frame[6] = frame[5] == 0 ? modeA : modeB;
 | |
|             frame[7] = frame[5] == 0 ? datamodeA : datamodeB;
 | |
|             frame[8] = 0xfb;
 | |
|             frame[9] = 0xfd;
 | |
|             n = write(fd, frame, 10);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|         }
 | |
|         else
 | |
|         {
 | |
|             for (int i = 0; i < 12; ++i) { printf("%02x:", frame[i]); }
 | |
| 
 | |
|             if (frame[6] == 0)
 | |
|             {
 | |
|                 modeA = frame[7];
 | |
|                 datamodeA = frame[8];
 | |
|             }
 | |
|             else
 | |
|             {
 | |
|                 modeB = frame[7];
 | |
|                 datamodeB = frame[8];
 | |
|             }
 | |
| 
 | |
|             frame[4] = 0xfb;
 | |
|             frame[5] = 0xfd;
 | |
|             n = write(fd, frame, 6);
 | |
| 
 | |
|             if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
|         }
 | |
| 
 | |
|         printf("\n");
 | |
|         break;
 | |
| #else
 | |
| 
 | |
|     case 0x25:
 | |
|         printf("x25 send nak\n");
 | |
|         frame[4] = 0xfa;
 | |
|         frame[5] = 0xfd;
 | |
|         n = write(fd, frame, 6);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| 
 | |
|     case 0x26:
 | |
|         printf("x26 send nak\n");
 | |
|         frame[4] = 0xfa;
 | |
|         frame[5] = 0xfd;
 | |
|         n = write(fd, frame, 6);
 | |
| 
 | |
|         if (n <= 0) { fprintf(stderr, "%s(%d) write error %s\n", __func__, __LINE__, strerror(errno)); }
 | |
| 
 | |
|         break;
 | |
| #endif
 | |
| 
 | |
|     default: printf("cmd 0x%02x unknown\n", frame[4]);
 | |
|     }
 | |
| 
 | |
|     if (n == 0) { printf("Write failed=%s\n", strerror(errno)); }
 | |
| 
 | |
| // don't care about the rig type yet
 | |
| 
 | |
| }
 | |
| 
 | |
| #if defined(WIN32) || defined(_WIN32)
 | |
| int openPort(char *comport) // doesn't matter for using pts devices
 | |
| {
 | |
|     int fd;
 | |
|     fd = open(comport, O_RDWR);
 | |
| 
 | |
|     if (fd < 0)
 | |
|     {
 | |
|         perror(comport);
 | |
|     }
 | |
| 
 | |
|     return fd;
 | |
| }
 | |
| 
 | |
| #else
 | |
| int openPort(char *comport) // doesn't matter for using pts devices
 | |
| {
 | |
|     int fd = posix_openpt(O_RDWR);
 | |
|     char *name = ptsname(fd);
 | |
| 
 | |
|     if (name == NULL)
 | |
|     {
 | |
|         perror("pstname");
 | |
|         return -1;
 | |
|     }
 | |
| 
 | |
|     printf("name=%s\n", name);
 | |
| 
 | |
|     if (fd == -1 || grantpt(fd) == -1 || unlockpt(fd) == -1)
 | |
|     {
 | |
|         perror("posix_openpt");
 | |
|         return -1;
 | |
|     }
 | |
| 
 | |
|     return fd;
 | |
| }
 | |
| #endif
 | |
| 
 | |
| void rigStatus()
 | |
| {
 | |
|     char vfoa = current_vfo == RIG_VFO_A ? '*' : ' ';
 | |
|     char vfob = current_vfo == RIG_VFO_B ? '*' : ' ';
 | |
|     printf("%cVFOA: mode=%d datamode=%d width=%ld freq=%.0f\n", vfoa, modeA,
 | |
|            datamodeA,
 | |
|            widthA,
 | |
|            freqA);
 | |
|     printf("%cVFOB: mode=%d datamode=%d width=%ld freq=%.0f\n", vfob, modeB,
 | |
|            datamodeB,
 | |
|            widthB,
 | |
|            freqB);
 | |
| }
 | |
| 
 | |
| int main(int argc, char **argv)
 | |
| {
 | |
|     unsigned char buf[256];
 | |
|     int fd = openPort(argv[1]);
 | |
| 
 | |
|     printf("%s: %s\n", argv[0], rig_version());
 | |
| #ifdef X25
 | |
|     printf("x25/x26 command recognized\n");
 | |
| #else
 | |
|     printf("x25/x26 command rejected\n");
 | |
| #endif
 | |
| #if defined(WIN32) || defined(_WIN32)
 | |
| 
 | |
|     if (argc != 2)
 | |
|     {
 | |
|         printf("Missing comport argument\n");
 | |
|         printf("%s [comport]\n", argv[0]);
 | |
|         exit(1);
 | |
|     }
 | |
| 
 | |
| #endif
 | |
| 
 | |
|     while (1)
 | |
|     {
 | |
|         int len = frameGet(fd, buf);
 | |
|         printf("#1 ========================================");
 | |
| 
 | |
|         if (len <= 0)
 | |
|         {
 | |
|             printf("#2 ========================================");
 | |
|             close(fd);
 | |
|             fd = openPort(argv[1]);
 | |
|         }
 | |
| 
 | |
|         if (powerstat)
 | |
|         {
 | |
|             frameParse(fd, buf, len);
 | |
|         }
 | |
|         else
 | |
|         {
 | |
|             hl_usleep(100 * 1000);
 | |
|         }
 | |
| 
 | |
|         printf("#3 ========================================");
 | |
|         rigStatus();
 | |
|         printf("#3 ========================================");
 | |
|     }
 | |
| 
 | |
|     return 0;
 | |
| }
 |