drg_cms 0.4.39

data/app/models/dc_dummy.rb

@@ -0,0 +1,30 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+
+class DcDummy
+  include Mongoid::Document
+  
+  def method_missing(m, *args, &block)
+    nil
+  end
+end

data/app/models/dc_folder_permission.rb

@@ -0,0 +1,43 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+
+#########################################################################
+#
+#########################################################################
+class DcFolderPermission
+include Mongoid::Document
+include Mongoid::Timestamps
+
+field   :folder_name, type: String
+field   :inherited,   type: Boolean, default: true
+field   :is_default,  type: Boolean, default: false  
+field   :active,      type: Boolean, default: true  
+
+embeds_many :dc_policy_rules
+
+index( { folder_name: 1 }, { unique: true } )    
+
+validates :folder_name, presence: true
+validates :folder_name, uniqueness: true  
+
+end

data/app/models/dc_global_data.rb

@@ -0,0 +1,44 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+
+###########################################################################
+# Based on knowledge found here
+# http://jolierouge.net/2011/05/ruby-on-rails-session-in-models-not-so-evil-actually/
+###########################################################################
+class DcGlobalData
+  # This is a Locator/Broker class for global data that
+  # Needs to be accessible everywhere!
+  def self.method_missing(sym, *args, &block)
+    @@attrs ||= {}
+    sym = sym.to_s
+    if sym.include? "=" then
+      @@attrs[sym.gsub('=','')] = args.first
+    else
+#      if @@attrs[sym].class == Hash then
+#        return ValueProxy.new(@@attrs[sym])
+#      else
+        return @@attrs[sym]
+#      end
+    end
+  end
+end

data/app/models/dc_journal.rb

@@ -0,0 +1,39 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+
+class DcJournal
+  include Mongoid::Document
+  
+  field :user_id,     type: BSON::ObjectId
+  field :site_id,     type: BSON::ObjectId
+  field :doc_id,      type: BSON::ObjectId
+  field :operation,   type: String
+  field :tables,      type: String
+  field :ids,         type: String
+  field :ip,          type: String
+  field :time,        type: DateTime
+  field :diff,     type: String
+  
+  index( { user_id: 1, time: -1 } )  
+  index( { time: 1 } )  
+end

data/app/models/dc_key_value_store.rb

@@ -0,0 +1,90 @@
+#--
+# Copyright (c) 2014+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+
+class DcKeyValueStore
+  include Mongoid::Document
+  
+  field :key,       type: String
+  field :value,     type: String
+  
+  index( { key: 1 }, { unique: true } )  
+
+###########################################################################
+# Will return value incremented by 1 and update document with new value.
+###########################################################################
+def self.get_next_value(*keys)
+  doc   = find_by(key: keys.join('-'))
+  value = (doc ? doc.value : '0').next
+  if doc
+    doc.value = value
+    doc.save!
+  else
+    create(key:  keys.join('-'), value: value)
+  end
+  value
+end
+
+###########################################################################
+# Will try to restore to previous value if value is not already incremented.
+###########################################################################
+def self.restore_value(value,*keys)
+  doc = find_by(key: keys.join('-'))
+  if value == doc.value
+    value = (value.to_i - 1).to_s
+    doc.value = value
+    doc.save!
+    return value
+  end
+  nil
+end
+
+###########################################################################
+#
+###########################################################################
+def self.peep_next_value(*keys)
+  doc = find_by(key: keys.join('-'))
+  (doc ? doc.value : '0').next  
+end
+
+###########################################################################
+#
+###########################################################################
+def self.get_value(*keys)
+  doc = find_by(key: keys.join('-'))
+  doc ? doc.value : nil
+end
+
+###########################################################################
+#
+###########################################################################
+def self.set_value(value, *keys)
+  doc = find_by(key: keys.join('-'))
+  if doc
+    doc.value = value
+    doc.save!
+  else
+    create(key:  keys.join('-'), value: value)
+  end
+end
+
+end

data/app/models/dc_link.rb

