Add support for setting per service domain list

3 files changed, 24 insertions, 2 deletions

diff --git a/test/list-services b/test/list-services
index e7476561..abe8420e 100755
--- a/test/list-services
+++ b/test/list-services
@@ -35,7 +35,8 @@ for path in properties["Services"]:
 	for key in properties.keys():
 		if key in ["IPv4", "IPv4.Configuration", "Proxy", "Ethernet"]:
 			val = extract_values(properties[key])
-		elif key in ["Nameservers", "Nameservers.Configuration"]:
+		elif key in ["Nameservers", "Nameservers.Configuration",
+					"Domains", "Domains.Configuration"]:
 			val = extract_list(properties[key])
 		elif key in ["Favorite", "Immutable", "AutoConnect",
 				"SetupRequired", "PassphraseRequired"]:
diff --git a/test/monitor-services b/test/monitor-services
index 5657444c..93fd7581 100755
--- a/test/monitor-services
+++ b/test/monitor-services
@@ -30,7 +30,8 @@ def property_changed(name, value, path):
 		val = val + " ]"
 	elif name in ["IPv4", "IPv4.Configuration", "Proxy", "Ethernet"]:
 		val = extract_values(value)
-	elif name in ["Nameservers", "Nameservers.Configuration"]:
+	elif name in ["Nameservers", "Nameservers.Configuration",
+					"Domains", "Domains.Configuration"]:
 		val = extract_list(value)
 	elif name in ["Strength", "Priority"]:
 		val = int(value)
diff --git a/test/set-domains b/test/set-domains
new file mode 100755
index 00000000..c45034c8
--- /dev/null
+++ b/test/set-domains
@@ -0,0 +1,20 @@
+#!/usr/bin/python
+
+import sys
+import dbus
+
+if (len(sys.argv) < 2):
+	print "Usage: %s <service> [domain*]" % (sys.argv[0])
+	sys.exit(1)
+
+bus = dbus.SystemBus()
+path = "/profile/default/" + sys.argv[1]
+service = dbus.Interface(bus.get_object('org.moblin.connman', path),
+					'org.moblin.connman.Service')
+
+properties = service.GetProperties()
+
+print "Setting domains to %s" % (sys.argv[2:])
+
+service.SetProperty("Domains.Configuration", 
+	dbus.Array(sys.argv[2:], signature=dbus.Signature('s')))