data-conv.cc File Reference

#include <cctype>
#include <cstdlib>
#include <istream>
#include <limits>
#include <ostream>
#include <vector>
#include "byte-swap.h"
#include "data-conv.h"
#include "lo-error.h"
#include "lo-ieee.h"
#include "oct-locbuf.h"

Go to the source code of this file.

Macros
#define	FIND_SIZED_FLOAT_TYPE(VAL, BITS)
#define	FIND_SIZED_INT_TYPE(VAL, BITS, TQ, Q)
#define	GET_SIZED_INT_TYPE(T, U)
#define	LS_DO_READ(TYPE, swap, data, size, len, stream)
#define	LS_DO_WRITE(TYPE, data, size, len, stream)

Functions
void	do_double_format_conversion (void *data, octave_idx_type len, octave::mach_info::float_format from_fmt, octave::mach_info::float_format to_fmt)
void	do_float_format_conversion (void *data, octave_idx_type len, octave::mach_info::float_format from_fmt, octave::mach_info::float_format to_fmt)
void	do_float_format_conversion (void *data, std::size_t sz, octave_idx_type len, octave::mach_info::float_format from_fmt, octave::mach_info::float_format to_fmt)
void	read_doubles (std::istream &is, double *data, save_type type, octave_idx_type len, bool swap, octave::mach_info::float_format fmt)
void	read_floats (std::istream &is, float *data, save_type type, octave_idx_type len, bool swap, octave::mach_info::float_format fmt)
void	write_doubles (std::ostream &os, const double *data, save_type type, octave_idx_type len)
void	write_floats (std::ostream &os, const float *data, save_type type, octave_idx_type len)

Macro Definition Documentation

FIND_SIZED_FLOAT_TYPE

#define FIND_SIZED_FLOAT_TYPE	(		VAL,
			BITS
	)

Value:

  do                                                                    \
    {                                                                   \
      int sz = BITS / std::numeric_limits<unsigned char>::digits;       \
      if (sizeof (float) == sz)                                         \
        VAL = oct_data_conv::dt_float;                                  \
      else if (sizeof (double) == sz)                                   \
        VAL = oct_data_conv::dt_double;                                 \
      else                                                              \
        VAL = oct_data_conv::dt_unknown;                                \
    }                                                                   \
  while (0)

Definition at line 87 of file data-conv.cc.

FIND_SIZED_INT_TYPE

#define FIND_SIZED_INT_TYPE	(		VAL,
			BITS,
			TQ,
			Q
	)

Value:

  do                                                                    \
    {                                                                   \
      int sz = BITS / std::numeric_limits<unsigned char>::digits;       \
      if (sizeof (TQ char) == sz)                                       \
        VAL = oct_data_conv::dt_ ## Q ## char;                          \
      else if (sizeof (TQ short) == sz)                                 \
        VAL = oct_data_conv::dt_ ## Q ## short;                         \
      else if (sizeof (TQ int) == sz)                                   \
        VAL = oct_data_conv::dt_ ## Q ## int;                           \
      else if (sizeof (TQ long) == sz)                                  \
        VAL = oct_data_conv::dt_ ## Q ## long;                          \
      else                                                              \
        VAL = oct_data_conv::dt_unknown;                                \
    }                                                                   \
  while (0)

Definition at line 69 of file data-conv.cc.

GET_SIZED_INT_TYPE

#define GET_SIZED_INT_TYPE	(		T,
			U
	)

Value:

  do                                            \
    {                                           \
      switch (sizeof (T))                       \
        {                                       \
        case 1:                                 \
          retval = dt_ ## U ## int8;            \
          break;                                \
                                                \
        case 2:                                 \
          retval = dt_ ## U ## int16;           \
          break;                                \
                                                \
        case 4:                                 \
          retval = dt_ ## U ## int32;           \
          break;                                \
                                                \
        case 8:                                 \
          retval = dt_ ## U ## int64;           \
          break;                                \
                                                \
        default:                                \
          retval = dt_unknown;                  \
          break;                                \
        }                                       \
    }                                           \
  while (0)

Definition at line 158 of file data-conv.cc.

LS_DO_READ

#define LS_DO_READ	(		TYPE,
			swap,
			data,
			size,
			len,
			stream
	)

Value:

  do                                                                    \
    {                                                                   \
      if (len > 0)                                                      \
        {                                                               \
          OCTAVE_LOCAL_BUFFER (TYPE, ptr, len);                         \
          std::streamsize n_bytes = size * static_cast<std::streamsize> (len); \
          stream.read (reinterpret_cast<char *> (ptr), n_bytes);        \
          if (swap)                                                     \
            swap_bytes< size > (ptr, len);                              \
          for (octave_idx_type i = 0; i < len; i++)                     \
            data[i] = ptr[i];                                           \
        }                                                               \
    }                                                                   \
  while (0)

Definition at line 580 of file data-conv.cc.

LS_DO_WRITE

