Làm cách nào để thử nghiệm các phương thức riêng với DUnit?

Question

Tôi có một lớp mà tôi đang kiểm tra đơn vị với DUnit. Nó có một số phương pháp một số phương pháp công cộng và phương pháp riêng.

type 
    TAuth = class(TDataModule) 
    private 
    procedure PrivateMethod; 
    public 
    procedure PublicMethod; 
    end; 

Để viết bài kiểm tra đơn vị cho lớp học này, tôi phải công khai tất cả các phương pháp.

Có cách nào khác để khai báo các phương pháp riêng tư để tôi vẫn có thể kiểm tra chúng nhưng chúng không công khai?

Answer 1

Bạn không cần đặt chúng ở chế độ công khai. Được bảo vệ sẽ làm. Sau đó, bạn có thể subtype lớp để kiểm tra đơn vị và bề mặt các phương pháp được bảo vệ. Ví dụ:

type 
    TAuth = class(TDataModule) 
    protected 
    procedure MethodIWantToUnitTest; 
    public 
    procedure PublicMethod; 
    end; 

Bây giờ bạn có thể SUBTYPE nó cho thử nghiệm đơn vị của bạn:

interface 

uses 
    TestFramework, Classes, AuthDM; 

type 
    // Test methods for class TAuthDM 
    TestAuthDM = class(TTestCase) 
    // stuff 
    end; 

    TAuthDMTester = class(TAuthDM) 
    public 
    procedure MethodIWantToUnitTestMadePublic; 
    end; 

implementation 

procedure TAuthDMTester.MethodIWantToUnitTestMadePublic; 
begin 
    MethodIWantToUnitTest; 
end; 

Tuy nhiên, nếu những phương pháp bạn muốn kiểm tra đơn vị đang làm việc rất mật thiết với các module dữ liệu mà nó không phải là an toàn để có chúng bất cứ điều gì nhưng riêng tư, sau đó bạn thực sự nên xem xét tái cấu trúc các phương pháp để tách riêng mã cần phải được kiểm tra đơn vị và mã truy cập vào bên trong của mô-đun dữ liệu.

Answer 2

Tôi khuyên bạn nên "XUnit Test Patterns" cuốn sách của Gerard Mészáros:

Test-Specific Subclass

Câu hỏi: Làm thế nào chúng ta có thể làm cho mã thể kiểm chứng khi chúng ta cần phải truy cập vào nhà nước riêng của SUT ?

trả lời: Thêm phương pháp lộ tiểu bang hoặc hành vi cần thiết cho kiểm tra để một lớp con của SUT.

... Nếu hệ thống được kiểm tra (SUT) không thiết kế đặc biệt để có thể kiểm chứng, chúng tôi có thể thấy rằng các thử nghiệm không thể có được quyền truy cập vào trạng thái đó nó phải khởi tạo hoặc xác minh tại một số điểm trong sự kiểm tra.

Bài viết cũng giải thích thời điểm sử dụng và rủi ro mà nó mang.

Answer 3

Đặt mã DUnit trong đơn vị của bạn. Sau đó, bạn có thể truy cập mọi thứ bạn thích.

Answer 4

Nó là một chút hacky, nhưng tôi muốn sử dụng chỉ thị này biên soạn có điều kiện:

{$IfNDef TEST} 
    private 
    {$EndIf} 

dự án thử nghiệm đơn vị của bạn nên xác định thử nghiệm trong project → conditional defines.

Không có thông số kỹ thuật hiển thị, chúng sẽ được xuất bản. Cẩn thận: nếu hiển thị riêng tư không phải là người đầu tiên trong khai báo lớp, nó sẽ nhận định nghĩa trước đó.Một cách an toàn hơn, nhưng tiết hơn và ít rõ ràng, sẽ là:

private 
    {$IfDef TEST} 
    public 
    {$EndIf} 

này có một số ưu điểm so với các subclassing hoặc cách tiếp cận khác:

• Không thêm phức tạp: không có các lớp học thêm trong mã của bạn
• Không ai có thể "nhầm lẫn" phân lớp và ghi đè lên lớp học của bạn: bạn giữ nguyên kiến ​​trúc của mình
• Khi bạn nói một phương pháp được bảo vệ, bạn có thể mong đợi rằng nó sẽ bị ghi đè. Bạn đang nói điều này cho những người đang đọc mã của bạn. Một phương pháp được bảo vệ không nên bị ghi đè sẽ gây nhầm lẫn cho người đọc mã của bạn, phá vỡ nguyên tắc lập trình đầu tiên của tôi: "mã phải được viết để được đọc bởi những người khác."
• DUnit nằm trong đơn vị riêng của chúng, không được bao gồm ở mọi nơi
• Bạn không chạm vào RTTI lộn xộn.

Tôi nghĩ rằng đó là giải pháp rõ ràng hơn và tốt hơn câu trả lời đã chọn.

Khi tôi sử dụng điều này, tôi cũng định cấu hình dự án thử nghiệm để đặt các đối tượng xây dựng vào một thư mục khác của dự án chính. Điều này ngăn không cho các tệp nhị phân có chỉ thị TEST kết hợp với mã khác.

Answer 5

Nói chung, khi tôi gặp phải tình huống này, tôi thường nhận ra rằng tôi đang vi phạm nguyên tắc trách nhiệm duy nhất. Tất nhiên tôi không biết gì về trường hợp cụ thể của bạn, nhưng MAYBE, rằng các phương pháp riêng tư nên ở trong lớp của riêng họ. TAuth sẽ có tham chiếu đến lớp mới này trong phần riêng tư của nó.

Answer 6

Với Mở rộng RTTI (Delphi 2010 và mới hơn), gọi phương thức riêng thông qua RTTI là một tùy chọn khác. Giải pháp này cũng là câu trả lời được đánh giá hàng đầu trong số How do I test a class that has private methods, fields or inner classes?

Answer 7

{$IFNDEF UNITEST} 
private 
{$ENDIF} 

Giải pháp đơn giản, hầu như không phải là hack. Tôi thường xuyên cần phải thử nghiệm phương pháp riêng và kỹ thuật này cho biết thêm ít biến chứng nhất có thể.