TestLinkClient 0.0.3 → 0.0.4

data/lib/TestLinkClient.rb

@@ -8,6 +8,7 @@ require 'xmlrpc/client'
 #- 0.01 2008/12/14 �V�K�쐬
 #- 0.02 2008/12/15 �擪�Ƀo�C�i���������Ă����̂ŏC��
 #- 0.03 2008/12/15 �R�����g��lj�
+#- 0.04 2008/12/16 getProjectID,getTestPlanID,getBuildID�ōł��r���hID�̑傫��ID��Ԃ��悤�ύX.getStatusByTCName��lj�
 # 
 
 
@@ -614,12 +615,12 @@ class TestLinkClient
 #
 #=== �߂�l
 #
-# �ŏ��Ɍ��‚������A�N�e�B�u�ȃe�X�g�v���W�F�N�gID
+# �ł��傫���i�ŐV�́jID�ŃA�N�e�B�u�ȃe�X�g�v���W�F�N�gID
 # �� 3
 #
 #=== �ڍ�
 #
-# �ŏ��Ɍ��‚������A�N�e�B�u�ȃe�X�g�v���W�F�N�gID���Ԃ�܂�
+# �ł��傫���i�ŐV�́jID�ŃA�N�e�B�u�ȃe�X�g�v���W�F�N�gID���Ԃ�܂�
 #
 #=== ��
 # getProjectID #=>3
@@ -627,11 +628,10 @@ class TestLinkClient
   def getProjectID
     args = {"devKey"=>@devKey}
     ret = @server.call("tl.getProjects",args)
-    ret.each{|prj|
-      if prj["active"] == "1" then
-         return prj["id"]
-      end
-    }
+    val = ret.select{|x|x["active"]=="1"}.sort{|a,b|a["id"].to_i<=>b["id"].to_i}
+    if not val.nil? then
+        return val[-1]["id"]
+    end
     raise "ProjectID error"
   end
 
@@ -647,12 +647,12 @@ class TestLinkClient
 #
 #=== �߂�l
 #
-# �ŏ��Ɍ��‚������A�N�e�B�u�ȃe�X�g�v��ID
+# �ł��傫���i�ŐV�́jID�ŃA�N�e�B�u�ȃe�X�g�v��ID
 # �� 3
 #
 #=== �ڍ�
 #
-# �ŏ��Ɍ��‚������A�N�e�B�u�ȃe�X�g�v��ID���Ԃ�܂�
+# �ł��傫���i�ŐV�́jID�ŃA�N�e�B�u�ȃe�X�g�v��ID���Ԃ�܂�
 #
 #=== ��
 # getTestPlanID(3) #=>4
@@ -660,13 +660,17 @@ class TestLinkClient
   def getTestPlanID(pid)
     args = {"devKey"=>@devKey,"testprojectid"=>pid}
     ret = @server.call("tl.getProjectTestPlans",args)
-    ret.each{|tp|
-      tp.each{|id,val|
-        if val["active"] == "1" then
-          return val["id"]
-        end
+    tpid=[]
+    
+    ret.each{|item|
+      item.each{|key,val|
+        tpid << key.to_i
       }
     }
+    tpid.sort
+    if tpid.size != 0 then
+      return tpid[-1]
+    end
     raise "TestPlanID error"
   end
 
@@ -682,12 +686,12 @@ class TestLinkClient
 #
 #=== �߂�l
 #
-# �ŏ��Ɍ��‚������A�N�e�B�u�ȃr���hID
+# �ł��傫���i�ŐV�́jID�ŃA�N�e�B�u�ŃI�[�v���ȃr���hID
 # �� 3
 #
 #=== �ڍ�
 #
-# �ŏ��Ɍ��‚������A�N�e�B�u�ȃr���hID���Ԃ�܂�
+# �ł��傫���i�ŐV�́jID�ŃA�N�e�B�u�ŃI�[�v���ȃr���hID���Ԃ�܂�
 #
 #=== ��
 # getBuildID(tpid) #=>4
@@ -695,18 +699,17 @@ class TestLinkClient
   def getBuildID(tpid)
     args = {"devKey"=>@devKey,"testplanid"=>tpid}     
     ret = @server.call("tl.getBuildsForTestPlan",args)
-    ret.each{|val|
-      if val["active"] == "1" then
-        return val["id"]
-      end
-    }
+    val = ret.select{|x|x["active"]=="1" and x["is_open"]=="1" }.sort{|a,b|a["id"].to_i<=>b["id"].to_i}
+    if not val.nil? then
+        return val[-1]["id"]
+    end
     raise "BuildID error"
   end  
 
 #
 #=== �T�v
 #
-# reportTCResultByTCName(testcasename,testsuitename,status)
+# reportTCResultByTCName(testcasename,testsuitename,status,notes)
 #
 #=== ����
 #
@@ -716,6 +719,8 @@ class TestLinkClient
 # �e�X�g�X�C�[�g��
 #+status+::
 #  �e�X�g���� p:���� f:���s b:�u���b�N
+#+notes+::
+#  �m�[�g�i�I�v�V�����j
 #
 #=== �߂�l
 #
@@ -729,14 +734,51 @@ class TestLinkClient
 #=== ��
 # reportTCResultByTCName(testcasename,testsuitename,"p") #=>[{"message"=>"Success!", "status"=>true, "id"=>"1638"}]
 #
-  def reportTCResultByTCName(testcasename,testsuitename,status)
+  def reportTCResultByTCName(testcasename,testsuitename,status,notes=nil)
     pid = getProjectID
     tpid = getTestPlanID(pid)
     bid = getBuildID(tpid)
     ret = getTestCaseIDByName(testcasename,testsuitename)
     tcInfo = ret[0]
     tcid = tcInfo["id"]
-    ret = reportTCResult(tpid,tcid,status,bid)
+    ret = reportTCResult(tpid,tcid,status,bid,notes)
+  end
+
+
+#
+#=== �T�v
+#
+# getStatusByTCName(testcasename,testsuitename)
+#
+#=== ����
+#
+#+testcasename+::
+# �e�X�g�P�[�X��
+#+testsuitename+::
+# �e�X�g�X�C�[�g��
+#
+#=== �߂�l
+#
+#  �e�X�g���� p:���� f:���s b:�u���b�N ��Ԃ�
+#
+#=== �ڍ�
+#
+# �e�X�g�P�[�X���y�уe�X�g�X�C�[�g���Ńe�X�g�P�[�X�̎������ʂ𓾂�
+#
+#=== ��
+# getStatusByTCName(testcasename,testsuitename,status) #=>"p"
+#
+  def getStatusByTCName(testcasename,testsuitename)
+    pid = getProjectID
+    tpid = getTestPlanID(pid)
+    bid = getBuildID(tpid)
+    ret = getTestCaseIDByName(testcasename,testsuitename)
+    tcInfo = ret[0]
+    tcid = tcInfo["id"]
+    ret = getTestCasesForTestPlan(tpid,tcid)
+    ret.each{|key,val|
+      return val["exec_status"]
+    }
   end
 end
  

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: TestLinkClient
 version: !ruby/object:Gem::Version 
-  version: 0.0.3
+  version: 0.0.4
 platform: ruby
 authors: 
 - SADAHIKO Hantani
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2008-12-15 00:00:00 +09:00
+date: 2008-12-17 00:00:00 +09:00
 default_executable: 
 dependencies: []