3v4l.org

run code in 500+ PHP versions simultaneously
<?php /** * Wrapper for strpbrk() except that it accepts a $length parameter * which will restrict the result string to this many characters. * * @param string $haystack The string where char_list is looked for. * @param string $char_list Case sensitive set of characters to look for. * @param int $length [optional] If given and is positive, the string returned will contain at most length characters. * @return false|string * @throws RangeException */ function strpbrkLength( string $haystack, string $char_list, int $length = null ) /*: false|string*/ { if( null !== $length && 0 > $length ) throw new RangeException( '$length must be null, zero or a positive integer.' ); $strpbrk = strpbrk( $haystack, $char_list ); if( false !== $strpbrk && null !== $length && strlen( $strpbrk ) > $length ) return substr( $strpbrk, 0, $length ); return $strpbrk; } $tests = [ [ 'haystack' => '', 'char_list' => 'r+', 'length' => null, 'expect' => false ], [ 'haystack' => '', 'char_list' => 'r+', 'length' => 0 , 'expect' => false ], [ 'haystack' => '', 'char_list' => 'r+', 'length' => 1 , 'expect' => false ], [ 'haystack' => 'r', 'char_list' => 'r+', 'length' => null, 'expect' => 'r' ], [ 'haystack' => 'r', 'char_list' => 'r+', 'length' => 0 , 'expect' => '' ], [ 'haystack' => 'r', 'char_list' => 'r+', 'length' => 1 , 'expect' => 'r' ], [ 'haystack' => 'r+', 'char_list' => 'r+', 'length' => null, 'expect' => 'r+' ], [ 'haystack' => 'r+', 'char_list' => 'r+', 'length' => 0 , 'expect' => '' ], [ 'haystack' => 'r+', 'char_list' => 'r+', 'length' => 1 , 'expect' => 'r' ], [ 'haystack' => 'r+', 'char_list' => 'r+', 'length' => 2 , 'expect' => 'r+' ], [ 'haystack' => 'w', 'char_list' => 'r+', 'length' => null, 'expect' => false ], [ 'haystack' => 'w', 'char_list' => 'r+', 'length' => 0, 'expect' => false ], [ 'haystack' => 'w', 'char_list' => 'r+', 'length' => 1, 'expect' => false ], [ 'haystack' => 'w+', 'char_list' => 'r+', 'length' => null, 'expect' => '+' ], [ 'haystack' => 'w+', 'char_list' => 'r+', 'length' => 0 , 'expect' => '' ], [ 'haystack' => 'w+', 'char_list' => 'r+', 'length' => 1 , 'expect' => '+' ], ]; foreach( $tests as $test => $args ) assert( strpbrkLength( $args[ 'haystack' ], $args[ 'char_list' ], $args[ 'length' ] ) === $args[ 'expect' ], "Failed test #$test" );
Finding entry points
Branch analysis from position: 0
2 jumps found. (Code = 77) Position 1 = 2, Position 2 = 22
Branch analysis from position: 2
2 jumps found. (Code = 78) Position 1 = 3, Position 2 = 22
Branch analysis from position: 3
1 jumps found. (Code = 42) Position 1 = 2
Branch analysis from position: 2
Branch analysis from position: 22
1 jumps found. (Code = 62) Position 1 = -2
Branch analysis from position: 22
filename:       /in/cp19M
function name:  (null)
number of ops:  24
compiled vars:  !0 = $tests, !1 = $args, !2 = $test
line      #* E I O op                               fetch          ext  return  operands
-----------------------------------------------------------------------------------------
   27     0  E >   ASSIGN                                                       !0, <array>
   50     1      > FE_RESET_R                                           $4      !0, ->22
          2    > > FE_FETCH_R                                           ~5      $4, !1, ->22
          3    >   ASSIGN                                                       !2, ~5
   51     4        ASSERT_CHECK                                                 
          5        INIT_FCALL                                                   'assert'
   52     6        INIT_FCALL                                                   'strpbrklength'
          7        FETCH_DIM_R                                          ~7      !1, 'haystack'
          8        SEND_VAL                                                     ~7
          9        FETCH_DIM_R                                          ~8      !1, 'char_list'
         10        SEND_VAL                                                     ~8
         11        FETCH_DIM_R                                          ~9      !1, 'length'
         12        SEND_VAL                                                     ~9
         13        DO_FCALL                                          0  $10     
         14        FETCH_DIM_R                                          ~11     !1, 'expect'
         15        IS_IDENTICAL                                         ~12     $10, ~11
         16        SEND_VAL                                                     ~12
   53    17        NOP                                                          
         18        FAST_CONCAT                                          ~13     'Failed+test+%23', !2
         19        SEND_VAL                                                     ~13
   51    20        DO_ICALL                                                     
   50    21      > JMP                                                          ->2
         22    >   FE_FREE                                                      $4
   54    23      > RETURN                                                       1

