Redmine

class RedminePluginModelGenerator < Rails::Generators::NamedBase

  source_root File.expand_path("../templates", __FILE__)

  argument :model, :type => :string

  argument :attributes, :type => :array, :default => [], :banner => "field[:type][:index] field[:type][:index]"

  def copy_templates

    template 'model.rb.erb', "#{plugin_path}/app/models/#{model.underscore}.rb"

    template 'unit_test.rb.erb', "#{plugin_path}/test/unit/#{model.underscore}_test.rb"

    migration_filename = "%03i_#{@migration_filename}.rb" % (migration_number + 1)

    template "migration.rb", "#{plugin_path}/db/migrate/#{migration_filename}"

  end

            end

            @hours << h

          end

          @hours.each do |row|

            case @columns

            when 'year'

              row['day'] = "#{row['spent_on']}"

            end

          end

          min = @hours.collect {|row| row['spent_on']}.min

          @from = min ? min.to_date : User.current.today

          max = @hours.collect {|row| row['spent_on']}.max

          @to = max ? max.to_date : User.current.today

          @total_hours = @hours.inject(0) {|s,k| s = s + k['hours'].to_f}

          @periods = []

        # URLs relative to the current document or document root (without a protocol

        # separator, should be harmless

        return true unless uri.to_s.include? ":"

        # Other URLs need to be parsed

        schemes.include? URI.parse(uri).scheme

      rescue URI::Error

          end

        end

      end

      def controller

        nil

      end

      def config

        ActionController::Base.config

      end

        if parent

          previous_root_id = root_id

          self.root_id = parent.root_id

          lft_after_move = target_lft

          self.class.where(:root_id => parent.root_id).update_all([

            "lft = CASE WHEN lft >= :lft THEN lft + :shift ELSE lft END, " +

            "rgt = CASE WHEN rgt >= :lft THEN rgt + :shift ELSE rgt END",

            {:lft => lft_after_move, :shift => (rgt - lft + 1)}

          ])

          self.class.where(:root_id => previous_root_id).update_all([

            "root_id = :root_id, lft = lft + :shift, rgt = rgt + :shift",

            {:root_id => parent.root_id, :shift => lft_after_move - lft}

          ])

          self.lft, self.rgt = lft_after_move, (rgt - lft + lft_after_move)

          parent.send :reload_nested_set_values

        end

      def remove_from_nested_set

        self.class.where(:root_id => root_id).where("lft >= ? AND rgt <= ?", lft, rgt).

          update_all(["root_id = :id, lft = lft - :shift, rgt = rgt - :shift", {:id => id, :shift => lft - 1}])

        self.class.where(:root_id => root_id).update_all([

          "lft = CASE WHEN lft >= :lft THEN lft - :shift ELSE lft END, " +

          "rgt = CASE WHEN rgt >= :lft THEN rgt - :shift ELSE rgt END",

    #   * :label - label for the formatter displayed in application settings

    #

    # Examples:

    #

    def wiki_format_provider(name, *args)

      Redmine::WikiFormatting.register(name, *args)

        @safe_attributes ||= []

        if args.empty?

          if superclass.include?(Redmine::SafeAttributes)

          else

            @safe_attributes

          end

            full_args_locale << scm_iconv(@path_encoding, 'UTF-8', e)

          end

          ret = shellout(

                     full_args_locale.map { |e| shell_quote e.to_s }.join(' '),

                   &block

                   )

            full_args_locale << scm_iconv(@path_encoding, 'UTF-8', e)

          end

          ret = shellout(

                     full_args_locale.map { |e| shell_quote e.to_s }.join(' '),

                   &block

                   )

      def self.to_text(html)

        html = html.gsub(/[\n\r]/, '').squeeze(' ')

        doc = Loofah.document(html)

        doc.scrub!(WikiTags.new(tags))

        doc.scrub!(:newline_block_elements)

        Loofah.remove_extraneous_whitespace(doc.text).strip

      end

          @direction = :bottom_up

          @tags_to_text = tags_to_text || {}

        end

        def scrub(node)

          formatting = @tags_to_text[node.name]

          case formatting

        #     macro :my_macro do |obj, args|

        #       "My macro output"

        #     end

        #     desc "This is my macro that accepts a block of text"

        #     macro :my_macro do |obj, args, text|

        #       "My macro output"

        #

        # Options:

        # * :desc - A description of the macro

        #   string is passed to the macro)

        #

        # Macro blocks accept 2 or 3 arguments:

        # * args: macro arguments

        # * text: the block of text given to the macro (should be present only if the

        #   macro accepts a block of text). text is a String or nil if the macro is

        #

        # Examples:

        # By default, when the macro is invoked, the comma separated list of arguments

      # Builtin macros

      desc "Sample macro."

      macro :hello_world do |obj, args, text|

          (args.empty? ? "Called with no argument" : "Arguments: #{args.join(', ')}") +

          " and " + (text.present? ? "a #{text.size} bytes long block of text." : "no block of text.")

        )

#

# == Links

#

# marks" followed immediately by a colon and the URL of the link.

# attribute for the link, visible as a tool tip when a cursor is above it.

# Example:

#

#  "This is a link (This is a title) ":http://www.textism.com

# Will become:

#  <a href="http://www.textism.com" title="This is a title">This is a link</a>

#

# == Images

#

# To insert an image, put the URL for the image inside exclamation marks.

#

# browsers.

#

# closing ! to make the image into a link.

# Example:

#

#  !http://www.textism.com/common/textist.gif(Textist)!

#

# == Defining Acronyms

#

# this should be used at least once for each acronym in documents where they appear.

#

# immediately following the acronym.

# Example:

#

#  ACLU(American Civil Liberties Union)

#     (background:#ddd;color:red). |{}| | | |

#

# == Using RedCloth

# RedCloth is simply an extension of the String class, which can handle

# Textile formatting.  Use it like a String and output HTML with its

# RedCloth#to_html method.

        rules = DEFAULT_RULES if rules.empty?

        # make our working copy

        text = self.dup

        @urlrefs = {}

        @shelf = []

        textile_rules = [:block_textile_table, :block_textile_lists,

                         :block_textile_prefix, :inline_textile_image, :inline_textile_code,

                         :inline_textile_span, :inline_textile_link, :glyphs_textile]

        markdown_rules = [:refs_markdown, :block_markdown_setext, :block_markdown_atx, :block_markdown_rule,

                          :inline_markdown_reflink, :inline_markdown_link]

        @rules = rules.collect do |rule|

            case rule

        end.flatten

        # standard clean up

        # start processor

        @pre_list = []

        escape_html_tags text

        # need to do this before #hard_break and #blocks

        block_textile_quotes text unless @lite_mode

        unless @lite_mode

            refs text

            blocks text

    #

    TEXTILE_TAGS =

         [153, 8482], [154, 353], [155, 8250], [156, 339], [157, 0], [158, 0], [159, 376]].

        collect! do |a, b|

    # Text markup tags, don't conflict with block tags

    SIMPLE_HTML_TAGS = [

        'samp', 'kbd', 'var', 'cite', 'abbr', 'acronym', 'a', 'img', 'br',

        'br', 'map', 'q', 'sub', 'sup', 'span', 'bdo'

    ]

        ['+', 'ins', :limit],

        ['^', 'sup', :limit],

        ['~', 'sub', :limit]

    QTAGS_JOIN = QTAGS.map {|rc, ht, rtype| Regexp::quote rc}.join('|')

    QTAGS.collect! do |rc, ht, rtype|

        rcq = Regexp::quote rc

        re =

                (#{C})

                (?::(\S+))?

                ([[:word:]]|[^\s\-].*?[^\s\-])

            end

        [rc, ht, re, rtype]

    end

    # Parses Textile attribute lists and builds an HTML attribute string

    def pba( text_in, element = "" )

        return +'' unless text_in

        style = []

        cls = $1 if

            text.sub!( /\(([^()]+?)\)/, '' )

        style << "padding-left:#{ $1.length }em;" if

            text.sub!( /([(]+)/, '' )

        atts << " id=\"#{ id }\"" if id

        atts << " colspan=\"#{ colspan }\"" if colspan

        atts << " rowspan=\"#{ rowspan }\"" if rowspan

        atts

    end

    end

    TABLE_RE = /^(?:table(_?#{S}#{A}#{C})\. ?\n)?^(#{A}#{C}\.? ?\|.*?\|)(\n\n|\Z)/m

    # Parses a Textile table block, building HTML from the result.

        text.gsub!( TABLE_RE ) do |matches|

            tatts, fullrow = $~[1..2]

            fullrow.each_line do |row|

                ratts, row = pba( $1, 'tr' ), $2 if row =~ /^(#{A}#{C}\. )(.*)/m

                cells = []

                row.scan(/\|(_?#{S}#{A}#{C}\. ?)?((\[\[[^|\]]*\|[^|\]]*\]\]|[^|])*?)(?=\|)/) do |modifiers, cell|

                    ctyp = 'd'

                    ctyp = 'h' if modifiers && modifiers =~ /^_/

                    catts = pba( modifiers, 'td' ) if modifiers

                    catts = shelve( catts ) if catts

                end

                ratts = shelve( ratts ) if ratts

                rows << "\t\t<tr#{ ratts }>\n#{ cells.join( "\n" ) }\n\t\t</tr>"

    LISTS_CONTENT_RE = /^([#*]+)(#{A}#{C}) (.*)$/m

    # Parses Textile lists and generates HTML

        text.gsub!( LISTS_RE ) do |match|

            lines = match.split( /\n/ )

            last_line = -1

            depth = []

            lines.each_with_index do |line, line_id|

                    tl,atts,content = $~[1..3]

                    if depth.last

                        if depth.last.length > tl.length

            lines.join( "\n" )

        end

    end

    QUOTES_RE = /(^>+([^\n]*?)(\n|$))+/m

    QUOTES_CONTENT_RE = /^([> ]+)(.*)$/m

    def block_textile_quotes( text )

      text.gsub!( QUOTES_RE ) do |match|

        lines = match.split( /\n/ )

        quotes = +''

        indent = 0

        lines.each do |line|

          bq,content = $1, $2

          l = bq.count('>')

          if l != indent

        @

        (?=\W)/x

        text.gsub!( CODE_RE ) do |m|

            before,lang,code,after = $~[1..4]

            lang = " lang=\"#{ lang }\"" if lang

        end

    end

        text =~ /\#$/ ? 'o' : 'u'

    end

                        end

                    end

                    @rules.each do |rule_name|

                        block_applied += 1 if ( rule_name.to_s.match /^block_/ and method( rule_name ).call( blk ) )

                    end

    BLOCK_RE = /^(([a-z]+)(\d*))(#{A}#{C})\.(?::(\S+))? (.*)$/m

        if text =~ BLOCK_RE

            tag,tagpre,num,atts,cite,content = $~[1..6]

            atts = pba( atts )

            if respond_to? "textile_#{ tag }", true

              replacement = method( "textile_#{ tag }" ).call( tag, atts, cite, content )

            elsif respond_to? "textile_#{ tagpre }_", true

            end

            text.gsub!( $& ) { replacement } if replacement

        end

    end

    SETEXT_RE = /\A(.+?)\n([=-])[=-]* *$/m

    def block_markdown_setext( text )

        if text =~ SETEXT_RE

    def block_markdown_lists( text )

    end

        QTAGS.each do |qtag_rc, ht, qtag_re, rtype|

            text.gsub!( qtag_re ) do |m|

                case rtype

                when :limit

                    sta,oqs,qtag,content,oqa = $~[1..6]

            (                          # $url

            (\/|[a-zA-Z]+:\/\/|www\.|mailto:)  # $proto

            [[:alnum:]_\/]\S+?

            (\/)?                      # $slash

            ([^[:alnum:]_\=\/;\(\)\-]*?)       # $post

            )

            (?=<|\s|$)

#"

        text.gsub!( LINK_RE ) do |m|

          all,pre,atts,text,title,url,proto,slash,post = $~[1..9]

          if text.include?('<br />')

          else

            url, url_title = check_refs( url )

            title ||= url_title

            # Idea below : an URL with unbalanced parethesis and

            # ending by ')' is put into external parenthesis

            if ( url[-1]==?) and ((url.count("(") - url.count(")")) < 0 ) )

            atts = +" href=\"#{ htmlesc url }#{ slash }\"#{ atts }"

            atts << " title=\"#{ htmlesc title }\"" if title

            atts = shelve( atts ) if atts

            external = (url =~ /^https?:\/\//) ? ' class="external"' : ''

            "#{ pre }<a#{ atts }#{ external }>#{ text }</a>#{ post }"

          end

        end

            [ ]?                # opt. space

            (?:\n[ ]*)?         # one optional newline followed by spaces

            \[(.*?)\]           # $id

        text.gsub!( MARKDOWN_REFLINK_RE ) do |m|

            text, id = $~[1..2]

            else

                url, title = check_refs( id )

            end

            atts = " href=\"#{ url }\""

            atts << " title=\"#{ title }\"" if title

            atts = shelve( atts )

            "<a#{ atts }>#{ text }</a>"

        end

    end

            \3                  # matching quote

            )?                  # title is optional

            \)

        text.gsub!( MARKDOWN_LINK_RE ) do |m|

            text, url, quote, title = $~[1..4]

            atts = " href=\"#{ url }\""

            atts << " title=\"#{ title }\"" if title

            atts = shelve( atts )

            "<a#{ atts }>#{ text }</a>"

        end

    end

        end

    end

        text.gsub!( TEXTILE_REFS_RE ) do |m|

            flag, url = $~[2..3]

            @urlrefs[flag.downcase] = [url, nil]

            nil

        end

    end

    def refs_markdown( text )

        text.gsub!( MARKDOWN_REFS_RE ) do |m|

            flag, url = $~[2..3]

        end

    end

        ret = @urlrefs[text.downcase] if text

        ret || [text, nil]

    end

            (?:\(((?:[^\(\)]|\([^\)]+\))+?)\))?   # optional title

            \!                   # closing

            (?::#{ HYPERLINK })? # optional href

        text.gsub!( IMAGE_RE )  do |m|

            stln,algn,atts,url,title,href,href_a1,href_a2 = $~[1..8]

            htmlesc title

            atts = pba( atts )

            atts = +" src=\"#{ htmlesc url.dup }\"#{ atts }"

            atts << " title=\"#{ title }\"" if title

            # size = @getimagesize($url);

            # if($size) $atts.= " $size[3]";

            out << "<a#{ shelve( " href=\"#{ href }\"" ) }>" if href

            out << "<img#{ shelve( atts ) } />"

            out << "</a>#{ href_a1 }#{ href_a2 }" if href

                algn = h_align( algn )

                if stln == "<p>"

                    out = "<p style=\"float:#{ algn }\">#{ out }"

        end

    end

        @shelf << val

        " :redsh##{ @shelf.length }:"

    end

        text.gsub!(/ :redsh#(\d+):/) do

          @shelf[$1.to_i - 1] || $&

        end

    end

        ## turn any incoming ampersands into a dummy character for now.

        ## This uses a negative lookahead for alphanumerics followed by a semicolon,

        ## implying an incoming html entity, to be skipped

        text.gsub!( /&(?![#a-z0-9]+;)/i, "x%x%" )

    end

        text.gsub!( /(^|\s)==([^=]+.*?)==(\s|$)?/,

            '\1<notextile>\2</notextile>\3' )

        text.gsub!( /^ *==([^=]+.*?)==/m,

            '\1<notextile>\2</notextile>\3' )

    end

        # normalize line breaks

        text.gsub!( /\r\n/, "\n" )

        text.gsub!( /\r/, "\n" )

        end

    end

        text.gsub!( /\b\[([0-9]+?)\](\s)?/,

            '<sup><a href="#fn\1">\1</a></sup>\2' )

    end

    OFFTAGS = /(code|pre|kbd|notextile)/

    OFFTAG_MATCH = /(?:(<\/#{ OFFTAGS }\b>)|(<#{ OFFTAGS }\b[^>]*>))(.*?)(?=<\/?#{ OFFTAGS }\b\W|\Z)/mi

    OFFTAG_OPEN = /<#{ OFFTAGS }/

                    elsif line =~ OFFTAG_CLOSE

                        codepre -= 1

                        codepre = 0 if codepre < 0

                elsif codepre.zero?

                    glyphs_textile( line, level + 1 )

                else

                    end

                    codepre -= 1 unless codepre.zero?

                    used_offtags = {} if codepre.zero?

                line

            end

        end

        end

    end

        [/^inline_/, /^glyphs_/].each do |meth_re|

            @rules.each do |rule_name|

                method( rule_name ).call( text ) if rule_name.to_s.match( meth_re )

        end

    end

        H_ALGN_VALS[text]

    end

        V_ALGN_VALS[text]

    end

        'img' => ['src', 'alt', 'title'],

        'br' => [],

        'i' => nil,

        'b' => nil,

        'pre' => nil,

        'kbd' => nil,

        'h3' => nil,

        'h4' => nil,

        'h5' => nil,

        'blockquote' => ['cite']

    }

            end

        end

    end

    ALLOWED_TAGS = %w(redpre pre code kbd notextile)

    def escape_html_tags(text)

      text.gsub!(%r{<(\/?([!\w]+)[^<>\n]*)(>?)}) {|m| ALLOWED_TAGS.include?($2) ? "<#{$1}#{$3}" : "&lt;#{$1}#{'&gt;' unless $3.blank?}" }