society 1.1.1 → 1.2.0

data/lib/society/formatter/graph/json.rb

@@ -1,54 +0,0 @@
-require 'json'
-
-module Society
-  module Formatter
-    module Graph
-      class JSON
-
-        def initialize(graph)
-          @graph = graph
-        end
-
-        def to_json
-          to_hash.to_json
-        end
-
-        def to_hash
-          {
-            nodes: node_names.map { |name| { name: name } },
-            edges: named_edges.map do |edge|
-              {
-                from: node_names.index(edge.from),
-                to: node_names.index(edge.to)
-              }
-            end,
-            clusters: clusters_of_indices
-          }
-        end
-
-        private
-
-        attr_reader :graph
-
-        def node_names
-          @node_names ||= graph.nodes.map(&:full_name).uniq
-        end
-
-        def named_edges
-          @named_edges ||= graph.edges.map { |edge| Edge.new(from: edge.from.full_name, to: edge.to.full_name) }
-        end
-
-        def clusters_of_indices
-          Society::Clusterer.new.cluster(graph_of_names).map do |cluster|
-            cluster.map { |name| node_names.index(name) }
-          end
-        end
-
-        def graph_of_names
-          ObjectGraph.new(nodes: node_names, edges: named_edges)
-        end
-
-      end
-    end
-  end
-end

data/lib/society/reference_processor.rb

@@ -1,60 +0,0 @@
-module Society
-
-  class ReferenceProcessor
-
-    attr_reader :classes, :references, :unresolved_references
-
-    def initialize(classes)
-      @classes = classes
-      @references = []
-      @unresolved_references = []
-      process
-    end
-
-    private
-
-    def process
-      classes.each do |klass|
-        klass.constants.each do |const|
-          if assigned_constant(const, klass)
-            next
-          elsif target = perfect_match_for(const)
-            @references << Edge.new(from: klass,
-                                    to: target,
-                                    meta: {
-                                      type: :perfect,
-                                      entity: const})
-          elsif target = partial_match_for(const)
-            @references << Edge.new(from: klass,
-                                    to: target,
-                                    meta: {
-                                      type: :partial,
-                                      entity: const})
-          else
-            @unresolved_references << { class: klass,
-                                        target_name: const.full_name,
-                                        constant: const }
-          end
-        end
-      end
-    end
-
-    def perfect_match_for(const)
-      classes.detect { |klass| klass.full_name == const.name }
-    end
-
-    def partial_match_for(const)
-      partial_matches = classes.select do |klass|
-        klass.full_name.include? const.full_name
-      end
-      partial_matches.first if partial_matches.size == 1
-    end
-
-    def assigned_constant(const, klass)
-      klass.constant_assignments.map(&:name).include? const.name
-    end
-
-  end
-
-end
-

data/society_graph.json

