rmthemegen 0.0.38 → 0.0.39

data/lib/rmthemegen/rmtg_rubymine.rb

@@ -0,0 +1,196 @@
+#**********************************************************************
+#*                                                                    *
+#*  RmThemeGen - a ruby script to create random, usable themes for    *
+#*  text editors. Currently supports RubyMine 3.X.X                   *
+#*                                                                    *
+#*  By David Heitzman, 2011                                           *
+#*                                                                    *
+#**********************************************************************
+
+#this is a version of the software that should work with ruby 1.8.7
+
+
+
+require File.dirname(__FILE__)+'/rmthemegen_parent'
+
+module RMThemeGen
+
+  class ThemeRubyMine < RMThemeParent
+    
+    attr_reader :xml_save 
+    attr_reader :xmlout #a huge structure of xml that can be given to XmlSimple.xml_out() to create that actual color theme file
+    
+   def initialize
+      super
+      #"EFFECT-TYPE" s: 
+      #   3 ==> cross-out 
+      #   1 ==> underline
+      #   2 == >squiggle underline
+      #   5 => blockey underline 
+      #   0 ==> box around word
+      #   -1 ==> seems to have no effect
+
+      # if the element name contains a string from the following arrays it makes that element
+      # eligible for bold, italic or both. This allows elements from multiple languages to all
+      # be exposed equally to 
+      # underline not implemented yet. There are several font decorations in rubymine, 
+      # probably should be used sparingly. 
+      @bold_chance = 0.4
+      @underline_chance = 0.3
+      @italic_candidates = ["STRING", "SYMBOL", "REQUIRE"]
+      @bold_candidates = ["KEYWORD","RUBY_SPECIFIC_CALL", "CONSTANT", "COMMA", "PAREN","RUBY_ATTR_ACCESSOR_CALL", "RUBY_ATTR_READER_CALL" ,"RUBY_ATTR_WRITER_CALL", "IDENTIFIER"]
+# with code inspections we don't color the text, we just put a line or something under it .
+      @code_inspections = ["ERROR","WARNING_ATTRIBUTES","DEPRECATED", "TYPO","WARNING_ATTRIBUTES", "BAD_CHARACTER",
+      "CUSTOM_INVALID_STRING_ESCAPE_ATTRIBUTES","ERRORS_ATTRIBUTES", "MATCHED_BRACE_ATTRIBUTES"]
+      @cross_out = ["DEPRECATED_ATTRIBUTES" ]
+      
+      @unders = %w(-1 0 1 2 5  )
+      @underline_candidates = ["STRING"]
+      @italic_chance = 0.2
+   end
+    
+    def set_doc_colors
+      newopt = []
+      @@doc_color_keys.each do |o|
+        if o == "CARET_ROW_COLOR" then
+         @caret_row_color = randcolor(:bg_rgb=>@backgroundcolor,:min_cont=>0.05,:max_cont => 0.08,:shade_of_grey=>false)
+          newopt << {:name=> o, :value => @caret_row_color }
+          @document_globals[:CARET_ROW_COLOR] = @caret_row_color
+        elsif o.include?("SELECTION_BACKGROUND") then
+          @selection_background = randcolor(:bg_rgb=>@backgroundcolor,:min_cont=>0.07,:max_cont => 0.09,:shade_of_grey=>false)
+          newopt << {:name=> o, :value => @selection_background }
+          @document_globals[:SELECTION_BACKGROUND] = @selection_background
+        elsif o.include?("SELECTION_FOREGROUND") then
+          newopt << {:name=> o }
+        elsif o.include?("GUTTER_BACKGROUND") then
+          newopt << {:name=> o, :value => @backgroundcolor }
+        elsif o.include?("CARET_COLOR") then
+          newopt << {:name=> o, :value => (@caret_color = randcolor(:bg_rgb=>@backgroundcolor, :min_cont=>0.30,:max_cont=>0.7,:shade_of_grey=>true) )}
+          @document_globals[:CARET_COLOR] = @caret_color
+        elsif o.include?("READONLY_BACKGROUND") then
+          newopt << {:name=> o, :value => randcolor(:bg_rgb=>@backgroundcolor, :min_cont=>0.03,:max_cont=>0.09,:shade_of_grey=>@background_grey) }
+        elsif o.include?("READONLY_FRAGMENT_BACKGROUND") then
+          newopt << {:name=> o, :value => randcolor(:bg_rgb=>@backgroundcolor, :min_cont=>0.03,:max_cont=>0.09,:shade_of_grey=>@background_grey) }
+        elsif o.include?("INDENT_GUIDE") then
+          newopt << {:name=> o, :value => randcolor(:bg_rgb=>@backgroundcolor, :min_cont=>0.08,:max_cont=>0.22,:shade_of_grey=>@background_grey) }
+        else
+          newopt << {:name=> o, :value => randcolor(:bg_rgb=>@backgroundcolor, :min_cont=>@min_cont,:max_cont=>@max_cont,:shade_of_grey=>@background_grey).to_s }
+        end 
+      end
+      
+      @xmlout[:scheme][0][:colors][0][:option] = newopt
+    end
+    
+    def set_doc_options
+      newopt = []
+      newopt << {:name => "LINE_SPACING",:value=>'1.0' } #:value=>'1.3' works all right 
+      newopt << {:name => "EDITOR_FONT_NAME",:value => "DejaVu Sans Mono" }
+      newopt << {:name => "EDITOR_FONT_SIZE",:value => "12"} #:value = "14" is a safe default if you want to specify something
+      newopt << {:name => "RANDOM_SEED",:value => @random_seed.to_s }
+      @xmlout[:scheme][0][:option] = newopt
+    end
+    
+    def set_element_colors
+      newopt = []
+      newopt[0]={:option=>[]}
+      ################      set the fonttype 
+      @@element_keys.each do |o|
+        fonttype = 0 #bold: 1,  #italic: 2, bold & italic: 3   
+        @bold_candidates.each do |bc|
+          if o.include? bc.to_s then 
+            if rand < @bold_chance then fonttype = 1 end
+          end 
+        end 
+        @italic_candidates.each do |ic|
+          if o.include? ic.to_s then 
+            if rand < @italic_chance then fonttype += 2 end 
+          end 
+        end 
+        #this block is for setting up special cases for the new color - ie, comments darker,
+        #reserved words are yellowins, whatever 
+        fonttype = "" unless fonttype.is_a? Fixnum
+        case 
+          when o.include?( "COMMENT") 
+      #comments -- this is done so that COMMENTED texts skew toward darker shades. 
+            newcol = randcolor(:bg_rgb=>@backgroundcolor, :min_cont=>0.25, :max_cont => 0.27) 
+            optblj=[{:option=>[ {:name => "FOREGROUND", :value => newcol},     
+#           {:name => "BACKGROUND", :value =>@backgroundcolor},
+            {:name => "BACKGROUND"},
+            {:name => "EFFECT_COLOR" },{:name => "FONT_TYPE", :value=>fonttype.to_s },
+            {:name => "ERROR_STRIPE_COLOR", :value =>randcolor(:bg_rgb=>@backgroundcolor) }]}] 
+       #default text and background for whole document
+          when ["TEXT","FOLDED_TEXT_ATTRIBUTES"].include?( o.to_s)
+            newcol = randcolor(:bg_rgb=>@backgroundcolor ) 
+            optblj=[{:option=>[ {:name => "FOREGROUND", :value => newcol},     
+            {:name => "BACKGROUND", :value =>@backgroundcolor},
+            {:name => "EFFECT_COLOR" },{:name => "FONT_TYPE", :value=>fonttype.to_s },
+            {:name => "ERROR_STRIPE_COLOR", :value => (randcolor(:bg_rgb=>@backgroundcolor) ) }]}] 
+            @document_globals[:TEXT] = newcol
+          when @code_inspections.include?(o.to_s)  
+            newcol = randcolor(:bg_rgb=>@backgroundcolor) 
+            optblj=[{:option=>[ {:name => "FOREGROUND"},     
+            {:name => "BACKGROUND"},
+            {:name => "EFFECT_COLOR", :value =>newcol},{:name => "FONT_TYPE", :value=>fonttype.to_s },
+            {:name => "EFFECT_TYPE", :value=>@unders.shuffle[0].to_s },
+            {:name => "ERROR_STRIPE_COLOR", :value =>randcolor(:bg_rgb=>@backgroundcolor) }]}] 
+          when @cross_out.include?(o.to_s)
+            newcol = randcolor(:bg_rgb=>@backgroundcolor) 
+            optblj=[{:option=>[ {:name => "FOREGROUND"},     
+            {:name => "BACKGROUND"},
+            {:name => "EFFECT_COLOR", :value =>newcol},{:name => "FONT_TYPE", :value=>fonttype.to_s },
+            {:name => "EFFECT_TYPE", :value=>"3" },
+            {:name => "ERROR_STRIPE_COLOR", :value =>randcolor(:bg_rgb=>@backgroundcolor)}]}] 
+          else
+            newcol=randcolor(:bg_rgb=>@backgroundcolor) 
+            optblj=[{:option=>[ {:name => "FOREGROUND", :value => newcol},     
+            {:name => "BACKGROUND"},
+            {:name => "EFFECT_COLOR" },{:name => "FONT_TYPE", :value=>fonttype.to_s },
+            {:name => "ERROR_STRIPE_COLOR", :value =>randcolor(:bg_rgb=>@backgroundcolor) }]}] 
+        end
+        newopt[0][:option] << {:name =>o.to_s , :value=>optblj}
+        tmphash = {}
+        optblj[0][:option].each do |siing| 
+          tmphash[ siing[:name].to_sym ] = siing[:value] 
+        end 
+        @textmate_hash[o.to_sym] = tmphash
+      end
+      
+      @xmlout[:scheme][0][:attributes] = newopt
+    end     
+    
+   def make_theme_file(outputdir = ENV["PWD"], bg_color_style=:dark, colorsets=[], rand_seed=nil)
+      make_rm_theme_file(outputdir, bg_color_style, colorsets, rand_seed)
+   end 
+    
+    # (output directory, bg_color_style, colorsets []) 
+    def make_rm_theme_file(outputdir = ENV["PWD"], bg_color_style=:dark, colorsets=[], rand_seed=nil)
+    #bg_color_style: 0 = blackish, 1 = whitish, 2 = any color, from #000000 to #FFFFFF
+      handle_rand_seed(rand_seed)
+      @theme_successfully_created=false
+      before_create(outputdir, bg_color_style, colorsets, rand_seed)  
+      @xmlout = {:scheme=>
+                [{
+                  :attributes => [{:option=>[
+                                  {:name=>"2ABSTRACT_CLASS_NAME_ATTRIBUTES", :value=>[{:option=>{:name=>"foreground",:value=>"red"}}] },
+                                  {:name=>"4ABSTRACT_CLASS_NAME_ATTRIBUTES", :value=>[{:option=>{:name=>"foreground",:value=>"red"}}] }
+                                  ] 
+                                 }],
+                  :colors => [{ :option => [{:name=>"foreground",:value => "yellow"},{:name=>"background",:value => "black"} ],
+                  :option =>[{:name=>"pencil length",:value=>"48 cm"},{:name => "Doowop level", :value=>"medium"}]
+                   }],
+                :name => @themename,:version=>@themeversion,:parent_scheme=>"Default", :author=>"David Heitzman, http://rmthemegen.com"
+                }]
+                }
+        @savefile = randfilename(@themename)
+        @outf = File.new(@opts[:outputdir]+"/"+@savefile, "w+")
+        set_element_colors
+        set_doc_colors
+        set_doc_options
+        XmlSimple.xml_out(@xmlout,{:keeproot=>true,:xmldeclaration=>true,:outputfile=> @outf, :rootname => "scheme"})
+        @outf.close	
+        @theme_successfully_created = true
+        return File.expand_path(@outf.path)
+    end
+   
+  end    #class
+end #module 

