binary.php

   1 <?php
   2
   3 #  Copyright (C) 2007 Jason Woofenden
   4 #
   5 #  This file is part of wfpl.
   6 #
   7 #  wfpl is free software; you can redistribute it and/or modify it under the
   8 #  terms of the GNU Lesser General Public License as published by the Free
   9 #  Software Foundation; either version 2.1 of the License, or (at your option)
  10 #  any later version.
  11 #
  12 #  wfpl is distributed in the hope that it will be useful, but WITHOUT ANY
  13 #  WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  14 #  FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License for
  15 #  more details.
  16 #
  17 #  You should have received a copy of the GNU Lesser General Public License
  18 #  along with wfpl; if not, write to the Free Software Foundation, Inc., 51
  19 #  Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  20
  21
  22 # This file contains code to work with "raw" binary numbers in big-endian format
  23
  24
  25 # return a 4 byte string that represent the passed integer as a big-endian binary number
  26 function to_raw_int($int) {
  27         return chr($int >> 24) . chr(($int >> 16) & 0xff) . chr(($int >> 8) & 0xff) . chr($int & 0xff);
  28 }
  29
  30 # return a php number from the string you pass in. The first 4 bytes of the
  31 # string are read in as a binary value in big-endian format.
  32 function from_raw_int($quad) {
  33         return (ord(substr($quad, 0, 1)) << 24) + (ord(substr($quad, 1, 1)) << 16) + (ord(substr($quad, 2, 1)) << 8) + ord(substr($quad, 3, 1));
  34 }
  35
  36 function int_at($string, $index) {
  37         return from_raw_int(substr($string, $index * 4, 4));
  38 }
  39
  40 # remove the first 4 bytes of the string, and return them as an int
  41 function pop_int(&$string) {
  42         $int = from_raw_int(substr($string, 0, 4));
  43         $string = substr($string, 4);
  44         return $int;
  45 }
  46
  47 # convert an array (not hash) to a string of bytes
  48 function array_to_raw($data) {
  49         $ret = to_raw_int(count($data));
  50         foreach($data as $dat) {
  51                 $ret .= to_raw_int(strlen($dat));
  52                 $ret .= $dat;
  53         }
  54         return $ret;
  55 }
  56
  57 function raw_to_array($data) {
  58         $header_count = pop_int($data);
  59         $ret = array();
  60         while($header_count--) {
  61                 $size = pop_int($data);
  62                 $ret[] = substr($data, 0, $size);
  63                 $data = substr($data, $size);
  64         }
  65         return $ret;
  66 }
  67
  68 ?>