Megatest

Check-in [578c1ae242]
Login
Overview
Comment:Attempt to fix the 'infinite read-only checking' bug'. Not working fully
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.65
Files: files | file ages | folders
SHA1: 578c1ae2425620886ec2a98b800bdfc5a75fedd6
User & Date: jmoon18 on 2020-01-28 10:54:41
Other Links: branch diff | manifest | tags
Context
2020-01-28
13:57
Taper the sleeps depending on how many times through the send-receive procedure. check-in: 224048bd19 user: mrwellan tags: v1.65
10:54
Attempt to fix the 'infinite read-only checking' bug'. Not working fully check-in: 578c1ae242 user: jmoon18 tags: v1.65
2020-01-02
22:41
merged back changes from v1.70, from ad3f2 and 7cb6cc on 12-11 in run:test check-in: 201844bfaf user: mmgraham tags: v1.65, v1.6539
Changes

Modified rmt.scm from [fff4f6b45b] to [da7473fc64].

78
79
80
81
82
83
84

85
86
87
88
89
90
91
  ;; 2. check the age of the connections. refresh the connection if it is older than timeout-20 seconds.
  ;; 3. do the query, if on homehost use local access
  ;;
  (let* ((start-time    (current-seconds)) ;; snapshot time so all use cases get same value
         (areapath      *toppath*);; TODO - resolve from dbstruct to be compatible with multiple areas
	 (runremote     (or area-dat
			    *runremote*))

	 (readonly-mode (rmtmod:calc-ro-mode runremote *toppath*)))

    ;; DOT INIT_RUNREMOTE; // leaving off - doesn't really add to the clarity
    ;; DOT MUTEXLOCK -> INIT_RUNREMOTE [label="no remote?"];
    ;; DOT INIT_RUNREMOTE -> MUTEXLOCK;
    ;; ensure we have a record for our connection for given area
    (if (not runremote)                   ;; can remove this one. should never get here.         







>







78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
  ;; 2. check the age of the connections. refresh the connection if it is older than timeout-20 seconds.
  ;; 3. do the query, if on homehost use local access
  ;;
  (let* ((start-time    (current-seconds)) ;; snapshot time so all use cases get same value
         (areapath      *toppath*);; TODO - resolve from dbstruct to be compatible with multiple areas
	 (runremote     (or area-dat
			    *runremote*))
         (attemptnum (+ 1 attemptnum))
	 (readonly-mode (rmtmod:calc-ro-mode runremote *toppath*)))

    ;; DOT INIT_RUNREMOTE; // leaving off - doesn't really add to the clarity
    ;; DOT MUTEXLOCK -> INIT_RUNREMOTE [label="no remote?"];
    ;; DOT INIT_RUNREMOTE -> MUTEXLOCK;
    ;; ensure we have a record for our connection for given area
    (if (not runremote)                   ;; can remove this one. should never get here.