From 72e8ee4e0a4c333603fc73fda23ce412b01e46cd Mon Sep 17 00:00:00 2001
From: Andreas <andreask@online.no>
Date: Sat, 14 Nov 2020 19:50:27 +0100
Subject: [PATCH] [Adif export] Refactor the view and added a library to make
 the adif-line. Also a bug fixed in MY_STATE. It was exporting COL_STATE, not
 COL_MY_STATE

---
 application/libraries/AdifHelper.php      | 125 ++++++++++++++++++++++
 application/views/adif/data/exportall.php |  12 ++-
 2 files changed, 133 insertions(+), 4 deletions(-)
 create mode 100644 application/libraries/AdifHelper.php

diff --git a/application/libraries/AdifHelper.php b/application/libraries/AdifHelper.php
new file mode 100644
index 00000000..be9ee192
--- /dev/null
+++ b/application/libraries/AdifHelper.php
@@ -0,0 +1,125 @@
+<?php if ( ! defined('BASEPATH')) exit('No direct script access allowed');
+
+class AdifHelper {
+
+    public function getAdifLine($qso) {
+        $line = "";
+        $line .= $this->getAdifFieldLine("call", $qso->COL_CALL);
+        $line .= $this->getAdifFieldLine("band", $qso->COL_BAND);
+        $line .= $this->getAdifFieldLine("mode", $qso->COL_MODE);
+
+        if ($qso->COL_SUBMODE) {
+            $line .= $this->getAdifFieldLine("submode", $qso->COL_SUBMODE);
+        }
+
+        if ($qso->COL_FREQ != 0) {
+            $freq_in_mhz = $qso->COL_FREQ / 1000000;
+            $line .= $this->getAdifFieldLine("freq", $freq_in_mhz);
+        }
+
+        if ($qso->COL_FREQ_RX != 0) {
+            $freq_rx_in_mhz = $qso->COL_FREQ_RX / 1000000;
+            $line .= $this->getAdifFieldLine("freq_rx", $freq_rx_in_mhz);
+        }
+
+        if ($qso->COL_BAND_RX) {
+            $line .= $this->getAdifFieldLine("band_rx", $qso->COL_BAND_RX);
+        }
+
+        $date_on = strtotime($qso->COL_TIME_ON);
+        $new_date = date('Ymd', $date_on);
+        $line .= $this->getAdifFieldLine("qso_date", $new_date);
+
+        $time_on = strtotime($qso->COL_TIME_ON);
+        $new_on = date('His', $time_on);
+        $line .= $this->getAdifFieldLine("time_on", $new_on);
+
+        $time_off = strtotime($qso->COL_TIME_OFF);
+        $new_off = date('His', $time_off);
+        $line .= $this->getAdifFieldLine("time_off", $new_off);
+
+        $line .= $this->getAdifFieldLine("rst_rcvd", $qso->COL_RST_RCVD);
+
+        $line .= $this->getAdifFieldLine("rst_sent", $qso->COL_RST_SENT);
+
+        $line .= $this->getAdifFieldLine("qsl_rcvd", $qso->COL_QSL_RCVD);
+
+        $line .= $this->getAdifFieldLine("qsl_sent", $qso->COL_QSL_SENT);
+
+        $line .= $this->getAdifFieldLine("country", $qso->COL_COUNTRY);
+
+        if ($qso->COL_VUCC_GRIDS != "") {
+            $line .= $this->getAdifFieldLine("vucc_grids", $qso->COL_VUCC_GRIDS);
+        }
+        if ($qso->COL_VUCC_GRIDS == "" && $qso->COL_GRIDSQUARE != "") {
+            $line .= $this->getAdifFieldLine("gridsquare", $qso->COL_GRIDSQUARE);
+        }
+        if ($qso->COL_SAT_NAME) {
+            if ($qso->COL_SAT_MODE != 0 || $qso->COL_SAT_MODE !="") {
+                $line .= $this->getAdifFieldLine("sat_mode", $qso->COL_SAT_MODE);
+                $line .= $this->getAdifFieldLine("sat_name", $qso->COL_SAT_NAME);
+            }
+        }
+
+        $line .= $this->getAdifFieldLine("prop_mode", $qso->COL_PROP_MODE);
+
+        $line .= $this->getAdifFieldLine("name", $qso->COL_NAME);
+
+        $line .= $this->getAdifFieldLine("state", $qso->COL_STATE);
+
+        $line .= $this->getAdifFieldLine("sota_ref", $qso->COL_SOTA_REF);
+
+        $line .= $this->getAdifFieldLine("operator", $qso->COL_OPERATOR);
+
+        $line .= $this->getAdifFieldLine("STATION_CALLSIGN", $qso->station_callsign);
+
+        $line .= $this->getAdifFieldLine("MY_CITY", $qso->station_city);
+
+        $line .= $this->getAdifFieldLine("MY_COUNTRY", $qso->station_country);
+
+        $line .= $this->getAdifFieldLine("MY_DXCC", $qso->station_dxcc);
+
+        if (strpos($qso->station_gridsquare, ',') !== false ) {
+            $line .= $this->getAdifFieldLine("MY_VUCC_GRIDS", $qso->station_gridsquare);
+        }
+        else {
+            $line .= $this->getAdifFieldLine("MY_GRIDSQUARE", $qso->station_gridsquare);
+        }
+
+        $line .= $this->getAdifFieldLine("MY_IOTA", $qso->station_iota);
+
+        $line .= $this->getAdifFieldLine("MY_SOTA_REF", $qso->station_sota);
+
+        $line .= $this->getAdifFieldLine("MY_CQ_ZONE", $qso->station_cq);
+
+        $line .= $this->getAdifFieldLine("MY_ITU_ZONE", $qso->station_itu);
+
+        $line .= $this->getAdifFieldLine("MY_CNTY", $qso->station_cnty);
+
+        $line .= $this->getAdifFieldLine("MY_STATE", $qso->COL_MY_STATE);
+
+        $line .= $this->getAdifFieldLine("stx", $qso->COL_STX);
+
+        $line .= $this->getAdifFieldLine("stx_string", $qso->COL_STX_STRING);
+
+        $line .= $this->getAdifFieldLine("srx", $qso->COL_SRX);
+
+        $line .= $this->getAdifFieldLine("srx_string", $qso->COL_SRX_STRING);
+
+        $line .= $this->getAdifFieldLine("TX_PWR", $qso->COL_TX_PWR);
+
+        $line .= $this->getAdifFieldLine("COMMENT", $qso->COL_COMMENT);
+
+        $line .= "<eor>\r\n";
+
+        return $line;
+    }
+
+    function getAdifFieldLine($adifcolumn, $dbvalue) {
+        if ($dbvalue != "") {
+            return "<" . $adifcolumn . ":" . strlen($dbvalue) . ">" . $dbvalue;
+        } else {
+            return "";
+        }
+    }
+}
\ No newline at end of file
diff --git a/application/views/adif/data/exportall.php b/application/views/adif/data/exportall.php
index 734bb347..9b29121d 100644
--- a/application/views/adif/data/exportall.php
+++ b/application/views/adif/data/exportall.php
@@ -7,7 +7,11 @@
 <PROGRAMVERSION:<?php echo strlen($this->config->item('app_version')); ?>>Version <?php echo $this->config->item('app_version')."\n"; ?>
 <EOH>
 
