865 lines
22 KiB
PHP
865 lines
22 KiB
PHP
<?php
|
|
|
|
namespace App\Models;
|
|
|
|
use Illuminate\Database\Eloquent\Collection;
|
|
use Illuminate\Database\Eloquent\Model;
|
|
use Illuminate\Database\Eloquent\SoftDeletes;
|
|
use Illuminate\Support\Facades\DB;
|
|
use Illuminate\Support\Facades\Log;
|
|
|
|
use App\Classes\FTN\{Message,Packet};
|
|
use App\Exceptions\InvalidFTNException;
|
|
use App\Http\Controllers\DomainController;
|
|
use App\Traits\ScopeActive;
|
|
|
|
class Address extends Model
|
|
{
|
|
private const LOGKEY = 'MA-';
|
|
|
|
use ScopeActive,SoftDeletes;
|
|
|
|
protected $with = ['zone'];
|
|
|
|
// http://ftsc.org/docs/frl-1028.002
|
|
public const ftn_regex = '([0-9]+):([0-9]+)/([0-9]+)(\.([0-9]+))?(@([a-z0-9\-_~]{0,8}))?';
|
|
|
|
public const NODE_ZC = 1<<0; // Zone
|
|
public const NODE_RC = 1<<1; // Region
|
|
public const NODE_NC = 1<<2; // Host
|
|
public const NODE_HC = 1<<3; // Hub
|
|
public const NODE_ACTIVE = 1<<4; // Node
|
|
public const NODE_PVT = 1<<5; // Pvt
|
|
public const NODE_HOLD = 1<<6; // Hold
|
|
public const NODE_DOWN = 1<<7; // Down
|
|
public const NODE_POINT = 1<<8; // Point
|
|
public const NODE_UNKNOWN = 1<<15; // Unknown
|
|
|
|
public static function boot()
|
|
{
|
|
parent::boot();
|
|
|
|
// For indexes when deleting, we need to change active to FALSE
|
|
static::softDeleted(function($model) {
|
|
Log::debug(sprintf('%s:Deleting [%d], updating active to FALSE',self::LOGKEY,$model->id));
|
|
|
|
$model->active = FALSE;
|
|
$model->save();
|
|
});
|
|
}
|
|
|
|
protected $visible = ['zone_id','region_id','host_id','node_id','point_id','security'];
|
|
|
|
/* SCOPES */
|
|
|
|
public function scopeActiveFTN($query)
|
|
{
|
|
return $query->select($this->getTable().'.*')
|
|
->join('zones',['zones.id'=>'addresses.zone_id'])
|
|
->join('domains',['domains.id'=>'zones.domain_id'])
|
|
->where('addresses.active',TRUE)
|
|
->where('zones.active',TRUE)
|
|
->where('domains.active',TRUE)
|
|
->orderBy('domains.name')
|
|
->FTNorder();
|
|
}
|
|
|
|
public function scopeTrashed($query)
|
|
{
|
|
return $query->select($this->getTable().'.*')
|
|
->withTrashed()
|
|
->FTNorder();
|
|
}
|
|
|
|
public function scopeFTNOrder($query)
|
|
{
|
|
return $query
|
|
->orderBy('region_id')
|
|
->orderBy('host_id')
|
|
->orderBy('node_id')
|
|
->orderBy('point_id');
|
|
}
|
|
|
|
public function scopeFTN2DOrder($query)
|
|
{
|
|
return $query
|
|
->orderBy('host_id')
|
|
->orderBy('node_id')
|
|
->orderBy('point_id');
|
|
}
|
|
|
|
/* RELATIONS */
|
|
|
|
/**
|
|
* Find children dependent on this record
|
|
* @todo If bosses are defined here, and points, then mail to a point goes to it's boss
|
|
*/
|
|
public function children()
|
|
{
|
|
// We have no session data for this address, by definition it has no children
|
|
if (! $this->session('sespass'))
|
|
return $this->hasMany(self::class,'id','void');
|
|
|
|
if (! $this->session('default')) {
|
|
switch ($this->role) {
|
|
case self::NODE_ZC:
|
|
$children = self::select('addresses.*')
|
|
->where('zone_id',$this->zone_id);
|
|
|
|
break;
|
|
|
|
case self::NODE_RC:
|
|
$children = self::select('addresses.*')
|
|
->where('zone_id',$this->zone_id)
|
|
->where('region_id',$this->region_id);
|
|
|
|
break;
|
|
|
|
case self::NODE_NC:
|
|
$children = self::select('addresses.*')
|
|
->where('zone_id',$this->zone_id)
|
|
->where('region_id',$this->region_id)
|
|
->where('host_id',$this->host_id);
|
|
|
|
break;
|
|
|
|
case self::NODE_HC:
|
|
// Identify our children.
|
|
$children = self::select('addresses.*')
|
|
->where('zone_id',$this->zone_id)
|
|
->where('region_id',$this->region_id)
|
|
->where('hub_id',$this->id);
|
|
|
|
break;
|
|
|
|
case self::NODE_UNKNOWN:
|
|
case self::NODE_ACTIVE:
|
|
case self::NODE_POINT:
|
|
case self::NODE_PVT:
|
|
// Nodes dont have children, but must return a relationship instance
|
|
return $this->hasOne(self::class,NULL,'void');
|
|
|
|
default:
|
|
throw new \Exception('Unknown role: '.serialize($this->role));
|
|
}
|
|
|
|
} else {
|
|
$children = self::select('addresses.*')
|
|
->where('zone_id',$this->zone_id);
|
|
}
|
|
|
|
// I cant have myself as a child, and have a high role than me
|
|
$children->where('id','<>',$this->id)
|
|
->where('role','>',$this->role);
|
|
|
|
// Remove any children that we have session details for (SAME AS HC)
|
|
$sessions = self::select('hubnodes.*')
|
|
->join('system_zone',['system_zone.system_id'=>'addresses.system_id','system_zone.zone_id'=>'addresses.zone_id'])
|
|
->join('addresses as hubnodes',['hubnodes.zone_id'=>'addresses.zone_id','hubnodes.id'=>'addresses.id'])
|
|
->where('addresses.zone_id',$this->zone_id)
|
|
->where('addresses.system_id','<>',$this->system_id)
|
|
->whereIN('addresses.system_id',$children->get()->pluck('system_id'));
|
|
|
|
// For each of the session, identify their children
|
|
$session_kids = collect();
|
|
foreach ($sessions->get() as $so)
|
|
$session_kids = $session_kids->merge(($x=$so->children) ? $x->pluck('id') : []);
|
|
|
|
// ZC's receive all mail, except for defined nodes, and defined hubs/hosts/rcs
|
|
return $this->hasMany(self::class,'zone_id','zone_id')
|
|
->whereIn('id',$children->get()->pluck('id')->toArray())
|
|
->whereNotIn('id',$sessions->get()->pluck('id')->toArray())
|
|
->whereNotIn('id',$session_kids->toArray())
|
|
->where('system_id','<>',$this->system_id)
|
|
->select('addresses.*')
|
|
->orderBy('region_id')
|
|
->orderBy('host_id')
|
|
->orderBy('node_id')
|
|
->orderBy('point_id')
|
|
->with(['zone.domain']);
|
|
}
|
|
|
|
/**
|
|
* Echoareas this address is subscribed to
|
|
*
|
|
* @return \Illuminate\Database\Eloquent\Relations\BelongsToMany
|
|
*/
|
|
public function echoareas()
|
|
{
|
|
return $this->belongsToMany(Echoarea::class)
|
|
->withPivot(['subscribed']);
|
|
}
|
|
|
|
/**
|
|
* Echomails that this address has seen
|
|
*
|
|
* @return \Illuminate\Database\Eloquent\Relations\BelongsToMany
|
|
*/
|
|
public function echomails()
|
|
{
|
|
return $this->belongsToMany(Echomail::class,'echomail_seenby')
|
|
->withPivot(['export_at','sent_at','sent_pkt']);
|
|
}
|
|
|
|
public function echomail_from()
|
|
{
|
|
return $this->hasMany(Echomail::class,'fftn_id','id');
|
|
}
|
|
|
|
/**
|
|
* Files that this address has seen
|
|
*
|
|
* @return \Illuminate\Database\Eloquent\Relations\BelongsToMany
|
|
*/
|
|
public function files()
|
|
{
|
|
return $this->belongsToMany(File::class,'file_seenby')
|
|
->withPivot(['sent_at','export_at']);
|
|
}
|
|
|
|
/**
|
|
* Echoareas this address is subscribed to
|
|
*
|
|
* @return \Illuminate\Database\Eloquent\Relations\BelongsToMany
|
|
*/
|
|
public function fileareas()
|
|
{
|
|
return $this->belongsToMany(Filearea::class)
|
|
->withPivot(['subscribed']);
|
|
}
|
|
|
|
/**
|
|
* Who we send this systems mail to.
|
|
*
|
|
* @return Address|null
|
|
* @throws \Exception
|
|
* @todo Dont include points in this
|
|
*/
|
|
public function parent(): ?Address
|
|
{
|
|
// If we are have session password, then we dont have a parent
|
|
if ($this->session('sespass'))
|
|
return $this;
|
|
|
|
switch ($this->role) {
|
|
// ZCs dont have parents, but we may have a default
|
|
case self::NODE_ZC:
|
|
if (($x=$this->zone->systems->where('pivot.default',TRUE))->count())
|
|
return $x->first()->match($this->zone,255)->first();
|
|
else
|
|
return NULL;
|
|
|
|
// RC
|
|
case self::NODE_RC:
|
|
$parent = self::where('zone_id',$this->zone_id)
|
|
->where('region_id',0)
|
|
->where('host_id',0)
|
|
->where('node_id',0)
|
|
->single();
|
|
|
|
break;
|
|
|
|
// Hosts
|
|
case self::NODE_NC:
|
|
// See if we have a RC
|
|
$parent = self::where('zone_id',$this->zone_id)
|
|
->where('region_id',$this->region_id)
|
|
->where('host_id',0)
|
|
->where('node_id',0)
|
|
->single();
|
|
|
|
if (! $parent) {
|
|
// See if we have a RC
|
|
$parent = self::where('zone_id',$this->zone_id)
|
|
->where('region_id',0)
|
|
->where('host_id',0)
|
|
->where('node_id',0)
|
|
->single();
|
|
}
|
|
|
|
break;
|
|
|
|
// Hubs
|
|
case self::NODE_HC:
|
|
// Normal Nodes
|
|
case self::NODE_ACTIVE:
|
|
// If we are a child of a hub, then check our hub
|
|
$parent = (($this->hub_id)
|
|
? self::where('id',$this->hub_id)
|
|
: self::where('zone_id',$this->zone_id)
|
|
->where('region_id',$this->region_id)
|
|
->where('host_id',$this->host_id)
|
|
->where('node_id',0))
|
|
->where('role','<',$this->role)
|
|
->single();
|
|
|
|
break;
|
|
|
|
case self::NODE_UNKNOWN:
|
|
case self::NODE_POINT:
|
|
case self::NODE_DOWN:
|
|
// @todo Points - if the boss is defined, we should return it.
|
|
return NULL;
|
|
|
|
default:
|
|
throw new \Exception(sprintf('Unknown role: %s (%d)',serialize($this->role),$this->id));
|
|
}
|
|
|
|
return $parent?->parent();
|
|
}
|
|
|
|
public function system()
|
|
{
|
|
return $this->belongsTo(System::class);
|
|
}
|
|
|
|
public function zone()
|
|
{
|
|
return $this->belongsTo(Zone::class);
|
|
}
|
|
|
|
/* ATTRIBUTES */
|
|
|
|
/**
|
|
* Return if this address is active
|
|
*
|
|
* @param bool $value
|
|
* @return bool
|
|
*/
|
|
public function getActiveAttribute(bool $value): bool
|
|
{
|
|
return $value && $this->getActiveDomainAttribute();
|
|
}
|
|
|
|
public function getActiveDomainAttribute(): bool
|
|
{
|
|
return $this->zone->active && $this->zone->domain->active;
|
|
}
|
|
|
|
/**
|
|
* Render the node name in full 5D
|
|
*
|
|
* @return string
|
|
*/
|
|
public function getFTNAttribute(): string
|
|
{
|
|
return sprintf('%s@%s',$this->getFTN4DAttribute(),$this->zone->domain->name);
|
|
}
|
|
|
|
public function getFTN2DAttribute(): string
|
|
{
|
|
return sprintf('%d/%d',$this->host_id ?: $this->region_id,$this->node_id);
|
|
}
|
|
|
|
public function getFTN3DAttribute(): string
|
|
{
|
|
return sprintf('%d:%s',$this->zone->zone_id,$this->getFTN2DAttribute());
|
|
}
|
|
|
|
public function getFTN4DAttribute(): string
|
|
{
|
|
return sprintf('%s.%d',$this->getFTN3DAttribute(),$this->point_id);
|
|
}
|
|
|
|
public function getRoleNameAttribute(): string
|
|
{
|
|
switch ($this->role) {
|
|
case self::NODE_ZC:
|
|
return 'ZC';
|
|
case self::NODE_RC:
|
|
return 'RC';
|
|
case self::NODE_NC:
|
|
return 'NC';
|
|
case self::NODE_HC:
|
|
return 'HUB';
|
|
case self::NODE_ACTIVE:
|
|
return 'NODE';
|
|
case self::NODE_POINT:
|
|
return 'POINT';
|
|
default:
|
|
return '?';
|
|
}
|
|
}
|
|
|
|
/* METHODS */
|
|
|
|
/**
|
|
* Create an FTN address associated with a system
|
|
*
|
|
* @param string $address
|
|
* @param System $so
|
|
* @return Address|null
|
|
* @throws \Exception
|
|
*/
|
|
public static function createFTN(string $address,System $so): ?self
|
|
{
|
|
$ftn = self::parseFTN($address);
|
|
|
|
if (! $ftn['d']) {
|
|
// See if we have a default domain for this domain
|
|
if ($ftn['z']) {
|
|
$zo = Zone::where('zone_id',$ftn['z'])->where('default',TRUE)->single();
|
|
|
|
if ($zo)
|
|
$ftn['d'] = $zo->domain->name;
|
|
|
|
else {
|
|
Log::alert(sprintf('%s:! Refusing to create address [%s] no domain available',self::LOGKEY,$address));
|
|
|
|
return NULL;
|
|
}
|
|
}
|
|
}
|
|
|
|
Log::debug(sprintf('%s:- Creating AKA [%s] for [%s]',self::LOGKEY,$address,$so->name));
|
|
|
|
// Check Domain exists
|
|
Domain::unguard();
|
|
$do = Domain::singleOrNew(['name'=>$ftn['d']]);
|
|
Domain::reguard();
|
|
|
|
if (! $do->exists) {
|
|
$do->public = TRUE;
|
|
$do->active = TRUE;
|
|
$do->notes = 'Auto created';
|
|
|
|
$do->save();
|
|
}
|
|
|
|
// If the zone is zero, see if this is a flatten domain, and if so, find an NC
|
|
if (($ftn['z'] === 0) && $do->flatten) {
|
|
$nc = self::findZone($do,$ftn['n'],0,0);
|
|
|
|
if ($nc) {
|
|
Log::info(sprintf('%s:- Setting zone to [%d]',self::LOGKEY,$nc->zone->zone_id));
|
|
$ftn['z'] = $nc->zone->zone_id;
|
|
}
|
|
}
|
|
|
|
// Create zone
|
|
Zone::unguard();
|
|
$zo = Zone::singleOrNew(['domain_id'=>$do->id,'zone_id'=>$ftn['z']]);
|
|
Zone::reguard();
|
|
|
|
if (! $zo->exists) {
|
|
$zo->active = TRUE;
|
|
$zo->notes = 'Auto created';
|
|
$zo->system_id = System::createUnknownSystem()->id;
|
|
|
|
$do->zones()->save($zo);
|
|
}
|
|
|
|
if (! $zo->active || ! $do->active) {
|
|
Log::alert(sprintf('%s:! Refusing to create address [%s] in disabled zone or domain',self::LOGKEY,$address));
|
|
|
|
return NULL;
|
|
}
|
|
|
|
// Create Address, assigned to $so
|
|
$o = new self;
|
|
$o->active = TRUE;
|
|
$o->zone_id = $zo->id;
|
|
$o->region_id = 0;
|
|
$o->host_id = $ftn['n'];
|
|
$o->node_id = $ftn['f'];
|
|
$o->point_id = $ftn['p'];
|
|
$o->role = $ftn['p'] ? self::NODE_POINT : self::NODE_UNKNOWN;
|
|
|
|
try {
|
|
$so->addresses()->save($o);
|
|
|
|
} catch (\Exception $e) {
|
|
Log::error(sprintf('%s:! ERROR creating address [%s]',self::LOGKEY,get_class($e)));
|
|
return NULL;
|
|
}
|
|
|
|
return $o;
|
|
}
|
|
|
|
/**
|
|
* Find a record in the DB for a node string, eg: 10:1/1.0
|
|
*
|
|
* @param string $address
|
|
* @param bool $trashed
|
|
* @return Address|null
|
|
* @throws \Exception
|
|
*/
|
|
public static function findFTN(string $address,bool $trashed=FALSE): ?self
|
|
{
|
|
$ftn = self::parseFTN($address);
|
|
$o = NULL;
|
|
|
|
$query = (new self)
|
|
->select('addresses.*')
|
|
->join('zones',['zones.id'=>'addresses.zone_id'])
|
|
->join('domains',['domains.id'=>'zones.domain_id'])
|
|
->when($trashed,function($query) {
|
|
$query->trashed();
|
|
},function($query) {
|
|
$query->active();
|
|
})
|
|
->where('zones.zone_id',$ftn['z'])
|
|
->where('node_id',$ftn['f'])
|
|
->where('point_id',$ftn['p'])
|
|
->when($ftn['d'],function($query,$domain) {
|
|
$query->where('domains.name',$domain);
|
|
},function($query) {
|
|
$query->where('zones.default',TRUE);
|
|
});
|
|
|
|
$q = $query->clone();
|
|
|
|
// Are we looking for a region address
|
|
if (($ftn['f'] === 0) && ($ftn['p'] === 0))
|
|
$o = $query
|
|
->where('region_id',$ftn['n'])
|
|
->where('host_id',$ftn['n'])
|
|
->single();
|
|
|
|
// Look for a normal address
|
|
if (! $o)
|
|
$o = $q
|
|
->where(function($q) use ($ftn) {
|
|
return $q
|
|
->where(function($q) use ($ftn) {
|
|
return $q
|
|
->where('region_id',$ftn['n'])
|
|
->where('host_id',$ftn['n']);
|
|
})
|
|
->orWhere('host_id',$ftn['n']);
|
|
})
|
|
->single();
|
|
|
|
// Check and see if we are a flattened domain, our address might be available with a different zone.
|
|
if (! $o && ($ftn['p'] === 0)) {
|
|
if ($ftn['d'])
|
|
$do = Domain::where(['name'=>$ftn['d']])->single();
|
|
else {
|
|
$zo = Zone::where('zone_id',$ftn['z'])->where('default',TRUE)->single();
|
|
$do = $zo?->domain;
|
|
}
|
|
|
|
if ($do && $do->flatten && (($ftn['z'] === 0) || $do->zones->pluck('zone_id')->contains($ftn['z'])))
|
|
$o = self::findZone($do,$ftn['n'],$ftn['f'],$ftn['p'],$trashed);
|
|
}
|
|
|
|
return ($o && $o->system->active) ? $o : NULL;
|
|
}
|
|
|
|
/**
|
|
* This is to find an address for a domain (like fidonet), which is technically 2D even though it uses multiple zones.
|
|
*
|
|
* This was implemented to identify seenby and path kludges
|
|
*
|
|
* @param Domain $do
|
|
* @param int $host
|
|
* @param int $node
|
|
* @param int $point
|
|
* @param bool $trashed
|
|
* @return self|null
|
|
* @throws \Exception
|
|
*/
|
|
public static function findZone(Domain $do,int $host,int $node,int $point,bool $trashed=FALSE): ?self
|
|
{
|
|
if (! $do->flatten)
|
|
throw new \Exception(sprintf('Domain is not set with flatten: %d',$do->id));
|
|
|
|
$zones = $do->zones->pluck('zone_id');
|
|
|
|
$o = (new self)
|
|
->select('addresses.*')
|
|
->join('zones',['zones.id'=>'addresses.zone_id'])
|
|
->when($trashed,function($query) {
|
|
$query->trashed();
|
|
},function($query) {
|
|
$query->active();
|
|
})
|
|
->whereIN('zones.zone_id',$zones)
|
|
->where(function($q) use ($host) {
|
|
return $q
|
|
->where(function($q) use ($host) {
|
|
return $q->where('region_id',$host)
|
|
->where('host_id',$host);
|
|
})
|
|
->orWhere('host_id',$host);
|
|
})
|
|
->where('node_id',$node)
|
|
->where('point_id',$point)
|
|
->where('zones.domain_id',$do->id)
|
|
->single();
|
|
|
|
return $o;
|
|
}
|
|
|
|
/**
|
|
* Create an activation code for this address
|
|
*
|
|
* @param User $uo
|
|
* @return string
|
|
*/
|
|
public function set_activation(User $uo): string
|
|
{
|
|
return sprintf('%x:%s',
|
|
$this->id,
|
|
substr(md5(sprintf('%d:%x',$uo->id,timew($this->updated_at))),0,10)
|
|
);
|
|
}
|
|
|
|
/**
|
|
* Check the user's activation code for this address is correct
|
|
*
|
|
* @param User $uo
|
|
* @param string $code
|
|
* @return bool
|
|
*/
|
|
public function check_activation(User $uo,string $code): bool
|
|
{
|
|
try {
|
|
Log::info(sprintf('%s:Checking Activation code [%s] is valid for user [%d]',self::LOGKEY,$code,$uo->id));
|
|
|
|
return ($code === $this->set_activation($uo));
|
|
|
|
} catch (\Exception $e) {
|
|
Log::error(sprintf('%s:! Activation code [%s] invalid for user [%d]',self::LOGKEY,$code,$uo->id));
|
|
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Echomail waiting to be sent to this system
|
|
*
|
|
* @return Collection
|
|
*/
|
|
public function echomailWaiting(): Collection
|
|
{
|
|
return $this->echomails()
|
|
->whereNull('sent_at')
|
|
->whereNotNull('export_at')
|
|
->get();
|
|
}
|
|
|
|
/**
|
|
* Files waiting to be sent to this system
|
|
*
|
|
* @return Collection
|
|
*/
|
|
public function filesWaiting(): Collection
|
|
{
|
|
return $this->files()
|
|
->whereNull('sent_at')
|
|
->whereNotNull('export_at')
|
|
->get();
|
|
}
|
|
|
|
/**
|
|
* Get echomail for this node
|
|
*
|
|
* @param bool $update
|
|
* @param Collection|null $echomail
|
|
* @return Packet|null
|
|
*/
|
|
public function getEchomail(bool $update=TRUE,Collection $echomail=NULL): ?Packet
|
|
{
|
|
$pkt = NULL;
|
|
if ($echomail)
|
|
return $this->getPacket($echomail);
|
|
|
|
$s = Setup::findOrFail(config('app.id'));
|
|
|
|
if (($x=$this->echomailWaiting())
|
|
->count())
|
|
{
|
|
// Limit to max messages
|
|
Log::info(sprintf('%s:= Got [%d] echomails for [%s] for sending',self::LOGKEY,$x->count(),$this->ftn));
|
|
|
|
if ($x->count() > $s->msgs_pkt) {
|
|
$x = $x->take($s->msgs_pkt);
|
|
Log::alert(sprintf('%s:= Only sending [%d] echomails for [%s]',self::LOGKEY,$x->count(),$this->ftn));
|
|
}
|
|
|
|
$pkt = $this->getPacket($x);
|
|
|
|
if ($pkt && $pkt->count() && $update)
|
|
DB::table('echomail_seenby')
|
|
->whereIn('echomail_id',$x->pluck('id'))
|
|
->where('address_id',$this->id)
|
|
->whereNull('sent_at')
|
|
->whereNotNull('export_at')
|
|
->update(['sent_pkt'=>$pkt->name]);
|
|
}
|
|
|
|
return $pkt;
|
|
}
|
|
|
|
/**
|
|
* Get files for this node (including it's children)
|
|
*
|
|
* @param bool $update
|
|
* @return Collection
|
|
* @deprecated use filesWaiting() directly
|
|
*/
|
|
public function getFiles(bool $update=TRUE): Collection
|
|
{
|
|
return $this->filesWaiting();
|
|
}
|
|
|
|
/**
|
|
* Get netmail for this node (including it's children)
|
|
*
|
|
* @param bool $update
|
|
* @return Packet|null
|
|
*/
|
|
public function getNetmail(bool $update=FALSE): ?Packet
|
|
{
|
|
$pkt = NULL;
|
|
|
|
$s = Setup::findOrFail(config('app.id'));
|
|
|
|
if (($x=$this->netmailAlertWaiting())->count()) {
|
|
Log::debug(sprintf('%s:= Packaging [%d] netmail alerts to [%s]',self::LOGKEY,$x->count(),$this->ftn));
|
|
$passpos = strpos($x->last()->subject,':');
|
|
|
|
if ($passpos > 8)
|
|
Log::alert(sprintf('%s:! Password would be greater than 8 chars? [%d]',self::LOGKEY,$passpos));
|
|
|
|
$pkt = $this->getPacket($x,substr($x->last()->subject,0,$passpos));
|
|
|
|
if ($pkt && $pkt->count() && $update)
|
|
DB::table('netmails')
|
|
->whereIn('id',$x->pluck('id'))
|
|
->update(['sent_pkt'=>$pkt->name]);
|
|
|
|
return $pkt;
|
|
}
|
|
|
|
if (($x=$this->netmailWaiting())
|
|
->count())
|
|
{
|
|
Log::debug(sprintf('%s:= Got [%d] netmails for [%s] for sending',self::LOGKEY,$x->count(),$this->ftn));
|
|
|
|
if ($x->count() > $s->msgs_pkt) {
|
|
$x = $x->take($s->msgs_pkt);
|
|
Log::alert(sprintf('%s:= Only sending [%d] netmails for [%s]',self::LOGKEY,$x->count(),$this->ftn));
|
|
}
|
|
|
|
$pkt = $this->getPacket($x);
|
|
|
|
if ($pkt && $pkt->count() && $update)
|
|
DB::table('netmails')
|
|
->whereIn('id',$x->pluck('id'))
|
|
->update(['sent_pkt'=>$pkt->name]);
|
|
}
|
|
|
|
return $pkt;
|
|
}
|
|
|
|
/**
|
|
* Return a packet of mail
|
|
*
|
|
* @param Collection $msgs of message models (Echomail/Netmail)
|
|
* @param string|null $passwd Override password used in packet
|
|
* @return Packet|null
|
|
*/
|
|
public function getPacket(Collection $msgs,string $passwd=NULL): ?Packet
|
|
{
|
|
$s = Setup::findOrFail(config('app.id'));
|
|
$ao = $s->system->match($this->zone)->first();
|
|
|
|
// If we dont match on the address, we cannot pack mail for that system
|
|
if (! $ao)
|
|
return NULL;
|
|
|
|
// Get packet type
|
|
$type = collect(Packet::PACKET_TYPES)->get($this->system->pkt_type ?: config('fido.packet_default'));
|
|
$o = new $type;
|
|
$o->addressHeader($ao,$this,$passwd);
|
|
|
|
// $oo = Netmail/Echomail Model
|
|
$c = 0;
|
|
foreach ($msgs as $oo) {
|
|
// Only bundle up to max messages
|
|
if (++$c > $s->msgs_pkt)
|
|
break;
|
|
|
|
$o->addMail($oo->packet($this,$passwd));
|
|
}
|
|
|
|
return $o;
|
|
}
|
|
|
|
/**
|
|
* Netmail waiting to be sent to this system
|
|
*
|
|
* @return Collection
|
|
*/
|
|
public function netmailWaiting(): Collection
|
|
{
|
|
return Netmail::whereIn('tftn_id',(($x=$this->children) ? $x->pluck('id') : collect())->push($this->id))
|
|
->where(function($query) {
|
|
return $query->whereRaw(sprintf('(flags & %d) > 0',Message::FLAG_INTRANSIT))
|
|
->orWhereRaw(sprintf('(flags & %d) > 0',Message::FLAG_LOCAL));
|
|
})
|
|
->whereRaw(sprintf('(flags & %d) = 0',Message::FLAG_SENT))
|
|
->whereNull('sent_at')
|
|
->get();
|
|
}
|
|
|
|
/**
|
|
* Netmail alerts waiting to be sent to this system
|
|
*
|
|
* @return Collection
|
|
*/
|
|
public function netmailAlertWaiting(): Collection
|
|
{
|
|
return Netmail::where('tftn_id',$this->id)
|
|
->whereRaw(sprintf('(flags & %d) > 0',Message::FLAG_LOCAL))
|
|
->whereRaw(sprintf('(flags & %d) > 0',Message::FLAG_PKTPASSWD))
|
|
->whereRaw(sprintf('(flags & %d) = 0',Message::FLAG_SENT))
|
|
->whereNull('sent_at')
|
|
->get();
|
|
}
|
|
|
|
/**
|
|
*
|
|
* Parse a string and split it out as an FTN array
|
|
*
|
|
* @param string $ftn
|
|
* @return array
|
|
* @throws \Exception
|
|
*/
|
|
public static function parseFTN(string $ftn): array
|
|
{
|
|
if (! preg_match(sprintf('#^%s$#',self::ftn_regex),strtolower($ftn),$matches))
|
|
throw new InvalidFTNException(sprintf('Invalid FTN: %s - regex failed',$ftn));
|
|
|
|
// Check our numbers are correct.
|
|
foreach ([1,2,3] as $i) {
|
|
if ((! is_numeric($matches[$i])) || ($matches[$i] > DomainController::NUMBER_MAX))
|
|
throw new InvalidFTNException(sprintf('Invalid FTN: %s - zone, host or node address invalid',$ftn));
|
|
}
|
|
|
|
if (isset($matches[5]) AND ((! is_numeric($matches[$i])) || ($matches[5] > DomainController::NUMBER_MAX)))
|
|
throw new InvalidFTNException(sprintf('Invalid FTN: %s - point address invalid',$ftn));
|
|
|
|
return [
|
|
'z'=>(int)$matches[1],
|
|
'n'=>(int)$matches[2],
|
|
'f'=>(int)$matches[3],
|
|
'p'=>isset($matches[5]) && $matches[5] ? (int)$matches[5] : 0,
|
|
'd'=>$matches[7] ?? NULL
|
|
];
|
|
}
|
|
|
|
/**
|
|
* Retrieve the address session details/passwords
|
|
*
|
|
* @param string $type
|
|
* @return string|null
|
|
*/
|
|
public function session(string $type): ?string
|
|
{
|
|
return ($this->exists && ($x=$this->system->sessions->where('id',$this->zone_id)->first())) ? ($x->pivot->{$type} ?: '') : NULL;
|
|
}
|
|
}
|