From 092b82203368e13a31dadd1353cacde0a051e585 Mon Sep 17 00:00:00 2001
From: Daniele Alessandri <suppakilla@gmail.com>
Date: Fri, 13 May 2011 20:06:06 +0200
Subject: [PATCH] Add an example for server-side scripting with Lua using
 Predis abstractions.

---
 examples/ServerSideScripting.php | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100644 examples/ServerSideScripting.php

diff --git a/examples/ServerSideScripting.php b/examples/ServerSideScripting.php
new file mode 100644
index 00000000..df1599c5
--- /dev/null
+++ b/examples/ServerSideScripting.php
@@ -0,0 +1,32 @@
+<?php
+
+require 'SharedConfigurations.php';
+
+// Additionally to the EVAL command defined in the current development profile, the new
+// Predis\Commands\ScriptedCommand base class can be used to build an higher abstraction
+// for our "scripted" commands so that they will appear just like any other command on
+// the client-side. This is a quick example used to implement INCREX.
+
+use Predis\Commands\ScriptedCommand;
+
+class IncrementExistingKey extends ScriptedCommand {
+    protected function keysCount() {
+        return 1;
+    }
+
+    public function getScript() {
+        return
+<<<LUA
+    if redis('exists', KEYS[1]) == 1 then
+        return redis('incr', KEYS[1])
+    end
+LUA;
+    }
+}
+
+$client = new Predis\Client($single_server, 'dev');
+$client->getProfile()->defineCommand('increx', 'IncrementExistingKey');
+
+$client->set('foo', 10);
+var_dump($client->increx('foo'));       // int(11)
+var_dump($client->increx('bar'));       // NULL