Exemple #1
0
        /// <summary>
        /// Tests whether the current user has access to a particular Partner.
        /// </summary>
        /// <remarks>This Method throws an <see cref="ESecurityPartnerAccessDeniedException" />
        /// if access to the Partner is not granted, thereby ensuring that a denied access
        /// doesn't go unnoticed.</remarks>
        /// <param name="APartnerRow">Partner for which access should be checked for.</param>
        /// <param name="AIsFoundation">Set to true if Partner is a Foundation.</param>
        /// <param name="AFoundationRow">Foundation Row needs to be passed in
        /// if Partner is a Foundation.</param>
        /// <returns>void</returns>
        /// <exception cref="ESecurityPartnerAccessDeniedException">Thrown if access is not granted.</exception>
        public static void CanAccessPartnerExc(PPartnerRow APartnerRow, bool AIsFoundation,
                                               PFoundationRow AFoundationRow)
        {
            TPartnerAccessLevelEnum AccessLevel;

            AccessLevel = CanAccessPartner(APartnerRow, AIsFoundation, AFoundationRow);


            AccessLevelExceptionEvaluatorAndThrower(APartnerRow, AccessLevel);
        }
Exemple #2
0
        /// <summary>
        /// Tests whether the current user has access to a particular Partner.
        /// </summary>
        /// <remarks>
        /// <para>Corresponds to Progress 4GL Method 'CanAccessPartner' in
        /// common/sp_partn.p</para>
        /// <para>A server-side implementation of this Method exists that has only the
        /// <paramref name="APartnerRow" />parameter as an Argument. It
        /// looks up the Foundation Row on its own if this is needed.</para>
        /// </remarks>
        /// <param name="APartnerRow">Partner for which access should be checked for.</param>
        /// <param name="AIsFoundation">Set to true if Partner is a Foundation.</param>
        /// <param name="AFoundationRow">Foundation Row needs to be passed in
        /// if Partner is a Foundation.</param>
        /// <returns><see cref="TPartnerAccessLevelEnum.palGranted" /> if access
        /// to the Partner is granted, otherwise a different
        /// <see cref="TPartnerAccessLevelEnum" /> value.</returns>
        public static TPartnerAccessLevelEnum CanAccessPartner(PPartnerRow APartnerRow, bool AIsFoundation,
                                                               PFoundationRow AFoundationRow)
        {
            TPetraPrincipal userinfo = UserInfo.GetUserInfo();

            if ((APartnerRow.Restricted == PARTNER_RESTRICTED_TO_USER) &&
                !((APartnerRow.UserId == userinfo.UserID) || userinfo.IsInModule("SYSMAN")))
            {
                TLogging.LogAtLevel(6,
                                    "CanAccessPartner: Access DENIED - Partner " + APartnerRow.PartnerKey.ToString() + " is restriced to User " +
                                    APartnerRow.UserId + "!");
                return(TPartnerAccessLevelEnum.palRestrictedToUser);
            }
            else if ((APartnerRow.Restricted == PARTNER_RESTRICTED_TO_GROUP) &&
                     !((userinfo.IsInGroup(APartnerRow.GroupId)) || userinfo.IsInModule("SYSMAN")))
            {
                TLogging.LogAtLevel(6,
                                    "CanAccessPartner: Access DENIED - Partner " + APartnerRow.PartnerKey.ToString() + " is restriced to Group " +
                                    APartnerRow.GroupId +
                                    "!");
                return(TPartnerAccessLevelEnum.palRestrictedToGroup);
            }

            if (APartnerRow.PartnerClass == SharedTypes.PartnerClassEnumToString(TPartnerClass.ORGANISATION))
            {
                if (AIsFoundation)
                {
                    if (AFoundationRow != null)
                    {
                        if (!CheckFoundationSecurity(AFoundationRow))
                        {
                            TLogging.LogAtLevel(6,
                                                "CanAccessPartner: Access DENIED - Partner " + APartnerRow.PartnerKey.ToString() +
                                                " is restriced by Foundation Ownership!");
                            return(TPartnerAccessLevelEnum.palRestrictedByFoundationOwnership);
                        }
                    }
                    else
                    {
                        throw new System.ArgumentException("AFoundationRow must not be null if AIsFoundation is true");
                    }
                }
            }

            TLogging.LogAtLevel(6, "CanAccessPartner: Access to Partner " + APartnerRow.PartnerKey.ToString() + " is GRANTED!");
            return(TPartnerAccessLevelEnum.palGranted);
        }