#define LS_DO_WRITE	(		TYPE,
			data,
			size,
			len,
			stream
	)

Value:

  do                                                                    \
    {                                                                   \
     if (len > 0)                                                       \
       {                                                                \
        char tmp_type = type;                                           \
        stream.write (&tmp_type, 1);                                    \
        OCTAVE_LOCAL_BUFFER (TYPE, ptr, len);                           \
        for (octave_idx_type i = 0; i < len; i++)                       \
          ptr[i] = static_cast<TYPE> (data[i]);                         \
        std::streamsize n_bytes = size * static_cast<std::streamsize> (len); \
        stream.write (reinterpret_cast<char *> (ptr), n_bytes);         \
        }                                                               \
     }                                                                  \
  while (0)

Definition at line 599 of file data-conv.cc.

Function Documentation

do_double_format_conversion()

void do_double_format_conversion	(	void *	data,
		octave_idx_type	len,
		octave::mach_info::float_format	from_fmt,
		octave::mach_info::float_format	to_fmt
	)

Definition at line 659 of file data-conv.cc.

References flt_fmt_ieee_big_endian, and flt_fmt_ieee_little_endian.

Referenced by do_float_format_conversion(), read_doubles(), and read_floats().

do_float_format_conversion() [1/2]

void do_float_format_conversion	(	void *	data,
		octave_idx_type	len,
		octave::mach_info::float_format	from_fmt,
		octave::mach_info::float_format	to_fmt
	)

Definition at line 706 of file data-conv.cc.

References flt_fmt_ieee_big_endian, and flt_fmt_ieee_little_endian.

Referenced by do_float_format_conversion(), read_doubles(), and read_floats().

do_float_format_conversion() [2/2]

void do_float_format_conversion	(	void *	data,
		std::size_t	sz,
		octave_idx_type	len,
		octave::mach_info::float_format	from_fmt,
		octave::mach_info::float_format	to_fmt
	)

Definition at line 753 of file data-conv.cc.

References do_double_format_conversion(), do_float_format_conversion(), and len.

read_doubles()

void read_doubles	(	std::istream &	is,
		double *	data,
		save_type	type,
		octave_idx_type	len,
		bool	swap,
		octave::mach_info::float_format	fmt
	)

Definition at line 776 of file data-conv.cc.

References do_double_format_conversion(), do_float_format_conversion(), len, LS_CHAR, LS_DO_READ, LS_DOUBLE, LS_FLOAT, LS_INT, LS_SHORT, LS_U_CHAR, LS_U_INT, LS_U_SHORT, and OCTAVE_LOCAL_BUFFER.

Referenced by octave_complex::load_binary(), octave_complex_diag_matrix::load_binary(), octave_complex_matrix::load_binary(), octave_sparse_complex_matrix::load_binary(), octave_diag_matrix::load_binary(), octave_matrix::load_binary(), octave_sparse_matrix::load_binary(), and octave_scalar::load_binary().

read_floats()

void read_floats	(	std::istream &	is,
		float *	data,
		save_type	type,
		octave_idx_type	len,
		bool	swap,
		octave::mach_info::float_format	fmt
	)

Definition at line 836 of file data-conv.cc.

References do_double_format_conversion(), do_float_format_conversion(), len, LS_CHAR, LS_DO_READ, LS_DOUBLE, LS_FLOAT, LS_INT, LS_SHORT, LS_U_CHAR, LS_U_INT, LS_U_SHORT, and OCTAVE_LOCAL_BUFFER.

Referenced by octave_float_scalar::load_binary(), octave_float_complex::load_binary(), octave_float_complex_diag_matrix::load_binary(), octave_float_complex_matrix::load_binary(), octave_float_diag_matrix::load_binary(), and octave_float_matrix::load_binary().

write_doubles()

void write_doubles	(	std::ostream &	os,
		const double *	data,
		save_type	type,
		octave_idx_type	len
	)

Definition at line 892 of file data-conv.cc.

References len, LS_CHAR, LS_DO_WRITE, LS_DOUBLE, LS_FLOAT, LS_INT, LS_SHORT, LS_U_CHAR, LS_U_INT, and LS_U_SHORT.

Referenced by octave_complex_diag_matrix::save_binary(), octave_complex_matrix::save_binary(), octave_sparse_complex_matrix::save_binary(), octave_diag_matrix::save_binary(), octave_matrix::save_binary(), and octave_sparse_matrix::save_binary().

write_floats()

void write_floats	(	std::ostream &	os,
		const float *	data,
		save_type	type,
		octave_idx_type	len
	)

Definition at line 942 of file data-conv.cc.

References len, LS_CHAR, LS_DO_WRITE, LS_DOUBLE, LS_FLOAT, LS_INT, LS_SHORT, LS_U_CHAR, LS_U_INT, and LS_U_SHORT.

Referenced by octave_float_complex_diag_matrix::save_binary(), octave_float_complex_matrix::save_binary(), octave_float_diag_matrix::save_binary(), and octave_float_matrix::save_binary().