OpenACS / openacs-4 / packages / xotcl-core

www

Tools

Line History

Line Count Graph
Line Count Graph

Stats

Commits this week: 0
Total Committers: 8
Last Commit: 28 Dec 24
Commits this week: 0
Total Lines of Code (LoC): 2,166
Net change in LoC this week: 0

Commit Activity

Commits By Day In Week
52 week commits volume
Commits By Day In Week
Commits by day
Commits By Day In Week
Commits by hour
Commits By Hour In Day
Commit calendar
 

Most active committers (90 days)

loading
loading
  • last updated 15 mins ago
Constraints
Constraints: committers
 
Constraints: files
Constraints: dates
Friday 27 Dec 2024
7:56 pm

gustafn

fixed page contract for cache viewer

Options
    • -1
    • +1
    ./cache.tcl
  2. … 1 more file in changeset.
Tuesday 29 Oct 2024
5:37 pm

gustafn

moved xo::getObjectProperty to ::apidoc::get_object_property

Options
    • -3
    • +3
    ./index.tcl
    • -23
    • +23
    ./show-object.tcl
  3. … 8 more files in changeset.
Tuesday 22 Oct 2024
10:48 am

gustafn

improved source code documentation

Options
    • -1
    • +4
    ./show-object.tcl
Thursday 17 Oct 2024
3:01 pm

antoniop

Fix typo

Options
    • -2
    • +1
    ./show-object.tcl
Wednesday 16 Oct 2024
11:21 am

gustafn

Added code to skip suspicious looking query variables

On openacs.org, we are experiencing numerous requests with

multiply very long and strange query variables like in the example

below. So far, it is not clear, whether these requests are the

consequence of a double encoding or a deliberate attack. Many (most)

of the requests contain the query variable names containing the

(decoded) pattern "*amp;*".

This is a relatively new phenomenon. I cannot exclude that this is a

bug introduced lately in OpenACS, or a bug in an external bot, or

whatever. The problem with these query variables is that OpenACS

propagates these further, e.g., when updating query variables in

ad_dimensional, via export_vars, or return_urls.

Since OpenACS never uses these query-variables, these can be safely

skipped, without loosing functionality in OpenACS. It is possible to

construct examples, where skipping such variables can change the

semantics. Therefore, the change introduces a single function

util::suspicious_query_variable where in case of problems, the

skipping feature can be deactivated.

GET /api-doc/proc-browse?amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3borderby=name&type=All&amp%3btype=All&amp%3bamp%3btype=All&amp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3borderby=name&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=Private&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=All&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3borderby=name&amp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3bamp%3btype=All HTTP/1.1" 200 62378 "" "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/605.1.15 (KHTML, like Gecko; compatible; FriendlyCrawler/1.0) Chrome/120.0.6099.216 Safari/605.1.15" "1729029614.331581 0.109805 0.000434 0.004026 0.215927

Options
    • -1
    • +11
    ./show-object.tcl
  2. … 6 more files in changeset.
Tuesday 08 Oct 2024
5:04 pm

antoniop

Prefer unset to array unset when the whole array should be deleted

See https://wiki.tcl-lang.org/page/Dict+VS+Array+Speed

Options
    • -2
    • +2
    ./show-object.tcl
  2. … 7 more files in changeset.
Wednesday 11 Sep 2024
8:11 am

gustafn

merge with missing files

Options
    • -0
    • +0
    ./index.tcl
    • -0
    • +0
    ./show-class-graph.tcl
    • -0
    • +0
    ./show-object.tcl
  4. … 1462 more files in changeset.
Tuesday 03 Sep 2024
5:37 pm

gustafn

merge from oacs-5-10

Options
    • -12
    • +27
    ./cache.tcl
    • -3
    • +3
    ./index.tcl
    • -24
    • +32
    ./show-class-graph.tcl
    • -43
    • +23
    ./show-object.tcl
    • -1
    • +3
    ./version-numbers.tcl
    • -47
    • +54
    ./admin/toggle-debug.tcl
  7. … 8094 more files in changeset.
Sunday 09 Sep 2018
3:11 pm

gustafn

white-space cleanup

Options
    • -12
    • +12
    ./show-object.tcl
3:10 pm

gustafn

improve robustness of output, when dot fails to produce output

Options
    • -2
    • +7
    ./show-object.tcl
Wednesday 09 May 2018
5:33 pm

hectorr

