sutty/app/models/post.rb

# frozen_string_literal: true
require 'jekyll/utils'

# Esta clase representa un post en un sitio jekyll e incluye métodos
# para modificarlos y crear nuevos
#
# Cuando estamos editando un post, instanciamos este modelo y le
# asociamos el Jekyll::Document correspondiente.
#
# Cuando estamos creando un post, no creamos su Jekyll::Document
# hasta que se guardan los datos, porque para poder guardarlo
# necesitamos su front_matter completo.
#
# El front matter está duplicado.  El Post mantiene una copia de los
# datos y los sincroniza al momento de leer y de escribir el Document.
class Post
  attr_accessor :content, :front_matter
  attr_reader :post, :site, :errors, :old_post, :lang, :template,
    :template_fields

  REJECT_FROM_DATA = %w[excerpt].freeze
  # datos que no tienen que terminar en el front matter
  REJECT_FROM_FRONT_MATTER = %w[date slug draft ext].freeze
  # datos que no traemos del template
  REJECT_FROM_TEMPLATE = %w[date draft categories layout title ext tags date slug].freeze


  # Trabajar con posts.  Si estamos creando uno nuevo, el **site** y
  # el **front_matter** son necesarios, sino, **site** y **post**.
  # XXX chequear que se den las condiciones
  def initialize(site:, post: nil, front_matter: {}, lang: nil, template: nil)
    unless site.is_a?(Site)
      raise ArgumentError,
        I18n.t('errors.argument_error', argument: :site, class: Site)
    end

    unless post.nil? || post.is_a?(Jekyll::Document)
      raise ArgumentError,
        I18n.t('errors.argument_error', argument: :post,
          class: Jekyll::Document)
    end

    @site = site
    @post = post
    @template = template
    # los errores tienen que ser un hash para que 
    # ActiveModel pueda traer los errores normalmente
    @errors = {}

    # Si el sitio está traducido, trabajamos con la colección del
    # idioma, sino, con posts
    if @site.i18n?
      @collection = @lang = lang || I18n.locale.to_s
    else
      @collection = 'posts'
    end

    # sincronizar los datos del document
    if new?
      @front_matter = front_matter_from_template
      update_attributes front_matter
    else
      load_front_matter!
      merge_with_front_matter! front_matter.stringify_keys
    end
  end

  # Limpiar los errores
  def reset_errors!
    @errors = {}
  end

  # El post es nuevo si no hay un documento asociado
  def new?
    @post.nil? || !File.exist?(@post.try(:path))
  end

  # El número de orden del artículo, si no tiene uno, se le asigna la
  # posición en la colección de artículos
  def order
    get_front_matter 'order'
  end

  def ordered?
    !order.nil?
  end

  # Determina si fue traducido, buscando los slugs de su front_matter
  # lang en otras colecciones
  def translated?
    @site.i18n? && get_front_matter('lang').present?
  end

  def translations
    @translations ||= find_translations
  end

  def find_translations
    slugs = get_front_matter('lang')
    return [] unless slugs.present?

    slugs.map do |lang, id|
      next if lang == @lang
      @site.posts_for(lang).find do |p|
        p.id == id
      end
    end.compact
  end

  # Guarda los cambios.
  #
  # Recién cuando vamos a guardar creamos el Post, porque ya tenemos
  # todos los datos para escribir el archivo, que es la condición
  # necesaria para poder crearlo :P
  def save
    cleanup!

    return false unless valid?

    new_post if new?

    return unless write
    return unless detect_file_rename!

    # Vuelve a leer el post para tomar los cambios
    @post.read
    add_post_to_site!
    true
  end
  alias :save! :save

  def title
    get_front_matter 'title'
  end

  def date
    get_front_matter 'date'
  end

  def date_as_string
    date.strftime('%F')
  end

  def tags
    get_front_matter('tags') || []
  end

  def categories
    get_front_matter('categories') || []
  end
  alias :category :categories

  # Devuelve la ruta del post, si se cambió alguno de los datos,
  # generamos una ruta nueva para tener siempre la ruta actualizada.
  def path
    if basename_changed?
      File.join(@site.path, "_#{@collection}", basename_from_front_matter)
    else
      @post.try(:path)
    end
  end

  # TODO los slugs se pueden repetir, el identificador real sería
  # fecha+slug, pero se ve feo en las urls?
  def id
    get_front_matter 'slug'
  end
  alias :slug :id
  alias :to_s :id

  def basename_changed?
    @post.try(:basename) != basename_from_front_matter
  end

  def slug_changed?
    new? || @post.data.dig('slug') != slug
  end

  # Trae el contenido del post, si no lo seteamos ya.  O sea que si solo
  # enviamos actualizaciones al front matter, debería traer el contenido
  # del post sin cambios
  def content
    @content ||= @post.try(:content) || template.try(:content)
  end

  # imita Model.update_attributes de ActiveRecord
  def update_attributes(attrs)
    # el cuerpo se maneja por separado
    @content = attrs.delete('content') if attrs.key? 'content'
    merge_with_front_matter! attrs.stringify_keys
  end

  # Requisitos para que el post sea válido
  def validate
    add_error validate: I18n.t('posts.errors.date') unless date.is_a? Time
    add_error validate: I18n.t('posts.errors.title') if title.blank?
    # TODO verificar que el id sea único
  end

  def valid?
    reset_errors!
    validate

    @errors.empty?
  end

  # Permite ordenar los posts
  def <=>(other)
    @post <=> other.post
  end

  # Obtiene metadatos asegurándose que siempre trabajamos con strings
  def get_front_matter(name)
    @front_matter.dig(name.to_s)
  end

  # Trae el template a partir del layout
  def template_from_layout
    @site.templates.find do |t|
      t.get_front_matter('slug') == get_front_matter('layout')
    end
  end

  def template_fields
    @template_fields ||= template.front_matter.reject do |key, _|
      REJECT_FROM_TEMPLATE.include? key
    end.keys
  end

  # devuelve las plantillas como strong params
  def template_params
    @template_params ||= template_fields.map do |k|
      v = template.get_front_matter(k)
      if v.is_a? Array
        { k.to_sym => [] }
      else
        k.to_sym
      end
    end
  end

  # Obtiene el tipo de campo para la plantilla
  def template_form_type_for(field)
    return if (tt = template.get_front_matter(field)).nil?

    case
    when tt == 'string'
      type = 'text'
    when tt == 'text'
      type = 'text_area'
    when tt.is_a?(String) && tt.split('/', 2).count == 2
      type = 'select'
    when tt.is_a?(Array)
      type = 'select'
    when tt.is_a?(FalseClass) || tt.is_a?(TrueClass)
      type = 'check_box'
    end

    type
  end

  def template_multiple_values?(field)
    template.get_front_matter(field).is_a? Array
  end

  # Obtiene los valores posibles para el campo de la plantilla
  def template_values_for(field)
    return '' if %w[string text].include? template.get_front_matter(field)

    # Para obtener los valores posibles, hay que procesar la string y
    # convertirla a parametros
    #
    # XXX Prestar atención a no enviar metodos privados

    value = template.get_front_matter(field)

    # Si es una array de un solo elemento, es un indicador de que
    # tenemos que rellenarla con los valores que indica
    if value.is_a?(Array) && value.count == 1
      values = value.first
    else
      values = value
    end

    # Procesar el valor
    if values.is_a?(String)
      value = values.split(':', 2).map do |v|
        collection, attr = v.split('/', 2)

        if collection == 'site'
          # TODO puede ser peligroso permitir acceder a cualquier
          # atributo de site?  No estamos trayendo nada fuera de
          # lo normal
          @site.send(attr.to_sym)
        else
          @site.everything_of(attr, lang: collection)
        end
      end

      value = value.last.zip value.first
    end

    # En última instancia, traer el valor por defecto
    value
  end

  def template
    @template ||= template_from_layout
  end

  private

  # Completa el front_matter a partir de las variables de otro
  def front_matter_from_template
    return {} unless template

    # Convertimos el slug en layout
    ft = template.front_matter.dup
    ft['layout'] = ft.delete('slug')

    ft
  end

  # Genera un post nuevo y lo agrega a la colección del sitio.
  def new_post
    opts = { site: @site.jekyll, collection: @site.jekyll.collections[@collection] }
    @post = Jekyll::Document.new(path, opts)
  end

  # Solo agregar el post al sitio una vez que lo guardamos
  #
  # TODO no sería la forma correcta de hacerlo en Rails
  def add_post_to_site!
    @site.jekyll.collections[@collection].docs << @post
    @site.jekyll.collections[@collection].docs.sort!

    unless @site.collections[@collection].include? self
      @site.collections[@collection] << self
      @site.collections[@collection].sort!
    end
  end

  # Los define, asegurandose que las llaves siempre son strings, para no
  # tener incompatibilidades con jekyll
  def set_front_matter(name, value)
    @front_matter[name.to_s] = value
  end

  # Cambiar el nombre del archivo si cambió el título o la fecha.
  # Como Jekyll no tiene métodos para modificar un Document, lo
  # engañamos eliminando la instancia de @post y recargando otra.
  def detect_file_rename!
    return true unless basename_changed?
    # No eliminamos el archivo a menos que ya exista el reemplazo!
    return false unless File.exist? path

    Rails.logger.info I18n.t('posts.logger.rm', path: path)
    FileUtils.rm @post.path
    replace_post!
  end

  # Reemplaza el post en el sitio por uno nuevo
  def replace_post!
    @old_post = @site.jekyll.collections[@lang].docs.delete @post

    new_post
  end

  # Obtiene el nombre del archivo a partir de los datos que le
  # pasemos
  def basename_from_front_matter
    ext  = get_front_matter('ext')  || '.markdown'

    "#{date_as_string}-#{slug}#{ext}"
  end

  # Toma los datos del front matter local y los mueve a los datos
  # que van a ir al post.  Si hay símbolos se convierten a cadenas,
  # porque Jekyll trabaja con cadenas.  Se excluyen otros datos que no
  # van en el frontmatter
  def merge_with_front_matter!(params)
    @front_matter.merge! Hash[params.to_hash.map do |k, v|
      [k, v] unless REJECT_FROM_DATA.include? k
    end.compact]
  end

  # Carga una copia de los datos del post original excluyendo datos
  # que no nos interesan
  def load_front_matter!
    @front_matter = @post.data.reject do |key, _|
      REJECT_FROM_DATA.include? key
    end
  end

  def cleanup!
    things_to_arrays!
    date_to_time!
    clean_content!
    slugify_title!
    remove_empty_front_matter!
    update_lang_front_matter!
    update_translations!
    put_in_order!
  end

  # Setea el propio idioma en el front_matter de slugs
  def update_lang_front_matter!
    return unless translated?

    @front_matter['lang'][@lang] = slug
  end

  # Busca las traducciones y actualiza el frontmatter si es necesario
  def update_translations!
    return unless translated?
    return unless slug_changed?

    find_translations.each do |post|
      post.update_attributes(lang: get_front_matter('lang'))
      post.save
    end
  end

  def remove_empty_front_matter!
    @front_matter.delete_if do |k,v|
      v.blank?
    end
  end

  # Aplica limpiezas básicas del contenido
  def clean_content!
    @content.try(:delete!, "\r")
  end

  # Guarda los cambios en el archivo destino
  def write
    r = File.open(path, File::RDWR | File::CREAT, 0o640) do |f|
      # Bloquear el archivo para que no sea accedido por otro
      # proceso u otra editora
      f.flock(File::LOCK_EX)

      # Empezar por el principio
      f.rewind

      # Escribir
      f.write(full_content)

      # Eliminar el resto
      f.flush
      f.truncate(f.pos)
    end

    return true if r.zero?

    add_error file: I18n.t('posts.errors.file')
    false
  end

  # Genera el post con front matter, menos los campos que no necesitamos
  # que estén en el front matter.
  #
  # El contenido se toma de `content` en lugar de `@content`, para poder
  # obtener el contenido por defecto si es que no lo enviamos
  # modificaciones, como en `update_translations!`
  def full_content
    yaml = @front_matter.reject do |k,_|
      REJECT_FROM_FRONT_MATTER.include? k
    end

    "#{yaml.to_yaml}---\n\n#{content}"
  end

  def add_error(hash)
    hash.each_pair do |k,i|
      if @errors.key?(k)
        @errors[k] = [@errors[k], i]
      else
        @errors[k] = i
      end
    end

    @errors
  end

  def date_to_time!
    unless @front_matter.dig(:date).is_a? Time
      @front_matter['date'] = @front_matter.dig('date').try(:to_time) || Time.now
    end
  end

  def things_to_arrays!
    [:tags,:categories].each do |c|
      thing = @front_matter.dig(c.to_s)
      next if thing.blank?
      next if thing.is_a? Array
      @front_matter[c.to_s] = thing.split(',').map(&:strip)
    end
  end

  def slugify_title!
    if slug.blank?
      @front_matter['slug'] = Jekyll::Utils.slugify(title)
    end
  end

  # Agregar al final de la cola si no especificamos un orden
  #
  # TODO si el artículo tiene una fecha que lo coloca en medio de
  # la colección en lugar de al final, deberíamos reordenar?
  def put_in_order!
    return unless order.nil?

    @front_matter['order'] = @site.posts_for(@collection).count
  end
end