Random Bits of Open Code

Check-in [8808f212d2]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Cleaned up a bit
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:8808f212d2239ecaee39d8d7bd3a7aa94a73f352
User & Date: mrwellan 2018-07-12 20:30:54
Context
2018-07-13
05:18
First pass of multiapp check-in: 3e16b01508 user: matt tags: trunk
2018-07-12
20:30
Cleaned up a bit check-in: 8808f212d2 user: mrwellan tags: trunk
20:06
added limit and offset the qry in get-runs-info check-in: ac0641f1dd user: pjhatwal tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

a3d/testbox/a3d.scm became a symlink.

megatest_cgisetup/cgi-bin/models became a symlink.

megatest_cgisetup/cgi-bin/pages became a symlink.

Changes to mtutils/mtdb/mtdb.scm.

1725
1726
1727
1728
1729
1730
1731











































1732
1733
1734
1735
1736
1737
1738
       id           INTEGER PRIMARY KEY,
       test_id      INTEGER,
       state        TEXT DEFAULT 'new',
       status       TEXT DEFAULT 'n/a',
       archive_type TEXT DEFAULT 'bup',
       du           INTEGER,
       archive_path TEXT);"











































			       ))

;;======================================================================
;; Megatest 1.X db runs table stuff
;;======================================================================

;; look up values in a header/data structure







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>







1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
       id           INTEGER PRIMARY KEY,
       test_id      INTEGER,
       state        TEXT DEFAULT 'new',
       status       TEXT DEFAULT 'n/a',
       archive_type TEXT DEFAULT 'bup',
       du           INTEGER,
       archive_path TEXT);"

      "CREATE TRIGGER update_tests_trigger AFTER UPDATE ON tests
                             FOR EACH ROW
                               BEGIN 
                                 UPDATE tests SET last_update=(strftime('%s','now'))
                                   WHERE id=old.id;
                               END;"

      "CREATE TRIGGER update_runs_trigger AFTER UPDATE ON runs
                             FOR EACH ROW
                               BEGIN 
                                 UPDATE runs SET last_update=(strftime('%s','now'))
                                   WHERE id=old.id;
                               END;"

      "CREATE TRIGGER update_run_stats_trigger AFTER UPDATE ON run_stats
                             FOR EACH ROW
                               BEGIN 
                                 UPDATE run_stats SET last_update=(strftime('%s','now'))
                                   WHERE id=old.id;
                               END;"

      "CREATE TRIGGER update_teststeps_trigger AFTER UPDATE ON test_steps
                             FOR EACH ROW
                               BEGIN 
                                 UPDATE test_steps SET last_update=(strftime('%s','now'))
                                   WHERE id=old.id;
                               END;"
      
      "CREATE TRIGGER update_test_steps_trigger AFTER UPDATE ON test_steps
                             FOR EACH ROW
                               BEGIN 
                                 UPDATE test_steps SET last_update=(strftime('%s','now'))
                                   WHERE id=old.id;
                               END;"

      "CREATE TRIGGER update_test_data_trigger AFTER UPDATE ON test_data
                             FOR EACH ROW
                               BEGIN 
                                 UPDATE test_data SET last_update=(strftime('%s','now'))
                                   WHERE id=old.id;
                               END;"

			       ))

;;======================================================================
;; Megatest 1.X db runs table stuff
;;======================================================================

;; look up values in a header/data structure

Deleted trivial-perl-encryption/test.pl.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#



print "Hello world!";

print "\n\n\n";

foreach $a (1,2,3,4,5,6) {
    # This is a comment line - report my existance back to Matt!
    print "Hello number $a\n";
}

if ($ARGV[0] eq "Fred") {
    print "Oh, hey Fred! Good to see you again.\n";
}

<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<