$fields['text'] .= "%87"; # <PARM> with attributes      	  $fields['text'] .= "%".$val; # NAME=	  if ( in_array($key, $params_with_attr) ) {	    if ($otadebug == 1) { $fields['text'].="&lt;value key=$key val=".$fields[$key]."&gt;"; }      	    $fields['text'] .= "%" . $fields[$key]; # VALUE=CODE	  } else {	    if ($otadebug == 1) { $fields['text'].="&lt;value key=$key val=".$fields[$key]."&gt;"; }      	    $fields['text'] .= "%11"; # VALUE=      	    $fields['text'] .= "%03". plusencode($fields[$key]) . "%00"; # STRING	  }      	  $fields['text'] .= "%01"; # </PARM>	}	$fields[$key] = "";      }      $fields['text'] .= "%01"; # </CHARACTERISTIC>    $fields['text'] .= "%01"; # </CHARACTERISTIC_LIST>    sendsms();  }  else if ( $mode == "WAPPUSHSI") {    $fields['text'] = "";    $fields['udh'] = "%06%05%04%0B%84%23%F0";    $MIME=urlencode("application/vnd.wap.sic");    $fields['text'] .= "%01";   # Transaction ID    $fields['text'] .= "%06";  # PDU Type (push)    $fields['text'] .= "%04";        # Headers Length (content-type + headers)    $fields['text'] .= "%03";        # Length of content type    $fields['text'] .= "%AE";      # Content-Type: application/vnd.wap.sic    $fields['text'] .= "%81";      # Charset    $fields['text'] .= "%EA";      # UTF-8    # End Headers        # see si_binary_output    $fields['text'] .= "%02";  # Version number (wbxml_version)    $fields['text'] .= "%05";  # Unknown Public Identifier (si_public_id)    $fields['text'] .= "%6A";  # charset= (sibxml->charset)    $fields['text'] .= "%00";  # String table length    $fields['text'] .= "%45"; # <si>      $fields['text'] .= "%C6"; # <indication...	$fields['text'] .= "%0b" . "%03" . $fields['url'] . "%00";	# href=$url	$fields['text'] .= "%11" . "%03" . rand(1,9)."@vodafone.pt" . "%00";	# si-id=	$fields['text'] .= "%08"; # action="signal-high"	#$fields['text'] .= "%0A" . "%C3%07%20%01%10%21%20%02%23"; # created=	#$fields['text'] .= "%10" . "%C3%04%20%02%06%30"; # valid=        $fields['text'] .= "%01"; # end indication params 	$fields['text'] .= "%03" . urlencode($fields['name']). "%00";      $fields['text'] .= "%01"; # </indication>    $fields['text'] .= "%01"; # </si>    $fields['name']="";    $fields['url']="";    sendsms();  }  else if ( $mode == "WAPPUSHSL") {    $fields['text'] = "";    $fields['udh'] = "%06%05%04%0B%84%23%F0";    $MIME=urlencode("application/vnd.wap.slc");    #$fields['text'] .= "%01";   # Transaction ID    #$fields['text'] .= "%06";  # PDU Type (push)    #$fields['text'] .= "%04";        # Headers Length (content-type + headers)    #$fields['text'] .= "%03";       # length of content type    #$fields['text'] .= "%B0";      # Content-Type: application/vnd.wap.slc    #$fields['text'] .= "%81";      # Charset    #$fields['text'] .= "%EA";      # UTF-8    $fields['text'] .= "%01";   # Transaction ID    $fields['text'] .= "%06";  # PDU Type (push)    $fields['text'] .= "%1B";        # Headers Length (content-type + headers)    $fields['text'] .= "%1A";       # length of content type    $fields['text'] .= $MIME."%00";      # Content-Type: application/vnd.wap.slc    $fields['text'] .= "%81";      # Charset    $fields['text'] .= "%EA";      # UTF-8    # End Headers        # see si_binary_output    $fields['text'] .= "%02";  # Version number (wbxml_version)    $fields['text'] .= "%06";  # Unknown Public Identifier (si_public_id)    $fields['text'] .= "%6A";  # charset= (sibxml->charset)    $fields['text'] .= "%00";  # String table length    $fields['text'] .= "%85"; # <sl>      $fields['text'] .= "%0b"; # action="signal-high"      $fields['text'] .= "%08" . "%03" . $fields['url'] . "%00";	# href=$url    $fields['text'] .= "%01"; # </si>    $fields['name']="";    $fields['url']="";    sendsms();  }  else if ( $mode == "SIEMENS") {    $fields['coding'] = "1";    #print_r($mmc_file_raw);exit;    #move_uploaded_file($mmc_file_raw, "/tmp/siemens.tmp");    $h=fopen($mmc_file_raw, "rb");    $file = fread($h, filesize($mmc_file_raw));    fclose($h);    $file_size = strlen($file);    #$file = join("", file($mmc_file_raw));    #print strlen($file); exit;    $file = join("", unpack("H*", $file));    $file = preg_replace("/(..)/", "%$1", $file);    $max_size = 140 - 22 - 3 - strlen($mmc_file_name);    $file_type = $fields['mmc_file_type'];    $file_name = $fields['mmc_file_name'];    $fields['mmc_file'] = "";    $fields['mmc_file_type'] = "";    $fields['mmc_file_name'] = "";    $count = 0;     $max = ceil( $file_size / $max_size);    $packet_size = $max_size;    $object_size = sprintf("%08X", $file_size);    $object_size = "%". substr($object_size, 6, 2).  "%". substr($object_size, 4, 2).  "%". substr($object_size, 2, 2).  "%". substr($object_size, 0, 2);    print "max=$max, packetsize=$packet_size, objectsize=$object_size; file_size: ".$file_size."<p>";    while ($count < $max) {	    if ( $count == $max - 1 ) { # Last Packet	    	$packet_size = $file_size % $max_size;	    }    	    $fields['text'] = "";	    $fields['text'] .= "//SEO";	    $fields['text'] .= "%01"; # Version 1	    $fields['text'] .= "%". sprintf("%02X", $packet_size % 256). "%". sprintf("%02X", floor($packet_size / 256)); # Data Size on this message	    $fields['text'] .= "%00%00%00%00"; # Reference	    $fields['text'] .= "%". sprintf("%02X", ($count+1) % 256). "%". sprintf("%02X", floor(($count+1) / 256)); # Packet Number	    $fields['text'] .= "%". sprintf("%02X", $max % 256). "%". sprintf("%02X", floor($max / 256)); # Max Packets	    $fields['text'] .= $object_size; # Object Size	    $fields['text'] .= "%". sprintf("%02X", strlen($mmc_file_type)). $mmc_file_type; # Object Type	    $fields['text'] .= "%". sprintf("%02X", strlen($mmc_file_name)). $mmc_file_name; # Object File Name	    $fields['text'] .= substr($file, $count * $max_size * 3, $packet_size * 3);	    #print $fields['text']. "<br>";	    #$debug = 1;	    sendsms();	    $count++;    }  }  else {  	sendsms();  }  function sendsms (){  	global $fields, $debug, $kannel;	  $fields['mode'] = "";	  reset($fields);	  while(list($k,$v) = each($fields)) {	    if ( $v != "" ) {	      $string .= "&$k=$v";	    }	  }	    	  print ($debug ? "[DEBUG]" : "" )."Getting $string<br>";	  if ( !$debug ) { $result = @file("http://".$kannel['host'].":".$kannel['port']."/sendsms?user=".$kannel['user']."&pass=".$kannel['pass']."&".$string); }	  print_r( $result);  }  function plusencode($string) {	return preg_replace("/\+/", "%2B", $string);  }?>