From f1ad1d1d6eed4ceb4aafaaaf38b10c114b0e80ab Mon Sep 17 00:00:00 2001
From: AndreasK79 <andreask@online.no>
Date: Thu, 7 May 2020 17:35:58 +0200
Subject: [PATCH] Added pushing of QSOs to QRZ.

---
 application/config/migration.php              |   2 +-
 .../040_add_qrz_api_to_stationprofile.php     |  20 +++
 application/models/Logbook_model.php          | 154 ++++++++++++++++++
 application/models/Stations.php               |   3 +
 application/views/station_profile/create.php  |  12 ++
 application/views/station_profile/edit.php    |   6 +
 6 files changed, 196 insertions(+), 1 deletion(-)
 create mode 100644 application/migrations/040_add_qrz_api_to_stationprofile.php

diff --git a/application/config/migration.php b/application/config/migration.php
index f19e068f..31de43d6 100644
--- a/application/config/migration.php
+++ b/application/config/migration.php
@@ -21,7 +21,7 @@ $config['migration_enabled'] = TRUE;
 | be upgraded / downgraded to.
 |
 */
-$config['migration_version'] = 39;
+$config['migration_version'] = 40;
 
 /*
 |--------------------------------------------------------------------------
diff --git a/application/migrations/040_add_qrz_api_to_stationprofile.php b/application/migrations/040_add_qrz_api_to_stationprofile.php
new file mode 100644
index 00000000..263d43d1
--- /dev/null
+++ b/application/migrations/040_add_qrz_api_to_stationprofile.php
@@ -0,0 +1,20 @@
+<?php
+
+defined('BASEPATH') OR exit('No direct script access allowed');
+
+class Migration_add_qrz_api_to_stationprofile extends CI_Migration {
+
+    public function up()
+    {
+        $fields = array(
+            'qrzapikey varchar(20) DEFAULT NULL',
+        );
+
+        $this->dbforge->add_column('station_profile', $fields);
+    }
+
+    public function down()
+    {
+        $this->dbforge->drop_column('station_profile', 'qrzapikey');
+    }
+}
\ No newline at end of file
diff --git a/application/models/Logbook_model.php b/application/models/Logbook_model.php
index cb15d790..44838071 100755
--- a/application/models/Logbook_model.php
+++ b/application/models/Logbook_model.php
@@ -322,6 +322,160 @@ class Logbook_model extends CI_Model {
 
     // Add QSO to database
     $this->db->insert($this->config->item('table_name'), $data);
+
+    // Push qso to qrz if apikey is set
+    if ($apikey = $this->exists_qrz_api_key($data['station_id'])) {
+        $this->push_qso_to_qrz($data, $apikey);
+    }
+  }
+
+  function exists_qrz_api_key($station_id) {
+      $sql = 'select qrzapikey from station_profile
+            where station_id = ' . $station_id;
+
+      $query = $this->db->query($sql);
+
+      $result = $query->row();
+
+      if ($result) {
+          return $result->qrzapikey;
+      }
+      else {
+          return false;
+      }
+  }
+
+  function push_qso_to_qrz($data, $apikey) {
+      $url = 'http://logbook.qrz.com/api'; // TODO: Move this to database
+
+      $adif = $this->create_adif_from_data($data);
+
+      $post_data['KEY'] = $apikey;
+      $post_data['ACTION'] = 'INSERT';
+      $post_data['ADIF'] = $adif;
+
+      $ch = curl_init( $url );
+      curl_setopt( $ch, CURLOPT_POST, true);
+      curl_setopt( $ch, CURLOPT_POSTFIELDS, $post_data);
+      curl_setopt( $ch, CURLOPT_FOLLOWLOCATION, 1);
+      curl_setopt( $ch, CURLOPT_HEADER, 0);
+      curl_setopt( $ch, CURLOPT_RETURNTRANSFER, true);
+
+      //var_dump($adif);
+      //var_dump($data);
+      $response = curl_exec( $ch );
+      //var_dump($response);
+  }
+
+  function create_adif_from_data($data) {
+      $adif = '<call:' . strlen($data['COL_CALL']) . '>' . $data['COL_CALL'];
+      $adif .= '<band:' . strlen($data['COL_BAND']) . '>' . $data['COL_BAND'];
+      $adif .= '<mode:' . strlen($data['COL_MODE']) . '>' . $data['COL_MODE'];
+
+      if($data['COL_FREQ'] != "0") {
+            $freq_in_mhz = $data['COL_FREQ'] / 1000000;
+            $adif .= '<freq:' . strlen($freq_in_mhz) . '>' . $freq_in_mhz;
+      }
+
+      $date_on = strtotime($data['COL_TIME_ON']);
+      $new_date = date('Ymd', $date_on);
+      $adif .= '<qso_date:' . strlen($new_date) . '>' . $new_date;
+      $time_on = strtotime($data['COL_TIME_ON']);
+      $new_on = date('His', $time_on);
+      $adif .= '<time_on:' . strlen($new_on) . '>' . $new_on;
+      $time_off = strtotime($data['COL_TIME_OFF']);
+      $new_off = date('His', $time_off);
+      $adif .= '<time_off:' . strlen($new_off) . '>' . $new_off;
+      $adif .= '<rst_rcvd:' . strlen($data['COL_RST_RCVD']) . '>' . $data['COL_RST_RCVD'];
+      $adif .= '<rst_sent:' . strlen($data['COL_RST_SENT']) . '>' . $data['COL_RST_SENT'];
+
+      if ($data['COL_QSL_RCVD']) {
+          $adif .= '<qsl_rcvd:' . strlen($data['COL_QSL_RCVD']) . '>' . $data['COL_QSL_RCVD'];
+      }
+
+      $adif .= '<qsl_sent:' . strlen($data['COL_QSL_SENT']) . '>' . $data['COL_QSL_SENT'];
+      $adif .= '<country:' . strlen($data['COL_COUNTRY']) . '>' . $data['COL_COUNTRY'];
+      $adif .= '<station_callsign:' . strlen($data['COL_STATION_CALLSIGN']) . '>' . $data['COL_STATION_CALLSIGN'];
+      $adif .= '<dxcc:' . strlen($data['COL_DXCC']) . '>' . $data['COL_DXCC'];
+      $adif .= '<cqz:' . strlen($data['COL_CQZ']) . '>' . $data['COL_CQZ'];
+      //$adif .= '<ituz:' . strlen($data['COL_ITUZ']) . '>' . $data['COL_ITUZ']; -- not yet implemented
+
+      $adif .= '<lotw_qsl_sent:' . strlen($data['COL_LOTW_QSL_SENT']) . '>' . $data['COL_LOTW_QSL_SENT'];
+      $adif .= '<lotw_qsl_rcvd:' . strlen($data['COL_LOTW_QSL_RCVD']) . '>' . $data['COL_LOTW_QSL_RCVD'];
+
+      if($data['COL_IOTA']) {
+        $adif .= '<iota:' . strlen($data['COL_IOTA']) . '>' . $data['COL_IOTA'];
+      }
+
+      if($data['COL_GRIDSQUARE']) {
+          $adif .= '<gridsquare:' . strlen($data['COL_GRIDSQUARE']) . '>' . $data['COL_GRIDSQUARE'];
+      }
+
+      if($data['COL_SOTA_REF']) {
+          $adif .= '<SOTA_REF:' . strlen($data['COL_SOTA_REF']) . '>' . $data['COL_SOTA_REF'];
+      }
+
+      if($data['COL_SAT_NAME']) {
+          if($data['COL_SAT_MODE'] != 0 || $data['COL_SAT_MODE'] !="") {
+              $adif .= '<sat_mode:' . strlen($data['COL_SAT_MODE']) . '>' . $data['COL_SAT_MODE'];
+              $adif .= 'sat_name:' . strlen($data['COL_SAT_NAME']) . '>' . $data['COL_SAT_NAME'];
+          }
+      }
+
+      if($data['COL_STATE']) {
+          $adif .= '<state:' . strlen($data['COL_STATE']) . '>' . $data['COL_STATE'];
+      }
+
+      if($data['COL_PROP_MODE']) {
+          $adif .= '<prop_mode:' . strlen($data['COL_PROP_MODE']) . '>' . $data['COL_PROP_MODE'];
+      }
+
+      if($data['COL_NAME']) {
+          $adif .= '<name:' . strlen($data['COL_NAME']) . '>' . $data['COL_NAME'];
+      }
+
+      if($data['COL_OPERATOR']) {
+          $adif .= '<operator:' . strlen($data['COL_OPERATOR']) . '>' . $data['COL_OPERATOR'];
+      }
+
+      if($data['COL_MY_CITY']) {
+          $adif .= '<MY_CITY:' . strlen($data['COL_MY_CITY']) . '>' . $data['COL_MY_CITY'];
+      }
+
+      if($data['COL_MY_COUNTRY']) {
+          $adif .= '<MY_COUNTRY:' . strlen($data['COL_MY_COUNTRY']) . '>' . $data['COL_MY_COUNTRY'];
+      }
+
+      if($data['COL_MY_DXCC']) {
+          $adif .= '<MY_DXCC:' . strlen($data['COL_MY_DXCC']) . '>' . $data['COL_MY_DXCC'];
+      }
+
+      if($data['COL_MY_IOTA']) {
+          $adif .= '<MY_IOTA:' . strlen($data['COL_MY_IOTA']) . '>' . $data['COL_MY_IOTA'];
+      }
+
+      if($data['COL_MY_SOTA_REF']) {
+        $adif .= '<MY_SOTA_REF:' . strlen($data['COL_MY_SOTA_REF']) . '>' . $data['COL_MY_SOTA_REF'];
+      }
+
+      if($data['COL_MY_CQ_ZONE']) {
+        $adif .= '<MY_CQ_ZONE:' . strlen($data['COL_MY_CQ_ZONE']) . '>' . $data['COL_MY_CQ_ZONE'];
+      }
+
+      if($data['COL_MY_ITU_ZONE']) {
+        $adif .= '<MY_ITU_ZONE:' . strlen($data['COL_MY_ITU_ZONE']) . '>' . $data['COL_MY_ITU_ZONE'];
+      }
+
+      if($data['COL_MY_CNTY']) {
+        $adif .= '<MY_CNTY:' . strlen($data['COL_MY_CNTY']) . '>' . $data['COL_MY_CNTY'];
+      }
+
+      if(strpos($data['COL_MY_GRIDSQUARE'], ',') !== false ) {
+          $adif .= '<my_gridsquare:' . strlen($data['COL_MY_GRIDSQUARE']) . '>' . $data['COL_MY_GRIDSQUARE'];
+      }
+
+      $adif .= '<eor>';
+      return $adif;
   }
 
   /* Edit QSO */
