Class: Menilite::Model

Inherits:
Object
  • Object
show all
Extended by:
Helper
Includes:
Helper
Defined in:
lib/menilite/model.rb

Defined Under Namespace

Classes: ActionInfo, FieldInfo

Instance Attribute Summary collapse

Class Method Summary collapse

Instance Method Summary collapse

Methods included from Helper

client?, if_client, if_server, server?

Constructor Details

#initialize(fields = {}) ⇒ Model

Returns a new instance of Model.



21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
 
# File 'lib/menilite/model.rb', line 21

def initialize(fields = {})
  self.class.init

  if client?
    fields = fields.clone
  else
    fields = fields.map{|k,v| [k.to_sym, v] }.to_h
    fields.merge!(self.class.privilege_fields)
  end

  defaults = self.class.field_info.map{|k, d| [d.name, d.params[:default]] if d.params.has_key?(:default) }.compact.to_h
  @guid = fields.delete(:id) || SecureRandom.uuid
  @fields = defaults.merge(fields)
  @listeners = {}
end

Instance Attribute Details

#fields ⇒ Object (readonly)

Returns the value of attribute fields.



19
20
21
 
# File 'lib/menilite/model.rb', line 19

def fields
  @fields
end

Class Method Details

.[](id) ⇒ Object 



238
239
240
241
 
# File 'lib/menilite/model.rb', line 238

def [](id)
  self.init
  store.find(self, id)
end

.action(name, options = {}, &block) ⇒ Object 



190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
 
# File 'lib/menilite/model.rb', line 190

def action(name, options = {}, &block)
  action_info[name.to_s] = ActionInfo.new(name, block.parameters, options)
  if server?
    self.instance_eval do
      if options[:class]
        define_singleton_method(name, block)
      else
        define_method(name, block)
      end
    end
  else
    method = Proc.new do |model, *args, &callback| # todo: should adopt keyword parameters
      action_url = options[:on_create] || options[:class] ? "api/#{self}/#{name}" : "api/#{self}/#{model.id}/#{name}"
      post_data = {}
      post_data[:model] = model.to_h if options[:on_create]
      post_data[:args] = args
      Browser::HTTP.post(action_url, post_data.to_json) do
        on :success do |res|
          callback.call(:success, res) if callback
        end

        on :failure do |res|
          callback.call(:failure, res) if callback
        end
      end
    end
    self.instance_eval do
      if options[:class]
        define_singleton_method(name) {|*args, &callback| method.call(self, *args, &callback) }
      else
        define_method(name) {|*args, &callback| method.call(self, *args, &callback) }
      end
    end
  end
end

.action_info ⇒ Object 



87
88
89
 
# File 'lib/menilite/model.rb', line 87

def action_info
  @action_info ||= {}
end

.create(fields = {}, &block) ⇒ Object 



96
97
98
99
 
# File 'lib/menilite/model.rb', line 96

def create(fields={}, &block)
  self.init
  self.new(fields).save(&block)
end

.delete_all ⇒ Object 



101
102
103
104
 
# File 'lib/menilite/model.rb', line 101

def delete_all
  self.init
  store.delete(self)
end

.fetch(filter: {}, order: nil) ⇒ Object 



106
107
108
109
110
111
112
113
114
115
116
117
118
 
# File 'lib/menilite/model.rb', line 106

def fetch(filter: {}, order: nil)
  self.init
  filter = filter.map{|k, v| type_convert(k, v)  }.to_h

  if_server do
    filter.merge!(privilege_filter)
  end

  store.fetch(self, filter: filter, order: order) do |list|
    yield list if block_given?
    list
  end
end

.field(name, type = :string, params = {}) ⇒ Object 



146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
 
# File 'lib/menilite/model.rb', line 146

def field(name, type = :string, params = {})
  params.merge!(client: true, server: true)

  if client?
    return unless params[:client]
  else
    return unless params[:server]
  end

  field_info[name.to_s] = FieldInfo.new(name, type, params)

  self.instance_eval do
    if type == :reference
      field_name = "#{name}_id"

      define_method(name) do
        id = @fields[field_name.to_sym]
        model_class = Object.const_get(name.to_s.camel_case)
        model_class[id]
      end

      define_method(name.to_s + "=") do |value|
        @fields[field_name.to_sym] = value.id
      end
    else
      field_name = name.to_s
    end

    define_method(field_name) do
      @fields[field_name.to_sym]
    end

    define_method(field_name + "=") do |value|
      unless type_validator(type).call(value, name)
        raise 'type error'
      end
      @fields[field_name.to_sym] = value
      handle_event(:change, field_name.to_sym, value)
    end
  end
end

.field_info ⇒ Object 



83
84
85
 
# File 'lib/menilite/model.rb', line 83

def field_info
  @field_info ||= {}
end

