120 lines
3.9 KiB
PHP
120 lines
3.9 KiB
PHP
<?php
|
|
|
|
namespace App\Classes\FTN\Packet;
|
|
|
|
use Illuminate\Support\Arr;
|
|
use Illuminate\Support\Collection;
|
|
|
|
use App\Classes\FTN\Packet;
|
|
use App\Models\Setup;
|
|
|
|
/**
|
|
* FSC-0039 http://ftsc.org/docs/fsc-0039.004
|
|
*
|
|
* Commonly known as Type 2e packets, or extended type 2 packets
|
|
* Supports 4D addressing
|
|
*/
|
|
final class FSC39 extends Packet
|
|
{
|
|
protected const HEADER = [
|
|
'onode' => [0x00,'v',2], // Orig Node
|
|
'dnode' => [0x02,'v',2], // Dest Node
|
|
'y' => [0x04,'v',2], // Year
|
|
'm' => [0x06,'v',2], // Month
|
|
'd' => [0x08,'v',2], // Day
|
|
'H' => [0x0a,'v',2], // Hour
|
|
'M' => [0x0c,'v',2], // Minute
|
|
'S' => [0x0e,'v',2], // Second
|
|
'baud' => [0x10,'v',2], // Baud
|
|
'type' => [0x12,'v',2], // Packet Version (should be 2)
|
|
'onet' => [0x14,'v',2], // Orig Net
|
|
'dnet' => [0x16,'v',2], // Dest Net
|
|
'prodcode-lo' => [0x18,'C',1], // Product Code
|
|
'prodrev-maj' => [0x19,'C',1], // Product Version Major
|
|
'password' => [0x1a,'a8',8], // Packet Password - http://ftsc.org/docs/fsc-0039.004 packet passwords are A-Z,0-9
|
|
'ozone' => [0x22,'v',2], // Orig Zone
|
|
'dzone' => [0x24,'v',2], // Dest Zone
|
|
'reserved' => [0x26,'a2',2], // Reserved
|
|
'capvalid' => [0x28,'n',2], // fsc-0039.004 (copy of 0x2c)
|
|
'prodcode-hi' => [0x2a,'C',1], // Product Code Hi
|
|
'prodrev-min' => [0x2b,'C',1], // Product Version Minor
|
|
'capword' => [0x2c,'v',2], // Capability Word fsc-0039.004/fsc-0048.002
|
|
'dozone' => [0x2e,'v',2], // Orig Zone
|
|
'ddzone' => [0x30,'v',2], // Dest Zone
|
|
'opoint' => [0x32,'v',2], // Orig Point
|
|
'dpoint' => [0x34,'v',2], // Dest Point
|
|
'proddata' => [0x36,'a4',4], // ProdData
|
|
];
|
|
|
|
public const TYPE = '2e';
|
|
public const VERS = self::MSG_TYPE2; //|self::MSG_TYPE4;
|
|
|
|
public function __get($key)
|
|
{
|
|
switch ($key) {
|
|
case 'capability':
|
|
return sprintf('%016b',Arr::get($this->header,'capword'));
|
|
|
|
default:
|
|
return parent::__get($key);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Create our message packet header
|
|
*/
|
|
protected function header(Collection $msgs): string
|
|
{
|
|
$oldest = $this->messages->sortBy('datetime')->last();
|
|
|
|
return pack(collect(self::HEADER)->pluck(1)->join(''),
|
|
$this->fftn_p->node_id, // Orig Node
|
|
$this->tftn_p->node_id, // Dest Node
|
|
$oldest->datetime->format('Y'), // Year
|
|
$oldest->datetime->format('m')-1, // Month
|
|
$oldest->datetime->format('d'), // Day
|
|
$oldest->datetime->format('H'), // Hour
|
|
$oldest->datetime->format('i'), // Minute
|
|
$oldest->datetime->format('s'), // Second
|
|
0, // Baud
|
|
2, // Packet Version (should be 2)
|
|
$this->fftn_p->host_id, // Orig Net
|
|
$this->tftn_p->host_id, // Dest Net
|
|
(Setup::PRODUCT_ID & 0xff), // Product Code Lo
|
|
Setup::PRODUCT_VERSION_MAJ, // Product Version Major
|
|
$this->pass_p ?: $this->tftn_p->pass_packet, // Packet Password
|
|
$this->fftn_p->zone->zone_id, // Orig Zone
|
|
$this->tftn_p->zone->zone_id, // Dest Zone
|
|
'', // Reserved
|
|
static::VERS, // fsc-0039.004 (copy of 0x2c)
|
|
((Setup::PRODUCT_ID >> 8) & 0xff), // Product Code Hi
|
|
Setup::PRODUCT_VERSION_MIN, // Product Version Minor
|
|
static::VERS, // Capability Word
|
|
$this->fftn_p->zone->zone_id, // Orig Zone
|
|
$this->tftn_p->zone->zone_id, // Dest Zone
|
|
$this->fftn_p->point_id, // Orig Point
|
|
$this->tftn_p->point_id, // Dest Point
|
|
strtoupper(hexstr(Setup::PRODUCT_ID)), // ProdData
|
|
);
|
|
}
|
|
|
|
/**
|
|
* Determine if this is a fsc-0045 packet
|
|
*
|
|
* @param string $header
|
|
* @return bool
|
|
* @throws \Exception
|
|
*/
|
|
public static function is_type(string $header): bool
|
|
{
|
|
$head = unpack(self::unpackheader(self::HEADER),$header);
|
|
|
|
return (
|
|
(Arr::get($head,'type') === 2)
|
|
&& (strlen(rtrim(Arr::get($head,'reserved'),"\x00")) === 0)
|
|
&& (Arr::get($head,'capword') === Arr::get($head,'capvalid'))
|
|
&& (Arr::get($head,'ozone') === Arr::get($head,'dozone'))
|
|
&& (Arr::get($head,'dzone') === Arr::get($head,'ddzone'))
|
|
);
|
|
}
|
|
} |