Revert massive replacement of empty list creation sentences. The use of '[list]' instead of '{}' adds semantics that could be used for performance improvements in the future, such as using a different internal representation. There is already work in this direction, avoiding the generation of the string representation during comparison of empty strings (huge thanks to Stefan Sobernig for the pointer: https://core.tcl.tk/tcl/info/44527c632ed609c2).

Options
    • -4
    • +4
    ./show-object.tcl
  2. … 475 more files in changeset.
Wednesday 25 Apr 2018
9:47 pm

hectorr

Prefer '{}' to '[list]' when creating empty lists

Options
    • -4
    • +4
    ./show-object.tcl
  2. … 204 more files in changeset.
Sunday 24 Dec 2017
1:28 pm

gustafn

Reduce numbber of "catch" operations

Options
    • -2
    • +4
    ./admin/toggle-debug.tcl
  2. … 8 more files in changeset.
Friday 11 Aug 2017
10:15 am

gustafn

Fix: close link target (<a name ...>)

Options
    • -2
    • +2
    ./index.tcl
Tuesday 08 Aug 2017
1:47 am

gustafn

merged changes from the oacs-5-9 branch and resolved conflicts

Options
    • -10
    • +19
    ./cache.tcl
    • -8
    • +21
    ./index.tcl
    • -3
    • +3
    ./show-class-graph.tcl
    • -2
    • +4
    ./show-object.adp
    • -157
    • +188
    ./show-object.tcl
    • -0
    • +6
    ./version-numbers.tcl
    • -0
    • +65
    ./admin/toggle-debug.tcl
    • -0
    • +2
    ./resources/titatoggle/README
    • -0
    • +1234
    ./resources/titatoggle/titatoggle-dist.css
  10. … 7826 more files in changeset.
Tuesday 05 Jan 2016
9:01 pm

gustafn

file README was initially added on branch oacs-5-9.

Options
    • -0
    • +0
    ./resources/titatoggle/README
9:01 pm

gustafn

file titatoggle-dist.css was initially added on branch oacs-5-9.

Options
    • -0
    • +0
    ./resources/titatoggle/titatoggle-dist.css
11:53 am

gustafn

file toggle-debug.tcl was initially added on branch oacs-5-9.

Options
    • -0
    • +0
    ./admin/toggle-debug.tcl
Friday 03 Jul 2015
12:25 pm

gustafn

- fix and standardize quoting in template properties

Options
    • -3
    • +2
    ./cache.adp
    • -3
    • +2
    ./index.adp
    • -2
    • +2
    ./show-object.adp
    • -3
    • +2
    ./version-numbers.adp
  5. … 393 more files in changeset.
Thursday 02 Jul 2015
11:22 am

gustafn

- harden page contracts

Options
    • -5
    • +5
    ./show-class-graph.tcl
    • -2
    • +2
    ./show-object.tcl
Wednesday 24 Jun 2015
12:31 pm

gustafn

- harden page contract

Options
    • -4
    • +4
    ./show-object.tcl
Tuesday 16 Jun 2015
10:35 pm

gustafn

- improve safety of generated HTML

Options
    • -2
    • +2
    ./show-object.tcl
  2. … 2 more files in changeset.
10:33 am

gustafn

- quote amp in hrefs

Options
    • -1
    • +1
    ./show-object.adp
  2. … 1 more file in changeset.
Monday 15 Jun 2015
9:34 pm

gustafn

- improve validity and safety of HTML

Options
    • -5
    • +7
    ./cache.tcl
  2. … 1 more file in changeset.
Sunday 03 May 2015
10:37 am

gustafn

- class browser: give more "above" context, when a class has no subclasses

Options
    • -6
    • +14
    ./show-object.tcl
10:03 am

gustafn

- reenable object browsing in addition to class browsing

Options
    • -4
    • +4
    ./show-object.tcl
Friday 01 May 2015
6:33 pm

gustafn

Improve XOTcl class and object browser:

- use svg instead of png by default

This leads to better graphic output,

certain stylability via CSS, and less tmp files.

- make classes in class hierarchy clickable to

allow for navigation in the class structures

- contrast class of interest (in focus) against contextual

classes in generated graphs

- make show-object configurable to allow eg. how many

levels of the class hierarchy should be displayed

before and after the class of interest

- don't display per default instance-of relationships to

make the graph simpler

Options
    • -143
    • +6
    ./show-class-graph.tcl
    • -10
    • +12
    ./show-object.adp
    • -18
    • +86
    ./show-object.tcl
  4. … 1 more file in changeset.
Monday 27 Oct 2014
5:38 pm

victorg

Merging back to HEAD branch oacs-5-8 (using tag vg-merge-oacs-5-8-from-20141027).

Options
    • -1
    • +1
    ./cache.adp
    • -2
    • +10
    ./cache.tcl
    • -1
    • +1
    ./index.adp
    • -5
    • +9
    ./index.tcl
    • -11
    • +26
    ./show-class-graph.tcl
    • -2
    • +2
    ./show-object.adp
    • -53
    • +84
    ./show-object.tcl
    • -1
    • +1
    ./version-numbers.adp
  9. … 2540 more files in changeset.
Thursday 03 Feb 2011
8:30 pm

gustafn

UML-Graphs: use correct arrowhead, draw multiple-inheritance correctly, label instance-of relations

Options
    • -11
    • +15
    ./show-class-graph.tcl
Wednesday 02 Feb 2011
5:26 pm

gustafn

- generated UM diagrams: don't show siblings of a class if there are more than 5 siblings; otherwise new versions of dot seem to loop

Options
    • -0
    • +1
    ./show-object.tcl