Security4Delphi Download - Security4Delphi Source Code Download

Security4Delphi

كود مصدر دلفي

1.0.1

تنزيل

الأمن لدلفي

يتكون Security4Delphi من مكتبة تتيح استخدام مفهوم الأمان في تطبيقات Delphi الخاصة بك.

حول المشروع

يعد الأمان مصدر قلق كبير بالنسبة لمعظم التطبيقات وتركيز المناقشات التي لا نهاية لها على فرق التنمية. تم تصميم تنفيذ سياق الأمان بطريقة بسيطة ومرنة ، بغض النظر عن العرض التقديمي أو طبقة التكنولوجيا ، مما يجعلك حرة في تنفيذ حلها الخاص أو استخدام الامتدادات الحالية.

تهدف آلية المصادقة إلى التحقق من هوية المستخدم للنظام.

إن آلية ترخيص IO بالفعل مسؤولة عن ضمان منح المستخدمين المعتمدين فقط الوصول إلى ميزات معينة للنظام. قد يحدث التفويض بطريقتين: وظيفة الإذن وتمكينها حسب الدور.

ميزات التحقق من الصحة الرئيسية

تسجيل الدخول
تسجيل الخروج
Isloggedin
checkloggedin
هاسول
حسنيرول
hasauthority
Hasanyauthority
getauthenticateduser

بنيت مع

طبعة مجتمع Delphi - تستخدم IDE

ابدء

للحصول على نسخة محلية وتشغيل اتبع هذه الخطوات البسيطة.

المتطلبات الأساسية

لاستخدام هذه المكتبة ، يلزم إصدار محدث من Delphi IDE (XE أو أعلى).

تثبيت

استنساخ الريبو

 git clone https://github.com/ezequieljuliano/Security4Delphi.git

أضف "مسار البحث" الخاص بـ IDE أو مشروعك على الدلائل التالية:

 Security4Delphisrc

الاستخدام

لتوفير نموذج سياق الأمان في مشروعك باستخدام Security4Delphi الذي تحتاجه:

إنشاء تنفيذ واجهة iAuthenticator.
إنشاء تنفيذ واجهة iAuthorizer.
سجل تطبيقاتك في السياق.
استخدم السياق والتحقق من صحة المصادقة والترخيص.

عينة

لتوضيح الاستخدام ، دعونا نلقي نظرة على حل لإدارة سجلات التطبيق.

قم بإنشاء تنفيذ واجهة iAuthenticator:

  TAuthenticator = class(TAbstractSecurityProvider, IAuthenticator)
  private
    fAuthenticated: Boolean;
    fAuthenticatedUser: IUser;
  protected
    function GetAuthenticatedUser: IUser;

    procedure Authenticate(user: IUser);
    procedure Unauthenticate;
  public
    procedure AfterConstruction; override;
  end;

قم بإنشاء تنفيذ واجهة iAuthorizer:

  TAuthorizer = class(TAbstractSecurityProvider, IAuthorizer)
  private
    { private declarations }
  protected
    function HasRole(role: string): Boolean;
    function HasAnyRole(roles: array of string): Boolean;

    function HasAuthority(authority: string): Boolean;
    function HasAnyAuthority(authorities: array of string): Boolean;
  public
    { public declarations }
  end;

سجل تطبيقاتك في السياق:

 function SecurityContext: ISecurityContext;
begin
  if (SecurityContextInstance = nil) then
  begin
    SecurityContextInstance := TSecurityContext.Create;
    SecurityContextInstance.RegisterAuthenticator(TAuthenticator.Create(SecurityContextInstance));
    SecurityContextInstance.RegisterAuthorizer(TAuthorizer.Create(SecurityContextInstance));
  end;
  Result := SecurityContextInstance;
end;

استخدم السياق والتحقق من المصادقة والترخيص:

 function TPersonRepository.Delete(personId: Integer): Boolean;
begin
  if not SecurityContext.HasAnyRole(['ROLE_ADMIN', 'ROLE_MANAGER']) then
    raise EAuthorizationException.Create('You do not have role to access this feature.');

  if not SecurityContext.HasAuthority('PERSON_DELETE') then
    raise EAuthorizationException.Create('You do not have permission to access this feature.');

  Result := True;
end;

ميزة اختيارية - الجوانب

حماية النظام باستخدام [مطلوبة] ، [مطلوبانيرول] ، [المطلوبة] الجوانب [المطلوبة] وجوانب [مطلوبة):

من الممكن استخدام Security4Delphi مع Side4Delphi للاستفادة من مفهوم البرمجة الموجهة نحو الجانب (AOP).

  TPersonRepository = class
  private
    { private declarations }
  protected
    { protected declarations }
  public
    constructor Create;
    destructor Destroy; override;

    [RequiredRole('ROLE_ADMIN')]
    [RequiredAuthority('PERSON_INSERT')]
    function Insert(person: TPerson): TPerson; virtual;

    [RequiredAnyRole('ROLE_ADMIN,ROLE_MANAGER')]
    [RequiredAuthority('PERSON_UPDATE')]
    function Update(person: TPerson): TPerson; virtual;

    [RequiredAnyRole('ROLE_ADMIN,ROLE_MANAGER')]
    [RequiredAuthority('PERSON_DELETE')]
    function Delete(personId: Integer): Boolean; virtual;

    [RequiredAnyRole('ROLE_ADMIN,ROLE_MANAGER,ROLE_GUEST')]
    [RequiredAuthority('PERSON_VIEW')]
    function FindById(personId: Integer): TPerson; virtual;
  end;