312 lines
8.8 KiB
PHP
312 lines
8.8 KiB
PHP
<?php
|
|
|
|
namespace App\Models;
|
|
|
|
use Carbon\Carbon;
|
|
use Illuminate\Database\Eloquent\Model;
|
|
use Illuminate\Database\Eloquent\SoftDeletes;
|
|
use Illuminate\Support\Collection;
|
|
use Illuminate\Support\Facades\DB;
|
|
use Illuminate\Support\Facades\Log;
|
|
|
|
use App\Casts\{CollectionOrNull,CompressedStringOrNull,UTF8StringOrNull};
|
|
use App\Classes\FTN\Message;
|
|
use App\Interfaces\Packet;
|
|
use App\Traits\{MessageAttributes,MsgID,ParseAddresses,QueryCacheableConfig};
|
|
|
|
final class Echomail extends Model implements Packet
|
|
{
|
|
use SoftDeletes,MessageAttributes,MsgID,ParseAddresses,QueryCacheableConfig;
|
|
|
|
private const LOGKEY = 'ME-';
|
|
public const UPDATED_AT = NULL;
|
|
private bool $no_export = FALSE;
|
|
|
|
private const kludges = [
|
|
'MSGID:'=>'msgid',
|
|
'PATH:'=>'set_path',
|
|
'REPLY:'=>'replyid',
|
|
'SEEN-BY:'=>'set_seenby',
|
|
];
|
|
|
|
// When generating a packet for this echomail, the packet recipient is our tftn
|
|
public Address $tftn;
|
|
|
|
protected $casts = [
|
|
'to' => UTF8StringOrNull::class,
|
|
'from' => UTF8StringOrNull::class,
|
|
'subject' => UTF8StringOrNull::class,
|
|
'datetime' => 'datetime:Y-m-d H:i:s',
|
|
'kludges' => CollectionOrNull::class,
|
|
'msg' => CompressedStringOrNull::class,
|
|
'msg_src' => CompressedStringOrNull::class,
|
|
'rogue_seenby' => CollectionOrNull::class,
|
|
'rogue_path' => CollectionOrNull::class, // @deprecated?
|
|
];
|
|
|
|
public function __get($key)
|
|
{
|
|
switch ($key) {
|
|
case 'set_echoarea':
|
|
case 'set_fftn':
|
|
case 'set_path':
|
|
case 'set_pkt':
|
|
case 'set_recvtime':
|
|
case 'set_seenby':
|
|
case 'set_sender':
|
|
|
|
case 'set_tagline':
|
|
case 'set_tearline':
|
|
case 'set_origin':
|
|
return $this->set->get($key);
|
|
|
|
default:
|
|
return parent::__get($key);
|
|
}
|
|
}
|
|
|
|
public function __set($key,$value)
|
|
{
|
|
switch ($key) {
|
|
case 'kludges':
|
|
if (! count($value))
|
|
return;
|
|
|
|
if (array_key_exists($value[0],self::kludges)) {
|
|
$this->{self::kludges[$value[0]]} = $value[1];
|
|
|
|
} else {
|
|
$this->kludges->put($value[0],$value[1]);
|
|
}
|
|
|
|
break;
|
|
|
|
case 'no_export':
|
|
$this->{$key} = $value;
|
|
break;
|
|
|
|
case 'set_fftn':
|
|
// Values that we pass to boot() to record how we got this echomail
|
|
case 'set_pkt':
|
|
case 'set_recvtime':
|
|
case 'set_sender':
|
|
|
|
case 'set_tagline':
|
|
case 'set_tearline':
|
|
case 'set_origin':
|
|
// For us to record the echoarea the message is for, if the area isnt defined (eg: packet dump)
|
|
case 'set_echoarea':
|
|
$this->set->put($key,$value);
|
|
break;
|
|
|
|
// The path and seenby the echomail went through to get here
|
|
case 'set_path':
|
|
case 'set_seenby':
|
|
if (! $this->set->has($key))
|
|
$this->set->put($key,collect());
|
|
|
|
$this->set->get($key)->push($value);
|
|
break;
|
|
|
|
default:
|
|
parent::__set($key,$value);
|
|
}
|
|
}
|
|
|
|
public static function boot()
|
|
{
|
|
parent::boot();
|
|
|
|
static::creating(function($model) {
|
|
if (isset($model->errors) && $model->errors->count())
|
|
throw new \Exception('Cannot save, validation errors exist');
|
|
|
|
if ($model->set->has('set_tagline')) {
|
|
$x = Tagline::where('value',utf8_encode($model->set_tagline))->single();
|
|
|
|
if (! $x) {
|
|
$x = new Tagline;
|
|
$x->value = $model->set_tagline;
|
|
$x->save();
|
|
}
|
|
|
|
$model->tagline_id = $x->id;
|
|
}
|
|
|
|
if ($model->set->has('set_tearline')) {
|
|
$x = Tearline::where('value',utf8_encode($model->set_tearline))->single();
|
|
|
|
if (! $x) {
|
|
$x = new Tearline;
|
|
$x->value = $model->set_tearline;
|
|
$x->save();
|
|
}
|
|
|
|
$model->tearline_id = $x->id;
|
|
}
|
|
|
|
if ($model->set->has('set_origin')) {
|
|
// Make sure our origin contains our FTN
|
|
$m = [];
|
|
if ((preg_match('#^(.*)\s+\(([0-9]+:[0-9]+/[0-9]+.*)\)+\s*$#',$model->set_origin,$m))
|
|
&& (Address::findFTN(sprintf('%s@%s',$m[2],$model->fftn->domain->name))?->id === $model->fftn_id))
|
|
{
|
|
$x = Origin::where('value',utf8_encode($m[1]))->single();
|
|
|
|
if (! $x) {
|
|
$x = new Origin;
|
|
$x->value = $m[1];
|
|
$x->save();
|
|
}
|
|
|
|
$model->origin_id = $x->id;
|
|
}
|
|
}
|
|
|
|
// If we can rebuild the message content, then we can do away with msg_src
|
|
if (md5($model->rebuildMessage()) === $model->msg_crc) {
|
|
Log::debug(sprintf('%s:- Pruning message source, since we can rebuild the message [%s]',self::LOGKEY,$model->msgid));
|
|
$model->msg_src = NULL;
|
|
}
|
|
});
|
|
|
|
// @todo if the message is updated with new SEEN-BY's from another route, we'll delete the pending export for systems (if there is one)
|
|
static::created(function($model) {
|
|
$rogue = collect();
|
|
$seenby = collect();
|
|
$path = collect();
|
|
|
|
// Parse PATH
|
|
if ($model->set->has('set_path'))
|
|
$path = self::parseAddresses('path',$model->set->get('set_path'),$model->fftn->zone,$rogue);
|
|
|
|
Log::debug(sprintf('%s:^ Message [%d] from point address is [%d]',self::LOGKEY,$model->id,$model->fftn->point_id));
|
|
|
|
// Make sure our sender is first in the path
|
|
if ((! $model->isFlagSet(Message::FLAG_LOCAL)) && (! $path->contains($model->fftn_id))) {
|
|
Log::alert(sprintf('%s:? Echomail adding sender to start of PATH [%s].',self::LOGKEY,$model->fftn_id));
|
|
$path->prepend($model->fftn_id);
|
|
}
|
|
|
|
// Make sure our pktsrc is last in the path
|
|
if ($model->set->has('set_sender') && (! $path->contains($model->set->get('set_sender')->id))) {
|
|
Log::alert(sprintf('%s:? Echomail adding pktsrc to end of PATH [%s].',self::LOGKEY,$model->set->get('set_sender')->ftn));
|
|
$path->push($model->set->get('set_sender')->id);
|
|
}
|
|
|
|
// Save the Path
|
|
$ppoid = NULL;
|
|
foreach ($path as $aoid) {
|
|
$po = DB::select('INSERT INTO echomail_path (echomail_id,address_id,parent_id) VALUES (?,?,?) RETURNING id',[
|
|
$model->id,
|
|
$aoid,
|
|
$ppoid,
|
|
]);
|
|
|
|
$ppoid = $po[0]->id;
|
|
}
|
|
|
|
$rogue = collect();
|
|
|
|
// @todo move the parseAddress processing into Message::class, and our address to the seenby (and thus no need to add it when we export)
|
|
// Parse SEEN-BY
|
|
if ($model->set->has('set_seenby'))
|
|
$seenby = self::parseAddresses('seenby',$model->set->get('set_seenby'),$model->fftn->zone,$rogue);
|
|
|
|
// Make sure our sender is in the seenby
|
|
if ((! $model->isFlagSet(Message::FLAG_LOCAL)) && (! $seenby->contains($model->fftn_id))) {
|
|
Log::alert(sprintf('%s:? Echomail adding sender to SEENBY [%s].',self::LOGKEY,$model->fftn_id));
|
|
$seenby->push($model->fftn_id);
|
|
}
|
|
|
|
// Make sure our pktsrc is in the seenby
|
|
if ($model->set->has('set_sender') && (! $seenby->contains($model->set->get('set_sender')->id))) {
|
|
Log::alert(sprintf('%s:? Echomail adding pktsrc to SEENBY [%s].',self::LOGKEY,$model->set->get('set_sender')->ftn));
|
|
$seenby->push($model->set->get('set_sender')->id);
|
|
}
|
|
|
|
if (count($rogue)) {
|
|
$model->rogue_seenby = $rogue;
|
|
$model->save();
|
|
}
|
|
|
|
if ($seenby)
|
|
$model->seenby()->sync($seenby);
|
|
|
|
// Our last node in the path is our sender
|
|
if ($model->set->has('set_pkt') && $model->set->has('set_recvtime')) {
|
|
if ($path->count()) {
|
|
DB::update('UPDATE echomail_path set recv_pkt=?,recv_at=? where address_id=? and echomail_id=?',[
|
|
$model->set->get('set_pkt'),
|
|
$model->set->get('set_recvtime'),
|
|
$path->last(),
|
|
$model->id,
|
|
]);
|
|
|
|
} else {
|
|
Log::critical(sprintf('%s:! Wasnt able to set packet details for [%d] to [%s] to [%s], no path information',self::LOGKEY,$model->id,$model->set->get('set_pkt'),$model->set->get('set_recvtime')));
|
|
}
|
|
}
|
|
|
|
// See if we need to export this message.
|
|
if ($model->echoarea->sec_read) {
|
|
$exportto = $model
|
|
->echoarea
|
|
->addresses
|
|
->filter(function($item) use ($model) { return $model->echoarea->can_read($item->security); })
|
|
->pluck('id')
|
|
->diff(our_address($model->fftn->zone->domain)->pluck('id'))
|
|
->diff($seenby);
|
|
|
|
if ($exportto->count()) {
|
|
if ($model->no_export) {
|
|
Log::alert(sprintf('%s:- NOT processing exporting of message by configuration [%s] to [%s]',self::LOGKEY,$model->id,$exportto->join(',')));
|
|
return;
|
|
}
|
|
|
|
Log::info(sprintf('%s:- Exporting message [%s] to [%s]',self::LOGKEY,$model->id,$exportto->join(',')));
|
|
|
|
// Save the seenby for the exported systems
|
|
$model->seenby()->syncWithPivotValues($exportto,['export_at'=>Carbon::now()],FALSE);
|
|
}
|
|
}
|
|
});
|
|
}
|
|
|
|
/* RELATIONS */
|
|
|
|
public function echoarea()
|
|
{
|
|
return $this->belongsTo(Echoarea::class);
|
|
}
|
|
|
|
public function seenby()
|
|
{
|
|
return $this->belongsToMany(Address::class,'echomail_seenby')
|
|
->withPivot(['export_at','sent_at','sent_pkt'])
|
|
->FTN2DOrder();
|
|
}
|
|
|
|
public function path()
|
|
{
|
|
return $this->belongsToMany(Address::class,'echomail_path')
|
|
->withPivot(['id','parent_id','recv_pkt','recv_at'])
|
|
->orderBy('id','DESC');
|
|
}
|
|
|
|
/* ATTRIBUTES */
|
|
|
|
public function getSeenByAttribute(): Collection
|
|
{
|
|
return ((! $this->exists) && $this->set->has('set_seenby'))
|
|
? $this->set->get('set_seenby')
|
|
: $this->getRelationValue('seenby');
|
|
}
|
|
|
|
public function getPathAttribute(): Collection
|
|
{
|
|
return ((! $this->exists) && $this->set->has('set_path'))
|
|
? $this->set->get('set_path')
|
|
: $this->getRelationValue('path');
|
|
}
|
|
} |