data/lib/rmthemegen/rmtg_textmate.rb

@@ -0,0 +1,262 @@
+#**********************************************************************
+#*                                                                    *
+#*  RmThemeGen - a ruby script to create random, usable themes for    *
+#*  text editors. Currently supports RubyMine 3.X.X                   *
+#*                                                                    *
+#*  By David Heitzman, 2011                                           *
+#*                                                                    *
+#**********************************************************************
+
+#this is a version of the software that should work with ruby 1.8.7
+
+require File.dirname(__FILE__)+'/rmthemegen_parent'
+
+module RMThemeGen
+  class ThemeTextmate < RMThemeParent
+   
+   def unique_number(n=-1)
+      @unique_num ||= n
+      @unique_num += 1 
+      @unique_num
+   end 
+   
+   def initialize
+      super
+      @bold_chance = 0.4
+      @underline_chance = 0.3
+      @italic_candidates = []
+      @bold_candidates = []
+# with code inspections we don't color the text, we just put a line or something under it .
+      @code_inspections = []
+      @cross_out = [ ]
+      
+      @underline_candidates = []
+      @italic_chance = 0.2
+   end 
+   
+   def set_doc_options(dd)
+      @document_globals[:backgroundcolor]=@backgroundcolor
+      @document_globals[:caret_color]= randcolor(:bg_rgb=>@backgroundcolor, :min_cont=>0.30,:max_cont=>0.7,:shade_of_grey=>true)
+      @document_globals[:text]=randcolor(:bg_rgb=>@backgroundcolor, :min_cont=>0.24,:max_cont=>0.7,:shade_of_grey=>false) #TEXT should hardly ever appears, since every possible color is stipulated
+      @document_globals[:caret_row_color] = randcolor(:bg_rgb=>@backgroundcolor,:min_cont=>0.05,:max_cont => 0.08,:shade_of_grey=>false)
+      @document_globals[:selection_background] = randcolor(:bg_rgb=>@backgroundcolor,:min_cont=>0.07,:max_cont => 0.09,:shade_of_grey=>false)
+
+      dd.add_element(
+         make_dict(
+         :background=>"#"+@document_globals[:backgroundcolor].upcase,
+         :caret=>"#"+ @document_globals[:caret_color].upcase ,
+         :foreground=>"#"+@document_globals[:text].upcase,
+         :invisibles=>"#"+@document_globals[:backgroundcolor].upcase,
+         :lineHighlight=>"#"+@document_globals[:caret_row_color].upcase,
+         :selection=>"#"+@document_globals[:selection_background].upcase
+         ) 
+      ) 
+   end 
+   
+   #subclass
+   def before_create(outputdir, bg_color_style, colorsets, rand_seed)
+      super(outputdir, bg_color_style, colorsets, rand_seed)
+      
+   end
+    
+   def set_doc_colors
+
+   end
+
+   def set_element_colors
+   end 
+   
+   
+   def make_theme_from_hash
+   
+   end 
+   
+   def make_theme_file(outputdir = ENV["PWD"], bg_color_style=:dark, colorsets=[], rand_seed=nil)
+      create_textmate_theme(outputdir, bg_color_style, colorsets, rand_seed)
+   end 
+ 
+    def create_textmate_theme(outputdir = ENV["PWD"], bg_color_style=:dark, colorsets=[], rand_seed=nil, opts_hash={})
+    opts_hash[:punctuation_bold] = 0.2 
+    opts_hash[:backgrounds_colored] = 0.05
+
+    
+    #returns path to file that it created, which is an xml file that should work in textmate.  
+      handle_rand_seed(rand_seed)
+      before_create(outputdir, bg_color_style, colorsets, rand_seed) 
+      #it will save the theme file ".tmTheme" in the same directory as other themes
+      #it will return the full name and path of that theme file.
+    
+      @theme_successfully_created=false
+        @savefile = "rmt_"+@themename+".tmTheme"
+        @outf = File.new(@opts[:outputdir]+"/"+@savefile, "w+")
+        rexmlout = REXML::Document.new
+        rexmlout << REXML::DocType.new('plist','PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd"')
+        rexmlout << REXML::XMLDecl.new("1.0","UTF-8",nil)
+        plist = REXML::Element.new "plist"
+        plist.add_attributes( "version"=>"1.0")
+        dict = REXML::Element.new( "dict", plist) #causes plist to be the parent of dict
+        dict.add_text(REXML::Element.new("key").add_text("name") )
+        dict.add_text(REXML::Element.new("string").add_text( @themename ) )
+        dict.add_text(REXML::Element.new("key").add_text("author") )
+        dict.add_text(REXML::Element.new("string").add_text("David Heitzman") )
+        dict.add_text(REXML::Element.new("key").add_text("settings") )
+        main_array = REXML::Element.new("array",dict)
+        doc_dict = REXML::Element.new("dict",main_array)
+        doc_dict.add_text(REXML::Element.new("key").add_text("settings") )
+
+        set_doc_options(doc_dict)
+        
+        process_plists()
+
+        scopes_found=get_scopes_from_themefiles()
+        co2 =0
+        @used_names ={}
+        
+        #group_2_color.each do |g,c| group_2_color[g] = "#"+randcolor(:bg_rgb=>@backgroundcolor).upcase end   
+        
+        @new_color_to_group = {} #so this will have a key from each color to its group and also a key for each scope to its color
+        @color_2_group.each do |c,g|
+          fontStyle=''
+          if g.join(' ').upcase.include?( "ITALIC" ) || rand < (@italic_chance/2) 
+            fontStyle +="italic "
+          end 
+          if g.join(' ').upcase.include?( "BOLD" ) || rand < (@bold_chance/2)
+            fontStyle += "bold "
+          end 
+          newcol =  "#"+randcolor(:bg_rgb=>@backgroundcolor).upcase
+          @new_color_to_group[newcol] = color_2_group[c]
+          
+          g.each do |s|
+            @new_color_to_group[s] = {:foreground=>newcol,:fontStyle=>fontStyle.chop!}
+          end
+        end 
+        
+        scopes_found.each_index do |k|
+          v=scopes_found[k]  
+          if  self.scopes_found_count[v] > 0
+            scope_text = v
+            scope_text = scope_text.split(",")[0] if v.include?(",") 
+            scope_text = scope_text.split[0].split(".") #this takes the first whole token prior to any spaces, then makes the array out of the substrings separated by periods
+            elname = " ~ "+scope_text[0] || " ! "+unique_number.to_s
+            co=1 
+            while !@used_names[elname].nil?
+               if scope_text[co]
+                  elname += "."+scope_text[co] 
+               else
+                  elname += unique_number.to_s
+               end 
+            co += 1
+            end
+#   puts 'rmtg_textmate:131 '+elname 
+#   puts 'the scope that kills it: "'+v.to_s 
+#            elname = "uniquename"+unique_number.to_s 
+            @used_names[elname] = true
+            main_array.add_element(
+            # so it's  make_name_scope_settings_rand(name,scope,[don't worry about it, but colors you can assign manually]) 
+                make_name_scope_settings_rand(elname,v,[])
+            )  
+            co2 += 1 
+          end
+        end 
+
+#        variable.other.readwrite.instance.ruby
+#        variable.other.readwrite.class.ruby
+
+        uuid_key = REXML::Element.new("key")
+        uuid_key.add_text("uuid")
+        uuid_element = REXML::Element.new("string")
+        uuid_element.add_text( gen_uuid)
+        dict.add_element uuid_key
+        dict.add_element uuid_element
+
+        rexmlout << plist
+        formatter = REXML::Formatters::Pretty.new
+        formatter.compact=true
+
+        formatter.write(rexmlout, @outf)
+        @outf.close	
+        @theme_successfully_created = true
+        return File.expand_path(@outf.path)
+    end
+
+
+    
+    def make_dict(a_hash)
+      new_dict = REXML::Element.new("dict")
+      a_hash.each do |k,v| 
+        te1 = REXML::Element.new("key")      
+        te1.add_text(k.to_s) 
+        te2 = REXML::Element.new("string")      
+        te2.add_text(v.to_s)
+        new_dict.add_element te1
+        new_dict.add_element te2
+      end
+      return new_dict
+    end 
+    
+    def make_name_scope_settings(ruby_symbol,an_array)
+    fontstyles = ["","bold","italic", "bold italic"]
+      #the array looks like ["name","scope",{}] . the third element in the array is a hash for "settings"
+        new_dict = REXML::Element.new("dict")
+        te1 = REXML::Element.new("key")      
+        te1.add_text("name") 
+        te2 = REXML::Element.new("string")      
+        te2.add_text(an_array[0])
+        te3 = REXML::Element.new("key")      
+        te3.add_text("scope")
+        te4 = REXML::Element.new("string")      
+        te4.add_text(an_array[1])
+        te5 = REXML::Element.new("key")
+        te5.add_text("settings")      
+        new_dict.add_element te1
+        new_dict.add_element te2
+        new_dict.add_element te3
+        new_dict.add_element te4
+        new_dict.add_element te5
+        fontStyle = fontstyles[@textmate_hash[ruby_symbol][:FONT_TYPE].to_i ]
+        di1 = make_dict(:foreground => "#"+@textmate_hash[ruby_symbol][:FOREGROUND].upcase, :fontStyle=>fontStyle) 
+        new_dict.add_element di1
+      return new_dict
+    end
+    
+    def make_name_scope_settings_rand(name, scope, settings)
+    fontstyles = ["","bold","italic", "bold italic"]
+      #the array looks like ["name","scope",{}] . the third element in the array is a hash for "settings"
+        new_dict = REXML::Element.new("dict")
+        te1 = REXML::Element.new("key")      
+        te1.add_text("name") 
+        te2 = REXML::Element.new("string")      
+        te2.add_text(name.to_s)
+        te3 = REXML::Element.new("key")      
+        te3.add_text("scope")
+        te4 = REXML::Element.new("string")      
+        te4.text =scope.to_s
+        te5 = REXML::Element.new("key")
+        te5.add_text("settings")      
+        new_dict.add_element te1
+        new_dict.add_element te2
+        new_dict.add_element te3
+        new_dict.add_element te4
+        new_dict.add_element te5
+          
+#puts "scope= #{scope} , group= #{@scope_2_group[scope]} , newcolor = "+newcolor.to_s          
+        
+        if @new_color_to_group[scope] 
+puts "scope= #{scope} , group= #{@scope_2_group[scope]} , newcolor = "+@new_color_to_group[scope][:foreground]+ " , fonStyle=#{@new_color_to_group[scope][:fontStyle]}"          
+          di1 = make_dict(@new_color_to_group[scope])   
+        else
+          di1 = make_dict(:fontStyle=>'')
+        end 
+      new_dict.add_element di1
+      return new_dict
+    end
+    
+    def gen_uuid
+        nn = sprintf("%032X",rand(340282366920938463463374607431768211456).abs)
+        nn = nn[0,8]+"-"+nn[12,4]+"-4"+nn[17,3]+"-"+["8","9","A","B"].shuffle[0]+nn[21,3]+"-"+nn[24,12]
+    end
+
+  end #class
+
+
+end #module