@@ -1 +0,0 @@
-{"nodes":[{"name":"Account"},{"name":"Attachment"},{"name":"Attempt"},{"name":"Auth"},{"name":"Certificate"},{"name":"Collection"},{"name":"CollectionEnrollment"},{"name":"CollectionGroupEnrollment"},{"name":"CollectionItem"},{"name":"ConcreteConfig"},{"name":"CourseTemplate"},{"name":"CustomField"},{"name":"EnrollingMembership"},{"name":"Enrollment"},{"name":"Group"},{"name":"GroupEnrollment"},{"name":"ImportObject"},{"name":"LearnerCourse"},{"name":"LearnerCustomFieldValue"},{"name":"LearnerFile"},{"name":"LearnerLibraryCourse"},{"name":"LearnerLiveCourse"},{"name":"LearnerSlide"},{"name":"LiveCourse"},{"name":"LiveCourseEnrollment"},{"name":"LiveCourseEnrollmentSource"},{"name":"LiveCourseGroupEnrollment"},{"name":"LiveCourseSession"},{"name":"LiveCourseSessionRegistration"},{"name":"Manager"},{"name":"Membership"},{"name":"MembershipBuilder"},{"name":"NotifiableEnrollment"},{"name":"NotifiableLiveCourseEnrollment"},{"name":"NotifiableLiveCourseSessionRegistration"},{"name":"Notification"},{"name":"NotificationProfile"},{"name":"PasswordToken"},{"name":"Presence"},{"name":"QuestionAnswer"},{"name":"QuestionHash"},{"name":"QuestionResponse"},{"name":"RequestHost"},{"name":"Rule"},{"name":"RulesAttributesNormalizer"},{"name":"SessionToken"},{"name":"Slide"},{"name":"User"},{"name":"Account::Config"},{"name":"Attempt::NullFurthestSlide"},{"name":"Auth::Basic"},{"name":"Auth::CAS"},{"name":"GroupEnrollment::StatisticsCalculator"},{"name":"QuestionHash::Factoid"},{"name":"QuestionHash::Factoid::MultipleChoiceQuestion"},{"name":"QuestionHash::Factoid::Statement"},{"name":"QuestionHash::Factoid::TrueFalseQuestion"},{"name":"QuestionHash::Glossary"},{"name":"QuestionHash::Glossary::MultipleChoiceQuestion"},{"name":"QuestionHash::Glossary::TrueFalseQuestion"},{"name":"QuestionHash::OrderedList"},{"name":"QuestionHash::OrderedList::MultipleChoiceQuestion"},{"name":"QuestionHash::OrderedList::ReorderQuestion"},{"name":"Rule::InvalidPredicate"},{"name":"RulesAttributesNormalizer::FieldRules"},{"name":"Notifications::AuthorCourseDigest"},{"name":"Notifications::CourseAssignedNotificationBuilder"},{"name":"Notifications::CourseDigest"},{"name":"Notifications::LearnerCourseDigest"},{"name":"Notifications::LiveCourseInvitationNotificationBuilder"},{"name":"Notifications::LiveCourseNotificationBuilder"},{"name":"Notifications::LiveCourseRegisteredForSessionNotificationBuilder"},{"name":"Notifications::LiveCourseSessionNotificationBuilder"},{"name":"Notifications::LiveCourseUnregisteredFromCanceledSessionNotificationBuilder"},{"name":"Notifications::LiveCourseUnregisteredFromSessionNotificationBuilder"},{"name":"Notifications::LiveCourseUnregisteredFromUnattendedSessionNotificationBuilder"},{"name":"Notifications::ManagerCourseDigest"},{"name":"Notifications::NotificationBuilder"},{"name":"Notifications::TimeUntilSessionNotificationBuilder"},{"name":"Reports::CourseStatusReport"},{"name":"Reports::PassRateReport"},{"name":"Reports::ScoreDistributionReport"},{"name":"Scorm::Activity"},{"name":"Scorm::Attempt"},{"name":"Scorm::CourseUploadResponse"},{"name":"Scorm::CourseUploadStatusResponse"},{"name":"Scorm::Enrollment"},{"name":"Scorm::RegistrationListResponse"},{"name":"Scorm::RegistrationResponse"},{"name":"Search::CustomFieldValueSearch"},{"name":"Search::EnrollableSearch"}],"edges":[{"from":0,"to":36},{"from":1,"to":46},{"from":2,"to":46},{"from":2,"to":46},{"from":2,"to":13},{"from":2,"to":41},{"from":5,"to":8},{"from":5,"to":6},{"from":5,"to":7},{"from":6,"to":5},{"from":6,"to":47},{"from":7,"to":5},{"from":7,"to":14},{"from":8,"to":5},{"from":8,"to":10},{"from":10,"to":47},{"from":10,"to":8},{"from":10,"to":15},{"from":10,"to":46},{"from":11,"to":18},{"from":11,"to":43},{"from":13,"to":10},{"from":13,"to":47},{"from":13,"to":2},{"from":13,"to":2},{"from":14,"to":30},{"from":14,"to":15},{"from":14,"to":26},{"from":14,"to":43},{"from":14,"to":7},{"from":15,"to":14},{"from":15,"to":10},{"from":16,"to":47},{"from":18,"to":47},{"from":18,"to":11},{"from":23,"to":47},{"from":23,"to":24},{"from":23,"to":27},{"from":23,"to":26},{"from":24,"to":47},{"from":24,"to":23},{"from":24,"to":25},{"from":24,"to":28},{"from":25,"to":24},{"from":26,"to":23},{"from":26,"to":14},{"from":27,"to":23},{"from":27,"to":28},{"from":28,"to":47},{"from":28,"to":27},{"from":28,"to":24},{"from":29,"to":47},{"from":29,"to":47},{"from":30,"to":14},{"from":30,"to":47},{"from":36,"to":0},{"from":41,"to":2},{"from":41,"to":46},{"from":43,"to":14},{"from":43,"to":11},{"from":45,"to":47},{"from":46,"to":10},{"from":46,"to":41},{"from":46,"to":1},{"from":47,"to":13},{"from":47,"to":10},{"from":47,"to":6},{"from":47,"to":24},{"from":47,"to":28},{"from":47,"to":23},{"from":47,"to":45},{"from":47,"to":30},{"from":47,"to":18},{"from":47,"to":29},{"from":47,"to":29},{"from":5,"to":10},{"from":5,"to":47},{"from":5,"to":14},{"from":10,"to":5},{"from":10,"to":14},{"from":11,"to":47},{"from":13,"to":46},{"from":14,"to":10},{"from":14,"to":23},{"from":14,"to":47},{"from":14,"to":5},{"from":23,"to":47},{"from":24,"to":14},{"from":24,"to":27},{"from":27,"to":47},{"from":47,"to":10},{"from":47,"to":23},{"from":47,"to":14},{"from":47,"to":11},{"from":47,"to":47},{"from":47,"to":47},{"from":0,"to":0},{"from":0,"to":3},{"from":0,"to":48},{"from":0,"to":36},{"from":2,"to":49},{"from":2,"to":22},{"from":2,"to":41},{"from":5,"to":13},{"from":5,"to":10},{"from":6,"to":13},{"from":6,"to":2},{"from":10,"to":46},{"from":12,"to":30},{"from":12,"to":30},{"from":13,"to":46},{"from":13,"to":47},{"from":14,"to":10},{"from":14,"to":14},{"from":14,"to":47},{"from":27,"to":78},{"from":27,"to":78},{"from":27,"to":78},{"from":28,"to":78},{"from":31,"to":30},{"from":31,"to":30},{"from":31,"to":30},{"from":32,"to":86},{"from":32,"to":66},{"from":32,"to":66},{"from":33,"to":69},{"from":33,"to":69},{"from":34,"to":71},{"from":34,"to":78},{"from":34,"to":78},{"from":37,"to":78},{"from":37,"to":78},{"from":37,"to":47},{"from":37,"to":37},{"from":40,"to":40},{"from":40,"to":40},{"from":40,"to":55},{"from":40,"to":40},{"from":40,"to":40},{"from":40,"to":40},{"from":40,"to":40},{"from":41,"to":40},{"from":43,"to":63},{"from":45,"to":45},{"from":47,"to":47},{"from":47,"to":47},{"from":47,"to":5},{"from":47,"to":10},{"from":47,"to":14},{"from":47,"to":23},{"from":53,"to":40},{"from":54,"to":40},{"from":53,"to":40},{"from":56,"to":40},{"from":53,"to":55},{"from":57,"to":40},{"from":58,"to":40},{"from":57,"to":40},{"from":59,"to":40},{"from":60,"to":40},{"from":61,"to":40},{"from":60,"to":40},{"from":62,"to":40},{"from":77,"to":35},{"from":82,"to":82},{"from":82,"to":82},{"from":83,"to":83},{"from":83,"to":83},{"from":83,"to":78},{"from":86,"to":83},{"from":86,"to":83},{"from":90,"to":47},{"from":90,"to":14}]}

