1 | <?php |
||
2 | |||
3 | namespace Smindel\GIS\Forms; |
||
4 | |||
5 | use SilverStripe\Core\Config\Configurable; |
||
6 | use SilverStripe\Forms\GridField\GridField; |
||
7 | use SilverStripe\Forms\GridField\GridField_HTMLProvider; |
||
8 | use SilverStripe\Forms\GridField\GridField_DataManipulator; |
||
9 | use SilverStripe\View\Requirements; |
||
10 | use SilverStripe\Core\Injector\Injectable; |
||
11 | use SilverStripe\Core\Config\Config; |
||
12 | use SilverStripe\ORM\SS_List; |
||
13 | use Smindel\GIS\GIS; |
||
14 | use proj4php\Proj4php; |
||
15 | use proj4php\Proj; |
||
16 | use proj4php\Point; |
||
17 | |||
18 | /** |
||
19 | * GridFieldPaginator paginates the {@link GridField} list and adds controls |
||
20 | * to the bottom of the {@link GridField}. |
||
21 | */ |
||
22 | class GridFieldMap implements GridField_HTMLProvider, GridField_DataManipulator |
||
23 | { |
||
24 | use Injectable; |
||
25 | |||
26 | use Configurable; |
||
27 | |||
28 | protected $attribute; |
||
29 | |||
30 | 1 | public function __construct($attribute = null) |
|
31 | { |
||
32 | 1 | $this->attribute = $attribute; |
|
33 | 1 | } |
|
34 | |||
35 | /** |
||
36 | * |
||
37 | * @param GridField $gridField |
||
38 | * @return array |
||
39 | */ |
||
40 | 1 | public function getHTMLFragments($gridField) |
|
41 | { |
||
42 | 1 | $srid = GIS::config()->default_srid; |
|
43 | 1 | $proj = GIS::config()->projections[$srid]; |
|
44 | |||
45 | 1 | Requirements::javascript('smindel/silverstripe-gis: client/dist/js/leaflet.js'); |
|
46 | 1 | Requirements::javascript('smindel/silverstripe-gis: client/dist/js/leaflet.markercluster.js'); |
|
47 | 1 | Requirements::javascript('smindel/silverstripe-gis: client/dist/js/leaflet-search.js'); |
|
48 | 1 | Requirements::javascript('smindel/silverstripe-gis: client/dist/js/proj4.js'); |
|
49 | 1 | Requirements::customScript(sprintf('proj4.defs("EPSG:%s", "%s");', $srid, $proj), 'EPSG:' . $srid); |
|
50 | 1 | Requirements::javascript('smindel/silverstripe-gis: client/dist/js/GridFieldMap.js'); |
|
51 | 1 | Requirements::css('smindel/silverstripe-gis: client/dist/css/leaflet.css'); |
|
52 | 1 | Requirements::css('smindel/silverstripe-gis: client/dist/css/MarkerCluster.css'); |
|
53 | 1 | Requirements::css('smindel/silverstripe-gis: client/dist/css/MarkerCluster.Default.css'); |
|
54 | 1 | Requirements::css('smindel/silverstripe-gis: client/dist/css/leaflet-search.css'); |
|
55 | |||
56 | 1 | $defaultLocation = Config::inst()->get(MapField::class, 'default_location'); |
|
57 | |||
58 | return array( |
||
59 | 1 | 'before' => sprintf( |
|
60 | 1 | '<div class="grid-field-map" data-map-center="%s" data-list="%s" style="z-index:0;"></div>', |
|
61 | 1 | GIS::create([$defaultLocation['lon'], $defaultLocation['lat']]), |
|
62 | 1 | htmlentities( |
|
63 | 1 | self::get_geojson_from_list( |
|
64 | 1 | $gridField->getList(), |
|
65 | 1 | $this->attribute ?: GIS::of($gridField->getList()->dataClass()) |
|
0 ignored issues
–
show
Bug
introduced
by
![]() |
|||
66 | ), |
||
67 | 1 | ENT_QUOTES, |
|
68 | 1 | 'UTF-8' |
|
69 | ) |
||
70 | ), |
||
71 | ); |
||
72 | } |
||
73 | |||
74 | 1 | public static function get_geojson_from_list($list, $geometryField = null) |
|
75 | { |
||
76 | 1 | $modelClass = $list->dataClass(); |
|
77 | |||
78 | 1 | $geometryField = $geometryField ?: GIS::of($modelClass); |
|
79 | |||
80 | 1 | $collection = []; |
|
81 | |||
82 | 1 | foreach ($list as $item) { |
|
83 | 1 | if (!$item->canView()) { |
|
84 | continue; |
||
85 | } |
||
86 | |||
87 | 1 | $geo = GIS::create($item->$geometryField)->reproject(4326); |
|
88 | |||
89 | 1 | $collection[$item->ID] = [ |
|
90 | 1 | $item->Title, |
|
91 | 1 | $geo->type, |
|
92 | 1 | $geo->coordinates, |
|
93 | ]; |
||
94 | } |
||
95 | |||
96 | 1 | return json_encode($collection); |
|
97 | } |
||
98 | |||
99 | /** |
||
100 | * Manipulate the {@link DataList} as needed by this grid modifier. |
||
101 | * |
||
102 | * @param GridField $gridField |
||
103 | * @param SS_List $dataList |
||
104 | * @return \SilverStripe\ORM\DataList |
||
105 | */ |
||
106 | public function getManipulatedData(GridField $gridField, SS_List $dataList) |
||
107 | { |
||
108 | return $dataList; |
||
109 | } |
||
110 | } |
||
111 |