Exemple #3
0
        /// <summary>
        /// Tests whether the current user has access to a particular Partner.
        /// </summary>
        /// <remarks>
        /// <para>Corresponds to Progress 4GL Method 'CanAccessPartner' in
        /// common/sp_partn.p</para>
        /// <para>A server-side implementation of this Method exists that has only the
        /// <paramref name="APartnerRow" />parameter as an Argument. It
        /// looks up the Foundation Row on its own if this is needed.</para>
        /// </remarks>
        /// <param name="APartnerRow">Partner for which access should be checked for.</param>
        /// <param name="AIsFoundation">Set to true if Partner is a Foundation.</param>
        /// <param name="AFoundationRow">Foundation Row needs to be passed in
        /// if Partner is a Foundation.</param>
        /// <returns><see cref="TPartnerAccessLevelEnum.palGranted" /> if access
        /// to the Partner is granted, otherwise a different
        /// <see cref="TPartnerAccessLevelEnum" /> value.</returns>
        public static TPartnerAccessLevelEnum CanAccessPartner(PPartnerRow APartnerRow, bool AIsFoundation,
            PFoundationRow AFoundationRow)
        {
            if ((APartnerRow.Restricted == PARTNER_RESTRICTED_TO_USER)
                && !((APartnerRow.UserId == UserInfo.GUserInfo.UserID) || UserInfo.GUserInfo.IsInModule("SYSMAN")))
            {
                TLogging.LogAtLevel(6,
                    "CanAccessPartner: Access DENIED - Partner " + APartnerRow.PartnerKey.ToString() + " is restriced to User " +
                    APartnerRow.UserId + "!");
                return TPartnerAccessLevelEnum.palRestrictedToUser;
            }
            else if ((APartnerRow.Restricted == PARTNER_RESTRICTED_TO_GROUP)
                     && !((UserInfo.GUserInfo.IsInGroup(APartnerRow.GroupId)) || UserInfo.GUserInfo.IsInModule("SYSMAN")))
            {
                TLogging.LogAtLevel(6,
                    "CanAccessPartner: Access DENIED - Partner " + APartnerRow.PartnerKey.ToString() + " is restriced to Group " +
                    APartnerRow.GroupId +
                    "!");
                return TPartnerAccessLevelEnum.palRestrictedToGroup;
            }

            if (APartnerRow.PartnerClass == SharedTypes.PartnerClassEnumToString(TPartnerClass.ORGANISATION))
            {
                if (AIsFoundation)
                {
                    if (AFoundationRow != null)
                    {
                        if (!CheckFoundationSecurity(AFoundationRow))
                        {
                            TLogging.LogAtLevel(6,
                                "CanAccessPartner: Access DENIED - Partner " + APartnerRow.PartnerKey.ToString() +
                                " is restriced by Foundation Ownership!");
                            return TPartnerAccessLevelEnum.palRestrictedByFoundationOwnership;
                        }
                    }
                    else
                    {
                        throw new System.ArgumentException("AFoundationRow must not be null if AIsFoundation is true");
                    }
                }
            }

            TLogging.LogAtLevel(6, "CanAccessPartner: Access to Partner " + APartnerRow.PartnerKey.ToString() + " is GRANTED!");
            return TPartnerAccessLevelEnum.palGranted;
        }
Exemple #4
0
 /// <summary>
 /// Tests whether the current user has access to a particular Foundation.
 /// </summary>
 /// <remarks>Corresponds to Progress 4GL Method 'CheckFoundationSecurity' in
 /// common/sp_partn.p</remarks>
 /// <param name="AFoundationRow">Foundation row to check for.</param>
 /// <returns>True if the current user has access to the passed in Foundation,
 /// otherwise false.</returns>
 public static bool CheckFoundationSecurity(PFoundationRow AFoundationRow)
 {
     return(CheckFoundationSecurity(AFoundationRow.Owner1Key, AFoundationRow.Owner2Key));
 }
Exemple #5
0
 /// <summary>
 /// Tests whether the current user has access to a particular Foundation.
 /// </summary>
 /// <remarks>Corresponds to Progress 4GL Method 'CheckFoundationSecurity' in
 /// common/sp_partn.p</remarks>
 /// <param name="AFoundationRow">Foundation row to check for.</param>
 /// <returns>True if the current user has access to the passed in Foundation,
 /// otherwise false.</returns>
 public static bool CheckFoundationSecurity(PFoundationRow AFoundationRow)
 {
     return CheckFoundationSecurity(AFoundationRow.Owner1Key, AFoundationRow.Owner2Key);
 }
Exemple #6
0
        /// <summary>
        /// Tests whether the current user has access to a particular Partner.
        /// </summary>
        /// <remarks>This Method throws an <see cref="ESecurityPartnerAccessDeniedException" />
        /// if access to the Partner is not granted, thereby ensuring that a denied access
        /// doesn't go unnoticed.</remarks>
        /// <param name="APartnerRow">Partner for which access should be checked for.</param>
        /// <param name="AIsFoundation">Set to true if Partner is a Foundation.</param>
        /// <param name="AFoundationRow">Foundation Row needs to be passed in
        /// if Partner is a Foundation.</param>
        /// <returns>void</returns>
        /// <exception cref="ESecurityPartnerAccessDeniedException">Thrown if access is not granted.</exception>
        public static void CanAccessPartnerExc(PPartnerRow APartnerRow, bool AIsFoundation,
            PFoundationRow AFoundationRow)
        {
            TPartnerAccessLevelEnum AccessLevel;

            AccessLevel = CanAccessPartner(APartnerRow, AIsFoundation, AFoundationRow);


            AccessLevelExceptionEvaluatorAndThrower(APartnerRow, AccessLevel);
        }