data/spec/association_processor_spec.rb

@@ -1,174 +0,0 @@
-require 'spec_helper'
-
-describe Society::AssociationProcessor do
-
-  describe "#associations" do
-
-    context "`belongs_to`, `has_many`, and `has_many through:` associations" do
-      let(:code) {
-        <<-CODE
-          class Assembly < ActiveRecord::Base
-            has_many :manifests
-            has_many :parts, through: :manifests
-          end
-
-          class Manifest < ActiveRecord::Base
-            belongs_to :assembly
-            belongs_to :part
-          end
-
-          class Part < ActiveRecord::Base
-            has_many :manifests
-            has_many :assemblies, through: :manifests
-          end
-        CODE
-      }
-
-      let(:parser) { Society::Parser.for_source(code) }
-      let(:processor) { Society::AssociationProcessor.new(parser.analyzer.classes) }
-      let(:assembly) { processor.classes.detect {|c| c.name == "Assembly" } }
-      let(:manifest) { processor.classes.detect {|c| c.name == "Manifest" } }
-      let(:part) { processor.classes.detect {|c| c.name == "Part" } }
-
-      it "records `has_many` and `has_many through:` associations" do
-        assembly_associations = processor.associations.select { |edge| edge.from == assembly }
-        expect(assembly_associations.map(&:to)).to match_array [manifest, part]
-
-        part_associations = processor.associations.select { |edge| edge.from == part }
-        expect(part_associations.map(&:to)).to eq [manifest, assembly]
-      end
-
-      it "records `belongs_to` associations" do
-        manifest_associations = processor.associations.select { |edge| edge.from == manifest }
-        expect(manifest_associations.map(&:to)).to match_array [assembly, part]
-      end
-    end
-
-    context "associations with `class_name` specified" do
-      let(:code) {<<-CODE
-          class Post < ActiveRecord::Base
-            belongs_to :author, :class_name => "User"
-            belongs_to :editor, :class_name => "User"
-          end
-
-          class User < ActiveRecord::Base
-            has_many :authored_posts, :foreign_key => "author_id", :class_name => "Post"
-            has_many :edited_posts, :foreign_key => "editor_id", :class_name => "Post"
-          end
-        CODE
-      }
-      let(:parser) { Society::Parser.for_source(code) }
-      let(:processor) { Society::AssociationProcessor.new(parser.analyzer.classes) }
-      let(:user) { processor.classes.detect {|c| c.name == "User" } }
-      let(:post) { processor.classes.detect {|c| c.name == "Post" } }
-
-      it "records belongs_to's" do
-        post_associations = processor.associations.select { |edge| edge.from == post }
-        expect(post_associations.map(&:to)).to match_array [user, user]
-      end
-
-      it "records has_many's" do
-        user_associations = processor.associations.select { |edge| edge.from == user }
-        expect(user_associations.map(&:to)).to match_array [post, post]
-      end
-    end
-
-    context "associations with `class_name` or `source` specified" do
-      let(:code) { <<-CODE
-        class Post < ActiveRecord::Base
-          has_many :post_authorings, :foreign_key => :authored_post_id
-          has_many :authors, :through => :post_authorings, :source => :post_author
-          belongs_to :editor, :class_name => "User"
-        end
-
-        class User < ActiveRecord::Base
-          has_many :post_authorings, :foreign_key => :post_author_id
-          has_many :authored_posts, :through => :post_authorings
-          has_many :edited_posts, :foreign_key => :editor_id, :class_name => "Post"
-        end
-
-        class PostAuthoring < ActiveRecord::Base
-          belongs_to :post_author, :class_name => "User"
-          belongs_to :authored_post, :class_name => "Post"
-        end
-      CODE
-      }
-      let(:parser) { Society::Parser.for_source(code) }
-      let(:processor) { Society::AssociationProcessor.new(parser.analyzer.classes) }
-      let(:user) { processor.classes.detect {|c| c.name == "User" } }
-      let(:post) { processor.classes.detect {|c| c.name == "Post" } }
-      let(:post_authoring) { processor.classes.detect {|c| c.name == "PostAuthoring" } }
-
-      it "handles `source` and `class_name` correctly" do
-        post_associations = processor.associations.select { |edge| edge.from == post }
-        expect(post_associations.map(&:to)).to match_array [post_authoring, user, user]
-      end
-
-      it "handles `through` and `class_name` correctly" do
-        user_associations = processor.associations.select { |edge| edge.from == user }
-        expect(user_associations.map(&:to)).to match_array [post_authoring, post, post]
-      end
-
-      it "handles `class_name` correctly" do
-        pa_associations = processor.associations.select { |edge| edge.from == post_authoring }
-        expect(pa_associations.map(&:to)).to match_array [user, post]
-      end
-    end
-
-    context "polymorphic associations" do
-      let(:code) { <<-CODE
-        class Picture < ActiveRecord::Base
-          belongs_to :imageable, polymorphic: true
-        end
-
-        class Employee < ActiveRecord::Base
-          has_many :pictures, as: :imageable
-        end
-
-        class Product < ActiveRecord::Base
-          has_many :pictures, as: :imageable
-        end
-      CODE
-      }
-      let(:parser) { Society::Parser.for_source(code) }
-      let(:processor) { Society::AssociationProcessor.new(parser.analyzer.classes) }
-      let(:picture) { processor.classes.detect {|c| c.name == "Picture" } }
-      let(:employee) { processor.classes.detect {|c| c.name == "Employee" } }
-      let(:product) { processor.classes.detect {|c| c.name == "Product" } }
-
-      it "records the `polymorphic: true` side of the association" do
-        picture_associations = processor.associations.select { |edge| edge.from == picture }
-        expect(picture_associations.map(&:to)).to match_array [employee, product]
-      end
-
-      it "records the `as: :something` side of the asociation" do
-        employee_associations = processor.associations.select { |edge| edge.from == employee }
-        expect(employee_associations.map(&:to)).to match_array [picture]
-
-        product_associations = processor.associations.select { |edge| edge.from == product }
-        expect(product_associations .map(&:to)).to match_array [picture]
-      end
-    end
-
-    context "self joins" do
-      let(:code) {<<-CODE
-        class Employee < ActiveRecord::Base
-          has_many :subordinates, class_name: "Employee",
-                                  foreign_key: "manager_id"
-
-          belongs_to :manager, class_name: "Employee"
-        end
-      CODE
-      }
-      let(:parser) { Society::Parser.for_source(code) }
-      let(:processor) { Society::AssociationProcessor.new(parser.analyzer.classes) }
-      let(:employee) { processor.classes.detect {|c| c.name == "Employee" } }
-
-      it "records self joins" do
-        employee_associations = processor.associations.select { |edge| edge.from == employee }
-        expect(employee_associations.map(&:to)).to match_array [employee, employee]
-      end
-    end
-  end
-end
-

