orasaurus 0.0.1

data/notes/main_db.rb

@@ -0,0 +1,130 @@
+#ruby classes
+require "oci8"
+require "erb"
+require "find"
+require "logger"
+  
+#local classes
+require "lib/DB_Table.rb"
+require "lib/PLSQLGen.rb"
+
+my_plsql_gen = PLSQLGen.new()  
+params = my_plsql_gen.load_properties( "conf/PLSQLGen.conf" )
+
+$system_column_names = ["CREATE_DATE", "CREATE_USER", "CREATE_PGM", "UPDATE_DATE", "UPDATE_USER", "UPDATE_PGM"]
+$system_column_defaults = Hash.new
+$system_column_defaults[ "CREATE_DATE" ] = "SYSDATE" 
+$system_column_defaults[ "CREATE_USER" ] = "USER"
+$system_column_defaults[ "CREATE_PGM" ] = "g_pkgName"
+$system_column_defaults[ "UPDATE_DATE" ] = "SYSDATE"
+$system_column_defaults[ "UPDATE_USER" ] = "USER"
+$system_column_defaults[ "UPDATE_PGM" ] = "g_pkgName"
+
+#oracle stuff 
+conn = OCI8.new( params['db_user'], params['db_password'], params['db_name'])
+tableList = Array.new
+params['tables'].split( ',' ).each{ |s| tableList.push( conn.describe_table( s.strip ) ) }
+
+
+pkg_names = Array.new()
+app_abbr = params[ 'app_abbr' ]
+app_name = params[ 'app_name' ]
+
+logger = Logger.new( params[ 'log_path' ] + ".log", 'weekly')
+logger.info('main') { "begin" }
+puts "begin"
+
+tableList.each { |tbl|
+
+    logger.info('main') { "working with " + tbl.obj_name }
+  
+    $table = tbl
+    $updatable_cols = Array.new
+    tbl.columns.each{ |c| $updatable_cols.push( c ) unless $system_column_names.include?( c.name.upcase ) }
+    #collect package name
+    pkg_names.push( "pkg_" + $table.obj_name.downcase + params["pkg_name_suffix"] )
+    #process spec
+    begin
+      my_plsql_gen.erb_to_file( my_plsql_gen.file_to_string( File.open( params[ 'spec_template' ], "r" )) \
+        ,params[ 'destination_path' ] +   pkg_names.last + ".pkg")
+      logger.info('main') { "creating spec " + pkg_names.last+".pkg" }
+      puts "package created " + pkg_names.last+".pkg"
+    rescue
+      logger.error( 'main' ){"error processing spec for " + pkg_names.last }
+      puts "There was a problem processing the spec for " + pkg_names.last
+      puts $!
+    end
+
+=begin    
+    #process body
+    begin
+      my_plsql_gen.erb_to_file(my_plsql_gen.file_to_string(File.open(params['body_template'],"r")) \
+            ,params[ 'destination_path' ] + pkg_names.last+".pkb")
+      logger.info('main') { "creating body " + pkg_names.last+".pkb" }              
+      puts "creating body " + pkg_names.last+".pkb"              
+    rescue
+      logger.error( 'main' ){"error processing body for " + pkg_names.last }
+      puts "There was a problem processing the body for " + pkg_names.last
+      puts $!
+    end      
+    logger.info('main') { "package creation complete" }
+=end  
+}
+
+=begin
+
+#make home page
+if params.has_key?('include_home') \
+and params['include_home'] = 'YES' then
+  #collect package name
+  pkg_name.push("pkg_" + app_abbr.downcase + "_home")
+  
+  #making spec
+  begin
+    my_plsql_gen.erb_to_file( my_plsql_gen.file_to_string( File.open( params[ 'home_spec_template' ], "r" ) ) \
+              , params[ 'destination_path' ] + pkg_name.last+".pks" )
+    logger.info('main') { "creating spec " + pkg_name.last+".pks" }              
+    puts "creating spec " + pkg_name.last+".pks"              
+  rescue
+    logger.error( 'main' ){"error processing body for " + pkg_name.last }
+    puts "There was a problem processing the body for " + pkg_name.last
+    puts $!
+  end   
+  
+  #making body
+  begin
+    my_plsql_gen.erb_to_file( my_plsql_gen.file_to_string( File.open( params[ 'home_body_template' ], "r" ) ) \
+              , params[ 'destination_path' ] + pkg_name.last+".pkb")                  
+    logger.info('main') { "creating body " + pkg_name.last }              
+    puts "creating body " + pkg_name.last
+  rescue
+    logger.error( 'main' ){"error processing body for " + pkg_name.last }
+    puts "There was a problem processing the body for " + pkg_name.last
+    puts $!
+  end   
+    
+end
+logger.info('main') { "home page create" }
+
+#make db script
+if params.has_key?('include_db_script') \
+and params['include_db_script'] = 'YES' then
+  role_name = params['role_name']
+  begin
+    #making grant script
+    my_plsql_gen.erb_to_file( my_plsql_gen.file_to_string( File.open( params[ 'db_script_template' ], "r" ) ) \
+                , params[ 'destination_path' ] + app_abbr.downcase + "_db_script.sql" )
+    logger.info('main') { "db script created" }              
+    puts "db script created "
+  rescue
+    logger.error( 'main' ){"error creating db script" + pkg_name.last }
+    puts "There was a problem processing the db script"
+    puts $!
+  end         
+end
+=end
+logger.info('main') { "end" }
+logger.close
+conn.logoff
+
+puts "finished"  

