112993035SSascha Leib"use strict"; 212993035SSascha Leib/* DokuWiki BotMon Captcha JavaScript */ 3cdc02cd4SSascha Leib/* 23.10.2025 - 0.1.2 - pre-release */ 412993035SSascha Leib/* Author: Sascha Leib <ad@hominem.info> */ 512993035SSascha Leib 612993035SSascha Leibconst $BMCaptcha = { 712993035SSascha Leib 812993035SSascha Leib init: function() { 912993035SSascha Leib /* mark the page to contain the captcha styles */ 1012993035SSascha Leib document.getElementsByTagName('body')[0].classList.add('botmon_captcha'); 1112993035SSascha Leib 1212993035SSascha Leib $BMCaptcha.install() 1312993035SSascha Leib }, 1412993035SSascha Leib 1512993035SSascha Leib install: function() { 16*620d9253SSascha Leib 17*620d9253SSascha Leib // localisation helper function: 18*620d9253SSascha Leib let _loc = function(id, alt) { 19*620d9253SSascha Leib if ($BMLocales && $BMLocales[id]) return $BMLocales[id]; 20*620d9253SSascha Leib return alt; 21*620d9253SSascha Leib } 22*620d9253SSascha Leib 2312993035SSascha Leib // find the parent element: 2412993035SSascha Leib let bm_parent = document.getElementsByTagName('body')[0]; 2512993035SSascha Leib 2612993035SSascha Leib // create the dialog: 2712993035SSascha Leib const dlg = document.createElement('dialog'); 2812993035SSascha Leib dlg.setAttribute('closedby', 'none'); 2912993035SSascha Leib dlg.setAttribute('open', 'open'); 30cdc02cd4SSascha Leib dlg.classList.add('checking'); 3112993035SSascha Leib dlg.id = 'botmon_captcha_box'; 32*620d9253SSascha Leib dlg.innerHTML = '<h2>' + _loc('dlgTitle', 'Title') + '</h2><p>' + _loc('dlgSubtitle', 'Subtitle') + '</p>'; 3312993035SSascha Leib 3412993035SSascha Leib // Checkbox: 3512993035SSascha Leib const lbl = document.createElement('label'); 36*620d9253SSascha Leib lbl.innerHTML = '<span class="confirm">' + _loc('dlgConfirm', "Confirm.") + '</span>' + 37*620d9253SSascha Leib '<span class="busy"></span><span class="checking">' + _loc('dlgChecking', "Checking") + '</span>' + 38*620d9253SSascha Leib '<span class="loading">' + _loc('dlgLoading', "Loading") + '</span>' + 39*620d9253SSascha Leib '<span class="erricon">�</span><span class="error">' + _loc('dlgError', "Error") + '</span>'; 4012993035SSascha Leib const cb = document.createElement('input'); 4112993035SSascha Leib cb.setAttribute('type', 'checkbox'); 42cdc02cd4SSascha Leib cb.setAttribute('disabled', 'disabled'); 4312993035SSascha Leib cb.addEventListener('click', $BMCaptcha._cbCallback); 44cdc02cd4SSascha Leib lbl.prepend(cb); 4512993035SSascha Leib 4612993035SSascha Leib dlg.appendChild(lbl); 4712993035SSascha Leib 4812993035SSascha Leib bm_parent.appendChild(dlg); 49cdc02cd4SSascha Leib 50cdc02cd4SSascha Leib // call the delayed callback in a couple of seconds: 51cdc02cd4SSascha Leib setTimeout($BMCaptcha._delayedCallback, 1500); 5212993035SSascha Leib }, 5312993035SSascha Leib 5412993035SSascha Leib /* creates a digest hash for the cookie function */ 5512993035SSascha Leib digest: { 5612993035SSascha Leib 5712993035SSascha Leib /* simple SHA hash function - adapted from https://geraintluff.github.io/sha256/ */ 5812993035SSascha Leib hash: function(ascii) { 5912993035SSascha Leib 6012993035SSascha Leib // shortcut: 6112993035SSascha Leib const sha256 = $BMCaptcha.digest.hash; 6212993035SSascha Leib 6312993035SSascha Leib // helper function 6412993035SSascha Leib const rightRotate = function(v, a) { 6512993035SSascha Leib return (v>>>a) | (v<<(32 - a)); 6612993035SSascha Leib }; 6712993035SSascha Leib 6812993035SSascha Leib var mathPow = Math.pow; 6912993035SSascha Leib var maxWord = mathPow(2, 32); 7012993035SSascha Leib var lengthProperty = 'length' 7112993035SSascha Leib var i, j; 7212993035SSascha Leib var result = '' 7312993035SSascha Leib 7412993035SSascha Leib var words = []; 7512993035SSascha Leib var asciiBitLength = ascii[lengthProperty]*8; 7612993035SSascha Leib 7712993035SSascha Leib //* caching results is optional - remove/add slash from front of this line to toggle 7812993035SSascha Leib // Initial hash value: first 32 bits of the fractional parts of the square roots of the first 8 primes 7912993035SSascha Leib // (we actually calculate the first 64, but extra values are just ignored) 8012993035SSascha Leib var hash = sha256.h = sha256.h || []; 8112993035SSascha Leib // Round constants: first 32 bits of the fractional parts of the cube roots of the first 64 primes 8212993035SSascha Leib var k = sha256.k = sha256.k || []; 8312993035SSascha Leib var primeCounter = k[lengthProperty]; 8412993035SSascha Leib /*/ 8512993035SSascha Leib var hash = [], k = []; 8612993035SSascha Leib var primeCounter = 0; 8712993035SSascha Leib //*/ 8812993035SSascha Leib 8912993035SSascha Leib var isComposite = {}; 9012993035SSascha Leib for (var candidate = 2; primeCounter < 64; candidate++) { 9112993035SSascha Leib if (!isComposite[candidate]) { 9212993035SSascha Leib for (i = 0; i < 313; i += candidate) { 9312993035SSascha Leib isComposite[i] = candidate; 9412993035SSascha Leib } 9512993035SSascha Leib hash[primeCounter] = (mathPow(candidate, .5)*maxWord)|0; 9612993035SSascha Leib k[primeCounter++] = (mathPow(candidate, 1/3)*maxWord)|0; 9712993035SSascha Leib } 9812993035SSascha Leib } 9912993035SSascha Leib 10012993035SSascha Leib ascii += '\x80' // Append Ƈ' bit (plus zero padding) 10112993035SSascha Leib while (ascii[lengthProperty]%64 - 56) ascii += '\x00' // More zero padding 10212993035SSascha Leib for (i = 0; i < ascii[lengthProperty]; i++) { 10312993035SSascha Leib j = ascii.charCodeAt(i); 10412993035SSascha Leib if (j>>8) return; // ASCII check: only accept characters in range 0-255 10512993035SSascha Leib words[i>>2] |= j << ((3 - i)%4)*8; 10612993035SSascha Leib } 10712993035SSascha Leib words[words[lengthProperty]] = ((asciiBitLength/maxWord)|0); 10812993035SSascha Leib words[words[lengthProperty]] = (asciiBitLength) 10912993035SSascha Leib 11012993035SSascha Leib // process each chunk 11112993035SSascha Leib for (j = 0; j < words[lengthProperty];) { 11212993035SSascha Leib var w = words.slice(j, j += 16); // The message is expanded into 64 words as part of the iteration 11312993035SSascha Leib var oldHash = hash; 11412993035SSascha Leib // This is now the undefinedworking hash", often labelled as variables a...g 11512993035SSascha Leib // (we have to truncate as well, otherwise extra entries at the end accumulate 11612993035SSascha Leib hash = hash.slice(0, 8); 11712993035SSascha Leib 11812993035SSascha Leib for (i = 0; i < 64; i++) { 11912993035SSascha Leib var i2 = i + j; 12012993035SSascha Leib // Expand the message into 64 words 12112993035SSascha Leib // Used below if 12212993035SSascha Leib var w15 = w[i - 15], w2 = w[i - 2]; 12312993035SSascha Leib 12412993035SSascha Leib // Iterate 12512993035SSascha Leib var a = hash[0], e = hash[4]; 12612993035SSascha Leib var temp1 = hash[7] 12712993035SSascha Leib + (rightRotate(e, 6) ^ rightRotate(e, 11) ^ rightRotate(e, 25)) // S1 12812993035SSascha Leib + ((e&hash[5])^((~e)&hash[6])) // ch 12912993035SSascha Leib + k[i] 13012993035SSascha Leib // Expand the message schedule if needed 13112993035SSascha Leib + (w[i] = (i < 16) ? w[i] : ( 13212993035SSascha Leib w[i - 16] 13312993035SSascha Leib + (rightRotate(w15, 7) ^ rightRotate(w15, 18) ^ (w15>>>3)) // s0 13412993035SSascha Leib + w[i - 7] 13512993035SSascha Leib + (rightRotate(w2, 17) ^ rightRotate(w2, 19) ^ (w2>>>10)) // s1 13612993035SSascha Leib )|0 13712993035SSascha Leib ); 13812993035SSascha Leib // This is only used once, so *could* be moved below, but it only saves 4 bytes and makes things unreadble 13912993035SSascha Leib var temp2 = (rightRotate(a, 2) ^ rightRotate(a, 13) ^ rightRotate(a, 22)) // S0 14012993035SSascha Leib + ((a&hash[1])^(a&hash[2])^(hash[1]&hash[2])); // maj 14112993035SSascha Leib 14212993035SSascha Leib hash = [(temp1 + temp2)|0].concat(hash); // We don't bother trimming off the extra ones, they're harmless as long as we're truncating when we do the slice() 14312993035SSascha Leib hash[4] = (hash[4] + temp1)|0; 14412993035SSascha Leib } 14512993035SSascha Leib 14612993035SSascha Leib for (i = 0; i < 8; i++) { 14712993035SSascha Leib hash[i] = (hash[i] + oldHash[i])|0; 14812993035SSascha Leib } 14912993035SSascha Leib } 15012993035SSascha Leib 15112993035SSascha Leib for (i = 0; i < 8; i++) { 15212993035SSascha Leib for (j = 3; j + 1; j--) { 15312993035SSascha Leib var b = (hash[i]>>(j*8))&255; 15412993035SSascha Leib result += ((b < 16) ? 0 : '') + b.toString(16); 15512993035SSascha Leib } 15612993035SSascha Leib } 15712993035SSascha Leib return result; 15812993035SSascha Leib } 15912993035SSascha Leib }, 16012993035SSascha Leib 16112993035SSascha Leib _cbCallback: function(e) { 16212993035SSascha Leib if (e.target.checked) { 16312993035SSascha Leib //document.getElementById('botmon_captcha_box').close(); 16412993035SSascha Leib 165d49ab213SSascha Leib try { 166d49ab213SSascha Leib var $status = 'loading'; 167d49ab213SSascha Leib 168d49ab213SSascha Leib // generate the hash: 169cdc02cd4SSascha Leib const dat = [ // the data to encode 170cdc02cd4SSascha Leib document._botmon.seed || '', 171cdc02cd4SSascha Leib location.hostname, 172cdc02cd4SSascha Leib document._botmon.ip || '0.0.0.0', 173d49ab213SSascha Leib (new Date()).toISOString().substring(0, 10) 174cdc02cd4SSascha Leib ]; 175cdc02cd4SSascha Leib const hash = $BMCaptcha.digest.hash(dat.join('|')); 17612993035SSascha Leib 177cdc02cd4SSascha Leib // set the cookie: 178cdc02cd4SSascha Leib document.cookie = "DWConfirm=" + hash + ';path=/;'; 17912993035SSascha Leib 180d49ab213SSascha Leib } catch (err) { 181d49ab213SSascha Leib console.error(err); 182d49ab213SSascha Leib $status = 'error'; 183d49ab213SSascha Leib } 184d49ab213SSascha Leib 185cdc02cd4SSascha Leib // change the interface: 186cdc02cd4SSascha Leib const dlg = document.getElementById('botmon_captcha_box'); 187cdc02cd4SSascha Leib if (dlg) { 188cdc02cd4SSascha Leib dlg.classList.remove('ready'); 189d49ab213SSascha Leib dlg.classList.add( $status ); 190cdc02cd4SSascha Leib } 191cdc02cd4SSascha Leib 192cdc02cd4SSascha Leib // reload the page: 193d49ab213SSascha Leib if ($status !== 'error')window.location.reload(true); 19412993035SSascha Leib } 195cdc02cd4SSascha Leib }, 196cdc02cd4SSascha Leib 197cdc02cd4SSascha Leib _delayedCallback: function() { 198cdc02cd4SSascha Leib const dlg = document.getElementById('botmon_captcha_box'); 199cdc02cd4SSascha Leib if (dlg) { 200cdc02cd4SSascha Leib dlg.classList.remove('checking'); 201cdc02cd4SSascha Leib dlg.classList.add('ready'); 202cdc02cd4SSascha Leib 203cdc02cd4SSascha Leib const input = dlg.getElementsByTagName('input')[0]; 204cdc02cd4SSascha Leib if (input) { 205cdc02cd4SSascha Leib input.removeAttribute('disabled'); 206cdc02cd4SSascha Leib input.focus(); 20712993035SSascha Leib } 208cdc02cd4SSascha Leib } 209cdc02cd4SSascha Leib }, 21012993035SSascha Leib 21112993035SSascha Leib} 21212993035SSascha Leib// initialise the captcha module: 21312993035SSascha Leib$BMCaptcha.init();