From b2758c687ab8c36ef7a48787b4d590255e69cbc0 Mon Sep 17 00:00:00 2001
From: Emiel Bruijntjes <emiel.bruijntjes@copernica.com>
Date: Sun, 25 Jan 2015 20:41:13 +0100
Subject: added Php::define() function to create constants at run time

---
 zend/constantfuncs.cpp | 71 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)

(limited to 'zend/constantfuncs.cpp')

diff --git a/zend/constantfuncs.cpp b/zend/constantfuncs.cpp
index c350f91..40ea20e 100644
--- a/zend/constantfuncs.cpp
+++ b/zend/constantfuncs.cpp
@@ -60,6 +60,77 @@ Value constant(const std::string &name)
     return constant(name.c_str(), name.size());
 }
 
+/**
+ *  Define a new constant
+ *  @param  name            Name of the constant
+ *  @param  size            Size of the name
+ *  @param  value           Value of the constant
+ *  @return bool
+ */
+bool define(const char *name, size_t size, const Value &value)
+{
+    // we need the tsrm_ls variable
+    TSRMLS_FETCH();
+    
+    // the constant structure from the zend engine
+    zend_constant constant;
+    
+    // copy the name (note that name_len also includes the end-of-string '\0' byte)
+    constant.name = zend_strndup(name, size);
+    constant.name_len = size + 1;
+    
+    // only scalar values can be used for constants
+    if (value.isScalar())
+    {
+        // make a full copy of the passed in zval
+        constant.value = *value._val;
+        zval_copy_ctor(&constant.value);
+    }
+    else
+    {
+        // we're going to convert the value object into a string, and use that
+        Value str = value.clone(Type::String);
+        
+        // use the copied value
+        constant.value = *str._val;
+        zval_copy_ctor(&constant.value);
+    }
+    
+    // constants are case sensitive (but not persistent, because this is a user
+    // space constant!)
+    constant.flags = CONST_CS;
+
+    // as module number we use a fake module number
+    constant.module_number = PHP_USER_CONSTANT;
+    
+    // register the constant
+    return zend_register_constant(&constant TSRMLS_CC) == SUCCESS;
+}
+
+/**
+ *  Define a new constant
+ *  @param  name
+ *  @param  value
+ *  @return bool
+ */
+bool define(const char *name, const Value &value)
+{
+    // define a constant
+    return define(name, ::strlen(name), value);
+}
+
+/**
+ *  Define a new constant
+ *  @param  name
+ *  @param  value
+ *  @return bool
+ */
+bool define(const std::string &name, const Value &value)
+{
+    // pass on to the other define function
+    return define(name.c_str(), name.size(), value);
+}
+
 /**
  *  Check whether a constant exists
  *  @param  name
-- 
cgit v1.2.3