-<?php foreach ($qsos->result() as $qso) { ?>
-	
-	<call:<?php echo strlen($qso->COL_CALL); ?>><?php echo $qso->COL_CALL; ?><band:<?php echo strlen($qso->COL_BAND); ?>><?php echo $qso->COL_BAND; ?><mode:<?php echo strlen($qso->COL_MODE); ?>><?php echo $qso->COL_MODE; ?><?php if($qso->COL_SUBMODE) { ?><SUBMODE:<?php echo strlen($qso->COL_SUBMODE); ?>><?php echo $qso->COL_SUBMODE; ?><?php } ?><?php if($qso->COL_FREQ != "0") { ?><?php $freq_in_mhz = $qso->COL_FREQ / 1000000; ?><freq:<?php echo strlen($freq_in_mhz); ?>><?php echo $freq_in_mhz; ?><?php } ?><?php if($qso->COL_FREQ_RX != "0") { ?><?php $freq_rx_in_mhz = $qso->COL_FREQ_RX / 1000000; ?><FREQ_RX:<?php echo strlen($freq_rx_in_mhz); ?>><?php echo $freq_rx_in_mhz; ?><?php } ?><?php if($qso->COL_BAND_RX) { ?><BAND_RX:<?php echo strlen($qso->COL_BAND_RX); ?>><?php echo $qso->COL_BAND_RX; ?><?php } ?><?php $date_on = strtotime($qso->COL_TIME_ON); $new_date = date('Ymd', $date_on); ?><qso_date:<?php echo strlen($new_date); ?>><?php echo $new_date; ?><?php $time_on = strtotime($qso->COL_TIME_ON); $new_on = date('His', $time_on); ?><time_on:<?php echo strlen($new_on); ?>><?php echo $new_on; ?><?php $time_off = strtotime($qso->COL_TIME_OFF); $new_off = date('His', $time_off); ?><time_off:<?php echo strlen($new_off); ?>><?php echo $new_off; ?><rst_rcvd:<?php echo strlen($qso->COL_RST_RCVD); ?>><?php echo $qso->COL_RST_RCVD; ?><rst_sent:<?php echo strlen($qso->COL_RST_SENT); ?>><?php echo $qso->COL_RST_SENT; ?><qsl_rcvd:<?php echo strlen($qso->COL_QSL_RCVD); ?>><?php echo $qso->COL_QSL_RCVD; ?><qsl_sent:<?php echo strlen($qso->COL_QSL_SENT); ?>><?php echo $qso->COL_QSL_SENT; ?><country:<?php echo strlen($qso->COL_COUNTRY); ?>><?php echo $qso->COL_COUNTRY; ?><?php if($qso->COL_VUCC_GRIDS != "") { ?><vucc_grids:<?php echo strlen($qso->COL_VUCC_GRIDS); ?>><?php echo $qso->COL_VUCC_GRIDS; ?><?php } ?><?php if($qso->COL_VUCC_GRIDS == "" && $qso->COL_GRIDSQUARE != "") { ?><gridsquare:<?php echo strlen($qso->COL_GRIDSQUARE); ?>><?php echo $qso->COL_GRIDSQUARE; ?><?php } ?><?php if($qso->COL_SAT_NAME) { ?><?php if($qso->COL_SAT_MODE != 0 || $qso->COL_SAT_MODE !="") {?><sat_mode:<?php echo strlen($qso->COL_SAT_MODE); ?>><?php echo $qso->COL_SAT_MODE; ?><?php } ?><sat_name:<?php echo strlen($qso->COL_SAT_NAME); ?>><?php echo $qso->COL_SAT_NAME; ?><?php } ?><?php if($qso->COL_PROP_MODE) { ?><prop_mode:<?php echo strlen($qso->COL_PROP_MODE); ?>><?php echo $qso->COL_PROP_MODE; ?><?php } ?><?php if($qso->COL_NAME) { ?><name:<?php echo strlen($qso->COL_NAME); ?>><?php echo $qso->COL_NAME; ?><?php } ?><?php if($qso->COL_STATE) { ?><state:<?php echo strlen($qso->COL_STATE); ?>><?php echo $qso->COL_STATE; ?><?php } ?><?php if($qso->COL_SOTA_REF) { ?><sota_ref:<?php echo strlen($qso->COL_SOTA_REF); ?>><?php echo $qso->COL_SOTA_REF; ?><?php } ?><?php if($qso->COL_OPERATOR) { ?><operator:<?php echo strlen($qso->COL_OPERATOR); ?>><?php echo $qso->COL_OPERATOR; ?><?php } ?><?php if($qso->station_callsign) { ?><STATION_CALLSIGN:<?php echo strlen($qso->station_callsign); ?>><?php echo $qso->station_callsign; ?><?php } ?><?php if($qso->station_city) { ?><MY_CITY:<?php echo strlen($qso->station_city); ?>><?php echo $qso->station_city; ?><?php } ?><?php if($qso->station_country) { ?><MY_COUNTRY:<?php echo strlen($qso->station_country); ?>><?php echo $qso->station_country; ?><?php } ?><?php if($qso->station_dxcc) { ?><MY_DXCC:<?php echo strlen($qso->station_dxcc); ?>><?php echo $qso->station_dxcc; ?><?php } ?><?php if( strpos($qso->station_gridsquare, ',') !== false ) { ?><MY_VUCC_GRIDS:<?php echo strlen($qso->station_gridsquare); ?>><?php echo $qso->station_gridsquare; ?><?php } else { ?><MY_GRIDSQUARE:<?php echo strlen($qso->station_gridsquare); ?>><?php echo $qso->station_gridsquare; ?><?php } ?><?php if($qso->station_iota) { ?><MY_IOTA:<?php echo strlen($qso->station_iota); ?>><?php echo $qso->station_iota; ?><?php } ?><?php if($qso->station_sota) { ?><MY_SOTA_REF:<?php echo strlen($qso->station_sota); ?>><?php echo $qso->station_sota; ?><?php } ?><?php if($qso->station_cq) { ?><MY_CQ_ZONE:<?php echo strlen($qso->station_cq); ?>><?php echo $qso->station_cq; ?><?php } ?><?php if($qso->station_itu) { ?><MY_ITU_ZONE:<?php echo strlen($qso->station_itu); ?>><?php echo $qso->station_itu; ?><?php } ?><?php if($qso->station_cnty) { ?><MY_CNTY:<?php echo strlen($qso->station_cnty); ?>><?php echo $qso->station_cnty; ?><?php } ?><?php if($qso->state) { ?><MY_STATE:<?php echo strlen($qso->state); ?>><?php echo $qso->state; ?><?php } ?><?php if($qso->COL_STX !="") { ?><stx:<?php echo strlen($qso->COL_STX);?>><?php echo $qso->COL_STX; ?><?php } if($qso->COL_STX_STRING !="") { ?><stx_string:<?php echo strlen($qso->COL_STX_STRING);?>><?php echo $qso->COL_STX_STRING; ?><?php } if($qso->COL_SRX !="") { ?><srx:<?php echo strlen($qso->COL_SRX);?>><?php echo $qso->COL_SRX; ?><?php } if($qso->COL_SRX_STRING !="") { ?><srx_string:<?php echo strlen($qso->COL_SRX_STRING);?>><?php echo $qso->COL_SRX_STRING; ?><?php } if($qso->COL_TX_PWR !="") { ?><TX_PWR:<?php echo strlen($qso->COL_TX_PWR);?>><?php echo $qso->COL_TX_PWR; ?><?php } if($qso->COL_COMMENT !="") { ?><COMMENT:<?php echo strlen($qso->COL_COMMENT);?>><?php echo $qso->COL_COMMENT; ?><?php } ?><eor>
-<?php } ?>
+<?php
+$CI =& get_instance();
+$CI->load->library('adifhelper');
+
+foreach ($qsos->result() as $qso) {
+    echo $CI->adifhelper->getAdifLine($qso);
+}
+