From e2c1c6265b43d64442473225b0b01f829f7dec67 Mon Sep 17 00:00:00 2001
From: Simon Rettberg
Date: Mon, 29 Aug 2016 17:13:19 +0200
Subject: [baseconfig_bwidm] New module: baseconfig hook for bwidm
 configuration

---
 .../baseconfig_bwidm/hooks/cron.inc.php            | 39 ++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100644 modules-available/baseconfig_bwidm/hooks/cron.inc.php

(limited to 'modules-available/baseconfig_bwidm/hooks/cron.inc.php')

diff --git a/modules-available/baseconfig_bwidm/hooks/cron.inc.php b/modules-available/baseconfig_bwidm/hooks/cron.inc.php
new file mode 100644
index 00000000..32c1bd73
--- /dev/null
+++ b/modules-available/baseconfig_bwidm/hooks/cron.inc.php
@@ -0,0 +1,39 @@
+<?php
+
+define('PROP_KEY_BWIDM', 'bwlp.bwidm.fetcher');
+define('BWLP_SETTINGS_JSON', '/var/cache/slx-admin/baseconfig-bwidm_settings.json');
+
+call_user_func(function()
+{
+	if (Property::get(PROP_KEY_BWIDM) !== false && file_exists(BWLP_SETTINGS_JSON))
+		return;
+	Property::set(PROP_KEY_BWIDM, true, 240);
+	$ret = Download::asString('https://bwlp-masterserver.ruf.uni-freiburg.de/webif/pam.php', 10, $code);
+	if (!preg_match_all('/^([^=]+)=/m', $ret, $out))
+		return;
+	$data = array("SLX_BWIDM_AUTH" => array(
+			"catid" => "sysconfig",
+			"defaultvalue" => "no",
+			"permissions" => "2",
+			"validator" => "list:no|selective|yes",
+			"shadows" => array(
+				"no" => array(
+					"SLX_BWIDM_ORGS"
+				),
+				"yes" => array(
+					"SLX_BWIDM_ORGS"
+				)
+			)
+		),
+		"SLX_BWIDM_ORGS" => array(
+			"catid" => "sysconfig",
+			"defaultvalue" => "",
+			"permissions" => "2",
+			"validator" => "multilist:" . implode('|', $out[1])
+		)
+	);
+	if (!file_put_contents(BWLP_SETTINGS_JSON, json_encode($data))) {
+		$error = error_get_last();
+		EventLog::warning('Could not write bwIDM data to ' . BWLP_SETTINGS_JSON, $error['message']);
+	}
+});
\ No newline at end of file
-- 
cgit v1.2.3-55-g7522