MDL-36906 - mod_data: Latitude and Logitude error fix.
[moodle.git] / mod / data / field / latlong / kml.php
1 <?php
3 // This file is part of Moodle - http://moodle.org/
4 //
5 // Moodle is free software: you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation, either version 3 of the License, or
8 // (at your option) any later version.
9 //
10 // Moodle is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 // GNU General Public License for more details.
14 //
15 // You should have received a copy of the GNU General Public License
16 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
18 // A lot of this initial stuff is copied from mod/data/view.php
20 require_once('../../../../config.php');
21 require_once('../../lib.php');
23 // Optional params: row id "rid" - if set then export just one, otherwise export all
25 $d       = required_param('d', PARAM_INT);   // database id
26 $fieldid = required_param('fieldid', PARAM_INT);   // field id
27 $rid     = optional_param('rid', 0, PARAM_INT);    //record id
29 $url = new moodle_url('/mod/data/field/latlong/kml.php', array('d'=>$d, 'fieldid'=>$fieldid));
30 if ($rid !== 0) {
31     $url->param('rid', $rid);
32 }
33 $PAGE->set_url($url);
35 if ($rid) {
36     if (! $record = $DB->get_record('data_records', array('id'=>$rid))) {
37         print_error('invalidrecord', 'data');
38     }
39     if (! $data = $DB->get_record('data', array('id'=>$record->dataid))) {
40         print_error('invalidid', 'data');
41     }
42     if (! $course = $DB->get_record('course', array('id'=>$data->course))) {
43         print_error('coursemisconf');
44     }
45     if (! $cm = get_coursemodule_from_instance('data', $data->id, $course->id)) {
46         print_error('invalidcoursemodule');
47     }
48     if (! $field = $DB->get_record('data_fields', array('id'=>$fieldid))) {
49         print_error('invalidfieldid', 'data');
50     }
51     if (! $field->type == 'latlong') { // Make sure we're looking at a latlong data type!
52         print_error('invalidfieldtype', 'data');
53     }
54     if (! $content = $DB->get_record('data_content', array('fieldid'=>$fieldid, 'recordid'=>$rid))) {
55         print_error('nofieldcontent', 'data');
56     }
57 } else {   // We must have $d
58     if (! $data = $DB->get_record('data', array('id'=>$d))) {
59         print_error('invalidid', 'data');
60     }
61     if (! $course = $DB->get_record('course', array('id'=>$data->course))) {
62         print_error('coursemisconf');
63     }
64     if (! $cm = get_coursemodule_from_instance('data', $data->id, $course->id)) {
65         print_error('invalidcoursemodule');
66     }
67     if (! $field = $DB->get_record('data_fields', array('id'=>$fieldid))) {
68         print_error('invalidfieldid', 'data');
69     }
70     if (! $field->type == 'latlong') { // Make sure we're looking at a latlong data type!
71         print_error('invalidfieldtype', 'data');
72     }
73     $record = NULL;
74 }
76 require_course_login($course, true, $cm);
78 $context = context_module::instance($cm->id);
80 /// If it's hidden then it's don't show anything.  :)
81 if (empty($cm->visible) and !has_capability('moodle/course:viewhiddenactivities', $context)) {
82     $PAGE->set_title($data->name);
83     echo $OUTPUT->header();
84     notice(get_string("activityiscurrentlyhidden"));
85 }
87 /// If we have an empty Database then redirect because this page is useless without data
88 if (has_capability('mod/data:managetemplates', $context)) {
89     if (!$DB->record_exists('data_fields', array('dataid'=>$data->id))) {      // Brand new database!
90         redirect($CFG->wwwroot.'/mod/data/field.php?d='.$data->id);  // Redirect to field entry
91     }
92 }
97 //header('Content-type: text/plain'); // This is handy for debug purposes to look at the KML in the browser
98 header('Content-type: application/vnd.google-earth.kml+xml kml');
99 header('Content-Disposition: attachment; filename="moodleearth-'.$d.'-'.$rid.'-'.$fieldid.'.kml"');
102 echo data_latlong_kml_top();
104 if($rid) { // List one single item
105     $pm = new stdClass();
106     $pm->name = data_latlong_kml_get_item_name($content, $field);
107     $pm->description = "&lt;a href='$CFG->wwwroot/mod/data/view.php?d=$d&amp;rid=$rid'&gt;Item #$rid&lt;/a&gt; in Moodle data activity";
108     $pm->long = $content->content1;
109     $pm->lat = $content->content;
110     echo data_latlong_kml_placemark($pm);
111 } else {   // List all items in turn
113     $contents = $DB->get_records('data_content', array('fieldid'=>$fieldid));
115     echo '<Document>';
117     foreach($contents as $content) {
118         $pm->name = data_latlong_kml_get_item_name($content, $field);
119         $pm->description = "&lt;a href='$CFG->wwwroot/mod/data/view.php?d=$d&amp;rid=$content->recordid'&gt;Item #$content->recordid&lt;/a&gt; in Moodle data activity";
120         $pm->long = $content->content1;
121         $pm->lat = $content->content;
122         echo data_latlong_kml_placemark($pm);
123     }
125     echo '</Document>';
129 echo data_latlong_kml_bottom();
134 function data_latlong_kml_top() {
135     return '<?xml version="1.0" encoding="UTF-8"?>
136 <kml xmlns="http://earth.google.com/kml/2.0">
138 ';
141 function data_latlong_kml_placemark($pm) {
142     return '<Placemark>
143   <description>'.$pm->description.'</description>
144   <name>'.$pm->name.'</name>
145   <LookAt>
146     <longitude>'.$pm->long.'</longitude>
147     <latitude>'.$pm->lat.'</latitude>
148     <range>30500.8880792294568</range>
149     <tilt>46.72425699662645</tilt>
150     <heading>0.0</heading>
151   </LookAt>
152   <visibility>0</visibility>
153   <Point>
154     <extrude>1</extrude>
155     <altitudeMode>relativeToGround</altitudeMode>
156     <coordinates>'.$pm->long.','.$pm->lat.',50</coordinates>
157   </Point>
158 </Placemark>
159 ';
162 function data_latlong_kml_bottom() {
163     return '</kml>';
166 function data_latlong_kml_get_item_name($content, $field) {
167     global $DB;
169     // $field->param2 contains the user-specified labelling method
171     $name = '';
173     if($field->param2 > 0) {
174         $name = htmlspecialchars($DB->get_field('data_content', 'content', array('fieldid'=>$field->param2, 'recordid'=>$content->recordid)));
175     }elseif($field->param2 == -2) {
176         $name = $content->content . ', ' . $content->content1;
177     }
178     if($name=='') { // Done this way so that "item #" is the default that catches any problems
179         $name = get_string('entry', 'data') . " #$content->recordid";
180     }
183     return $name;