rsutphin-cf_case_check 0.0.0

data/spec/references/cfmodule_spec.rb

@@ -0,0 +1,139 @@
+require File.expand_path('../spec_helper', File.dirname(__FILE__))
+
+describe CaseCheck::Cfmodule::Name do
+  before(:each) do
+    # cfmodule with the name attribute searches in the custom tag directories
+    CaseCheck::CustomTag.directories = %w(/tmp/cfmod_specs/customtags)
+    CaseCheck::CustomTag.directories.each { |d| FileUtils.mkdir_p d }
+    
+    @source = create_test_source("/tmp/cfmod_specs/theapp/quux.cfm", <<-CFM)
+      <cfsetting showdebugoutput="No" />
+      <cfif StructKeyExists(url,'protocol_id') AND StructKeyExists(url,'affiliate_id')>
+        <cfif session.theSecurityBaseObj.HasRoleAtAffiliate(Role='TeamLeader',AffiliateID=url.affiliate_id)>
+          <cfscript>
+            variables.protocolDao = CreateObject('component', '#application.pathToComponents#ProtocolDAO').init(datasource=application.db,
+                              username=session.netid,
+                                              userIP=cgi.remote_addr);
+
+            variables.protocolDao.updateProtocol(protocolID=url.protocol_id, gcrcNumber=form.value);
+          </cfscript>
+
+          <cfoutput>#form.value#</cfoutput>
+
+          <cfmodule name="notis.ActivityLog" type="UPDATE GCRC" target="#url.protocol_id#">
+        </cfif>
+      </cfif>
+    CFM
+  end
+  
+  after(:each) do
+    FileUtils.rm_r '/tmp/cfmod_specs'
+  end
+  
+  def actual_search
+    CaseCheck::Cfmodule.search(@source)
+  end
+  
+  it "has a human-readable name" do
+    actual_search.first.type_name.should == 'cfmodule with name'
+  end
+  
+  it "converts the dotted name into a slashed path" do
+    actual_search.first.expected_path.should == "notis/ActivityLog.cfm"
+  end
+  
+  it "resolves against the configured custom tag directories" do
+    expected_file = CaseCheck::CustomTag.directories.last + "/notis/ActivityLog.cfm"
+    touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :exact
+  end
+  
+  it "does not resolve against subdirectories of the custom tag directories" do
+    expected_file = CaseCheck::CustomTag.directories.last + "/subdir/notis/ActivityLog.cfm"
+    touch expected_file
+    actual_search.first.resolved_to.should be_nil
+  end
+  
+  it "resolves case-insensitively against the configured custom tag directories" do
+    expected_file = CaseCheck::CustomTag.directories.last + "/notis/ActiviTYLog.cfm"
+    touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :case_insensitive
+  end
+  
+  it "finds multiple cfmodule references" do
+    @source.content = <<-CFM
+      <cfmodule name="etc"/>
+      <cfmodule name="etal">
+    CFM
+    actual_search.should have(2).references
+  end
+  
+  it "finds the cfmodule tag without regard to case" do
+    @source.content = <<-CFM
+      <cfMODule name="whatever">
+    CFM
+    actual_search.should have(1).reference
+  end
+end
+
+describe CaseCheck::Cfmodule::Template do
+  before(:each) do
+    @source = create_test_source("/tmp/cfmod_specs/theapp/quux.cfm", <<-CFM)
+      <CFOUTPUT>
+              <CFIF StoredQueryID GT 0>
+              storedqueryid : #StoredQueryID#
+                      <CFModule Template="GetTheStoredStatement.cfm" datasource="#tablespace#" QueryName="#StoredQueryName#" 
+                              category="#querycategory#"  sq_id=#StoredQueryID#>
+                      <CFSET sqlstatement=TheStoredStatement>
+              </CFIF>
+      </CFOUTPUT>
+    CFM
+  end
+  
+  after(:each) do
+    FileUtils.rm_r '/tmp/cfmod_specs'
+  end
+  
+  def actual_search
+    CaseCheck::Cfmodule.search(@source)
+  end
+  
+  it "has a human-readable name" do
+    actual_search.first.type_name.should == 'cfmodule with template'
+  end
+  
+  it "uses the template path as the path" do
+    actual_search.first.expected_path.should == "GetTheStoredStatement.cfm"
+  end
+  
+  it "resolves against file directory" do
+    expected_file = "/tmp/cfmod_specs/theapp/GetTheStoredStatement.cfm"
+    touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :exact
+  end
+  
+  it "resolves against file directory case-insensitively" do
+    expected_file = "/tmp/cfmod_specs/theapp/GetTheSTOREDStatement.cfm"
+    touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :case_insensitive
+  end
+  
+  it "finds multiple cfmodule references" do
+    @source.content = <<-CFM
+      <cfmodule template="etc"/>
+      <cfmodule template="etal">
+    CFM
+    actual_search.should have(2).references
+  end
+  
+  it "finds the cfmodule tag without regard to case" do
+    @source.content = <<-CFM
+      <cfMODule template="whatever">
+    CFM
+    actual_search.should have(1).reference
+  end
+end