data/notes/rakefile.rb

@@ -0,0 +1,375 @@
+#this is a build or make file written in ruby 
+  
+require "oci8"
+require "fileutils"
+require "highline/import"
+
+$db_name = ""
+$db_user = ""
+$db_user_password = ""
+
+def print_response
+	if $? == 0 then 
+		puts "completed successfully"
+	else
+		puts( "command failure" )
+	end
+end
+
+def process_db_connect_params
+	
+	if ENV['db_user'].nil? then
+	  $db_user = ask("Database User:  ") { |q| q.echo = true }	  
+	else
+		$db_user = ENV['db_user']
+	end
+	
+	if ENV['db_user_password'].nil? then
+	  $db_user_password = ask("Database User Password:  ") { |q| q.echo = "*" }	  
+	else
+		$db_user_password = ENV['db_user_password']
+	end
+	
+	if ENV['db_name'].nil? then
+		$db_name = ask("Database Instance:  ") { |q| q.echo = true }	  
+	else
+	  $db_name = ENV['db_name']	  
+	end	
+	
+	if not $db_user.nil? and not $db_user_password.nil? and not $db_name.nil? then
+	  return true
+	else
+	  puts "INVALID DATABASE CONNECTION PARAMETERS"
+	end
+	
+end
+
+def sqlplus_connect_string
+	return $db_user + "/" + $db_user_password + "@" + $db_name
+end
+
+desc "Test database connection"
+task :test_connection do
+	if not process_db_connect_params then
+		exit
+		puts "test failed"
+	else
+	  puts "valid parameters"
+	end	
+	puts "Starting database connection test"
+	begin
+		conn = OCI8.new( $db_user, $db_user_password, $db_name )
+		conn.logoff
+		puts "Connection successful"
+	rescue
+		puts $!
+		puts "Connection failed"
+	end
+end
+
+desc "Rebuild all build and teardown scripts"
+task :rebuild_build_scripts do
+	if not process_db_connect_params then
+		exit
+	end
+  
+  s = ScriptBuilder.new( '.' )
+  puts "building simple build scripts"
+  s.build_all_scripts( 'build.sql', 'teardown.sql' )
+
+  puts "re-doing table build scripts for proper order"
+  t = TableScriptBuilder.new( $db_user, $db_user_password, $db_name, './Tables/' )
+  puts 'build_tables has finished'
+  
+  puts 'done' 
+end
+
+=begin
+desc "logs in as system and creates application schema user and issues all necessary grants"
+task :do_grants do
+	#check for args
+	if not process_db_connect_params then
+		exit
+	end
+	
+	# call script
+	sqlplus_cmd = "cd BuildScripts\\ && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @grants.sql"
+	system "cd BuildScripts"
+	system sqlplus_cmd
+	system "cd .."
+	#print response
+	print_response
+	
+end
+=end
+
+desc "runs table build script"
+task :build_tables do
+	puts "building tables"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd tables\\ && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @build.sql"
+	system sqlplus_cmd
+	print_response
+end
+
+desc "runs table teardown script"
+task :teardown_tables do
+	puts "teardown tables"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd tables\\ && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @teardown.sql"
+	system sqlplus_cmd
+	print_response
+end	
+
+desc "runs table teardown, then table build script"
+task :rebuild_tables => [:teardown_tables,:build_tables] do
+	puts "rebuild complete"
+end
+
+desc "runs view build script"
+task :build_views do
+	puts "building views"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd views\\ && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @build.sql"
+	system sqlplus_cmd
+	print_response
+end
+
+desc "runs view teardown script"
+task :teardown_views do
+	puts "teardown views"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd views\\ && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @teardown.sql"
+	system sqlplus_cmd
+	print_response
+end	
+
+desc "runs view teardown, then view build script"
+task :rebuild_views => [:teardown_views,:build_views] do
+	puts "rebuild complete"
+end
+
+desc "runs sequence build script"
+task :build_sequences do
+	puts "building sequences"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd bin\\ && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @rebuild_all_sequences.sql"
+	puts sqlplus_cmd
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "runs sequence teardown script"
+task :teardown_sequences do
+	puts "tearing down sequences"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd sequences\\ && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @teardown.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "runs sequence teardown then sequence build scripts"
+task :rebuild_sequences => [:build_sequences] do
+	puts "rebuild complete"	
+end
+
+desc "runs package model build script"
+task :build_models do
+	puts "building models"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd packages\\models && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @build.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "runs package model teardown script"
+task :teardown_models do
+	puts "tearing down models"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd packages\\models && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @teardown.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "runs package model teardown then build scripts"
+task :rebuild_models => [:teardown_models, :build_models] do
+	puts "rebuild complete"
+end
+
+desc "build controller packages"
+task :build_controllers do
+	puts "building controllers"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd packages\\controllers && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @build.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "teardown controller packages"
+task :teardown_controllers do
+	puts "tearing down controllers"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd packages\\controllers && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @teardown.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "teardown then rebuild all controllers"
+task :rebuild_controllers => [:teardown_controllers, :build_controllers] do
+	puts "rebuild complete"
+end
+
+desc "build helper packages"
+task :build_helpers do
+	puts "building helpers"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd packages\\helpers && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @build.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "teardown helper packages"
+task :teardown_helpers do
+	puts "tearing down helpers"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd packages\\helpers && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @teardown.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "teardown then build helper packages"
+task :rebuild_helpers => [:teardown_helpers, :build_helpers] do
+	puts "rebuild complete"
+end
+
+desc "build view packages"
+task :build_pkg_views do
+	puts "building views"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd packages\\views && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @build.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "teardown view packages"
+task :teardown_pkg_views do
+	puts "tearing down views"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd packages\\views && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @teardown.sql"
+	system sqlplus_cmd
+	print_response	
+end
+
+desc "teardown then build view packages"
+task :rebuild_pkg_views => [:teardown_pkg_views, :build_pkg_views] do
+	puts "rebuild complete"
+end
+
+desc "teardown all packages"
+task :teardown_packages => [:teardown_controllers, :teardown_views, :teardown_helpers, :teardown_models] do
+	puts "teardown complete"
+end
+
+desc "build all packages"
+task :build_packages => [:build_models, :build_helpers, :build_pkg_views, :build_controllers] do
+	puts "package build complete"
+end
+
+desc "teardown and build all packages"
+task :rebuild_packages => [:teardown_packages, :build_packages] do
+	puts "rebuild complete"
+end
+
+desc "teardown the whole app...DANGEROUS!!!! BE CAREFUL RUNNING THIS ONE"
+task :teardown_app => [:teardown_packages, :teardown_views, :teardown_sequences, :teardown_tables] do
+	puts "application teardown complete"
+end
+
+desc "builds the application from the ground up"
+task :build_app => [:build_tables, :build_sequences, :build_views, :build_packages] do
+	puts "application build complete"
+end
+
+desc "teardown the rebuild the appliction from the ground up...DANGEROUS!!! you will lose all data if you run this script"
+task :rebuild_app => [:teardown_app, :build_app] do
+	puts "application rebuild complete"
+	puts Time.now.to_s
+end
+
+desc "teardown the rebuild the appliction from the ground up...DANGEROUS!!! you will lose all data if you run this script"
+task :rebuild_app => [:teardown_app, :build_app] do
+	puts "application rebuild complete"
+	puts Time.now.to_s
+end
+	
+desc "run database migrations"
+task :run_db_migrations do
+  puts "running database migrations"
+  if not process_db_connect_params then
+		exit
+	end
+  mig = DbMigrator.new( "Migrations", $db_name, $db_user, $db_user_password )
+  mig.migrate
+  puts "done runing database migrations"
+end
+
+desc "runs trigger build script"
+task :build_triggers do
+	puts "building triggers"
+	if not process_db_connect_params then
+		exit
+	end	
+	# call script
+	sqlplus_cmd = "cd triggers\\ && sqlplus " + $db_user + "/" + $db_user_password + "@" + $db_name + " @build.sql"
+	system sqlplus_cmd
+	print_response
+end
+
+desc "lines of code"
+task :lines_of_code do
+  puts "Generating lines of code report"
+  system "cd bin && lines_of_code.rb"
+end
+

