1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
|
<& /elements/header.html, 'Towers and sectors' &>
<script type="text/javascript">
$(function() {
var toggles = $('ul.tower_sector_list input[type=checkbox]');
toggles.on('click', function() {
<& elements/gmap.html, features => \@features, overlays => \@overlays &>
<& /elements/footer.html &>
<%init>
die "access denied" unless
$FS::CurrentUser::CurrentUser->access_right('Configuration');
my $conf = new FS::Conf;
my @features; # geoJSON structure
my %sectors;
my %towers;
my %tower_coord;
my %tower_bounds;
foreach my $tower (qsearch('towers', {})) {
my $towernum = $tower->towernum;
$towers{$towernum} = $tower;
next if !$tower->latitude or !$tower->longitude;
$tower_coord{$towernum} =
[ $tower->longitude + 0,
$tower->latitude + 0,
($tower->altitude || 0) + 0,
];
# should figure out bounds to include coverage areas
push @features,
{
id => 'tower/'.$towernum,
geometry => {
type => 'Point',
coordinates => $tower_coord{$towernum},
},
properties => {
style => {
icon => {
path => undef,
url => $fsurl.'images/jcartier-antenna-square-21x51.png',
anchor => { x => 10, y => 4 }
},
},
content => include('.tower', $tower),
bounds => $tower_bounds{$towernum},
},
};
# XXX show sector coverage zones
} # foreach $svc_broadband
</%init>
</%def>
<%def .tower>
% my $tower = shift;
% my $can_edit = $FS::CurrentUser::CurrentUser->access_right('Configuration');
<H3>
% if ( $can_edit ) {
% # XXX open within the InfoWindow, or at least in a popup
<a target="_blank" href="<% $fsurl %>edit/tower.html?<% $tower->towernum %>">
% }
Tower #<% $tower->towernum %> | <% $tower->towername %>
% if ( $can_edit ) {
</a>
% }
</H3>
<ul class="tower_sector_list">
% foreach my $sector ($tower->tower_sector) { # default sector?
<li>
<input type="checkbox" value="<% $sector->sectornum %>">
<% $sector->sectorname %>
</li>
% }
</ul>
</%def>
|
