OpenWebNet password: Difference between revisions

<pre>→ *#25280520##

← *#*1##</pre>

 

=={{header|D}}==

{{trans|Python}}

 

ulong ownCalcPass(in ulong password, in string nonce)

ownTestCalcPass("12345", "603356072", 25280520UL);

ownTestCalcPass("12345", "410501656", 119537670UL);

{{out}}

<pre>PASS 12345 603356072 25280520 25280520

PASS 12345 410501656 119537670 119537670</pre>

=={{header|Delphi}}==

{{libheader| System.SysUtils}}

{{Trans|Go}}

program OpenWebNet_password;

 

testPasswordCalc('12345', '630292165', 4269684735);

readln;

 

=={{header|Go}}==

{{trans|Python}}

 

import (

testPasswordCalc("12345", "410501656", 119537670)

testPasswordCalc("12345", "630292165", 4269684735)

 

{{out}}

PASS 12345 410501656 119537670 119537670

PASS 12345 630292165 4269684735 4269684735

</pre>

 

=={{header|JavaScript}}==

function calcPass (pass, nonce) {

var flag = true;

testCalcPass ('12345', '630292165', '4269684735');

testCalcPass ('12345', '523781130', '537331200');

 

=={{header|Julia}}==

Passes all tests.

startflag = true

n1 = 0

 

testcalcpass()

 

=={{header|Kotlin}}==

{{trans|Python}}

 

fun ownCalcPass(password: Long, nonce: String): Long {

ownTestCalcPass("12345", "603356072", 25280520)

ownTestCalcPass("12345", "410501656", 119537670)

 

{{out}}

=={{header|Nim}}==

{{trans|Python}}

 

func ownCalcPass(password, nonce: string): uint32 =

testPasswordCalc("12345", "603356072", 25280520u32)

testPasswordCalc("12345", "410501656", 119537670u32)

 

{{out}}

=={{header|Perl}}==

{{trans|Raku}}

use warnings;

use feature 'say';

say own_password( 12345, 603356072 );

say own_password( 12345, 410501656 );

{{out}}

<pre>25280520

 

=={{header|Phix}}==

{{out}}

<pre>

 

=={{header|PHP}}==

$msr = 0x7FFFFFFF;

$m_1 = (int)0xFFFFFFFF;

return sprintf('%u', $num1 & $m_1);

}

 

=={{header|Python}}==

def ownCalcPass (password, nonce, test=False) :

start = True

test_passwd_calc('12345','630292165','4269684735')

 

 

=={{header|Racket}}==

{{trans|Python}} (followed by some aggressive refactoring)

 

(define (32-bit-truncate n)

(bitwise-and n #xFFFFFFFF))

(own-test-calc-pass "12345" "603356072" 25280520)

 

=={{header|Raku}}==

 

Raku doesn't really have good support for unsigned fixed bit integers yet so emulating them with regular Ints and bitmasks.

my int $n1 = 0;

my int $n2 = $password;

say own-password( 12345, 603356072 );

say own-password( 12345, 410501656 );

 

{{out}}

 

=={{header|Swift}}==

func openAuthenticationResponse(_password: String, operations: String) -> String? {

var num1 = UInt32(0)

return String(num1)

}

 

=={{header|Wren}}==

{{trans|Python}}

{{libheader|Wren-fmt}}

 

var ownCalcPass = Fn.new { |password, nonce|

testPasswordCalc.call("12345", "603356072", 25280520)

testPasswordCalc.call("12345", "410501656", 119537670)

 

{{out}}