data/notes/stractor.rb

@@ -0,0 +1,41 @@
+require 'oci8'
+
+class Stractor
+  
+  def initialize( db_user, db_password, db_name )
+    
+    @db_user = db_user
+    @db_password = db_password
+    @db_name = db_name
+    
+  end
+
+  def extract_ddl( object_type, object_name )
+  
+    ddl_sql = %q{
+SELECT dbms_metadata.get_ddl( :object_type, :object_name ) ddl_clob FROM dual
+}
+    
+    db_connection = OCI8.new( @db_user, @db_password, @db_name )
+    
+    ddl = ""
+    
+    db_connection.exec( ddl_sql, object_type, object_name ) do |result|
+      ddl << result[0].read
+    end
+    
+    db_connection.logoff
+    
+    return ddl.delete( 34.chr ).gsub( Regexp.new( @db_user << '\.' ), '' ).strip << ";"
+    
+  end
+  
+  def extract_into_file( object_type, object_name, file_name )
+  
+    ddl = extract_ddl( object_type, object_name )
+    File.open(file_name, 'w') {|f| f.write( ddl )}
+  
+  end
+      
+end
+

data/notes/try_to_compile.rb

@@ -0,0 +1,28 @@
+require 'oci8'
+
+
+f2k = OCI8.new("junk", "password", "xe")
+
+puts "effin' eh"
+
+pkg = File.open( 'pkg_fdr_bridges.pks' )    
+
+#f = f2k.exec( "#{ pkg.read }; " )  
+
+#puts f.to_s
+
+#puts f2k.exec( "SHOW  ERRORS" )
+
+ error_cursor = f2k.exec( "SELECT * FROM USER_ERRORS" ) 
+
+ while r = error_cursor.fetch_hash()
+   puts r.to_s
+ end
+
+# errors = .fetch_hash() 
+
+puts errors.to_s
+
+puts "done"
+
+f2k.logoff

