Changes In Branch v1.63-xor-report Through [6217b90877] Excluding Merge-Ins
This is equivalent to a diff from 3e82d9d73f to 6217b90877
|
2017-01-21
| ||
| 22:57 | Merged in db refresh timestamp gate check-in: f24fe39093 user: matt tags: v1.63 | |
|
2017-01-20
| ||
| 16:02 | wip check-in: 70c6fdb986 user: bjbarcla tags: v.1.63-resurrect-db-refresh-timestamp-gate | |
|
2017-01-17
| ||
| 14:16 | merged with latest 1.63 check-in: acf8e3060c user: srehman tags: v1.63-configdbsync | |
|
2017-01-13
| ||
| 18:08 | Automated merge of v1.63-xor-report/6217b90877/integ into integ-home check-in: c3e1f2c537 user: matt tags: integ-home | |
| 17:53 | wip check-in: f6db288849 user: bjbarcla tags: v1.63-xor-report | |
| 17:50 | Automated merge of v1.63/3e82d9d73f/integ into integ-home check-in: 01a7a8df36 user: matt tags: integ-home | |
| 17:06 | wip check-in: 6217b90877 user: bjbarcla tags: v1.63-xor-report | |
| 17:05 | Create new branch named "v1.63-xor-report" check-in: 9bf046a24b user: bjbarcla tags: v1.63-xor-report | |
| 17:05 | adding script to do check whether on home host check-in: 3e82d9d73f user: bjbarcla tags: v1.63 | |
| 17:03 | merged v1.63-stackdumpfix check-in: cc2e1ee395 user: bjbarcla tags: v1.63 | |
Added diff-report.scm version [0053a9f3a7].
> > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 |
;; #!/bin/bash
;; #;; rmt:get-tests-for-run
;; #;; (let* ((dbstruct (db:get-db
;; #;; (db:get-tests-for-run dbstruct run-id testpatt states statuses offset limit not-in sort-by sort-order qryvals last-update mode)
;; #;; (rmt:get-test-info-by-id run-id test-id)
;; #;; (rmt:get-tests-for-run run-id testpatt states statuses offset limit not-in sort-by sort-order qryvals last-update mode)
;; megatest -repl << EOF
;; TODO:dashboard not on homehost message exit
(define (run-name->run-id runname)
(let* ((qry-res (rmt:get-runs runname 1 0 '())))
(if (eq? 2 (vector-length qry-res))
(vector-ref (car (vector-ref qry-res 1)) 1)
#f)))
(define (run-name->test-ht runname)
(let* ((ht (make-hash-table))
(run-id (run-name->run-id runname))
(testpatt "%/%")
(states '("COMPLETED" "INCOMPLETE"))
(statuses '("PASS" "FAIL" "ABORT" "SKIP"))
(offset #f)
(limit #f)
(not-in #f)
(sort-by #f)
(sort-order #f)
(qryvals "id,testname,item_path,state,status")
(last-update 0)
(mode #f)
)
(print run-id)
(print (rmt:get-tests-for-run run-id
testpatt states statuses
offset limit
not-in sort-by sort-order
qryvals
last-update
mode))
;(print (rmt:get-tests-for-run run-id testpatt states statuses offset limit not-in "%" "%" #f "id,testname,testpath,state,status" 0 'normal))
;(print run-id)
))
(run-name->test-ht "all57")
;;(exit)
;;EOF
|