function __NLMemoryStreamInit($memory)
{
if (false != ($stream = @fopen('php://temp/maxmemory:' . $memory, 'rb+'))) {
$ptr = NLNewType(NLStreamType, _kNLStreamTypeID);
$ptr->_imp_flags = kNLMutable | kNLMemoryStream;
$ptr->_imp_data =& $stream;
$ptr->_cntref = 1;
ftruncate($ptr->_imp_data, 0);
fseek($in->_imp_data, 0, SEEK_SET);
$ptr->_imp_size = 0;
$ptr->_imp_capacity = $memory;
return $ptr;
}
return null;
}
function __NLDataInit($flags, $capacity, $bytes, $length)
{
if (is_scalar($bytes) && false != ($stream = @fopen('php://temp/maxmemory:307200', 'rb+'))) {
$ptr = NLNewType(_kNLDataTypeID);
$ptr->_imp_flags = $flags;
$ptr->_imp_data =& $stream;
ftruncate($ptr->_imp_data, 0);
if ($length > 0) {
fwrite($ptr->_imp_data, $bytes, $length);
fseek($ptr->_imp_data, 0, SEEK_SET);
}
$ptr->_imp_size = $length;
$ptr->_imp_capacity = $capacity;
return $ptr;
}
return null;
}