@@ -0,0 +1,39 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+class DcLink
+  include Mongoid::Document
+  include Mongoid::Timestamps
+
+  field :name,        type: String
+  field :params,      type: String
+  field :active,      type: Boolean, default: true 
+  field :page_id,     type: BSON::ObjectId
+  field :created_by,  type: BSON::ObjectId
+  field :updated_by,  type: BSON::ObjectId
+
+  belongs_to  :dc_site
+ 
+  index({ site_id: 1, name: 1 }, { unique: true })
+  
+  validates :name, presence: true
+end 

data/app/models/dc_mail.rb

@@ -0,0 +1,64 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+
+module DcMailCommon
+extend ActiveSupport::Concern
+included do
+
+include Mongoid::Document
+include Mongoid::Timestamps
+
+field :subject,     type: String
+field :body,        type: String
+field :from,        type: String
+field :to_test,     type: String
+field :to_address,  type: String
+field :to_list,     type: Array
+field :schedule,    type: DateTime
+field :send_time,   type: DateTime
+field :status,      type: Integer
+field :css,         type: String
+
+field :created_by,  type: BSON::ObjectId
+field :updated_by,  type: BSON::ObjectId
+
+belongs_to  :dc_site
+
+index   status: 1 
+
+validate :if_email_is_ok  
+  
+def if_email_is_ok
+  errors.add(:from, I18n.t('drgcms.not_email')) unless DcMailAddress::dc_is_email?(from)
+  errors.add(:to_test, I18n.t('drgcms.not_email')) if to_test.to_s.size > 0 and !DcMailAddress::dc_is_email?(to_test)
+end
+
+end
+end
+
+######################################################################
+#
+######################################################################
+class DcMail
+  include DcMailCommon
+end

data/app/models/dc_mail_address.rb

@@ -0,0 +1,69 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+class DcMailAddress
+  include Mongoid::Document
+  include Mongoid::Timestamps
+
+  field :email,       type: String
+  field :reason,      type: String
+  field :dc_user_id,  type: BSON::ObjectId
+  field :active,      type: Boolean, default: true 
+  field :created_by,  type: BSON::ObjectId
+  field :updated_by,  type: BSON::ObjectId
+
+  embeds_many :dc_mail_list_members
+  belongs_to  :dc_site
+
+  index( { 'dc_mail_list_members.dc_mail_list_id' => 1 } )
+  
+  validate :if_email_is_ok  
+=begin  
+def if_email_is_ok
+  if dc_user_id.nil?
+    unless email.to_s =~ /^[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]@[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]\.[a-zA-Z][a-zA-Z\.]*[a-zA-Z]$/
+      errors.add(:email, 'is not an email')
+    end
+  end
+end
+=end
+  
+def if_email_is_ok
+  if dc_user_id.nil? and !DcMailAddress::dc_is_email?(email)
+    errors.add(:email, I18n.t('drgcms.not_email'))
+  end
+end
+
+############################################################################
+# Check if string contains valid e-mail address.
+# 
+# @example usage from program
+#   dc_is_email?(some_email)
+#      eval: name4_id('site','name',@record['site_id'])
+#
+# @param [ email ] email address to be checked
+############################################################################
+def self.dc_is_email?(email)
+  email.to_s =~ /^[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]@[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]\.[a-zA-Z][a-zA-Z\.]*[a-zA-Z]$/
+end
+
+end

data/app/models/dc_mail_list.rb

@@ -0,0 +1,48 @@
+#--
+# Copyright (c) 2012+ Damjan Rems
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#++
+class DcMailList
+  include Mongoid::Document
+  include Mongoid::Timestamps
+
+  field :name,        type: String
+  field :description, type: String
+  field :params,      type: String
+  field :active,      type: Boolean, default: true 
+  field :created_by,  type: BSON::ObjectId
+  field :updated_by,  type: BSON::ObjectId
+
+  belongs_to  :dc_site
+  has_many    :dc_mail_addresses
+
+  index({ site_id: 1, name: 1 }, { unique: true })
+  
+  validates_length_of :name, minimum: 5
+  validates_length_of :description, minimum: 10
+  
+def self.choices4_mail_list
+  rez = []
+  all.each { |list| rez << [list.name, list._id] if list.active }
+  rez
+end
+
+end