MT#4685 Export latest firmware version for model.

This can be used in config scripts to check whether to do an upgrade.
agranig/rest
Andreas Granig 12 years ago
parent 39698f4ce7
commit 57bc4218e7

@ -2,7 +2,7 @@
[% barge_in = 0 -%]
<Profile_Rule>[% config.url %]</Profile_Rule>
<Upgrade_Enable>Yes</Upgrade_Enable>
<Upgrade_Rule>[% firmware.baseurl %]/$MA/from/$SWVER/next</Upgrade_Rule>
<Upgrade_Rule>($SWVER &lt; [% firmware.maxversion %])? [% firmware.baseurl %]/$MA/from/$SWVER/next</Upgrade_Rule>
<Station_Name>[% phone.stationname %]</Station_Name>
<Station_Display_Name>[% phone.stationname %]</Station_Display_Name>
<Server_Type>RFC3265_4235</Server_Type>

@ -908,11 +908,17 @@ sub dev_field_config :Chained('/') :PathPart('device/autoprov/config') :Args() {
},
};
$vars->{firmware} = {
baseurl => 'http://' . $c->req->uri->host . ':' .
$vars->{firmware}->{baseurl} = 'http://' . $c->req->uri->host . ':' .
($c->config->{web}->{autoprov_plain_port} // '1444') .
'/device/autoprov/firmware',
};
'/device/autoprov/firmware';
my $latest_fw = $c->model('DB')->resultset('autoprov_firmwares')->search({
device_id => $model->id,
}, {
order_by => { -desc => 'version' },
})->first;
if($latest_fw) {
$vars->{firmware}->{maxversion} = $latest_fw->version;
}
my @lines = ();
foreach my $linerange($model->autoprov_device_line_ranges->all) {

Loading…
Cancel
Save