projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
40361: Vocus CDR Format [minor doc fix]
[freeside.git]
/
FS
/
FS
/
tower_sector.pm
diff --git
a/FS/FS/tower_sector.pm
b/FS/FS/tower_sector.pm
index
8b4c222
..
3fadc86
100644
(file)
--- a/
FS/FS/tower_sector.pm
+++ b/
FS/FS/tower_sector.pm
@@
-2,6
+2,7
@@
package FS::tower_sector;
use base qw( FS::Record );
use Class::Load qw(load_class);
use base qw( FS::Record );
use Class::Load qw(load_class);
+use File::Path qw(make_path);
use Data::Dumper;
use strict;
use Data::Dumper;
use strict;
@@
-253,13
+254,17
@@
PARAMS must include 'sectornum'.
sub process_generate_coverage {
my $job = shift;
my $param = shift;
sub process_generate_coverage {
my $job = shift;
my $param = shift;
- warn Dumper($param);
- $job->update_statustext('0,generating map');
+ $job->update_statustext('0,generating map') if $job;
my $sectornum = $param->{sectornum};
my $sectornum = $param->{sectornum};
- my $sector = FS::tower_sector->by_key($sectornum);
+ my $sector = FS::tower_sector->by_key($sectornum)
+ or die "sector $sectornum does not exist";
my $tower = $sector->tower;
load_class('Map::Splat');
my $tower = $sector->tower;
load_class('Map::Splat');
+ # since this is still experimental, put it somewhere we can find later
+ my $workdir = "$FS::UID::cache_dir/cache.$FS::UID::datasrc/" .
+ "generate_coverage/sector$sectornum-". time;
+ make_path($workdir);
my $splat = Map::Splat->new(
lon => $tower->longitude,
lat => $tower->latitude,
my $splat = Map::Splat->new(
lon => $tower->longitude,
lat => $tower->latitude,
@@
-271,6
+276,7
@@
sub process_generate_coverage {
v_width => $sector->v_width,
max_loss => $sector->margin,
min_loss => $sector->margin - 80,
v_width => $sector->v_width,
max_loss => $sector->margin,
min_loss => $sector->margin - 80,
+ dir => $workdir,
);
$splat->calculate;
);
$splat->calculate;