diff --git a/Makefile.am b/Makefile.am
index 6bef0d40..1e559a7e 100644
--- a/Makefile.am
+++ b/Makefile.am
@@ -814,7 +814,8 @@ test_scripts = test/backtrace \
 		test/set-lte-property \
 		test/test-serving-cell-info \
 		test/ims-register \
-		test/ims-unregister
+		test/ims-unregister \
+		test/list-applications
 
 
 if TEST
diff --git a/test/list-applications b/test/list-applications
new file mode 100755
index 00000000..217ba80d
--- /dev/null
+++ b/test/list-applications
@@ -0,0 +1,29 @@
+#!/usr/bin/python3
+
+import dbus
+
+bus = dbus.SystemBus()
+
+manager = dbus.Interface(bus.get_object('org.ofono', '/'),
+						'org.ofono.Manager')
+
+modems = manager.GetModems()
+
+for path, properties in modems:
+	print("[ %s ]" % (path))
+
+	if "org.ofono.SimAuthentication" not in properties["Interfaces"]:
+		continue
+
+	simauth = dbus.Interface(bus.get_object('org.ofono', path),
+					'org.ofono.SimAuthentication')
+
+	apps = simauth.GetApplications()
+	for path, properties in apps.items():
+		print("    [ %s ]" % (path))
+
+		for key in properties.keys():
+			val = str(properties[key])
+			print("        %s = %s" % (key, val))
+
+		print('')