data/orasaurus.gemspec

@@ -0,0 +1,26 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "orasaurus/version"
+
+Gem::Specification.new do |s|
+  s.name        = "orasaurus"
+  s.version     = Orasaurus::VERSION
+  s.authors     = ["Andy Campbell"]
+  s.email       = ["pmacydna@gmail.com"]
+  s.homepage    = ""
+  s.summary     = %q{Tools for building Oracle Applications}
+  s.description = %q{A robust interface for building Oracle Applications, especially pl/sql.}
+
+  s.rubyforge_project = "orasaurus"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.bindir        = 'bin'
+  s.require_paths = ["lib"]
+
+  # specify any dependencies here; for example:
+  s.add_development_dependency "rspec"
+  s.add_runtime_dependency "ruby-oci8"
+  s.add_runtime_dependency "ruby-plsql"
+end

data/spec/orasaurus_spec.rb

@@ -0,0 +1,12 @@
+require 'spec_helper'
+
+describe "Orasaurus" do
+
+  it "should be able to create an Oracle object from a file" do
+    Orasaurus.compile( "franklin" )
+    Orasaurus.compile( "franklin" ).should == "franklin"
+  end
+  
+end
+
+puts "franklin"

data/spec/spec_helper.rb

@@ -0,0 +1,8 @@
+require 'rubygems'
+require 'bundler/setup'
+
+require 'orasaurus'
+
+RSpec.configure do |config|
+  # some (optional) config here
+end

data/test/db/Notes/Packages/build.sql

@@ -0,0 +1,35 @@
+
+SET SERVEROUTPUT ON
+SET DEFINE OFF
+SPOOL build.log
+
+PROMPT
+PROMPT *****************************GETTING STARTED************************
+PROMPT
+/
+BEGIN DBMS_OUTPUT.PUT_LINE( 'BEGIN TIME: '||TO_CHAR( SYSDATE, 'MM/DD/YYYY HH:MI:SS' ) ); END;
+/
+
+PROMPT ***** pkg_note_comments.pkg *****
+@pkg_note_comments.pkg;
+SHOW ERRORS
+PROMPT ***** pkg_note_tags.pkg *****
+@pkg_note_tags.pkg;
+SHOW ERRORS
+PROMPT ***** pkg_notebooks.pkg *****
+@pkg_notebooks.pkg;
+SHOW ERRORS
+PROMPT ***** pkg_notes.pkg *****
+@pkg_notes.pkg;
+SHOW ERRORS
+
+BEGIN DBMS_OUTPUT.PUT_LINE( 'END TIME: '||TO_CHAR( SYSDATE, 'MM/DD/YYYY HH:MI:SS' ) ); END;
+/
+PROMPT
+PROMPT *******************************FINISHED*******************************
+PROMPT
+
+
+EXIT
+/
+