Les tests automatisés avec dunit

Les tests automatises avec dunit

Les tests automatises avec dunit : Plusieurs milliers de conseils pour vous faciliter la vie.

erreur est humaine - automatique de test de code Delphi avec DUnit. Par Kris Golko



Pour introduire des bogues est humaine, le probleme est generalement pas avec les corriger, mais avec de les trouver avant que vos clients ne. Automatise, outils de tests de venir a la rescousse ici, avec leur capacite a repeter la procedure de test sans relache, afin que les developpeurs peuvent travailler avec beaucoup plus de confiance. Pourquoi choisir DUnit? Parce que c'est sur les tests unitaires (unit dans le sens de la construction d'un bloc de code plutot que d'un Objet Pascal unite). Un autre avantage est que DUnit tests sont des cadres de travail pour executer du code, qui est plus rapide et plus pratique que l'execution d'une application complete. Ce que j'aime le plus dans DUnit, c'est que je peux creer mon cas de test avec mon prefere outil de developpement. DUnit supporte Delphi 4 a 7 ainsi que Kylix.



prise en main

DUnit est distribue sous forme de code source, il comprend un certain nombre de Delphi fichiers source, des exemples et de la documentation. Il peut etre telecharge depuis la page web du projet sur SourceForge sourceforge.net:/projets/dunit. Pour l'installer, il suffit de dezipper le fichier dans un repertoire de votre choix, en preservant les sous-repertoires. Les unites utilisees pour creer et executer des tests sont dans le repertoire 'src' sous-repertoire qui doit etre ajoute a la Bibliotheque de Chemin d'acces dans 'Options de l'Environnement|de la Bibliotheque', ou le Chemin de Recherche de Projet|Options dans votre projet de test.



Comment ecrire des cas de test

C'est facile: tout ce que vous avez a faire est de creer une classe heritee de TTestCase, TTestCase est declaree dans le TestFramework unite. Pour ajouter des tests a une classe de cas de test, il suffit d'ajouter un publie procedure pour chaque test de votre classe derivee. Un test runner objet utilise RTTI pour detecter quels sont les tests disponibles dans une classe de cas de test.



Il y a deux methodes utiles: l'Installation et le Demontage. L'execution de chaque cas de test au sein d'une classe commence avec le programme d'Installation, puis vient le publie procedure qui constitue le test, qui est ensuite suivie par le Demontage. Le programme d'installation peut etre utilise pour instancier des objets necessaires a l'execution de tests et d'initialiser leurs etats, selon le test de fonctionnement. Le programme d'installation devrait egalement contenir des actions devait etre effectuee avant chaque test est execute, comme une connexion a une base de donnees. Le demontage de la methode doit etre utilisee pour nettoyer et eliminer des objets.



publie de la procedure contient generalement plusieurs appels a la methode de controle. La methode de controle est declare comme suit:

