3  * Random_* Compatibility Library

     3  * Random_* Compatibility Library

     4  * for using the new PHP 7 random_* API in PHP 5 projects

     4  * for using the new PHP 7 random_* API in PHP 5 projects

     5  *

     5  *

     6  * The MIT License (MIT)

     6  * The MIT License (MIT)

     7  *

     7  *

     9  *

     9  *

    10  * Permission is hereby granted, free of charge, to any person obtaining a copy

    10  * Permission is hereby granted, free of charge, to any person obtaining a copy

    11  * of this software and associated documentation files (the "Software"), to deal

    11  * of this software and associated documentation files (the "Software"), to deal

    12  * in the Software without restriction, including without limitation the rights

    12  * in the Software without restriction, including without limitation the rights

    13  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell

    13  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell

    26  * SOFTWARE.

    26  * SOFTWARE.

    27  */

    27  */

    28 

    28 

    29 if (!is_callable('RandomCompat_strlen')) {

    29 if (!is_callable('RandomCompat_strlen')) {

    30     if (

    30     if (

    33     ) {

    34     ) {

    34         /**

    35         /**

    35          * strlen() implementation that isn't brittle to mbstring.func_overload

    36          * strlen() implementation that isn't brittle to mbstring.func_overload

    36          *

    37          *

    37          * This version uses mb_strlen() in '8bit' mode to treat strings as raw

    38          * This version uses mb_strlen() in '8bit' mode to treat strings as raw

    80 

    81 

    81 if (!is_callable('RandomCompat_substr')) {

    82 if (!is_callable('RandomCompat_substr')) {

    82 

    83 

    83     if (

    84     if (

    84         defined('MB_OVERLOAD_STRING')

    85         defined('MB_OVERLOAD_STRING')

    87     ) {

    88     ) {

    88         /**

    89         /**

    89          * substr() implementation that isn't brittle to mbstring.func_overload

    90          * substr() implementation that isn't brittle to mbstring.func_overload

    90          *

    91          *

    91          * This version uses mb_substr() in '8bit' mode to treat strings as raw

    92          * This version uses mb_substr() in '8bit' mode to treat strings as raw

    92          * binary rather than UTF-8, ISO-8859-1, etc

    93          * binary rather than UTF-8, ISO-8859-1, etc

    93          *

    94          *

    94          * @param string $binary_string

    95          * @param string $binary_string

    95          * @param int $start

    96          * @param int $start

    97          *

    98          *

    98          * @throws TypeError

    99          * @throws TypeError

    99          *

   100          *

   100          * @return string

   101          * @return string

   101          */

   102          */

   116             if ($length === null) {

   117             if ($length === null) {

   117                 /**

   118                 /**

   118                  * mb_substr($str, 0, NULL, '8bit') returns an empty string on

   119                  * mb_substr($str, 0, NULL, '8bit') returns an empty string on

   119                  * PHP 5.3, so we have to find the length ourselves.

   120                  * PHP 5.3, so we have to find the length ourselves.

   120                  */

   121                  */

   121                 $length = RandomCompat_strlen($binary_string) - $start;

   123                 $length = RandomCompat_strlen($binary_string) - $start;

   122             } elseif (!is_int($length)) {

   124             } elseif (!is_int($length)) {

   123                 throw new TypeError(

   125                 throw new TypeError(

   124                     'RandomCompat_substr(): Third argument should be an integer, or omitted'

   126                     'RandomCompat_substr(): Third argument should be an integer, or omitted'

   125                 );

   127                 );

   131             }

   133             }

   132             if ($start > RandomCompat_strlen($binary_string)) {

   134             if ($start > RandomCompat_strlen($binary_string)) {

   133                 return '';

   135                 return '';

   134             }

   136             }

   135 

   137 

   137         }

   144         }

   138 

   145 

   139     } else {

   146     } else {

   140 

   147 

   141         /**

   148         /**

   143          *

   150          *

   144          * This version just uses the default substr()

   151          * This version just uses the default substr()

   145          *

   152          *

   146          * @param string $binary_string

   153          * @param string $binary_string

   147          * @param int $start

   154          * @param int $start

   149          *

   156          *

   150          * @throws TypeError

   157          * @throws TypeError

   151          *

   158          *

   152          * @return string

   159          * @return string

   153          */

   160          */

   170                     throw new TypeError(

   177                     throw new TypeError(

   171                         'RandomCompat_substr(): Third argument should be an integer, or omitted'

   178                         'RandomCompat_substr(): Third argument should be an integer, or omitted'

   172                     );

   179                     );

   173                 }

   180                 }

   174 

   181 

   176             }

   187             }

   177 

   188 

   179         }

   193         }

   180     }

   194     }

   181 }

   195 }