data/spec/clusterer_spec.rb

@@ -1,37 +0,0 @@
-require 'spec_helper'
-require_relative 'fixtures/clustering/clusterer_fixtures.rb'
-
-describe Society::Clusterer do
-
-  describe "#cluster" do
-    let(:clusterer) { Society::Clusterer.new }
-
-    it "detects clusters" do
-      clusters = clusterer.cluster(MCL::GRAPH_1).map(&:sort)
-      expected = MCL::CLUSTERS_1.map(&:sort)
-      expect(clusters).to match_array(expected)
-    end
-
-    context "with inflation parameter set to 1.7" do
-      let(:clusterer) { Society::Clusterer.new(inflation: 1.7) }
-
-      it "detects clusters at coarser granularity" do
-        clusters = clusterer.cluster(MCL::GRAPH_1).map(&:sort)
-        expected = MCL::CLUSTERS_1_I17.map(&:sort)
-        expect(clusters).to match_array(expected)
-      end
-    end
-
-    context "with inflation parameter set to 4.0" do
-      let(:clusterer) { Society::Clusterer.new(inflation: 4.0) }
-
-      it "detects clusters at finer granularity" do
-        clusters = clusterer.cluster(MCL::GRAPH_1).map(&:sort)
-        expected = MCL::CLUSTERS_1_I40.map(&:sort)
-        expect(clusters).to match_array(expected)
-      end
-    end
-  end
-
-end
-

