Tkabber

Check-in [8c215baf06]
Login

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

Overview
Comment:Fixed interval between reconnections.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 8c215baf06ffa3f217680c0bb69d293cc06f74d5
User & Date: sgolovan 2016-01-06 20:06:25
Context
2016-01-07
17:21
Relaxed the strategy of replay attack prevention: don't add own JID but a recipient's JID, and don't add extra info to the presence updates. Removed the loginconf(sslkeyfile) option, so now if someone wants to use a client sertificate, he'll have to bundle the private key together with the certificate itself. Updated Russian and Ukrainian translations. check-in: 434acd66d1 user: sgolovan tags: trunk
2016-01-06
20:06
Fixed interval between reconnections. check-in: 8c215baf06 user: sgolovan tags: trunk
13:41
Use 'from' attribute when opening XMPP streams. check-in: ed33c3cdb4 user: sgolovan tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to ChangeLog.

1
2
3
4


5
6
7
8
9
10
11
2016-01-06  Sergei Golovan  <sgolovan@nes.ru>

	* login.tcl, tkabber.tcl: Use 'from' attribute when opening XMPP
	  streams.



2016-01-04  Sergei Golovan  <sgolovan@nes.ru>

	* plugins/general/gpgme.tcl: Improved the fetch key information dialog.

	* msgs/ru.msg, msgs/uk.msg: Updated Russain and Ukrainian translations.





>
>







1
2
3
4
5
6
7
8
9
10
11
12
13
2016-01-06  Sergei Golovan  <sgolovan@nes.ru>

	* login.tcl, tkabber.tcl: Use 'from' attribute when opening XMPP
	  streams.

	* login.tcl: Fixed interval between reconnections.

2016-01-04  Sergei Golovan  <sgolovan@nes.ru>

	* plugins/general/gpgme.tcl: Improved the fetch key information dialog.

	* msgs/ru.msg, msgs/uk.msg: Updated Russain and Ukrainian translations.

Changes to login.tcl.

413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
        set login_after_time 7500
    }
    if {$login_after_time == 7500 || \
            $login_after_time < $lc(max_reconnect_interval) * 60 * 1000} {
        # the default sequence goes: 15s, 30s, 1min, 2min, 4min, 8min,
        # 16min, 32min, 32min...
        set login_after_time \
            [expr {min($login_after_time * 2, $lc(max_reconnect_interval))}]
    }
    array set lc $logindata
    set jid $lc(jid)

    debugmsg login "Scheduling connect retry for $jid in ${login_after_time}ms"
    if {[info exists login_after_id($jid)]} {
        after cancel $login_after_id($jid)







|







413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
        set login_after_time 7500
    }
    if {$login_after_time == 7500 || \
            $login_after_time < $lc(max_reconnect_interval) * 60 * 1000} {
        # the default sequence goes: 15s, 30s, 1min, 2min, 4min, 8min,
        # 16min, 32min, 32min...
        set login_after_time \
            [expr {min($login_after_time * 2, $lc(max_reconnect_interval) * 60 * 1000)}]
    }
    array set lc $logindata
    set jid $lc(jid)

    debugmsg login "Scheduling connect retry for $jid in ${login_after_time}ms"
    if {[info exists login_after_id($jid)]} {
        after cancel $login_after_id($jid)