SVN r8748

2018-06-14 21:27:34 -04:00
parent 419c039d08
commit 4f1fe4fc94
581 changed files with 69338 additions and 39836 deletions
@@ -0,0 +1,172 @@
+#include "logqso.h"
+
+#include <QString>
+#include <QSettings>
+#include <QStandardPaths>
+#include <QDir>
+#include <QDebug>
+#include <QUdpSocket>
+
+#include "logbook/adif.h"
+#include "MessageBox.hpp"
+#include "Configuration.hpp"
+#include "Bands.hpp"
+#include "MaidenheadLocatorValidator.hpp"
+
+#include "ui_logqso.h"
+#include "moc_logqso.cpp"
+
+LogQSO::LogQSO(QString const& programTitle, QSettings * settings
+               , Configuration const * config, QWidget *parent)
+  : QDialog {parent, Qt::WindowStaysOnTopHint | Qt::WindowTitleHint | Qt::WindowSystemMenuHint}
+  , ui(new Ui::LogQSO)
+  , m_settings (settings)
+  , m_config {config}
+{
+  ui->setupUi(this);
+  setWindowTitle(programTitle + " - Log QSO");
+  loadSettings ();
+  ui->grid->setValidator (new MaidenheadLocatorValidator {this});
+}
+
+LogQSO::~LogQSO ()
+{
+}
+
+void LogQSO::loadSettings ()
+{
+  m_settings->beginGroup ("LogQSO");
+  restoreGeometry (m_settings->value ("geometry", saveGeometry ()).toByteArray ());
+  ui->cbTxPower->setChecked (m_settings->value ("SaveTxPower", false).toBool ());
+  ui->cbComments->setChecked (m_settings->value ("SaveComments", false).toBool ());
+  m_txPower = m_settings->value ("TxPower", "").toString ();
+  m_comments = m_settings->value ("LogComments", "").toString();
+  m_settings->endGroup ();
+}
+
+void LogQSO::storeSettings () const
+{
+  m_settings->beginGroup ("LogQSO");
+  m_settings->setValue ("geometry", saveGeometry ());
+  m_settings->setValue ("SaveTxPower", ui->cbTxPower->isChecked ());
+  m_settings->setValue ("SaveComments", ui->cbComments->isChecked ());
+  m_settings->setValue ("TxPower", m_txPower);
+  m_settings->setValue ("LogComments", m_comments);
+  m_settings->endGroup ();
+}
+
+void LogQSO::initLogQSO(QString const& hisCall, QString const& hisGrid, QString mode,
+                        QString const& rptSent, QString const& rptRcvd,
+                        QDateTime const& dateTimeOn, QDateTime const& dateTimeOff,
+                        Radio::Frequency dialFreq, QString const& myCall, QString const& myGrid,
+                        bool noSuffix, bool toRTTY, bool dBtoComments, bool bFox, QString const& opCall)
+{
+  if(!isHidden()) return;
+  ui->call->setText(hisCall);
+  ui->grid->setText(hisGrid);
+  ui->name->setText("");
+  ui->txPower->setText("");
+  ui->comments->setText("");
+  if (ui->cbTxPower->isChecked ()) ui->txPower->setText(m_txPower);
+  if (ui->cbComments->isChecked ()) ui->comments->setText(m_comments);
+  if(dBtoComments) {
+    QString t=mode;
+    if(rptSent!="") t+="  Sent: " + rptSent;
+    if(rptRcvd!="") t+="  Rcvd: " + rptRcvd;
+    ui->comments->setText(t);
+  }
+  if(noSuffix and mode.mid(0,3)=="JT9") mode="JT9";
+  if(toRTTY and mode.mid(0,3)=="JT9") mode="RTTY";
+  ui->mode->setText(mode);
+  ui->sent->setText(rptSent);
+  ui->rcvd->setText(rptRcvd);
+  ui->start_date_time->setDateTime (dateTimeOn);
+  ui->end_date_time->setDateTime (dateTimeOff);
+  m_dialFreq=dialFreq;
+  m_myCall=myCall;
+  m_myGrid=myGrid;
+  ui->band->setText (m_config->bands ()->find (dialFreq));
+  ui->loggedOperator->setText(opCall);
+  if(bFox) {
+    accept();
+  } else {
+    show ();
+  }
+}
+
+void LogQSO::accept()
+{
+  QString hisCall,hisGrid,mode,rptSent,rptRcvd,dateOn,dateOff,timeOn,timeOff,band,operator_call;
+  QString comments,name;
+
+  hisCall=ui->call->text();
+  hisGrid=ui->grid->text();
+  mode=ui->mode->text();
+  rptSent=ui->sent->text();
+  rptRcvd=ui->rcvd->text();
+  m_dateTimeOn = ui->start_date_time->dateTime ();
+  m_dateTimeOff = ui->end_date_time->dateTime ();
+  band=ui->band->text();
+  name=ui->name->text();
+  m_txPower=ui->txPower->text();
+  comments=ui->comments->text();
+  m_comments=comments;
+  QString strDialFreq(QString::number(m_dialFreq / 1.e6,'f',6));
+  operator_call = ui->loggedOperator->text();
+  //Log this QSO to ADIF file "wsjtx_log.adi"
+  QString filename = "wsjtx_log.adi";  // TODO allow user to set
+  ADIF adifile;
+  auto adifilePath = QDir {QStandardPaths::writableLocation (QStandardPaths::DataLocation)}.absoluteFilePath ("wsjtx_log.adi");
+  adifile.init(adifilePath);
+
+  QByteArray ADIF {adifile.QSOToADIF (hisCall, hisGrid, mode, rptSent, rptRcvd, m_dateTimeOn, m_dateTimeOff, band
+                                      , comments, name, strDialFreq, m_myCall, m_myGrid, m_txPower, operator_call)};
+  if (!adifile.addQSOToFile (ADIF))
+  {
+    MessageBox::warning_message (this, tr ("Log file error"),
+                                 tr ("Cannot open \"%1\"").arg (adifilePath));
+  }
+
+  // Log to N1MM Logger
+  if (m_config->broadcast_to_n1mm() && m_config->valid_n1mm_info())  {
+    const QHostAddress n1mmhost = QHostAddress(m_config->n1mm_server_name());
+    QUdpSocket _sock;
+    auto rzult = _sock.writeDatagram (ADIF + " <eor>", n1mmhost, quint16(m_config->n1mm_server_port()));
+    if (rzult == -1) {
+      MessageBox::warning_message (this, tr ("Error sending log to N1MM"),
+                                   tr ("Write returned \"%1\"").arg (rzult));
+    }
+  }
+
+//Log this QSO to file "wsjtx.log"
+  static QFile f {QDir {QStandardPaths::writableLocation (QStandardPaths::DataLocation)}.absoluteFilePath ("wsjtx.log")};
+  if(!f.open(QIODevice::Text | QIODevice::Append)) {
+    MessageBox::warning_message (this, tr ("Log file error"),
+                                 tr ("Cannot open \"%1\" for append").arg (f.fileName ()),
+                                 tr ("Error: %1").arg (f.errorString ()));
+  } else {
+    QString logEntry=m_dateTimeOn.date().toString("yyyy-MM-dd,") +
+      m_dateTimeOn.time().toString("hh:mm:ss,") +
+      m_dateTimeOff.date().toString("yyyy-MM-dd,") +
+      m_dateTimeOff.time().toString("hh:mm:ss,") + hisCall + "," +
+      hisGrid + "," + strDialFreq + "," + mode +
+      "," + rptSent + "," + rptRcvd + "," + m_txPower +
+      "," + comments + "," + name;
+    QTextStream out(&f);
+    out << logEntry << endl;
+    f.close();
+  }
+
+//Clean up and finish logging
+  Q_EMIT acceptQSO (m_dateTimeOff, hisCall, hisGrid, m_dialFreq, mode, rptSent, rptRcvd, m_txPower, comments, name,m_dateTimeOn, operator_call, m_myCall, m_myGrid, ADIF);
+  QDialog::accept();
+}
+
+// closeEvent is only called from the system menu close widget for a
+// modeless dialog so we use the hideEvent override to store the
+// window settings
+void LogQSO::hideEvent (QHideEvent * e)
+{
+  storeSettings ();
+  QDialog::hideEvent (e);
+}
@@ -0,0 +1,70 @@
+subroutine genwsprcpm(msg,msgsent,itone)
+
+! Encode a WSPRCPM message, producing array itone().
+!  
+  use crc
+  include 'wsprcpm_params.f90'
+
+  character*22 msg,msgsent
+  character*64 cbits
+  character*32 sbits
+  integer      iuniqueword0
+  integer*1,target :: idat(9)
+  integer*1 msgbits(68),codeword(ND)
+  logical first
+  integer icw(ND)
+  integer id(NS+ND)
+  integer jd(NS+ND)
+  integer ipreamble(16)                      !Freq estimation preamble
+  integer isync(200)                          !Long sync vector
+  integer itone(NN)
+  data ipreamble/1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1/
+  data first/.true./
+  data iuniqueword0/z'30C9E8AD'/
+  save first,isync,ipreamble
+
+  if(first) then
+    write(sbits,'(b32.32)') iuniqueword0
+    read(sbits,'(32i1)') isync(1:32)
+    read(sbits,'(32i1)') isync(33:64)
+    read(sbits,'(32i1)') isync(65:96)
+    read(sbits,'(32i1)') isync(97:128)
+    read(sbits,'(32i1)') isync(129:160)
+    read(sbits,'(32i1)') isync(161:192)
+    read(sbits,'(8i1)') isync(193:200)
+    first=.false.
+  endif
+
+  idat=0
+  call wqencode(msg,ntype0,idat)             !Source encoding
+  id7=idat(7)
+  if(id7.lt.0) id7=id7+256
+  id7=id7/64
+write(*,*) 'idat ',idat
+  icrc=crc14(c_loc(idat),9)  
+write(*,*) 'icrc: ',icrc
+write(*,'(a6,b16.16)') 'icrc: ',icrc
+  call wqdecode(idat,msgsent,itype)
+  print*,msgsent,itype
+  write(cbits,1004) idat(1:6),id7,iand(icrc,z'3FFF')
+1004 format(6b8.8,b2.2,b14.14)
+  msgbits=0
+  read(cbits,1006) msgbits(1:64)
+1006 format(64i1)
+
+write(*,'(50i1,1x,14i1,1x,4i1)') msgbits
+
+  call encode204(msgbits,codeword)      !Encode the test message
+
+! Message structure:
+! d100 p16 d100 
+  itone(1:100)=isync(1:100)+2*codeword(1:100)
+  itone(101:116)=ipreamble+1
+  itone(117:216)=isync(101:200)+2*codeword(101:200)
+  itone=2*itone-3
+  do i=1,216
+    write(*,*) i,itone(i)
+  enddo
+
+  return
+end subroutine genwsprcpm