Class: CArray::Serializer

Inherits:
Object
  • Object
show all
Defined in:
lib/carray/base/serialize.rb

Overview

:nodoc:

Constant Summary collapse

Header = 
CA.struct(:pack=>1, :size=>256) {
  char_p    :magic_string,   :bytes=>8
  char_p    :data_type_name, :bytes=>8
  char_p    :endian,         :bytes=>4
  int32     :data_type
  int64     :bytes
  int32     :rank
  int64     :elements
  int32     :has_mask
  array     :dim,            :type => CArray.int64(CA_RANK_MAX)
  int32     :has_attr
}

Instance Method Summary collapse

Constructor Details

#initialize(io) ⇒ Serializer

Returns a new instance of Serializer.



64
65
66
67
68
69
70
71
 
# File 'lib/carray/base/serialize.rb', line 64

def initialize (io)
  case io
  when String
    @io = StringIO.new(io)
  else
    @io = io
  end
end

Instance Method Details

#load(opt = {}) ⇒ Object 



117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
 
# File 'lib/carray/base/serialize.rb', line 117

def load (opt = {})
  header = Header.decode(@io.read(256))
  if header[:magic_string] != "_CARRAY_"
    raise "not a CArray binary data"      
  end
  case header[:endian]
  when "_LE_"
    endian = CA_LITTLE_ENDIAN
  when "_BE_"
    endian = CA_BIG_ENDIAN
  end
  unless CArray.endian == endian
    header.swap_bytes!
  end
  data_type = header[:data_type]
  bytes     = header[:bytes]
  rank      = header[:rank]
  elements  = header[:elements]
  has_mask  = header[:has_mask] != 0 ? true : false
  dim       = header[:dim][[0, rank]].to_a
  has_attr  = header[:has_attr]
  if data_type == 255
    data_type = header[:data_type_name].strip.to_sym
  end
  data_type, bytes = CArray.guess_type_and_bytes(data_type, bytes)
  if opt[:data_type] and data_type == CA_FIXLEN
    data_type = opt[:data_type]
  end
  ca = CArray.new(data_type, dim, :bytes=>bytes)
  if data_type == CA_OBJECT
    ca.value[] = Marshal.load(@io)
  else
    ca.load_binary(@io)
    unless CArray.endian == endian
      ca.swap_bytes!
    end
  end
  if has_mask
    ca.mask = 0
    ca.mask.load_binary(@io)
  end
  if has_attr == 1
    ca.attribute = Marshal.load(@io)
  end
  return ca
end

#save(ca, opt = {}) ⇒ Object 



73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
 
# File 'lib/carray/base/serialize.rb', line 73

def save (ca, opt = {})
  endian = opt[:endian] || CArray.endian
  # ---
  header = Header.new()
  header[:magic_string]   = "_CARRAY_"
  header[:data_type_name] = ca.data_type_name.ljust(8)
  header[:endian]         = ( endian == CA_LITTLE_ENDIAN ) ? "_LE_" : "_BE_"
  header[:data_type]      = ca.data_type
  header[:bytes]          = ca.bytes
  header[:rank]           = ca.rank
  header[:elements]       = ca.elements
  header[:has_mask]       = ca.has_mask? ? 1 : 0
  header[:dim][[0,ca.rank]] = ca.dim
  attr = nil
  if ca.attribute
    attr = ca.attribute.clone
  end
  if opt[:attribute]
    (attr ||= {}).update(opt[:attribute])
  end
  header[:has_attr]       = attr.empty? ? 0 : 1
  unless CArray.endian == endian
    header.swap_bytes!
  end
  @io.write(header.encode)
  # ---
  if ca.data_type == CA_OBJECT
    Marshal.dump(ca.value.to_a, @io)
  else
    unless CArray.endian == endian
      ca = ca.swap_bytes
    end
    ca.dump_binary(@io)
  end
  # ---
  if ca.has_mask?
    ca.mask.dump_binary(@io)
  end
  if attr
    Marshal.dump(attr, @io)
  end
  return ca
end