From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Wed, 7 Sep 2016 01:12:54 +0000 (+0100)
Subject: Bed
X-Git-Url: https://git.nbdom.net/?a=commitdiff_plain;h=53f6bb5e61431f023bb6bb6fd2a76d21f5a5801e;p=nb.git

Bed
---

diff --git a/etc/profile.d/php.sh b/etc/profile.d/php.sh
new file mode 100644
index 00000000..fd7faa28
--- /dev/null
+++ b/etc/profile.d/php.sh
@@ -0,0 +1,7 @@
+php425() {
+#array("");
+  local in=cat
+  [ -n "$*" ] && in="echo $*"
+  #$in | perl -pe ' s/\barray\(((?:[^()]++|\((?R)\))*)\)/[$1]/g '
+  $in | perl -e '$_=join("",<>); s/\barray\(((?:[^()]++|\((?R)\))*)\)/[$1]/sg; print $_; '
+}
diff --git a/lib/php/db/page.php b/lib/php/db/page.php
new file mode 100644
index 00000000..5ecfa15e
--- /dev/null
+++ b/lib/php/db/page.php
@@ -0,0 +1,32 @@
+<?php
+require_once(dirname(__FILE__).'/../config.php');
+require_once(dirname(__FILE__).'/../page.php');
+#bye(Page::p('web'));
+$Page = new Page([
+  #'title' => 'Test',
+  'content_type' => (Page::php_cli() and !Page::p('web') ? 'text/plain' : 'text/html'),
+  'call' => array(
+    'begin',
+    ['out', "Hello World !!!\n"],
+    function($page){
+      #$type = $page->mime2ext($page->content_type());
+      switch ($page->mime2ext($page->content_type())) {
+        case "html":
+          $page->pdef('format','table');
+          break;
+        case "txt":
+          $page->pdef('format','human');
+          break;
+        default:
+          #bye($type);
+          $page->pdef('format','csv');
+      }
+      if ($page->action()) 1;
+      else require_once(dirname(__FILE__).'/index.php');
+      #else if (!empty($page->db)) $page->db->action($page->db->p('action'),empty($Table) ? null : $Table);
+    },
+    #array('out', print_r($_SERVER,true)),
+    'end',
+  ),
+]);
+#$Page->db = $Db;