procedure de Check(Condition: boolean msg: string = ') virtuel

Le parametre condition est generalement sous la forme d'une expression, qui renvoie une valeur Booleenne. Si l'expression est passee dans la procedure de Verification evalue a false, alors le test est marque comme ayant echoue et l'execution de l'epreuve est annulee.

... Check(Prevu = Reels, 'nombre Reel different de celui attendu') ...

Tests sont organises en faisceaux, appele suites. Des suites de Test peut contenir de multiples tests et d'autres des suites de test, fournissant ainsi un moyen de construire un arbre de tests. Centrale a DUnit des operations est le test de registre, qui garde toutes les suites de l'application de test. Generalement, le test de registre est construit en une application de test de l'initialise. Les unites qui declarent des cas de test par la convention ont une section initialisation ou des cas de test sont crees et ajoutes a la base de registre.



suites de Test peuvent etre crees par l'instanciation de la TTestSuite classe declaree dans le TestFramework. Le plus pratique et souvent utilise de façon a creer une suite de tests est d'utiliser la methode de la Suite de TTestCase classe, ce qui cree un nouveau TTestSuite contenant uniquement les cas de test: notez que c'est une methode de classe.



Le RegisterTest et RegisterTests procedures d'ajouter des tests ou des suites de test pour le test de registre. L'exemple le plus simple est de creer une suite de tests contenant un seul cas de test et puis de l'enregistrer comme suit:

Cadre.RegisterTest(TMyTest.Suite)

Comment executer des tests

DUnit comprend deux test standard coureur classes: TGUITestRunner interactive de l'interface graphique et TTextTestRunner avec mode batch interface de ligne de commande. TGUITestRunner est declaree dans le GUITestRunner d'unite avec la RunRegisteredTests procedure autonome, qui gere le regime enregistre des suites de test a l'aide de TGUITestRunner. La CLX version de TGUITextRunner est declaree dans le QGUITestRunner unite.







TTextTestRunner est declare TextTestRunner unite avec le correspondant RunRegisteredTests procedure autonome. Les appels a RunRegisteredTest sont generalement qualifie avec un nom d'unite, car il y a plusieurs mondial RunRegisteredTests procedures, par exemple:

GUITestRunner.RunRegisteredTest

les utilisateurs Existants de DUnit remarquerez que l'un des plus recents changements apportes a DUnit est l'ajout de RunRegisteredTests les methodes de la classe et de la depreciation de autonome RunRegisteredTests, depuis plusieurs procedures mondiales avec le meme nom inutilement encombrer l'espace de nom. L'appel a RunRegisteredTests est maintenant recommande d'etre qualifie avec le test runner nom de la classe plutot qu'un nom de l'unite:

TGUITestRunner.RunRegisteredTest

Un exemple

nous allons mettre tout cela en pratique. L'exemple d'application recueille des cotes de la maniere que beaucoup de sites web offrent un moyen pour le taux de 'ce site'. Plus particulierement, CodeCentral a un interessant systeme de notation ou vous pouvez definir des choix en fonction de vos preferences personnelles (ma preferee est la Mythologie grecque). La logique de base de notre systeme d'evaluation est definie par la IRateCollector interface.

IRatingCollector = interface & nbsp & nbsp fonction GetPrompt: string & nbsp & nbsp procedure de Taux(de l'Evaluateur: string Choix: integer) & nbsp & nbsp fonction GetChoiceCount: integer & nbsp & nbsp fonction GetChoice(Choix: integer): string & nbsp & nbsp fonction GetChoiceRatings(Choix: integer): integer & nbsp & nbsp fonction GetRatingCount: integer & nbsp & nbsp fonction GetRating(Indice: entier var Evaluateur: string): entier & nbsp & nbsp fonction GetRatersRating(Evaluateur: string): entier fin

Le TRateTests classe nous permet de developper et de tester la logique metier de façon independante a partir de l'elaboration de l'interface utilisateur. C'est en fait avantageux de developper et de tester la logique d'entreprise avant le demarrage de l'interface utilisateur. Les cas de tests sont conçus pour tester la mise en œuvre des IRatingCollector.

TRateTests = classe(TTestCase) private & nbsp & nbsp FRateCollector: IRatingCollector protected & nbsp & nbsp procedure d'Installation de remplacer & nbsp & nbsp procedure de Demontage remplacer publie & nbsp & nbsp // tests ici fin

L'Installation et le Demontage sont les procedures utilisees pour instancier et de disposer d'une mise en œuvre de la IRatingCollector.

const & nbsp & nbsp SAMPLE_RATE_PROMPT = 'Taux DUnit (Mythologie Slave Feminin),' & nbsp & nbsp SAMPLE_RATE_CHOICES: array[0..3] of string = ('Lada', 'Jurata', 'Marzanna', 'Baba Jaga') procedure TRateTests.Le programme d'installation begin & nbsp & nbsp // modifier cette ligne pour tester une autre mise en œuvre de IRatingCollector & nbsp & nbsp FRateCollector := TSimpleRatingCollector.Creer(SAMPLE_RATE_PROMPT, SAMPLE_RATE_CHOICES) fin procedure TRateTests.Demontage begin & nbsp & nbsp FRateCollector := nil fin

Procedures declarees lors de la publication de l'article sont a la base de test des unites de l'ecriture, ce qui exige de l'inventivite et de la creativite. Dans notre exemple, TestChoices verifie si la liste de choix est comme prevu.

procedure TRateTests.TestChoices var & nbsp & nbsp I: integer begin & nbsp & nbsp Verifier(FRatingCollector.GetChoiceCount = Longueur(SAMPLE_RATE_CHOICES), & ! & ! & ! & ! & nbsp Format ('Il doit etre exactement %choix d', & ! & ! & ! & ! & ! & ! & ! & nbsp Longueur(SAMPLE_RATE_CHOICES)])) & nbsp & nbsp for I := 0 to FRatingCollector.GetChoiceCount - 1 do & ! & ! & ! & nbsp Verifier(FRatingCollector.GetChoice(I) = SAMPLE_RATE_CHOICES[I], & ! & ! & ! & ! & ! & ! & ! & ! & ! & nbsp Attend SAMPLE_RATE_CHOICES[I]) fin

Le TestRate procedure verifie si l'execution de la procedure des Taux de resultats en augmentant le nombre de taux pour l'nominale choix:

Procedure TestRate ... & nbsp & nbsp FRatingCollector.Taux(NextRater, 0) & nbsp & nbsp Verifier(FRatingCollector.GetRatingCount = RatingCount 1, & ! & ! & ! & ! & ! & nbsp Attend IntToStr(RatingCount 1)) ... fin

Tests devraient etre aussi complets que possible, mais il est tres difficile de couvrir tous les scenarios possibles. Alors que les bugs sont signales, les essais devraient etre revisees.



Il est tres important que les tests de couverture pour les conditions extremes dans notre exemple, le choix ou l'evaluateur passe a la procedure des Taux peut-etre pas valide. Les tests de verifier si une exception est levee lorsqu'une exception est prevue. Le code suivant verifie si EinvalidRater exception est declenchee lorsqu'un evaluateur tente de taux seconde fois.

ErrorAsExpected := false de l'Evaluateur := NextRater & nbsp & nbsp FRatingCollector.Taux(d'Objectivite, 0) & nbsp & nbsp FRatingCollector.Taux(d'Objectivite, 0) sauf & nbsp & nbsp // exception prevue & nbsp & nbsp E:EInvalidRater ne & ! & ! & ! & nbsp ErrorAsExpected := true fin Check(ErrorAsExpected, 'Exception prevue si un evaluateur a deja classe')

Enfin, l'inscription de l'epreuve dans la section initialisation:

RegisterTest('tests de Base', [TRateTests.Suite])

Le fichier de projet illustre la maniere typique de l'execution des tests en mode graphique.

GUITestRunner.runRegisteredTests

l'utilisation De CLX plutot que de la VCL, remplacer GUITestRunner avec QGUITestRunner dans des appels a runRegisteredTests ainsi que dans la clause uses.



La croix-plate-forme de programmation

Lors du portage de DUnit de Kylix, il y a deux categories de problemes, la difference entre Windows et Linux, les appels systeme et les differences entre la VCL et CLX. Etonnamment, couvrant les OS des differences est plus facile. La premiere etape est de mettre des instructions conditionnelles dans la clause uses, des unites comme les Fenetres ou les Messages ne sont pas disponibles dans Kylix prototypes de systeme de base, les appels peuvent etre trouves dans la libc, l'unite de base et des definitions de type de le type et le standard de Qt unites. Certaines fonctions du systeme ont ete remplaces par des equivalents Linux, d'autres doivent etre mises en œuvre.



Il a pris un certain nombre de tours du port, CLX. CLX et VCL composants visuels ne sont que legerement differentes, mais malgre cela, parfois, le portage peut etre assez difficile.



DUnit pour Delphi et Kylix compile a partir de la meme source, a l'exception de GUITestRunner/QGUITestRunner GUI les coureurs de l'epreuve, il y a cependant beaucoup de conditionnel dans la source pour permettre a cette croix plate-forme de soutien.



C'est juste le debut

une Fois les bases maîtrisees, il y a beaucoup de fonctionnalites supplementaires dans DUnit qui permettent aux plus complexes, des tests a effectuer. Par exemple, il est pret a l'emploi classes qui peuvent etre utilisees a des fins specifiques, telles que les essais pour une fuite de memoire. Le TestExtension unite contient un certain nombre de classes basees sur le modele Decorateur. L'un des plus importants est TRepeatedTest classe, ce qui vous permet d'executer les cas de test d'un nombre donne de fois. Dans cet exemple, TRepeatedTest est utilisee pour appeler le Taux procedure plusieurs fois de suite.

RegisterTest (Repetees des Taux', & nbsp & nbsp TRepeatedTest.Creer(TRateTests.Create('CheckRate'), 5))

La classe TGUITestCase, prend en charge le test de l'interface graphique. TGUITestCase est declaree dans le GUITesting unite. Voir RateGUITests unite pour un exemple d'utilisation pour tester la boîte de dialogue de soumettre la notation.



Comme source Delphi pour DUnit est disponible gratuitement, ainsi une experience developpeur Delphi peut facilement s'etendre DUnit, par exemple par la creation de nouvelles extensions.



Tests comme libere d'art

Test donne de meilleurs resultats si les tests sont bases sur la connaissance de la conception de l'application. Si les diagrammes UML ont ete crees, ils peuvent etre utilises comme une base pour la construction de tests, completant ainsi l'exigence, l'analyse, la mise en œuvre, le cycle d'essai.



Idealement, les tests devraient etre developpes en meme temps que l'elaboration du projet de code. Techniquement, les tests peuvent etre crees pour les applications qui sont deja completes, cependant, ces applications sont souvent pas adapte pour les tests unitaires car ils n'ont pas developpe une structure modulaire. A l'aide de tests automatises avec DUnit favorise une meilleure conception de l'application ainsi que rendre plus facile a refactoriser le code, mais je pense que la plus grande difference qu'il fait est a l'etape de la maintenance de l'application. Les responsables peuvent etre affectes a des unites (dans le sens de modules) plutot que de realiser des projets et ils peuvent correction de bug et des unites de test sans de construire et de tester un ensemble de l'application. Parfois, un probleme peut etre resolu au niveau de l'unite et de l'implication d'un developpeur experimente est necessaire, mais dans le cas d'un grand amorphic application, les developpeurs experimentes interviennent tout le temps.