1 files changed, 56 insertions, 0 deletions
diff --git a/funcs/func_env.c b/funcs/func_env.c
new file mode 100755
index 000000000..fd9c68621
--- /dev/null
+++ b/funcs/func_env.c
@@ -0,0 +1,56 @@
+/*
+ * Asterisk -- A telephony toolkit for Linux.
+ *
+ * MD5 digest related dialplan functions
+ * 
+ * Copyright (C) 2005, Digium, Inc.
+ *
+ * This program is free software, distributed under the terms of
+ * the GNU General Public License
+ */
+
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+
+#include "asterisk/channel.h"
+#include "asterisk/pbx.h"
+#include "asterisk/logger.h"
+#include "asterisk/utils.h"
+#include "asterisk/app.h"
+
+static char *builtin_function_env_read(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+{
+	char *ret = "";
+
+	if (data) {
+		ret = getenv(data);
+		if (!ret)
+			ret = "";
+	}
+	ast_copy_string(buf, ret, len);
+
+	return buf;
+}
+
+static void builtin_function_env_write(struct ast_channel *chan, char *cmd, char *data, const char *value) 
+{
+	if (data && !ast_strlen_zero(data)) {
+		if (value && !ast_strlen_zero(value)) {
+			setenv(data, value, 1);
+		} else {
+			unsetenv(data);
+		}
+	}
+}
+
+#ifndef BUILTIN_FUNC
+static
+#endif
+struct ast_custom_function env_function = {
+	.name = "ENV",
+	.synopsis = "Gets or sets the environment variable specified",
+	.syntax = "ENV(<envname>)",
+	.read = builtin_function_env_read,
+	.write = builtin_function_env_write,
+};