From 4eebbfb79c42abd8ebcd7d1776f164588a3d16b0 Mon Sep 17 00:00:00 2001
From: Naglfar <naglfar@tilde.institute>
Date: Fri, 8 Jan 2021 01:48:41 +0100
Subject: Add data management php scripts

---
 php/definitions.php   |  8 ++++++++
 php/vm-procedures.php | 17 +++++++++++++++++
 php/ws-procedures.php | 10 ++++++++++
 3 files changed, 35 insertions(+)
 create mode 100644 php/definitions.php
 create mode 100644 php/vm-procedures.php
 create mode 100644 php/ws-procedures.php

diff --git a/php/definitions.php b/php/definitions.php
new file mode 100644
index 0000000..3da4399
--- /dev/null
+++ b/php/definitions.php
@@ -0,0 +1,8 @@
+<?php // Variables and constants definition 
+$dpath = 'data/';
+$toc = 'toc.mvms';	  # Table of contents
+$common = 'common.mvms';  # common header/footer contents
+$channel = 'channel';	  # Channel index
+$cpath = 'mvms/';	  # Path of the contents
+$vid = 0;		  # default video
+?>
diff --git a/php/vm-procedures.php b/php/vm-procedures.php
new file mode 100644
index 0000000..3abb46f
--- /dev/null
+++ b/php/vm-procedures.php
@@ -0,0 +1,17 @@
+<?php
+$vindex = file($dpath.$mdata[3].'/'.$toc, FILE_IGNORE_NEW_LINES); 
+$cindex = file($dpath.$mdata[3].'/'.$channel, FILE_IGNORE_NEW_LINES);
+
+/* 1 parse the URL */
+$vdata = explode('/', $_SERVER['REQUEST_URI']);
+
+/* 2 security check */
+if(!empty($vdata[1]))
+  foreach($vindex as $i => $value)
+    if($vdata[1] == $value)
+      $vid = $i;
+
+$vdata = file($dpath.$mdata[3].'/'.$vid, FILE_IGNORE_NEW_LINES);
+$vdata[1] = date('M j, Y', $vdata[1]);
+$vdata[] = file_get_contents($dpath.$mdata[3].'/'.$cpath.$vid);
+?>
diff --git a/php/ws-procedures.php b/php/ws-procedures.php
new file mode 100644
index 0000000..5dc685a
--- /dev/null
+++ b/php/ws-procedures.php
@@ -0,0 +1,10 @@
+<?php
+//read the file and create array separate by new line
+$mdata = file($dpath.'/'.$common, FILE_IGNORE_NEW_LINES);
+
+# Language overwritten by the browser preference
+if(isset($_SERVER['HTTP_ACCEPT_LANGUAGE']))
+  $mdata[3] = substr($_SERVER['HTTP_ACCEPT_LANGUAGE'], 0,2);
+
+$mdata = array_merge($mdata, file($dpath.$mdata[3].'/'.$common, FILE_IGNORE_NEW_LINES));
+?>
-- 
cgit 1.4.1-2-gfad0