Anjing Webshells

Website : rimsha.abasa.com
: / var / canvas / app / models /
Filename : pseudonym.rb
back
# frozen_string_literal: true

#
# Copyright (C) 2011 - present Instructure, Inc.
#
# This file is part of Canvas.
#
# Canvas is free software: you can redistribute it and/or modify it under
# the terms of the GNU Affero General Public License as published by the Free
# Software Foundation, version 3 of the License.
#
# Canvas is distributed in the hope that it will be useful, but WITHOUT ANY
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
# A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
# details.
#
# You should have received a copy of the GNU Affero General Public License along
# with this program. If not, see <http://www.gnu.org/licenses/>.
#
class ImpossibleCredentialsError < ArgumentError; end

class Pseudonym < ActiveRecord::Base
  # this field is used for audit logging.
  # if a request is deleting a pseudonym, it should set this value
  # before persisting the change.
  attr_writer :current_user

  include Workflow
  include SearchTermHelper

  has_many :session_persistence_tokens
  belongs_to :account
  include Canvas::RootAccountCacher
  belongs_to :user
  has_many :communication_channels, -> { ordered }
  has_many :sis_enrollments, class_name: "Enrollment", inverse_of: :sis_pseudonym
  has_many :auditor_authentication_records,
           class_name: "Auditors::ActiveRecord::AuthenticationRecord",
           dependent: :destroy,
           inverse_of: :pseudonym
  has_many :auditor_records,
           class_name: "Auditors::ActiveRecord::PseudonymRecord",
           dependent: :destroy,
           inverse_of: :pseudonym
  belongs_to :communication_channel
  belongs_to :sis_communication_channel, class_name: "CommunicationChannel"
  belongs_to :authentication_provider
  MAX_UNIQUE_ID_LENGTH = 100

  CAS_TICKET_TTL = 1.day

  validates :unique_id, length: { maximum: MAX_UNIQUE_ID_LENGTH }
  validates :sis_user_id, length: { maximum: maximum_string_length, allow_blank: true }
  validates :account_id, presence: true
  validate :must_be_root_account
  # allows us to validate the user and pseudonym together, before saving either
  validates_each :user_id do |record, attr, value|
    record.errors.add(attr, "blank?") unless value || record.user
  end
  before_validation :validate_unique_id
  before_update :audit_log_update
  before_destroy :retire_channels
  validates :declared_user_type,
            allow_nil: true,
            inclusion: { in: %w[administrative observer staff student student_other teacher] }

  before_save :set_password_changed
  before_validation :infer_defaults, :verify_unique_sis_user_id, :verify_unique_integration_id
  after_save :update_account_associations_if_account_changed
  has_a_broadcast_policy

  alias_attribute :root_account_id, :account_id

  alias_method :context, :account

  include StickySisFields
  are_sis_sticky :unique_id, :workflow_state

  validates :unique_id,
            format: { with: /\A[[:print:]]+\z/ },
            length: { within: 1..MAX_UNIQUE_ID_LENGTH },
            uniqueness: {
              case_sensitive: false,
              scope: %i[account_id workflow_state authentication_provider_id login_attribute],
              if: ->(p) { (p.unique_id_changed? || p.workflow_state_changed?) && p.active? }
            }

  validates :password,
            confirmation: true,
            if: :require_password?

  validates_each :password,
                 if: :require_password?,
                 &Canvas::Security::PasswordPolicy.method(:validate)
  validates :password_confirmation,
            presence: true,
            if: :require_password?

  class << self
    # we know these fields, and don't want authlogic to connect to the db at boot
    # to try and infer them
    def db_setup?
      true
    end

    def login_field
      :unique_id
    end

    def crypted_password_field
      :crypted_password
    end
  end

  acts_as_authentic do |config|
    config.perishable_token_valid_for = 30.minutes
    # if changing this to a new provider, add the _new_ provider to the transition
    # list for a full deploy first before moving it to primary, so that
    # a) there won't be any possibility of split brain where old-still-running code
    #   can't understand the new hash in the db from new code, and
    # b) if we have to roll back to old code, users won't be locked out
    config.crypto_provider = ScryptProvider.new("4000$8$1$")
    config.transition_from_crypto_providers = [Authlogic::CryptoProviders::Sha512]
  end

  attr_writer :require_password

  def require_password?
    # Change from auth_logic: don't require a password just because new_record?
    # is true. just check if the pw has changed or crypted_password_field is
    # blank.
    password_changed? || (send(crypted_password_field).blank? && sis_ssha.blank?) || @require_password
  end

  acts_as_list scope: :user

  set_broadcast_policy do |p|
    p.dispatch :confirm_registration
    p.to { communication_channel || user.communication_channel }
    p.whenever { @send_confirmation }

    p.dispatch :pseudonym_registration
    p.to { communication_channel || user.communication_channel }
    p.whenever { @send_registration_notification }

    p.dispatch :pseudonym_registration_done
    p.to { communication_channel || user.communication_channel }
    p.whenever { @send_registration_done_notification }

    p.dispatch :account_verification
    p.to { communication_channel || user.communication_channel }
    p.whenever { saved_change_to_verification_token? }
    p.data { { from_host: HostUrl.context_host(account) } }
  end

  def update_account_associations_if_account_changed
    return unless user && !User.skip_updating_account_associations?

    if id_before_last_save.nil?
      return if %w[creation_pending deleted].include?(user.workflow_state)

      user.update_account_associations(incremental: true, precalculated_associations: { account_id => 0 })
    elsif saved_change_to_account_id?
      user.update_account_associations_later
    end
  end

  def must_be_root_account
    if account_id_changed? && !account.root_account?
      errors.add(:account_id, "must belong to a root_account")
    end
  end

  def send_registration_notification!
    @send_registration_notification = true
    save!
    @send_registration_notification = false
  end

  def send_registration_done_notification!
    @send_registration_done_notification = true
    save!
    @send_registration_done_notification = false
  end

  def send_confirmation!
    @send_confirmation = true
    save!
    @send_confirmation = false
  end

  def begin_login_attribute_migration!(unique_ids)
    self.unique_ids = unique_ids
    if verification_token.present? && updated_at > 5.minutes.ago
      verification_token_will_change! # force email to be resent
    else
      self.verification_token = CanvasSlug.generate(nil, 6)
    end
    save!
  end

  # supply either the verification code emailed to the user
  # or an admin user who has permission to update the pseudonym
  def migrate_login_attribute(code: nil, admin_user: nil)
    return false unless verification_token.present?
    return false unless code == verification_token || grants_right?(admin_user, :update)

    login_attribute = authentication_provider&.login_attribute
    return false unless unique_ids.key?(login_attribute)

    update!(unique_id: unique_ids[login_attribute])
  end

  scope :by_unique_id, ->(unique_id) { where("LOWER(unique_id)=LOWER(?)", unique_id.to_s) }

  def self.custom_find_by_unique_id(unique_id)
    return unless unique_id

    active_only.by_unique_id(unique_id)
               .merge(
                 where(authentication_provider_id: nil)
                   .or(where(AuthenticationProvider
                     .active
                     .where(auth_type: ["canvas", "ldap"])
                     .where("authentication_provider_id=authentication_providers.id")
                     .arel.exists))
               )
               .order("authentication_provider_id NULLS LAST").first
  end

  def self.for_auth_configuration(unique_ids, auth_provider, include_suspended: false)
    scope = include_suspended ? active : active_only
    filter = auth_provider&.auth_provider_filter
    scope = scope.where(authentication_provider_id: filter)
    scope = scope.order("authentication_provider_id NULLS LAST") unless filter == auth_provider

    if unique_ids.is_a?(Hash)
      login_attribute = auth_provider.login_attribute
      unique_id = unique_ids[login_attribute]
      # form this query to allow NULL login_attribute on the pseudonym, if it
      # hasn't been populated yet (i.e. the backfill is not yet complete)
      scope = scope.by_unique_id(unique_id)
                   .where(login_attribute: [login_attribute, nil])
                   .order("login_attribute NULLS LAST")
    else
      scope = scope.by_unique_id(unique_ids)
    end

    result = scope.take
    if result && unique_ids.is_a?(Hash)
      result.login_attribute ||= login_attribute
      result.unique_ids = unique_ids
      begin
        result.save! if result.changed?
      rescue ActiveRecord::RecordNotUnique
        # race condition; the pseudonym for this auth provider with this
        # login attribute was created elsewhere. just fail this
        # request, and have the user try again
        result = nil
      end
    end
    result
  end

  def audit_log_update
    return if Setting.get("pseudonym_auditor_killswitch", "false") == "true"
    return unless workflow_state_changed? && workflow_state == "deleted"

    performing_user = @current_user || Canvas.infer_user
    Auditors::Pseudonym.record(self, performing_user, action: "deleted")
  end

  def set_password_changed
    @password_changed = password && password_confirmation == password
  end

  def password=(new_pass)
    self.password_auto_generated = false
    super
  end

  def communication_channel
    user.communication_channels.by_path(unique_id).first
  end

  def confirmation_code
    (communication_channel || user.communication_channel).confirmation_code
  end

  def infer_defaults
    self.account ||= Account.default
    if (!crypted_password || crypted_password == "") && !@require_password
      generate_temporary_password
    end
    # treat empty or whitespaced strings as nullable
    self.integration_id = nil if integration_id.blank?
    self.sis_user_id = nil if sis_user_id.blank?
  end

  def login_assertions_for_user
    if !persistence_token || persistence_token == ""
      # Some pseudonyms can end up without a persistence token if they were created
      # using the SIS, for example.
      self.persistence_token = CanvasSlug.generate("pseudo", 15)
      save
    end

    user = self.user
    return nil if user.unavailable?

    user.workflow_state = "registered" unless user.registered?

    add_ldap_channel

    # Assert a time zone for the user if none provided
    if user && !user.time_zone
      user.time_zone = self.account.default_time_zone rescue Account.default.default_time_zone
      user.time_zone ||= Time.zone
    end
    user.save if user.workflow_state_changed? || user.time_zone_changed?
    user
  end

  def authentication_type
    :email_login
  end

  def works_for_account?(_account, _allow_implicit = false, ignore_types: [:implicit])
    true
  end

  def <=>(other)
    position <=> other.position
  end

  def retire_channels
    communication_channels.each { |cc| cc.update_attribute(:workflow_state, "retired") }
  end

  def validate_unique_id
    if (!account || account.email_pseudonyms) &&
       !deleted? &&
       (unique_id.blank? ||
       !EmailAddressValidator.valid?(unique_id))
      errors.add(:unique_id, "not_email")
      throw :abort
    end
    self.login_attribute ||= authentication_provider&.login_attribute_for_pseudonyms if new_record?

    unless deleted?
      shard.activate do
        existing_pseudo = Pseudonym.active.by_unique_id(unique_id).where(account_id:,
                                                                         authentication_provider_id:,
                                                                         login_attribute:).where.not(id: self).exists?
        if existing_pseudo
          errors.add(:unique_id,
                     :taken,
                     message: t("ID already in use for this account and authentication provider"))
          throw :abort
        end
      end
    end
    true
  end

  def verify_unique_sis_user_id
    return true unless sis_user_id
    return true unless Pseudonym.where.not(id:).where(account_id:, sis_user_id:).exists?

    errors.add(:sis_user_id,
               :taken,
               message: t("#errors.sis_id_in_use", "SIS ID \"%{sis_id}\" is already in use", sis_id: sis_user_id))
    throw :abort
  end

  def verify_unique_integration_id
    return true unless integration_id
    return true unless Pseudonym.where.not(id:).where(account_id:, integration_id:).exists?

    errors.add(:integration_id,
               :taken,
               message: t("Integration ID \"%{integration_id}\" is already in use", integration_id:))
    throw :abort
  end

  workflow do
    state :active
    state :deleted
    state :suspended

    state :active do
      event :suspend!, transitions_to: :suspended
    end

    state :suspended do
      event :unsuspend!, transitions_to: :active
    end
  end

  set_policy do
    # an admin can only create and update pseudonyms when they have
    # :manage_user_logins permission on the pseudonym's account, :read
    # permission on the pseudonym's owner, and a superset of the pseudonym's
    # owner's rights (if any) on the pseudonym's account. some fields of the
    # pseudonym may require additional conditions to update (see below)
    given do |user|
      self.account.grants_right?(user, :manage_user_logins) &&
        self.user.has_subset_of_account_permissions?(user, self.account) &&
        self.user.grants_right?(user, :read)
    end
    can :create and can :update

    # any user (admin or not) can change their own canvas password. if the
    # pseudonym's account does not allow canvas authentication (i.e. it uses
    # and requires delegated authentication), there is no canvas password to
    # change.
    given do |user|
      user_id == user.try(:id) &&
        passwordable?
    end
    can :change_password

    # an admin can set the initial canvas password (if there is one, see above)
    # on another user's new pseudonym.
    given do |user|
      new_record? &&
        passwordable? &&
        grants_right?(user, :create)
    end
    can :change_password

    # an admin can only change another user's canvas password (if there is one,
    # see above) on an existing pseudonym when :admins_can_change_passwords is
    # enabled.
    given do |user|
      account.settings[:admins_can_change_passwords] &&
        passwordable? &&
        grants_right?(user, :update)
    end
    can :change_password

    # an admin can only update a pseudonym's SIS ID when they have :manage_sis
    # permission on the pseudonym's account
    given do |user|
      self.account.grants_right?(user, :manage_sis) &&
        grants_right?(user, :update)
    end
    can :manage_sis

    # an admin can delete any non-SIS pseudonym that they can update
    given do |user|
      !sis_user_id && grants_right?(user, :update)
    end
    can :delete

    # an admin can only delete an SIS pseudonym if they also can :manage_sis
    given do |user|
      sis_user_id && grants_right?(user, :manage_sis)
    end
    can :delete
  end

  alias_method :destroy_permanently!, :destroy
  def destroy
    self.workflow_state = "deleted"
    self.deleted_at = Time.now.utc
    result = save
    user.try(:update_account_associations) if result
    result
  end

  def never_logged_in?
    !login_count || login_count == 0
  end

  def user_code
    user.uuid rescue nil
  end

  def email
    user&.email
  end

  def email_channel
    communication_channel if communication_channel && communication_channel.path_type == "email"
  end

  def email=(e)
    return unless user

    user.email = (e)
    user.save!
    user.email
  end

  def sms
    user&.sms
  end

  def sms=(s)
    return unless user

    user.sms = (s)
    user.save!
    user.sms
  end

  def infer_auth_provider(ap)
    previously_changed = changed?
    @inferred_auth_provider = true if ap && authentication_provider_id.nil?
    self.authentication_provider ||= ap
    save! if !previously_changed && changed?
  end

  # managed_password? and passwordable? differ in their treatment of pseudonyms
  # not linked to an authentication_provider. They both err towards the
  # "positive" case matching their name. I.e. if you have both Canvas and
  # non-Canvas auth configured, they'll both return true for a pseudonym with an
  # SIS ID not explicitly linked to an authentication provider.
  def managed_password?
    if authentication_provider
      # explicit provider we can be sure if it's managed or not
      !authentication_provider.is_a?(AuthenticationProvider::Canvas)
    else
      # otherwise we have to guess
      !!(sis_user_id && account.non_canvas_auth_configured?)
    end
  end

  def passwordable?
    authentication_provider.is_a?(AuthenticationProvider::Canvas) ||
      (!authentication_provider && account.canvas_authentication?)
  end

  def valid_arbitrary_credentials?(plaintext_password)
    return false unless active?
    return false if plaintext_password.blank?

    require "net/ldap"
    res = false
    res ||= valid_ldap_credentials?(plaintext_password)
    if !res && passwordable?
      # Only check SIS if they haven't changed their password
      res = valid_ssha?(plaintext_password) if password_auto_generated?
      res ||= valid_password?(plaintext_password)
      infer_auth_provider(account.canvas_authentication_provider) if res
    end
    res
  end

  def generate_temporary_password
    reset_password
    self.password_auto_generated = true
    password
  end

  def valid_ssha?(plaintext_password)
    return false if plaintext_password.blank? || sis_ssha.blank?

    decoded = Base64.decode64(sis_ssha.delete_prefix("{SSHA}"))
    digest = decoded[0, 40]
    salt = decoded[40..]
    return false unless digest && salt

    digested_password = Digest::SHA1.digest(plaintext_password + salt).unpack1("H*")
    digest == digested_password
  end

  def ldap_bind_result(password_plaintext)
    aps = case authentication_provider
          when AuthenticationProvider::LDAP
            [authentication_provider]
          when nil
            account.authentication_providers.active.where(auth_type: "ldap")
          # when AuthenticationProvider::Canvas
          else
            []
          end
    aps.each do |config|
      res = config.ldap_bind_result(unique_id, password_plaintext)
      next unless res

      infer_auth_provider(config)
      return res
    end
    nil
  end

  def add_ldap_channel
    return nil unless managed_password?

    res = @ldap_result
    if res && res[:mail] && res[:mail][0]
      email = res[:mail][0]
      cc = user.communication_channels.email.by_path(email).first
      cc ||= user.communication_channels.build(path: email)
      cc.workflow_state = "active"
      cc.user = user
      cc.save if cc.changed?
      self.communication_channel = cc
      save_without_session_maintenance if changed?
    end
  end

  def changed?
    !strip_inferred_authentication_provider(changed_attribute_names_to_save).empty?
  end
  alias_method :has_changes_to_save?, :changed?

  def attribute_names_for_partial_inserts
    strip_inferred_authentication_provider(super)
  end

  def attribute_names_for_partial_updates
    strip_inferred_authentication_provider(super)
  end

  def strip_inferred_authentication_provider(attribute_names)
    if attribute_names.include?("authentication_provider_id") &&
       @inferred_auth_provider &&
       authentication_provider_id &&
       !account.feature_enabled?(:persist_inferred_authentication_providers)
      attribute_names.delete("authentication_provider_id")
    end
    attribute_names
  end

  attr_reader :ldap_result

  def valid_ldap_credentials?(password_plaintext)
    return false if password_plaintext.blank?

    # try to authenticate against the LDAP server
    res = ldap_bind_result(password_plaintext)
    if res
      @ldap_result = res[0]
    end
    !!res
  rescue => e
    Canvas::Errors.capture(e, {
                             type: :ldap,
                             message: "LDAP authentication error",
                             object: inspect.to_s,
                             unique_id:,
                           })
    nil
  end

  scope :active, -> { where.not(workflow_state: "deleted") }
  scope :active_only, -> { where(workflow_state: "active") }
  scope :deleted, -> { where(workflow_state: "deleted") }

  def self.serialization_excludes
    %i[crypted_password password_salt reset_password_token persistence_token single_access_token perishable_token sis_ssha]
  end

  def self.associated_shards(_unique_id_or_sis_user_id)
    [Shard.default]
  end

  def self.find_all_by_arbitrary_credentials(credentials, account_ids)
    return [] if credentials[:unique_id].blank? ||
                 credentials[:password].blank?
    if credentials[:unique_id].length > 255
      # this sometimes happens by mistake, and produces noisy errors.
      # we can handle this error explicitly when it arrives and just return
      # a failed login instead of an error.
      raise ImpossibleCredentialsError, "pseudonym cannot have a unique_id of length #{credentials[:unique_id].length}"
    end

    error = nil
    begin
      associated_shards = associated_shards(credentials[:unique_id])
    rescue => e
      # global lookups is just an optimization anyway; log an error, but continue
      # by searching all accounts the slow way
      Canvas::Errors.capture(e)
    end
    pseudonyms = Shard.partition_by_shard(account_ids) do |shard_account_ids|
      next if GlobalLookups.enabled? && associated_shards && !associated_shards.include?(Shard.current)

      active_only
        .by_unique_id(credentials[:unique_id])
        .where(account_id: shard_account_ids)
        .preload(:user)
        .select do |p|
          valid = p.valid_arbitrary_credentials?(credentials[:password])
          error ||= p.audit_login(valid)
          valid
        end
    end
    return error if error

    pseudonyms
  end

  def self.authenticate(credentials, account_ids)
    pseudonyms = []
    begin
      pseudonyms = find_all_by_arbitrary_credentials(credentials, account_ids)
    rescue ImpossibleCredentialsError
      Rails.logger.info("Impossible pseudonym credentials: #{credentials[:unique_id]}, invalidating session")
      return :impossible_credentials
    end
    return pseudonyms if pseudonyms.is_a?(Symbol)

    site_admin = pseudonyms.find { |p| p.account_id == Account.site_admin.id }
    # only log them in if these credentials match a single user OR if it matched site admin
    if pseudonyms.map(&:user).uniq.length == 1 || site_admin
      # prefer a pseudonym from Site Admin if possible, otherwise just choose one
      site_admin || pseudonyms.first
    end
  end

  def audit_login(valid_password)
    Canvas::Security::LoginRegistry.audit_login(self, valid_password)
  end

  def self.cas_ticket_key(ticket)
    "cas_session_slo:#{ticket}"
  end

  def cas_ticket_expired?(ticket)
    return false unless Canvas.redis_enabled?

    redis_key = Pseudonym.cas_ticket_key(ticket)

    !Canvas.redis.get(redis_key, failsafe: nil).nil?
  end

  def self.expire_cas_ticket(ticket)
    return unless Canvas.redis_enabled?

    redis_key = cas_ticket_key(ticket)

    Canvas.redis.set(redis_key, true, ex: CAS_TICKET_TTL)
  end
end