3v4l.org

run code in 300+ PHP versions simultaneously
<?php $strNewAcctNum = ''; $accountNumber = '123us'; $strCode1 = '-ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789'; $strCode2 = 'TMGKRLMKFDPRSKVQXZBSKLKVWSXMSDLHQPFVP'; $iKeyLen = strlen($strCode2); //Step 1 - take the last 4 characters and the first 4 characters and pad with zeros //FAL 2008-05-02 for account numbers that are less than 4 characters, the below was returning as null as opposed to all N characters. //$strTempAcctNum = substr($accountNumber,-4); $strTempAcctNum = strrev(substr(strrev($accountNumber),0,4)); $strTempAcctNum .= substr($accountNumber,0,4); $strTempAcctNum = substr($strTempAcctNum.'00000000',0,8); $sumPos = 0; //now loop through each character and replace with a new character from the Code2 string for ($i = 0; $i < strlen($strTempAcctNum); $i++) { $strChar = substr($strTempAcctNum,$i,1); $pos = strpos($strCode1, $strChar); if ($pos === false) $pos= 0; $pos = ($pos + $i * 13 ) % $iKeyLen; $sumPos += $pos; $strNewChar = substr($strCode2,$pos,1); $strNewAcctNum.=$strNewChar ; } echo $strNewAcctNum. substr($strCode2, $sumPos % $iKeyLen,1);
Finding entry points
Branch analysis from position: 0
1 jumps found. (Code = 42) Position 1 = 61
Branch analysis from position: 61
2 jumps found. (Code = 44) Position 1 = 64, Position 2 = 34
Branch analysis from position: 64
1 jumps found. (Code = 62) Position 1 = -2
Branch analysis from position: 34
2 jumps found. (Code = 43) Position 1 = 47, Position 2 = 48
Branch analysis from position: 47
2 jumps found. (Code = 44) Position 1 = 64, Position 2 = 34
Branch analysis from position: 64
Branch analysis from position: 34
Branch analysis from position: 48
filename:       /in/VsQln
function name:  (null)
number of ops:  73
compiled vars:  !0 = $strNewAcctNum, !1 = $accountNumber, !2 = $strCode1, !3 = $strCode2, !4 = $iKeyLen, !5 = $strTempAcctNum, !6 = $sumPos, !7 = $i, !8 = $strChar, !9 = $pos, !10 = $strNewChar
line      #* E I O op                           fetch          ext  return  operands
-------------------------------------------------------------------------------------
    2     0  E >   ASSIGN                                                   !0, ''
    3     1        ASSIGN                                                   !1, '123us'
    4     2        ASSIGN                                                   !2, '-ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789'
    5     3        ASSIGN                                                   !3, 'TMGKRLMKFDPRSKVQXZBSKLKVWSXMSDLHQPFVP'
    6     4        STRLEN                                           ~15     !3
          5        ASSIGN                                                   !4, ~15
   12     6        INIT_FCALL                                               'strrev'
          7        INIT_FCALL                                               'substr'
          8        INIT_FCALL                                               'strrev'
          9        SEND_VAR                                                 !1
         10        DO_ICALL                                         $17     
         11        SEND_VAR                                                 $17
         12        SEND_VAL                                                 0
         13        SEND_VAL                                                 4
         14        DO_ICALL                                         $18     
         15        SEND_VAR                                                 $18
         16        DO_ICALL                                         $19     
         17        ASSIGN                                                   !5, $19
   14    18        INIT_FCALL                                               'substr'
         19        SEND_VAR                                                 !1
         20        SEND_VAL                                                 0
         21        SEND_VAL                                                 4
         22        DO_ICALL                                         $21     
         23        ASSIGN_OP                                     8          !5, $21
   15    24        INIT_FCALL                                               'substr'
         25        CONCAT                                           ~23     !5, '00000000'
         26        SEND_VAL                                                 ~23
         27        SEND_VAL                                                 0
         28        SEND_VAL                                                 8
         29        DO_ICALL                                         $24     
         30        ASSIGN                                                   !5, $24
   17    31        ASSIGN                                                   !6, 0
   19    32        ASSIGN                                                   !7, 0
         33      > JMP                                                      ->61
   20    34    >   INIT_FCALL                                               'substr'
         35        SEND_VAR                                                 !5
         36        SEND_VAR                                                 !7
         37        SEND_VAL                                                 1
         38        DO_ICALL                                         $28     
         39        ASSIGN                                                   !8, $28
   22    40        INIT_FCALL                                               'strpos'
         41        SEND_VAR                                                 !2
         42        SEND_VAR                                                 !8
         43        DO_ICALL                                         $30     
         44        ASSIGN                                                   !9, $30
   23    45        TYPE_CHECK                                    4          !9
         46      > JMPZ                                                     ~32, ->48
   24    47    >   ASSIGN                                                   !9, 0
   26    48    >   MUL                                              ~34     !7, 13
         49        ADD                                              ~35     !9, ~34
         50        MOD                                              ~36     ~35, !4
         51        ASSIGN                                                   !9, ~36
   27    52        ASSIGN_OP                                     1          !6, !9
   28    53        INIT_FCALL                                               'substr'
         54        SEND_VAR                                                 !3
         55        SEND_VAR                                                 !9
         56        SEND_VAL                                                 1
         57        DO_ICALL                                         $39     
         58        ASSIGN                                                   !10, $39
   29    59        ASSIGN_OP                                     8          !0, !10
   19    60        PRE_INC                                                  !7
         61    >   STRLEN                                           ~43     !5
         62        IS_SMALLER                                               !7, ~43
         63      > JMPNZ                                                    ~44, ->34
   31    64    >   INIT_FCALL                                               'substr'
         65        SEND_VAR                                                 !3
         66        MOD                                              ~45     !6, !4
         67        SEND_VAL                                                 ~45
         68        SEND_VAL                                                 1
         69        DO_ICALL                                         $46     
         70        CONCAT                                           ~47     !0, $46
         71        ECHO                                                     ~47
         72      > RETURN                                                   1

Generated using Vulcan Logic Dumper, using php 8.0.0


preferences:
153.94 ms | 1400 KiB | 19 Q