Documentation Source Text

Check-in [ea86d36c1c]
Login

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

Overview
Comment:Use javascript to delay setting href on anchors for deliverables on the download page. This is designed to prevent robots from downloading the deliverables.
Timelines: family | ancestors | descendants | both | 3.7.17
Files: files | file ages | folders
SHA1:ea86d36c1cccbced7d5f6e014f6f8808bc63de25
User & Date: drh 2013-08-07 15:02:10
Context
2013-08-22
20:28
Clearly label the source code snapshots on the download page as source code. Leaf check-in: 0e1cfbafc8 user: drh tags: 3.7.17
2013-08-07
15:39
Merge the changes from the 3.7.17 branch into trunk. check-in: 69c4153640 user: drh tags: trunk
15:02
Use javascript to delay setting href on anchors for deliverables on the download page. This is designed to prevent robots from downloading the deliverables. check-in: ea86d36c1c user: drh tags: 3.7.17
2013-08-03
18:42
Change pre-release snapshot descriptions to include links to change logs. check-in: e847b39547 user: drh tags: 3.7.17
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to pages/download.in.

3
4
5
6
7
8
9



10
11
12
13
14
15
16
..
59
60
61
62
63
64
65



66
67
68
69
70
71
72
73
...
359
360
361
362
363
364
365
















<h2>SQLite Download Page</h2>
<table width="100%" cellpadding="5" cellspacing="0">

<tcl>
hd_keywords {download page}
set nDownload 0
set BG {}



proc Product {pattern desc {frag {}}} {
  regsub VVV $pattern {*} p3
  regsub DATE $p3 {20*} p3
  regsub YEAR $p3 {20[134][0-9]} p3
  regsub VVV $pattern {(30\d{5})} pattern
  regsub DATE $pattern {(\d{12})} pattern
  regsub YEAR $pattern {\d{4}} pattern
................................................................................
    }
    hd_puts "$tr<td width=\"10\"></td>"
    hd_puts "<td valign=\"top\" align=\"right\">"
    if {$frag!=""} {
      eval hd_fragment $frag
      set frag {}
    }



    hd_puts "<a href=\"$file\">[file tail $file]</a><br>($size $units)</td>\n"
    hd_puts "<td width=\"5\"></td>"
    regsub -all VERSION $desc $version d2
    hd_puts "\n<td valign=\"top\">"
    hd_resolve [string trim $d2]
    hd_puts "<br>(sha1: $sha1sum)</td></tr>\n"
    incr ::nDownload
  }
................................................................................
at:</p>

<blockquote>
<a href="http://www.sqlite.org/cgi/docsrc">http://www.sqlite.org/cgi/docsrc</a> (Dallas)<br>
<a href="http://www2.sqlite.org/cgi/docsrc">http://www2.sqlite.org/cgi/docsrc</a> (Newark)<br>
<a href="http://www3.sqlite.org/cgi/docsrc">http://www3.sqlite.org/cgi/docsrc</a> (Fremont)<br>
</blockquote>























>
>
>







 







>
>
>
|







 







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
..
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
...
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
<h2>SQLite Download Page</h2>
<table width="100%" cellpadding="5" cellspacing="0">

<tcl>
hd_keywords {download page}
set nDownload 0
set BG {}
unset -nocomplain href
unset -nocomplain href_cnt
set href_cnt 0
proc Product {pattern desc {frag {}}} {
  regsub VVV $pattern {*} p3
  regsub DATE $p3 {20*} p3
  regsub YEAR $p3 {20[134][0-9]} p3
  regsub VVV $pattern {(30\d{5})} pattern
  regsub DATE $pattern {(\d{12})} pattern
  regsub YEAR $pattern {\d{4}} pattern
................................................................................
    }
    hd_puts "$tr<td width=\"10\"></td>"
    hd_puts "<td valign=\"top\" align=\"right\">"
    if {$frag!=""} {
      eval hd_fragment $frag
      set frag {}
    }
    global href href_cnt
    incr href_cnt
    set href(a$href_cnt) $file
    hd_puts "<a id='a$href_cnt'>[file tail $file]</a><br>($size $units)</td>\n"
    hd_puts "<td width=\"5\"></td>"
    regsub -all VERSION $desc $version d2
    hd_puts "\n<td valign=\"top\">"
    hd_resolve [string trim $d2]
    hd_puts "<br>(sha1: $sha1sum)</td></tr>\n"
    incr ::nDownload
  }
................................................................................
at:</p>

<blockquote>
<a href="http://www.sqlite.org/cgi/docsrc">http://www.sqlite.org/cgi/docsrc</a> (Dallas)<br>
<a href="http://www2.sqlite.org/cgi/docsrc">http://www2.sqlite.org/cgi/docsrc</a> (Newark)<br>
<a href="http://www3.sqlite.org/cgi/docsrc">http://www3.sqlite.org/cgi/docsrc</a> (Fremont)<br>
</blockquote>
<tcl>
proc set_download_hyperlinks {} {
  set script "<script type='text/JavaScript'>\n"
  append script "/* <!\[CDATA\[ */\n"
  append script "function adce4d016d6cd()\173\n"
  append script "function d391(a,b){document.getElementById(a).href=b;}\n"
  global href
  foreach {i h} [array get href] {append script "d391('$i','$h');\n"}
  append script "\175\n"
  append script "setTimeout('adce4d016d6cd();',10);\n"
  append script "/* \]\]> */\n"
  append script "</script>\n"
  hd_puts $script
}
set_download_hyperlinks
</tcl>