--- rat/client/parameter.html	2021/08/04 19:59:12	1.86
+++ rat/client/parameter.html	2022/07/07 03:37:02	1.90
@@ -5,7 +5,7 @@
 The LearningOnline Network with CAPA
 Parameter Input Window
 //
-// $Id: parameter.html,v 1.86 2021/08/04 19:59:12 raeburn Exp $
+// $Id: parameter.html,v 1.90 2022/07/07 03:37:02 raeburn Exp $
 //
 // Copyright Michigan State University Board of Trustees
 //
@@ -401,8 +401,8 @@ function validateInterval() {
         for (var i=0; i<sform.donebutton.length; i++) {
             if (sform.donebutton[i].checked) {
                 if (sform.donebutton[i].value == '_done_proctor') {
-                    if ((sform.donebutton_proctorkey.value == '') || 
-                        (sform.donebutton_proctorkey.value == null)) {
+                    var keyval = sform.donebutton_proctorkey.value;
+                    if ((keyval == '') || (typeof(keyval) == 'undefined')) {
                         alert('Please enter a key for a proctor to enter when a student uses the "Done" button.');
                         return;
                     }
@@ -422,6 +422,7 @@ function validateDeepLink() {
     svalue += sform.deeplinkacc.options[sform.deeplinkacc.selectedIndex].value+',';
     var keyRegExp = /^[a-zA-Z\d_.!@#$%^&*()+=-]+$/;
     var numRegExp = /^\d+$/;
+    var exitTextRegExp = /^[^'":;,]+$/;
     if (sform.deeplinkprotect.length) {
         for (var i=0; i<sform.deeplinkprotect.length; i++) {
             if (sform.deeplinkprotect[i].checked) {
@@ -476,6 +477,32 @@ function validateDeepLink() {
             }
         }
     }
+    svalue += ',';
+    svalue += sform.deeplinktarget.options[sform.deeplinktarget.selectedIndex].value;
+    svalue += ',';
+    if (sform.deeplinkexit.length) {
+        for (var i=0; i<sform.deeplinkexit.length; i++) {
+            if (sform.deeplinkexit[i].checked) {
+                if (sform.deeplinkexit[i].value == 'no') {
+                    svalue += sform.deeplinkexit[i].value;
+                } else {
+                    var exittext = sform.deeplinkexittext.value;
+                    exittext = exittext.replace(/^\s+|\s+$/g,'');
+                    if ((exittext.length) && (exitTextRegExp.test(exittext))) {
+                        svalue += sform.deeplinkexit[i].value;
+                        if (exittext !== 'Exit Tool') {
+                            svalue += ':'+exittext;
+                        }
+                    } else {
+                        alert('Please enter the button text. Disallowed characters are ;,":\'\n'+
+                              'or check "not in use" option for "Exit Tool Link"');
+                        return;
+                    }
+                }
+                break;
+            }
+        }
+    }
     assemble();
 }
 
@@ -525,6 +552,26 @@ function toggleDeepLink(caller) {
             }
         }
     }
+    if ((caller == 'exit') && (sform.deeplinkexit.length)) {
+        var frame = window.frames["choices"];
+        for (var i=0; i<sform.deeplinkexit.length; i++) {
+            if (sform.deeplinkexit[i].checked) {
+                if (frame.document.getElementById('deeplinkexitdiv')) {
+                    if (sform.deeplinkexit[i].value == 'no') {
+                        frame.document.getElementById('deeplinkexitdiv').style.display='none';
+                        sform.deeplinkexittext.value = '';
+                    } else {
+                        frame.document.getElementById('deeplinkexitdiv').style.display='inline-block';
+                        if (sform.deeplinkexittext.value == '') {
+                            sform.deeplinkexittext.value = 'Exit Tool';
+                        }
+                        frame.document.getElementById('deeplinkexitdiv').scrollIntoView();
+                    }
+                }
+                break;
+            }
+        }
+    }
 }
 
 function calldeeplink(caller) {
@@ -634,7 +681,8 @@ function lenienteval(newval) {
         }
         var patternRelWeight = /^\-?[\d.]+$/;
         var sform=choices.document.forms.sch;
-        if ((sform.lenientrelwt.length != 'undefined')  && (sform.lenientrelwt.length) != 'null') {
+        var relwtlength = sform.lenientrelwt.length;
+        if ((relwtlength != '') && (typeof(relwtlength) != 'undefined')) {
             for (var i=0; i<sform.lenientrelwt.length; i++) {
                 var relweight = sform.lenientrelwt[i].value;
                 relweight = relweight.replace(/^\s+|\s+$/g,'');
@@ -1093,7 +1141,7 @@ function draw() {
         if (pscat=='ip') {
             var currallow = new Array;
             var currdeny = new Array;
-            if ((svalue != '') && (svalue != null)) {
+            if ((svalue != '') && (typeof(svalue) != 'undefined')) {
                 var patternComma = /,/;
                 var patternAllow = /^([\[\]a-zA-Z\.\d\*\-]+)$/;
                 var patternDeny = /^\!([\[\]a-zA-Z\.\d\*\-]+)$/;
@@ -1180,13 +1228,17 @@ function draw() {
        if (pscat=='deeplink') {
            var deeplinkvals = new Array();
            var linkprotectparts = new Array();
-           var ltikeyRegExp = /^(ltic|ltid|key):(\w+)$/;
+           var ltikeyRegExp = /^(ltic:\d+|ltid:\d+|key:[a-zA-Z\d_.!@#$%^&*()+=-]+)$/;
+           var linkexitparts = new Array();
+           var dlinkexitRegExp = /^(yes|url|no)(|:[^:,;'"]+)$/;
            var dlinkkeysty = 'hidden';
            var dlinkkeyval = '';
            var dlinklticdivsty = 'none';
            var dlinkltiddivsty = 'none';
            var dlinkmenusdivsty = 'none';
-           if ((svalue != '') && (svalue != null)) {
+           var dlinkexitdivsty = 'none';
+           var dlinkexittextval = '';
+           if ((svalue != '') && (typeof(svalue) != 'undefined')) {
                deeplinkvals = svalue.split(',');
                if (ltikeyRegExp.test(deeplinkvals[4])) {
                    linkprotectparts = deeplinkvals[4].split(':');
@@ -1203,8 +1255,20 @@ function draw() {
                if (deeplinkvals[5] >= 1) {
                    dlinkmenusdivsty = 'inline-block';
                }
+               if (dlinkexitRegExp.test(deeplinkvals[7])) {
+                   linkexitparts = deeplinkvals[7].split(':');
+                   deeplinkvals[7] = linkexitparts[0];
+                   if (deeplinkvals[7] != 'no') {
+                       dlinkexitdivsty = 'inline-block'; 
+                       if (!linkexitparts[1]) {
+                           dlinkexittextval = 'Exit Tool';
+                       } else {
+                           dlinkexittextval = linkexitparts[1];
+                       }
+                   }
+               }
            } else {
-               deeplinkvals = ['off','unhide','full','res','','0'];
+               deeplinkvals = ['off','unhide','full','res','','0','_self','no'];
            }
            var deeplinkstate = new Array();
            deeplinkstate = ['only','off','both'];
@@ -1224,6 +1288,11 @@ function draw() {
            deeplinkscopetxt = ['resource only','enclosing map/folder','recursive map/folder'];
            var deeplinkprotect = new Array();
            deeplinkprotect = ['none','key','ltic','ltid'];
+           var deeplinktarget = new Array();
+           deeplinktarget = ['_self','_top'];
+           var deeplinktargettxt = new Array();
+           deeplinktargettxt = ['Embedded','Not embedded'];
+           var deeplinkexit = ['yes','url','no'];
            tablestart('Deep-linked items');
            choicewrite('<tr><td>Access status?</td><td>');
            choicewrite('<select name="deeplinkstate">');
@@ -1279,7 +1348,7 @@ function draw() {
            choicewrite('</span><br />');
 
            var possmenus = new Array();
-           if ((pextra != '') && (pextra != null)) {
+           if ((pextra != '') && (typeof(pextra) != 'undefined')) {
                var lticRegExp = /^ltic_/;
                var ltidRegExp = /^ltid_/;
                var menusRegExp = /^menus_/;
@@ -1404,6 +1473,38 @@ function draw() {
                }
                choicewrite('</select></div></span><br />');
            }
+           choicewrite('</td></tr>');
+           choicewrite('<tr><td>Embedded?</td><td>');
+           choicewrite('<select name="deeplinktarget">');
+           for (var i=0; i<deeplinktarget.length; i++) {
+               choicewrite('<option value="'+deeplinktarget[i]+'"');
+               if (deeplinkvals[6] == deeplinktarget[i]) {
+                   choicewrite(' selected="selected"');
+               }
+               choicewrite('>'+deeplinktargettxt[i]+'</option>');
+           }
+           choicewrite('</select>');
+           choicewrite('</td></tr>');
+           choicewrite('<tr><td>Exit Button?</td><td>');
+           choicewrite('<span style="white-space: nowrap;"><label>');
+           choicewrite('<input name="deeplinkexit" value="no"'+
+                  ' type="radio" '+calldeeplink('exit'));
+           if (deeplinkvals[7]=='no') { choicewrite(' checked="checked"'); }
+           choicewrite(' />not in use</label></span><br />');
+           choicewrite('<span style="white-space: nowrap;"><label>');
+           choicewrite('<input name="deeplinkexit" value="yes"'+
+                  ' type="radio" '+calldeeplink('exit'));
+           if (deeplinkvals[7]=='yes') { choicewrite(' checked="checked"'); }
+           choicewrite(' />in use, no redirect</label></span> ');
+           choicewrite('<span style="white-space: nowrap;"><label>');
+           choicewrite('<input name="deeplinkexit" value="url"'+
+                  ' type="radio" '+calldeeplink('exit'));
+           if (deeplinkvals[7]=='url') { choicewrite(' checked="checked"'); }
+           choicewrite(' />in use, redirect to URL</label></span><br />');
+           choicewrite('<div id="deeplinkexitdiv" style="display:'+dlinkexitdivsty+'">');
+           choicewrite('<br /><span style="white-space: nowrap;">Button text:&nbsp;');
+           choicewrite('<input type="text" name="deeplinkexittext" id="deeplinkexittext" value="'+dlinkexittextval+'" size="10" />');
+           choicewrite('</span></div>');
            choicewrite('</td></tr></table>');
        }
    }