112993035SSascha Leib"use strict"; 212993035SSascha Leib/* DokuWiki BotMon Captcha JavaScript */ 3*cdc02cd4SSascha 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() { 1612993035SSascha Leib // find the parent element: 1712993035SSascha Leib let bm_parent = document.getElementsByTagName('body')[0]; 1812993035SSascha Leib 1912993035SSascha Leib // create the dialog: 2012993035SSascha Leib const dlg = document.createElement('dialog'); 2112993035SSascha Leib dlg.setAttribute('closedby', 'none'); 2212993035SSascha Leib dlg.setAttribute('open', 'open'); 23*cdc02cd4SSascha Leib dlg.classList.add('checking'); 2412993035SSascha Leib dlg.id = 'botmon_captcha_box'; 25*cdc02cd4SSascha Leib dlg.innerHTML = '<h2>Captcha box</h2><p>Making sure you are a human:</p>'; 2612993035SSascha Leib 2712993035SSascha Leib // Checkbox: 2812993035SSascha Leib const lbl = document.createElement('label'); 29*cdc02cd4SSascha Leib lbl.innerHTML = '<span class="confirm">Click to confirm.</span><span class="busy"></span><span class="checking">Checking …</span><span class="loading">Loading …</span>'; 3012993035SSascha Leib const cb = document.createElement('input'); 3112993035SSascha Leib cb.setAttribute('type', 'checkbox'); 32*cdc02cd4SSascha Leib cb.setAttribute('disabled', 'disabled'); 3312993035SSascha Leib cb.addEventListener('click', $BMCaptcha._cbCallback); 34*cdc02cd4SSascha Leib lbl.prepend(cb); 3512993035SSascha Leib 3612993035SSascha Leib dlg.appendChild(lbl); 3712993035SSascha Leib 3812993035SSascha Leib bm_parent.appendChild(dlg); 39*cdc02cd4SSascha Leib 40*cdc02cd4SSascha Leib // call the delayed callback in a couple of seconds: 41*cdc02cd4SSascha Leib setTimeout($BMCaptcha._delayedCallback, 1500); 4212993035SSascha Leib }, 4312993035SSascha Leib 4412993035SSascha Leib /* creates a digest hash for the cookie function */ 4512993035SSascha Leib digest: { 4612993035SSascha Leib 4712993035SSascha Leib /* simple SHA hash function - adapted from https://geraintluff.github.io/sha256/ */ 4812993035SSascha Leib hash: function(ascii) { 4912993035SSascha Leib 5012993035SSascha Leib // shortcut: 5112993035SSascha Leib const sha256 = $BMCaptcha.digest.hash; 5212993035SSascha Leib 5312993035SSascha Leib // helper function 5412993035SSascha Leib const rightRotate = function(v, a) { 5512993035SSascha Leib return (v>>>a) | (v<<(32 - a)); 5612993035SSascha Leib }; 5712993035SSascha Leib 5812993035SSascha Leib var mathPow = Math.pow; 5912993035SSascha Leib var maxWord = mathPow(2, 32); 6012993035SSascha Leib var lengthProperty = 'length' 6112993035SSascha Leib var i, j; 6212993035SSascha Leib var result = '' 6312993035SSascha Leib 6412993035SSascha Leib var words = []; 6512993035SSascha Leib var asciiBitLength = ascii[lengthProperty]*8; 6612993035SSascha Leib 6712993035SSascha Leib //* caching results is optional - remove/add slash from front of this line to toggle 6812993035SSascha Leib // Initial hash value: first 32 bits of the fractional parts of the square roots of the first 8 primes 6912993035SSascha Leib // (we actually calculate the first 64, but extra values are just ignored) 7012993035SSascha Leib var hash = sha256.h = sha256.h || []; 7112993035SSascha Leib // Round constants: first 32 bits of the fractional parts of the cube roots of the first 64 primes 7212993035SSascha Leib var k = sha256.k = sha256.k || []; 7312993035SSascha Leib var primeCounter = k[lengthProperty]; 7412993035SSascha Leib /*/ 7512993035SSascha Leib var hash = [], k = []; 7612993035SSascha Leib var primeCounter = 0; 7712993035SSascha Leib //*/ 7812993035SSascha Leib 7912993035SSascha Leib var isComposite = {}; 8012993035SSascha Leib for (var candidate = 2; primeCounter < 64; candidate++) { 8112993035SSascha Leib if (!isComposite[candidate]) { 8212993035SSascha Leib for (i = 0; i < 313; i += candidate) { 8312993035SSascha Leib isComposite[i] = candidate; 8412993035SSascha Leib } 8512993035SSascha Leib hash[primeCounter] = (mathPow(candidate, .5)*maxWord)|0; 8612993035SSascha Leib k[primeCounter++] = (mathPow(candidate, 1/3)*maxWord)|0; 8712993035SSascha Leib } 8812993035SSascha Leib } 8912993035SSascha Leib 9012993035SSascha Leib ascii += '\x80' // Append Ƈ' bit (plus zero padding) 9112993035SSascha Leib while (ascii[lengthProperty]%64 - 56) ascii += '\x00' // More zero padding 9212993035SSascha Leib for (i = 0; i < ascii[lengthProperty]; i++) { 9312993035SSascha Leib j = ascii.charCodeAt(i); 9412993035SSascha Leib if (j>>8) return; // ASCII check: only accept characters in range 0-255 9512993035SSascha Leib words[i>>2] |= j << ((3 - i)%4)*8; 9612993035SSascha Leib } 9712993035SSascha Leib words[words[lengthProperty]] = ((asciiBitLength/maxWord)|0); 9812993035SSascha Leib words[words[lengthProperty]] = (asciiBitLength) 9912993035SSascha Leib 10012993035SSascha Leib // process each chunk 10112993035SSascha Leib for (j = 0; j < words[lengthProperty];) { 10212993035SSascha Leib var w = words.slice(j, j += 16); // The message is expanded into 64 words as part of the iteration 10312993035SSascha Leib var oldHash = hash; 10412993035SSascha Leib // This is now the undefinedworking hash", often labelled as variables a...g 10512993035SSascha Leib // (we have to truncate as well, otherwise extra entries at the end accumulate 10612993035SSascha Leib hash = hash.slice(0, 8); 10712993035SSascha Leib 10812993035SSascha Leib for (i = 0; i < 64; i++) { 10912993035SSascha Leib var i2 = i + j; 11012993035SSascha Leib // Expand the message into 64 words 11112993035SSascha Leib // Used below if 11212993035SSascha Leib var w15 = w[i - 15], w2 = w[i - 2]; 11312993035SSascha Leib 11412993035SSascha Leib // Iterate 11512993035SSascha Leib var a = hash[0], e = hash[4]; 11612993035SSascha Leib var temp1 = hash[7] 11712993035SSascha Leib + (rightRotate(e, 6) ^ rightRotate(e, 11) ^ rightRotate(e, 25)) // S1 11812993035SSascha Leib + ((e&hash[5])^((~e)&hash[6])) // ch 11912993035SSascha Leib + k[i] 12012993035SSascha Leib // Expand the message schedule if needed 12112993035SSascha Leib + (w[i] = (i < 16) ? w[i] : ( 12212993035SSascha Leib w[i - 16] 12312993035SSascha Leib + (rightRotate(w15, 7) ^ rightRotate(w15, 18) ^ (w15>>>3)) // s0 12412993035SSascha Leib + w[i - 7] 12512993035SSascha Leib + (rightRotate(w2, 17) ^ rightRotate(w2, 19) ^ (w2>>>10)) // s1 12612993035SSascha Leib )|0 12712993035SSascha Leib ); 12812993035SSascha Leib // This is only used once, so *could* be moved below, but it only saves 4 bytes and makes things unreadble 12912993035SSascha Leib var temp2 = (rightRotate(a, 2) ^ rightRotate(a, 13) ^ rightRotate(a, 22)) // S0 13012993035SSascha Leib + ((a&hash[1])^(a&hash[2])^(hash[1]&hash[2])); // maj 13112993035SSascha Leib 13212993035SSascha 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() 13312993035SSascha Leib hash[4] = (hash[4] + temp1)|0; 13412993035SSascha Leib } 13512993035SSascha Leib 13612993035SSascha Leib for (i = 0; i < 8; i++) { 13712993035SSascha Leib hash[i] = (hash[i] + oldHash[i])|0; 13812993035SSascha Leib } 13912993035SSascha Leib } 14012993035SSascha Leib 14112993035SSascha Leib for (i = 0; i < 8; i++) { 14212993035SSascha Leib for (j = 3; j + 1; j--) { 14312993035SSascha Leib var b = (hash[i]>>(j*8))&255; 14412993035SSascha Leib result += ((b < 16) ? 0 : '') + b.toString(16); 14512993035SSascha Leib } 14612993035SSascha Leib } 14712993035SSascha Leib return result; 14812993035SSascha Leib } 14912993035SSascha Leib }, 15012993035SSascha Leib 15112993035SSascha Leib _cbCallback: function(e) { 15212993035SSascha Leib if (e.target.checked) { 15312993035SSascha Leib //document.getElementById('botmon_captcha_box').close(); 15412993035SSascha Leib 155*cdc02cd4SSascha Leib const dat = [ // the data to encode 156*cdc02cd4SSascha Leib document._botmon.seed || '', 157*cdc02cd4SSascha Leib location.hostname, 158*cdc02cd4SSascha Leib document._botmon.ip || '0.0.0.0', 159*cdc02cd4SSascha Leib (document._botmon.t0 ? new Date(document._botmon.t0) : new Date()).toISOString().substring(0, 10) 160*cdc02cd4SSascha Leib ]; 161*cdc02cd4SSascha Leib const hash = $BMCaptcha.digest.hash(dat.join('|')); 16212993035SSascha Leib 163*cdc02cd4SSascha Leib // set the cookie: 164*cdc02cd4SSascha Leib document.cookie = "DWConfirm=" + hash + ';path=/;'; 16512993035SSascha Leib 166*cdc02cd4SSascha Leib // change the interface: 167*cdc02cd4SSascha Leib const dlg = document.getElementById('botmon_captcha_box'); 168*cdc02cd4SSascha Leib if (dlg) { 169*cdc02cd4SSascha Leib dlg.classList.remove('ready'); 170*cdc02cd4SSascha Leib dlg.classList.add('loading'); 171*cdc02cd4SSascha Leib } 172*cdc02cd4SSascha Leib 173*cdc02cd4SSascha Leib // reload the page: 17412993035SSascha Leib window.location.reload(true); 17512993035SSascha Leib } 176*cdc02cd4SSascha Leib }, 177*cdc02cd4SSascha Leib 178*cdc02cd4SSascha Leib _delayedCallback: function() { 179*cdc02cd4SSascha Leib const dlg = document.getElementById('botmon_captcha_box'); 180*cdc02cd4SSascha Leib if (dlg) { 181*cdc02cd4SSascha Leib dlg.classList.remove('checking'); 182*cdc02cd4SSascha Leib dlg.classList.add('ready'); 183*cdc02cd4SSascha Leib 184*cdc02cd4SSascha Leib const input = dlg.getElementsByTagName('input')[0]; 185*cdc02cd4SSascha Leib if (input) { 186*cdc02cd4SSascha Leib input.removeAttribute('disabled'); 187*cdc02cd4SSascha Leib input.focus(); 18812993035SSascha Leib } 189*cdc02cd4SSascha Leib } 190*cdc02cd4SSascha Leib }, 19112993035SSascha Leib 19212993035SSascha Leib} 19312993035SSascha Leib// initialise the captcha module: 19412993035SSascha Leib$BMCaptcha.init();