data/spec/references/custom_tag_spec.rb

@@ -0,0 +1,143 @@
+require File.expand_path('../spec_helper', File.dirname(__FILE__))
+
+describe CaseCheck::CustomTag do
+  before(:each) do
+    CaseCheck::CustomTag.directories = %w(/tmp/ctr_specs/customtags)
+    CaseCheck::CustomTag.directories.each { |d| FileUtils.mkdir_p d }
+
+    @source = create_test_source("/tmp/ctr_specs/theapp/quux.cfm", <<-CFM)
+      <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
+      <html>
+      <head>
+      	<title>Delete Risk Factors</title>
+      </head>
+
+      <body>
+      		<CFQUERY NAME="DELETEPD" datasource=#application.db#>
+      		UPDATE T_BRST_CIGALCHL 
+      		SET IS_DELETED = 'Y',
+      		CHANGED_DATE = SYSDATE,
+      		CHANGED_BY = '#session.netid#',
+      		CHANGED_IP= '#cgi.remote_addr#'
+      		WHERE PATIENT_ID = #URL.PATIENT_ID#
+      		</CFQUERY>
+
+      		<CF_ActivityLog activity_type="DELETE T_BRST_CIGALCHL" target="PATIENT_ID = #URL.PATIENT_ID#">
+
+
+      <CFOUTPUT>
+      <CF_DeleteRecordLog 
+      PATIENT_ID=#URL.PATIENT_ID#
+      SSN="#URL.SSN#"
+      LAST_NAME="#URL.LAST_NAME#"
+      FIRST_NAME="#URL.FIRST_NAME#"
+      MIDDLE_NAME="#URL.MI#"
+      DESCRIPTION="Alcohol & Cigarettes"
+      TABLE_NAME="T_BRST_CIGALCHL"
+      REVERSED_CODE="PATIENT_ID = #URL.PATIENT_ID#"
+      >
+      </CFOUTPUT>
+
+      </body>
+      </html>
+
+      <SCRIPT LANGUAGE = "JavaScript1.2">
+       this.window.close();
+      </SCRIPT>
+    CFM
+  end
+  
+  after(:each) do
+    FileUtils.rm_r '/tmp/ctr_specs'
+  end
+  
+  def actual_search
+    CaseCheck::CustomTag.search(@source)
+  end
+  
+  it "has a human-readable name" do
+    actual_search.first.type_name.should == 'custom tag'
+  end
+  
+  it "translates lower case cf_ style" do
+    @source.content = <<-CFM
+      <div align="center"><cf_checkuserpermissions groups="Admin"> 
+      <input type="submit" name="submit" value="Save" >
+      </cf_checkuserpermissions> 
+      </div>
+    CFM
+    
+    actual_search.should have(1).reference
+    actual_search.first.expected_path.should == "checkuserpermissions.cfm"
+  end
+  
+  it "translates upper case CF_ style" do
+    @source.content = %q(<CF_ActivityLog activity_type="INSERT T_BRST_INSURANCE_SELECT" target="INSURANCE_ID=#QID.ID#">)
+    
+    actual_search.should have(1).reference
+    actual_search.first.expected_path.should == "ActivityLog.cfm"
+  end
+  
+  it "terminates correctly for self-closing tags" do
+    @source.content = %q(<cf_abc/>and then some)
+    actual_search.first.text.should == "cf_abc"
+  end
+  
+  it "finds multiple refs in a single body" do
+    actual_search.should have(2).references
+    actual_search.first.expected_path.should == "ActivityLog.cfm"
+    actual_search.last.expected_path.should == "DeleteRecordLog.cfm"
+  end
+  
+  it "records the line number for each match" do
+    actual_search.should have(2).references
+    actual_search.first.line.should == 17
+    actual_search.last.line.should == 21
+  end
+  
+  it "records the text for each match" do
+    actual_search.should have(2).references
+    actual_search.first.text.should == "CF_ActivityLog"
+    actual_search.last.text.should == "CF_DeleteRecordLog"
+  end
+  
+  it "resolves nothing if file not found" do
+    actual_search.first.resolved_to.should be_nil
+    actual_search.first.resolution.should be_nil
+  end
+  
+  it "resolves an exactly matching file in the same directory as the source if it exists" do
+    expected_file = "/tmp/ctr_specs/theapp/ActivityLog.cfm"
+    FileUtils.touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :exact
+  end
+  
+  it "resolves the case-insensitive equivalent in the same directory as the source if it exists" do
+    expected_file = "/tmp/ctr_specs/theapp/ActivityLOG.cfm"
+    FileUtils.touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :case_insensitive
+  end
+  
+  it "resolves the exact file from one of the customtag directories if it exists" do
+    expected_file = CaseCheck::CustomTag.directories.last + "/ActivityLog.cfm"
+    FileUtils.touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :exact
+  end
+  
+  it "resolves the case-insensitive equivalent from one of the customtag directories if it exists" do
+    expected_file = CaseCheck::CustomTag.directories.last + "/activitylog.cFM"
+    FileUtils.touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :case_insensitive
+  end
+
+  it "resolves the file from a subdirectory of one of customtag directories" do
+    expected_file = CaseCheck::CustomTag.directories.last + "/pkg/foo/ActivityLog.cfm"
+    touch expected_file
+    actual_search.first.resolved_to.should == expected_file
+    actual_search.first.resolution.should == :exact
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,37 @@
+require File.expand_path('../lib/case_check', File.dirname(__FILE__))
+require 'fileutils'
+require 'stringio'
+
+Spec::Runner.configure do |config|
+  config.before do
+    CaseCheck.status_stream = StringIO.new
+  end
+  
+  config.after do
+    CaseCheck.status_stream = nil
+  end
+
+  # == Mock Framework
+  #
+  # RSpec uses it's own mocking framework by default. If you prefer to
+  # use mocha, flexmock or RR, uncomment the appropriate line:
+  #
+  # config.mock_with :mocha
+  # config.mock_with :flexmock
+  # config.mock_with :rr
+end
+
+def create_test_source(filename, content)
+  FileUtils.mkdir_p File.dirname(filename)
+  
+  File.open(filename, 'w') do |f|
+    f.write content
+  end
+  
+  CaseCheck::ColdfusionSource.create(filename)
+end
+
+def touch(filename)
+  FileUtils.mkdir_p File.dirname(filename)
+  FileUtils.touch filename
+end

