GNU Octave
4.0.0
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
|
#include <cfloat>
#include <cstring>
#include <cctype>
#include <fstream>
#include <iomanip>
#include <iostream>
#include <sstream>
#include <string>
#include <vector>
#include "byte-swap.h"
#include "data-conv.h"
#include "file-ops.h"
#include "glob-match.h"
#include "lo-mappers.h"
#include "mach-info.h"
#include "oct-env.h"
#include "oct-time.h"
#include "quit.h"
#include "str-vec.h"
#include "file-stat.h"
#include "oct-locbuf.h"
#include "Cell.h"
#include "defun.h"
#include "error.h"
#include "gripes.h"
#include "load-save.h"
#include "load-path.h"
#include "oct-obj.h"
#include "oct-map.h"
#include "ov-cell.h"
#include "ov-class.h"
#include "ov-fcn-inline.h"
#include "pager.h"
#include "pt-exp.h"
#include "sysdep.h"
#include "toplev.h"
#include "unwind-prot.h"
#include "utils.h"
#include "variables.h"
#include "version.h"
#include "dMatrix.h"
#include "ls-utils.h"
#include "ls-mat5.h"
#include "parse.h"
#include "defaults.h"
#include <zlib.h>
Go to the source code of this file.
Macros | |
#define | INT8(l) ((l) == miINT8 || (l) == miUINT8 || (l) == miUTF8) |
#define | INT_LEN(nel, size) |
#define | MAT5_DO_WRITE(TYPE, data, count, stream) |
#define | OCTAVE_MAT5_INTEGER_READ(TYP) |
#define | PAD(l) (((l) > 0 && (l) <= 4) ? 4 : (((l)+7)/8)*8) |
#define | READ_INTEGER_DATA(TYPE, swap, data, size, len, stream) |
#define | READ_PAD(is_small_data_element, l) ((is_small_data_element) ? 4 : (((l)+7)/8)*8) |
Functions | |
static void | gripe_dim_too_large (const std::string &name) |
static void | read_int (std::istream &is, bool swap, int32_t &val) |
static void | read_mat5_binary_data (std::istream &is, double *data, octave_idx_type count, bool swap, mat5_data_type type, oct_mach_info::float_format flt_fmt) |
static void | read_mat5_binary_data (std::istream &is, float *data, octave_idx_type count, bool swap, mat5_data_type type, oct_mach_info::float_format flt_fmt) |
std::string | read_mat5_binary_element (std::istream &is, const std::string &filename, bool swap, bool &global, octave_value &tc) |
int | read_mat5_binary_file_header (std::istream &is, bool &swap, bool quiet, const std::string &filename) |
template<class T > | |
void | read_mat5_integer_data (std::istream &is, T *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, octave_int8 *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, octave_int16 *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, octave_int32 *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, octave_int64 *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, octave_uint8 *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, octave_uint16 *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, octave_uint32 *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, octave_uint64 *m, octave_idx_type count, bool swap, mat5_data_type type) |
template void | read_mat5_integer_data (std::istream &is, int *m, octave_idx_type count, bool swap, mat5_data_type type) |
static int | read_mat5_tag (std::istream &is, bool swap, int32_t &type, int32_t &bytes, bool &is_small_data_element) |
int | save_mat5_array_length (const double *val, octave_idx_type nel, bool save_as_floats) |
int | save_mat5_array_length (const float *, octave_idx_type nel, bool) |
int | save_mat5_array_length (const Complex *val, octave_idx_type nel, bool save_as_floats) |
int | save_mat5_array_length (const FloatComplex *val, octave_idx_type nel, bool save_as_floats) |
bool | save_mat5_binary_element (std::ostream &os, const octave_value &tc, const std::string &name, bool mark_as_global, bool mat7_format, bool save_as_floats, bool compressing) |
int | save_mat5_element_length (const octave_value &tc, const std::string &name, bool save_as_floats, bool mat7_format) |
static void | write_mat5_array (std::ostream &os, const NDArray &m, bool save_as_floats) |
static void | write_mat5_array (std::ostream &os, const FloatNDArray &m, bool) |
static bool | write_mat5_cell_array (std::ostream &os, const Cell &cell, bool mark_as_global, bool save_as_floats) |
template<class T > | |
void | write_mat5_integer_data (std::ostream &os, const T *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const octave_int8 *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const octave_int16 *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const octave_int32 *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const octave_int64 *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const octave_uint8 *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const octave_uint16 *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const octave_uint32 *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const octave_uint64 *m, int size, octave_idx_type nel) |
template void | write_mat5_integer_data (std::ostream &os, const int *m, int size, octave_idx_type nel) |
static void | write_mat5_sparse_index_vector (std::ostream &os, const octave_idx_type *idx, octave_idx_type nel) |
static int | write_mat5_tag (std::ostream &is, int type, octave_idx_type bytes) |
Variables | |
static octave_value | subsys_ov |
Definition at line 86 of file ls-mat5.cc.
Referenced by read_mat5_binary_element().
#define INT_LEN | ( | nel, | |
size | |||
) |
Referenced by save_mat5_element_length().
#define MAT5_DO_WRITE | ( | TYPE, | |
data, | |||
count, | |||
stream | |||
) |
Definition at line 1674 of file ls-mat5.cc.
Referenced by write_mat5_array().
#define OCTAVE_MAT5_INTEGER_READ | ( | TYP | ) |
Definition at line 372 of file ls-mat5.cc.
Referenced by read_mat5_binary_element().
#define PAD | ( | l | ) | (((l) > 0 && (l) <= 4) ? 4 : (((l)+7)/8)*8) |
Definition at line 85 of file ls-mat5.cc.
Referenced by save_mat5_array_length(), save_mat5_binary_element(), save_mat5_element_length(), write_mat5_array(), and write_mat5_integer_data().
#define READ_INTEGER_DATA | ( | TYPE, | |
swap, | |||
data, | |||
size, | |||
len, | |||
stream | |||
) |
Referenced by read_mat5_integer_data().
#define READ_PAD | ( | is_small_data_element, | |
l | |||
) | ((is_small_data_element) ? 4 : (((l)+7)/8)*8) |
Definition at line 84 of file ls-mat5.cc.
Referenced by read_mat5_binary_element().
enum arrayclasstype |
Definition at line 99 of file ls-mat5.cc.
|
static |
Definition at line 2323 of file ls-mat5.cc.
References warning().
Referenced by save_mat5_binary_element().
|
static |
Definition at line 475 of file ls-mat5.cc.
References swap_bytes< 4 >().
Referenced by read_mat5_binary_element().
|
static |
Definition at line 126 of file ls-mat5.cc.
References LS_CHAR, LS_DOUBLE, LS_FLOAT, LS_INT, LS_LONG, LS_SHORT, LS_U_CHAR, LS_U_INT, LS_U_LONG, LS_U_SHORT, miDOUBLE, miINT16, miINT32, miINT64, miINT8, miMATRIX, miRESERVE1, miRESERVE2, miRESERVE3, miSINGLE, miUINT16, miUINT32, miUINT64, miUINT8, miUTF16, miUTF32, miUTF8, and read_doubles().
Referenced by read_mat5_binary_element().
|
static |
Definition at line 191 of file ls-mat5.cc.
References LS_CHAR, LS_DOUBLE, LS_FLOAT, LS_INT, LS_LONG, LS_SHORT, LS_U_CHAR, LS_U_INT, LS_U_LONG, LS_U_SHORT, miDOUBLE, miINT16, miINT32, miINT64, miINT8, miMATRIX, miRESERVE1, miRESERVE2, miRESERVE3, miSINGLE, miUINT16, miUINT32, miUINT64, miUINT8, miUTF16, miUTF32, miUTF8, and read_floats().
std::string read_mat5_binary_element | ( | std::istream & | is, |
const std::string & | filename, | ||
bool | swap, | ||
bool & | global, | ||
octave_value & | tc | ||
) |
Definition at line 492 of file ls-mat5.cc.
References action_container::add_fcn(), symbol_table::alloc_scope(), octave_map::assign(), symbol_table::assign(), octave_scalar_map::begin(), octave_value::cell_value(), Sparse< T >::cidx(), Array< T >::clear(), octave_scalar_map::contents(), octave_map::contents(), octave_value::convert_to_str(), Sparse< T >::data(), file_ops::dir_sep_chars(), octave_scalar_map::end(), symbol_table::erase_scope(), error(), error_state, eval_string(), base_file_stat::exists(), octave_value::fcn_handle_value(), octave_fcn_handle::fcn_val(), feval(), dir_path::find_first_of(), load_path::find_method(), oct_mach_info::flt_fmt_ieee_big_endian, oct_mach_info::flt_fmt_ieee_little_endian, oct_mach_info::flt_fmt_unknown, Array< T >::fortran_vec(), imag(), INT8, octave_scalar_map::key(), load_fcn_from_file(), octave_env::make_absolute(), make_fcn_handle(), MAT_FILE_CELL_CLASS, MAT_FILE_CHAR_CLASS, MAT_FILE_DOUBLE_CLASS, MAT_FILE_FUNCTION_CLASS, MAT_FILE_INT16_CLASS, MAT_FILE_INT32_CLASS, MAT_FILE_INT64_CLASS, MAT_FILE_INT8_CLASS, MAT_FILE_OBJECT_CLASS, MAT_FILE_SINGLE_CLASS, MAT_FILE_SPARSE_CLASS, MAT_FILE_STRUCT_CLASS, MAT_FILE_UINT16_CLASS, MAT_FILE_UINT32_CLASS, MAT_FILE_UINT64_CLASS, MAT_FILE_UINT8_CLASS, MAT_FILE_WORKSPACE_CLASS, miCOMPRESSED, miINT32, miMATRIX, miUINT32, miUTF16, miUTF32, miUTF8, names(), octave_scalar_map::nfields(), Array< T >::numel(), dim_vector::numel(), OCTAVE_EXEC_PREFIX, OCTAVE_LOCAL_BUFFER, OCTAVE_MAT5_INTEGER_READ, octave_value(), octave_call_stack::pop(), octave_call_stack::push(), read_int(), read_mat5_binary_data(), read_mat5_binary_element(), read_mat5_integer_data(), read_mat5_tag(), READ_PAD, octave_class::reconstruct_exemplar(), octave_class::reconstruct_parents(), dim_vector::resize(), Sparse< T >::ridx(), action_container::run(), octave_value::scalar_map_value(), symbol_table::set_scope(), octave_value::string_value(), swap_bytes< 4 >(), load_path::system_path(), octave_value::uint32_array_value(), octave_value::uint8_array_value(), warning(), and Sparse< T >::xdata().
Referenced by do_load(), read_mat5_binary_element(), and read_mat5_binary_file_header().
int read_mat5_binary_file_header | ( | std::istream & | is, |
bool & | swap, | ||
bool | quiet, | ||
const std::string & | filename | ||
) |
Definition at line 1570 of file ls-mat5.cc.
References error(), error_state, octave_value::is_uint8_type(), Array< T >::numel(), read_mat5_binary_element(), swap_bytes< 8 >(), octave_value::uint8_array_value(), and warning().
Referenced by Fload(), and get_file_format().
void read_mat5_integer_data | ( | std::istream & | is, |
T * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
Definition at line 257 of file ls-mat5.cc.
References miDOUBLE, miINT16, miINT32, miINT64, miINT8, miMATRIX, miRESERVE1, miRESERVE2, miRESERVE3, miSINGLE, miUINT16, miUINT32, miUINT64, miUINT8, and READ_INTEGER_DATA.
Referenced by read_mat5_binary_element().
template void read_mat5_integer_data | ( | std::istream & | is, |
octave_int8 * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
template void read_mat5_integer_data | ( | std::istream & | is, |
octave_int16 * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
template void read_mat5_integer_data | ( | std::istream & | is, |
octave_int32 * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
template void read_mat5_integer_data | ( | std::istream & | is, |
octave_int64 * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
template void read_mat5_integer_data | ( | std::istream & | is, |
octave_uint8 * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
template void read_mat5_integer_data | ( | std::istream & | is, |
octave_uint16 * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
template void read_mat5_integer_data | ( | std::istream & | is, |
octave_uint32 * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
template void read_mat5_integer_data | ( | std::istream & | is, |
octave_uint64 * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
template void read_mat5_integer_data | ( | std::istream & | is, |
int * | m, | ||
octave_idx_type | count, | ||
bool | swap, | ||
mat5_data_type | type | ||
) |
|
static |
Definition at line 437 of file ls-mat5.cc.
References swap_bytes< 4 >().
Referenced by read_mat5_binary_element().
int save_mat5_array_length | ( | const double * | val, |
octave_idx_type | nel, | ||
bool | save_as_floats | ||
) |
Definition at line 1981 of file ls-mat5.cc.
References max(), size(), and xfinite().
Referenced by save_mat5_array_length(), and save_mat5_element_length().
int save_mat5_array_length | ( | const float * | , |
octave_idx_type | nel, | ||
bool | |||
) |
Definition at line 2055 of file ls-mat5.cc.
int save_mat5_array_length | ( | const Complex * | val, |
octave_idx_type | nel, | ||
bool | save_as_floats | ||
) |
Definition at line 2112 of file ls-mat5.cc.
References imag(), OCTAVE_LOCAL_BUFFER, real(), and save_mat5_array_length().
int save_mat5_array_length | ( | const FloatComplex * | val, |
octave_idx_type | nel, | ||
bool | save_as_floats | ||
) |
Definition at line 2133 of file ls-mat5.cc.
References imag(), OCTAVE_LOCAL_BUFFER, real(), and save_mat5_array_length().
bool save_mat5_binary_element | ( | std::ostream & | os, |
const octave_value & | tc, | ||
const std::string & | name, | ||
bool | mark_as_global, | ||
bool | mat7_format, | ||
bool | save_as_floats, | ||
bool | compressing | ||
) |
Definition at line 2333 of file ls-mat5.cc.
References octave_value::array_value(), octave_value::bool_array_value(), octave_value::cell_value(), octave_value::char_array_value(), Sparse< T >::cidx(), octave_value::class_name(), Sparse< T >::cols(), octave_value::complex_array_value(), octave_map::contents(), Array< T >::data(), Sparse< T >::data(), octave_value::dims(), error(), error_state, feval(), load_path::find_method(), octave_value::float_array_value(), octave_value::float_complex_array_value(), Array< T >::fortran_vec(), gripe_dim_too_large(), gripe_wrong_type_arg(), imag(), octave_value::int16_array_value(), octave_value::int32_array_value(), octave_value::int64_array_value(), octave_value::int8_array_value(), octave_value::is_bool_type(), octave_value::is_cell(), octave_value::is_complex_matrix(), octave_value::is_complex_scalar(), octave_value::is_complex_type(), octave_value::is_inline_function(), octave_value::is_map(), octave_value::is_object(), octave_value::is_range(), octave_value::is_real_matrix(), octave_value::is_real_scalar(), octave_value::is_single_type(), octave_value::is_sparse_type(), octave_value::is_string(), octave_map::keys(), octave_value::map_value(), MAT_FILE_CELL_CLASS, MAT_FILE_CHAR_CLASS, MAT_FILE_DOUBLE_CLASS, MAT_FILE_INT16_CLASS, MAT_FILE_INT32_CLASS, MAT_FILE_INT64_CLASS, MAT_FILE_INT8_CLASS, MAT_FILE_OBJECT_CLASS, MAT_FILE_SINGLE_CLASS, MAT_FILE_SPARSE_CLASS, MAT_FILE_STRUCT_CLASS, MAT_FILE_UINT16_CLASS, MAT_FILE_UINT32_CLASS, MAT_FILE_UINT64_CLASS, MAT_FILE_UINT8_CLASS, max(), miCOMPRESSED, miINT32, miINT8, miMATRIX, miUINT16, miUINT32, octave_value::ndims(), octave_map::nfields(), Sparse< T >::nnz(), Array< T >::numel(), dim_vector::numel(), octave_map::numel(), Sparse< T >::nzmax(), OCTAVE_LOCAL_BUFFER, PAD, real(), Sparse< T >::ridx(), save_mat5_binary_element(), save_mat5_element_length(), octave_value::sparse_complex_matrix_value(), octave_value::sparse_matrix_value(), octave_value::uint16_array_value(), octave_value::uint32_array_value(), octave_value::uint64_array_value(), octave_value::uint8_array_value(), write_mat5_array(), write_mat5_cell_array(), write_mat5_integer_data(), write_mat5_sparse_index_vector(), and write_mat5_tag().
Referenced by do_save(), save_mat5_binary_element(), and write_mat5_cell_array().
int save_mat5_element_length | ( | const octave_value & | tc, |
const std::string & | name, | ||
bool | save_as_floats, | ||
bool | mat7_format | ||
) |
Definition at line 2154 of file ls-mat5.cc.
References octave_value::array_value(), octave_map::begin(), octave_value::bool_array_value(), octave_value::cell_value(), octave_value::char_array_value(), octave_value::class_name(), Sparse< T >::cols(), octave_value::complex_array_value(), octave_map::contents(), Sparse< T >::data(), octave_map::end(), octave_value::float_array_value(), octave_value::float_complex_array_value(), Array< T >::fortran_vec(), octave_value::int16_array_value(), octave_value::int32_array_value(), octave_value::int64_array_value(), octave_value::int8_array_value(), INT_LEN, octave_value::is_bool_type(), octave_value::is_cell(), octave_value::is_complex_matrix(), octave_value::is_complex_scalar(), octave_value::is_complex_type(), octave_value::is_inline_function(), octave_value::is_map(), octave_value::is_object(), octave_value::is_range(), octave_value::is_real_matrix(), octave_value::is_real_scalar(), octave_value::is_single_type(), octave_value::is_sparse_type(), octave_value::is_string(), jit_convention::length, octave_value::map_value(), octave_value::ndims(), Sparse< T >::nnz(), Array< T >::numel(), octave_map::numel(), PAD, save_mat5_array_length(), octave_value::sparse_complex_matrix_value(), octave_value::sparse_matrix_value(), octave_value::uint16_array_value(), octave_value::uint32_array_value(), octave_value::uint64_array_value(), and octave_value::uint8_array_value().
Referenced by save_mat5_binary_element().
Definition at line 1688 of file ls-mat5.cc.
References NDArray::all_integers(), Array< T >::data(), get_save_type(), LS_CHAR, LS_DOUBLE, LS_FLOAT, LS_INT, LS_LONG, LS_SHORT, LS_U_CHAR, LS_U_INT, LS_U_LONG, LS_U_SHORT, MAT5_DO_WRITE, miDOUBLE, miINT16, miINT32, miINT8, miSINGLE, miUINT16, miUINT32, miUINT8, Array< T >::numel(), PAD, size(), NDArray::too_large_for_float(), warning(), and write_mat5_tag().
Referenced by save_mat5_binary_element().
|
static |
Definition at line 1785 of file ls-mat5.cc.
References FloatNDArray::all_integers(), Array< T >::data(), get_save_type(), LS_CHAR, LS_DOUBLE, LS_FLOAT, LS_INT, LS_LONG, LS_SHORT, LS_U_CHAR, LS_U_INT, LS_U_LONG, LS_U_SHORT, MAT5_DO_WRITE, miDOUBLE, miINT16, miINT32, miINT8, miSINGLE, miUINT16, miUINT32, miUINT8, Array< T >::numel(), PAD, size(), and write_mat5_tag().
|
static |
Definition at line 1963 of file ls-mat5.cc.
References Array< T >::numel(), and save_mat5_binary_element().
Referenced by save_mat5_binary_element().
void write_mat5_integer_data | ( | std::ostream & | os, |
const T * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
Definition at line 1872 of file ls-mat5.cc.
References miINT16, miINT32, miINT64, miINT8, miUINT16, miUINT32, miUINT64, miUINT8, PAD, size(), and write_mat5_tag().
Referenced by save_mat5_binary_element(), and write_mat5_sparse_index_vector().
template void write_mat5_integer_data | ( | std::ostream & | os, |
const octave_int8 * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
template void write_mat5_integer_data | ( | std::ostream & | os, |
const octave_int16 * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
template void write_mat5_integer_data | ( | std::ostream & | os, |
const octave_int32 * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
template void write_mat5_integer_data | ( | std::ostream & | os, |
const octave_int64 * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
template void write_mat5_integer_data | ( | std::ostream & | os, |
const octave_uint8 * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
template void write_mat5_integer_data | ( | std::ostream & | os, |
const octave_uint16 * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
template void write_mat5_integer_data | ( | std::ostream & | os, |
const octave_uint32 * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
template void write_mat5_integer_data | ( | std::ostream & | os, |
const octave_uint64 * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
template void write_mat5_integer_data | ( | std::ostream & | os, |
const int * | m, | ||
int | size, | ||
octave_idx_type | nel | ||
) |
|
static |
Definition at line 2308 of file ls-mat5.cc.
References OCTAVE_LOCAL_BUFFER, and write_mat5_integer_data().
Referenced by save_mat5_binary_element().
|
static |
Definition at line 1648 of file ls-mat5.cc.
Referenced by save_mat5_binary_element(), write_mat5_array(), and write_mat5_integer_data().
|
static |
Definition at line 90 of file ls-mat5.cc.