.find(id) ⇒ Object 



226
227
228
229
230
231
232
233
234
235
236
 
# File 'lib/menilite/model.rb', line 226

def find(id)
  self.init

  case id
  when String
    self[id]
  when Hash
    self.fetch(filter:id).first
  end

end

.inherited(child) ⇒ Object 



140
141
142
 
# File 'lib/menilite/model.rb', line 140

def inherited(child)
  subclasses[child] = false
end

.init ⇒ Object 



76
77
78
79
80
81
 
# File 'lib/menilite/model.rb', line 76

def init
  if Model.subclasses.has_key?(self) && !Model.subclasses[self]
    store.register(self)
    Model.subclasses[self] = true
  end
end

.max(field_name) ⇒ Object 



243
244
245
246
 
# File 'lib/menilite/model.rb', line 243

def max(field_name)
  self.init
  store.max(self, field_name)
end

.permit(privileges) ⇒ Object 



248
249
250
251
252
253
254
255
256
257
 
# File 'lib/menilite/model.rb', line 248

def permit(privileges)
  Menilite.if_server do
    case privileges
    when Array
      self.privileges.push(*privileges)
    when Symbol, String
      self.privileges << privileges
    end
  end
end

.save(collection, &block) ⇒ Object 



91
92
93
94
 
# File 'lib/menilite/model.rb', line 91

def save(collection, &block)
  self.init
  self.store.save(collection, &block)
end

.store ⇒ Object 



132
133
134
 
# File 'lib/menilite/model.rb', line 132

def store
  Store.instance
end

.subclasses ⇒ Object 



136
137
138
 
# File 'lib/menilite/model.rb', line 136

def subclasses
  @subclasses ||= {}
end

.type_convert(key, value) ⇒ Object 



120
121
122
123
124
125
126
127
128
129
130
 
# File 'lib/menilite/model.rb', line 120

def type_convert(key, value)
  field_info = self.field_info[key.to_s] || self.field_info[key.to_s.sub(/_id\z/,'')]
  raise "no such field #{key} in #{self}" unless field_info
  converted = case field_info.type
              when :boolean
                value.is_a?(String) ? (value == 'true' ? true : false) : value
              else
                value
              end
  [key, converted]
end

Instance Method Details

#handle_event(event, field_name, value) ⇒ Object 



66
67
68
69
70
71
 
# File 'lib/menilite/model.rb', line 66

def handle_event(event, field_name, value)
  get_listeners(event, field_name).each do |listener|
    listener.call(value)
  end
  value
end

#id ⇒ Object 



37
38
39
 
# File 'lib/menilite/model.rb', line 37

def id
  @guid
end

#on(event, *field_names, &block) ⇒ Object 



62
63
64
 
# File 'lib/menilite/model.rb', line 62

def on(event, *field_names, &block)
  field_names.each {|file_name| set_listener(event, file_name, &block) }
end

#save(&block) ⇒ Object 



41
42
43
44
 
# File 'lib/menilite/model.rb', line 41

def save(&block)
  self.class.store.save(self, &block)
  self
end

#to_h ⇒ Object 



304
305
306
 
# File 'lib/menilite/model.rb', line 304

def to_h
  @fields.merge(id: @guid)
end

#to_json(arg) ⇒ Object 



308
309
310
 
# File 'lib/menilite/model.rb', line 308

def to_json(arg)
  @fields.merge(id: @guid).to_json
end

#type_validator(type) ⇒ Object 



280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
 
# File 'lib/menilite/model.rb', line 280

def type_validator(type)
  case type
    when :string
      -> (value, name) { value.is_a? String }
    when :int
      -> (value, name) { value.is_a? Integer }
    when :boolean
      -> (value, name) { value == true || value == false }
    when :date
      -> (value, name) { value.is_a? Date }
    when :time
      -> (value, name) { value.is_a? Time }
    when :reference
      -> (value, name) { valiedate_reference(value, name) }
  end
end

#update(data) ⇒ Object 



46
47
48
49
50
51
52
53
54
55
 
# File 'lib/menilite/model.rb', line 46

def update(data)
  case data
  when self.class
    @fields.merge!(data.fields)
  when Hash
    @fields.merge!(data.map{|k, v| resolve_references(k, v) }.to_h)
  when String
    @fields.merge!(JSON.parse(json))
  end
end

#update!(data, &block) ⇒ Object 



57
58
59
60
 
# File 'lib/menilite/model.rb', line 57

def update!(data, &block)
  self.update(data)
  self.save(&block)
end

#valiedate_reference(value, name) ⇒ Object 



297
298
299
300
301
302
 
# File 'lib/menilite/model.rb', line 297

def valiedate_reference(value, name)
  return false unless value.is_a? String

  model_class = Object.const_get(name.camel_case)
  not model_class[value].nil?
end