data/spec/fixtures/clustering/clusterer_fixtures.rb

@@ -1,144 +0,0 @@
-# Reference results were calculated using the `minimcl` perl script from
-# release 14-137 of the MCL-edge library. http://micans.org/mcl
-
-require 'set'
-
-module MCL
-
-  def self.graph_from_edges(path)
-    full_path = File.join(File.dirname(__FILE__), path)
-    nodes = Set.new
-    edges = []
-    edges_with_weights = /(\S+)\s+(\S+)\s+(\S+)/
-    edges_only = /(\S+)\s+(\S+)/
-    File.readlines(full_path).each do |line|
-      if data = line.match(edges_with_weights)
-        a,b,weight = data[1..-1]
-        # FIXME: disregarding weight for now -- include it once we have
-        #        weights in Edges
-        edges << Society::Edge.new(from: a.to_i, to: b.to_i)
-        nodes << a << b
-      elsif data = line.match(edges_only)
-        a,b = data[1..-1]
-        edges << Society::Edge.new(from: a.to_i, to: b.to_i)
-        nodes << a << b
-      end
-    end
-    Society::ObjectGraph.new(nodes: nodes.to_a, edges: edges)
-  end
-
-  GRAPH_1 = graph_from_edges('edges_1.txt')
-
-  CLUSTERS_1 = [
-    [9, 10, 19, 24, 25, 26, 28, 29, 30, 39, 58, 68, 102, 189, 198, 200],
-    [46, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139],
-    [0, 1, 4, 11, 38, 49, 52, 59, 60, 61, 71, 125],
-    [109, 110, 144, 145, 146, 147, 148, 149],
-    [81, 121, 122, 184, 185, 188],
-    [12, 31, 32, 79, 91, 124],
-    [7, 47, 53, 54, 78, 82],
-    [33, 83, 96, 113, 119],
-    [17, 55, 56, 57, 65],
-    [13, 42, 115, 120],
-    [14, 15, 27, 190],
-    [43, 90, 99, 118],
-    [173, 175, 193],
-    [88, 116, 117],
-    [73, 143, 176],
-    [77, 114, 116],
-    [20, 69, 103],
-    [41, 44, 112],
-    [16, 97, 98],
-    [3, 23, 126],
-    [183, 186],
-    [100, 101],
-    [107, 108],
-    [70, 104],
-    [87, 106],
-    [86, 105],
-    [50, 140],
-    [67, 95],
-    [85, 94],
-    [8, 111],
-    [66, 92],
-    [2, 84],
-    [182],
-    [93]]
-
-  CLUSTERS_1_I17 = [
-    [8, 9, 10, 13, 14, 15, 17, 19, 20, 24, 25, 26, 27, 28, 29, 30, 39, 41, 42, 43, 44, 55, 56, 57, 58, 65, 68, 69, 93, 102, 103, 111, 112, 115, 120, 189, 190, 198, 200],
-    [46, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139],
-    [0, 1, 4, 11, 38, 49, 52, 59, 60, 61, 71, 125],
-    [33, 83, 90, 96, 99, 113, 118, 119],
-    [109, 110, 144, 145, 146, 147, 148, 149],
-    [2, 7, 47, 53, 54, 78, 82, 84],
-    [70, 86, 87, 104, 105, 106],
-    [81, 121, 122, 184, 185, 188],
-    [12, 31, 32, 79, 91, 124],
-    [73, 143, 173, 176],
-    [88, 116, 117],
-    [77, 114, 116],
-    [16, 97, 98],
-    [3, 23, 126],
-    [183, 186],
-    [100, 101],
-    [50, 140],
-    [175, 193],
-    [107, 108],
-    [66, 92],
-    [67, 95],
-    [85, 94],
-    [182]]
-
-  CLUSTERS_1_I40 = [
-    [46, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139],
-    [10, 28, 29, 30, 39, 58, 146, 198, 200],
-    [109, 110, 144, 145, 147, 148, 149],
-    [81, 121, 122, 184, 185, 188],
-    [7, 47, 53, 54, 78, 82],
-    [14, 15, 24, 27, 190],
-    [0, 4, 38, 60, 125],
-    [13, 42, 115, 120],
-    [31, 32, 91, 124],
-    [17, 55, 56, 65],
-    [73, 143, 176],
-    [20, 69, 103],
-    [41, 44, 112],
-    [33, 83, 113],
-    [3, 23, 126],
-    [16, 97, 98],
-    [175, 193],
-    [107, 108],
-    [183, 186],
-    [100, 101],
-    [70, 104],
-    [43, 118],
-    [68, 102],
-    [88, 117],
-    [19, 189],
-    [50, 140],
-    [86, 105],
-    [77, 114],
-    [87, 106],
-    [8, 111],
-    [67, 95],
-    [25, 26],
-    [85, 94],
-    [12, 79],
-    [11, 49],
-    [52, 71],
-    [66, 92],
-    [2, 84],
-    [1, 61],
-    [119],
-    [173],
-    [116],
-    [182],
-    [57],
-    [93],
-    [90],
-    [99],
-    [59],
-    [96],
-    [9]]
-end