int main(int argc, char **argv)
{
FILE *fp_raw_data, *fp_raw_data2;
union ad_union amp_vvm[10], pha_vvm[10];
union ad_union amp_vvm2[10], pha_vvm2[10];
char command[35],file_name[80],file_name2[80],*cfreq,c;
int j, k, l, ant_scn, ant_scn2, ref_ant, n_size, n_start, offsetunit=0;
int antennas[11] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
long i, i_delay, n_delay;
int adc0_fd, adc1_fd, adc0_rd, adc1_rd, count;
int adc2_fd, adc3_fd, adc2_rd, adc3_rd;
int OFLAG;
int istatus,icount;
int amp_read[2000],phase_read[2000],truetime2ms[20000];
int amp_read2[2000],phase_read2[2000];
int ant;
time_t start_time,cur_time,Start_time,time1[2000],time2[2000],time3[2000],time4[2000];
float az_step, el_step, azoff, eloff, freq,az_bore,el_bore, az_bore2, el_bore2;
float az_off,el_off, az_ref, el_ref;
float contDet_a1[2], contDet_a2[2], contDet_ar[2];
float contDet1_a1, contDet1_a2, contDet1_ar;
double az_enc,el_enc,az_enc2, el_enc2;
double az_read[2000],el_read[2000], az_read2[2000], el_read2[2000];
int rm_status, antlist[RM_ARRAY_SIZE];/*variables for encoderClient*/
short currentAzoff, currentAzoff2;
short handshake;
struct tm ts;
double currentAzoffD;
unsigned short m1009,m1010;
smapoptContext optCon;
struct smapoptOption optionsTable[] = {
{"help",'h',SMAPOPT_ARG_NONE,0,'h'},
{"primary antenna",'a',SMAPOPT_ARG_INT,&ant_scn,'a'},
{"secondary antenna",'d',SMAPOPT_ARG_INT,&ant_scn2,'d'},
/* {"antennas", 'a', SMAPOPT_ARG_ANTENNAS, &antennas[0], 0, "Specify a list of antennas to move"},*/
{"refant",'r',SMAPOPT_ARG_INT,&ref_ant,'r'},
{"frequency",'f',SMAPOPT_ARG_STRING,&cfreq,'f'},
{"map_size",'m',SMAPOPT_ARG_INT,&n_size,'m'},
{"scan_speed",'s',SMAPOPT_ARG_INT,&offsetunit,'s'},
{"line_start",'l',SMAPOPT_ARG_INT,&n_start,'l'},
{NULL,0,0,NULL,0}
};
/* ant_scn=0;
ant_scn2=0;
for (ant = 0; ant < N_ANTENNAS; ant++){
printf ("antennas[ant] %d\n", antennas[ant]);
}
for (ant = 0; ant < N_ANTENNAS; ant++){
if (antennas[ant]){
printf("%d ", ant);
if (ant_scn == 0){
ant_scn = ant;
}
else {
ant_scn2 = ant;
}
}
}
*/
printf ("antennas: %d %d \n", ant_scn, ant_scn2);
/**********get command line arguments and initializations**************/
count=2; /* set how many counts we read from A/D board device */
n_start=0; /* start from the beginning as default setting */
if(argc<7) usage(-1,"Insufficient number of arguments","");
optCon = smapoptGetContext("holon", argc, argv, optionsTable,0);
while ((c = smapoptGetNextOpt(optCon)) >= 0) {
switch(c) {
case 'h':
usage(0,NULL,NULL);
break;
}
}
if(c<-1) {
fprintf(stderr, "%s: %s\n",
smapoptBadOption(optCon, SMAPOPT_BADOPTION_NOALIAS),
smapoptStrerror(c));
}
if(ant_scn<1||ant_scn>8)
{
printf("ant should be 1-8\n");
exit(0);
}
if(ref_ant<1||ref_ant>8)
{
printf("reference ant should be 1-8\n");
exit(0);
}
freq=atof(cfreq);
if(freq<50.0||freq>700.0)
{
printf("200 < freq < 700\n");
exit(0);
}
if(n_size<n_start)
{
printf("n_start is larger than n_size.\n");
exit(0);
}
if(offsetunit<1)
{
printf("scan_speed should be larger than 1.\n");
exit(0);
}
if(freq < 500.0) n_delay=(long) 8e7/offsetunit;
else n_delay=(long) 4e7/offsetunit;
az_step=7734.0/freq;el_step=az_step; /*23.3 for 332 GHz, and 33.3 for 232.4 GHz*/
printf("ant_scn=%d ref_ant=%d freq=%f size=%d scanspeed=%d n_delay=%ld step=%f\n",ant_scn,ref_ant,freq,n_size,offsetunit,n_delay,az_step);
/* Dual */
printf("ant_scn=%d ref_ant=%d freq=%f size=%d scanspeed=%d n_delay=%ld step=%f\n",ant_scn2,ref_ant,freq,n_size,offsetunit,n_delay,az_step);
azoff=0.; eloff=0.;
start_time = time(NULL);
ts = *localtime(&start_time);
sprintf(file_name, "/data/engineering/holo/ant%1d/%02d%02d_%02d%02d.holo%1d",ant_scn,ts.tm_mon+1,ts.tm_mday,ts.tm_hour,ts.tm_min,ant_scn);
printf("freq=%4.1fGHz grid=%4.1f:%4.1f filename %s\n",freq,az_step,el_step,file_name);
/* Dual */
sprintf(file_name2, "/data/engineering/holo/ant%1d/%02d%02d_%02d%02d.holo%1d",ant_scn2,ts.tm_mon+1,ts.tm_mday,ts.tm_hour,ts.tm_min,ant_scn2);
printf("freq=%4.1fGHz grid=%4.1f:%4.1f filename %s\n",freq,az_step,el_step,file_name2);
if(ant_scn==1){
if(freq < 500.0){
az_bore=AZ_BORE1;
el_bore=EL_BORE1;
}
else{
az_bore=AZ_BORE1H;
el_bore=EL_BORE1H;
}
}
if(ant_scn==2){
if(freq < 500.0){
az_bore=AZ_BORE2;
el_bore=EL_BORE2;
}
else{
az_bore=AZ_BORE2H;
el_bore=EL_BORE2H;
}
}
else if(ant_scn==3){
if(freq < 500.0){
az_bore=AZ_BORE3;
el_bore=EL_BORE3;
}
else{
az_bore=AZ_BORE3H;
el_bore=EL_BORE3H;
}
}
else if(ant_scn==4){
if(freq < 500.0){
az_bore=AZ_BORE4;
el_bore=EL_BORE4;
}
else{
az_bore=AZ_BORE4H;
el_bore=EL_BORE4H;
}
}
else if(ant_scn==5){
if(freq < 500.0){
az_bore=AZ_BORE5;
el_bore=EL_BORE5;
}
else{
az_bore=AZ_BORE5H;
el_bore=EL_BORE5H;
}
}
else if(ant_scn==6){
if(freq < 500.0){
az_bore=AZ_BORE6;
el_bore=EL_BORE6;
}
else{
az_bore=AZ_BORE6H;
el_bore=EL_BORE6H;
}
}
else if(ant_scn==7){
if(freq < 500.0){
az_bore=AZ_BORE7;
el_bore=EL_BORE7;
}
else{
az_bore=AZ_BORE7H;
el_bore=EL_BORE7H;
}
}
else if(ant_scn==8){
if(freq < 500.0){
az_bore=AZ_BORE8;
el_bore=EL_BORE8;
}
else{
az_bore=AZ_BORE8H;
el_bore=EL_BORE8H;
}
}
else if(ant_scn==0){ /* for debug */
az_bore=AZ_BORE0;
el_bore=EL_BORE0;
ant_scn=4;
}
/* Dual */
if(ant_scn2==1){
if(freq < 500.0){
az_bore2=AZ_BORE1;
el_bore2=EL_BORE1;
}
else{
az_bore2=AZ_BORE1H;
el_bore2=EL_BORE1H;
}
}
if(ant_scn2==2){
if(freq < 500.0){
az_bore2=AZ_BORE2;
el_bore2=EL_BORE2;
}
else{
az_bore2=AZ_BORE2H;
el_bore2=EL_BORE2H;
}
}
else if(ant_scn2==3){
if(freq < 500.0){
az_bore2=AZ_BORE3;
el_bore2=EL_BORE3;
}
else{
az_bore2=AZ_BORE3H;
el_bore2=EL_BORE3H;
}
}
else if(ant_scn2==4){
if(freq < 500.0){
az_bore2=AZ_BORE4;
el_bore2=EL_BORE4;
}
else{
az_bore2=AZ_BORE4H;
el_bore2=EL_BORE4H;
}
}
else if(ant_scn2==5){
if(freq < 500.0){
az_bore2=AZ_BORE5;
el_bore2=EL_BORE5;
}
else{
az_bore2=AZ_BORE5H;
el_bore2=EL_BORE5H;
}
}
else if(ant_scn2==6){
if(freq < 500.0){
az_bore2=AZ_BORE6;
el_bore2=EL_BORE6;
}
else{
az_bore2=AZ_BORE6H;
el_bore2=EL_BORE6H;
}
}
else if(ant_scn2==7){
if(freq < 500.0){
az_bore2=AZ_BORE7;
el_bore2=EL_BORE7;
}
else{
az_bore2=AZ_BORE7H;
el_bore2=EL_BORE7H;
}
}
else if(ant_scn2==8){
if(freq < 500.0){
az_bore2=AZ_BORE8;
el_bore2=EL_BORE8;
}
else{
az_bore2=AZ_BORE8H;
el_bore2=EL_BORE8H;
}
}
else if(ant_scn2==0){ /* for debug */
az_bore2=AZ_BORE0;
el_bore2=EL_BORE0;
ant_scn2=2;
}
/* Dual End */
if(ref_ant==1){
if(freq < 500.0){
az_ref=AZ_BORE1;
el_ref=EL_BORE1;
}
else{
az_ref=AZ_BORE1H;
el_ref=EL_BORE1H;
}
}
if(ref_ant==2){
if(freq < 500.0){
az_ref=AZ_BORE2;
el_ref=EL_BORE2;
}
else{
az_ref=AZ_BORE2H;
el_ref=EL_BORE2H;
}
}
else if(ref_ant==3){
if(freq < 500.0){
az_ref=AZ_BORE3;
el_ref=EL_BORE3;
}
else{
az_ref=AZ_BORE3H;
el_ref=EL_BORE3H;
}
}
else if(ref_ant==4){
if(freq < 500.0){
az_ref=AZ_BORE4;
el_ref=EL_BORE4;
}
else{
az_ref=AZ_BORE4H;
el_ref=EL_BORE4H;
}
}
else if(ref_ant==5){
if(freq < 500.0){
az_ref=AZ_BORE5;
el_ref=EL_BORE5;
}
else{
az_ref=AZ_BORE5H;
el_ref=EL_BORE5H;
}
}
else if(ref_ant==6){
if(freq < 500.0){
az_ref=AZ_BORE6;
el_ref=EL_BORE6;
}
else{
az_ref=AZ_BORE6H;
el_ref=EL_BORE6H;
}
}
else if(ref_ant==7){
if(freq < 500.0){
az_ref=AZ_BORE7;
el_ref=EL_BORE7;
}
else{
az_ref=AZ_BORE7H;
el_ref=EL_BORE7H;
}
}
else if(ref_ant==8){
if(freq < 500.0){
az_ref=AZ_BORE8;
el_ref=EL_BORE8;
}
else{
az_ref=AZ_BORE8H;
el_ref=EL_BORE8H;
}
}
else if(ref_ant==0){ /* for debug */
az_ref=AZ_BORE0;
el_ref=EL_BORE0;
ref_ant=5;
}
fp_raw_data = fopen(file_name,"w");
if(fp_raw_data==NULL){
printf("cannot open the data file\n");
exit(1);
}
/* Dual */
fp_raw_data2 = fopen(file_name2,"w");
if(fp_raw_data2==NULL){
printf("cannot open the data file 2\n");
exit(1);
}
/* End Dual */
/* initializing ref. mem. */
rm_status=rm_open(antlist);
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_open()");
exit(1);
}
/* configure for interrupt through RM */
rm_status=rm_monitor(ant_scn,"RM_HOLO_ENC_HNDSHK_S");
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_monitor()");
exit(1);
}
/* Dual */
rm_status=rm_monitor(ant_scn2,"RM_HOLO_ENC_HNDSHK_S");
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_monitor()");
exit(1);
}
/* */
printf("checking the encoderServer status\n");
handshake = 0;
rm_status=rm_write_notify(ant_scn,"RM_HOLO_ENC_HNDSHK_S",&handshake);
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_write_notify()");
exit(1);
}
sleep(1);
rm_status=rm_read(ant_scn,"RM_HOLO_ENC_HNDSHK_S",&handshake);
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_read()");
exit(1);
}
/* if (handshake==0)
{
printf("encoder Server is not running on acc%1d!\n",ant_scn);
exit(-1);
}
*/
/* Dual */
/* Should check encoderServer for ant_scn2 here */
/* open Device tables */
OFLAG=O_RDWR|O_NDELAY;
adc0_fd = open("/dev/xVME564-0", OFLAG, 0);
if(adc0_fd<0){printf("cannot open device 0\n");exit(1);}
adc1_fd = open("/dev/xVME564-1", OFLAG, 0);
if(adc1_fd<0){printf("cannot open device 1\n");exit(1);}
/* Dual */
adc2_fd = open("/dev/xVME564-2", OFLAG, 0);
if(adc2_fd<0){printf("cannot open device 0\n");exit(1);}
adc3_fd = open("/dev/xVME564-3", OFLAG, 0);
if(adc3_fd<0){printf("cannot open device 1\n");exit(1);}
/* */
/*********************Get the antenna ready for*************************/
/* go to starting position */
/* numbers for ant6 frozen in for now 30 Jul 2002
printf("frozen az_bore & el_bore for ant6\n");
az_bore=48.25;
el_bore=18.60; */
printf ("Going to bore-sight position \n");
sprintf(command, "azoff -a %d -s 0", ant_scn);
system (command);
sprintf(command, "eloff -a %d -s 0", ant_scn);
system (command);
sprintf(command, "azel -a %d -z %f -e %f", ref_ant, az_ref, el_ref);
printf ("command: %s \n", command);
system (command);
sprintf(command, "azel -a %d -z %f -e %f", ant_scn, az_bore, el_bore);
printf ("command: %s \n", command);
system (command);
sleep(1);
sprintf(command, "offsetUnit -a %d -s %d", ant_scn, -offsetunit);
printf ("command: %s \n", command);
system (command);
sleep(1);
sprintf(command, "resume -a %d", ant_scn);
system (command);
/* Dual */
printf ("Going to bore-sight position \n");
sprintf(command, "azoff -a %d -s 0", ant_scn2);
system (command);
sprintf(command, "eloff -a %d -s 0", ant_scn2);
system (command);
sprintf(command, "azel -a %d -z %f -e %f", ref_ant, az_ref, el_ref);
printf ("command: %s \n", command);
system (command);
sprintf(command, "azel -a %d -z %f -e %f", ant_scn2, az_bore2, el_bore2);
printf ("command: %s \n", command);
system (command);
sleep(1);
sprintf(command, "offsetUnit -a %d -s %d", ant_scn2, -offsetunit);
printf ("command: %s \n", command);
system (command);
sleep(1);
sprintf(command, "resume -a %d", ant_scn2);
system (command);
/* */
/* printf ("Make sure encoderServer is running on acc%1d.\n",ant_scn); */
/* Dual */
printf ("Make sure encoderServer is running on acc%1d and acc%1d\n",ant_scn,ant_scn2);
printf ("Hit Return to continue:");
fgetc(stdin);
printf ("Starting raster on antennas %d and %d\n", ant_scn, ant_scn2);
azoff=((float)n_size/2.+1.)*az_step;
eloff=((float)n_size/2.)*el_step - n_start*el_step;
/* sprintf(command, "azoff -a %d -s %f", ant_scn, azoff+offsetunit*3); */
/* Dual */
sprintf(command, "azoff -a %d,%d -s %f", ant_scn, ant_scn2,azoff+offsetunit*3);
/* */
printf ("command: %s ", command);
system (command);
sleep(1);
/* sprintf(command, "eloff -a %d -s %f", ant_scn, eloff); */
/* Dual */
sprintf(command, "eloff -a %d,%d -s %f", ant_scn, ant_scn2, eloff);
/* */
printf ("%s \n", command);
system (command);
sleep(5);
/* The following is from Bob's ttsubs.c main */
ttime.timeout_ticks = 2; /* This margin should be safe */
ttfd = open("/dev/vme_sg_simple", O_RDWR, 0);
if(ttfd <= 0) {
fprintf(stderr, "Error opening TrueTime - /dev/vme_sg_simple\n");
exit(SYSERR_RTN);
}
/*********************Start taking data*************************/
printf ("Start raster! \n");
start_time = time(NULL);
Start_time = start_time;
/* Elevation Loop */
for (j=n_start; j<n_size; j++){ /*do one row*/
sprintf(command, "azel -a %d -z %f -e %f", ref_ant, az_ref, el_ref);
printf ("%s \n", command);
system (command);
i=0;
currentAzoff=0;
start_time = time(NULL);
/* sprintf(command, "azscan -a %d", ant_scn);*/
/* Dual */
sprintf(command, "azscan -a %d,%d", ant_scn, ant_scn2);
/* */
printf ("%s \n", command);
sleep(1);
istatus=system (command);
printf("%6d %6d %6f\n",istatus,currentAzoff,azoff);
printf("%6d %6f \n",currentAzoff,azoff); fflush(stdout);
/* while((1.0*currentAzoff)>-azoff){ */
/* while((1.0*currentAzoff)>(-(azoff+offsetunit))){ */
/* Dual */
while(((1.0*currentAzoff)>(-(azoff+offsetunit)))||((1.0*currentAzoff2)>(-(azoff+offsetunit)))){
/* */
/* for (i_delay=1; i_delay<n_delay; i_delay++){} */ /* delay using GetPosTime() from ttsubs.c- using interrupts from TrueTime */
cur_time=time(NULL);
time1[i]=cur_time-Start_time;
GetPosTime();
/*
printf("Day %d, msec %d\n", day, msec);
*/
truetime2ms[i]=msec;
cur_time=time(NULL);
time2[i]=cur_time-Start_time;
adc0_rd=read(adc0_fd, amp_vvm[1].byte, count);
if(adc0_rd<=0){
printf("cannot read device 0\n");
exit(1);
close(adc0_fd);
close(adc1_fd);
}
/* Read total power values 10 May 2010 */
rm_status=rm_read(ant_scn,"RM_CONT_DET_MUWATT_V2_F",&contDet_a1);
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_read()");
exit(1);
}/*if end*/
rm_status=rm_read(ant_scn2,"RM_CONT_DET_MUWATT_V2_F",&contDet_a2);
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_read()");
exit(1);
}/*if end*/
rm_status=rm_read(ref_ant,"RM_CONT_DET_MUWATT_V2_F",&contDet_ar);
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_read()");
exit(1);
}/*if end*/
/* usleep(1); */
adc1_rd=read(adc1_fd, pha_vvm[1].byte, count);
if(adc1_rd<=0){
printf("cannot read device 1\n");
exit(1);
close(adc0_fd);
close(adc1_fd);
}
/* Dual */
adc2_rd=read(adc2_fd, amp_vvm2[1].byte, count);
if(adc2_rd<=0){
printf("cannot read device 2\n");
exit(1);
close(adc2_fd);
close(adc3_fd);
}
/* usleep(1); */
adc3_rd=read(adc3_fd, pha_vvm2[1].byte, count);
if(adc3_rd<=0){
printf("cannot read device 3\n");
exit(1);
close(adc2_fd);
close(adc3_fd);
}
/* End Dual */
cur_time=time(NULL);
time3[i]=cur_time-Start_time;
/* read encoders using encoderClient */
encoderClient(ant_scn,&az_enc,&el_enc,&m1009,&m1010);
/* printf("First read done\n %f %f %f\n", az_enc, el_enc, currentAzoffD); */
/* Dual */
encoderClient(ant_scn2,&az_enc2,&el_enc2,&m1009,&m1010);
/* printf("Second read done\n %f %f %f\n", az_enc2, el_enc2, currentAzoffD); */
/* */
cur_time=time(NULL);
time4[i]=cur_time-Start_time;
az_read[i]=az_enc;el_read[i]=el_enc;
amp_read[i]=amp_vvm[1].word;
phase_read[i]=pha_vvm[1].word;
/* Dual */
az_read2[i]=az_enc2;el_read2[i]=el_enc2;
amp_read2[i]=amp_vvm2[1].word;
phase_read2[i]=pha_vvm2[1].word;
/* End Dual */
/* adding time stamping of samples: 01 Nov 04 */
rm_status=rm_read(ant_scn,"RM_AZOFF_D",¤tAzoffD);
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_read()");
exit(1);
}/*if end*/
currentAzoff=(short)currentAzoffD;
/* Dual */
rm_status=rm_read(ant_scn2,"RM_AZOFF_D",¤tAzoffD);
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_read()");
exit(1);
}/*if end*/
currentAzoff2=(short)currentAzoffD;
/* End Dual */
/* printf("line# %3d %3d %4d %6.2f %6.2f %6.2f %5d %d\n",j,i,currentAzoff,azoff,az_enc,el_enc,amp_read[i],icount); fflush(stdout); */
i++;
}/*while end*/
/* sprintf(command, "stopScan -a %d", ant_scn); */
/* Dual */
sprintf(command, "stopScan -a %d,%d", ant_scn, ant_scn2);
/* */
system (command);
sleep(1);
printf ("command: %s \n", command);
/* system (command);
usleep(10); */
eloff = eloff - el_step;
/* sprintf(command, "eloff -a %d -s %f", ant_scn, eloff); */
/* Dual */
sprintf(command, "eloff -a %d,%d -s %f", ant_scn, ant_scn2, eloff);
/* */
system (command);
sleep(1);
printf ("command: %s ", command);fflush(stdout);
/* system (command);
usleep(10); */
/* sprintf(command, "azoff -a %d -s %f", ant_scn, azoff+offsetunit*3); */
/* Dual */
sprintf(command, "azoff -a %d,%d -s %f", ant_scn, ant_scn2, azoff+offsetunit*3);
/* */
system (command);
sleep(1);
printf ("command: %s ", command);fflush(stdout);
/* system (command); */
/* write out also the total powers 10 May 2010 */
for(k=1;k<i;k++){
fprintf(fp_raw_data,"%10.6f %10.6f %6d %6d %6.4f %3d %d %d %d %d %d\n" ,\
el_read[k],az_read[k],amp_read[k],phase_read[k],contDet_a1[0],j,time1[k],time2[k],time3[k],time4[k],truetime2ms[k]);
fflush(fp_raw_data);
}/*for end*/
/* Dual */
for(k=1;k<i;k++){
fprintf(fp_raw_data2,"%10.6f %10.6f %6d %6d %6.4f %3d %d %d %d %d %d\n" ,\
el_read2[k],az_read2[k],amp_read2[k],phase_read2[k],contDet_a2[0],j,time1[k],time2[k],time3[k],time4[k],truetime2ms[k]);
fflush(fp_raw_data2);
}/*for end*/
/* End Dual */
/* Place for including online dispaly command */
printf ("Flush the data\n");
cur_time=time(NULL);
printf ("%3dth line: Stop time: %d time taken: %d secs samples: %d\n", \
j, cur_time, cur_time-start_time, i);
sleep(4);
/* sprintf(command, "azoff -a %d -s %f", ant_scn, azoff);
printf ("command: %s ", command);fflush(stdout);
system (command);
usleep(10);
sprintf(command, "eloff -a %d -s %f", ant_scn, eloff);
printf ("command: %s ", command);fflush(stdout);
system (command);
usleep(10);*/
}
/* for end; El loop done */
printf ("Start: %d Stop: %d Time taken: %d secs\n", Start_time, cur_time, cur_time - Start_time);
/* sprintf(command, "azoff -a %d -s 0", ant_scn); */
/* Dual */
sprintf(command, "azoff -a %d,%d -s 0", ant_scn,ant_scn2);
/* */
system (command);
sleep(10);
printf ("command: %s ", command);
/* sprintf(command, "eloff -a %d -s 0", ant_scn); */
/* Dual */
sprintf(command, "eloff -a %d,%d -s 0", ant_scn,ant_scn2);
/* */
system (command);
sleep(10);
printf ("command: %s\n", command);
/*********************clear up everything*************************/
fclose(fp_raw_data);
close(adc0_fd);
close(adc1_fd);
/* Dual */
fclose(fp_raw_data2);
close(adc2_fd);
close(adc3_fd);
/* End Dual */
/* release the RM interrupt waiting */
rm_status=rm_clear_monitor();
if(rm_status != RM_SUCCESS) {
rm_error_message(rm_status,"rm_clear()");
}
printf ("DONE!\n");
exit(0);
} /* end main */
int main(int argc, char *argv[]) {
char c,command_n[30];
short pmac_command_flag=0;
int dsm_status;
smapoptContext optCon;
int i ;
int trackStatus=0;
int tracktimestamp,timestamp;
time_t dsmtimestamp;
struct smapoptOption optionsTable[] = {
{"help",'h',SMAPOPT_ARG_NONE,0,'h'},
{NULL,0,0,NULL,0}
};
optCon = smapoptGetContext("stop", argc, argv, optionsTable,0);
while ((c = smapoptGetNextOpt(optCon)) >= 0) {
switch(c) {
case 'h':
usage(0,NULL,NULL);
break;
}
}
for(i=0;i<30;i++) {
command_n[i]=0x0;
};
command_n[0]='@'; /* send the command */
pmac_command_flag=0;
if(c<-1) {
fprintf(stderr, "%s: %s\n",
smapoptBadOption(optCon, SMAPOPT_BADOPTION_NOALIAS),
smapoptStrerror(c));
}
smapoptFreeContext(optCon);
/* initializing DSM */
dsm_status=dsm_open();
if(dsm_status != DSM_SUCCESS) {
dsm_error_message(dsm_status,"dsm_open()");
exit(1);
}
#if 0
/* check if track is running on this antenna */
dsm_status=dsm_read(DSM_HOST,"DSM_UNIX_TIME_L",×tamp,&dsmtimestamp);
dsm_status=dsm_read(DSM_HOST,"DSM_TRACK_TIMESTAMP_L",&tracktimestamp,&dsmtimestamp);
if(abs(tracktimestamp-timestamp)>3L) {
trackStatus=0;
printf("Track is not running.\n");
}
if(abs(tracktimestamp-timestamp)<=3L) trackStatus=1;
if(trackStatus==1) {
dsm_status=dsm_write(DSM_HOST,"DSM_COMMANDED_TRACK_COMMAND_C30",
&command_n);
if(dsm_status != DSM_SUCCESS) {
dsm_error_message(dsm_status,"dsm_write()");
exit(1);
}
#endif
dsm_status=dsm_write(DSM_HOST,"DSM_COMMANDED_TRACK_COMMAND_C30",
&command_n);
if(dsm_status != DSM_SUCCESS) {
dsm_error_message(dsm_status,"dsm_write()");
exit(1);
}
/* the following dsm_write should actually be dsm_write_notify- but due
to a bug in gltTrack, dsm_write_notify does not work */
dsm_status=dsm_write(DSM_HOST,"DSM_COMMAND_FLAG_S",
&pmac_command_flag);
if(dsm_status != DSM_SUCCESS) {
dsm_error_message(dsm_status,"dsm_write()");
exit(1);
}
#if 0
} /* if track is running */
#endif
return 0;
}