diff --git a/application/models/Stations.php b/application/models/Stations.php
index b6816cf8..b13d1472 100644
--- a/application/models/Stations.php
+++ b/application/models/Stations.php
@@ -45,6 +45,8 @@ class Stations extends CI_Model {
 			'station_cq' =>  xss_clean($this->input->post('station_cq', true)),
 			'station_itu' =>  xss_clean($this->input->post('station_itu', true)),
 			'state' =>  xss_clean($this->input->post('station_state', true)),
+            'eqslqthnickname' => xss_clean($this->input->post('eqslnickname', true)),
+            'qrzapikey' => xss_clean($this->input->post('qrzapikey', true)),
 		);
 
 		$this->db->insert('station_profile', $data); 
@@ -65,6 +67,7 @@ class Stations extends CI_Model {
 			'station_itu' => xss_clean($this->input->post('station_itu', true)),
 			'state' => xss_clean($this->input->post('station_state', true)),
 			'eqslqthnickname' => xss_clean($this->input->post('eqslnickname', true)),
+            'qrzapikey' => xss_clean($this->input->post('qrzapikey', true)),
 		);
 
 		$this->db->where('station_id', xss_clean($this->input->post('station_id', true)));
diff --git a/application/views/station_profile/create.php b/application/views/station_profile/create.php
index e7c34b8b..44165387 100644
--- a/application/views/station_profile/create.php
+++ b/application/views/station_profile/create.php
@@ -153,6 +153,18 @@
 		    <small id="stationSOTAInputHelp" class="form-text text-muted">Station SOTA Reference.</small>
 		  </div>
 
