# encoding: utf-8
require 'rubyXL'
class Admin::AnnouncementsController < OrbitAdminController
  include Admin::AnnouncementsHelper
  before_action ->(module_app = @app_title) { set_variables module_app }
  before_action :set_bulletin, only: [:edit, :destroy, :comment]
  before_action :load_access_level, :load_settings
  before_action :set_module_pages, only: [:edit,:new]
  def set_module_pages
    @module_pages = Page.where(:module => 'announcement').collect{|p| [p.name,p.id] }
  end
  def initialize
    super
    @app_title = "announcement"
  end
  def update_sort
    ids = params[:ids]
    ids.each_with_index do |id,i|
      Bulletin.where(id: id).update(sort_number: i)
    end
    AnnsCache.all.delete
    edit_sort
    render 'update_sort',layout: false
  
  end

  def update_sort_setting
    setting = @announcement_setting
    setting.update_attributes(settings_params)
    if defined?(OrbitHelper::SharedHash) && OrbitHelper::SharedHash
      OrbitHelper::SharedHash['announcement'][:enable_manually_sort] = setting.enable_manually_sort
    end
    redirect_to edit_sort_admin_announcement_path
  end
  
  def edit_sort
    @setting = AnnouncementSetting.first
    @announcements = Bulletin.where(is_top: true).order_by({is_top: -1,sort_number: 1,postdate: -1, _id: -1})
    @table_fields = ['announcement.table.sort_number','announcement.table.title','announcement.default_widget.postdate']
  end

  def comment_hidden
    b = BulletinComment.find(params[:id]) rescue nil
    if !b.nil?
      b.is_hidden = !b.is_hidden
      b.save
      @table_feed_fields = ["announcement.time", "announcement.comment", "announcement.account","ip","is_hidden"]
      @comments = b.bulletin.bulletin_comments.reverse rescue []
      render partial: 'comment'
    end
  end
  def comment
    @table_feed_fields = ["announcement.time", "announcement.comment", "announcement.account","ip","is_hidden"]
    @comments = @bulletin.bulletin_comments.reverse rescue []
  end
  def index
    Bulletin.remove_expired_status
    @tags = @module_app.tags
    @table_fields = [:status, :category, :title, :start_date, :end_date, "announcement.comment", :last_modified]
    setting = AnnouncementSetting.first
    @annc_depts = []
    @enable_annc_dept = false
    if (setting.enable_annc_dept rescue false)
      @table_fields.insert(1, "announcement.annc_dept")
      @annc_depts = setting.annc_depts
      @enable_annc_dept = true
    end
    @current_user = current_user
    if setting.is_display_edit_only && !current_user.is_admin? && !current_user.is_manager?(@module_app)
      current_user_is_sub_manager = !current_user.is_manager?(@module_app) && (current_user.is_sub_manager?(@module_app) || current_user.is_sub_manager_with_role?(@module_app)) rescue false
      if current_user_is_sub_manager
        @categories = current_user.approved_categories.select{|c| c.module_app_id == @module_app.id} rescue []
        @filter_fields = filter_fields(@categories, @tags)
        @bulletins = Bulletin.where(:create_user_id=>current_user.id,:is_preview.in=>[false,nil])
                                        .order_by(sort)
                                        .with_categories(filters("category"))
                                        .with_tags(filters("tag"))
                                        .with_status(filters("status"))
      else
        @bulletins = Bulletin.where(:uid=>nil)
        @categories = @module_app.categories.enabled
        @filter_fields = filter_fields(@categories, @tags)
      end
    else
      @categories = @module_app.categories.enabled
      @filter_fields = filter_fields(@categories, @tags)
      @bulletins = Bulletin.where(:is_preview.in=>[false,nil])
                                        .order_by(sort)
                                        .with_categories(filters("category"))
                                        .with_tags(filters("tag"))
                                        .with_status(filters("status"))
    end
    @bulletins = search_data(@bulletins,[:title]).page(params[:page]).per(10)
    
    if request.xhr?
      render :partial => "index"
    end
  end
  def get_all_anncs_without_subannc
    Bulletin.remove_expired_status
    @tags = @module_app.tags
    @table_fields = [:category, :title, :start_date]
    @current_user = current_user
    if AnnouncementSetting.first.is_display_edit_only && !current_user.is_admin? && !current_user.is_manager?(@module_app)
      current_user_is_sub_manager = !current_user.is_manager?(@module_app) && (current_user.is_sub_manager?(@module_app) || current_user.is_sub_manager_with_role?(@module_app)) rescue false
      if current_user_is_sub_manager
        @categories = current_user.approved_categories.select{|c| c.module_app_id == @module_app.id} rescue []
        @filter_fields = filter_fields(@categories, @tags)
        @bulletins = Bulletin.where(:create_user_id=>current_user.id,:title.ne => "",:is_preview.in=>[false,nil])
                                        .order_by(sort)
                                        .with_categories(filters("category"))
                                        .with_tags(filters("tag"))
                                        .with_status(filters("status"))
      else
        @bulletins = Bulletin.where(:uid=>nil)
        @categories = @module_app.categories.enabled
        @filter_fields = filter_fields(@categories, @tags)
      end
    else
      @categories = @module_app.categories.enabled
      @filter_fields = filter_fields(@categories, @tags)
      @bulletins = Bulletin.where(:title.ne => "",:is_preview.in=>[false,nil])
                                        .order_by(sort)
                                        .with_categories(filters("category"))
                                        .with_tags(filters("tag"))
                                        .with_status(filters("status"))
    end
    @bulletins = @bulletins.where(:id.nin=>params[:subannc_ids]) if params[:subannc_ids]
    @bulletins = search_data(@bulletins,[:title]).page(params[:page]).per(10)
    if request.xhr?
      render :partial => "get_all_anncs_without_subannc"
    else
      render :layout => false
    end
  end
  def feed
    @table_feed_fields = ["announcement.feed_name",:tags , :category , "announcement.rssfeed", "announcement.jsonfeed"]
    @feeds = BulletinFeed.all.asc(:created_at)
    
  end
  def generate_iframe_url
    iframe_params = params.require(:iframe).permit!
    uids = iframe_params['member_ids'].to_a.map{|m_id| MemberProfile.find(m_id).uid rescue nil}.select{|uid| !uid.nil?}
    url_params = iframe_params.except(:member_ids)
    url_params['uids'] = uids if uids != []
    render :plain => '/xhr/panel/announcement/widget/sync_data?'+url_params.to_param
  end
  def settings
    @setting = @announcement_setting
    roles = Role.all
    @sorted_members = roles.inject({}) do |members,role|
      members_for_role =  role.member_profiles.select{|m| (m.user.nil? ? false : m.user.approved)}
      members[role] = members_for_role
      members
    end
    @sorted_members['no_role'] = MemberProfile.any_in(:role_ids=>[nil,[]]).select{|m| (m.user.nil? ? false : m.user.approved)}
    @unapproved_members = User.where(:approved => false).map{|u| u.member_profile}
  end

  def import
  end

  def excel_format
    respond_to do |format|
      format.xlsx {
        response.headers['Content-Disposition'] = 'attachment; filename="announcement_import_format.xlsx"'
      }
    end
  end

  def export_excel
    @thread = Multithread.where(:key=>'export_announcements').first
    update_flag = true
    if @thread.nil?
      @thread = Multithread.create(:key=>'export_announcements',:status=>{:status=>'Processing'})
    else
      update_flag = false if @thread.status[:status] == 'Processing' && @thread.respond_to?(:updated_at) && (@thread.updated_at > DateTime.now - 1.minute rescue false)
      if update_flag
        @thread.update(:status=>{:status=>'Processing'})
      end
    end
    if update_flag
      @host = Site.first.root_url
      if @host == "http"
        @host = request.protocol + request.host_with_port
      end
      Thread.new do
        begin
          @announcements = Bulletin.all.desc(:id)
          last_updated = [Bulletin.max(:updated_at).to_i, AnnouncementSetting.max(:updated_at).to_i].max
          filename = "public/announcement_export_#{last_updated}.xlsx"
          if File.exist?(filename)
            @thread.update(:status=>{:status=>'finish','finish_percent'=>100,'info'=>I18n.t('announcement.read_from_cache')})
          else
            excel_contents = render_to_string( handlers: [:axlsx], formats: [:xlsx] ,partial: 'export_excel.xlsx' )
            File.open(filename, 'w') do |f|
              f.write excel_contents
            end
          end
          @thread.status[:file] = filename
          @thread.status[:filename] = "announcement_export_#{DateTime.now.in_time_zone(Time.zone.utc_offset / 3600).strftime('%Y_%m_%d_%H%M')}.xlsx"
          @thread.save
        rescue => e
          @thread.status[:status] = 'error'
          # @thread.status[:info] = [e.to_s, e.backtrace]
          puts [e.to_s, e.backtrace]
          @thread.save
        end
      end
    end
    redirect_to admin_announcement_import_path(:thread_id=>@thread.id.to_s)
  end
  def render_404
    render :file => "#{Rails.root}/app/views/errors/404.html", :layout => false, :status => 404, :formats => [:html]
  end
  def download_file_from_thread
    @thread = Multithread.where(:id=>params[:id]).first if params[:id].present?
    if @thread && @thread.status[:file]
      send_file(@thread.status[:file],:filename=>@thread.status[:filename])
    else
      render_404
    end
  end
  def import_from_xml
    download_tmp_xml params["import_xml"]
    import_from_tmp_xml File.read(File.join(Rails.root, "tmp", "ann_cc_ntu.xml"))
    redirect_to admin_announcements_path
  end

  def import
    @thread = Multithread.where(:id=>params[:thread_id]).first if params[:thread_id].present?
  end


  def import_from_wp
    import_from_wordpress params["import_xml"].tempfile
    redirect_to admin_announcements_path
  end 

  def importanns
    workbook = RubyXL::Parser.parse(params["import_file"].tempfile)
    categories = @module_app.categories.asc(:created_at).to_a
    tags = @module_app.tags.asc(:created_at).to_a
    sheet = workbook[0]
    if sheet.count <= 503
      sheet.each_with_index do |row, i|
        next if i < 3
        v = row.cells.first.value rescue nil
        next if v.blank?
        import_this_announcement(row, categories, tags)
      end
      redirect_to admin_announcements_path
    else
      redirect_to admin_announcements_path(:error => "1")
    end
  end

  def createsettings
    setting = AnnouncementSetting.new(settings_params)
    setting.save
    redirect_to admin_announcement_settings_path
  end
  
  def updatesettings
    setting = @announcement_setting
    ids = params['announcement_setting']['anns_status_settings'].to_a.collect do |i,v|
      v['_id']
    end.compact
    AnnsStatusSetting.where(:id.nin=>ids).destroy
    setting.update_attributes(settings_params)
    setting.save
    redirect_to admin_announcement_settings_path
  end

  def feedform
    if params[:type] == "new"
      @announcement_feed = BulletinFeed.new(id: nil)
      render :partial => "feed_form"
    else params[:type] == "edit"
      @announcement_feed = BulletinFeed.find(params[:id])
      render :partial => "edit_feed_form"
    end
  end

  def createfeed
    announcement_feed = BulletinFeed.new(feed_params)
    announcement_feed.save
    #BulletinFeed.create_feed_cache(nil,announcement_feed)
    feeds = BulletinFeed.all.asc(:created_at)
    render :partial => "feed", :collection => feeds
  end

  def updatefeed
    ann_feed  = BulletinFeed.find(params[:id])
    ann_feed.update_attributes(feed_params)
    ann_feed.save
    #BulletinFeed.create_feed_cache(nil,ann_feed)
    feeds = BulletinFeed.all.asc(:created_at)
    render :partial => "feed", :collection => feeds
  end

  def deletefeed
    ann_feed  = BulletinFeed.find(params[:id])
    ann_feed.destroy
    feeds = BulletinFeed.all.asc(:created_at)
    render :partial => "feed", :collection => feeds
  end

  def new
    @tags = @module_app.tags
    @statuses = []
    @bulletin = Bulletin.new
    @bulletin.email_sentdate = Time.now
    @reach_limit = @bulletin.check_status_limit(current_user,true)
    if defined? Calendar
      categories = user_authenticated_categories rescue ['all']
      if categories.first == "all"
        @calendar_categories = CalendarType.all
      else
        @calendar_categories = CalendarType.where(:category_id.in => categories) rescue []
      end
    end
  end

  def create
    bps = bulletin_params
    bulletin = Bulletin.new(bps)
    if !bps['bulletin_links_attributes'].nil?
      bps['bulletin_links_attributes'].each do |idx,link|
        bps['bulletin_links_attributes'].delete(idx.to_s) if link['url'].blank?
      end
    end
    if((!AnnouncementSetting.first.only_manager_can_edit_status) || (AnnouncementSetting.first.only_manager_can_edit_status && (@current_user.is_admin? || @current_user.is_manager?(@module_app))) )
      if bps[:is_top] == "1" && !AnnouncementSetting.check_limit_for_user(bulletin.create_user_id, bulletin.id)
        bps[:is_top] = "0"
        bps[:top_end_date] = nil
      end
    else
      bps[:is_top] = false
      bps[:is_hot] = false
      bps[:is_hidden] = false
    end

    if !defined?(Calendar).nil?
      bps = update_calendar(bps,bulletin)
    end
    bulletin.create_user_id = current_user.id
    bulletin.update_user_id = current_user.id
    if AnnouncementSetting.is_pro?
      if user_can_approve?
        bulletin.approved = true
      else
        send_notification_mail_to_managers(bulletin,"approval",I18n.locale)
      end
    else
      bulletin.approved = true
    end
    
    bulletin.save
    build_email(bulletin,I18n.locale)
    Thread.new do
      bulletin.notify_feed("create")
    end
    #BulletinFeed.create_feed_cache(bulletin)
    redirect_to admin_announcements_path
  end

  def approve_bulletin
    id = params[:id]
    bulletin = Bulletin.find(id)
    if params["approved"] == "true"
      bulletin.approved = true
      bulletin.rejected = false
      bulletin.reapproval = false
    else
      bulletin.rejected = true
      bulletin.reapproval = false
      bulletin.rejection_reason = params["reason"]
      send_rejection_email(bulletin,I18n.locale)
    end
    bulletin.save
    #BulletinFeed.create_feed_cache(bulletin)
    redirect_to admin_announcements_path
  end

  def edit
    if can_edit_or_delete?(@bulletin)
      @reach_limit = @bulletin.check_status_limit(current_user,true)
      @tags = @module_app.tags
      @categories = @module_app.categories.enabled
      if defined? Calendar
        categories = user_authenticated_categories rescue ['all']
        if categories.first == "all"
          @calendar_categories = CalendarType.all
        else
          @calendar_categories = CalendarType.where(:category_id.in => categories) rescue []
        end
      end
      @statuses = []
      @bulletin.email_sentdate = Time.now if @bulletin.email_sent == false
    else
      render_401
    end
  end

  def update
    uid = params[:id].split('-').last
    bulletin = Bulletin.find_by(:uid=>uid)
    Bulletin.where(:copy_id=>bulletin.id.to_s).destroy
    bulletin.is_edit = true
    bulletin.save
    set_approved = bulletin.is_preview
    bulletin = bulletin.get_org_model
    bulletin.approved = true if set_approved
    bps = bulletin_params
    bps[:tags] = bps[:tags].blank? ? [] : bps[:tags]
    bps[:email_member_ids] = bps[:email_member_ids].blank? ? [] : bps[:email_member_ids]

    if !bps['bulletin_links_attributes'].nil?
      bps['bulletin_links_attributes'].each do |idx,link|
        bps['bulletin_links_attributes'].delete(idx.to_s) if link['url'].blank?
      end
    end
    if((!AnnouncementSetting.first.only_manager_can_edit_status) || (AnnouncementSetting.first.only_manager_can_edit_status && (@current_user.is_admin? || @current_user.is_manager?(@module_app))) )
      if bps[:is_top] == "1" && !AnnouncementSetting.check_limit_for_user(bulletin.create_user_id, bulletin.id)
        bps[:is_top] = "0"
        bps[:top_end_date] = nil
      end
    else
      bps[:is_top] = bulletin.is_top
      bps[:is_hot] = bulletin.is_hot
      bps[:is_hidden] = bulletin.is_hidden
    end
    if !defined?(Calendar).nil?
      bps = update_calendar(bps,bulletin)
    end
    bulletin.update_attributes(bps)
    bulletin.update_user_id = current_user.id
    bulletin.expirable_created_at = nil
    bulletin.is_preview = false
    if bulletin.rejected
      bulletin.reapproval = true
      bulletin.save
      send_notification_mail_to_managers(bulletin,"reapproval",I18n.locale)
    else
      bulletin.save
    end
    build_email(bulletin,I18n.locale)
    Thread.new do
      bulletin.notify_feed("update")
    end
    #BulletinFeed.create_feed_cache(bulletin)
    now_bulletin_page = Bulletin.where(:title.ne => "",:is_preview.in=>[false,nil])
                              .order_by(sort).map(&:id).map.with_index.select{|v,i| v==bulletin.id}[0][1] rescue nil
    now_bulletin_page = now_bulletin_page.nil? ? 0 : ((now_bulletin_page+1).to_f/10).ceil
    redirect_to admin_announcements_path(:page=>now_bulletin_page)
  end

  def destroy
    @bulletin.destroy
    Thread.new do
      @bulletin.notify_feed("destroy")
    end
    redirect_to admin_announcements_path
  end

  def delete
    if params[:ids]
      Bulletin.any_in(:uid => params[:ids]).destroy_all
      Thread.new do
        Bulletin.notify_feed_delete(params[:ids])
      end
    end
    if request.xhr?
      render :body => nil, :status => 204
    else
      redirect_to admin_announcements_path
    end
  end

  def preview
    if params['preview_type'].eql?('edit')
      bulletin_data = bulletin_params
      org_bulletin = Bulletin.find(params['bulletin_id'])
      bulletin = org_bulletin.clone
      bulletin.generate_uid
      bulletin.bulletin_files = []
      bulletin.bulletin_links = []
      if bulletin_data['image'].blank?
        bulletin.image = org_bulletin.image
      end

      if !bulletin_data['bulletin_files_attributes'].blank?
        bulletin_data['bulletin_files_attributes'].each do |key, bulletin_file|
          next if !bulletin_file['_destroy'].blank?
          file = nil
          if bulletin_file['id'].blank?
            file = BulletinFile.new(bulletin_file)
            file.bulletin_id = bulletin.id
            file.save
          else
            org_file = BulletinFile.find(bulletin_file['id'])
            file = org_file.clone
            file.bulletin_id = bulletin.id
            file.file = org_file.file
            bulletin_file.delete('id')
            bulletin_file.delete('_destroy')
            file.update_attributes(bulletin_file)
          end

          file.save
          bulletin.bulletin_files << file
        end
      end

      if !bulletin_data['bulletin_links_attributes'].blank?
        bulletin_data['bulletin_links_attributes'].each do |key, bulletin_link|
          next if !bulletin_link['_destroy'].blank?

          if bulletin_link['id'].blank?
            link = BulletinLink.new(bulletin_link)
            link.bulletin_id = bulletin.id
          else
            link = BulletinLink.find(bulletin_link['id']).clone
            link.bulletin_id = bulletin.id
            bulletin_link.delete('id')
            bulletin_link.delete('_destroy')
            link.update_attributes(bulletin_link)
          end

          link.save
          bulletin.bulletin_links << link
        end
      end

      bulletin_data.delete('bulletin_files_attributes')
      bulletin_data.delete('bulletin_links_attributes')
      bulletin.update_attributes(bulletin_data)
      bulletin.copy_id = params['bulletin_id']
    else
      bulletin = Bulletin.new(bulletin_params)
    end
    
    bulletin.is_preview = true
    bulletin.save
    #BulletinFeed.create_feed_cache(bulletin)
    render :plain=>page_for_bulletin(bulletin) + "?preview=true"
  end
  def get_preview_action
    bulletin = Bulletin.find_by(:uid=>params['uid'])
    is_not_edit = (!bulletin.is_edit)
    org_bulletin = bulletin.get_org_model
    Bulletin.where(:copy_id=>org_bulletin.id.to_s).destroy
    if is_not_edit
      bulletin.destroy
      render :json=> {:success=>true,:action=>"close"}
    else
      render :json=> {:success=>true,:action=>"redirect",:path=>edit_admin_announcement_path(:id=>org_bulletin.id)}
    end
  end
  def destroy_preview
    bulletin = Bulletin.find_by(:uid=>params['uid'])
    if bulletin.is_preview
      bulletin.destroy
    end
    render :json=>{'destroy'=>bulletin.id.to_s}
  end

  def build_email(bulletin,locale)
    if bulletin.email_sent and !bulletin.email_addresses.blank?
      if bulletin.email.nil?
        email = Email.new
        email.save
        email.deliver rescue nil
        bulletin.email_id = email.id
        bulletin.save
      end

      is_sent = bulletin.email.is_sent
      is_sent = !params[:resend_mail].eql?("true") if !params[:resend_mail].blank?
      doc = Nokogiri::HTML(bulletin.title_translations[locale])
      title = doc.text.empty? ? 'no content' : doc.text
        
      bulletin.email.update_attributes(
        :create_user=>current_user,
        :mail_sentdate=>bulletin.email_sentdate,
        :module_app=>@module_app,
        :mail_lang => locale,
        :mail_to=>bulletin.email_addresses,
        :mail_subject=>title,
        :template=>'announcements/email',
        :template_data=>{
          "host" => request.host_with_port,
          "title" => title,
          "url" => page_for_bulletin(bulletin)
        },
        :is_sent=>is_sent
      )
      bulletin.email.deliver
    else
      bulletin.email.destroy if !bulletin.email.nil?
    end
  end

  private

  def load_settings
    @announcement_setting = AnnouncementSetting.first rescue nil
    if @announcement_setting.nil?
      @announcement_setting = AnnouncementSetting.create
    end
  end

  def set_bulletin
    @bulletin = Bulletin.find(params[:id])
  end

  def bulletin_params
    params[:bulletin][:email_sent] = params[:bulletin][:email_sent].nil? ? 0 : params[:bulletin][:email_sent]
    params.require(:bulletin).permit!
  end

  def feed_params
    feed_params = params.require(:bulletin_feed).permit!
    if feed_params[:tag_ids].nil?
      feed_params[:tag_ids] = []
    end
    if feed_params[:category_ids].nil?
      feed_params[:category_ids] = []
    end
    feed_params
  end

  def settings_params
    params.require(:announcement_setting).permit!
  end
  def update_calendar(bps,bulletin)
    bps = bps.to_h.with_indifferent_access
    if bps[:add_to_calendar] == '0' && !bps[:event_id].blank?
      Event.find(bps[:event_id]).destroy rescue nil
      bps[:event_id] = nil
    elsif bps[:add_to_calendar] == '1'
      event = Event.find(bps[:event_id]) rescue Event.new(create_user_id: current_user.id)
      e_start = bps[:calendar_start_date].blank? ? bps[:postdate] : bps[:calendar_start_date]
      e_start = Time.now.to_datetime if e_start.blank?
      e_end = bps[:calendar_end_date].blank? ? bps[:deadline] : bps[:calendar_end_date]
      #e_end = Time.now.to_datetime + 1.year if e_end.blank?
      event.update_attributes(model_class: 'Bulletin',
                              module_key: 'announcement',
                              model_cat: bps[:category_id],
                              model_tags: bps[:tags],
                              model_page_id: bps[:page_id],
                              model_id: bulletin.id,start: e_start,
                              end: e_end,update_user_id: current_user.id,
                              all_day: bps[:calendar_all_day],
                              calendar_type_id: bps[:calendar_type_id],
                              title_translations: bps[:title_translations],
                              note_translations: bps[:subtitle_translations])
      bps[:event_id] = event.id
    end
    bps 
  end
end