Function strpbrklength:
Finding entry points
Branch analysis from position: 0
2 jumps found. (Code = 46) Position 1 = 5, Position 2 = 7
Branch analysis from position: 5
2 jumps found. (Code = 43) Position 1 = 8, Position 2 = 12
Branch analysis from position: 8
1 jumps found. (Code = 108) Position 1 = -2
Branch analysis from position: 12
2 jumps found. (Code = 46) Position 1 = 19, Position 2 = 21
Branch analysis from position: 19
2 jumps found. (Code = 46) Position 1 = 22, Position 2 = 25
Branch analysis from position: 22
2 jumps found. (Code = 43) Position 1 = 26, Position 2 = 29
Branch analysis from position: 26
1 jumps found. (Code = 62) Position 1 = -2
Branch analysis from position: 29
1 jumps found. (Code = 62) Position 1 = -2
Branch analysis from position: 25
Branch analysis from position: 21
Branch analysis from position: 7
filename:       /in/cp19M
function name:  strpbrkLength
number of ops:  31
compiled vars:  !0 = $haystack, !1 = $char_list, !2 = $length, !3 = $strpbrk
line      #* E I O op                               fetch          ext  return  operands
-----------------------------------------------------------------------------------------
   13     0  E >   RECV                                                 !0      
          1        RECV                                                 !1      
          2        RECV_INIT                                            !2      null
   16     3        TYPE_CHECK                                      1020  ~4      !2
          4      > JMPZ_EX                                              ~4      ~4, ->7
          5    >   IS_SMALLER                                           ~5      !2, 0
          6        BOOL                                                 ~4      ~5
          7    > > JMPZ                                                         ~4, ->12
   17     8    >   NEW                                                  $6      'RangeException'
          9        SEND_VAL_EX                                                  '%24length+must+be+null%2C+zero+or+a+positive+integer.'
         10        DO_FCALL                                          0          
         11      > THROW                                             0          $6
   19    12    >   INIT_FCALL                                                   'strpbrk'
         13        SEND_VAR                                                     !0
         14        SEND_VAR                                                     !1
         15        DO_ICALL                                             $8      
         16        ASSIGN                                                       !3, $8
   21    17        TYPE_CHECK                                      1018  ~10     !3
         18      > JMPZ_EX                                              ~10     ~10, ->21
         19    >   TYPE_CHECK                                      1020  ~11     !2
         20        BOOL                                                 ~10     ~11
         21    > > JMPZ_EX                                              ~10     ~10, ->25
         22    >   STRLEN                                               ~12     !3
         23        IS_SMALLER                                           ~13     !2, ~12
         24        BOOL                                                 ~10     ~13
         25    > > JMPZ                                                         ~10, ->29
   22    26    >   FRAMELESS_ICALL_3                substr              ~14     !3, 0
         27        OP_DATA                                                      !2
         28      > RETURN                                                       ~14
   24    29    > > RETURN                                                       !3
   25    30*     > RETURN                                                       null

End of function strpbrklength

Generated using Vulcan Logic Dumper, using php 8.5.0


preferences:
386.45 ms | 2126 KiB | 16 Q