metadata

@@ -0,0 +1,100 @@
+--- !ruby/object:Gem::Specification 
+name: rsutphin-cf_case_check
+version: !ruby/object:Gem::Version 
+  version: 0.0.0
+platform: ruby
+authors: 
+- Rhett Sutphin
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-12-14 00:00:00 -08:00
+default_executable: cf_case_check
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: activesupport
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: bones
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.1.0
+    version: 
+description: A utility which walks a ColdFusion application's source and determines which includes, custom tags, etc, will not work with a case-sensitive filesystem
+email: rhett@detailedbalance.net
+executables: 
+- cf_case_check
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- README.txt
+- bin/cf_case_check
+files: 
+- .gitignore
+- History.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- bin/cf_case_check
+- lib/case_check.rb
+- lib/case_check/coldfusion_source.rb
+- lib/case_check/commands.rb
+- lib/case_check/configuration.rb
+- lib/case_check/core-ext.rb
+- lib/case_check/reference.rb
+- lib/case_check/references/cfc.rb
+- lib/case_check/references/cfinclude.rb
+- lib/case_check/references/cfmodule.rb
+- lib/case_check/references/custom_tag.rb
+- spec/coldfusion_source_spec.rb
+- spec/commands_spec.rb
+- spec/configuration_spec.rb
+- spec/core_ext_spec.rb
+- spec/reference_spec.rb
+- spec/references/cfc_spec.rb
+- spec/references/cfinclude_spec.rb
+- spec/references/cfmodule_spec.rb
+- spec/references/custom_tag_spec.rb
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://github.com/rsutphin/cf_case_check
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: !binary |
+  AA==
+
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: A utility which walks a ColdFusion application's source and determines which includes, custom tags, etc, will not work with a case-sensitive filesystem
+test_files: []
+