+            <div class="form-group">
+                <label for="eqslNickname">eQSL QTH Nickname</label>
+                <input type="text" class="form-control" name="eqslnickname" id="eqslNickname" aria-describedby="eqslhelp">
+                <small id="eqslhelp" class="form-text text-muted">eQSL QTH Nickname.</small>
+            </div>
+
+            <div class="form-group">
+                <label for="qrzApiKey">QRZ.com logbook api key</label>
+                <input type="text" class="form-control" name="qrzapikey" id="qrzApiKey" aria-describedby="qrzApiKeyHelp">
+                <small id="qrzApiKeyHelp" class="form-text text-muted">QRZ.com logbook api key</small>
+            </div>
+
 			<button type="submit" class="btn btn-primary"><i class="fas fa-plus-square"></i> Create Station Profile</button>
 
 		</form>
diff --git a/application/views/station_profile/edit.php b/application/views/station_profile/edit.php
index e53335f8..19b43e81 100644
--- a/application/views/station_profile/edit.php
+++ b/application/views/station_profile/edit.php
@@ -160,6 +160,12 @@
 		    <small id="eqslhelp" class="form-text text-muted">eQSL QTH Nickname.</small>
 		  </div>
 
+            <div class="form-group">
+                <label for="qrzApiKey">QRZ.com logbook api key</label>
+                <input type="text" class="form-control" name="qrzapikey" id="qrzApiKey" aria-describedby="qrzApiKeyHelp" value="<?php if(set_value('qrzapikey') != "") { echo set_value('qrzapikey'); } else { echo $my_station_profile->qrzapikey; } ?>">
+                <small id="qrzApiKeyHelp" class="form-text text-muted">QRZ.com logbook api key</small>
+            </div>
+
 			<button type="submit" class="btn btn-primary"><i class="fas fa-plus-square"></i> Update Station Profile</button>
 
 		</form>