2016-01-12 16:26:00

1 files changed, 252 insertions, 0 deletions

diff --git a/tex/context/base/mkiv/task-ini.lua b/tex/context/base/mkiv/task-ini.lua
new file mode 100644
index 000000000..ebfbbdc26
--- /dev/null
+++ b/tex/context/base/mkiv/task-ini.lua
@@ -0,0 +1,252 @@
+if not modules then modules = { } end modules ['task-ini'] = {
+    version   = 1.001,
+    comment   = "companion to task-ini.mkiv",
+    author    = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
+    copyright = "PRAGMA ADE / ConTeXt Development Team",
+    license   = "see context related readme files"
+}
+
+-- this is a temporary solution, we need to isolate some modules and then
+-- the load order can determine the trickery to be applied to node lists
+--
+-- we can disable more handlers and enable then when really used (*)
+--
+-- todo: two finalizers: real shipout (can be imposed page) and page shipout (individual page)
+--
+-- todo: consider moving the kernel kerning/ligaturing functions in the main font loop because
+-- there we know if they are needed; doesn't save time but; if we overload unh* commands to
+-- not apply the font handler, we can remove all checks for subtypes 255
+
+local tasks           = nodes.tasks
+local prependaction   = tasks.prependaction
+local appendaction    = tasks.appendaction
+local disableaction   = tasks.disableaction
+local enableaction    = tasks.enableaction
+local freezegroup     = tasks.freezegroup
+local freezecallbacks = callbacks.freeze
+
+appendaction("processors",   "normalizers", "typesetters.wrappers.handler")                      -- disabled
+appendaction("processors",   "normalizers", "typesetters.characters.handler")                    -- always on
+appendaction("processors",   "normalizers", "fonts.collections.process")                         -- disabled
+appendaction("processors",   "normalizers", "fonts.checkers.missing")                            -- disabled
+
+appendaction("processors",   "characters",  "scripts.autofontfeature.handler")
+appendaction("processors",   "characters",  "scripts.splitters.handler")                         -- disabled
+appendaction("processors",   "characters",  "typesetters.cleaners.handler")                      -- disabled
+appendaction("processors",   "characters",  "typesetters.directions.handler")                    -- disabled
+appendaction("processors",   "characters",  "typesetters.cases.handler")                         -- disabled
+appendaction("processors",   "characters",  "typesetters.breakpoints.handler")                   -- disabled
+appendaction("processors",   "characters",  "scripts.injectors.handler")                         -- disabled
+
+appendaction("processors",   "words",       "languages.replacements.handler")                    -- disabled
+
+appendaction("processors",   "words",       "languages.hyphenators.handler")                     -- always on
+
+appendaction("processors",   "words",       "languages.words.check")                             -- disabled  -- might move up, no disc check needed then
+
+appendaction("processors",   "words",       "typesetters.initials.handler")                      -- disabled  -- might move up
+appendaction("processors",   "words",       "typesetters.firstlines.handler")                    -- disabled  -- might move down
+
+appendaction("processors",   "fonts",       "builders.paragraphs.solutions.splitters.split")     -- experimental
+appendaction("processors",   "fonts",       "nodes.handlers.characters")                         -- maybe todo
+appendaction("processors",   "fonts",       "nodes.injections.handler")                          -- maybe todo
+appendaction("processors",   "fonts",       "nodes.handlers.protectglyphs", nil, "nohead")       -- maybe todo
+appendaction("processors",   "fonts",       "builders.kernel.ligaturing")                        -- always on (could be selective: if only node mode)
+appendaction("processors",   "fonts",       "builders.kernel.kerning")                           -- always on (could be selective: if only node mode)
+appendaction("processors",   "fonts",       "nodes.handlers.stripping")                          -- disabled (might move)
+------------("processors",   "fonts",       "typesetters.italics.handler")                       -- disabled (after otf/kern handling)
+
+appendaction("processors",   "lists",       "typesetters.characteralign.handler")                -- disabled (we need to to this after otf appliance)
+appendaction("processors",   "lists",       "typesetters.spacings.handler")                      -- disabled
+appendaction("processors",   "lists",       "typesetters.kerns.handler")                         -- disabled
+appendaction("processors",   "lists",       "typesetters.digits.handler")                        -- disabled (after otf handling)
+appendaction("processors",   "lists",       "typesetters.italics.handler")                       -- disabled (after otf/kern handling)
+appendaction("processors",   "lists",       "languages.visualizediscretionaries")                -- disabled
+
+-- appendaction("processors",   "lists",       "typesetters.initials.handler")                   -- disabled
+
+appendaction("shipouts",     "normalizers", "typesetters.margins.finalhandler")                  -- disabled
+------------("shipouts",     "normalizers", "nodes.handlers.cleanuppage")                        -- disabled
+appendaction("shipouts",     "normalizers", "builders.paragraphs.expansion.trace")               -- disabled
+appendaction("shipouts",     "normalizers", "typesetters.alignments.handler")
+appendaction("shipouts",     "normalizers", "nodes.references.handler")                          -- disabled
+appendaction("shipouts",     "normalizers", "nodes.destinations.handler")                        -- disabled
+appendaction("shipouts",     "normalizers", "nodes.rules.handler")                               -- disabled
+appendaction("shipouts",     "normalizers", "nodes.shifts.handler")                              -- disabled
+appendaction("shipouts",     "normalizers", "structures.tags.handler")                           -- disabled
+appendaction("shipouts",     "normalizers", "nodes.handlers.accessibility")                      -- disabled
+appendaction("shipouts",     "normalizers", "nodes.handlers.backgrounds")                        -- disabled
+appendaction("shipouts",     "normalizers", "nodes.handlers.alignbackgrounds")                   -- disabled
+------------("shipouts",     "normalizers", "nodes.handlers.export")                             -- disabled
+
+appendaction("shipouts",     "finishers",   "nodes.visualizers.handler")                         -- disabled
+appendaction("shipouts",     "finishers",   "attributes.colors.handler")                         -- disabled
+appendaction("shipouts",     "finishers",   "attributes.transparencies.handler")                 -- disabled
+appendaction("shipouts",     "finishers",   "attributes.colorintents.handler")                   -- disabled
+appendaction("shipouts",     "finishers",   "attributes.negatives.handler")                      -- disabled
+appendaction("shipouts",     "finishers",   "attributes.effects.handler")                        -- disabled
+appendaction("shipouts",     "finishers",   "attributes.viewerlayers.handler")                   -- disabled
+
+--maybe integrate relocate and families
+
+appendaction("math",         "normalizers", "noads.handlers.showtree",  nil, "nohead")
+
+appendaction("math",         "normalizers", "noads.handlers.unscript",  nil, "nohead")           -- always on (maybe disabled)
+appendaction("math",         "normalizers", "noads.handlers.variants",  nil, "nohead")           -- always on
+appendaction("math",         "normalizers", "noads.handlers.relocate",  nil, "nohead")           -- always on
+appendaction("math",         "normalizers", "noads.handlers.families",  nil, "nohead")           -- always on
+
+appendaction("math",         "normalizers", "noads.handlers.render",    nil, "nohead")           -- always on
+appendaction("math",         "normalizers", "noads.handlers.collapse",  nil, "nohead") -- * first-- always on
+appendaction("math",         "normalizers", "noads.handlers.domains",   nil, "nohead") -- * last -- disabled
+appendaction("math",         "normalizers", "noads.handlers.autofences",nil, "nohead")           -- disabled
+appendaction("math",         "normalizers", "noads.handlers.resize",    nil, "nohead")           -- always on
+------------("math",         "normalizers", "noads.handlers.respace",   nil, "nohead")           -- always on
+appendaction("math",         "normalizers", "noads.handlers.alternates",nil, "nohead")           -- always on
+appendaction("math",         "normalizers", "noads.handlers.tags",      nil, "nohead")           -- disabled
+appendaction("math",         "normalizers", "noads.handlers.italics",   nil, "nohead")           -- disabled
+appendaction("math",         "normalizers", "noads.handlers.classes",   nil, "nohead")           -- disabled
+
+appendaction("math",         "builders",    "builders.kernel.mlist_to_hlist")                    -- always on
+------------("math",         "builders",    "noads.handlers.italics",  nil, "nohead")            -- disabled
+appendaction("math",         "builders",    "typesetters.directions.processmath")                -- disabled (has to happen pretty late)
+
+appendaction("finalizers",   "lists",       "typesetters.margins.localhandler")                  -- disabled
+appendaction("finalizers",   "lists",       "builders.paragraphs.keeptogether")
+------------("finalizers",   "lists",       "nodes.handlers.graphicvadjust")                     -- todo
+appendaction("finalizers",   "fonts",       "builders.paragraphs.solutions.splitters.optimize")  -- experimental
+appendaction("finalizers",   "lists",       "builders.paragraphs.tag")
+
+-- still experimental
+
+appendaction("mvlbuilders",  "normalizers", "typesetters.margins.globalhandler")                 -- disabled
+appendaction("mvlbuilders",  "normalizers", "nodes.handlers.migrate")
+
+appendaction("mvlbuilders",  "normalizers", "builders.vspacing.pagehandler")                     -- last !
+appendaction("mvlbuilders",  "normalizers", "builders.profiling.pagehandler")                    -- here !
+
+------------("vboxbuilders", "normalizers", "typesetters.margins.localhandler")
+appendaction("vboxbuilders", "normalizers", "builders.vspacing.vboxhandler")
+appendaction("vboxbuilders", "normalizers", "builders.profiling.vboxhandler")                    -- here !
+
+-- experimental too
+
+appendaction("mvlbuilders",  "normalizers", "typesetters.checkers.handler")
+appendaction("vboxbuilders", "normalizers", "typesetters.checkers.handler")
+
+-- rather special (this might get hardcoded):
+
+prependaction("processors",  "before",      "nodes.properties.attach")  -- enabled but optimized for quick abort
+appendaction ("shipouts",    "normalizers", "nodes.properties.delayed") -- enabled but optimized for quick abort
+
+-- speedup: only kick in when used
+
+disableaction("processors",  "typesetters.wrappers.handler")
+disableaction("processors",  "languages.replacements.handler")
+disableaction("processors",  "typesetters.characteralign.handler")
+disableaction("processors",  "scripts.autofontfeature.handler")
+disableaction("processors",  "scripts.splitters.handler")
+disableaction("processors",  "scripts.injectors.handler") -- was enabled
+disableaction("processors",  "fonts.collections.process")
+disableaction("processors",  "fonts.checkers.missing")
+disableaction("processors",  "chars.handle_breakpoints")
+disableaction("processors",  "typesetters.cleaners.handler")
+disableaction("processors",  "typesetters.cases.handler")
+disableaction("processors",  "typesetters.digits.handler")
+disableaction("processors",  "typesetters.breakpoints.handler")
+disableaction("processors",  "typesetters.directions.handler")
+disableaction("processors",  "languages.words.check")
+disableaction("processors",  "typesetters.initials.handler")
+disableaction("processors",  "typesetters.firstlines.handler")
+disableaction("processors",  "typesetters.spacings.handler")
+disableaction("processors",  "typesetters.kerns.handler")
+disableaction("processors",  "typesetters.italics.handler")
+disableaction("processors",  "languages.visualizediscretionaries")
+disableaction("processors",  "nodes.handlers.stripping")
+disableaction("processors",  "builders.paragraphs.solutions.splitters.split")
+
+disableaction("shipouts",    "typesetters.margins.finalhandler")
+disableaction("shipouts",    "builders.paragraphs.expansion.trace")
+disableaction("shipouts",    "typesetters.alignments.handler")
+disableaction("shipouts",    "nodes.rules.handler")
+disableaction("shipouts",    "nodes.shifts.handler")
+disableaction("shipouts",    "attributes.colors.handler")
+disableaction("shipouts",    "attributes.transparencies.handler")
+disableaction("shipouts",    "attributes.colorintents.handler")
+disableaction("shipouts",    "attributes.effects.handler")
+disableaction("shipouts",    "attributes.negatives.handler")
+disableaction("shipouts",    "attributes.viewerlayers.handler")
+disableaction("shipouts",    "structures.tags.handler")
+disableaction("shipouts",    "nodes.visualizers.handler")
+disableaction("shipouts",    "nodes.handlers.accessibility")
+disableaction("shipouts",    "nodes.handlers.backgrounds")
+disableaction("shipouts",    "nodes.handlers.alignbackgrounds")
+disableaction("shipouts",    "nodes.references.handler")
+disableaction("shipouts",    "nodes.destinations.handler")
+-------------("shipouts",    "nodes.handlers.export")
+
+disableaction("finalizers",  "typesetters.margins.localhandler")
+disableaction("finalizers",  "builders.paragraphs.keeptogether")
+disableaction("finalizers",  "builders.paragraphs.solutions.splitters.optimize")
+-------------("finalizers",  "nodes.handlers.graphicvadjust") -- sort of obsolete
+disableaction("finalizers",  "builders.paragraphs.tag")
+
+disableaction("math",        "noads.handlers.showtree")
+disableaction("math",        "noads.handlers.tags")
+disableaction("math",        "noads.handlers.italics")
+disableaction("math",        "noads.handlers.domains")
+disableaction("math",        "noads.handlers.classes")
+disableaction("math",        "noads.handlers.autofences")
+disableaction("math",        "typesetters.directions.processmath")
+
+disableaction("mvlbuilders", "typesetters.margins.globalhandler")
+disableaction("mvlbuilders", "nodes.handlers.migrate")
+disableaction("mvlbuilders", "typesetters.checkers.handler")
+disableaction("mvlbuilders", "builders.profiling.pagehandler")
+
+-------------("vboxbuilders","typesetters.margins.localhandler")
+disableaction("vboxbuilders","typesetters.checkers.handler")
+disableaction("vboxbuilders","builders.profiling.vboxhandler")
+
+freezecallbacks("find_.*_file", "find file using resolver")
+freezecallbacks("read_.*_file", "read file at once")
+freezecallbacks("open_.*_file", "open file for reading")
+
+-- experimental:
+
+freezegroup("processors",   "normalizers")
+freezegroup("processors",   "characters")
+freezegroup("processors",   "words")
+freezegroup("processors",   "fonts")
+freezegroup("processors",   "lists")
+
+freezegroup("finalizers",   "normalizers")
+freezegroup("finalizers",   "fonts")
+freezegroup("finalizers",   "lists")
+
+freezegroup("shipouts",     "normalizers")
+freezegroup("shipouts",     "finishers")
+
+freezegroup("mvlbuilders",  "normalizers")
+freezegroup("vboxbuilders", "normalizers")
+
+-----------("parbuilders",  "lists")
+-----------("pagebuilders", "lists")
+
+freezegroup("math",         "normalizers")
+freezegroup("math",         "builders")
+
+-- new: disabled here
+
+disableaction("processors", "builders.kernel.ligaturing")
+disableaction("processors", "builders.kernel.kerning")
+
+directives.register("nodes.basepass", function(v)
+    if v then
+         enableaction("processors", "builders.kernel.ligaturing")
+         enableaction("processors", "builders.kernel.kerning")
+    else
+         disableaction("processors", "builders.kernel.ligaturing")
+         disableaction("processors", "builders.kernel.kerning")
+    end
+end)