QuickNanoBrowser: Add feature permission request handling

Pick-to: 6.5
Change-Id: Ia0d8bffa419174234e78e1359871e0dfa36b1636
Reviewed-by: Leena Miettinen <riitta-leena.miettinen@qt.io>
Reviewed-by: Allan Sandfeld Jensen <allan.jensen@qt.io>

2 files changed, 98 insertions, 6 deletions

diff --git a/examples/webenginequick/quicknanobrowser/BrowserWindow.qml b/examples/webenginequick/quicknanobrowser/BrowserWindow.qml
index 3a478ae19..a517c5a51 100644
--- a/examples/webenginequick/quicknanobrowser/BrowserWindow.qml
+++ b/examples/webenginequick/quicknanobrowser/BrowserWindow.qml
@@ -603,6 +603,12 @@ ApplicationWindow {
                         findBar.reset();
                 }
 
+                onFeaturePermissionRequested: function(securityOrigin, feature) {
+                    featurePermissionDialog.securityOrigin = securityOrigin;
+                    featurePermissionDialog.feature = feature;
+                    featurePermissionDialog.visible = true;
+                }
+
                 Timer {
                     id: reloadTimer
                     interval: 0
@@ -641,22 +647,21 @@ ApplicationWindow {
     Dialog {
         id: sslDialog
         anchors.centerIn: parent
-        contentWidth: Math.max(mainText.width, detailedText.width)
-        contentHeight: mainText.height + detailedText.height
+        contentWidth: Math.max(mainTextForSSLDialog.width, detailedTextForSSLDialog.width)
+        contentHeight: mainTextForSSLDialog.height + detailedTextForSSLDialog.height
         property var certErrors: []
         // fixme: icon!
         // icon: StandardIcon.Warning
         standardButtons: Dialog.No | Dialog.Yes
         title: "Server's certificate not trusted"
         contentItem: Item {
-            id: textContentItem
             Label {
-                id: mainText
+                id: mainTextForSSLDialog
                 text: "Do you wish to continue?"
             }
             Text {
-                id: detailedText
-                anchors.top: mainText.bottom
+                id: detailedTextForSSLDialog
+                anchors.top: mainTextForSSLDialog.bottom
                 text: "If you wish so, you may continue with an unverified certificate.\n" +
                       "Accepting an unverified certificate means\n" +
                       "you may not be connected with the host you tried to connect to.\n" +
@@ -682,6 +687,68 @@ ApplicationWindow {
             visible = certErrors.length > 0
         }
     }
+    Dialog {
+        id: featurePermissionDialog
+        anchors.centerIn: parent
+        width: Math.min(browserWindow.width, browserWindow.height) / 3 * 2
+        contentWidth: mainTextForPermissionDialog.width
+        contentHeight: mainTextForPermissionDialog.height
+        standardButtons: Dialog.No | Dialog.Yes
+        title: "Permission Request"
+
+        property var feature;
+        property url securityOrigin;
+
+        contentItem: Item {
+            Label {
+                id: mainTextForPermissionDialog
+                text: featurePermissionDialog.questionForFeature()
+            }
+        }
+
+        onAccepted: currentWebView && currentWebView.grantFeaturePermission(securityOrigin, feature, true)
+        onRejected: currentWebView && currentWebView.grantFeaturePermission(securityOrigin, feature, false)
+        onVisibleChanged: {
+            if (visible)
+                width = contentWidth + 20;
+        }
+
+        function questionForFeature() {
+            var question = "Allow " + securityOrigin + " to "
+
+            switch (feature) {
+            case WebEngineView.Geolocation:
+                question += "access your location information?";
+                break;
+            case WebEngineView.MediaAudioCapture:
+                question += "access your microphone?";
+                break;
+            case WebEngineView.MediaVideoCapture:
+                question += "access your webcam?";
+                break;
+            case WebEngineView.MediaVideoCapture:
+                question += "access your microphone and webcam?";
+                break;
+            case WebEngineView.MouseLock:
+                question += "lock your mouse cursor?";
+                break;
+            case WebEngineView.DesktopVideoCapture:
+                question += "capture video of your desktop?";
+                break;
+            case WebEngineView.DesktopAudioVideoCapture:
+                question += "capture audio and video of your desktop?";
+                break;
+            case WebEngineView.Notifications:
+                question += "show notification on your desktop?";
+                break;
+            default:
+                question += "access unknown or unsupported feature [" + feature + "] ?";
+                break;
+            }
+
+            return question;
+        }
+    }
 
     FullScreenNotification {
         id: fullScreenNotification
diff --git a/examples/webenginequick/quicknanobrowser/doc/src/quicknanobrowser.qdoc b/examples/webenginequick/quicknanobrowser/doc/src/quicknanobrowser.qdoc
index b1910df95..ee94e0fd7 100644
--- a/examples/webenginequick/quicknanobrowser/doc/src/quicknanobrowser.qdoc
+++ b/examples/webenginequick/quicknanobrowser/doc/src/quicknanobrowser.qdoc
@@ -91,6 +91,31 @@
     \skipto Dialog {
     \printuntil /^\ {4}\}/
 
+    \section1 Handling Feature Permission Requests
+
+    We use the \c onFeaturePermissionRequested() signal handler to handle requests for
+    accessing a certain feature or device. The \c securityOrigin parameter identifies the
+    requester web site, and the \c feature parameter is the requested feature. We use these
+    to construct the message of the dialog:
+
+    \quotefromfile webenginequick/quicknanobrowser/BrowserWindow.qml
+    \skipto onFeaturePermissionRequested
+    \printuntil }
+
+    We show a dialog where the user is asked to grant or deny access. The custom
+    \c questionForFeature() JavaScript function generates a human-readable question about
+    the request.
+    If users select \uicontrol Yes, we call the \l{WebEngineView::}{grantFeaturePermission()}
+    method with a third \c true parameter to grant the \c securityOrigin web site the permission
+    to access the \c feature.
+    If users select \uicontrol No, we call the same method but with the \c false parameter to
+    deny access:
+
+    \skipto id: sslDialog
+    \skipto Dialog {
+    \printuntil /^\ {4}\}/
+
+
     \section1 Entering and Leaving Fullscreen Mode
 
     We create a menu item for allowing fullscreen mode in a settings menu that we place on the tool