00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024 #if !defined (octave_cell_h)
00025 #define octave_cell_h 1
00026
00027 #include <cstdlib>
00028
00029 #include <iosfwd>
00030 #include <string>
00031
00032 #include "mx-base.h"
00033 #include "oct-alloc.h"
00034 #include "str-vec.h"
00035
00036 #include "Cell.h"
00037 #include "error.h"
00038 #include "ov-base-mat.h"
00039 #include "ov-typeinfo.h"
00040
00041 class Octave_map;
00042 class octave_value_list;
00043
00044 class tree_walker;
00045
00046
00047
00048 class
00049 octave_cell : public octave_base_matrix<Cell>
00050 {
00051 public:
00052
00053 octave_cell (void)
00054 : octave_base_matrix<Cell> () { }
00055
00056 octave_cell (const Cell& c)
00057 : octave_base_matrix<Cell> (c) { }
00058
00059 octave_cell (const Array<std::string>& str)
00060 : octave_base_matrix<Cell> (Cell (str)), cellstr_cache (str) { }
00061
00062 octave_cell (const octave_cell& c)
00063 : octave_base_matrix<Cell> (c) { }
00064
00065 ~octave_cell (void) { }
00066
00067 octave_base_value *clone (void) const { return new octave_cell (*this); }
00068 octave_base_value *empty_clone (void) const { return new octave_cell (); }
00069
00070 #if 0
00071 octave_base_value *try_narrowing_conversion (void);
00072 #endif
00073
00074 octave_value subsref (const std::string& type,
00075 const std::list<octave_value_list>& idx)
00076 {
00077 octave_value_list tmp = subsref (type, idx, 1);
00078 return tmp.length () > 0 ? tmp(0) : octave_value ();
00079 }
00080
00081 octave_value_list subsref (const std::string& type,
00082 const std::list<octave_value_list>& idx, int);
00083
00084 octave_value subsref (const std::string& type,
00085 const std::list<octave_value_list>& idx,
00086 bool auto_add);
00087
00088 octave_value subsasgn (const std::string& type,
00089 const std::list<octave_value_list>& idx,
00090 const octave_value& rhs);
00091
00092 void assign (const octave_value_list& idx, const Cell& rhs);
00093
00094 void assign (const octave_value_list& idx, const octave_value& rhs);
00095
00096 void delete_elements (const octave_value_list& idx);
00097
00098 size_t byte_size (void) const;
00099
00100 octave_value sort (octave_idx_type dim = 0, sortmode mode = ASCENDING) const;
00101
00102 octave_value sort (Array<octave_idx_type> &sidx, octave_idx_type dim = 0,
00103 sortmode mode = ASCENDING) const;
00104
00105 sortmode is_sorted (sortmode mode = UNSORTED) const;
00106
00107 Array<octave_idx_type> sort_rows_idx (sortmode mode = ASCENDING) const;
00108
00109 sortmode is_sorted_rows (sortmode mode = UNSORTED) const;
00110
00111 bool is_matrix_type (void) const { return false; }
00112
00113 bool is_numeric_type (void) const { return false; }
00114
00115 bool is_defined (void) const { return true; }
00116
00117 bool is_constant (void) const { return true; }
00118
00119 bool is_cell (void) const { return true; }
00120
00121 bool is_cellstr (void) const;
00122
00123 bool is_true (void) const;
00124
00125 Cell cell_value (void) const { return matrix; }
00126
00127 octave_value_list list_value (void) const;
00128
00129 octave_value convert_to_str_internal (bool pad, bool, char type) const
00130 { return octave_value (all_strings (pad), type); }
00131
00132 string_vector all_strings (bool pad = false) const;
00133
00134 Array<std::string> cellstr_value (void) const;
00135
00136 bool print_as_scalar (void) const;
00137
00138 void print (std::ostream& os, bool pr_as_read_syntax = false) const;
00139
00140 void print_raw (std::ostream& os, bool pr_as_read_syntax = false) const;
00141
00142
00143 bool save_ascii (std::ostream& os);
00144
00145 bool load_ascii (std::istream& is);
00146
00147 bool save_binary (std::ostream& os, bool& save_as_floats);
00148
00149 bool load_binary (std::istream& is, bool swap,
00150 oct_mach_info::float_format fmt);
00151
00152 #if defined (HAVE_HDF5)
00153 bool save_hdf5 (hid_t loc_id, const char *name, bool save_as_floats);
00154
00155 bool load_hdf5 (hid_t loc_id, const char *name, bool have_h5giterate_bug);
00156 #endif
00157
00158 octave_value xisalnum (void) const { return matrix.xisalnum (); }
00159 octave_value xisalpha (void) const { return matrix.xisalpha (); }
00160 octave_value xisascii (void) const { return matrix.xisascii (); }
00161 octave_value xiscntrl (void) const { return matrix.xiscntrl (); }
00162 octave_value xisdigit (void) const { return matrix.xisdigit (); }
00163 octave_value xisgraph (void) const { return matrix.xisgraph (); }
00164 octave_value xislower (void) const { return matrix.xislower (); }
00165 octave_value xisprint (void) const { return matrix.xisprint (); }
00166 octave_value xispunct (void) const { return matrix.xispunct (); }
00167 octave_value xisspace (void) const { return matrix.xisspace (); }
00168 octave_value xisupper (void) const { return matrix.xisupper (); }
00169 octave_value xisxdigit (void) const { return matrix.xisxdigit (); }
00170 octave_value xtoascii (void) const { return matrix.xtoascii (); }
00171 octave_value xtolower (void) const { return matrix.xtolower (); }
00172 octave_value xtoupper (void) const { return matrix.xtoupper (); }
00173
00174 mxArray *as_mxArray (void) const;
00175
00176
00177
00178 void *mex_get_data (void) const;
00179
00180 private:
00181
00182 void clear_cellstr_cache (void) const;
00183
00184 mutable Array<std::string> cellstr_cache;
00185
00186 void make_cellstr_cache (void) const;
00187
00188 DECLARE_OCTAVE_ALLOCATOR
00189
00190 DECLARE_OV_TYPEID_FUNCTIONS_AND_DATA
00191 };
00192
00193 #endif
00194
00195
00196
00197
00198
00199